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
 
ISREDIT Command C ALL not working properly

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

New User


Joined: 12 Feb 2009
Posts: 33
Location: Chennai, India

PostPosted: Thu Aug 22, 2013 1:24 pm    Post subject: ISREDIT Command C ALL not working properly
Reply with quote

Dear friends

I want to change the symbolic parameters in all the Procs. So I use below edit macro



Code:
/* REXX  */                                                             
ADDRESS ISREDIT "MACRO PROCESS"                                         
ADDRESS ISREDIT "(MEMNAME) = MEMBER"                                   
ADDRESS ISREDIT "C ALL 'UNIT=WORK' 'UNIT=&UNIT'"                       
  IF RC = 0 THEN                                                       
     SAY 'MEMBER: ' MEMNAME                                             
ADDRESS ISREDIT "END"                                                   
EXIT                                                                   


I've input statement as
Code:
//SORTWK01 DD UNIT=WORK,SPACE=&SPC1


But the output I get is below..
Code:
//SORTWK01 DD UNIT=,SPACE=&SPC1


But it should have changed to UNIT=&UNIT.

It doesn't recognises &UNIT for change command. Could anyone please tell what's the problem in there?
Back to top
View user's profile Send private message

prino

Senior Member


Joined: 07 Feb 2009
Posts: 1047
Location: Oostende, Belgium

PostPosted: Thu Aug 22, 2013 1:33 pm    Post subject:
Reply with quote

It does recognize &UNIT as an empty string, so the macro is working the way it should work.

Try:

Code:
myunit = c2x('UNIT=&UNIT')

"isredit c 'UNIT=WORK' x'"myunit"' all"
Back to top
View user's profile Send private message
Sathish Gurumoorthy

New User


Joined: 12 Feb 2009
Posts: 33
Location: Chennai, India

PostPosted: Thu Aug 22, 2013 2:13 pm    Post subject:
Reply with quote

Works cool.. Thank you Prino!!
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 LIBDEF not working in called proc packerm CLIST & REXX 0 Fri Sep 15, 2017 7:22 pm
No new posts Working with hex values in Filemanage... Emile Straker IBM Tools 0 Tue Sep 12, 2017 1:42 am
No new posts How to change a string containing the... chong.zhou TSO/ISPF 6 Tue Aug 29, 2017 4:54 pm
No new posts Failure after DIR command Hank Watson All Other Mainframe Topics 2 Tue Aug 29, 2017 3:14 am
No new posts Command to find TMEMBER name for a TPIPE Siva NKK Kothamasu IMS DB/DC 0 Wed Aug 16, 2017 6:08 pm

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