Portal | Manuals | References | Downloads | Info | Programs | JCLs | Master the Mainframes
IBM Mainframe Computers Forums Index
 
Register
 
IBM Mainframe Computers Forums Index Mainframe: Search IBM Mainframe Forum: FAQ Memberlist Usergroups Profile Log in to check your private messages Log in
 

 

HOW TO CUT AND PASTE FROM ANOTHER MEMBER OF A DATASET

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> TSO/ISPF
View previous topic :: :: View next topic  
Author Message
MARINA JOSEPH

New User


Joined: 11 Jun 2009
Posts: 61
Location: chennai

PostPosted: Tue Dec 08, 2009 11:57 am    Post subject: HOW TO CUT AND PASTE FROM ANOTHER MEMBER OF A DATASET
Reply with quote

Hi,

I have created a MACRO which will create a copy of the copybook that is being used in the program.

Program Name - SAMPLE
Macro Name - MYREXX
Copybook Name - EMPLOYEE

MYREXX creates copy of the copybook EMPLOYEE.
I need to copy paste the contents of EMPLOYEE and the copy created into the program SAMPLE, using the MACRO.

Could somebody please tell how to do this using the COPY PASTE commands with the help of a MACRO?

Thanks in advance.
Back to top
View user's profile Send private message

expat

Global Moderator


Joined: 14 Mar 2007
Posts: 8593
Location: Back in jolly old England

PostPosted: Tue Dec 08, 2009 12:53 pm    Post subject:
Reply with quote

1) Please do NOT use all caps in the title, it is considered as shouting, and inappropriate.

2)Your requirement is not totally clear - do you really want to copy the originial copybook and your copy of a copybook into the program.

3)Where is the insert made ? position of cursor or fixed location.
Back to top
View user's profile Send private message
MARINA JOSEPH

New User


Joined: 11 Jun 2009
Posts: 61
Location: chennai

PostPosted: Tue Dec 08, 2009 12:58 pm    Post subject:
Reply with quote

Thanks for your reply.

Yes, i want to copy the contents of the original copybook and the copy into the program.

I need to make the inserts after line 33 and line 37 in the program.

Thanks.
Back to top
View user's profile Send private message
expat

Global Moderator


Joined: 14 Mar 2007
Posts: 8593
Location: Back in jolly old England

PostPosted: Tue Dec 08, 2009 1:16 pm    Post subject:
Reply with quote

As ISPF uses relative line numbers - always work from the bottom upwards to preserve the relative values for multiple inserts.

Code:
CRSLINE = 37
"ISREDIT COPY 'PDS name(member)' AFTER "CRSLINE

CRSLINE = 33
"ISREDIT COPY 'PDS name(member)' AFTER "CRSLINE
Back to top
View user's profile Send private message
MARINA JOSEPH

New User


Joined: 11 Jun 2009
Posts: 61
Location: chennai

PostPosted: Tue Dec 08, 2009 5:13 pm    Post subject:
Reply with quote

Thanks a lot, it worked.
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 find particular member name in PDS us... ravi243 CLIST & REXX 10 Mon Dec 19, 2016 6:44 pm
No new posts What is the command to check MODE of ... rohanthengal CLIST & REXX 7 Fri Nov 18, 2016 1:48 pm
No new posts FTP - JCL failed while passing FTP co... Suneetha1612 JCL & VSAM 12 Wed Nov 16, 2016 7:33 pm
No new posts To trim spaces in a pipe delimited da... Nish84 COBOL Programming 16 Mon Oct 10, 2016 1:54 pm
No new posts Allocate dataset withour BLKSIZE Susanta CLIST & REXX 2 Thu Sep 22, 2016 11:51 am


Facebook
Back to Top
 
Mainframe Wiki | Forum Rules | Bookmarks | Subscriptions | FAQ | Tutorials | Contact Us