====== LOADDOC Set_Printer Message ====== ==== Description ==== The LOADDOC message is used to load a previously created report that was saved with the INIT message or to retrieve an archived report. ==== Parameters ==== ^Parameter\\ ^Description of Fields\\ ^Comments\\ ^Default\\ ^ |Parm1\\ |<1> Report Name\\ \\ |An @vm-delimited list of filenames.\\ \\ Reports saved using the OIPI format should include the full path.\\ \\ Reports saved using the ARCHIVE message need only the report name.|""| | |<2> Archive.|Boolean. If true will load the report from the ARCHIVE.|"" (False)|| ==== Example ==== *The following example shows how to use the LOADDOC message to retrieve a *previously created report or Archived report.*/ * Create report and save as c:\savefile\smpreport.rpt declare function Set_Printer * Create a saved OIPI Report File = "Sample":@fm:"":@fm:10:@fm:"c:\savefile\smpreport.rpt" stat = Set_Printer("INIT",FILE,"","","",2) ;* Start printing text = "This is a test line" stat = Set_Printer("TEXT", text) stat = Set_Printer("TERM") * Create an Archive Report File = "Sample":@fm:"":@fm:11:@fm:"smpreport" stat = Set_Printer("INIT",FILE,"","","",2) ;* Start printing text = "This is a test line" stat = Set_Printer("TEXT", text) stat = Set_Printer("TERM") *Load report - Only valid if originally saved. stat = Set_Printer("INIT","","","","",2) stat = Set_Printer("Loaddoc","C:\savefile\smpreport.rpt") stat = Set_Printer("TERM") *Load from Archive - Only valid if originally Archived stat = Set_Printer("INIT","","","","",2) stat = Set_Printer("Loaddoc","smpreport",1) stat = Set_Printer("TERM") Example 2 * Create 2 reports and load them into one preview window * Create a saved OIPI Report file = "Sample":@fm:"":@fm:10:@fm:"c:\savefile\smpreport.rpt" stat = Set_Printer("INIT",FILE,"","","",2) ;* Start printing text = "This is a test line" stat = Set_Printer("TEXT", text) stat = Set_Printer("TERM") * Create another saved OIPI Report file = "Sample":@fm:"":@fm:10:@fm:"c:\savefile\smpreport1.rpt" stat = Set_Printer("INIT",FILE,"","","",2) ;* Start printing text = "This is a test line in a separate report!" stat = Set_Printer("TEXT", text) stat = Set_Printer("TERM") * Load both reports stat = Set_Printer("INIT","","","","",2) reports = "C:\savefile\smpreport.rpt":@vm:"C:\savefile\smpreport1.rpt" stat = Set_Printer("LOADDOC",reports) stat = Set_Printer("TERM")