GetMajorVersion

Description

Returns the major version for the current PocketBuilder execution context. For example, at maintenance level 1.5.2 the major version is 1.

Applies to

ContextInformation objects

Syntax

servicereference.GetMajorVersion ( majorversion )

Argument

Description

servicereference

Reference to the ContextInformation service instance.

majorversion

Integer into which the function places the major version. This argument is passed by reference.

Returns

Integer. Returns 1 if the function succeeds and -1 if an error occurs.

Usage

Call this function to determine the current major version.

Examples

Example 1

This example calls the GetMajorVersion function:

String ls_name

Constant String ls_currver = "8.0.3"

Integer li_majver, li_minver, li_fixver

ContextInformation ci


this.GetContextService ("ContextInformation", ci)


GetMajorVersion(li_majver)

ci.GetMinorVersion(li_minver)

ci.GetFixesVersion(li_fixver)

IF li_majver <> 8 THEN

   MessageBox("Error", &

      "Must be at Version " + ls_currver)

ELSEIF li_minver <> 0 THEN

   MessageBox("Error", &

      "Must be at Version " + ls_currver)

ELSEIF li_fixver <> 3 THEN

   MessageBox("Error", &

      "Must be at Version " + ls_currver)

END IF

See also