HP 3000 Manuals HP 3000 Manuals
VERS3270
VERS3270
identifies the software version numberof SNA IMF that is running on the
HP 3000.
Syntax
_____________________________________
| |
| CA |
| VERS3270 (version) |
_____________________________________
Parameters
version (output)
14-character array identifying the SNA IMF version number. The format is
as follows:
_DCSIMFV.uu.ff
_is a space.
V is a letter that indicates the version.
uu is a number that indicates the update level.
ff is a number that indicates the fix level.
Description
The VERS3270 intrinsic returns the version number of the SNA IMF
intrinsics. Although intrinsics are shared by both IMF/3000 and SNA IMF,
internal checks ensure that the correct version of the product is used.
COBOL Calling Sequence
CALL "CVERS3270" USING VERSION. (on MPE V and in compatibility mode on
MPE XL)
CALL INTRINSIC "VERS3270" USING VERSION. (in native mode on MPE XL)
VERSION is an alphanumeric data item.
FORTRAN Calling Sequence
CALL VERS3270 (VERSION)
VERSION is a character array.
BASIC Calling Sequence
CALL BVERS3270 (V$) (on MPE V and in compatibility mode on MPE XL)
CALL VERS3270 (V$) (in native mode on MPE XL)
V$ is a string variable.
SPL Calling Sequence
VERS3270 (VERSION)
VERSION is a byte array.
Pascal Calling Sequence
VERS3270 (VERSION);
VERSION is a packed array of char.
C/XL Calling Sequence
VERS3270 (VERSION);
VERSION is an array of characters (a pointer to a char).
Pascal Program Excerpts
Following are excerpts from a Pascal program that calls SNA IMF
intrinsics. For examples of complete Pascal programs in non-transparent
and transparent modes, see appendix F, "Sample Programs."
{************************** Global Declarations **************************}
procedure VERS3270; intrinsic;
.
.
.
{************************** Local Declarations **************************}
var
version : packed array[1..14] of char;
.
.
.
{************** Variable Initialization and Intrinsic Call **************}
version := ' ';
VERS3270 (version);