IBM Mainframe Forum

Here's a DFSORT/ICETOOL job to combine each group of 3 records into one long record.
//COMB1 EXEC PGM=ICETOOL
//TOOLMSG DD SYSOUT=*
//DFSMSG DD SYSOUT=*
//IN1 DD DSN=... input file (FB/10)
//OUT1 DD DSN=... output file (FB/30)
//TOOLIN DD *
RESIZE FROM(IN1) TO(OUT1) TOLEN(30)
TOLEN(30) indicates an output length of 30. RESIZE automatically resizes each group of 10-byte input records to
a 30-byte output record.
All you need to know to use RESIZE is the input length and the desired output length

These users thanked the author NicC for the post:

rahulkrddd (Tue Jul 31, 2018 5:12 pm)