jj 03.02 Rename RecordOrganiser to RecordOrganizer

app/DD-Record-Organizer/ModuleRuntimeVariables.vb

@@ -0,0 +1,162 @@
+Module ModuleRuntimeVariables
+    Public ESC_Hidden As Boolean = False
+
+    Public MAIN_FORM As frmMain = Nothing
+    Public ERROR_INIT = "NONE"
+    
+    ' Diese Werte müssen später zur Laufzeit geladen werden
+    Public CURRENT_PARENT_ENTITY_ID As Integer
+    Public CURRENT_PARENT_RECORD_ID As Integer
+    Public CURRENT_ACT_LEVEL As Integer
+
+    Public DT_RIGHTS_USER As DataTable
+    Public DT_RIGHTS_GROUP As DataTable
+    Public SQL_RECORD_AND_FILE_READ_ONLY As String = ""
+    Public RIGHT_RECORD_AND_FILE_READ_ONLY As Boolean = False
+
+    Public SQL_DOC_READ_ONLY As String = ""
+    Public RIGHT_READ_ONLY_DOC As Boolean = False
+
+    Public RIGHT_EDIT_R As Boolean = True
+    Public RIGHT_ADD_R As Boolean = True
+    Public RIGHT_DELETE_R As Boolean = False
+
+    Public RIGHT_ADD_DOC As Boolean = True
+    Public RIGHT_VIEW_DOC As Boolean = True
+    Public RIGHT_DELETE_DOC As Boolean = False
+
+
+    Public CURRENT_ENTITYSTRING As String = ""
+    Public CURRENT_ENTITYSQL As String
+    Public CURRENT_ENTITY_REDUNDANT_ID As Integer
+    'Public CURRENT_ENTITYSQL As String
+
+    Public CURRENT_SCREEN_ID As Integer = 1
+    Public CURRENT_CONTROL_ID As Integer
+    Public CURRENT_RECORD_ID As Integer
+
+    Public CURRENT_CHANGE_STEP As Integer = 0
+
+    Public CURRENT_TASK_ID As Integer
+
+    Public CURRENT_DOKARTID As Integer
+    Public CURRENT_DOKARTSTRING As String
+
+
+    Public CURRENT_CONSTRUCTOR_ID As Integer = 1
+    Public CURRENT_CONSTRUCTOR_DETAIL_ID As Integer
+    Public CURRENT_FILEID As Integer
+    Public CURRENT_FILENAME As String
+    Public CURRENT_NEWFILENAME As String
+    Public CURRENT_CONTROL_DOCTYPE_MATCH As String = ""
+    Public CURRENT_NOTIFICATION_MSG As String
+
+    Public CURRENT_ENTITY_ID As Integer
+    Public CURRENT_FORMVIEW_ID As Integer
+    Public CURRENT_REDUNDANT_FORM_ID As Integer
+    Public CURRENT_REDUNDANT_FORMVIEW_ID As Integer
+    'Public CURRENT_MASTER_FORM_ID As Integer
+    Public CURRENT_FILEIN_WD As String
+    Public CURRENT_DOC_ID
+
+    Public CURRENT_NAVIGATION_TYPE As String = "DEFAULT"
+    Public CURRENT_SELECTED_NODE As TreeNode
+
+    Public NEW_RECORD_ID As Integer
+
+    Public LOGPATH As String
+
+    Public INTEGER1 As Integer
+    Public STRING1 As String
+    Public BOOLEAN1 As Boolean = False
+
+    Public JUMP_STATE As Integer
+    Public JUMP_RECORD_ID As Integer
+
+    Public TEMP_FILES As List(Of String) = New List(Of String)
+
+    Public LICENSE_EXPIRED As Boolean = False
+    Public LICENSE_COUNT As Integer = 0
+    Public LICENSE_DOSSIER_COUNT As Integer = 0
+    Public LICENSE_SAP_Connect As Boolean = False
+    Public LICENSE_SITE_PROXY As Boolean = False
+    Public LICENSE_DATE As Date
+
+    Public CONNECTION_CHANGED As Boolean = False
+
+    Public CURRENT_SCAN_FOLDERWATCH As String
+    Public CURRENT_SCAN_FOLDERWATCH_SD As Boolean = False
+    Public DTEXCLUDE_FILES As DataTable
+    Public LANGUAGE_CHANGED As Boolean = False
+    'DATATABLES
+    Public CURRENT_TBPMO_CONTROL As DataTable
+    Public CURRENT_SCAN_TABLE As DataTable
+    Public CURRENT_TASKS_GENERAL As DataTable
+
+    Public CURRENT_RECORD_ENABLED As Boolean = False
+    Public ENTITY_RELOAD_AFT_CONTROL_LOAD As Boolean = False
+    Public CURRENT_COL_COUNT As Integer = 0
+
+    Public CURRENT_CONTROL_VALUES As DataTable
+    Public CURRENT_SQL_AUTO_VALUES_DT As DataTable
+    Public CURRENT_ENTITYSQL_WHERE As String
+    Public CURRENT_TBPMO_INDEX_MAN As DataTable
+    Public CURRENT_DT_TBPMO_ENTITY_RIGHT_CONTROLS As DataTable
+    Public CURRENT_DT_DOC_ENTITY_SEARCH As DataTable
+    Public CURRENT_DT_NODE_CONFIGURABLE_NODES As DataTable
+    Public CURRENT_DOC_RESULTS As DataTable
+    Public CURRENT_DOC_DROPDOWN As DataTable
+    Public CURRENT_PARENT_DT As DataTable
+
+    Public CURRENT_TBPMO_FILES_USER As DataTable
+
+    Public CURRENT_SEARCH_TYPE As String = "RECORD"
+    Public CURRENT_FULLTEXT_PATTERN As String
+
+    Public CURRENT_DT_SELECTED_FILES As DataTable
+
+    Public MASS_RECORD_IDs2CHANGE As ArrayList
+    Public MASS_COLUMN_LIST As ArrayList
+
+    Public SUCCESSFULL As Boolean = False
+    Public CURRENT_LAST_SQL As String
+
+    Public CURRENT_DATE_FORMAT As String
+
+    Public NEW_FILES_ADDED As Boolean = False
+    Public CURRENT_VARIABLE_FOLDER As String
+    Public CURRENT_DOCVIEW_PATH As String
+    Public CURRENT_DOCVIEW
+
+    Public CURRENT_NODE_CONFIGURABLE_ID As Integer
+
+    Public CURRENT_CHECK_SUBFOLDER As Boolean = False
+    Public CURRENT_SUBFOLDER As String = ""
+
+    Public RECORD_CHANGED As Boolean = False
+
+    Public CURRENT_COMBOBOX_SELECTED_INDEX As Integer = 0
+    Public CURRENT_COMBOBOX_SELECTED_TEXT As String = ""
+    Public CURRENT_TEXTBOX_SELECTED_TEXT As String = ""
+    Public RIGHT_CONTROL_CHANGED As Boolean = False
+    Public MSG_RIGHTMODULE_DE = "Achtung: " & vbNewLine & "Sie haben Änderungen an Rechte-relevanten Eingaben vorgenommen!" & vbNewLine & _
+                   "Alle Rechte der zu diesem Datensatz gespeicherten Dateien werden nach Speichern serverseitig und im Hintergrund überprüft!" & vbNewLine & _
+                   "Dies kann je nach Anzahl der Dateien bis zu 10 Minuten dauern!" & vbNewLine & "Wollen Sie fortfahren?"
+    Public MSG_RIGHTMODULE_EN_US = "Attention:" & "You applied changes to right-relevant data!" & vbNewLine & _
+                        "All rights of files belonging to this record will be checked and changed after Saving!" & vbNewLine & _
+                    "This might take up to 10 Minutes (related to the amount of files)!" & vbNewLine & "Would You like to continue?"
+
+    'File Adding User FAU
+    Public FAU_AD_DOMAIN As String
+    Public FAU_AD_USER As String
+    Public FAU_AD_USER_PW As String
+    Public FAU_AD_SERVER As String
+
+    Public MSG_TYPE As String
+    Public MSG_TITLE As String
+    Public MSG_LABLE1 As String
+    Public MSG_ERROR1 As String
+    Public MSG_LABLE2 As String
+    Public MSG_ERROR2 As String
+
+End Module