TRANSFER Reference Manual

SCAN-FOLDER-B00
TISERV UOW Descriptions
069139, Update 1 to 40969 Tandem Computers Incorporated 2–465
SCAN-FOLDER-B00
(UOW Code 142)
SCAN-FOLDER-B00 scans the contents of a folder and retrieves the IDs and unsave
time of items in the folder. SCAN-FOLDER-B00 returns item IDs according to the
ordering key by which items were saved in the folder. If an application scans a folder
that is in APPLIC-DEFINED order and requires the ordering key of each item, the
SCAN-FOLDER-BY-KEY UOW must be used.
Although SCAN-FOLDER-B00 does return named items, it does not allow you to scan
folders by search criteria for selected named items; you must use the SCAN-BY-ITEM-
NAME UOW for this purpose.
DEF scan-folder-b00-uow.
02 hdr.
03 self-ident PIC AA VALUE "UW".
03 uow-code TYPE BINARY 16 UNSIGNED
VALUE 142.
02 folder-name PIC X(80).
02 item-id.
03 dummy PIC X(12).
02 options.
03 filter-by-item-type TYPE BOOLEAN.
03 reserved-1 TYPE BOOLEAN VALUE "N".
03 item-type PIC 9(4) COMP.
02 num-requested TYPE BINARY 16 UNSIGNED
VALUE 20.
END.
DEF scan-folder-b00-rsp.
02 hdr.
03 self-ident PIC AA VALUE "UW".
03 uow-code TYPE BINARY 16 UNSIGNED
VALUE 142.
02 retn-code TYPE BINARY 16.
02 retn-code-detail TYPE BINARY 16.
02 num-returned TYPE BINARY 16 UNSIGNED.
02 items-returned OCCURS 0 TO 10 TIMES
DEPENDING ON num-returned
03 item-id.
04 dummy PIC X(12)
03 unsave-time.
04 date-time.
05 year PIC 9(4).
05 month PIC 9(2).
05 day-of-month PIC 9(2).
05 hour PIC 9(2).
05 minute PIC 9(2).
05 second PIC 9(2).
END.