GQDPK

GDDM-GKS V1R1 Programming Guide and Reference

GQDPK

GDDM-GKS V1R1 Programming Guide and Reference
SC33-0334-00

Purpose


GQDPK	(wtype, devno, n, mldr, errind, ol, pet, earea, ldr, datrec)

APL code	1505
GKS RCP code	X'3800DC00' (939580416)

Function: To inquire default pick device data.

Inquiry function. Returns the default data for a pick device at a workstation, from the workstation description table. (See the section "GDDM-GKS restrictions" below.)

Parameters

wtype (specified by user) (fullword integer)
The workstation type.

devno (specified by user) (fullword integer)
The pick device number.

n (specified by user) (fullword integer)
The element requested from the list of available prompt and echo types.

mldr (specified by user) (fullword integer)
The dimension of the data record array.

errind (returned by GDDM) (fullword integer)
The error indicator.

ol (returned by GDDM) (fullword integer)
The number of available prompt and echo types.

pet (returned by GDDM) (fullword integer)
Element n of the list of available prompt and echo types.

earea (returned by GDDM) (array of short floating-point numbers)
The default echo area in device coordinates (XMIN, XMAX, YMIN, YMAX).

ldr (returned by GDDM) (fullword integer)
The number of elements used in the data record array.

datrec (returned by GDDM) (array of 80-byte character tokens)
The data record array.

Operating states

GKOP, WSOP, WSAC, SGOP

Related functions

Initialize pick (GINPK)

Description

(See the section "GDDM-GKS restrictions" below.)

If the inquired information is available, it is returned as output, and errind is returned as 0 (zero). If the inquired information is not available, all output is invalid, and errind returns an error indicator.

If the list element requested, n, is 0, ol is set to the number of available prompt and echo types but pet is undefined. If the list element is out of range, GKS reports error 2002 in errind.

The parameter mldr reserves space for the data record returned by the inquiry. If you do not specify sufficient length to accommodate the data record, GKS reports error 2001 in errind.

GDDM-GKS Restrictions

GDDM-GKS ignores the mldr parameter; the data record returned is empty.

Principal errors

8: GKS not in proper state: GKS shall be in one of the states GKOP, WSOP, WSAC, or SGOP
22: Specified workstation type is invalid
23: Specified workstation type does not exist
38: Specified workstation is neither of category INPUT nor of category OUTIN
140: Specified input device is not present on workstation
2001: Output parameter size insufficient
2002: List element or set member not available

Notices | Terms of use | Support | Contact z/OS