HP 3000 Manuals HP 3000 Manuals
VOPENFORMF
Opens forms file for access.
Syntax
VOPENFORMF {comarea,formfile}
Parameters
comarea The comarea name must be unique for each open forms
file. If not already set, the following comarea items
must be set before calling VOPENFORMF:
cstatus Set to zero.
language Set to the code identifying the
programming language of the calling
program.
comarealen Set to total number of two-byte words
in comarea.
usrbuflen BASIC programs only; set to number of
two-byte words needed for comarea
extension.
labeloption Set to zero or one.
formstoresize Set to minus one, zero, or one through
255 to indicate the number of forms
allowed in the form storage directory.
VOPENFORMF sets the following comarea items:
cstatus Set to nonzero value if call
unsuccessful.
lastkey Set to zero.
numerrs Set to zero.
recnum Set to zero.
dbuflen Set to zero.
cmode Set to zero (collect mode).
repeatapp Set to zero (no repeat/append).
freezapp Set to zero (clear current form).
printfilnum Set to zero.
deleteflag Set to FALSE (all zeros) (used for
batch file intrinsics).
cfname Set to blank.
nfname Set to name of head form.
cstatus Set to nonzero value if call
unsuccessful.
filerrnum Set to file error code if MPE file
error.
windowenh Set to enhancement code defined in
forms file.
If the data capture devices are used:
errorlight Set to default or user specified value.
splitmsgpause Set to default or user specified value.
formfile Character string of up to 36 characters (including a
terminator) that identifies the forms file being opened.
Specified name can be any fully qualified MPE file name.
Discussion
VOPENFORMF opens the specified forms file for processing by the calling
application. If the calling application is BASIC, it must provide its
own comarea extension immediately following the comarea and specify the
size of this extension in usrbuflen. If the application is written in a
programming language other than BASIC, a DL area is obtained for use as
the comarea extension. In this case, the application must not use the DL
area for other functions. Refer to Appendix E for more information on
the DL area. The forms file listing gives an estimate of DL to DB area
used. You use this estimate with the MAXDATA parameter at PREP or RUN
time. The labeloption must be set to one if you are using function key
labels.
Example
COBOL
CALL "VOPENFORMF" USING COMAREA, FNAME.
BASIC
100 CALL VOPENFORMF(c(*),F1$)
FORTRAN
CALL VOPENFORMF(COMAREA,FNAME)
SPL/PASCAL
BYTE ARRAY FNAME(0:34);
:
MOVE FNAME:="FORMSA ";
VOPENFORMF(COM1,FNAME);