pyqr con VFP

533 views
Skip to first unread message

Hugo Baieli

unread,
Feb 19, 2021, 11:22:30 AM2/19/21
to PyAfipWs Factura Electrónica Libre y temas relacionados AFIP ARBA ANMAT
hola logre instalar pyqr, para implemertarlo tome un ej en vbasic como guia
pero no pude, alguien tiene algun ejemplo en vfp de como implementarlo en el momento de  formar la imagen
gracias

Jose Oscar Vogel

unread,
Feb 19, 2021, 12:16:38 PM2/19/21
to pyaf...@googlegroups.com
buenas tardes


si es asi lo unico que tendrias que hacer es pegar un obejto ole en un reporte y asignarle una variable que si la haces publica bien podrias poner pyqr.archivo y ya con eso tenes la imagen en el reporte

saludos

--
Proyecto PyAfipWs Factura Electrónica Libre y temas relacionados AFIP ARBA ANMAT:
http://www.pyafipws.com.ar/ - http://www.github.com/reingart/pyafipws - http://www.sistemasagiles.com.ar/
---
Has recibido este mensaje porque estás suscrito al grupo "PyAfipWs Factura Electrónica Libre y temas relacionados AFIP ARBA ANMAT" de Grupos de Google.
Para cancelar la suscripción a este grupo y dejar de recibir sus mensajes, envía un correo electrónico a pyafipws+u...@googlegroups.com.
Para ver esta conversación en el sitio web, visita https://groups.google.com/d/msgid/pyafipws/8a2c1f27-5cab-42af-b2e3-b347060d5010n%40googlegroups.com.


--
Prof. Jose Oscar Vogel
Garuhapé - Misiones
CP 3334
Cel: 03743-15667526
MSN: oscar...@gmail.com
Twitter: @ovogel23
Facebook: oscarvogel

Hugo Baieli

unread,
Feb 19, 2021, 3:32:55 PM2/19/21
to PyAfipWs Factura Electrónica Libre y temas relacionados AFIP ARBA ANMAT
gracias Oscar, mira arme esta rutina pero no pasa del tipo de imagen use png y jpeg
te mando el ejemplo para que lo mires
  
procedure armaqr
  pyqr = CreateObject("PyQR")
  * Establecer tipo de imagen (PNG o JPEG):
  PyQR.Extension = "PNG"
  *' Generar un nombre de archivo temporal para la imagen:
  archivo = pyqr.CrearArchivo
  *' Alternativo: Especificar ubicación y extensión
  pyqr.archivo = "C:\pyafipws\archivo.PNG"

 ver = 1
 fecha = "2020-10-13"
 cuit = 30000000007
 pto_vta = 10
 tipo_cmp = 1
 nro_cmp = 94
 importe = 12100
 moneda = "PES"
 ctz = 1
 tipo_doc_rec = 80
 nro_doc_rec = 20000000001
 tipo_cod_aut = "E"
 cod_aut = 70417054367476
 
 ok=pyqr.GenerarImagen(ver, fecha, cuit, pto_vta, tipo_cmp, nro_cmp, _
                         importe, moneda, ctz, tipo_doc_rec, nro_doc_rec, _
                         tipo_cod_aut, cod_aut)
   
 return

gracias

Jose Oscar Vogel

unread,
Feb 20, 2021, 5:27:12 AM2/20/21
to pyaf...@googlegroups.com
buen dia

te paso la rutina que tengo armada y que me funciona perfecto

Function GeneraQRFE(fecha,cuit,pto_vta, tipo_cmp, nro_cmp,;
importe, moneda, ctz,;
tipo_doc_rec, nro_doc_rec,;
tipo_cod_au, cod_aut)
Local lsArchivo

pyqr = Createobject("PyQR")
version_qr = 1
*-' cuit, tipo_cbte, punto_vta, cae, fch_venc_cae
pyqr.CrearArchivo()
pyqr.GenerarImagen(m.version_qr, m.fecha, m.cuit, m.pto_vta, m.tipo_cmp, m.nro_cmp,;
m.importe, m.moneda, m.ctz,;
m.tipo_doc_rec, Strtran(m.nro_doc_rec, '-', ''),;
m.tipo_cod_au, m.cod_aut)
Return pyqr.Archivo

Endfunc

fijate que ahi estoy retornando el archivo que genera y ese es el que pongo en el reporte

espero te sirva eso

saludos

Libre de virus. www.avast.com



--
Prof. Jose Oscar Vogel
Garuhapé - Misiones
CP 3334
Cel: 03743-15667526
MSN: oscar...@gmail.com
Twitter: @ovogel23
Facebook: oscarvogel


Libre de virus. www.avast.com

Hugo Baieli

unread,
Feb 22, 2021, 3:55:17 PM2/22/21
to PyAfipWs Factura Electrónica Libre y temas relacionados AFIP ARBA ANMAT
Gracias Jose, pero no me funciono, igual sigo probando
saludos

Jose Oscar Vogel

unread,
Feb 22, 2021, 4:01:14 PM2/22/21
to pyaf...@googlegroups.com
buenas

cual es el error que te arroja?

saludos

Hugo Baieli

unread,
Feb 22, 2021, 4:12:05 PM2/22/21
to PyAfipWs Factura Electrónica Libre y temas relacionados AFIP ARBA ANMAT
Jose yo trabajo con vfp6 no usa strtran que usas, igual no entiendo algo porque le pasas un parametro  version y despues usas m.version
gracias

Jose Oscar Vogel

unread,
Feb 22, 2021, 4:15:18 PM2/22/21
to pyaf...@googlegroups.com
error mio eso, esta mal si, no se si la version seis usa chrtran, cumple la misma funcion

saludos

Libre de virus. www.avg.com

hugo baieli

unread,
Feb 23, 2021, 7:56:54 AM2/23/21
to pyaf...@googlegroups.com
Jose no hay problema, si usa el chrtran , hay que reemplazar caracteres antes de enviar ? 
Saludos


El lun., 22 de feb. de 2021 a la(s) 6:15 p.m., Jose Oscar Vogel
<oscar...@gmail.com> escribió:
Has recibido este mensaje porque estás suscrito a un tema del grupo "PyAfipWs Factura Electrónica Libre y temas relacionados AFIP ARBA ANMAT" de Grupos de Google.
Para cancelar la suscripción a este tema, visita https://groups.google.com/d/topic/pyafipws/PVL4wpN98Bo/unsubscribe.
Para cancelar la suscripción a este grupo y a todos sus temas, envía un correo electrónico a pyafipws+u...@googlegroups.com.

Para ver esta conversación en el sitio web, visita

Jose Oscar Vogel

unread,
Feb 23, 2021, 8:04:24 AM2/23/21
to pyaf...@googlegroups.com
el cuit debe llegar sin guiones, yo para asegurarme que sea asi lo hago dentro de la funcion

saludos

hugo baieli

unread,
Feb 23, 2021, 8:35:38 AM2/23/21
to pyaf...@googlegroups.com
Si esta pasando como dato fijo sin guiones como esta en el ejemplo, pero igual en tu rutina o en la que arme desde es ejemplo, el problema esta en el pyqr.GenerarImagen cuando llega ahi explota , nose 
El mar., 23 de feb. de 2021 a la(s) 10:04 a.m., Jose Oscar Vogel
<oscar...@gmail.com> escribió:

Jose Oscar Vogel

unread,
Feb 23, 2021, 8:51:11 AM2/23/21
to pyaf...@googlegroups.com
y cual es el error que te da, tenes una captura, xq generalmente te da una idea de que linea en python esta el error, entonces hay que abrir el proyecto en python de pyafipws y mirar esa linea

saludos

Libre de virus. www.avast.com

hugo baieli

unread,
Feb 23, 2021, 10:21:52 AM2/23/21
to pyaf...@googlegroups.com
No especifica porque manda el error fatal excepción code 0000005 y se cierra todo, que es el mismo que manda cuando hay problemas con afip 
El mar., 23 de feb. de 2021 a la(s) 10:51 a.m., Jose Oscar Vogel
<oscar...@gmail.com> escribió:

pjpe...@gmail.com

unread,
Feb 23, 2021, 2:58:10 PM2/23/21
to PyAfipWs Factura Electrónica Libre y temas relacionados AFIP ARBA ANMAT
Fijate de hacer estas pruebas:

1) Revisa que cuando instancias el objeto, este se haya podido hacer:
       pyqr = CreateObject("PyQR")

es decir que el objeto pyqr exista y no sea null

2)  Proba de anular estas 2 lineas que te marco debajo:
procedure armaqr
  pyqr = CreateObject("PyQR")
  * Establecer tipo de imagen (PNG o JPEG):
// ANULAR   PyQR.Extension = "PNG"
  *' Generar un nombre de archivo temporal para la imagen:
// ANULAR   archivo = pyqr.CrearArchivo
  *' Alternativo: Especificar ubicación y extensión
  pyqr.archivo = "C:\pyafipws\archivo.PNG"

hugo baieli

unread,
Feb 23, 2021, 3:27:43 PM2/23/21
to pyaf...@googlegroups.com
Si claro fui pausando cada linea y el error surge al ejecutarse el pyqr.GenerarInagen
Gracias 
El mar., 23 de feb. de 2021 a la(s) 4:58 p.m., pjpe...@gmail.com
<pjpe...@gmail.com> escribió:

Grupo E.I.Sis. Tucumán

unread,
Feb 24, 2021, 11:22:37 PM2/24/21
to PyAfipWs Factura Electrónica Libre y temas relacionados AFIP ARBA ANMAT
Con este ejemplo en VFP 6 pude adaptar mis viejos sistemas para le generación de QR

*-- ejemplo pyQR
CLEAR
*-- Objeto
pyQr = CreateObject("PyQR")
*-- Definir la extension del archivo de imagen
pyQr.Extension = "BMP"
*-- Crea el archivo de imagen
lcArchivo = pyqr.CrearArchivo
*-- Datos del Cbte
ver = 1
fecha = "2020-10-13"
cuit = 30000000007
pto_vta = 10
tipo_cmp = 1
nro_cmp = 94
importe = 12100
moneda = "DOL"
ctz = 65
tipo_doc_rec = 80
nro_doc_rec = 20000000001
tipo_cod_aut = "E"
cod_aut = 70417054367476
*-- Generar la imagen
lcUrl = pyqr.GenerarImagen(ver, fecha, cuit, pto_vta, tipo_cmp, nro_cmp, ;
                         importe, moneda, ctz, tipo_doc_rec, nro_doc_rec, ;
                         tipo_cod_aut, cod_aut)
*-- Creo un cursor para guardar la imagen y despues mandarla a un reporte
CREATE CURSOR Temp_PyQR(txt_qr Memo, bmp_qr General)
APPEND BLANK
REPLACE Temp_PyQR.txt_qr WITH lcURL
APPEND GENERAL Temp_PyQR.bmp_qr FROM &lcArchivo
BROWSE  

Hugo Baieli

unread,
Feb 25, 2021, 2:28:08 PM2/25/21
to PyAfipWs Factura Electrónica Libre y temas relacionados AFIP ARBA ANMAT
gracias, pero igual sigue dando error en el generarimagen, el pyqr.extension da error, lo saque, sigue pero se clava en generar, de hecho la rutina
la puse despues de una consulta de comprobante que me retorna los datos bien, pero nada
gracias saludos

maria...@gmail.com

unread,
Feb 26, 2021, 1:31:13 PM2/26/21
to PyAfipWs Factura Electrónica Libre y temas relacionados AFIP ARBA ANMAT
Y cuál es el error que te da?

Dario Deon

unread,
Feb 26, 2021, 1:31:40 PM2/26/21
to PyAfipWs Factura Electrónica Libre y temas relacionados AFIP ARBA ANMAT
Buenas Hugo, ver tu código en FOX
ok=pyqr.GenerarImagen(ver, fecha, cuit, pto_vta, tipo_cmp, nro_cmp, _
                         importe, moneda, ctz, tipo_doc_rec, nro_doc_rec, _
                         tipo_cod_aut, cod_aut)

colocar TODO en una linea o ver ;

Yo no pude tocar nada, me falta instalar el PyQR.exe
Saludos

hugo baieli

unread,
Feb 26, 2021, 2:35:56 PM2/26/21
to pyaf...@googlegroups.com
Si Dario, lo puse en una linea, tambien con ;
y nada
Gracias saludos
El vie., 26 de feb. de 2021 a la(s) 3:31 p.m., Dario Deon
<dari...@gmail.com> escribió:
Has recibido este mensaje porque estás suscrito a un tema del grupo "PyAfipWs Factura Electrónica Libre y temas relacionados AFIP ARBA ANMAT" de Grupos de Google.
Para cancelar la suscripción a este tema, visita https://groups.google.com/d/topic/pyafipws/PVL4wpN98Bo/unsubscribe.
Para cancelar la suscripción a este grupo y a todos sus temas, envía un correo electrónico a pyafipws+u...@googlegroups.com.

Para ver esta conversación en el sitio web, visita

asr

unread,
Feb 27, 2021, 1:49:30 PM2/27/21
to PyAfipWs Factura Electrónica Libre y temas relacionados AFIP ARBA ANMAT
Presupongo que estás en windows. Puedes probar ejecutar desde el CMD el archivo pyqr.exe dentro de la carpeta dónde instalaste el PyAfipWs. Debería generartun un QR de prueba o bien darte un error más descriptivo.
En mi caso me fallaba en generarimagen y se resolvió instalando la versión de Pillow 4.0.0 y volviendo a generar el instalador.

Hugo Baieli

unread,
Mar 1, 2021, 8:14:54 AM3/1/21
to PyAfipWs Factura Electrónica Libre y temas relacionados AFIP ARBA ANMAT
hola, no tengo idea de python, solo sigo las instrucciones, en los requerimientos no menciona a pillow, solo a pil, nose si es lo mismo, yo no armo instalador, y otra cosa busque el pyqr.exe por todos lados y no lo encuentro. 
gracias igual, saludos

pbo...@gmail.com

unread,
Mar 1, 2021, 9:30:59 AM3/1/21
to PyAfipWs Factura Electrónica Libre y temas relacionados AFIP ARBA ANMAT
Hola a todos, se puede compilar solamente e. pyqr.py en pyqr.exe y llamarlo yo desde Visual Basic 6 sin tener que recompilar todo el PyAfipws??

alansc...@gmail.com

unread,
Mar 20, 2021, 2:30:17 PM3/20/21
to PyAfipWs Factura Electrónica Libre y temas relacionados AFIP ARBA ANMAT
Hola a todos, me funciono el método de desinstalar Pillow e instalar la versión 4.0.0. Me sucedió en una Pc con Windows XP, en otros Windows no tuve problemas.
En la linea de comando ejecute:

pip uninstall Pillow
pip install Pillow==4.0.0

Espero que a alguien le sirva, saludos.

loa...@gmail.com

unread,
Apr 5, 2021, 6:42:36 AM4/5/21
to PyAfipWs Factura Electrónica Libre y temas relacionados AFIP ARBA ANMAT
Hola a todos,

tengo un probelma similar. Cuando ejecuto "python pyfepdf.py --prueba --mostrar" todo funciona bien. Pero al ejecutarlo de desde mi codigo VB o en un VBS se genera un "PNG" vacio y obtengo el error:

"The _imaging C module is not installed"

Alguien tuvo este error o sabe como solucionarlo?

Muchas gracias!

Eitel Sponton

unread,
Apr 6, 2021, 10:19:36 AM4/6/21
to PyAfipWs Factura Electrónica Libre y temas relacionados AFIP ARBA ANMAT
PyQR = CREATEOBJECT("PyQR") 

xRutaArchivo = pyqr.CrearArchivo

ver = 1
xfechaqr = STRTRAN(STR(YEAR(fecha),4) +"-"+ STR(MONTH(fecha)),2) +"-"+ STR(DAY(fecha)),2)," ","0")
cuit = xCuitEmpesa
pto_vta = xPtoVta
tipo_cmp = xTipoCompr
nro_cmp = cbt_desde
importe = xTotal
moneda = "PES"
ctz = 1
tipo_doc_rec = xTipoCuit
nro_doc_rec = xCuit
tipo_cod_aut = "E"
cod_aut = xCae


url = pyqr.GenerarImagen(ver, xfechaqr, cuit, pto_vta, tipo_cmp, nro_cmp, importe, moneda, ctz, tipo_doc_rec, nro_doc_rec, tipo_cod_aut, cod_aut)

Con eso genero el Archivo .png.
Reply all
Reply to author
Forward
0 new messages