FRM-41214: Unable to run report
161413Mar 27 2008 — edited Mar 27 2008Hi,
I am calling a report from oracle forms10g and i get this error msg 'FRM-41214: Unable to run report'. Below is the code written on a trigger
Any help is appreciated.
DECLARE
p_rpt_param_list PARAMLIST;
report_id REPORT_OBJECT;
rep_status VARCHAR2(30);
reportserver VARCHAR2(30);
report_not_generated EXCEPTION;
v_rep_status VARCHAR2(100);
v_location VARCHAR2(100);
cursor c_district is select distinct agg_dist_code from mme650_2007 where agg_lvl_nbr='4' and agg_dist_code='41010';
cursor c_school is select distinct agg_schl_code from mme650_2007 where agg_lvl_nbr='4' and agg_dist_code='41010' and agg_schl_code='00830';
cursor c_grade is select distinct exp_val_grade from mme650_2007 where agg_lvl_nbr='4' and agg_dist_code='41010' and agg_schl_code='00830' and exp_val_grade='11';
BEGIN
TOOL_ENV.GETVAR('REPORTS_SERVER', reportserver);
report_id := find_report_object('REP_MIMME');
-- Required to set below....
SET_REPORT_OBJECT_PROPERTY(report_id, REPORT_COMM_MODE, SYNCHRONOUS);
SET_REPORT_OBJECT_PROPERTY(report_id, REPORT_EXECUTION_MODE, BATCH);
SET_REPORT_OBJECT_PROPERTY(report_id, REPORT_DESTYPE, CACHE); --FILE
SET_REPORT_OBJECT_PROPERTY(report_id, REPORT_DESFORMAT, 'pdf');
SET_REPORT_OBJECT_PROPERTY(report_id, REPORT_SERVER, 'rep_pem11g85f1lic');
-- Loop
for d in c_district
loop
for s in c_school
loop
for g in c_grade
loop
v_location :='C:\Reports\MIMMEE_'||d.agg_dist_code||'_'||s.agg_schl_code||'_'||g.exp_val_grade||'.pdf';
SET_REPORT_OBJECT_PROPERTY(report_id, REPORT_DESNAME, v_location);
p_rpt_param_list := Get_Parameter_List('midata');
IF NOT Id_Null(p_rpt_param_list) THEN
Destroy_Parameter_List(p_rpt_param_list);
END IF;
p_rpt_param_list := Create_Parameter_List('midata');
Add_Parameter(p_rpt_param_list,'p_district',TEXT_PARAMETER,d.agg_dist_code);
Add_Parameter(p_rpt_param_list,'p_school',TEXT_PARAMETER,s.agg_schl_code);
Add_Parameter(p_rpt_param_list,'p_grade',TEXT_PARAMETER,g.exp_val_grade);
v_rep_status := RUN_REPORT_OBJECT(report_id, p_rpt_param_list);
rep_status := REPORT_OBJECT_STATUS(v_rep_status);
WHILE rep_status IN ('RUNNING','OPENING_REPORT','ENQUEUED')
LOOP
rep_status := REPORT_OBJECT_STATUS(v_rep_status);
END LOOP;
IF (rep_status = 'FINISHED')
THEN
WEB.SHOW_DOCUMENT('http://pem11g85f1lic.ncsp.peroot.com:8891/reports/rwservlet/getjobid' || substr(v_rep_status, instr(v_rep_status, '_', -1)+1) || '?' || 'server=rep_pem11g85f1lic' , '_blank');
ELSE
Message('Error running report: '||rep_status);
END IF;
Destroy_Parameter_List(p_rpt_param_list);
end loop;
end loop;
end loop;
Message('Report generated successfully');
EXCEPTION
WHEN report_not_generated THEN
NULL;
WHEN OTHERS THEN
NULL;
END;