Frank Yaeger
DFSORT Moderator
Joined: 15 Feb 2005
Posts: 4621
Location: San Jose, CA
|
|
|
|
You can use a DFSORT/ICETOOL job like this to do what you asked for:
| Code: |
//S1 EXEC PGM=ICETOOL
//TOOLMSG DD SYSOUT=*
//DFSMSG DD SYSOUT=*
//CON DD * input file1
103 9 JP
126 22 AD
126 30 AD
249 1 ND
313 17 NP
// DD * input file2
103 9 Jaipur
126 22 Allahabad
126 30 Ahmedabad
249 1 New Delhi
313 17 Nagpur
/*
//OUT DD SYSOUT=*
//TOOLIN DD *
SPLICE FROM(CON) TO(OUT) ON(1,5,CH) ON(17,7,CH) -
WITH(41,9) USING(CTL1)
/*
//CTL1CNTL DD *
OUTFIL FNAMES=OUT,
OUTREC=(1,5,9:17,7,19:41,9,36:36,2)
/*
|
|
|
