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: 1072
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 OUTREC with ALter Command scorp_rahul23 DFSORT/ICETOOL 1 Wed Nov 22, 2017 3:10 pm
This topic is locked: you cannot edit posts or make replies. ISREDIT Macro is not returning back t... nico_neoz CLIST & REXX 21 Sat Nov 18, 2017 7:40 pm
No new posts REXX LISTDSI () SMSINFO is not working upendrasri CLIST & REXX 4 Fri Nov 17, 2017 11:33 am
No new posts MQ command in option 6 of ISPF! Vignesh Sid All Other Mainframe Topics 3 Tue Sep 26, 2017 6:01 pm
No new posts LIBDEF not working in called proc packerm CLIST & REXX 0 Fri Sep 15, 2017 7:22 pm

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