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
 
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 Copy 4 byte of data from the last rec... arunsoods DFSORT/ICETOOL 9 Fri Oct 06, 2017 12:15 pm
No new posts opening a dataset after reading it fr... arunsoods DFSORT/ICETOOL 5 Wed Oct 04, 2017 3:54 pm
No new posts Updating the Trailer count in variabl... satheshbabur DFSORT/ICETOOL 6 Wed Aug 30, 2017 9:49 pm
No new posts Mainframe dataset split purushottam DFSORT/ICETOOL 13 Tue Aug 29, 2017 12:28 pm
No new posts Unable to copy data from spool in a d... srikant314 JCL & VSAM 8 Fri Jul 28, 2017 9:10 pm

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