mainframegurukul.com

You can use STARTPOS=x and ENDPOS=y with FINDREP to limit the columns it searches. Something like: OPTION COPY INREC IFTHEN=(WHEN=INIT,FINDREP=(STARTPOS=10,ENDPOS=16, IN=(X'D5',X'4B',X'2B'),OUT=X'40'),HIT=NEXT), IFTHEN=(WHEN=INIT,FINDREP=(STARTPOS=70,ENDPOS=86, IN=...

Suchita, It's easier to show you how to do it correctly then to figure out what you did wrong. Here's a DFSORT JOINKEYS job that will do what you asked for: //S1 EXEC PGM=SORT //SYSOUT DD SYSOUT=* //IN1 DD DSN=... input file1 (FB/113) //IN2 DD DSN=... input file2 (FB/261) //SORTOUT D...

karentina,

An if statement? Do you mean a DFSORT IFTHEN statement or something else? What exactly?

You need to do a better job of explaining what you're trying to do. Show and explain exactly how you want to use this numeric value.

I want to find out all such records where ZZ is followed by FDR records. But I am expecting a output where ZZ record comes immidiate after FDR record. These statements are exact opposites. Please try a little harder to state your requirement clearly the first time. I would have thought you could wo...

If you want the records where ZZ is followed by FDR, then you have the logic backwards. Here's the DFSORT job you need: //S1 EXEC PGM=SORT //SYSOUT DD SYSOUT=* //SORTIN DD DSN=... input file (FB/80) //SORTOUT DD DSN=... output file (FB/80) //SYSIN DD * OPTION COPY INREC IFTHEN=(W...

If you're not familiar with DFSORT and DFSORT's ICETOOL, I'd suggest reading through "z/OS DFSORT: Getting Started". It's an excellent tutorial, with lots of examples, that will show you how to use DFSORT, DFSORT's ICETOOL and DFSORT Symbols. You can access it online, along with all of the other DFS...

You can use a DFSORT job like the following to do what you asked for: //S1 EXEC PGM=SORT //SYSOUT DD SYSOUT=* //SORTIN DD DSN=... input file (FB/80) //SORTOUT DD DSN=... output file (FB/80) //SYSIN DD * OPTION COPY INREC IFTHEN=(WHEN=GROUP,BEGIN=(1,1,CH,EQ,C'A'), RECORDS=...

Will there only be one occurrence of A followed by B, or could there be more? If more, do you want all of the A followed by B pairs of records in the output data set or just the first pair?

What is the RECFM and LRECL of your input file?

bhargavi_ns, You can use the SUBSET operator of DFSORT's ICETOOL to do that: //S1 EXEC PGM=ICETOOL //TOOLMSG DD SYSOUT=* //DFSMSG DD SYSOUT=* //IN DD DSN=... input file //OUT DD DSN=... output file //TOOLIN DD * SUBSET FROM(IN) TO(OUT) KEEP INPUT RRN(7) RRN(11) RRN...

You switched EDIT from a trailing sign to a leading sign, but you didn't fix SIGNS. For a leading sign, you need SIGNS=(+,-). If you don't want leading zeros, then use I instead of T. So you want something like this: 559,9,PD,EDIT=(SIIIIIIIIIIIIIT.TT),SIGNS=(,,+,-), This is all docum...

archup20,

You can use a DFSORT OUTREC statement like this:

blkraven1,

FYI: I'm a DFSORT developer. DFSORT and Syncsort are competitive products. I'm happy to answer questions on DFSORT and DFSORT's ICETOOL, but I don't answer questions on Syncsort.

>If I am using Syncsort will it still work?

Done correctly, it should work.

Really? RESIZE is a "newish" DFSORT/ICETOOL operator. Have you checked to see if Syncsort actually supports the RESIZE operator?

blkraven1, If you need more specific help, you need to state your requirement more clearly. What is the RECFM and LRECL of your input file and expected output file? What is the starting position and length of each field in the input records and expected output records? Why do the output records have...

You can use a DFSORT job like the following to do what you asked for: //S1 EXEC PGM=SORT //SYSOUT DD SYSOUT=* //IN1 DD DSN=... input file1 (FB/266) //IN2 DD DSN=... input file2 (FB/266) //MATCHED DD DSN=... output file1 (FB/266) //NOMATCH1 DD DSN=... output file2 (FB/266&...