ustva, Antragspos

This commit is contained in:
2025-04-22 11:29:08 +02:00
parent c9eeee91a6
commit 735c14c03b
2 changed files with 76 additions and 14 deletions

View File

@@ -574,13 +574,16 @@ Public Class ustCntlUSTV_AntragPosition
Private Sub scanSonstiges_FileAdded(id As String, path As String, name As String) Handles scanSonstiges.FileAdded
getValues(UStV_POS, True)
UStV_POS.UStVPo_daId = id
If UStV_POS.SAVE() Then scanSonstiges.INIT_daId(UStV_POS.UStVPo_daId)
If UStV_POS.SAVE() Then
scanSonstiges.INIT_daId(UStV_POS.UStVPo_daId)
RaiseEvent CHANGED(UStV_POS.UStVPo_ID)
End If
End Sub
Private Sub scanSonstiges_FileDeleted() Handles scanSonstiges.FileDeleted
getValues(UStV_POS, True)
UStV_POS.UStVPo_daId = Nothing
UStV_POS.SAVE()
If UStV_POS.SAVE() Then RaiseEvent CHANGED(UStV_POS.UStVPo_ID)
End Sub