TaskFlow/app/DD_PM_WINDREAM/ModuleRuntimeVariables.vb

121 lines
3.8 KiB
VB.net

Imports WINDREAMLib
Imports DigitalData.Modules.Config
Imports DigitalData.Modules.Logging
Module ModuleRuntimeVariables
' Diese Werte müssen später zur Laufzeit geladen werden
Public BASEDATA_DT_TBDD_CONNECTION As DataTable
Public BASEDATA_DT_CONFIG As DataTable
Public BASEDATA_DTGRID_GROUPS As DataTable
Public BASEDATA_DT_CHARTS As DataTable
Public BASEDATA_DT_GUI_LANGUAGE_PHRASES As DataTable
Public BASEDATA_DT_PROFILES_SEARCHES_DOC As DataTable
Public BASEDATA_DT_PROFILE_SEARCHES_DOC As DataTable
Public BASEDATA_DT_PROFILES_SEARCHES_SQL As DataTable
Public BASEDATA_DT_PROFILE_SEARCHES_SQL As DataTable
Public BASEDATA_DT_VW_PROFILE_USER As DataTable
Public CURRENT_ProfilGUID As Integer
Public CURRENT_ProfilName As String
Public CURRENT_PROFILE_LOG_INDEX As String
Public CURRENT_HTML_DOC As String
Public CURRENT_DOC_GUID As Integer
Public CURRENT_DOC_ID As Integer
Public CURRENT_DOC_CREATION_DATE As String
Public CURRENT_DOC_CREATION_TIME As String
Public CURRENT_CONN_ID As Integer
Public CURRENT_JUMP_DOC_GUID As Integer
Public CURRENT_WMFILE As WMObject
Public CURRENT_DOC_PATH As String
Public ERROR_STATE = ""
Public USER_USERNAME As String
Public DT_USER2MODULE As DataTable
Public USER_IS_ADMIN As Boolean = False
Public USER_ID
Public USER_PRENAME
Public USER_SURNAME
Public USER_SHORTNAME
Public USER_EMAIL
Public USER_LANGUAGE As String = "de-DE"
Public USER_DATE_FORMAT As String
Public USER_EXISTS = False
Public USER_IN_MODULE = False
Public USER_RIGHT_FILE_DELETE As Boolean = False
Public USER_RIGHT_VIEW_ONLY As Boolean = False
Public USER_RIGHT2 As Boolean = False
Public USER_RIGHT3 As Boolean = False
Public USER_RIGHT4 As Boolean = False
Public USER_DEBUG_LOG As Boolean = False
Public FORCE_LAYOUT_OVERVIEW As Boolean = False
Public SHOW_CHARTS As Boolean = False
Public SHOW_MASS_VALIDATOR As Boolean = True
Public WORKING_MODE As String = ""
Public MONITORING_ACTIVE As Boolean = False
Public RIBBON_COLOR_SCHEME As String = "Blue"
Public ADDITIONAL_TITLE As String = ""
Public LICENSE_COUNT As Integer = 0
Public LICENSE_EXPIRED As Boolean = False
Public LICENSE_PROFILES As Integer = 0
Public LICENSE_VALID As Boolean = False
Public USERCOUNT_LOGGED_IN As Integer = 0
Public CURRENT_INDEX_ID As Integer
Public CURRENT_OBJECTTYPE As String
Public CURRENT_DESIGN_TYPE As String = "FINAL_INDEX"
Public CURRENT_SQL_CON As Integer
Public CURRENT_SQL_COMAMND As String
Public CURRENT_DT_SQL_CONFIG_TABLE As DataTable
Public CURRENT_CLICKED_PROFILE_ID As Integer = 0
Public CURRENT_CLICKED_PROFILE_TITLE As String
Public DT_CLIENT_USER As DataTable
Public CLIENT_SELECTED As Integer = 0
Public CURR_CON_ID As Integer
Public CURR_SELECT_CONTROL As String
Public CURR_CHOICE_LIST As String
Public CURR_DT_DEPENDING_CONTROLS As DataTable 'enthält zur Laufzeit die abhängigen Controls
Public CURRENT_DT_MASS_CHANGE_DOCS As DataTable
Public CURRENT_DT_FINAL_INDEXING As DataTable
Public CURRENT_DT_PROFILES As DataTable
Public CURRENT_DT_PROFILE As DataTable
Public CURRENT_INDEX_ARRAY(100, 250) As String
Public DTVWCONTROLS_INDEX As DataTable
Public DTVWCONTROL_INDEX As DataTable
Public DTCONTROLS_WITH_SQL As DataTable
Public CURRENT_CONTROL_ID As Integer
Public errormessage As String
Public WINDREAM As ClassPMWindream
Public FINALINDICES As ClassFinalIndex
Public IDBData As ClassIDBData
Public LOGCONFIG As LogConfig
Public LOGGER As Logger
Public CONFIG As ConfigManager(Of ClassConfig)
Public GDPICTURE_LICENSE As String
End Module