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

292 Chapter6
USING VPLUS INTRINSICS
INTRINSIC DESCRIPTIONS
VGETLANG
Returns the native language ID assigned to the forms file. For more information on Native
Language Support, see Section 8.
Syntax
VGETLANG { comrea, langnum }
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 VGETLANG:
cstatus Set to zero.
comarealen Set to total number of two-byte words in comarea .
VGETLANG may set the following
comarea items:
cstatus Set to nonzero value if call is unsuccessful
langnum Two-byte integer variable to which VGETLANG returns the native language
ID assigned to the forms file.
Discussion
The forms file must be opened before calling VGETLANG. Otherwise,
cstatus returns a
nonzero value. The native language ID returned is always the number assigned to the
forms file on the Terminal/Language Menu in FORMSPEC. If the international language
ID (-1) is assigned, which means that VSETLANG may be used to specify the native
language ID when the application executes, the native language ID returned by VGETLANG
will be the number assigned to the forms file (-1),
not the number specified with
VSETLANG.
Example
COBOL
CALL "VGETLANG" USING COMAREA, LANGNUM.
BASIC
120 CALL VGETLANG(C(*),L)
FORTRAN
CALL VGETLANG(COMAREA,LANGNUM)
SPL/PASCAL
VGETLANG(COMAREA,LANGNUM);