In a recent note, Matthew Stitt said: > Date: Fri, 16 Feb 2007 08:41:37 -0600 > > In this case, you are probably dealing with a record length type of error. > I've seen this in the past, where a PDS has a record length of 133, and the > output was probably trying to use 121 for its length. > > Most likely someone in SUPERC development closed(?) a hole in code. In my > opinion, B. A. D. now. > This "hole" has existed in the Classic file system since OS/360. (Shmuel might correct my conjecture about history). Likewise there's the venerable pitfall of allocating a PDS and failing to specify a member, thus overwriting the directory. Rightly, both holes should be closed once and for all (perhaps leaving a back door to allow reading a PDS directory sequentially). But the fix should be done not haphazardly by individual applications, each applying its developers' idiosyncratic concept of what the rule should be, but uniformly, in OPEN code.
For the PDS/PS fix, Rexx is an individual application that gets it right: It fails the attempt to open a PDS with no member specified, but allows it if the programmer allocates with overriding DSORG(PS) (the back door). Simply, that well-designed code should be moved from Rexx to OPEN, making the behavior uniform for all applications. Conway's law strikes again. -- gil -- StorageTek INFORMATION made POWERFUL ---------------------------------------------------------------------- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
