TRANSFER Programming Manual

When to Write Your Own Configuration Program
Designing and Writing an Agent
069138, Update 1 to 040970 Tandem Computers Incorporated 10–11
In this definition, the fields have the following meanings:
error-message contains the error message text, which can include up to 67
characters. The definition for this field is:
DEF error-message.
02 error-text TYPE CHARACTER 67 VALUE SPACES.
02 error-detail.
03 sign-field-2 TYPE CHARACTER 1 VALUE SPACES.
03 error-field-2 PIC 9999 VALUE 0.
03 sign-field-1 TYPE CHARACTER 1 VALUE SPACES.
03 error-field-1 PIC 9999 VALUE 0.
03 unusable TYPE CHARACTER 3 VALUE SPACES.
END.
error-attr-flag specifies the kind of video display in which the error message
appears. To display the message in inverse video, set this field to 1.
To display the message in normal video, set this field to 0.
filler is unused.
LNKSF-AGENT-MANAGE-DATA-L contains a return action flag and data for an
ALTER-AGENT-SELECT UOW. The DDL definition is:
DEF agent-manage-data.
02 return-action-flag PIC S9(4) COMP.
02 agent-alter-data TYPE GET-AGENT-SELECT-RSP.
END.