Modulo10 (Pascalscript) #

Beschreibung #

Modulo10 bildet die Prüfziffer nach dem Modulo10-Verfahren.

Syntax #

function Modulo10(const S: String): Integer;

Argumente #

Modulo10 bildet eine Prüfziffer nach dem Modulo10-Verfahren. S enthält den String, dessen Prüfziffer gebildet werden soll. Modulo10 wird speziell von Banken benutzt um maschinenlesbare Belege zu erstellen.

Beispiel #

var
  S1: String;
  i : Integer;
  S2: String;
begin
  S1:='123456';
  i:=Modulo10(S1);
  S2:=IntToStr(i);
  ShowMessage(S2);
end;

Regeln zum Nachvollziehen des Scripts finden Sie hier.

Der String-Variablen S1 wird der Text ‘123456’ zugewiesen. Über die Funktion Modulo10 wird die Prüfziffer gebildet und der Variablen i zugewiesen. Über IntToStr wird der Integerwert i in einen anzeigbaren Text S2 gewandelt.

ShowMessage zeigt: 6