![]() |
IBAN berechnen
hallo zusammen,
im Netz gibts ja diverse Links zur Iban-Bberechnung. Gibt es sowas auch irgendow zur Einbindung in eine Delphi/Lazarus-Routine OHNE Netzverbindung? Danke Gruss KHH |
AW: IBAN berechnen
Hallo,
Kannst dir doch eigentlich selbst was bauen oder? ![]() |
AW: IBAN berechnen
Zitat:
|
AW: IBAN berechnen
Zitat:
|
AW: IBAN berechnen
Zitat:
Gruss KH |
AW: IBAN berechnen
Hier hab ich mal die Kernfunktion "Modulo 97" entworfen.
Delphi-Quellcode:
Und hier noch die Test-Cases.
// Berechne Modulo 97 Prüfziffer
// wird für IBAN benötigt function Modulo97PruefZiffer(const X:string):Integer; const m36:string = '0123456789ABCDEFGHIJKLMNOPQRSTUVWXYZ'; var i, p : Integer; begin Result := 0; for i := 1 to Length(X) do begin p := Pos(X[i], m36) ; if p = 0 then raise Exception.CreateFmt('Modulo97PruefZiffer(%s): invalid data', [X]); Dec(p); if p > 9 then begin Result := Result * 10 + (p div 10); p := p mod 10; end; Result := Result * 10 + p; Result := Result mod 97; end; end; Die Funktion ist also getestet und dürfte korrekt sein.
Delphi-Quellcode:
Assert(Modulo97PruefZiffer('50000')=45);
Assert(Modulo97PruefZiffer('210501700012345678131468')=1); Assert(Modulo97PruefZiffer('210501700012345678DE68')=1); |
AW: IBAN berechnen
Liste der Anhänge anzeigen (Anzahl: 2)
In der Anlage sind einige Programmbeispiele zur
Berechnung der IBAN und zur Ermittlung des BIC aud Datenbank der Deutschen Bundesbank. Datei BLZ97.zip format EXCEL 97 - 2003. Erläuterungen zu den Funktionen und Programmen in der README Datei im Verzeichnis. :lol: |
AW: IBAN berechnen
Also wenn ich das hier lese:
![]() bin ich mir nicht sicher, ob die Berechnung der IBAN nicht doch komplizierter ist als gedacht. Zitat:
|
AW: IBAN berechnen
Vielen Dank an YogiBär! Alle Achtung :=)
Immer noch nützlich auch im Jahr 2021!! |
AW: IBAN berechnen
Bin gerade auf diesen älteren Beitrag gestoßen:
Habe ich das jetzt richtig verstanden, dass die von Yogi-Bär gezeigte Berechnungsmethode zur Generierung der IBAN nicht immer richtig sein muss, weil viele Banken eigene bzw. abweichende Methoden zur Generierung der IBAN verwenden? Wenn das richtig wäre, dann müsste man also so etwas wie hier ( ![]() |
Alle Zeitangaben in WEZ +1. Es ist jetzt 19:58 Uhr. |
Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz