'''''''''''''''''''''''''''' ' Oracle Objects for OLE global constant file. ' This file can be loaded into a code module. '''''''''''''''''''''''''''' 'Editmode property values ' These are intended to match similar constants in the ' Visual Basic file CONSTANT.TXT Global Const ORADATA_EDITNONE = 0 'No edit in progress Global Const ORADATA_EDITMODE = 1 'Edit in progress Global Const ORADATA_EDITADD = 2 'AddNew in progress ' Field Data Types ' These are intended to match similar constants in the ' Visual Basic file DATACONS.TXT Global Const ORADB_BOOLEAN = 1 Global Const ORADB_BYTE = 2 Global Const ORADB_INTEGER = 3 Global Const ORADB_LONG = 4 Global Const ORADB_CURRENCY = 5 Global Const ORADB_SINGLE = 6 Global Const ORADB_DOUBLE = 7 Global Const ORADB_DATE = 8 Global Const ORADB_TEXT = 10 Global Const ORADB_LONGBINARY = 11 Global Const ORADB_MEMO = 12 'Parameter Types Global Const ORAPARM_INPUT = 1 'Input Parameter Global Const ORAPARM_OUTPUT = 2 'Output Parameter Global Const ORAPARM_BOTH = 3 'In/Out Parameter 'Parameter Status Global Const ORAPSTAT_INPUT = &H1& 'Input Global Const ORAPSTAT_OUTPUT = &H2& 'Output Global Const ORAPSTAT_AUTOENABLE = &H4& 'Automatically Enabled Global Const ORAPSTAT_ENABLE = &H8& 'Enabled 'CreateDynaset Method Options Global Const ORADYN_DEFAULT = &H0& Global Const ORADYN_NO_AUTOBIND = &H1& 'Don't automatically bind parameters Global Const ORADYN_NO_BLANKSTRIP = &H2& 'Don't strip trailing spaces Global Const ORADYN_READONLY = &H4& 'Make dynaset read only Global Const ORADYN_NOCACHE = &H8& 'Don't cache data 'OpenDatabase Method Options Global Const ORADB_DEFAULT = &H0& Global Const ORADB_ORAMODE = &H1& 'Let Oracle default column values Global Const ORADB_NOWAIT = &H2& 'Don't wait on resources(locks) 'Parameter Types (ServerType) Global Const ORATYPE_VARCHAR2 = 1 Global Const ORATYPE_NUMBER = 2 Global Const ORATYPE_SINT = 3 Global Const ORATYPE_FLOAT = 4 Global Const ORATYPE_STRING = 5 Global Const ORATYPE_VARCHAR = 9 Global Const ORATYPE_DATE = 12 Global Const ORATYPE_UINT = 68 Global Const ORATYPE_CHAR = 96 Global Const ORATYPE_CHARZ = 97 'OIP errors returned as part of the OLE Automation error. Global Const OERROR_ADVISEULINK = 4096 ' Invalid advisory connection Global Const OERROR_POSITION = 4098 ' Invalid database position Global Const OERROR_NOFIELDNAME = 4099 ' Field 'field-name' not found Global Const OERROR_TRANSIP = 4101 ' Transaction already in process Global Const OERROR_TRANSNIPC = 4104 ' Commit detected with no active transaction Global Const OERROR_TRANSNIPR = 4105 ' Rollback detected with no active transaction Global Const OERROR_NODSET = 4106 ' No such set attached to connection Global Const OERROR_INVROWNUM = 4108 ' Invalid row reference Global Const OERROR_TEMPFILE = 4109 ' Error creating temporary file Global Const OERROR_DUPSESSION = 4110 ' Duplicate session name Global Const OERROR_NOSESSION = 4111 ' Session not found during detach Global Const OERROR_NOOBJECTN = 4112 ' No such object named 'object-name' Global Const OERROR_DUPCONN = 4113 ' Duplicate connection name Global Const OERROR_NOCONN = 4114 ' No such connection during detach Global Const OERROR_BFINDEX = 4115 ' Invalid field index Global Const OERROR_CURNREADY = 4116 ' Cursor not ready for I-O Global Const OERROR_NOUPDATES = 4117 ' Not an updatable set Global Const OERROR_NOTEDITING = 4118 ' Attempt to update without edit or add operation Global Const OERROR_DATACHANGE = 4119 ' Data has been modified Global Const OERROR_NOBUFMEM = 4120 ' No memory for data transfer buffers Global Const OERROR_INVBKMRK = 4121 ' Invalid bookmark Global Const OERROR_BNDVNOEN = 4122 ' Bind variable not fully enabled Global Const OERROR_DUPPARAM = 4123 ' Duplicate parameter name Global Const OERROR_INVARGVAL = 4124 ' Invalid argument value Global Const OERROR_INVFLDTYPE = 4125 ' Invalid field type Global Const OERROR_TRANSFORUP = 4127 ' For Update detected with no active transaction Global Const OERROR_NOTUPFORUP = 4128 ' For Update detected but not updatable set Global Const OERROR_TRANSLOCK = 4129 ' Commit/Rollback with SELECT FOR UPDATE in progress Global Const OERROR_CACHEPARM = 4130 ' Invalid cache parameter Global Const OERROR_FLDRQROWID = 4131 ' Field processing requires ROWID 'Booleans-These are defined as reserved ' words in Visual Basic 'Global Const True = -1 'Global Const False = 0