VCPDbCloseDB
int VCPDbClose(void);
# define VCPDbCloseDB() VCPDbCloseDBx(__FILE__, __LINE__)
//ENDH
/*******************************************************************
	closes a database
********************************************************************/
int VCPDbCloseDBx(char *fname, long lnr)
{
	int rc;
	
	if (VCPINTOpenFlag==FALSE){
		VCPDbErrorFlag=VCPINTDBNOTOPEN;
		VCPINTDbErrorDisplay(fname, lnr);
		return(VCPINTDBNOTOPEN);
	}
	rc=DmCloseDatabase (VCPINTDbRef);
	if (rc>0){
		VCPDbErrorFlag=rc;
		VCPINTDbErrorDisplay(fname, lnr);
	}
	VCPINTOpenFlag=FALSE;
	return(rc);
}
