diff --git a/SDL/USTV/frmMDM_USTVAntrag.vb b/SDL/USTV/frmMDM_USTVAntrag.vb
index def7a4b2..412dbefb 100644
--- a/SDL/USTV/frmMDM_USTVAntrag.vb
+++ b/SDL/USTV/frmMDM_USTVAntrag.vb
@@ -2043,13 +2043,19 @@ Public Class frmMDM_USTVAntrag
         If UStVPo_ID > 0 Then
             Dim ANTR_POS As New VERAG_PROG_ALLGEMEIN.cUStVPositionen(USTV_ANTRAG.UStVAn_ID, UStVPo_ID)
 
-            Dim ANTR_Leistender As New VERAG_PROG_ALLGEMEIN.cUStVLeistender(ANTR_POS.UStVPo_Leistender)
-            If Not IsDBNull(ANTR_POS.UStVPo_LeistenderId) AndAlso ANTR_POS.UStVPo_LeistenderId > 0 Then
-                ANTR_Leistender = New VERAG_PROG_ALLGEMEIN.cUStVLeistender(ANTR_POS.UStVPo_LeistenderId)
+            If ANTR_POS.UStVPo_Leistender IsNot Nothing Then
+                Dim ANTR_Leistender As New VERAG_PROG_ALLGEMEIN.cUStVLeistender(ANTR_POS.UStVPo_Leistender)
+                If Not IsDBNull(ANTR_POS.UStVPo_LeistenderId) AndAlso ANTR_POS.UStVPo_LeistenderId > 0 Then
+                    ANTR_Leistender = New VERAG_PROG_ALLGEMEIN.cUStVLeistender(ANTR_POS.UStVPo_LeistenderId)
+                End If
+                UstCntlUSTV_AntragPosition1.Enabled = True
+                UstCntlUSTV_AntragPosition1.setValues(USTV_ANTRAG.UStVAn_KuNr, ANTR_POS, Antrag_LandKz, ANTR_Leistender, atez_api)
+            Else
+                UstCntlUSTV_AntragPosition1.Enabled = True
+                UstCntlUSTV_AntragPosition1.setValues(USTV_ANTRAG.UStVAn_KuNr, ANTR_POS, Antrag_LandKz, Nothing, atez_api)
             End If
 
-            UstCntlUSTV_AntragPosition1.Enabled = True
-            UstCntlUSTV_AntragPosition1.setValues(USTV_ANTRAG.UStVAn_KuNr, ANTR_POS, Antrag_LandKz, ANTR_Leistender, atez_api)
+
         Else
             UstCntlUSTV_AntragPosition1.reset()
             UstCntlUSTV_AntragPosition1.Enabled = False
diff --git a/SDL/USTV/ustCntlUSTV_AntragPosition.vb b/SDL/USTV/ustCntlUSTV_AntragPosition.vb
index 7dd75c86..35e441e0 100644
--- a/SDL/USTV/ustCntlUSTV_AntragPosition.vb
+++ b/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
 
diff --git a/VERAG_PROG_ALLGEMEIN/Classes/USTV/cUStVLeistender.vb b/VERAG_PROG_ALLGEMEIN/Classes/USTV/cUStVLeistender.vb
index 43af32eb..e84a1917 100644
--- a/VERAG_PROG_ALLGEMEIN/Classes/USTV/cUStVLeistender.vb
+++ b/VERAG_PROG_ALLGEMEIN/Classes/USTV/cUStVLeistender.vb
@@ -19,16 +19,19 @@ Public Class cUStVLeistender
         Dim SQL As New SQL
 
     Sub New(UStV_Leistender As String, Optional searchbyUID As Boolean = False)
-        If Not searchbyUID Then
-            Me.UStV_Leistender = UStV_Leistender
-            LOAD()
+        If UStV_Leistender <> "" Then
+            If Not searchbyUID Then
+                Me.UStV_Leistender = UStV_Leistender
+                LOAD()
 
-        Else
-            Me.UstV_Leistender_UstNr = UStV_Leistender
-            LOADBYUID()
+            Else
+                Me.UstV_Leistender_UstNr = UStV_Leistender
+                LOADByUID()
 
+            End If
         End If
 
+
     End Sub
 
     Sub New(Id As Integer)