IDR data from OBJ END records is actually mapped into a text class
named C'B_IDRL'. The procedure to follow is shown in Table 1.
Table 1. Mapping OBJ END IDR items
to GOFF formatOBJ Element |
GOFF Element |
---|
Initially: |
Issue an ED record with class name C'B_IDRL',
and set the Text Record Style to B'0001'. Assign the Owning
ID of the section SD to which this element belongs. The EDID on this
record will be used for the IDR data to follow (on one or more separate
records). |
IDR Data |
Emit a GOFF Text record, with "Text Record Style" set
to B'0001' (meaning "structured data"), ESDID set
to the value defined on the ED record just described, Offset 0, and
Data Length 23. The 23 bytes of data are: - 1 reserved byte
- 1 byte set to X'00' (primary translator data)
- 2 bytes containing decimal 19 (the length of the following data)
- 19 bytes of normal IDR data.
|