Page 1 of 1

Sort in VB format file

PostPosted: Fri Nov 15, 2013 12:41 am
by rajaranganathan
Hi All,

I'm trying to reformat a VB format file using sort. but i am getting RDW not found error. Please help regarding this

//SORTIN   DD DSN=TTEST.FTP.LSOUTPUT,DISP=SHR
//SORTOUT  DD DSN=TTEST.FTP.DELETE,
//            DISP=(NEW,CATLG,DELETE),
//            SPACE=(CYL,(10,05),RLSE),
//            UNIT=APPLTA,
//            DCB=(RECFM=VB,LRECL=1028,BLKSIZE=6144)
//SYSIN    DD *
  SORT FIELDS=COPY
  OUTREC FIELDS=(01:C'DELETE',
                 10:001,15,
                 26:56X)
/*

Re: Sort in VB format file

PostPosted: Fri Nov 15, 2013 1:23 am
by dick scherrer
Hello,

Please post the messages generated by the problem run including the message ids.

Also, you need to use the "code" tag to preserve alignment and improve readability.

Re: Sort in VB format file

PostPosted: Fri Nov 15, 2013 3:07 pm
by NicC
You are also not providing the RDW on the output record - it starts at position 1 for 4 bytes so your data starts at position 5.

Re: Sort in VB format file

PostPosted: Fri Nov 15, 2013 8:05 pm
by skolusu
rajaranganathan,

If your intention is to create a 80 byte file with DELETE control cards, remove the hardcoded DCB properties in your JCL and use the following control cards
//SYSIN    DD *
  SORT FIELDS=COPY
  OUTFIL VTOF,BUILD=(C'DELETE ',5,15,80:X)
/*