I'm one of those who prefers to see the 97, and take a little time out to wonder why it happened. "the file was being updated, and something went wrong because the file was not closed properly - I've fixed the statistics for you" always makes me wary.
Of course, there is the fun where a program gets the 97, abends deliberately, and run-instructions are "verify the file and resubmit". I do wonder what "for certain VSAM OPEN statements" means exactly. On Tuesday, 16 February 2016 17:08:45 UTC, Frank Swarbrick wrote: > Yay for the VSAMOPENFS(SUCC). I submitted the RFE for this. (Probably > others did as well.) > > I am curious what opinions other might have for this being a compile option > rather than a runtime option. I spoke with COBOL development and they were > insistent that having it as a compile option was the only way to go so-as to > not change existing runtime behavior and perhaps cause issues. My argument > was that if a shop currently always treated 97 and 00 in the same manner, and > now 97 was never returned, the programs would still behave the same. No need > for recompile (and perhaps could work even for downlevel compiled programs, > as long as they used the most recent runtime). > > Oh well, water under the bridge I suppose. I'm fairly happy they at least > addressed it. IMO status 97 should have never existed in the first place. > > The INITIALIZE enhancements are pretty nice as well. As are ALLOCATE/FREE. > I was kind of hoping for more language enhancements, but progress is progress. > > The requirement for z/OS 2.1 is disappointing. We haven't been on 1.13 for > all that long, and I don't know that we have an upgrade due any time soon... > :-( > > Frank > > > Date: Tue, 16 Feb 2016 08:47:13 -0600 > > From: [email protected] > > Subject: Enterprise COBOL 6.1 announced > > To: [email protected] > > > > Announcement > > http://www-01.ibm.com/common/ssi/cgi-bin/ssialias?subtype=ca&infotype=an&appname=iSource&supplier=897&letternum=ENUS216-059 > > > > trial version > > http://www-01.ibm.com/common/ssi/cgi-bin/ssialias?subtype=ca&infotype=an&appname=iSource&supplier=897&letternum=ENUS216-060 > > > > One Time Charge version? > > http://www-01.ibm.com/common/ssi/cgi-bin/ssialias?subtype=ca&infotype=an&appname=iSource&supplier=897&letternum=ENUS216-061 > > > > === > > > > New ALLOCATE, FREE, and JSON GENERATE verbs. Allows ALLOCATE and FREE of > > dynamic memory (GETMAIN / FREEMAIN) and to generate JSON output, similar to > > XML GENERATE is my guess. New option to automatically convert FILESTATUS=97 > > to FILESTATUS=0. Way past time for that! > > > > Requires z/OS 2.1 or above. > > > > === > > > > -- > > The man has the intellect of a lobotomized turtle. > > > > Maranatha! <>< > > John McKown > > > > ---------------------------------------------------------------------- > > For IBM-MAIN subscribe / signoff / archive access instructions, > > send email to [email protected] with the message: INFO IBM-MAIN > > ---------------------------------------------------------------------- > For IBM-MAIN subscribe / signoff / archive access instructions, > send email to [email protected] with the message: INFO IBM-MAIN ---------------------------------------------------------------------- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [email protected] with the message: INFO IBM-MAIN
