Manu Dhawan
New User
Joined: 01 Jun 2009 Posts: 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 |
|
Frank Yaeger
DFSORT Developer
Joined: 15 Feb 2005 Posts: 7129 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))
/*
|
|
|