CREAR PDF CON FASTREPORT
Publicado: Mar Dic 11, 2012 2:38 am
Buen dia a todos, alguien me puede ayudar.
Quiero generar un archivo pdf directamente sin entrar al ShowReport(), tengo
el siguiente codigo:
Local cMovimientos,cPdf
cMovimientos=AppData:Base:Query("Select
fecha,numero_socio,depositos from movimientos where
numero_socio=estatus='ABONO' limit 200 ")
cMovimientos:Open()
SetXailerDataSet(::Reporte, "REPORTES" , cMovimientos )
::Reporte:SetProperty("cPdf", "Filename",'.pdfmiarchivo.pdf' )
::Reporte:SetProperty("cPdf", "OpenAfterExport", .f.)
::Reporte:SetProperty("cPdf", "ShowDialog",.f.)
::Reporte:SetProperty("cPdf", "PrintOptimized", .t.)
::Reporte:LoadFromFile("c:reportesnuevo.fr3")
::Reporte:PrepareReport()
::Reporte:DoExport("cPdf")
::Reporte:ClearDataSets()
::Reporte:Destroyfr()
Cuando lo ejecuto por primera vez si se genera el archivo pdf, pero cuando
lo quiero volver a generar me manda el siguiente error
#1: GPF (Code = c0000005):
Access violation
CALL_FUNC_CC_I (0)
FRREPORTMANAGER:SETUSERDATASET (1226)
SETXAILERDATASET (2245)
PRUEBAS:BTNBMP6CLICK (345)
TBTNBMP:ONCLICK (0)
TBTNBMP:CLICK (100)
(b)XCONTROL:XCONTROL (147)
TBTNBMP:COMMAND (0)
TSCROLLINGWINCONTROL:WMCOMMAND (272)
PRUEBAS:WMCOMMAND (931)
PRUEBAS:SHOWMODAL (0)
FUNC0000 (466)
MAIN (290)
De antemano les agradezco toda ayuda.
Saludos
Quiero generar un archivo pdf directamente sin entrar al ShowReport(), tengo
el siguiente codigo:
Local cMovimientos,cPdf
cMovimientos=AppData:Base:Query("Select
fecha,numero_socio,depositos from movimientos where
numero_socio=estatus='ABONO' limit 200 ")
cMovimientos:Open()
SetXailerDataSet(::Reporte, "REPORTES" , cMovimientos )
::Reporte:SetProperty("cPdf", "Filename",'.pdfmiarchivo.pdf' )
::Reporte:SetProperty("cPdf", "OpenAfterExport", .f.)
::Reporte:SetProperty("cPdf", "ShowDialog",.f.)
::Reporte:SetProperty("cPdf", "PrintOptimized", .t.)
::Reporte:LoadFromFile("c:reportesnuevo.fr3")
::Reporte:PrepareReport()
::Reporte:DoExport("cPdf")
::Reporte:ClearDataSets()
::Reporte:Destroyfr()
Cuando lo ejecuto por primera vez si se genera el archivo pdf, pero cuando
lo quiero volver a generar me manda el siguiente error
#1: GPF (Code = c0000005):
Access violation
CALL_FUNC_CC_I (0)
FRREPORTMANAGER:SETUSERDATASET (1226)
SETXAILERDATASET (2245)
PRUEBAS:BTNBMP6CLICK (345)
TBTNBMP:ONCLICK (0)
TBTNBMP:CLICK (100)
(b)XCONTROL:XCONTROL (147)
TBTNBMP:COMMAND (0)
TSCROLLINGWINCONTROL:WMCOMMAND (272)
PRUEBAS:WMCOMMAND (931)
PRUEBAS:SHOWMODAL (0)
FUNC0000 (466)
MAIN (290)
De antemano les agradezco toda ayuda.
Saludos