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
 
)PROC command explanation

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> TSO/ISPF
View previous topic :: :: View next topic  
Author Message
Paul1983

New User


Joined: 08 Jul 2008
Posts: 37
Location: bangy

PostPosted: Fri Jul 25, 2008 4:09 pm    Post subject: )PROC command explanation
Reply with quote

Could you please explain the meaning of the following commands given in )PROC section of a panel.

)PROC
&zsel = TRANS(TRUNC(&zcmd ,'.')

AR,'CMD(%SW2 AR)'

Thanks,
Paul
Back to top
View user's profile Send private message

enrico-sorichetti

Global Moderator


Joined: 14 Mar 2007
Posts: 10457
Location: italy

PostPosted: Fri Jul 25, 2008 4:15 pm    Post subject: Reply to: )PROC command explanation
Reply with quote

the issue is not rexx/clist related...

here is a pointer to the ISPF bookshelf
Back to top
View user's profile Send private message
Paul1983

New User


Joined: 08 Jul 2008
Posts: 37
Location: bangy

PostPosted: Fri Jul 25, 2008 4:21 pm    Post subject:
Reply with quote

Thanks for the information

Thanks,
Paul
Back to top
View user's profile Send private message
Pedro

Senior Member


Joined: 01 Sep 2006
Posts: 2104
Location: Silicon Valley

PostPosted: Fri Jul 25, 2008 9:33 pm    Post subject: Reply to: )PROC command explanation
Reply with quote

Say the user types ar.pv...

Code:
&zsel = TRANS(TRUNC(&zcmd ,'.')
AR,'CMD(%SW2 AR)'


The ar.pv command is truncated at the period and the prefix is used, like a case statement. The panel syntax is correct for the panel, but the effect is to work something like this:
Code:
Select
When (zsel = 'AR') Then Address ISPEXEC "SELECT CMD(%SW2 AR)"
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 -> TSO/ISPF All times are GMT + 6 Hours
Page 1 of 1

 

Search our Forum:

Similar Topics
Topic Author Forum Replies Posted
No new posts Need help with 002-030 ABEND in TSO R... Terry Tallian TSO/ISPF 0 Sat Mar 17, 2018 1:13 am
No new posts CICS web service from DB2 Triggers or... kiranprasad DB2 2 Wed Dec 20, 2017 11:10 am
No new posts OUTREC with ALter Command scorp_rahul23 DFSORT/ICETOOL 1 Wed Nov 22, 2017 3:10 pm
No new posts interesting explanation of DB concurr... dbzTHEdinosauer General Talk & Fun Stuff 0 Thu Oct 26, 2017 3:02 pm
This topic is locked: you cannot edit posts or make replies. PS file data should be passed as symb... d_sarlie JCL & VSAM 15 Tue Oct 03, 2017 5:18 am

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