Email from oracle Form [message #511188] |
Fri, 10 June 2011 01:05 |
|
irfanshamim
Messages: 4 Registered: January 2011 Location: Karachi
|
Junior Member |
|
|
This is code is written on WBP, but when I press button, FRM-41214 Unable to Run Report, please help...
DECLARE
v_report_id Report_Object;
vc_ReportServerJob VARCHAR2(100);
vc_rep_status VARCHAR2(100);
vjob_id VARCHAR2(100);
begin
v_report_id:= FIND_REPORT_OBJECT('REPORT66');
SET_REPORT_OBJECT_PROPERTY(v_report_id,REPORT_COMM_MODE,SYNCHRONOUS);
SET_REPORT_OBJECT_PROPERTY(v_report_id,REPORT_DESTYPE,mail);
SET_REPORT_OBJECT_PROPERTY(v_report_id,REPORT_DESFORMAT,'PDF');
SET_REPORT_OBJECT_PROPERTY(v_report_id,REPORT_COMM_MODE,SYnCHRONOUS);
SET_REPORT_OBJECT_PROPERTY(v_report_id,REPORT_SERVER,'repserver10g');
SET_REPORT_OBJECT_PROPERTY(v_report_id,REPORT_OTHER,'BRCODE='||''''||:QBLOCK.BRCODE||''''||' paramform=no' || ' From=senderemail@server.com ,CC=ccemail@server.com,Subject=My Subject') ;
SET_REPORT_OBJECT_PROPERTY(v_report_id,REPORT_DESNAME,'TOemail@server.com');
vc_ReportServerJob:=RUN_REPORT_OBJECT(v_report_id);
vjob_id :=substr(vc_ReportServerJob,length('repserver10g')+2,length(vc_ReportServerJob));
vc_rep_status := REPORT_OBJECT_STATUS(vc_ReportServerJob);
IF vc_rep_status='FINISHED' THEN
WEB.SHOW_DOCUMENT ('/reports/rwservlet/getjobid'|| vjob_id||'?server='||'repserver10g','_blank');
ELSE
message ('Report failed with error message '||vc_rep_status);
END IF;
END;
|
|
|