HP 3000 Manuals

HP Data Entry and Forms Management System (VPLUS/V)

VGETLANG 

Returns the native language ID assigned to the forms file.  For more
information on Native Language Support, see Section 8.

Syntax 

             VGETLANG {comarea, 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);

MPE/iX 5.0 Documentation