TRANSFER Programming Manual

When to Write Your Own Configuration Program
Designing and Writing an Agent
10–10 069138, Update 1 to 040970 Tandem Computers Incorporated
In this definition, the fields have the following meanings:
corr-name is the correspondent name of the logged-on correspondent, or the
correspondent name entered on the ADMIN Main Menu Screen by a system
administrator. Do not alter this field.
sys-admin-flag indicates whether the logged-on correspondent is a system
administrator. Do not alter this flag.
tmf-started-flag is used to control error recovery if your SCREEN COBOL
program terminates abnormally. You must set this field to 1 immediately
before beginning a TMF transaction, and set it to 0 immediately after
terminating a TMF transaction with END-TRANSACTION or ABORT-
TRANSACTION.
system-name is the name of the EXPAND node at which the correspondent
named in the CORR-NAME field is registered. Do not alter this field.
pathmon-name is the name of the PATHMON process running the
TRANSFER system at the node named in the SYSTEM-NAME field. Do not
alter this field.
return-state determines where your program returns; set this field to 0
to return to the calling module or 1 to return to the ADMIN Main Menu
Screen. Do not enter any other values in this field.
tiserv-server and admin-server are server class names for TISERV and
ADMIN. Do not alter these fields.
filler is reserved for use by Tandem.
LNKSE-ERROR-BLOCK can be used to return an error message to the calling
screen. Generally, you should use this field only if your SCREEN COBOL
program does not provide for display of this message on a screen. The DDL
definition is:
DEF error-block.
02 error-message TYPE *.
02 error-attr-flag PIC 9.
02 filler TYPE CHARACTER 13.
END.