SYSADATA - COBOL - Structure displacement not populating

ganasrinivasan · New User Joined: 06 Nov 2006 Posts: 27 Location: Montreal

Hi, Structure displacement field of SYSADATA is not getting populated for anyof the working storage variables after compilation. Anyidea?. X'0042' - SYSADATA record type.

Robert Sample · Posted: Thu May 24, 2018 10:06 pm Post subject:

Do you have option ADATA or NODATA specified in your compile? If NOADATA, nothing will be written to SYSADATA.

ganasrinivasan · New User Joined: 06 Nov 2006 Posts: 27 Location: Montreal

Hi Robert, Its writing to SYSADATA but in x'0042' record, "structure displacement" field value is x'0000'. In the manual, I can spot below comment that this will be zero for variably located items. But mine is working storage variable.

Structure displacement - AL4 -
Offset of symbol within structure. This offset is set to 0 for variably located items.

Robert Sample · Posted: Fri May 25, 2018 2:25 am Post subject:

Structure displacement is a 4-byte field; you have providing us the first 2 bytes as X'0000' -- what are the second 2 bytes?