aaa
This commit is contained in:
Vendored
+1
-1
@@ -29,7 +29,7 @@ function validarCPF(var cpf:string):boolean;
|
||||
|
||||
dig2 := 11 - (soma mod 11);
|
||||
if (dig2 = 10) or (dig2 = 11) then
|
||||
dig2 := 0;
|
||||
gitea@10.0.0.42:iTakinn/cpfs_pascal.git dig2 := 0;
|
||||
|
||||
ValidarCPF :=
|
||||
(dig1=(Ord(cpf[10])-48)) and (dig2=(Ord(cpf[11])-48));
|
||||
|
||||
Reference in New Issue
Block a user