Criar Digitos Automaticos(Codigo 30101-9)

Delphi

19/07/2005

Ja vi isto em varios programas feitos em Clipper e gostaria de incluir em minha aplicação Delphi. Em clipper o usuario Informa o Codigo do Cliente e automaticamente e criado um Digito Verificador. Por exemplo digito 30101 e mim aparece o digito 9. Que o verificador. Se alguem poder mim ajudar gostaria de saber como fazer isso, se for uma função como devo chama-la na aplicação. E se e possivel dentro de um Edit por exemplo digitar o numero e aparecer na seguinte mascara [30101-9], usar a virgula do teclado no bloco numerico no lugar do ´ - ´.

Obrigado pela antenção.

São Bernardo do Campo - SP.


Deltakronos

Deltakronos

Curtidas 0

Respostas

Beppe

Beppe

19/07/2005

Sobre a questão do dígito verificador, vc deve bolar uma fórmula que o indique. Atenção ao fato que um código só pode ter um dígito verificador. Por exemplo pode somar os dígitos do código(com algum peso) e e fazer mod 10.


GOSTEI 0
Motta

Motta

19/07/2005

se o bd suporta sequences(generators) e functions :

crie uma sequence
crie uma function que calcula o dv
crie uma function que chama o prox. valor da sequence, calcula seu dv e junta ao valor da sequence

na aplicação chame a 2ª function, ou ainda a chame dentro de uma trigger na tabela requerida


GOSTEI 0
POSTAR