Tipo: Processamento
Calcula o dígito de controle para o código EAN usado em códigos de barras.
Sintaxe
EanDigito(cCod)
Parâmetros
cCod – Código de barras para o cálculo do dígito. É obrigatório o tamanho de 12 dígitos.
Retorna
cEan – Retorna o código EAN de 13 dígitos, sendo que a última posição é o dígito calculado.
Exemplo
// Exemplo de uso da funcao EANDIGITO:
// Gatilho
// Dom.: B1_CODBAR
// CtaDom.: B1_CODBAR
// Regra: Eandigito(PADL(AllTrim(M->B1_CODBAR),12,”0″))
// Ou usado em um programa AdvPL:
cCod := EanDigito(PADL(AllTrim(M->B1_CODBAR),12,”0″))
cDig := Substr(cCod,12,1)
Alert(“O digito calculado e’: “+cDig)
Return
Estude para provas de certificações em TI com os simulados Bynem