ca.portal.admin

Re:Re: COBOL question

Discussion created by ca.portal.admin on Jun 8, 2009
Kay, I think you can still compile with the assembler code
option. That should give you the required addresses.
Paul Wood
IBM Global Services
Mainframe Databases, Modeling, Repository Tech. Lead

Home Office: (714) 876-0497
pawood@us.ibm.com



""Rozeboom, Kay [DAS]"" <KAY.ROZEBOOM@IOWA.GOV> Sent by: IDMS
Public Discussion Forum <IDMS-L@LISTSERV.IUASSN.COM>
06/08/2009 11:43 AM
Please respond to
IDMS Public Discussion Forum <IDMS-L@LISTSERV.IUASSN.COM>


To
IDMS-L@LISTSERV.IUASSN.COM
cc

Subject
COBOL question






Can anyone point me to a tutorial or documentation on how to
find the location of a working-storage field in the load module
of a COBOL program?
(As opposed to finding it in a dump.) I do have a compile
listing available.

Kay Rozeboom
State of Iowa
Information Technology Enterprise
Department of Administrative Services
Telephone: 515.281.6139 Fax: 515.281.6137
Email: Kay.Rozeboom@Iowa.Gov
This e-mail may contain confidential or privileged information. If
you think you have received this e-mail in error, please advise the
sender by reply e-mail and then delete this e-mail immediately.
Thank you. Aetna
"
IDMS Public Discussion Forum
IDMS-L@LISTSERV.IUASSN.COM
SMTP
IDMS-L@LISTSERV.IUASSN.COM
IDMS-L@LISTSERV.IUASSN.COM
SMTP








Normal

Normal
Re: COBOL question
"The constant global table (CGT) and program global table (PGT) are part of the load module but may or not be copied to a work area pointed to a PBL cell in the TGT. To be sure you are zapping the correct literal that the compiler is using, I recommended looking at the generated pseudo assembler code which gives you a reference to the offset in the literal pool. BTW, the example I illustrated below was for a reentrant program and it worked fine; I have used this technique before in emergency situations where a load module needed to be zapped rather than recompiled. For further information, I recommend reading the compiler diagnosis reference for the compiler being utilized.

Dan Miley
Lockheed Martin

Outcomes