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

ustva, api, fakt.

Browse Source
This commit is contained in:
d.breimaier
2025-02-13 11:23:50 +01:00
parent e7a10aacd8
commit e1d3f84bc2
11 changed files with 770 additions and 575 deletions
Download Patch File Download Diff File Expand all files Collapse all files

12
SDL/USTV/ustCntlUSTV_AntragPosition.vb
View File

@@ -302,7 +302,7 @@ Public Class ustCntlUSTV_AntragPosition
If UStV_Leist.SAVE() Then
btnLeistenderSave.Visible = False
UStV_POS.UStVPo_Leistender = UStV_Leist
UStV_POS.UStVPo_Leistender = UStV_Leist.UStV_Leistender
'RaiseEvent CHANGED(UStV_POS.UStVPo_ID)
values_changed()
End If
@@ -332,7 +332,7 @@ Public Class ustCntlUSTV_AntragPosition
If Not vbYes = MsgBox("Bei diesem Leistenden ist bereits eine Adresse hinterlegt, soll diese Adresse wirklich geändert werden?", vbYesNo) Then
btnLeistenderSave.Visible = False
UStV_POS.UStVPo_Leistender = UStV_Leist
UStV_POS.UStVPo_Leistender = UStV_Leist.UStV_Leistender
'RaiseEvent CHANGED(UStV_POS.UStVPo_ID)
values_changed()
Exit Sub
@@ -342,12 +342,12 @@ Public Class ustCntlUSTV_AntragPosition
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