This version of the INQUIRE MAP statement moves one of the following map-related data items into variable storage:
►►─── INQUIRE MAP (map-name) ─────────────────────────────────────────────────► ►─── MOVE ─┬─ AID TO (aid-indicator) ───────────────────────┬─ ; ────────────►◄ ├─ CURSOR TO (cursor-row) (cursor-column) ──────┤ └─ IN LENGTH FOR (field-name) TO (field-length) ─┘
Specifies the map for which the inquiry is being made. Map-name is the 1- to 8-character name of a map that must correspond to a map name specified in the DECLARE MAP statement, as described in DML Precompiler-Directive Statements.
Moves screen-related information to program variable storage:
Returns the attention ID to the specified location in variable storage. Aid-indicator is the symbolic name of a 1-byte user-defined field that will be set to the 3270 AID character received in the last map input request. The following table lists the AID characters associated with each 3270-type control key.
|
Key |
AID character |
|---|---|
|
ENTER CLEAR PF1 PF2 PF3 PF4 PF5 PF6 PF7 PF8 PF9 PF10 PF11 PF12 PF13 PF14 PF15 PF16 PF17 PF18 PF19 PF20 PF21 PF22 PF23 PF24 PA01 PA02 PA03 |
"'" (single quote) '_' (underscore) '1' '2' '3' '4' '5' '6' '7' '8' '9' ':' '#' '@' 'A' 'B' 'C' 'D' 'E' 'F' 'G' 'H' 'I' '¢' '.' '<' '%' '>' ',' |
Returns the cursor address from the last map input function to the specified location in program variable storage. Cursor-row and cursor-column are the symbolic names of user-defined FIXED BINARY(15) fields to which the row and column cursor address will be returned.
Returns the length, in bytes, of the data in the named map field to the specified location in program variable storage. Field-name is the name of the map field for which the length is being requested; field-length is the symbolic name of a user-defined fixed binary field.
The following example illustrates the use of an INQUIRE MAP statement to move the 3270 AID character received in the last map input request to DC_AID_IND_V:
INQUIRE MAP (EMPMAPLR) MOVE AID TO (DC_AID_IND_V);
|
Copyright © 2014 CA.
All rights reserved.
|
|