"Cross-reference of data names" too primitive?

[Truusvlugindewind]

Ask me and I say "yes".

When you populate DCLGEN column by means of embedded SQL, it is not recognised (no Mlinunumber reference).
But even when you code

01  group-counters.
    03 count-a pic s9(9) comp.
    03 count-b pis s9(4) comp.
INITIALIZE group-counters  REPLACING NUMERIC DATA BY ZERO

Examining the assembler listing learns that this statement does exactly what you want it to do. Fine. But I'd like my cross-ref to indicate that my counters gets modified here.
The cross-ref is a wonderfull tools track the usage of you variables, but I'm afraid it was manitained when the "new" ANSI-85 and embedded SQL features were added.
Too bad.



P.S.
using
- DB2 SQL PRECOMPILER VERSION 8 REL. 1.0
- IBM Enterprise COBOL for z/OS 3.4.1

 

[COBOLKenny]

The cross-reference has always worked this way where it only gives you an entry that you specifically reference in a statement.

If your counters were defined as zoned decimal, you could MOVE ZEROES TO GROUP-COUNTERS
and the cross-reference never listed the elementary fields as being modified. That's why you always had to look for modifications to the actual field in question and any group above it to see where it might have changed.

So even before the ANSI-85 standard there were statements that referenced group items but the cross reference did not show each elementary item as being modified.