63 lines
2.0 KiB
VB.net
63 lines
2.0 KiB
VB.net
Imports WINDREAMLib
|
|
Module ModuleRuntimeVariables
|
|
|
|
' Diese Werte müssen später zur Laufzeit geladen werden
|
|
Public CURRENT_ProfilGUID As Integer
|
|
Public CURRENT_ProfilName As String
|
|
Public CURRENT_PROFILE_VEKTOR_LOG As String
|
|
Public CURRENT_HTML_DOC As String
|
|
|
|
Public CURRENT_DOC_GUID As Integer
|
|
Public CURRENT_DOC_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_IS_ADMIN As Boolean = False
|
|
Public USER_USERNAME As String
|
|
Public DT_USER2MODULE As DataTable
|
|
|
|
Public CURRENT_USER_ID
|
|
Public CURRENT_USER_PRENAME
|
|
Public CURRENT_USER_SURNAME
|
|
Public CURRENT_USER_SHORTNAME
|
|
Public CURRENT_USER_EMAIL
|
|
Public CURRENT_USER_LANGUAGE As String = "de-DE"
|
|
|
|
Public USER_EXISTS = False
|
|
Public USER_IN_MODULE = False
|
|
Public USER_RIGHT_FILE_DELETE As Boolean = False
|
|
Public LICENSE_COUNT As Integer = 0
|
|
Public LICENSE_EXPIRED As Boolean = False
|
|
Public LICENSE_PROFILES As Integer = 0
|
|
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_DT_TBDD_CONNECTION As DataTable
|
|
Public CURRENT_DT_CONFIG As DataTable
|
|
Public CURRENT_CLICKED_PROFILE_ID As Integer = 0
|
|
Public CURRENT_CLICKED_PROFILE_TITLE As String
|
|
|
|
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_PROFILE As DataTable
|
|
Public CURRENT_DT_VW_PROFILE_USER As DataTable
|
|
|
|
Public CURRENT_CONTROL_ID As Integer
|
|
|
|
Public errormessage As String
|
|
End Module
|