Kaufmännische Software für Handel, Handwerk und Produktionsbetriebe
Modulo11 bildet die Prüfziffer nach dem Modulo11-Verfahren.
function Modulo11(const S: String): Integer;
Modulo11 bildet eine Prüfziffer nach dem Modulo11-Verfahren. S enthält den String, dessen Prüfziffer gebildet werden soll. Modulo11 wird speziell von Banken benutzt um maschinenlesbare Belege zu erstellen.
var S1 : String; i : Integer; S2 : String; begin S1:='1234'; i:=Modulo11(S1); S2:=IntToStr(i); ShowMessage(S2); end;
Regeln zum Nachvollziehen des Scripts finden Sie hier.
Der String-Variablen S1 wird der Text '1234' zugewiesen. Über die Funktion Modulo11 wird die Prüfziffer gebildet und der Variablen i zugewiesen. Über IntToStr wird der Integerwert i in einen anzeigbaren Text S2 gewandelt.