2.3: TQVERS

TOCGroup 1TQCPRTTQLITEGroup 2A-ZGroup 1

GET-VERSION-NUMBER

Use TQVERS to get the version number of ChemApp

Added for ChemApp version 1.1.3

Synopsis

FORTRAN: CALL TQVERS(NVERS,NOERR)

C: tqvers(&nvers,&noerr);

Pascal: tqvers(nvers,noerr);

Basic: Call tqvers(nvers,noerr)


Name Type Value set on call or returned
NVERS INTEGER Returns the version number of ChemApp
NOERR INTEGER Returns an error number

NVERS is returned as an integer value, e.g. 213 for version 2.1.3 of ChemApp.

Examples

FORTRAN:View plain source code



C Display the version number of ChemApp PROGRAM CAF3 IMPLICIT NONE
INTEGER NOERR, NVERS
C Initialise ChemApp CALL TQINI(NOERR)
C Get version number of ChemApp CALL TQVERS(NVERS,NOERR)
WRITE(UNIT=*,FMT='(A,I4)') 'This program has been compiled '// * 'with ChemApp version ', NVERS

Output:
This program has been compiled with ChemApp version  502

END

C:View plain source code




/* Program cac3 */ /* Display the version number of ChemApp */
#include "cacint.h"
int main() { LI noerr, version;
/* Initialise ChemApp */ tqini(&noerr);
/* Get version number of ChemApp*/ tqvers(&version,&noerr);
printf("This program has been compiled " "with ChemApp version %li\n", version);

Output:
This program has been compiled with ChemApp version 502

return 0;
}


ChemApp Programmer's Manual, Edition 3.6© GTT-Technologies, 2003