edv/SDL
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

ustva_antragpos.

Browse Source
This commit is contained in:
d.breimaier
2025-02-12 13:11:19 +01:00
parent 3e1bc43dd2
commit 75e9e2e793
1 changed files with 7 additions and 6 deletions
Download Patch File Download Diff File Expand all files Collapse all files

13
SDL/USTV/ustCntlUSTV_AntragPosition.vb
View File

@@ -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