HP 3000 Manuals HP 3000 Manuals
GLOBALPAK
Provides the mechanism for information exchange among Hi-Li intrinsics.
Parameter Descriptions
expectedvuf An eight-byte character array that indicates
the revision level of the intrinsics expected
by the application. It should be in the format
v.uu.ff, and may contain the value A.00.00.
callprotocol A four-byte integer that indicates how the data
passed to the intrinsic is addressed. An
identifier specific to the programming language
used is assigned:
100 = BASIC/V
110 = HP Business BASIC/V
000 = COBOL II/V
200 = FORTRAN 66/V
210 = HP FORTRAN 77/V
500 = Pascal/V
300 = SPL/V
600 = Transact/V
comarealen A four-byte integer that indicates the size in
bytes of the communications area allocated by
the application.
comarea An array that represents the area reserved by
the application for communications between the
intrinsics. A minimum of 300 bytes must be
allocated for the comarea, and this area MUST
be initialized to binary zeros before the first
intrinsic call.
Discussion
The globalpak parameter allows the Hi-Li intrinsics to communicate with
one another. Your application should initialize globalpak ONCE before
the first Hi-Li call; globalpak must remain untouched by the application
thereafter.
The comarea must contain a minimum of 300 bytes. It should be
initialized to binary zeros once, after which it must not be used by your
application; Hi-Li handles the comarea for you.
The callprotocol parameter tells Hi-Li the particular programming
language you are using. Once set, Hi-Li expects all calls to be in that
language's format.
The expectedvuf parameter tells Hi-Li what version of its software you
are using. You can initialize this parameter to A.00.00 for this release
of Hi-Li unless you want to use the dontenableinput option of the
HPDPROMPT promptpak parameter. If you want to use dontenableinput, set
this parameter to a value equal to or greater than A.00.10. Once set,
this parameter should not be changed. As future enhancements to Hi-Li
occur, you will use this parameter to pass the version code for the
version containing the features you decide to use.
For information about the dontenableinput option of the promptpak
parameter, see HPDPROMPT in this chapter.
Examples
COBOL:
01 globalpak.
05 expectedvuf pic x(8).
05 callprotocol pics9(8) comp.
05 comarealen pic s9(8) comp.
05 comarea pic x(300).
FORTRAN:
CHARACTER*8 EXPECTEDVUF
INTEGER*4 CALLPROTOCOL
INTEGER*4 COMAREALEN
EQUIVALENCE (GLOBALPAK(1), EXPECTEDVUF),
+ (GLOBALPAK(3), CALLPROTOCOL),
+ (GLOBALPAK(4), COMAREALEN),
+ (GLOBALPAK(5), COMAREA)
Pascal:
type
comarea_type = array [1..75] of integer;
globalpak_rec = record
expectedvuf : packed array [1..8] of char;
callprotocol : integer;
comarealen : integer;
comarea : comarea_type;
var
globalpak : globalpak_rec;