FRM-41217

Question

When running in Developer 6i, the code below works fine. Now we are upgrading to IDS Release 2, the code below is having an errorr: FRM-41217 Unable to get Report Job Status. Forms are runnning on web.
Code:
Declare
repid REPORT_OBJECT;
v_rep VARCHAR2(20);
rep_status varchar2(30);
tmp varchar2(2000);
v_parm1 Varchar2(1000);
v_parm2 Varchar2(1000);
BEGIN
v_parm1 := 'P_WHERE_CLS='''||nvl(:PARAMETER.p_where,'X')||'''';
v_parm2 := 'P_SHOW_DOC='''||nvl(:REPORT.show_doc,'X')||'''';     
repid := find_report_object('REPORT1');
Set_report_object_property(repid,REPORT_OTHER,'PARAMFORM=NO');
Set_report_object_property(repid,REPORT_OTHER,v_parm2||' '||v_parm1);
SET_REPORT_OBJECT_PROPERTY(repid, REPORT_SERVER, 'REPORTSRVR');
v_rep := RUN_REPORT_OBJECT(repid);
rep_status := REPORT_OBJECT_STATUS(v_rep);
WHILE rep_status in ('RUNNING','OPENING_REPORT','ENQUEUED')LOOP
rep_status := report_object_status(v_rep);
END LOOP;
if rep_status in ( null, 'FINISHED', '' ) then
     MESSAGE('Report Completed ');
else
MESSAGE('Error when running report.');
Raise FORM_TRIGGER_FAILURE;
end if;
*********************************************** This part of code is the only different
/* For IDS 9i Release 2 */
tmp := '/reports/rwservlet/getjobid'||substr(v_rep,instr(v_rep,'_',-1)+1)||
'?server='||:dummy.REP_SERVER||'&authid=orcladmin/workflow1';
/* For Developer 6i */
tmp := '/dev60cgi/rwcgi60.exe/getjobid='||substr(v_rep,instr(v_rep,'_'))||'?
server='||:global.report_Server;
Web.show_document(tmp, '_blank');
exception
when others then
     Message(sqlerrm);
END;

Answer 1

Most administrators turn the ability to check the status off because of security concerns. I know I do.
We make Form Developers call a URL rather than using the built in to run a report and loop to check the status.