Skip to main content
Question

how to get excel report output without pressing preview button or can i run report with pl/sql while print to file options selected


Forum|alt.badge.img+5

Hi,

 

i have report layout with excel template and it is working fine manualy. 

Unfortunately i can get excel output only pressing preview button on print dialog. 

my question is is it posible to get excel file directly with menu item plsql code

i have created a code and it is running report but file creating in archive. 

 

DECLARE

   layout_name_       VARCHAR2(30)  := 'EngPartStructuresRepExcel.rpl';
   report_id_             VARCHAR2(30)  := 'ENG_PART_STRUCTURES_REP';
   report_attr_         VARCHAR2(2000):= '';
   parameter_attr_  VARCHAR2(2000):= '';
   instance_attr_      VARCHAR2(2000):= '';
   print_attr_          VARCHAR2(2000):= '';
   attr_                   VARCHAR2(2000):= '';
   distribution_list_ VARCHAR2(2000):= '';
   print_job_id_      VARCHAR2(2000):= '';
   printer_id_          VARCHAR2(2000):= 'No Printout,SERVER,NO_PRINTOUT';
   result_key_         VARCHAR2(2000):= ''; 
   rev_no_              VARCHAR2(2000):= '';

BEGIN

   rev_no_ := Part_Revision_API.Get_Eng_Revision (&CONTRACT,&PART_NO,&ENG_CHG_LEVEL);


   Client_SYS.Clear_Attr(report_attr_);
   Client_SYS.Add_To_Attr('REPORT_ID',   report_id_,   report_attr_);
   Client_SYS.Add_To_Attr('LAYOUT_NAME', layout_name_, report_attr_);


   Client_SYS.Clear_Attr(parameter_attr_);
   Client_SYS.Add_To_Attr('PART_NO', &PART_NO, parameter_attr_);
   Client_SYS.Add_To_Attr('PART_REV', rev_no_, parameter_attr_);
   Client_SYS.Clear_Attr(print_attr_);



   Archive_API.New_Client_Report(result_key_, report_attr_, parameter_attr_, distribution_list_, print_attr_);
   Archive_API.Get_Info(instance_attr_, parameter_attr_, result_key_);
   Client_SYS.Clear_Attr(attr_);

   Client_SYS.Add_To_Attr('PRINTER_ID', printer_id_, attr_);
   Print_Job_API.New(print_job_id_, attr_);

   Client_SYS.Add_To_Attr('PRINT_JOB_ID', print_job_id_, instance_attr_);
   client_SYS.Add_To_Attr('RESULT_KEY',   result_key_,   instance_attr_);
 Client_SYS.Add_To_Attr('OPTIONS', 'COPIES(1)', instance_attr_);
   Print_Job_Contents_API.New_Instance(instance_attr_);
   Print_Job_API.Print(print_job_id_);

END;

 

Reply


Cookie policy

We use cookies to enhance and personalize your experience. If you accept you agree to our full cookie policy. Learn more about our cookies.

 
Cookie settings