MS
This commit is contained in:
SchreiberM
parent
8f3122c24b
commit
51bd2cdb1d
@ -128,7 +128,7 @@ Public Class ClassDOC_SEARCH
|
||||
' ",(SELECT [dbo].[FNPMO_DOC_GET_DROPDOWN] (DocID,{1},'DROPDOWN4','{7}')) AS DROPDOWN4 " & _
|
||||
'"FROM VWPMO_WD_DOC_SEARCH WHERE RECORD_ID = {0} AND ENTITY_ID = {1} AND DocID = (SELECT dwObjectID FROM VWPMO_WD_OBJECT_RIGHTS WHERE dwUserOrGroupID = {6} AND dwObjectID = DocID)", RECORD_ID, ENTITY_ID, OPTION1, OPTION2, OPTION3, OPTION4, USERID_FK_INT_ECM, USER_LANGUAGE)
|
||||
End If
|
||||
|
||||
If LogErrorsOnly = False Then ClassLogger.Add(" >> SQL_DOC_SEARCH: " & SQL_DOC_SEARCH, False)
|
||||
Return ClassDatabase.Return_Datatable_Connection(SQL_DOC_SEARCH, 1)
|
||||
Catch ex As Exception
|
||||
ClassLogger.Add("Unexpected Error in GET_DOCSEARCH_DATATABLE: " & ex.Message, True)
|
||||
|
||||
@ -79,7 +79,7 @@ Public Class ClassDragDrop
|
||||
If (finTemp.Exists = True) Then
|
||||
ReDim Preserve files_dropped(0)
|
||||
files_dropped(0) = "@OUTLOOK_ATTACHMENT@" & strOutFile
|
||||
If LogErrorsOnly = False Then ClassLogger.Add(">> Drop an Attachment - File: " & strOutFile, False)
|
||||
If LogErrorsOnly = False Then ClassLogger.Add(" >> Drop an Attachment - File: " & strOutFile, False)
|
||||
Return True
|
||||
Else
|
||||
ClassLogger.Add(">> Attachment File from Outlook could not be created", False)
|
||||
|
||||
@ -33,8 +33,9 @@
|
||||
End Function
|
||||
Public Shared Function GET_DATATABLE_INDICES_PMO()
|
||||
Try
|
||||
Dim DT As DataTable = ClassDatabase.Return_Datatable("SELECT * FROM TBPMO_INDEX_MAN WHERE ENTITY_ID = " & CURRENT_FORM_ID & " AND DOCTYPE_ID = " & CURRENT_DOKARTID)
|
||||
If LogErrorsOnly = False Then ClassLogger.Add(" >> GET_DATATABLE_INDICES_PMO: SELECT * FROM TBPMO_INDEX_MAN WHERE ENTITY_ID = " & CURRENT_FORM_ID & " AND DOCTYPE_ID = " & CURRENT_DOKARTID, True)
|
||||
Dim sql = String.Format("SELECT * FROM TBPMO_INDEX_MAN WHERE ENTITY_ID = (SELECT CASE REDUNDANT_ENTITY WHEN 0 THEN GUID ELSE REDUNDANT_ENTITY END AS ENTITY_ID FROM TBPMO_FORM WHERE GUID = {0}) AND DOCTYPE_ID = {1}", CURRENT_FORM_ID, CURRENT_DOKARTID)
|
||||
Dim DT As DataTable = ClassDatabase.Return_Datatable(sql)
|
||||
If LogErrorsOnly = False Then ClassLogger.Add(" >> GET_DATATABLE_INDICES_PMO: " & sql, True)
|
||||
CURRENT_TBPMO_INDEX_MAN = DT
|
||||
Return True
|
||||
Catch ex As Exception
|
||||
|
||||
@ -231,7 +231,7 @@ Public Class ClassImport_Windream
|
||||
sql_AUTOindexresult = sql_AUTOindexresult.ToString.ToUpper.Replace("@RECORD-ID", CURRENT_RECORD_ID)
|
||||
Dim AUTOindexresult = ClassDatabase.Execute_Scalar(sql_AUTOindexresult, True)
|
||||
If IsNothing(AUTOindexresult) Then
|
||||
ClassLogger.Add(">> unexpected: AUTOindexresult is nothing!!", False)
|
||||
ClassLogger.Add(">> ATTENTION: unexpected: AUTOindexresult is nothing!!", False)
|
||||
ClassLogger.Add(">> " & sql_AUTOindexresult, False)
|
||||
value = ""
|
||||
Else
|
||||
@ -269,7 +269,7 @@ Public Class ClassImport_Windream
|
||||
lblsql = lblsql.ToString.ToUpper.Replace("@RECORD-ID", CURRENT_RECORD_ID)
|
||||
lblsql = lblsql.ToString.ToUpper.Replace("@ENTITY-ID", CURRENT_FORM_ID)
|
||||
lblsql = lblsql.ToString.ToUpper.Replace("@ENTITY_ID", CURRENT_FORM_ID)
|
||||
If LogErrorsOnly = False Then ClassLogger.Add(">> variable sql will be used for convention", False)
|
||||
If LogErrorsOnly = False Then ClassLogger.Add(" >> variable sql will be used for convention", False)
|
||||
Dim result = ClassDatabase.Execute_ScalarWithConnection(DTtype.Rows(0).Item(2), lblsql)
|
||||
If Not IsNothing(result) Then
|
||||
value = result.ToString
|
||||
@ -575,7 +575,7 @@ Public Class ClassImport_Windream
|
||||
End Select
|
||||
FolderConvention = FolderConvention.Replace(element.ToString, folder_temp)
|
||||
End If
|
||||
|
||||
|
||||
Case "C"
|
||||
'Füllen mit Controlwert
|
||||
Dim elmt = element.Value.Substring(3, element.Value.Length - 4).Split("#")
|
||||
@ -594,7 +594,7 @@ Public Class ClassImport_Windream
|
||||
lblsql = lblsql.ToString.ToUpper.Replace("@RECORD-ID", CURRENT_RECORD_ID)
|
||||
lblsql = lblsql.ToString.ToUpper.Replace("@ENTITY-ID", CURRENT_FORM_ID)
|
||||
lblsql = lblsql.ToString.ToUpper.Replace("@ENTITY_ID", CURRENT_FORM_ID)
|
||||
If LogErrorsOnly = False Then ClassLogger.Add(">> variable sql will be used for convention", False)
|
||||
If LogErrorsOnly = False Then ClassLogger.Add(" >> variable sql will be used for convention", False)
|
||||
Dim result = ClassDatabase.Execute_ScalarWithConnection(DTtype.Rows(0).Item(2), lblsql)
|
||||
If Not IsNothing(result) Then
|
||||
FolderConvention = FolderConvention.Replace(element.ToString, result.ToString)
|
||||
|
||||
336
app/DD-Record-Organiser/ClassNodeNavigation.vb
Normal file
336
app/DD-Record-Organiser/ClassNodeNavigation.vb
Normal file
@ -0,0 +1,336 @@
|
||||
Public Class ClassNodeNavigation
|
||||
Public Shared Function CreateTreeViewNodes(DT_TREEVIEW_PER_CONTROLS As DataTable, TREEVIEW_IMAGELIST As ImageList)
|
||||
Try
|
||||
' Rootnode erstellen und taggen
|
||||
If DT_TREEVIEW_PER_CONTROLS.Rows.Count > 1 Then
|
||||
' Presuming the DataTable has a column named ENTITY_ID and TYPE_NODE.
|
||||
Dim expression As String
|
||||
expression = "TYPE_NODE = 0"
|
||||
Dim foundRowsLevel0() As DataRow
|
||||
' Use the Select method to find all rows matching the filter.
|
||||
foundRowsLevel0 = DT_TREEVIEW_PER_CONTROLS.Select(expression, "NODE_CAPTION")
|
||||
Dim i As Integer
|
||||
Dim NODE_CONFIG_ID
|
||||
Dim LEVEL0_NODE As TreeNode
|
||||
|
||||
' For each row create a Node
|
||||
For i = 0 To foundRowsLevel0.GetUpperBound(0)
|
||||
Dim ID = foundRowsLevel0(i)("GUID")
|
||||
Dim LevelEntity = foundRowsLevel0(i)("ENTITY_ID")
|
||||
Dim controlID = foundRowsLevel0(i)("CONTROL_ID")
|
||||
Dim nodetext = foundRowsLevel0(i)("NODE_CAPTION")
|
||||
Dim Type_node = foundRowsLevel0(i)("TYPE_NODE")
|
||||
Dim RECORD_ID = foundRowsLevel0(i)("RECORD_ID")
|
||||
NODE_CONFIG_ID = foundRowsLevel0(i)("NODE_CONFIG_ID")
|
||||
|
||||
LEVEL0_NODE = New TreeNode(nodetext)
|
||||
If Not IsDBNull(RECORD_ID) Then
|
||||
LEVEL0_NODE.Tag = LevelEntity & " - CONTROL-ID" & controlID.ToString & "#" & ID & "#RECORD-ID" & RECORD_ID.ToString
|
||||
Else
|
||||
LEVEL0_NODE.Tag = LevelEntity & " - CONTROL-ID" & controlID.ToString & "#" & ID
|
||||
End If
|
||||
|
||||
Dim index As Integer = 0
|
||||
For Each img As String In TREEVIEW_IMAGELIST.Images.Keys
|
||||
If img = NODE_CONFIG_ID & "#" & LevelEntity Then
|
||||
Exit For
|
||||
End If
|
||||
index += 1
|
||||
Next
|
||||
LEVEL0_NODE.ImageIndex = index
|
||||
LEVEL0_NODE.SelectedImageIndex = index
|
||||
|
||||
'### LEVEL 1 laden #######
|
||||
Dim expressionLevel1 As String
|
||||
expressionLevel1 = "PARENT_GUID = " & ID 'TYPE_NODE = 1 AND Einschränkung auf Type 2 und Parent_Guid
|
||||
Dim foundRowsLevel1() As DataRow
|
||||
foundRowsLevel1 = DT_TREEVIEW_PER_CONTROLS.Select(expressionLevel1, "NODE_CAPTION")
|
||||
Dim j As Integer
|
||||
For j = 0 To foundRowsLevel1.GetUpperBound(0)
|
||||
Dim ID1 = foundRowsLevel1(j)("GUID")
|
||||
Dim LevelEntity1 = foundRowsLevel1(j)("ENTITY_ID")
|
||||
Dim controlID1 = foundRowsLevel1(j)("CONTROL_ID")
|
||||
Dim nodetext1 = foundRowsLevel1(j)("NODE_CAPTION")
|
||||
Dim Type_node1 = foundRowsLevel1(j)("TYPE_NODE")
|
||||
RECORD_ID = foundRowsLevel1(j)("RECORD_ID")
|
||||
NODE_CONFIG_ID = foundRowsLevel1(j)("NODE_CONFIG_ID")
|
||||
' Node erstellen..
|
||||
Dim LEVEL1_NODE As TreeNode
|
||||
LEVEL1_NODE = New TreeNode(nodetext1)
|
||||
If Not IsDBNull(RECORD_ID) Then
|
||||
LEVEL1_NODE.Tag = LevelEntity1 & "-CONTROL-ID" & controlID1.ToString & "#" & ID1 & "#RECORD-ID" & RECORD_ID.ToString
|
||||
Else
|
||||
LEVEL1_NODE.Tag = LevelEntity1 & "-CONTROL-ID" & controlID1.ToString & "#" & ID1
|
||||
End If
|
||||
|
||||
index = 0
|
||||
For Each img As String In TREEVIEW_IMAGELIST.Images.Keys
|
||||
If img = NODE_CONFIG_ID & "#" & LevelEntity1 Then
|
||||
Exit For
|
||||
End If
|
||||
index += 1
|
||||
Next
|
||||
LEVEL1_NODE.ImageIndex = index
|
||||
LEVEL1_NODE.SelectedImageIndex = index
|
||||
' ..und einfügen
|
||||
LEVEL0_NODE.Nodes.Add(LEVEL1_NODE)
|
||||
'### LEVEL 2 laden #######
|
||||
Dim expressionLevel2 As String
|
||||
expressionLevel2 = "PARENT_GUID = " & ID1 'TYPE_NODE = 2 AND Einschränkung auf Type und Parent_Guid
|
||||
Dim foundRowsLevel2() As DataRow
|
||||
foundRowsLevel2 = DT_TREEVIEW_PER_CONTROLS.Select(expressionLevel2, "NODE_CAPTION")
|
||||
Dim k As Integer
|
||||
For k = 0 To foundRowsLevel2.GetUpperBound(0)
|
||||
Dim ID2 = foundRowsLevel2(k)("GUID")
|
||||
Dim LevelEntity2 = foundRowsLevel2(k)("ENTITY_ID")
|
||||
Dim controlID2 = foundRowsLevel2(k)("CONTROL_ID")
|
||||
Dim nodetext2 = foundRowsLevel2(k)("NODE_CAPTION")
|
||||
RECORD_ID = foundRowsLevel2(k)("RECORD_ID")
|
||||
NODE_CONFIG_ID = foundRowsLevel2(k)("NODE_CONFIG_ID")
|
||||
' Node erstellen..
|
||||
Dim LEVEL2_NODE As TreeNode
|
||||
LEVEL2_NODE = New TreeNode(nodetext2)
|
||||
If Not IsDBNull(RECORD_ID) Then
|
||||
LEVEL2_NODE.Tag = LevelEntity2 & "-CONTROL-ID" & controlID2.ToString & "#" & ID2 & "#RECORD-ID" & RECORD_ID.ToString
|
||||
Else
|
||||
LEVEL2_NODE.Tag = LevelEntity2 & "-CONTROL-ID" & controlID2.ToString & "#" & ID2
|
||||
End If
|
||||
|
||||
index = 0
|
||||
For Each img As String In TREEVIEW_IMAGELIST.Images.Keys
|
||||
If img = NODE_CONFIG_ID & "#" & LevelEntity2 Then
|
||||
Exit For
|
||||
End If
|
||||
index += 1
|
||||
Next
|
||||
LEVEL2_NODE.ImageIndex = index
|
||||
LEVEL2_NODE.SelectedImageIndex = index
|
||||
' ..und einfügen
|
||||
LEVEL1_NODE.Nodes.Add(LEVEL2_NODE)
|
||||
'### LEVEL 3 laden #######
|
||||
Dim expressionLevel3 As String
|
||||
expressionLevel3 = "PARENT_GUID = " & ID2 'TYPE_NODE = 3 AND Einschränkung auf Type und Parent_Guid
|
||||
Dim foundRowsLevel3() As DataRow
|
||||
foundRowsLevel3 = DT_TREEVIEW_PER_CONTROLS.Select(expressionLevel3, "NODE_CAPTION")
|
||||
Dim l As Integer
|
||||
For l = 0 To foundRowsLevel3.GetUpperBound(0)
|
||||
Dim ID3 = foundRowsLevel3(l)("GUID")
|
||||
Dim LevelEntity3 = foundRowsLevel3(l)("ENTITY_ID")
|
||||
Dim controlID3 = foundRowsLevel3(l)("CONTROL_ID")
|
||||
Dim nodetext3 = foundRowsLevel3(l)("NODE_CAPTION")
|
||||
RECORD_ID = foundRowsLevel3(l)("RECORD_ID")
|
||||
NODE_CONFIG_ID = foundRowsLevel3(l)("NODE_CONFIG_ID")
|
||||
' Node erstellen..
|
||||
Dim LEVEL3_NODE As TreeNode
|
||||
LEVEL3_NODE = New TreeNode(nodetext3)
|
||||
If Not IsDBNull(RECORD_ID) Then
|
||||
LEVEL3_NODE.Tag = LevelEntity3 & "-CONTROL-ID" & controlID3.ToString & "#" & ID3 & "#RECORD-ID" & RECORD_ID.ToString
|
||||
Else
|
||||
LEVEL3_NODE.Tag = LevelEntity3 & "-CONTROL-ID" & controlID3.ToString & "#" & ID3
|
||||
End If
|
||||
|
||||
index = 0
|
||||
For Each img As String In TREEVIEW_IMAGELIST.Images.Keys
|
||||
If img = NODE_CONFIG_ID & "#" & LevelEntity3 Then
|
||||
Exit For
|
||||
End If
|
||||
index += 1
|
||||
Next
|
||||
LEVEL3_NODE.ImageIndex = index
|
||||
LEVEL3_NODE.SelectedImageIndex = index
|
||||
' ..und einfügen
|
||||
LEVEL2_NODE.Nodes.Add(LEVEL3_NODE)
|
||||
'### LEVEL 4 laden #######
|
||||
Dim expressionLevel4 As String
|
||||
expressionLevel4 = "PARENT_GUID = " & ID3 'TYPE_NODE = 4 AND Einschränkung auf Type und Parent_Guid
|
||||
Dim foundRowsLevel4() As DataRow
|
||||
foundRowsLevel4 = DT_TREEVIEW_PER_CONTROLS.Select(expressionLevel4, "NODE_CAPTION")
|
||||
Dim m As Integer
|
||||
For m = 0 To foundRowsLevel4.GetUpperBound(0)
|
||||
Dim ID5 = foundRowsLevel4(m)("GUID")
|
||||
Dim LevelEntity5 = foundRowsLevel4(m)("ENTITY_ID")
|
||||
Dim controlID5 = foundRowsLevel4(m)("CONTROL_ID")
|
||||
Dim nodetext5 = foundRowsLevel4(m)("NODE_CAPTION")
|
||||
RECORD_ID = foundRowsLevel4(m)("RECORD_ID")
|
||||
NODE_CONFIG_ID = foundRowsLevel4(m)("NODE_CONFIG_ID")
|
||||
' Node erstellen..
|
||||
Dim LEVEL4_NODE As TreeNode
|
||||
LEVEL4_NODE = New TreeNode(nodetext5)
|
||||
If Not IsDBNull(RECORD_ID) Then
|
||||
LEVEL4_NODE.Tag = LevelEntity5 & "-CONTROL-ID" & controlID5.ToString & "#" & ID5 & "#RECORD-ID" & RECORD_ID.ToString
|
||||
Else
|
||||
LEVEL4_NODE.Tag = LevelEntity5 & "-CONTROL-ID" & controlID5.ToString & "#" & ID5
|
||||
End If
|
||||
|
||||
index = 0
|
||||
For Each img As String In TREEVIEW_IMAGELIST.Images.Keys
|
||||
If img = NODE_CONFIG_ID & "#" & LevelEntity5 Then
|
||||
Exit For
|
||||
End If
|
||||
index += 1
|
||||
Next
|
||||
LEVEL4_NODE.ImageIndex = index
|
||||
LEVEL4_NODE.SelectedImageIndex = index
|
||||
' ..und einfügen
|
||||
LEVEL3_NODE.Nodes.Add(LEVEL4_NODE)
|
||||
'### LEVEL 5 laden #######
|
||||
Dim expressionLevel5 As String
|
||||
Dim sortExp As String = "NODE_CONFIG_ID, NODE_CAPTION"
|
||||
expressionLevel5 = "PARENT_GUID = " & ID5 'TYPE_NODE = 5 AND Einschränkung auf Type und Parent_Guid
|
||||
Dim foundRowsLevel5() As DataRow
|
||||
foundRowsLevel5 = DT_TREEVIEW_PER_CONTROLS.Select(expressionLevel5, sortExp)
|
||||
Dim n As Integer
|
||||
If ID5 = 1146 Then
|
||||
Console.WriteLine("Aha")
|
||||
End If
|
||||
For n = 0 To foundRowsLevel5.GetUpperBound(0)
|
||||
Dim ID6 = foundRowsLevel5(n)("GUID")
|
||||
Dim LevelEntity6 = foundRowsLevel5(n)("ENTITY_ID")
|
||||
Dim controlID6 = foundRowsLevel5(n)("CONTROL_ID")
|
||||
Dim nodetext6 = foundRowsLevel5(n)("NODE_CAPTION")
|
||||
RECORD_ID = foundRowsLevel5(n)("RECORD_ID")
|
||||
NODE_CONFIG_ID = foundRowsLevel5(n)("NODE_CONFIG_ID")
|
||||
' Node erstellen..
|
||||
Dim LEVEL5_NODE As TreeNode
|
||||
LEVEL5_NODE = New TreeNode(nodetext6)
|
||||
If Not IsDBNull(RECORD_ID) Then
|
||||
LEVEL5_NODE.Tag = LevelEntity6 & "-CONTROL-ID" & controlID6.ToString & "#" & ID6 & "#RECORD-ID" & RECORD_ID.ToString
|
||||
Else
|
||||
LEVEL5_NODE.Tag = LevelEntity6 & "-CONTROL-ID" & controlID6.ToString & "#" & ID6
|
||||
End If
|
||||
|
||||
index = 0
|
||||
For Each img As String In TREEVIEW_IMAGELIST.Images.Keys
|
||||
If img = NODE_CONFIG_ID & "#" & LevelEntity6 Then
|
||||
Exit For
|
||||
End If
|
||||
index += 1
|
||||
Next
|
||||
LEVEL5_NODE.ImageIndex = index
|
||||
LEVEL5_NODE.SelectedImageIndex = index
|
||||
' ..und einfügen
|
||||
LEVEL4_NODE.Nodes.Add(LEVEL5_NODE)
|
||||
'### LEVEL 5 laden #######
|
||||
Dim expressionLevel6 As String
|
||||
expressionLevel6 = "PARENT_GUID = " & ID6 'TYPE_NODE = 6 AND Einschränkung auf Type und Parent_Guid
|
||||
Dim foundRowsLevel6() As DataRow
|
||||
foundRowsLevel6 = DT_TREEVIEW_PER_CONTROLS.Select(expressionLevel6, sortExp)
|
||||
If ID6 = 1146 Then
|
||||
Console.WriteLine("Aha")
|
||||
End If
|
||||
Dim o As Integer
|
||||
For o = 0 To foundRowsLevel6.GetUpperBound(0)
|
||||
Dim ID7 = foundRowsLevel6(o)("GUID")
|
||||
Dim LevelEntity7 = foundRowsLevel6(o)("ENTITY_ID")
|
||||
Dim controlID7 = foundRowsLevel6(o)("CONTROL_ID")
|
||||
Dim nodetext7 = foundRowsLevel6(o)("NODE_CAPTION")
|
||||
RECORD_ID = foundRowsLevel6(o)("RECORD_ID")
|
||||
NODE_CONFIG_ID = foundRowsLevel6(o)("NODE_CONFIG_ID")
|
||||
' Node erstellen..
|
||||
Dim LEVEL6_NODE As TreeNode
|
||||
LEVEL6_NODE = New TreeNode(nodetext7)
|
||||
If Not IsDBNull(RECORD_ID) Then
|
||||
LEVEL6_NODE.Tag = LevelEntity7 & "-CONTROL-ID" & controlID7.ToString & "#" & ID7 & "#RECORD-ID" & RECORD_ID.ToString
|
||||
Else
|
||||
LEVEL6_NODE.Tag = LevelEntity7 & "-CONTROL-ID" & controlID7.ToString & "#" & ID7
|
||||
End If
|
||||
|
||||
index = 0
|
||||
For Each img As String In TREEVIEW_IMAGELIST.Images.Keys
|
||||
If img = NODE_CONFIG_ID & "#" & LevelEntity7 Then
|
||||
Exit For
|
||||
End If
|
||||
index += 1
|
||||
Next
|
||||
LEVEL6_NODE.ImageIndex = index
|
||||
LEVEL6_NODE.SelectedImageIndex = index
|
||||
' ..und einfügen
|
||||
LEVEL5_NODE.Nodes.Add(LEVEL6_NODE)
|
||||
'### LEVEL 7 laden #######
|
||||
Dim expressionLevel7 As String
|
||||
expressionLevel7 = "PARENT_GUID = " & ID7 'TYPE_NODE = 7 AND Einschränkung auf Type und Parent_Guid
|
||||
Dim foundRowsLevel7() As DataRow
|
||||
foundRowsLevel7 = DT_TREEVIEW_PER_CONTROLS.Select(expressionLevel7, sortExp)
|
||||
Dim p As Integer
|
||||
For p = 0 To foundRowsLevel7.GetUpperBound(0)
|
||||
Dim ID8 = foundRowsLevel7(p)("GUID")
|
||||
Dim LevelEntity8 = foundRowsLevel7(p)("ENTITY_ID")
|
||||
Dim controlID8 = foundRowsLevel7(p)("CONTROL_ID")
|
||||
Dim nodetext8 = foundRowsLevel7(p)("NODE_CAPTION")
|
||||
RECORD_ID = foundRowsLevel7(p)("RECORD_ID")
|
||||
NODE_CONFIG_ID = foundRowsLevel7(p)("NODE_CONFIG_ID")
|
||||
' Node erstellen..
|
||||
Dim LEVEL7_NODE As TreeNode
|
||||
LEVEL7_NODE = New TreeNode(nodetext8)
|
||||
If Not IsDBNull(RECORD_ID) Then
|
||||
LEVEL7_NODE.Tag = LevelEntity8 & "-CONTROL-ID" & controlID8.ToString & "#" & ID8 & "#RECORD-ID" & RECORD_ID.ToString
|
||||
Else
|
||||
LEVEL7_NODE.Tag = LevelEntity8 & "-CONTROL-ID" & controlID8.ToString & "#" & ID8
|
||||
End If
|
||||
|
||||
index = 0
|
||||
For Each img As String In TREEVIEW_IMAGELIST.Images.Keys
|
||||
If img = NODE_CONFIG_ID & "#" & LevelEntity8 Then
|
||||
Exit For
|
||||
End If
|
||||
index += 1
|
||||
Next
|
||||
LEVEL7_NODE.ImageIndex = index
|
||||
LEVEL7_NODE.SelectedImageIndex = index
|
||||
' ..und einfügen
|
||||
LEVEL6_NODE.Nodes.Add(LEVEL7_NODE)
|
||||
'### LEVEL 7 laden #######
|
||||
Dim expressionLevel8 As String
|
||||
expressionLevel8 = "PARENT_GUID = " & ID8 'TYPE_NODE = 7 AND Einschränkung auf Type und Parent_Guid
|
||||
Dim foundRowsLevel8() As DataRow
|
||||
foundRowsLevel8 = DT_TREEVIEW_PER_CONTROLS.Select(expressionLevel8, sortExp)
|
||||
Dim q As Integer
|
||||
For q = 0 To foundRowsLevel8.GetUpperBound(0)
|
||||
Dim ID9 = foundRowsLevel8(q)("GUID")
|
||||
Dim LevelEntity9 = foundRowsLevel8(q)("ENTITY_ID")
|
||||
Dim controlID9 = foundRowsLevel8(q)("CONTROL_ID")
|
||||
Dim nodetext9 = foundRowsLevel8(q)("NODE_CAPTION")
|
||||
RECORD_ID = foundRowsLevel8(q)("RECORD_ID")
|
||||
NODE_CONFIG_ID = foundRowsLevel8(q)("NODE_CONFIG_ID")
|
||||
' Node erstellen..
|
||||
Dim LEVEL8_NODE As TreeNode
|
||||
LEVEL8_NODE = New TreeNode(nodetext9)
|
||||
If Not IsDBNull(RECORD_ID) Then
|
||||
LEVEL8_NODE.Tag = LevelEntity9 & "-CONTROL-ID" & controlID9.ToString & "#" & ID9 & "#RECORD-ID" & RECORD_ID.ToString
|
||||
Else
|
||||
LEVEL8_NODE.Tag = LevelEntity9 & "-CONTROL-ID" & controlID9.ToString & "#" & ID9
|
||||
End If
|
||||
|
||||
index = 0
|
||||
For Each img As String In TREEVIEW_IMAGELIST.Images.Keys
|
||||
If img = NODE_CONFIG_ID & "#" & LevelEntity9 Then
|
||||
Exit For
|
||||
End If
|
||||
index += 1
|
||||
Next
|
||||
LEVEL8_NODE.ImageIndex = index
|
||||
LEVEL8_NODE.SelectedImageIndex = index
|
||||
' ..und einfügen
|
||||
LEVEL7_NODE.Nodes.Add(LEVEL8_NODE)
|
||||
'### LEVEL 8 laden #######
|
||||
Next ' Level 7 Ende
|
||||
Next ' Level 7 Ende
|
||||
Next ' Level 6 Ende
|
||||
Next ' Level 5 Ende
|
||||
Next 'Level 4 Ende
|
||||
Next 'Level 3 Ende
|
||||
Next ' Level 2 Ende
|
||||
Next 'Level 1 Ende
|
||||
Next
|
||||
Return LEVEL0_NODE
|
||||
Else
|
||||
MsgBox("Check the Control Navigation Option or inform Digital Data!", MsgBoxStyle.Critical)
|
||||
Return Nothing
|
||||
End If
|
||||
Catch ex As Exception
|
||||
ClassLogger.Add(">> Unexpected Error in CreateTreeViewNodes (NodeNavigation): " & ex.Message, True)
|
||||
MsgBox("Error in CreateTreeViewNodes (NodeNavigation):" & vbNewLine & ex.Message, MsgBoxStyle.Critical)
|
||||
Return Nothing
|
||||
End Try
|
||||
End Function
|
||||
End Class
|
||||
@ -133,7 +133,7 @@ Public Class ClassSAP
|
||||
Public Shared Function Return_Datatable_for_Table(tablename As String, where_clause As String, Optional RowLimit As Integer = 0)
|
||||
Try
|
||||
Dim RESULT_TABLE As DataTable = New DataTable
|
||||
If LogErrorsOnly = False Then ClassLogger.Add(">> Get data from SAP Table", False)
|
||||
If LogErrorsOnly = False Then ClassLogger.Add(" >> Get data from SAP Table", False)
|
||||
Dim table As New ERPConnect.Utils.ReadTable(SAP_CONNECTION)
|
||||
'Dim cWhereClause = "SAP_OBJECT EQ '<ObjectType>' AND AR_DATE GE '<AR_DATE>'"
|
||||
'Dim sSearchDate1 = "20160101"
|
||||
@ -146,9 +146,9 @@ Public Class ClassSAP
|
||||
If RowLimit <> 0 Then
|
||||
table.RowCount = RowLimit
|
||||
End If
|
||||
If LogErrorsOnly = False Then ClassLogger.Add(">>Table.Run executing.....", False)
|
||||
If LogErrorsOnly = False Then ClassLogger.Add(" >>Table.Run executing.....", False)
|
||||
table.Run()
|
||||
If LogErrorsOnly = False Then ClassLogger.Add(">>Table.Run executed", False)
|
||||
If LogErrorsOnly = False Then ClassLogger.Add(" >>Table.Run executed", False)
|
||||
RESULT_TABLE = table.Result
|
||||
SAP_CONNECTION.Close()
|
||||
Return RESULT_TABLE
|
||||
|
||||
@ -6,48 +6,153 @@ Imports DevExpress.XtraEditors
|
||||
Imports DevExpress.XtraEditors.Repository
|
||||
|
||||
Public Class ClassWindreamDocGrid
|
||||
Public Shared RESULT_DOC_PATH As String
|
||||
Public Shared RESULT_OBJECTTYPE As String
|
||||
Public Shared RESULT_INWORK As Boolean
|
||||
Public Shared RESULT_DOC_ID As Integer
|
||||
Public Shared RESULT_DISPLAYNAME As String
|
||||
Public Shared SELECTED_DOC_PATH As String
|
||||
'Public Shared RESULT_OBJECTTYPE As String
|
||||
Public Shared SELECTED_INWORK As Boolean
|
||||
Public Shared SELECTED_DOC_ID As Integer
|
||||
'Public Shared RESULT_DISPLAYNAME As String
|
||||
Public Shared RESULT_CONFIG_IDS As Hashtable
|
||||
|
||||
Public Shared DT_RESULTFILES As DataTable
|
||||
|
||||
Private Shared _dropdownValueChangedHandler As EventHandler
|
||||
Private Shared _datepickerValueChangedHandler As EventHandler
|
||||
Private Shared _textValueChangedHandler As EventHandler
|
||||
|
||||
Private Shared Function Init_Table()
|
||||
Try
|
||||
Dim table As New DataTable
|
||||
table.TableName = "TBSELECTED_FILES"
|
||||
' Create two columns, ID and Name.
|
||||
table.Columns.Add("DOC_ID", GetType(Integer))
|
||||
table.Columns.Add("DOC_PATH", GetType(System.String))
|
||||
table.Columns.Add("OBJECTTYPE", GetType(System.String))
|
||||
table.Columns.Add("INWORK", GetType(System.Boolean))
|
||||
table.Columns.Add("DISPLAYNAME", GetType(System.String))
|
||||
DT_RESULTFILES = table
|
||||
Return True
|
||||
Catch ex As Exception
|
||||
ClassLogger.Add("Unexpected Error in Initting TableResult Docs: " & ex.Message, True)
|
||||
DT_RESULTFILES = Nothing
|
||||
Return False
|
||||
End Try
|
||||
|
||||
End Function
|
||||
Public Shared Sub GetDocItems(gridView As GridView)
|
||||
Try
|
||||
RESULT_DOC_PATH = gridView.GetFocusedRowCellValue(gridView.Columns("FULLPATH"))
|
||||
Catch ex As Exception
|
||||
ClassLogger.Add(">> Attention: Could not set DocVariable RESULT_DOC_PATH: " & ex.Message, False)
|
||||
RESULT_DOC_PATH = Nothing
|
||||
End Try
|
||||
Try
|
||||
RESULT_OBJECTTYPE = gridView.GetFocusedRowCellValue(gridView.Columns("OBJECTTYPE"))
|
||||
Catch ex As Exception
|
||||
ClassLogger.Add(">> Attention: Could not set DocVariable RESULT_OBJECTTYPE: " & ex.Message, False)
|
||||
RESULT_OBJECTTYPE = ""
|
||||
End Try
|
||||
Try
|
||||
RESULT_INWORK = gridView.GetFocusedRowCellValue(gridView.Columns("in work?"))
|
||||
Catch ex As Exception
|
||||
ClassLogger.Add(">> Attention: Could not set DocVariable RESULT_INWORK: " & ex.Message, False)
|
||||
RESULT_INWORK = ""
|
||||
End Try
|
||||
Try
|
||||
RESULT_DOC_ID = gridView.GetFocusedRowCellValue(gridView.Columns("DocID"))
|
||||
Catch ex As Exception
|
||||
ClassLogger.Add(">> Attention: Could not set DocVariable RESULT_DOC_ID: " & ex.Message, False)
|
||||
RESULT_DOC_ID = Nothing
|
||||
End Try
|
||||
Try
|
||||
RESULT_DISPLAYNAME = gridView.GetFocusedRowCellValue(gridView.Columns("Displayname"))
|
||||
Catch ex As Exception
|
||||
ClassLogger.Add(">> Attention: Could not set DocVariable RESULT_DISPLAYNAME: " & ex.Message, False)
|
||||
RESULT_DISPLAYNAME = ""
|
||||
End Try
|
||||
If Init_Table() = True Then
|
||||
If gridView.SelectedRowsCount > 0 Then
|
||||
DT_RESULTFILES.Clear()
|
||||
For Each row In gridView.GetSelectedRows
|
||||
Dim newRow As DataRow = DT_RESULTFILES.NewRow()
|
||||
Try
|
||||
Dim DOC_ID = gridView.GetRowCellValue(row, "DocID")
|
||||
SELECTED_DOC_ID = DOC_ID
|
||||
newRow("DOC_ID") = gridView.GetRowCellValue(row, "DocID")
|
||||
Catch ex As Exception
|
||||
newRow("DOC_ID") = 0
|
||||
End Try
|
||||
Try
|
||||
SELECTED_DOC_PATH = gridView.GetRowCellValue(row, "FULLPATH")
|
||||
newRow("DOC_PATH") = gridView.GetRowCellValue(row, "FULLPATH")
|
||||
Catch ex As Exception
|
||||
newRow("DOC_PATH") = ""
|
||||
End Try
|
||||
Try
|
||||
newRow("OBJECTTYPE") = gridView.GetRowCellValue(row, "OBJECTTYPE")
|
||||
Catch ex As Exception
|
||||
newRow("OBJECTTYPE") = ""
|
||||
End Try
|
||||
Try
|
||||
newRow("INWORK") = gridView.GetRowCellValue(row, "in work?")
|
||||
Catch ex As Exception
|
||||
newRow("INWORK") = False
|
||||
End Try
|
||||
Try
|
||||
Dim dpn = gridView.GetRowCellValue(row, "Displayname")
|
||||
If IsDBNull(dpn) Then
|
||||
dpn = ""
|
||||
End If
|
||||
newRow("DISPLAYNAME") = dpn
|
||||
Catch ex As Exception
|
||||
newRow("DISPLAYNAME") = ""
|
||||
End Try
|
||||
DT_RESULTFILES.Rows.Add(newRow)
|
||||
DT_RESULTFILES.AcceptChanges()
|
||||
Next
|
||||
Else
|
||||
Dim newRow As DataRow = DT_RESULTFILES.NewRow()
|
||||
Try
|
||||
Dim DOC_ID = gridView.GetFocusedRowCellValue(gridView.Columns("DocID"))
|
||||
SELECTED_DOC_ID = DOC_ID
|
||||
newRow("DOC_ID") = gridView.GetFocusedRowCellValue(gridView.Columns("DocID"))
|
||||
Catch ex As Exception
|
||||
newRow("DOC_ID") = 0
|
||||
End Try
|
||||
Try
|
||||
SELECTED_DOC_PATH = gridView.GetFocusedRowCellValue(gridView.Columns("FULLPATH"))
|
||||
newRow("DOC_PATH") = gridView.GetFocusedRowCellValue(gridView.Columns("FULLPATH"))
|
||||
Catch ex As Exception
|
||||
newRow("DOC_PATH") = ""
|
||||
End Try
|
||||
Try
|
||||
newRow("OBJECTTYPE") = gridView.GetFocusedRowCellValue(gridView.Columns("OBJECTTYPE"))
|
||||
Catch ex As Exception
|
||||
newRow("OBJECTTYPE") = ""
|
||||
End Try
|
||||
Try
|
||||
newRow("INWORK") = gridView.GetFocusedRowCellValue(gridView.Columns("in work?"))
|
||||
Catch ex As Exception
|
||||
newRow("INWORK") = False
|
||||
End Try
|
||||
Try
|
||||
Dim dpn = gridView.GetFocusedRowCellValue(gridView.Columns("Displayname"))
|
||||
If IsDBNull(dpn) Then
|
||||
dpn = ""
|
||||
End If
|
||||
newRow("DISPLAYNAME") = dpn
|
||||
Catch ex As Exception
|
||||
newRow("DISPLAYNAME") = ""
|
||||
End Try
|
||||
DT_RESULTFILES.Rows.Add(newRow)
|
||||
DT_RESULTFILES.AcceptChanges()
|
||||
End If
|
||||
|
||||
End If
|
||||
'If gridView.SelectedRowsCount = 1 Then
|
||||
' Try
|
||||
' RESULT_DOC_PATH = gridView.GetFocusedRowCellValue(gridView.Columns("FULLPATH"))
|
||||
' Catch ex As Exception
|
||||
' ClassLogger.Add(">> Attention: Could not set DocVariable RESULT_DOC_PATH: " & ex.Message, False)
|
||||
' RESULT_DOC_PATH = Nothing
|
||||
' End Try
|
||||
' Try
|
||||
' RESULT_OBJECTTYPE = gridView.GetFocusedRowCellValue(gridView.Columns("OBJECTTYPE"))
|
||||
' Catch ex As Exception
|
||||
' ClassLogger.Add(">> Attention: Could not set DocVariable RESULT_OBJECTTYPE: " & ex.Message, False)
|
||||
' RESULT_OBJECTTYPE = ""
|
||||
' End Try
|
||||
' Try
|
||||
' RESULT_INWORK = gridView.GetFocusedRowCellValue(gridView.Columns("in work?"))
|
||||
' Catch ex As Exception
|
||||
' ClassLogger.Add(">> Attention: Could not set DocVariable RESULT_INWORK: " & ex.Message, False)
|
||||
' RESULT_INWORK = ""
|
||||
' End Try
|
||||
' Try
|
||||
' RESULT_DOC_ID = gridView.GetFocusedRowCellValue(gridView.Columns("DocID"))
|
||||
' Catch ex As Exception
|
||||
' ClassLogger.Add(">> Attention: Could not set DocVariable RESULT_DOC_ID: " & ex.Message, False)
|
||||
' RESULT_DOC_ID = Nothing
|
||||
' End Try
|
||||
' Try
|
||||
' RESULT_DISPLAYNAME = gridView.GetFocusedRowCellValue(gridView.Columns("Displayname"))
|
||||
' Catch ex As Exception
|
||||
' ClassLogger.Add(">> Attention: Could not set DocVariable RESULT_DISPLAYNAME: " & ex.Message, False)
|
||||
' RESULT_DISPLAYNAME = ""
|
||||
' End Try
|
||||
'Else
|
||||
|
||||
|
||||
'End If
|
||||
|
||||
End Sub
|
||||
|
||||
Public Shared Sub FillColumns(gridView As GridView, DT_RESULT As DataTable, DT_WINDREAM_RESULTLIST As DataTable, DT_DOCRESULT_DROPDOWN_ITEMS As DataTable, DropdownValueChangedHandler As EventHandler, DatepickerValueChangedHandler As EventHandler, TextValueChangedHandler As EventHandler)
|
||||
|
||||
@ -255,6 +255,7 @@
|
||||
<Compile Include="ClassJumpRecord.vb" />
|
||||
<Compile Include="ClassLicence.vb" />
|
||||
<Compile Include="ClassAsyncSQL.vb" />
|
||||
<Compile Include="ClassNodeNavigation.vb" />
|
||||
<Compile Include="ClassNodes.vb" />
|
||||
<Compile Include="ClassRecordState.vb" />
|
||||
<Compile Include="ClassRecordView.vb" />
|
||||
|
||||
321
app/DD-Record-Organiser/DD_DMSDataSet.Designer.vb
generated
321
app/DD-Record-Organiser/DD_DMSDataSet.Designer.vb
generated
@ -36604,7 +36604,7 @@ Namespace DD_DMSDataSetTableAdapters
|
||||
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
|
||||
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
|
||||
Private Sub InitCommandCollection()
|
||||
Me._commandCollection = New Global.System.Data.SqlClient.SqlCommand(1) {}
|
||||
Me._commandCollection = New Global.System.Data.SqlClient.SqlCommand(2) {}
|
||||
Me._commandCollection(0) = New Global.System.Data.SqlClient.SqlCommand()
|
||||
Me._commandCollection(0).Connection = Me.Connection
|
||||
Me._commandCollection(0).CommandText = "SELECT FORMVIEW_ID, FORM_ID, FORM_TITLE, DOKUMENTTYPE_ID, DOKUMENTTYPE, PA"& _
|
||||
@ -36618,6 +36618,13 @@ Namespace DD_DMSDataSetTableAdapters
|
||||
"TH, SHORTNAME, OBJECT_TYPE, FW_DOCTYPE_ID"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"FROM VWPMO_DOKUMENTTYPES"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)& _
|
||||
"ORDER BY DOKUMENTTYPE"
|
||||
Me._commandCollection(1).CommandType = Global.System.Data.CommandType.Text
|
||||
Me._commandCollection(2) = New Global.System.Data.SqlClient.SqlCommand()
|
||||
Me._commandCollection(2).Connection = Me.Connection
|
||||
Me._commandCollection(2).CommandText = "SELECT FORMVIEW_ID, FORM_ID, FORM_TITLE, DOKUMENTTYPE_ID, DOKUMENTTYPE, PA"& _
|
||||
"TH, SHORTNAME, OBJECT_TYPE, FW_DOCTYPE_ID"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"FROM VWPMO_DOKUMENTTYPES"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)& _
|
||||
"WHERE (FORM_ID = @ENTITY_ID)"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"ORDER BY DOKUMENTTYPE"
|
||||
Me._commandCollection(2).CommandType = Global.System.Data.CommandType.Text
|
||||
Me._commandCollection(2).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@ENTITY_ID", Global.System.Data.SqlDbType.Int, 4, Global.System.Data.ParameterDirection.Input, 0, 0, "FORM_ID", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
|
||||
End Sub
|
||||
|
||||
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
|
||||
@ -36669,6 +36676,32 @@ Namespace DD_DMSDataSetTableAdapters
|
||||
Me.Adapter.Fill(dataTable)
|
||||
Return dataTable
|
||||
End Function
|
||||
|
||||
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
|
||||
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0"), _
|
||||
Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"), _
|
||||
Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.Fill, false)> _
|
||||
Public Overloads Overridable Function FillByENTITY_ID(ByVal dataTable As DD_DMSDataSet.VWPMO_DOKUMENTTYPESDataTable, ByVal ENTITY_ID As Integer) As Integer
|
||||
Me.Adapter.SelectCommand = Me.CommandCollection(2)
|
||||
Me.Adapter.SelectCommand.Parameters(0).Value = CType(ENTITY_ID,Integer)
|
||||
If (Me.ClearBeforeFill = true) Then
|
||||
dataTable.Clear
|
||||
End If
|
||||
Dim returnValue As Integer = Me.Adapter.Fill(dataTable)
|
||||
Return returnValue
|
||||
End Function
|
||||
|
||||
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
|
||||
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0"), _
|
||||
Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"), _
|
||||
Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.[Select], false)> _
|
||||
Public Overloads Overridable Function GetDataByENTITY_ID(ByVal ENTITY_ID As Integer) As DD_DMSDataSet.VWPMO_DOKUMENTTYPESDataTable
|
||||
Me.Adapter.SelectCommand = Me.CommandCollection(2)
|
||||
Me.Adapter.SelectCommand.Parameters(0).Value = CType(ENTITY_ID,Integer)
|
||||
Dim dataTable As DD_DMSDataSet.VWPMO_DOKUMENTTYPESDataTable = New DD_DMSDataSet.VWPMO_DOKUMENTTYPESDataTable()
|
||||
Me.Adapter.Fill(dataTable)
|
||||
Return dataTable
|
||||
End Function
|
||||
End Class
|
||||
|
||||
'''<summary>
|
||||
@ -51138,258 +51171,258 @@ Namespace DD_DMSDataSetTableAdapters
|
||||
Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_GUID", Global.System.Data.SqlDbType.Int, 4, Global.System.Data.ParameterDirection.Input, 0, 0, "GUID", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
|
||||
Me._adapter.InsertCommand = New Global.System.Data.SqlClient.SqlCommand()
|
||||
Me._adapter.InsertCommand.Connection = Me.Connection
|
||||
Me._adapter.InsertCommand.CommandText = "INSERT INTO TBPMO_STRUCTURE_NODES_CONFIGURATION" & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10) & " (ENTITY" & _
|
||||
"_ID, TYPE_NODE, NODE_IMAGE, CREATE_RECORD, ADDED_WHO, NAME, COMMENT, PARENT_NODE" & _
|
||||
")" & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10) & "VALUES (@ENTITY_ID,@TYPE_NODE,@NODE_IMAGE,@CREATE_RECORD,@ADDED_WHO,@N" & _
|
||||
"AME,@COMMENT,@PARENT_NODE); " & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10) & "SELECT GUID, ENTITY_ID, TYPE_NODE, NODE_IMAGE, C" & _
|
||||
"REATE_RECORD, ADDED_WHO, ADDED_WHEN, CHANGED_WHO, CHANGED_WHEN FROM TBPMO_STRUCT" & _
|
||||
Me._adapter.InsertCommand.CommandText = "INSERT INTO TBPMO_STRUCTURE_NODES_CONFIGURATION"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" (ENTITY"& _
|
||||
"_ID, TYPE_NODE, NODE_IMAGE, CREATE_RECORD, ADDED_WHO, NAME, COMMENT, PARENT_NODE"& _
|
||||
")"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"VALUES (@ENTITY_ID,@TYPE_NODE,@NODE_IMAGE,@CREATE_RECORD,@ADDED_WHO,@N"& _
|
||||
"AME,@COMMENT,@PARENT_NODE); "&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"SELECT GUID, ENTITY_ID, TYPE_NODE, NODE_IMAGE, C"& _
|
||||
"REATE_RECORD, ADDED_WHO, ADDED_WHEN, CHANGED_WHO, CHANGED_WHEN FROM TBPMO_STRUCT"& _
|
||||
"URE_NODES_CONFIGURATION WHERE (GUID = SCOPE_IDENTITY())"
|
||||
Me._adapter.InsertCommand.CommandType = Global.System.Data.CommandType.Text
|
||||
Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@ENTITY_ID", Global.System.Data.SqlDbType.Int, 4, Global.System.Data.ParameterDirection.Input, 0, 0, "ENTITY_ID", Global.System.Data.DataRowVersion.Current, False, Nothing, "", "", ""))
|
||||
Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@TYPE_NODE", Global.System.Data.SqlDbType.SmallInt, 2, Global.System.Data.ParameterDirection.Input, 0, 0, "TYPE_NODE", Global.System.Data.DataRowVersion.Current, False, Nothing, "", "", ""))
|
||||
Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@NODE_IMAGE", Global.System.Data.SqlDbType.VarBinary, 2147483647, Global.System.Data.ParameterDirection.Input, 0, 0, "NODE_IMAGE", Global.System.Data.DataRowVersion.Current, False, Nothing, "", "", ""))
|
||||
Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@CREATE_RECORD", Global.System.Data.SqlDbType.Bit, 1, Global.System.Data.ParameterDirection.Input, 0, 0, "CREATE_RECORD", Global.System.Data.DataRowVersion.Current, False, Nothing, "", "", ""))
|
||||
Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@ADDED_WHO", Global.System.Data.SqlDbType.VarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "ADDED_WHO", Global.System.Data.DataRowVersion.Current, False, Nothing, "", "", ""))
|
||||
Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@NAME", Global.System.Data.SqlDbType.VarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "NAME", Global.System.Data.DataRowVersion.Current, False, Nothing, "", "", ""))
|
||||
Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@COMMENT", Global.System.Data.SqlDbType.VarChar, 300, Global.System.Data.ParameterDirection.Input, 0, 0, "COMMENT", Global.System.Data.DataRowVersion.Current, False, Nothing, "", "", ""))
|
||||
Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@PARENT_NODE", Global.System.Data.SqlDbType.Int, 4, Global.System.Data.ParameterDirection.Input, 0, 0, "PARENT_NODE", Global.System.Data.DataRowVersion.Current, False, Nothing, "", "", ""))
|
||||
Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@ENTITY_ID", Global.System.Data.SqlDbType.Int, 4, Global.System.Data.ParameterDirection.Input, 0, 0, "ENTITY_ID", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
|
||||
Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@TYPE_NODE", Global.System.Data.SqlDbType.SmallInt, 2, Global.System.Data.ParameterDirection.Input, 0, 0, "TYPE_NODE", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
|
||||
Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@NODE_IMAGE", Global.System.Data.SqlDbType.VarBinary, 2147483647, Global.System.Data.ParameterDirection.Input, 0, 0, "NODE_IMAGE", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
|
||||
Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@CREATE_RECORD", Global.System.Data.SqlDbType.Bit, 1, Global.System.Data.ParameterDirection.Input, 0, 0, "CREATE_RECORD", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
|
||||
Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@ADDED_WHO", Global.System.Data.SqlDbType.VarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "ADDED_WHO", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
|
||||
Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@NAME", Global.System.Data.SqlDbType.VarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "NAME", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
|
||||
Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@COMMENT", Global.System.Data.SqlDbType.VarChar, 300, Global.System.Data.ParameterDirection.Input, 0, 0, "COMMENT", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
|
||||
Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@PARENT_NODE", Global.System.Data.SqlDbType.Int, 4, Global.System.Data.ParameterDirection.Input, 0, 0, "PARENT_NODE", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
|
||||
Me._adapter.UpdateCommand = New Global.System.Data.SqlClient.SqlCommand()
|
||||
Me._adapter.UpdateCommand.Connection = Me.Connection
|
||||
Me._adapter.UpdateCommand.CommandText = "UPDATE TBPMO_STRUCTURE_NODES_CONFIGURATION" & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10) & "SET ENTITY_ID = " & _
|
||||
"@ENTITY_ID, TYPE_NODE = @TYPE_NODE, NODE_IMAGE = @NODE_IMAGE, CREATE_RECORD = @C" & _
|
||||
"REATE_RECORD, CHANGED_WHO = @CHANGED_WHO, NAME = @NAME, " & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10) & " " & _
|
||||
" COMMENT = @COMMENT, PARENT_NODE = @PARENT_NODE" & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10) & "WHERE (GUID = @Origina" & _
|
||||
"l_GUID); " & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10) & "SELECT GUID, ENTITY_ID, TYPE_NODE, NODE_IMAGE, CREATE_RECORD, ADDED" & _
|
||||
"_WHO, ADDED_WHEN, CHANGED_WHO, CHANGED_WHEN FROM TBPMO_STRUCTURE_NODES_CONFIGURA" & _
|
||||
Me._adapter.UpdateCommand.CommandText = "UPDATE TBPMO_STRUCTURE_NODES_CONFIGURATION"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"SET ENTITY_ID = "& _
|
||||
"@ENTITY_ID, TYPE_NODE = @TYPE_NODE, NODE_IMAGE = @NODE_IMAGE, CREATE_RECORD = @C"& _
|
||||
"REATE_RECORD, CHANGED_WHO = @CHANGED_WHO, NAME = @NAME, "&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" "& _
|
||||
" COMMENT = @COMMENT, PARENT_NODE = @PARENT_NODE"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"WHERE (GUID = @Origina"& _
|
||||
"l_GUID); "&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"SELECT GUID, ENTITY_ID, TYPE_NODE, NODE_IMAGE, CREATE_RECORD, ADDED"& _
|
||||
"_WHO, ADDED_WHEN, CHANGED_WHO, CHANGED_WHEN FROM TBPMO_STRUCTURE_NODES_CONFIGURA"& _
|
||||
"TION WHERE (GUID = @GUID)"
|
||||
Me._adapter.UpdateCommand.CommandType = Global.System.Data.CommandType.Text
|
||||
Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@ENTITY_ID", Global.System.Data.SqlDbType.Int, 4, Global.System.Data.ParameterDirection.Input, 0, 0, "ENTITY_ID", Global.System.Data.DataRowVersion.Current, False, Nothing, "", "", ""))
|
||||
Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@TYPE_NODE", Global.System.Data.SqlDbType.SmallInt, 2, Global.System.Data.ParameterDirection.Input, 0, 0, "TYPE_NODE", Global.System.Data.DataRowVersion.Current, False, Nothing, "", "", ""))
|
||||
Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@NODE_IMAGE", Global.System.Data.SqlDbType.VarBinary, 2147483647, Global.System.Data.ParameterDirection.Input, 0, 0, "NODE_IMAGE", Global.System.Data.DataRowVersion.Current, False, Nothing, "", "", ""))
|
||||
Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@CREATE_RECORD", Global.System.Data.SqlDbType.Bit, 1, Global.System.Data.ParameterDirection.Input, 0, 0, "CREATE_RECORD", Global.System.Data.DataRowVersion.Current, False, Nothing, "", "", ""))
|
||||
Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@CHANGED_WHO", Global.System.Data.SqlDbType.VarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "CHANGED_WHO", Global.System.Data.DataRowVersion.Current, False, Nothing, "", "", ""))
|
||||
Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@NAME", Global.System.Data.SqlDbType.VarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "NAME", Global.System.Data.DataRowVersion.Current, False, Nothing, "", "", ""))
|
||||
Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@COMMENT", Global.System.Data.SqlDbType.VarChar, 300, Global.System.Data.ParameterDirection.Input, 0, 0, "COMMENT", Global.System.Data.DataRowVersion.Current, False, Nothing, "", "", ""))
|
||||
Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@PARENT_NODE", Global.System.Data.SqlDbType.Int, 4, Global.System.Data.ParameterDirection.Input, 0, 0, "PARENT_NODE", Global.System.Data.DataRowVersion.Current, False, Nothing, "", "", ""))
|
||||
Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_GUID", Global.System.Data.SqlDbType.Int, 4, Global.System.Data.ParameterDirection.Input, 0, 0, "GUID", Global.System.Data.DataRowVersion.Original, False, Nothing, "", "", ""))
|
||||
Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@GUID", Global.System.Data.SqlDbType.Int, 4, Global.System.Data.ParameterDirection.Input, 0, 0, "GUID", Global.System.Data.DataRowVersion.Original, False, Nothing, "", "", ""))
|
||||
Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@ENTITY_ID", Global.System.Data.SqlDbType.Int, 4, Global.System.Data.ParameterDirection.Input, 0, 0, "ENTITY_ID", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
|
||||
Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@TYPE_NODE", Global.System.Data.SqlDbType.SmallInt, 2, Global.System.Data.ParameterDirection.Input, 0, 0, "TYPE_NODE", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
|
||||
Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@NODE_IMAGE", Global.System.Data.SqlDbType.VarBinary, 2147483647, Global.System.Data.ParameterDirection.Input, 0, 0, "NODE_IMAGE", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
|
||||
Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@CREATE_RECORD", Global.System.Data.SqlDbType.Bit, 1, Global.System.Data.ParameterDirection.Input, 0, 0, "CREATE_RECORD", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
|
||||
Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@CHANGED_WHO", Global.System.Data.SqlDbType.VarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "CHANGED_WHO", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
|
||||
Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@NAME", Global.System.Data.SqlDbType.VarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "NAME", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
|
||||
Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@COMMENT", Global.System.Data.SqlDbType.VarChar, 300, Global.System.Data.ParameterDirection.Input, 0, 0, "COMMENT", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
|
||||
Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@PARENT_NODE", Global.System.Data.SqlDbType.Int, 4, Global.System.Data.ParameterDirection.Input, 0, 0, "PARENT_NODE", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
|
||||
Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_GUID", Global.System.Data.SqlDbType.Int, 4, Global.System.Data.ParameterDirection.Input, 0, 0, "GUID", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
|
||||
Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@GUID", Global.System.Data.SqlDbType.Int, 4, Global.System.Data.ParameterDirection.Input, 0, 0, "GUID", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
|
||||
End Sub
|
||||
|
||||
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
|
||||
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
|
||||
|
||||
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
|
||||
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
|
||||
Private Sub InitConnection()
|
||||
Me._connection = New Global.System.Data.SqlClient.SqlConnection()
|
||||
Me._connection.ConnectionString = Global.DD_Record_Organiser.My.MySettings.Default.DD_DMSConnectionString
|
||||
End Sub
|
||||
|
||||
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
|
||||
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
|
||||
|
||||
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
|
||||
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
|
||||
Private Sub InitCommandCollection()
|
||||
Me._commandCollection = New Global.System.Data.SqlClient.SqlCommand(1) {}
|
||||
Me._commandCollection(0) = New Global.System.Data.SqlClient.SqlCommand()
|
||||
Me._commandCollection(0).Connection = Me.Connection
|
||||
Me._commandCollection(0).CommandText = "SELECT GUID, ENTITY_ID, TYPE_NODE, NODE_IMAGE, CREATE_RECORD, ADDED_WHO, A" & _
|
||||
"DDED_WHEN, CHANGED_WHO, CHANGED_WHEN, NAME, COMMENT, PARENT_NODE" & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10) & "FROM " & _
|
||||
" TBPMO_STRUCTURE_NODES_CONFIGURATION" & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10) & "WHERE (ENTITY_ID = @ENTITY_ID)" & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10) & "OR" & _
|
||||
Me._commandCollection(0).CommandText = "SELECT GUID, ENTITY_ID, TYPE_NODE, NODE_IMAGE, CREATE_RECORD, ADDED_WHO, A"& _
|
||||
"DDED_WHEN, CHANGED_WHO, CHANGED_WHEN, NAME, COMMENT, PARENT_NODE"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"FROM "& _
|
||||
" TBPMO_STRUCTURE_NODES_CONFIGURATION"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"WHERE (ENTITY_ID = @ENTITY_ID)"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"OR"& _
|
||||
"DER BY ENTITY_ID, TYPE_NODE"
|
||||
Me._commandCollection(0).CommandType = Global.System.Data.CommandType.Text
|
||||
Me._commandCollection(0).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@ENTITY_ID", Global.System.Data.SqlDbType.Int, 4, Global.System.Data.ParameterDirection.Input, 0, 0, "ENTITY_ID", Global.System.Data.DataRowVersion.Current, False, Nothing, "", "", ""))
|
||||
Me._commandCollection(0).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@ENTITY_ID", Global.System.Data.SqlDbType.Int, 4, Global.System.Data.ParameterDirection.Input, 0, 0, "ENTITY_ID", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
|
||||
Me._commandCollection(1) = New Global.System.Data.SqlClient.SqlCommand()
|
||||
Me._commandCollection(1).Connection = Me.Connection
|
||||
Me._commandCollection(1).CommandText = "SELECT GUID, ENTITY_ID, TYPE_NODE, NODE_IMAGE, CREATE_RECORD, ADDED_WHO, A" & _
|
||||
"DDED_WHEN, CHANGED_WHO, CHANGED_WHEN, NAME, COMMENT, PARENT_NODE" & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10) & "FROM " & _
|
||||
Me._commandCollection(1).CommandText = "SELECT GUID, ENTITY_ID, TYPE_NODE, NODE_IMAGE, CREATE_RECORD, ADDED_WHO, A"& _
|
||||
"DDED_WHEN, CHANGED_WHO, CHANGED_WHEN, NAME, COMMENT, PARENT_NODE"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"FROM "& _
|
||||
" TBPMO_STRUCTURE_NODES_CONFIGURATION where GUID = @GUID"
|
||||
Me._commandCollection(1).CommandType = Global.System.Data.CommandType.Text
|
||||
Me._commandCollection(1).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@GUID", Global.System.Data.SqlDbType.Int, 4, Global.System.Data.ParameterDirection.Input, 0, 0, "GUID", Global.System.Data.DataRowVersion.Current, False, Nothing, "", "", ""))
|
||||
Me._commandCollection(1).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@GUID", Global.System.Data.SqlDbType.Int, 4, Global.System.Data.ParameterDirection.Input, 0, 0, "GUID", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
|
||||
End Sub
|
||||
|
||||
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
|
||||
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0"), _
|
||||
Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"), _
|
||||
Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.Fill, True)> _
|
||||
Public Overridable Overloads Function Fill(ByVal dataTable As DD_DMSDataSet.TBPMO_STRUCTURE_NODES_CONFIGURATIONDataTable, ByVal ENTITY_ID As Integer) As Integer
|
||||
|
||||
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
|
||||
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0"), _
|
||||
Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"), _
|
||||
Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.Fill, true)> _
|
||||
Public Overloads Overridable Function Fill(ByVal dataTable As DD_DMSDataSet.TBPMO_STRUCTURE_NODES_CONFIGURATIONDataTable, ByVal ENTITY_ID As Integer) As Integer
|
||||
Me.Adapter.SelectCommand = Me.CommandCollection(0)
|
||||
Me.Adapter.SelectCommand.Parameters(0).Value = CType(ENTITY_ID, Integer)
|
||||
If (Me.ClearBeforeFill = True) Then
|
||||
dataTable.Clear()
|
||||
Me.Adapter.SelectCommand.Parameters(0).Value = CType(ENTITY_ID,Integer)
|
||||
If (Me.ClearBeforeFill = true) Then
|
||||
dataTable.Clear
|
||||
End If
|
||||
Dim returnValue As Integer = Me.Adapter.Fill(dataTable)
|
||||
Return returnValue
|
||||
End Function
|
||||
|
||||
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
|
||||
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0"), _
|
||||
Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"), _
|
||||
Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.[Select], True)> _
|
||||
Public Overridable Overloads Function GetData(ByVal ENTITY_ID As Integer) As DD_DMSDataSet.TBPMO_STRUCTURE_NODES_CONFIGURATIONDataTable
|
||||
|
||||
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
|
||||
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0"), _
|
||||
Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"), _
|
||||
Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.[Select], true)> _
|
||||
Public Overloads Overridable Function GetData(ByVal ENTITY_ID As Integer) As DD_DMSDataSet.TBPMO_STRUCTURE_NODES_CONFIGURATIONDataTable
|
||||
Me.Adapter.SelectCommand = Me.CommandCollection(0)
|
||||
Me.Adapter.SelectCommand.Parameters(0).Value = CType(ENTITY_ID, Integer)
|
||||
Me.Adapter.SelectCommand.Parameters(0).Value = CType(ENTITY_ID,Integer)
|
||||
Dim dataTable As DD_DMSDataSet.TBPMO_STRUCTURE_NODES_CONFIGURATIONDataTable = New DD_DMSDataSet.TBPMO_STRUCTURE_NODES_CONFIGURATIONDataTable()
|
||||
Me.Adapter.Fill(dataTable)
|
||||
Return dataTable
|
||||
End Function
|
||||
|
||||
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
|
||||
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0"), _
|
||||
Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"), _
|
||||
Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.Fill, False)> _
|
||||
Public Overridable Overloads Function FillByID(ByVal dataTable As DD_DMSDataSet.TBPMO_STRUCTURE_NODES_CONFIGURATIONDataTable, ByVal GUID As Integer) As Integer
|
||||
|
||||
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
|
||||
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0"), _
|
||||
Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"), _
|
||||
Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.Fill, false)> _
|
||||
Public Overloads Overridable Function FillByID(ByVal dataTable As DD_DMSDataSet.TBPMO_STRUCTURE_NODES_CONFIGURATIONDataTable, ByVal GUID As Integer) As Integer
|
||||
Me.Adapter.SelectCommand = Me.CommandCollection(1)
|
||||
Me.Adapter.SelectCommand.Parameters(0).Value = CType(GUID, Integer)
|
||||
If (Me.ClearBeforeFill = True) Then
|
||||
dataTable.Clear()
|
||||
Me.Adapter.SelectCommand.Parameters(0).Value = CType(GUID,Integer)
|
||||
If (Me.ClearBeforeFill = true) Then
|
||||
dataTable.Clear
|
||||
End If
|
||||
Dim returnValue As Integer = Me.Adapter.Fill(dataTable)
|
||||
Return returnValue
|
||||
End Function
|
||||
|
||||
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
|
||||
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0"), _
|
||||
Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"), _
|
||||
Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.[Select], False)> _
|
||||
Public Overridable Overloads Function GetDataByID(ByVal GUID As Integer) As DD_DMSDataSet.TBPMO_STRUCTURE_NODES_CONFIGURATIONDataTable
|
||||
|
||||
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
|
||||
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0"), _
|
||||
Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"), _
|
||||
Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.[Select], false)> _
|
||||
Public Overloads Overridable Function GetDataByID(ByVal GUID As Integer) As DD_DMSDataSet.TBPMO_STRUCTURE_NODES_CONFIGURATIONDataTable
|
||||
Me.Adapter.SelectCommand = Me.CommandCollection(1)
|
||||
Me.Adapter.SelectCommand.Parameters(0).Value = CType(GUID, Integer)
|
||||
Me.Adapter.SelectCommand.Parameters(0).Value = CType(GUID,Integer)
|
||||
Dim dataTable As DD_DMSDataSet.TBPMO_STRUCTURE_NODES_CONFIGURATIONDataTable = New DD_DMSDataSet.TBPMO_STRUCTURE_NODES_CONFIGURATIONDataTable()
|
||||
Me.Adapter.Fill(dataTable)
|
||||
Return dataTable
|
||||
End Function
|
||||
|
||||
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
|
||||
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0"), _
|
||||
Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")> _
|
||||
Public Overridable Overloads Function Update(ByVal dataTable As DD_DMSDataSet.TBPMO_STRUCTURE_NODES_CONFIGURATIONDataTable) As Integer
|
||||
|
||||
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
|
||||
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0"), _
|
||||
Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")> _
|
||||
Public Overloads Overridable Function Update(ByVal dataTable As DD_DMSDataSet.TBPMO_STRUCTURE_NODES_CONFIGURATIONDataTable) As Integer
|
||||
Return Me.Adapter.Update(dataTable)
|
||||
End Function
|
||||
|
||||
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
|
||||
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0"), _
|
||||
Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")> _
|
||||
Public Overridable Overloads Function Update(ByVal dataSet As DD_DMSDataSet) As Integer
|
||||
|
||||
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
|
||||
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0"), _
|
||||
Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")> _
|
||||
Public Overloads Overridable Function Update(ByVal dataSet As DD_DMSDataSet) As Integer
|
||||
Return Me.Adapter.Update(dataSet, "TBPMO_STRUCTURE_NODES_CONFIGURATION")
|
||||
End Function
|
||||
|
||||
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
|
||||
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0"), _
|
||||
Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")> _
|
||||
Public Overridable Overloads Function Update(ByVal dataRow As Global.System.Data.DataRow) As Integer
|
||||
|
||||
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
|
||||
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0"), _
|
||||
Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")> _
|
||||
Public Overloads Overridable Function Update(ByVal dataRow As Global.System.Data.DataRow) As Integer
|
||||
Return Me.Adapter.Update(New Global.System.Data.DataRow() {dataRow})
|
||||
End Function
|
||||
|
||||
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
|
||||
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0"), _
|
||||
Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")> _
|
||||
Public Overridable Overloads Function Update(ByVal dataRows() As Global.System.Data.DataRow) As Integer
|
||||
|
||||
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
|
||||
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0"), _
|
||||
Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")> _
|
||||
Public Overloads Overridable Function Update(ByVal dataRows() As Global.System.Data.DataRow) As Integer
|
||||
Return Me.Adapter.Update(dataRows)
|
||||
End Function
|
||||
|
||||
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
|
||||
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0"), _
|
||||
Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"), _
|
||||
Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.Delete, True)> _
|
||||
Public Overridable Overloads Function Delete(ByVal Original_GUID As Integer) As Integer
|
||||
Me.Adapter.DeleteCommand.Parameters(0).Value = CType(Original_GUID, Integer)
|
||||
|
||||
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
|
||||
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0"), _
|
||||
Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"), _
|
||||
Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.Delete, true)> _
|
||||
Public Overloads Overridable Function Delete(ByVal Original_GUID As Integer) As Integer
|
||||
Me.Adapter.DeleteCommand.Parameters(0).Value = CType(Original_GUID,Integer)
|
||||
Dim previousConnectionState As Global.System.Data.ConnectionState = Me.Adapter.DeleteCommand.Connection.State
|
||||
If ((Me.Adapter.DeleteCommand.Connection.State And Global.System.Data.ConnectionState.Open) _
|
||||
If ((Me.Adapter.DeleteCommand.Connection.State And Global.System.Data.ConnectionState.Open) _
|
||||
<> Global.System.Data.ConnectionState.Open) Then
|
||||
Me.Adapter.DeleteCommand.Connection.Open()
|
||||
Me.Adapter.DeleteCommand.Connection.Open
|
||||
End If
|
||||
Try
|
||||
Try
|
||||
Dim returnValue As Integer = Me.Adapter.DeleteCommand.ExecuteNonQuery
|
||||
Return returnValue
|
||||
Finally
|
||||
If (previousConnectionState = Global.System.Data.ConnectionState.Closed) Then
|
||||
Me.Adapter.DeleteCommand.Connection.Close()
|
||||
Me.Adapter.DeleteCommand.Connection.Close
|
||||
End If
|
||||
End Try
|
||||
End Function
|
||||
|
||||
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
|
||||
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0"), _
|
||||
Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"), _
|
||||
Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.Insert, True)> _
|
||||
Public Overridable Overloads Function Insert(ByVal ENTITY_ID As Integer, ByVal TYPE_NODE As Short, ByVal NODE_IMAGE() As Byte, ByVal CREATE_RECORD As Boolean, ByVal ADDED_WHO As String, ByVal NAME As String, ByVal COMMENT As String, ByVal PARENT_NODE As Integer) As Integer
|
||||
Me.Adapter.InsertCommand.Parameters(0).Value = CType(ENTITY_ID, Integer)
|
||||
Me.Adapter.InsertCommand.Parameters(1).Value = CType(TYPE_NODE, Short)
|
||||
|
||||
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
|
||||
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0"), _
|
||||
Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"), _
|
||||
Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.Insert, true)> _
|
||||
Public Overloads Overridable Function Insert(ByVal ENTITY_ID As Integer, ByVal TYPE_NODE As Short, ByVal NODE_IMAGE() As Byte, ByVal CREATE_RECORD As Boolean, ByVal ADDED_WHO As String, ByVal NAME As String, ByVal COMMENT As String, ByVal PARENT_NODE As Integer) As Integer
|
||||
Me.Adapter.InsertCommand.Parameters(0).Value = CType(ENTITY_ID,Integer)
|
||||
Me.Adapter.InsertCommand.Parameters(1).Value = CType(TYPE_NODE,Short)
|
||||
If (NODE_IMAGE Is Nothing) Then
|
||||
Me.Adapter.InsertCommand.Parameters(2).Value = Global.System.DBNull.Value
|
||||
Else
|
||||
Me.Adapter.InsertCommand.Parameters(2).Value = CType(NODE_IMAGE, Byte())
|
||||
Me.Adapter.InsertCommand.Parameters(2).Value = CType(NODE_IMAGE,Byte())
|
||||
End If
|
||||
Me.Adapter.InsertCommand.Parameters(3).Value = CType(CREATE_RECORD, Boolean)
|
||||
Me.Adapter.InsertCommand.Parameters(3).Value = CType(CREATE_RECORD,Boolean)
|
||||
If (ADDED_WHO Is Nothing) Then
|
||||
Throw New Global.System.ArgumentNullException("ADDED_WHO")
|
||||
Else
|
||||
Me.Adapter.InsertCommand.Parameters(4).Value = CType(ADDED_WHO, String)
|
||||
Me.Adapter.InsertCommand.Parameters(4).Value = CType(ADDED_WHO,String)
|
||||
End If
|
||||
If (NAME Is Nothing) Then
|
||||
Throw New Global.System.ArgumentNullException("NAME")
|
||||
Else
|
||||
Me.Adapter.InsertCommand.Parameters(5).Value = CType(NAME, String)
|
||||
Me.Adapter.InsertCommand.Parameters(5).Value = CType(NAME,String)
|
||||
End If
|
||||
If (COMMENT Is Nothing) Then
|
||||
Me.Adapter.InsertCommand.Parameters(6).Value = Global.System.DBNull.Value
|
||||
Else
|
||||
Me.Adapter.InsertCommand.Parameters(6).Value = CType(COMMENT, String)
|
||||
Me.Adapter.InsertCommand.Parameters(6).Value = CType(COMMENT,String)
|
||||
End If
|
||||
Me.Adapter.InsertCommand.Parameters(7).Value = CType(PARENT_NODE, Integer)
|
||||
Me.Adapter.InsertCommand.Parameters(7).Value = CType(PARENT_NODE,Integer)
|
||||
Dim previousConnectionState As Global.System.Data.ConnectionState = Me.Adapter.InsertCommand.Connection.State
|
||||
If ((Me.Adapter.InsertCommand.Connection.State And Global.System.Data.ConnectionState.Open) _
|
||||
If ((Me.Adapter.InsertCommand.Connection.State And Global.System.Data.ConnectionState.Open) _
|
||||
<> Global.System.Data.ConnectionState.Open) Then
|
||||
Me.Adapter.InsertCommand.Connection.Open()
|
||||
Me.Adapter.InsertCommand.Connection.Open
|
||||
End If
|
||||
Try
|
||||
Try
|
||||
Dim returnValue As Integer = Me.Adapter.InsertCommand.ExecuteNonQuery
|
||||
Return returnValue
|
||||
Finally
|
||||
If (previousConnectionState = Global.System.Data.ConnectionState.Closed) Then
|
||||
Me.Adapter.InsertCommand.Connection.Close()
|
||||
Me.Adapter.InsertCommand.Connection.Close
|
||||
End If
|
||||
End Try
|
||||
End Function
|
||||
|
||||
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
|
||||
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0"), _
|
||||
Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"), _
|
||||
Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.Update, True)> _
|
||||
Public Overridable Overloads Function Update(ByVal ENTITY_ID As Integer, ByVal TYPE_NODE As Short, ByVal NODE_IMAGE() As Byte, ByVal CREATE_RECORD As Boolean, ByVal CHANGED_WHO As String, ByVal NAME As String, ByVal COMMENT As String, ByVal PARENT_NODE As Integer, ByVal Original_GUID As Integer, ByVal GUID As Integer) As Integer
|
||||
Me.Adapter.UpdateCommand.Parameters(0).Value = CType(ENTITY_ID, Integer)
|
||||
Me.Adapter.UpdateCommand.Parameters(1).Value = CType(TYPE_NODE, Short)
|
||||
|
||||
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
|
||||
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0"), _
|
||||
Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"), _
|
||||
Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.Update, true)> _
|
||||
Public Overloads Overridable Function Update(ByVal ENTITY_ID As Integer, ByVal TYPE_NODE As Short, ByVal NODE_IMAGE() As Byte, ByVal CREATE_RECORD As Boolean, ByVal CHANGED_WHO As String, ByVal NAME As String, ByVal COMMENT As String, ByVal PARENT_NODE As Integer, ByVal Original_GUID As Integer, ByVal GUID As Integer) As Integer
|
||||
Me.Adapter.UpdateCommand.Parameters(0).Value = CType(ENTITY_ID,Integer)
|
||||
Me.Adapter.UpdateCommand.Parameters(1).Value = CType(TYPE_NODE,Short)
|
||||
If (NODE_IMAGE Is Nothing) Then
|
||||
Me.Adapter.UpdateCommand.Parameters(2).Value = Global.System.DBNull.Value
|
||||
Else
|
||||
Me.Adapter.UpdateCommand.Parameters(2).Value = CType(NODE_IMAGE, Byte())
|
||||
Me.Adapter.UpdateCommand.Parameters(2).Value = CType(NODE_IMAGE,Byte())
|
||||
End If
|
||||
Me.Adapter.UpdateCommand.Parameters(3).Value = CType(CREATE_RECORD, Boolean)
|
||||
Me.Adapter.UpdateCommand.Parameters(3).Value = CType(CREATE_RECORD,Boolean)
|
||||
If (CHANGED_WHO Is Nothing) Then
|
||||
Me.Adapter.UpdateCommand.Parameters(4).Value = Global.System.DBNull.Value
|
||||
Else
|
||||
Me.Adapter.UpdateCommand.Parameters(4).Value = CType(CHANGED_WHO, String)
|
||||
Me.Adapter.UpdateCommand.Parameters(4).Value = CType(CHANGED_WHO,String)
|
||||
End If
|
||||
If (NAME Is Nothing) Then
|
||||
Throw New Global.System.ArgumentNullException("NAME")
|
||||
Else
|
||||
Me.Adapter.UpdateCommand.Parameters(5).Value = CType(NAME, String)
|
||||
Me.Adapter.UpdateCommand.Parameters(5).Value = CType(NAME,String)
|
||||
End If
|
||||
If (COMMENT Is Nothing) Then
|
||||
Me.Adapter.UpdateCommand.Parameters(6).Value = Global.System.DBNull.Value
|
||||
Else
|
||||
Me.Adapter.UpdateCommand.Parameters(6).Value = CType(COMMENT, String)
|
||||
Me.Adapter.UpdateCommand.Parameters(6).Value = CType(COMMENT,String)
|
||||
End If
|
||||
Me.Adapter.UpdateCommand.Parameters(7).Value = CType(PARENT_NODE, Integer)
|
||||
Me.Adapter.UpdateCommand.Parameters(8).Value = CType(Original_GUID, Integer)
|
||||
Me.Adapter.UpdateCommand.Parameters(9).Value = CType(GUID, Integer)
|
||||
Me.Adapter.UpdateCommand.Parameters(7).Value = CType(PARENT_NODE,Integer)
|
||||
Me.Adapter.UpdateCommand.Parameters(8).Value = CType(Original_GUID,Integer)
|
||||
Me.Adapter.UpdateCommand.Parameters(9).Value = CType(GUID,Integer)
|
||||
Dim previousConnectionState As Global.System.Data.ConnectionState = Me.Adapter.UpdateCommand.Connection.State
|
||||
If ((Me.Adapter.UpdateCommand.Connection.State And Global.System.Data.ConnectionState.Open) _
|
||||
If ((Me.Adapter.UpdateCommand.Connection.State And Global.System.Data.ConnectionState.Open) _
|
||||
<> Global.System.Data.ConnectionState.Open) Then
|
||||
Me.Adapter.UpdateCommand.Connection.Open()
|
||||
Me.Adapter.UpdateCommand.Connection.Open
|
||||
End If
|
||||
Try
|
||||
Try
|
||||
Dim returnValue As Integer = Me.Adapter.UpdateCommand.ExecuteNonQuery
|
||||
Return returnValue
|
||||
Finally
|
||||
If (previousConnectionState = Global.System.Data.ConnectionState.Closed) Then
|
||||
Me.Adapter.UpdateCommand.Connection.Close()
|
||||
Me.Adapter.UpdateCommand.Connection.Close
|
||||
End If
|
||||
End Try
|
||||
End Function
|
||||
|
||||
@ -373,6 +373,19 @@ ORDER BY DOKUMENTTYPE</CommandText>
|
||||
</DbCommand>
|
||||
</SelectCommand>
|
||||
</DbSource>
|
||||
<DbSource ConnectionRef="DD_DMSConnectionString (MySettings)" DbObjectName="DD_ECM.dbo.VWPMO_DOKUMENTTYPES" DbObjectType="View" FillMethodModifier="Public" FillMethodName="FillByENTITY_ID" GenerateMethods="Both" GenerateShortCommands="true" GeneratorGetMethodName="GetDataByENTITY_ID" GeneratorSourceName="FillByENTITY_ID" GetMethodModifier="Public" GetMethodName="GetDataByENTITY_ID" QueryType="Rowset" ScalarCallRetval="System.Object, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089" UseOptimisticConcurrency="true" UserGetMethodName="GetDataByENTITY_ID" UserSourceName="FillByENTITY_ID">
|
||||
<SelectCommand>
|
||||
<DbCommand CommandType="Text" ModifiedByUser="true">
|
||||
<CommandText>SELECT FORMVIEW_ID, FORM_ID, FORM_TITLE, DOKUMENTTYPE_ID, DOKUMENTTYPE, PATH, SHORTNAME, OBJECT_TYPE, FW_DOCTYPE_ID
|
||||
FROM VWPMO_DOKUMENTTYPES
|
||||
WHERE (FORM_ID = @ENTITY_ID)
|
||||
ORDER BY DOKUMENTTYPE</CommandText>
|
||||
<Parameters>
|
||||
<Parameter AllowDbNull="false" AutogeneratedName="ENTITY_ID" ColumnName="FORM_ID" DataSourceName="DD_ECM.dbo.VWPMO_DOKUMENTTYPES" DataTypeServer="int" DbType="Int32" Direction="Input" ParameterName="@ENTITY_ID" Precision="0" ProviderType="Int" Scale="0" Size="4" SourceColumn="FORM_ID" SourceColumnNullMapping="false" SourceVersion="Current" />
|
||||
</Parameters>
|
||||
</DbCommand>
|
||||
</SelectCommand>
|
||||
</DbSource>
|
||||
</Sources>
|
||||
</TableAdapter>
|
||||
<TableAdapter BaseClass="System.ComponentModel.Component" DataAccessorModifier="AutoLayout, AnsiClass, Class, Public" DataAccessorName="TBPMO_WD_FVIEW_DT_INDEXTableAdapter" GeneratorDataComponentClassName="TBPMO_WD_FVIEW_DT_INDEXTableAdapter" Name="TBPMO_WD_FVIEW_DT_INDEX" UserDataComponentName="TBPMO_WD_FVIEW_DT_INDEXTableAdapter">
|
||||
@ -3448,7 +3461,7 @@ FROM VWPMO_RIGHTS_2B_WORKED</CommandText>
|
||||
<xs:element name="DD_DMSDataSet" msdata:IsDataSet="true" msdata:UseCurrentLocale="true" msprop:EnableTableAdapterManager="True" msprop:Generator_DataSetName="DD_DMSDataSet" msprop:Generator_UserDSName="DD_DMSDataSet">
|
||||
<xs:complexType>
|
||||
<xs:choice minOccurs="0" maxOccurs="unbounded">
|
||||
<xs:element name="TBPMO_FORM" msprop:Generator_TableClassName="TBPMO_FORMDataTable" msprop:Generator_TableVarName="tableTBPMO_FORM" msprop:Generator_RowChangedName="TBPMO_FORMRowChanged" msprop:Generator_TablePropName="TBPMO_FORM" msprop:Generator_RowDeletingName="TBPMO_FORMRowDeleting" msprop:Generator_RowChangingName="TBPMO_FORMRowChanging" msprop:Generator_RowEvHandlerName="TBPMO_FORMRowChangeEventHandler" msprop:Generator_RowDeletedName="TBPMO_FORMRowDeleted" msprop:Generator_RowClassName="TBPMO_FORMRow" msprop:Generator_UserTableName="TBPMO_FORM" msprop:Generator_RowEvArgName="TBPMO_FORMRowChangeEvent">
|
||||
<xs:element name="TBPMO_FORM" msprop:Generator_TableClassName="TBPMO_FORMDataTable" msprop:Generator_TableVarName="tableTBPMO_FORM" msprop:Generator_TablePropName="TBPMO_FORM" msprop:Generator_RowDeletingName="TBPMO_FORMRowDeleting" msprop:Generator_RowChangingName="TBPMO_FORMRowChanging" msprop:Generator_RowEvHandlerName="TBPMO_FORMRowChangeEventHandler" msprop:Generator_RowDeletedName="TBPMO_FORMRowDeleted" msprop:Generator_UserTableName="TBPMO_FORM" msprop:Generator_RowChangedName="TBPMO_FORMRowChanged" msprop:Generator_RowEvArgName="TBPMO_FORMRowChangeEvent" msprop:Generator_RowClassName="TBPMO_FORMRow">
|
||||
<xs:complexType>
|
||||
<xs:sequence>
|
||||
<xs:element name="GUID" msdata:ReadOnly="true" msdata:AutoIncrement="true" msprop:Generator_ColumnVarNameInTable="columnGUID" msprop:Generator_ColumnPropNameInRow="GUID" msprop:Generator_ColumnPropNameInTable="GUIDColumn" msprop:Generator_UserColumnName="GUID" type="xs:int" />
|
||||
@ -3489,7 +3502,7 @@ FROM VWPMO_RIGHTS_2B_WORKED</CommandText>
|
||||
</xs:sequence>
|
||||
</xs:complexType>
|
||||
</xs:element>
|
||||
<xs:element name="VWPMO_CONTROL_SCREEN" msprop:Generator_TableClassName="VWPMO_CONTROL_SCREENDataTable" msprop:Generator_TableVarName="tableVWPMO_CONTROL_SCREEN" msprop:Generator_TablePropName="VWPMO_CONTROL_SCREEN" msprop:Generator_RowDeletingName="VWPMO_CONTROL_SCREENRowDeleting" msprop:Generator_RowChangingName="VWPMO_CONTROL_SCREENRowChanging" msprop:Generator_RowEvHandlerName="VWPMO_CONTROL_SCREENRowChangeEventHandler" msprop:Generator_RowDeletedName="VWPMO_CONTROL_SCREENRowDeleted" msprop:Generator_UserTableName="VWPMO_CONTROL_SCREEN" msprop:Generator_RowChangedName="VWPMO_CONTROL_SCREENRowChanged" msprop:Generator_RowEvArgName="VWPMO_CONTROL_SCREENRowChangeEvent" msprop:Generator_RowClassName="VWPMO_CONTROL_SCREENRow">
|
||||
<xs:element name="VWPMO_CONTROL_SCREEN" msprop:Generator_TableClassName="VWPMO_CONTROL_SCREENDataTable" msprop:Generator_TableVarName="tableVWPMO_CONTROL_SCREEN" msprop:Generator_RowChangedName="VWPMO_CONTROL_SCREENRowChanged" msprop:Generator_TablePropName="VWPMO_CONTROL_SCREEN" msprop:Generator_RowDeletingName="VWPMO_CONTROL_SCREENRowDeleting" msprop:Generator_RowChangingName="VWPMO_CONTROL_SCREENRowChanging" msprop:Generator_RowEvHandlerName="VWPMO_CONTROL_SCREENRowChangeEventHandler" msprop:Generator_RowDeletedName="VWPMO_CONTROL_SCREENRowDeleted" msprop:Generator_RowClassName="VWPMO_CONTROL_SCREENRow" msprop:Generator_UserTableName="VWPMO_CONTROL_SCREEN" msprop:Generator_RowEvArgName="VWPMO_CONTROL_SCREENRowChangeEvent">
|
||||
<xs:complexType>
|
||||
<xs:sequence>
|
||||
<xs:element name="CONTROL_ID" msprop:Generator_ColumnVarNameInTable="columnCONTROL_ID" msprop:Generator_ColumnPropNameInRow="CONTROL_ID" msprop:Generator_ColumnPropNameInTable="CONTROL_IDColumn" msprop:Generator_UserColumnName="CONTROL_ID" type="xs:int" />
|
||||
@ -3567,7 +3580,7 @@ FROM VWPMO_RIGHTS_2B_WORKED</CommandText>
|
||||
</xs:sequence>
|
||||
</xs:complexType>
|
||||
</xs:element>
|
||||
<xs:element name="TBPMO_FORM_VIEW" msprop:Generator_TableClassName="TBPMO_FORM_VIEWDataTable" msprop:Generator_TableVarName="tableTBPMO_FORM_VIEW" msprop:Generator_RowChangedName="TBPMO_FORM_VIEWRowChanged" msprop:Generator_TablePropName="TBPMO_FORM_VIEW" msprop:Generator_RowDeletingName="TBPMO_FORM_VIEWRowDeleting" msprop:Generator_RowChangingName="TBPMO_FORM_VIEWRowChanging" msprop:Generator_RowEvHandlerName="TBPMO_FORM_VIEWRowChangeEventHandler" msprop:Generator_RowDeletedName="TBPMO_FORM_VIEWRowDeleted" msprop:Generator_RowClassName="TBPMO_FORM_VIEWRow" msprop:Generator_UserTableName="TBPMO_FORM_VIEW" msprop:Generator_RowEvArgName="TBPMO_FORM_VIEWRowChangeEvent">
|
||||
<xs:element name="TBPMO_FORM_VIEW" msprop:Generator_TableClassName="TBPMO_FORM_VIEWDataTable" msprop:Generator_TableVarName="tableTBPMO_FORM_VIEW" msprop:Generator_TablePropName="TBPMO_FORM_VIEW" msprop:Generator_RowDeletingName="TBPMO_FORM_VIEWRowDeleting" msprop:Generator_RowChangingName="TBPMO_FORM_VIEWRowChanging" msprop:Generator_RowEvHandlerName="TBPMO_FORM_VIEWRowChangeEventHandler" msprop:Generator_RowDeletedName="TBPMO_FORM_VIEWRowDeleted" msprop:Generator_UserTableName="TBPMO_FORM_VIEW" msprop:Generator_RowChangedName="TBPMO_FORM_VIEWRowChanged" msprop:Generator_RowEvArgName="TBPMO_FORM_VIEWRowChangeEvent" msprop:Generator_RowClassName="TBPMO_FORM_VIEWRow">
|
||||
<xs:complexType>
|
||||
<xs:sequence>
|
||||
<xs:element name="GUID" msdata:ReadOnly="true" msdata:AutoIncrement="true" msprop:Generator_ColumnVarNameInTable="columnGUID" msprop:Generator_ColumnPropNameInRow="GUID" msprop:Generator_ColumnPropNameInTable="GUIDColumn" msprop:Generator_UserColumnName="GUID" type="xs:int" />
|
||||
@ -3662,7 +3675,7 @@ FROM VWPMO_RIGHTS_2B_WORKED</CommandText>
|
||||
</xs:sequence>
|
||||
</xs:complexType>
|
||||
</xs:element>
|
||||
<xs:element name="TBPMO_RECORD" msprop:Generator_TableClassName="TBPMO_RECORDDataTable" msprop:Generator_TableVarName="tableTBPMO_RECORD" msprop:Generator_RowChangedName="TBPMO_RECORDRowChanged" msprop:Generator_TablePropName="TBPMO_RECORD" msprop:Generator_RowDeletingName="TBPMO_RECORDRowDeleting" msprop:Generator_RowChangingName="TBPMO_RECORDRowChanging" msprop:Generator_RowEvHandlerName="TBPMO_RECORDRowChangeEventHandler" msprop:Generator_RowDeletedName="TBPMO_RECORDRowDeleted" msprop:Generator_RowClassName="TBPMO_RECORDRow" msprop:Generator_UserTableName="TBPMO_RECORD" msprop:Generator_RowEvArgName="TBPMO_RECORDRowChangeEvent">
|
||||
<xs:element name="TBPMO_RECORD" msprop:Generator_TableClassName="TBPMO_RECORDDataTable" msprop:Generator_TableVarName="tableTBPMO_RECORD" msprop:Generator_TablePropName="TBPMO_RECORD" msprop:Generator_RowDeletingName="TBPMO_RECORDRowDeleting" msprop:Generator_RowChangingName="TBPMO_RECORDRowChanging" msprop:Generator_RowEvHandlerName="TBPMO_RECORDRowChangeEventHandler" msprop:Generator_RowDeletedName="TBPMO_RECORDRowDeleted" msprop:Generator_UserTableName="TBPMO_RECORD" msprop:Generator_RowChangedName="TBPMO_RECORDRowChanged" msprop:Generator_RowEvArgName="TBPMO_RECORDRowChangeEvent" msprop:Generator_RowClassName="TBPMO_RECORDRow">
|
||||
<xs:complexType>
|
||||
<xs:sequence>
|
||||
<xs:element name="GUID" msdata:ReadOnly="true" msdata:AutoIncrement="true" msdata:AutoIncrementSeed="-1" msdata:AutoIncrementStep="-1" msprop:Generator_ColumnVarNameInTable="columnGUID" msprop:Generator_ColumnPropNameInRow="GUID" msprop:Generator_ColumnPropNameInTable="GUIDColumn" msprop:Generator_UserColumnName="GUID" type="xs:int" />
|
||||
@ -3685,7 +3698,7 @@ FROM VWPMO_RIGHTS_2B_WORKED</CommandText>
|
||||
</xs:sequence>
|
||||
</xs:complexType>
|
||||
</xs:element>
|
||||
<xs:element name="VWPMO_DOKUMENTTYPES" msprop:Generator_TableClassName="VWPMO_DOKUMENTTYPESDataTable" msprop:Generator_TableVarName="tableVWPMO_DOKUMENTTYPES" msprop:Generator_TablePropName="VWPMO_DOKUMENTTYPES" msprop:Generator_RowDeletingName="VWPMO_DOKUMENTTYPESRowDeleting" msprop:Generator_RowChangingName="VWPMO_DOKUMENTTYPESRowChanging" msprop:Generator_RowEvHandlerName="VWPMO_DOKUMENTTYPESRowChangeEventHandler" msprop:Generator_RowDeletedName="VWPMO_DOKUMENTTYPESRowDeleted" msprop:Generator_UserTableName="VWPMO_DOKUMENTTYPES" msprop:Generator_RowChangedName="VWPMO_DOKUMENTTYPESRowChanged" msprop:Generator_RowEvArgName="VWPMO_DOKUMENTTYPESRowChangeEvent" msprop:Generator_RowClassName="VWPMO_DOKUMENTTYPESRow">
|
||||
<xs:element name="VWPMO_DOKUMENTTYPES" msprop:Generator_TableClassName="VWPMO_DOKUMENTTYPESDataTable" msprop:Generator_TableVarName="tableVWPMO_DOKUMENTTYPES" msprop:Generator_RowChangedName="VWPMO_DOKUMENTTYPESRowChanged" msprop:Generator_TablePropName="VWPMO_DOKUMENTTYPES" msprop:Generator_RowDeletingName="VWPMO_DOKUMENTTYPESRowDeleting" msprop:Generator_RowChangingName="VWPMO_DOKUMENTTYPESRowChanging" msprop:Generator_RowEvHandlerName="VWPMO_DOKUMENTTYPESRowChangeEventHandler" msprop:Generator_RowDeletedName="VWPMO_DOKUMENTTYPESRowDeleted" msprop:Generator_RowClassName="VWPMO_DOKUMENTTYPESRow" msprop:Generator_UserTableName="VWPMO_DOKUMENTTYPES" msprop:Generator_RowEvArgName="VWPMO_DOKUMENTTYPESRowChangeEvent">
|
||||
<xs:complexType>
|
||||
<xs:sequence>
|
||||
<xs:element name="FORMVIEW_ID" msprop:Generator_ColumnVarNameInTable="columnFORMVIEW_ID" msprop:Generator_ColumnPropNameInRow="FORMVIEW_ID" msprop:Generator_ColumnPropNameInTable="FORMVIEW_IDColumn" msprop:Generator_UserColumnName="FORMVIEW_ID" type="xs:int" />
|
||||
@ -3730,7 +3743,7 @@ FROM VWPMO_RIGHTS_2B_WORKED</CommandText>
|
||||
</xs:sequence>
|
||||
</xs:complexType>
|
||||
</xs:element>
|
||||
<xs:element name="TBPMO_WD_FVIEW_DT_INDEX" msprop:Generator_TableClassName="TBPMO_WD_FVIEW_DT_INDEXDataTable" msprop:Generator_TableVarName="tableTBPMO_WD_FVIEW_DT_INDEX" msprop:Generator_TablePropName="TBPMO_WD_FVIEW_DT_INDEX" msprop:Generator_RowDeletingName="TBPMO_WD_FVIEW_DT_INDEXRowDeleting" msprop:Generator_RowChangingName="TBPMO_WD_FVIEW_DT_INDEXRowChanging" msprop:Generator_RowEvHandlerName="TBPMO_WD_FVIEW_DT_INDEXRowChangeEventHandler" msprop:Generator_RowDeletedName="TBPMO_WD_FVIEW_DT_INDEXRowDeleted" msprop:Generator_UserTableName="TBPMO_WD_FVIEW_DT_INDEX" msprop:Generator_RowChangedName="TBPMO_WD_FVIEW_DT_INDEXRowChanged" msprop:Generator_RowEvArgName="TBPMO_WD_FVIEW_DT_INDEXRowChangeEvent" msprop:Generator_RowClassName="TBPMO_WD_FVIEW_DT_INDEXRow">
|
||||
<xs:element name="TBPMO_WD_FVIEW_DT_INDEX" msprop:Generator_TableClassName="TBPMO_WD_FVIEW_DT_INDEXDataTable" msprop:Generator_TableVarName="tableTBPMO_WD_FVIEW_DT_INDEX" msprop:Generator_RowChangedName="TBPMO_WD_FVIEW_DT_INDEXRowChanged" msprop:Generator_TablePropName="TBPMO_WD_FVIEW_DT_INDEX" msprop:Generator_RowDeletingName="TBPMO_WD_FVIEW_DT_INDEXRowDeleting" msprop:Generator_RowChangingName="TBPMO_WD_FVIEW_DT_INDEXRowChanging" msprop:Generator_RowEvHandlerName="TBPMO_WD_FVIEW_DT_INDEXRowChangeEventHandler" msprop:Generator_RowDeletedName="TBPMO_WD_FVIEW_DT_INDEXRowDeleted" msprop:Generator_RowClassName="TBPMO_WD_FVIEW_DT_INDEXRow" msprop:Generator_UserTableName="TBPMO_WD_FVIEW_DT_INDEX" msprop:Generator_RowEvArgName="TBPMO_WD_FVIEW_DT_INDEXRowChangeEvent">
|
||||
<xs:complexType>
|
||||
<xs:sequence>
|
||||
<xs:element name="GUID" msdata:ReadOnly="true" msdata:AutoIncrement="true" msdata:AutoIncrementSeed="-1" msdata:AutoIncrementStep="-1" msprop:Generator_ColumnVarNameInTable="columnGUID" msprop:Generator_ColumnPropNameInRow="GUID" msprop:Generator_ColumnPropNameInTable="GUIDColumn" msprop:Generator_UserColumnName="GUID" type="xs:int" />
|
||||
@ -3768,7 +3781,7 @@ FROM VWPMO_RIGHTS_2B_WORKED</CommandText>
|
||||
</xs:sequence>
|
||||
</xs:complexType>
|
||||
</xs:element>
|
||||
<xs:element name="TBPMO_WORKFLOW_TASK" msprop:Generator_TableClassName="TBPMO_WORKFLOW_TASKDataTable" msprop:Generator_TableVarName="tableTBPMO_WORKFLOW_TASK" msprop:Generator_TablePropName="TBPMO_WORKFLOW_TASK" msprop:Generator_RowDeletingName="TBPMO_WORKFLOW_TASKRowDeleting" msprop:Generator_RowChangingName="TBPMO_WORKFLOW_TASKRowChanging" msprop:Generator_RowEvHandlerName="TBPMO_WORKFLOW_TASKRowChangeEventHandler" msprop:Generator_RowDeletedName="TBPMO_WORKFLOW_TASKRowDeleted" msprop:Generator_UserTableName="TBPMO_WORKFLOW_TASK" msprop:Generator_RowChangedName="TBPMO_WORKFLOW_TASKRowChanged" msprop:Generator_RowEvArgName="TBPMO_WORKFLOW_TASKRowChangeEvent" msprop:Generator_RowClassName="TBPMO_WORKFLOW_TASKRow">
|
||||
<xs:element name="TBPMO_WORKFLOW_TASK" msprop:Generator_TableClassName="TBPMO_WORKFLOW_TASKDataTable" msprop:Generator_TableVarName="tableTBPMO_WORKFLOW_TASK" msprop:Generator_RowChangedName="TBPMO_WORKFLOW_TASKRowChanged" msprop:Generator_TablePropName="TBPMO_WORKFLOW_TASK" msprop:Generator_RowDeletingName="TBPMO_WORKFLOW_TASKRowDeleting" msprop:Generator_RowChangingName="TBPMO_WORKFLOW_TASKRowChanging" msprop:Generator_RowEvHandlerName="TBPMO_WORKFLOW_TASKRowChangeEventHandler" msprop:Generator_RowDeletedName="TBPMO_WORKFLOW_TASKRowDeleted" msprop:Generator_RowClassName="TBPMO_WORKFLOW_TASKRow" msprop:Generator_UserTableName="TBPMO_WORKFLOW_TASK" msprop:Generator_RowEvArgName="TBPMO_WORKFLOW_TASKRowChangeEvent">
|
||||
<xs:complexType>
|
||||
<xs:sequence>
|
||||
<xs:element name="GUID" msdata:ReadOnly="true" msdata:AutoIncrement="true" msdata:AutoIncrementSeed="-1" msdata:AutoIncrementStep="-1" msprop:Generator_ColumnVarNameInTable="columnGUID" msprop:Generator_ColumnPropNameInRow="GUID" msprop:Generator_ColumnPropNameInTable="GUIDColumn" msprop:Generator_UserColumnName="GUID" type="xs:int" />
|
||||
@ -3803,7 +3816,7 @@ FROM VWPMO_RIGHTS_2B_WORKED</CommandText>
|
||||
</xs:sequence>
|
||||
</xs:complexType>
|
||||
</xs:element>
|
||||
<xs:element name="TBPMO_WORKFLOW_TASK_STATE" msprop:Generator_TableClassName="TBPMO_WORKFLOW_TASK_STATEDataTable" msprop:Generator_TableVarName="tableTBPMO_WORKFLOW_TASK_STATE" msprop:Generator_TablePropName="TBPMO_WORKFLOW_TASK_STATE" msprop:Generator_RowDeletingName="TBPMO_WORKFLOW_TASK_STATERowDeleting" msprop:Generator_RowChangingName="TBPMO_WORKFLOW_TASK_STATERowChanging" msprop:Generator_RowEvHandlerName="TBPMO_WORKFLOW_TASK_STATERowChangeEventHandler" msprop:Generator_RowDeletedName="TBPMO_WORKFLOW_TASK_STATERowDeleted" msprop:Generator_UserTableName="TBPMO_WORKFLOW_TASK_STATE" msprop:Generator_RowChangedName="TBPMO_WORKFLOW_TASK_STATERowChanged" msprop:Generator_RowEvArgName="TBPMO_WORKFLOW_TASK_STATERowChangeEvent" msprop:Generator_RowClassName="TBPMO_WORKFLOW_TASK_STATERow">
|
||||
<xs:element name="TBPMO_WORKFLOW_TASK_STATE" msprop:Generator_TableClassName="TBPMO_WORKFLOW_TASK_STATEDataTable" msprop:Generator_TableVarName="tableTBPMO_WORKFLOW_TASK_STATE" msprop:Generator_RowChangedName="TBPMO_WORKFLOW_TASK_STATERowChanged" msprop:Generator_TablePropName="TBPMO_WORKFLOW_TASK_STATE" msprop:Generator_RowDeletingName="TBPMO_WORKFLOW_TASK_STATERowDeleting" msprop:Generator_RowChangingName="TBPMO_WORKFLOW_TASK_STATERowChanging" msprop:Generator_RowEvHandlerName="TBPMO_WORKFLOW_TASK_STATERowChangeEventHandler" msprop:Generator_RowDeletedName="TBPMO_WORKFLOW_TASK_STATERowDeleted" msprop:Generator_RowClassName="TBPMO_WORKFLOW_TASK_STATERow" msprop:Generator_UserTableName="TBPMO_WORKFLOW_TASK_STATE" msprop:Generator_RowEvArgName="TBPMO_WORKFLOW_TASK_STATERowChangeEvent">
|
||||
<xs:complexType>
|
||||
<xs:sequence>
|
||||
<xs:element name="GUID" msdata:ReadOnly="true" msdata:AutoIncrement="true" msprop:Generator_ColumnVarNameInTable="columnGUID" msprop:Generator_ColumnPropNameInRow="GUID" msprop:Generator_ColumnPropNameInTable="GUIDColumn" msprop:Generator_UserColumnName="GUID" type="xs:int" />
|
||||
@ -3847,7 +3860,7 @@ FROM VWPMO_RIGHTS_2B_WORKED</CommandText>
|
||||
</xs:sequence>
|
||||
</xs:complexType>
|
||||
</xs:element>
|
||||
<xs:element name="VWPMO_GUI_ENTITY" msprop:Generator_TableClassName="VWPMO_GUI_ENTITYDataTable" msprop:Generator_TableVarName="tableVWPMO_GUI_ENTITY" msprop:Generator_RowChangedName="VWPMO_GUI_ENTITYRowChanged" msprop:Generator_TablePropName="VWPMO_GUI_ENTITY" msprop:Generator_RowDeletingName="VWPMO_GUI_ENTITYRowDeleting" msprop:Generator_RowChangingName="VWPMO_GUI_ENTITYRowChanging" msprop:Generator_RowEvHandlerName="VWPMO_GUI_ENTITYRowChangeEventHandler" msprop:Generator_RowDeletedName="VWPMO_GUI_ENTITYRowDeleted" msprop:Generator_RowClassName="VWPMO_GUI_ENTITYRow" msprop:Generator_UserTableName="VWPMO_GUI_ENTITY" msprop:Generator_RowEvArgName="VWPMO_GUI_ENTITYRowChangeEvent">
|
||||
<xs:element name="VWPMO_GUI_ENTITY" msprop:Generator_TableClassName="VWPMO_GUI_ENTITYDataTable" msprop:Generator_TableVarName="tableVWPMO_GUI_ENTITY" msprop:Generator_TablePropName="VWPMO_GUI_ENTITY" msprop:Generator_RowDeletingName="VWPMO_GUI_ENTITYRowDeleting" msprop:Generator_RowChangingName="VWPMO_GUI_ENTITYRowChanging" msprop:Generator_RowEvHandlerName="VWPMO_GUI_ENTITYRowChangeEventHandler" msprop:Generator_RowDeletedName="VWPMO_GUI_ENTITYRowDeleted" msprop:Generator_UserTableName="VWPMO_GUI_ENTITY" msprop:Generator_RowChangedName="VWPMO_GUI_ENTITYRowChanged" msprop:Generator_RowEvArgName="VWPMO_GUI_ENTITYRowChangeEvent" msprop:Generator_RowClassName="VWPMO_GUI_ENTITYRow">
|
||||
<xs:complexType>
|
||||
<xs:sequence>
|
||||
<xs:element name="ID" msdata:ReadOnly="true" msdata:AutoIncrement="true" msdata:AutoIncrementSeed="-1" msdata:AutoIncrementStep="-1" msprop:Generator_ColumnVarNameInTable="columnID" msprop:Generator_ColumnPropNameInRow="ID" msprop:Generator_ColumnPropNameInTable="IDColumn" msprop:Generator_UserColumnName="ID" type="xs:int" />
|
||||
@ -3868,7 +3881,7 @@ FROM VWPMO_RIGHTS_2B_WORKED</CommandText>
|
||||
</xs:sequence>
|
||||
</xs:complexType>
|
||||
</xs:element>
|
||||
<xs:element name="TBPMO_WORKFLOW" msprop:Generator_TableClassName="TBPMO_WORKFLOWDataTable" msprop:Generator_TableVarName="tableTBPMO_WORKFLOW" msprop:Generator_RowChangedName="TBPMO_WORKFLOWRowChanged" msprop:Generator_TablePropName="TBPMO_WORKFLOW" msprop:Generator_RowDeletingName="TBPMO_WORKFLOWRowDeleting" msprop:Generator_RowChangingName="TBPMO_WORKFLOWRowChanging" msprop:Generator_RowEvHandlerName="TBPMO_WORKFLOWRowChangeEventHandler" msprop:Generator_RowDeletedName="TBPMO_WORKFLOWRowDeleted" msprop:Generator_RowClassName="TBPMO_WORKFLOWRow" msprop:Generator_UserTableName="TBPMO_WORKFLOW" msprop:Generator_RowEvArgName="TBPMO_WORKFLOWRowChangeEvent">
|
||||
<xs:element name="TBPMO_WORKFLOW" msprop:Generator_TableClassName="TBPMO_WORKFLOWDataTable" msprop:Generator_TableVarName="tableTBPMO_WORKFLOW" msprop:Generator_TablePropName="TBPMO_WORKFLOW" msprop:Generator_RowDeletingName="TBPMO_WORKFLOWRowDeleting" msprop:Generator_RowChangingName="TBPMO_WORKFLOWRowChanging" msprop:Generator_RowEvHandlerName="TBPMO_WORKFLOWRowChangeEventHandler" msprop:Generator_RowDeletedName="TBPMO_WORKFLOWRowDeleted" msprop:Generator_UserTableName="TBPMO_WORKFLOW" msprop:Generator_RowChangedName="TBPMO_WORKFLOWRowChanged" msprop:Generator_RowEvArgName="TBPMO_WORKFLOWRowChangeEvent" msprop:Generator_RowClassName="TBPMO_WORKFLOWRow">
|
||||
<xs:complexType>
|
||||
<xs:sequence>
|
||||
<xs:element name="GUID" msdata:ReadOnly="true" msdata:AutoIncrement="true" msprop:Generator_ColumnVarNameInTable="columnGUID" msprop:Generator_ColumnPropNameInRow="GUID" msprop:Generator_ColumnPropNameInTable="GUIDColumn" msprop:Generator_UserColumnName="GUID" type="xs:int" />
|
||||
@ -3905,7 +3918,7 @@ FROM VWPMO_RIGHTS_2B_WORKED</CommandText>
|
||||
</xs:sequence>
|
||||
</xs:complexType>
|
||||
</xs:element>
|
||||
<xs:element name="VWPMO_WF_OVERVIEW_AUTHORITY" msprop:Generator_TableClassName="VWPMO_WF_OVERVIEW_AUTHORITYDataTable" msprop:Generator_TableVarName="tableVWPMO_WF_OVERVIEW_AUTHORITY" msprop:Generator_TablePropName="VWPMO_WF_OVERVIEW_AUTHORITY" msprop:Generator_RowDeletingName="VWPMO_WF_OVERVIEW_AUTHORITYRowDeleting" msprop:Generator_RowChangingName="VWPMO_WF_OVERVIEW_AUTHORITYRowChanging" msprop:Generator_RowEvHandlerName="VWPMO_WF_OVERVIEW_AUTHORITYRowChangeEventHandler" msprop:Generator_RowDeletedName="VWPMO_WF_OVERVIEW_AUTHORITYRowDeleted" msprop:Generator_UserTableName="VWPMO_WF_OVERVIEW_AUTHORITY" msprop:Generator_RowChangedName="VWPMO_WF_OVERVIEW_AUTHORITYRowChanged" msprop:Generator_RowEvArgName="VWPMO_WF_OVERVIEW_AUTHORITYRowChangeEvent" msprop:Generator_RowClassName="VWPMO_WF_OVERVIEW_AUTHORITYRow">
|
||||
<xs:element name="VWPMO_WF_OVERVIEW_AUTHORITY" msprop:Generator_TableClassName="VWPMO_WF_OVERVIEW_AUTHORITYDataTable" msprop:Generator_TableVarName="tableVWPMO_WF_OVERVIEW_AUTHORITY" msprop:Generator_RowChangedName="VWPMO_WF_OVERVIEW_AUTHORITYRowChanged" msprop:Generator_TablePropName="VWPMO_WF_OVERVIEW_AUTHORITY" msprop:Generator_RowDeletingName="VWPMO_WF_OVERVIEW_AUTHORITYRowDeleting" msprop:Generator_RowChangingName="VWPMO_WF_OVERVIEW_AUTHORITYRowChanging" msprop:Generator_RowEvHandlerName="VWPMO_WF_OVERVIEW_AUTHORITYRowChangeEventHandler" msprop:Generator_RowDeletedName="VWPMO_WF_OVERVIEW_AUTHORITYRowDeleted" msprop:Generator_RowClassName="VWPMO_WF_OVERVIEW_AUTHORITYRow" msprop:Generator_UserTableName="VWPMO_WF_OVERVIEW_AUTHORITY" msprop:Generator_RowEvArgName="VWPMO_WF_OVERVIEW_AUTHORITYRowChangeEvent">
|
||||
<xs:complexType>
|
||||
<xs:sequence>
|
||||
<xs:element name="STATE" msdata:ReadOnly="true" msprop:Generator_ColumnVarNameInTable="columnSTATE" msprop:Generator_ColumnPropNameInRow="STATE" msprop:Generator_ColumnPropNameInTable="STATEColumn" msprop:Generator_UserColumnName="STATE" minOccurs="0">
|
||||
@ -3950,7 +3963,7 @@ FROM VWPMO_RIGHTS_2B_WORKED</CommandText>
|
||||
</xs:sequence>
|
||||
</xs:complexType>
|
||||
</xs:element>
|
||||
<xs:element name="TBDD_DOKUMENTART" msprop:Generator_TableClassName="TBDD_DOKUMENTARTDataTable" msprop:Generator_TableVarName="tableTBDD_DOKUMENTART" msprop:Generator_TablePropName="TBDD_DOKUMENTART" msprop:Generator_RowDeletingName="TBDD_DOKUMENTARTRowDeleting" msprop:Generator_RowChangingName="TBDD_DOKUMENTARTRowChanging" msprop:Generator_RowEvHandlerName="TBDD_DOKUMENTARTRowChangeEventHandler" msprop:Generator_RowDeletedName="TBDD_DOKUMENTARTRowDeleted" msprop:Generator_UserTableName="TBDD_DOKUMENTART" msprop:Generator_RowChangedName="TBDD_DOKUMENTARTRowChanged" msprop:Generator_RowEvArgName="TBDD_DOKUMENTARTRowChangeEvent" msprop:Generator_RowClassName="TBDD_DOKUMENTARTRow">
|
||||
<xs:element name="TBDD_DOKUMENTART" msprop:Generator_TableClassName="TBDD_DOKUMENTARTDataTable" msprop:Generator_TableVarName="tableTBDD_DOKUMENTART" msprop:Generator_RowChangedName="TBDD_DOKUMENTARTRowChanged" msprop:Generator_TablePropName="TBDD_DOKUMENTART" msprop:Generator_RowDeletingName="TBDD_DOKUMENTARTRowDeleting" msprop:Generator_RowChangingName="TBDD_DOKUMENTARTRowChanging" msprop:Generator_RowEvHandlerName="TBDD_DOKUMENTARTRowChangeEventHandler" msprop:Generator_RowDeletedName="TBDD_DOKUMENTARTRowDeleted" msprop:Generator_RowClassName="TBDD_DOKUMENTARTRow" msprop:Generator_UserTableName="TBDD_DOKUMENTART" msprop:Generator_RowEvArgName="TBDD_DOKUMENTARTRowChangeEvent">
|
||||
<xs:complexType>
|
||||
<xs:sequence>
|
||||
<xs:element name="GUID" msdata:ReadOnly="true" msdata:AutoIncrement="true" msprop:Generator_ColumnVarNameInTable="columnGUID" msprop:Generator_ColumnPropNameInRow="GUID" msprop:Generator_ColumnPropNameInTable="GUIDColumn" msprop:Generator_UserColumnName="GUID" type="xs:int" />
|
||||
@ -4017,7 +4030,7 @@ FROM VWPMO_RIGHTS_2B_WORKED</CommandText>
|
||||
</xs:sequence>
|
||||
</xs:complexType>
|
||||
</xs:element>
|
||||
<xs:element name="TBDD_EINGANGSARTEN" msprop:Generator_TableClassName="TBDD_EINGANGSARTENDataTable" msprop:Generator_TableVarName="tableTBDD_EINGANGSARTEN" msprop:Generator_TablePropName="TBDD_EINGANGSARTEN" msprop:Generator_RowDeletingName="TBDD_EINGANGSARTENRowDeleting" msprop:Generator_RowChangingName="TBDD_EINGANGSARTENRowChanging" msprop:Generator_RowEvHandlerName="TBDD_EINGANGSARTENRowChangeEventHandler" msprop:Generator_RowDeletedName="TBDD_EINGANGSARTENRowDeleted" msprop:Generator_UserTableName="TBDD_EINGANGSARTEN" msprop:Generator_RowChangedName="TBDD_EINGANGSARTENRowChanged" msprop:Generator_RowEvArgName="TBDD_EINGANGSARTENRowChangeEvent" msprop:Generator_RowClassName="TBDD_EINGANGSARTENRow">
|
||||
<xs:element name="TBDD_EINGANGSARTEN" msprop:Generator_TableClassName="TBDD_EINGANGSARTENDataTable" msprop:Generator_TableVarName="tableTBDD_EINGANGSARTEN" msprop:Generator_RowChangedName="TBDD_EINGANGSARTENRowChanged" msprop:Generator_TablePropName="TBDD_EINGANGSARTEN" msprop:Generator_RowDeletingName="TBDD_EINGANGSARTENRowDeleting" msprop:Generator_RowChangingName="TBDD_EINGANGSARTENRowChanging" msprop:Generator_RowEvHandlerName="TBDD_EINGANGSARTENRowChangeEventHandler" msprop:Generator_RowDeletedName="TBDD_EINGANGSARTENRowDeleted" msprop:Generator_RowClassName="TBDD_EINGANGSARTENRow" msprop:Generator_UserTableName="TBDD_EINGANGSARTEN" msprop:Generator_RowEvArgName="TBDD_EINGANGSARTENRowChangeEvent">
|
||||
<xs:complexType>
|
||||
<xs:sequence>
|
||||
<xs:element name="GUID" msdata:ReadOnly="true" msprop:Generator_ColumnVarNameInTable="columnGUID" msprop:Generator_ColumnPropNameInRow="GUID" msprop:Generator_ColumnPropNameInTable="GUIDColumn" msprop:Generator_UserColumnName="GUID" type="xs:unsignedByte" />
|
||||
@ -4054,7 +4067,7 @@ FROM VWPMO_RIGHTS_2B_WORKED</CommandText>
|
||||
</xs:sequence>
|
||||
</xs:complexType>
|
||||
</xs:element>
|
||||
<xs:element name="TBDD_INDEX_AUTOM" msprop:Generator_TableClassName="TBDD_INDEX_AUTOMDataTable" msprop:Generator_TableVarName="tableTBDD_INDEX_AUTOM" msprop:Generator_TablePropName="TBDD_INDEX_AUTOM" msprop:Generator_RowDeletingName="TBDD_INDEX_AUTOMRowDeleting" msprop:Generator_RowChangingName="TBDD_INDEX_AUTOMRowChanging" msprop:Generator_RowEvHandlerName="TBDD_INDEX_AUTOMRowChangeEventHandler" msprop:Generator_RowDeletedName="TBDD_INDEX_AUTOMRowDeleted" msprop:Generator_UserTableName="TBDD_INDEX_AUTOM" msprop:Generator_RowChangedName="TBDD_INDEX_AUTOMRowChanged" msprop:Generator_RowEvArgName="TBDD_INDEX_AUTOMRowChangeEvent" msprop:Generator_RowClassName="TBDD_INDEX_AUTOMRow">
|
||||
<xs:element name="TBDD_INDEX_AUTOM" msprop:Generator_TableClassName="TBDD_INDEX_AUTOMDataTable" msprop:Generator_TableVarName="tableTBDD_INDEX_AUTOM" msprop:Generator_RowChangedName="TBDD_INDEX_AUTOMRowChanged" msprop:Generator_TablePropName="TBDD_INDEX_AUTOM" msprop:Generator_RowDeletingName="TBDD_INDEX_AUTOMRowDeleting" msprop:Generator_RowChangingName="TBDD_INDEX_AUTOMRowChanging" msprop:Generator_RowEvHandlerName="TBDD_INDEX_AUTOMRowChangeEventHandler" msprop:Generator_RowDeletedName="TBDD_INDEX_AUTOMRowDeleted" msprop:Generator_RowClassName="TBDD_INDEX_AUTOMRow" msprop:Generator_UserTableName="TBDD_INDEX_AUTOM" msprop:Generator_RowEvArgName="TBDD_INDEX_AUTOMRowChangeEvent">
|
||||
<xs:complexType>
|
||||
<xs:sequence>
|
||||
<xs:element name="GUID" msdata:ReadOnly="true" msdata:AutoIncrement="true" msdata:AutoIncrementSeed="1" msprop:Generator_ColumnVarNameInTable="columnGUID" msprop:Generator_ColumnPropNameInRow="GUID" msprop:Generator_ColumnPropNameInTable="GUIDColumn" msprop:Generator_UserColumnName="GUID" type="xs:int" />
|
||||
@ -4110,7 +4123,7 @@ FROM VWPMO_RIGHTS_2B_WORKED</CommandText>
|
||||
</xs:sequence>
|
||||
</xs:complexType>
|
||||
</xs:element>
|
||||
<xs:element name="TBPMO_WD_FORMVIEW_DOKTYPES" msprop:Generator_TableClassName="TBPMO_WD_FORMVIEW_DOKTYPESDataTable" msprop:Generator_TableVarName="tableTBPMO_WD_FORMVIEW_DOKTYPES" msprop:Generator_TablePropName="TBPMO_WD_FORMVIEW_DOKTYPES" msprop:Generator_RowDeletingName="TBPMO_WD_FORMVIEW_DOKTYPESRowDeleting" msprop:Generator_RowChangingName="TBPMO_WD_FORMVIEW_DOKTYPESRowChanging" msprop:Generator_RowEvHandlerName="TBPMO_WD_FORMVIEW_DOKTYPESRowChangeEventHandler" msprop:Generator_RowDeletedName="TBPMO_WD_FORMVIEW_DOKTYPESRowDeleted" msprop:Generator_UserTableName="TBPMO_WD_FORMVIEW_DOKTYPES" msprop:Generator_RowChangedName="TBPMO_WD_FORMVIEW_DOKTYPESRowChanged" msprop:Generator_RowEvArgName="TBPMO_WD_FORMVIEW_DOKTYPESRowChangeEvent" msprop:Generator_RowClassName="TBPMO_WD_FORMVIEW_DOKTYPESRow">
|
||||
<xs:element name="TBPMO_WD_FORMVIEW_DOKTYPES" msprop:Generator_TableClassName="TBPMO_WD_FORMVIEW_DOKTYPESDataTable" msprop:Generator_TableVarName="tableTBPMO_WD_FORMVIEW_DOKTYPES" msprop:Generator_RowChangedName="TBPMO_WD_FORMVIEW_DOKTYPESRowChanged" msprop:Generator_TablePropName="TBPMO_WD_FORMVIEW_DOKTYPES" msprop:Generator_RowDeletingName="TBPMO_WD_FORMVIEW_DOKTYPESRowDeleting" msprop:Generator_RowChangingName="TBPMO_WD_FORMVIEW_DOKTYPESRowChanging" msprop:Generator_RowEvHandlerName="TBPMO_WD_FORMVIEW_DOKTYPESRowChangeEventHandler" msprop:Generator_RowDeletedName="TBPMO_WD_FORMVIEW_DOKTYPESRowDeleted" msprop:Generator_RowClassName="TBPMO_WD_FORMVIEW_DOKTYPESRow" msprop:Generator_UserTableName="TBPMO_WD_FORMVIEW_DOKTYPES" msprop:Generator_RowEvArgName="TBPMO_WD_FORMVIEW_DOKTYPESRowChangeEvent">
|
||||
<xs:complexType>
|
||||
<xs:sequence>
|
||||
<xs:element name="GUID" msdata:ReadOnly="true" msdata:AutoIncrement="true" msdata:AutoIncrementSeed="-1" msdata:AutoIncrementStep="-1" msprop:Generator_ColumnVarNameInTable="columnGUID" msprop:Generator_ColumnPropNameInRow="GUID" msprop:Generator_ColumnPropNameInTable="GUIDColumn" msprop:Generator_UserColumnName="GUID" type="xs:int" />
|
||||
@ -4149,7 +4162,7 @@ FROM VWPMO_RIGHTS_2B_WORKED</CommandText>
|
||||
</xs:sequence>
|
||||
</xs:complexType>
|
||||
</xs:element>
|
||||
<xs:element name="TBPMO_KONFIGURATION" msprop:Generator_TableClassName="TBPMO_KONFIGURATIONDataTable" msprop:Generator_TableVarName="tableTBPMO_KONFIGURATION" msprop:Generator_TablePropName="TBPMO_KONFIGURATION" msprop:Generator_RowDeletingName="TBPMO_KONFIGURATIONRowDeleting" msprop:Generator_RowChangingName="TBPMO_KONFIGURATIONRowChanging" msprop:Generator_RowEvHandlerName="TBPMO_KONFIGURATIONRowChangeEventHandler" msprop:Generator_RowDeletedName="TBPMO_KONFIGURATIONRowDeleted" msprop:Generator_UserTableName="TBPMO_KONFIGURATION" msprop:Generator_RowChangedName="TBPMO_KONFIGURATIONRowChanged" msprop:Generator_RowEvArgName="TBPMO_KONFIGURATIONRowChangeEvent" msprop:Generator_RowClassName="TBPMO_KONFIGURATIONRow">
|
||||
<xs:element name="TBPMO_KONFIGURATION" msprop:Generator_TableClassName="TBPMO_KONFIGURATIONDataTable" msprop:Generator_TableVarName="tableTBPMO_KONFIGURATION" msprop:Generator_RowChangedName="TBPMO_KONFIGURATIONRowChanged" msprop:Generator_TablePropName="TBPMO_KONFIGURATION" msprop:Generator_RowDeletingName="TBPMO_KONFIGURATIONRowDeleting" msprop:Generator_RowChangingName="TBPMO_KONFIGURATIONRowChanging" msprop:Generator_RowEvHandlerName="TBPMO_KONFIGURATIONRowChangeEventHandler" msprop:Generator_RowDeletedName="TBPMO_KONFIGURATIONRowDeleted" msprop:Generator_RowClassName="TBPMO_KONFIGURATIONRow" msprop:Generator_UserTableName="TBPMO_KONFIGURATION" msprop:Generator_RowEvArgName="TBPMO_KONFIGURATIONRowChangeEvent">
|
||||
<xs:complexType>
|
||||
<xs:sequence>
|
||||
<xs:element name="GUID" msprop:Generator_ColumnVarNameInTable="columnGUID" msprop:Generator_ColumnPropNameInRow="GUID" msprop:Generator_ColumnPropNameInTable="GUIDColumn" msprop:Generator_UserColumnName="GUID" type="xs:unsignedByte" />
|
||||
@ -4273,7 +4286,7 @@ FROM VWPMO_RIGHTS_2B_WORKED</CommandText>
|
||||
</xs:sequence>
|
||||
</xs:complexType>
|
||||
</xs:element>
|
||||
<xs:element name="TBDD_USER" msprop:Generator_TableClassName="TBDD_USERDataTable" msprop:Generator_TableVarName="tableTBDD_USER" msprop:Generator_TablePropName="TBDD_USER" msprop:Generator_RowDeletingName="TBDD_USERRowDeleting" msprop:Generator_RowChangingName="TBDD_USERRowChanging" msprop:Generator_RowEvHandlerName="TBDD_USERRowChangeEventHandler" msprop:Generator_RowDeletedName="TBDD_USERRowDeleted" msprop:Generator_UserTableName="TBDD_USER" msprop:Generator_RowChangedName="TBDD_USERRowChanged" msprop:Generator_RowEvArgName="TBDD_USERRowChangeEvent" msprop:Generator_RowClassName="TBDD_USERRow">
|
||||
<xs:element name="TBDD_USER" msprop:Generator_TableClassName="TBDD_USERDataTable" msprop:Generator_TableVarName="tableTBDD_USER" msprop:Generator_RowChangedName="TBDD_USERRowChanged" msprop:Generator_TablePropName="TBDD_USER" msprop:Generator_RowDeletingName="TBDD_USERRowDeleting" msprop:Generator_RowChangingName="TBDD_USERRowChanging" msprop:Generator_RowEvHandlerName="TBDD_USERRowChangeEventHandler" msprop:Generator_RowDeletedName="TBDD_USERRowDeleted" msprop:Generator_RowClassName="TBDD_USERRow" msprop:Generator_UserTableName="TBDD_USER" msprop:Generator_RowEvArgName="TBDD_USERRowChangeEvent">
|
||||
<xs:complexType>
|
||||
<xs:sequence>
|
||||
<xs:element name="GUID" msdata:ReadOnly="true" msdata:AutoIncrement="true" msprop:Generator_ColumnVarNameInTable="columnGUID" msprop:Generator_ColumnPropNameInRow="GUID" msprop:Generator_ColumnPropNameInTable="GUIDColumn" msprop:Generator_UserColumnName="GUID" type="xs:int" />
|
||||
@ -4371,7 +4384,7 @@ FROM VWPMO_RIGHTS_2B_WORKED</CommandText>
|
||||
</xs:sequence>
|
||||
</xs:complexType>
|
||||
</xs:element>
|
||||
<xs:element name="TBPMO_FORM_TYPE" msprop:Generator_TableClassName="TBPMO_FORM_TYPEDataTable" msprop:Generator_TableVarName="tableTBPMO_FORM_TYPE" msprop:Generator_RowChangedName="TBPMO_FORM_TYPERowChanged" msprop:Generator_TablePropName="TBPMO_FORM_TYPE" msprop:Generator_RowDeletingName="TBPMO_FORM_TYPERowDeleting" msprop:Generator_RowChangingName="TBPMO_FORM_TYPERowChanging" msprop:Generator_RowEvHandlerName="TBPMO_FORM_TYPERowChangeEventHandler" msprop:Generator_RowDeletedName="TBPMO_FORM_TYPERowDeleted" msprop:Generator_RowClassName="TBPMO_FORM_TYPERow" msprop:Generator_UserTableName="TBPMO_FORM_TYPE" msprop:Generator_RowEvArgName="TBPMO_FORM_TYPERowChangeEvent">
|
||||
<xs:element name="TBPMO_FORM_TYPE" msprop:Generator_TableClassName="TBPMO_FORM_TYPEDataTable" msprop:Generator_TableVarName="tableTBPMO_FORM_TYPE" msprop:Generator_TablePropName="TBPMO_FORM_TYPE" msprop:Generator_RowDeletingName="TBPMO_FORM_TYPERowDeleting" msprop:Generator_RowChangingName="TBPMO_FORM_TYPERowChanging" msprop:Generator_RowEvHandlerName="TBPMO_FORM_TYPERowChangeEventHandler" msprop:Generator_RowDeletedName="TBPMO_FORM_TYPERowDeleted" msprop:Generator_UserTableName="TBPMO_FORM_TYPE" msprop:Generator_RowChangedName="TBPMO_FORM_TYPERowChanged" msprop:Generator_RowEvArgName="TBPMO_FORM_TYPERowChangeEvent" msprop:Generator_RowClassName="TBPMO_FORM_TYPERow">
|
||||
<xs:complexType>
|
||||
<xs:sequence>
|
||||
<xs:element name="GUID" msdata:ReadOnly="true" msdata:AutoIncrement="true" msprop:Generator_ColumnVarNameInTable="columnGUID" msprop:Generator_ColumnPropNameInRow="GUID" msprop:Generator_ColumnPropNameInTable="GUIDColumn" msprop:Generator_UserColumnName="GUID" type="xs:int" />
|
||||
@ -4401,7 +4414,7 @@ FROM VWPMO_RIGHTS_2B_WORKED</CommandText>
|
||||
</xs:sequence>
|
||||
</xs:complexType>
|
||||
</xs:element>
|
||||
<xs:element name="TBDD_USER_GROUPS" msprop:Generator_TableClassName="TBDD_USER_GROUPSDataTable" msprop:Generator_TableVarName="tableTBDD_USER_GROUPS" msprop:Generator_RowChangedName="TBDD_USER_GROUPSRowChanged" msprop:Generator_TablePropName="TBDD_USER_GROUPS" msprop:Generator_RowDeletingName="TBDD_USER_GROUPSRowDeleting" msprop:Generator_RowChangingName="TBDD_USER_GROUPSRowChanging" msprop:Generator_RowEvHandlerName="TBDD_USER_GROUPSRowChangeEventHandler" msprop:Generator_RowDeletedName="TBDD_USER_GROUPSRowDeleted" msprop:Generator_RowClassName="TBDD_USER_GROUPSRow" msprop:Generator_UserTableName="TBDD_USER_GROUPS" msprop:Generator_RowEvArgName="TBDD_USER_GROUPSRowChangeEvent">
|
||||
<xs:element name="TBDD_USER_GROUPS" msprop:Generator_TableClassName="TBDD_USER_GROUPSDataTable" msprop:Generator_TableVarName="tableTBDD_USER_GROUPS" msprop:Generator_TablePropName="TBDD_USER_GROUPS" msprop:Generator_RowDeletingName="TBDD_USER_GROUPSRowDeleting" msprop:Generator_RowChangingName="TBDD_USER_GROUPSRowChanging" msprop:Generator_RowEvHandlerName="TBDD_USER_GROUPSRowChangeEventHandler" msprop:Generator_RowDeletedName="TBDD_USER_GROUPSRowDeleted" msprop:Generator_UserTableName="TBDD_USER_GROUPS" msprop:Generator_RowChangedName="TBDD_USER_GROUPSRowChanged" msprop:Generator_RowEvArgName="TBDD_USER_GROUPSRowChangeEvent" msprop:Generator_RowClassName="TBDD_USER_GROUPSRow">
|
||||
<xs:complexType>
|
||||
<xs:sequence>
|
||||
<xs:element name="GUID" msdata:ReadOnly="true" msdata:AutoIncrement="true" msdata:AutoIncrementSeed="-1" msdata:AutoIncrementStep="-1" msprop:Generator_ColumnVarNameInTable="columnGUID" msprop:Generator_ColumnPropNameInRow="GUID" msprop:Generator_ColumnPropNameInTable="GUIDColumn" msprop:Generator_UserColumnName="GUID" type="xs:int" />
|
||||
@ -4438,7 +4451,7 @@ FROM VWPMO_RIGHTS_2B_WORKED</CommandText>
|
||||
</xs:sequence>
|
||||
</xs:complexType>
|
||||
</xs:element>
|
||||
<xs:element name="VWPMO_USERS_GROUPS" msprop:Generator_TableClassName="VWPMO_USERS_GROUPSDataTable" msprop:Generator_TableVarName="tableVWPMO_USERS_GROUPS" msprop:Generator_RowChangedName="VWPMO_USERS_GROUPSRowChanged" msprop:Generator_TablePropName="VWPMO_USERS_GROUPS" msprop:Generator_RowDeletingName="VWPMO_USERS_GROUPSRowDeleting" msprop:Generator_RowChangingName="VWPMO_USERS_GROUPSRowChanging" msprop:Generator_RowEvHandlerName="VWPMO_USERS_GROUPSRowChangeEventHandler" msprop:Generator_RowDeletedName="VWPMO_USERS_GROUPSRowDeleted" msprop:Generator_RowClassName="VWPMO_USERS_GROUPSRow" msprop:Generator_UserTableName="VWPMO_USERS_GROUPS" msprop:Generator_RowEvArgName="VWPMO_USERS_GROUPSRowChangeEvent">
|
||||
<xs:element name="VWPMO_USERS_GROUPS" msprop:Generator_TableClassName="VWPMO_USERS_GROUPSDataTable" msprop:Generator_TableVarName="tableVWPMO_USERS_GROUPS" msprop:Generator_TablePropName="VWPMO_USERS_GROUPS" msprop:Generator_RowDeletingName="VWPMO_USERS_GROUPSRowDeleting" msprop:Generator_RowChangingName="VWPMO_USERS_GROUPSRowChanging" msprop:Generator_RowEvHandlerName="VWPMO_USERS_GROUPSRowChangeEventHandler" msprop:Generator_RowDeletedName="VWPMO_USERS_GROUPSRowDeleted" msprop:Generator_UserTableName="VWPMO_USERS_GROUPS" msprop:Generator_RowChangedName="VWPMO_USERS_GROUPSRowChanged" msprop:Generator_RowEvArgName="VWPMO_USERS_GROUPSRowChangeEvent" msprop:Generator_RowClassName="VWPMO_USERS_GROUPSRow">
|
||||
<xs:complexType>
|
||||
<xs:sequence>
|
||||
<xs:element name="GUID" msprop:Generator_ColumnVarNameInTable="columnGUID" msprop:Generator_ColumnPropNameInRow="GUID" msprop:Generator_ColumnPropNameInTable="GUIDColumn" msprop:Generator_UserColumnName="GUID" type="xs:int" />
|
||||
@ -4475,7 +4488,7 @@ FROM VWPMO_RIGHTS_2B_WORKED</CommandText>
|
||||
</xs:sequence>
|
||||
</xs:complexType>
|
||||
</xs:element>
|
||||
<xs:element name="TBDD_GROUPS_USER" msprop:Generator_TableClassName="TBDD_GROUPS_USERDataTable" msprop:Generator_TableVarName="tableTBDD_GROUPS_USER" msprop:Generator_RowChangedName="TBDD_GROUPS_USERRowChanged" msprop:Generator_TablePropName="TBDD_GROUPS_USER" msprop:Generator_RowDeletingName="TBDD_GROUPS_USERRowDeleting" msprop:Generator_RowChangingName="TBDD_GROUPS_USERRowChanging" msprop:Generator_RowEvHandlerName="TBDD_GROUPS_USERRowChangeEventHandler" msprop:Generator_RowDeletedName="TBDD_GROUPS_USERRowDeleted" msprop:Generator_RowClassName="TBDD_GROUPS_USERRow" msprop:Generator_UserTableName="TBDD_GROUPS_USER" msprop:Generator_RowEvArgName="TBDD_GROUPS_USERRowChangeEvent">
|
||||
<xs:element name="TBDD_GROUPS_USER" msprop:Generator_TableClassName="TBDD_GROUPS_USERDataTable" msprop:Generator_TableVarName="tableTBDD_GROUPS_USER" msprop:Generator_TablePropName="TBDD_GROUPS_USER" msprop:Generator_RowDeletingName="TBDD_GROUPS_USERRowDeleting" msprop:Generator_RowChangingName="TBDD_GROUPS_USERRowChanging" msprop:Generator_RowEvHandlerName="TBDD_GROUPS_USERRowChangeEventHandler" msprop:Generator_RowDeletedName="TBDD_GROUPS_USERRowDeleted" msprop:Generator_UserTableName="TBDD_GROUPS_USER" msprop:Generator_RowChangedName="TBDD_GROUPS_USERRowChanged" msprop:Generator_RowEvArgName="TBDD_GROUPS_USERRowChangeEvent" msprop:Generator_RowClassName="TBDD_GROUPS_USERRow">
|
||||
<xs:complexType>
|
||||
<xs:sequence>
|
||||
<xs:element name="GUID" msdata:ReadOnly="true" msdata:AutoIncrement="true" msdata:AutoIncrementSeed="-1" msdata:AutoIncrementStep="-1" msprop:Generator_ColumnVarNameInTable="columnGUID" msprop:Generator_ColumnPropNameInRow="GUID" msprop:Generator_ColumnPropNameInTable="GUIDColumn" msprop:Generator_UserColumnName="GUID" type="xs:int" />
|
||||
@ -4507,7 +4520,7 @@ FROM VWPMO_RIGHTS_2B_WORKED</CommandText>
|
||||
</xs:sequence>
|
||||
</xs:complexType>
|
||||
</xs:element>
|
||||
<xs:element name="TBWH_DOKART_MODULE" msprop:Generator_TableClassName="TBWH_DOKART_MODULEDataTable" msprop:Generator_TableVarName="tableTBWH_DOKART_MODULE" msprop:Generator_RowChangedName="TBWH_DOKART_MODULERowChanged" msprop:Generator_TablePropName="TBWH_DOKART_MODULE" msprop:Generator_RowDeletingName="TBWH_DOKART_MODULERowDeleting" msprop:Generator_RowChangingName="TBWH_DOKART_MODULERowChanging" msprop:Generator_RowEvHandlerName="TBWH_DOKART_MODULERowChangeEventHandler" msprop:Generator_RowDeletedName="TBWH_DOKART_MODULERowDeleted" msprop:Generator_RowClassName="TBWH_DOKART_MODULERow" msprop:Generator_UserTableName="TBWH_DOKART_MODULE" msprop:Generator_RowEvArgName="TBWH_DOKART_MODULERowChangeEvent">
|
||||
<xs:element name="TBWH_DOKART_MODULE" msprop:Generator_TableClassName="TBWH_DOKART_MODULEDataTable" msprop:Generator_TableVarName="tableTBWH_DOKART_MODULE" msprop:Generator_TablePropName="TBWH_DOKART_MODULE" msprop:Generator_RowDeletingName="TBWH_DOKART_MODULERowDeleting" msprop:Generator_RowChangingName="TBWH_DOKART_MODULERowChanging" msprop:Generator_RowEvHandlerName="TBWH_DOKART_MODULERowChangeEventHandler" msprop:Generator_RowDeletedName="TBWH_DOKART_MODULERowDeleted" msprop:Generator_UserTableName="TBWH_DOKART_MODULE" msprop:Generator_RowChangedName="TBWH_DOKART_MODULERowChanged" msprop:Generator_RowEvArgName="TBWH_DOKART_MODULERowChangeEvent" msprop:Generator_RowClassName="TBWH_DOKART_MODULERow">
|
||||
<xs:complexType>
|
||||
<xs:sequence>
|
||||
<xs:element name="BEZEICHNUNG" msprop:Generator_ColumnVarNameInTable="columnBEZEICHNUNG" msprop:Generator_ColumnPropNameInRow="BEZEICHNUNG" msprop:Generator_ColumnPropNameInTable="BEZEICHNUNGColumn" msprop:Generator_UserColumnName="BEZEICHNUNG">
|
||||
@ -4527,7 +4540,7 @@ FROM VWPMO_RIGHTS_2B_WORKED</CommandText>
|
||||
</xs:sequence>
|
||||
</xs:complexType>
|
||||
</xs:element>
|
||||
<xs:element name="TBPMO_FORM_CONSTRUCTOR" msprop:Generator_TableClassName="TBPMO_FORM_CONSTRUCTORDataTable" msprop:Generator_TableVarName="tableTBPMO_FORM_CONSTRUCTOR" msprop:Generator_TablePropName="TBPMO_FORM_CONSTRUCTOR" msprop:Generator_RowDeletingName="TBPMO_FORM_CONSTRUCTORRowDeleting" msprop:Generator_RowChangingName="TBPMO_FORM_CONSTRUCTORRowChanging" msprop:Generator_RowEvHandlerName="TBPMO_FORM_CONSTRUCTORRowChangeEventHandler" msprop:Generator_RowDeletedName="TBPMO_FORM_CONSTRUCTORRowDeleted" msprop:Generator_UserTableName="TBPMO_FORM_CONSTRUCTOR" msprop:Generator_RowChangedName="TBPMO_FORM_CONSTRUCTORRowChanged" msprop:Generator_RowEvArgName="TBPMO_FORM_CONSTRUCTORRowChangeEvent" msprop:Generator_RowClassName="TBPMO_FORM_CONSTRUCTORRow">
|
||||
<xs:element name="TBPMO_FORM_CONSTRUCTOR" msprop:Generator_TableClassName="TBPMO_FORM_CONSTRUCTORDataTable" msprop:Generator_TableVarName="tableTBPMO_FORM_CONSTRUCTOR" msprop:Generator_RowChangedName="TBPMO_FORM_CONSTRUCTORRowChanged" msprop:Generator_TablePropName="TBPMO_FORM_CONSTRUCTOR" msprop:Generator_RowDeletingName="TBPMO_FORM_CONSTRUCTORRowDeleting" msprop:Generator_RowChangingName="TBPMO_FORM_CONSTRUCTORRowChanging" msprop:Generator_RowEvHandlerName="TBPMO_FORM_CONSTRUCTORRowChangeEventHandler" msprop:Generator_RowDeletedName="TBPMO_FORM_CONSTRUCTORRowDeleted" msprop:Generator_RowClassName="TBPMO_FORM_CONSTRUCTORRow" msprop:Generator_UserTableName="TBPMO_FORM_CONSTRUCTOR" msprop:Generator_RowEvArgName="TBPMO_FORM_CONSTRUCTORRowChangeEvent">
|
||||
<xs:complexType>
|
||||
<xs:sequence>
|
||||
<xs:element name="GUID" msdata:ReadOnly="true" msdata:AutoIncrement="true" msprop:Generator_ColumnVarNameInTable="columnGUID" msprop:Generator_ColumnPropNameInRow="GUID" msprop:Generator_ColumnPropNameInTable="GUIDColumn" msprop:Generator_UserColumnName="GUID" type="xs:int" />
|
||||
@ -4573,7 +4586,7 @@ FROM VWPMO_RIGHTS_2B_WORKED</CommandText>
|
||||
</xs:sequence>
|
||||
</xs:complexType>
|
||||
</xs:element>
|
||||
<xs:element name="TBPMO_WD_OBJECTTYPE" msprop:Generator_TableClassName="TBPMO_WD_OBJECTTYPEDataTable" msprop:Generator_TableVarName="tableTBPMO_WD_OBJECTTYPE" msprop:Generator_TablePropName="TBPMO_WD_OBJECTTYPE" msprop:Generator_RowDeletingName="TBPMO_WD_OBJECTTYPERowDeleting" msprop:Generator_RowChangingName="TBPMO_WD_OBJECTTYPERowChanging" msprop:Generator_RowEvHandlerName="TBPMO_WD_OBJECTTYPERowChangeEventHandler" msprop:Generator_RowDeletedName="TBPMO_WD_OBJECTTYPERowDeleted" msprop:Generator_UserTableName="TBPMO_WD_OBJECTTYPE" msprop:Generator_RowChangedName="TBPMO_WD_OBJECTTYPERowChanged" msprop:Generator_RowEvArgName="TBPMO_WD_OBJECTTYPERowChangeEvent" msprop:Generator_RowClassName="TBPMO_WD_OBJECTTYPERow">
|
||||
<xs:element name="TBPMO_WD_OBJECTTYPE" msprop:Generator_TableClassName="TBPMO_WD_OBJECTTYPEDataTable" msprop:Generator_TableVarName="tableTBPMO_WD_OBJECTTYPE" msprop:Generator_RowChangedName="TBPMO_WD_OBJECTTYPERowChanged" msprop:Generator_TablePropName="TBPMO_WD_OBJECTTYPE" msprop:Generator_RowDeletingName="TBPMO_WD_OBJECTTYPERowDeleting" msprop:Generator_RowChangingName="TBPMO_WD_OBJECTTYPERowChanging" msprop:Generator_RowEvHandlerName="TBPMO_WD_OBJECTTYPERowChangeEventHandler" msprop:Generator_RowDeletedName="TBPMO_WD_OBJECTTYPERowDeleted" msprop:Generator_RowClassName="TBPMO_WD_OBJECTTYPERow" msprop:Generator_UserTableName="TBPMO_WD_OBJECTTYPE" msprop:Generator_RowEvArgName="TBPMO_WD_OBJECTTYPERowChangeEvent">
|
||||
<xs:complexType>
|
||||
<xs:sequence>
|
||||
<xs:element name="GUID" msdata:ReadOnly="true" msdata:AutoIncrement="true" msprop:Generator_ColumnVarNameInTable="columnGUID" msprop:Generator_ColumnPropNameInRow="GUID" msprop:Generator_ColumnPropNameInTable="GUIDColumn" msprop:Generator_UserColumnName="GUID" type="xs:int" />
|
||||
@ -4631,7 +4644,7 @@ FROM VWPMO_RIGHTS_2B_WORKED</CommandText>
|
||||
</xs:sequence>
|
||||
</xs:complexType>
|
||||
</xs:element>
|
||||
<xs:element name="TBPMO_FILES_USER" msprop:Generator_TableClassName="TBPMO_FILES_USERDataTable" msprop:Generator_TableVarName="tableTBPMO_FILES_USER" msprop:Generator_TablePropName="TBPMO_FILES_USER" msprop:Generator_RowDeletingName="TBPMO_FILES_USERRowDeleting" msprop:Generator_RowChangingName="TBPMO_FILES_USERRowChanging" msprop:Generator_RowEvHandlerName="TBPMO_FILES_USERRowChangeEventHandler" msprop:Generator_RowDeletedName="TBPMO_FILES_USERRowDeleted" msprop:Generator_UserTableName="TBPMO_FILES_USER" msprop:Generator_RowChangedName="TBPMO_FILES_USERRowChanged" msprop:Generator_RowEvArgName="TBPMO_FILES_USERRowChangeEvent" msprop:Generator_RowClassName="TBPMO_FILES_USERRow">
|
||||
<xs:element name="TBPMO_FILES_USER" msprop:Generator_TableClassName="TBPMO_FILES_USERDataTable" msprop:Generator_TableVarName="tableTBPMO_FILES_USER" msprop:Generator_RowChangedName="TBPMO_FILES_USERRowChanged" msprop:Generator_TablePropName="TBPMO_FILES_USER" msprop:Generator_RowDeletingName="TBPMO_FILES_USERRowDeleting" msprop:Generator_RowChangingName="TBPMO_FILES_USERRowChanging" msprop:Generator_RowEvHandlerName="TBPMO_FILES_USERRowChangeEventHandler" msprop:Generator_RowDeletedName="TBPMO_FILES_USERRowDeleted" msprop:Generator_RowClassName="TBPMO_FILES_USERRow" msprop:Generator_UserTableName="TBPMO_FILES_USER" msprop:Generator_RowEvArgName="TBPMO_FILES_USERRowChangeEvent">
|
||||
<xs:complexType>
|
||||
<xs:sequence>
|
||||
<xs:element name="GUID" msdata:ReadOnly="true" msdata:AutoIncrement="true" msdata:AutoIncrementSeed="-1" msdata:AutoIncrementStep="-1" msprop:Generator_ColumnVarNameInTable="columnGUID" msprop:Generator_ColumnPropNameInRow="GUID" msprop:Generator_ColumnPropNameInTable="GUIDColumn" msprop:Generator_UserColumnName="GUID" type="xs:int" />
|
||||
@ -4661,7 +4674,7 @@ FROM VWPMO_RIGHTS_2B_WORKED</CommandText>
|
||||
</xs:sequence>
|
||||
</xs:complexType>
|
||||
</xs:element>
|
||||
<xs:element name="TBPMO_FOLLOW_UP_EMAIL" msprop:Generator_TableClassName="TBPMO_FOLLOW_UP_EMAILDataTable" msprop:Generator_TableVarName="tableTBPMO_FOLLOW_UP_EMAIL" msprop:Generator_RowChangedName="TBPMO_FOLLOW_UP_EMAILRowChanged" msprop:Generator_TablePropName="TBPMO_FOLLOW_UP_EMAIL" msprop:Generator_RowDeletingName="TBPMO_FOLLOW_UP_EMAILRowDeleting" msprop:Generator_RowChangingName="TBPMO_FOLLOW_UP_EMAILRowChanging" msprop:Generator_RowEvHandlerName="TBPMO_FOLLOW_UP_EMAILRowChangeEventHandler" msprop:Generator_RowDeletedName="TBPMO_FOLLOW_UP_EMAILRowDeleted" msprop:Generator_RowClassName="TBPMO_FOLLOW_UP_EMAILRow" msprop:Generator_UserTableName="TBPMO_FOLLOW_UP_EMAIL" msprop:Generator_RowEvArgName="TBPMO_FOLLOW_UP_EMAILRowChangeEvent">
|
||||
<xs:element name="TBPMO_FOLLOW_UP_EMAIL" msprop:Generator_TableClassName="TBPMO_FOLLOW_UP_EMAILDataTable" msprop:Generator_TableVarName="tableTBPMO_FOLLOW_UP_EMAIL" msprop:Generator_TablePropName="TBPMO_FOLLOW_UP_EMAIL" msprop:Generator_RowDeletingName="TBPMO_FOLLOW_UP_EMAILRowDeleting" msprop:Generator_RowChangingName="TBPMO_FOLLOW_UP_EMAILRowChanging" msprop:Generator_RowEvHandlerName="TBPMO_FOLLOW_UP_EMAILRowChangeEventHandler" msprop:Generator_RowDeletedName="TBPMO_FOLLOW_UP_EMAILRowDeleted" msprop:Generator_UserTableName="TBPMO_FOLLOW_UP_EMAIL" msprop:Generator_RowChangedName="TBPMO_FOLLOW_UP_EMAILRowChanged" msprop:Generator_RowEvArgName="TBPMO_FOLLOW_UP_EMAILRowChangeEvent" msprop:Generator_RowClassName="TBPMO_FOLLOW_UP_EMAILRow">
|
||||
<xs:complexType>
|
||||
<xs:sequence>
|
||||
<xs:element name="GUID" msdata:ReadOnly="true" msdata:AutoIncrement="true" msprop:Generator_ColumnVarNameInTable="columnGUID" msprop:Generator_ColumnPropNameInRow="GUID" msprop:Generator_ColumnPropNameInTable="GUIDColumn" msprop:Generator_UserColumnName="GUID" type="xs:int" />
|
||||
@ -4818,7 +4831,7 @@ FROM VWPMO_RIGHTS_2B_WORKED</CommandText>
|
||||
</xs:sequence>
|
||||
</xs:complexType>
|
||||
</xs:element>
|
||||
<xs:element name="TBPMO_FOLLUPEMAIL_USER" msprop:Generator_TableClassName="TBPMO_FOLLUPEMAIL_USERDataTable" msprop:Generator_TableVarName="tableTBPMO_FOLLUPEMAIL_USER" msprop:Generator_TablePropName="TBPMO_FOLLUPEMAIL_USER" msprop:Generator_RowDeletingName="TBPMO_FOLLUPEMAIL_USERRowDeleting" msprop:Generator_RowChangingName="TBPMO_FOLLUPEMAIL_USERRowChanging" msprop:Generator_RowEvHandlerName="TBPMO_FOLLUPEMAIL_USERRowChangeEventHandler" msprop:Generator_RowDeletedName="TBPMO_FOLLUPEMAIL_USERRowDeleted" msprop:Generator_UserTableName="TBPMO_FOLLUPEMAIL_USER" msprop:Generator_RowChangedName="TBPMO_FOLLUPEMAIL_USERRowChanged" msprop:Generator_RowEvArgName="TBPMO_FOLLUPEMAIL_USERRowChangeEvent" msprop:Generator_RowClassName="TBPMO_FOLLUPEMAIL_USERRow">
|
||||
<xs:element name="TBPMO_FOLLUPEMAIL_USER" msprop:Generator_TableClassName="TBPMO_FOLLUPEMAIL_USERDataTable" msprop:Generator_TableVarName="tableTBPMO_FOLLUPEMAIL_USER" msprop:Generator_RowChangedName="TBPMO_FOLLUPEMAIL_USERRowChanged" msprop:Generator_TablePropName="TBPMO_FOLLUPEMAIL_USER" msprop:Generator_RowDeletingName="TBPMO_FOLLUPEMAIL_USERRowDeleting" msprop:Generator_RowChangingName="TBPMO_FOLLUPEMAIL_USERRowChanging" msprop:Generator_RowEvHandlerName="TBPMO_FOLLUPEMAIL_USERRowChangeEventHandler" msprop:Generator_RowDeletedName="TBPMO_FOLLUPEMAIL_USERRowDeleted" msprop:Generator_RowClassName="TBPMO_FOLLUPEMAIL_USERRow" msprop:Generator_UserTableName="TBPMO_FOLLUPEMAIL_USER" msprop:Generator_RowEvArgName="TBPMO_FOLLUPEMAIL_USERRowChangeEvent">
|
||||
<xs:complexType>
|
||||
<xs:sequence>
|
||||
<xs:element name="GUID" msdata:ReadOnly="true" msdata:AutoIncrement="true" msprop:Generator_ColumnVarNameInTable="columnGUID" msprop:Generator_ColumnPropNameInRow="GUID" msprop:Generator_ColumnPropNameInTable="GUIDColumn" msprop:Generator_UserColumnName="GUID" type="xs:int" />
|
||||
@ -4843,7 +4856,7 @@ FROM VWPMO_RIGHTS_2B_WORKED</CommandText>
|
||||
</xs:sequence>
|
||||
</xs:complexType>
|
||||
</xs:element>
|
||||
<xs:element name="TBPMO_RECORD_LOG_CONFIG" msprop:Generator_TableClassName="TBPMO_RECORD_LOG_CONFIGDataTable" msprop:Generator_TableVarName="tableTBPMO_RECORD_LOG_CONFIG" msprop:Generator_RowChangedName="TBPMO_RECORD_LOG_CONFIGRowChanged" msprop:Generator_TablePropName="TBPMO_RECORD_LOG_CONFIG" msprop:Generator_RowDeletingName="TBPMO_RECORD_LOG_CONFIGRowDeleting" msprop:Generator_RowChangingName="TBPMO_RECORD_LOG_CONFIGRowChanging" msprop:Generator_RowEvHandlerName="TBPMO_RECORD_LOG_CONFIGRowChangeEventHandler" msprop:Generator_RowDeletedName="TBPMO_RECORD_LOG_CONFIGRowDeleted" msprop:Generator_RowClassName="TBPMO_RECORD_LOG_CONFIGRow" msprop:Generator_UserTableName="TBPMO_RECORD_LOG_CONFIG" msprop:Generator_RowEvArgName="TBPMO_RECORD_LOG_CONFIGRowChangeEvent">
|
||||
<xs:element name="TBPMO_RECORD_LOG_CONFIG" msprop:Generator_TableClassName="TBPMO_RECORD_LOG_CONFIGDataTable" msprop:Generator_TableVarName="tableTBPMO_RECORD_LOG_CONFIG" msprop:Generator_TablePropName="TBPMO_RECORD_LOG_CONFIG" msprop:Generator_RowDeletingName="TBPMO_RECORD_LOG_CONFIGRowDeleting" msprop:Generator_RowChangingName="TBPMO_RECORD_LOG_CONFIGRowChanging" msprop:Generator_RowEvHandlerName="TBPMO_RECORD_LOG_CONFIGRowChangeEventHandler" msprop:Generator_RowDeletedName="TBPMO_RECORD_LOG_CONFIGRowDeleted" msprop:Generator_UserTableName="TBPMO_RECORD_LOG_CONFIG" msprop:Generator_RowChangedName="TBPMO_RECORD_LOG_CONFIGRowChanged" msprop:Generator_RowEvArgName="TBPMO_RECORD_LOG_CONFIGRowChangeEvent" msprop:Generator_RowClassName="TBPMO_RECORD_LOG_CONFIGRow">
|
||||
<xs:complexType>
|
||||
<xs:sequence>
|
||||
<xs:element name="GUID" msdata:ReadOnly="true" msdata:AutoIncrement="true" msdata:AutoIncrementSeed="-1" msdata:AutoIncrementStep="-1" msprop:Generator_ColumnVarNameInTable="columnGUID" msprop:Generator_ColumnPropNameInRow="GUID" msprop:Generator_ColumnPropNameInTable="GUIDColumn" msprop:Generator_UserColumnName="GUID" type="xs:int" />
|
||||
@ -4878,7 +4891,7 @@ FROM VWPMO_RIGHTS_2B_WORKED</CommandText>
|
||||
</xs:sequence>
|
||||
</xs:complexType>
|
||||
</xs:element>
|
||||
<xs:element name="VWPMO_RECORD_CHANGES" msprop:Generator_TableClassName="VWPMO_RECORD_CHANGESDataTable" msprop:Generator_TableVarName="tableVWPMO_RECORD_CHANGES" msprop:Generator_RowChangedName="VWPMO_RECORD_CHANGESRowChanged" msprop:Generator_TablePropName="VWPMO_RECORD_CHANGES" msprop:Generator_RowDeletingName="VWPMO_RECORD_CHANGESRowDeleting" msprop:Generator_RowChangingName="VWPMO_RECORD_CHANGESRowChanging" msprop:Generator_RowEvHandlerName="VWPMO_RECORD_CHANGESRowChangeEventHandler" msprop:Generator_RowDeletedName="VWPMO_RECORD_CHANGESRowDeleted" msprop:Generator_RowClassName="VWPMO_RECORD_CHANGESRow" msprop:Generator_UserTableName="VWPMO_RECORD_CHANGES" msprop:Generator_RowEvArgName="VWPMO_RECORD_CHANGESRowChangeEvent">
|
||||
<xs:element name="VWPMO_RECORD_CHANGES" msprop:Generator_TableClassName="VWPMO_RECORD_CHANGESDataTable" msprop:Generator_TableVarName="tableVWPMO_RECORD_CHANGES" msprop:Generator_TablePropName="VWPMO_RECORD_CHANGES" msprop:Generator_RowDeletingName="VWPMO_RECORD_CHANGESRowDeleting" msprop:Generator_RowChangingName="VWPMO_RECORD_CHANGESRowChanging" msprop:Generator_RowEvHandlerName="VWPMO_RECORD_CHANGESRowChangeEventHandler" msprop:Generator_RowDeletedName="VWPMO_RECORD_CHANGESRowDeleted" msprop:Generator_UserTableName="VWPMO_RECORD_CHANGES" msprop:Generator_RowChangedName="VWPMO_RECORD_CHANGESRowChanged" msprop:Generator_RowEvArgName="VWPMO_RECORD_CHANGESRowChangeEvent" msprop:Generator_RowClassName="VWPMO_RECORD_CHANGESRow">
|
||||
<xs:complexType>
|
||||
<xs:sequence>
|
||||
<xs:element name="ID" msprop:Generator_ColumnVarNameInTable="columnID" msprop:Generator_ColumnPropNameInRow="ID" msprop:Generator_ColumnPropNameInTable="IDColumn" msprop:Generator_UserColumnName="ID" type="xs:int" />
|
||||
@ -4907,7 +4920,7 @@ FROM VWPMO_RIGHTS_2B_WORKED</CommandText>
|
||||
</xs:sequence>
|
||||
</xs:complexType>
|
||||
</xs:element>
|
||||
<xs:element name="TBDD_EMAIL_ACCOUNT" msprop:Generator_TableClassName="TBDD_EMAIL_ACCOUNTDataTable" msprop:Generator_TableVarName="tableTBDD_EMAIL_ACCOUNT" msprop:Generator_RowChangedName="TBDD_EMAIL_ACCOUNTRowChanged" msprop:Generator_TablePropName="TBDD_EMAIL_ACCOUNT" msprop:Generator_RowDeletingName="TBDD_EMAIL_ACCOUNTRowDeleting" msprop:Generator_RowChangingName="TBDD_EMAIL_ACCOUNTRowChanging" msprop:Generator_RowEvHandlerName="TBDD_EMAIL_ACCOUNTRowChangeEventHandler" msprop:Generator_RowDeletedName="TBDD_EMAIL_ACCOUNTRowDeleted" msprop:Generator_RowClassName="TBDD_EMAIL_ACCOUNTRow" msprop:Generator_UserTableName="TBDD_EMAIL_ACCOUNT" msprop:Generator_RowEvArgName="TBDD_EMAIL_ACCOUNTRowChangeEvent">
|
||||
<xs:element name="TBDD_EMAIL_ACCOUNT" msprop:Generator_TableClassName="TBDD_EMAIL_ACCOUNTDataTable" msprop:Generator_TableVarName="tableTBDD_EMAIL_ACCOUNT" msprop:Generator_TablePropName="TBDD_EMAIL_ACCOUNT" msprop:Generator_RowDeletingName="TBDD_EMAIL_ACCOUNTRowDeleting" msprop:Generator_RowChangingName="TBDD_EMAIL_ACCOUNTRowChanging" msprop:Generator_RowEvHandlerName="TBDD_EMAIL_ACCOUNTRowChangeEventHandler" msprop:Generator_RowDeletedName="TBDD_EMAIL_ACCOUNTRowDeleted" msprop:Generator_UserTableName="TBDD_EMAIL_ACCOUNT" msprop:Generator_RowChangedName="TBDD_EMAIL_ACCOUNTRowChanged" msprop:Generator_RowEvArgName="TBDD_EMAIL_ACCOUNTRowChangeEvent" msprop:Generator_RowClassName="TBDD_EMAIL_ACCOUNTRow">
|
||||
<xs:complexType>
|
||||
<xs:sequence>
|
||||
<xs:element name="GUID" msdata:ReadOnly="true" msdata:AutoIncrement="true" msdata:AutoIncrementSeed="1" msprop:Generator_ColumnVarNameInTable="columnGUID" msprop:Generator_ColumnPropNameInRow="GUID" msprop:Generator_ColumnPropNameInTable="GUIDColumn" msprop:Generator_UserColumnName="GUID" type="xs:int" />
|
||||
@ -4967,7 +4980,7 @@ FROM VWPMO_RIGHTS_2B_WORKED</CommandText>
|
||||
</xs:sequence>
|
||||
</xs:complexType>
|
||||
</xs:element>
|
||||
<xs:element name="TBDD_CONNECTION" msprop:Generator_TableClassName="TBDD_CONNECTIONDataTable" msprop:Generator_TableVarName="tableTBDD_CONNECTION" msprop:Generator_RowChangedName="TBDD_CONNECTIONRowChanged" msprop:Generator_TablePropName="TBDD_CONNECTION" msprop:Generator_RowDeletingName="TBDD_CONNECTIONRowDeleting" msprop:Generator_RowChangingName="TBDD_CONNECTIONRowChanging" msprop:Generator_RowEvHandlerName="TBDD_CONNECTIONRowChangeEventHandler" msprop:Generator_RowDeletedName="TBDD_CONNECTIONRowDeleted" msprop:Generator_RowClassName="TBDD_CONNECTIONRow" msprop:Generator_UserTableName="TBDD_CONNECTION" msprop:Generator_RowEvArgName="TBDD_CONNECTIONRowChangeEvent">
|
||||
<xs:element name="TBDD_CONNECTION" msprop:Generator_TableClassName="TBDD_CONNECTIONDataTable" msprop:Generator_TableVarName="tableTBDD_CONNECTION" msprop:Generator_TablePropName="TBDD_CONNECTION" msprop:Generator_RowDeletingName="TBDD_CONNECTIONRowDeleting" msprop:Generator_RowChangingName="TBDD_CONNECTIONRowChanging" msprop:Generator_RowEvHandlerName="TBDD_CONNECTIONRowChangeEventHandler" msprop:Generator_RowDeletedName="TBDD_CONNECTIONRowDeleted" msprop:Generator_UserTableName="TBDD_CONNECTION" msprop:Generator_RowChangedName="TBDD_CONNECTIONRowChanged" msprop:Generator_RowEvArgName="TBDD_CONNECTIONRowChangeEvent" msprop:Generator_RowClassName="TBDD_CONNECTIONRow">
|
||||
<xs:complexType>
|
||||
<xs:sequence>
|
||||
<xs:element name="GUID" msdata:ReadOnly="true" msdata:AutoIncrement="true" msdata:AutoIncrementSeed="-1" msdata:AutoIncrementStep="-1" msprop:Generator_ColumnVarNameInTable="columnGUID" msprop:Generator_ColumnPropNameInRow="GUID" msprop:Generator_ColumnPropNameInTable="GUIDColumn" msprop:Generator_UserColumnName="GUID" type="xs:short" />
|
||||
@ -5040,7 +5053,7 @@ FROM VWPMO_RIGHTS_2B_WORKED</CommandText>
|
||||
</xs:sequence>
|
||||
</xs:complexType>
|
||||
</xs:element>
|
||||
<xs:element name="TBPMO_FORM_CONSTRUCTOR_DETAIL" msprop:Generator_TableClassName="TBPMO_FORM_CONSTRUCTOR_DETAILDataTable" msprop:Generator_TableVarName="tableTBPMO_FORM_CONSTRUCTOR_DETAIL" msprop:Generator_TablePropName="TBPMO_FORM_CONSTRUCTOR_DETAIL" msprop:Generator_RowDeletingName="TBPMO_FORM_CONSTRUCTOR_DETAILRowDeleting" msprop:Generator_RowChangingName="TBPMO_FORM_CONSTRUCTOR_DETAILRowChanging" msprop:Generator_RowEvHandlerName="TBPMO_FORM_CONSTRUCTOR_DETAILRowChangeEventHandler" msprop:Generator_RowDeletedName="TBPMO_FORM_CONSTRUCTOR_DETAILRowDeleted" msprop:Generator_UserTableName="TBPMO_FORM_CONSTRUCTOR_DETAIL" msprop:Generator_RowChangedName="TBPMO_FORM_CONSTRUCTOR_DETAILRowChanged" msprop:Generator_RowEvArgName="TBPMO_FORM_CONSTRUCTOR_DETAILRowChangeEvent" msprop:Generator_RowClassName="TBPMO_FORM_CONSTRUCTOR_DETAILRow">
|
||||
<xs:element name="TBPMO_FORM_CONSTRUCTOR_DETAIL" msprop:Generator_TableClassName="TBPMO_FORM_CONSTRUCTOR_DETAILDataTable" msprop:Generator_TableVarName="tableTBPMO_FORM_CONSTRUCTOR_DETAIL" msprop:Generator_RowChangedName="TBPMO_FORM_CONSTRUCTOR_DETAILRowChanged" msprop:Generator_TablePropName="TBPMO_FORM_CONSTRUCTOR_DETAIL" msprop:Generator_RowDeletingName="TBPMO_FORM_CONSTRUCTOR_DETAILRowDeleting" msprop:Generator_RowChangingName="TBPMO_FORM_CONSTRUCTOR_DETAILRowChanging" msprop:Generator_RowEvHandlerName="TBPMO_FORM_CONSTRUCTOR_DETAILRowChangeEventHandler" msprop:Generator_RowDeletedName="TBPMO_FORM_CONSTRUCTOR_DETAILRowDeleted" msprop:Generator_RowClassName="TBPMO_FORM_CONSTRUCTOR_DETAILRow" msprop:Generator_UserTableName="TBPMO_FORM_CONSTRUCTOR_DETAIL" msprop:Generator_RowEvArgName="TBPMO_FORM_CONSTRUCTOR_DETAILRowChangeEvent">
|
||||
<xs:complexType>
|
||||
<xs:sequence>
|
||||
<xs:element name="GUID" msdata:ReadOnly="true" msdata:AutoIncrement="true" msprop:Generator_ColumnVarNameInTable="columnGUID" msprop:Generator_ColumnPropNameInRow="GUID" msprop:Generator_ColumnPropNameInTable="GUIDColumn" msprop:Generator_UserColumnName="GUID" type="xs:int" />
|
||||
@ -5147,7 +5160,7 @@ FROM VWPMO_RIGHTS_2B_WORKED</CommandText>
|
||||
</xs:sequence>
|
||||
</xs:complexType>
|
||||
</xs:element>
|
||||
<xs:element name="VWDDINDEX_AUTOM" msprop:Generator_TableClassName="VWDDINDEX_AUTOMDataTable" msprop:Generator_TableVarName="tableVWDDINDEX_AUTOM" msprop:Generator_RowChangedName="VWDDINDEX_AUTOMRowChanged" msprop:Generator_TablePropName="VWDDINDEX_AUTOM" msprop:Generator_RowDeletingName="VWDDINDEX_AUTOMRowDeleting" msprop:Generator_RowChangingName="VWDDINDEX_AUTOMRowChanging" msprop:Generator_RowEvHandlerName="VWDDINDEX_AUTOMRowChangeEventHandler" msprop:Generator_RowDeletedName="VWDDINDEX_AUTOMRowDeleted" msprop:Generator_RowClassName="VWDDINDEX_AUTOMRow" msprop:Generator_UserTableName="VWDDINDEX_AUTOM" msprop:Generator_RowEvArgName="VWDDINDEX_AUTOMRowChangeEvent">
|
||||
<xs:element name="VWDDINDEX_AUTOM" msprop:Generator_TableClassName="VWDDINDEX_AUTOMDataTable" msprop:Generator_TableVarName="tableVWDDINDEX_AUTOM" msprop:Generator_TablePropName="VWDDINDEX_AUTOM" msprop:Generator_RowDeletingName="VWDDINDEX_AUTOMRowDeleting" msprop:Generator_RowChangingName="VWDDINDEX_AUTOMRowChanging" msprop:Generator_RowEvHandlerName="VWDDINDEX_AUTOMRowChangeEventHandler" msprop:Generator_RowDeletedName="VWDDINDEX_AUTOMRowDeleted" msprop:Generator_UserTableName="VWDDINDEX_AUTOM" msprop:Generator_RowChangedName="VWDDINDEX_AUTOMRowChanged" msprop:Generator_RowEvArgName="VWDDINDEX_AUTOMRowChangeEvent" msprop:Generator_RowClassName="VWDDINDEX_AUTOMRow">
|
||||
<xs:complexType>
|
||||
<xs:sequence>
|
||||
<xs:element name="GUID" msprop:Generator_ColumnVarNameInTable="columnGUID" msprop:Generator_ColumnPropNameInRow="GUID" msprop:Generator_ColumnPropNameInTable="GUIDColumn" msprop:Generator_UserColumnName="GUID" type="xs:int" />
|
||||
@ -5241,7 +5254,7 @@ FROM VWPMO_RIGHTS_2B_WORKED</CommandText>
|
||||
</xs:sequence>
|
||||
</xs:complexType>
|
||||
</xs:element>
|
||||
<xs:element name="TBPMO_TEMPLATE" msprop:Generator_TableClassName="TBPMO_TEMPLATEDataTable" msprop:Generator_TableVarName="tableTBPMO_TEMPLATE" msprop:Generator_RowChangedName="TBPMO_TEMPLATERowChanged" msprop:Generator_TablePropName="TBPMO_TEMPLATE" msprop:Generator_RowDeletingName="TBPMO_TEMPLATERowDeleting" msprop:Generator_RowChangingName="TBPMO_TEMPLATERowChanging" msprop:Generator_RowEvHandlerName="TBPMO_TEMPLATERowChangeEventHandler" msprop:Generator_RowDeletedName="TBPMO_TEMPLATERowDeleted" msprop:Generator_RowClassName="TBPMO_TEMPLATERow" msprop:Generator_UserTableName="TBPMO_TEMPLATE" msprop:Generator_RowEvArgName="TBPMO_TEMPLATERowChangeEvent">
|
||||
<xs:element name="TBPMO_TEMPLATE" msprop:Generator_TableClassName="TBPMO_TEMPLATEDataTable" msprop:Generator_TableVarName="tableTBPMO_TEMPLATE" msprop:Generator_TablePropName="TBPMO_TEMPLATE" msprop:Generator_RowDeletingName="TBPMO_TEMPLATERowDeleting" msprop:Generator_RowChangingName="TBPMO_TEMPLATERowChanging" msprop:Generator_RowEvHandlerName="TBPMO_TEMPLATERowChangeEventHandler" msprop:Generator_RowDeletedName="TBPMO_TEMPLATERowDeleted" msprop:Generator_UserTableName="TBPMO_TEMPLATE" msprop:Generator_RowChangedName="TBPMO_TEMPLATERowChanged" msprop:Generator_RowEvArgName="TBPMO_TEMPLATERowChangeEvent" msprop:Generator_RowClassName="TBPMO_TEMPLATERow">
|
||||
<xs:complexType>
|
||||
<xs:sequence>
|
||||
<xs:element name="GUID" msdata:ReadOnly="true" msdata:AutoIncrement="true" msprop:Generator_ColumnVarNameInTable="columnGUID" msprop:Generator_ColumnPropNameInRow="GUID" msprop:Generator_ColumnPropNameInTable="GUIDColumn" msprop:Generator_UserColumnName="GUID" type="xs:int" />
|
||||
@ -5280,7 +5293,7 @@ FROM VWPMO_RIGHTS_2B_WORKED</CommandText>
|
||||
</xs:sequence>
|
||||
</xs:complexType>
|
||||
</xs:element>
|
||||
<xs:element name="TBPMO_TEMPLATE_ENTITY" msprop:Generator_TableClassName="TBPMO_TEMPLATE_ENTITYDataTable" msprop:Generator_TableVarName="tableTBPMO_TEMPLATE_ENTITY" msprop:Generator_RowChangedName="TBPMO_TEMPLATE_ENTITYRowChanged" msprop:Generator_TablePropName="TBPMO_TEMPLATE_ENTITY" msprop:Generator_RowDeletingName="TBPMO_TEMPLATE_ENTITYRowDeleting" msprop:Generator_RowChangingName="TBPMO_TEMPLATE_ENTITYRowChanging" msprop:Generator_RowEvHandlerName="TBPMO_TEMPLATE_ENTITYRowChangeEventHandler" msprop:Generator_RowDeletedName="TBPMO_TEMPLATE_ENTITYRowDeleted" msprop:Generator_RowClassName="TBPMO_TEMPLATE_ENTITYRow" msprop:Generator_UserTableName="TBPMO_TEMPLATE_ENTITY" msprop:Generator_RowEvArgName="TBPMO_TEMPLATE_ENTITYRowChangeEvent">
|
||||
<xs:element name="TBPMO_TEMPLATE_ENTITY" msprop:Generator_TableClassName="TBPMO_TEMPLATE_ENTITYDataTable" msprop:Generator_TableVarName="tableTBPMO_TEMPLATE_ENTITY" msprop:Generator_TablePropName="TBPMO_TEMPLATE_ENTITY" msprop:Generator_RowDeletingName="TBPMO_TEMPLATE_ENTITYRowDeleting" msprop:Generator_RowChangingName="TBPMO_TEMPLATE_ENTITYRowChanging" msprop:Generator_RowEvHandlerName="TBPMO_TEMPLATE_ENTITYRowChangeEventHandler" msprop:Generator_RowDeletedName="TBPMO_TEMPLATE_ENTITYRowDeleted" msprop:Generator_UserTableName="TBPMO_TEMPLATE_ENTITY" msprop:Generator_RowChangedName="TBPMO_TEMPLATE_ENTITYRowChanged" msprop:Generator_RowEvArgName="TBPMO_TEMPLATE_ENTITYRowChangeEvent" msprop:Generator_RowClassName="TBPMO_TEMPLATE_ENTITYRow">
|
||||
<xs:complexType>
|
||||
<xs:sequence>
|
||||
<xs:element name="GUID" msdata:ReadOnly="true" msdata:AutoIncrement="true" msprop:Generator_ColumnVarNameInTable="columnGUID" msprop:Generator_ColumnPropNameInRow="GUID" msprop:Generator_ColumnPropNameInTable="GUIDColumn" msprop:Generator_UserColumnName="GUID" type="xs:int" />
|
||||
@ -5298,7 +5311,7 @@ FROM VWPMO_RIGHTS_2B_WORKED</CommandText>
|
||||
</xs:sequence>
|
||||
</xs:complexType>
|
||||
</xs:element>
|
||||
<xs:element name="TBPMO_TEMPLATE_PATTERN" msprop:Generator_TableClassName="TBPMO_TEMPLATE_PATTERNDataTable" msprop:Generator_TableVarName="tableTBPMO_TEMPLATE_PATTERN" msprop:Generator_RowChangedName="TBPMO_TEMPLATE_PATTERNRowChanged" msprop:Generator_TablePropName="TBPMO_TEMPLATE_PATTERN" msprop:Generator_RowDeletingName="TBPMO_TEMPLATE_PATTERNRowDeleting" msprop:Generator_RowChangingName="TBPMO_TEMPLATE_PATTERNRowChanging" msprop:Generator_RowEvHandlerName="TBPMO_TEMPLATE_PATTERNRowChangeEventHandler" msprop:Generator_RowDeletedName="TBPMO_TEMPLATE_PATTERNRowDeleted" msprop:Generator_RowClassName="TBPMO_TEMPLATE_PATTERNRow" msprop:Generator_UserTableName="TBPMO_TEMPLATE_PATTERN" msprop:Generator_RowEvArgName="TBPMO_TEMPLATE_PATTERNRowChangeEvent">
|
||||
<xs:element name="TBPMO_TEMPLATE_PATTERN" msprop:Generator_TableClassName="TBPMO_TEMPLATE_PATTERNDataTable" msprop:Generator_TableVarName="tableTBPMO_TEMPLATE_PATTERN" msprop:Generator_TablePropName="TBPMO_TEMPLATE_PATTERN" msprop:Generator_RowDeletingName="TBPMO_TEMPLATE_PATTERNRowDeleting" msprop:Generator_RowChangingName="TBPMO_TEMPLATE_PATTERNRowChanging" msprop:Generator_RowEvHandlerName="TBPMO_TEMPLATE_PATTERNRowChangeEventHandler" msprop:Generator_RowDeletedName="TBPMO_TEMPLATE_PATTERNRowDeleted" msprop:Generator_UserTableName="TBPMO_TEMPLATE_PATTERN" msprop:Generator_RowChangedName="TBPMO_TEMPLATE_PATTERNRowChanged" msprop:Generator_RowEvArgName="TBPMO_TEMPLATE_PATTERNRowChangeEvent" msprop:Generator_RowClassName="TBPMO_TEMPLATE_PATTERNRow">
|
||||
<xs:complexType>
|
||||
<xs:sequence>
|
||||
<xs:element name="GUID" msdata:ReadOnly="true" msdata:AutoIncrement="true" msprop:Generator_ColumnVarNameInTable="columnGUID" msprop:Generator_ColumnPropNameInRow="GUID" msprop:Generator_ColumnPropNameInTable="GUIDColumn" msprop:Generator_UserColumnName="GUID" type="xs:int" />
|
||||
@ -5344,7 +5357,7 @@ FROM VWPMO_RIGHTS_2B_WORKED</CommandText>
|
||||
</xs:sequence>
|
||||
</xs:complexType>
|
||||
</xs:element>
|
||||
<xs:element name="TBTEMP_QUICKDISPLAY" msprop:Generator_TableClassName="TBTEMP_QUICKDISPLAYDataTable" msprop:Generator_TableVarName="tableTBTEMP_QUICKDISPLAY" msprop:Generator_TablePropName="TBTEMP_QUICKDISPLAY" msprop:Generator_RowDeletingName="TBTEMP_QUICKDISPLAYRowDeleting" msprop:Generator_RowChangingName="TBTEMP_QUICKDISPLAYRowChanging" msprop:Generator_RowEvHandlerName="TBTEMP_QUICKDISPLAYRowChangeEventHandler" msprop:Generator_RowDeletedName="TBTEMP_QUICKDISPLAYRowDeleted" msprop:Generator_UserTableName="TBTEMP_QUICKDISPLAY" msprop:Generator_RowChangedName="TBTEMP_QUICKDISPLAYRowChanged" msprop:Generator_RowEvArgName="TBTEMP_QUICKDISPLAYRowChangeEvent" msprop:Generator_RowClassName="TBTEMP_QUICKDISPLAYRow">
|
||||
<xs:element name="TBTEMP_QUICKDISPLAY" msprop:Generator_TableClassName="TBTEMP_QUICKDISPLAYDataTable" msprop:Generator_TableVarName="tableTBTEMP_QUICKDISPLAY" msprop:Generator_RowChangedName="TBTEMP_QUICKDISPLAYRowChanged" msprop:Generator_TablePropName="TBTEMP_QUICKDISPLAY" msprop:Generator_RowDeletingName="TBTEMP_QUICKDISPLAYRowDeleting" msprop:Generator_RowChangingName="TBTEMP_QUICKDISPLAYRowChanging" msprop:Generator_RowEvHandlerName="TBTEMP_QUICKDISPLAYRowChangeEventHandler" msprop:Generator_RowDeletedName="TBTEMP_QUICKDISPLAYRowDeleted" msprop:Generator_RowClassName="TBTEMP_QUICKDISPLAYRow" msprop:Generator_UserTableName="TBTEMP_QUICKDISPLAY" msprop:Generator_RowEvArgName="TBTEMP_QUICKDISPLAYRowChangeEvent">
|
||||
<xs:complexType>
|
||||
<xs:sequence>
|
||||
<xs:element name="GUID" msdata:ReadOnly="true" msdata:AutoIncrement="true" msdata:AutoIncrementSeed="-1" msdata:AutoIncrementStep="-1" msprop:Generator_ColumnVarNameInTable="columnGUID" msprop:Generator_ColumnPropNameInRow="GUID" msprop:Generator_ColumnPropNameInTable="GUIDColumn" msprop:Generator_UserColumnName="GUID" type="xs:int" />
|
||||
@ -5358,7 +5371,7 @@ FROM VWPMO_RIGHTS_2B_WORKED</CommandText>
|
||||
</xs:sequence>
|
||||
</xs:complexType>
|
||||
</xs:element>
|
||||
<xs:element name="TBPMO_LANGUAGE_OBJECT" msprop:Generator_TableClassName="TBPMO_LANGUAGE_OBJECTDataTable" msprop:Generator_TableVarName="tableTBPMO_LANGUAGE_OBJECT" msprop:Generator_TablePropName="TBPMO_LANGUAGE_OBJECT" msprop:Generator_RowDeletingName="TBPMO_LANGUAGE_OBJECTRowDeleting" msprop:Generator_RowChangingName="TBPMO_LANGUAGE_OBJECTRowChanging" msprop:Generator_RowEvHandlerName="TBPMO_LANGUAGE_OBJECTRowChangeEventHandler" msprop:Generator_RowDeletedName="TBPMO_LANGUAGE_OBJECTRowDeleted" msprop:Generator_UserTableName="TBPMO_LANGUAGE_OBJECT" msprop:Generator_RowChangedName="TBPMO_LANGUAGE_OBJECTRowChanged" msprop:Generator_RowEvArgName="TBPMO_LANGUAGE_OBJECTRowChangeEvent" msprop:Generator_RowClassName="TBPMO_LANGUAGE_OBJECTRow">
|
||||
<xs:element name="TBPMO_LANGUAGE_OBJECT" msprop:Generator_TableClassName="TBPMO_LANGUAGE_OBJECTDataTable" msprop:Generator_TableVarName="tableTBPMO_LANGUAGE_OBJECT" msprop:Generator_RowChangedName="TBPMO_LANGUAGE_OBJECTRowChanged" msprop:Generator_TablePropName="TBPMO_LANGUAGE_OBJECT" msprop:Generator_RowDeletingName="TBPMO_LANGUAGE_OBJECTRowDeleting" msprop:Generator_RowChangingName="TBPMO_LANGUAGE_OBJECTRowChanging" msprop:Generator_RowEvHandlerName="TBPMO_LANGUAGE_OBJECTRowChangeEventHandler" msprop:Generator_RowDeletedName="TBPMO_LANGUAGE_OBJECTRowDeleted" msprop:Generator_RowClassName="TBPMO_LANGUAGE_OBJECTRow" msprop:Generator_UserTableName="TBPMO_LANGUAGE_OBJECT" msprop:Generator_RowEvArgName="TBPMO_LANGUAGE_OBJECTRowChangeEvent">
|
||||
<xs:complexType>
|
||||
<xs:sequence>
|
||||
<xs:element name="GUID" msdata:ReadOnly="true" msdata:AutoIncrement="true" msdata:AutoIncrementSeed="-1" msdata:AutoIncrementStep="-1" msprop:Generator_ColumnVarNameInTable="columnGUID" msprop:Generator_ColumnPropNameInRow="GUID" msprop:Generator_ColumnPropNameInTable="GUIDColumn" msprop:Generator_UserColumnName="GUID" type="xs:int" />
|
||||
@ -5410,7 +5423,7 @@ FROM VWPMO_RIGHTS_2B_WORKED</CommandText>
|
||||
</xs:sequence>
|
||||
</xs:complexType>
|
||||
</xs:element>
|
||||
<xs:element name="TBDD_CLIENT" msprop:Generator_TableClassName="TBDD_CLIENTDataTable" msprop:Generator_TableVarName="tableTBDD_CLIENT" msprop:Generator_RowChangedName="TBDD_CLIENTRowChanged" msprop:Generator_TablePropName="TBDD_CLIENT" msprop:Generator_RowDeletingName="TBDD_CLIENTRowDeleting" msprop:Generator_RowChangingName="TBDD_CLIENTRowChanging" msprop:Generator_RowEvHandlerName="TBDD_CLIENTRowChangeEventHandler" msprop:Generator_RowDeletedName="TBDD_CLIENTRowDeleted" msprop:Generator_RowClassName="TBDD_CLIENTRow" msprop:Generator_UserTableName="TBDD_CLIENT" msprop:Generator_RowEvArgName="TBDD_CLIENTRowChangeEvent">
|
||||
<xs:element name="TBDD_CLIENT" msprop:Generator_TableClassName="TBDD_CLIENTDataTable" msprop:Generator_TableVarName="tableTBDD_CLIENT" msprop:Generator_TablePropName="TBDD_CLIENT" msprop:Generator_RowDeletingName="TBDD_CLIENTRowDeleting" msprop:Generator_RowChangingName="TBDD_CLIENTRowChanging" msprop:Generator_RowEvHandlerName="TBDD_CLIENTRowChangeEventHandler" msprop:Generator_RowDeletedName="TBDD_CLIENTRowDeleted" msprop:Generator_UserTableName="TBDD_CLIENT" msprop:Generator_RowChangedName="TBDD_CLIENTRowChanged" msprop:Generator_RowEvArgName="TBDD_CLIENTRowChangeEvent" msprop:Generator_RowClassName="TBDD_CLIENTRow">
|
||||
<xs:complexType>
|
||||
<xs:sequence>
|
||||
<xs:element name="GUID" msdata:ReadOnly="true" msdata:AutoIncrement="true" msprop:Generator_ColumnVarNameInTable="columnGUID" msprop:Generator_ColumnPropNameInRow="GUID" msprop:Generator_ColumnPropNameInTable="GUIDColumn" msprop:Generator_UserColumnName="GUID" type="xs:int" />
|
||||
@ -5454,7 +5467,7 @@ FROM VWPMO_RIGHTS_2B_WORKED</CommandText>
|
||||
</xs:sequence>
|
||||
</xs:complexType>
|
||||
</xs:element>
|
||||
<xs:element name="TBPMO_CONSTRUCTOR_USER_SQL" msprop:Generator_TableClassName="TBPMO_CONSTRUCTOR_USER_SQLDataTable" msprop:Generator_TableVarName="tableTBPMO_CONSTRUCTOR_USER_SQL" msprop:Generator_RowChangedName="TBPMO_CONSTRUCTOR_USER_SQLRowChanged" msprop:Generator_TablePropName="TBPMO_CONSTRUCTOR_USER_SQL" msprop:Generator_RowDeletingName="TBPMO_CONSTRUCTOR_USER_SQLRowDeleting" msprop:Generator_RowChangingName="TBPMO_CONSTRUCTOR_USER_SQLRowChanging" msprop:Generator_RowEvHandlerName="TBPMO_CONSTRUCTOR_USER_SQLRowChangeEventHandler" msprop:Generator_RowDeletedName="TBPMO_CONSTRUCTOR_USER_SQLRowDeleted" msprop:Generator_RowClassName="TBPMO_CONSTRUCTOR_USER_SQLRow" msprop:Generator_UserTableName="TBPMO_CONSTRUCTOR_USER_SQL" msprop:Generator_RowEvArgName="TBPMO_CONSTRUCTOR_USER_SQLRowChangeEvent">
|
||||
<xs:element name="TBPMO_CONSTRUCTOR_USER_SQL" msprop:Generator_TableClassName="TBPMO_CONSTRUCTOR_USER_SQLDataTable" msprop:Generator_TableVarName="tableTBPMO_CONSTRUCTOR_USER_SQL" msprop:Generator_TablePropName="TBPMO_CONSTRUCTOR_USER_SQL" msprop:Generator_RowDeletingName="TBPMO_CONSTRUCTOR_USER_SQLRowDeleting" msprop:Generator_RowChangingName="TBPMO_CONSTRUCTOR_USER_SQLRowChanging" msprop:Generator_RowEvHandlerName="TBPMO_CONSTRUCTOR_USER_SQLRowChangeEventHandler" msprop:Generator_RowDeletedName="TBPMO_CONSTRUCTOR_USER_SQLRowDeleted" msprop:Generator_UserTableName="TBPMO_CONSTRUCTOR_USER_SQL" msprop:Generator_RowChangedName="TBPMO_CONSTRUCTOR_USER_SQLRowChanged" msprop:Generator_RowEvArgName="TBPMO_CONSTRUCTOR_USER_SQLRowChangeEvent" msprop:Generator_RowClassName="TBPMO_CONSTRUCTOR_USER_SQLRow">
|
||||
<xs:complexType>
|
||||
<xs:sequence>
|
||||
<xs:element name="GUID" msdata:ReadOnly="true" msdata:AutoIncrement="true" msprop:Generator_ColumnVarNameInTable="columnGUID" msprop:Generator_ColumnPropNameInRow="GUID" msprop:Generator_ColumnPropNameInTable="GUIDColumn" msprop:Generator_UserColumnName="GUID" type="xs:int" />
|
||||
@ -5486,7 +5499,7 @@ FROM VWPMO_RIGHTS_2B_WORKED</CommandText>
|
||||
</xs:sequence>
|
||||
</xs:complexType>
|
||||
</xs:element>
|
||||
<xs:element name="TBPMO_WD_IMPORT_PROFILE" msprop:Generator_TableClassName="TBPMO_WD_IMPORT_PROFILEDataTable" msprop:Generator_TableVarName="tableTBPMO_WD_IMPORT_PROFILE" msprop:Generator_TablePropName="TBPMO_WD_IMPORT_PROFILE" msprop:Generator_RowDeletingName="TBPMO_WD_IMPORT_PROFILERowDeleting" msprop:Generator_RowChangingName="TBPMO_WD_IMPORT_PROFILERowChanging" msprop:Generator_RowEvHandlerName="TBPMO_WD_IMPORT_PROFILERowChangeEventHandler" msprop:Generator_RowDeletedName="TBPMO_WD_IMPORT_PROFILERowDeleted" msprop:Generator_UserTableName="TBPMO_WD_IMPORT_PROFILE" msprop:Generator_RowChangedName="TBPMO_WD_IMPORT_PROFILERowChanged" msprop:Generator_RowEvArgName="TBPMO_WD_IMPORT_PROFILERowChangeEvent" msprop:Generator_RowClassName="TBPMO_WD_IMPORT_PROFILERow">
|
||||
<xs:element name="TBPMO_WD_IMPORT_PROFILE" msprop:Generator_TableClassName="TBPMO_WD_IMPORT_PROFILEDataTable" msprop:Generator_TableVarName="tableTBPMO_WD_IMPORT_PROFILE" msprop:Generator_RowChangedName="TBPMO_WD_IMPORT_PROFILERowChanged" msprop:Generator_TablePropName="TBPMO_WD_IMPORT_PROFILE" msprop:Generator_RowDeletingName="TBPMO_WD_IMPORT_PROFILERowDeleting" msprop:Generator_RowChangingName="TBPMO_WD_IMPORT_PROFILERowChanging" msprop:Generator_RowEvHandlerName="TBPMO_WD_IMPORT_PROFILERowChangeEventHandler" msprop:Generator_RowDeletedName="TBPMO_WD_IMPORT_PROFILERowDeleted" msprop:Generator_RowClassName="TBPMO_WD_IMPORT_PROFILERow" msprop:Generator_UserTableName="TBPMO_WD_IMPORT_PROFILE" msprop:Generator_RowEvArgName="TBPMO_WD_IMPORT_PROFILERowChangeEvent">
|
||||
<xs:complexType>
|
||||
<xs:sequence>
|
||||
<xs:element name="GUID" msdata:ReadOnly="true" msdata:AutoIncrement="true" msprop:Generator_ColumnVarNameInTable="columnGUID" msprop:Generator_ColumnPropNameInRow="GUID" msprop:Generator_ColumnPropNameInTable="GUIDColumn" msprop:Generator_UserColumnName="GUID" type="xs:int" />
|
||||
@ -5568,7 +5581,7 @@ FROM VWPMO_RIGHTS_2B_WORKED</CommandText>
|
||||
</xs:sequence>
|
||||
</xs:complexType>
|
||||
</xs:element>
|
||||
<xs:element name="TBPMO_WD_IMPORT_PROFILE_IDX" msprop:Generator_TableClassName="TBPMO_WD_IMPORT_PROFILE_IDXDataTable" msprop:Generator_TableVarName="tableTBPMO_WD_IMPORT_PROFILE_IDX" msprop:Generator_TablePropName="TBPMO_WD_IMPORT_PROFILE_IDX" msprop:Generator_RowDeletingName="TBPMO_WD_IMPORT_PROFILE_IDXRowDeleting" msprop:Generator_RowChangingName="TBPMO_WD_IMPORT_PROFILE_IDXRowChanging" msprop:Generator_RowEvHandlerName="TBPMO_WD_IMPORT_PROFILE_IDXRowChangeEventHandler" msprop:Generator_RowDeletedName="TBPMO_WD_IMPORT_PROFILE_IDXRowDeleted" msprop:Generator_UserTableName="TBPMO_WD_IMPORT_PROFILE_IDX" msprop:Generator_RowChangedName="TBPMO_WD_IMPORT_PROFILE_IDXRowChanged" msprop:Generator_RowEvArgName="TBPMO_WD_IMPORT_PROFILE_IDXRowChangeEvent" msprop:Generator_RowClassName="TBPMO_WD_IMPORT_PROFILE_IDXRow">
|
||||
<xs:element name="TBPMO_WD_IMPORT_PROFILE_IDX" msprop:Generator_TableClassName="TBPMO_WD_IMPORT_PROFILE_IDXDataTable" msprop:Generator_TableVarName="tableTBPMO_WD_IMPORT_PROFILE_IDX" msprop:Generator_RowChangedName="TBPMO_WD_IMPORT_PROFILE_IDXRowChanged" msprop:Generator_TablePropName="TBPMO_WD_IMPORT_PROFILE_IDX" msprop:Generator_RowDeletingName="TBPMO_WD_IMPORT_PROFILE_IDXRowDeleting" msprop:Generator_RowChangingName="TBPMO_WD_IMPORT_PROFILE_IDXRowChanging" msprop:Generator_RowEvHandlerName="TBPMO_WD_IMPORT_PROFILE_IDXRowChangeEventHandler" msprop:Generator_RowDeletedName="TBPMO_WD_IMPORT_PROFILE_IDXRowDeleted" msprop:Generator_RowClassName="TBPMO_WD_IMPORT_PROFILE_IDXRow" msprop:Generator_UserTableName="TBPMO_WD_IMPORT_PROFILE_IDX" msprop:Generator_RowEvArgName="TBPMO_WD_IMPORT_PROFILE_IDXRowChangeEvent">
|
||||
<xs:complexType>
|
||||
<xs:sequence>
|
||||
<xs:element name="GUID" msdata:ReadOnly="true" msdata:AutoIncrement="true" msprop:Generator_ColumnVarNameInTable="columnGUID" msprop:Generator_ColumnPropNameInRow="GUID" msprop:Generator_ColumnPropNameInTable="GUIDColumn" msprop:Generator_UserColumnName="GUID" type="xs:int" />
|
||||
@ -5620,7 +5633,7 @@ FROM VWPMO_RIGHTS_2B_WORKED</CommandText>
|
||||
</xs:sequence>
|
||||
</xs:complexType>
|
||||
</xs:element>
|
||||
<xs:element name="VWPMO_WF_ACTIVE" msprop:Generator_TableClassName="VWPMO_WF_ACTIVEDataTable" msprop:Generator_TableVarName="tableVWPMO_WF_ACTIVE" msprop:Generator_TablePropName="VWPMO_WF_ACTIVE" msprop:Generator_RowDeletingName="VWPMO_WF_ACTIVERowDeleting" msprop:Generator_RowChangingName="VWPMO_WF_ACTIVERowChanging" msprop:Generator_RowEvHandlerName="VWPMO_WF_ACTIVERowChangeEventHandler" msprop:Generator_RowDeletedName="VWPMO_WF_ACTIVERowDeleted" msprop:Generator_UserTableName="VWPMO_WF_ACTIVE" msprop:Generator_RowChangedName="VWPMO_WF_ACTIVERowChanged" msprop:Generator_RowEvArgName="VWPMO_WF_ACTIVERowChangeEvent" msprop:Generator_RowClassName="VWPMO_WF_ACTIVERow">
|
||||
<xs:element name="VWPMO_WF_ACTIVE" msprop:Generator_TableClassName="VWPMO_WF_ACTIVEDataTable" msprop:Generator_TableVarName="tableVWPMO_WF_ACTIVE" msprop:Generator_RowChangedName="VWPMO_WF_ACTIVERowChanged" msprop:Generator_TablePropName="VWPMO_WF_ACTIVE" msprop:Generator_RowDeletingName="VWPMO_WF_ACTIVERowDeleting" msprop:Generator_RowChangingName="VWPMO_WF_ACTIVERowChanging" msprop:Generator_RowEvHandlerName="VWPMO_WF_ACTIVERowChangeEventHandler" msprop:Generator_RowDeletedName="VWPMO_WF_ACTIVERowDeleted" msprop:Generator_RowClassName="VWPMO_WF_ACTIVERow" msprop:Generator_UserTableName="VWPMO_WF_ACTIVE" msprop:Generator_RowEvArgName="VWPMO_WF_ACTIVERowChangeEvent">
|
||||
<xs:complexType>
|
||||
<xs:sequence>
|
||||
<xs:element name="WF_TASK_ID" msprop:Generator_ColumnVarNameInTable="columnWF_TASK_ID" msprop:Generator_ColumnPropNameInRow="WF_TASK_ID" msprop:Generator_ColumnPropNameInTable="WF_TASK_IDColumn" msprop:Generator_UserColumnName="WF_TASK_ID" type="xs:int" />
|
||||
@ -5711,7 +5724,7 @@ FROM VWPMO_RIGHTS_2B_WORKED</CommandText>
|
||||
</xs:sequence>
|
||||
</xs:complexType>
|
||||
</xs:element>
|
||||
<xs:element name="TBPMO_RIGHT_GROUP" msprop:Generator_TableClassName="TBPMO_RIGHT_GROUPDataTable" msprop:Generator_TableVarName="tableTBPMO_RIGHT_GROUP" msprop:Generator_RowChangedName="TBPMO_RIGHT_GROUPRowChanged" msprop:Generator_TablePropName="TBPMO_RIGHT_GROUP" msprop:Generator_RowDeletingName="TBPMO_RIGHT_GROUPRowDeleting" msprop:Generator_RowChangingName="TBPMO_RIGHT_GROUPRowChanging" msprop:Generator_RowEvHandlerName="TBPMO_RIGHT_GROUPRowChangeEventHandler" msprop:Generator_RowDeletedName="TBPMO_RIGHT_GROUPRowDeleted" msprop:Generator_RowClassName="TBPMO_RIGHT_GROUPRow" msprop:Generator_UserTableName="TBPMO_RIGHT_GROUP" msprop:Generator_RowEvArgName="TBPMO_RIGHT_GROUPRowChangeEvent">
|
||||
<xs:element name="TBPMO_RIGHT_GROUP" msprop:Generator_TableClassName="TBPMO_RIGHT_GROUPDataTable" msprop:Generator_TableVarName="tableTBPMO_RIGHT_GROUP" msprop:Generator_TablePropName="TBPMO_RIGHT_GROUP" msprop:Generator_RowDeletingName="TBPMO_RIGHT_GROUPRowDeleting" msprop:Generator_RowChangingName="TBPMO_RIGHT_GROUPRowChanging" msprop:Generator_RowEvHandlerName="TBPMO_RIGHT_GROUPRowChangeEventHandler" msprop:Generator_RowDeletedName="TBPMO_RIGHT_GROUPRowDeleted" msprop:Generator_UserTableName="TBPMO_RIGHT_GROUP" msprop:Generator_RowChangedName="TBPMO_RIGHT_GROUPRowChanged" msprop:Generator_RowEvArgName="TBPMO_RIGHT_GROUPRowChangeEvent" msprop:Generator_RowClassName="TBPMO_RIGHT_GROUPRow">
|
||||
<xs:complexType>
|
||||
<xs:sequence>
|
||||
<xs:element name="GUID" msdata:ReadOnly="true" msdata:AutoIncrement="true" msdata:AutoIncrementSeed="1" msprop:Generator_ColumnVarNameInTable="columnGUID" msprop:Generator_ColumnPropNameInRow="GUID" msprop:Generator_ColumnPropNameInTable="GUIDColumn" msprop:Generator_UserColumnName="GUID" type="xs:int" />
|
||||
@ -5742,7 +5755,7 @@ FROM VWPMO_RIGHTS_2B_WORKED</CommandText>
|
||||
</xs:sequence>
|
||||
</xs:complexType>
|
||||
</xs:element>
|
||||
<xs:element name="TBPMO_WD_NAMECONVENTION_FORMAT" msprop:Generator_TableClassName="TBPMO_WD_NAMECONVENTION_FORMATDataTable" msprop:Generator_TableVarName="tableTBPMO_WD_NAMECONVENTION_FORMAT" msprop:Generator_TablePropName="TBPMO_WD_NAMECONVENTION_FORMAT" msprop:Generator_RowDeletingName="TBPMO_WD_NAMECONVENTION_FORMATRowDeleting" msprop:Generator_RowChangingName="TBPMO_WD_NAMECONVENTION_FORMATRowChanging" msprop:Generator_RowEvHandlerName="TBPMO_WD_NAMECONVENTION_FORMATRowChangeEventHandler" msprop:Generator_RowDeletedName="TBPMO_WD_NAMECONVENTION_FORMATRowDeleted" msprop:Generator_UserTableName="TBPMO_WD_NAMECONVENTION_FORMAT" msprop:Generator_RowChangedName="TBPMO_WD_NAMECONVENTION_FORMATRowChanged" msprop:Generator_RowEvArgName="TBPMO_WD_NAMECONVENTION_FORMATRowChangeEvent" msprop:Generator_RowClassName="TBPMO_WD_NAMECONVENTION_FORMATRow">
|
||||
<xs:element name="TBPMO_WD_NAMECONVENTION_FORMAT" msprop:Generator_TableClassName="TBPMO_WD_NAMECONVENTION_FORMATDataTable" msprop:Generator_TableVarName="tableTBPMO_WD_NAMECONVENTION_FORMAT" msprop:Generator_RowChangedName="TBPMO_WD_NAMECONVENTION_FORMATRowChanged" msprop:Generator_TablePropName="TBPMO_WD_NAMECONVENTION_FORMAT" msprop:Generator_RowDeletingName="TBPMO_WD_NAMECONVENTION_FORMATRowDeleting" msprop:Generator_RowChangingName="TBPMO_WD_NAMECONVENTION_FORMATRowChanging" msprop:Generator_RowEvHandlerName="TBPMO_WD_NAMECONVENTION_FORMATRowChangeEventHandler" msprop:Generator_RowDeletedName="TBPMO_WD_NAMECONVENTION_FORMATRowDeleted" msprop:Generator_RowClassName="TBPMO_WD_NAMECONVENTION_FORMATRow" msprop:Generator_UserTableName="TBPMO_WD_NAMECONVENTION_FORMAT" msprop:Generator_RowEvArgName="TBPMO_WD_NAMECONVENTION_FORMATRowChangeEvent">
|
||||
<xs:complexType>
|
||||
<xs:sequence>
|
||||
<xs:element name="GUID" msdata:ReadOnly="true" msdata:AutoIncrement="true" msdata:AutoIncrementSeed="1" msprop:Generator_ColumnVarNameInTable="columnGUID" msprop:Generator_ColumnPropNameInRow="GUID" msprop:Generator_ColumnPropNameInTable="GUIDColumn" msprop:Generator_UserColumnName="GUID" type="xs:int" />
|
||||
@ -5780,7 +5793,7 @@ FROM VWPMO_RIGHTS_2B_WORKED</CommandText>
|
||||
</xs:sequence>
|
||||
</xs:complexType>
|
||||
</xs:element>
|
||||
<xs:element name="TBPMO_STRUCTURE_NODES_CONFIGURATION" msprop:Generator_TableClassName="TBPMO_STRUCTURE_NODES_CONFIGURATIONDataTable" msprop:Generator_TableVarName="tableTBPMO_STRUCTURE_NODES_CONFIGURATION" msprop:Generator_RowChangedName="TBPMO_STRUCTURE_NODES_CONFIGURATIONRowChanged" msprop:Generator_TablePropName="TBPMO_STRUCTURE_NODES_CONFIGURATION" msprop:Generator_RowDeletingName="TBPMO_STRUCTURE_NODES_CONFIGURATIONRowDeleting" msprop:Generator_RowChangingName="TBPMO_STRUCTURE_NODES_CONFIGURATIONRowChanging" msprop:Generator_RowEvHandlerName="TBPMO_STRUCTURE_NODES_CONFIGURATIONRowChangeEventHandler" msprop:Generator_RowDeletedName="TBPMO_STRUCTURE_NODES_CONFIGURATIONRowDeleted" msprop:Generator_RowClassName="TBPMO_STRUCTURE_NODES_CONFIGURATIONRow" msprop:Generator_UserTableName="TBPMO_STRUCTURE_NODES_CONFIGURATION" msprop:Generator_RowEvArgName="TBPMO_STRUCTURE_NODES_CONFIGURATIONRowChangeEvent">
|
||||
<xs:element name="TBPMO_STRUCTURE_NODES_CONFIGURATION" msprop:Generator_TableClassName="TBPMO_STRUCTURE_NODES_CONFIGURATIONDataTable" msprop:Generator_TableVarName="tableTBPMO_STRUCTURE_NODES_CONFIGURATION" msprop:Generator_TablePropName="TBPMO_STRUCTURE_NODES_CONFIGURATION" msprop:Generator_RowDeletingName="TBPMO_STRUCTURE_NODES_CONFIGURATIONRowDeleting" msprop:Generator_RowChangingName="TBPMO_STRUCTURE_NODES_CONFIGURATIONRowChanging" msprop:Generator_RowEvHandlerName="TBPMO_STRUCTURE_NODES_CONFIGURATIONRowChangeEventHandler" msprop:Generator_RowDeletedName="TBPMO_STRUCTURE_NODES_CONFIGURATIONRowDeleted" msprop:Generator_UserTableName="TBPMO_STRUCTURE_NODES_CONFIGURATION" msprop:Generator_RowChangedName="TBPMO_STRUCTURE_NODES_CONFIGURATIONRowChanged" msprop:Generator_RowEvArgName="TBPMO_STRUCTURE_NODES_CONFIGURATIONRowChangeEvent" msprop:Generator_RowClassName="TBPMO_STRUCTURE_NODES_CONFIGURATIONRow">
|
||||
<xs:complexType>
|
||||
<xs:sequence>
|
||||
<xs:element name="GUID" msdata:ReadOnly="true" msdata:AutoIncrement="true" msdata:AutoIncrementSeed="1" msprop:Generator_ColumnVarNameInTable="columnGUID" msprop:Generator_ColumnPropNameInRow="GUID" msprop:Generator_ColumnPropNameInTable="GUIDColumn" msprop:Generator_UserColumnName="GUID" type="xs:int" />
|
||||
@ -5822,7 +5835,7 @@ FROM VWPMO_RIGHTS_2B_WORKED</CommandText>
|
||||
</xs:sequence>
|
||||
</xs:complexType>
|
||||
</xs:element>
|
||||
<xs:element name="TBWH_ENTITY" msprop:Generator_TableClassName="TBWH_ENTITYDataTable" msprop:Generator_TableVarName="tableTBWH_ENTITY" msprop:Generator_TablePropName="TBWH_ENTITY" msprop:Generator_RowDeletingName="TBWH_ENTITYRowDeleting" msprop:Generator_RowChangingName="TBWH_ENTITYRowChanging" msprop:Generator_RowEvHandlerName="TBWH_ENTITYRowChangeEventHandler" msprop:Generator_RowDeletedName="TBWH_ENTITYRowDeleted" msprop:Generator_UserTableName="TBWH_ENTITY" msprop:Generator_RowChangedName="TBWH_ENTITYRowChanged" msprop:Generator_RowEvArgName="TBWH_ENTITYRowChangeEvent" msprop:Generator_RowClassName="TBWH_ENTITYRow">
|
||||
<xs:element name="TBWH_ENTITY" msprop:Generator_TableClassName="TBWH_ENTITYDataTable" msprop:Generator_TableVarName="tableTBWH_ENTITY" msprop:Generator_RowChangedName="TBWH_ENTITYRowChanged" msprop:Generator_TablePropName="TBWH_ENTITY" msprop:Generator_RowDeletingName="TBWH_ENTITYRowDeleting" msprop:Generator_RowChangingName="TBWH_ENTITYRowChanging" msprop:Generator_RowEvHandlerName="TBWH_ENTITYRowChangeEventHandler" msprop:Generator_RowDeletedName="TBWH_ENTITYRowDeleted" msprop:Generator_RowClassName="TBWH_ENTITYRow" msprop:Generator_UserTableName="TBWH_ENTITY" msprop:Generator_RowEvArgName="TBWH_ENTITYRowChangeEvent">
|
||||
<xs:complexType>
|
||||
<xs:sequence>
|
||||
<xs:element name="FORM_ID" msprop:Generator_ColumnVarNameInTable="columnFORM_ID" msprop:Generator_ColumnPropNameInRow="FORM_ID" msprop:Generator_ColumnPropNameInTable="FORM_IDColumn" msprop:Generator_UserColumnName="FORM_ID" type="xs:int" />
|
||||
@ -5836,7 +5849,7 @@ FROM VWPMO_RIGHTS_2B_WORKED</CommandText>
|
||||
</xs:sequence>
|
||||
</xs:complexType>
|
||||
</xs:element>
|
||||
<xs:element name="TBPMO_WORKFLOW_TASK_HISTORY" msprop:Generator_TableClassName="TBPMO_WORKFLOW_TASK_HISTORYDataTable" msprop:Generator_TableVarName="tableTBPMO_WORKFLOW_TASK_HISTORY" msprop:Generator_RowChangedName="TBPMO_WORKFLOW_TASK_HISTORYRowChanged" msprop:Generator_TablePropName="TBPMO_WORKFLOW_TASK_HISTORY" msprop:Generator_RowDeletingName="TBPMO_WORKFLOW_TASK_HISTORYRowDeleting" msprop:Generator_RowChangingName="TBPMO_WORKFLOW_TASK_HISTORYRowChanging" msprop:Generator_RowEvHandlerName="TBPMO_WORKFLOW_TASK_HISTORYRowChangeEventHandler" msprop:Generator_RowDeletedName="TBPMO_WORKFLOW_TASK_HISTORYRowDeleted" msprop:Generator_RowClassName="TBPMO_WORKFLOW_TASK_HISTORYRow" msprop:Generator_UserTableName="TBPMO_WORKFLOW_TASK_HISTORY" msprop:Generator_RowEvArgName="TBPMO_WORKFLOW_TASK_HISTORYRowChangeEvent">
|
||||
<xs:element name="TBPMO_WORKFLOW_TASK_HISTORY" msprop:Generator_TableClassName="TBPMO_WORKFLOW_TASK_HISTORYDataTable" msprop:Generator_TableVarName="tableTBPMO_WORKFLOW_TASK_HISTORY" msprop:Generator_TablePropName="TBPMO_WORKFLOW_TASK_HISTORY" msprop:Generator_RowDeletingName="TBPMO_WORKFLOW_TASK_HISTORYRowDeleting" msprop:Generator_RowChangingName="TBPMO_WORKFLOW_TASK_HISTORYRowChanging" msprop:Generator_RowEvHandlerName="TBPMO_WORKFLOW_TASK_HISTORYRowChangeEventHandler" msprop:Generator_RowDeletedName="TBPMO_WORKFLOW_TASK_HISTORYRowDeleted" msprop:Generator_UserTableName="TBPMO_WORKFLOW_TASK_HISTORY" msprop:Generator_RowChangedName="TBPMO_WORKFLOW_TASK_HISTORYRowChanged" msprop:Generator_RowEvArgName="TBPMO_WORKFLOW_TASK_HISTORYRowChangeEvent" msprop:Generator_RowClassName="TBPMO_WORKFLOW_TASK_HISTORYRow">
|
||||
<xs:complexType>
|
||||
<xs:sequence>
|
||||
<xs:element name="GUID" msdata:ReadOnly="true" msdata:AutoIncrement="true" msdata:AutoIncrementSeed="-1" msdata:AutoIncrementStep="-1" msprop:Generator_ColumnVarNameInTable="columnGUID" msprop:Generator_ColumnPropNameInRow="GUID" msprop:Generator_ColumnPropNameInTable="GUIDColumn" msprop:Generator_UserColumnName="GUID" type="xs:int" />
|
||||
@ -5865,7 +5878,7 @@ FROM VWPMO_RIGHTS_2B_WORKED</CommandText>
|
||||
</xs:sequence>
|
||||
</xs:complexType>
|
||||
</xs:element>
|
||||
<xs:element name="VWPMO_RIGHTS_2B_WORKED" msprop:Generator_TableClassName="VWPMO_RIGHTS_2B_WORKEDDataTable" msprop:Generator_TableVarName="tableVWPMO_RIGHTS_2B_WORKED" msprop:Generator_TablePropName="VWPMO_RIGHTS_2B_WORKED" msprop:Generator_RowDeletingName="VWPMO_RIGHTS_2B_WORKEDRowDeleting" msprop:Generator_RowChangingName="VWPMO_RIGHTS_2B_WORKEDRowChanging" msprop:Generator_RowEvHandlerName="VWPMO_RIGHTS_2B_WORKEDRowChangeEventHandler" msprop:Generator_RowDeletedName="VWPMO_RIGHTS_2B_WORKEDRowDeleted" msprop:Generator_UserTableName="VWPMO_RIGHTS_2B_WORKED" msprop:Generator_RowChangedName="VWPMO_RIGHTS_2B_WORKEDRowChanged" msprop:Generator_RowEvArgName="VWPMO_RIGHTS_2B_WORKEDRowChangeEvent" msprop:Generator_RowClassName="VWPMO_RIGHTS_2B_WORKEDRow">
|
||||
<xs:element name="VWPMO_RIGHTS_2B_WORKED" msprop:Generator_TableClassName="VWPMO_RIGHTS_2B_WORKEDDataTable" msprop:Generator_TableVarName="tableVWPMO_RIGHTS_2B_WORKED" msprop:Generator_RowChangedName="VWPMO_RIGHTS_2B_WORKEDRowChanged" msprop:Generator_TablePropName="VWPMO_RIGHTS_2B_WORKED" msprop:Generator_RowDeletingName="VWPMO_RIGHTS_2B_WORKEDRowDeleting" msprop:Generator_RowChangingName="VWPMO_RIGHTS_2B_WORKEDRowChanging" msprop:Generator_RowEvHandlerName="VWPMO_RIGHTS_2B_WORKEDRowChangeEventHandler" msprop:Generator_RowDeletedName="VWPMO_RIGHTS_2B_WORKEDRowDeleted" msprop:Generator_RowClassName="VWPMO_RIGHTS_2B_WORKEDRow" msprop:Generator_UserTableName="VWPMO_RIGHTS_2B_WORKED" msprop:Generator_RowEvArgName="VWPMO_RIGHTS_2B_WORKEDRowChangeEvent">
|
||||
<xs:complexType>
|
||||
<xs:sequence>
|
||||
<xs:element name="GUID" msprop:Generator_ColumnVarNameInTable="columnGUID" msprop:Generator_ColumnPropNameInRow="GUID" msprop:Generator_ColumnPropNameInTable="GUIDColumn" msprop:Generator_UserColumnName="GUID" type="xs:int" />
|
||||
@ -6076,26 +6089,26 @@ FROM VWPMO_RIGHTS_2B_WORKED</CommandText>
|
||||
</xs:element>
|
||||
<xs:annotation>
|
||||
<xs:appinfo>
|
||||
<msdata:Relationship name="FK_TBPMO_FORM_VIEW_FORM_ID" msdata:parent="TBPMO_FORM" msdata:child="TBPMO_FORM_VIEW" msdata:parentkey="GUID" msdata:childkey="FORM_ID" msprop:Generator_UserChildTable="TBPMO_FORM_VIEW" msprop:Generator_ChildPropName="GetTBPMO_FORM_VIEWRows" msprop:Generator_UserRelationName="FK_TBPMO_FORM_VIEW_FORM_ID" msprop:Generator_RelationVarName="relationFK_TBPMO_FORM_VIEW_FORM_ID" msprop:Generator_UserParentTable="TBPMO_FORM" msprop:Generator_ParentPropName="TBPMO_FORMRow" />
|
||||
<msdata:Relationship name="FK_TBDD_DOKUMENTART_EINGID" msdata:parent="TBDD_EINGANGSARTEN" msdata:child="TBDD_DOKUMENTART" msdata:parentkey="GUID" msdata:childkey="EINGANGSART_ID" msprop:Generator_UserChildTable="TBDD_DOKUMENTART" msprop:Generator_ChildPropName="GetTBDD_DOKUMENTARTRows" msprop:Generator_UserRelationName="FK_TBDD_DOKUMENTART_EINGID" msprop:Generator_RelationVarName="relationFK_TBDD_DOKUMENTART_EINGID" msprop:Generator_UserParentTable="TBDD_EINGANGSARTEN" msprop:Generator_ParentPropName="TBDD_EINGANGSARTENRow" />
|
||||
<msdata:Relationship name="FK_TBDD_INDEX_AUTOM_DOCID" msdata:parent="TBDD_DOKUMENTART" msdata:child="TBDD_INDEX_AUTOM" msdata:parentkey="GUID" msdata:childkey="DOCTYPE_ID" msprop:Generator_UserChildTable="TBDD_INDEX_AUTOM" msprop:Generator_ChildPropName="GetTBDD_INDEX_AUTOMRows" msprop:Generator_UserRelationName="FK_TBDD_INDEX_AUTOM_DOCID" msprop:Generator_ParentPropName="TBDD_DOKUMENTARTRow" msprop:Generator_RelationVarName="relationFK_TBDD_INDEX_AUTOM_DOCID" msprop:Generator_UserParentTable="TBDD_DOKUMENTART" />
|
||||
<msdata:Relationship name="FK_TBDD_INDEX_AUTOM_DOCID1" msdata:parent="TBPMO_WD_FORMVIEW_DOKTYPES" msdata:child="TBDD_INDEX_AUTOM" msdata:parentkey="GUID" msdata:childkey="DOCTYPE_ID" msprop:Generator_UserChildTable="TBDD_INDEX_AUTOM" msprop:Generator_ChildPropName="GetTBDD_INDEX_AUTOMRows" msprop:Generator_UserRelationName="FK_TBDD_INDEX_AUTOM_DOCID1" msprop:Generator_RelationVarName="relationFK_TBDD_INDEX_AUTOM_DOCID1" msprop:Generator_UserParentTable="TBPMO_WD_FORMVIEW_DOKTYPES" msprop:Generator_ParentPropName="TBPMO_WD_FORMVIEW_DOKTYPESRow" />
|
||||
<msdata:Relationship name="FK_TBPMO_FORM_FORM_TYPE_ID" msdata:parent="TBPMO_FORM_TYPE" msdata:child="TBPMO_FORM" msdata:parentkey="GUID" msdata:childkey="FORM_TYPE_ID" msprop:Generator_UserChildTable="TBPMO_FORM" msprop:Generator_ChildPropName="GetTBPMO_FORMRows" msprop:Generator_UserRelationName="FK_TBPMO_FORM_FORM_TYPE_ID" msprop:Generator_ParentPropName="TBPMO_FORM_TYPERow" msprop:Generator_RelationVarName="relationFK_TBPMO_FORM_FORM_TYPE_ID" msprop:Generator_UserParentTable="TBPMO_FORM_TYPE" />
|
||||
<msdata:Relationship name="FK_TBDD_GROUPS_USER_GROUP_ID" msdata:parent="TBDD_USER_GROUPS" msdata:child="TBDD_GROUPS_USER" msdata:parentkey="GUID" msdata:childkey="GROUP_ID" msprop:Generator_UserChildTable="TBDD_GROUPS_USER" msprop:Generator_ChildPropName="GetTBDD_GROUPS_USERRows" msprop:Generator_UserRelationName="FK_TBDD_GROUPS_USER_GROUP_ID" msprop:Generator_RelationVarName="relationFK_TBDD_GROUPS_USER_GROUP_ID" msprop:Generator_UserParentTable="TBDD_USER_GROUPS" msprop:Generator_ParentPropName="TBDD_USER_GROUPSRow" />
|
||||
<msdata:Relationship name="FK_TBDD_GROUPS_USER_USER_ID" msdata:parent="TBDD_USER" msdata:child="TBDD_GROUPS_USER" msdata:parentkey="GUID" msdata:childkey="USER_ID" msprop:Generator_UserChildTable="TBDD_GROUPS_USER" msprop:Generator_ChildPropName="GetTBDD_GROUPS_USERRows" msprop:Generator_UserRelationName="FK_TBDD_GROUPS_USER_USER_ID" msprop:Generator_RelationVarName="relationFK_TBDD_GROUPS_USER_USER_ID" msprop:Generator_UserParentTable="TBDD_USER" msprop:Generator_ParentPropName="TBDD_USERRow" />
|
||||
<msdata:Relationship name="FK_TBPMO_FOLLUPEMAIL_USER_FOLLUP_ID" msdata:parent="TBDD_USER" msdata:child="TBPMO_FOLLUPEMAIL_USER" msdata:parentkey="GUID" msdata:childkey="FOLLOW_UP_ID" msprop:Generator_UserChildTable="TBPMO_FOLLUPEMAIL_USER" msprop:Generator_ChildPropName="GetTBPMO_FOLLUPEMAIL_USERRows" msprop:Generator_UserRelationName="FK_TBPMO_FOLLUPEMAIL_USER_FOLLUP_ID" msprop:Generator_ParentPropName="TBDD_USERRow" msprop:Generator_RelationVarName="relationFK_TBPMO_FOLLUPEMAIL_USER_FOLLUP_ID" msprop:Generator_UserParentTable="TBDD_USER" />
|
||||
<msdata:Relationship name="FK_TBPMO_FORM_CONSTRUCTOR_DETAIL_CONSTRUCT_ID" msdata:parent="TBPMO_FORM_CONSTRUCTOR" msdata:child="TBPMO_FORM_CONSTRUCTOR_DETAIL" msdata:parentkey="GUID" msdata:childkey="CONSTRUCT_ID" msprop:Generator_UserChildTable="TBPMO_FORM_CONSTRUCTOR_DETAIL" msprop:Generator_ChildPropName="GetTBPMO_FORM_CONSTRUCTOR_DETAILRows" msprop:Generator_UserRelationName="FK_TBPMO_FORM_CONSTRUCTOR_DETAIL_CONSTRUCT_ID" msprop:Generator_ParentPropName="TBPMO_FORM_CONSTRUCTORRow" msprop:Generator_RelationVarName="relationFK_TBPMO_FORM_CONSTRUCTOR_DETAIL_CONSTRUCT_ID" msprop:Generator_UserParentTable="TBPMO_FORM_CONSTRUCTOR" />
|
||||
<msdata:Relationship name="FK_TBPMO_FORM_CONSTRUCTOR_DETAIL_FORMID" msdata:parent="TBPMO_FORM" msdata:child="TBPMO_FORM_CONSTRUCTOR_DETAIL" msdata:parentkey="GUID" msdata:childkey="FORM_ID" msprop:Generator_UserChildTable="TBPMO_FORM_CONSTRUCTOR_DETAIL" msprop:Generator_ChildPropName="GetTBPMO_FORM_CONSTRUCTOR_DETAILRows" msprop:Generator_UserRelationName="FK_TBPMO_FORM_CONSTRUCTOR_DETAIL_FORMID" msprop:Generator_ParentPropName="TBPMO_FORMRow" msprop:Generator_RelationVarName="relationFK_TBPMO_FORM_CONSTRUCTOR_DETAIL_FORMID" msprop:Generator_UserParentTable="TBPMO_FORM" />
|
||||
<msdata:Relationship name="FK_TBPMO_TEMPLATE_ENTITY_ENTITY_ID" msdata:parent="TBPMO_FORM" msdata:child="TBPMO_TEMPLATE_ENTITY" msdata:parentkey="GUID" msdata:childkey="ENTITY_ID" msprop:Generator_UserChildTable="TBPMO_TEMPLATE_ENTITY" msprop:Generator_ChildPropName="GetTBPMO_TEMPLATE_ENTITYRows" msprop:Generator_UserRelationName="FK_TBPMO_TEMPLATE_ENTITY_ENTITY_ID" msprop:Generator_RelationVarName="relationFK_TBPMO_TEMPLATE_ENTITY_ENTITY_ID" msprop:Generator_UserParentTable="TBPMO_FORM" msprop:Generator_ParentPropName="TBPMO_FORMRow" />
|
||||
<msdata:Relationship name="FK_TBPMO_TEMPLATE_ENTITY_TEMPLATE_ID" msdata:parent="TBPMO_TEMPLATE" msdata:child="TBPMO_TEMPLATE_ENTITY" msdata:parentkey="GUID" msdata:childkey="TEMPLATE_ID" msprop:Generator_UserChildTable="TBPMO_TEMPLATE_ENTITY" msprop:Generator_ChildPropName="GetTBPMO_TEMPLATE_ENTITYRows" msprop:Generator_UserRelationName="FK_TBPMO_TEMPLATE_ENTITY_TEMPLATE_ID" msprop:Generator_RelationVarName="relationFK_TBPMO_TEMPLATE_ENTITY_TEMPLATE_ID" msprop:Generator_UserParentTable="TBPMO_TEMPLATE" msprop:Generator_ParentPropName="TBPMO_TEMPLATERow" />
|
||||
<msdata:Relationship name="FK_TBPMO_TEMPLATE_PATTERN_TEMPLATE_ENT_ID" msdata:parent="TBPMO_TEMPLATE_ENTITY" msdata:child="TBPMO_TEMPLATE_PATTERN" msdata:parentkey="GUID" msdata:childkey="TEMPLATE_ENT_ID" msprop:Generator_UserChildTable="TBPMO_TEMPLATE_PATTERN" msprop:Generator_ChildPropName="GetTBPMO_TEMPLATE_PATTERNRows" msprop:Generator_UserRelationName="FK_TBPMO_TEMPLATE_PATTERN_TEMPLATE_ENT_ID" msprop:Generator_RelationVarName="relationFK_TBPMO_TEMPLATE_PATTERN_TEMPLATE_ENT_ID" msprop:Generator_UserParentTable="TBPMO_TEMPLATE_ENTITY" msprop:Generator_ParentPropName="TBPMO_TEMPLATE_ENTITYRow" />
|
||||
<msdata:Relationship name="FK_TBPMO_FOLLOW_UP_EMAIL_DATE_CTRL_ID" msdata:parent="TBTEMP_QUICKDISPLAY" msdata:child="TBPMO_FOLLOW_UP_EMAIL" msdata:parentkey="GUID" msdata:childkey="DEPENDENT_DATE_CTRL_ID" msprop:Generator_UserChildTable="TBPMO_FOLLOW_UP_EMAIL" msprop:Generator_ChildPropName="GetTBPMO_FOLLOW_UP_EMAILRowsByFK_TBPMO_FOLLOW_UP_EMAIL_DATE_CTRL_ID" msprop:Generator_UserRelationName="FK_TBPMO_FOLLOW_UP_EMAIL_DATE_CTRL_ID" msprop:Generator_RelationVarName="relationFK_TBPMO_FOLLOW_UP_EMAIL_DATE_CTRL_ID" msprop:Generator_UserParentTable="TBTEMP_QUICKDISPLAY" msprop:Generator_ParentPropName="TBTEMP_QUICKDISPLAYRowByFK_TBPMO_FOLLOW_UP_EMAIL_DATE_CTRL_ID" />
|
||||
<msdata:Relationship name="FK_TBPMO_FOLLOW_UP_EMAIL_DONE_CTRL_ID" msdata:parent="TBTEMP_QUICKDISPLAY" msdata:child="TBPMO_FOLLOW_UP_EMAIL" msdata:parentkey="GUID" msdata:childkey="DEPENDENT_DONE_CTRL_ID" msprop:Generator_UserChildTable="TBPMO_FOLLOW_UP_EMAIL" msprop:Generator_ChildPropName="GetTBPMO_FOLLOW_UP_EMAILRowsByFK_TBPMO_FOLLOW_UP_EMAIL_DONE_CTRL_ID" msprop:Generator_UserRelationName="FK_TBPMO_FOLLOW_UP_EMAIL_DONE_CTRL_ID" msprop:Generator_RelationVarName="relationFK_TBPMO_FOLLOW_UP_EMAIL_DONE_CTRL_ID" msprop:Generator_UserParentTable="TBTEMP_QUICKDISPLAY" msprop:Generator_ParentPropName="TBTEMP_QUICKDISPLAYRowByFK_TBPMO_FOLLOW_UP_EMAIL_DONE_CTRL_ID" />
|
||||
<msdata:Relationship name="FK_TBPMO_WD_IMPORT_PROFILE_IDX_1" msdata:parent="TBPMO_WD_IMPORT_PROFILE" msdata:child="TBPMO_WD_IMPORT_PROFILE_IDX" msdata:parentkey="GUID" msdata:childkey="PROFILE_ID" msprop:Generator_UserChildTable="TBPMO_WD_IMPORT_PROFILE_IDX" msprop:Generator_ChildPropName="GetTBPMO_WD_IMPORT_PROFILE_IDXRows" msprop:Generator_UserRelationName="FK_TBPMO_WD_IMPORT_PROFILE_IDX_1" msprop:Generator_ParentPropName="TBPMO_WD_IMPORT_PROFILERow" msprop:Generator_RelationVarName="relationFK_TBPMO_WD_IMPORT_PROFILE_IDX_1" msprop:Generator_UserParentTable="TBPMO_WD_IMPORT_PROFILE" />
|
||||
<msdata:Relationship name="FK_TBPMO_RIGHT_GROUP_ENTITY_ID" msdata:parent="TBPMO_FORM" msdata:child="TBPMO_RIGHT_GROUP" msdata:parentkey="GUID" msdata:childkey="ENTITY_ID" msprop:Generator_UserChildTable="TBPMO_RIGHT_GROUP" msprop:Generator_ChildPropName="GetTBPMO_RIGHT_GROUPRows" msprop:Generator_UserRelationName="FK_TBPMO_RIGHT_GROUP_ENTITY_ID" msprop:Generator_RelationVarName="relationFK_TBPMO_RIGHT_GROUP_ENTITY_ID" msprop:Generator_UserParentTable="TBPMO_FORM" msprop:Generator_ParentPropName="TBPMO_FORMRow" />
|
||||
<msdata:Relationship name="FK_TBPMO_RIGHT_GROUP_GROUP_ID" msdata:parent="TBDD_USER_GROUPS" msdata:child="TBPMO_RIGHT_GROUP" msdata:parentkey="GUID" msdata:childkey="GROUP_ID" msprop:Generator_UserChildTable="TBPMO_RIGHT_GROUP" msprop:Generator_ChildPropName="GetTBPMO_RIGHT_GROUPRows" msprop:Generator_UserRelationName="FK_TBPMO_RIGHT_GROUP_GROUP_ID" msprop:Generator_RelationVarName="relationFK_TBPMO_RIGHT_GROUP_GROUP_ID" msprop:Generator_UserParentTable="TBDD_USER_GROUPS" msprop:Generator_ParentPropName="TBDD_USER_GROUPSRow" />
|
||||
<msdata:Relationship name="FK_TBPMO_STRUCTURE_NODES_CONFIGURATION_ENTITY_ID" msdata:parent="TBPMO_FORM" msdata:child="TBPMO_STRUCTURE_NODES_CONFIGURATION" msdata:parentkey="GUID" msdata:childkey="ENTITY_ID" msprop:Generator_UserChildTable="TBPMO_STRUCTURE_NODES_CONFIGURATION" msprop:Generator_ChildPropName="GetTBPMO_STRUCTURE_NODES_CONFIGURATIONRows" msprop:Generator_UserRelationName="FK_TBPMO_STRUCTURE_NODES_CONFIGURATION_ENTITY_ID" msprop:Generator_RelationVarName="relationFK_TBPMO_STRUCTURE_NODES_CONFIGURATION_ENTITY_ID" msprop:Generator_UserParentTable="TBPMO_FORM" msprop:Generator_ParentPropName="TBPMO_FORMRow" />
|
||||
<msdata:Relationship name="FK_TBPMO_FORM_VIEW_FORM_ID1" msdata:parent="TBPMO_FORM" msdata:child="TBWH_ENTITY" msdata:parentkey="GUID" msdata:childkey="FORM_ID" msprop:Generator_UserChildTable="TBWH_ENTITY" msprop:Generator_ChildPropName="GetTBWH_ENTITYRows" msprop:Generator_UserRelationName="FK_TBPMO_FORM_VIEW_FORM_ID1" msprop:Generator_ParentPropName="TBPMO_FORMRow" msprop:Generator_RelationVarName="relationFK_TBPMO_FORM_VIEW_FORM_ID1" msprop:Generator_UserParentTable="TBPMO_FORM" />
|
||||
<msdata:Relationship name="FK_TBPMO_FORM_VIEW_FORM_ID" msdata:parent="TBPMO_FORM" msdata:child="TBPMO_FORM_VIEW" msdata:parentkey="GUID" msdata:childkey="FORM_ID" msprop:Generator_UserChildTable="TBPMO_FORM_VIEW" msprop:Generator_ChildPropName="GetTBPMO_FORM_VIEWRows" msprop:Generator_UserRelationName="FK_TBPMO_FORM_VIEW_FORM_ID" msprop:Generator_ParentPropName="TBPMO_FORMRow" msprop:Generator_RelationVarName="relationFK_TBPMO_FORM_VIEW_FORM_ID" msprop:Generator_UserParentTable="TBPMO_FORM" />
|
||||
<msdata:Relationship name="FK_TBDD_DOKUMENTART_EINGID" msdata:parent="TBDD_EINGANGSARTEN" msdata:child="TBDD_DOKUMENTART" msdata:parentkey="GUID" msdata:childkey="EINGANGSART_ID" msprop:Generator_UserChildTable="TBDD_DOKUMENTART" msprop:Generator_ChildPropName="GetTBDD_DOKUMENTARTRows" msprop:Generator_UserRelationName="FK_TBDD_DOKUMENTART_EINGID" msprop:Generator_ParentPropName="TBDD_EINGANGSARTENRow" msprop:Generator_RelationVarName="relationFK_TBDD_DOKUMENTART_EINGID" msprop:Generator_UserParentTable="TBDD_EINGANGSARTEN" />
|
||||
<msdata:Relationship name="FK_TBDD_INDEX_AUTOM_DOCID" msdata:parent="TBDD_DOKUMENTART" msdata:child="TBDD_INDEX_AUTOM" msdata:parentkey="GUID" msdata:childkey="DOCTYPE_ID" msprop:Generator_UserChildTable="TBDD_INDEX_AUTOM" msprop:Generator_ChildPropName="GetTBDD_INDEX_AUTOMRows" msprop:Generator_UserRelationName="FK_TBDD_INDEX_AUTOM_DOCID" msprop:Generator_RelationVarName="relationFK_TBDD_INDEX_AUTOM_DOCID" msprop:Generator_UserParentTable="TBDD_DOKUMENTART" msprop:Generator_ParentPropName="TBDD_DOKUMENTARTRow" />
|
||||
<msdata:Relationship name="FK_TBDD_INDEX_AUTOM_DOCID1" msdata:parent="TBPMO_WD_FORMVIEW_DOKTYPES" msdata:child="TBDD_INDEX_AUTOM" msdata:parentkey="GUID" msdata:childkey="DOCTYPE_ID" msprop:Generator_UserChildTable="TBDD_INDEX_AUTOM" msprop:Generator_ChildPropName="GetTBDD_INDEX_AUTOMRows" msprop:Generator_UserRelationName="FK_TBDD_INDEX_AUTOM_DOCID1" msprop:Generator_ParentPropName="TBPMO_WD_FORMVIEW_DOKTYPESRow" msprop:Generator_RelationVarName="relationFK_TBDD_INDEX_AUTOM_DOCID1" msprop:Generator_UserParentTable="TBPMO_WD_FORMVIEW_DOKTYPES" />
|
||||
<msdata:Relationship name="FK_TBPMO_FORM_FORM_TYPE_ID" msdata:parent="TBPMO_FORM_TYPE" msdata:child="TBPMO_FORM" msdata:parentkey="GUID" msdata:childkey="FORM_TYPE_ID" msprop:Generator_UserChildTable="TBPMO_FORM" msprop:Generator_ChildPropName="GetTBPMO_FORMRows" msprop:Generator_UserRelationName="FK_TBPMO_FORM_FORM_TYPE_ID" msprop:Generator_RelationVarName="relationFK_TBPMO_FORM_FORM_TYPE_ID" msprop:Generator_UserParentTable="TBPMO_FORM_TYPE" msprop:Generator_ParentPropName="TBPMO_FORM_TYPERow" />
|
||||
<msdata:Relationship name="FK_TBDD_GROUPS_USER_GROUP_ID" msdata:parent="TBDD_USER_GROUPS" msdata:child="TBDD_GROUPS_USER" msdata:parentkey="GUID" msdata:childkey="GROUP_ID" msprop:Generator_UserChildTable="TBDD_GROUPS_USER" msprop:Generator_ChildPropName="GetTBDD_GROUPS_USERRows" msprop:Generator_UserRelationName="FK_TBDD_GROUPS_USER_GROUP_ID" msprop:Generator_ParentPropName="TBDD_USER_GROUPSRow" msprop:Generator_RelationVarName="relationFK_TBDD_GROUPS_USER_GROUP_ID" msprop:Generator_UserParentTable="TBDD_USER_GROUPS" />
|
||||
<msdata:Relationship name="FK_TBDD_GROUPS_USER_USER_ID" msdata:parent="TBDD_USER" msdata:child="TBDD_GROUPS_USER" msdata:parentkey="GUID" msdata:childkey="USER_ID" msprop:Generator_UserChildTable="TBDD_GROUPS_USER" msprop:Generator_ChildPropName="GetTBDD_GROUPS_USERRows" msprop:Generator_UserRelationName="FK_TBDD_GROUPS_USER_USER_ID" msprop:Generator_ParentPropName="TBDD_USERRow" msprop:Generator_RelationVarName="relationFK_TBDD_GROUPS_USER_USER_ID" msprop:Generator_UserParentTable="TBDD_USER" />
|
||||
<msdata:Relationship name="FK_TBPMO_FOLLUPEMAIL_USER_FOLLUP_ID" msdata:parent="TBDD_USER" msdata:child="TBPMO_FOLLUPEMAIL_USER" msdata:parentkey="GUID" msdata:childkey="FOLLOW_UP_ID" msprop:Generator_UserChildTable="TBPMO_FOLLUPEMAIL_USER" msprop:Generator_ChildPropName="GetTBPMO_FOLLUPEMAIL_USERRows" msprop:Generator_UserRelationName="FK_TBPMO_FOLLUPEMAIL_USER_FOLLUP_ID" msprop:Generator_RelationVarName="relationFK_TBPMO_FOLLUPEMAIL_USER_FOLLUP_ID" msprop:Generator_UserParentTable="TBDD_USER" msprop:Generator_ParentPropName="TBDD_USERRow" />
|
||||
<msdata:Relationship name="FK_TBPMO_FORM_CONSTRUCTOR_DETAIL_CONSTRUCT_ID" msdata:parent="TBPMO_FORM_CONSTRUCTOR" msdata:child="TBPMO_FORM_CONSTRUCTOR_DETAIL" msdata:parentkey="GUID" msdata:childkey="CONSTRUCT_ID" msprop:Generator_UserChildTable="TBPMO_FORM_CONSTRUCTOR_DETAIL" msprop:Generator_ChildPropName="GetTBPMO_FORM_CONSTRUCTOR_DETAILRows" msprop:Generator_UserRelationName="FK_TBPMO_FORM_CONSTRUCTOR_DETAIL_CONSTRUCT_ID" msprop:Generator_RelationVarName="relationFK_TBPMO_FORM_CONSTRUCTOR_DETAIL_CONSTRUCT_ID" msprop:Generator_UserParentTable="TBPMO_FORM_CONSTRUCTOR" msprop:Generator_ParentPropName="TBPMO_FORM_CONSTRUCTORRow" />
|
||||
<msdata:Relationship name="FK_TBPMO_FORM_CONSTRUCTOR_DETAIL_FORMID" msdata:parent="TBPMO_FORM" msdata:child="TBPMO_FORM_CONSTRUCTOR_DETAIL" msdata:parentkey="GUID" msdata:childkey="FORM_ID" msprop:Generator_UserChildTable="TBPMO_FORM_CONSTRUCTOR_DETAIL" msprop:Generator_ChildPropName="GetTBPMO_FORM_CONSTRUCTOR_DETAILRows" msprop:Generator_UserRelationName="FK_TBPMO_FORM_CONSTRUCTOR_DETAIL_FORMID" msprop:Generator_RelationVarName="relationFK_TBPMO_FORM_CONSTRUCTOR_DETAIL_FORMID" msprop:Generator_UserParentTable="TBPMO_FORM" msprop:Generator_ParentPropName="TBPMO_FORMRow" />
|
||||
<msdata:Relationship name="FK_TBPMO_TEMPLATE_ENTITY_ENTITY_ID" msdata:parent="TBPMO_FORM" msdata:child="TBPMO_TEMPLATE_ENTITY" msdata:parentkey="GUID" msdata:childkey="ENTITY_ID" msprop:Generator_UserChildTable="TBPMO_TEMPLATE_ENTITY" msprop:Generator_ChildPropName="GetTBPMO_TEMPLATE_ENTITYRows" msprop:Generator_UserRelationName="FK_TBPMO_TEMPLATE_ENTITY_ENTITY_ID" msprop:Generator_ParentPropName="TBPMO_FORMRow" msprop:Generator_RelationVarName="relationFK_TBPMO_TEMPLATE_ENTITY_ENTITY_ID" msprop:Generator_UserParentTable="TBPMO_FORM" />
|
||||
<msdata:Relationship name="FK_TBPMO_TEMPLATE_ENTITY_TEMPLATE_ID" msdata:parent="TBPMO_TEMPLATE" msdata:child="TBPMO_TEMPLATE_ENTITY" msdata:parentkey="GUID" msdata:childkey="TEMPLATE_ID" msprop:Generator_UserChildTable="TBPMO_TEMPLATE_ENTITY" msprop:Generator_ChildPropName="GetTBPMO_TEMPLATE_ENTITYRows" msprop:Generator_UserRelationName="FK_TBPMO_TEMPLATE_ENTITY_TEMPLATE_ID" msprop:Generator_ParentPropName="TBPMO_TEMPLATERow" msprop:Generator_RelationVarName="relationFK_TBPMO_TEMPLATE_ENTITY_TEMPLATE_ID" msprop:Generator_UserParentTable="TBPMO_TEMPLATE" />
|
||||
<msdata:Relationship name="FK_TBPMO_TEMPLATE_PATTERN_TEMPLATE_ENT_ID" msdata:parent="TBPMO_TEMPLATE_ENTITY" msdata:child="TBPMO_TEMPLATE_PATTERN" msdata:parentkey="GUID" msdata:childkey="TEMPLATE_ENT_ID" msprop:Generator_UserChildTable="TBPMO_TEMPLATE_PATTERN" msprop:Generator_ChildPropName="GetTBPMO_TEMPLATE_PATTERNRows" msprop:Generator_UserRelationName="FK_TBPMO_TEMPLATE_PATTERN_TEMPLATE_ENT_ID" msprop:Generator_ParentPropName="TBPMO_TEMPLATE_ENTITYRow" msprop:Generator_RelationVarName="relationFK_TBPMO_TEMPLATE_PATTERN_TEMPLATE_ENT_ID" msprop:Generator_UserParentTable="TBPMO_TEMPLATE_ENTITY" />
|
||||
<msdata:Relationship name="FK_TBPMO_FOLLOW_UP_EMAIL_DATE_CTRL_ID" msdata:parent="TBTEMP_QUICKDISPLAY" msdata:child="TBPMO_FOLLOW_UP_EMAIL" msdata:parentkey="GUID" msdata:childkey="DEPENDENT_DATE_CTRL_ID" msprop:Generator_UserChildTable="TBPMO_FOLLOW_UP_EMAIL" msprop:Generator_ChildPropName="GetTBPMO_FOLLOW_UP_EMAILRowsByFK_TBPMO_FOLLOW_UP_EMAIL_DATE_CTRL_ID" msprop:Generator_UserRelationName="FK_TBPMO_FOLLOW_UP_EMAIL_DATE_CTRL_ID" msprop:Generator_ParentPropName="TBTEMP_QUICKDISPLAYRowByFK_TBPMO_FOLLOW_UP_EMAIL_DATE_CTRL_ID" msprop:Generator_RelationVarName="relationFK_TBPMO_FOLLOW_UP_EMAIL_DATE_CTRL_ID" msprop:Generator_UserParentTable="TBTEMP_QUICKDISPLAY" />
|
||||
<msdata:Relationship name="FK_TBPMO_FOLLOW_UP_EMAIL_DONE_CTRL_ID" msdata:parent="TBTEMP_QUICKDISPLAY" msdata:child="TBPMO_FOLLOW_UP_EMAIL" msdata:parentkey="GUID" msdata:childkey="DEPENDENT_DONE_CTRL_ID" msprop:Generator_UserChildTable="TBPMO_FOLLOW_UP_EMAIL" msprop:Generator_ChildPropName="GetTBPMO_FOLLOW_UP_EMAILRowsByFK_TBPMO_FOLLOW_UP_EMAIL_DONE_CTRL_ID" msprop:Generator_UserRelationName="FK_TBPMO_FOLLOW_UP_EMAIL_DONE_CTRL_ID" msprop:Generator_ParentPropName="TBTEMP_QUICKDISPLAYRowByFK_TBPMO_FOLLOW_UP_EMAIL_DONE_CTRL_ID" msprop:Generator_RelationVarName="relationFK_TBPMO_FOLLOW_UP_EMAIL_DONE_CTRL_ID" msprop:Generator_UserParentTable="TBTEMP_QUICKDISPLAY" />
|
||||
<msdata:Relationship name="FK_TBPMO_WD_IMPORT_PROFILE_IDX_1" msdata:parent="TBPMO_WD_IMPORT_PROFILE" msdata:child="TBPMO_WD_IMPORT_PROFILE_IDX" msdata:parentkey="GUID" msdata:childkey="PROFILE_ID" msprop:Generator_UserChildTable="TBPMO_WD_IMPORT_PROFILE_IDX" msprop:Generator_ChildPropName="GetTBPMO_WD_IMPORT_PROFILE_IDXRows" msprop:Generator_UserRelationName="FK_TBPMO_WD_IMPORT_PROFILE_IDX_1" msprop:Generator_RelationVarName="relationFK_TBPMO_WD_IMPORT_PROFILE_IDX_1" msprop:Generator_UserParentTable="TBPMO_WD_IMPORT_PROFILE" msprop:Generator_ParentPropName="TBPMO_WD_IMPORT_PROFILERow" />
|
||||
<msdata:Relationship name="FK_TBPMO_RIGHT_GROUP_ENTITY_ID" msdata:parent="TBPMO_FORM" msdata:child="TBPMO_RIGHT_GROUP" msdata:parentkey="GUID" msdata:childkey="ENTITY_ID" msprop:Generator_UserChildTable="TBPMO_RIGHT_GROUP" msprop:Generator_ChildPropName="GetTBPMO_RIGHT_GROUPRows" msprop:Generator_UserRelationName="FK_TBPMO_RIGHT_GROUP_ENTITY_ID" msprop:Generator_ParentPropName="TBPMO_FORMRow" msprop:Generator_RelationVarName="relationFK_TBPMO_RIGHT_GROUP_ENTITY_ID" msprop:Generator_UserParentTable="TBPMO_FORM" />
|
||||
<msdata:Relationship name="FK_TBPMO_RIGHT_GROUP_GROUP_ID" msdata:parent="TBDD_USER_GROUPS" msdata:child="TBPMO_RIGHT_GROUP" msdata:parentkey="GUID" msdata:childkey="GROUP_ID" msprop:Generator_UserChildTable="TBPMO_RIGHT_GROUP" msprop:Generator_ChildPropName="GetTBPMO_RIGHT_GROUPRows" msprop:Generator_UserRelationName="FK_TBPMO_RIGHT_GROUP_GROUP_ID" msprop:Generator_ParentPropName="TBDD_USER_GROUPSRow" msprop:Generator_RelationVarName="relationFK_TBPMO_RIGHT_GROUP_GROUP_ID" msprop:Generator_UserParentTable="TBDD_USER_GROUPS" />
|
||||
<msdata:Relationship name="FK_TBPMO_STRUCTURE_NODES_CONFIGURATION_ENTITY_ID" msdata:parent="TBPMO_FORM" msdata:child="TBPMO_STRUCTURE_NODES_CONFIGURATION" msdata:parentkey="GUID" msdata:childkey="ENTITY_ID" msprop:Generator_UserChildTable="TBPMO_STRUCTURE_NODES_CONFIGURATION" msprop:Generator_ChildPropName="GetTBPMO_STRUCTURE_NODES_CONFIGURATIONRows" msprop:Generator_UserRelationName="FK_TBPMO_STRUCTURE_NODES_CONFIGURATION_ENTITY_ID" msprop:Generator_ParentPropName="TBPMO_FORMRow" msprop:Generator_RelationVarName="relationFK_TBPMO_STRUCTURE_NODES_CONFIGURATION_ENTITY_ID" msprop:Generator_UserParentTable="TBPMO_FORM" />
|
||||
<msdata:Relationship name="FK_TBPMO_FORM_VIEW_FORM_ID1" msdata:parent="TBPMO_FORM" msdata:child="TBWH_ENTITY" msdata:parentkey="GUID" msdata:childkey="FORM_ID" msprop:Generator_UserChildTable="TBWH_ENTITY" msprop:Generator_ChildPropName="GetTBWH_ENTITYRows" msprop:Generator_UserRelationName="FK_TBPMO_FORM_VIEW_FORM_ID1" msprop:Generator_RelationVarName="relationFK_TBPMO_FORM_VIEW_FORM_ID1" msprop:Generator_UserParentTable="TBPMO_FORM" msprop:Generator_ParentPropName="TBPMO_FORMRow" />
|
||||
</xs:appinfo>
|
||||
</xs:annotation>
|
||||
</xs:schema>
|
||||
@ -10,7 +10,7 @@
|
||||
<Shape ID="DesignTable:VWPMO_CONTROL_SCREEN" ZOrder="3" X="78" Y="352" Height="305" Width="300" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="254" />
|
||||
<Shape ID="DesignTable:TBPMO_FORM_VIEW" ZOrder="18" X="492" Y="68" Height="324" Width="265" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="254" />
|
||||
<Shape ID="DesignTable:TBPMO_RECORD" ZOrder="51" X="875" Y="408" Height="172" Width="242" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="121" />
|
||||
<Shape ID="DesignTable:VWPMO_DOKUMENTTYPES" ZOrder="2" X="555" Y="415" Height="248" Width="300" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="197" />
|
||||
<Shape ID="DesignTable:VWPMO_DOKUMENTTYPES" ZOrder="1" X="556" Y="356" Height="286" Width="300" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="197" />
|
||||
<Shape ID="DesignTable:TBPMO_WD_FVIEW_DT_INDEX" ZOrder="68" X="819" Y="147" Height="229" Width="300" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="178" />
|
||||
<Shape ID="DesignTable:TBPMO_WORKFLOW_TASK" ZOrder="50" X="603" Y="718" Height="324" Width="300" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="235" />
|
||||
<Shape ID="DesignTable:TBPMO_WORKFLOW_TASK_STATE" ZOrder="15" X="950" Y="736" Height="248" Width="300" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="159" />
|
||||
@ -51,7 +51,7 @@
|
||||
<Shape ID="DesignTable:VWPMO_WF_ACTIVE" ZOrder="16" X="1910" Y="509" Height="357" Width="378" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="270" />
|
||||
<Shape ID="DesignTable:TBPMO_RIGHT_GROUP" ZOrder="14" X="0" Y="0" Height="90" Width="158" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="0" />
|
||||
<Shape ID="DesignTable:TBPMO_WD_NAMECONVENTION_FORMAT" ZOrder="10" X="0" Y="0" Height="90" Width="247" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="0" />
|
||||
<Shape ID="DesignTable:TBPMO_STRUCTURE_NODES_CONFIGURATION" ZOrder="1" X="64" Y="2" Height="359" Width="300" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="289" />
|
||||
<Shape ID="DesignTable:TBPMO_STRUCTURE_NODES_CONFIGURATION" ZOrder="2" X="64" Y="2" Height="359" Width="300" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="289" />
|
||||
<Shape ID="DesignTable:TBWH_ENTITY" ZOrder="9" X="0" Y="0" Height="90" Width="158" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="0" />
|
||||
<Shape ID="DesignTable:TBPMO_WORKFLOW_TASK_HISTORY" ZOrder="8" X="0" Y="0" Height="90" Width="158" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="0" />
|
||||
<Shape ID="DesignTable:VWPMO_RIGHTS_2B_WORKED" ZOrder="5" X="2579" Y="410" Height="229" Width="300" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="178" />
|
||||
|
||||
@ -6,7 +6,7 @@
|
||||
|
||||
' Diese Werte müssen später zur Laufzeit geladen werden
|
||||
|
||||
Public CURRENT_FORM_ID As Integer
|
||||
|
||||
Public CURRENT_PARENT_ENTITY_ID As Integer
|
||||
Public CURRENT_PARENT_RECORD_ID As Integer
|
||||
Public CURRENT_ACT_LEVEL As Integer
|
||||
@ -15,6 +15,7 @@
|
||||
|
||||
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
|
||||
@ -36,7 +37,10 @@
|
||||
Public CURRENT_NEWFILENAME As String
|
||||
Public CURRENT_CONTROL_DOCTYPE_MATCH As String = ""
|
||||
|
||||
Public CURRENT_FORM_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
|
||||
|
||||
@ -33,7 +33,7 @@ Imports System.Runtime.InteropServices
|
||||
' übernehmen, indem Sie "*" eingeben:
|
||||
' <Assembly: AssemblyVersion("1.0.*")>
|
||||
|
||||
<Assembly: AssemblyVersion("2.4.7.5")>
|
||||
<Assembly: AssemblyVersion("2.4.7.6")>
|
||||
<Assembly: AssemblyFileVersion("1.0.0.0")>
|
||||
|
||||
<Assembly: NeutralResourcesLanguageAttribute("")>
|
||||
@ -1414,6 +1414,9 @@
|
||||
<data name=">>TabControl1.ZOrder" xml:space="preserve">
|
||||
<value>0</value>
|
||||
</data>
|
||||
<metadata name="$this.Language" type="System.Globalization.CultureInfo, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>en-US</value>
|
||||
</metadata>
|
||||
<metadata name="$this.Localizable" type="System.Boolean, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>True</value>
|
||||
</metadata>
|
||||
|
||||
@ -85,7 +85,7 @@ Public Class frmConfig_Basic
|
||||
Loop
|
||||
cmbDatenbank.DroppedDown = True
|
||||
Else
|
||||
MsgBox("The standard-databases could not be retrieved. Check rights in sql-server for user: " & Me.txtUser.Text, MsgBoxStyle.Exclamation)
|
||||
MsgBox("The standard-databases could not be retrieved. The default database will be set!" & vbNewLine & "Check rights in sql-server for user: " & Me.txtUser.Text, MsgBoxStyle.Exclamation)
|
||||
End If
|
||||
connection.Close()
|
||||
Catch ex As Exception
|
||||
@ -423,4 +423,8 @@ Public Class frmConfig_Basic
|
||||
Private Sub chkSubfolder_CheckedChanged(sender As Object, e As EventArgs) Handles chkSubfolder.CheckedChanged
|
||||
CheckScanFolder(txtScanFolderWatch.Text, chkSubfolder.Checked)
|
||||
End Sub
|
||||
|
||||
Private Sub txtPasswort_TextChanged(sender As Object, e As EventArgs) Handles txtPasswort.TextChanged
|
||||
|
||||
End Sub
|
||||
End Class
|
||||
@ -22,6 +22,7 @@ Partial Class frmConstructorDesigner
|
||||
'Das Bearbeiten mit dem Code-Editor ist nicht möglich.
|
||||
<System.Diagnostics.DebuggerStepThrough()> _
|
||||
Private Sub InitializeComponent()
|
||||
Me.components = New System.ComponentModel.Container()
|
||||
Dim GUIDLabel As System.Windows.Forms.Label
|
||||
Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(frmConstructorDesigner))
|
||||
Dim FORM_TITLELabel As System.Windows.Forms.Label
|
||||
@ -36,7 +37,6 @@ Partial Class frmConstructorDesigner
|
||||
Dim ADDED_WHENLabel1 As System.Windows.Forms.Label
|
||||
Dim CHANGED_WHOLabel1 As System.Windows.Forms.Label
|
||||
Dim CHANGED_WHENLabel1 As System.Windows.Forms.Label
|
||||
Dim SQL_SELECT_EBENE1Label As System.Windows.Forms.Label
|
||||
Dim COLUMN_NAME1Label1 As System.Windows.Forms.Label
|
||||
Dim GUIDLabel2 As System.Windows.Forms.Label
|
||||
Dim SQL_COMMANDLabel As System.Windows.Forms.Label
|
||||
@ -47,14 +47,14 @@ Partial Class frmConstructorDesigner
|
||||
Dim Label19 As System.Windows.Forms.Label
|
||||
Dim SQL_RIGHT_READ_AND_VIEW_ONLYLabel As System.Windows.Forms.Label
|
||||
Dim SQL_RIGHT_WINDREAM_VIEWLabel As System.Windows.Forms.Label
|
||||
Dim DataGridViewCellStyle1 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
|
||||
Dim DataGridViewCellStyle2 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
|
||||
Dim DataGridViewCellStyle3 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
|
||||
Dim DataGridViewCellStyle4 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
|
||||
Me.DD_ECMAdmin = New DD_Record_Organiser.DD_ECMAdmin()
|
||||
Me.TBPMO_FORM_CONSTRUCTORBindingSource = New System.Windows.Forms.BindingSource()
|
||||
Me.TBPMO_FORM_CONSTRUCTORBindingSource = New System.Windows.Forms.BindingSource(Me.components)
|
||||
Me.TBPMO_FORM_CONSTRUCTORTableAdapter = New DD_Record_Organiser.DD_ECMAdminTableAdapters.TBPMO_FORM_CONSTRUCTORTableAdapter()
|
||||
Me.TableAdapterManager = New DD_Record_Organiser.DD_ECMAdminTableAdapters.TableAdapterManager()
|
||||
Me.TBPMO_FORM_CONSTRUCTOR_DETAILTableAdapter = New DD_Record_Organiser.DD_ECMAdminTableAdapters.TBPMO_FORM_CONSTRUCTOR_DETAILTableAdapter()
|
||||
Me.TBPMO_FORM_CONSTRUCTORBindingNavigator = New System.Windows.Forms.BindingNavigator()
|
||||
Me.TBPMO_FORM_CONSTRUCTORBindingNavigator = New System.Windows.Forms.BindingNavigator(Me.components)
|
||||
Me.BindingNavigatorAddNewItem = New System.Windows.Forms.ToolStripButton()
|
||||
Me.BindingNavigatorCountItem = New System.Windows.Forms.ToolStripLabel()
|
||||
Me.BindingNavigatorDeleteItem = New System.Windows.Forms.ToolStripButton()
|
||||
@ -67,11 +67,11 @@ Partial Class frmConstructorDesigner
|
||||
Me.BindingNavigatorMoveLastItem = New System.Windows.Forms.ToolStripButton()
|
||||
Me.BindingNavigatorSeparator2 = New System.Windows.Forms.ToolStripSeparator()
|
||||
Me.TBPMO_FORM_CONSTRUCTORBindingNavigatorSaveItem = New System.Windows.Forms.ToolStripButton()
|
||||
Me.TBPMO_FORM_CONSTRUCTOR_DETAILBindingSource = New System.Windows.Forms.BindingSource()
|
||||
Me.TBPMO_FORM_CONSTRUCTOR_DETAILBindingSource = New System.Windows.Forms.BindingSource(Me.components)
|
||||
Me.TreeViewDetails = New System.Windows.Forms.TreeView()
|
||||
Me.cmstrpEntity = New System.Windows.Forms.ContextMenuStrip()
|
||||
Me.cmstrpEntity = New System.Windows.Forms.ContextMenuStrip(Me.components)
|
||||
Me.FormDesignerToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
|
||||
Me.ImageList1 = New System.Windows.Forms.ImageList()
|
||||
Me.ImageList1 = New System.Windows.Forms.ImageList(Me.components)
|
||||
Me.CONSTRUCTOR_IDTextBox = New System.Windows.Forms.TextBox()
|
||||
Me.FORM_TITLETextBox = New System.Windows.Forms.TextBox()
|
||||
Me.SEQUENCE_MENUNumericUpDown = New System.Windows.Forms.NumericUpDown()
|
||||
@ -93,7 +93,6 @@ Partial Class frmConstructorDesigner
|
||||
Me.Label4 = New System.Windows.Forms.Label()
|
||||
Me.COLUMN_NAME1ComboBox = New System.Windows.Forms.ComboBox()
|
||||
Me.Label2 = New System.Windows.Forms.Label()
|
||||
Me.SQL_SELECT_EBENE1TextBox = New System.Windows.Forms.TextBox()
|
||||
Me.CHANGED_WHENTextBox1 = New System.Windows.Forms.TextBox()
|
||||
Me.CHANGED_WHOTextBox1 = New System.Windows.Forms.TextBox()
|
||||
Me.ADDED_WHENTextBox1 = New System.Windows.Forms.TextBox()
|
||||
@ -114,41 +113,48 @@ Partial Class frmConstructorDesigner
|
||||
Me.listBoxControls = New System.Windows.Forms.ListBox()
|
||||
Me.Label3 = New System.Windows.Forms.Label()
|
||||
Me.XtraTabPage4 = New DevExpress.XtraTab.XtraTabPage()
|
||||
Me.btndeleteSupervisorControl = New System.Windows.Forms.Button()
|
||||
Me.btnAddSupervisorControl = New System.Windows.Forms.Button()
|
||||
Me.Label15 = New System.Windows.Forms.Label()
|
||||
Me.CheckedListBoxSupervisorControls = New System.Windows.Forms.CheckedListBox()
|
||||
Me.Label14 = New System.Windows.Forms.Label()
|
||||
Me.cmbSupervisorControls = New System.Windows.Forms.ComboBox()
|
||||
Me.Label13 = New System.Windows.Forms.Label()
|
||||
Me.XtraTabControlSV = New DevExpress.XtraTab.XtraTabControl()
|
||||
Me.XtraTabPage7 = New DevExpress.XtraTab.XtraTabPage()
|
||||
Me.Label20 = New System.Windows.Forms.Label()
|
||||
Me.GridControl2 = New DevExpress.XtraGrid.GridControl()
|
||||
Me.TBWH_Users2BindingSource = New System.Windows.Forms.BindingSource()
|
||||
Me.TBWH_Users2BindingSource = New System.Windows.Forms.BindingSource(Me.components)
|
||||
Me.GridView2 = New DevExpress.XtraGrid.Views.Grid.GridView()
|
||||
Me.GridColumn14 = New DevExpress.XtraGrid.Columns.GridColumn()
|
||||
Me.colSurname3 = New DevExpress.XtraGrid.Columns.GridColumn()
|
||||
Me.GridColumn15 = New DevExpress.XtraGrid.Columns.GridColumn()
|
||||
Me.GridColumn16 = New DevExpress.XtraGrid.Columns.GridColumn()
|
||||
Me.GridColumn17 = New DevExpress.XtraGrid.Columns.GridColumn()
|
||||
Me.Label7 = New System.Windows.Forms.Label()
|
||||
Me.Label9 = New System.Windows.Forms.Label()
|
||||
Me.Label11 = New System.Windows.Forms.Label()
|
||||
Me.cmbRight = New System.Windows.Forms.ComboBox()
|
||||
Me.GridControlSupervisorAdd = New DevExpress.XtraGrid.GridControl()
|
||||
Me.TBAD_UsersBindingSource = New System.Windows.Forms.BindingSource()
|
||||
Me.TBAD_UsersBindingSource = New System.Windows.Forms.BindingSource(Me.components)
|
||||
Me.GridViewSupervisorsAdd = New DevExpress.XtraGrid.Views.Grid.GridView()
|
||||
Me.GridColumn10 = New DevExpress.XtraGrid.Columns.GridColumn()
|
||||
Me.colSurname2 = New DevExpress.XtraGrid.Columns.GridColumn()
|
||||
Me.GridColumn11 = New DevExpress.XtraGrid.Columns.GridColumn()
|
||||
Me.GridColumn12 = New DevExpress.XtraGrid.Columns.GridColumn()
|
||||
Me.GridColumn13 = New DevExpress.XtraGrid.Columns.GridColumn()
|
||||
Me.Label11 = New System.Windows.Forms.Label()
|
||||
Me.cmbRight = New System.Windows.Forms.ComboBox()
|
||||
Me.btnDeleteUserSupervisor = New System.Windows.Forms.Button()
|
||||
Me.btnAddUser2Supervisor = New System.Windows.Forms.Button()
|
||||
Me.Label9 = New System.Windows.Forms.Label()
|
||||
Me.Label7 = New System.Windows.Forms.Label()
|
||||
Me.XtraTabPage8 = New DevExpress.XtraTab.XtraTabPage()
|
||||
Me.btndeleteSupervisorControl = New System.Windows.Forms.Button()
|
||||
Me.btnAddSupervisorControl = New System.Windows.Forms.Button()
|
||||
Me.Label13 = New System.Windows.Forms.Label()
|
||||
Me.Label15 = New System.Windows.Forms.Label()
|
||||
Me.cmbSupervisorControls = New System.Windows.Forms.ComboBox()
|
||||
Me.CheckedListBoxSupervisorControls = New System.Windows.Forms.CheckedListBox()
|
||||
Me.Label14 = New System.Windows.Forms.Label()
|
||||
Me.chkWDSearch_Active = New System.Windows.Forms.CheckBox()
|
||||
Me.lblSaveDocSearch = New System.Windows.Forms.Label()
|
||||
Me.XtraTabPage2 = New DevExpress.XtraTab.XtraTabPage()
|
||||
Me.TabControl1 = New System.Windows.Forms.TabControl()
|
||||
Me.TabPage1 = New System.Windows.Forms.TabPage()
|
||||
Me.GridControlUserSQL = New DevExpress.XtraGrid.GridControl()
|
||||
Me.TBWH_Users1BindingSource = New System.Windows.Forms.BindingSource()
|
||||
Me.TBWH_Users1BindingSource = New System.Windows.Forms.BindingSource(Me.components)
|
||||
Me.GridViewUserSQL = New DevExpress.XtraGrid.Views.Grid.GridView()
|
||||
Me.colSurname4 = New DevExpress.XtraGrid.Columns.GridColumn()
|
||||
Me.GridColumn4 = New DevExpress.XtraGrid.Columns.GridColumn()
|
||||
Me.GridColumn5 = New DevExpress.XtraGrid.Columns.GridColumn()
|
||||
Me.GridColumn6 = New DevExpress.XtraGrid.Columns.GridColumn()
|
||||
@ -163,7 +169,7 @@ Partial Class frmConstructorDesigner
|
||||
Me.btnAddUserSQL = New System.Windows.Forms.Button()
|
||||
Me.lblsaveSQLUser = New System.Windows.Forms.Label()
|
||||
Me.CHANGED_WHENTextBox2 = New System.Windows.Forms.TextBox()
|
||||
Me.TBPMO_CONSTRUCTOR_USER_SQLBindingSource = New System.Windows.Forms.BindingSource()
|
||||
Me.TBPMO_CONSTRUCTOR_USER_SQLBindingSource = New System.Windows.Forms.BindingSource(Me.components)
|
||||
Me.DD_DMSDataSet = New DD_Record_Organiser.DD_DMSDataSet()
|
||||
Me.CHANGED_WHOTextBox2 = New System.Windows.Forms.TextBox()
|
||||
Me.ADDED_WHENTextBox2 = New System.Windows.Forms.TextBox()
|
||||
@ -183,17 +189,17 @@ Partial Class frmConstructorDesigner
|
||||
Me.tslblSaveDetail = New System.Windows.Forms.ToolStripStatusLabel()
|
||||
Me.ToolStrip1 = New System.Windows.Forms.ToolStrip()
|
||||
Me.tsbtnSave = New System.Windows.Forms.ToolStripButton()
|
||||
Me.TBTEMP_QUICKDISPLAYBindingSource = New System.Windows.Forms.BindingSource()
|
||||
Me.TBTEMP_QUICKDISPLAYBindingSource = New System.Windows.Forms.BindingSource(Me.components)
|
||||
Me.ListBox1 = New System.Windows.Forms.ListBox()
|
||||
Me.Label1 = New System.Windows.Forms.Label()
|
||||
Me.TBPMO_FORM_CONSTRUCTORBindingSource1 = New System.Windows.Forms.BindingSource()
|
||||
Me.TBPMO_FORM_CONSTRUCTORBindingSource1 = New System.Windows.Forms.BindingSource(Me.components)
|
||||
Me.TBPMO_FORM_CONSTRUCTORTableAdapter1 = New DD_Record_Organiser.DD_ECMAdminTableAdapters.TBPMO_FORM_CONSTRUCTORTableAdapter()
|
||||
Me.TableAdapterManager1 = New DD_Record_Organiser.DD_ECMAdminTableAdapters.TableAdapterManager()
|
||||
Me.lblSave = New System.Windows.Forms.Label()
|
||||
Me.OFDWindreamsuche = New System.Windows.Forms.OpenFileDialog()
|
||||
Me.TBTEMP_QUICKDISPLAYTableAdapter = New DD_Record_Organiser.DD_DMSDataSetTableAdapters.TBTEMP_QUICKDISPLAYTableAdapter()
|
||||
Me.TableAdapterManager2 = New DD_Record_Organiser.DD_DMSDataSetTableAdapters.TableAdapterManager()
|
||||
Me.ImageCollection1 = New DevExpress.Utils.ImageCollection()
|
||||
Me.ImageCollection1 = New DevExpress.Utils.ImageCollection(Me.components)
|
||||
Me.btndeleteUserConstructorRel = New System.Windows.Forms.Button()
|
||||
Me.btnAddUser2ConstructorREL = New System.Windows.Forms.Button()
|
||||
Me.lblConfiguredUsers = New System.Windows.Forms.Label()
|
||||
@ -207,19 +213,17 @@ Partial Class frmConstructorDesigner
|
||||
Me.GridControlUsers2Menue = New DevExpress.XtraGrid.GridControl()
|
||||
Me.GridViewlUsers2Menue = New DevExpress.XtraGrid.Views.Grid.GridView()
|
||||
Me.colSelect = New DevExpress.XtraGrid.Columns.GridColumn()
|
||||
Me.colSurname = New DevExpress.XtraGrid.Columns.GridColumn()
|
||||
Me.GridColumn1 = New DevExpress.XtraGrid.Columns.GridColumn()
|
||||
Me.GridColumn2 = New DevExpress.XtraGrid.Columns.GridColumn()
|
||||
Me.colID = New DevExpress.XtraGrid.Columns.GridColumn()
|
||||
Me.GridControl1 = New DevExpress.XtraGrid.GridControl()
|
||||
Me.GridView1 = New DevExpress.XtraGrid.Views.Grid.GridView()
|
||||
Me.GridColumn3 = New DevExpress.XtraGrid.Columns.GridColumn()
|
||||
Me.colSurname1 = New DevExpress.XtraGrid.Columns.GridColumn()
|
||||
Me.GridColumn7 = New DevExpress.XtraGrid.Columns.GridColumn()
|
||||
Me.GridColumn8 = New DevExpress.XtraGrid.Columns.GridColumn()
|
||||
Me.GridColumn9 = New DevExpress.XtraGrid.Columns.GridColumn()
|
||||
Me.XtraTabControlSV = New DevExpress.XtraTab.XtraTabControl()
|
||||
Me.XtraTabPage7 = New DevExpress.XtraTab.XtraTabPage()
|
||||
Me.XtraTabPage8 = New DevExpress.XtraTab.XtraTabPage()
|
||||
Me.Label20 = New System.Windows.Forms.Label()
|
||||
GUIDLabel = New System.Windows.Forms.Label()
|
||||
FORM_TITLELabel = New System.Windows.Forms.Label()
|
||||
SEQUENCE_MENULabel = New System.Windows.Forms.Label()
|
||||
@ -233,7 +237,6 @@ Partial Class frmConstructorDesigner
|
||||
ADDED_WHENLabel1 = New System.Windows.Forms.Label()
|
||||
CHANGED_WHOLabel1 = New System.Windows.Forms.Label()
|
||||
CHANGED_WHENLabel1 = New System.Windows.Forms.Label()
|
||||
SQL_SELECT_EBENE1Label = New System.Windows.Forms.Label()
|
||||
COLUMN_NAME1Label1 = New System.Windows.Forms.Label()
|
||||
GUIDLabel2 = New System.Windows.Forms.Label()
|
||||
SQL_COMMANDLabel = New System.Windows.Forms.Label()
|
||||
@ -259,12 +262,16 @@ Partial Class frmConstructorDesigner
|
||||
Me.XtraTabPage3.SuspendLayout()
|
||||
Me.XtraTabPage5.SuspendLayout()
|
||||
Me.XtraTabPage4.SuspendLayout()
|
||||
CType(Me.XtraTabControlSV, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
Me.XtraTabControlSV.SuspendLayout()
|
||||
Me.XtraTabPage7.SuspendLayout()
|
||||
CType(Me.GridControl2, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
CType(Me.TBWH_Users2BindingSource, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
CType(Me.GridView2, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
CType(Me.GridControlSupervisorAdd, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
CType(Me.TBAD_UsersBindingSource, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
CType(Me.GridViewSupervisorsAdd, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
Me.XtraTabPage8.SuspendLayout()
|
||||
Me.XtraTabPage2.SuspendLayout()
|
||||
Me.TabControl1.SuspendLayout()
|
||||
Me.TabPage1.SuspendLayout()
|
||||
@ -285,10 +292,6 @@ Partial Class frmConstructorDesigner
|
||||
CType(Me.GridViewlUsers2Menue, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
CType(Me.GridControl1, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
CType(Me.GridView1, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
CType(Me.XtraTabControlSV, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
Me.XtraTabControlSV.SuspendLayout()
|
||||
Me.XtraTabPage7.SuspendLayout()
|
||||
Me.XtraTabPage8.SuspendLayout()
|
||||
Me.SuspendLayout()
|
||||
'
|
||||
'GUIDLabel
|
||||
@ -356,11 +359,6 @@ Partial Class frmConstructorDesigner
|
||||
resources.ApplyResources(CHANGED_WHENLabel1, "CHANGED_WHENLabel1")
|
||||
CHANGED_WHENLabel1.Name = "CHANGED_WHENLabel1"
|
||||
'
|
||||
'SQL_SELECT_EBENE1Label
|
||||
'
|
||||
resources.ApplyResources(SQL_SELECT_EBENE1Label, "SQL_SELECT_EBENE1Label")
|
||||
SQL_SELECT_EBENE1Label.Name = "SQL_SELECT_EBENE1Label"
|
||||
'
|
||||
'COLUMN_NAME1Label1
|
||||
'
|
||||
resources.ApplyResources(COLUMN_NAME1Label1, "COLUMN_NAME1Label1")
|
||||
@ -663,10 +661,8 @@ Partial Class frmConstructorDesigner
|
||||
Me.XtraTabPage3.Controls.Add(COLUMN_NAME1Label1)
|
||||
Me.XtraTabPage3.Controls.Add(Me.COLUMN_NAME1ComboBox)
|
||||
Me.XtraTabPage3.Controls.Add(Me.Label2)
|
||||
Me.XtraTabPage3.Controls.Add(Me.SQL_SELECT_EBENE1TextBox)
|
||||
Me.XtraTabPage3.Controls.Add(CHANGED_WHENLabel1)
|
||||
Me.XtraTabPage3.Controls.Add(Me.CHANGED_WHENTextBox1)
|
||||
Me.XtraTabPage3.Controls.Add(SQL_SELECT_EBENE1Label)
|
||||
Me.XtraTabPage3.Controls.Add(CHANGED_WHOLabel1)
|
||||
Me.XtraTabPage3.Controls.Add(Me.CHANGED_WHOTextBox1)
|
||||
Me.XtraTabPage3.Controls.Add(ADDED_WHENLabel1)
|
||||
@ -720,12 +716,6 @@ Partial Class frmConstructorDesigner
|
||||
resources.ApplyResources(Me.Label2, "Label2")
|
||||
Me.Label2.Name = "Label2"
|
||||
'
|
||||
'SQL_SELECT_EBENE1TextBox
|
||||
'
|
||||
Me.SQL_SELECT_EBENE1TextBox.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.TBPMO_FORM_CONSTRUCTOR_DETAILBindingSource, "SQL_SELECT_EBENE1", True))
|
||||
resources.ApplyResources(Me.SQL_SELECT_EBENE1TextBox, "SQL_SELECT_EBENE1TextBox")
|
||||
Me.SQL_SELECT_EBENE1TextBox.Name = "SQL_SELECT_EBENE1TextBox"
|
||||
'
|
||||
'CHANGED_WHENTextBox1
|
||||
'
|
||||
Me.CHANGED_WHENTextBox1.BackColor = System.Drawing.Color.WhiteSmoke
|
||||
@ -865,46 +855,31 @@ Partial Class frmConstructorDesigner
|
||||
Me.XtraTabPage4.Controls.Add(Me.lblSaveDocSearch)
|
||||
Me.XtraTabPage4.Name = "XtraTabPage4"
|
||||
'
|
||||
'btndeleteSupervisorControl
|
||||
'XtraTabControlSV
|
||||
'
|
||||
resources.ApplyResources(Me.btndeleteSupervisorControl, "btndeleteSupervisorControl")
|
||||
Me.btndeleteSupervisorControl.Image = Global.DD_Record_Organiser.My.Resources.Resources.delete
|
||||
Me.btndeleteSupervisorControl.Name = "btndeleteSupervisorControl"
|
||||
Me.btndeleteSupervisorControl.UseVisualStyleBackColor = True
|
||||
resources.ApplyResources(Me.XtraTabControlSV, "XtraTabControlSV")
|
||||
Me.XtraTabControlSV.Name = "XtraTabControlSV"
|
||||
Me.XtraTabControlSV.SelectedTabPage = Me.XtraTabPage7
|
||||
Me.XtraTabControlSV.TabPages.AddRange(New DevExpress.XtraTab.XtraTabPage() {Me.XtraTabPage7, Me.XtraTabPage8})
|
||||
'
|
||||
'btnAddSupervisorControl
|
||||
'XtraTabPage7
|
||||
'
|
||||
resources.ApplyResources(Me.btnAddSupervisorControl, "btnAddSupervisorControl")
|
||||
Me.btnAddSupervisorControl.Name = "btnAddSupervisorControl"
|
||||
Me.btnAddSupervisorControl.UseVisualStyleBackColor = True
|
||||
Me.XtraTabPage7.Controls.Add(Me.Label20)
|
||||
Me.XtraTabPage7.Controls.Add(Me.GridControl2)
|
||||
Me.XtraTabPage7.Controls.Add(Me.Label7)
|
||||
Me.XtraTabPage7.Controls.Add(Me.Label9)
|
||||
Me.XtraTabPage7.Controls.Add(Me.Label11)
|
||||
Me.XtraTabPage7.Controls.Add(Me.cmbRight)
|
||||
Me.XtraTabPage7.Controls.Add(Me.GridControlSupervisorAdd)
|
||||
Me.XtraTabPage7.Controls.Add(Me.btnDeleteUserSupervisor)
|
||||
Me.XtraTabPage7.Controls.Add(Me.btnAddUser2Supervisor)
|
||||
Me.XtraTabPage7.Name = "XtraTabPage7"
|
||||
resources.ApplyResources(Me.XtraTabPage7, "XtraTabPage7")
|
||||
'
|
||||
'Label15
|
||||
'Label20
|
||||
'
|
||||
resources.ApplyResources(Me.Label15, "Label15")
|
||||
Me.Label15.Name = "Label15"
|
||||
'
|
||||
'CheckedListBoxSupervisorControls
|
||||
'
|
||||
resources.ApplyResources(Me.CheckedListBoxSupervisorControls, "CheckedListBoxSupervisorControls")
|
||||
Me.CheckedListBoxSupervisorControls.BackColor = System.Drawing.SystemColors.GradientActiveCaption
|
||||
Me.CheckedListBoxSupervisorControls.FormattingEnabled = True
|
||||
Me.CheckedListBoxSupervisorControls.Name = "CheckedListBoxSupervisorControls"
|
||||
'
|
||||
'Label14
|
||||
'
|
||||
resources.ApplyResources(Me.Label14, "Label14")
|
||||
Me.Label14.Name = "Label14"
|
||||
'
|
||||
'cmbSupervisorControls
|
||||
'
|
||||
resources.ApplyResources(Me.cmbSupervisorControls, "cmbSupervisorControls")
|
||||
Me.cmbSupervisorControls.FormattingEnabled = True
|
||||
Me.cmbSupervisorControls.Name = "cmbSupervisorControls"
|
||||
'
|
||||
'Label13
|
||||
'
|
||||
resources.ApplyResources(Me.Label13, "Label13")
|
||||
Me.Label13.Name = "Label13"
|
||||
resources.ApplyResources(Me.Label20, "Label20")
|
||||
Me.Label20.Name = "Label20"
|
||||
'
|
||||
'GridControl2
|
||||
'
|
||||
@ -926,7 +901,7 @@ Partial Class frmConstructorDesigner
|
||||
Me.GridView2.Appearance.EvenRow.Options.UseBackColor = True
|
||||
Me.GridView2.Appearance.FocusedRow.BackColor = CType(resources.GetObject("GridView2.Appearance.FocusedRow.BackColor"), System.Drawing.Color)
|
||||
Me.GridView2.Appearance.FocusedRow.Options.UseBackColor = True
|
||||
Me.GridView2.Columns.AddRange(New DevExpress.XtraGrid.Columns.GridColumn() {Me.GridColumn14, Me.GridColumn15, Me.GridColumn16, Me.GridColumn17})
|
||||
Me.GridView2.Columns.AddRange(New DevExpress.XtraGrid.Columns.GridColumn() {Me.GridColumn14, Me.colSurname3, Me.GridColumn15, Me.GridColumn16, Me.GridColumn17})
|
||||
Me.GridView2.GridControl = Me.GridControl2
|
||||
Me.GridView2.Name = "GridView2"
|
||||
Me.GridView2.OptionsBehavior.AllowAddRows = DevExpress.Utils.DefaultBoolean.[False]
|
||||
@ -944,6 +919,12 @@ Partial Class frmConstructorDesigner
|
||||
Me.GridColumn14.FieldName = "Select"
|
||||
Me.GridColumn14.Name = "GridColumn14"
|
||||
'
|
||||
'colSurname3
|
||||
'
|
||||
resources.ApplyResources(Me.colSurname3, "colSurname3")
|
||||
Me.colSurname3.FieldName = "Surname"
|
||||
Me.colSurname3.Name = "colSurname3"
|
||||
'
|
||||
'GridColumn15
|
||||
'
|
||||
Me.GridColumn15.FieldName = "Username"
|
||||
@ -963,6 +944,28 @@ Partial Class frmConstructorDesigner
|
||||
Me.GridColumn17.FieldName = "ID"
|
||||
Me.GridColumn17.Name = "GridColumn17"
|
||||
'
|
||||
'Label7
|
||||
'
|
||||
resources.ApplyResources(Me.Label7, "Label7")
|
||||
Me.Label7.Name = "Label7"
|
||||
'
|
||||
'Label9
|
||||
'
|
||||
resources.ApplyResources(Me.Label9, "Label9")
|
||||
Me.Label9.Name = "Label9"
|
||||
'
|
||||
'Label11
|
||||
'
|
||||
resources.ApplyResources(Me.Label11, "Label11")
|
||||
Me.Label11.Name = "Label11"
|
||||
'
|
||||
'cmbRight
|
||||
'
|
||||
resources.ApplyResources(Me.cmbRight, "cmbRight")
|
||||
Me.cmbRight.FormattingEnabled = True
|
||||
Me.cmbRight.Items.AddRange(New Object() {resources.GetString("cmbRight.Items"), resources.GetString("cmbRight.Items1")})
|
||||
Me.cmbRight.Name = "cmbRight"
|
||||
'
|
||||
'GridControlSupervisorAdd
|
||||
'
|
||||
resources.ApplyResources(Me.GridControlSupervisorAdd, "GridControlSupervisorAdd")
|
||||
@ -983,7 +986,7 @@ Partial Class frmConstructorDesigner
|
||||
Me.GridViewSupervisorsAdd.Appearance.EvenRow.Options.UseBackColor = True
|
||||
Me.GridViewSupervisorsAdd.Appearance.FocusedRow.BackColor = CType(resources.GetObject("GridViewSupervisorsAdd.Appearance.FocusedRow.BackColor"), System.Drawing.Color)
|
||||
Me.GridViewSupervisorsAdd.Appearance.FocusedRow.Options.UseBackColor = True
|
||||
Me.GridViewSupervisorsAdd.Columns.AddRange(New DevExpress.XtraGrid.Columns.GridColumn() {Me.GridColumn10, Me.GridColumn11, Me.GridColumn12, Me.GridColumn13})
|
||||
Me.GridViewSupervisorsAdd.Columns.AddRange(New DevExpress.XtraGrid.Columns.GridColumn() {Me.GridColumn10, Me.colSurname2, Me.GridColumn11, Me.GridColumn12, Me.GridColumn13})
|
||||
Me.GridViewSupervisorsAdd.GridControl = Me.GridControlSupervisorAdd
|
||||
Me.GridViewSupervisorsAdd.Name = "GridViewSupervisorsAdd"
|
||||
Me.GridViewSupervisorsAdd.OptionsBehavior.AllowAddRows = DevExpress.Utils.DefaultBoolean.[False]
|
||||
@ -1001,6 +1004,12 @@ Partial Class frmConstructorDesigner
|
||||
Me.GridColumn10.FieldName = "Select"
|
||||
Me.GridColumn10.Name = "GridColumn10"
|
||||
'
|
||||
'colSurname2
|
||||
'
|
||||
resources.ApplyResources(Me.colSurname2, "colSurname2")
|
||||
Me.colSurname2.FieldName = "Surname"
|
||||
Me.colSurname2.Name = "colSurname2"
|
||||
'
|
||||
'GridColumn11
|
||||
'
|
||||
Me.GridColumn11.FieldName = "Username"
|
||||
@ -1020,18 +1029,6 @@ Partial Class frmConstructorDesigner
|
||||
Me.GridColumn13.FieldName = "ID"
|
||||
Me.GridColumn13.Name = "GridColumn13"
|
||||
'
|
||||
'Label11
|
||||
'
|
||||
resources.ApplyResources(Me.Label11, "Label11")
|
||||
Me.Label11.Name = "Label11"
|
||||
'
|
||||
'cmbRight
|
||||
'
|
||||
resources.ApplyResources(Me.cmbRight, "cmbRight")
|
||||
Me.cmbRight.FormattingEnabled = True
|
||||
Me.cmbRight.Items.AddRange(New Object() {resources.GetString("cmbRight.Items"), resources.GetString("cmbRight.Items1")})
|
||||
Me.cmbRight.Name = "cmbRight"
|
||||
'
|
||||
'btnDeleteUserSupervisor
|
||||
'
|
||||
resources.ApplyResources(Me.btnDeleteUserSupervisor, "btnDeleteUserSupervisor")
|
||||
@ -1044,15 +1041,58 @@ Partial Class frmConstructorDesigner
|
||||
Me.btnAddUser2Supervisor.Name = "btnAddUser2Supervisor"
|
||||
Me.btnAddUser2Supervisor.UseVisualStyleBackColor = True
|
||||
'
|
||||
'Label9
|
||||
'XtraTabPage8
|
||||
'
|
||||
resources.ApplyResources(Me.Label9, "Label9")
|
||||
Me.Label9.Name = "Label9"
|
||||
Me.XtraTabPage8.Controls.Add(Me.btndeleteSupervisorControl)
|
||||
Me.XtraTabPage8.Controls.Add(Me.btnAddSupervisorControl)
|
||||
Me.XtraTabPage8.Controls.Add(Me.Label13)
|
||||
Me.XtraTabPage8.Controls.Add(Me.Label15)
|
||||
Me.XtraTabPage8.Controls.Add(Me.cmbSupervisorControls)
|
||||
Me.XtraTabPage8.Controls.Add(Me.CheckedListBoxSupervisorControls)
|
||||
Me.XtraTabPage8.Controls.Add(Me.Label14)
|
||||
Me.XtraTabPage8.Name = "XtraTabPage8"
|
||||
resources.ApplyResources(Me.XtraTabPage8, "XtraTabPage8")
|
||||
'
|
||||
'Label7
|
||||
'btndeleteSupervisorControl
|
||||
'
|
||||
resources.ApplyResources(Me.Label7, "Label7")
|
||||
Me.Label7.Name = "Label7"
|
||||
resources.ApplyResources(Me.btndeleteSupervisorControl, "btndeleteSupervisorControl")
|
||||
Me.btndeleteSupervisorControl.Image = Global.DD_Record_Organiser.My.Resources.Resources.delete
|
||||
Me.btndeleteSupervisorControl.Name = "btndeleteSupervisorControl"
|
||||
Me.btndeleteSupervisorControl.UseVisualStyleBackColor = True
|
||||
'
|
||||
'btnAddSupervisorControl
|
||||
'
|
||||
resources.ApplyResources(Me.btnAddSupervisorControl, "btnAddSupervisorControl")
|
||||
Me.btnAddSupervisorControl.Name = "btnAddSupervisorControl"
|
||||
Me.btnAddSupervisorControl.UseVisualStyleBackColor = True
|
||||
'
|
||||
'Label13
|
||||
'
|
||||
resources.ApplyResources(Me.Label13, "Label13")
|
||||
Me.Label13.Name = "Label13"
|
||||
'
|
||||
'Label15
|
||||
'
|
||||
resources.ApplyResources(Me.Label15, "Label15")
|
||||
Me.Label15.Name = "Label15"
|
||||
'
|
||||
'cmbSupervisorControls
|
||||
'
|
||||
resources.ApplyResources(Me.cmbSupervisorControls, "cmbSupervisorControls")
|
||||
Me.cmbSupervisorControls.FormattingEnabled = True
|
||||
Me.cmbSupervisorControls.Name = "cmbSupervisorControls"
|
||||
'
|
||||
'CheckedListBoxSupervisorControls
|
||||
'
|
||||
resources.ApplyResources(Me.CheckedListBoxSupervisorControls, "CheckedListBoxSupervisorControls")
|
||||
Me.CheckedListBoxSupervisorControls.BackColor = System.Drawing.SystemColors.GradientActiveCaption
|
||||
Me.CheckedListBoxSupervisorControls.FormattingEnabled = True
|
||||
Me.CheckedListBoxSupervisorControls.Name = "CheckedListBoxSupervisorControls"
|
||||
'
|
||||
'Label14
|
||||
'
|
||||
resources.ApplyResources(Me.Label14, "Label14")
|
||||
Me.Label14.Name = "Label14"
|
||||
'
|
||||
'chkWDSearch_Active
|
||||
'
|
||||
@ -1127,7 +1167,7 @@ Partial Class frmConstructorDesigner
|
||||
Me.GridViewUserSQL.Appearance.EvenRow.Options.UseBackColor = True
|
||||
Me.GridViewUserSQL.Appearance.FocusedRow.BackColor = CType(resources.GetObject("GridViewUserSQL.Appearance.FocusedRow.BackColor"), System.Drawing.Color)
|
||||
Me.GridViewUserSQL.Appearance.FocusedRow.Options.UseBackColor = True
|
||||
Me.GridViewUserSQL.Columns.AddRange(New DevExpress.XtraGrid.Columns.GridColumn() {Me.GridColumn4, Me.GridColumn5, Me.GridColumn6, Me.colID1})
|
||||
Me.GridViewUserSQL.Columns.AddRange(New DevExpress.XtraGrid.Columns.GridColumn() {Me.colSurname4, Me.GridColumn4, Me.GridColumn5, Me.GridColumn6, Me.colID1})
|
||||
Me.GridViewUserSQL.GridControl = Me.GridControlUserSQL
|
||||
Me.GridViewUserSQL.Name = "GridViewUserSQL"
|
||||
Me.GridViewUserSQL.OptionsBehavior.AllowAddRows = DevExpress.Utils.DefaultBoolean.[False]
|
||||
@ -1139,6 +1179,12 @@ Partial Class frmConstructorDesigner
|
||||
Me.GridViewUserSQL.OptionsView.ShowAutoFilterRow = True
|
||||
Me.GridViewUserSQL.OptionsView.ShowGroupPanel = False
|
||||
'
|
||||
'colSurname4
|
||||
'
|
||||
resources.ApplyResources(Me.colSurname4, "colSurname4")
|
||||
Me.colSurname4.FieldName = "Surname"
|
||||
Me.colSurname4.Name = "colSurname4"
|
||||
'
|
||||
'GridColumn4
|
||||
'
|
||||
Me.GridColumn4.FieldName = "Username"
|
||||
@ -1177,8 +1223,8 @@ Partial Class frmConstructorDesigner
|
||||
'
|
||||
Me.dgvResult.AllowUserToAddRows = False
|
||||
Me.dgvResult.AllowUserToDeleteRows = False
|
||||
DataGridViewCellStyle1.BackColor = System.Drawing.Color.Cyan
|
||||
Me.dgvResult.AlternatingRowsDefaultCellStyle = DataGridViewCellStyle1
|
||||
DataGridViewCellStyle3.BackColor = System.Drawing.Color.Cyan
|
||||
Me.dgvResult.AlternatingRowsDefaultCellStyle = DataGridViewCellStyle3
|
||||
resources.ApplyResources(Me.dgvResult, "dgvResult")
|
||||
Me.dgvResult.ColumnHeadersHeightSizeMode = System.Windows.Forms.DataGridViewColumnHeadersHeightSizeMode.AutoSize
|
||||
Me.dgvResult.Name = "dgvResult"
|
||||
@ -1188,11 +1234,11 @@ Partial Class frmConstructorDesigner
|
||||
'
|
||||
Me.dgvPlaceholders.AllowUserToAddRows = False
|
||||
Me.dgvPlaceholders.AllowUserToDeleteRows = False
|
||||
DataGridViewCellStyle2.BackColor = System.Drawing.Color.Cyan
|
||||
Me.dgvPlaceholders.AlternatingRowsDefaultCellStyle = DataGridViewCellStyle2
|
||||
resources.ApplyResources(Me.dgvPlaceholders, "dgvPlaceholders")
|
||||
DataGridViewCellStyle4.BackColor = System.Drawing.Color.Cyan
|
||||
Me.dgvPlaceholders.AlternatingRowsDefaultCellStyle = DataGridViewCellStyle4
|
||||
Me.dgvPlaceholders.ColumnHeadersHeightSizeMode = System.Windows.Forms.DataGridViewColumnHeadersHeightSizeMode.AutoSize
|
||||
Me.dgvPlaceholders.Columns.AddRange(New System.Windows.Forms.DataGridViewColumn() {Me.colPlaceholder, Me.colReplace})
|
||||
resources.ApplyResources(Me.dgvPlaceholders, "dgvPlaceholders")
|
||||
Me.dgvPlaceholders.Name = "dgvPlaceholders"
|
||||
'
|
||||
'colPlaceholder
|
||||
@ -1532,7 +1578,7 @@ Partial Class frmConstructorDesigner
|
||||
Me.GridViewlUsers2Menue.Appearance.EvenRow.Options.UseBackColor = True
|
||||
Me.GridViewlUsers2Menue.Appearance.FocusedRow.BackColor = CType(resources.GetObject("GridViewlUsers2Menue.Appearance.FocusedRow.BackColor"), System.Drawing.Color)
|
||||
Me.GridViewlUsers2Menue.Appearance.FocusedRow.Options.UseBackColor = True
|
||||
Me.GridViewlUsers2Menue.Columns.AddRange(New DevExpress.XtraGrid.Columns.GridColumn() {Me.colSelect, Me.GridColumn1, Me.GridColumn2, Me.colID})
|
||||
Me.GridViewlUsers2Menue.Columns.AddRange(New DevExpress.XtraGrid.Columns.GridColumn() {Me.colSelect, Me.colSurname, Me.GridColumn1, Me.GridColumn2, Me.colID})
|
||||
Me.GridViewlUsers2Menue.GridControl = Me.GridControlUsers2Menue
|
||||
Me.GridViewlUsers2Menue.Name = "GridViewlUsers2Menue"
|
||||
Me.GridViewlUsers2Menue.OptionsBehavior.AllowAddRows = DevExpress.Utils.DefaultBoolean.[False]
|
||||
@ -1550,6 +1596,12 @@ Partial Class frmConstructorDesigner
|
||||
Me.colSelect.FieldName = "Select"
|
||||
Me.colSelect.Name = "colSelect"
|
||||
'
|
||||
'colSurname
|
||||
'
|
||||
resources.ApplyResources(Me.colSurname, "colSurname")
|
||||
Me.colSurname.FieldName = "Surname"
|
||||
Me.colSurname.Name = "colSurname"
|
||||
'
|
||||
'GridColumn1
|
||||
'
|
||||
Me.GridColumn1.FieldName = "Username"
|
||||
@ -1584,7 +1636,7 @@ Partial Class frmConstructorDesigner
|
||||
Me.GridView1.Appearance.EvenRow.Options.UseBackColor = True
|
||||
Me.GridView1.Appearance.FocusedRow.BackColor = CType(resources.GetObject("GridView1.Appearance.FocusedRow.BackColor"), System.Drawing.Color)
|
||||
Me.GridView1.Appearance.FocusedRow.Options.UseBackColor = True
|
||||
Me.GridView1.Columns.AddRange(New DevExpress.XtraGrid.Columns.GridColumn() {Me.GridColumn3, Me.GridColumn7, Me.GridColumn8, Me.GridColumn9})
|
||||
Me.GridView1.Columns.AddRange(New DevExpress.XtraGrid.Columns.GridColumn() {Me.GridColumn3, Me.colSurname1, Me.GridColumn7, Me.GridColumn8, Me.GridColumn9})
|
||||
Me.GridView1.GridControl = Me.GridControl1
|
||||
Me.GridView1.Name = "GridView1"
|
||||
Me.GridView1.OptionsBehavior.AllowAddRows = DevExpress.Utils.DefaultBoolean.[False]
|
||||
@ -1602,6 +1654,12 @@ Partial Class frmConstructorDesigner
|
||||
Me.GridColumn3.FieldName = "Select"
|
||||
Me.GridColumn3.Name = "GridColumn3"
|
||||
'
|
||||
'colSurname1
|
||||
'
|
||||
resources.ApplyResources(Me.colSurname1, "colSurname1")
|
||||
Me.colSurname1.FieldName = "Surname"
|
||||
Me.colSurname1.Name = "colSurname1"
|
||||
'
|
||||
'GridColumn7
|
||||
'
|
||||
Me.GridColumn7.FieldName = "Username"
|
||||
@ -1621,44 +1679,6 @@ Partial Class frmConstructorDesigner
|
||||
Me.GridColumn9.FieldName = "ID"
|
||||
Me.GridColumn9.Name = "GridColumn9"
|
||||
'
|
||||
'XtraTabControlSV
|
||||
'
|
||||
resources.ApplyResources(Me.XtraTabControlSV, "XtraTabControlSV")
|
||||
Me.XtraTabControlSV.Name = "XtraTabControlSV"
|
||||
Me.XtraTabControlSV.SelectedTabPage = Me.XtraTabPage7
|
||||
Me.XtraTabControlSV.TabPages.AddRange(New DevExpress.XtraTab.XtraTabPage() {Me.XtraTabPage7, Me.XtraTabPage8})
|
||||
'
|
||||
'XtraTabPage7
|
||||
'
|
||||
Me.XtraTabPage7.Controls.Add(Me.Label20)
|
||||
Me.XtraTabPage7.Controls.Add(Me.GridControl2)
|
||||
Me.XtraTabPage7.Controls.Add(Me.Label7)
|
||||
Me.XtraTabPage7.Controls.Add(Me.Label9)
|
||||
Me.XtraTabPage7.Controls.Add(Me.Label11)
|
||||
Me.XtraTabPage7.Controls.Add(Me.cmbRight)
|
||||
Me.XtraTabPage7.Controls.Add(Me.GridControlSupervisorAdd)
|
||||
Me.XtraTabPage7.Controls.Add(Me.btnDeleteUserSupervisor)
|
||||
Me.XtraTabPage7.Controls.Add(Me.btnAddUser2Supervisor)
|
||||
Me.XtraTabPage7.Name = "XtraTabPage7"
|
||||
resources.ApplyResources(Me.XtraTabPage7, "XtraTabPage7")
|
||||
'
|
||||
'XtraTabPage8
|
||||
'
|
||||
Me.XtraTabPage8.Controls.Add(Me.btndeleteSupervisorControl)
|
||||
Me.XtraTabPage8.Controls.Add(Me.btnAddSupervisorControl)
|
||||
Me.XtraTabPage8.Controls.Add(Me.Label13)
|
||||
Me.XtraTabPage8.Controls.Add(Me.Label15)
|
||||
Me.XtraTabPage8.Controls.Add(Me.cmbSupervisorControls)
|
||||
Me.XtraTabPage8.Controls.Add(Me.CheckedListBoxSupervisorControls)
|
||||
Me.XtraTabPage8.Controls.Add(Me.Label14)
|
||||
Me.XtraTabPage8.Name = "XtraTabPage8"
|
||||
resources.ApplyResources(Me.XtraTabPage8, "XtraTabPage8")
|
||||
'
|
||||
'Label20
|
||||
'
|
||||
resources.ApplyResources(Me.Label20, "Label20")
|
||||
Me.Label20.Name = "Label20"
|
||||
'
|
||||
'frmConstructorDesigner
|
||||
'
|
||||
resources.ApplyResources(Me, "$this")
|
||||
@ -1715,12 +1735,18 @@ Partial Class frmConstructorDesigner
|
||||
Me.XtraTabPage5.PerformLayout()
|
||||
Me.XtraTabPage4.ResumeLayout(False)
|
||||
Me.XtraTabPage4.PerformLayout()
|
||||
CType(Me.XtraTabControlSV, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
Me.XtraTabControlSV.ResumeLayout(False)
|
||||
Me.XtraTabPage7.ResumeLayout(False)
|
||||
Me.XtraTabPage7.PerformLayout()
|
||||
CType(Me.GridControl2, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
CType(Me.TBWH_Users2BindingSource, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
CType(Me.GridView2, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
CType(Me.GridControlSupervisorAdd, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
CType(Me.TBAD_UsersBindingSource, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
CType(Me.GridViewSupervisorsAdd, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
Me.XtraTabPage8.ResumeLayout(False)
|
||||
Me.XtraTabPage8.PerformLayout()
|
||||
Me.XtraTabPage2.ResumeLayout(False)
|
||||
Me.TabControl1.ResumeLayout(False)
|
||||
Me.TabPage1.ResumeLayout(False)
|
||||
@ -1745,12 +1771,6 @@ Partial Class frmConstructorDesigner
|
||||
CType(Me.GridViewlUsers2Menue, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
CType(Me.GridControl1, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
CType(Me.GridView1, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
CType(Me.XtraTabControlSV, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
Me.XtraTabControlSV.ResumeLayout(False)
|
||||
Me.XtraTabPage7.ResumeLayout(False)
|
||||
Me.XtraTabPage7.PerformLayout()
|
||||
Me.XtraTabPage8.ResumeLayout(False)
|
||||
Me.XtraTabPage8.PerformLayout()
|
||||
Me.ResumeLayout(False)
|
||||
Me.PerformLayout()
|
||||
|
||||
@ -1805,7 +1825,6 @@ Partial Class frmConstructorDesigner
|
||||
Friend WithEvents ADDED_WHENTextBox1 As System.Windows.Forms.TextBox
|
||||
Friend WithEvents ADDED_WHOTextBox1 As System.Windows.Forms.TextBox
|
||||
Friend WithEvents XtraTabPage5 As DevExpress.XtraTab.XtraTabPage
|
||||
Friend WithEvents SQL_SELECT_EBENE1TextBox As System.Windows.Forms.TextBox
|
||||
Friend WithEvents Label2 As System.Windows.Forms.Label
|
||||
Friend WithEvents COLUMN_NAME1ComboBox As System.Windows.Forms.ComboBox
|
||||
Friend WithEvents Label4 As System.Windows.Forms.Label
|
||||
@ -1926,4 +1945,9 @@ Partial Class frmConstructorDesigner
|
||||
Friend WithEvents XtraTabPage7 As DevExpress.XtraTab.XtraTabPage
|
||||
Friend WithEvents Label20 As System.Windows.Forms.Label
|
||||
Friend WithEvents XtraTabPage8 As DevExpress.XtraTab.XtraTabPage
|
||||
Friend WithEvents colSurname3 As DevExpress.XtraGrid.Columns.GridColumn
|
||||
Friend WithEvents colSurname2 As DevExpress.XtraGrid.Columns.GridColumn
|
||||
Friend WithEvents colSurname As DevExpress.XtraGrid.Columns.GridColumn
|
||||
Friend WithEvents colSurname1 As DevExpress.XtraGrid.Columns.GridColumn
|
||||
Friend WithEvents colSurname4 As DevExpress.XtraGrid.Columns.GridColumn
|
||||
End Class
|
||||
|
||||
File diff suppressed because it is too large
Load Diff
@ -110,9 +110,9 @@ Public Class frmConstructorDesigner
|
||||
End Sub
|
||||
Public Sub Load_ConstructorUser()
|
||||
Try
|
||||
Dim Sql = String.Format("SELECT GUID, USERNAME, EMAIL FROM TBDD_USER WHERE MODULE_RECORD_ORG = 1 AND GUID NOT IN (SELECT USER_ID FROM TBPMO_CONSTRUCTOR_USER WHERE CONSTRUCT_ID = {0}) ORDER By USERNAME", CONSTRUCTOR_IDTextBox.Text)
|
||||
Dim Sql = String.Format("SELECT * FROM TBDD_USER WHERE MODULE_RECORD_ORG = 1 AND GUID NOT IN (SELECT USER_ID FROM TBPMO_CONSTRUCTOR_USER WHERE CONSTRUCT_ID = {0}) ORDER By USERNAME", CONSTRUCTOR_IDTextBox.Text)
|
||||
Dim DT_USER = ClassDatabase.Return_Datatable(Sql)
|
||||
Sql = String.Format("SELECT T1.GUID, T.USERNAME + ' - ' + CASE T1.HOME_MENUE WHEN 1 THEN 'HOME' ELSE 'STANDARD' END AS USERNAME FROM TBDD_USER T, TBPMO_CONSTRUCTOR_USER T1 WHERE T1.USER_ID = T.GUID AND T1.CONSTRUCT_ID = {0} ORDER BY T.USERNAME", CONSTRUCTOR_IDTextBox.Text)
|
||||
Sql = String.Format("SELECT T1.GUID, T.USERNAME + ' - ' + CASE T1.HOME_MENUE WHEN 1 THEN 'HOME' ELSE 'STANDARD' END AS USERNAME, T.EMAIL, T.NAME, T.PRENAME FROM TBDD_USER T, TBPMO_CONSTRUCTOR_USER T1 WHERE T1.USER_ID = T.GUID AND T1.CONSTRUCT_ID = {0} ORDER BY T.USERNAME", CONSTRUCTOR_IDTextBox.Text)
|
||||
Dim DT_USER_CONSTR As DataTable = ClassDatabase.Return_Datatable(Sql, "LOAD USERS FOR CONSTRUCT")
|
||||
Try
|
||||
DD_ECMAdmin.TBAD_Users.Clear()
|
||||
@ -120,15 +120,16 @@ Public Class frmConstructorDesigner
|
||||
For Each row As DataRow In DT_USER.Rows
|
||||
Dim newUserRow As DD_ECMAdmin.TBAD_UsersRow
|
||||
newUserRow = DD_ECMAdmin.TBAD_Users.NewTBAD_UsersRow
|
||||
|
||||
newUserRow.Username = row.Item(1)
|
||||
newUserRow.Username = row.Item("USERNAME")
|
||||
newUserRow.Surname = row.Item("NAME")
|
||||
newUserRow.Prename = row.Item("PRENAME")
|
||||
Try
|
||||
newUserRow.Email = row.Item(2)
|
||||
newUserRow.Email = row.Item("EMAIL")
|
||||
Catch ex As Exception
|
||||
newUserRow.Email = ""
|
||||
End Try
|
||||
|
||||
newUserRow.ID = row.Item(0)
|
||||
newUserRow.ID = row.Item("GUID")
|
||||
DD_ECMAdmin.TBAD_Users.Rows.Add(newUserRow)
|
||||
' chklbxUserForGroup.Items.Add(New MyListBoxItem() With {.Text = row.Item(1), .ExtraData = row.Item(0)})
|
||||
Next
|
||||
@ -142,15 +143,16 @@ Public Class frmConstructorDesigner
|
||||
For Each row As DataRow In DT_USER_CONSTR.Rows
|
||||
Dim newUserRow As DD_ECMAdmin.TBWH_Users1Row
|
||||
newUserRow = DD_ECMAdmin.TBWH_Users1.NewTBWH_Users1Row
|
||||
|
||||
newUserRow.Username = row.Item(1)
|
||||
newUserRow.Surname = row.Item("NAME")
|
||||
newUserRow.Prename = row.Item("PRENAME")
|
||||
newUserRow.Username = row.Item("USERNAME")
|
||||
Try
|
||||
newUserRow.Email = row.Item(2)
|
||||
newUserRow.Email = row.Item("EMAIL")
|
||||
Catch ex As Exception
|
||||
newUserRow.Email = ""
|
||||
End Try
|
||||
|
||||
newUserRow.ID = row.Item(0)
|
||||
newUserRow.ID = row.Item("GUID")
|
||||
DD_ECMAdmin.TBWH_Users1.Rows.Add(newUserRow)
|
||||
' chklbxUserForGroup.Items.Add(New MyListBoxItem() With {.Text = row.Item(1), .ExtraData = row.Item(0)})
|
||||
Next
|
||||
@ -278,29 +280,29 @@ Public Class frmConstructorDesigner
|
||||
End Sub
|
||||
|
||||
Private Sub LEVEL1_SELECTCheckBox_CheckedChanged(sender As Object, e As EventArgs) Handles LEVEL1_SELECTCheckBox.CheckedChanged
|
||||
Try
|
||||
If LEVEL1_SELECTCheckBox.Checked Then
|
||||
SQL_SELECT_EBENE1TextBox.Enabled = True
|
||||
Else
|
||||
SQL_SELECT_EBENE1TextBox.Enabled = False
|
||||
End If
|
||||
Dim view As String
|
||||
If SQL_SELECT_EBENE1TextBox.Text <> "" Then
|
||||
view = SQL_SELECT_EBENE1TextBox.Text.ToUpper.Replace("SELECT * FROM ", "")
|
||||
view = view.Trim
|
||||
Dim Sql = "SELECT name FROM sys.columns WHERE object_id = OBJECT_ID('" & view & "')"
|
||||
If LogErrorsOnly = False Then ClassLogger.Add(" >> " & Sql, False)
|
||||
Dim DT As DataTable = ClassDatabase.Return_Datatable(Sql)
|
||||
If DT IsNot Nothing Then
|
||||
COLUMN_NAME1ComboBox.Items.Clear()
|
||||
For Each row As DataRow In DT.Rows
|
||||
COLUMN_NAME1ComboBox.Items.Add(row.Item(0))
|
||||
Next
|
||||
End If
|
||||
End If
|
||||
Catch ex As Exception
|
||||
MsgBox("Error in LEVEL1_SELECTCheckBox:" & vbNewLine & ex.Message, MsgBoxStyle.Critical)
|
||||
End Try
|
||||
'Try
|
||||
' If LEVEL1_SELECTCheckBox.Checked Then
|
||||
' SQL_SELECT_EBENE1TextBox.Enabled = True
|
||||
' Else
|
||||
' SQL_SELECT_EBENE1TextBox.Enabled = False
|
||||
' End If
|
||||
' Dim view As String
|
||||
' If SQL_SELECT_EBENE1TextBox.Text <> "" Then
|
||||
' view = SQL_SELECT_EBENE1TextBox.Text.ToUpper.Replace("SELECT * FROM ", "")
|
||||
' view = view.Trim
|
||||
' Dim Sql = "SELECT name FROM sys.columns WHERE object_id = OBJECT_ID('" & view & "')"
|
||||
' If LogErrorsOnly = False Then ClassLogger.Add(" >> " & Sql, False)
|
||||
' Dim DT As DataTable = ClassDatabase.Return_Datatable(Sql)
|
||||
' If DT IsNot Nothing Then
|
||||
' COLUMN_NAME1ComboBox.Items.Clear()
|
||||
' For Each row As DataRow In DT.Rows
|
||||
' COLUMN_NAME1ComboBox.Items.Add(row.Item(0))
|
||||
' Next
|
||||
' End If
|
||||
' End If
|
||||
'Catch ex As Exception
|
||||
' MsgBox("Error in LEVEL1_SELECTCheckBox:" & vbNewLine & ex.Message, MsgBoxStyle.Critical)
|
||||
'End Try
|
||||
End Sub
|
||||
|
||||
Private Sub tsbtnSave_Click(sender As Object, e As EventArgs) Handles tsbtnSave.Click
|
||||
@ -461,20 +463,22 @@ Public Class frmConstructorDesigner
|
||||
End Sub
|
||||
Public Sub Load_TBWH_Users1()
|
||||
Try
|
||||
Dim sql = String.Format("SELECT T.GUID, T.USERNAME, T.EMAIL FROM TBDD_USER T WHERE T.MODULE_RECORD_ORG = 1 AND T.GUID IN (SELECT USER_ID FROM TBPMO_CONSTRUCTOR_USER WHERE CONSTRUCT_ID = {0}) ORDER BY T.USERNAME", CONSTRUCTOR_IDTextBox.Text)
|
||||
Dim sql = String.Format("SELECT T.* FROM TBDD_USER T WHERE T.MODULE_RECORD_ORG = 1 AND T.GUID IN (SELECT USER_ID FROM TBPMO_CONSTRUCTOR_USER WHERE CONSTRUCT_ID = {0}) ORDER BY T.USERNAME", CONSTRUCTOR_IDTextBox.Text)
|
||||
Dim DT As DataTable = ClassDatabase.Return_Datatable(sql)
|
||||
DD_ECMAdmin.TBWH_Users1.Clear()
|
||||
For Each row As DataRow In DT.Rows
|
||||
Dim newUserRow As DD_ECMAdmin.TBWH_Users1Row
|
||||
newUserRow = DD_ECMAdmin.TBWH_Users1.NewTBWH_Users1Row
|
||||
newUserRow.Username = row.Item(1)
|
||||
newUserRow.Username = row.Item("USERNAME")
|
||||
newUserRow.Surname = row.Item("NAME")
|
||||
newUserRow.Prename = row.Item("PRENAME")
|
||||
Try
|
||||
newUserRow.Email = row.Item(2)
|
||||
newUserRow.Email = row.Item("EMAIL")
|
||||
Catch ex As Exception
|
||||
newUserRow.Email = ""
|
||||
End Try
|
||||
|
||||
newUserRow.ID = row.Item(0)
|
||||
newUserRow.ID = row.Item("GUID")
|
||||
DD_ECMAdmin.TBWH_Users1.Rows.Add(newUserRow)
|
||||
' chklbxUsersforClient.Items.Add(New MyListBoxItem() With {.Text = row.Item(1), .ExtraData = row.Item(0)})
|
||||
Next
|
||||
@ -484,20 +488,22 @@ Public Class frmConstructorDesigner
|
||||
End Sub
|
||||
Public Sub Load_TBAD_Users()
|
||||
Try
|
||||
Dim sql = String.Format("SELECT T.GUID, T.USERNAME, T.EMAIL FROM TBDD_USER T WHERE T.MODULE_RECORD_ORG = 1 AND T.GUID IN (SELECT USER_ID FROM TBPMO_CONSTRUCTOR_USER WHERE CONSTRUCT_ID = {0}) ORDER BY T.USERNAME", CONSTRUCTOR_IDTextBox.Text)
|
||||
Dim sql = String.Format("SELECT T.* FROM TBDD_USER T WHERE T.MODULE_RECORD_ORG = 1 AND T.GUID IN (SELECT USER_ID FROM TBPMO_CONSTRUCTOR_USER WHERE CONSTRUCT_ID = {0}) ORDER BY T.USERNAME", CONSTRUCTOR_IDTextBox.Text)
|
||||
Dim DT As DataTable = ClassDatabase.Return_Datatable(sql)
|
||||
DD_ECMAdmin.TBAD_Users.Clear()
|
||||
For Each row As DataRow In DT.Rows
|
||||
Dim newUserRow As DD_ECMAdmin.TBAD_UsersRow
|
||||
newUserRow = DD_ECMAdmin.TBAD_Users.NewTBAD_UsersRow
|
||||
newUserRow.Username = row.Item(1)
|
||||
newUserRow.Username = row.Item("USERNAME")
|
||||
newUserRow.Surname = row.Item("NAME")
|
||||
newUserRow.Prename = row.Item("PRENAME")
|
||||
Try
|
||||
newUserRow.Email = row.Item(2)
|
||||
newUserRow.Email = row.Item("EMAIL")
|
||||
Catch ex As Exception
|
||||
newUserRow.Email = ""
|
||||
End Try
|
||||
|
||||
newUserRow.ID = row.Item(0)
|
||||
newUserRow.ID = row.Item("GUID")
|
||||
DD_ECMAdmin.TBAD_Users.Rows.Add(newUserRow)
|
||||
' chklbxUsersforClient.Items.Add(New MyListBoxItem() With {.Text = row.Item(1), .ExtraData = row.Item(0)})
|
||||
Next
|
||||
@ -508,20 +514,22 @@ Public Class frmConstructorDesigner
|
||||
|
||||
Public Sub Load_Supervisor()
|
||||
Try
|
||||
Dim sql = String.Format("SELECT T.GUID, T.USERNAME, T.EMAIL FROM TBDD_USER T WHERE T.MODULE_RECORD_ORG = 1 AND T.GUID IN (SELECT USER_ID FROM TBPMO_ENTITY_SUPERVISOR WHERE ENTITY_ID = {0}) ORDER BY T.USERNAME", SELECTED_ENTITY_ID)
|
||||
Dim sql = String.Format("SELECT T.* FROM TBDD_USER T WHERE T.MODULE_RECORD_ORG = 1 AND T.GUID IN (SELECT USER_ID FROM TBPMO_ENTITY_SUPERVISOR WHERE ENTITY_ID = {0}) ORDER BY T.USERNAME", SELECTED_ENTITY_ID)
|
||||
Dim DT As DataTable = ClassDatabase.Return_Datatable(sql)
|
||||
DD_ECMAdmin.TBWH_Users2.Clear()
|
||||
For Each row As DataRow In DT.Rows
|
||||
Dim newUserRow As DD_ECMAdmin.TBWH_Users2Row
|
||||
newUserRow = DD_ECMAdmin.TBWH_Users2.NewTBWH_Users2Row
|
||||
newUserRow.Username = row.Item(1)
|
||||
newUserRow.Username = row.Item("USERNAME")
|
||||
newUserRow.Surname = row.Item("NAME")
|
||||
newUserRow.Prename = row.Item("PRENAME")
|
||||
Try
|
||||
newUserRow.Email = row.Item(2)
|
||||
newUserRow.Email = row.Item("EMAIL")
|
||||
Catch ex As Exception
|
||||
newUserRow.Email = ""
|
||||
End Try
|
||||
|
||||
newUserRow.ID = row.Item(0)
|
||||
newUserRow.ID = row.Item("GUID")
|
||||
DD_ECMAdmin.TBWH_Users2.Rows.Add(newUserRow)
|
||||
' chklbxUsersforClient.Items.Add(New MyListBoxItem() With {.Text = row.Item(1), .ExtraData = row.Item(0)})
|
||||
Next
|
||||
@ -670,10 +678,15 @@ Public Class frmConstructorDesigner
|
||||
Try
|
||||
For Each row As DataRow In DD_ECMAdmin.TBAD_Users.Rows
|
||||
If row.Item(0) = CBool(True) Then
|
||||
Dim home As Integer = CInt(CheckBoxHome.Checked)
|
||||
Dim home As Integer
|
||||
If CheckBoxHome.Checked Then
|
||||
home = 1
|
||||
Else
|
||||
home = 0
|
||||
End If
|
||||
Dim insert = "INSERT INTO TBPMO_CONSTRUCTOR_USER (CONSTRUCT_ID, USER_ID,ADDED_WHO,HOME_MENUE) VALUES (" & CONSTRUCTOR_IDTextBox.Text & ", " & row.Item(5) & ",'" & Environment.UserName & "'," & home & ")"
|
||||
If ClassDatabase.Execute_non_Query(insert, True) Then
|
||||
|
||||
If ClassDatabase.Execute_non_Query(insert, False) = False Then
|
||||
MsgBox("Could not insert the User-Definition....Check the logfile!", MsgBoxStyle.Exclamation)
|
||||
End If
|
||||
End If
|
||||
Next
|
||||
|
||||
@ -22,6 +22,7 @@ Partial Class frmConstructor_Main
|
||||
'Das Bearbeiten mit dem Code-Editor ist nicht möglich.
|
||||
<System.Diagnostics.DebuggerStepThrough()> _
|
||||
Private Sub InitializeComponent()
|
||||
Me.components = New System.ComponentModel.Container()
|
||||
Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(frmConstructor_Main))
|
||||
Dim GridLevelNode1 As DevExpress.XtraGrid.GridLevelNode = New DevExpress.XtraGrid.GridLevelNode()
|
||||
Dim GridLevelNode2 As DevExpress.XtraGrid.GridLevelNode = New DevExpress.XtraGrid.GridLevelNode()
|
||||
@ -29,13 +30,13 @@ Partial Class frmConstructor_Main
|
||||
Me.SplitContainerMain = New DevExpress.XtraEditors.SplitContainerControl()
|
||||
Me.SplitContainerTop = New DevExpress.XtraEditors.SplitContainerControl()
|
||||
Me.TreeViewMain = New System.Windows.Forms.TreeView()
|
||||
Me.CMSEntity = New System.Windows.Forms.ContextMenuStrip()
|
||||
Me.CMSEntity = New System.Windows.Forms.ContextMenuStrip(Me.components)
|
||||
Me.ResetEbenenAuswahlToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
|
||||
Me.DateiimportEntitätToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
|
||||
Me.FormDesignerToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
|
||||
Me.EntitätssucheStartenToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
|
||||
Me.GridControlMain = New DevExpress.XtraGrid.GridControl()
|
||||
Me.ContextMenuGrid = New System.Windows.Forms.ContextMenuStrip()
|
||||
Me.ContextMenuGrid = New System.Windows.Forms.ContextMenuStrip(Me.components)
|
||||
Me.FunktionenDataGridToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
|
||||
Me.ToolStripSeparator1 = New System.Windows.Forms.ToolStripSeparator()
|
||||
Me.AnsichtUmschaltenToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
|
||||
@ -62,7 +63,7 @@ Partial Class frmConstructor_Main
|
||||
Me.pnlDetails = New System.Windows.Forms.Panel()
|
||||
Me.TabWindream = New DevExpress.XtraTab.XtraTabPage()
|
||||
Me.GridControlDocSearch = New DevExpress.XtraGrid.GridControl()
|
||||
Me.ContextMenuStripResultFiles = New System.Windows.Forms.ContextMenuStrip()
|
||||
Me.ContextMenuStripResultFiles = New System.Windows.Forms.ContextMenuStrip(Me.components)
|
||||
Me.DateiÖffnenToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
|
||||
Me.ToolStripSeparator7 = New System.Windows.Forms.ToolStripSeparator()
|
||||
Me.CopyToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
|
||||
@ -106,7 +107,7 @@ Partial Class frmConstructor_Main
|
||||
Me.Panel1 = New System.Windows.Forms.Panel()
|
||||
Me.GridControlPos = New DevExpress.XtraGrid.GridControl()
|
||||
Me.grvwGridPos = New DevExpress.XtraGrid.Views.Grid.GridView()
|
||||
Me.BindingNavigatorPOS = New System.Windows.Forms.BindingNavigator()
|
||||
Me.BindingNavigatorPOS = New System.Windows.Forms.BindingNavigator(Me.components)
|
||||
Me.BindingNavigatorAddNewItem = New System.Windows.Forms.ToolStripButton()
|
||||
Me.BindingNavigatorCountItem = New System.Windows.Forms.ToolStripLabel()
|
||||
Me.BindingNavigatorDeleteItem = New System.Windows.Forms.ToolStripButton()
|
||||
@ -140,7 +141,7 @@ Partial Class frmConstructor_Main
|
||||
Me.ToolStripSeparator5 = New System.Windows.Forms.ToolStripSeparator()
|
||||
Me.AnwendungscacheFreigebenToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
|
||||
Me.SplitContainer1 = New DevExpress.XtraEditors.SplitContainerControl()
|
||||
Me.BindingSource_Entity = New System.Windows.Forms.BindingSource()
|
||||
Me.BindingSource_Entity = New System.Windows.Forms.BindingSource(Me.components)
|
||||
Me.NavPane = New DevExpress.XtraBars.Navigation.TileNavPane()
|
||||
Me.NavButtonHome = New DevExpress.XtraBars.Navigation.NavButton()
|
||||
Me.NavButtonRefresh = New DevExpress.XtraBars.Navigation.NavButton()
|
||||
@ -151,18 +152,18 @@ Partial Class frmConstructor_Main
|
||||
Me.labelLoadEntity = New System.Windows.Forms.ToolStripStatusLabel()
|
||||
Me.progressLoadEntity = New System.Windows.Forms.ToolStripProgressBar()
|
||||
Me.DD_ECMAdmin = New DD_Record_Organiser.DD_ECMAdmin()
|
||||
Me.ImageCollection1 = New DevExpress.Utils.ImageCollection()
|
||||
Me.ttToolTip = New System.Windows.Forms.ToolTip()
|
||||
Me.ContextMenuDetails = New System.Windows.Forms.ContextMenuStrip()
|
||||
Me.ImageCollection1 = New DevExpress.Utils.ImageCollection(Me.components)
|
||||
Me.ttToolTip = New System.Windows.Forms.ToolTip(Me.components)
|
||||
Me.ContextMenuDetails = New System.Windows.Forms.ContextMenuStrip(Me.components)
|
||||
Me.DD_DMSDataSet = New DD_Record_Organiser.DD_DMSDataSet()
|
||||
Me.VWPMO_WF_USER_ACTIVEBindingSource = New System.Windows.Forms.BindingSource()
|
||||
Me.VWPMO_WF_USER_ACTIVEBindingSource = New System.Windows.Forms.BindingSource(Me.components)
|
||||
Me.VWPMO_WF_USER_ACTIVETableAdapter = New DD_Record_Organiser.DD_DMSDataSetTableAdapters.VWPMO_WF_ACTIVETableAdapter()
|
||||
Me.TableAdapterManager = New DD_Record_Organiser.DD_DMSDataSetTableAdapters.TableAdapterManager()
|
||||
Me.TBPMO_FILES_USERTableAdapter = New DD_Record_Organiser.DD_DMSDataSetTableAdapters.TBPMO_FILES_USERTableAdapter()
|
||||
Me.VWPMO_WF_ACTIVEBindingSource = New System.Windows.Forms.BindingSource()
|
||||
Me.VWPMO_WF_ACTIVEBindingSource = New System.Windows.Forms.BindingSource(Me.components)
|
||||
Me.VWPMO_WF_ACTIVETableAdapter = New DD_Record_Organiser.DD_DMSDataSetTableAdapters.VWPMO_WF_ACTIVETableAdapter()
|
||||
Me.TBPMO_FILES_USERBindingSource = New System.Windows.Forms.BindingSource()
|
||||
Me.ToolTipController = New DevExpress.Utils.ToolTipController()
|
||||
Me.TBPMO_FILES_USERBindingSource = New System.Windows.Forms.BindingSource(Me.components)
|
||||
Me.ToolTipController = New DevExpress.Utils.ToolTipController(Me.components)
|
||||
CType(Me.SplitContainerMain, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
Me.SplitContainerMain.SuspendLayout()
|
||||
CType(Me.SplitContainerTop, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
|
||||
@ -162,6 +162,7 @@ Public Class frmConstructor_Main
|
||||
|
||||
Private FORM_TYPE As Integer
|
||||
Private ENTITY_ID As Integer
|
||||
Private REDUNDANT_FORM As Integer
|
||||
|
||||
Private FORMVIEW_ID As Integer
|
||||
Private _ENTITYSQL As String
|
||||
@ -1016,7 +1017,9 @@ Public Class frmConstructor_Main
|
||||
tempsql = tempsql.Replace("@RECORD_ID", RECORD_ID)
|
||||
tempsql = tempsql.Replace("@USER_ID", USER_GUID)
|
||||
tempsql = tempsql.Replace("@USER_GUID", USER_GUID)
|
||||
|
||||
tempsql = tempsql.Replace("@ENTITY_ID", ENTITY_ID)
|
||||
tempsql = tempsql.Replace("@USERNAME", Environment.UserName)
|
||||
tempsql = tempsql.Replace("@USER_NAME", Environment.UserName)
|
||||
''Regulären Ausdruck zum Auslesen der windream-Indexe definieren
|
||||
'Dim preg As String = "\[%{1}[a-zA-Z0-9\!\$\&\/\(\)\=\?\,\.\-\;\:_öÖüÜäÄ\#\'\+\*\~\{\}\@\€\<\>\ ]+]{1}"
|
||||
'' einen Regulären Ausdruck laden
|
||||
@ -1232,335 +1235,14 @@ Public Class frmConstructor_Main
|
||||
|
||||
TreeViewMain.Nodes.Clear()
|
||||
If NODE_NAVIGATION = True Then
|
||||
' Rootnode erstellen und taggen
|
||||
If DT_TREEVIEW_PER_CONTROLS.Rows.Count > 1 Then
|
||||
' Presuming the DataTable has a column named ENTITY_ID and TYPE_NODE.
|
||||
Dim expression As String
|
||||
expression = "TYPE_NODE = 0"
|
||||
Dim foundRowsLevel0() As DataRow
|
||||
' Use the Select method to find all rows matching the filter.
|
||||
foundRowsLevel0 = DT_TREEVIEW_PER_CONTROLS.Select(expression, "NODE_CAPTION")
|
||||
Dim i As Integer
|
||||
Dim NODE_CONFIG_ID
|
||||
Dim LEVEL0_NODE As TreeNode
|
||||
|
||||
' For each row create a Node
|
||||
For i = 0 To foundRowsLevel0.GetUpperBound(0)
|
||||
Dim ID = foundRowsLevel0(i)("GUID")
|
||||
Dim LevelEntity = foundRowsLevel0(i)("ENTITY_ID")
|
||||
Dim controlID = foundRowsLevel0(i)("CONTROL_ID")
|
||||
Dim nodetext = foundRowsLevel0(i)("NODE_CAPTION")
|
||||
Dim Type_node = foundRowsLevel0(i)("TYPE_NODE")
|
||||
Dim RECORD_ID = foundRowsLevel0(i)("RECORD_ID")
|
||||
NODE_CONFIG_ID = foundRowsLevel0(i)("NODE_CONFIG_ID")
|
||||
|
||||
LEVEL0_NODE = New TreeNode(nodetext)
|
||||
If Not IsDBNull(RECORD_ID) Then
|
||||
LEVEL0_NODE.Tag = LevelEntity & " - CONTROL-ID" & controlID.ToString & "#" & ID & "#RECORD-ID" & RECORD_ID.ToString
|
||||
Else
|
||||
LEVEL0_NODE.Tag = LevelEntity & " - CONTROL-ID" & controlID.ToString & "#" & ID
|
||||
End If
|
||||
|
||||
Dim index As Integer = 0
|
||||
For Each img As String In TREEVIEW_IMAGELIST.Images.Keys
|
||||
If img = NODE_CONFIG_ID & "#" & LevelEntity Then
|
||||
Exit For
|
||||
End If
|
||||
index += 1
|
||||
Next
|
||||
LEVEL0_NODE.ImageIndex = index
|
||||
LEVEL0_NODE.SelectedImageIndex = index
|
||||
|
||||
'### LEVEL 1 laden #######
|
||||
Dim expressionLevel1 As String
|
||||
expressionLevel1 = "PARENT_GUID = " & ID 'TYPE_NODE = 1 AND Einschränkung auf Type 2 und Parent_Guid
|
||||
Dim foundRowsLevel1() As DataRow
|
||||
foundRowsLevel1 = DT_TREEVIEW_PER_CONTROLS.Select(expressionLevel1, "NODE_CAPTION")
|
||||
Dim j As Integer
|
||||
For j = 0 To foundRowsLevel1.GetUpperBound(0)
|
||||
Dim ID1 = foundRowsLevel1(j)("GUID")
|
||||
Dim LevelEntity1 = foundRowsLevel1(j)("ENTITY_ID")
|
||||
Dim controlID1 = foundRowsLevel1(j)("CONTROL_ID")
|
||||
Dim nodetext1 = foundRowsLevel1(j)("NODE_CAPTION")
|
||||
Dim Type_node1 = foundRowsLevel1(j)("TYPE_NODE")
|
||||
RECORD_ID = foundRowsLevel1(j)("RECORD_ID")
|
||||
NODE_CONFIG_ID = foundRowsLevel1(j)("NODE_CONFIG_ID")
|
||||
' Node erstellen..
|
||||
Dim LEVEL1_NODE As TreeNode
|
||||
LEVEL1_NODE = New TreeNode(nodetext1)
|
||||
If Not IsDBNull(RECORD_ID) Then
|
||||
LEVEL1_NODE.Tag = LevelEntity1 & "-CONTROL-ID" & controlID1.ToString & "#" & ID1 & "#RECORD-ID" & RECORD_ID.ToString
|
||||
Else
|
||||
LEVEL1_NODE.Tag = LevelEntity1 & "-CONTROL-ID" & controlID1.ToString & "#" & ID1
|
||||
End If
|
||||
|
||||
index = 0
|
||||
For Each img As String In TREEVIEW_IMAGELIST.Images.Keys
|
||||
If img = NODE_CONFIG_ID & "#" & LevelEntity1 Then
|
||||
Exit For
|
||||
End If
|
||||
index += 1
|
||||
Next
|
||||
LEVEL1_NODE.ImageIndex = index
|
||||
LEVEL1_NODE.SelectedImageIndex = index
|
||||
' ..und einfügen
|
||||
LEVEL0_NODE.Nodes.Add(LEVEL1_NODE)
|
||||
'### LEVEL 2 laden #######
|
||||
Dim expressionLevel2 As String
|
||||
expressionLevel2 = "PARENT_GUID = " & ID1 'TYPE_NODE = 2 AND Einschränkung auf Type und Parent_Guid
|
||||
Dim foundRowsLevel2() As DataRow
|
||||
foundRowsLevel2 = DT_TREEVIEW_PER_CONTROLS.Select(expressionLevel2, "NODE_CAPTION")
|
||||
Dim k As Integer
|
||||
For k = 0 To foundRowsLevel2.GetUpperBound(0)
|
||||
Dim ID2 = foundRowsLevel2(k)("GUID")
|
||||
Dim LevelEntity2 = foundRowsLevel2(k)("ENTITY_ID")
|
||||
Dim controlID2 = foundRowsLevel2(k)("CONTROL_ID")
|
||||
Dim nodetext2 = foundRowsLevel2(k)("NODE_CAPTION")
|
||||
RECORD_ID = foundRowsLevel2(k)("RECORD_ID")
|
||||
NODE_CONFIG_ID = foundRowsLevel2(k)("NODE_CONFIG_ID")
|
||||
' Node erstellen..
|
||||
Dim LEVEL2_NODE As TreeNode
|
||||
LEVEL2_NODE = New TreeNode(nodetext2)
|
||||
If Not IsDBNull(RECORD_ID) Then
|
||||
LEVEL2_NODE.Tag = LevelEntity2 & "-CONTROL-ID" & controlID2.ToString & "#" & ID2 & "#RECORD-ID" & RECORD_ID.ToString
|
||||
Else
|
||||
LEVEL2_NODE.Tag = LevelEntity2 & "-CONTROL-ID" & controlID2.ToString & "#" & ID2
|
||||
End If
|
||||
|
||||
index = 0
|
||||
For Each img As String In TREEVIEW_IMAGELIST.Images.Keys
|
||||
If img = NODE_CONFIG_ID & "#" & LevelEntity2 Then
|
||||
Exit For
|
||||
End If
|
||||
index += 1
|
||||
Next
|
||||
LEVEL2_NODE.ImageIndex = index
|
||||
LEVEL2_NODE.SelectedImageIndex = index
|
||||
' ..und einfügen
|
||||
LEVEL1_NODE.Nodes.Add(LEVEL2_NODE)
|
||||
'### LEVEL 3 laden #######
|
||||
Dim expressionLevel3 As String
|
||||
expressionLevel3 = "PARENT_GUID = " & ID2 'TYPE_NODE = 3 AND Einschränkung auf Type und Parent_Guid
|
||||
Dim foundRowsLevel3() As DataRow
|
||||
foundRowsLevel3 = DT_TREEVIEW_PER_CONTROLS.Select(expressionLevel3, "NODE_CAPTION")
|
||||
Dim l As Integer
|
||||
For l = 0 To foundRowsLevel3.GetUpperBound(0)
|
||||
Dim ID3 = foundRowsLevel3(l)("GUID")
|
||||
Dim LevelEntity3 = foundRowsLevel3(l)("ENTITY_ID")
|
||||
Dim controlID3 = foundRowsLevel3(l)("CONTROL_ID")
|
||||
Dim nodetext3 = foundRowsLevel3(l)("NODE_CAPTION")
|
||||
RECORD_ID = foundRowsLevel3(l)("RECORD_ID")
|
||||
NODE_CONFIG_ID = foundRowsLevel3(l)("NODE_CONFIG_ID")
|
||||
' Node erstellen..
|
||||
Dim LEVEL3_NODE As TreeNode
|
||||
LEVEL3_NODE = New TreeNode(nodetext3)
|
||||
If Not IsDBNull(RECORD_ID) Then
|
||||
LEVEL3_NODE.Tag = LevelEntity3 & "-CONTROL-ID" & controlID3.ToString & "#" & ID3 & "#RECORD-ID" & RECORD_ID.ToString
|
||||
Else
|
||||
LEVEL3_NODE.Tag = LevelEntity3 & "-CONTROL-ID" & controlID3.ToString & "#" & ID3
|
||||
End If
|
||||
|
||||
index = 0
|
||||
For Each img As String In TREEVIEW_IMAGELIST.Images.Keys
|
||||
If img = NODE_CONFIG_ID & "#" & LevelEntity3 Then
|
||||
Exit For
|
||||
End If
|
||||
index += 1
|
||||
Next
|
||||
LEVEL3_NODE.ImageIndex = index
|
||||
LEVEL3_NODE.SelectedImageIndex = index
|
||||
' ..und einfügen
|
||||
LEVEL2_NODE.Nodes.Add(LEVEL3_NODE)
|
||||
'### LEVEL 4 laden #######
|
||||
Dim expressionLevel4 As String
|
||||
expressionLevel4 = "PARENT_GUID = " & ID3 'TYPE_NODE = 4 AND Einschränkung auf Type und Parent_Guid
|
||||
Dim foundRowsLevel4() As DataRow
|
||||
foundRowsLevel4 = DT_TREEVIEW_PER_CONTROLS.Select(expressionLevel4, "NODE_CAPTION")
|
||||
Dim m As Integer
|
||||
For m = 0 To foundRowsLevel4.GetUpperBound(0)
|
||||
Dim ID5 = foundRowsLevel4(m)("GUID")
|
||||
Dim LevelEntity5 = foundRowsLevel4(m)("ENTITY_ID")
|
||||
Dim controlID5 = foundRowsLevel4(m)("CONTROL_ID")
|
||||
Dim nodetext5 = foundRowsLevel4(m)("NODE_CAPTION")
|
||||
RECORD_ID = foundRowsLevel4(m)("RECORD_ID")
|
||||
NODE_CONFIG_ID = foundRowsLevel4(m)("NODE_CONFIG_ID")
|
||||
' Node erstellen..
|
||||
Dim LEVEL4_NODE As TreeNode
|
||||
LEVEL4_NODE = New TreeNode(nodetext5)
|
||||
If Not IsDBNull(RECORD_ID) Then
|
||||
LEVEL4_NODE.Tag = LevelEntity5 & "-CONTROL-ID" & controlID5.ToString & "#" & ID5 & "#RECORD-ID" & RECORD_ID.ToString
|
||||
Else
|
||||
LEVEL4_NODE.Tag = LevelEntity5 & "-CONTROL-ID" & controlID5.ToString & "#" & ID5
|
||||
End If
|
||||
|
||||
index = 0
|
||||
For Each img As String In TREEVIEW_IMAGELIST.Images.Keys
|
||||
If img = NODE_CONFIG_ID & "#" & LevelEntity5 Then
|
||||
Exit For
|
||||
End If
|
||||
index += 1
|
||||
Next
|
||||
LEVEL4_NODE.ImageIndex = index
|
||||
LEVEL4_NODE.SelectedImageIndex = index
|
||||
' ..und einfügen
|
||||
LEVEL3_NODE.Nodes.Add(LEVEL4_NODE)
|
||||
'### LEVEL 5 laden #######
|
||||
Dim expressionLevel5 As String
|
||||
Dim sortExp As String = "NODE_CONFIG_ID, NODE_CAPTION"
|
||||
expressionLevel5 = "PARENT_GUID = " & ID5 'TYPE_NODE = 5 AND Einschränkung auf Type und Parent_Guid
|
||||
Dim foundRowsLevel5() As DataRow
|
||||
foundRowsLevel5 = DT_TREEVIEW_PER_CONTROLS.Select(expressionLevel5, sortExp)
|
||||
Dim n As Integer
|
||||
If ID5 = 1146 Then
|
||||
Console.WriteLine("Aha")
|
||||
End If
|
||||
For n = 0 To foundRowsLevel5.GetUpperBound(0)
|
||||
Dim ID6 = foundRowsLevel5(n)("GUID")
|
||||
Dim LevelEntity6 = foundRowsLevel5(n)("ENTITY_ID")
|
||||
Dim controlID6 = foundRowsLevel5(n)("CONTROL_ID")
|
||||
Dim nodetext6 = foundRowsLevel5(n)("NODE_CAPTION")
|
||||
RECORD_ID = foundRowsLevel5(n)("RECORD_ID")
|
||||
NODE_CONFIG_ID = foundRowsLevel5(n)("NODE_CONFIG_ID")
|
||||
' Node erstellen..
|
||||
Dim LEVEL5_NODE As TreeNode
|
||||
LEVEL5_NODE = New TreeNode(nodetext6)
|
||||
If Not IsDBNull(RECORD_ID) Then
|
||||
LEVEL5_NODE.Tag = LevelEntity6 & "-CONTROL-ID" & controlID6.ToString & "#" & ID6 & "#RECORD-ID" & RECORD_ID.ToString
|
||||
Else
|
||||
LEVEL5_NODE.Tag = LevelEntity6 & "-CONTROL-ID" & controlID6.ToString & "#" & ID6
|
||||
End If
|
||||
|
||||
index = 0
|
||||
For Each img As String In TREEVIEW_IMAGELIST.Images.Keys
|
||||
If img = NODE_CONFIG_ID & "#" & LevelEntity6 Then
|
||||
Exit For
|
||||
End If
|
||||
index += 1
|
||||
Next
|
||||
LEVEL5_NODE.ImageIndex = index
|
||||
LEVEL5_NODE.SelectedImageIndex = index
|
||||
' ..und einfügen
|
||||
LEVEL4_NODE.Nodes.Add(LEVEL5_NODE)
|
||||
'### LEVEL 5 laden #######
|
||||
Dim expressionLevel6 As String
|
||||
expressionLevel6 = "PARENT_GUID = " & ID6 'TYPE_NODE = 6 AND Einschränkung auf Type und Parent_Guid
|
||||
Dim foundRowsLevel6() As DataRow
|
||||
foundRowsLevel6 = DT_TREEVIEW_PER_CONTROLS.Select(expressionLevel6, sortExp)
|
||||
If ID6 = 1146 Then
|
||||
Console.WriteLine("Aha")
|
||||
End If
|
||||
Dim o As Integer
|
||||
For o = 0 To foundRowsLevel6.GetUpperBound(0)
|
||||
Dim ID7 = foundRowsLevel6(o)("GUID")
|
||||
Dim LevelEntity7 = foundRowsLevel6(o)("ENTITY_ID")
|
||||
Dim controlID7 = foundRowsLevel6(o)("CONTROL_ID")
|
||||
Dim nodetext7 = foundRowsLevel6(o)("NODE_CAPTION")
|
||||
RECORD_ID = foundRowsLevel6(o)("RECORD_ID")
|
||||
NODE_CONFIG_ID = foundRowsLevel6(o)("NODE_CONFIG_ID")
|
||||
' Node erstellen..
|
||||
Dim LEVEL6_NODE As TreeNode
|
||||
LEVEL6_NODE = New TreeNode(nodetext7)
|
||||
If Not IsDBNull(RECORD_ID) Then
|
||||
LEVEL6_NODE.Tag = LevelEntity7 & "-CONTROL-ID" & controlID7.ToString & "#" & ID7 & "#RECORD-ID" & RECORD_ID.ToString
|
||||
Else
|
||||
LEVEL6_NODE.Tag = LevelEntity7 & "-CONTROL-ID" & controlID7.ToString & "#" & ID7
|
||||
End If
|
||||
|
||||
index = 0
|
||||
For Each img As String In TREEVIEW_IMAGELIST.Images.Keys
|
||||
If img = NODE_CONFIG_ID & "#" & LevelEntity7 Then
|
||||
Exit For
|
||||
End If
|
||||
index += 1
|
||||
Next
|
||||
LEVEL6_NODE.ImageIndex = index
|
||||
LEVEL6_NODE.SelectedImageIndex = index
|
||||
' ..und einfügen
|
||||
LEVEL5_NODE.Nodes.Add(LEVEL6_NODE)
|
||||
'### LEVEL 7 laden #######
|
||||
Dim expressionLevel7 As String
|
||||
expressionLevel7 = "PARENT_GUID = " & ID7 'TYPE_NODE = 7 AND Einschränkung auf Type und Parent_Guid
|
||||
Dim foundRowsLevel7() As DataRow
|
||||
foundRowsLevel7 = DT_TREEVIEW_PER_CONTROLS.Select(expressionLevel7, sortExp)
|
||||
Dim p As Integer
|
||||
For p = 0 To foundRowsLevel7.GetUpperBound(0)
|
||||
Dim ID8 = foundRowsLevel7(p)("GUID")
|
||||
Dim LevelEntity8 = foundRowsLevel7(p)("ENTITY_ID")
|
||||
Dim controlID8 = foundRowsLevel7(p)("CONTROL_ID")
|
||||
Dim nodetext8 = foundRowsLevel7(p)("NODE_CAPTION")
|
||||
RECORD_ID = foundRowsLevel7(p)("RECORD_ID")
|
||||
NODE_CONFIG_ID = foundRowsLevel7(p)("NODE_CONFIG_ID")
|
||||
' Node erstellen..
|
||||
Dim LEVEL7_NODE As TreeNode
|
||||
LEVEL7_NODE = New TreeNode(nodetext8)
|
||||
If Not IsDBNull(RECORD_ID) Then
|
||||
LEVEL7_NODE.Tag = LevelEntity8 & "-CONTROL-ID" & controlID8.ToString & "#" & ID8 & "#RECORD-ID" & RECORD_ID.ToString
|
||||
Else
|
||||
LEVEL7_NODE.Tag = LevelEntity8 & "-CONTROL-ID" & controlID8.ToString & "#" & ID8
|
||||
End If
|
||||
|
||||
index = 0
|
||||
For Each img As String In TREEVIEW_IMAGELIST.Images.Keys
|
||||
If img = NODE_CONFIG_ID & "#" & LevelEntity8 Then
|
||||
Exit For
|
||||
End If
|
||||
index += 1
|
||||
Next
|
||||
LEVEL7_NODE.ImageIndex = index
|
||||
LEVEL7_NODE.SelectedImageIndex = index
|
||||
' ..und einfügen
|
||||
LEVEL6_NODE.Nodes.Add(LEVEL7_NODE)
|
||||
'### LEVEL 7 laden #######
|
||||
Dim expressionLevel8 As String
|
||||
expressionLevel8 = "PARENT_GUID = " & ID8 'TYPE_NODE = 7 AND Einschränkung auf Type und Parent_Guid
|
||||
Dim foundRowsLevel8() As DataRow
|
||||
foundRowsLevel8 = DT_TREEVIEW_PER_CONTROLS.Select(expressionLevel8, sortExp)
|
||||
Dim q As Integer
|
||||
For q = 0 To foundRowsLevel8.GetUpperBound(0)
|
||||
Dim ID9 = foundRowsLevel8(q)("GUID")
|
||||
Dim LevelEntity9 = foundRowsLevel8(q)("ENTITY_ID")
|
||||
Dim controlID9 = foundRowsLevel8(q)("CONTROL_ID")
|
||||
Dim nodetext9 = foundRowsLevel8(q)("NODE_CAPTION")
|
||||
RECORD_ID = foundRowsLevel8(q)("RECORD_ID")
|
||||
NODE_CONFIG_ID = foundRowsLevel8(q)("NODE_CONFIG_ID")
|
||||
' Node erstellen..
|
||||
Dim LEVEL8_NODE As TreeNode
|
||||
LEVEL8_NODE = New TreeNode(nodetext9)
|
||||
If Not IsDBNull(RECORD_ID) Then
|
||||
LEVEL8_NODE.Tag = LevelEntity9 & "-CONTROL-ID" & controlID9.ToString & "#" & ID9 & "#RECORD-ID" & RECORD_ID.ToString
|
||||
Else
|
||||
LEVEL8_NODE.Tag = LevelEntity9 & "-CONTROL-ID" & controlID9.ToString & "#" & ID9
|
||||
End If
|
||||
|
||||
index = 0
|
||||
For Each img As String In TREEVIEW_IMAGELIST.Images.Keys
|
||||
If img = NODE_CONFIG_ID & "#" & LevelEntity9 Then
|
||||
Exit For
|
||||
End If
|
||||
index += 1
|
||||
Next
|
||||
LEVEL8_NODE.ImageIndex = index
|
||||
LEVEL8_NODE.SelectedImageIndex = index
|
||||
' ..und einfügen
|
||||
LEVEL7_NODE.Nodes.Add(LEVEL8_NODE)
|
||||
'### LEVEL 8 laden #######
|
||||
Next ' Level 7 Ende
|
||||
Next ' Level 7 Ende
|
||||
Next ' Level 6 Ende
|
||||
Next ' Level 5 Ende
|
||||
Next 'Level 4 Ende
|
||||
Next 'Level 3 Ende
|
||||
Next ' Level 2 Ende
|
||||
Next 'Level 1 Ende
|
||||
Next
|
||||
|
||||
TreeViewMain.Nodes.Add(LEVEL0_NODE)
|
||||
|
||||
|
||||
Else
|
||||
MsgBox("Check the Control Navigation Option or inform Digital Data!", MsgBoxStyle.Critical)
|
||||
Me.Close()
|
||||
End If
|
||||
Try
|
||||
Dim MainNode = ClassNodeNavigation.CreateTreeViewNodes(DT_TREEVIEW_PER_CONTROLS, TREEVIEW_IMAGELIST)
|
||||
If Not IsNothing(MainNode) Then
|
||||
TreeViewMain.Nodes.Add(MainNode)
|
||||
End If
|
||||
Catch ex As Exception
|
||||
MsgBox("Error in Load TreeView NodesNavigation:" & vbNewLine & ex.Message, MsgBoxStyle.Critical)
|
||||
End Try
|
||||
Else
|
||||
' LINQ für Zugriff auf DT_VWPMO_CONSTRUCTOR_FORMS
|
||||
Dim query1 = From form In DT_VWPMO_CONSTRUCTOR_FORMS.AsEnumerable()
|
||||
@ -2551,6 +2233,12 @@ Public Class frmConstructor_Main
|
||||
FORM_TYPE = ENTITY_ROW.Item("FORM_TYPE_ID")
|
||||
IS_SINGLE_RECORD = ENTITY_ROW.Item("SINGLE_RECORD")
|
||||
POS_ENTITY = ENTITY_ROW.Item("POS_ENTITY")
|
||||
REDUNDANT_FORM = ENTITY_ROW.Item("REDUNDANT_ENTITY")
|
||||
If REDUNDANT_FORM <> 0 Then
|
||||
CURRENT_ENTITY_REDUNDANT_ID = REDUNDANT_FORM
|
||||
Else
|
||||
CURRENT_ENTITY_REDUNDANT_ID = 0
|
||||
End If
|
||||
If VIEW_ID_RUNTIME <> -1 Then
|
||||
GRID_TYPE_ID = VIEW_ID_RUNTIME
|
||||
Else
|
||||
@ -4504,7 +4192,7 @@ Public Class frmConstructor_Main
|
||||
Dim item As ClassWindreamDocGrid.WindreamDocGridComboboxItem = ComboBox.SelectedItem
|
||||
Dim value As String = item.Value
|
||||
Dim configId As Integer = item.ConfigID
|
||||
Dim docId As Integer = ClassWindreamDocGrid.RESULT_DOC_ID
|
||||
Dim docId As Integer = ClassWindreamDocGrid.SELECTED_DOC_ID
|
||||
Dim user As String = Environment.UserName
|
||||
|
||||
Dim Sql As String = String.Format("EXEC PRPMO_DOC_VALUE {0}, {1}, '{2}', '{3}'", docId, configId, value, user)
|
||||
@ -4520,7 +4208,7 @@ Public Class frmConstructor_Main
|
||||
Dim value As DateTime = DatePicker.EditValue
|
||||
Dim colTitle = DirectCast(GridControlDocSearch.MainView, DevExpress.XtraGrid.Views.Grid.GridView).FocusedColumn.FieldName
|
||||
Dim configId As Integer = ClassWindreamDocGrid.RESULT_CONFIG_IDS.Item(colTitle)
|
||||
Dim docId As Integer = ClassWindreamDocGrid.RESULT_DOC_ID
|
||||
Dim docId As Integer = ClassWindreamDocGrid.SELECTED_DOC_ID
|
||||
Dim user As String = Environment.UserName
|
||||
|
||||
Dim dateString = value.ToString("yyyy-MM-dd hh:mm:ss.fff")
|
||||
@ -4538,7 +4226,7 @@ Public Class frmConstructor_Main
|
||||
Dim value = TextBox.EditValue
|
||||
Dim colTitle = DirectCast(GridControlDocSearch.MainView, DevExpress.XtraGrid.Views.Grid.GridView).FocusedColumn.FieldName
|
||||
Dim configId As Integer = ClassWindreamDocGrid.RESULT_CONFIG_IDS.Item(colTitle)
|
||||
Dim docId As Integer = ClassWindreamDocGrid.RESULT_DOC_ID
|
||||
Dim docId As Integer = ClassWindreamDocGrid.SELECTED_DOC_ID
|
||||
Dim user As String = Environment.UserName
|
||||
|
||||
Dim Sql As String = String.Format("EXEC PRPMO_DOC_VALUE {0}, {1}, '{2}', '{3}'", docId, configId, value, user)
|
||||
@ -4852,9 +4540,17 @@ Public Class frmConstructor_Main
|
||||
Sub Drag_Drop(e As DragEventArgs)
|
||||
If act_FormViewID <> 0 And RIGHT_WINDREAM_FORBIDDEN = False Then
|
||||
Dim sql = "select count(*) from VWPMO_DOKUMENTTYPES where FORMVIEW_ID = " & FORMVIEW_ID
|
||||
If ClassDatabase.Execute_Scalar(sql, True) = 0 Then
|
||||
Dim count_DT = ClassDatabase.Execute_Scalar(sql, True)
|
||||
If count_DT = 0 And CURRENT_ENTITY_REDUNDANT_ID = 0 Then
|
||||
MsgBox("No documenttypes for this entity configured! Indexing is not possible!" & vbNewLine & "Please check the configuration!", MsgBoxStyle.Exclamation)
|
||||
Exit Sub
|
||||
ElseIf count_DT = 0 And CURRENT_ENTITY_REDUNDANT_ID <> 0 Then
|
||||
sql = "select count(*) from VWPMO_DOKUMENTTYPES where FORM_ID = " & CURRENT_ENTITY_REDUNDANT_ID
|
||||
count_DT = ClassDatabase.Execute_Scalar(sql, True)
|
||||
If count_DT = 0 Then
|
||||
MsgBox("No documenttypes for this entity configured! Indexing is not possible!" & vbNewLine & "Please check the configuration!", MsgBoxStyle.Exclamation)
|
||||
Exit Sub
|
||||
End If
|
||||
End If
|
||||
If RECORD_CHANGED = True Then
|
||||
If Save_Record() = False Then
|
||||
@ -4945,32 +4641,41 @@ Public Class frmConstructor_Main
|
||||
|
||||
Next
|
||||
Dim sql = "select count(*) from VWPMO_DOKUMENTTYPES where FORMVIEW_ID = " & FORMVIEW_ID
|
||||
If ClassDatabase.Execute_Scalar(sql, True) >= 1 Then
|
||||
Dim sql1 = String.Format("SELECT GUID, FILENAME2WORK, USER_WORK, HANDLE_TYPE, WORKED, ADDED_WHEN FROM TBPMO_FILES_USER WHERE (UPPER(USER_WORK) = UPPER('{0}')) AND WORKED = 0", Environment.UserName)
|
||||
Dim DT As DataTable = ClassDatabase.Return_Datatable(sql1)
|
||||
If Not IsNothing(DT) Then
|
||||
If DT.Rows.Count > 0 Then
|
||||
For Each Filerow As DataRow In DT.Rows
|
||||
'Dim datei = Str.ToString.Replace("@DROPFROMFSYSTEM@", "")
|
||||
CURRENT_FILEID = Filerow.Item(0)
|
||||
CURRENT_PARENT_ENTITY_ID = PARENT_ENTITYID
|
||||
CURRENT_RECORD_ID = RECORD_ID
|
||||
CURRENT_FORM_ID = ENTITY_ID
|
||||
CURRENT_FORMVIEW_ID = FORMVIEW_ID
|
||||
If ClassDatabase.Execute_Scalar("SELECT COUNT(*) FROM TBPMO_FILES_USER WHERE GUID = " & CURRENT_FILEID & " AND WORKED = 0") = 1 Then
|
||||
frmWD_IndexFile.ShowDialog()
|
||||
Else
|
||||
If LogErrorsOnly = False Then ClassLogger.Add(" >> File was deleted or worked meanwhile!")
|
||||
End If
|
||||
Next
|
||||
RUN_WDSEARCH_GRID("RECORD")
|
||||
' RUN_WD_SEARCH(WD_Suche, "RECORD")
|
||||
End If
|
||||
End If
|
||||
Else
|
||||
Dim count_DT = ClassDatabase.Execute_Scalar(sql, True)
|
||||
If count_DT = 0 And CURRENT_ENTITY_REDUNDANT_ID = 0 Then
|
||||
MsgBox("No documenttypes for this entity configured! Indexing is not possible!" & vbNewLine & "Please check the configuration!", MsgBoxStyle.Exclamation)
|
||||
Exit Sub
|
||||
ElseIf count_DT = 0 And CURRENT_ENTITY_REDUNDANT_ID <> 0 Then
|
||||
sql = "select count(*) from VWPMO_DOKUMENTTYPES where FORM_ID = " & CURRENT_ENTITY_REDUNDANT_ID
|
||||
count_DT = ClassDatabase.Execute_Scalar(sql, True)
|
||||
If count_DT = 0 Then
|
||||
MsgBox("No documenttypes for the redundant entity configured either! Indexing is not possible!" & vbNewLine & "Please check the configuration!", MsgBoxStyle.Exclamation)
|
||||
Exit Sub
|
||||
End If
|
||||
End If
|
||||
|
||||
Dim sql1 = String.Format("SELECT GUID, FILENAME2WORK, USER_WORK, HANDLE_TYPE, WORKED, ADDED_WHEN FROM TBPMO_FILES_USER WHERE (UPPER(USER_WORK) = UPPER('{0}')) AND WORKED = 0", Environment.UserName)
|
||||
Dim DT As DataTable = ClassDatabase.Return_Datatable(sql1)
|
||||
If Not IsNothing(DT) Then
|
||||
If DT.Rows.Count > 0 Then
|
||||
For Each Filerow As DataRow In DT.Rows
|
||||
'Dim datei = Str.ToString.Replace("@DROPFROMFSYSTEM@", "")
|
||||
CURRENT_FILEID = Filerow.Item(0)
|
||||
CURRENT_PARENT_ENTITY_ID = PARENT_ENTITYID
|
||||
CURRENT_RECORD_ID = RECORD_ID
|
||||
CURRENT_FORM_ID = ENTITY_ID
|
||||
CURRENT_FORMVIEW_ID = FORMVIEW_ID
|
||||
If ClassDatabase.Execute_Scalar("SELECT COUNT(*) FROM TBPMO_FILES_USER WHERE GUID = " & CURRENT_FILEID & " AND WORKED = 0") = 1 Then
|
||||
frmWD_IndexFile.ShowDialog()
|
||||
Else
|
||||
If LogErrorsOnly = False Then ClassLogger.Add(" >> File was deleted or worked meanwhile!")
|
||||
End If
|
||||
Next
|
||||
RUN_WDSEARCH_GRID("RECORD")
|
||||
' RUN_WD_SEARCH(WD_Suche, "RECORD")
|
||||
End If
|
||||
End If
|
||||
|
||||
Catch ex As Exception
|
||||
MsgBox("Check_Dropped_Files: " & ex.Message, MsgBoxStyle.Critical)
|
||||
End Try
|
||||
@ -5779,11 +5484,11 @@ Public Class frmConstructor_Main
|
||||
End Sub
|
||||
|
||||
Private Sub KopierenToolStripMenuItem_Click(sender As Object, e As EventArgs) Handles CopyToolStripMenuItem.Click
|
||||
If ClassWindreamDocGrid.RESULT_DOC_PATH <> Nothing Then
|
||||
If ClassWindreamDocGrid.SELECTED_DOC_PATH <> "" Then
|
||||
Try
|
||||
Dim selectedfile(0) As String
|
||||
|
||||
selectedfile(0) = ClassWindreamDocGrid.RESULT_DOC_PATH
|
||||
selectedfile(0) = ClassWindreamDocGrid.SELECTED_DOC_PATH
|
||||
|
||||
Dim dataobj As New DataObject
|
||||
|
||||
@ -5808,34 +5513,40 @@ Public Class frmConstructor_Main
|
||||
MsgBox("Please select a record!", MsgBoxStyle.Exclamation)
|
||||
Exit Sub
|
||||
End If
|
||||
If ClassWindreamDocGrid.RESULT_DOC_PATH <> Nothing Then
|
||||
Dim msg = "Wollen Sie die Verknüpfung der Datei wirklich entfernen?" & vbNewLine & "Datei bleibt im DMS/Archiv/Explorer erhalten!"
|
||||
If IsNothing(ClassWindreamDocGrid.DT_RESULTFILES) Then
|
||||
Exit Sub
|
||||
End If
|
||||
If ClassWindreamDocGrid.DT_RESULTFILES.Rows.Count > 0 Then
|
||||
Dim msg = "Wollen Sie die Verknüpfung der gewählten Datei/en wirklich entfernen?" & vbNewLine & "Datei/en bleibt/bleiben im DMS/Archiv/Explorer erhalten!"
|
||||
If USER_LANGUAGE <> "de-DE" Then
|
||||
msg = "Would You like to delete only the references?" & vbNewLine & "File will stay in ECM/Archive/Explorer!"
|
||||
msg = "Would You like to delete only the references?" & vbNewLine & "File(s) will stay in ECM/Archive/Explorer!"
|
||||
End If
|
||||
Dim result As MsgBoxResult
|
||||
result = MessageBox.Show(msg, "Confirmation:", MessageBoxButtons.YesNo, MessageBoxIcon.Question)
|
||||
If result = MsgBoxResult.Yes Then
|
||||
Try
|
||||
Dim DT_INDICES As DataTable = ClassDatabase.Return_Datatable("SELECT * FROM TBPMO_WD_OBJECTTYPE WHERE OBJECT_TYPE = '" & ClassWindreamDocGrid.RESULT_OBJECTTYPE & "'")
|
||||
If Not IsNothing(DT_INDICES) Then
|
||||
If DT_INDICES.Rows.Count = 1 Then
|
||||
'Record-Links entfernen
|
||||
If ClassWindream.REMOVE_VEKTOR_LINK(ClassWindreamDocGrid.RESULT_DOC_PATH, DT_INDICES.Rows(0).Item("IDXNAME_RECORDID"), RECORD_ID) = True Then
|
||||
'ENTITY-Links entfernen
|
||||
If ClassWindream.REMOVE_VEKTOR_LINK(ClassWindreamDocGrid.RESULT_DOC_PATH, DT_INDICES.Rows(0).Item("IDXNAME_ENTITYID"), ENTITY_ID) = True Then
|
||||
If ClassFileResult.Delete_ResultFile(ClassWindreamDocGrid.RESULT_DOC_ID) = True Then
|
||||
ClassHelper.InsertEssential_Log(ClassWindreamDocGrid.RESULT_DOC_ID, "DOC-ID", "RECORD LINK REMOVED FROM DOC-SEARCH")
|
||||
RUN_WDSEARCH_GRID("RECORD")
|
||||
For Each row As DataRow In ClassWindreamDocGrid.DT_RESULTFILES.Rows
|
||||
Dim DT_INDICES As DataTable = ClassDatabase.Return_Datatable("SELECT * FROM TBPMO_WD_OBJECTTYPE WHERE OBJECT_TYPE = '" & row.Item("OBJECTTYPE") & "'")
|
||||
If Not IsNothing(DT_INDICES) Then
|
||||
If DT_INDICES.Rows.Count = 1 Then
|
||||
'Record-Links entfernen
|
||||
If ClassWindream.REMOVE_VEKTOR_LINK(row.Item("DOC_PATH"), DT_INDICES.Rows(0).Item("IDXNAME_RECORDID"), RECORD_ID) = True Then
|
||||
'ENTITY-Links entfernen
|
||||
If ClassWindream.REMOVE_VEKTOR_LINK(row.Item("DOC_PATH"), DT_INDICES.Rows(0).Item("IDXNAME_ENTITYID"), ENTITY_ID) = True Then
|
||||
If ClassFileResult.Delete_ResultFile(row.Item("DOC_ID")) = True Then
|
||||
ClassHelper.InsertEssential_Log(row.Item("DOC_ID"), "DOC-ID", "RECORD LINK REMOVED FROM DOC-SEARCH")
|
||||
RUN_WDSEARCH_GRID("RECORD")
|
||||
End If
|
||||
Else
|
||||
MsgBox("Could not remove Vektor-Link ENTITY! Check logfile.", MsgBoxStyle.Exclamation)
|
||||
End If
|
||||
Else
|
||||
MsgBox("Could not remove Vektor-Link ENTITY! Check logfile.", MsgBoxStyle.Exclamation)
|
||||
MsgBox("Could not remove Vektor-Link RECORD! Check logfile.", MsgBoxStyle.Exclamation)
|
||||
End If
|
||||
Else
|
||||
MsgBox("Could not remove Vektor-Link RECORD! Check logfile.", MsgBoxStyle.Exclamation)
|
||||
End If
|
||||
End If
|
||||
End If
|
||||
Next
|
||||
|
||||
Catch ex As Exception
|
||||
MsgBox("Unexpected Error in Removing links from file:" & vbNewLine & ex.Message, MsgBoxStyle.Critical)
|
||||
End Try
|
||||
@ -5844,30 +5555,50 @@ Public Class frmConstructor_Main
|
||||
End Sub
|
||||
|
||||
Private Sub EigenschaftenToolStripMenuItem_Click(sender As Object, e As EventArgs) Handles PropertiesToolStripMenuItem.Click
|
||||
If ClassWindreamDocGrid.RESULT_DOC_PATH <> Nothing Then
|
||||
Cursor = Cursors.WaitCursor
|
||||
Dim sei As New SHELLEXECUTEINFO
|
||||
sei.cbSize = Marshal.SizeOf(sei)
|
||||
sei.lpVerb = "properties"
|
||||
sei.lpFile = ClassWindreamDocGrid.RESULT_DOC_PATH
|
||||
sei.nShow = SW_SHOW
|
||||
sei.fMask = SEE_MASK_INVOKEIDLIST
|
||||
If Not ShellExecuteEx(sei) Then
|
||||
Dim ex As New System.ComponentModel.Win32Exception(System.Runtime.InteropServices.Marshal.GetLastWin32Error())
|
||||
MsgBox("Unexpected Error in Open file propertys:" & vbNewLine & ex.Message, MsgBoxStyle.Critical)
|
||||
End If
|
||||
If IsNothing(ClassWindreamDocGrid.DT_RESULTFILES) Then
|
||||
MsgBox("Could not read File Parameters(4)!", MsgBoxStyle.Exclamation)
|
||||
Exit Sub
|
||||
End If
|
||||
Cursor = Cursors.Default
|
||||
For Each row As DataRow In ClassWindreamDocGrid.DT_RESULTFILES.Rows
|
||||
If row.Item("DOC_PATH") <> "" Then
|
||||
Cursor = Cursors.WaitCursor
|
||||
Dim sei As New SHELLEXECUTEINFO
|
||||
sei.cbSize = Marshal.SizeOf(sei)
|
||||
sei.lpVerb = "properties"
|
||||
sei.lpFile = row.Item("DOC_PATH")
|
||||
sei.nShow = SW_SHOW
|
||||
sei.fMask = SEE_MASK_INVOKEIDLIST
|
||||
If Not ShellExecuteEx(sei) Then
|
||||
Dim ex As New System.ComponentModel.Win32Exception(System.Runtime.InteropServices.Marshal.GetLastWin32Error())
|
||||
MsgBox("Unexpected Error in Open file propertys:" & vbNewLine & ex.Message, MsgBoxStyle.Critical)
|
||||
End If
|
||||
End If
|
||||
Cursor = Cursors.Default
|
||||
Next
|
||||
|
||||
End Sub
|
||||
|
||||
Private Sub DateiÖffnenToolStripMenuItem_Click(sender As Object, e As EventArgs) Handles DateiÖffnenToolStripMenuItem.Click
|
||||
ClassHelper.File_open(ClassWindreamDocGrid.RESULT_DOC_PATH, ClassWindreamDocGrid.RESULT_DOC_ID)
|
||||
If IsNothing(ClassWindreamDocGrid.DT_RESULTFILES) Then
|
||||
MsgBox("Could not read File Parameters(4)!", MsgBoxStyle.Exclamation)
|
||||
Exit Sub
|
||||
End If
|
||||
For Each row As DataRow In ClassWindreamDocGrid.DT_RESULTFILES.Rows
|
||||
ClassHelper.File_open(row.Item("DOC_PATH"), row.Item("DOC_ID"))
|
||||
Next
|
||||
|
||||
End Sub
|
||||
Private Sub GridControlDocSearch_DoubleClick(sender As Object, e As EventArgs) Handles GridControlDocSearch.DoubleClick
|
||||
'Get_Doc_Items()
|
||||
ClassWindreamDocGrid.GetDocItems(GridViewDoc_Search)
|
||||
If RIGHT_WINDREAM_FORBIDDEN = False Then
|
||||
ClassHelper.File_open(ClassWindreamDocGrid.RESULT_DOC_PATH, ClassWindreamDocGrid.RESULT_DOC_ID)
|
||||
If IsNothing(ClassWindreamDocGrid.DT_RESULTFILES) Then
|
||||
MsgBox("Could not read File Parameters(5)!", MsgBoxStyle.Exclamation)
|
||||
Exit Sub
|
||||
End If
|
||||
For Each row As DataRow In ClassWindreamDocGrid.DT_RESULTFILES.Rows
|
||||
ClassHelper.File_open(row.Item("DOC_PATH"), row.Item("DOC_ID"))
|
||||
Next
|
||||
End If
|
||||
End Sub
|
||||
|
||||
@ -6134,11 +5865,11 @@ Public Class frmConstructor_Main
|
||||
Try
|
||||
If tsTextBoxRenameFile.Text <> "" Then
|
||||
Dim OldName, NewName As String
|
||||
OldName = ClassWindreamDocGrid.RESULT_DOC_PATH
|
||||
OldName = ClassWindreamDocGrid.SELECTED_DOC_PATH
|
||||
' Define file names.
|
||||
NewName = tsTextBoxRenameFile.Text
|
||||
Dim name1 = Path.Combine(Path.GetDirectoryName(ClassWindreamDocGrid.RESULT_DOC_PATH), NewName)
|
||||
NewName = NewName & Path.GetExtension(ClassWindreamDocGrid.RESULT_DOC_PATH)
|
||||
Dim name1 = Path.Combine(Path.GetDirectoryName(ClassWindreamDocGrid.SELECTED_DOC_PATH), NewName)
|
||||
NewName = NewName & Path.GetExtension(ClassWindreamDocGrid.SELECTED_DOC_PATH)
|
||||
' Rename file.
|
||||
My.Computer.FileSystem.RenameFile(OldName, NewName)
|
||||
RUN_WDSEARCH_GRID("RECORD")
|
||||
@ -6158,9 +5889,20 @@ Public Class frmConstructor_Main
|
||||
End Sub
|
||||
Sub Display_Filename()
|
||||
Try
|
||||
If ClassWindreamDocGrid.RESULT_DOC_PATH <> "" Then
|
||||
Dim RENAME_DOC_PATH
|
||||
Try
|
||||
RENAME_DOC_PATH = GridViewDoc_Search.GetFocusedRowCellValue(GridViewDoc_Search.Columns("FULLPATH"))
|
||||
Catch ex As Exception
|
||||
ClassLogger.Add(">> Attention: Could not set DocVariable RENAME_DOC_PATH: " & ex.Message, False)
|
||||
RENAME_DOC_PATH = Nothing
|
||||
End Try
|
||||
If IsNothing(ClassWindreamDocGrid.DT_RESULTFILES) Then
|
||||
MsgBox("Could not read File Parameters!", MsgBoxStyle.Exclamation)
|
||||
Exit Sub
|
||||
End If
|
||||
If RENAME_DOC_PATH <> "" Then
|
||||
Dim FileToRename As String
|
||||
FileToRename = Path.GetFileNameWithoutExtension(ClassWindreamDocGrid.RESULT_DOC_PATH)
|
||||
FileToRename = Path.GetFileNameWithoutExtension(RENAME_DOC_PATH)
|
||||
tsTextBoxRenameFile.Text = FileToRename
|
||||
tsTextBoxRenameFile.Enabled = True
|
||||
Else
|
||||
@ -6172,10 +5914,19 @@ Public Class frmConstructor_Main
|
||||
End Sub
|
||||
|
||||
Private Sub DateiMitDatensatzVerknüpfenToolStripMenuItem_Click(sender As Object, e As EventArgs) Handles TSMI_linkRecord.Click
|
||||
Dim fileName As String = ClassWindreamDocGrid.RESULT_DOC_PATH
|
||||
CURRENT_DOC_ID = ClassWindreamDocGrid.RESULT_DOC_ID
|
||||
Dim frm As New frmWD_Link_to_Record(fileName, ClassWindreamDocGrid.RESULT_OBJECTTYPE)
|
||||
frm.Show()
|
||||
Try
|
||||
ClassWindreamDocGrid.GetDocItems(GridViewDoc_Search)
|
||||
If IsNothing(ClassWindreamDocGrid.DT_RESULTFILES) Then
|
||||
MsgBox("Could not read File Parameters (LinkRecord)!", MsgBoxStyle.Exclamation)
|
||||
Exit Sub
|
||||
End If
|
||||
Dim fileName As String = ClassWindreamDocGrid.SELECTED_DOC_PATH
|
||||
CURRENT_DOC_ID = ClassWindreamDocGrid.SELECTED_DOC_ID
|
||||
Dim frm As New frmWD_Link_to_Record() 'fileName, ClassWindreamDocGrid.RESULT_OBJECTTYPE)
|
||||
frm.Show()
|
||||
Catch ex As Exception
|
||||
MsgBox("Unexpected Error in Linking Record: " & ex.Message, MsgBoxStyle.Critical)
|
||||
End Try
|
||||
End Sub
|
||||
|
||||
Private Sub DetailAnsichtDatensatzToolStripMenuItem_Click(sender As Object, e As EventArgs) Handles DetailAnsichtDatensatzToolStripMenuItem.Click
|
||||
@ -6214,41 +5965,44 @@ Public Class frmConstructor_Main
|
||||
|
||||
Try
|
||||
Dim DROPDOWN_VALUE
|
||||
'Den ColumnTitle aus ConfigTableholen
|
||||
If CURRENT_DOC_DROPDOWN.Rows.Count > 0 Then
|
||||
For Each confrow As DataRow In CURRENT_DOC_DROPDOWN.Rows
|
||||
Dim CAPTION = confrow.Item("HEADER_CAPTION")
|
||||
DROPDOWN_VALUE = GridViewDoc_Search.GetRowCellValue(e.RowHandle, CAPTION)
|
||||
If Not IsNothing(DROPDOWN_VALUE) Then
|
||||
Exit For
|
||||
End If
|
||||
Next
|
||||
|
||||
If Not IsNothing(DROPDOWN_VALUE) Then
|
||||
Dim ColorRow As Color
|
||||
Dim expression As String = String.Format("VALUE = '{0}'", DROPDOWN_VALUE)
|
||||
Dim matchingRows() As DataRow = DT_DOCRESULT_DROPDOWN_ITEMS.Select(expression, "SEQUENCE")
|
||||
Dim rowcolorname As String
|
||||
'Die Color für den value auswählen
|
||||
For Each matchingRow As DataRow In matchingRows
|
||||
|
||||
rowcolorname = matchingRow.Item("COLOR")
|
||||
If rowcolorname <> "" Then
|
||||
If Not IsNothing(CURRENT_DOC_DROPDOWN) Then
|
||||
'Den ColumnTitle aus ConfigTableholen
|
||||
If CURRENT_DOC_DROPDOWN.Rows.Count > 0 Then
|
||||
For Each confrow As DataRow In CURRENT_DOC_DROPDOWN.Rows
|
||||
Dim CAPTION = confrow.Item("HEADER_CAPTION")
|
||||
DROPDOWN_VALUE = GridViewDoc_Search.GetRowCellValue(e.RowHandle, CAPTION)
|
||||
If Not IsNothing(DROPDOWN_VALUE) Then
|
||||
Exit For
|
||||
End If
|
||||
Next
|
||||
If rowcolorname <> "" Then
|
||||
ColorRow = Color.FromName(rowcolorname)
|
||||
e.Appearance.BackColor = ColorRow
|
||||
e.HighPriority = True
|
||||
|
||||
If Not IsNothing(DROPDOWN_VALUE) Then
|
||||
Dim ColorRow As Color
|
||||
Dim expression As String = String.Format("VALUE = '{0}'", DROPDOWN_VALUE)
|
||||
Dim matchingRows() As DataRow = DT_DOCRESULT_DROPDOWN_ITEMS.Select(expression, "SEQUENCE")
|
||||
Dim rowcolorname As String = ""
|
||||
'Die Color für den value auswählen
|
||||
For Each matchingRow As DataRow In matchingRows
|
||||
|
||||
rowcolorname = matchingRow.Item("COLOR")
|
||||
If rowcolorname <> "" Then
|
||||
Exit For
|
||||
End If
|
||||
Next
|
||||
If rowcolorname <> "" Then
|
||||
ColorRow = Color.FromName(rowcolorname)
|
||||
e.Appearance.BackColor = ColorRow
|
||||
e.HighPriority = True
|
||||
End If
|
||||
|
||||
|
||||
'Dim c As Color = DirectCast(rowCellValue, Color)
|
||||
|
||||
End If
|
||||
|
||||
|
||||
'Dim c As Color = DirectCast(rowCellValue, Color)
|
||||
|
||||
End If
|
||||
|
||||
|
||||
End If
|
||||
|
||||
Catch ex As Exception
|
||||
ClassLogger.Add(">> Unexpected Error in RowStyle-Color Dropdown: " & ex.Message, False)
|
||||
End Try
|
||||
@ -6258,18 +6012,24 @@ Public Class frmConstructor_Main
|
||||
|
||||
Private Sub ContextMenuStripResultFiles_Opening(sender As Object, e As System.ComponentModel.CancelEventArgs) Handles ContextMenuStripResultFiles.Opening
|
||||
File_in_Work()
|
||||
If ClassWindreamDocGrid.RESULT_DISPLAYNAME <> "" Then
|
||||
TSMIDisplayname.Visible = True
|
||||
Set_Displayname()
|
||||
If ClassWindreamDocGrid.DT_RESULTFILES.Rows.Count = 1 Then
|
||||
If ClassWindreamDocGrid.DT_RESULTFILES.Rows(0).Item("DISPLAYNAME") <> "" Then
|
||||
TSMIDisplayname.Visible = True
|
||||
Set_Displayname()
|
||||
Else
|
||||
TSMIDisplayname.Visible = False
|
||||
End If
|
||||
Else
|
||||
TSMIDisplayname.Visible = False
|
||||
End If
|
||||
|
||||
|
||||
End Sub
|
||||
Sub File_in_Work()
|
||||
TSMI_inWork.Enabled = True
|
||||
Try
|
||||
Dim expression As String
|
||||
expression = "DocID = " & ClassWindreamDocGrid.RESULT_DOC_ID
|
||||
expression = "DocID = " & ClassWindreamDocGrid.SELECTED_DOC_ID
|
||||
Dim foundRowsLevel0() As DataRow
|
||||
' Use the Select method to find all rows matching the filter.
|
||||
foundRowsLevel0 = CURRENT_DOC_RESULTS.Select(expression)
|
||||
@ -6285,7 +6045,7 @@ Public Class frmConstructor_Main
|
||||
|
||||
Dim displ As String
|
||||
|
||||
If CBool(ClassWindreamDocGrid.RESULT_INWORK) = True Then
|
||||
If CBool(ClassWindreamDocGrid.SELECTED_INWORK) = True Then
|
||||
If IW_USER.ToUpper = Environment.UserName.ToUpper Then
|
||||
displ = "Datei wieder freigeben"
|
||||
If USER_LANGUAGE <> "de-DE" Then
|
||||
@ -6310,8 +6070,12 @@ Public Class frmConstructor_Main
|
||||
End Try
|
||||
End Sub
|
||||
Private Sub TSMI_inWork_Click(sender As Object, e As EventArgs) Handles TSMI_inWork.Click
|
||||
ClassFileResult.DocID = ClassWindreamDocGrid.RESULT_DOC_ID
|
||||
If ClassWindreamDocGrid.RESULT_INWORK = True Then ' Datei ist in Bearbeitung
|
||||
If IsNothing(ClassWindreamDocGrid.DT_RESULTFILES) Then
|
||||
MsgBox("Could not read File Parameters (3)!", MsgBoxStyle.Exclamation)
|
||||
Exit Sub
|
||||
End If
|
||||
ClassFileResult.DocID = ClassWindreamDocGrid.SELECTED_DOC_ID
|
||||
If ClassWindreamDocGrid.SELECTED_INWORK = True Then ' Datei ist in Bearbeitung
|
||||
Dim displ As String
|
||||
If IW_USER.ToUpper = Environment.UserName.ToUpper Then
|
||||
If ClassFileResult.Set_InWork(0, "") = True Then
|
||||
@ -6326,21 +6090,14 @@ Public Class frmConstructor_Main
|
||||
End If
|
||||
Else
|
||||
frmFileInWork.ShowDialog()
|
||||
ClassWindreamDocGrid.RESULT_INWORK = ClassFileResult.InWork
|
||||
ClassWindreamDocGrid.SELECTED_INWORK = ClassFileResult.InWork
|
||||
RUN_WDSEARCH_GRID("RECORD")
|
||||
End If
|
||||
End Sub
|
||||
|
||||
Private Sub GridViewDoc_Search_FocusedColumnChanged(sender As Object, e As FocusedColumnChangedEventArgs) Handles GridViewDoc_Search.FocusedColumnChanged
|
||||
'Get_Doc_Items()
|
||||
ClassWindreamDocGrid.GetDocItems(GridViewDoc_Search)
|
||||
End Sub
|
||||
|
||||
|
||||
Private Sub AnsichtZurücksetzenToolStripMenuItem_Click(sender As Object, e As EventArgs) Handles AnsichtZurücksetzenToolStripMenuItem.Click
|
||||
' TODO: Ansicht zurücksetzen
|
||||
Try
|
||||
Dim XMLPath = Get_DocGRid_Layout_Filename()
|
||||
Dim XMLPath = Get_DocGrid_Layout_Filename()
|
||||
If File.Exists(XMLPath) Then
|
||||
Me.Cursor = Cursors.WaitCursor
|
||||
File.Delete(XMLPath)
|
||||
@ -6365,9 +6122,11 @@ Public Class frmConstructor_Main
|
||||
End Sub
|
||||
Sub Set_Displayname()
|
||||
Try
|
||||
If ClassWindreamDocGrid.RESULT_DISPLAYNAME <> "" Then
|
||||
tstbDisplayname.Text = ClassWindreamDocGrid.RESULT_DISPLAYNAME
|
||||
tstbDisplayname.Enabled = True
|
||||
If ClassWindreamDocGrid.DT_RESULTFILES.Rows.Count = 1 Then
|
||||
If ClassWindreamDocGrid.DT_RESULTFILES.Rows(0).Item("DISPLAYNAME") <> "" Then
|
||||
tstbDisplayname.Text = ClassWindreamDocGrid.DT_RESULTFILES.Rows(0).Item("DISPLAYNAME")
|
||||
tstbDisplayname.Enabled = True
|
||||
End If
|
||||
Else
|
||||
tstbDisplayname.Enabled = False
|
||||
End If
|
||||
@ -6380,7 +6139,7 @@ Public Class frmConstructor_Main
|
||||
Private Sub tstbDisplayname_KeyUp(sender As Object, e As KeyEventArgs) Handles tstbDisplayname.KeyUp
|
||||
If e.KeyCode = Keys.Return Then
|
||||
Try
|
||||
ClassFileResult.DocID = ClassWindreamDocGrid.RESULT_DOC_ID
|
||||
ClassFileResult.DocID = ClassWindreamDocGrid.SELECTED_DOC_ID
|
||||
If tstbDisplayname.Text <> "" Then
|
||||
|
||||
If ClassFileResult.Set_Displayname(tstbDisplayname.Text) Then
|
||||
@ -6397,18 +6156,25 @@ Public Class frmConstructor_Main
|
||||
Private Sub TestToolStripMenuItem_Click(sender As Object, e As EventArgs) Handles tsmiRights.Click
|
||||
Dim msg = "Die Rechte wurden erfolgreich überprüft und aktualisiert!"
|
||||
CURRENT_RECORD_ID = RECORD_ID
|
||||
If ClassDOC_SEARCH.SET_WD_RIGHTS(ClassWindreamDocGrid.RESULT_DOC_ID, ClassWindreamDocGrid.RESULT_DOC_PATH, ENTITY_ID) = True Then
|
||||
If USER_LANGUAGE <> "de-DE" Then
|
||||
msg = "The rights were successfully renewed!"
|
||||
End If
|
||||
MsgBox(msg, MsgBoxStyle.Information)
|
||||
Else
|
||||
msg = "Unerwarteter Fehler im Rechtemodul. Bitte prüfen Sie die Logdatei!"
|
||||
If USER_LANGUAGE <> "de-DE" Then
|
||||
msg = "Unexpected error in rights-module. Please check the logfile!"
|
||||
End If
|
||||
MsgBox(msg, MsgBoxStyle.Exclamation)
|
||||
If IsNothing(ClassWindreamDocGrid.DT_RESULTFILES) Then
|
||||
MsgBox("Could not read File Parameters (6)!", MsgBoxStyle.Exclamation)
|
||||
Exit Sub
|
||||
End If
|
||||
For Each row As DataRow In ClassWindreamDocGrid.DT_RESULTFILES.Rows
|
||||
If ClassDOC_SEARCH.SET_WD_RIGHTS(row.Item("DOC_ID"), row.Item("DOC_PATH"), ENTITY_ID) = True Then
|
||||
If USER_LANGUAGE <> "de-DE" Then
|
||||
msg = "The rights were successfully renewed!"
|
||||
End If
|
||||
MsgBox(msg, MsgBoxStyle.Information)
|
||||
Else
|
||||
msg = "Unerwarteter Fehler im Rechtemodul. Bitte prüfen Sie die Logdatei!"
|
||||
If USER_LANGUAGE <> "de-DE" Then
|
||||
msg = "Unexpected error in rights-module. Please check the logfile!"
|
||||
End If
|
||||
MsgBox(msg, MsgBoxStyle.Exclamation)
|
||||
End If
|
||||
Next
|
||||
|
||||
End Sub
|
||||
|
||||
Public Sub ActivateAllTabs()
|
||||
@ -6446,34 +6212,41 @@ Public Class frmConstructor_Main
|
||||
MsgBox("Please select a record!", MsgBoxStyle.Exclamation)
|
||||
Exit Sub
|
||||
End If
|
||||
If ClassWindreamDocGrid.RESULT_DOC_PATH <> Nothing Then
|
||||
Dim msg = "Sind Sie sicher, dass Sie die Datei " & vbNewLine & ClassWindreamDocGrid.RESULT_DOC_PATH & vbNewLine & "endgültig löschen wollen?"
|
||||
If USER_LANGUAGE <> "de-DE" Then
|
||||
msg = "Are You sure You want to permanently delete this file?" & vbNewLine & ClassWindreamDocGrid.RESULT_DOC_PATH
|
||||
End If
|
||||
Dim result1 As MsgBoxResult
|
||||
result1 = MessageBox.Show(msg, "Confirmation:", MessageBoxButtons.YesNo, MessageBoxIcon.Question)
|
||||
If result1 = MsgBoxResult.Yes Then
|
||||
Try
|
||||
If Not IsNothing(ClassWindreamDocGrid.RESULT_DOC_ID) Then
|
||||
If ClassWindream.Delete_WDFile(ClassWindreamDocGrid.RESULT_DOC_PATH) = True Then
|
||||
If ClassFileResult.Delete_ResultFile(ClassWindreamDocGrid.RESULT_DOC_ID) = True Then
|
||||
ClassHelper.InsertEssential_Log(ClassWindreamDocGrid.RESULT_DOC_ID, "DOC-ID", "FILE DELETED BY USER")
|
||||
RUN_WDSEARCH_GRID("RECORD")
|
||||
Else
|
||||
msg = String.Format("Die Datei {0} konnte nicht gelöscht werden! Prüfen Sie die logfile!", ClassWindreamDocGrid.RESULT_DOC_PATH)
|
||||
If USER_LANGUAGE <> "de-DE" Then
|
||||
msg = String.Format("The file {0} could not be deleted! Check the logfile!", ClassWindreamDocGrid.RESULT_DOC_PATH)
|
||||
If IsNothing(ClassWindreamDocGrid.DT_RESULTFILES) Then
|
||||
MsgBox("Could not read File Parameters (DELETE FILES)!", MsgBoxStyle.Exclamation)
|
||||
Exit Sub
|
||||
End If
|
||||
For Each row As DataRow In ClassWindreamDocGrid.DT_RESULTFILES.Rows
|
||||
If row.Item("DOC_PATH") <> "" Then
|
||||
Dim msg = "Sind Sie sicher, dass Sie die Datei " & vbNewLine & row.Item("DOC_PATH") & vbNewLine & "endgültig löschen wollen?"
|
||||
If USER_LANGUAGE <> "de-DE" Then
|
||||
msg = "Are You sure You want to permanently delete this file?" & vbNewLine & row.Item("DOC_PATH")
|
||||
End If
|
||||
Dim result1 As MsgBoxResult
|
||||
result1 = MessageBox.Show(msg, "Confirmation:", MessageBoxButtons.YesNo, MessageBoxIcon.Question)
|
||||
If result1 = MsgBoxResult.Yes Then
|
||||
Try
|
||||
If Not IsNothing(row.Item("DOC_ID")) Then
|
||||
If ClassWindream.Delete_WDFile(row.Item("DOC_PATH")) = True Then
|
||||
If ClassFileResult.Delete_ResultFile(row.Item("DOC_ID")) = True Then
|
||||
ClassHelper.InsertEssential_Log(row.Item("DOC_ID"), "DOC-ID", "FILE DELETED BY USER")
|
||||
RUN_WDSEARCH_GRID("RECORD")
|
||||
Else
|
||||
msg = String.Format("Die Datei {0} konnte nicht gelöscht werden! Prüfen Sie die logfile!", row.Item("DOC_PATH"))
|
||||
If USER_LANGUAGE <> "de-DE" Then
|
||||
msg = String.Format("The file {0} could not be deleted! Check the logfile!", row.Item("DOC_PATH"))
|
||||
End If
|
||||
MsgBox(msg, MsgBoxStyle.Critical, "Attention:")
|
||||
End If
|
||||
MsgBox(msg, MsgBoxStyle.Critical, "Attention:")
|
||||
End If
|
||||
End If
|
||||
End If
|
||||
Catch ex As Exception
|
||||
MsgBox("Unexpected Error in Delete file:" & vbNewLine & ex.Message, MsgBoxStyle.Critical)
|
||||
End Try
|
||||
Catch ex As Exception
|
||||
MsgBox("Unexpected Error in Delete file:" & vbNewLine & ex.Message, MsgBoxStyle.Critical)
|
||||
End Try
|
||||
End If
|
||||
End If
|
||||
End If
|
||||
Next
|
||||
|
||||
|
||||
End Sub
|
||||
End Class
|
||||
@ -78,7 +78,7 @@ Public Class frmRecordView
|
||||
Dim item As ClassWindreamDocGrid.WindreamDocGridComboboxItem = ComboBox.SelectedItem
|
||||
Dim value As String = item.Value
|
||||
Dim configId As Integer = item.ConfigID
|
||||
Dim docId As Integer = ClassWindreamDocGrid.RESULT_DOC_ID
|
||||
Dim docId As Integer = ClassWindreamDocGrid.SELECTED_DOC_ID
|
||||
Dim user As String = Environment.UserName
|
||||
|
||||
Dim Sql As String = String.Format("EXEC PRPMO_DOC_VALUE {0}, {1}, '{2}', '{3}'", docId, configId, value, Environment.UserName)
|
||||
@ -336,84 +336,122 @@ Public Class frmRecordView
|
||||
End Sub
|
||||
|
||||
Private Sub GridViewDoc_Search_FocusedRowChanged(sender As Object, e As DevExpress.XtraGrid.Views.Base.FocusedRowChangedEventArgs)
|
||||
Try
|
||||
ClassWindreamDocGrid.RESULT_DOC_PATH = GridViewDoc_Search.GetFocusedRowCellValue(GridViewDoc_Search.Columns("FULLPATH"))
|
||||
Catch ex As Exception
|
||||
ClassWindreamDocGrid.RESULT_DOC_PATH = Nothing
|
||||
End Try
|
||||
ClassWindreamDocGrid.GetDocItems(GridViewDoc_Search)
|
||||
'Try
|
||||
' ClassWindreamDocGrid.RESULT_DOC_PATH = GridViewDoc_Search.GetFocusedRowCellValue(GridViewDoc_Search.Columns("FULLPATH"))
|
||||
'Catch ex As Exception
|
||||
' ClassWindreamDocGrid.RESULT_DOC_PATH = Nothing
|
||||
'End Try
|
||||
End Sub
|
||||
|
||||
Private Sub GridControlDocSearch_DoubleClick(sender As Object, e As EventArgs)
|
||||
Try
|
||||
ClassWindreamDocGrid.RESULT_DOC_PATH = GridViewDoc_Search.GetFocusedRowCellValue(GridViewDoc_Search.Columns("FULLPATH"))
|
||||
Catch ex As Exception
|
||||
ClassWindreamDocGrid.RESULT_DOC_PATH = Nothing
|
||||
End Try
|
||||
ClassHelper.File_open(ClassWindreamDocGrid.RESULT_DOC_PATH, 0)
|
||||
ClassWindreamDocGrid.GetDocItems(GridViewDoc_Search)
|
||||
'Try
|
||||
' ClassWindreamDocGrid.RESULT_DOC_PATH = GridViewDoc_Search.GetFocusedRowCellValue(GridViewDoc_Search.Columns("FULLPATH"))
|
||||
'Catch ex As Exception
|
||||
' ClassWindreamDocGrid.RESULT_DOC_PATH = Nothing
|
||||
'End Try
|
||||
If IsNothing(ClassWindreamDocGrid.DT_RESULTFILES) Then
|
||||
MsgBox("Could not read File Parameters(DoubleClick)!", MsgBoxStyle.Exclamation)
|
||||
Exit Sub
|
||||
End If
|
||||
For Each row As DataRow In ClassWindreamDocGrid.DT_RESULTFILES.Rows
|
||||
ClassHelper.File_open(row.Item("DOC_PATH"), 0)
|
||||
Next
|
||||
|
||||
End Sub
|
||||
|
||||
Private Sub DateiÖffnenToolStripMenuItem_Click(sender As Object, e As EventArgs) Handles DateiÖffnenToolStripMenuItem.Click
|
||||
ClassHelper.File_open(ClassWindreamDocGrid.RESULT_DOC_PATH, 0)
|
||||
If IsNothing(ClassWindreamDocGrid.DT_RESULTFILES) Then
|
||||
MsgBox("Could not read File Parameters(DoubleClick)!", MsgBoxStyle.Exclamation)
|
||||
Exit Sub
|
||||
End If
|
||||
For Each row As DataRow In ClassWindreamDocGrid.DT_RESULTFILES.Rows
|
||||
ClassHelper.File_open(row.Item("DOC_PATH"), 0)
|
||||
Next
|
||||
|
||||
End Sub
|
||||
|
||||
Private Sub CopyToolStripMenuItem_Click(sender As Object, e As EventArgs) Handles CopyToolStripMenuItem.Click
|
||||
If ClassWindreamDocGrid.RESULT_DOC_PATH <> Nothing Then
|
||||
Try
|
||||
Dim selectedfile(0) As String
|
||||
|
||||
selectedfile(0) = ClassWindreamDocGrid.RESULT_DOC_PATH
|
||||
|
||||
Dim dataobj As New DataObject
|
||||
|
||||
dataobj.SetData(DataFormats.FileDrop, True, selectedfile)
|
||||
|
||||
Clipboard.Clear()
|
||||
Clipboard.SetDataObject(dataobj, True)
|
||||
Catch ex As Exception
|
||||
MsgBox("Unexpected Error in Copy file:" & vbNewLine & ex.Message, MsgBoxStyle.Critical)
|
||||
End Try
|
||||
Cursor = Cursors.Default
|
||||
If IsNothing(ClassWindreamDocGrid.DT_RESULTFILES) Then
|
||||
MsgBox("Could not read File Parameters(DoubleClick)!", MsgBoxStyle.Exclamation)
|
||||
Exit Sub
|
||||
End If
|
||||
For Each row As DataRow In ClassWindreamDocGrid.DT_RESULTFILES.Rows
|
||||
If row.Item("DOC_PATH") <> "" Then
|
||||
Try
|
||||
Dim selectedfile(0) As String
|
||||
|
||||
selectedfile(0) = row.Item("DOC_PATH")
|
||||
|
||||
Dim dataobj As New DataObject
|
||||
|
||||
dataobj.SetData(DataFormats.FileDrop, True, selectedfile)
|
||||
|
||||
Clipboard.Clear()
|
||||
Clipboard.SetDataObject(dataobj, True)
|
||||
Exit For
|
||||
Catch ex As Exception
|
||||
MsgBox("Unexpected Error in Copy file:" & vbNewLine & ex.Message, MsgBoxStyle.Critical)
|
||||
End Try
|
||||
Cursor = Cursors.Default
|
||||
End If
|
||||
Next
|
||||
|
||||
End Sub
|
||||
|
||||
Private Sub DeleteToolStripMenuItem_Click(sender As Object, e As EventArgs) Handles DeleteToolStripMenuItem.Click
|
||||
If ClassWindreamDocGrid.RESULT_DOC_PATH <> Nothing Then
|
||||
Dim msg = "Sind Sie sicher, dass Sie diese Datei löschen wollen?"
|
||||
If USER_LANGUAGE <> "de-DE" Then
|
||||
msg = "Are You sure You want to delete this file?"
|
||||
End If
|
||||
Dim result As MsgBoxResult
|
||||
result = MessageBox.Show(msg, "Confirmation:", MessageBoxButtons.YesNo, MessageBoxIcon.Question)
|
||||
If result = MsgBoxResult.Yes Then
|
||||
Try
|
||||
Dim FileToDelete As String
|
||||
FileToDelete = ClassWindreamDocGrid.RESULT_DOC_PATH
|
||||
|
||||
If System.IO.File.Exists(FileToDelete) = True Then
|
||||
System.IO.File.Delete(FileToDelete)
|
||||
RUN_WDSEARCH_GRID()
|
||||
End If
|
||||
Catch ex As Exception
|
||||
MsgBox("Unexpected Error in Delete file:" & vbNewLine & ex.Message, MsgBoxStyle.Critical)
|
||||
End Try
|
||||
End If
|
||||
If IsNothing(ClassWindreamDocGrid.DT_RESULTFILES) Then
|
||||
MsgBox("Could not read File Parameters(DoubleClick)!", MsgBoxStyle.Exclamation)
|
||||
Exit Sub
|
||||
End If
|
||||
For Each row As DataRow In ClassWindreamDocGrid.DT_RESULTFILES.Rows
|
||||
If row.Item("DOC_PATH") <> "" Then
|
||||
Dim msg = "Sind Sie sicher, dass Sie die Datei löschen wollen?"
|
||||
If USER_LANGUAGE <> "de-DE" Then
|
||||
msg = "Are You sure You want to delete this file?"
|
||||
End If
|
||||
Dim result As MsgBoxResult
|
||||
result = MessageBox.Show(msg, "Confirmation:", MessageBoxButtons.YesNo, MessageBoxIcon.Question)
|
||||
If result = MsgBoxResult.Yes Then
|
||||
Try
|
||||
Dim FileToDelete As String
|
||||
FileToDelete = row.Item("DOC_PATH")
|
||||
|
||||
If System.IO.File.Exists(FileToDelete) = True Then
|
||||
System.IO.File.Delete(FileToDelete)
|
||||
RUN_WDSEARCH_GRID()
|
||||
End If
|
||||
Catch ex As Exception
|
||||
MsgBox("Unexpected Error in Delete file:" & vbNewLine & ex.Message, MsgBoxStyle.Critical)
|
||||
End Try
|
||||
End If
|
||||
End If
|
||||
Next
|
||||
|
||||
End Sub
|
||||
|
||||
Private Sub PropertiesToolStripMenuItem_Click(sender As Object, e As EventArgs) Handles PropertiesToolStripMenuItem.Click
|
||||
If ClassWindreamDocGrid.RESULT_DOC_PATH <> Nothing Then
|
||||
Cursor = Cursors.WaitCursor
|
||||
Dim sei As New SHELLEXECUTEINFO
|
||||
sei.cbSize = Marshal.SizeOf(sei)
|
||||
sei.lpVerb = "properties"
|
||||
sei.lpFile = ClassWindreamDocGrid.RESULT_DOC_PATH
|
||||
sei.nShow = SW_SHOW
|
||||
sei.fMask = SEE_MASK_INVOKEIDLIST
|
||||
If Not ShellExecuteEx(sei) Then
|
||||
Dim ex As New System.ComponentModel.Win32Exception(System.Runtime.InteropServices.Marshal.GetLastWin32Error())
|
||||
MsgBox("Unexpected Error in Open file propertys:" & vbNewLine & ex.Message, MsgBoxStyle.Critical)
|
||||
End If
|
||||
If IsNothing(ClassWindreamDocGrid.DT_RESULTFILES) Then
|
||||
MsgBox("Could not read File Parameters(Properties RecordView)!", MsgBoxStyle.Exclamation)
|
||||
Exit Sub
|
||||
End If
|
||||
For Each row As DataRow In ClassWindreamDocGrid.DT_RESULTFILES.Rows
|
||||
If row.Item("DOC_PATH") <> "" Then
|
||||
Cursor = Cursors.WaitCursor
|
||||
Dim sei As New SHELLEXECUTEINFO
|
||||
sei.cbSize = Marshal.SizeOf(sei)
|
||||
sei.lpVerb = "properties"
|
||||
sei.lpFile = row.Item("DOC_PATH")
|
||||
sei.nShow = SW_SHOW
|
||||
sei.fMask = SEE_MASK_INVOKEIDLIST
|
||||
If Not ShellExecuteEx(sei) Then
|
||||
Dim ex As New System.ComponentModel.Win32Exception(System.Runtime.InteropServices.Marshal.GetLastWin32Error())
|
||||
MsgBox("Unexpected Error in Open file propertys:" & vbNewLine & ex.Message, MsgBoxStyle.Critical)
|
||||
End If
|
||||
End If
|
||||
Next
|
||||
|
||||
Cursor = Cursors.Default
|
||||
End Sub
|
||||
|
||||
|
||||
@ -64,7 +64,7 @@ Public Class frmSAP_FuBa
|
||||
'Try
|
||||
' Me.Cursor = Cursors.WaitCursor
|
||||
' If LogErrorsOnly = False Then ClassLogger.Add("", False)
|
||||
' If LogErrorsOnly = False Then ClassLogger.Add(">> SAP Connect started:", False)
|
||||
' If LogErrorsOnly = False Then ClassLogger.Add(" >> SAP Connect started:", False)
|
||||
' ERPConnect.LIC.SetLic("W86DWC992C")
|
||||
' con.Host = HostTextBox.Text
|
||||
' con.SystemNumber = SystemNumberTextBox.Text
|
||||
@ -72,9 +72,9 @@ Public Class frmSAP_FuBa
|
||||
' con.Password = PasswordTextBox.Text
|
||||
' con.Client = ClientTextBox.Text
|
||||
' con.Language = LanguageTextBox.Text
|
||||
' If LogErrorsOnly = False Then ClassLogger.Add(">> HOST: " & HostTextBox.Text & " |SystemNumber: " & SystemNumberTextBox.Text & " |UserName: " & UserNameTextBox.Text & " |Password: " & PasswordTextBox.Text & " |Client: " & ClientTextBox.Text & " |Language: " & LanguageTextBox.Text, False)
|
||||
' If LogErrorsOnly = False Then ClassLogger.Add(" >> HOST: " & HostTextBox.Text & " |SystemNumber: " & SystemNumberTextBox.Text & " |UserName: " & UserNameTextBox.Text & " |Password: " & PasswordTextBox.Text & " |Client: " & ClientTextBox.Text & " |Language: " & LanguageTextBox.Text, False)
|
||||
' con.Open(False)
|
||||
' If LogErrorsOnly = False Then ClassLogger.Add(">> SAP-Connection erfolgreich aufgebaut!", False)
|
||||
' If LogErrorsOnly = False Then ClassLogger.Add(" >> SAP-Connection erfolgreich aufgebaut!", False)
|
||||
' If LogErrorsOnly = False Then ClassLogger.Add("", False)
|
||||
' lblConnectionopen.Visible = True
|
||||
' Me.Cursor = Cursors.Default
|
||||
@ -162,12 +162,12 @@ Public Class frmSAP_FuBa
|
||||
Next
|
||||
createtablesql += ")"
|
||||
''Die Tabelle anlegen
|
||||
If LogErrorsOnly = False Then ClassLogger.Add(">> Create Table: " & createtablesql, False)
|
||||
If LogErrorsOnly = False Then ClassLogger.Add(" >> Create Table: " & createtablesql, False)
|
||||
If ClassDatabase.Execute_non_Query_withConn(createtablesql, 1) = False Then
|
||||
MsgBox("Error in creating TempTable: Check log", MsgBoxStyle.Critical)
|
||||
Exit Sub
|
||||
End If
|
||||
If LogErrorsOnly = False Then ClassLogger.Add(">> table has been created", False)
|
||||
If LogErrorsOnly = False Then ClassLogger.Add(" >> table has been created", False)
|
||||
|
||||
Dim alter = String.Format("ALTER TABLE {0} ADD GUID INTEGER NOT NULL IDENTITY(1,1)", tablename)
|
||||
ClassDatabase.Execute_non_Query_withConn(alter, 1)
|
||||
@ -212,7 +212,7 @@ Public Class frmSAP_FuBa
|
||||
End Using
|
||||
SQLconnect.Close()
|
||||
Me.Cursor = Cursors.Default
|
||||
If LogErrorsOnly = False Then ClassLogger.Add(">> Create table from SAP FuBa was successfull " & SAPResulttable.Rows.Count & " Rows were inserted to table '" & tablename & "'!", False)
|
||||
If LogErrorsOnly = False Then ClassLogger.Add(" >> Create table from SAP FuBa was successfull " & SAPResulttable.Rows.Count & " Rows were inserted to table '" & tablename & "'!", False)
|
||||
MsgBox("Create table was successfull! " & vbNewLine & SAPResulttable.Rows.Count & " Rows were inserted to table '" & tablename & "'!", MsgBoxStyle.Information)
|
||||
Catch ex As Exception
|
||||
MsgBox("Unexpected Error in SQL bulkCopy: " & ex.Message, MsgBoxStyle.Critical)
|
||||
|
||||
@ -119,9 +119,19 @@ Public Class frmUserKonfig_AddUsers
|
||||
For Each row As DataRow In DD_ECMAdmin.TBAD_Users.Rows
|
||||
If row.Item(0) = CBool(True) Then
|
||||
Dim USERNAME As String = row.Item(1)
|
||||
|
||||
Dim PRENAME As String = row.Item(2)
|
||||
Dim PRENAME As String
|
||||
Try
|
||||
PRENAME = row.Item(2)
|
||||
Catch ex As Exception
|
||||
PRENAME = ""
|
||||
End Try
|
||||
Dim NAME As String = row.Item(3)
|
||||
Try
|
||||
NAME = row.Item(3)
|
||||
Catch ex As Exception
|
||||
NAME = ""
|
||||
End Try
|
||||
|
||||
Dim email As String
|
||||
Try
|
||||
email = row.Item(4)
|
||||
@ -130,7 +140,7 @@ Public Class frmUserKonfig_AddUsers
|
||||
End Try
|
||||
Dim SQL
|
||||
If Not UserExists(USERNAME) Then
|
||||
SQL = "INSERT INTO TBDD_USER(PRENAME, NAME, USERNAME, EMAIL, MODULE_RECORD_ORG,LANGUAGE) VALUES('" & PRENAME & "', '" & NAME & "', '" & USERNAME & "','" & email & "'," & 1 & ",'" & USER_LANGUAGE & "')"
|
||||
SQL = "INSERT INTO TBDD_USER(PRENAME, NAME, USERNAME, EMAIL, MODULE_RECORD_ORG,LANGUAGE, ADDED_WHO) VALUES('" & PRENAME & "', '" & NAME & "', '" & USERNAME & "','" & email & "'," & 1 & ",'" & USER_LANGUAGE & "','" & Environment.UserName & "')"
|
||||
If ClassDatabase.Execute_non_Query(SQL) = True Then
|
||||
Dim ID = ClassDatabase.Execute_Scalar("SELECT MAX(GUID) FROM TBDD_USER")
|
||||
Dim msg = String.Format(">> USER {0}, {1} - {2} ADDED TO CONFIGURATION", NAME, PRENAME, USERNAME)
|
||||
@ -139,7 +149,7 @@ Public Class frmUserKonfig_AddUsers
|
||||
usersAdded = usersAdded + 1
|
||||
End If
|
||||
Else
|
||||
SQL = "UPDATE TBDD_USER SET MODULE_RECORD_ORG = 1 WHERE UPPER(USERNAME) = UPPER('" & USERNAME & "')"
|
||||
SQL = String.Format("UPDATE TBDD_USER SET MODULE_RECORD_ORG = 1,PRENAME = '{0}', NAME = '{1}', EMAIL = '{2}' WHERE UPPER(USERNAME) = UPPER('{3}')", PRENAME, NAME, email, USERNAME)
|
||||
If ClassDatabase.Execute_non_Query(SQL) = True Then
|
||||
usersAdded = usersAdded + 1
|
||||
End If
|
||||
@ -156,11 +166,10 @@ Public Class frmUserKonfig_AddUsers
|
||||
' Dim SQL
|
||||
|
||||
'Next
|
||||
|
||||
If usersAdded = 1 Then
|
||||
MsgBox(usersAdded & " neuer Benutzer hinzugefügt", MsgBoxStyle.Information)
|
||||
If USER_LANGUAGE = "de-DE" Then
|
||||
MsgBox(usersAdded & " Benutzer hinzugefügt/upgedatet!", MsgBoxStyle.Information)
|
||||
Else
|
||||
MsgBox(usersAdded & " neue Benutzer hinzugefügt", MsgBoxStyle.Information)
|
||||
MsgBox(usersAdded & " User added/updatet!", MsgBoxStyle.Information)
|
||||
End If
|
||||
End Sub
|
||||
|
||||
|
||||
@ -10,13 +10,6 @@ Public Class frmWD_IndexFile
|
||||
Dim MULTIFILES As Integer = 0
|
||||
Dim formloaded As Boolean = False
|
||||
|
||||
Private Sub FillToolStripButton_Click(sender As Object, e As EventArgs)
|
||||
Try
|
||||
Me.VWPMO_DOKUMENTTYPESTableAdapter.Fill(Me.DD_DMSDataSet.VWPMO_DOKUMENTTYPES, CURRENT_FORMVIEW_ID)
|
||||
Catch ex As System.Exception
|
||||
System.Windows.Forms.MessageBox.Show(ex.Message)
|
||||
End Try
|
||||
End Sub
|
||||
Function WORK_FILE(ImportFilePath As String, VerzeichnisZiel As String, vDokart_ID As Integer, vDokart As String, multiindex As Boolean)
|
||||
Try
|
||||
CURRENT_DOKARTSTRING = vDokart
|
||||
@ -124,6 +117,9 @@ Public Class frmWD_IndexFile
|
||||
MsgBox("Unexpected Error in indexing file Entity - See log", MsgBoxStyle.Critical)
|
||||
Return False
|
||||
End If
|
||||
If CURRENT_REDUNDANT_FORM_ID <> 0 Then
|
||||
indexierung_erfolgreich = ClassWindream.IndexFile(CURRENT_FILEIN_WD, indexname, CURRENT_REDUNDANT_FORM_ID)
|
||||
End If
|
||||
'den Parent-Key auslesen
|
||||
indexname = dt.Rows(0).Item("IDXNAME_PARENTID").ToString
|
||||
idxvalue = CURRENT_PARENT_ENTITY_ID
|
||||
@ -189,6 +185,9 @@ Public Class frmWD_IndexFile
|
||||
"ADDI will try to give You at least reading rights!", MsgBoxStyle.Exclamation)
|
||||
DD_Rights.ClassRights.SetRightExplicit(CURRENT_DOC_ID, CURRENT_FILEIN_WD, Environment.UserName, 1)
|
||||
End If
|
||||
If CURRENT_REDUNDANT_FORM_ID <> 0 Then
|
||||
ClassDOC_SEARCH.SET_WD_RIGHTS(CURRENT_DOC_ID, CURRENT_FILEIN_WD, CURRENT_REDUNDANT_FORM_ID)
|
||||
End If
|
||||
ClassFileResult.DocID = CURRENT_DOC_ID
|
||||
ClassFileResult.SET_DOCID_INDICES()
|
||||
If ClassDOC_SEARCH.SET_RECORD_DOCID_LINK(CURRENT_DOC_ID, CURRENT_RECORD_ID) = True Then
|
||||
@ -617,7 +616,12 @@ Public Class frmWD_IndexFile
|
||||
End Sub
|
||||
Sub Check_Subfolder()
|
||||
Try
|
||||
Dim sel = "select MANUAL_SUBFOLDER FROM TBPMO_WD_FORMVIEW_DOKTYPES WHERE FORMVIEW_ID = (SELECT GUID FROM TBPMO_FORM_VIEW WHERE FORM_ID = " & CURRENT_FORM_ID & " and SCREEN_ID = " & CURRENT_SCREEN_ID & ")"
|
||||
Dim sel
|
||||
If CURRENT_REDUNDANT_FORM_ID <> 0 Then
|
||||
sel = "select MANUAL_SUBFOLDER FROM TBPMO_WD_FORMVIEW_DOKTYPES WHERE FORMVIEW_ID = (SELECT GUID FROM TBPMO_FORM_VIEW WHERE FORM_ID = " & CURRENT_REDUNDANT_FORM_ID & " and SCREEN_ID = " & CURRENT_SCREEN_ID & ")"
|
||||
Else
|
||||
sel = "select MANUAL_SUBFOLDER FROM TBPMO_WD_FORMVIEW_DOKTYPES WHERE FORMVIEW_ID = (SELECT GUID FROM TBPMO_FORM_VIEW WHERE FORM_ID = " & CURRENT_FORM_ID & " and SCREEN_ID = " & CURRENT_SCREEN_ID & ")"
|
||||
End If
|
||||
Dim chk = ClassDatabase.Execute_Scalar(sel)
|
||||
If Not IsNothing(chk) Then
|
||||
If CBool(chk) = True Then
|
||||
@ -1017,7 +1021,12 @@ Public Class frmWD_IndexFile
|
||||
lvwIndices.Items(Count).SubItems.Add(CURRENT_FORM_ID)
|
||||
Count = Count + 1
|
||||
lvwIndices.Items.Add(dt.Rows(0).Item("IDXNAME_PARENTID").ToString)
|
||||
Dim ParentID = ClassDatabase.Execute_Scalar("SELECT TOP 1 PARENT_ID FROM TBPMO_FORM WHERE GUID = " & CURRENT_FORM_ID, True)
|
||||
If CURRENT_REDUNDANT_FORM_ID <> 0 Then
|
||||
sql = "SELECT TOP 1 PARENT_ID FROM TBPMO_FORM WHERE GUID = " & CURRENT_REDUNDANT_FORM_ID
|
||||
Else
|
||||
sql = "SELECT TOP 1 PARENT_ID FROM TBPMO_FORM WHERE GUID = " & CURRENT_FORM_ID
|
||||
End If
|
||||
Dim ParentID = ClassDatabase.Execute_Scalar(sql, True)
|
||||
Try
|
||||
If IsNumeric(ParentID) And ParentID > 0 Then
|
||||
lvwIndices.Items(Count).SubItems.Add(ParentID)
|
||||
@ -1034,7 +1043,7 @@ Public Class frmWD_IndexFile
|
||||
'lvwIndices.Items(Count).SubItems.Add(CURRENT_DOKARTSTRING)
|
||||
End If
|
||||
|
||||
End If
|
||||
End If
|
||||
End If
|
||||
Catch ex As Exception
|
||||
MsgBox("Error in Refresh Indices for Indexing:" & vbNewLine & ex.Message, MsgBoxStyle.Critical)
|
||||
@ -1048,7 +1057,7 @@ Public Class frmWD_IndexFile
|
||||
Try
|
||||
Me.VWDDINDEX_AUTOMTableAdapter.Connection.ConnectionString = MyConnectionString
|
||||
chkMultiIndexer.Checked = False
|
||||
ClassLogger.Add(">> frmWD_Index_Dokart_Load", False)
|
||||
If LogErrorsOnly = False Then ClassLogger.Add(" >> frmWD_Index_Dokart_Load", False)
|
||||
chkdelete_origin.Checked = False
|
||||
chkdelete_origin.Visible = False
|
||||
CURRENT_FILENAME = ClassDatabase.Execute_Scalar("SELECT FILENAME2WORK FROM TBPMO_FILES_USER WHERE GUID = " & CURRENT_FILEID)
|
||||
@ -1080,9 +1089,29 @@ Public Class frmWD_IndexFile
|
||||
TBPMO_FILES_USERTableAdapter.Connection.ConnectionString = MyConnectionString
|
||||
VWPMO_DOKUMENTTYPESTableAdapter.Connection.ConnectionString = MyConnectionString
|
||||
Me.VWPMO_DOKUMENTTYPESTableAdapter.Fill(Me.DD_DMSDataSet.VWPMO_DOKUMENTTYPES, CURRENT_FORMVIEW_ID)
|
||||
If cmbDokumentart.Items.Count = 0 Then
|
||||
MsgBox("No dcumenttypes for this entity configured! Indexing is not possible!" & vbNewLine & "Please check the configuration!", MsgBoxStyle.Exclamation)
|
||||
Exit Sub
|
||||
|
||||
CURRENT_REDUNDANT_FORM_ID = 0
|
||||
CURRENT_REDUNDANT_FORMVIEW_ID = 0
|
||||
If DD_DMSDataSet.VWPMO_DOKUMENTTYPES.Rows.Count = 0 Then
|
||||
If CURRENT_ENTITY_REDUNDANT_ID <> 0 Then
|
||||
|
||||
Dim FVID = ClassDatabase.Execute_Scalar(String.Format("SELECT GUID FROM TBPMO_FORM_VIEW WHERE FORM_ID = {0} and SCREEN_ID = 1", CURRENT_ENTITY_REDUNDANT_ID))
|
||||
Me.VWPMO_DOKUMENTTYPESTableAdapter.Fill(Me.DD_DMSDataSet.VWPMO_DOKUMENTTYPES, FVID)
|
||||
If DD_DMSDataSet.VWPMO_DOKUMENTTYPES.Rows.Count = 0 Then
|
||||
MsgBox("No documenttypes for the redundant entity configured either! Indexing is not possible!" & vbNewLine & "Please check the configuration!", MsgBoxStyle.Exclamation)
|
||||
Exit Sub
|
||||
Else
|
||||
If LogErrorsOnly = False Then ClassLogger.Add(" >> Redundant EntityID: " & CURRENT_ENTITY_REDUNDANT_ID)
|
||||
CURRENT_REDUNDANT_FORM_ID = CURRENT_ENTITY_REDUNDANT_ID
|
||||
CURRENT_REDUNDANT_FORMVIEW_ID = FVID
|
||||
CURRENT_FORM_ID = CURRENT_ENTITY_REDUNDANT_ID
|
||||
CURRENT_FORMVIEW_ID = FVID
|
||||
End If
|
||||
Else
|
||||
MsgBox("No dcumenttypes for this entity configured! Indexing is not possible!" & vbNewLine & "Please check the configuration!", MsgBoxStyle.Exclamation)
|
||||
Exit Sub
|
||||
End If
|
||||
|
||||
End If
|
||||
Catch ex As Exception
|
||||
MsgBox("Error in frmWD_Index_Dokart_Load:" & vbNewLine & ex.Message, MsgBoxStyle.Critical)
|
||||
|
||||
@ -33,14 +33,14 @@ Partial Class frmWD_Link_to_Record
|
||||
Me.btnLink = New System.Windows.Forms.Button()
|
||||
Me.Label3 = New System.Windows.Forms.Label()
|
||||
Me.Label4 = New System.Windows.Forms.Label()
|
||||
Me.txtFilename = New System.Windows.Forms.TextBox()
|
||||
Me.txtFileInfo = New System.Windows.Forms.TextBox()
|
||||
Me.txtRecordId = New System.Windows.Forms.TextBox()
|
||||
Me.Label5 = New System.Windows.Forms.Label()
|
||||
CType(Me.SplitContainerControl1, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
Me.SplitContainerControl1.SuspendLayout()
|
||||
CType(Me.dgEntityRecords, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
CType(Me.grvwGrid, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
Me.SuspendLayout()
|
||||
CType(Me.SplitContainerControl1,System.ComponentModel.ISupportInitialize).BeginInit
|
||||
Me.SplitContainerControl1.SuspendLayout
|
||||
CType(Me.dgEntityRecords,System.ComponentModel.ISupportInitialize).BeginInit
|
||||
CType(Me.grvwGrid,System.ComponentModel.ISupportInitialize).BeginInit
|
||||
Me.SuspendLayout
|
||||
'
|
||||
'SplitContainerControl1
|
||||
'
|
||||
@ -66,21 +66,26 @@ Partial Class frmWD_Link_to_Record
|
||||
'
|
||||
'grvwGrid
|
||||
'
|
||||
Me.grvwGrid.Appearance.EvenRow.BackColor = CType(resources.GetObject("grvwGrid.Appearance.EvenRow.BackColor"), System.Drawing.Color)
|
||||
Me.grvwGrid.Appearance.EvenRow.Options.UseBackColor = True
|
||||
Me.grvwGrid.Appearance.FilterPanel.BackColor = CType(resources.GetObject("grvwGrid.Appearance.FilterPanel.BackColor"), System.Drawing.Color)
|
||||
Me.grvwGrid.Appearance.FilterPanel.Options.UseBackColor = True
|
||||
Me.grvwGrid.Appearance.EvenRow.BackColor = CType(resources.GetObject("grvwGrid.Appearance.EvenRow.BackColor"),System.Drawing.Color)
|
||||
Me.grvwGrid.Appearance.EvenRow.Options.UseBackColor = true
|
||||
Me.grvwGrid.Appearance.FilterPanel.BackColor = CType(resources.GetObject("grvwGrid.Appearance.FilterPanel.BackColor"),System.Drawing.Color)
|
||||
Me.grvwGrid.Appearance.FilterPanel.Options.UseBackColor = true
|
||||
Me.grvwGrid.Appearance.HideSelectionRow.BackColor = CType(resources.GetObject("grvwGrid.Appearance.HideSelectionRow.BackColor"),System.Drawing.Color)
|
||||
Me.grvwGrid.Appearance.HideSelectionRow.Options.UseBackColor = true
|
||||
Me.grvwGrid.Appearance.SelectedRow.BackColor = CType(resources.GetObject("grvwGrid.Appearance.SelectedRow.BackColor"),System.Drawing.Color)
|
||||
Me.grvwGrid.Appearance.SelectedRow.Options.UseBackColor = true
|
||||
Me.grvwGrid.Appearance.SelectedRow.Options.UseForeColor = true
|
||||
Me.grvwGrid.GridControl = Me.dgEntityRecords
|
||||
Me.grvwGrid.Name = "grvwGrid"
|
||||
Me.grvwGrid.OptionsBehavior.Editable = False
|
||||
Me.grvwGrid.OptionsBehavior.ReadOnly = True
|
||||
Me.grvwGrid.OptionsView.ColumnAutoWidth = False
|
||||
Me.grvwGrid.OptionsView.EnableAppearanceEvenRow = True
|
||||
Me.grvwGrid.OptionsView.ShowAutoFilterRow = True
|
||||
Me.grvwGrid.OptionsBehavior.Editable = false
|
||||
Me.grvwGrid.OptionsBehavior.ReadOnly = true
|
||||
Me.grvwGrid.OptionsView.ColumnAutoWidth = false
|
||||
Me.grvwGrid.OptionsView.EnableAppearanceEvenRow = true
|
||||
Me.grvwGrid.OptionsView.ShowAutoFilterRow = true
|
||||
'
|
||||
'cmbConstructorForms
|
||||
'
|
||||
Me.cmbConstructorForms.FormattingEnabled = True
|
||||
Me.cmbConstructorForms.FormattingEnabled = true
|
||||
resources.ApplyResources(Me.cmbConstructorForms, "cmbConstructorForms")
|
||||
Me.cmbConstructorForms.Name = "cmbConstructorForms"
|
||||
'
|
||||
@ -98,7 +103,7 @@ Partial Class frmWD_Link_to_Record
|
||||
'
|
||||
resources.ApplyResources(Me.btnLink, "btnLink")
|
||||
Me.btnLink.Name = "btnLink"
|
||||
Me.btnLink.UseVisualStyleBackColor = True
|
||||
Me.btnLink.UseVisualStyleBackColor = true
|
||||
'
|
||||
'Label3
|
||||
'
|
||||
@ -110,17 +115,17 @@ Partial Class frmWD_Link_to_Record
|
||||
resources.ApplyResources(Me.Label4, "Label4")
|
||||
Me.Label4.Name = "Label4"
|
||||
'
|
||||
'txtFilename
|
||||
'txtFileInfo
|
||||
'
|
||||
resources.ApplyResources(Me.txtFilename, "txtFilename")
|
||||
Me.txtFilename.Name = "txtFilename"
|
||||
Me.txtFilename.ReadOnly = True
|
||||
resources.ApplyResources(Me.txtFileInfo, "txtFileInfo")
|
||||
Me.txtFileInfo.Name = "txtFileInfo"
|
||||
Me.txtFileInfo.ReadOnly = true
|
||||
'
|
||||
'txtRecordId
|
||||
'
|
||||
resources.ApplyResources(Me.txtRecordId, "txtRecordId")
|
||||
Me.txtRecordId.Name = "txtRecordId"
|
||||
Me.txtRecordId.ReadOnly = True
|
||||
Me.txtRecordId.ReadOnly = true
|
||||
'
|
||||
'Label5
|
||||
'
|
||||
@ -133,7 +138,7 @@ Partial Class frmWD_Link_to_Record
|
||||
Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
|
||||
Me.Controls.Add(Me.SplitContainerControl1)
|
||||
Me.Controls.Add(Me.txtRecordId)
|
||||
Me.Controls.Add(Me.txtFilename)
|
||||
Me.Controls.Add(Me.txtFileInfo)
|
||||
Me.Controls.Add(Me.Label4)
|
||||
Me.Controls.Add(Me.Label3)
|
||||
Me.Controls.Add(Me.btnLink)
|
||||
@ -143,14 +148,14 @@ Partial Class frmWD_Link_to_Record
|
||||
Me.Controls.Add(Me.cmbConstructorForms)
|
||||
Me.FormBorderStyle = System.Windows.Forms.FormBorderStyle.FixedSingle
|
||||
Me.Name = "frmWD_Link_to_Record"
|
||||
CType(Me.SplitContainerControl1, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
Me.SplitContainerControl1.ResumeLayout(False)
|
||||
CType(Me.dgEntityRecords, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
CType(Me.grvwGrid, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
Me.ResumeLayout(False)
|
||||
Me.PerformLayout()
|
||||
CType(Me.SplitContainerControl1,System.ComponentModel.ISupportInitialize).EndInit
|
||||
Me.SplitContainerControl1.ResumeLayout(false)
|
||||
CType(Me.dgEntityRecords,System.ComponentModel.ISupportInitialize).EndInit
|
||||
CType(Me.grvwGrid,System.ComponentModel.ISupportInitialize).EndInit
|
||||
Me.ResumeLayout(false)
|
||||
Me.PerformLayout
|
||||
|
||||
End Sub
|
||||
End Sub
|
||||
Friend WithEvents cmbConstructorForms As System.Windows.Forms.ComboBox
|
||||
Friend WithEvents Label1 As System.Windows.Forms.Label
|
||||
Friend WithEvents trvwMain As System.Windows.Forms.TreeView
|
||||
@ -160,7 +165,7 @@ Partial Class frmWD_Link_to_Record
|
||||
Friend WithEvents btnLink As System.Windows.Forms.Button
|
||||
Friend WithEvents Label3 As System.Windows.Forms.Label
|
||||
Friend WithEvents Label4 As System.Windows.Forms.Label
|
||||
Friend WithEvents txtFilename As System.Windows.Forms.TextBox
|
||||
Friend WithEvents txtFileInfo As System.Windows.Forms.TextBox
|
||||
Friend WithEvents txtRecordId As System.Windows.Forms.TextBox
|
||||
Friend WithEvents Label5 As System.Windows.Forms.Label
|
||||
Friend WithEvents SplitContainerControl1 As DevExpress.XtraEditors.SplitContainerControl
|
||||
|
||||
@ -165,6 +165,12 @@
|
||||
<data name="grvwGrid.Appearance.FilterPanel.BackColor" type="System.Drawing.Color, System.Drawing">
|
||||
<value>255, 128, 0</value>
|
||||
</data>
|
||||
<data name="grvwGrid.Appearance.HideSelectionRow.BackColor" type="System.Drawing.Color, System.Drawing">
|
||||
<value>Yellow</value>
|
||||
</data>
|
||||
<data name="grvwGrid.Appearance.SelectedRow.BackColor" type="System.Drawing.Color, System.Drawing">
|
||||
<value>Yellow</value>
|
||||
</data>
|
||||
<data name="dgEntityRecords.Size" type="System.Drawing.Size, System.Drawing">
|
||||
<value>907, 503</value>
|
||||
</data>
|
||||
@ -325,13 +331,13 @@
|
||||
<value>347, 17</value>
|
||||
</data>
|
||||
<data name="Label3.Size" type="System.Drawing.Size, System.Drawing">
|
||||
<value>37, 13</value>
|
||||
<value>110, 13</value>
|
||||
</data>
|
||||
<data name="Label3.TabIndex" type="System.Int32, mscorlib">
|
||||
<value>6</value>
|
||||
</data>
|
||||
<data name="Label3.Text" xml:space="preserve">
|
||||
<value>Datei:</value>
|
||||
<value>Dateieigenschaften:</value>
|
||||
</data>
|
||||
<data name=">>Label3.Name" xml:space="preserve">
|
||||
<value>Label3</value>
|
||||
@ -375,25 +381,25 @@
|
||||
<data name=">>Label4.ZOrder" xml:space="preserve">
|
||||
<value>3</value>
|
||||
</data>
|
||||
<data name="txtFilename.Location" type="System.Drawing.Point, System.Drawing">
|
||||
<value>390, 14</value>
|
||||
<data name="txtFileInfo.Location" type="System.Drawing.Point, System.Drawing">
|
||||
<value>463, 14</value>
|
||||
</data>
|
||||
<data name="txtFilename.Size" type="System.Drawing.Size, System.Drawing">
|
||||
<value>425, 22</value>
|
||||
<data name="txtFileInfo.Size" type="System.Drawing.Size, System.Drawing">
|
||||
<value>352, 22</value>
|
||||
</data>
|
||||
<data name="txtFilename.TabIndex" type="System.Int32, mscorlib">
|
||||
<data name="txtFileInfo.TabIndex" type="System.Int32, mscorlib">
|
||||
<value>8</value>
|
||||
</data>
|
||||
<data name=">>txtFilename.Name" xml:space="preserve">
|
||||
<value>txtFilename</value>
|
||||
<data name=">>txtFileInfo.Name" xml:space="preserve">
|
||||
<value>txtFileInfo</value>
|
||||
</data>
|
||||
<data name=">>txtFilename.Type" xml:space="preserve">
|
||||
<data name=">>txtFileInfo.Type" xml:space="preserve">
|
||||
<value>System.Windows.Forms.TextBox, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
|
||||
</data>
|
||||
<data name=">>txtFilename.Parent" xml:space="preserve">
|
||||
<data name=">>txtFileInfo.Parent" xml:space="preserve">
|
||||
<value>$this</value>
|
||||
</data>
|
||||
<data name=">>txtFilename.ZOrder" xml:space="preserve">
|
||||
<data name=">>txtFileInfo.ZOrder" xml:space="preserve">
|
||||
<value>2</value>
|
||||
</data>
|
||||
<data name="txtRecordId.Location" type="System.Drawing.Point, System.Drawing">
|
||||
|
||||
@ -13,7 +13,7 @@ Public Class frmWD_Link_to_Record
|
||||
Private ENTITY_LOADED As Boolean = False
|
||||
Private ENTITY_ID As Integer
|
||||
Private RECORD_ID As Integer
|
||||
Private _objecttype As String
|
||||
' Private _objecttype As String
|
||||
Private Class ClassConstructor
|
||||
Public title As String
|
||||
Public id As Integer
|
||||
@ -25,10 +25,15 @@ Public Class frmWD_Link_to_Record
|
||||
|
||||
Private CONSTRUCTOR_DETAIL_ID, CONSTRUCTOR_ID, FORM_ID As Integer
|
||||
|
||||
Public Sub New(fileName As String, Objecttype As String)
|
||||
Public Sub New() 'fileName As String, Objecttype As String)
|
||||
InitializeComponent()
|
||||
txtFilename.Text = fileName
|
||||
_objecttype = Objecttype
|
||||
If ClassWindreamDocGrid.DT_RESULTFILES.Rows.Count = 1 Then
|
||||
txtFileInfo.Text = ClassWindreamDocGrid.DT_RESULTFILES.Rows(0).Item("DOC_PATH")
|
||||
Else
|
||||
txtFileInfo.Text = String.Format("{0} files selected for Record2Link", ClassWindreamDocGrid.DT_RESULTFILES.Rows.Count)
|
||||
End If
|
||||
'txtFilename.Text = fileName
|
||||
'_objecttype = Objecttype
|
||||
End Sub
|
||||
|
||||
Private Function GetConstructorForms() As DataTable
|
||||
@ -73,326 +78,17 @@ Public Class frmWD_Link_to_Record
|
||||
End Sub
|
||||
|
||||
Sub Load_TreeViewEbene(constructorId As Integer)
|
||||
Cursor = Cursors.WaitCursor
|
||||
trvwMain.Nodes.Clear()
|
||||
If NODE_NAVIGATION = True Then
|
||||
' Rootnode erstellen und taggen
|
||||
If DT_TREEVIEW_PER_CONTROLS.Rows.Count > 1 Then
|
||||
' Presuming the DataTable has a column named ENTITY_ID and TYPE_NODE.
|
||||
Dim expression As String
|
||||
expression = "TYPE_NODE = 0"
|
||||
Dim foundRowsLevel0() As DataRow
|
||||
' Use the Select method to find all rows matching the filter.
|
||||
foundRowsLevel0 = DT_TREEVIEW_PER_CONTROLS.Select(expression)
|
||||
Dim i As Integer
|
||||
Dim NODE_CONFIG_ID
|
||||
' For each row create a Node
|
||||
For i = 0 To foundRowsLevel0.GetUpperBound(0)
|
||||
Dim ID = foundRowsLevel0(i)("GUID")
|
||||
Dim LevelEntity = foundRowsLevel0(i)("ENTITY_ID")
|
||||
Dim controlID = foundRowsLevel0(i)("CONTROL_ID")
|
||||
Dim nodetext = foundRowsLevel0(i)("NODE_CAPTION")
|
||||
Dim Type_node = foundRowsLevel0(i)("TYPE_NODE")
|
||||
Dim RECORD_ID = foundRowsLevel0(i)("RECORD_ID")
|
||||
NODE_CONFIG_ID = foundRowsLevel0(i)("NODE_CONFIG_ID")
|
||||
Dim LEVEL0_NODE As TreeNode
|
||||
LEVEL0_NODE = New TreeNode(nodetext)
|
||||
If Not IsDBNull(RECORD_ID) Then
|
||||
LEVEL0_NODE.Tag = LevelEntity & " - CONTROL-ID" & controlID.ToString & "#" & ID & "#RECORD-ID" & RECORD_ID.ToString
|
||||
Else
|
||||
LEVEL0_NODE.Tag = LevelEntity & " - CONTROL-ID" & controlID.ToString & "#" & ID
|
||||
End If
|
||||
|
||||
Dim index As Integer = 0
|
||||
For Each img As String In TREEVIEW_IMAGELIST.Images.Keys
|
||||
If img = NODE_CONFIG_ID & "#" & LevelEntity Then
|
||||
Exit For
|
||||
End If
|
||||
index += 1
|
||||
Next
|
||||
LEVEL0_NODE.ImageIndex = index
|
||||
LEVEL0_NODE.SelectedImageIndex = index
|
||||
trvwMain.Nodes.Add(LEVEL0_NODE)
|
||||
'### LEVEL 1 laden #######
|
||||
Dim expressionLevel1 As String
|
||||
expressionLevel1 = "PARENT_GUID = " & ID 'TYPE_NODE = 1 AND Einschränkung auf Type 2 und Parent_Guid
|
||||
Dim foundRowsLevel1() As DataRow
|
||||
foundRowsLevel1 = DT_TREEVIEW_PER_CONTROLS.Select(expressionLevel1)
|
||||
Dim j As Integer
|
||||
For j = 0 To foundRowsLevel1.GetUpperBound(0)
|
||||
Dim ID1 = foundRowsLevel1(j)("GUID")
|
||||
Dim LevelEntity1 = foundRowsLevel1(j)("ENTITY_ID")
|
||||
Dim controlID1 = foundRowsLevel1(j)("CONTROL_ID")
|
||||
Dim nodetext1 = foundRowsLevel1(j)("NODE_CAPTION")
|
||||
Dim Type_node1 = foundRowsLevel1(j)("TYPE_NODE")
|
||||
RECORD_ID = foundRowsLevel1(j)("RECORD_ID")
|
||||
NODE_CONFIG_ID = foundRowsLevel1(j)("NODE_CONFIG_ID")
|
||||
' Node erstellen..
|
||||
Dim LEVEL1_NODE As TreeNode
|
||||
LEVEL1_NODE = New TreeNode(nodetext1)
|
||||
If Not IsDBNull(RECORD_ID) Then
|
||||
LEVEL1_NODE.Tag = LevelEntity1 & "-CONTROL-ID" & controlID1.ToString & "#" & ID1 & "#RECORD-ID" & RECORD_ID.ToString
|
||||
Else
|
||||
LEVEL1_NODE.Tag = LevelEntity1 & "-CONTROL-ID" & controlID1.ToString & "#" & ID1
|
||||
End If
|
||||
|
||||
index = 0
|
||||
For Each img As String In TREEVIEW_IMAGELIST.Images.Keys
|
||||
If img = NODE_CONFIG_ID & "#" & LevelEntity1 Then
|
||||
Exit For
|
||||
End If
|
||||
index += 1
|
||||
Next
|
||||
LEVEL1_NODE.ImageIndex = index
|
||||
LEVEL1_NODE.SelectedImageIndex = index
|
||||
' ..und einfügen
|
||||
LEVEL0_NODE.Nodes.Add(LEVEL1_NODE)
|
||||
'### LEVEL 2 laden #######
|
||||
Dim expressionLevel2 As String
|
||||
expressionLevel2 = "PARENT_GUID = " & ID1 'TYPE_NODE = 2 AND Einschränkung auf Type und Parent_Guid
|
||||
Dim foundRowsLevel2() As DataRow
|
||||
foundRowsLevel2 = DT_TREEVIEW_PER_CONTROLS.Select(expressionLevel2)
|
||||
Dim k As Integer
|
||||
For k = 0 To foundRowsLevel2.GetUpperBound(0)
|
||||
Dim ID2 = foundRowsLevel2(k)("GUID")
|
||||
Dim LevelEntity2 = foundRowsLevel2(k)("ENTITY_ID")
|
||||
Dim controlID2 = foundRowsLevel2(k)("CONTROL_ID")
|
||||
Dim nodetext2 = foundRowsLevel2(k)("NODE_CAPTION")
|
||||
RECORD_ID = foundRowsLevel2(k)("RECORD_ID")
|
||||
NODE_CONFIG_ID = foundRowsLevel2(k)("NODE_CONFIG_ID")
|
||||
' Node erstellen..
|
||||
Dim LEVEL2_NODE As TreeNode
|
||||
LEVEL2_NODE = New TreeNode(nodetext2)
|
||||
If Not IsDBNull(RECORD_ID) Then
|
||||
LEVEL2_NODE.Tag = LevelEntity2 & "-CONTROL-ID" & controlID2.ToString & "#" & ID2 & "#RECORD-ID" & RECORD_ID.ToString
|
||||
Else
|
||||
LEVEL2_NODE.Tag = LevelEntity2 & "-CONTROL-ID" & controlID2.ToString & "#" & ID2
|
||||
End If
|
||||
|
||||
index = 0
|
||||
For Each img As String In TREEVIEW_IMAGELIST.Images.Keys
|
||||
If img = NODE_CONFIG_ID & "#" & LevelEntity2 Then
|
||||
Exit For
|
||||
End If
|
||||
index += 1
|
||||
Next
|
||||
LEVEL2_NODE.ImageIndex = index
|
||||
LEVEL2_NODE.SelectedImageIndex = index
|
||||
' ..und einfügen
|
||||
LEVEL1_NODE.Nodes.Add(LEVEL2_NODE)
|
||||
'### LEVEL 3 laden #######
|
||||
Dim expressionLevel3 As String
|
||||
expressionLevel3 = "PARENT_GUID = " & ID2 'TYPE_NODE = 3 AND Einschränkung auf Type und Parent_Guid
|
||||
Dim foundRowsLevel3() As DataRow
|
||||
foundRowsLevel3 = DT_TREEVIEW_PER_CONTROLS.Select(expressionLevel3)
|
||||
Dim l As Integer
|
||||
For l = 0 To foundRowsLevel3.GetUpperBound(0)
|
||||
Dim ID3 = foundRowsLevel3(l)("GUID")
|
||||
Dim LevelEntity3 = foundRowsLevel3(l)("ENTITY_ID")
|
||||
Dim controlID3 = foundRowsLevel3(l)("CONTROL_ID")
|
||||
Dim nodetext3 = foundRowsLevel3(l)("NODE_CAPTION")
|
||||
RECORD_ID = foundRowsLevel3(l)("RECORD_ID")
|
||||
NODE_CONFIG_ID = foundRowsLevel3(l)("NODE_CONFIG_ID")
|
||||
' Node erstellen..
|
||||
Dim LEVEL3_NODE As TreeNode
|
||||
LEVEL3_NODE = New TreeNode(nodetext3)
|
||||
If Not IsDBNull(RECORD_ID) Then
|
||||
LEVEL3_NODE.Tag = LevelEntity3 & "-CONTROL-ID" & controlID3.ToString & "#" & ID3 & "#RECORD-ID" & RECORD_ID.ToString
|
||||
Else
|
||||
LEVEL3_NODE.Tag = LevelEntity3 & "-CONTROL-ID" & controlID3.ToString & "#" & ID3
|
||||
End If
|
||||
|
||||
index = 0
|
||||
For Each img As String In TREEVIEW_IMAGELIST.Images.Keys
|
||||
If img = NODE_CONFIG_ID & "#" & LevelEntity3 Then
|
||||
Exit For
|
||||
End If
|
||||
index += 1
|
||||
Next
|
||||
LEVEL3_NODE.ImageIndex = index
|
||||
LEVEL3_NODE.SelectedImageIndex = index
|
||||
' ..und einfügen
|
||||
LEVEL2_NODE.Nodes.Add(LEVEL3_NODE)
|
||||
'### LEVEL 4 laden #######
|
||||
Dim expressionLevel4 As String
|
||||
expressionLevel4 = "PARENT_GUID = " & ID3 'TYPE_NODE = 4 AND Einschränkung auf Type und Parent_Guid
|
||||
Dim foundRowsLevel4() As DataRow
|
||||
foundRowsLevel4 = DT_TREEVIEW_PER_CONTROLS.Select(expressionLevel4)
|
||||
Dim m As Integer
|
||||
For m = 0 To foundRowsLevel4.GetUpperBound(0)
|
||||
Dim ID5 = foundRowsLevel4(m)("GUID")
|
||||
Dim LevelEntity5 = foundRowsLevel4(m)("ENTITY_ID")
|
||||
Dim controlID5 = foundRowsLevel4(m)("CONTROL_ID")
|
||||
Dim nodetext5 = foundRowsLevel4(m)("NODE_CAPTION")
|
||||
RECORD_ID = foundRowsLevel4(m)("RECORD_ID")
|
||||
NODE_CONFIG_ID = foundRowsLevel4(m)("NODE_CONFIG_ID")
|
||||
' Node erstellen..
|
||||
Dim LEVEL4_NODE As TreeNode
|
||||
LEVEL4_NODE = New TreeNode(nodetext5)
|
||||
If Not IsDBNull(RECORD_ID) Then
|
||||
LEVEL4_NODE.Tag = LevelEntity5 & "-CONTROL-ID" & controlID5.ToString & "#" & ID5 & "#RECORD-ID" & RECORD_ID.ToString
|
||||
Else
|
||||
LEVEL4_NODE.Tag = LevelEntity5 & "-CONTROL-ID" & controlID5.ToString & "#" & ID5
|
||||
End If
|
||||
|
||||
index = 0
|
||||
For Each img As String In TREEVIEW_IMAGELIST.Images.Keys
|
||||
If img = NODE_CONFIG_ID & "#" & LevelEntity5 Then
|
||||
Exit For
|
||||
End If
|
||||
index += 1
|
||||
Next
|
||||
LEVEL4_NODE.ImageIndex = index
|
||||
LEVEL4_NODE.SelectedImageIndex = index
|
||||
' ..und einfügen
|
||||
LEVEL3_NODE.Nodes.Add(LEVEL4_NODE)
|
||||
'### LEVEL 5 laden #######
|
||||
Dim expressionLevel5 As String
|
||||
expressionLevel5 = "PARENT_GUID = " & ID5 'TYPE_NODE = 5 AND Einschränkung auf Type und Parent_Guid
|
||||
Dim foundRowsLevel5() As DataRow
|
||||
foundRowsLevel5 = DT_TREEVIEW_PER_CONTROLS.Select(expressionLevel5)
|
||||
Dim n As Integer
|
||||
For n = 0 To foundRowsLevel5.GetUpperBound(0)
|
||||
Dim ID6 = foundRowsLevel5(n)("GUID")
|
||||
Dim LevelEntity6 = foundRowsLevel5(n)("ENTITY_ID")
|
||||
Dim controlID6 = foundRowsLevel5(n)("CONTROL_ID")
|
||||
Dim nodetext6 = foundRowsLevel5(n)("NODE_CAPTION")
|
||||
RECORD_ID = foundRowsLevel5(n)("RECORD_ID")
|
||||
NODE_CONFIG_ID = foundRowsLevel5(n)("NODE_CONFIG_ID")
|
||||
' Node erstellen..
|
||||
Dim LEVEL5_NODE As TreeNode
|
||||
LEVEL5_NODE = New TreeNode(nodetext6)
|
||||
If Not IsDBNull(RECORD_ID) Then
|
||||
LEVEL5_NODE.Tag = LevelEntity6 & "-CONTROL-ID" & controlID6.ToString & "#" & ID6 & "#RECORD-ID" & RECORD_ID.ToString
|
||||
Else
|
||||
LEVEL5_NODE.Tag = LevelEntity6 & "-CONTROL-ID" & controlID6.ToString & "#" & ID6
|
||||
End If
|
||||
|
||||
index = 0
|
||||
For Each img As String In TREEVIEW_IMAGELIST.Images.Keys
|
||||
If img = NODE_CONFIG_ID & "#" & LevelEntity6 Then
|
||||
Exit For
|
||||
End If
|
||||
index += 1
|
||||
Next
|
||||
LEVEL5_NODE.ImageIndex = index
|
||||
LEVEL5_NODE.SelectedImageIndex = index
|
||||
' ..und einfügen
|
||||
LEVEL4_NODE.Nodes.Add(LEVEL5_NODE)
|
||||
'### LEVEL 5 laden #######
|
||||
Dim expressionLevel6 As String
|
||||
expressionLevel6 = "PARENT_GUID = " & ID6 'TYPE_NODE = 6 AND Einschränkung auf Type und Parent_Guid
|
||||
Dim foundRowsLevel6() As DataRow
|
||||
foundRowsLevel6 = DT_TREEVIEW_PER_CONTROLS.Select(expressionLevel6)
|
||||
Dim o As Integer
|
||||
For o = 0 To foundRowsLevel6.GetUpperBound(0)
|
||||
Dim ID7 = foundRowsLevel6(o)("GUID")
|
||||
Dim LevelEntity7 = foundRowsLevel6(o)("ENTITY_ID")
|
||||
Dim controlID7 = foundRowsLevel6(o)("CONTROL_ID")
|
||||
Dim nodetext7 = foundRowsLevel6(o)("NODE_CAPTION")
|
||||
RECORD_ID = foundRowsLevel6(o)("RECORD_ID")
|
||||
NODE_CONFIG_ID = foundRowsLevel6(o)("NODE_CONFIG_ID")
|
||||
' Node erstellen..
|
||||
Dim LEVEL6_NODE As TreeNode
|
||||
LEVEL6_NODE = New TreeNode(nodetext7)
|
||||
If Not IsDBNull(RECORD_ID) Then
|
||||
LEVEL6_NODE.Tag = LevelEntity7 & "-CONTROL-ID" & controlID7.ToString & "#" & ID7 & "#RECORD-ID" & RECORD_ID.ToString
|
||||
Else
|
||||
LEVEL6_NODE.Tag = LevelEntity7 & "-CONTROL-ID" & controlID7.ToString & "#" & ID7
|
||||
End If
|
||||
|
||||
index = 0
|
||||
For Each img As String In TREEVIEW_IMAGELIST.Images.Keys
|
||||
If img = NODE_CONFIG_ID & "#" & LevelEntity7 Then
|
||||
Exit For
|
||||
End If
|
||||
index += 1
|
||||
Next
|
||||
LEVEL6_NODE.ImageIndex = index
|
||||
LEVEL6_NODE.SelectedImageIndex = index
|
||||
' ..und einfügen
|
||||
LEVEL5_NODE.Nodes.Add(LEVEL6_NODE)
|
||||
'### LEVEL 7 laden #######
|
||||
Dim expressionLevel7 As String
|
||||
expressionLevel7 = "PARENT_GUID = " & ID7 'TYPE_NODE = 7 AND Einschränkung auf Type und Parent_Guid
|
||||
Dim foundRowsLevel7() As DataRow
|
||||
foundRowsLevel7 = DT_TREEVIEW_PER_CONTROLS.Select(expressionLevel7)
|
||||
Dim p As Integer
|
||||
For p = 0 To foundRowsLevel7.GetUpperBound(0)
|
||||
Dim ID8 = foundRowsLevel7(p)("GUID")
|
||||
Dim LevelEntity8 = foundRowsLevel7(p)("ENTITY_ID")
|
||||
Dim controlID8 = foundRowsLevel7(p)("CONTROL_ID")
|
||||
Dim nodetext8 = foundRowsLevel7(p)("NODE_CAPTION")
|
||||
RECORD_ID = foundRowsLevel7(p)("RECORD_ID")
|
||||
NODE_CONFIG_ID = foundRowsLevel7(p)("NODE_CONFIG_ID")
|
||||
' Node erstellen..
|
||||
Dim LEVEL7_NODE As TreeNode
|
||||
LEVEL7_NODE = New TreeNode(nodetext8)
|
||||
If Not IsDBNull(RECORD_ID) Then
|
||||
LEVEL7_NODE.Tag = LevelEntity8 & "-CONTROL-ID" & controlID8.ToString & "#" & ID8 & "#RECORD-ID" & RECORD_ID.ToString
|
||||
Else
|
||||
LEVEL7_NODE.Tag = LevelEntity8 & "-CONTROL-ID" & controlID8.ToString & "#" & ID8
|
||||
End If
|
||||
|
||||
index = 0
|
||||
For Each img As String In TREEVIEW_IMAGELIST.Images.Keys
|
||||
If img = NODE_CONFIG_ID & "#" & LevelEntity8 Then
|
||||
Exit For
|
||||
End If
|
||||
index += 1
|
||||
Next
|
||||
LEVEL7_NODE.ImageIndex = index
|
||||
LEVEL7_NODE.SelectedImageIndex = index
|
||||
' ..und einfügen
|
||||
LEVEL6_NODE.Nodes.Add(LEVEL7_NODE)
|
||||
'### LEVEL 7 laden #######
|
||||
Dim expressionLevel8 As String
|
||||
expressionLevel8 = "PARENT_GUID = " & ID8 'TYPE_NODE = 7 AND Einschränkung auf Type und Parent_Guid
|
||||
Dim foundRowsLevel8() As DataRow
|
||||
foundRowsLevel8 = DT_TREEVIEW_PER_CONTROLS.Select(expressionLevel8)
|
||||
Dim q As Integer
|
||||
For q = 0 To foundRowsLevel8.GetUpperBound(0)
|
||||
Dim ID9 = foundRowsLevel8(q)("GUID")
|
||||
Dim LevelEntity9 = foundRowsLevel8(q)("ENTITY_ID")
|
||||
Dim controlID9 = foundRowsLevel8(q)("CONTROL_ID")
|
||||
Dim nodetext9 = foundRowsLevel8(q)("NODE_CAPTION")
|
||||
RECORD_ID = foundRowsLevel8(q)("RECORD_ID")
|
||||
NODE_CONFIG_ID = foundRowsLevel8(q)("NODE_CONFIG_ID")
|
||||
' Node erstellen..
|
||||
Dim LEVEL8_NODE As TreeNode
|
||||
LEVEL8_NODE = New TreeNode(nodetext9)
|
||||
If Not IsDBNull(RECORD_ID) Then
|
||||
LEVEL8_NODE.Tag = LevelEntity9 & "-CONTROL-ID" & controlID9.ToString & "#" & ID9 & "#RECORD-ID" & RECORD_ID.ToString
|
||||
Else
|
||||
LEVEL8_NODE.Tag = LevelEntity9 & "-CONTROL-ID" & controlID9.ToString & "#" & ID9
|
||||
End If
|
||||
|
||||
index = 0
|
||||
For Each img As String In TREEVIEW_IMAGELIST.Images.Keys
|
||||
If img = NODE_CONFIG_ID & "#" & LevelEntity9 Then
|
||||
Exit For
|
||||
End If
|
||||
index += 1
|
||||
Next
|
||||
LEVEL8_NODE.ImageIndex = index
|
||||
LEVEL8_NODE.SelectedImageIndex = index
|
||||
' ..und einfügen
|
||||
LEVEL7_NODE.Nodes.Add(LEVEL8_NODE)
|
||||
'### LEVEL 8 laden #######
|
||||
Next ' Level 7 Ende
|
||||
Next ' Level 7 Ende
|
||||
Next ' Level 6 Ende
|
||||
Next ' Level 5 Ende
|
||||
Next 'Level 4 Ende
|
||||
Next 'Level 3 Ende
|
||||
Next ' Level 2 Ende
|
||||
Next 'Level 1 Ende
|
||||
Next
|
||||
|
||||
|
||||
Else
|
||||
MsgBox("Check the Control Navigation Option or inform Digital Data!", MsgBoxStyle.Critical)
|
||||
Me.Close()
|
||||
End If
|
||||
Try
|
||||
Dim MainNode = ClassNodeNavigation.CreateTreeViewNodes(DT_TREEVIEW_PER_CONTROLS, TREEVIEW_IMAGELIST)
|
||||
If Not IsNothing(MainNode) Then
|
||||
trvwMain.Nodes.Add(MainNode)
|
||||
End If
|
||||
Catch ex As Exception
|
||||
MsgBox("Error in Load TreeView NodesNavigation:" & vbNewLine & ex.Message, MsgBoxStyle.Critical)
|
||||
End Try
|
||||
Else
|
||||
Try
|
||||
Dim sel_sql = String.Format("SELECT *, [dbo].[FNPMO_GETOBJECTCAPTION]('{0}','FORMVIEW_TITLE' + CONVERT(VARCHAR(5), FORM_VIEW_ID), {1}) AS 'CAPTION' " & _
|
||||
@ -441,8 +137,8 @@ Public Class frmWD_Link_to_Record
|
||||
MsgBox("Error in Load_TreeViewEbene in LinkToRecord:" & vbNewLine & ex.Message, MsgBoxStyle.Critical)
|
||||
End Try
|
||||
End If
|
||||
|
||||
|
||||
Cursor = Cursors.Default
|
||||
End Sub
|
||||
|
||||
Public Function Get_Grid_Sql(FormId As Integer, ConstructorDetailID As Integer) As String
|
||||
@ -497,21 +193,30 @@ Public Class frmWD_Link_to_Record
|
||||
SQL = String.Format("select * from TBPMO_STRUCTURE_NODES_CONFIGURATION where ENTITY_ID IN (SELECT FORM_ID FROM VWPMO_CONSTRUCTOR_FORMS WHERE CONSTRUCT_ID = {0})", CONSTRUCTOR_ID)
|
||||
DT_TREEVIEW_CONFIGURATION = ClassDatabase.Return_Datatable(Sql)
|
||||
|
||||
Try
|
||||
TREEVIEW_IMAGELIST = New ImageList
|
||||
For Each row As DataRow In DT_TREEVIEW_CONFIGURATION.Rows
|
||||
Dim bimage() As Byte = row.Item("NODE_IMAGE")
|
||||
' Try
|
||||
TREEVIEW_IMAGELIST = New ImageList
|
||||
For Each row As DataRow In DT_TREEVIEW_CONFIGURATION.Rows
|
||||
Try
|
||||
Dim bimage = row.Item("NODE_IMAGE")
|
||||
If Not IsDBNull(bimage) Then
|
||||
Dim Node_image = ByteArrayToBitmap(bimage)
|
||||
TREEVIEW_IMAGELIST.Images.Add(row.Item("GUID").ToString & "#" & row.Item("ENTITY_ID"), Node_image)
|
||||
End If
|
||||
Next
|
||||
trvwMain.ImageList = TREEVIEW_IMAGELIST
|
||||
Catch ex As Exception
|
||||
MsgBox("Error in Adding NodeConfigurations to TreeView: " & vbNewLine & ex.Message, MsgBoxStyle.Critical)
|
||||
End Try
|
||||
Catch ex As Exception
|
||||
|
||||
End Try
|
||||
|
||||
Next
|
||||
trvwMain.ImageList = TREEVIEW_IMAGELIST
|
||||
'Catch ex As Exception
|
||||
' MsgBox("Error in Adding NodeConfigurations to TreeView: " & vbNewLine & ex.Message, MsgBoxStyle.Critical)
|
||||
'End Try
|
||||
|
||||
|
||||
NODE_NAVIGATION = True
|
||||
NODE_NAVIGATION_LOADED = False
|
||||
grvwGrid.Columns.Clear()
|
||||
dgEntityRecords.DataSource = Nothing
|
||||
Else
|
||||
TreeView_perControl = False
|
||||
NODE_NAVIGATION = False
|
||||
@ -551,71 +256,83 @@ Public Class frmWD_Link_to_Record
|
||||
|
||||
End Sub
|
||||
|
||||
Private Sub tvEntities_AfterSelect(sender As Object, e As TreeViewEventArgs) Handles trvwMain.AfterSelect
|
||||
Try
|
||||
Dim dt As DataTable
|
||||
If NODE_NAVIGATION = False Then
|
||||
SetSelectedNodeStyle(trvwMain.Nodes)
|
||||
CONSTRUCTOR_DETAIL_ID = Integer.Parse(e.Node.Tag)
|
||||
Dim SQL As String = String.Format("SELECT FORM_ID FROM VWPMO_CONSTRUCTOR_FORMS WHERE GUID = {0} AND CONSTRUCT_ID = {1}", CONSTRUCTOR_DETAIL_ID, CONSTRUCTOR_ID)
|
||||
FORM_ID = ClassDatabase.Execute_Scalar(SQL)
|
||||
SQL = Get_Grid_Sql(FORM_ID, CONSTRUCTOR_DETAIL_ID)
|
||||
Private Sub trvwMain_AfterSelect(sender As Object, e As TreeViewEventArgs) Handles trvwMain.AfterSelect
|
||||
' Try
|
||||
|
||||
Dim dt As DataTable
|
||||
If NODE_NAVIGATION = False Then
|
||||
SetSelectedNodeStyle(trvwMain.Nodes)
|
||||
CONSTRUCTOR_DETAIL_ID = Integer.Parse(e.Node.Tag)
|
||||
Dim SQL As String = String.Format("SELECT FORM_ID FROM VWPMO_CONSTRUCTOR_FORMS WHERE GUID = {0} AND CONSTRUCT_ID = {1}", CONSTRUCTOR_DETAIL_ID, CONSTRUCTOR_ID)
|
||||
FORM_ID = ClassDatabase.Execute_Scalar(SQL)
|
||||
SQL = Get_Grid_Sql(FORM_ID, CONSTRUCTOR_DETAIL_ID)
|
||||
dt = ClassDatabase.Return_Datatable(SQL)
|
||||
dgEntityRecords.DataSource = dt
|
||||
grvwGrid.PopulateColumns()
|
||||
dgEntityRecords.RefreshDataSource()
|
||||
Else
|
||||
RECORD_ID = 0
|
||||
Dim SelectedNode As TreeNode = TryCast(trvwMain.SelectedNode, TreeNode)
|
||||
If SelectedNode IsNot Nothing Then
|
||||
SelectedNode.NodeFont = New Font(trvwMain.Font.FontFamily, trvwMain.Font.Size, FontStyle.Bold)
|
||||
SelectedNode.Text = SelectedNode.Text
|
||||
Else
|
||||
Exit Sub
|
||||
End If
|
||||
|
||||
|
||||
If NODE_NAVIGATION_LOADED = False Then
|
||||
ENTITY_ID = Return_ENTITY_FOR_TAG(SelectedNode.Tag)
|
||||
Dim SQL As String '= String.Format("SELECT FORM_ID FROM VWPMO_CONSTRUCTOR_FORMS WHERE CONSTRUCT_ID = {0} AND FORM_ID = {1}", CONSTRUCTOR_ID, ENTITY_ID)
|
||||
SQL = Get_Grid_Sql(ENTITY_ID, CONSTRUCTOR_DETAIL_ID)
|
||||
dt = ClassDatabase.Return_Datatable(SQL)
|
||||
If IsNothing(dt) Then
|
||||
Exit Sub
|
||||
End If
|
||||
dgEntityRecords.DataSource = dt
|
||||
grvwGrid.PopulateColumns()
|
||||
dgEntityRecords.RefreshDataSource()
|
||||
Else
|
||||
RECORD_ID = 0
|
||||
Dim SelectedNode As TreeNode = TryCast(trvwMain.SelectedNode, TreeNode)
|
||||
If SelectedNode IsNot Nothing Then
|
||||
SelectedNode.NodeFont = New Font(trvwMain.Font.FontFamily, trvwMain.Font.Size, FontStyle.Bold)
|
||||
SelectedNode.Text = SelectedNode.Text
|
||||
Else
|
||||
Exit Sub
|
||||
NODE_NAVIGATION_LOADED = True
|
||||
End If
|
||||
|
||||
If LogErrorsOnly = False Then ClassLogger.Add(" >> NodeTag: " & SelectedNode.Tag.ToString, False)
|
||||
If SelectedNode.Tag.ToString.Contains("RECORD-ID") Then
|
||||
Dim Record = Return_RECORD_forTag(SelectedNode.Tag)
|
||||
If Record <> 0 Then
|
||||
txtRecordId.Text = Record
|
||||
RECORD_ID = Record
|
||||
End If
|
||||
|
||||
|
||||
If NODE_NAVIGATION_LOADED = False Then
|
||||
ENTITY_ID = Return_ENTITY_FOR_TAG(SelectedNode.Tag)
|
||||
Dim SQL As String = String.Format("SELECT FORM_ID FROM VWPMO_CONSTRUCTOR_FORMS WHERE CONSTRUCT_ID = {0} AND FORM_ID = {1}", CONSTRUCTOR_ID, ENTITY_ID)
|
||||
SQL = Get_Grid_Sql(ENTITY_ID, CONSTRUCTOR_DETAIL_ID)
|
||||
dt = ClassDatabase.Return_Datatable(SQL)
|
||||
dgEntityRecords.DataSource = dt
|
||||
grvwGrid.PopulateColumns()
|
||||
dgEntityRecords.RefreshDataSource()
|
||||
NODE_NAVIGATION_LOADED = True
|
||||
End If
|
||||
|
||||
If LogErrorsOnly = False Then ClassLogger.Add(" >> NodeTag: " & SelectedNode.Tag.ToString, False)
|
||||
If SelectedNode.Tag.ToString.Contains("RECORD-ID") Then
|
||||
Dim Record = Return_RECORD_forTag(SelectedNode.Tag)
|
||||
If Record <> 0 Then
|
||||
txtRecordId.Text = Record
|
||||
RECORD_ID = Record
|
||||
End If
|
||||
|
||||
End If
|
||||
Dim RecordId As Integer = grvwGrid.GetFocusedRowCellValue(grvwGrid.Columns(0))
|
||||
txtRecordId.Text = RecordId
|
||||
|
||||
End If
|
||||
' Datasource neu setzen und columns laden
|
||||
If Not IsNothing(dgEntityRecords.DataSource) Then
|
||||
Dim RecordId As Integer = grvwGrid.GetFocusedRowCellValue(grvwGrid.Columns(0))
|
||||
txtRecordId.Text = RecordId
|
||||
Else
|
||||
txtRecordId.Text = ""
|
||||
RECORD_ID = 0
|
||||
End If
|
||||
|
||||
Dim constructor = DirectCast(cmbConstructorForms.Items.Item(cmbConstructorForms.SelectedIndex), ClassConstructor)
|
||||
Dim constructorName As String = constructor.title
|
||||
|
||||
End If
|
||||
' Datasource neu setzen und columns laden
|
||||
|
||||
Dim constructor = DirectCast(cmbConstructorForms.Items.Item(cmbConstructorForms.SelectedIndex), ClassConstructor)
|
||||
Dim constructorName As String = constructor.title
|
||||
If Not IsNothing(dgEntityRecords.DataSource) Then
|
||||
Load_Grid_Layout(constructorName)
|
||||
grvwGrid.Columns.Item("Form-ID").Visible = False
|
||||
grvwGrid.Columns.Item("ROW_COLOR").Visible = False
|
||||
If RECORD_ID > 0 Then
|
||||
Dim rowHandle = grvwGrid.LocateByValue(0, grvwGrid.Columns("Record-ID"), RECORD_ID)
|
||||
grvwGrid.FocusedRowHandle = rowHandle
|
||||
End If
|
||||
End If
|
||||
|
||||
If RECORD_ID > 0 Then
|
||||
Dim rowHandle = grvwGrid.LocateByValue(0, grvwGrid.Columns("Record-ID"), RECORD_ID)
|
||||
grvwGrid.FocusedRowHandle = rowHandle
|
||||
End If
|
||||
|
||||
Catch ex As Exception
|
||||
MsgBox("Entität " + CONSTRUCTOR_DETAIL_ID + " konnte nicht geladen werden: " & vbNewLine & ex.Message, MsgBoxStyle.Critical)
|
||||
Exit Sub
|
||||
End Try
|
||||
'Catch ex As Exception
|
||||
' MsgBox("Entität " + CONSTRUCTOR_DETAIL_ID + " konnte nicht geladen werden: " & vbNewLine & ex.Message, MsgBoxStyle.Critical)
|
||||
' Exit Sub
|
||||
'End Try
|
||||
End Sub
|
||||
Private Function Return_RECORD_forTag(NodeString As String)
|
||||
If IsNumeric(NodeString) Then
|
||||
@ -647,7 +364,7 @@ Public Class frmWD_Link_to_Record
|
||||
If NodeString.Contains("CONTROL-ID") Then
|
||||
Try
|
||||
Dim _index = NodeString.IndexOf("C")
|
||||
Dim Entity = NodeString.Substring(0, _index)
|
||||
Dim Entity = NodeString.Substring(0, _index).Replace(" ", "").Replace("-", "")
|
||||
Return Entity
|
||||
Catch ex As Exception
|
||||
ClassLogger.Add("Unexpected Error in Return_ENTITY_FOR_TAG ('" & NodeString & "'): " & ex.Message, True)
|
||||
@ -695,52 +412,58 @@ Public Class frmWD_Link_to_Record
|
||||
End Sub
|
||||
|
||||
Private Sub GridView1_FocusedRowChanged(sender As Object, e As DevExpress.XtraGrid.Views.Base.FocusedRowChangedEventArgs) Handles grvwGrid.FocusedRowChanged
|
||||
Dim RecordId As Integer = grvwGrid.GetFocusedRowCellValue(grvwGrid.Columns(0))
|
||||
txtRecordId.Text = RecordId
|
||||
If Not IsNothing(dgEntityRecords.DataSource) Then
|
||||
Dim RecordId As Integer = grvwGrid.GetFocusedRowCellValue(grvwGrid.Columns(0))
|
||||
txtRecordId.Text = RecordId
|
||||
End If
|
||||
End Sub
|
||||
|
||||
Private Sub btnLink_Click(sender As Object, e As EventArgs) Handles btnLink.Click
|
||||
Dim RecordId As Integer
|
||||
Dim FileName As String
|
||||
|
||||
If txtRecordId.Text.Trim.Count > 0 Then
|
||||
RecordId = Integer.Parse(txtRecordId.Text)
|
||||
FileName = txtFilename.Text
|
||||
Try
|
||||
Dim ins = String.Format("INSERT INTO TBPMO_DOC_RECORD_LINK (RECORD_ID,DOC_ID,COMMENT,ADDED_WHO) VALUES ({0},{1},'{2}','{3}')", RecordId, CURRENT_DOC_ID, "MANUAL RECORD-LINK", Environment.UserName)
|
||||
If ClassDatabase.Execute_non_Query(ins) = False Then
|
||||
MsgBox("Unexpected Error in Inserting Record-Doc Link. Please check logfile!", MsgBoxStyle.Critical)
|
||||
End If
|
||||
Dim sql = String.Format("SELECT * FROM TBPMO_WD_OBJECTTYPE WHERE OBJECT_TYPE = '{0}'", _objecttype)
|
||||
Dim DT_OBJTYPE As DataTable = ClassDatabase.Return_Datatable(sql)
|
||||
If DT_OBJTYPE.Rows.Count = 1 Then
|
||||
Dim Entity_Index = DT_OBJTYPE.Rows(0).Item("IDXNAME_ENTITYID")
|
||||
Dim Record_Index = DT_OBJTYPE.Rows(0).Item("IDXNAME_RECORDID")
|
||||
Dim ENT_ID = ClassDatabase.Execute_Scalar(String.Format("SELECT FORM_ID FROM TBPMO_RECORD WHERE GUID = {0}", RecordId))
|
||||
If ENT_ID > 1 Then
|
||||
If ClassWindream.IndexFile(FileName, Entity_Index, ENT_ID, True, _objecttype) = False Then
|
||||
Dim msg = "Die Entität-ID konnte nicht gesetzt werden! Bitte überprüfen Sie die Logfile"
|
||||
For Each row As DataRow In ClassWindreamDocGrid.DT_RESULTFILES.Rows
|
||||
CURRENT_DOC_ID = row.Item("DOC_ID")
|
||||
Dim DOC_PATH = row.Item("DOC_PATH")
|
||||
Dim _objecttype = row.Item("OBJECTTYPE")
|
||||
Dim ins = String.Format("INSERT INTO TBPMO_DOC_RECORD_LINK (RECORD_ID,DOC_ID,COMMENT,ADDED_WHO) VALUES ({0},{1},'{2}','{3}')", RecordId, CURRENT_DOC_ID, "MANUAL RECORD-LINK", Environment.UserName)
|
||||
If ClassDatabase.Execute_non_Query(ins) = False Then
|
||||
MsgBox("Unexpected Error in Inserting Record-Doc Link. Please check logfile!", MsgBoxStyle.Critical)
|
||||
End If
|
||||
Dim sql = String.Format("SELECT * FROM TBPMO_WD_OBJECTTYPE WHERE OBJECT_TYPE = '{0}'", _objecttype)
|
||||
Dim DT_OBJTYPE As DataTable = ClassDatabase.Return_Datatable(sql)
|
||||
If DT_OBJTYPE.Rows.Count = 1 Then
|
||||
Dim Entity_Index = DT_OBJTYPE.Rows(0).Item("IDXNAME_ENTITYID")
|
||||
Dim Record_Index = DT_OBJTYPE.Rows(0).Item("IDXNAME_RECORDID")
|
||||
Dim ENT_ID = ClassDatabase.Execute_Scalar(String.Format("SELECT FORM_ID FROM TBPMO_RECORD WHERE GUID = {0}", RecordId))
|
||||
If ENT_ID > 1 Then
|
||||
If ClassWindream.IndexFile(DOC_PATH, Entity_Index, ENT_ID, True, _objecttype) = False Then
|
||||
Dim msg = "Die Entität-ID konnte nicht gesetzt werden! Bitte überprüfen Sie die Logfile"
|
||||
If USER_LANGUAGE <> "de-DE" Then
|
||||
msg = "Could not index Entity-ID! Please check logfile!"
|
||||
End If
|
||||
MsgBox(msg, MsgBoxStyle.Exclamation)
|
||||
End If
|
||||
End If
|
||||
If ClassWindream.IndexFile(DOC_PATH, Record_Index, RecordId, True, _objecttype) = False Then
|
||||
Dim msg = "Die Record-ID konnte nicht gesetzt werden! Bitte überprüfen Sie die Logfile"
|
||||
If USER_LANGUAGE <> "de-DE" Then
|
||||
msg = "Could not index Entity-ID! Please check logfile!"
|
||||
msg = "Could not index Record-ID! Please check logfile!"
|
||||
End If
|
||||
MsgBox(msg, MsgBoxStyle.Exclamation)
|
||||
Else
|
||||
Dim msg = "Der Datensatz wurde erfolgreich mit der Datei verknüpft!"
|
||||
If USER_LANGUAGE <> "de-DE" Then
|
||||
msg = "The record was successfully added to the file!"
|
||||
End If
|
||||
MsgBox(msg, MsgBoxStyle.Information)
|
||||
ClassHelper.InsertEssential_Log(CURRENT_DOC_ID, "DOC-ID", "FILE LINK CREATED FOR RECORD: " & RecordId.ToString)
|
||||
End If
|
||||
End If
|
||||
If ClassWindream.IndexFile(FileName, Record_Index, RecordId, True, _objecttype) = False Then
|
||||
Dim msg = "Die Record-ID konnte nicht gesetzt werden! Bitte überprüfen Sie die Logfile"
|
||||
If USER_LANGUAGE <> "de-DE" Then
|
||||
msg = "Could not index Record-ID! Please check logfile!"
|
||||
End If
|
||||
MsgBox(msg, MsgBoxStyle.Exclamation)
|
||||
Else
|
||||
Dim msg = "Der Datensatz wurde erfolgreich mit der Datei verknüpft!"
|
||||
If USER_LANGUAGE <> "de-DE" Then
|
||||
msg = "The record was successfully added to the file!"
|
||||
End If
|
||||
MsgBox(msg, MsgBoxStyle.Information)
|
||||
ClassHelper.InsertEssential_Log(CURRENT_DOC_ID, "DOC-ID", "FILE LINK CREATED FOR RECORD: " & RecordId.ToString)
|
||||
End If
|
||||
End If
|
||||
Next
|
||||
|
||||
Catch ex As Exception
|
||||
MsgBox("Unexpected Error in Linking Record to file:" & vbNewLine & ex.Message, MsgBoxStyle.Critical)
|
||||
End Try
|
||||
|
||||
Loading…
x
Reference in New Issue
Block a user