So what do your programs do when they get an FC97 on an OPEN? Display a message to the console and wait for a response? Display a message to the console and continue on? Something else?
> Date: Tue, 16 Feb 2016 11:28:28 -0600 > From: [email protected] > Subject: Enterprise COBOL 6.1 announced > To: [email protected] > > 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 ---------------------------------------------------------------------- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [email protected] with the message: INFO IBM-MAIN
