Segue abaixo código de minha autoria para validação de CPF/CNPJ.
FUNCTION validaCPF RETURNS LOGICAL
( INPUT p-cpf AS CHAR ):
DEF VAR c-cpf AS CHAR NO-UNDO EXTENT 2.
DEF VAR i-count AS INT NO-UNDO.
DEF VAR i-mult AS...
-
Anuncie Aqui ! Entre em contato fdantas@4each.com.br -
-