|
|
| Author |
Message |
Guru Nandu
New User
Joined: 16 Jul 2009 Posts: 2 Location: India
|
|
|
|
Hi,
In Mainframe OMVS, a unix script generates xxx.xml where the record length is 80 characters.
ISC.ISC06.XXX.TEST.DDMMYY is also defined with 18000 characters long. While using the below step, i am getting
READY
OCOPY INDD(INOUT) OUTDD(TEMP) TEXT CONVERT((BPXFX311)) TO1047
THE RECORD SIZE IN THE OUTPUT DATA SET IS SMALLER THAN A LINE IN THE INPUT FILE.
READY
END
//CPDBRM EXEC PGM=IKJEFT01,REGION=0M
//INOUT DD PATHOPTS=(ORDONLY),
// PATH='/u/isc/xxx.xml'
//TEMP DD DSN=ISC.ISC06.XXX.TEST.DDMMYY,
// RECFM=VB,
// LRECL=18000,
// DSORG=PS,
// SPACE=(CYL,(2,1),RLSE),
// DISP=(OLD,CATLG,CATLG),
// UNIT=SYSDA
//SYSTSPRT DD SYSOUT=*
//SYSTSIN DD *
OCOPY INDD(INOUT) OUTDD(TEMP) TEXT CONVERT((BPXFX311)) TO1047
/*
//*
Is there any option to wrap the text while copying into sequential dataset? |
|
| Back to top |
|
 |
References
|
|
 |
Robert Sample
Global Moderator
Joined: 06 Jun 2008 Posts: 5034 Location: Atlanta, GA
|
|
|
|
| I have seen cases where line breaks were not embedded in the Unix System Services file, so from the MVS standpoint the file is one long record. If this is the case, you may need to process it in Unix System Services to add a line break after every 80 bytes. |
|
| Back to top |
|
 |
Guru Nandu
New User
Joined: 16 Jul 2009 Posts: 2 Location: India
|
|
|
|
When the file size is large, this helps in copying the file completely. By using OGET instead OCOPY has solved my problem.
| Code: |
//JS030 EXEC PGM=IKJEFT01,
// REGION=0M
//SYSTSPRT DD SYSOUT=*
// PATH='/u/isc/xxx.xml'
//TEMP DD DSN=ISC.ISC06.XXX.TEST.DDMMYY
// RECFM=VB,
// LRECL=32756,
// DSORG=PS,
// SPACE=(CYL,(2,1),RLSE),
// DISP=(NEW,CATLG,DELETE),
// UNIT=SYSDA
//SYSTSIN DD *
OGET '/u/isc/xxx.xml' 'ISC.ISC06.XXX.TEST.DDMMYY' BINARY
/*
|
|
|
| Back to top |
|
 |
|
|
|