The LOAD TABLE statement instructs the system to load a table (module or program) into the program pool.
►►── LOAD TABLE (table-name) POINTER (table-location-pointer) ─┬──────────┬;─►◄ ├─ WAIT ◄ ─┤ └─ NOWAIT ─┘
Specifies the 1- to 8-character name of the table to be loaded. Table is either the symbolic name of a user-defined field that contains the table, or the name itself enclosed in single quotation marks.
Specifies the pointer variable for referencing the loaded table. After the table has been loaded, the pointer contains the address of the beginning of the table.
Requests the issuing task to wait until sufficient storage becomes available. If WAIT is specified and the system encounters an insufficient storage condition, the issuing task is placed in an inactive state; when the LOAD TABLE function is completed, control returns to the issuing task according to its previously established dispatching priority. WAIT is the default.
Requests the issuing task not to wait for storage to become available. If NOWAIT is specified, the system returns a value of 3402 to the ERROR_STATUS field when an insufficient storage condition exists.
The following source code defines the data required for use with the LOAD TABLE request:
DCL STATECON_POINTER POINTER;
DCL 1 STATECON(50) BASED (STATECON_POINTER),
3 STATE_ABB CHAR(2),
3 STATE_FULL CHAR(15);
The following statement loads the STATECON table into the program variable-storage area identified by the pointer STATECON_POINTER:
LOAD TABLE (STATECON) POINTER (STATECON_POINTER);
Upon completion of the LOAD TABLE function, the ERROR_STATUS field in the IDMS DC communications block indicates the outcome of the operation:
The request has been serviced successfully.
The requested module cannot be loaded immediately due to insufficient storage; to wait would cause a deadlock.
The requested module cannot be loaded because insufficient storage exists in the program pool.
The requested module cannot be loaded because an I/O error has occurred during processing.
The requested module cannot be loaded because it has been defined as noncurrent and is currently in use.
The requested module has been overlaid temporarily in the program pool and cannot be reloaded immediately.
Either the requested program is not defined in the program definition table (PDT) and is marked out of service, or null PDEs are not specified or valid in this system.
|
Copyright © 2014 CA.
All rights reserved.
|
|