jj: fix assignment group -> module
This commit is contained in:
parent
c5e310eed3
commit
57c98a31a5
@ -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)
|
||||
|
||||
Loading…
x
Reference in New Issue
Block a user