fix

SDL/USTV/ustCntlUSTV_AntragPosition.vb

@@ -89,12 +89,18 @@ Public Class ustCntlUSTV_AntragPosition
         txtNettobetragEUR.Text = ValueOrEmpty(UStV_POS.UStVPo_NettobetragEUR)
         lblSachbearbeiter.Text = ValueOrEmpty(UStV_POS.UStVPo_Sachbearbeiter)
 
-        sbLeistender.Text = UStV_Leitender.UStV_Leistender
-        If IsNumeric(UStV_Leitender.UStV_LeistenderId) Then
-            sbLeistender._value = UStV_Leitender.UStV_LeistenderId
+        If UStV_Leitender IsNot Nothing Then
+            sbLeistender.Text = UStV_Leitender.UStV_Leistender
+            If IsNumeric(UStV_Leitender.UStV_LeistenderId) AndAlso UStV_Leitender.UStV_LeistenderId > 0 Then
+                sbLeistender._value = UStV_Leitender.UStV_LeistenderId
+                sbLeistender_VALUE_CHANGED()
+            Else
+                sbLeistender._value = -1
+            End If
         End If
 
-        sbLeistender_VALUE_CHANGED()
+
+
         loadChangedDSToPanel(UStV_Leitender, True)
         API = atez_api