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
 

 

help needed for copying selective members

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> CLIST & REXX
View previous topic :: :: View next topic  
Author Message
pradeepkit
Warnings : 1

New User


Joined: 25 Jun 2008
Posts: 60
Location: chennai

PostPosted: Mon Sep 08, 2008 8:43 am    Post subject: help needed for copying selective members
Reply with quote

Hi,

I am copying selective members from a pds to make a rexx backup tool.

I am using iebcopy utility.

COPYMODULE:
ARG INDD,OUTDD,R
CTLCARD.1 = ' COPY OUTDD=SYSUT2,INDD=SYSUT1 SELECT MEMBER=((ARRAY))'
"DELETE '"USERID()".CTLTEMP'"
"ALLOCATE DA('"USERID()".CTLTEMP') FI(CTLCRD) NEW REUSE ",
"SPACE(1 0) TRACKS NEW BLKSIZE(80) RECFM(F,B) LRECL(80)"
"EXECIO 1 DISKW CTLCRD(STEM CTLCARD. FINIS"
"FREE FILE(CTLCRD)"
"ALLOCATE DA('"USERID()".TEMP') FI(SYSPRINT) NEW DELETE REUSE"
"ALLOC FILE(SYSIN) DA('"USERID()".CTLTEMP') SHR REUSE"
IF I <> 0 THEN
"CALL 'SYS1.LINKLIB(IEBCOPY)' ',REGION=1024K'"
"FREE ALL"
TRACE OFF
RETURN

the code used is this . but it is copying the whole of the pds not selecting the particular member.
Can anybody help????????????
Back to top
View user's profile Send private message

Anuj Dhawan

Senior Member


Joined: 22 Apr 2006
Posts: 6258
Location: Mumbai, India

PostPosted: Mon Sep 08, 2008 12:56 pm    Post subject:
Reply with quote

Hi,

I can't help much with REXX but can help with IEBCOPY. You might like to check the below link for IEBCOPY to copy selected member & then appropriate changes in REXX/CLSIT can follow -

http://ibmmainframes.com/about10496.html

Please use BBcode when You post some code, that's rather readable.
Back to top
View user's profile Send private message
superk

Moderator Team Head


Joined: 26 Apr 2004
Posts: 4648
Location: Raleigh, NC, USA

PostPosted: Mon Sep 08, 2008 6:06 pm    Post subject: Reply to: help needed for copying selective members
Reply with quote

I have this feeling that SELECT MEMBER should be on a different line by itself. I'll have to run a little test and see ...
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: Mon Sep 08, 2008 6:42 pm    Post subject:
Reply with quote

Yes, each member should have its own line
Code:

  S M=member   
Back to top
View user's profile Send private message
gcicchet

Senior Member


Joined: 28 Jul 2006
Posts: 1703
Location: Australia

PostPosted: Tue Sep 09, 2008 4:09 am    Post subject:
Reply with quote

Hi Expat,

you can code multiple members per line



Code:
  SELECT MEMBER=(A,AA,AAA,AAAAA)     
  SELECT MEMBER=(AAAA)               



Gerry
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 -> CLIST & REXX All times are GMT + 6 Hours
Page 1 of 1

 

Search our Forum:

Similar Topics
Topic Author Forum Replies Posted
This topic is locked: you cannot edit posts or make replies. SORT trick needed bshkris SYNCSORT 6 Tue May 02, 2017 4:35 am
No new posts Copying Panvalet members to PDS LOGESHWARAN K CA Products 4 Mon Mar 06, 2017 10:45 am
No new posts Help Needed with View Direct shailesh_do CA Products 2 Wed Jul 13, 2016 10:39 am
No new posts Single step utility for compare and u... ramprakashn JCL & VSAM 5 Fri Apr 29, 2016 3:43 pm
No new posts Differences between copying members b... E.LAI TSO/ISPF 8 Wed Mar 30, 2016 12:35 pm


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