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

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. 

1DECLARE
2
3   layout_name_       VARCHAR2(30)  := 'EngPartStructuresRepExcel.rpl';
4   report_id_             VARCHAR2(30)  := 'ENG_PART_STRUCTURES_REP';
5   report_attr_         VARCHAR2(2000):= '';
6   parameter_attr_  VARCHAR2(2000):= '';
7   instance_attr_      VARCHAR2(2000):= '';
8   print_attr_          VARCHAR2(2000):= '';
9   attr_                   VARCHAR2(2000):= '';
10   distribution_list_ VARCHAR2(2000):= '';
11   print_job_id_      VARCHAR2(2000):= '';
12   printer_id_          VARCHAR2(2000):= 'No Printout,SERVER,NO_PRINTOUT';
13   result_key_         VARCHAR2(2000):= ''; 
14   rev_no_              VARCHAR2(2000):= '';
15
16BEGIN
17
18   rev_no_ := Part_Revision_API.Get_Eng_Revision (&CONTRACT,&PART_NO,&ENG_CHG_LEVEL);
19
20
21   Client_SYS.Clear_Attr(report_attr_);
22   Client_SYS.Add_To_Attr('REPORT_ID',   report_id_,   report_attr_);
23   Client_SYS.Add_To_Attr('LAYOUT_NAME', layout_name_, report_attr_);
24
25
26   Client_SYS.Clear_Attr(parameter_attr_);
27   Client_SYS.Add_To_Attr('PART_NO', &PART_NO, parameter_attr_);
28   Client_SYS.Add_To_Attr('PART_REV', rev_no_, parameter_attr_);
29   Client_SYS.Clear_Attr(print_attr_);
30
31
32
33   Archive_API.New_Client_Report(result_key_, report_attr_, parameter_attr_, distribution_list_, print_attr_);
34   Archive_API.Get_Info(instance_attr_, parameter_attr_, result_key_);
35   Client_SYS.Clear_Attr(attr_);
36
37   Client_SYS.Add_To_Attr('PRINTER_ID', printer_id_, attr_);
38   Print_Job_API.New(print_job_id_, attr_);
39
40   Client_SYS.Add_To_Attr('PRINT_JOB_ID', print_job_id_, instance_attr_);
41   client_SYS.Add_To_Attr('RESULT_KEY',   result_key_,   instance_attr_);
42 Client_SYS.Add_To_Attr('OPTIONS', 'COPIES(1)', instance_attr_);
43   Print_Job_Contents_API.New_Instance(instance_attr_);
44   Print_Job_API.Print(print_job_id_);
45
46END;