Directly print out a report

Question

I make a form and a report.I try to directly print out it.but before the result print out,a html coding print out. How to print only the result of the report?
The below is the procedure in the Form.
PROCEDURE sendparam1 IS
     report_id                              Report_Object := FIND_REPORT_OBJECT('SHSEL_DAILY_FUNCTION');
     report_server_name     varchar2(100) := 'repfodbopera';     --Report Server Name (repseokyooperawebopera/repfodbopera)
     report_format                    varchar2(20)     := 'PDF';                              --Report Type
     report_destype_name     number                    := PRINTER;
     report_file_name          varchar2(100)     := 'SHSEL_DAILY_FUNCTION';     --Report File Name
     report_otherparam          varchar2(2000):= 'paramform=yes';     
     report_servlet               varchar2(100)     := '/reports/rwservlet';
     report_folder                    varchar2(100)     := 'M:\micros\opera\production\runtimes\';     --Real Report File folder(http://fodb/webtemp/opera/)
     pdf_folder                    varchar2(100)     := 'M:\micros\opera\operaias\webtemp\opera\';     --Real Report File folder(http://fodb/webtemp/opera/)
     report_message               varchar2(100)     := '';
     rep_status                         varchar2(100)     := '';
     vjob_id                                   varchar2(4000):= '';
     hidden_action                    varchar2(2000):= '';
     v_report_other               varchar2(4000):= '';
     report_user                         varchar2(100)     := 'OPERA/OPERA@OPERA';     --Opera DB
     resort                                   varchar2(20)     := 'SHSEL';                    --SEOKYO               
     PMS_ID                                   varchar2(20)     := 'OPERAREP';
     PMS_PW                                   varchar2(20)     := 'OPERAREP';
     v_time varchar2(10) :='';
     v_pdf_name varchar2(200):='';
Begin
     --message(to_char(sysdate,'mmddhhmiss'));
     v_time:=to_char(sysdate,'mmddhhmiss');
     v_pdf_name:=report_file_name||     v_time||'.PDF';
SET_REPORT_OBJECT_PROPERTY(report_id,REPORT_EXECUTION_MODE,BATCH);
-- SET_REPORT_OBJECT_PROPERTY(report_id,REPORT_COMM_MODE,ASYNCHRONOUS);
     SET_REPORT_OBJECT_PROPERTY(report_id,REPORT_COMM_MODE,SYNCHRONOUS);
     SET_REPORT_OBJECT_PROPERTY(report_id,REPORT_FILENAME,report_folder || report_file_name);
     SET_REPORT_OBJECT_PROPERTY(report_id,REPORT_SERVER,report_server_name);
     SET_REPORT_OBJECT_PROPERTY(report_id,REPORT_DESTYPE,report_destype_name);
     SET_REPORT_OBJECT_PROPERTY(report_id,REPORT_DESFORMAT,report_format);
     --SET_REPORT_OBJECT_PROPERTY(report_id,REPORT_DESNAME,report_folder ||report_file_name||     v_time||'.PDF');
     SET_REPORT_OBJECT_PROPERTY(report_id,REPORT_DESNAME,'OfficePrt'); --프린터 이름
     hidden_action := hidden_action || '&report=' || GET_REPORT_OBJECT_PROPERTY(report_id,REPORT_FILENAME);
     hidden_action := hidden_action || '&destype=' || GET_REPORT_OBJECT_PROPERTY(report_id,REPORT_DESTYPE);
     hidden_action := hidden_action || '&desformat=' || GET_REPORT_OBJECT_PROPERTY(report_id,REPORT_DESFORMAT);
     hidden_action := hidden_action || '&userid=' || report_user;
     hidden_action := hidden_action || '&desname=' || GET_REPORT_OBJECT_PROPERTY(report_id,REPORT_DESNAME);
     v_report_other := v_report_other || 'P_REPORT_DATE=' || :TXTREPORTDATE;
     v_report_other := v_report_other || '&P_END_DATE=' || :TXTREPORTDATE;
     v_report_other := v_report_other || '&P_RESORT=' || resort;
     v_report_other := v_report_other || '&P_USER=' || PMS_ID;
     v_report_other := v_report_other || '&P_PASSWORD=' || PMS_PW;
     v_report_other := v_report_other || '&P_REPORT_NAME=' ||report_file_name;
     v_report_other := v_report_other || '&P_BUSINESS_DATE=' || :TXTREPORTDATE;
     hidden_action := hidden_action || '&' || v_report_other;
     hidden_action := report_servlet || '?_hidden_server=' || report_server_name || hidden_action;
     SET_REPORT_OBJECT_PROPERTY(report_id,REPORT_OTHER,'pfaction=' || hidden_action || ' ' || report_otherparam);
     report_message := run_report_object(report_id);
     rep_status := report_object_status(report_message);
While Rep_Status In ('RUNNING','OPENING_REPORT','ENQUEUED') Loop
Rep_Status := Report_Object_Status(report_message);
message('status : '||Rep_Status);
End Loop;
     if rep_status = 'FINISHED' then
          --message(rep_status);
          vjob_id := substr(report_message,length(report_server_name)+2, length(report_message));
          Web.Show_Document(hidden_action,' _blank');
          --Web.Show_Document('../../webtemp/opera/'||v_pdf_name,' _blank');
          --Web.Show_Document(report_servlet || '/getjobid' || vjob_id || '?server=' || report_server_name, ' _blank');
     else
          message('Error');
     end if;
end;

Answer 1

I can print out the report but the html page as the below is printed before the report.
Why is the html page printed ? and I don't want to print out the html page.
<html>
<body dir=LTR bgcolor="#ffffff">
<form method="hidden_run_parameters" type=hidden value="server=repfoopera&rep......
Message was edited by:
asterika