Hasta ahora me valía de los códigos de barra que generaba con una lib, pero...
¿Alguna herramienta para crear código QR???
No se, ya es algo que es necesario e indispensable y no se si hay alguna lib en harbour o Xailer ya tiene su clase para generar esos códigos.
Gracias.
Generar codigo QR
Generar codigo QR
Un Saludo,
Xevi.
Xevi.
Re: Generar codigo QR
Xevi,
Asi lo hago
Saludos,
Asi lo hago
Código: Seleccionar todo
cQrJPG:= "NumFac: " + cDocto + CRLF + ;
"FecFac: " + DToS(oQuery:Fecha_docto) + oQuery:Hora + CRLF + ;
"NitFac: " + acNit[1] + CRLF + ;
"DocAdq: " + acNit_a[1] + CRLF + ;
"ValFac: " + AllTrim(Transform(::oSubtotal:Value-::oDescto:Value,"999999999999.99")) + CRLF + ;
"ValIva: " + AllTrim(Transform(::oIva:Value,"999999999999.99")) + CRLF + ;
"ValOtroIm: "+ AllTrim(Transform(0,"999999999999")) + CRLF + ;
"ValTolFac: " + AllTrim(Transform(nValFacim,"999999999999.99")) + CRLF + ;
"CUFE: " + AllTrim(cCufe) + CRLF + ;
"QRCode: " + IF(aUrl[1,3],AllTrim(aUrl[1,1])+cCufe,AllTrim(aUrl[1,2])+cCufe)
Qr_factura(cQrJPG,"Qrfile.jpg")
/*_____________________________________________________________________________*/
Function Qr_factura(cText,cFile)
Local oBarCode
Local oPic
Local cFileDestino
cFileDestino := cFile
// Borrar el archivo si existe
If File(cFile)
FErase(cFile)
Endif
oBarCode:=TBarcode():Create()
WITH OBJECT oBarCode
:nType := zbQRCODE
:cText := cText
oPic := :GetPicture()
oPic:Save(cFileDestino,1,100)
END WITH
Return nil
Jose David Angulo Urzola
Auditoria y Sistemas Ltda.
Cartagena-Colombia
Auditoria y Sistemas Ltda.
Cartagena-Colombia
Re: Generar codigo QR
FUNCIONA perfecto!!!
Una cosilla, los campos que pones en el QRcode, son los que manda algun reglamento al hacer la factura, que corresponde a
NitFac, DocAdq, CUFE y QRCode
O ¿podemos poner los que nos vengan en gana??? o ¿ponemos los que se requieran en cada situación, entiendo???
Gracias.
Una cosilla, los campos que pones en el QRcode, son los que manda algun reglamento al hacer la factura, que corresponde a
NitFac, DocAdq, CUFE y QRCode
O ¿podemos poner los que nos vengan en gana??? o ¿ponemos los que se requieran en cada situación, entiendo???
Gracias.
Un Saludo,
Xevi.
Xevi.
Re: Generar codigo QR
Hola Xevi,
Si es una normativa para la Facturación electronica en Colombia.
Saludos,
Si es una normativa para la Facturación electronica en Colombia.
Saludos,
Jose David Angulo Urzola
Auditoria y Sistemas Ltda.
Cartagena-Colombia
Auditoria y Sistemas Ltda.
Cartagena-Colombia
- Carlos Ortiz
- Mensajes: 872
- Registrado: Mié Jul 01, 2009 5:44 pm
- Ubicación: Argentina - Córdoba
- Contactar:
Re: Generar codigo QR
Desde que version de Xailer esta disponible esa clase? Gracias
oBarCode:=TBarcode():Create()
oBarCode:=TBarcode():Create()
@dbfarma
www.dbfarma.com.ar
www.dbfarma.com.ar
Re: Generar codigo QR
Carlos,
Si no estoy equivocado, desde Xailer 5.0 que se publicó en el año 2017.
Saludos.
Si no estoy equivocado, desde Xailer 5.0 que se publicó en el año 2017.
Saludos.
- Carlos Ortiz
- Mensajes: 872
- Registrado: Mié Jul 01, 2009 5:44 pm
- Ubicación: Argentina - Córdoba
- Contactar: