View previous topic :: View next topic
|
Author |
Message |
mkk157
Active User
Joined: 17 May 2006 Posts: 310
|
|
|
|
Dear Expert,
I require the sort card for the following requirement:
I have 5 input files of below format and record lingth of 199 char
Code: |
FILE # 1- Welcome Report -
Name . FAT ID Others --------------------------------------------------------------------------------
ABCDEFGH INDIA ABVFHH ....
ABCDEFGH INDIA ABVFHH ....
|
NOTE:
The Actual contents of the file were reoved and gave the sample file
I want to concatenate the five files of above format in 2 cases.
1) Concatenate the files by removing headers (First 4 lines) of all 5 files.
2) Concatenate the files by removing headers (First 4 lines) of only 2nd, 3rd, 4th and 5th files only. But the first file header remains same. |
|
Back to top |
|
|
mkk157
Active User
Joined: 17 May 2006 Posts: 310
|
|
|
|
File Format of the input file is FBA.
Output fle also should be FBA format |
|
Back to top |
|
|
Frank Yaeger
DFSORT Developer
Joined: 15 Feb 2005 Posts: 7129 Location: San Jose, CA
|
|
|
|
Here's a DFSORT/ICETOOL job that will do what you asked for. Note that NOHDER and ONEHDR must specify MOD data sets.
Code: |
//S1 EXEC PGM=ICETOOL
//TOOLMSG DD SYSOUT=*
//DFSMSG DD SYSOUT=*
//IN1 DD DSN=... input file1 (FB/199)
//IN2 DD DSN=... input file2 (FB/199)
//IN3 DD DSN=... input file3 (FB/199)
//IN4 DD DSN=... input file4 (FB/199)
//IN5 DD DSN=... input file5 (FB/199)
//NOHDR DD DISP=MOD,DSN=... output file1 (FB/199)
//ONEHDR DD DISP=MOD,DSN=... output file2 (FB/199)
//TOOLIN DD *
COPY FROM(IN1) USING(CTL1)
COPY FROM(IN2) USING(CTL2)
COPY FROM(IN3) USING(CTL2)
COPY FROM(IN4) USING(CTL2)
COPY FROM(IN5) USING(CTL2)
/*
//CTL1CNTL DD *
OUTFIL FNAMES=NOHDR,STARTREC=5
OUTFIL FNAMES=ONEHDR
/*
//CTL2CNTL DD *
OPTION SKIPREC=4
OUTFIL FNAMES=(NOHDR,ONEHDR)
/*
|
|
|
Back to top |
|
|
|