Imprimir directamente a una impresora desde forms un reporte
Desde forms necesito que se imprimia directamente el reporte via impresora, pero me dá error, me pueden ayudar. El siguiente es el codigo que tengo
set_report_object_property(report_id,report_comm_mode,synchronous);
set_report_object_property(report_id,report_filename,\'nombre_reporteÂ’);
set_report_object_property(report_id,report_server,:parameter.reportsserver);
set_report_object_property(report_id,report_destype,printer);
set_report_object_property(report_id, report_execution_mode, runtime);
report_message:= run_report_object(report_id, v_pl_id);
rep_status := report_object_status(report_message);
if rep_status=\'finished\' then
vjob_id := substr(report_message,length(:parameter.reportsserver)+2,length(report_message));
web.show_document(:parameter.reportsservlet||\'/getjobid\'||vjob_id
||\'?server=\'||:parameter.reportsserver,\'_blank\');
else
message (\'error \'||rep_status);
end if;
set_report_object_property(report_id,report_comm_mode,synchronous);
set_report_object_property(report_id,report_filename,\'nombre_reporteÂ’);
set_report_object_property(report_id,report_server,:parameter.reportsserver);
set_report_object_property(report_id,report_destype,printer);
set_report_object_property(report_id, report_execution_mode, runtime);
report_message:= run_report_object(report_id, v_pl_id);
rep_status := report_object_status(report_message);
if rep_status=\'finished\' then
vjob_id := substr(report_message,length(:parameter.reportsserver)+2,length(report_message));
web.show_document(:parameter.reportsservlet||\'/getjobid\'||vjob_id
||\'?server=\'||:parameter.reportsserver,\'_blank\');
else
message (\'error \'||rep_status);
end if;
