neu

VERAG_PROG_ALLGEMEIN/Classes/cBonitaetsauskunft.vb

@@ -24,7 +24,7 @@ Public Class cBonitaetsauskunft
     Property ba_Zahlungsweise As Object = Nothing
     Property ba_GFName As Object = Nothing
     Property ba_Sonstiges As Object = Nothing
-
+    Property ba_Risikostufe As Object = Nothing
 
     Dim SQL As New SQL
 
@@ -59,6 +59,7 @@ Public Class cBonitaetsauskunft
         list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("ba_Zahlungsweise", ba_Zahlungsweise))
         list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("ba_GFName", ba_GFName))
         list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("ba_Sonstiges", ba_Sonstiges))
+        list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("ba_Risikostufe", ba_Risikostufe))
 
         Return list
     End Function