MS_workflow_2609

This commit is contained in:
Digital Data - Marlon Schreiber
2017-09-26 10:36:29 +02:00
parent 5437af61d2
commit 5d659602db
7 changed files with 78 additions and 56 deletions

View File

@@ -45,7 +45,9 @@ Public Class ClassWindreamDocGrid
End Function
Public Shared Sub GetDocItems(gridView As GridView)
SELECTED_DOC_ID = 0
If Init_Table() = True Then
SELECTED_DOC_ID = 0
Console.WriteLine("gridView.SelectedRowsCount: " & gridView.SelectedRowsCount.ToString)
If gridView.SelectedRowsCount > 1 Then
DT_RESULTFILES.Clear()
@@ -417,7 +419,12 @@ Public Class ClassWindreamDocGrid
End Sub
Public Shared Sub gridView_MasterRowExpanded(sender As GridView, e As DevExpress.XtraGrid.Views.Grid.CustomMasterRowEventArgs)
ClassWindreamDocGrid.GetDocItems(sender)
Dim GW As GridView = sender
If SELECTED_DOC_ID = 0 Then
MsgBox("Sorry no document was selected! Please try again!", MsgBoxStyle.Exclamation)
Exit Sub
End If
Dim detailView As GridView = sender.GetDetailView(e.RowHandle, e.RelationIndex)
With detailView.Columns