TRANSFER Reference Manual

GET-ITEM-DES-C20
TISERV UOW Descriptions
069139, Update 1 to 40969 Tandem Computers Incorporated 2–279
02 char-map-id.
03 code-page-id TYPE BINARY 16 UNSIGNED.
03 page-string REDEFINES code-page-id
PIC XX.
03 code-set-id TYPE BINARY 16 UNSIGNED.
03 set-string REDEFINES code-set-id
PIC XX.
02 stats-seq-num TYPE BINARY 16 UNSIGNED.
02 item-stats.
03 extobj-storage TYPE BINARY 64.
03 itemdata-storage TYPE BINARY 64.
03 num-data-recs TYPE BINARY 32 UNSIGNED.
02 filler PIC X(10).
02 item-descr-flags-2.
03 rel-date-reply-by TYPE BOOLEAN.
03 rel-date-submit-timed TYPE BOOLEAN.
03 rel-date-submit-until TYPE BOOLEAN.
03 autoforwarded TYPE BOOLEAN.
03 converted TYPE BOOLEAN.
03 defer-submit TYPE BOOLEAN.
03 body-part-encrypted TYPE BOOLEAN
03 being-encrypted TYPE BOOLEAN
03 reserved-8 TYPE BOOLEAN VALUE "N".
03 reserved-9 TYPE BOOLEAN VALUE "N".
03 reserved-10 TYPE BOOLEAN VALUE "N".
03 reserved-11 TYPE BOOLEAN VALUE "N".
03 reserved-12 TYPE BOOLEAN VALUE "N".
03 reserved-13 TYPE BOOLEAN VALUE "N".
03 reserved-14 TYPE BOOLEAN VALUE "N".
03 reserved-15 TYPE BOOLEAN VALUE "N".
02 sensitivity TYPE BINARY 16 UNSIGNED.
02 reply-by-date.
03 date-time.
04 year PIC 9(4).
04 month PIC 9(2).
04 day-of-month PIC 9(2).
04 hour PIC 9(2).
04 minute PIC 9(2).
04 second PIC 9(2).
03 delta-time REDEFINES date-time.
04 quantity PIC 9(4) COMP.
04 units PIC A.
05 filler PIC X.
04 filler PIC X(10).
02 importance TYPE BINARY 16 UNSIGNED.