diff --git a/bin/Lib/PABCSystem.pas b/bin/Lib/PABCSystem.pas
index 5b209cd0f..78fc81dd7 100644
--- a/bin/Lib/PABCSystem.pas
+++ b/bin/Lib/PABCSystem.pas
@@ -1598,6 +1598,8 @@ function FormatValue(value: object; NumOfChars: integer): string;
 ///--
 function FormatValue(value: integer; NumOfChars: integer): string;
 ///--
+function FormatValue(value: int64; NumOfChars: integer): string;
+///--
 function FormatValue(value: real; NumOfChars: integer): string;
 ///--
 function FormatValue(value: real; NumOfChars, NumOfSignesAfterDot: integer): string;
@@ -7413,6 +7415,12 @@ begin
   Result := Result.PadLeft(NumOfChars);
 end;
 
+function FormatValue(value: int64; NumOfChars: integer): string;
+begin
+  Result := value.ToString;
+  Result := Result.PadLeft(NumOfChars);
+end;
+
 function FormatValue(value: real; NumOfChars: integer): string;
 begin
   Result := value.ToString(nfi);