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 - certainly there's no such think in IBM land. Re-entrant code can run in batch or online - but in batch you just get some extra overhead because the code 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. It 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 same ""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 two 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


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: Addressing: If you have received this e-mail in error, please advise by reply e-mail to the sender. Please also destroy the original transmission and its contents. Confidentiality: This e-mail may contain confidential information which also may be legally privileged. Only the intended recipient(s) may access, use, distribute or copy this e-mail. Individual Views: Unless otherwise indicated, the views expressed are those of the sender, not Justice Technology Services. Computer Viruses: It is the recipient's responsibility to check the e-mail and any attached files for viruses.

Outcomes