Hola.
Si usas el FoxBarcode te lo calcula automáticamente, solo envías como cadena
los 39 dígitos y te genera el Código de barra.
Luis Guayan uno de los autores de FoxBarcode subió la función q utiliza p el
cálculo, q te la adjunto:
*------------------------------------------------------
* PROCEDURE CheckDigitEan(tcText)
*------------------------------------------------------
* Calculates check digit for EAN, UPC and I2of5
*------------------------------------------------------
PROCEDURE CheckDigitEan(tcText)
LOCAL lnSum, lnI, lnJ
STORE 0 TO m.lnSum, m.lnJ
FOR m.lnI = LEN(m.tcText) TO 1 STEP - 1
m.lnJ = m.lnJ + 1
m.lnSum = m.lnSum + (VAL(SUBSTR(m.tcText, m.lnI, 1)) * IIF(MOD(m.lnJ, 2)
= 0, 1, 3))
ENDFOR
RETURN TRANSFORM(MOD(10 - MOD(m.lnSum, 10), 10))
ENDPROC
*------------------------------------------------------
Saludos.
Esteban.
De: GUFA@mug.org.ar [mailto:GUFA@mug.org.ar] En nombre de Marcelo Espinosa
Enviado el: domingo, 28 de junio de 2015 09:09 p.m.
Para: GUFA List Member
Asunto: [GUFA] Consulta
El código de barras debe ser Interleave 2of5 y debe contener:
aunume = cuit del emisor + tipo comprobante + punto de venta + cae + vcto. cae
&& esto suma 39 posiciones
pares=0
impares=0
FOR i=1 TO 39
IF MOD(i,2)=0
pares=pares+VAL(SUBSTR(aunume,i,1))
ELSE
impares=impares+VAL(SUBSTR(aunume,i,1))
ENDIF
ENDFOR
etapa2=impares*3
etapa4=etapa2+pares
IF MOD(etapa4,10)=0
dig_verif=0
else
dig_verif=10-MOD(etapa4,10)
ENDIF
num_barras=aunume+STR(dig_verif,1)
Saludos
Marcelo
_____
De: Ricardo Ruben Benitez <ricardo_priv...@yahoo.com.ar>
Para: GUFA List Member <GUFA@mug.org.ar>
Enviado: Domingo, 28 de junio, 2015 18:07:57
Asunto: [GUFA] Consulta
Hola, alguien tiene las fuentes para generar el código de barras de la factura.
Que tipo de código es?. Tienen alguna rutina para generarlo?.
Me habian dicho que no era necesario pero parece que si.
Gracias.
rrb-calo
El Viernes, 26 de junio, 2015 17:30:54, Cristian Conte
<ocristianco...@yahoo.com.ar> escribió:
Gracias, efectivamente, era un problema de mi certificado.
Muchas Gracias por responder.
Cristian Conte
_____
De: Ruben Duarte <rubendua...@hydsolutions.com.ar>
Para: GUFA List Member <GUFA@mug.org.ar>
Enviado: Viernes, 26 de junio, 2015 16:15:19
Asunto: [GUFA] Consulta
Yo hoy estuve generando comprobantes en modo Homologacion sin problemas
De: GUFA@mug.org.ar [mailto:GUFA@mug.org.ar] En nombre de Cristian Conte
Enviado el: viernes, 26 de junio de 2015 03:14 p.m.
Para: GUFA List Member
Asunto: [GUFA] Consulta
Buenas Tardes:
Saben si esta tirando error la pagina de pagina en modo homologacion, por que
me esta validando ningun comprobante, y hasta ayer no tuve problemas.
Gracias.
Cristian Conte
