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
 

 

REXX and MVS Data Areas

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> CLIST & REXX
View previous topic :: :: View next topic  
Author Message
sujesh_prasannan
Currently Banned

New User


Joined: 01 Aug 2007
Posts: 6
Location: chennai

PostPosted: Tue Nov 20, 2007 4:26 pm    Post subject: REXX and MVS Data Areas
Reply with quote

Hi,
I got this code (to display the user name) from this forum, but iam not able to undertand few terms in this can any any one helpme in this.


Code:
/* nombre del usuario */
ascb = storage(224,4) /* psaaold */
asxb = storage(d2x(c2d(ascb)+108),4) /* ascbasxb */
acee = storage(d2x(c2d(asxb)+200),4) /* acee */
unam = storage(d2x(c2d(acee)+100),4) /* aceeunam */
user_name=strip(storage(d2x(c2d(unam)+1),24))
say user_name
exit


Doubts:

1) What does storage(224,4) reffer to?
2) what does this line do --> storage(d2x(c2d(ascb)+108),4) ?

Can any one help me in this.

Title changed from 'Doubt in a program'
Back to top
View user's profile Send private message

enrico-sorichetti

Global Moderator


Joined: 14 Mar 2007
Posts: 10210
Location: italy

PostPosted: Tue Nov 20, 2007 4:37 pm    Post subject: Reply to: Doubt in a program.
Reply with quote

Quote:
got this code (to display the user name) from this forum, but iam not able to undertand few terms in this can any any one helpme in this.


That' s what happens when using posted code...

the rexx is chasing some mvs control blocks,
the comment on the right is the name of the field used ,
also IBM tries, sometimes without success, to use in its naming
some kind of wart to identify the control block to whom the field belongs..

look at the following control block for explanation

PSA, ASCB, ASXB, ACEE
Back to top
View user's profile Send private message
sujesh_prasannan
Currently Banned

New User


Joined: 01 Aug 2007
Posts: 6
Location: chennai

PostPosted: Tue Nov 20, 2007 4:49 pm    Post subject: Reply to: Doubt in a program.
Reply with quote

Thanks enrico.... can you please say from where i can get the information regarding the control blocks.
Back to top
View user's profile Send private message
ofer71

Global Moderator


Joined: 27 Dec 2005
Posts: 2360
Location: Israel

PostPosted: Tue Nov 20, 2007 4:57 pm    Post subject:
Reply with quote

Well, the formal term is Data Areas, and you can read about them here.

To learn more about the STORAGE function, please refer to the fine manual.

O.
Back to top
View user's profile Send private message
sujesh_prasannan
Currently Banned

New User


Joined: 01 Aug 2007
Posts: 6
Location: chennai

PostPosted: Tue Nov 20, 2007 5:04 pm    Post subject: Reply to: Doubt in a program.
Reply with quote

thanks.............
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 -> CLIST & REXX All times are GMT + 6 Hours
Page 1 of 1

 

Search our Forum:

Similar Topics
Topic Author Forum Replies Posted
No new posts Storing huge volume of data, compare ... Pradeep K M All Other Mainframe Topics 3 Mon Jan 16, 2017 5:08 pm
No new posts how to recover an uncataloged VSAM da... archanamuthukrishnan All Other Mainframe Topics 3 Wed Jan 11, 2017 6:18 pm
This topic is locked: you cannot edit posts or make replies. Calling REXX code from ISPF panel sanchita dey TSO/ISPF 4 Mon Jan 02, 2017 5:13 pm
No new posts HALDB data refresh/copy from producti... vineetanand2007 IMS DB/DC 0 Mon Jan 02, 2017 11:16 am
No new posts JES2 JEC: Use UNIX Pipes to Pass Data... Virendra Shambharkar JCL & VSAM 21 Tue Dec 20, 2016 6:55 pm


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