diff --git a/SDL/USTV/frmMDM_USTVAntrag.vb b/SDL/USTV/frmMDM_USTVAntrag.vb index 6c5a2469..4d20104d 100644 --- a/SDL/USTV/frmMDM_USTVAntrag.vb +++ b/SDL/USTV/frmMDM_USTVAntrag.vb @@ -615,7 +615,7 @@ Public Class frmMDM_USTVAntrag USTV_POS.UStVPo_Leistungsbezeichnung = "Maut" USTV_POS.UStVPo_Leistender = ANTRAG.plose_Lieferant If ANTRAG.plose_Lieferant = "PLOSE Sistem Service" Then - USTV_POS.UStVPo_Leistender = USTV_POS.UStVPo_Leistender 'USTV_POS.UStVPo_Leistender.ToString.Replace("", "PLOSE Sistem Service") + USTV_POS.UStVPo_Leistender = "PLOSE SISTEM SERVICE SPA" End If USTV_POS.UStVPo_Sachbearbeiter = VERAG_PROG_ALLGEMEIN.cAllgemein.USRKURZNAME diff --git a/SDL/USTV/ustCntlUSTV_AntragPosition.vb b/SDL/USTV/ustCntlUSTV_AntragPosition.vb index 0fa83779..50a2acae 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 @@ -126,9 +126,6 @@ Public Class ustCntlUSTV_AntragPosition UStV_POS.UStVPo_SchnittstellenNr = IIf(cboSchnittstellennr.SelectedItem IsNot Nothing, cboSchnittstellennr._value, -1) - - - End Sub Private Sub ustCntlUSTV_AntragPosition_KeyDown(sender As Object, e As PreviewKeyDownEventArgs) Handles Me.PreviewKeyDown @@ -299,6 +296,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 +340,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 diff --git a/VERAG_PROG_ALLGEMEIN/Benutzerdefinierte Steuerelemente/MySearchBox.resx b/VERAG_PROG_ALLGEMEIN/Benutzerdefinierte Steuerelemente/MySearchBox.resx new file mode 100644 index 00000000..1af7de15 --- /dev/null +++ b/VERAG_PROG_ALLGEMEIN/Benutzerdefinierte Steuerelemente/MySearchBox.resx @@ -0,0 +1,120 @@ + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + text/microsoft-resx + + + 2.0 + + + System.Resources.ResXResourceReader, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + + System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + \ No newline at end of file