View previous topic :: :: View next topic
Author
Message
Manu Dhawan New User Joined: 01 Jun 2009Posts: 9 Location: India
Hi,
I need to crop a VB file where I need to delete some columns, but the header and trailer record should not be changed in the output file. The trailer record can be identified using a key and header is always the first record. Is it possible in Sort?
I try to explain by example(Input and output are VB file):-
Input File:-
123456789HEADER
123456789RECORD1
123456789RECORD2
123456789RECORD3
.............................
.............................
123456789RECORDn
123456789TRAILER
Let say I need to detele columns 4 to 9.
Output File required as:-
123456789HEADER
123RECORD1
123RECORD2
123RECORD3
.............................
.............................
123RECORDn
123456789TRAILER
Thanks,
Manu
Back to top
expat Global Moderator Joined: 14 Mar 2007Posts: 8657 Location: Back in jolly old England
Take a look at the DFSORT tricks book HERE
Back to top
Frank Yaeger DFSORT Moderator Joined: 15 Feb 2005Posts: 7130 Location: San Jose, CA
Manu,
You can use a DFSORT job like the following to do what you asked for:
Code:
//S1 EXEC PGM=SORT
//SYSOUT DD SYSOUT=*
//SORTIN DD DSN=... input file (VB)
//SORTOUT DD DSN=... output file (VB)
//SYSIN DD *
OPTION COPY
INREC IFTHEN=(WHEN=(14,6,CH,NE,C'HEADER',
AND,14,7,CH,NE,C'TRAILER'),
BUILD=(1,7,14))
/*
Back to top
Please enable JavaScript!