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
 
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: 10457
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
This topic is locked: you cannot edit posts or make replies. GDG gen check using REXX raghuraman123 CLIST & REXX 6 Wed Apr 18, 2018 9:18 pm
No new posts 3270 Data stream error Benchwarmer CICS 6 Tue Apr 17, 2018 12:06 am
No new posts How to list data set names with diffe... murali.andaluri CLIST & REXX 8 Thu Apr 12, 2018 11:33 pm
No new posts Invalid XML character while producing... nikhil.bhole IBM Tools 4 Tue Mar 20, 2018 1:24 am
No new posts Get the list of data sets on DASD and... rakaitn JCL & VSAM 3 Thu Mar 08, 2018 12:38 pm

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