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
"
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
"One trick programmers do, is to include a filler with 'working storage
starts here' at the beginning of working storage. But, a 'map' compile
option will give you a map of relative displacements for all elements in
working storage section. Now keep in mind that in memory, there are TWO
working storage sections. One in the load module as you say, but that
the real one has been relocated by the cobol loader and it's somewhere
in memory. Otherwise, the program would not be reentrant, and in an
online system you'd need one copy of the program in memory for each
invocation.

Lutz Petzold
TDM UDB/IDMS Support
401-782-2265
Page 860 366 0865 or Telalert

Outcomes