When you use the transfer to transaction statement in an IMS™ nonconversational program, the optional record is passed as a message segment for an immediate program-to-program message switch. The following table shows the record layout:
| Field | Length in bytes | Type of data | Description |
|---|---|---|---|
| Segment length | 2 | Binary | The length of the segment. |
| Reserved | 2 | Binary | Reserved for IMS. |
| IMS transaction name | 8 | Character | The IMS transaction name for the EGL program. |
| Program data | Variable | Variable | The fields defined for the EGL record. |
01 CSP-APPL-WS-RECORD.
05 CSP-IMS-SEG-LENGTH PIC S9(4) COMP.
05 CSP-ZZ PIC S9(4) COMP.
05 CSP-IMS-TRANNAME PIC X(8).
05 CSP-APPL-WS-DATA.
10 data-item-1 PIC ........................
10 data-item-2 PIC ........................
01 CSP-APPL-WS-RECORD.
05 CSP-APPL-WS-DATA.
10 data-item-1 PIC ........................
10 data-item-2 PIC ........................
For details on how to store and retrieve data from the work database, see "Using the EGL COBOL runtime work database for IMS/VS.”