jj: fix assignment group -> module

This commit is contained in:
Jonathan Jenne 2018-06-13 14:11:43 +02:00
parent c5e310eed3
commit 57c98a31a5

View File

@ -934,13 +934,13 @@ Public Class frmMain
Private Sub btnModules_AddGroups_Click(sender As Object, e As EventArgs) Handles btnModules_AddGroups.Click
Try
Dim selectedGroupHandles = viewModules_AvailableUsers.GetSelectedRows().ToList()
Dim selectedGroupHandles = viewModulesGroups_AvailableGroups.GetSelectedRows().ToList()
Dim selectedModule As TBDD_MODULESRow = GetSelectedModule(ItemType.Group)
For Each handle As Integer In selectedGroupHandles
Dim rowView As DataRowView = viewModules_AvailableUsers.GetRow(handle)
Dim rowView As DataRowView = viewModulesGroups_AvailableGroups.GetRow(handle)
Dim groupRow As TBDD_GROUPSRow = rowView.Row
TBDD_GROUPS_MODULESTableAdapter.Insert(groupRow.GUID, selectedModule.GUID, $"Assign Group {groupRow.NAME} to Module {selectedModule.NAME}", Environment.UserName)
TBDD_GROUPS_MODULESTableAdapter.Insert(selectedModule.GUID, groupRow.GUID, $"Assign Group {groupRow.NAME} to Module {selectedModule.NAME}", Environment.UserName)
Next
ReloadGroupsForModule(selectedModule.GUID)
@ -958,7 +958,7 @@ Public Class frmMain
For Each handle As Integer In selectedGroupHandles
Dim rowView As DataRowView = viewModulesGroups_AssignedGroups.GetRow(handle)
Dim groupRow As TBDD_GROUPSRow = rowView.Row
TBDD_GROUPS_MODULESTableAdapter.Delete(groupRow.GUID, selectedModule.GUID)
TBDD_GROUPS_MODULESTableAdapter.Delete(selectedModule.GUID, groupRow.GUID)
Next
ReloadGroupsForModule(selectedModule.GUID)