View previous topic :: View next topic
|
Author |
Message |
frudo
New User
Joined: 16 Aug 2005 Posts: 5
|
|
|
|
Hi,
I am trying to copy a selected member from one PDS to another using IEBCOPY in REXX. I am getting a return code of 4. I am not sure what I am doing wrong. Can someone please assist me with this. The following is my code,
Code: |
/***REXX****/
"ALLOC F(SYSUT1) DS('"TEST.FIRST.PDS"')
SHR REUSE"
"ALLOC F(SYSUT2) DS('"TEST.SECOND.PDS"')
SHR REUSE"
"ALLOC F(SYSPRINT) SYSOUT REUSE"
"ALLOC F(SYSIN) UNIT(SYSDA) SPACE(1 1) TRACKS REUSE"
SYSIN.0 = 2
SYSIN.1 = " C I=SYSUT1,O=SYSUT2"
SYSIN.2 = " SELECT MEMBER=WORD1"
"EXECIO * DISKW SYSIN (FINIS STEM SYSIN."
DROP SYSIN.
"CALL *(IEBCOPY)"
SAY 'COPY RETURN CODE = 'RC
"FREE F(SYSUT1 SYSUT2 SYSPRINT SYSIN)"
|
|
|
Back to top |
|
|
superk
Global Moderator
Joined: 26 Apr 2004 Posts: 4652 Location: Raleigh, NC, USA
|
|
|
|
How about posting the SYSPRINT output for starters? |
|
Back to top |
|
|
dbzTHEdinosauer
Global Moderator
Joined: 20 Oct 2006 Posts: 6966 Location: porcelain throne
|
|
|
|
Does WORD1 already exist in the destination PDS? |
|
Back to top |
|
|
expat
Global Moderator
Joined: 14 Mar 2007 Posts: 8797 Location: Welsh Wales
|
|
|
|
Without the SYSPRINT information all we can do is guess.
Psychic day is Friday this week, so post today and get answered early. |
|
Back to top |
|
|
gcicchet
Senior Member
Joined: 28 Jul 2006 Posts: 1702 Location: Australia
|
|
|
|
Hi,
This is my psychic day, member WORD1 does not exist in the input PDS.
Gerry |
|
Back to top |
|
|
expat
Global Moderator
Joined: 14 Mar 2007 Posts: 8797 Location: Welsh Wales
|
|
|
|
Ladeeeeeeeeeeez and Gentlemen
IBM mainframes have the greatest of pleasure in presenting the Great Geraldo, Thursday psychic in all matters mystical and IEBCOPY return codes.
drum roll .............. applause ................... |
|
Back to top |
|
|
Terry Heinze
JCL Moderator
Joined: 14 Jul 2008 Posts: 1249 Location: Richfield, MN, USA
|
|
|
|
Since Fridays are psychic days, positioning yourself on the correct side of the International Date Line will get you an answer ahead of time. Likewise, positioning yourself on the wrong side of it, will get you no answer at all. |
|
Back to top |
|
|
dick scherrer
Moderator Emeritus
Joined: 23 Nov 2006 Posts: 19244 Location: Inside the Matrix
|
|
|
|
And once again, we seem to have lost the TS. . .
Answers to questions - nope.
Requested info provided - nope.
Update on status - nope.
And we even had some of our psychics on the case - - - bummer |
|
Back to top |
|
|
expat
Global Moderator
Joined: 14 Mar 2007 Posts: 8797 Location: Welsh Wales
|
|
|
|
Dick,
Was that a typo ?
Did you mean psychics or psychos |
|
Back to top |
|
|
dick scherrer
Moderator Emeritus
Joined: 23 Nov 2006 Posts: 19244 Location: Inside the Matrix
|
|
|
|
Yes. . . |
|
Back to top |
|
|
Terry Heinze
JCL Moderator
Joined: 14 Jul 2008 Posts: 1249 Location: Richfield, MN, USA
|
|
|
|
Maybe TS has no sense of humor? You need one to work in IT. |
|
Back to top |
|
|
|