'encoding UTF-8 Do not remove or change this line! '************************************************************************* ' ' Licensed to the Apache Software Foundation (ASF) under one ' or more contributor license agreements. See the NOTICE file ' distributed with this work for additional information ' regarding copyright ownership. The ASF licenses this file ' to you under the Apache License, Version 2.0 (the ' "License"); you may not use this file except in compliance ' with the License. You may obtain a copy of the License at ' ' http://www.apache.org/licenses/LICENSE-2.0 ' ' Unless required by applicable law or agreed to in writing, ' software distributed under the License is distributed on an ' "AS IS" BASIS, WITHOUT WARRANTIES OR CONDITIONS OF ANY ' KIND, either express or implied. See the License for the ' specific language governing permissions and limitations ' under the License. ' '************************************************************************* '* '* short description : all global variables '* '************************************************************************ '* ' #1 OnlyForDocuGVariables '* '\*********************************************************************** '/// * System for the installed Office Global gPlatform as String '///+ gPlatform => Operatingsystem (internal shortkey) Global gSYSName as String '///+ gSYSName => Name of Operatingsystems Global gSystemPath as String '///+ gSystemPath => Systempath Global gPathSigne as String '///+ gPathSigne => Pathsigne for the Operationsystem Global gPlatGroup as String '///+ gPlatGroup => the systemgroup for the OS (e.g. 'unx' 'w95' etc.) Global iSystemSprache as Integer '///+ iSystemSprache => code for the systemlanguage (01 = en_us, 40 = de_de) Global gSVersionIni as String '///+ gSVersionIni => path to sversion.ini '/// * System for the Testtool Global gtSYSName as String '///+ gtSYSName => Name of Testtool-Operationsystem Global gtPlatform as String '///+ gtPlatform => Operatingsystem (internal shortkey) Global gtSystemPath as String '///+ gtSystemPath => Users Home directory Global gtCommonSystemPath as String '///+ gtCommonSystemPath => Global directory AllUser or /etc Global gTesttoolIni as String '///+ gTesttoolIni => Path to Testtool.ini Global gtHidLstPath as String '///+ gtHidLstPath => Path to hid.lst Global gTTProfileName as string '///+ gTTProfileName => The current used Profile '/// * Settings for Crashreporter Global gUseProxy '///+ Value of [Crashreporter] 'UseProxy' from the testtool control file: Is TRUE or FALSE Global gProxyServer '///+ Value of [Crashreporter] 'ProxyServer' from the testtool control file: string Global gProxyPort '///+ Value of [Crashreporter] 'ProxyPort' from the testtool control file: string Global gReturnAddress '///+ Value of [Crashreporter] 'ReturnAddress' from the testtool control file: string Global gAllowContact '///+ Value of [Crashreporter] 'AllowContact' from the testtool control file: Is TRUE or FALSE Global gConnectionType '///+ Value is depending on gUseProxy: TRUE = MANUALPROXY, FALSE = DIRECT '/// * path - variables Global gOfficePath as String '///+ gOfficePath => included the path of the Office-installation Global gOfficeBasisPath as String '///+ gOfficeBasisPath => included the path of the Office-basis-installation Global gRemotePath as String '///+ gRemotePath => Base Directory on Remote system Global gTesttoolPath as String '///+ gTesttoolPath => included the path of the Testtool-directory (changed with ConvertPath) Global oTesttoolPath as String '///+ oTesttoolPath => original Testtool-directory Global sAppExe as String '///+ sAppExe => included the whole path to 'soffice.exe' or 'soffice' Global sFactory as String '///+ sFactory => Which application module should be used swriter, scalc, ... Global sAppParameter as String '///+ sAppParameter => included all parameters for the executable Global sCapturePath as String ' path for graphic-snapshots Global gPrivateEnvironmentLocation as string '///+ gPrivateEnvironmentLocation: Location for test environment special data and files '/// * Officevariables Global iSprache as Integer '///+ iSprache => code for the office-language (01=en_us, 49=de_de etc.) Global bAsianLan as Boolean '///+ bAsianLan => if the office-language is an asian language (81, 82, 86, 88) => TRUE Global bCTLLan as Boolean '///+ bCTLLan => if the office-language is an CTL language (66, 91, 96, 97) => TRUE Global gLanguage as String '///+ gLanguage => the languagename for office language Global gISOLang as String '///+ gISOLang => the language code ISO 639 (and ISO 3166 for en language) Global gAsianSup as Boolean '///+ gAsianSup => if asian support is activated in options Global gCTLSup as Boolean '///+ gCTLSup => if CTL support is activated in options Global gAccessibility as Boolean '///+ gAccessibility => If an accessibility tool is detected (gnome, JAWS) Global gProductName as string '///+ gProductName => Name of the product (StarOffice, OpenOffice.org, ...) Global gMacroSecurityLevel as integer'///+ gMacroSecurityLevel => Macro Security Level (0: Low ... 3: Very High) Global gOfficeVersion as string '///+ gOfficeVersion => The version number of the office like 3.1, 9.0 ... Global gAutoUpdate as boolean '///+ gAutoUpdate => if office is able to request update streams '/// - global OLE-objectnames global gOLEWriter as String '///+ gOLEWriter => OLE-object-name for Writer global gOLECalc as String '///+ gOLECalc => OLE-object-name for Calc global gOLEImpress as String '///+ gOLEImpress => OLE-object-name for Impress global gOLEDraw as String '///+ gOLEDraw => OLE-object-name for Draw global gOLEChart as String '///+ gOLEChart => OLE-object-name for Chart global gOLEMath as String '///+ gOLEMath => OLE-object-name for Math global gOLEOthers as String '///+ gOLEOthers => OLE-object-name for the others-entry '/// * variables, for the applications Global gApplication as String '///+ gApplication => included the tested application (DRAW, WRITER etc.) Global gNoNewDoc as Boolean ' old '/// * other variables Global gClient as Boolean '///+ gClient => TRUE : Client will be tested; FALSE : files will be saved/loaded on clientside Global gClientLaden as Boolean '///+ gClientLaden => TRUE = files will be saved/loaded on serverside (only for UNIX-systems) ; FALSE : files will be saved/loaded on clientside Global gClientUser as String '///+ gClientUser => Username of Client-User Global gClientUserPWD as String '///+ gClientUserPWD => password of Client-User Global gsClient as String '///+ gsClient => path to the sclient.exe Global gClientAufUNIX as String ' old Global sServerIni as String ' old Global gNetzInst as Boolean '///+ gNetz => TRUE : Netinstallation will be tested; FALSE : normal full-version will be tested Global gNetzOfficePath as String '///+ gNetzOfficePath => path to the Network-Installation Global gSamePC as Boolean '///+ gSamePC => TRUE : StarOffice and Testtool run on same mashine Global gPort as String ' Portnumber for communication between Testtool and Office Global gHost as String '///+ gHost => for remote-test : Hostname for Office-OS Global gPCName as String '///+ gPCname => name for the mashine, where Testtool runs '/// * Global gDasNicht '///+ gDasNicht => 0 the translation-mechanism will be activated Global gbSnapShot as Boolean '///+ gbSnapShot => true Dialogtest-routines create screenshots Global gVersionsnummer as String '///+ gVersionsnummer => full version number (major + minor + buildID) Global gMajor as string '///+ gMajor: only something like 'src680' Global gMinor as string '///+ gMinor: only something like 'm37' Global gBuild as integer '///+ gBuild: only something like 4711 Global gUser as String '///+ gUser => User-LoginName (e.g. 'tz') Global gInputbox as Boolean ' old Global sSchedule as String ' old Global bDebugVersion as Boolean '///+ bDebugVersion => TRUE : Debugversion; FALSE : normal Producktversion of Office Global gCWS as Boolean '///+ gCWS = TRUE if a Child WorkSpace (CWS) has been detected. Global gStatusDatabase as Boolean '/// gStatusDatabase = TRUE if the testscripts are running on a TT-Framework-server. Global gLocalStatusDatabase as string '/// <> "" set to a local path string, to work with a local status database Global gStatusFeatureLevel as Integer '///+ gStatusFeatureLevel : Controled from privateenvironment.inc Global gUseSysDlg '///+ gUseSysDlg => FALSE : use internal file-dialogs of StarOffice; => TRUE : use system-file-dialogs Global gOOO as boolean '///+ gOOO => if an OpenOffice.org-version is tested, this variable is TRUE Global gOOoShutdownTimeOut as integer'///+ gOOoShutdownTimeOut => max. time to wait in seconds, after quiting OOo Global gOOoStartupTimeOut as integer'///+ gOOoStartupTimeOut => max. time to wait in seconds, for starting OOo Global gStartTheOffice as boolean '///+ gStartTheOffice => indicates an alternative startroutine is run '///* variables only for creating the status-pages Global gTestDate as String '///+ gTestDate : fix date of startup Global gTestTime as String '///+ gTestTime : fix time of startup Global gTestName as String '///+ gTestName : name of the test (must be set as parameter in hStatusIn()) Global gTestAppArea as String '///+ gTestAppArea : name of the testarea (e.g. writer, calc etc.) - (must be set as parameter in hStatusIn()) Global gErrorSum as Integer '///+ gErrorSum : last value of errors in a test Global gWarningSum as Integer '///+ gWarningSum : last value of warnings in a test Global gQaErrorSum as Integer '///+ gQaErrorSum : last value of qaErrors in a test Global gAssertionSum as Integer '///+ gAssertionSum : last value of Assertions in a test Global gStatusDuration '///+ gStatusDuration : starting time to get at the end the duration of a test Global gTestcaseStart as Date '///+ gTestCaseDuration : starting time of the testcase Global glsStatusPage (32000) as String '///+ glsStatusPage () : list for the output in the status-page Global gTestDescr as String '///+ short descrition for the test Global gTestFileName as String ' only a dummy variable, until GH give me a new method in testtool Global gDatabasePath as string '///+ top directory, of location for wget and result database files '///* Private environment values; values get set in qa/qatesttool/global/private/inc/privateenvironment.inc Global privateDatabaseServerName as string Global privateDatabaseServerIP as string Global privateProxyServer as string Global privateProxyPort as integer Global privateDatabasePath as string Global privateDatabaseServerPath as string '///* Macro Security Settings - Symbolic names for security levels (constants) Global Const GC_MACRO_SECURITY_LEVEL_LOW = 0 '///+ GC_MACRO_SECURITY_LEVEL_LOW: Symbolic name for low macro security Global Const GC_MACRO_SECURITY_LEVEL_MEDIUM = 1 '///+ GC_MACRO_SECURITY_LEVEL_MEDIUM: Symbolic name for medium macro security Global Const GC_MACRO_SECURITY_LEVEL_HIGH = 2 '///+ GC_MACRO_SECURITY_LEVEL_HIGH: Symbolic name for high macro security Global Const GC_MACRO_SECURITY_LEVEL_VERYHIGH = 3 '///+ GC_MACRO_SECURITY_LEVEL_VERYHIGH: Symbolic name for very high macro security Global Const GC_MACRO_SECURITY_LEVEL_DEFAULT = 2 '///+ GC_MACRO_SECURITY_LEVEL_DEFAULT: Symbolic name for default macro security level '///* OOo Improvement Program Global gOOoImprovementIsEnabled as boolean '///* Performance flags, set to true to eliminate wait/sleep statements, default is FALSE Global global_use_new_sleep as boolean '///* If set to TRUE many functions become more talkative, default is FALSE Global gVerbose as boolean '///* When using hFileOpenLocally(...) we do not know the filename under which the file has been saved. Global gLastWorkFile as string sub OnlyForDocuGVariables '///System for the installed Office '///gPlatform: Operatingsystem (internal shortkey) '///gSYSName: Name of Operatingsystems '///gSystemPath: Systempath '///gPathSigne: Pathsigne for the Operationsystem '///gPlatGroup: The systemgroup for the OS (e.g. 'unx' 'w95' etc.) '///iSystemSprache: Code for the systemlanguage (01 = en_us, 40 = de_de) '///gSVersionIni: Path to sversion.ini '///System for the Testtool '///gtSYSName: Name of Testtool-Operationsystem '///gtPlatform: Operatingsystem (internal shortkey) '///gtSystemPath: Systempfad '///gTesttoolIni: Path to Testtool.ini '///gtHidLstPath: Path to hid.lst '///Settings for Crashreporter '///gUseProxy: Value of [Crashreporter] 'UseProxy' from the testtool control file: Is TRUE or FALSE '///gProxyServer: Value of [Crashreporter] 'ProxyServer' from the testtool control file: string '///gProxyPort: Value of [Crashreporter] 'ProxyPort' from the testtool control file: string '///gReturnAddress: Value of [Crashreporter] 'ReturnAddress' from the testtool control file: string '///gAllowContact: Value of [Crashreporter] 'AllowContact' from the testtool control file: Is TRUE or FALSE '///gConnectionType: Value is depending on gUseProxy: TRUE = MANUALPROXY, FALSE = DIRECT '///Path - variables '///gOfficePath: Includes the path of the Office-installation '///gTesttoolPath: Includes the path of the Testtool-directory (changed with ConvertPath) '///oTesttoolPath: Original Testtool-directory '///sAppExe: Includes the whole path to 'soffice.exe' or 'soffice' '///sAppParameter: Includes all parameters for the executable '///sCapturePath: Path for graphic-snapshots '///gPrivateEnvironmentLocation: Location for test environment special data and files '///Officevariables '///iSprache : Code for the office-language (01=en_us, 49=de_de etc.) '///bAsianLan: If the office-language is an asian language (81, 82, 86, 88): TRUE '///gLanguage: The languagename for office language '///gMacroSecurityLevel: Macro Security Level (0: Low ... 3: Very High) '///global OLE-objectnames '///gOLEWriter: OLE-object-name for Writer '///gOLECalc: OLE-object-name for Calc '///gOLEImpress: OLE-object-name for Impress '///gOLEDraw: OLE-object-name for Draw '///gOLEChart: OLE-object-name for Chart '///gOLEMath: OLE-object-name for Math '///gOLEOthers: OLE-object-name for the others-entry '///variables, for the applications '///gApplication: Includes the tested application (DRAW, WRITER etc.) '///other variables '///gClient: '///gClientLaden: '///gClientUser: Username of Client-User '///gClientUserPWD: Password of Client-User '///gsClient: Path to the sclient.exe '///gNetz: '///gNetzOfficePath: Path to the Network-Installation '///gSamePC: '///gHost: (For remote-tests) Hostname for Office OE/OS '///gPCname: Name for the machine, where the Testtool runs '///Variables only for creating the status-pages '///gTestDate: Fix date of startup '///gTestTime: Fix time of startup '///gTestName: Name of the test (must be set as parameter in hStatusIn()) '///gTestAppArea: Name of the office module (e.g. writer, calc etc.) - (must be set as parameter in hStatusIn()) '///gErrorSum: Last value of errors in a test '///gWarningSum: Last value of warnings in a test '///gStatusDuration: Starting time to get at the end the duration of a test '///glsStatusPage(): List for the output in the status-page '///gStatusFeatureLevel : Controled from privateenvironment.txt '///Specials '///gDasNicht: 0 the translation-mechanism will be activated '///gbSnapShot as Boolean: '///gVersionsnummer: Full version number (major + minor + buildID) '///gUser: User login name (e.g. 'tz') '///bDebugVersion: '///gUseSysDlg: '///gOOO: If an OpenOffice.org-version has been detected, this variable is TRUE '///gOOoShutdownTimeOut: Max. time to wait in seconds, after quiting OOo '///gOOoStartupTimeOut: Max. time to wait in seconds, for starting OOo end sub