Algun Ejemplo para crear un reporte PDF

ruben Dario

Posts: 1078

Joined: Thu Sep 27, 2007 03:47 PM

Algun Ejemplo para crear un reporte PDF
Posted: Wed Jul 01, 2015 04:27 PM

Saludos al Forum
Algun ejemplo de como crear un reporte directamente en PDF, sin usar ningun programa utilitario.?

Ruben Dario Gonzalez
Cali-Colombia
rubendariogd@hotmail.com - rubendariogd@gmail.com

Manuel Aranda

Posts: 610

Joined: Wed Oct 19, 2005 08:20 PM

Re: Algun Ejemplo para crear un reporte PDF
Posted: Wed Jul 01, 2015 05:11 PM

Sería algo así como esto:

Code (fw): Select all Collapse

..........................
          IF lPDF
             //
             PRINT oPrn FILE "HOJA4.PDF"
             REPORT oReport ;
             TITLE cTitulo  CENTER ;
             FONT oFont1,oFont2, oFont3 ;
             HEADER cHeader,cHeader2 CENTER ;
             FOOTER "Página: "+str(oReport:nPage,3) ;
             CAPTION cCaption;
             TO DEVICE oPrn
             //
          ELSE
             //
             REPORT oReport ;
             TITLE cTitulo  CENTER ;
             FONT oFont1,oFont2, oFont3 ;
             HEADER cHeader,cHeader2 CENTER ;
             FOOTER "Página: "+str(oReport:nPage,3) ;
             PREVIEW CAPTION cCaption
             //
          ENDIF


..........................

Un saludo,

Manuel

xH 1.2.3, FWH 23.07 32 bits, BC++ 7.4, xVerce CW 1.0, PellesC

ruben Dario

Posts: 1078

Joined: Thu Sep 27, 2007 03:47 PM

Re: Algun Ejemplo para crear un reporte PDF
Posted: Wed Jul 01, 2015 07:16 PM

No, algo directamente de la libreria de PDF,
Algo asi

oPdf := tpdf():new( cPath )
titpdef( oPdf )

o

function main()
local oPDF
oPDF := PDFClass():New()
oPDF:nType := 1
oPDF:cFileName := "ARQUIVO.PDF"
oPDF:Begin()
foR nCont = 1 TO 1000
oPDF:MaxRowTest()
oPDF:DrawText( oPDF:nRow++, 0, nCont )
NEXT
oPDF:END()
RETURN

Pero no tengo esta Clase. PDFClass()

Ruben Dario Gonzalez
Cali-Colombia
rubendariogd@hotmail.com - rubendariogd@gmail.com

karinha

Posts: 8515

Joined: Tue Dec 20, 2005 07:36 PM

Re: Algun Ejemplo para crear un reporte PDF
Posted: Wed Jul 01, 2015 07:19 PM

http://www.harbourdoc.com.br/show.asp?seek=t&key=PDFClass

http://www.pctoledo.com.br/forum/viewtopic.php?f=43&t=14475

Saludos.

João Santos - São Paulo - Brasil - Phone: +55(11)95150-7341

FiveTech Support Forums

Continue the discussion