Pathmaker Programming Guide

Modifying Requester/Server Pairs
Advanced Pathmaker Programming Topics
9–56 067868 Tandem Computers Incorporated
The following paragraphs show the DDL pictures of each of the pseudofields.
The Pathmaker product places the picture clause for @ADVISORY in the IPC message
header. The picture clause for @ADVISORY is:
04 T9154-ADVISORY-MSG-TEXT PIC X(76).
The Pathmaker product places the picture clauses for the remaining pseudofields in
the Working Storage of the requester source code. The picture clauses for the
remaining pseudofields are:
01 T9154-CURRENT-PAGE PIC 99.
01 T9154-PAGE-COUNT PIC 99.
01 T9154-DATE.
02 T9154-YEAR PIC 99.
02 T9154-MONTH PIC 99.
02 T9154-DAY-OF-MONTH PIC 99.
01 T9154-TIME.
02 T9154-HOUR PIC 99.
02 T9154-MINUTE PIC 99.
02 T9154-SECOND PIC 99.
02 T9154-HUNDREDTHS PIC 99.
01 T9154-CURSOR-POSITION.
02 T9154-OBJECT-NAME.
03 T9154-GROUP-NAME PIC X(30).
03 T9154-FIELD-NAME PIC X(30).
02 T9154-SUBSCRIPT PIC 9(4) COMP.
01 LOGICAL-TERMINAL-NAME PIC X(16).
01 TERMINAL-FILENAME PIC X(24).
01 T9154-CURSOR-FIELD
02 T9154-SCREEN-FIELD-NAME PIC X(30).
02 T9154-FIELD-SUBSCRIPT PIC 9(4) COMP.
02 T9154-REPETITION PIC 9(4) COMP.
88 T9154-NO-REPETITION-FOUND VALUE 0.
Here are some guidelines for using these Working-Storage structures for the
Pathmaker pseudofields:
The following structures are always generated in the requester source code:
T9154-ADVISORY-MSG-TEXT
T9154-CURRENT-PAGE
T9154-CURSOR-FIELD
T9154-CURSOR-POSITION
T9154-PAGE-COUNT