MVSFORUMS.com Forum Index MVSFORUMS.com
A Community of and for MVS Professionals
 
 FAQFAQ   SearchSearch   Quick Manuals   RegisterRegister 
 ProfileProfile   Log in to check your private messagesLog in to check your private messages   Log inLog in 

working storage take up

 
Post new topic   Reply to topic   printer-friendly view    MVSFORUMS.com Forum Index -> Application Programming
View previous topic :: View next topic  
Author Message
enge
Beginner


Joined: 12 Oct 2004
Posts: 78
Topics: 39

PostPosted: Thu Apr 01, 2010 8:41 am    Post subject: working storage take up Reply with quote

hello,
is there a spot , in a listing of a compiled program cobol , where is specified how many bytes the workink storage take up?

thank very much.
Back to top
View user's profile Send private message
dbzTHEdinosauer
Supermod


Joined: 20 Oct 2006
Posts: 1411
Topics: 26
Location: germany

PostPosted: Thu Apr 01, 2010 9:01 am    Post subject: Reply with quote

Never have figured out why people don't bother to look in a manual.

*CONTROL (*CBL) statement

you want the Storage map listing
_________________
Dick Brenholtz
American living in Varel, Germany
Back to top
View user's profile Send private message
enge
Beginner


Joined: 12 Oct 2004
Posts: 78
Topics: 39

PostPosted: Thu Apr 01, 2010 9:51 am    Post subject: Reply with quote

i mean, this in a piece of listing
Display Filter View Print Options Help
-------------------------------------------------------------------------------
SDSF OUTPUT DISPLAY CAD3048I JOB36060 DSID 110 LINE 26,895 COLUMNS 43- 122
COMMAND INPUT ===> SCROLL ===> CSR
p pic s9(4) value zero is global. BLW=00047+BA8
IMP
x(77) is global. BLW=00047+BB0

next i can find the linkage section. have i to take BB0 and convert in decimal?
Back to top
View user's profile Send private message
dbzTHEdinosauer
Supermod


Joined: 20 Oct 2006
Posts: 1411
Topics: 26
Location: germany

PostPosted: Thu Apr 01, 2010 10:33 am    Post subject: Reply with quote

BLW=00047+BB0

BB0 is an offset which provides a starting address.

are you using the options that I suggested?

you should also read the manual in order to familiarize yourself with compile listings,
various print options and how to read the listing.
_________________
Dick Brenholtz
American living in Varel, Germany
Back to top
View user's profile Send private message
kolusu
Site Admin
Site Admin


Joined: 26 Nov 2002
Posts: 12375
Topics: 75
Location: San Jose

PostPosted: Thu Apr 01, 2010 10:43 am    Post subject: Reply with quote

enge,

DBZ already pointed you in the right direction. Add this line before ID division and re-compile your program and check at the bottom of the listing

Code:
CBL MAP


Now go back and read the link about the option in link dbz provided

Kolusu
Back to top
View user's profile Send private message Send e-mail Visit poster's website
enge
Beginner


Joined: 12 Oct 2004
Posts: 78
Topics: 39

PostPosted: Tue Apr 13, 2010 7:57 am    Post subject: Reply with quote

very good,thanks to everyone
Back to top
View user's profile Send private message
Display posts from previous:   
Post new topic   Reply to topic   printer-friendly view    MVSFORUMS.com Forum Index -> Application Programming All times are GMT - 5 Hours
Page 1 of 1

 
Jump to:  
You cannot post new topics in this forum
You cannot reply to topics in this forum
You cannot edit your posts in this forum
You cannot delete your posts in this forum
You cannot vote in polls in this forum


MVSFORUMS
Powered by phpBB © 2001, 2005 phpBB Group