Is your LE configured to allow run-time overrides? If it is, and your overrides were honored by LE, then this is a good example of one of the aspects of LE that still causes me to shake my head. Given that one of the "fundamentals" of our industry is the repeatability of a symptom (i.e., if a jobs fails with a S0C7, and nothing changes (including the data), it should always abend with a S0C7, on either your system or mine), I am taken back sometimes at how easily LE will give different results - with seemingly the same environment.
We have a seemingly very simply COBOL program. One would expect consistent results. Yet, we have seen multiple results - from what would on the surface seem to be fairly similar environments. Bill Hitefield Dino-Software Corporation 800.480.DINO 423.878.5660 www.dino-software.com -----Original Message----- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf Of Frank Swarbrick Sent: Thursday, July 14, 2016 7:01 PM To: IBM-MAIN@LISTSERV.UA.EDU Subject: Re: Error in a simple COBOL program For what its worth, I just ran it (in batch) with TRAP(OFF,NOSPIE) and I still don't get a S0C1 (or any different result at all, that I can see). ________________________________ From: IBM Mainframe Discussion List <IBM-MAIN@LISTSERV.UA.EDU> on behalf of Bill Hitefield <bill.hitefi...@dino-software.com> Sent: Thursday, July 14, 2016 3:42 PM To: IBM-MAIN@LISTSERV.UA.EDU Subject: Re: Error in a simple COBOL program It is quite possible the OP is running with different LE options. For example, the TRAP option controls some aspects of LE error trapping. (There are others that govern things like SPIE processing). If LE does not "trap" the abend, and z/OS is allowed to process it, you will probably see some sort of S0Cx abend (depending upon the version of the compiler and LE run-time libraries). If LE does "trap" the abend, you will see some sort of user abend (generated by LE). A U4038 abend is typically I/O related. Unfortunately, it is an extremely generic abend code. The extra messages supplied by Frank show how necessary they are with LE. I am going to guess that his LE options are such that LE is asked to trap "exceptional conditions" (LE's terms) and funnel them through its processing, with the result usually being (1) LE messages, (2) an LE "SNAP mini-dump", and (3) a user abend of some sort (typically in the U4xxx series). Bill Hitefield Dino-Software Corporation 800.480.DINO 423.878.5660 www.dino-software.com<http://www.dino-software.com> [http://www.dino-software.com/wp-content/uploads/2015/07/RORGadon-1920x500-800x208.jpg]<http://www.dino-software.com/> Dino-Software | Enterprise-Wide Solutions<http://www.dino-software.com/> www.dino-software.com Dino-Software Corporation (Dino-Software) develops enterprise-wide solutions for the optimization of complex IT environments -----Original Message----- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf Of Frank Swarbrick Sent: Thursday, July 14, 2016 11:50 AM To: IBM-MAIN@LISTSERV.UA.EDU Subject: Re: Error in a simple COBOL program For my TSO test I did a DDLIST and freed the SYSIN allocation. Once that was done I executed my program: TSO CALL 'DVFJS.APPLIB.LOAD(ACC)'. The following are the results: IEC130I SYSIN DD STATEMENT MISSING IGZ0017S The open of DISPLAY or ACCEPT file with environment name SYSIN was unsuccessful. From compile unit ACC at entry point ACC at statement 7 at compile unit offset +000002A6 at entry offset +000002A6 at address 0E9082A6. User abend 4,038 dec occurred processing command 'CALL '. ISPD210 CMD abended - 'CALL' terminated abnormally. So... Same results as in batch. No S0C1. Frank ________________________________ From: IBM Mainframe Discussion List <IBM-MAIN@LISTSERV.UA.EDU> on behalf of Frank Swarbrick <frank.swarbr...@outlook.com> Sent: Thursday, July 14, 2016 9:38 AM To: IBM-MAIN@LISTSERV.UA.EDU Subject: Re: Error in a simple COBOL program I can't see to find the original post that started all of this. Can someone find it and quote it here? The reason I ask is I swear that the original issue was a compile time issue, not a run-time issue. Or perhaps I'm mixing up two different conversations. FWIW, I'm going to see what happens if I run my example in TSO. Frank ________________________________ From: IBM Mainframe Discussion List <IBM-MAIN@LISTSERV.UA.EDU> on behalf of Andy Wood <woo...@ozemail.com.au> Sent: Wednesday, July 13, 2016 6:55 PM To: IBM-MAIN@LISTSERV.UA.EDU Subject: Re: Error in a simple COBOL program On Wed, 13 Jul 2016 18:08:46 -0500, Bill Woodger <bill.wood...@gmail.com> wrote: > "IGZ0017S The open of DISPLAY or ACCEPT file with environment name SYSIN was > unsuccessful." That message is indeed specific, but it does not exactly scream out "... expect operation exception to follow this message." > Program outside of TSO then gets an LE User Abend (U4038). No S0C1. Cameron, the person with the original problem, got the S0C1 when running the program under TSO. Frank, who was kind enough to recreate the situation, did not get the S0C1 but was running it as a batch job. As far as I can see, and this is perhaps where I missed something, Cameron did not try the program in batch, and nor did Frank try it under TSO. Myself, I would not spend much time on it, but I wouldn't just ignore it either. But, enough said. ---------------------------------------------------------------------- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN ---------------------------------------------------------------------- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN ---------------------------------------------------------------------- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN ---------------------------------------------------------------------- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN ---------------------------------------------------------------------- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN ---------------------------------------------------------------------- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
