''''''''''''''''''''''''''''
' 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
Global Const ORADATA_EDITMODE = 1
Global Const ORADATA_EDITADD = 2

'Parameter Types
Global Const ORAPARM_INPUT = 1
Global Const ORAPARM_OUTPUT = 2
Global Const ORAPARM_BOTH = 3

'Parameter Status
Global Const ORAPSTAT_INPUT = &H1&
Global Const ORAPSTAT_OUTPUT = &H2&
Global Const ORAPSTAT_AUTOENABLE = &H4&
Global Const ORAPSTAT_ENABLE = &H8&

'CreateDynaset Method Options
Global Const ORADYN_DEFAULT = &H0&
Global Const ORADYN_NO_AUTOBIND = &H1&
Global Const ORADYN_NO_BLANKSTRIP = &H2&
Global Const ORADYN_READONLY = &H4&
Global Const ORADYN_NOCACHE = &H8&

'OpenDatabase Method Options
Global Const ORADB_DEFAULT = &H0&
Global Const ORADB_ORAMODE = &H1&
Global Const ORADB_NOWAIT = &H2&

'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



