|
View previous topic :: View next topic
|
| Author |
Message |
genesis786
Active User
Joined: 28 Sep 2005
Posts: 210
Location: St Katherine's Dock London
|
|
|
|
Hi
i am using the below code to join two files. but the duplicates of the key (pos 19 len 15) are being missed in the output file. how can i keep the duplicates in the output file?
| Code: |
COPY FROM(IN1) TO(T1)
COPY FROM(IN2) TO(T1) USING(CTL1)
SPLICE FROM(T1) TO(T2) ON(19,15,CH) WITH(50,75)
COPY FROM(IN2) TO(T2) USING(CTL2)
SPLICE FROM(T2) TO(OUT) ON(19,15,CH) WITH(56,75)
|
|
|
| Back to top |
|
 |
Frank Yaeger
DFSORT Developer
Joined: 15 Feb 2005
Posts: 7129
Location: San Jose, CA
|
|
|
|
You didn't give enough information about what you're doing for a complete answer. I suspect WITHALL is part of the solution, but there's probably more that has to be done as well depending on exactly what you're trying to do. It's not clear why you're using two SPLICE operators either.
Are you using DFSORT or Syncsort? |
|
| Back to top |
|
|
genesis786
Active User
Joined: 28 Sep 2005
Posts: 210
Location: St Katherine's Dock London
|
|
|
|
SYNCSORT Frank.  I know you don't answer syncsort questions.
This is IN1:
lrecl=75 .. used bytes till 48
| Code: |
IE600RNT00 IE600RNT 600RNT00 600RNT
UK600RNT00 UK600RNT 600RNT00 600RNT
UKAAEFIN01 UKAAEFIN AAEFIN01 AAEFINZ
UKACC2NF00 UKACC2NF ACC2NF00 ACC2NFZ
UKADFXD1BO UKADFXD1 ADFXD1BO ADFXD
UKAISPICBO UKAISPIC AISPICBO AISPIC
|
IN2:
| Code: |
101600RNT00 ...... <<till POS 90>> UKC93
102600RNT00 ...... <<till POS 90>> IEA5M
101AAEFIN01 ...... <<till POS 90>> UKDKG
101ACC2NF00 ...... <<till POS 90>> UKDAG
101ADFXD1BO ...... <<till POS 90>> UKC0L
101AISPICBO ...... <<till POS 90>> UKC6P
|
In the output file i need the output as
| Code: |
IE600RNT00 IE600RNT 600RNT00 600RNT UKC93 IEA5M
UK600RNT00 UK600RNT 600RNT00 600RNT UKC93 IEA5M
UKAAEFIN01 UKAAEFIN AAEFIN01 AAEFINZ UKDKG
UKACC2NF00 UKACC2NF ACC2NF00 ACC2NFZ UKDAG
UKADFXD1BO UKADFXD1 ADFXD1BO ADFXD UKC0L
UKAISPICBO UKAISPIC AISPICBO AISPIC UKC6P
|
but comes as
| Code: |
IE600RNT00 IE600RNT 600RNT00 600RNT UKC93 IEA5M
UKAAEFIN01 UKAAEFIN AAEFIN01 AAEFINZ UKDKG
UKACC2NF00 UKACC2NF ACC2NF00 ACC2NFZ UKDAG
UKADFXD1BO UKADFXD1 ADFXD1BO ADFXD UKC0L
UKAISPICBO UKAISPIC AISPICBO AISPIC UKC6P
|
Whoa! WITHALL worked!  thanks.. |
|
| Back to top |
|
|
|
|
