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
 

 

Error in Iebcopy

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> JCL & VSAM
View previous topic :: :: View next topic  
Author Message
rajulan

New User


Joined: 11 Jan 2008
Posts: 66
Location: India

PostPosted: Fri Feb 27, 2009 11:37 pm    Post subject: Error in Iebcopy
Reply with quote

Hi all ,

I am trying to copy pds to pds. But i am getting the below mentioned error.

Code:

//STEP1    EXEC PGM=IEBCOPY                   
//SYSPRINT DD SYSOUT=*                         
//SYSOUT   DD SYSOUT=*                         
//SYSUT1   DD DSN=OZA150.RAJULAN.COBOL,DISP=SHR
//SYSUT2   DD DSN=OZA150.RAJULAN.COB.BACKUP,   
//            DISP=(OLD,CATLG,DELETE),         
//            UNIT=SYSDA,                     
//            SPACE=(TRK,(1,1),RLSE),         
//            LRECL=80,BLKSIZE=800             
//SYSIN    DD *                               
COPY INDD=SYSUT1, OUTDD=SYSUT2                 
/*                                             
//                             



Error


Code:
IEB1135I IEBCOPY  FMID HDZ11H0  SERVICE LEVEL UA15787  DATED 20041213
IEB1035I OZA150EX  STEP1    12:02:00 FRI 27 FEB 2009 PARM=''         
COPY INDD=SYSUT1, OUTDD=SYSUT2                                       
IEB107I INVALID CONTINUATION                                         
IEB118I CONTROL STATEMENT ERROR                                       
IEB115I END OF FILE ON SYSIN                                         
IEB151I JOB HAS TERMINATED WITH ERROR(S)                             
IEB147I END OF JOB - 8 WAS HIGHEST SEVERITY CODE


Any one can tell me why it is coming like this?
Back to top
View user's profile Send private message

cpuhawg

Active User


Joined: 14 Jun 2006
Posts: 331
Location: Jacksonville, FL

PostPosted: Sat Feb 28, 2009 12:01 am    Post subject: Reply to: Error in Iebcopy
Reply with quote

Code:

COPY INDD=SYSUT1, OUTDD=SYSUT2


No spaces between INDD=SYSUT1, and OUTDD=SYSUT2
Back to top
View user's profile Send private message
rajulan

New User


Joined: 11 Jan 2008
Posts: 66
Location: India

PostPosted: Sat Feb 28, 2009 12:29 am    Post subject:
Reply with quote

Code:
//SYSUT1   DD DSN=OZA150.RAJULAN.COBOL,DISP=SHR           
//SYSUT2   DD DSN=OZA150.RAJULAN.COB.BACKUP,             
//            DISP=(NEW,CATLG,DELETE),                   
//            UNIT=SYSDA,                                 
//            SPACE=(TRK,(1,1),RLSE),                     
//            DCB=(DSORG=PO,RECFM=FB,LRECL=80,BLKSIZE=800)
//SYSIN    DD *                                           
COPY INDD=SYSUT1,OUTDD=SYSUT2                             
/*                                                       
//                                                       


I have tried like above...even it is not working...same error....

Thanks,
rajulan R.C
Back to top
View user's profile Send private message
enrico-sorichetti

Global Moderator


Joined: 14 Mar 2007
Posts: 10211
Location: italy

PostPosted: Sat Feb 28, 2009 12:33 am    Post subject: Reply to: Error in Iebcopy
Reply with quote

copy command should start at least in column 2

http://publibz.boulder.ibm.com/cgi-bin/bookmgr_OS390/BOOKS/DGT2U130/3.5.4.2?SHELF=DGT2BK71&DT=20060626223348
Back to top
View user's profile Send private message
rajulan

New User


Joined: 11 Jan 2008
Posts: 66
Location: India

PostPosted: Sat Feb 28, 2009 12:55 am    Post subject:
Reply with quote

Hi,

Earlier i missed the Directory block.

So i have changed my code like below. And As you said i have given the space to copy verb. Still i am getting some issue.

I am getting the below message.

-IEB1135I IEBCOPY FMID HDZ11H0 SERVICE LEVEL UA15787 DATED 20041213 DFSMS 01.
IEB1035I OZA058EX STEP1 13:17:43 FRI 27 FEB 2009 PARM=''
- COPY INDD=SYSUT1,OUTDD=SYSUT2 0013000
IEB1071E DD NAME SYSUT2 IS SUPPOSED TO BE A PARTITIONED DATA SET BUT IT HAS N
ERROR. (DS1LSTAR=X'000000' DS1DSORG=X'0200' JFCDSORG=X'0200')
0IEB1013I COPYING FROM PDS INDD=SYSUT1 VOL=OZAV10 DSN=OZA058.RAJULAN.COBOL
IEB1014I TO PDS OUTDD=SYSUT2 VOL=OZAV07 DSN=OZA058.RAJULAN.COB.BAC
0IEB1021E 0154,D,SYSUT2 ,9E- OP,WRNG.LEN.RECORD,000000DF000D01,EXCP LEN=X'000
IEB1022I I/O ERROR ON PDS DDN=SYSUT2 VOL=OZAV07 DSN=OZA058.RAJULAN.COB.BAC
IEB1023I READING OUTPUT DIRECTORY MEMBER=DIRECTRY TTR=X'000001' MBBCCHHR=X'0000
IEB151I JOB HAS TERMINATED WITH ERROR(S)
IEB147I END OF JOB - 8 WAS HIGHEST SEVERITY CODE


Thanks,
Rajulan R.C
Back to top
View user's profile Send private message
Robert Sample

Global Moderator


Joined: 06 Jun 2008
Posts: 7932
Location: Bellevue, IA

PostPosted: Sat Feb 28, 2009 1:35 am    Post subject:
Reply with quote

I think this tells you exactly what the problem is and how to fix it:
Quote:
IEB1071E DD NAME SYSUT2 IS SUPPOSED TO BE A PARTITIONED DATA SET
Back to top
View user's profile Send private message
dick scherrer

Site Director


Joined: 23 Nov 2006
Posts: 19270
Location: Inside the Matrix

PostPosted: Sat Feb 28, 2009 1:44 am    Post subject:
Reply with quote

Hello,

Quote:
So i have changed my code like below
There has not been any jcl posted that defines a pds. . .
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: Sat Feb 28, 2009 1:49 am    Post subject: Reply to: Error in Iebcopy
Reply with quote

I don't recall that it's necessary to specify the DCB parmeters for the target PDS. Usually something like this should work:

Code:

//STEP1    EXEC PGM=IEBCOPY                   
//SYSPRINT DD SYSOUT=*                       
//SYSUT1   DD DSN=OZA150.RAJULAN.COBOL,DISP=SHR
//SYSUT2   DD DSN=OZA150.RAJULAN.COB.BACKUP,   
//            DISP=(,CATLG,DELETE),         
//            UNIT=SYSDA,                     
//            SPACE=(TRK,(1,1,1),RLSE)
//SYSIN    DD *                               
  COPY INDD=SYSUT1,OUTDD=SYSUT2                 
/*                                             
//                             
Back to top
View user's profile Send private message
rajulan

New User


Joined: 11 Jan 2008
Posts: 66
Location: India

PostPosted: Tue Mar 03, 2009 5:14 pm    Post subject:
Reply with quote

Thanks.

I did not specify the directory block. so it was treated as PS.

Now issue has been fixed.

Thanks,
Rajulan R.C
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 OO COBOL compile error Virendra Shambharkar COBOL Programming 3 Tue Jan 10, 2017 6:05 pm
No new posts S922 Error yuvan ABENDS & Debugging 3 Fri Dec 02, 2016 6:58 pm
No new posts Invoke Webservice Fails with DFHPI100... divated CICS 2 Thu Nov 24, 2016 5:57 pm
No new posts Error during restore rename archanamuthukrishnan All Other Mainframe Topics 2 Fri Oct 14, 2016 3:30 pm
No new posts Error IEC161I 052(009,XXXRS00)-084 wh... amitc23 JCL & VSAM 10 Wed Oct 12, 2016 5:00 pm


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