TRANSFER Programming Manual

When to Write Your Own Configuration Program
Designing and Writing an Agent
069138, Update 1 to 040970 Tandem Computers Incorporated 10–9
Calling the Configuration or Deletion Program
The ADMIN application calls the configuration program through the following calling
sequence, where xxxxxxxx is the name of the agent supplied on the screen:
CALL xxxxxxxx -CONFIG USING LNKSC-IPC-HDR-L,
LNKSD-LINKAGE-BLOCK,
LNKSE-ERROR-BLOCK,
LNKSF-AGENT-MANAGE-DATA-L.
The ADMIN application calls the deletion program through this calling sequence:
CALL xxxxxxxx -DELETE USING LNKSC-IPC-HDR-L,
LNKSD-LINKAGE-BLOCK,
LNKSE-ERROR-BLOCK,
LNKSF-AGENT-MANAGE-DATA-L.
Generally, your SCREEN COBOL program has the option of completing the requested
configuration or deletion operation itself, refusing to do the operation, or doing part of
the operation and then requesting TRANSFER to do the rest.
The parameters passed to your program by the call are blocks of data that must be
defined in the Linkage Section of the SCREEN COBOL module. Any restrictions on
updating the fields on the screens displayed by a user-supplied module must be
defined in the user-supplied module. The parameters are as follows:
LNKSC-IPC-HDR-L is the standard IPC header. If your program issues a UOW,
the program must modify the REQUEST-CODE and UOWS-TO-PROCESS fields.
Do not alter other fields, or unpredictable results might occur in ADMIN after
your program returns.
LNKSD-LINKAGE-BLOCK contains general linkage information used between
modules. The DDL definition is:
DEF linkage-block.
02 corr-name TYPE *.
02 sys-admin-flag TYPE CHARACTER 1.
02 tmf-started-flag PIC 9.
02 system-name PIC X(8).
02 pathmon-name PIC X(8).
02 return-state TYPE BINARY 16.
02 tiserv-server PIC X(16).
02 admin-server PIC X(16).
02 filler PIC X(208).
END.