Purpose
|
|
GINPK
|
(wkid, pkdnr, istat, isgna,
ipkid, pet, xmin, xmax, ymin,
ymax, ldr, datrec) |
| |
|
| APL code |
1497 |
| GKS RCP code |
X'38004900' (939542784) |
| |
|
Function: To initialize pick.
Input function. Initializes a pick input device at a workstation.
Parameters
wkid (specified by user) (fullword integer)
The workstation identifier.
pkdnr (specified by user) (fullword integer)
The pick device number. GDDM-GKS provides only one pick device at a
workstation. The pick device number is always 1.
istat (specified by user) (fullword integer)
The initial status. The possible values are:
- 0 (GOK)
- OK
- 1 (GNPICK)
- No pick
isgna (specified by user) (fullword integer)
The initial segment name. If istat is GOK, this parameter must identify
a segment at the workstation that is visible and detectable.
ipkid (specified by user) (fullword integer)
The initial pick identifier. If istat is GOK, this parameter must be the
pick identifier of at least one primitive in the segment isgna.
pet (specified by user) (fullword integer)
The prompt and echo type.
xmin (specified by user) (short floating point)
xmax (specified by user) (short floating point)
ymin (specified by user) (short floating point)
ymax (specified by user) (short floating point)
The echo area in device coordinates.
ldr (specified by user) (fullword integer)
The dimension of the data record array datrec.
datrec (specified by user) (array of 80-byte character tokens)
The data record array.
Operating states
WSOP, WSAC, SGOP
Related functions
Request pick (GRQPK), Set pick mode (GSPKM)
Description
This function initializes the pick input device by defining the initial
segment, initial pick identifier, prompt and echo type, echo area, and
status.
GDDM-GKS provides one prompt and echo type:
- pet=1
- The prompt and echo are provided by a cursor which is moved to the
primitive to be picked. On the 3270-PC/G and /GX ranges of
workstations, a square showing the pick aperture is superimposed on a
cross-hair cursor. If istat is GOK, the initial cursor position is at a
primitive that satisfies the initial combination of segment name and
pick identifier. The echo area and data record are not used.
Principal errors
- 7
- GKS not in proper state: GKS shall be in one of the states WSOP,
WSAC, or SGOP
- 20
- Specified workstation identifier is invalid
- 25
- Specified workstation is not open
- 37
- Specified workstation is not of category OUTIN
- 51
- Rectangle definition is invalid
- 140
- Specified input device is not present on workstation
- 141
- Input device is not in REQUEST mode
- 144
- Specified prompt and echo type is not supported on this
workstation
- 145
- Echo area is outside display space
- 146
- Contents of input data record are invalid
- 152
- Initial value is invalid
- 2000
- Enumeration type out of range
|
GDDM-GKS V1R1 Programming Guide and Reference
Copyright IBM Corporation 1990, 2012