ENABLE Reference Manual
 THE GENERAL SERVER
 Request Format
 -----------------------------------------------------------------
 | |
 | |
 | DEF PW-HEADER. |
 | 02 REPLY-CODE PIC S9(4) COMP. |
 | 02 APPLICATION-CODE PIC XX. (not used) |
 | 02 FUNCTION-CODE PIC XX. |
 | 02 TRANS-CODE PIC 99. |
 | 02 TERM-ID PIC X(15). (not used) |
 | 02 LOG-REQUEST PIC X. (not used) |
 | END |
 | |
 | DEF GS-HEADER. |
 | |
 | 02 ERROR-STATUS. |
 | 03 ERROR-CODE PIC S9(4) COMP. |
 | 03 ERROR-SUB-CODE PIC S9(4) COMP. |
 | 03 FILE-ERROR-CODE PIC S9(4) COMP. |
 | 02 FILE-NAME PIC X(30). |
 | 02 FILE-NUMBER PIC S9(4) COMP. |
 | 02 FILE-POSITION. |
 | 03 RECORD-KEY PIC S9(9) COMP. |
 | 03 PRIOR-POSITION PIC X(4). |
 | 02 KEY-SPECIFIER PIC XX. |
 | 02 COMPARE-LENGTH PIC S9(4) COMP. |
 | 02 RECORD-LENGTH PIC S9(4) COMP. |
 | 02 RECORD-AREA-LENGTH PIC S9(4) COMP. |
 | END |
 | |
 | DEF GS-CONTEXT. |
 | 02 CONTEXT-BUFFER PICTURE X(96). |
 | 02 CONTEXT REDEFINES CONTEXT-BUFFER. |
 | 03 VERSION PIC X(4). |
 | 03 LOGICAL-KEY-LENGTH PIC 9(4) COMP. |
 | 03 FILLER PIC X(90). |
 | END |
 | |
 -----------------------------------------------------------------
 Figure E-1. General Server Request Structure in
 DDL-Compatible Format
 E-7










