VCPDbGetRec
int VCPDbGetRec(int idx, char *dat);
# define VCPDbGetRec(a, b) VCPDbGetRecx(a, b, __FILE__, __LINE__)
//ENDH
/*******************************************
 
    gets a record

    returns an error or 0 if O.K.

********************************************/
int VCPDbGetRecx(int idx, char *dat, char *fname, long lnr)
{
	VoidHand hnd;

	if (VCPINTOpenFlag==FALSE){
		VCPDbErrorFlag=VCPINTDBNOTOPEN;
		VCPINTDbErrorDisplay(fname, lnr);
		return(VCPINTDBNOTOPEN);
	}

	hnd=DmQueryRecord(VCPINTDbRef, idx);
	if (hnd==0){
		VCPDbErrorFlag=VCPINTRECNOTFOUND;
		VCPINTDbErrorDisplay(fname, lnr);
		return(VCPINTRECNOTFOUND);
	}

	StrCopy(dat, MemHandleLock(hnd));

	MemHandleUnlock(hnd);
	return(0);
}