AppStd/RecordOrganizer
8
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

MS_13.10.2015

Browse Source
This commit is contained in:
SchreiberM
2015-10-13 15:42:01 +02:00
parent b050f2d543
commit c74e5434b9
30 changed files with 6236 additions and 922 deletions
Download Patch File Download Diff File Expand all files Collapse all files

2
app/DD-Record-Organiser/frmForm_Overview.vb
View File

@@ -55,6 +55,7 @@ Public Class frmForm_Overview
Dim Node As TreeNode
Node = TreeViewEntity.Nodes.Add(Row.Item("FORM_TITLE").ToString)
Node.Tag = Row.Item("GUID")
Node.BackColor = Color.Orange
'Jetzt die Ebene1Knoten einhängen
Dim sql As String = "SELECT T.GUID, T1.FORM_TITLE FROM TBPMO_FORM T, TBPMO_FORM_VIEW T1 WHERE T.GUID = T1.FORM_ID AND T.FORM_TYPE_ID in (2,5) AND T.PARENT_ID = " & Row.Item("GUID") & " ORDER BY LEVEL"
Dim dtEbene1 As DataTable = ClassDatabase.Return_Datatable(sql)
@@ -327,7 +328,6 @@ Public Class frmForm_Overview
Try
If Not TreeViewEntity.SelectedNode Is Nothing Then
Dim formId As Integer = Integer.Parse(TreeViewEntity.SelectedNode.Tag)
Console.WriteLine(formId)
Load_Forms(formId)
TreeViewEntity.ExpandAll()
End If