COLBLK::COLBLK(PCOL col1, PTDB tdbp) { PCOL colp; // Copy the old column block to the new one *this = *col1; Next = NULL; //To_Orig = col1; To_Tdb = tdbp; #ifdef DEBTRACE htrc(" copying COLBLK %s from %p to %p\n", Name, col1, this); #endif if (tdbp) // Attach the new column to the table block if (!tdbp->GetColumns()) tdbp->SetColumns(this); else { for (colp = tdbp->GetColumns(); colp->Next; colp = colp->Next) ; colp->Next = this; } // endelse } // end of COLBLK copy constructor
FNCCOL::FNCCOL(PCOLDEF cdp, PTDB tdbp, PCOL cprec, int i) : COLBLK(cdp, tdbp, i) { if (cprec) { Next = cprec->GetNext(); cprec->SetNext(this); } else { Next = tdbp->GetColumns(); tdbp->SetColumns(this); } // endif cprec Value = NULL; // We'll get a new one later Hval = NULL; // The unconverted header value Xcolp = NULL; } // end of FNCCOL constructor
INICOL::INICOL(PCOLDEF cdp, PTDB tdbp, PCOL cprec, int i, PSZ am) : COLBLK(cdp, tdbp, i) { if (cprec) { Next = cprec->GetNext(); cprec->SetNext(this); } else { Next = tdbp->GetColumns(); tdbp->SetColumns(this); } // endif cprec // Set additional INI access method information for column. Valbuf = NULL; Flag = cdp->GetOffset(); Long = cdp->GetLong(); To_Val = NULL; } // end of INICOL constructor
PRXCOL::PRXCOL(PCOLDEF cdp, PTDB tdbp, PCOL cprec, int i, PSZ am) : COLBLK(cdp, tdbp, i) { if (cprec) { Next = cprec->GetNext(); cprec->SetNext(this); } else { Next = tdbp->GetColumns(); tdbp->SetColumns(this); } // endif cprec // Set additional Dos access method information for column. Long = cdp->GetLong(); // Useful ??? //strcpy(F_Date, cdp->F_Date); Colp = NULL; To_Val = NULL; Pseudo = false; Colnum = cdp->GetOffset(); // If columns are retrieved by number if (trace) htrc(" making new %sCOL C%d %s at %p\n", am, Index, Name, this); } // end of PRXCOL constructor