From 51f2e33a107ae2a8fa4d09ee0f040826552aeade Mon Sep 17 00:00:00 2001 From: "d.breimaier" Date: Wed, 23 Nov 2022 10:38:01 +0100 Subject: [PATCH] Bugfix gesamtsicherheiten: Typo "avisioId" --- Aviso/frmGesamtsicherheitenNEU.vb | 14 +++++++------- 1 file changed, 7 insertions(+), 7 deletions(-) diff --git a/Aviso/frmGesamtsicherheitenNEU.vb b/Aviso/frmGesamtsicherheitenNEU.vb index da76d5c..c9c8cd4 100644 --- a/Aviso/frmGesamtsicherheitenNEU.vb +++ b/Aviso/frmGesamtsicherheitenNEU.vb @@ -32,7 +32,7 @@ Public Class frmGesamtsicherheitenNEU Public warenortID As String - Public avisioID As Integer + Public avisoID As Integer Dim indexGsId As Integer @@ -312,14 +312,14 @@ Public Class frmGesamtsicherheitenNEU dt = SQL.loadDgvBySql(StandortSqlString, "AVISO", 100, True) If dt.Rows.Count > 0 Then - Me.avisioID = setNullToZero(dt.Rows(0).Item("gs_avisioId")) + Me.avisoID = setNullToZero(dt.Rows(0).Item("gs_avisoId")) Me.LKWKZ = setNullToZero(dt.Rows(0).Item("gs_LKWKZ")) Me.FilialNummer = setNullToZero(dt.Rows(0).Item("gs_filialenNr")) Me.Abfertigungsnummer = setNullToZero(dt.Rows(0).Item("gs_abfertigungsNr")) Me.warenortID = setNullToZero(dt.Rows(0).Item("gs_warenort")) End If - If Me.avisioID.ToString.Length > 0 Then lblGestellungNr.Text &= "Aviso-ID: " & Me.LKWKZ & " " + If Me.avisoID.ToString.Length > 0 Then lblGestellungNr.Text &= "Aviso-ID: " & Me.LKWKZ & " " If Me.LKWKZ.ToString.Length > 0 Then lblGestellungNr.Text &= "LKW-ID: " & Me.LKWKZ & " " If Me.FilialNummer.ToString.Length > 0 Then lblGestellungNr.Text &= "FilialNr: " & Me.FilialNummer & " " If Me.Abfertigungsnummer.Length > 0 Then lblGestellungNr.Text &= "AbfNr: " & Me.Abfertigungsnummer & " " @@ -452,7 +452,7 @@ Public Class frmGesamtsicherheitenNEU .gs_saldo = currentGesSichRef.brgakto_gs_aktSaldo .gs_atr = setNullToZero(cboSicherheitATR.SelectedItem) .gs_zollsatz = Me.Zollsatz - .gs_avisoId = Me.avisioID + .gs_avisoId = Me.avisoID setEnviromentDataToObject(OPEN, Me) End With @@ -495,7 +495,7 @@ Public Class frmGesamtsicherheitenNEU .gsp_erstellungsdatum = Me.datum .gsp_avisoId = "" .gsp_ust = "" - .gsp_avisoId = Me.avisioID + .gsp_avisoId = Me.avisoID '.gsp_ATCNr = "" .gsp_gsNr = OPEN.gs_gsNr End With @@ -540,7 +540,7 @@ Public Class frmGesamtsicherheitenNEU .gs_saldo = currentGesSichRef.brgakto_gs_aktSaldo .gs_atr = setNullToZero(cboSicherheitATR.SelectedItem) .gs_zollsatz = Me.Zollsatz - .gs_avisoId = Me.avisioID + .gs_avisoId = Me.avisoID setEnviromentDataToObject(OPEN, Me) End With @@ -561,7 +561,7 @@ Public Class frmGesamtsicherheitenNEU .gsp_erstellungsdatum = DateTimeString2DateTimeKonvertinator(txtPosDate.Text, txtPosTime.Text) .gsp_ust = currentSicherheit.gs_ust .gsp_ATCNr = txtPositionenCRN.Text - .gsp_avisoId = Me.avisioID + .gsp_avisoId = Me.avisoID End With SicherheitsPos.SAVE()