From 75e9e2e793d7db06cf5898fc4508f8c94bd59b91 Mon Sep 17 00:00:00 2001 From: "d.breimaier" Date: Wed, 12 Feb 2025 13:11:19 +0100 Subject: [PATCH] ustva_antragpos. --- SDL/USTV/ustCntlUSTV_AntragPosition.vb | 13 +++++++------ 1 file changed, 7 insertions(+), 6 deletions(-) diff --git a/SDL/USTV/ustCntlUSTV_AntragPosition.vb b/SDL/USTV/ustCntlUSTV_AntragPosition.vb index 0fa83779..99f45af8 100644 --- a/SDL/USTV/ustCntlUSTV_AntragPosition.vb +++ b/SDL/USTV/ustCntlUSTV_AntragPosition.vb @@ -112,7 +112,7 @@ Public Class ustCntlUSTV_AntragPosition Else save = False End If - If txtUmrechnungskurs.Text <> "" And txtUmrechnungskurs._value <> "" Then + If Not (txtUmrechnungskurs.Text = "" And txtUmrechnungskurs._value = "") Then If txtUmrechnungskurs.Text <> "" Then UStV_POS.UStVPo_Umrechnungskurs = txtUmrechnungskurs.Text.Replace(",", ".") ElseIf txtUmrechnungskurs._value <> "" Then @@ -299,6 +299,7 @@ Public Class ustCntlUSTV_AntragPosition UStV_Leist.UstV_Leistender_PLZ = If(txtPLZ.Text, "") UStV_Leist.UstV_Leistender_Stadt = If(txtOrt.Text, "") UStV_Leist.UstV_Leistender_Land = If(txtLand.Text, "") + UStV_Leist.UstV_Leistender_UstNr = If(txtUIDNr.Text, "") If UStV_Leist.SAVE() Then @@ -342,14 +343,14 @@ Public Class ustCntlUSTV_AntragPosition End If If UStV_Leist.SAVE() Then - + If Not UStV_Leist.UstV_Leistender_Adresse And adresseChanged Then UStV_Leist.UstV_Leistender_Adresse = True btnLeistenderSave.Visible = False - UStV_POS.UStVPo_Leistender = UStV_Leist.UStV_Leistender - 'RaiseEvent CHANGED(UStV_POS.UStVPo_ID) - values_changed() + UStV_POS.UStVPo_Leistender = UStV_Leist.UStV_Leistender + 'RaiseEvent CHANGED(UStV_POS.UStVPo_ID) + values_changed() + End If End If - End If End Sub