Re: COBOL5 and ceedump
On Sun, 8 Jan 2017 18:51:14 +0200, Steff Gladstone wrote: "In a COBOL5 CEEDUMP, how do I locate the *index* of an array (i.e., an array that is defined with "indexed by") in >the dump?" If you consult the "* * * * * S T A T I C M A P * * * * *" in the compile listing you should get an OFFSET (and a length, shoot me if it is not four). For COBOL it is a Table, not an Array. The Programming Guide should describe the listing. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
AW: AW: COBOL5 and ceedump
APAR Identifier .. PI65115 Last Changed 16/08/29 WRITING BEYOND THE END OF A TABLE IN V5.X CAN CORRUPT INDEX NAMES IN THAT TABLE. -Ursprüngliche Nachricht- Von: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] Im Auftrag von Martin Packer Gesendet: Sonntag, 8. Januar 2017 19:24 An: IBM-MAIN@LISTSERV.UA.EDU Betreff: Re: AW: COBOL5 and ceedump Would be nice to know the APAR. :-) Cheers, Martin Martin Packer, zChampion, Principal Systems Investigator, Worldwide Cloud & Systems Performance, IBM +44-7802-245-584 email: martin_pac...@uk.ibm.com Twitter / Facebook IDs: MartinPacker Blog: https://www.ibm.com/developerworks/mydeveloperworks/blogs/MartinPacker Podcast Series (With Marna Walle): https://developer.ibm.com/tv/mpt/or https://itunes.apple.com/gb/podcast/mainframe-performance-topics/id112794357 3?mt=2 From: Roland Schiradin To: IBM-MAIN@LISTSERV.UA.EDU Date: 08/01/2017 17:48 Subject:AW: COBOL5 and ceedump Sent by:IBM Mainframe Discussion List Hi Steff, depending on your service level the index is defined in front of the array. Look at this APAR text Starting with COBOL V5.1, index-names were located in memory immediately following the memory for the associated table, which meant that programs that modify dsta beyond the end of a table could corrupt their associated index-names. PROBLEM CONCLUSION: Index-names for tables defined in WORKING-STORAGE or LOCAL-STORAGE sections have been moved to the top of the associated storage area. HTH Roland -Ursprüngliche Nachricht- Von: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] Im Auftrag von Steff Gladstone Gesendet: Sonntag, 8. Januar 2017 17:51 An: IBM-MAIN@LISTSERV.UA.EDU Betreff: COBOL5 and ceedump Are there any whizzes out there who specialize in reading and deciphering CEEDUMPs? I have a question for you. In a COBOL5 CEEDUMP, how do I locate the *index* of an array (i.e., an array that is defined with "indexed by") in the dump? Thanks in advance, Steff Gladstone -- 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 Unless stated otherwise above: IBM United Kingdom Limited - Registered in England and Wales with number 741598. Registered office: PO Box 41, North Harbour, Portsmouth, Hampshire PO6 3AU -- 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
Re: AW: COBOL5 and ceedump
Would be nice to know the APAR. :-) Cheers, Martin Martin Packer, zChampion, Principal Systems Investigator, Worldwide Cloud & Systems Performance, IBM +44-7802-245-584 email: martin_pac...@uk.ibm.com Twitter / Facebook IDs: MartinPacker Blog: https://www.ibm.com/developerworks/mydeveloperworks/blogs/MartinPacker Podcast Series (With Marna Walle): https://developer.ibm.com/tv/mpt/or https://itunes.apple.com/gb/podcast/mainframe-performance-topics/id1127943573?mt=2 From: Roland Schiradin To: IBM-MAIN@LISTSERV.UA.EDU Date: 08/01/2017 17:48 Subject:AW: COBOL5 and ceedump Sent by:IBM Mainframe Discussion List Hi Steff, depending on your service level the index is defined in front of the array. Look at this APAR text Starting with COBOL V5.1, index-names were located in memory immediately following the memory for the associated table, which meant that programs that modify dsta beyond the end of a table could corrupt their associated index-names. PROBLEM CONCLUSION: Index-names for tables defined in WORKING-STORAGE or LOCAL-STORAGE sections have been moved to the top of the associated storage area. HTH Roland -Ursprüngliche Nachricht- Von: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] Im Auftrag von Steff Gladstone Gesendet: Sonntag, 8. Januar 2017 17:51 An: IBM-MAIN@LISTSERV.UA.EDU Betreff: COBOL5 and ceedump Are there any whizzes out there who specialize in reading and deciphering CEEDUMPs? I have a question for you. In a COBOL5 CEEDUMP, how do I locate the *index* of an array (i.e., an array that is defined with "indexed by") in the dump? Thanks in advance, Steff Gladstone -- 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 Unless stated otherwise above: IBM United Kingdom Limited - Registered in England and Wales with number 741598. Registered office: PO Box 41, North Harbour, Portsmouth, Hampshire PO6 3AU -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
AW: COBOL5 and ceedump
Hi Steff, depending on your service level the index is defined in front of the array. Look at this APAR text Starting with COBOL V5.1, index-names were located in memory immediately following the memory for the associated table, which meant that programs that modify dsta beyond the end of a table could corrupt their associated index-names. PROBLEM CONCLUSION: Index-names for tables defined in WORKING-STORAGE or LOCAL-STORAGE sections have been moved to the top of the associated storage area. HTH Roland -Ursprüngliche Nachricht- Von: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] Im Auftrag von Steff Gladstone Gesendet: Sonntag, 8. Januar 2017 17:51 An: IBM-MAIN@LISTSERV.UA.EDU Betreff: COBOL5 and ceedump Are there any whizzes out there who specialize in reading and deciphering CEEDUMPs? I have a question for you. In a COBOL5 CEEDUMP, how do I locate the *index* of an array (i.e., an array that is defined with "indexed by") in the dump? Thanks in advance, Steff Gladstone -- 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
Re: COBOL5 and ceedump
The offset should be in the compiler listing. On Sun, Jan 8, 2017 at 10:51 AM, Steff Gladstone wrote: > Are there any whizzes out there who specialize in reading and deciphering > CEEDUMPs? > I have a question for you. In a COBOL5 CEEDUMP, how do I locate the > *index* of an array (i.e., an array that is defined with "indexed by") in > the dump? > > Thanks in advance, > Steff Gladstone > > -- > For IBM-MAIN subscribe / signoff / archive access instructions, > send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN -- Mike A Schwab, Springfield IL USA Where do Forest Rangers go to get away from it all? -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: IEFUJV PROCESS OF JECL CARDS
Someone may give you a better answer. We have created our own JECL card (/*SCHENV) that we process entirely within JES2 exits. You can definitely change a JECL card there. We have to, in fact, because our JECL card must be turned into a comment before mainline processing gets control. I’m not sure what you need from IEFUJV, but failing another solution, you might handle you JECL card(s) within JES2 and either perform desired processing there or interact with SMF exit(s) in some other way. . . J.O.Skip Robinson Southern California Edison Company Electric Dragon Team Paddler SHARE MVS Program Co-Manager 323-715-0595 Mobile 626-543-6132 Office ⇐=== NEW robin...@sce.com -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf Of bILHA ELROY Sent: Sunday, January 08, 2017 12:44 AM To: IBM-MAIN@LISTSERV.UA.EDU Subject: (External):IEFUJV PROCESS OF JECL CARDS Z/OS V2.1 Is it possible to process JECL (/*JOBPARM for example) cards in IEFUJV exit ? If so, can we change the card image (not only set a R.C ) in z/os mvs installation exit book it is said that: •The job validation exit (IEFUJV) receives control before each job control statement in the input stream or cataloged procedure is converted. This exit receives control after all the JCL is converted and again after all the JCL is interpreted. IEFUJV is not invoked for JCL comment statements or null statements. A return code from this exit indicates whether the system is to continue processing the job. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
COBOL5 and ceedump
Are there any whizzes out there who specialize in reading and deciphering CEEDUMPs? I have a question for you. In a COBOL5 CEEDUMP, how do I locate the *index* of an array (i.e., an array that is defined with "indexed by") in the dump? Thanks in advance, Steff Gladstone -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: DNS, Resolver, and /etc/hosts
Thanks, Steve and Elardus-those look like the ticket! Will read and try to grok. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: IPLing z/OS 2.2 from 1.13 for first time getting JES2 catastrophic error
I went from 1.13 to 2.2 last May without any issue. You probably have already done this several times, but double check your parmlib members - IEAFIXxx, IEALPAxx, PROGxx. Any chance you have one that includes modifications of an exit or module from JES2 1.13? Also, perhaps review any jobs where you may have linked any JES2 exits or modifications to ensure you only picked up the 2.2 libraries. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
IEFUJV PROCESS OF JECL CARDS
Z/OS V2.1 Is it possible to process JECL (/*JOBPARM for example) cards in IEFUJV exit ? If so, can we change the card image (not only set a R.C ) in z/os mvs installation exit book it is said that: •The job validation exit (IEFUJV) receives control before each job control statement in the input stream or cataloged procedure is converted. This exit receives control after all the JCL is converted and again after all the JCL is interpreted. IEFUJV is not invoked for JCL comment statements or null statements. A return code from this exit indicates whether the system is to continue processing the job. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN