View previous topic :: View next topic
|
Author |
Message |
sant532
New User
Joined: 02 Jun 2008 Posts: 48 Location: India
|
|
|
|
Hi all,
i'm having 2 files...
File1 lrecl is 12 and is having following records...
1111sant1234
1112raju1345
1113john1655
1114mahi5454
and file 2 lrecl is 6 and is having following records
222222
333333
444444
555555
now i want output like below
1111sant222222
1112raju333333
1113john444444
1114mahi555555
Thanks. |
|
Back to top |
|
|
hikaps14
Active User
Joined: 02 Sep 2005 Posts: 189 Location: Noida
|
|
|
|
Hi,
You can find a lot on this topic in DFSORT/ICETOOL forum
Try executing the below job :
Code: |
//STEP010 EXEC PGM=ICETOOL
//TOOLMSG DD SYSOUT=*
//DFSMSG DD SYSOUT=*
//IN1 DD DSN=... input file1 (FB/12)
//IN2 DD DSN=... input file2 (FB/6)
//T1 DD DSN=&&TEMP,UNIT=SYSDA,SPACE=(CYL,(5,5)),DISP=(MOD,PASS)
//OUT DD DSN=... output file (FB/14)
//TOOLIN DD *
COPY FROM(IN1) TO(T1) USING(CTL1)
COPY FROM(IN2) TO(T1) USING(CTL2)
SPLICE FROM(T1) TO(OUT) ON(15,8,ZD) -
WITH(9,6) USING(CTL3)
/*
//CTL1CNTL DD *
INREC FIELDS=(1,8,15:SEQNUM,8,ZD)
/*
//CTL2CNTL DD *
INREC FIELDS=(9:1,6,15:SEQNUM,8,ZD)
/*
//CTL3CNTL DD *
OUTFIL FNAMES=OUT,BUILD=(1,14)
/* |
Thanks,
-Kapil. |
|
Back to top |
|
|
sant532
New User
Joined: 02 Jun 2008 Posts: 48 Location: India
|
|
|
|
what is the meaning of
15:SEQNUM,8,ZD in INREC FIELDS=(1,8, 15:SEQNUM,8,ZD) |
|
Back to top |
|
|
sant532
New User
Joined: 02 Jun 2008 Posts: 48 Location: India
|
|
|
|
Hi Kapil...That is WORKING WELL.
Thanks A lot. |
|
Back to top |
|
|
hikaps14
Active User
Joined: 02 Sep 2005 Posts: 189 Location: Noida
|
|
|
|
Hi,
SEQNUM,8,ZD : This generates sequence nos. of 8 digits in zone decimal format.
Thanks,
-Kapil. |
|
Back to top |
|
|
sant532
New User
Joined: 02 Jun 2008 Posts: 48 Location: India
|
|
|
|
hi Kapil one more question ....what is the use of WITH
SPLICE FROM(T1) TO(OUT) ON(15,8,ZD) -
WITH(9,6) USING(CTL3) |
|
Back to top |
|
|
hikaps14
Active User
Joined: 02 Sep 2005 Posts: 189 Location: Noida
|
|
Back to top |
|
|
Frank Yaeger
DFSORT Developer
Joined: 15 Feb 2005 Posts: 7129 Location: San Jose, CA
|
|
Back to top |
|
|
|