From 7a3184f21c6bf0991611fe4e88040d55a4fa3589 Mon Sep 17 00:00:00 2001 From: "d.breimaier" Date: Tue, 1 Sep 2026 15:02:20 +0200 Subject: [PATCH] Sendungsdetails --- Aviso/My Project/AssemblyInfo.vb | 4 ++-- Aviso/frmSendungsdetailsNEU.vb | 12 ++++++------ 2 files changed, 8 insertions(+), 8 deletions(-) diff --git a/Aviso/My Project/AssemblyInfo.vb b/Aviso/My Project/AssemblyInfo.vb index 2f68c07..b73c99a 100644 --- a/Aviso/My Project/AssemblyInfo.vb +++ b/Aviso/My Project/AssemblyInfo.vb @@ -31,5 +31,5 @@ Imports System.Runtime.InteropServices ' übernehmen, indem Sie "*" eingeben: ' - - + + diff --git a/Aviso/frmSendungsdetailsNEU.vb b/Aviso/frmSendungsdetailsNEU.vb index b21939e..c0bc441 100644 --- a/Aviso/frmSendungsdetailsNEU.vb +++ b/Aviso/frmSendungsdetailsNEU.vb @@ -8260,7 +8260,7 @@ Public Class frmSendungsdetailsNEU Private Sub btnStatusAbklaerungTR_Click(sender As Object, e As EventArgs) Handles btnStatusAbklaerungTR.Click Me.Cursor = Cursors.WaitCursor SAVE_ME() - If AVISOFUNC.setSendungAbklaerungTR(SendungID, AvisoId) Then + If AVISOFUNC.setSendungAbklaerungTR(SENDUNG_LIST(CURRENT_INDEX).tblSnd_SendungID, AvisoId) Then initDataBinding() End If Me.Cursor = Cursors.Default @@ -8269,7 +8269,7 @@ Public Class frmSendungsdetailsNEU Private Sub btnStatusVorbereitetQS_Click(sender As Object, e As EventArgs) Handles btnStatusVorbereitetQS.Click Me.Cursor = Cursors.WaitCursor SAVE_ME() - If AVISOFUNC.setSendungVorbereitetQS(SendungID, AvisoId) Then + If AVISOFUNC.setSendungVorbereitetQS(SENDUNG_LIST(CURRENT_INDEX).tblSnd_SendungID, AvisoId) Then initDataBinding() End If Me.Cursor = Cursors.Default @@ -8278,7 +8278,7 @@ Public Class frmSendungsdetailsNEU Private Sub btnStatusVorgeschrieben_Click(sender As Object, e As EventArgs) Handles btnStatusVorgeschrieben.Click Me.Cursor = Cursors.WaitCursor SAVE_ME() - If AVISOFUNC.setSendungVorgeschrieben(SendungID, AvisoId) Then + If AVISOFUNC.setSendungVorgeschrieben(SENDUNG_LIST(CURRENT_INDEX).tblSnd_SendungID, AvisoId) Then initDataBinding() End If Me.Cursor = Cursors.Default @@ -8287,7 +8287,7 @@ Public Class frmSendungsdetailsNEU Private Sub btnStatusAbfertigungTR_Click(sender As Object, e As EventArgs) Handles btnStatusAbfertigungTR.Click Me.Cursor = Cursors.WaitCursor SAVE_ME() - If AVISOFUNC.setSendungAbfertigungTR(SendungID, AvisoId) Then + If AVISOFUNC.setSendungAbfertigungTR(SENDUNG_LIST(CURRENT_INDEX).tblSnd_SendungID, AvisoId) Then initDataBinding() End If Me.Cursor = Cursors.Default @@ -8297,7 +8297,7 @@ Public Class frmSendungsdetailsNEU Me.Cursor = Cursors.WaitCursor SAVE_ME() If Not cbxFremdspedition.Checked Then - If AVISOFUNC.setSendungSpeditionsbuchEintrag(SendungID, AvisoId) Then + If AVISOFUNC.setSendungSpeditionsbuchEintrag(SENDUNG_LIST(CURRENT_INDEX).tblSnd_SendungID, AvisoId) Then initDataBinding() End If End If @@ -8307,7 +8307,7 @@ Public Class frmSendungsdetailsNEU Private Sub btnSendungFakturiert_Click(sender As Object, e As EventArgs) Handles btnSendungFakturiert.Click Me.Cursor = Cursors.WaitCursor SAVE_ME() - If AVISOFUNC.setSendungFakturiert(SendungID, AvisoId) Then + If AVISOFUNC.setSendungFakturiert(SENDUNG_LIST(CURRENT_INDEX).tblSnd_SendungID, AvisoId) Then initDataBinding() End If Me.Cursor = Cursors.Default