Portal | Manuals | References | Downloads | Info | Programs | JCLs | Mainframe wiki | Quick Ref
IBM Mainframe Computers Forums Index
 
Register
 
IBM Mainframe Computers Forums Index Mainframe: Search IBM Mainframe Forum: FAQ Memberlist Profile Log in to check your private messages Log in
 
Explain about the STG (STORAGE) & CSTG(CURRENTSTORAGE)

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> PL/I & Assembler
View previous topic :: :: View next topic  
Author Message
nutakkimurali

New User


Joined: 15 Nov 2005
Posts: 22

PostPosted: Thu Mar 02, 2006 12:16 pm    Post subject: Explain about the STG (STORAGE) & CSTG(CURRENTSTORAGE)
Reply with quote

Can anybody please explain about the STG (STORAGE) & CSTG(CURRENTSTORAGE) Built-in Functions with an Example.

----------
Muralee
Back to top
View user's profile Send private message

ch.rajashekar1

New User


Joined: 05 Dec 2005
Posts: 4
Location: B'lore

PostPosted: Wed Jul 19, 2006 10:28 am    Post subject: STG and CSTG
Reply with quote

HI,
STG and CSTG are synonims of SIZE and CURRENTSIZE..
Here is the example which gives clear idea about the difference btw both


Code:
221.1 Example
 
    dcl Scids   char(17)         init('See you at SCIDS!') static;
    dcl Vscids  char(20) varying init('See you at SCIDS!') static;
    dcl Stg fixed bin(31);
    Stg = storage   (Scids);           /* 17 bytes */
    Stg = currentsize (Scids);         /* 17 bytes */
    Stg = size (Vscids);               /* 22 bytes */
    Stg = currentsize (Vscids);        /* 19 bytes */
    Stg = size (Stg);                  /* 4  bytes */
    Stg = currentsize (Stg);           /* 4  bytes */
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 -> PL/I & Assembler All times are GMT + 6 Hours
Page 1 of 1

 

Search our Forum:

Similar Topics
Topic Author Forum Replies Posted
No new posts INSUFFICIENT VIRTUAL STORAGE!! Vignesh Sid SYNCSORT 1 Thu Dec 28, 2017 3:45 pm
No new posts sharing PLI storage Pedro PL/I & Assembler 2 Mon Oct 16, 2017 10:11 pm
No new posts Iterative use of a REXX script causin... bryonyh CLIST & REXX 4 Fri Jul 28, 2017 12:52 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 How storage is calculated for AN-Edit... Raghu navaikulam COBOL Programming 2 Wed Mar 09, 2016 3:51 pm

Facebook
Back to Top
 
Job Vacancies | Forum Rules | Bookmarks | Subscriptions | FAQ | Polls | Contact Us