wizards/source/access2base/acConstants.xba

   1 <?xml version="1.0" encoding="UTF-8"?>
   2 <!DOCTYPE script:module PUBLIC "-//OpenOffice.org//DTD OfficeDocument 1.0//EN" "module.dtd">
   3 <script:module xmlns:script="http://openoffice.org/2000/script" script:name="acConstants" script:language="StarBasic">REM =======================================================================================================================
   4 REM ===                                 The Access2Base library is a part of the LibreOffice project.                                                                   ===
   5 REM ===                                 Full documentation is available on http://www.access2base.com                                                                   ===
   6 REM =======================================================================================================================
   7
   8 Option Explicit
   9
  10 REM Access2Base -----------------------------------------------------
  11 Global Const Access2Base_Version = &quot;1.3.0&quot;
  12
  13 REM AcCloseSave
  14 REM -----------------------------------------------------------------
  15 Global Const acSaveNo = 2
  16 Global Const acSavePrompt = 0
  17 Global Const acSaveYes = 1
  18
  19 REM AcFormView
  20 REM -----------------------------------------------------------------
  21 Global Const acDesign = 1
  22 Global Const acNormal = 0
  23 Global Const acPreview = 2
  24
  25 REM AcFormOpenDataMode
  26 REM -----------------------------------------------------------------
  27 Global Const acFormAdd = 0
  28 Global Const acFormEdit = 1
  29 Global Const acFormPropertySettings = -1
  30 Global Const acFormReadOnly = 2
  31
  32 REM acView
  33 REM -----------------------------------------------------------------
  34 Global Const acViewDesign = 1
  35 Global Const acViewNormal = 0
  36 Global Const acViewPreview = 2
  37
  38 REM acOpenDataMode
  39 REM -----------------------------------------------------------------
  40 Global Const acAdd = 0
  41 Global Const acEdit = 1
  42 Global Const acReadOnly = 2
  43
  44 REM AcObjectType
  45 REM -----------------------------------------------------------------
  46 Global Const acDefault = -1
  47 Global Const acDiagram = 8
  48 Global Const acForm = 2
  49 Global Const acQuery = 1
  50 Global Const acReport = 3
  51 Global Const acTable = 0
  52 &apos;                  Unexisting in MS/Access
  53 Global Const acBasicIDE = 101
  54 Global Const acDatabaseWindow = 102
  55 Global Const acDocument = 111
  56 Global Const acWelcome = 112
  57 &apos;                  Subtype if acDocument
  58 Global Const docWriter = &quot;Writer&quot;
  59 Global Const docCalc = &quot;Calc&quot;
  60 Global Const docImpress = &quot;Impress&quot;
  61 Global Const docDraw = &quot;Draw&quot;
  62 Global Const docMath = &quot;Math&quot;
  63
  64 REM AcWindowMode
  65 REM -----------------------------------------------------------------
  66 Global Const acDialog = 3
  67 Global Const acHidden = 1
  68 Global Const acIcon = 2
  69 Global Const acWindowNormal = 0
  70
  71 REM VarType constants
  72 REM -----------------------------------------------------------------
  73 Global Const vbEmpty = 0
  74 Global Const vbNull = 1
  75 Global Const vbInteger = 2
  76 Global Const vbLong = 3
  77 Global Const vbSingle = 4
  78 Global Const vbDouble = 5
  79 Global Const vbCurrency = 6
  80 Global Const vbDate = 7
  81 Global Const vbString = 8
  82 Global Const vbObject = 9
  83 Global Const vbBoolean = 11
  84 Global Const vbVariant = 12
  85 Global Const vbByte = 17
  86 Global Const vbUShort = 18
  87 Global Const vbULong = 19
  88 Global Const vbBigint = 35
  89 Global Const vbDecimal = 37
  90
  91 REM MsgBox constants
  92 REM -----------------------------------------------------------------
  93 Global Const vbOKOnly = 0                       &apos;  OK button only (default)
  94 Global Const vbOKCancel = 1             &apos;  OK and Cancel buttons
  95 Global Const vbAbortRetryIgnore = 2 &apos;      Abort, Retry, and Ignore buttons
  96 Global Const vbYesNoCancel = 3          &apos;  Yes, No, and Cancel buttons
  97 Global Const vbYesNo = 4                        &apos;  Yes and No buttons
  98 Global Const vbRetryCancel = 5          &apos;  Retry and Cancel buttons
  99 Global Const vbCritical = 16            &apos;  Critical message
 100 Global Const vbQuestion = 32            &apos;  Warning query
 101 Global Const vbExclamation = 48         &apos;  Warning message
 102 Global Const vbInformation = 64         &apos;  Information message
 103 Global Const vbDefaultButton1 = 128     &apos;  First button is default (default) (VBA: 0)
 104 Global Const vbDefaultButton2 = 256 &apos;      Second button is default
 105 Global Const vbDefaultButton3 = 512 &apos;      Third button is default
 106 Global Const vbApplicationModal = 0 &apos;      Application modal message box (default)
 107 REM MsgBox Return Values
 108 REM -----------------------------------------------------------------
 109 Global Const vbOK = 1                           &apos;  OK button pressed
 110 Global Const vbCancel = 2                       &apos;  Cancel button pressed
 111 Global Const vbAbort = 3                        &apos;  Abort button pressed
 112 Global Const vbRetry = 4                        &apos;  Retry button pressed
 113 Global Const vbIgnore = 5                       &apos;  Ignore button pressed
 114 Global Const vbYes = 6                          &apos;  Yes button pressed
 115 Global Const vbNo = 7                           &apos;  No button pressed
 116
 117 REM Dialogs Return Values
 118 REM ------------------------------------------------------------------
 119 Global Const dlgOK = 1                          &apos;  OK button pressed
 120 Global Const dlgCancel = 0                      &apos;  Cancel button pressed
 121
 122 REM Control Types
 123 REM -----------------------------------------------------------------
 124 Global Const acCheckBox = 5
 125 Global Const acComboBox = 7
 126 Global Const acCommandButton = 2        :       Global Const acToggleButton = 122
 127 Global Const acCurrencyField = 18
 128 Global Const acDateField = 15
 129 Global Const acFileControl = 12
 130 Global Const acFixedLine = 24                   &apos;  FREE ENTRY (USEFUL IN DIALOGS)
 131 Global Const acFixedText = 10           :       Global Const acLabel = 10
 132 Global Const acFormattedField = 1               &apos;  FREE ENTRY TAKEN TO NOT CONFUSE WITH acTextField
 133 Global Const acGridControl = 11
 134 Global Const acGroupBox = 8                     :       Global Const acOptionGroup = 8
 135 Global Const acHiddenControl = 13
 136 Global Const acImageButton = 4
 137 Global Const acImageControl = 14        :       Global Const acImage = 14
 138 Global Const acListBox = 6
 139 Global Const acNavigationBar = 22
 140 Global Const acNumericField = 17
 141 Global Const acPatternField = 19
 142 Global Const acProgressBar = 23                 &apos;  FREE ENTRY (USEFUL IN DIALOGS)
 143 Global Const acRadioButton = 3          :       Global Const acOptionButton = 3
 144 Global Const acScrollBar = 20
 145 Global Const acSpinButton = 21
 146 Global Const acSubform = 112
 147 Global Const acTextField = 9            :       Global Const acTextBox = 9
 148 Global Const acTimeField = 16
 149
 150 REM Record
 151 REM -----------------------------------------------------------------
 152 Global Const acFirst = 2
 153 Global Const acGoTo = 4
 154 Global Const acLast = 3
 155 Global Const acNewRec = 5
 156 Global Const acNext = 1
 157 Global Const acPrevious = 0
 158
 159 REM FindRecord
 160 REM -----------------------------------------------------------------
 161 Global Const acAnywhere = 0
 162 Global Const acEntire = 1
 163 Global Const acStart = 2
 164 Global Const acDown = 1
 165 Global Const acSearchAll = 2
 166 Global Const acUp = 0
 167 Global Const acAll = 0
 168 Global Const acCurrent = -1
 169
 170 REM AcDataObjectType
 171 REM -----------------------------------------------------------------
 172 Global Const acActiveDataObject = -1
 173 Global Const acDataForm = 2
 174 Global Const acDataQuery = 1
 175 Global Const acDataServerView = 7
 176 Global Const acDataStoredProcedure = 9
 177 Global Const acDataTable = 0
 178
 179 REM AcRecord
 180 REM -----------------------------------------------------------------
 181 Global Const acFirst = 2
 182 Global Const acGoTo = 4
 183 Global Const acLast = 3
 184 Global Const acNewRec = 5
 185 Global Const acNext = 1
 186 Global Const acPrevious = 0
 187
 188 REM AcQuitOption
 189 REM -----------------------------------------------------------------
 190 Global Const acQuitPrompt = 0
 191 Global Const acQuitSaveAll = 1
 192 Global Const acQuitSaveNone = 2
 193
 194 REM AcCommand
 195 REM -----------------------------------------------------------------
 196 Global Const acCmdAboutMicrosoftAccess = 35
 197 Global Const acCmdAboutOpenOffice = 35
 198 Global Const acCmdAboutLibreOffice = 35
 199 Global Const acCmdVisualBasicEditor = 525
 200 Global Const acCmdBringToFront = 52
 201 Global Const acCmdClose = 58
 202 Global Const acCmdToolbarsCustomize = 165
 203 Global Const acCmdChangeToCommandButton = 501
 204 Global Const acCmdChangeToCheckBox = 231
 205 Global Const acCmdChangeToComboBox = 230
 206 Global Const acCmdChangeToTextBox = 227
 207 Global Const acCmdChangeToLabel = 228
 208 Global Const acCmdChangeToImage = 234
 209 Global Const acCmdChangeToListBox = 229
 210 Global Const acCmdChangeToOptionButton = 233
 211 Global Const acCmdCopy = 190
 212 Global Const acCmdCut = 189
 213 Global Const acCmdCreateRelationship = 150
 214 Global Const acCmdDelete = 337
 215 Global Const acCmdDatabaseProperties = 256
 216 Global Const acCmdSQLView = 184
 217 Global Const acCmdRemove = 366
 218 Global Const acCmdDesignView = 183
 219 Global Const acCmdFormView = 281
 220 Global Const acCmdNewObjectForm = 136
 221 Global Const acCmdNewObjectTable = 134
 222 Global Const acCmdNewObjectView = 350
 223 Global Const acCmdOpenDatabase = 25
 224 Global Const acCmdRemove = 366
 225 Global Const acCmdDesignView = 183
 226 Global Const acCmdNewObjectQuery = 135
 227 Global Const acCmdShowAllRelationships = 149
 228 Global Const acCmdRemove = 366
 229 Global Const acCmdDesignView = 183
 230 Global Const acCmdNewObjectReport = 137
 231 Global Const acCmdSelectAll = 333
 232 Global Const acCmdRemoveTable = 84
 233 Global Const acCmdDesignView = 183
 234 Global Const acCmdOpenTable = 221
 235 Global Const acCmdRename = 143
 236 Global Const acCmdDelete = 337
 237 Global Const acCmdDeleteRecord = 223
 238 Global Const acCmdApplyFilterSort = 93
 239 Global Const acCmdSnapToGrid = 62
 240 Global Const acCmdViewGrid = 63
 241 Global Const acCmdInsertHyperlink = 259
 242 Global Const acCmdMaximumRecords = 508
 243 Global Const acCmdObjectBrowser = 200
 244 Global Const acCmdPaste = 191
 245 Global Const acCmdPasteSpecial = 64
 246 Global Const acCmdPrint = 340
 247 Global Const acCmdPrintPreview = 54
 248 Global Const acCmdSaveRecord = 97
 249 Global Const acCmdFind = 30
 250 Global Const acCmdUndo = 292
 251 Global Const acCmdRefresh = 18
 252 Global Const acCmdRemoveFilterSort = 144
 253 Global Const acCmdRunMacro = 31
 254 Global Const acCmdSave = 20
 255 Global Const acCmdSaveAs = 21
 256 Global Const acCmdFind = 30
 257 Global Const acCmdSelectAll = 333
 258 Global Const acCmdSelectAllRecords = 109
 259 Global Const acCmdSendToBack = 53
 260 Global Const acCmdSortDescending = 164
 261 Global Const acCmdSortAscending = 163
 262 Global Const acCmdTabOrder = 41
 263 Global Const acCmdDatasheetView = 282
 264 Global Const acCmdZoomSelection = 371
 265
 266 REM AcSendObjectType
 267 REM -----------------------------------------------------------------
 268 Global Const acSendForm = 2
 269 Global Const acSendNoObject = -1
 270 Global Const acSendQuery = 1
 271 Global Const acSendReport = 3
 272 Global Const acSendTable = 0
 273
 274 REM AcOutputObjectType
 275 REM -----------------------------------------------------------------
 276 Global Const acOutputForm = 2
 277
 278 REM AcFormat
 279 REM -----------------------------------------------------------------
 280 Global Const acFormatPDF = &quot;writer_pdf_Export&quot;
 281 Global Const acFormatODT = &quot;writer8&quot;
 282 Global Const acFormatDOC = &quot;MS Word 97&quot;
 283 Global Const acFormatHTML = &quot;HTML&quot;
 284
 285 REM AcSysCmdAction
 286 REM -----------------------------------------------------------------
 287 Global Const acSysCmdAccessDir = 9
 288 Global Const acSysCmdAccessVer = 7
 289 Global Const acSysCmdClearHelpTopic = 11
 290 Global Const acSysCmdClearStatus = 5
 291 Global Const acSysCmdGetObjectState = 10
 292 Global Const acSysCmdGetWorkgroupFile = 13
 293 Global Const acSysCmdIniFile = 8
 294 Global Const acSysCmdInitMeter = 1
 295 Global Const acSysCmdProfile = 12
 296 Global Const acSysCmdRemoveMeter = 3
 297 Global Const acSysCmdRuntime = 6
 298 Global Const acSysCmdSetStatus = 4
 299 Global Const acSysCmdUpdateMeter = 2
 300
 301 REM Type property
 302 REM -----------------------------------------------------------------
 303 Global Const dbBigInt = 16
 304 Global Const dbBinary = 9
 305 Global Const dbBoolean = 1
 306 Global Const dbByte = 2
 307 Global Const dbChar = 18
 308 Global Const dbCurrency = 5
 309 Global Const dbDate = 8
 310 Global Const dbDecimal = 20
 311 Global Const dbDouble = 7
 312 Global Const dbFloat = 21
 313 Global Const dbGUID = 15
 314 Global Const dbInteger = 3
 315 Global Const dbLong = 4
 316 Global Const dbLongBinary = 11  &apos;  (OLE Object)
 317 Global Const dbMemo= 12
 318 Global Const dbNumeric = 19
 319 Global Const dbSingle = 6
 320 Global Const dbText = 10
 321 Global Const dbTime = 22
 322 Global Const dbTimeStamp = 23
 323 Global Const dbVarBinary = 17
 324 Global Const dbUndefined = -1
 325
 326 REM Attributes property
 327 REM -----------------------------------------------------------------
 328 Global Const dbAutoIncrField = 16
 329 Global Const dbDescending = 1
 330 Global Const dbFixedField = 1
 331 Global Const dbHyperlinkField = 32768
 332 Global Const dbSystemField = 8192
 333 Global Const dbUpdatableField = 32
 334 Global Const dbVariableField = 2
 335
 336 REM OpenRecordset
 337 REM -----------------------------------------------------------------
 338 Global Const dbOpenForwardOnly = 8
 339 Global Const dbSQLPassThrough = 64
 340 Global Const dbReadOnly = 4
 341
 342 REM Query types
 343 REM -----------------------------------------------------------------
 344 Global Const dbQAction = 240
 345 Global Const dbQAppend = 64
 346 Global Const dbQDDL = 4 &apos;96
 347 Global Const dbQDelete = 32
 348 Global Const dbQMakeTable = 128 &apos;80
 349 Global Const dbQSelect = 0
 350 Global Const dbQSetOperation = 8        &apos;128
 351 Global Const dbQSQLPassThrough = 1      &apos;112
 352 Global Const dbQUpdate = 16     &apos;48
 353
 354 REM Edit mode
 355 REM -----------------------------------------------------------------
 356 Global Const dbEditNone = 0
 357 Global Const dbEditInProgress = 1
 358 Global Const dbEditAdd = 2
 359
 360 REM Toolbars
 361 REM -----------------------------------------------------------------
 362 Global Const msoBarTypeNormal = 0               &apos;  Usual toolbar
 363 Global Const msoBarTypeMenuBar = 1              &apos;  Menu bar
 364 Global Const msoBarTypePopup = 2                &apos;  Shortcut menu
 365 Global Const msoBarTypeStatusBar = 11   &apos;  Status bar
 366 Global Const msoBarTypeFloater = 12             &apos;  Floating window
 367
 368 Global Const msoControlButton = 1               &apos;  Command button
 369 Global Const msoControlPopup = 10               &apos;  Popup, submenu
 370
 371 </script:module>