63 lines
1.9 KiB
VB.net
63 lines
1.9 KiB
VB.net
Module ModuleCURRENT
|
|
Public ERROR_STATE As String
|
|
Public START_INCOMPLETE As Boolean = False
|
|
Public CURRENT_FILENAME As String
|
|
Public CURRENT_NEWFILENAME As String
|
|
Public CURRENT_WORKFILE_GUID As Integer
|
|
Public CURRENT_WORKFILE As String
|
|
Public CURR_WORKFILE_EXTENSION As String
|
|
|
|
Public CURRENT_DOKART_ID As Integer
|
|
Public CURRENT_LASTDOKART As String = ""
|
|
Public CURRENT_INDEXMAN As Integer
|
|
Public CURRENT_INDEXAUTO As Integer
|
|
Public CURRENT_SQL_CONFIG As String
|
|
|
|
Public VERSION_DELIMITER As String
|
|
Public FILE_DELIMITER As String
|
|
Public CURRENT_MESSAGEID As String
|
|
Public CURRENT_MESSAGEDATE As String
|
|
Public CURRENT_MESSAGESUBJECT As String
|
|
Public CURRENT_ISATTACHMENT As Boolean = False
|
|
|
|
Public CURRENT_USERID
|
|
Public CURRENT_USER_IS_ADMIN As Boolean = False
|
|
Public UserLoggedin As Integer = 0
|
|
Public USER_LANGUAGE As String = "DE"
|
|
|
|
|
|
Public CURRENT_FOLDERWATCH As String = ""
|
|
Public CURRENT_SCAN_FOLDERWATCH As String = ""
|
|
|
|
Public FW_ISSTARTED As Boolean = False
|
|
|
|
Public CURR_DOKART_WD_DIRECT As Boolean = False
|
|
Public CURR_DOKART_OBJECTTYPE As String
|
|
Public CURRENT_WD_TEMPSEARCH As String = ""
|
|
|
|
Public LICENSE_EXPIRED As Boolean = False
|
|
Public LICENSE_COUNT As Integer = 0
|
|
Public LICENSE_DOCTYPE_COUNT As Integer = 0
|
|
Public DOCTYPE_COUNT_ACTUAL As Integer = 0
|
|
Public LicenseHotKey As Integer = 0
|
|
|
|
Public CURRENT_HTML_DOC As String
|
|
|
|
Public CURRENT_ABBRUCH As Integer = 0
|
|
|
|
Public MULTIINDEXING_ACTIVE As Boolean = False
|
|
Public ABORT_INDEXING As Boolean = False
|
|
|
|
Public DTACTUAL_FILES As DataTable
|
|
Public DTEXCLUDE_FILES As DataTable
|
|
|
|
Public CURRENT_SQLRESULT As String
|
|
Public DTSQL_RESULT As DataTable
|
|
Public TEMP_FILES As List(Of String) = New List(Of String)
|
|
|
|
Public CURRENT_FOCUSES_WINDOWNAME As String
|
|
|
|
Public LANGUAGE_CHANGED As Boolean = False
|
|
End Module
|
|
|