TRANSFER Programming Manual

Where to Find Structure Definitions
Designing and Writing a Client
069138, Update 1 to 040970 Tandem Computers Incorporated 9–7
Linkage Section and Procedure Division Header
Note that the names of GLNK fields that appear in the USING clause in the first line of
the Procedure Division must match exactly the names that appear in the Linkage
Section (from the GLNK file). For example, in the following code the names ls-agent-
link and ls-agent-link-reply must match the names used for the copied information in
the Linkage Section.
LINKAGE SECTION.
01 ls-agent-link.
COPY ag-lnk-agent-link OF "GLNK".
01 ls-agent-link-reply.
COPY ag-rep-agent-link-reply OF "GLNK".
...
PROCEDURE DIVISION USING ls-agent-link, ls-agent-link-reply
Copying Definitions from GCOB and GLNK
The following example shows code for copying definitions for the IPC header and for
the ACK-RECEIPT UOW from the GCOB file:
DATA DIVISION.
WORKING-STORAGE SECTION.
01 ipc-hdr-block.
COPY ih-ipc-hdr OF "GCOB".
01 ack-receipt.
COPY uow-ack-ack-receipt-uow OF "GCOB"