Página 1 de 1
Calculo Digito Verificador NF-e em Clipper
Enviado: 23 Fev 2010 14:16
por Edenilson Santos
Olá boa tarde a todos do forum, estou com dificuldades em criar a rotina pro calculo do digito verificador que compõe o nome do xml a ser gerado pra NF-e, alguém teria essa rotina pro calculo pronta pra clipper,
Se alguém puder me ajudar , podem me mandar no meu e-mail:
es.sistemas@terra.com.br
Desde já agradeço a todos
Re: Calculo Digito Verificador NF-e em Clipper
Enviado: 23 Fev 2010 14:40
por sygecom
Olá Edenilson,
Post sua dificuldade.
E veja esse link abaixo que ajuda muito nesse processo e é bem facil de se entender:
http://www.caiooliveira.com.br/?p=11
Re: Calculo Digito Verificador NF-e em Clipper
Enviado: 23 Fev 2010 14:53
por Toledo
Olá Edenilson, veja o tópico abaixo:
https://pctoledo.org/forum/viewto ... 669#p54948
Função Modulo 11:
Código: Selecionar todos
function Modulo11(cStr,nPeso1,nPeso2)
local nTot := 0
local nMul := nPeso1
local i
*
for i := Len(cStr) to 1 step -1
nTot += Val(SubStr(cStr,i,1)) * nMul
nMul := if(nMul=nPeso2, nPeso1, nMul+1)
next
return if(nTot%11 < 2, "0", Str(11-(nTot%11),1))
Exemplo de uso da função:
Código: Selecionar todos
cChave:="3510020012879100013055001000003011000003011"
vDig:=Modulo11(cChave,2,9)
cChave+=vDig
Abraços,