Portal | Manuals | References | Downloads | Info | Programs | JCLs | Master the Mainframes
IBM Mainframe Computers Forums Index
 
Register
 
IBM Mainframe Computers Forums Index Mainframe: Search IBM Mainframe Forum: FAQ Memberlist Usergroups Profile Log in to check your private messages Log in
 

 

Base Locator for Working storage-BLW details

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> COBOL Programming
View previous topic :: :: View next topic  
Author Message
vidyasaraswathi

New User


Joined: 10 May 2005
Posts: 72

PostPosted: Fri May 20, 2005 4:20 pm    Post subject: Base Locator for Working storage-BLW details
Reply with quote

Hi all,

When we compile a COBOL program, in the INTR.OUTPUT step of the JOB where we get compiled listing,
we can find BLW(Base Locator for Working storage) definition.

For Example,

10 DATA1. BLW=0000+0E3,0000033 0CL14
20 FLD1 PIC XX. BLW=0000+0E3,0000033 2C
20 FLD2 PIC X(08). BLW=0000+0E5,0000035 8C
20 FLD3 PIC X(04). BLW=0000+0ED,000003D 4C






20 FLD1 PIC XX. BLW=0000+0E3,0000033 2C


In this example, I think 0000 is the base register. 0E3 is the displacement in Hexadecimal.
I want to know what does 0000033 stand for?

Maximum how many Base registers can be used for working storage variables?

Can any one please explain this?

Thanks and Regards,
Vidya Bhat
Back to top
View user's profile Send private message

mmwife

Super Moderator


Joined: 30 May 2003
Posts: 1592

PostPosted: Tue May 24, 2005 6:09 am    Post subject:
Reply with quote

I think the 33 is the displacement from the beginning of the 01 level. The 03E is the displacement from the address in the BLW.
Back to top
View user's profile Send private message
View previous topic :: :: View next topic  
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> COBOL Programming All times are GMT + 6 Hours
Page 1 of 1

 

Search our Forum:

Similar Topics
Topic Author Forum Replies Posted
No new posts SQL query not working in Cobol program. CuriousMainframer COBOL Programming 14 Wed Feb 22, 2017 5:56 pm
No new posts GETMAIN / FREEMAIN versus STORAGE OBT... steve-myers PL/I & Assembler 8 Wed Feb 01, 2017 1:45 am
No new posts hot to get details when "EXEC CI... Andi1982 CICS 11 Tue Sep 20, 2016 5:01 pm
No new posts SCRNAME not working on my mainframe? mrsidhu12 TSO/ISPF 7 Thu Sep 01, 2016 2:17 pm
No new posts 2 same CLIST pgm but with different n... boyti ko CLIST & REXX 5 Fri Jun 03, 2016 4:55 pm


Facebook
Back to Top
 
Mainframe Wiki | Forum Rules | Bookmarks | Subscriptions | FAQ | Tutorials | Contact Us