IBM MAINFRAME HELP & SUPPORT FORUMS
Technical Forums for IBM Mainframe Applications like COBOL, JCL, CICS, DB2, FileAid, DFSORT, Endevor, Xpediter, CoolGen, CA-7&11, AbendAid, IMS, IDMS, PL/I, MqSeries, SyncSort, Assembler, ChangeMan, Easytrieve, InterTest, REXX, CLIST etc...
 

)PROC command explanation

THIS IS AN ARCHIVE FORUM: CLICK HERE TO GO TO THE ORIGINAL TOPIC

 
       IBMMAINFRAMES.com - IBM Mainframe Support Forums Index -> TSO/ISPF
View previous topic :: View next topic  
Author Message
Paul1983



Joined: 08 Jul 2008
Posts: 33
Location: bangy
Posted: Fri Jul 25, 2008 4:09 pm    Post subject: )PROC command explanation  
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  
enrico-sorichetti



Joined: 14 Mar 2007
Posts: 3082
Location: italy
Posted: Fri Jul 25, 2008 4:15 pm    Post subject: Reply to: )PROC command explanation  
the issue is not rexx/clist related...

here is a pointer to the ISPF bookshelf
Back to top  
Paul1983



Joined: 08 Jul 2008
Posts: 33
Location: bangy
Posted: Fri Jul 25, 2008 4:21 pm    Post subject:  
Thanks for the information

Thanks,
Paul
Back to top  
Pedro



Joined: 01 Sep 2006
Posts: 510
Location: work
Posted: Fri Jul 25, 2008 9:33 pm    Post subject: Reply to: )PROC command explanation  
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  
 
       IBMMAINFRAMES.com - IBM Mainframe Support Forums Index -> TSO/ISPF
Page 1 of 1
THIS IS AN ARCIVE FORUM IN READ ONLY MODE. IF YOU WANT TO ASK YOUR DOUBTS USE THE ACTUAL FORUM