FldSubTypeMap: array[TFieldType] of Word = ( 0, 0, 0, 0, 0, 0, 0, fldstMONEY, 0, 0, 0, 0, 0, 0, fldstAUTOINC, fldstBINARY, fldstMEMO, fldstGRAPHIC, fldstFMTMEMO, fldstOLEOBJ, fldstDBSOLEOBJ, fldstTYPEDBINARY, 0, fldstFIXED, 0, 0, 0, 0, 0, 0, fldstHBINARY, fldstHMEMO, 0, 0, 0, fldstGUID, fldDATETIME, 0, fldstFIXED, fldstWIDEMEMO, fldstORATIMESTAMP, fldstORAINTERVAL);

array[TFieldType] of Word FldSubTypeMap = ( 0, 0, 0, 0, 0, 0, 0, fldstMONEY, 0, 0, 0, 0, 0, 0, fldstAUTOINC, fldstBINARY, fldstMEMO, fldstGRAPHIC, fldstFMTMEMO, fldstOLEOBJ, fldstDBSOLEOBJ, fldstTYPEDBINARY, 0, fldstFIXED, 0, 0, 0, 0, 0, 0, fldstHBINARY, fldstHMEMO, 0, 0, 0, fldstGUID, fldDATETIME, 0, fldstFIXED, fldstWIDEMEMO, fldstORATIMESTAMP, fldstORAINTERVAL);