High-Level Screen Management Intrinsic Library Reference Manual (32424-90002)

4- 8
passed anyway.
entrycnt Supply a four-byte integer that represents the
number of active field entries in the table.
fldentry Identifies the table defined by your
application.
fldloc Supply a four-byte integer that represents the
byte address of the field in the application
data space. If you supply a zero, Hi-Li
assumes the field is in databuf and the
location of the field in the application data
space is determined by applying the offset of
the referenced field in the form data buffer to
databuf .
fldlen Supply a four-byte integer to represent the
number of bytes you want to move. If you
supply a zero, the length of the referenced
field in the form data buffer is used by
default. If you supply a negative 1, no data
is moved between the application and the form.
rtnfldlen A four-byte integer. The number of field data
bytes actually moved is returned here.
typcnvcode Supply a four-byte integer to indicate the data
type conversion you want performed. The
conversions that you can use are:
0 = no conversion
1 = two-byte integer conversion
2 = four-byte integer conversion
3 = four-byte HP3000 format floating point
(real) conversion
4 = eight-byte HP3000 format floating point
(long) conversion
5 = reserved for four-byte IEEE format floating
point (real) conversion
6= reserved for eight-byte IEEE format floating
point (long) conversion
fldid If you have given descrpttype a value of 60,
supply a four-byte integer that identifies a
field. An integer greater than zero indicates
a field number; an integer less than zero
indicates screen order.
If you have given descrpttype a value of 70,
supply a 32-byte character array that
represents the USASCII name of the field.
Examples
COBOL:
01 datadescrpt.
05 descrptype pic s9(8) comp.
05 buflen pic s9(8) comp.
05 rtnbuflen pic s9(8) comp.
05 entrycnt pic s9(8) comp.
05 fldentry occurs 5 times.
10 fldloc pic s9(8) comp.
10 fldlen pic s9(8) comp.
10 rtnfldlen pic s9(8) comp.
10 typcnvcode pic s9(8) comp.
10 fldid pic x(32).
FORTRAN: INTEGER*4 DATADESCRPT(64)
INTEGER*4 DESCRPTTYPE
INTEGER*4 BUFLEN