IBM Mainframe Forum Index
 
Log In
 
IBM Mainframe Forum Index Mainframe: Search IBM Mainframe Forum: FAQ Register
 

ISREDIT Command C ALL not working properly


IBM Mainframe Forums -> TSO/ISPF
Post new topic   Reply to topic
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
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: 1306
Location: Vilnius, Lithuania

PostPosted: Thu Aug 22, 2013 1:33 pm
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
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 View Bookmarks
All times are GMT + 6 Hours
Forum Index -> TSO/ISPF

 


Similar Topics
Topic Forum Replies
No new posts RACF - Rebuild SETROPTS command which... All Other Mainframe Topics 3
No new posts Routing command Address SDSF to other... TSO/ISPF 2
No new posts DTL - how to define key with stacked ... TSO/ISPF 3
No new posts LTJ command CA Products 4
No new posts PD not working for unsigned packed JO... DFSORT/ICETOOL 5
Search our Forums:

Back to Top