- conheça também:
acronsoft
acrondesign
DeveloperFlex - Soluções para Desenvolvedores Visual DataFlex
contato@developerflex.com.br | (55 11) 4378-1115
veja também:
A função ValidaCNPJ recebe uma string com um CNPJ e verifica se é um CNPJ é válido fazendo duas verificações:
Integer
A função ValidaCNPJ está definida dentro do pacote ValidaCNPJ.pkg.
Move (ValidaCNPJ({sCNPJ})) to {iRet}
Onde:
Abaixo um exemplo de função que faz a validação do CNPJ e apresenta um erro se o CNPJ não for válido:
Function Valida_CNPJ Integer iCampo String sValor Returns IntegerIf (sValor = "00000000000000" or ValidaCNPJ(sValor) = 0) BeginError Dferr_Operator "Número de CNPJ inválido!"Function_Return 1EndEnd_Function // Valida_CNPJSet Field_Validate_Msg Field Cliente.CNPJ to Get_Valida_CNPJ
2017, ACRONSOFT Gestão da Informação. Todos os direitos reservados.