View previous topic :: View next topic
Author
Message
sankarganga New User Joined: 16 Feb 2009Posts: 3 Location: bangalore
Hi,
I have used following SORT card to get the Matching/Not matching records to FILE01 and FILE02.
Code:
JOINKEYS FILES=F1,FIELDS=(11,12,A,23,2,A)
JOINKEYS FILES=F2,FIELDS=(1,12,A,14,2,A)
JOIN UNPAIRED,F1,F2
REFORMAT FIELDS=(F1:1,47,F2:33,10),FILL=X'00'
SORT FIELDS=COPY
OUTFIL FILES=01,INCLUDE=(1,1,BI,NE,X'00',AND,48,1,BI,NE,X'00'),
OUTREC=(1:1,57)
OUTFIL FILES=02,INCLUDE=(1,1,BI,NE,X'00',AND,48,1,BI,EQ,X'00'),
OUTREC=(1:1,47,48:&DATE(4MD-))
Now, is there any way to populate the records in ONE output file.
Back to top
kratos86 Active User Joined: 17 Mar 2008Posts: 148 Location: Anna NGR
Yes you can.
Collaborate all your include conditions. Use IFTHEN against seperate conditions to build the output file.
Back to top
sankarganga New User Joined: 16 Feb 2009Posts: 3 Location: bangalore
Thanks for the reply kartos86
i used following code to format the records into single OUTFILE.
JOINKEYS FILES=F1,FIELDS=(11,12,A,23,2,A)
JOINKEYS FILES=F2,FIELDS=(1,12,A,14,2,A)
JOIN UNPAIRED,F1
REFORMAT FIELDS=(F1:1,47,F2:33,10)
SORT FIELDS=COPY
OUTFIL FILES=01,IFTHEN=(WHEN=(48,1,CH,NE,C' '),
BUILD=(1,57)),
IFTHEN=(WHEN=NONE,BUILD=(1,47,&DATE))
But here I am not able to format the DATE to YYYY-MM-DD. its is giving syntax error for &DATE(4MD-)
Back to top
sankarganga New User Joined: 16 Feb 2009Posts: 3 Location: bangalore
i got the solution.
JOINKEYS FILES=F1,FIELDS=(11,12,A,23,2,A)
JOINKEYS FILES=F2,FIELDS=(1,12,A,14,2,A)
JOIN UNPAIRED,F1
REFORMAT FIELDS=(F1:1,47,F2:33,10)
SORT FIELDS=COPY
OUTFIL FILES=01,IFTHEN=(WHEN=(48,1,CH,NE,C' '),
BUILD=(1,57)),
IFTHEN=(WHEN=NONE,BUILD=(1,47,&DATE(4MD-)))
thanks for the support.
Back to top
Please enable JavaScript!