Versions Compared

Key

  • This line was added.
  • This line was removed.
  • Formatting was changed.

...

Code Block
m.loXFRX = EVALUATE([xfrx("XFRX#INIT")])
m.lnRetVal = m.loXFRX.SetParams("output.pdf",,,,,,"PDF")
IF m.lnRetVal = 0
   m.loXFRX.ProcessReport("report1")
   ?m.loXFRX.nPageNo
   m.loXFRX.ResetPageNo()
   m.loXFRX.ProcessReport("report2")           
   ?m.loXFRX.nPageNo
ELSE
   ? m.lnRetVal, m.loSessionloXFRX.ErrorMessage(m.lnRetVal)
ENDIF
RELE m.loXFRX

...