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