Portal | Manuals | References | Downloads | Info | Programs | JCLs | Mainframe wiki | Quick Ref
IBM Mainframe Forum Index
 
Register
 
IBM Mainframe Forum 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: 1206
Location: Vilnius, Lithuania

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 File transfer to remote system using ... kalyan.lc5 TSO/ISPF 2 Wed Jun 24, 2020 1:24 pm
No new posts DEBUG COMMENT command not adding to log Harold Barnes IBM Tools 0 Fri Apr 24, 2020 12:55 am
This topic is locked: you cannot edit posts or make replies. Macro REXX - ISRE741 Command not exec... sandeep prajapati CLIST & REXX 1 Fri Apr 17, 2020 12:48 am
No new posts Submit Print Job For PDS Member With ... AllenSieracki TSO/ISPF 17 Fri Apr 10, 2020 9:31 pm
No new posts On a team working on a new project fo... zCMHII All Other Mainframe Topics 2 Mon Apr 06, 2020 9:15 pm

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