mergeconf-Auflösung

This commit is contained in:
2023-08-21 16:16:29 +02:00
parent 6f5ff75024
commit c60d7a41d9
2 changed files with 16 additions and 19 deletions

View File

@@ -219,9 +219,6 @@ Public Class usrcntlAktDetailsATILLANeu
Try
Me.Cursor = Cursors.WaitCursor
If dgvZollAnmeldungen.SelectedRows.Count = 0 Then Exit Sub
Dim DY As DAKOSY_Worker.cDakosy_Zollanmeldungen = DAKOSY_Worker.cDakosy_Zollanmeldungen.LOADById(dgvZollAnmeldungen.SelectedRows(0).Cells("dy_Id").Value)
If DY IsNot Nothing Then
@@ -1671,4 +1668,8 @@ Public Class usrcntlAktDetailsATILLANeu
FUNC.openSnd(SENDUNG_LIST(0).tblSnd_SendungID, AvisoID)
End Sub
Dim frmAttilaATEZNCTS = New frmATEZ_NCTS(dgvATEZNCTS.SelectedRows(0).Cells("Id").Value)
frmAttilaATEZNCTS.Show(Me)
End Sub
End Class