IBM Mainframe Forum Index
 
Log In
 
IBM Mainframe Forum Index Mainframe: Search IBM Mainframe Forum: FAQ Register
 

Free space in program .


IBM Mainframe Forums -> PL/I & Assembler
Post new topic   Reply to topic
View previous topic :: View next topic  
Author Message
dick scherrer

Moderator Emeritus


Joined: 23 Nov 2006
Posts: 19243
Location: Inside the Matrix

PostPosted: Tue Aug 18, 2009 7:36 pm
Reply with quote

Hello,

Quote:
Did no body ever find such a situation where a need to find the free space arose
No one that i've worked with or managed using various assemblers has needed/wanted this. . .

We still don't understand why you believe you need this. . .

Actually, i'm not sure we understand just what you are looking for . . .

Keep in mind that while your question is completely clear and logical to you, it has not been to others.
Back to top
View user's profile Send private message
milind suman
Warnings : 1

New User


Joined: 19 Aug 2009
Posts: 55
Location: Pune

PostPosted: Tue Aug 25, 2009 1:44 pm
Reply with quote

If I understand this question correctly , Assuming the question is about the addressability and by free space you mean the space left within USING range with a set of base registers . Keeping apart some exceptional cases as mentioned by the senior members above , Follow these steps to calculate the Bytes you can insert in your program so that not to get the compilation error ' Beyond active using range' :

1) Find your CSECT with type SD, Its length and ID in External symbol dic. of listing :

Code:
ยป                                                                     
                                               External Symbol Dictiona
 Symbol   Type   Id     Address  Length   Owner Id Flags Alias-of     
 PGMXYZ    SD 00000001 00000000 00000000             00               
 ABC       SD 00000002 00000000 00000018             00               
 XYZ       SD 00000003 00000018 0000001A             00               


2) Next , Map the ID number in USING MAP and find the total registers allocated
Code:
         Using Map                                   
                                               HLASM R
-----Using----------------- Reg Max     Last Label and
   Value    Range     Id        Disp    Stmt         
 00000006 00001000 00000002   3 00010      9 *,3,4   
 00001006 00001000 00000002   4 00000                 
 0000001E 00001000 00000003   5 00010     22 *,5,6   
 0000101E 00001000 00000003   6 00000                 


e.g csect xyy - id - 00003 ,length - 1A , base registers 5 nd 6
space = 1000*2 - 1A

This might not be a generic way , and may require some observation in using map . But with your requirement this will help you to reach the conclusion in short cut .
Back to top
View user's profile Send private message
View previous topic :: :: View next topic  
Post new topic   Reply to topic View Bookmarks
All times are GMT + 6 Hours
Forum Index -> PL/I & Assembler Goto page Previous  1, 2

 


Similar Topics
Topic Forum Replies
No new posts Error to invoke MPP program through B... IMS DB/DC 3
No new posts Get RECORD LENGTH, allocated space of... CLIST & REXX 7
No new posts Replace each space in cobol string wi... COBOL Programming 3
No new posts Using API Gateway from CICS program CICS 0
No new posts DB2 Event passed to the Application P... DB2 1
Search our Forums:

Back to Top