Returns a version number for the API itself. The major version number increases whenever an incompatible change is made in the API. The major number should be checked as part of an initial interaction with ClearQuest® to be certain that the API is compatible with what the caller expects.
Perl
$prodinfo->GetObjectModelVersionMajor();
Perl
use CQPerlExt;
my $cqobject = CQSession::Build();
my $prodinfo = $cqobject->GetProductInfo();
print $prodinfo->GetObjectModelVersionMajor(),"\n";
CQSession::Unbuild($cqobject);