Function
To modify a field list.
APMOD (field-list-id, depth-1, width-1, field-list, length,
data-buffer, depth-2, width-2, bundle-list, mode)
APL code 282
GDDM RCP code X'0C380200' (204997120)
Parameters
field-list-id (specified by user) (fullword integer)
The identifier of the field list to be modified.
depth-1 (specified by user) (fullword integer)
The number of rows in the modified field list array (stored in row major
order). If zero is specified, the field list is not modified.
width-1 (specified by user) (fullword integer)
The number of columns in the modified field list array. It must be
greater than or equal to 6.
field-list (specified by user) (an array of halfword integers)
The modified field list.
length (specified by user) (fullword integer)
The length of the modified data buffer. If zero is specified, the data
buffer is not modified.
data-buffer (specified by user) (character)
The modified data buffer.
depth-2 (specified by user) (fullword integer)
The number of rows in the modified bundle list array (stored in row major
order). If zero is specified, the bundle list is not modified.
width-2 (specified by user) (fullword integer)
The number of columns in the modified bundle list array. It must be
greater than or equal to 4.
bundle-list (specified by user) (an array of halfword integers)
The modified bundle list.
mode (specified by user) (fullword integer)
The mode of operation as specified by the APDEF call. If -1 is
specified, the mode is unchanged.
Description
Modifies the specified field list. With this call it is possible to
change any of:
- The size and contents of the field list, and also its location if
operating in locate mode.
- The size and contents of the data buffer, and also its location if
operating in locate mode.
- The size and contents of the bundle list, and also its location if
operating in locate mode.
- The mode of operation.
Modifications to field list, data buffer, and bundle list must conform to
the rules defined in the GDDM Base Application Programming Guide.
Note: When used under non-XA subsystems of CICS, the total storage
occupied by the field list, data buffer, and bundle list must not be
greater than 64KB.
Principal errors
- ADM0222 E
- MODE n IS INVALID
- ADM3002 E
- FIELD LIST IDENTIFIER n IS INVALID
- ADM3003 E
- LENGTH (n) IS INVALID
- ADM3006 E
- CURSOR POSITION ALREADY DEFINED IN ANOTHER FIELD LIST
- ADM3007 E
- CANNOT SWITCH BETWEEN LOCATE MODE AND MOVE MODE
- ADM3008 E
- FIELD LIST n DOES NOT EXIST
- ADM3009 E
- DEPTH (n1) OR WIDTH (n2) IS INVALID
- ADM3013 E
- FIELD LIST n TOTAL STORAGE EXCEEDS SUBSYSTEM MAXIMUM
|