Migration from Reports 6i to 10G

Question

Hi,
I have migrated my forms from 6i to 10g. Everything is working fine except reports.
(Im calling reports from my menu modules using run_product builtin).
Now i need the steps to migrate the reports from 6i to 10G.
Good Help will be appreciated.
Regards
Sankar.M.N

Answer 1

hi,
instead of run_product you hav to use web.showdocument
migrate your from from which you are clling report
it will add report-object and rp2rro lib to your form
and then change your function
like this
PROCEDURE call_report IS
          pi_id paramlist;
          alrt_var number;     
          repid report_object;     
          rep_path varchar2(200);
          vc_reportserverjob varchar2(100);
          report_job_id varchar2(100);
          v_rep_status varchar2(100);
begin
     repid := find_report_object('RP2PRO');
     rep_path:=*path of ypur report*;
     set_report_object_property(repid,report_filename,rep_path);
     set_report_object_property(repid,report_server,*report_server_name*);
     set_report_object_property(repid,report_execution_mode,RUNTIME);
     set_report_object_property(repid,report_comm_mode,SYNCHRONOUS);
     set_report_object_property(repid,report_destype,cache);
     set_report_object_property(repid,report_desformat,'pdf');
     pi_id := get_parameter_list('it_param');
     if      not Id_null(pi_id) then
          destroy_parameter_list(pi_id);
     end if;
     pi_id := create_parameter_list('it_param');
     add_parameter*(your_parametrer here*
     add_parameter(pi_id,'PARAMFORM',TEXT_PARAMETER,'NO');
     vc_reportserverjob := RUN_REPORT_OBJECT(repid, pi_id);
     report_job_id:=substr(vc_reportserverjob,length(*report_server_name*)+2,length(vc_reportserverjob));
     v_rep_status:=report_object_status(vc_reportserverjob);     
     if v_rep_status='FINISHED' then
          web.show_document('http://'||*host_name*||':'||*port_name*||'/reports/rwservlet/getjobid'||report_job_id||'?server='||*report_server_name*,'_blank');      
     else
          message ('error when running report'||v_rep_status);
     end if;
end;
END;