Report not working from forms.

Question

Hi
we are beginners and please help us.we have installed in LAN database 11g on vista
and application server 10g on os 2003.
we are developing some applications from our developer pc in vista and using developer suite 10g.
we want to generate some reports and call them from forms.
This is the code in when button pressed.
DECLARE
repid REPORT_OBJECT;
repjobid VARCHAR2(200);
repstatus VARCHAR2(200);
repjobno number;
repserver VARCHAR2(100) := 'rep_mbxserver_FRHome1';
BEGIN
repserver := 'rep_mbxserver_FRHome1';
/* Check to see if forms application is WEB deployed */
IF get_application_property(user_interface) = 'WEB' THEN
message('web');
repid:= FIND_REPORT_OBJECT('REP');
message('report found');
/* Set Report parameters given WEB deployment */
SET_REPORT_OBJECT_PROPERTY(repid,REPORT_FILENAME,'e:\users\pro\reports\emp.rdf');
SET_REPORT_OBJECT_PROPERTY(repid,REPORT_SERVER,repserver);
SET_REPORT_OBJECT_PROPERTY(repid,REPORT_DESTYPE,CACHE);
/* DESFORMAT could be HTML, HTMLCSS or PDF here */
SET_REPORT_OBJECT_PROPERTY(repid,REPORT_DESFORMAT,'HTML');
/* Run the report */
repjobid := RUN_REPORT_OBJECT(repid);
message('run report');
/* Check the report status */
repstatus:=REPORT_OBJECT_STATUS(repjobid);
WHILE repstatus in ('RUNNING','OPENING_REPORT','ENQUEUED')
LOOP
repstatus := report_object_status(repjobid);
message('rep status');
END LOOP;
IF repstatus='FINISHED' THEN
message('REPORT WAS CORRECTLY RUN');
/* Display the report output in the client browser */
repjobno := length(repserver) + 1;
WEB.SHOW_DOCUMENT ('http://printer1.mbxnet.com:8889/reports/rwservlet/showjobs?server='||repserver,'_blank');
copy_report_object_output(repjobid,'\\ansu\mtb-erp\emp.lis');-- (Trying to copy to local folder)
message('File copied to local pc');
/* If report has failed display message to user */
ELSE
message('REPORT FAILED WITH STATUS: '||repstatus);
END IF;
message('222222222222');
ELSE
/* Else if forms application is Client-Server deployed */
/* Set Report parameters given Client-Server deployment */
message('client server');
repid:= FIND_REPORT_OBJECT('rep1');
SET_REPORT_OBJECT_PROPERTY(repid,REPORT_FILENAME,'e:\users\pro\reports\emp.rdf');
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,file);
SET_REPORT_OBJECT_PROPERTY(repid,REPORT_DESNAME,'\\printer1\mtb-erp\emp.lis');
SET_REPORT_OBJECT_PROPERTY(repid,REPORT_DESFORMAT,'dflt.prt');
SET_REPORT_OBJECT_PROPERTY(repid,REPORT_SERVER,repserver);
SET_REPORT_OBJECT_PROPERTY(repid,REPORT_OTHER,'paramform=NO');
/* Report to be executed via Reports Background Engine, not the 'new' Reports Multi-Tier Server */
/* Destype SCREEN or PREVIEW can be used here */
SET_REPORT_OBJECT_PROPERTY(repid,REPORT_DESTYPE,SCREEN);
/* Run the report */
repjobid := RUN_REPORT_OBJECT(repid);
copy_report_object_output(repjobid,'\\printer1\mtb-erp\emp.lis');
message('File ok');
--     host('c:\mtb-erp\ansu.lis');
END IF;
END;
we are struck and unable to proceed.Actually when we run the report from report builder it works.we are calling the report from application server.
Also if we replace the above web.show document with this statement it works but even though it gives FRM-41214 error.
web.show_document('http://ansuya.mtbnet.local:8889/reports/rwservlet?destype=cache&desformat=html&report=\\mbxserver\developers\emp.jsp&userid=scott/tiger@mbxsql&paramform=no');
One more doubt , is it possible if we don not want to show the report in a browser in case of client server locally in lan
but just generate the report from forms and save it in local folder like we do in previous old versions.If so please guide us.
Thanks in advance.

Answer 1

Hello ansu,
Did you solve this problem ?
Regards,
Felipe.