This commit is contained in:
2022-12-14 21:22:03 +01:00
5 changed files with 103 additions and 35 deletions

View File

@@ -15,7 +15,7 @@ Public Class cBonitaetsauskunft
Property ba_Adresse1 As String = ""
Property ba_Adresse2 As String = ""
Property ba_LetztesBearbeitungsDatum As Object = Nothing
Property ba_BonitaetsIndex As Integer
Property ba_BonitaetsIndex As Object = Nothing
Property ba_GruendundsDatum As Object = Nothing
Property ba_Umsatz As Object = Nothing
Property ba_Mitarbeiter As Object = Nothing
@@ -25,7 +25,9 @@ Public Class cBonitaetsauskunft
Property ba_GFName As Object = Nothing
Property ba_Sonstiges As Object = Nothing
Property ba_Risikostufe As Object = Nothing
Property ba_Risikoklasse As Object = Nothing
Property ba_CreditSaveRisikoklasse As Object = Nothing
Property ba_CreditSaveBonitaetsScore As Object = Nothing
Property ba_CreditSaveBonitaetsIndex As Object = Nothing
Property ba_Pruefungstool As Object = Nothing
@@ -63,8 +65,10 @@ Public Class cBonitaetsauskunft
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))
list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("ba_Risikoklasse", ba_Risikoklasse))
list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("ba_CreditSaveRisikoklasse", ba_CreditSaveRisikoklasse))
list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("ba_Pruefungstool", ba_Pruefungstool))
list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("ba_CreditSaveBonitaetsScore", ba_CreditSaveBonitaetsScore))
list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("ba_CreditSaveBonitaetsIndex", ba_CreditSaveBonitaetsIndex))
Return list
End Function

View File

@@ -49,8 +49,9 @@ Public Class cKundenErweitert
Property EmailAnkunft_Export As Boolean = False
Property EmailFreigabe_Export As Boolean = False
Property kde_BonitaetsStufe As Object = Nothing
Property kde_Bonitaetsklasse As Object = Nothing
Property kde_CreditSaveBonitaetsklasse As Object = Nothing
Property kde_CreditSaveBonitaetsIndex As Object = Nothing
Property kde_CreditSaveBonitaetsScore As Object = Nothing
Property kde_Inkasso_Uebergeben As Boolean = False
Property kde_Inkasso_UebergebenAm As Object = Nothing
Property kde_Inkasso_GemeldeterBetrag As Object = Nothing
@@ -59,7 +60,6 @@ Public Class cKundenErweitert
Property Anmerkungen_Warnhinweis As Object = Nothing
Property kde_VERAG_INTERFACE_ID As Object = Nothing
Property kde_BesonderheitenNeu As Boolean = False
Property kde_InfoAuftragsNr As Object = Nothing
Property kde_KundeFremdspedition As Boolean = False
Property kde_verzolltBei As Object = Nothing
@@ -133,7 +133,9 @@ Public Class cKundenErweitert
list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("kde_FakturierungSR_Details", kde_FakturierungSR_Details))
list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("kde_Fakturierung_Sprache", kde_Fakturierung_Sprache))
list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("kde_TOBB_KundenNr", kde_TOBB_KundenNr))
list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("kde_Bonitaetsklasse", kde_Bonitaetsklasse))
list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("kde_CreditSaveBonitaetsklasse", kde_CreditSaveBonitaetsklasse))
list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("kde_CreditSaveBonitaetsIndex", kde_CreditSaveBonitaetsIndex))
list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("kde_CreditSaveBonitaetsScore", kde_CreditSaveBonitaetsScore))
Return list
End Function