HP Data Entry and Forms Management System (VPLUS) Reference Manual (32209-90024)

334 Chapter6

USING VPLUS INTRINSICS

INTRINSIC DESCRIPTIONS

Note that VPUTFIELD does not convert the data. To convert data from internal numeric

representation to character strings, you must use VPUTtype, where type speciﬁes the data

type of the ﬁeld in an application.

Example

COBOL

MOVE 1 TO FIELDNUM.

MOVE 10 TO FIELD-LEN.

MOVE "GADGET "TO PART-DES.

CALL "VPUTFIELD" USING COMAREA, FIELDNUM, PART-DES, FIELD-LEN,

DESC-LEN, NEXT-FIELD.

BASIC

250 F1=1

255 C=10

257 I$="GADGET "

260 CALL VPUTFIELD(C(*),F1,I$,C,A,N)

FORTRAN

FLDNUM=1

ICOUNT=10

XITEM="GADGET "

CALL VPUTFIELD(COMAREA,FLDNUM,XITEM,ICOUNT,INUM,FLDNXT)

SPL/PASCAL

INTEGER

FLD'NUM,

COUNT,

ACTUAL'LEN,

NXT'FLD'NUM;

BYTE ARRAY PART'DES(0:9):="GADGET ";

FLD'NUM:=1;

COUNT:=10;

VPUTFIELD(COMAREA,FLD'NUM,PART'DES,COUNT,ACTUAL'LEN,NXT'FLD'NUM);

The calls shown above copy a 10-byte value from an application to ﬁeld number 1 in the

data buffer.