MVSFORUMS.com

info_seeker · Beginner Joined: 31 Jan 2005 Posts: 27 Topics: 9

hi,

I need to extract the record count of a particular type of record in a file and edit the count so that the left blanks will get padded with zeros and expanded by a byte.
Below is my job

Frank Yaeger · Posted: Wed Sep 28, 2005 2:21 pm Post subject:

The following OUTFIL statement works with DFSORT and will give you what you want. PGM=SYNCSORT suggests you're using Syncsort - I don't know if this will work with Syncsort.

kolusu · Posted: Wed Sep 28, 2005 2:28 pm Post subject:

The latest version of syncsort (syncsort for z/os 1.2 ) supports the control cards Frank has shown. I guess you have older version of sort.

try the following control cards

info_seeker · Beginner Joined: 31 Jan 2005 Posts: 27 Topics: 9

Kolusu's solution worked. I removed the NODETAIL so that I can have the detail records too. But the OUTREC parameter overwrites that.

Is there a way I can get the following output for the same input?
05 D222222
05 D878773
05 D756576
99 TRAILER00000000320050928

Thanks!

kolusu · Posted: Wed Sep 28, 2005 3:46 pm Post subject:

info_seeker,

What is the LRECL and RECFM of the input file?

Do you want the trailer to have

info_seeker · Beginner Joined: 31 Jan 2005 Posts: 27 Topics: 9

Hi Kolusu,

the LRECL is 160.

What is intended is to have first 10 bytes of the actual file trailer retained and add count and date that. Going a step further, can we update the a particular field in the trailer. For eg: as in the case abbove if the trailer was:-
99 TRAILER00000000720050928 considering entire data, only for record type 05, can I modify the trailer as 99 TRAILER00000000320050928 ???

Phantom · Posted: Thu Sep 29, 2005 2:10 am Post subject:

info_seeker,

Try this card.

info_seeker · Beginner Joined: 31 Jan 2005 Posts: 27 Topics: 9

Hi Phantom,

I reuiqre ONLY one trailer with the record count rewritten in that with the no of occurrences of record type '05'.
Giving reference to the trailer above, first 10 bytes "99 TRAILER" will remain as it is in the input modify the count from 000000007 to 000000003 and rest of the trailer as it was in the input.

From the solution you mentioned, the sort program will be inserting "99 TRAILER" as new set of characters. I need to bring in the first 10 bytes whatever may be the trailer (of course, the record type 99 remains the same as is to identify the trailer record), update with count for record type '05', then, the rest of trailer (after count) from the total of 160 (LECL).

Please advise!!!

kolusu · Posted: Thu Sep 29, 2005 12:52 pm Post subject:

Info_seeker,

try this job.

info_seeker · Beginner Joined: 31 Jan 2005 Posts: 27 Topics: 9

The solution worked.. Thanks a lot kolusu and all !!!!!

Frank Yaeger · Posted: Fri Oct 29, 2010 3:53 pm Post subject:

With z/OS DFSORT V1R10 PTF UK90025 or z/OS DFSORT V1R12 PTF UK90026 (Oct,2010), you can now use DFSORT's new IFTRAIL function to do this more easily like this: