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
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
"Quasi-reentrancy was an IDMS-DC concept that I believe no longer exists - c=
ertainly there's no such think in IBM land. Re-entrant code can run in batc=
h or online - but in batch you just get some extra overhead because the cod=
e allows for multiple concurrent users when there is in fact only one user =
in the batch region.

Non-reentrant code can run in batch and is ""leaner"" than re-entrant code. I=
t can also run in online (i.e. within DC) but it will ""single thread"". Only=
one user at a time may use that non-reentrant program. Other users wanting=
to run the program go into a WAIT on a PDEECB.

The reason Kay is seeing ""double"", as I make it out, is that she has the sa=
me ""LITERAL"" in two different places and she doesn't know which one to ZAP.=
As pointed out in an earlier message in the thread the LIST option to get =
the assembler will clearly identify which literal is used in each of the tw=
o references. Assembler by the way is clever enough to recognise identical =
literals and it only creates a single instance of the literal.

HTH - cheers - Gary=20


Gary Cherlet
Justice Technology Services
Department of Justice, SA Government
Telephone +61 (0)8 8226 5199
Facsimile +61 (0)8 8226 5311
Mobile +61 (0)41 333 1613
MailTo:cherlet.gary@saugov.sa.gov.au

This e-mail message and any attachments are qualified as follows: Addressin=
g: If you have received this e-mail in error, please advise by reply e-mai=
l to the sender. Please also destroy the original transmission and its con=
tents. Confidentiality: This e-mail may contain confidential information w=
hich also may be legally privileged. Only the intended recipient(s) may ac=
cess, use, distribute or copy this e-mail. Individual Views: Unless otherw=
ise indicated, the views expressed are those of the sender, not Justice Tec=
hnology Services. Computer Viruses: It is the recipient's responsibility t=
o check the e-mail and any attached files for viruses.

Outcomes