PGU-30604
Cause
A COBOL field field containing a clause of the form syntax required a missing attribute attr corresponding to token. PGAU issues messages 30603 and 30604 consecutively for field, syntax, attr, and token.
Typical IBMVSCOBOLII required token attributes are:
field OCCURS int-1 TIMES where 'int-1' is the token for attribute 'repgrpff'
field OCCURS int-1 TO int-2 TIMES DEPENDING ON name-1 where 'int-1' is the token for attribute 'repgrpvf' 'int-2' is the token for attribute 'repgrpvl' 'name-1' is the token for attribute 'repgrpvm'
field RENAMES name-1 THRU name-2 where 'name-1' is the token for attribute 'renamemf' 'name-2' is the token for attribute 'renameml'
field REDEFINES name-1 WHEN name-2 = value where 'name-1' is the token for attribute 'remapsmf' 'name-2' is the token for attribute 'remapsml' 'value' is the token for attribute 'remapswc' or for attribute 'remapswn'
field LENGTH IS name-1 where 'name-1' is the token for attribute 'length'
Each attribute is stored as a separate row in the PG DD, and the missing attribute's row may have been deleted from the PG DD.
Action
In the PG DD, redefine the referencing data item to restore the missing attribute row.