Call report under form 10g

how I call report under form 10g from Push Button trigger without haveing Oracle Application Server ? is there any way to do so ?
Thanks

You use the run_report_object. See the help file for information on how to use it.
By the way, you must use the Application Server to use Forms. It's an integral part of Forms.

Similar Messages

REP 110 & REP 0110 .calling reports from Form 10g(10.1.2.0.2)

Hi All,
We are migrating form from Oracle form 6i to Oracle 10g(10.1.2.0.2). I am calling reports from forms
using Web.Show_Docment(). When we run reports in report builder 10g it works fine.
But when we try to run reports from Forms 10g it throws error which is given below.
We want to run reports from UNIX. After using this url to submit report we get error REP 110 and REP 0110
URL
http://GEM:7777/reports/rwservlet?server=rep_server&report=/u01/forms/QA_Forms10g/GEMREP.rdf+DESTYPE=CACHE+DESFORMAT=HTML+p_user_id=XYZ+p_client=2
ERROR
REP-110: File '/u01/forms/QA_Forms10g/GEMREP.rdf DESTYPE=CACHE DESFORMAT=HTML p_user_id=XYZ p_client=2' not found.
REP-0110: Unable to open file '/u01/forms/QA_Forms10g/GEMREP.rdf DESTYPE=CACHE DESFORMAT=HTML p_user_id=XYZ p_client=2'.
I will really appreciate your help.
Thanks
Sandy

Hello,
You are mixing 2 separators in the URL : & and +
Use only one separator in the URL :
Example :
http://GEM:7777/reports/rwservlet?server=rep_server+report=/u01/forms/QA_Forms10g/GEMREP.rdf+DESTYPE=CACHE+DESFORMAT=HTML+p_user_id=XYZ+p_client=2
Regards

Call report from form 10g (10.1.2.0.2)

hi
i using win 2003 and db 10g and dev10g ( 10.1.2.0.2)
and i want to call report from my form as following code :
DECLARE
dir varchar2(200);
repid REPORT_OBJECT;
v_rep VARCHAR2(100);
rep_status VARCHAR2(20);
BEGIN
dir:=co$win.get_current_directory ;
repid := find_report_object('CGNV$OFG_REPORT');
SET_REPORT_OBJECT_PROPERTY(repid,REPORT_FILENAME,dir||'\rep.jsp');
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,CACHE);
SET_REPORT_OBJECT_PROPERTY(repid,REPORT_DESFORMAT,'HTML');
SET_REPORT_OBJECT_PROPERTY(repid,REPORT_SERVER,'rws');
SET_REPORT_OBJECT_PROPERTY(repid,REPORT_OTHER,'paramform=yes');
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 = 'FINISHED' --or rep_status is null
THEN
WEB.SHOW_DOCUMENT('http://hamid:8889/reports/rwservlet/getjobid'||
substr(v_rep, instr(v_rep,'_',-1)+1)||'?server=rws','_blank');
ELSE
message(ER_RP);
END IF;
END;
but i get error :
frm-41213: unable to connect to the report server rws
plz help me

hi
i using win 2003 and db 10g and dev10g ( 10.1.2.0.2)
and i want to call report from my form as following code :
DECLARE
dir varchar2(200);
repid REPORT_OBJECT;
v_rep VARCHAR2(100);
rep_status VARCHAR2(20);
BEGIN
dir:=co$win.get_current_directory ;
repid := find_report_object('CGNV$OFG_REPORT');
SET_REPORT_OBJECT_PROPERTY(repid,REPORT_FILENAME,dir||'\rep.jsp');
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,CACHE);
SET_REPORT_OBJECT_PROPERTY(repid,REPORT_DESFORMAT,'HTML');
SET_REPORT_OBJECT_PROPERTY(repid,REPORT_SERVER,'rws');
SET_REPORT_OBJECT_PROPERTY(repid,REPORT_OTHER,'paramform=yes');
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 = 'FINISHED' --or rep_status is null
THEN
WEB.SHOW_DOCUMENT('http://hamid:8889/reports/rwservlet/getjobid'||
substr(v_rep, instr(v_rep,'_',-1)+1)||'?server=rws','_blank');
ELSE
message(ER_RP);
END IF;
END;
but i get error :
frm-41213: unable to connect to the report server rws
plz help me

Default file location when calling report from Forms 10G

I've tried this in the reports forum, but it applies equally to forms I guess..
Hi,
I've managed to put together a routine for running a report from a 10G Form. In 6i I specified a "relative path" to my report name as follows:-
"Run_Product(REPORTS, '..\Reports\myreportname', SYNCHRONOUS, RUNTIME, FILESYSTEM, pl_id, NULL); "
In 10G I would like to just specify the report name, rather than the full file path. Can I specify a relative file path - or alternatively can I set the default report location in a configuration file?
At the moment I'm having to specify something like:
SET_REPORT_OBJECT_PROPERTY(repid, REPORT_FILENAME,
'c:\oracle\systemname\reports\myreportname.RDF');
I would like to just have:
SET_REPORT_OBJECT_PROPERTY(repid, REPORT_FILENAME,
'myreportname.RDF');
Many thanks,
Keith.

Do you run your application on an application server?
If so you should use the REPORTS_PATH environment variable (in windows registry entry).
Alternatively you could use an environmentid in the reports.conf-file:
<server version="10.1.2.0.2">
<environment id="YOURID">
<envVariable name="REPORTS_PATH" value="C:\......"/>
</environment>
You call the report with the parameter &envid=YOURID in the URL.

Calling reports from forms 10g

Hi,
I have proc reports that are called from the forms.
These proc reports run with host command on the server.
But since now it is AS,so i need to search for the way os taht when client run form through URL,
the text file that proc generated should be visible at client side.
I installed webutil and changed host with client_host but nothing happens.
I am on linux.
Do you have any idea?
Thanks

you can use web.show_document . look for it in Forms help or search this forum.

URGENT: Calling Reports from Forms (10g)

Hi,
I've tried to understand a pdf file on this subject, but I still can't do what I want.
I need to create a button on a form that, When pressed, calls a report.
Could someone help me showing some code??
Thanks!!

Tiago,
there's a good Whitepaper at http://www.oracle.com/technology/products/forms/pdf/frm9isrw9i.pdf.
Also the papers http://www.oracle.com/technology/products/forms/pdf/10g/frmwebshowdoc_rep.pdf
and
http://www.oracle.com/technology/products/forms/pdf/10g/frmrepparamform.pdf
could be interesting for you.
regards
Rainer

How to hide URL when calling Reports from Forms 10g.

Hi ,
When end user runs a report through a form then report output is displayed and following type of URL is also generated on address bar of browser: http://server:7778/reports/rwservlet/getjobid22243?server=rep_servername_appsrv
Can we hide this URL so that the user cant change the JOB_ID and get access to other previous reports.
Thanks & Regards,
NL

Actually, there are several options including the one already offered above. Here are a few more:
1. If you are using 10.1.2.3 and a newer JRE on the client (e.g. 1.6.0_10 or newer), you could use java script to open the report. This will not be a perfect solution because it may not work if using a non-IE browser or if java scripting is disabled. Refer to MyOracleSupport Article 265863.1 for more information.
EXAMPLE:
WEB.SHOW_DOCUMENT ('javascript:void(window.open("http://www.oracle.com","","location=no,toolbar=no,menubar=no,"));self.close()','_blank');Replace the url in the above example with the call to your report.
2. Set the age of the cache to a very short value so that it is only available long enough to be viewed by the user who created it. In other words, when setting the reports properties in your Forms code, include the Reports "others" parameter with TOLERANCE=1
SET_REPORT_OBJECT_PROPERTY(repid,REPORT_OTHER,'TOLERANCE=1');This will cause the cache (on the server) to live for only one minute then be deleted. Refer to the Report Deployment Guide for more information.
3. Upgrade to Fusion Middleware (Forms/Reports) 11. In version 11, the Reports jobid can be randomized. See section 18.8.2 of the Reports 11 Deployment Guide
http://download.oracle.com/docs/cd/E14571_01/bi.1111/b32121/toc.htm

Calling Report from Form Error ORA-06508

Dear all,
I want migrate from Fom6i to Oracle Developer Suite 10g (10.1).
Folder Form = C:\APLIORA\IRS\FORM
Folder Report = C:\APLIORA\IRS\REPORT
I have modified file DEFAULT.ENV
FORMS_PATH=C:\APLIORA\IRS\FORM;C:\APLIORA\IRS\REPORT
i do not have problem call a form from form.
but when i call report from form show error ORA-06508 : PL/SQL : could not find program unit being called ; -6508
my procedure is
PROCEDURE Call_Report IS
     list_id ParamList;
BEGIN
list_id := Get_Parameter_List('input_params');
IF NOT Id_Null(list_id) THEN
Destroy_Parameter_List(list_id);
END IF;
list_id := Create_Parameter_List('input_params');
Add_Parameter(list_id,'MAXIMIZE',TEXT_PARAMETER,'YES');
Add_Parameter(list_id,'ORACLE_SHUTDOWN',TEXT_PARAMETER,'YES');
RP2RRO.RP2RRO_RUN_PRODUCT(REPORTS,'TESTREPORT.REP',SYNCHRONOUS,RUNTIME,FILESYSTEM,list_id,null);
END ;
Do I miss something ?
Can any one help ?
Thanks

Hi,
Thank you for your replay.
The problem have solved.
This my step :
1. Install Windows XP SP2 and Form 10.1.2.0.2 on new pc.
2. Install Jinit version 1.3.1.28.
3. Create report server
3. Compile form, report and pll
4. call report from from with this procedure :
PROCEDURE Call_Report (vFILENAME varchar2) IS
report_id                Report_Object;
ReportServerJob VARCHAR2(100);
vc_rep_status      VARCHAR2(100);
repsvr                          varchar2(21) := 'myserv';
userid                         VARCHAR2(100);
pass                          VARCHAR2(100);
Host                    VARCHAR2(100);
BEGIN
userid          := Get_Application_Property(USERNAME) ;
pass          := Get_Application_Property(PASSWORD) ;
Host          := Get_Application_Property(CONNECT_STRING) ;
report_id:= find_report_object('REPORT');
SET_REPORT_OBJECT_PROPERTY(report_id,REPORT_FILENAME,vFILENAME||'.jsp');
SET_REPORT_OBJECT_PROPERTY(report_id,REPORT_COMM_MODE,SYNCHRONOUS);
SET_REPORT_OBJECT_PROPERTY(report_id,REPORT_SERVER,repsvr);
ReportServerJob:=run_report_object(report_id);
vc_rep_status := REPORT_OBJECT_STATUS(ReportServerJob);
WHILE vc_rep_status in ('RUNNING','OPENING_REPORT','ENQUEUED', null)
LOOP
vc_rep_status:=REPORT_OBJECT_STATUS(ReportServerJob);
END LOOP;
IF vc_rep_status='FINISHED' THEN
WEB.SHOW_DOCUMENT('/reports/rwservlet?report='||vFILENAME||'.jsp'||'&userid='||userid||'/'||pass||'@'||Host||'&destype=CACHE&desformat=PDF&paramform=yes','_blank');
ELSE
message ('Report failed with error message '|| vc_rep_status);
END IF;
END;
Ok, but i have another strange error. I will post new thread.
Thank you and regards
Teguh S

Problem in running oracle report from form 10g Version 10.1.2.0.2

Hi All,
I am facing problem while running the report from forms 10g getting FRM-41219
For this i am using the following procedure :
PROCEDURE RUN_REPORT IS
L_RUN_TEXT VARCHAR2 (2000);
L_USRID VARCHAR2 (100);
L_PASSWD VARCHAR2 (100);
L_DESNAME VARCHAR2 (100);
FILE_OUT_PUT VARCHAR2(200);
REP_STATUS VARCHAR2(20);
REP_NAME VARCHAR2(50);
PL_ID PARAMLIST;
REP_URL VARCHAR2(2000);
V_REP VARCHAR2(200);
BEGIN
display_me('RUN_REPORT');
-- CALL THE FOLLOWING FUNCTION, IN WHICH USER CAN WRITE HIS OWN CODE.
-- THE PROCEDURE CAN BE MADE LOCAL TO THE SPECIFIC FORM AND WRITE THE CODE.
-- IT SHOULD RETURN 'Y', IF YOU WANT TO PROCEED WITH THIS RUN_REPORT
-- PROCEDURE.
IF NVL (RUN_REPORT1, 'Y') = 'N' THEN
RETURN;
END IF;
COMMIT_FORM;
IF (GET_APPLICATION_PROPERTY (OPERATING_SYSTEM)) = 'UNIX' THEN
L_DESNAME := 'LP';
ELSE
L_DESNAME := NAME_IN ('REPORT_TITLE.F_FILE_NAME');
display_me(L_DESNAME);
END IF ;
/* SETTING THE REPORT OBJECT PROPERTIES */
/* G_PRAM1 IS THE NAME OF REPORT ****/
SET_REPORT_OBJECT_PROPERTY('REPOBJ',REPORT_EXECUTION_MODE,BATCH);
SET_REPORT_OBJECT_PROPERTY('REPOBJ',REPORT_COMM_MODE,SYNCHRONOUS);
SET_REPORT_OBJECT_PROPERTY('REPOBJ',REPORT_DESTYPE,CACHE);
SET_REPORT_OBJECT_PROPERTY('REPOBJ',REPORT_DESFORMAT,'PDF');
SET_REPORT_OBJECT_PROPERTY('REPOBJ',REPORT_SERVER,'172.18.76.34');
SET_REPORT_OBJECT_PROPERTY('REPOBJ',REPORT_FILENAME,:GLOBAL.G_PARAM1||'.REP');
display_me(':GLOBAL.G_PARAM1 '||:GLOBAL.G_PARAM1);
PL_ID := GET_PARAMETER_LIST ('REP_PARA');
IF NOT ID_NULL (PL_ID) THEN
DESTROY_PARAMETER_LIST ('REP_PARA');
END IF;
PL_ID := CREATE_PARAMETER_LIST('REP_PARA');
ADD_PARAMETER (PL_ID, 'DESTYPE' , TEXT_PARAMETER, NAME_IN ('REPORT_TITLE.RAG_DESTINATION') );
ADD_PARAMETER (PL_ID, 'DESNAME' , TEXT_PARAMETER, L_DESNAME);
ADD_PARAMETER (PL_ID, 'COPIES' , TEXT_PARAMETER, NAME_IN ('REPORT_TITLE.F_NO_COPY') );
ADD_PARAMETER (PL_ID, 'ORIENTATION', TEXT_PARAMETER, 'LANDSCAPE');
ADD_PARAMETER (PL_ID, 'MODE' , TEXT_PARAMETER, 'BITMAP');
ADD_PARAMETER (PL_ID, 'PARAMFORM' , TEXT_PARAMETER, 'NO');
ADD_PARAMETER (PL_ID, 'PARAM' , TEXT_PARAMETER, NAME_IN ('IBP_REPORT_PARAMETER.F_REP_SEQ') );
ADD_PARAMETER (PL_ID, 'P_COMP_CODE' ,TEXT_PARAMETER,:GLOBAL.G_COMP_CODE);
display_me(':GLOBAL.G_COMP_CODE '||:GLOBAL.G_COMP_CODE);
REP_NAME := :GLOBAL.G_PARAM1||'.REP';
display_me('REP_NAME'||REP_NAME);
V_REP := RUN_REPORT_OBJECT('REPOBJ');
display_me('V_REP '||V_REP);
REP_STATUS := REPORT_OBJECT_STATUS(V_REP);
display_me('REP_STATUS'||REP_STATUS);
WHILE REP_STATUS IN ('RUNNING','OPENING_REPORT','ENQUEUED')LOOP
REP_STATUS := REPORT_OBJECT_STATUS(V_REP);
END LOOP;
IF REP_STATUS = 'FINISHED' THEN
REP_URL:='/REPORTS/RWSERVLET/GETJOBID'||SUBSTR(V_REP,INSTR(V_REP,'_',-1)+1)||'?'||'SERVER=172.18.76.34';
display_me('REP_URL '||REP_URL);
WEB.SHOW_DOCUMENT(REP_URL,'_BLANK');
ELSE
MESSAGE('ERROR WHEN RUNNING REPORT');
END IF;
END;
Which is called on a button , can any body share there idea to help out
Warm Regards
Ashutosh

Yes, I have replace the userid with scott/tiger@orcl with i6menu/i6menu@vbs and also replace the OAS server's name as you have suggested.
declare
REP_URL varchar2(2000);
begin
REP_URL:= '/reports/rwservlet?userid=i6menu/i6menu@vbs&report=testrep_10g.rdf&desformat=pdf&destype=cache&paramform=no';
WEB.SHOW_DOCUMENT(REP_URL,'_BLANK');
end;
I had the 2nd code also but both r not working on my machine ......... !!
I have made the following setting on my machine:
1. Registry -> HKEY_LOCAL_MACHINE -> SOFTWARE-> ORACLE-> KEY_DevSuiteHome1->FORMS_PATH ->
Values is : D:\vision_soft\VSS\exe
2. Registry -> HKEY_LOCAL_MACHINE -> SOFTWARE-> ORACLE-> KEY_DevSuiteHome1->REPORTS_PATH ->
Values is : D:\vision_soft\VSS\exe
3. Entry made in the DevSuiteHome_1\forms\server ->default.env
FORMS_PATH=D:\vision_soft\VSS\exe
4. Entry made in the DevSuiteHome_1\reports\confr ->rwservlet.properties
#SERVER= rep10
As my forms is working well & but the report are not able to call.
Could you please let me know is there is any other mandatory setting required for the report 10g.
Regards,
Ashutosh

Calling Report From Form To Many Destinations

Hi
I am calling reports from forms using SET_REPORT_OBJECT_PROPERTY and then run_report_object.
I dont know the destination until runtime of the report which is ok as I can pass this in via my procedure, but if that destination is many ie mail and file what is the best way to distribute the report?
I could call my procedure for each destination but that seems a bit unefficient since the report would be created many times, is there another way?

what about adding a drop-down-list near your report-button where you can choose the destination?
when you click the report-button you simply read the value selected in the drop-down-list and send it to your reports-server too.

Generating report in forms 10g

I am trying to generate a pdf report in forms 10g using paramform
as soon as i click on submit query button it says page cannont be displayed
and if i check in the showjobs it is showing Report Finished successfully
Please help me
thanks

I am guessing you have specified destype=file and desformat=pdf?
This will probably have created a pdf file on your app server somewhere.
You should use destype=cache if you want to see it appear in the browser window.

How to run a report in form 10g

How to run a report in form 10g;

RUN_REPORT_OBJECT - check the on line help and there is a great paper on otn.oracle.com/products/forms and click on 9i papers (it will be relevant for 10g as well)>
Regards
Grant Ronald
Forms Product Management

Calling reports in forms through menu

hi
can anybody tell me how to call reports in forms through menu
i just forgot how to call...
exact menu item code!!
rgds,

Hi,
Just use in-builts RUN_REPORT_OBJECT or RUN_PRODUCT. It is recomended to use teh RUN_REPORT_OBJECT. For more help see the built-in help of forms. In code on menu write all the code for passing parameters to report by making a parameter list and passing it to report when calling it.
Help in forms for RUN_REPORT_OBJECT will clarify your all doubts.

Problem with output from report to excel, calling the report from form 10g

Hi everyone, I'm having a problem generating a excel from a report, which is called from a form, I'm using Forms 10g. The problem is this: My report has a variable number of columns. These columns appear according to data obtained from the database, these columns are dates, In vesion 6 excel file generated shows the columns one after another starting in column A1 to column CP. I mean that the dates are correlative. But in version 10g the excel file generated shows the same report starting in column A to column T, only shows the 20 dates correlative corresponding to this columns, the rest of the dates are down the excel sheet in groups of 20 dates, it's something, the file in 6i grows across and in 10g grows down the excel sheet. The report (rdf file) is the same in 6i and 10g, I compiled the 6i version to obtain the 10g version. The excel sheet generated in 10g looks like the report was in pdf format, because PDF format, cuts the report in pages and the file grows down, if I generate the report in PDF format it has the same structure excel file in 10g has. I hope yo can help because I have days trying to solve this but I have no succes. If someone could help I could email the excel files generated in two versions. Here I put the code I use to generate the files in 6i and 10g. I have tried with DESFORMAT=SPREADSHEET in 10g but the result is the same. Thanks for your help. Greetings for all.
Code for version 6i (Works Very well)
PROCEDURE GUARDAREXCEL IS
pl_id ParamList;
nom_rep varchar2(20);
cla_rep varchar2(20);
cod_dis varchar2(4);
nom_arch varchar2(100);
fec date;
BEGIN
pl_id := Get_Parameter_List('tmpdata');
IF NOT Id_Null(pl_id) THEN
Destroy_Parameter_List( pl_id );
END IF;
pl_id := Create_Parameter_List('tmpdata');
IF :BK_PARAMETROS.LI_COD_DIS IS NOT NULL THEN
cod_dis := :BK_PARAMETROS.LI_COD_DIS;
END IF;
IF :BK_PARAMETROS.TI_COD_CLI IS NOT NULL THEN
Add_Parameter(pl_id,'P_COD_CLI',TEXT_PARAMETER,:BK_PARAMETROS.TI_COD_CLI||'%');
ELSE
Add_Parameter(pl_id,'P_COD_CLI',TEXT_PARAMETER,'%');
:BK_PARAMETROS.TI_COD_CLI:='%';
END IF;
IF :BK_PARAMETROS.CLAS_REP=1 THEN
cla_rep := '001';
ELSE
     IF :BK_PARAMETROS.CLAS_REP=2 THEN
          cla_rep := '002';
     ELSE
          IF :BK_PARAMETROS.CLAS_REP=3 THEN
          cla_rep := '003';
     ELSE
          cla_rep := '004';
     END IF;
     END IF;
END IF;
Add_Parameter(pl_id,'P_COD_DIS',TEXT_PARAMETER, cod_dis);
Add_Parameter(pl_id,'P_FECHA',TEXT_PARAMETER,to_char(:BK_PARAMETROS.FECFIN, 'DD/MM/YYYY'));
Add_Parameter(pl_id,'P_CLASE',TEXT_PARAMETER, cla_rep);
Add_Parameter(pl_id,'PARAMFORM',TEXT_PARAMETER,'NO');
Add_Parameter(pl_id,'DESTYPE',TEXT_PARAMETER,'File');
Add_Parameter(pl_id,'MODE',TEXT_PARAMETER,'Character');
Add_Parameter(pl_id,'DESFORMAT',TEXT_PARAMETER,'DELIMITED' );
select sysdate into fec from dual;
IF :BK_PARAMETROS.TIPO_REP=1 THEN
     BEGIN
nom_rep := 'tdvenrli1577.rep';
nom_arch := 'c:\windows\temp\RepCobranzaPlanos' || TO_CHAR(fec, 'ddmmyyyy') || '.xls';
END;
ELSIF :BK_PARAMETROS.TIPO_REP=2 THEN
          BEGIN
          nom_rep := 'tdvenrli1578.rep';
          nom_arch := 'c:\windows\temp\RepCobranzaLargos' || TO_CHAR(fec, 'ddmmyyyy') || '.xls';
          END;
ELSIF :BK_PARAMETROS.TIPO_REP=3 THEN
     BEGIN
                    Add_Parameter(pl_id,'P_XLS',TEXT_PARAMETER, '1');
          nom_rep := 'tdvenrli1576.rep';
          nom_arch := 'c:\windows\temp\RepCobranzaDetallados' || TO_CHAR(fec, 'ddmmyyyy') || '.xls';
          END;
ELSE
          BEGIN
                    nom_rep := 'TDVENRLI1545.REP';
          nom_arch := 'c:\windows\temp\RepCobranzaTodos' || TO_CHAR(fec, 'ddmmyyyy') || '.xls';
          END;
END IF;
--Add_Parameter(pl_id,'DESNAME',TEXT_PARAMETER,nom_arch );
Add_Parameter(pl_id,'DESNAME',TEXT_PARAMETER, nom_arch);
standard.commit;
Run_Product(REPORTS, nom_rep, SYNCHRONOUS, runtime, FILESYSTEM, pl_id,'');
EXCEPTION WHEN Run_Product_Failure THEN
message('Error');
END;
Code for version 10g
PROCEDURE GUARDAREXCEL IS
pl_id ParamList;
nom_rep varchar2(20);
cla_rep varchar2(20);
cod_dis varchar2(4);
nom_arch varchar2(100);
fec date;
--byt12122007.sn
repid REPORT_OBJECT;
     vURL VARCHAR2(500);
     rep_status VARCHAR2(20);
     vJobID VARCHAR2(100);
     v_rep VARCHAR2(100);
VAR NUMBER;
w_name_repserv VARCHAR2(30);
--byt1212007.en
BEGIN
     --w_name_repserv:=F_OBTIENE_SERVREP;
w_name_repserv:='repserv';
pl_id := Get_Parameter_List('mytmp_params');
IF NOT Id_Null(pl_id) THEN
Destroy_Parameter_List( pl_id );
END IF;
pl_id := Create_Parameter_List('mytmp_params');
IF :BK_PARAMETROS.LI_COD_DIS IS NOT NULL THEN
     cod_dis := :BK_PARAMETROS.LI_COD_DIS;
END IF;
IF :BK_PARAMETROS.TI_COD_CLI IS NOT NULL THEN
Add_Parameter(pl_id,'P_COD_CLI',TEXT_PARAMETER,:BK_PARAMETROS.TI_COD_CLI||'%');
ELSE
Add_Parameter(pl_id,'P_COD_CLI',TEXT_PARAMETER,'%');
:BK_PARAMETROS.TI_COD_CLI:='%';
END IF;
IF :BK_PARAMETROS.CLAS_REP=1 THEN
cla_rep := '001';
ELSE
     IF :BK_PARAMETROS.CLAS_REP=2 THEN
          cla_rep := '002';
     ELSE
          IF :BK_PARAMETROS.CLAS_REP=3 THEN
          cla_rep := '003';
     ELSE
          cla_rep := '004';
     END IF;
     END IF;
END IF;
Add_Parameter(pl_id,'P_COD_DIS',TEXT_PARAMETER, cod_dis);
Add_Parameter(pl_id,'P_FECHA',TEXT_PARAMETER,to_char(:BK_PARAMETROS.FECFIN, 'DD/MM/YYYY'));
Add_Parameter(pl_id,'P_CLASE',TEXT_PARAMETER, cla_rep);
Add_Parameter(pl_id,'PARAMFORM',TEXT_PARAMETER,'NO');
/*Add_Parameter(pl_id,'DESTYPE',TEXT_PARAMETER,'File');
Add_Parameter(pl_id,'MODE',TEXT_PARAMETER,'Character');
Add_Parameter(pl_id,'DESFORMAT',TEXT_PARAMETER,'DELIMITED' );*/
select sysdate into fec from dual;
IF :BK_PARAMETROS.TIPO_REP=1 THEN
BEGIN
     repid := find_report_object('tdvenrli1577');
--nom_rep := 'tdvenrli1577.rep';
nom_arch := 'c:\windows\temp\RepCobranzaPlanos' || TO_CHAR(fec, 'ddmmyyyy') || '.xls';
SET_REPORT_OBJECT_PROPERTY(repid, REPORT_FILENAME,'tdvenrli1577');
END;
ELSIF :BK_PARAMETROS.TIPO_REP=2 THEN
BEGIN
     repid := find_report_object('tdvenrli1578');
          --nom_rep := 'tdvenrli1578.rep';
          nom_arch := 'c:\windows\temp\RepCobranzaLargos' || TO_CHAR(fec, 'ddmmyyyy') || '.xls';
          SET_REPORT_OBJECT_PROPERTY(repid, REPORT_FILENAME,'tdvenrli1578');
          END;
ELSIF :BK_PARAMETROS.TIPO_REP=3 THEN
BEGIN
     repid := find_report_object('tdvenrli1576');
                    Add_Parameter(pl_id,'P_XLS',TEXT_PARAMETER, '1');
          --nom_rep := 'tdvenrli1576.rep';
          nom_arch := 'c:\windows\temp\RepCobranzaDetallados' || TO_CHAR(fec, 'ddmmyyyy') || '.xls';
          SET_REPORT_OBJECT_PROPERTY(repid, REPORT_FILENAME,'tdvenrli1576');
          END;
ELSE
BEGIN
     repid := find_report_object('tdvenrli1545');
                    --nom_rep := 'TDVENRLI1545.REP';
          nom_arch := 'c:\windows\temp\RepCobranzaTodos' || TO_CHAR(fec, 'ddmmyyyy') || '.xls';
          SET_REPORT_OBJECT_PROPERTY(repid, REPORT_FILENAME,'tdvenrli1545');
          END;
END IF;
--Add_Parameter(pl_id,'DESNAME',TEXT_PARAMETER,nom_arch );
--Add_Parameter(pl_id,'DESNAME',TEXT_PARAMETER, nom_arch);
standard.commit;
SET_REPORT_OBJECT_PROPERTY(repid, REPORT_DESNAME,nom_arch);
SET_REPORT_OBJECT_PROPERTY(repid, REPORT_COMM_MODE, SYNCHRONOUS);
     SET_REPORT_OBJECT_PROPERTY(repid, REPORT_EXECUTION_MODE, RUNTIME);
     SET_REPORT_OBJECT_PROPERTY(repid, REPORT_DESTYPE, 'File');
     SET_REPORT_OBJECT_PROPERTY(repid, REPORT_DESFORMAT, 'DELIMITED');
     SET_REPORT_OBJECT_PROPERTY(repid, REPORT_SERVER, w_name_repserv);
     SET_REPORT_OBJECT_PROPERTY(repid, REPORT_OTHER, 'paramform=no');
     v_rep := RUN_REPORT_OBJECT(repid, pl_id);
     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 = 'FINISHED' THEN
          vJobID := SUBSTR(v_rep, INSTR(v_rep, '_', -1)+1);
          vURL:='/reports/rwservlet/getjobid'||vJobID||'?'||'server='||w_name_repserv;
     END IF;
     WEB.SHOW_DOCUMENT(vURL, '_blank');
     IF NOT form_success THEN
          MESSAGE('Error: PL/SQL held against Button failed to execute');
          RAISE FORM_TRIGGER_FAILURE;
     END IF;
/*Run_Product(REPORTS, nom_rep, SYNCHRONOUS, runtime, FILESYSTEM, pl_id,'');
EXCEPTION WHEN Run_Product_Failure THEN
message('Error');*/
END;

There are two problems with your VI. First, the basic logic of writing/appending to a file (Excel, TDMS, anything) should go something like this: Open the file, position yourself at the end of the file, then, in the loop, acquire data and write it to the file until you are finished with data acquisition. When you exit the acquire/write to file loop, then close the file. In particular, the opening and the closing of the file should not be inside the loop.
As others have pointed out, writing to Excel might not be optimal, particularly if you are acquiring data at a high rate (and would therefore be writing a lot of data). We actually use Excel in our data acquisition routine, mainly reading from a WorkSheet to get the parameters of a particular stimulus, but also writing the outcome of the response to the stimulus. As it happens, our "acquisition rate" in this example is on the order of several samples per minute, so there's no problem using Excel (we also sample 16 channels of analog data at 1 KHz -- this gets written as a binary file).
Second, if you really do want to use Excel, use the (existing) Excel file to which you want to append as the "template" argument of the New Report function. Then use the Excel Get Last Row function to position yourself at "end of file", as noted above.
Good Luck.
Bob Schor

Calling report on oracle 10g forms

hi to all,
how can call oracle10g reports to oracle 10g forms? using a parameter..e.g: employee id.
Please i need a sample code...
note : report will not run on internet explorer.
thanks.
Edited by: baguhan on Jul 1, 2009 6:06 AM

Hai Baguhan,
Try this.
DECLARE
     RO_Report_ID REPORT_OBJECT;
     Str_Report_Server_Job VARCHAR2(100);
     Str_Job_ID VARCHAR2(100);
     Str_URL VARCHAR2(100);
     PL_ID PARAMLIST ;
BEGIN
     PL_ID := GET_PARAMETER_LIST('TEMPDATA');
     IF NOT ID_NULL(PL_ID) THEN
     DESTROY_PARAMETER_LIST(PL_ID);
     END IF;
     PL_ID := CREATE_PARAMETER_LIST('TEMPDATA');
     RO_Report_ID := FIND_REPORT_OBJECT('REPORT_OBJ');
     ADD_PARAMETER(PL_ID, 'EMP_ID', TEXT_PARAMETER, <value to EMPID parameter>);
--FOLLOWING PARAMETERS ARE MANDATORY PARAMETERS TO SET REPORT OBJECT
          SET_REPORT_OBJECT_PROPERTY(RO_Report_ID, REPORT_FILENAME, '<report_full_path>');
          SET_REPORT_OBJECT_PROPERTY(RO_Report_ID, REPORT_COMM_MODE, SYNCHRONOUS);
          SET_REPORT_OBJECT_PROPERTY(RO_Report_ID, REPORT_EXECUTION_MODE, BATCH);
          SET_REPORT_OBJECT_PROPERTY(RO_Report_ID, REPORT_DESTYPE, FILE);
          SET_REPORT_OBJECT_PROPERTY(RO_Report_ID, REPORT_DESFORMAT, 'PDF');
          SET_REPORT_OBJECT_PROPERTY(RO_Report_ID, REPORT_SERVER, <report_server_name>);
          Str_Report_Server_Job := RUN_REPORT_OBJECT(RO_Report_ID, PL_ID);
          Str_Job_ID := SUBSTR(Str_Report_Server_Job, LENGTH(<report_server_name>) + 2, LENGTH(Str_Report_Server_Job));
          Str_URL       := '/reports/rwservlet/getjobid' || Str_Job_ID || '?server=' || <report_server_name>;
          WEB.SHOW_DOCUMENT(Str_URL, '_SELF');
          DESTROY_PARAMETER_LIST(PL_ID);
END IF;
END;And add a report object in the form. ( in the above code, its REPORT_OBJ ).
Regards,
Manu.
If this answer is helpful or correct, please mark it. Thanks.

Call report under form 10g

Similar Messages

Maybe you are looking for