GPRECS

GDDM-GKS V1R1 Programming Guide and Reference

GPRECS

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

Purpose


GPRECS	(il, ia, rl, ra, sl, mstr, lstr, str, mldr, errind, ldr, datrec)

APL code	1513
GKS RCP code	X'38006B00' (939551488)

Function: To pack data record.

Utility function. Packs integer, real, and character data into a data record. If your program is written in FORTRAN IV or VS FORTRAN, use the function Pack data record (FORTRAN only) (GPREC) instead.

Parameters

il (specified by user) (fullword integer)
The number of integer entries in ia.

ia (specified by user) (an array of fullword integers)
The integer array.

rl (specified by user) (fullword integer)
The number of floating-point entries in ra.

ra (specified by user) (array of short floating-point numbers)
The floating-point array.

sl (specified by user) (fullword integer)
The number of character-string entries in str.

mstr (specified by user) (fullword integer)
The maximum length of the strings in the str parameter.

lstr (specified by user) (an array of fullword integers)
The individual lengths of the strings in the str parameter.

str (specified by user) (character)
The string array.

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

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

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

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

Related functions

Initialize locator (GINLC), Initialize stroke (GINSK)

Description

This function returns a packed data record when you submit the individual unpacked elements of the record. You can use this function to create data records required for initialization of input devices.

If the data record cannot be created, the error number is returned in errind. Error 2003 is reported if a problem is detected while GDDM-GKS is creating the data record, making the data record invalid.

Principal errors

2001: Output parameter size insufficient
2003: Invalid data record

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