USE demoreps\invoices ORDER customer LOCAL m.loSession, m.lnRetval m.loSession = XFRX("XFRX#LISTENER") m.lnRetval = loSession.SetParams("output.pdf",,,,,,"PDF") IF m.lnRetval = 0 REPORT FORM report1 OBJECT m.loSession ELSE ? m.lnRetval ENDIF * one hour later m.loSession = XFRX("XFRX#LISTENER") m.lnRetval = loSession.SetParams("output.pdf",,,,,,"PDF",,,,.T.) *https://eqeuscom.atlassian.net/wiki/spaces/DOC/pages/25821220/Properties+and+methods+common+in+XFRXListener+and+XFRXSession+classes#PropertiesandmethodscommoninXFRXListenerandXFRXSessionclasses-Setparams() * parameter tuAppend IF m.lnRetval = 0 REPORT FORM report2 OBJECT m.loSession ELSE ? m.lnRetval ENDIF>>>Hi,
>>USE demoreps\invoices ORDER customer >>LOCAL m.loSession, m.lnRetval >>m.loSession= xfrx("XFRX#INIT") >>m.lnRetVal = m.loSession.SetParams("output.pdf",,,,,,"PDF") >>IF m.lnRetVal = 0 >> m.loSession.ProcessReport("report1") >> m.loSession.ProcessReport("report1") >> m.loSession.ProcessReport("report2") >> m.loSession.finalize() >>ELSE >> ? m.lnRetVal >>ENDIF >>>>
>>USE demoreps\invoices ORDER customer >>LOCAL m.loSession, m.lnRetval >>m.loSession = XFRX("XFRX#LISTENER") >>m.lnRetval = loSession.SetParams("output.pdf",,,,,,"PDF") >>IF m.lnRetval = 0 >> REPORT FORM report1 OBJECT m.loSession NOPAGEEJECT >> REPORT FORM report1 OBJECT m.loSession NOPAGEEJECT >> REPORT FORM report2 OBJECT m.loSession >>ELSE >> ? m.lnRetval >>ENDIF >>>>
>IF m.lnRetval = 0 > *-- Code here that creates a cursor for Report1 > REPORT FORM report1 OBJECT m.loSession NOPAGEEJECT > *-- Code here that creates a cursor for Rpoert2 > REPORT FORM report1 OBJECT m.loSession NOPAGEEJECT > *-- Code here that creates a cursor for Report3 > REPORT FORM report2 OBJECT m.loSession >ELSE > ? m.lnRetval >ENDIF >>