Hi,
I have a requirement wherein i want to split one file(containing multiple Headers/Records/Trailers) into "n" number of files. The records in the input file are like :
Joined: 15 Feb 2005 Posts: 7129 Location: San Jose, CA
You can use a DFSORT job like the one below to do what you asked for. I assumed your input file has RECFM=FB and LRECL=80, and you can have up to 50 output files. The first header/detail/trailer group will go to OUT01, the second to OUT02, etc. If you have less than 50 groups (e.g. 40), then the remaining OUTnn files will be empty (e.g. OUT41-OUT50).
Hi Frank,
Thanks for your quich response. But i guess i need to check with client if there is ICEMAN tool available. Can we do it using some other tool also?
And i was not able to understand the following IFTHEN:
IFTHEN=(WHEN=NONE,
OVERLAY=(83:SEQNUM,2,ZD,
81:81,2,ZD,SUB,83,2,ZD,M11,LENGTH=2))
I understand what WHEN=NONE does but in OVERLAY what are we actually trying to do, can you please explain with some example.
Joined: 15 Feb 2005 Posts: 7129 Location: San Jose, CA
PGM=ICEMAN invokes DFSORT. If you have z/OS DFSORT V1R5 PTF UQ95214 or DFSORT R14 PTF UQ95213, then you can use IFTHEN. These PTFs have been available since Dec, 2004.
For an explanation of the IFTHEN "group" technique, see these Smart DSORT Tricks: