FiveTech Support Forums

FiveWin / Harbour / xBase community
Board index FiveWin para Harbour/xHarbour QR en PDF con HARU
Posts: 1710
Joined: Tue Oct 28, 2008 06:26 PM
QR en PDF con HARU
Posted: Wed Oct 11, 2023 10:08 PM
Mr. RAO

With Haru it does not place the QR with the desired size in PDF, in Preview Perfect

Con Haru no coloca el QR con el tamaño deseado en el PDF en vista previa perfecto
Code (fw): Select all Collapse
cCode:="TEXTO DEL CODIGO QR"
@1.1,4.4  PRINT TO oPrn TEXT cCode AS BARCODE TYPE "QR" SIZE 2.8,2.8 CM
Thanks for the help
Saludos,



Adhemar C.
Posts: 8515
Joined: Tue Dec 20, 2005 07:36 PM
Re: QR en PDF con HARU
Posted: Wed Oct 11, 2023 11:36 PM
Prueba:
Code (fw): Select all Collapse
C:\fwh..\samples\barcod01.prg
https://fivetechsoft.com/forums/viewtopic.php?p=220740

Regards, saludos.
João Santos - São Paulo - Brasil - Phone: +55(11)95150-7341
Posts: 1710
Joined: Tue Oct 28, 2008 06:26 PM
Re: QR en PDF con HARU
Posted: Thu Oct 12, 2023 12:19 PM

Gracias estimado Joao

El barcod01.prg funciona perfecto.

El problema es cundo se utiliza HARU

Saludos,



Adhemar C.
Posts: 1344
Joined: Wed Nov 16, 2005 09:14 PM
Re: QR en PDF con HARU
Posted: Mon Oct 16, 2023 02:43 AM

Ademar:

A mi me funciona bien así como lo tienes, incluyendo

REQUEST FWHARU

REQUEST FWZEBRA

Posts: 1710
Joined: Tue Oct 28, 2008 06:26 PM
Re: QR en PDF con HARU
Posted: Mon Oct 16, 2023 02:00 PM
Estimado Cesar

Intenta con éste código
Code (fw): Select all Collapse
#include "FiveWin.ch"

REQUEST FWHARU
REQUEST FWZEBRA

Function Main()
  TPrinter():lUseHaruPDF:=.T.  
  PRINT oPrn  FILE "PRUEBA.PDF" PREVIEW
  PAGE
   cCode:="https://pilotosiat.impuestos.gob.bo/consulta/QR?nit=145806028&cuf=9F9F8D3316B178A2A7554C91782C077D04CFCA16754CD1B844000E74&numero=102&t=2"
   @1.1,4.4  PRINT TO oPrn TEXT cCode AS BARCODE TYPE "QR" SIZE 2.0,2.0 CM
   @5.1,4.4  PRINT TO oPrn TEXT cCode AS BARCODE TYPE "QR" SIZE 3.0,3.0 CM
  ENDPAGE
  ENDPRINT
Return nil
Gracias por la ayuda
Saludos,



Adhemar C.
Posts: 8515
Joined: Tue Dec 20, 2005 07:36 PM
Re: QR en PDF con HARU
Posted: Mon Oct 16, 2023 03:43 PM
João Santos - São Paulo - Brasil - Phone: +55(11)95150-7341
Posts: 1344
Joined: Wed Nov 16, 2005 09:14 PM
Re: QR en PDF con HARU
Posted: Tue Oct 17, 2023 11:09 AM
acuellar wrote:Estimado Cesar

Intenta con éste código
Este es el resultado


El qr me lo muestra, pero va a una pagina que los datos del comprobantes están vacios.
Posts: 1054
Joined: Sun Oct 09, 2005 10:41 PM
Re: QR en PDF con HARU
Posted: Tue Oct 17, 2023 01:35 PM
Prueba asi:
Code (fw): Select all Collapse
       IF oApp:nPDF_QR = 1  // 5.6
          @ nRowOt/2.54, 0.1 PRINT TO oPrn TEXT cCode AS BARCODE TYPE "PDF417" SIZE 2.2, 0.65 INCHES
         Else
          @ nROwOt/2.54, 0.1 PRINT TO oPrn TEXT cCode AS BARCODE TYPE "QR-CODE" SIZE 0.7, 0.7 INCHES
       EndIf
Posts: 1710
Joined: Tue Oct 28, 2008 06:26 PM
Re: QR en PDF con HARU
Posted: Tue Oct 17, 2023 04:25 PM

Muchas Gracias Estimados

Cesar quitale ésta línea TPrinter():lUseHaruPDF:=.T.

Y compará los resultados.

Saludos,



Adhemar C.
Posts: 1344
Joined: Wed Nov 16, 2005 09:14 PM
Re: QR en PDF con HARU
Posted: Tue Oct 17, 2023 04:32 PM

Muestra igual pero mas grande el segundo qr

El destino del Qr es el mismo

Posts: 1710
Joined: Tue Oct 28, 2008 06:26 PM
Re: QR en PDF con HARU
Posted: Tue Oct 17, 2023 04:36 PM

Es lógico que el segundo tiene que se mas grande por su medida

He ahí la diferencia. deberían ser iguales.

con TPrinter():lUseHaruPDF:=.T. y sin

Saludos,



Adhemar C.
Posts: 1344
Joined: Wed Nov 16, 2005 09:14 PM
Re: QR en PDF con HARU
Posted: Tue Oct 17, 2023 04:39 PM

Tienes toda la razon. No había prestado atención de tu texto original en inglés.

Continue the discussion