Joined: 15 Feb 2005 Posts: 7129 Location: San Jose, CA
Does 'ABCD' in positions 1-4 identify the header record? If not, what identifies the header record? What is the RECFM and LRECL of the input file? What is the starting position and length of the field in the header record you want to propagate?
Hi Frank,
First of all many thanks for your interest.
yes, ABCD is the record header, for the DCB, let say RECFM FB LRECL 80.
The field i try to propagade is at offset 6 length 8 .
My first idea was to modify records with inrec ifthen (place a seqnum value for abcd records) and to propagate this value using outrec. With ifthen ABCD , i define %01 pointing to seqnum value, and i use this "kind variable" for build in an ifthen fitring other records. But i received a msgICE245A field not defined for htis ifthen.
My problem is to have a key in order to splice.
Joined: 15 Feb 2005 Posts: 7129 Location: San Jose, CA
Michel,
Here's a DFSORT/ICETOOL job that will do what you asked for. You'll need z/OS DFSORT V1R5 PTF UK90007 or DFSORT R14 PTF UK90006 (April, 2006) in order to use INREC with SPLICE. If you don't have the April, 2006 PTF, ask your System Programmer to install it (it's free). For complete details on all of the new DFSORT and ICETOOL functions available with the April, 2006 PTF, see:
For more information on this DFSORT "group" technique, see the "Include or omit groups of records" and "Sort groups of records" Smart DFSORT Tricks at: