HP 3000 Manuals HP 3000 Manuals
VLOADFORMS
Loads specified forms into terminal local form storage memory.
Syntax
VLOADFORMS {comarea,numofforms,formsloaded,forms}
Parameters
comarea Must be comarea name specified when the forms file was
opened with VOPENFORMF. If not already set, the
following comarea items must be set before calling
VLOADFORMS:
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.
VLOADFORMS sets the following items in comarea:
cstatus Set to nonzero value if call
unsuccessful.
numofforms Two-byte integer value, between 1 and 255, inclusive,
indicating the number of forms to be loaded.
formsloaded Two-byte integer value indicating the number of forms
that were successfully loaded.
forms The names of the forms to be loaded. Each name can be
up to 15 characters and is stored in a 16-byte character
array with a one byte filler that is not part of the
name.
Discussion
This intrinsic is used on terminals having local form storage.
VLOADFORMS loads the forms named in forms into terminal local form
storage memory in the order they are specified. It may not be possible
to load all the forms named because of a limit of available space in
local form storage or in the form storage directory (set with
formstoresize prior to VOPENTERM and VOPENFORMF). When there is no more
space, any other forms named in forms are ignored. The value returned in
the formsloaded parameter is:
formsadded + formsalreadypresent
where formsadded is the number of forms specified in the forms parameter
that were actually loaded into the local storage of the terminal and
formsalreadypresent is the number of forms specified in the forms
parameter that were confirmed to already exist in the local storage.
Because forms are loaded by form name, family relationships are ignored.
Multiple family members can be loaded at the same time.
Note that the terminal keyboard may be locked briefly while VLOADFORMS
verifies whether or not a form was loaded. In case keys are pressed
during this time, the terminal beeps to indicate that the keystrokes
and/or entered data are lost. You can avoid this by not calling
VLOADFORMS between calls to VSHOWFORM and VREADFIELDS. Refer to the
discussion on "Local Forms Storage" earlier in this section.
Example
COBOL
77 NUM-OF-FORMS PIC S9(4)COMP.
77 FORMS-LOADED PIC S9(4)COMP.
77 FORMS PIC X(16).
:
MOVE 1 TO NUM-OF-FORMS
MOVE "FORMA "TO FORMS.
CALL "VLOADFORMS" USING COMAREA, NUM-OF-FORMS, FORMS-LOADED, FORMS.
BASIC
10 INTEGER N,F
15 DIM F$[16]
20 N=1
30 F$="FORMA "
40 CALL VLOADFORMS(C[*],N,F,F$)
FORTRAN
INTEGER*2 NFORM,FLOAD
CHARACTER*16 FORMS
NFORM=1
FORMS="FORMA "
CALL VLOADFORMS(COMAREA,NFORM,FLOAD,FORMS)
SPL/PASCAL
INTEGER
NUM'OF'FORMS,
FORMS'LOADED;
BYTE ARRAY
FORMS(0:15);
:
NUM'OF'FORMS:=1;
MOVE FORMS:="FORMA ";
VLOADFORMS(COMAREA,NUM'OF'FORMS,FORMS'LOADED,FORMS);