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
 
Problem in ISPF EDIT macro

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> JCL & VSAM
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    Post subject: Problem in ISPF EDIT macro
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: 2360
Location: Israel

PostPosted: Tue Oct 03, 2006 1:43 pm    Post subject:
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    Post subject: Re: Problem in ISPF EDIT macro
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: 2360
Location: Israel

PostPosted: Tue Oct 03, 2006 7:14 pm    Post subject:
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    Post subject: Re: Problem in ISPF EDIT macro
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: 2360
Location: Israel

PostPosted: Wed Oct 04, 2006 12:42 pm    Post subject:
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    IBMMAINFRAMES.com Support Forums -> JCL & VSAM All times are GMT + 6 Hours
Page 1 of 1

 

Search our Forum:

Similar Topics
Topic Author Forum Replies Posted
No new posts IBM Pcomm macro startmacro command do... JGregoire IBM Tools 0 Wed May 09, 2018 12:16 pm
No new posts LE Modules in Link Edit John Poulakos COBOL Programming 1 Sat Apr 28, 2018 12:14 am
No new posts presentation for ISPF developer newby Pedro TSO/ISPF 3 Tue Feb 13, 2018 4:37 am
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 Having a problem FTP'ng to the MF pahiker All Other Mainframe Topics 2 Fri Nov 10, 2017 8:20 pm

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