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

Problem in ISPF EDIT macro


IBM Mainframe Forums -> JCL & VSAM
Post new topic   Reply to topic
View previous topic :: View next topic  
Author Message
smilingashutosh

New User


Joined: 08 Jun 2006
Posts: 22

PostPosted: Tue Oct 03, 2006 11:37 am
Reply with quote

Hi all,

can anybody let me know what is wrong with is rexx program,
the file is opening in edit mode but cut portion is not geting paste on to that, what should be the reason?

Code:

/* REXX */                             
ADDRESS ISREDIT "MACRO"                 
ADDRESS ISPEXEC "CONTROL ERRORS RETURN"
X = SYSDSN("'NBK7VYS.MYBACK.FILE'")     
IF X = 'OK' THEN                       
DO                                     
  ADDRESS ISREDIT "CUT .ZFIRST .ZLAST"   
  ADDRESS ISREDIT "END"                   
  ADDRESS ISREDIT "END"                   
  ADDRESS TSO                             
  "ISREPDF 'NBK7VYS.MYBACK1.FILE(XX)' "   
  ADDRESS ISREDIT "SAVE"                 
  ADDRESS ISREDIT "PASTE AFTER .ZFIRST"   
  ADDRESS ISREDIT "SAVE"                 
  EXIT                                   
END
Back to top
View user's profile Send private message
ofer71

Global Moderator


Joined: 27 Dec 2005
Posts: 2358
Location: Israel

PostPosted: Tue Oct 03, 2006 1:43 pm
Reply with quote

As far as I can see, you have ISREDIT commands (SAVE, PASTE) after you issued the END command. The END command closes the edit session, thus subsequent edit commands are not valid.

O.
Back to top
View user's profile Send private message
smilingashutosh

New User


Joined: 08 Jun 2006
Posts: 22

PostPosted: Tue Oct 03, 2006 6:46 pm
Reply with quote

hi offer,
offer, i want to take backup of dataset for on which this macro will execute.
Actually i want to paste it on the dataset which i opened by using isrepdf command, i don't want to paste it on the dataset for which i want to take backup.if i don't use end command it will get pasted on that dataset.any solution?
Back to top
View user's profile Send private message
ofer71

Global Moderator


Joined: 27 Dec 2005
Posts: 2358
Location: Israel

PostPosted: Tue Oct 03, 2006 7:14 pm
Reply with quote

Yes. Instead ISREPDF use the EDIT service with the MACRO option.

If I'm not mistaken, ISREPDF also accepts a MACRO parameter...).

O.
Back to top
View user's profile Send private message
smilingashutosh

New User


Joined: 08 Jun 2006
Posts: 22

PostPosted: Wed Oct 04, 2006 11:38 am
Reply with quote

hi offer ,

can you please let us know how edit session is launched or how to code edit macro for the same.
Back to top
View user's profile Send private message
ofer71

Global Moderator


Joined: 27 Dec 2005
Posts: 2358
Location: Israel

PostPosted: Wed Oct 04, 2006 12:42 pm
Reply with quote

The EDIT service is described in the fine manual.

O.
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 -> JCL & VSAM

 


Similar Topics
Topic Forum Replies
No new posts Looking for a little history of ISPF ... TSO/ISPF 5
No new posts Map Vols and Problem Dataset All Other Mainframe Topics 2
No new posts Adding QMF and SPUFI to the ISPF menu DB2 20
No new posts Query on edit primary command CLIST & REXX 5
No new posts Query on edit primary command CLIST & REXX 1
Search our Forums:

Back to Top