VERS3270

VERS3270 identifies the software version number of 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:

(delta character)DCSIMFV.uu.ff

(delta character) 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);