MVSFORUMS.com

[Dinesh Kumar]

The Input File has Header and Detailed Record structure as stated below.The LRECL of the File is of 200 bytes

1-6 Order Group
7-8 Record Type ('10'--> Header Record ,'20' ---> Intermediate Record , 30 ---> Detailed Record )
9 Indicator Value for Header Record only
23 Indicator value for Detailed record only

IF the Indicator value in Header Record (Position 9) is of Value "4"' AND IF any of the Detailed record in the Corresponding Order Group has a Indicator value of "5"
Then change the Indicator value in Header Record (Position 9) to value "3" and also change the indicator value (Position 23) in all the Detailed records to "3" for the Corresponding Order Group .
The rest of the records or the data shouldn't be altered. Appreciate for your timely help.

[kolusu]

Dinesh Kumar,

Use the following DFSORT JCL which will give you the desired results. I assumed your input LRECL is 80 bytes and has FB recfm. Since you wanted to updated both the header and detail records, we will use the joinkeys trick to find out if any of the detailed records have a "5" at position 23 and then we will update the entire group matching the key.