>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 > > >>
>>>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 >>>>