Timas, MDM Datenverarbeitung (Asfinag), UID-Nr bei Creditsafe
This commit is contained in:
@@ -2817,6 +2817,7 @@ Public Class usrCntlKundenuebersicht
|
||||
cBonitaetsauskunft.ba_CreditSaveBonitaetsIndex = Nothing
|
||||
cBonitaetsauskunft.ba_CreditSaveRisikoklasse = Nothing
|
||||
|
||||
|
||||
cBonitaetsauskunft.ba_KundenNr = (kdNr)
|
||||
cBonitaetsauskunft.ba_Datum = Now()
|
||||
|
||||
@@ -2848,6 +2849,7 @@ Public Class usrCntlKundenuebersicht
|
||||
cBonitaetsauskunft.ba_Hoechstkredit = 0
|
||||
End If
|
||||
|
||||
cBonitaetsauskunft.ba_UID = company.vatNo
|
||||
cBonitaetsauskunft.ba_Bankverbindung = company.csBank
|
||||
cBonitaetsauskunft.ba_Zahlungsweise = ""
|
||||
cBonitaetsauskunft.ba_GFName = company.csCEO
|
||||
@@ -2992,6 +2994,14 @@ Public Class usrCntlKundenuebersicht
|
||||
setCreditSafeEntry(company, pdfObject, kdNr)
|
||||
End If
|
||||
|
||||
If company.vatNo <> "" AndAlso checkNullStr(ADRESSE.UstIdKz) = "" AndAlso checkNullStr(ADRESSE.UstIdNr) = "" Then
|
||||
'set and check uid nr
|
||||
|
||||
|
||||
End If
|
||||
|
||||
|
||||
|
||||
End Sub
|
||||
|
||||
|
||||
|
||||
Reference in New Issue
Block a user