View previous topic :: View next topic
|
Author |
Message |
yuvaraj80
New User
Joined: 03 Oct 2005 Posts: 10
|
|
|
|
Hi,
I used SORT to extract some columns from a VB file to an FB file. I get following error message.
ICE043A 3 INVALID DATA SET ATTRIBUTES SPECIFIED SORTOUT RECFM
Can someone please tell me if there is a way to copy from VB to FB like how I have tried below?
Your help is appreciated,
Yuvaraj
The SORT step is pasted below -
//EXTRACT EXEC PGM=SORT,REGION=1M
//SYSPRINT DD SYSOUT=*
//SYSABEND DD SYSOUT=*
//SYSOUT DD SYSOUT=*
//SORTIN DD DSN=ISDXYXN.SCON00P.GB.BCOAZ34D.AMF.G0053,
// DISP=SHR
//SORTOUT DD DSN=ISDXYXN.SCON00P.GB.BCOAZ34D.AMF.G0053.EXT,
// DISP=(NEW,CATLG,DELETE),
// DATACLAS=SMALL,
// DCB=(RECFM=FB,LRECL=16)
//SYSIN DD *
SORT FIELDS=COPY
OUTREC FIELDS=(5,9,PD,M0)
/* |
|
Back to top |
|
|
yuvaraj80
New User
Joined: 03 Oct 2005 Posts: 10
|
|
|
|
Guys,
I got it done. Used CONVERT statement with OUTFIL OUTREC. It worked.
Thanks for all those who tried to help me.
Find the SORT step below -
Code: |
//EXTRACT EXEC PGM=SORT,REGION=1M
//SYSOUT DD SYSOUT=*
//SORTIN DD DSN=ISDXYXN.SCON00P.GB.BCOAZ34D.AMF.G0053,
// DISP=SHR
//SORTOUT DD DSN=ISDXYXN.SCON00P.GB.BCOAZ34D.AMF.G0053.EXT,
// DISP=(NEW,CATLG,DELETE),
// DATACLAS=SMALL,
// DCB=(RECFM=FB,LRECL=18)
//SYSIN DD *
SORT FIELDS=COPY
OUTFIL OUTREC=(5,9,PD,M0),CONVERT
/*
|
|
|
Back to top |
|
|
Frank Yaeger
DFSORT Developer
Joined: 15 Feb 2005 Posts: 7129 Location: San Jose, CA
|
|
Back to top |
|
|
yuvaraj80
New User
Joined: 03 Oct 2005 Posts: 10
|
|
|
|
thx...I browsed the link that you provided... |
|
Back to top |
|
|
|