Kundenkontakte, Mitarbeiter, Bonitaetsauskungt, FIBU, Creditsafe

This commit is contained in:
2024-09-12 09:44:32 +02:00
parent 5f65123413
commit 708bdcf5d1
9 changed files with 289 additions and 241 deletions

View File

@@ -33,8 +33,11 @@ Public Class cBonitaetsauskunft
Property ba_Geschaeftszweck As Object = Nothing
Property ba_GSName As Object = Nothing
Property ba_UID As String = ""
Property ba_forcedRequest As Boolean = False
Property ba_CScounterBeforeRequest As Integer = 0
Property ba_CScounterAfterRequest As Integer = 0
Property ba_CSmax As Integer = 0
Property ba_CScountry As String = ""
Dim SQL As New SQL
@@ -80,6 +83,10 @@ Public Class cBonitaetsauskunft
list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("ba_GSName", ba_GSName))
list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("ba_UID", ba_UID))
list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("ba_forcedRequest", ba_forcedRequest))
list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("ba_CScounterBeforeRequest", ba_CScounterBeforeRequest))
list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("ba_CScounterAfterRequest", ba_CScounterAfterRequest))
list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("ba_CSmax", ba_CSmax))
list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("ba_CScountry", ba_CScountry))
Return list
End Function