44 lines
1.4 KiB
VB.net
44 lines
1.4 KiB
VB.net
Module ModuleRuntimeVariables
|
|
|
|
' Diese Werte müssen später zur Laufzeit geladen werden
|
|
Public CURRENT_ProfilGUID As Integer
|
|
Public CURRENT_ProfilName 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_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 USER_EXISTS = False
|
|
Public USER_IN_MODULE = 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
|
|
Public CURRENT_SQL_CON As Integer
|
|
Public CURRENT_SQL_COMAMND As String
|
|
Public CURRENT_DT_SQL_CONFIG_TABLE As DataTable
|
|
Public CURRENT_DT_CONFIG As DataTable
|
|
Public CURRENT_CLICKED_PROFILE_ID As Integer = 0
|
|
Public CURRENT_CLICKED_PROFILE_TITLE As String
|
|
|
|
Public CURRENT_CONTROL_ID As Integer
|
|
|
|
Public errormessage As String
|
|
End Module
|