Get_application_property

We are converting forms from 4.5 to 6i. When we try to use get_application_property(current_form), it no longer displays the entire path c:/forms/myform.fmx it only displays myform.fmx.
Is there another function that we need to call to show the entire path of where the .fmx is located?

Julie,
I answered this in your other post.
Regards,
Robin Zimmermann
Forms Product Management

Similar Messages

GET_APPLICATION_PROPERTY(DATASOURCE) = 'ORACLE' DS 10gR1 vs. DS 10gR2

I have a form that was compiled under 10gR1 DS and launches fine, but after compiling it under 10gR2 DS it is not responding in the same manner as 10gR1 to an if statement in the code checking to see if it is connected to an ORACLE database.
In the 10gR1 version of the form
The check to see if the form was connected to an oracle database would return false after EXIT_FORM(NO_VALIDATE);
And this is what was expected to happen with the 10gR2 version of the form.
But in the 10gR2 version of the form
After the EXIT_FORM(NO_VALIDATE); statement
the if GET_APPLICATION_PROPERTY(DATASOURCE) = 'ORACLE' statment returns a true and causes the form to break because its not connected to the database anymore but the code in this if statement contains sql against database tables
How come only for DS 10gR2 after the EXIT_FORM(NO_VALIDATE); statement
the get_application_property(DATASOURCE) = 'ORACLE' is true, Even though its not connected to the database anymore?
Thanks,
Michelle

HI...i have a similiar problem. we recently migration to 10g and still using oracle forms 6i. Problem is that i have a logon for which check the datasource to determine the status of the login user.
If the user, currently is expired or logged out, it should remeber a message otherwise if the datasource is not oracle then show unable to connect on log out.
On the form, there is a on_logon trigger..
if i do a show message, i can see that if the user is expired it will not pickup the datasource, instead it is null, logging out the user.
please have a look at the code below:
logon(:login.user_name,:login.password||'@'||:login.instance_name,false);
v_datasource := get_application_property(DATASOURCE);
if v_datasource = 'ORACLE' then
begin
select account_status
into v_status
from dba_users
where username = v_username;
if v_status like 'LOCKED%' then
v_message := 'This users account is locked - contact support';
end if;
if v_status like 'EXPIRED%' then
:global.user_name := v_username;
:global.new_password := 'N';
:global.old_password := v_password;
call_form('c_passmnt', hide, do_replace, no_query_only);
if :global.new_password = 'N' then
v_message := 'Password not changed - contact support';
else
:login.user_name := v_old_username;
:login.password := :global.new_password_new;
logout; SYNCHRONIZE;
logon(:login.user_name,:login.password||'@'||:login.instance_name,true);
end if;
end if;

Using get_application_property(CONFIG) in 6i and 10g

Hi,
for a short time, our application has to run with 6i and 10g at the same time. We have to use the new constant CONFIG also in 6i. How can I mask this constant that it works correctly. Implementing it like this doesn't work:
PROCEDURE gui$new_session
IS
pl_id ParamList;
form_name varchar2(100);
lo_connect varchar2(250);
lo_url varchar2(200);
lo_conf varchar2(50);
co_config CONSTANT NUMBER := 'CONFIG';
BEGIN
form_name := replace(pdb_anwendung.get_anw_exe('PRAG_MENUE45'), '.FMX','');
IF get_application_property(USER_INTERFACE) <> 'WEB' THEN
RUN_PRODUCT(FORMS, form_name, ASYNCHRONOUS, RUNTIME, FILESYSTEM, pl_id, NULL);
ELSE
lo_connect := get_application_property(USERNAME)||'/'||get_application_property(PASSWORD)||'@'||get_application_property(CONNECT_STRING);
lo_conf := get_application_property(co_config);
lo_url := 'javascript:window.open("/forms/frmservlet?config='||lo_conf||'&form='||form_name||'&userid='||lo_connect||'","","location=no,toolbar=no,menubar=no,status=no,");self.close();';
WEB.SHOW_DOCUMENT(lo_url,'_blank');
END IF;
END;
Unfortunately, I can't set the constant CONFIG directly into get_application_property (what is working properly used directly in 10g) because then I get a compilation error in 6i. Can somebody help me?
Regards,
Heike

Clearly...
co_config CONSTANT NUMBER := 'CONFIG';... won't work because you are assigning a varchar value to a number. CONFIG (without the quotes) is a built-in constant in Forms 10g that has a value of 221. So you could try this (notice there are no single quotes)...
co_config CONSTANT NUMBER := CONFIG;... but I doubt that will compile in 6i as CONFIG won't be defined. So maybe you could use...
co_config CONSTANT NUMBER := 221;It's bad practice to hard-code a value like that though.

Get_application_property(current_form) returns the name with .fmx extension

Hi
We are using Forms 10g. [Forms [32 Bit] Version 10.1.2.0.2 (Production)]
When i use get_application_property(current_form) to get the current forms to get the name of the file. It works perfect.
Ex: When i use this in a form "Employee_master", it returns EMPLOYEE_MASTER. (i.e. with the extention .fmx)
In the same form, if i have a button, which opens another form "Department_master" using the code
open_form('department_master', activate, session, no_share_library_data, pl_id);
once the department_master form is opened and if i use get_application_property(current_form), then it returns department_master.fmx
Why is this difference?
Thanks in advance.

Look at the file name stored on your operating system. the first file form is probably stored on your hard drive as EMPLOYEE_MASTER.fmb and EMPLOYEE_MASTER.fmx. The other form is probably stored as department_master.fmb and department_master.fmx.
The get_application_property(current_form) is returning the form name in what ever case the file is stored on your hard drive as.
Hope this helps,
Travis

Alternate option for Get_Application_Property(PASSWORD)

Hi All,
Here is the problem i am facing.
The current business process in our application is running through forms and is carried out manually by the user. This process involves the generation of reports (pdf format) during the process. so the connect string for running reports is passed using the forms built-in
get_application_property(username)/get_application_property(password)@get_application_property(connect_string).
Now since the requirement is to covert this business process to a batch job, that is entirely through backend, I’m not sure how to get the user password using pl/sql to pass as parameter to run the reports.
I have browsed the net for a possible solution, but couldn’t find anything useful.
Can anyone please suggest any approach for this?
Thank you,
Vidya

Hi
I’m not sure how to get the user password using pl/sql to pass as parameter to run the reports. it's not so far from here :)
Capture login credentials with Forms 6i.
Hope this helps...
Regards,
Abdetu...
Edited by: Abdetu on Apr 6, 2011 12:23 AM

Any alternative for get_application_property(CURRENT_FORM); in oracle 10g

get_application_property(CURRENT_FORM); is clearly working in 6i forms........But not working in 10g forms....
help me...

"not working" is not a clear information. Do you mean no value or wrong value?
I have tested on my 10.1.2.3 installation, and it returns the full pathname executable module.
Francois

Reg GET_APPLICATION_PROPERTY

Hi all,
i am newbie working on forms, i was trying out the example with timers, my goal is to achieve a running counter in field,
i wrote following code in "NEW-FORM-INSTANCE"
DECLARE
     timer_instance TIMER;
BEGIN
     timer_instance := FIND_TIMER('CLOCK_TIMER');
     IF NOT ID_NULL(timer_instance)
          THEN
          DELETE_TIMER(timer_instance);
     ELSE
          timer_instance := CREATE_TIMER('CLOCK_TIMER',1000,REPEAT);
     END IF;
     SELECT TO_CHAR(SYSDATE,'HH24:MI:SS') INTO :CTL_BLOCK.TIME_FIELD
     FROM DUAL;
     EXCEPTION WHEN OTHERS THEN
          MESSAGE(TO_CHAR(SQLCODE)||' '||SQLERRM);
     END;
and this works fine, when new form is instanciated i m getting the time, but when i wanted the running time i added following code in "WHEN-TIMER-EXPIRED"
DECLARE
     timer_name VARCHAR2(30);
BEGIN
     timer_name := GET_APPLICATION_PROPERTY(TIMER_NAME);
     IF timer_name = 'CLOCK_TIMER' THEN
          SELECT TO_CHAR(SYSDATE,'HH24:MI:SS') INTO
          :CTL_BLOCK.TIME_FIELD FROM DUAL;
     END IF;
     EXCEPTION WHEN OTHERS THEN
          MESSAGE(TO_CHAR(SQLCODE)||' '||SQLERRM);
     END;
and after i run the form i am getting error every 1 sec saying *"Attribute1 of Built-in GET_APPLICATION_PROPERTY cannot be NULL"*
Kindly help me out..
Regards,
Sreekanth.

hi
when-new-form-instance trigger
CANCEL_TIMER('T1');
CANCEL_TIMER('tim1');
create procedure with the following code.
PROCEDURE CANCEL_TIMER
(P_TIMER_NAME IN VARCHAR2
IS
tm_id Timer;
BEGIN
tm_id := Find_Timer( P_TIMER_NAME );
IF NOT Id_Null(tm_id)
THEN Delete_Timer(tm_id);
ELSE Message('Timer '||P_TIMER_NAME||' has already been cancelled.');
END IF;
END;
if its helful or correct plz mark it as answer.thanks
sarah

Can you open a report in Excel/Word desktop instead of the web pugin?

using run_report_object( and web.show_document,
how or can you get a report to open in the desktop/full version of MS Excel/Word instead of the web plugin versions?
I can get the browser to open a report in pdf with my desktop adobe reader, but not with an rtf or xml/delimited desformat.
Currently I don't pass a mimetype when opening as a pdf, but I do pass one in the url when i am destypes of xml, delimited and rtf,
as this is the only way i have found out how to open the reports in word/excel.
I'm in the process of upgrading from forms 6 client/server to 10g developer suite, so this is my try with a web based system.
Does anyone have any suggestions, or where I should look.
Below I listed my code from a procedure.
the first part of the procedure is alot of converting, but if you skip down to the part between the 2 sets of double lines this fairly standard.
PACKAGE BODY pmc_lib IS
-- Procedure to run the report.
procedure run_reports(v_report_name in varchar2, -- Report Name with or w/o a path.
v_commode in number default synchronous, -- commode
v_execmode in number default runtime, -- execute mode
v_file_sys in number default filesystem, -- dummy
v_param_list in paramlist, -- parameter list
v_show_modes in varchar2 default null) is -- used for testing,
-- if set to anthing but null, the report properties will display
-- on the screen through an alert prior to printing.
v_errorcode number;
v_errortext varchar2(600);
v_initialized boolean := false;
v_prop_reportserver varchar2(200);
v_report_path varchar2(200);
v_user varchar2(100);
v_user_sessionid number;
v_forms_version varchar2(100);
v_default_report_server varchar2(200);
v_default_server_domain_path varchar2(200);
v_connect_string varchar2(3) := get_application_property(connect_string);
v_user_name varchar2(35) := get_application_property(username);
report_id report_object;
reportserverjob varchar2(100);
v_jobid varchar2(100);
rep_status varchar2(100);
v_url varchar2(500);
v_url2 varchar2(500);
v_parameter_value varchar2(100);
v_destype_param_value varchar2(100) := null;
v_desformat_param_value varchar2(100) := null;
v_desname_param_value varchar2(100) := null;
v_value_n number := 0;
v_param_type number := text_parameter;
v_prop_execmode number;
v_prop_commode number;
v_prop_destype number;
v_prop_filename varchar2(200);
v_prop_source_block varchar2(200) := null;
v_prop_query_name varchar2(200) := null;
v_prop_desname varchar2(200) := null;
v_prop_desformat varchar2(200) := null;
v_prop_reportserver varchar2(200) := null;
v_prop_other varchar2(200) := null;
v_mimetype varchar2(200) := null;
v_selected_mimetype varchar2(200) := null;
report_not_generated exception;
report_id_not_found exception;
BEGIN
v_forms_version := get_application_property(version);
v_prop_reportserver := get_report_object_property('report1', report_server);
v_report_path := null;
v_user := v_user_name || '/' ||
get_application_property(password) || '@' ||
v_connect_string;
if v_connect_string = 'NNN' then
v_default_server_domain_path := 'pmcoracapp01.aapmc.com/reports/rwservlet';
v_default_report_server := 'rep_pmcoracapp01_frhome1';
else
v_default_server_domain_path := 'oradevsrv.aapmc.com/reports/rwservlet';
v_default_report_server := 'rep_oradevsrv_frhome1';
end if;
v_initialized := true;
-- Check to see what version of forms is running.
if substr(v_forms_version, 1, 1) <> '6' then
-- Check to see if WEB version is running
-- This may be an unnecessary check.
if (get_application_property(user_interface) = 'WEB') then
report_id := find_report_object('report1');
-- id_null won't work on a report_id in Version 6, may put back in 10g once version 6 is gone completly
-- if id_null(report_id) then
-- raise report_id_not_found;
-- end if;
-- Because of Convertions from old system the following are needed.
-- 1) If 'execmode' is runtime, then change it to batch.
if v_execmode = runtime then
     v_prop_execmode := batch;
else
     v_prop_execmode := v_execmode;
end if;
-- 2) If Report name has an attached path, then remove it.
v_value_n := instr(lower(v_report_name), 'k:\pmc\new\');
if v_value_n = 0 then
     v_prop_filename := v_report_name;
else
     v_prop_filename := substr(v_report_name, v_value_n + 11);
end if;
-- From looking at the FORMS, 'destype' parameter is always passed in from the FORM.
-- It is either 'preview' or 'file'.
-- This is here for the converstion from Forms 6 to 10g.
-- If for some reason destype has not been passed in as a parameter, you will get a FORM error,
-- saying the parameter does not exists.
begin
-- 3) If 'destype' is one of the following, then change it to cache.
get_parameter_attr(v_param_list, 'destype', v_param_type, v_destype_param_value);
if lower(nvl(v_destype_param_value, 'null')) in ('preview', 'file', 'null') then
v_prop_destype := cache;
-- 3a) If 'destype' was = 'file' then check the 'desformat' and 'desname'.
if lower(nvl(v_destype_param_value, 'null')) = 'file' then
-- 3b) Get 'desformat' value
get_parameter_attr(v_param_list, 'desformat', v_param_type, v_desformat_param_value);
-- 'delimited' was not working, so change all 'delimited' to 'delimiteddata'.
if lower(nvl(v_desformat_param_value, 'null')) = 'delimited' then
     v_desformat_param_value := 'delimiteddata';
end if;
-- 3c) If 'desformat' is NOT one of the following, then change it to pdf.
if lower(nvl(v_desformat_param_value, 'null')) not in ('pdf', 'xml', 'rtf', 'delimiteddata') then
v_prop_desformat := 'pdf';
else
v_prop_desformat := lower(v_desformat_param_value);
end if;
-- 4) Get 'desname' property.
get_parameter_attr(v_param_list, 'desname', v_param_type, v_desname_param_value);
v_prop_desname := lower(v_desname_param_value);
end if;
else
v_prop_destype := lower(v_destype_param_value);
end if;
exception
when others then
null;
end;
-- If a desformat is rtf, xml, or delimited then get a mimetype to pass to the url
if lower(v_prop_desformat) = 'rtf' then
v_mimetype := '&mimetype=application/msword';
elsif lower(v_prop_desformat) = 'xml' then
v_mimetype := '&mimetype=application/vnd.ms-excel';
elsif lower(v_prop_desformat) = 'delimiteddata' then
v_mimetype := '&mimetype=application/vnd.ms-excel';
end if;
-- 6) If the Following are not set within the Report Object then
-- set them to the following defaults.
-- These are al required to be set for the Report Object to Function.
-- These are the defaults for AAPMC.
v_prop_execmode := nvl(v_prop_execmode, batch);
v_prop_commode := nvl(v_prop_commode, synchronous);
v_prop_destype := nvl(v_prop_destype, cache);
v_prop_desformat := nvl(v_prop_desformat, 'pdf');
v_prop_reportserver := nvl(v_prop_reportserver, v_default_report_server);
-- Set All Report_Object Properties
set_report_object_property(report_id, report_execution_mode, v_prop_execmode);
set_report_object_property(report_id, report_comm_mode, v_commode);
set_report_object_property(report_id, report_destype, v_prop_destype);
set_report_object_property(report_id, report_filename, v_prop_filename);
set_report_object_property(report_id, report_source_block, v_prop_source_block);
set_report_object_property(report_id, report_query_name, v_prop_query_name);
set_report_object_property(report_id, report_desname, v_prop_desname);
set_report_object_property(report_id, report_desformat, v_prop_desformat);
set_report_object_property(report_id, report_server, v_prop_reportserver);
set_report_object_property(report_id, report_other, v_prop_other);
-- Run Report_Object
reportserverjob := run_report_object(report_id, v_param_list);
v_jobid := substr(reportserverjob, length(v_prop_reportserver) + 2, length(reportserverjob));
-- If Report Status is not 'FINISHED', then loop till it is.
if reportserverjob is not null then
rep_status := report_object_status(reportserverjob);
while rep_status in ('RUNNING', 'OPENING_REPORT', 'ENQUEUED') loop
rep_status := report_object_status(reportserverjob);
end loop;
if rep_status <> 'FINISHED' then
raise report_not_generated;
end if;
-- Create 1st part of url.
v_url := 'http://' || v_default_server_domain_path || '/getjobid' || v_jobid || '?server=' || v_prop_reportserver;
-- Check for mimetype.
if v_mimetype is not null then
v_url := v_url || v_mimetype;
end if;
-- Final part of url.
v_url2 := 'javascript:window.open("' || v_url || '", "", "fullscreen=no, titlebar=no, location=no, toolbar=no, menubar=no, status=no, resizable=yes"); self.close()';
-- This is the built-in that calls a new browser window
web.show_document(v_url2,'_blank');
else
raise report_not_generated;
end if;
end if;
-- Destroy the parameter list.
destroy_parameter_list(v_param_list);
else
-- This section if for Client Server, Version 6 of forms.
-- It will do the same as before the conversion.
-- It is only used before the complete conversion.
if v_report_name is null then
return;
end if;
v_value_n := instr(v_report_name, 'k:\pmc\new\');
if v_value_n = 0 then
     v_prop_filename := 'k:\pmc\new\' || v_report_name;
else
v_prop_filename := v_report_name;
end if;
run_product(reports,
v_prop_filename,
v_commode,
v_execmode,
filesystem,
v_param_list,
null);
end if;
-- create history record of the report being run
insert into pmc_report_history values(
s_pmc_report_history.nextval,
v_prop_filename,
v_user_name,
sysdate,
v_forms_version,
v_jobid,
v_destype_param_value,
v_desformat_param_value,
v_desname_param_value,
v_prop_destype,
v_prop_desformat,
v_prop_desname,
v_mimetype,
v_window_open_params);
commit;
exception
when report_id_not_found then
show_user_alert('ERROR: Cannot Find Report Object!', null);
when report_not_generated then
show_user_alert('ERROR: Report Not Generated!', null);
when others then
v_errorcode := SQLCODE;
v_errortext := SQLERRM;
show_user_alert('ERROR : ' || v_errorcode || ' = ' || v_errortext, null);
end;
end;

What you could try is downloading the report to the client pc using WEBUTIL_FILETRANSFER.URL_TO_CLIENT, then open the locally save file using something like:
CLIENT_HOST('cmd /c rundll32.exe url.dll,FileProtocolHandler "localfilename"');

Error on generating reports from forms -- 499 Oracle SSO

hai friends..
while am tryng to generate a report from a form(without passing any parameters), am
geting the following message:
*499 Oracle SSO*
Oracle SSO
am posting my code used:
PROCEDURE RUN_REP_RRO
( ip_report_name_incl_path VARCHAR2,
ip_report_object_name VARCHAR2,
ip_report_server_name VARCHAR2,
ip_parameters VARCHAR2
) IS
v_user_name VARCHAR2(60);
v_password VARCHAR2(60);
v_database VARCHAR2(60);
v_report_id REPORT_OBJECT;
v_report_job_id VARCHAR2(100);
v_report_status VARCHAR2(100);
BEGIN
v_user_name := GET_APPLICATION_PROPERTY(USERNAME);
v_password := GET_APPLICATION_PROPERTY(PASSWORD);
v_database := GET_APPLICATION_PROPERTY(CONNECT_STRING);
v_report_id := FIND_REPORT_OBJECT(ip_report_object_name);
SET_REPORT_OBJECT_PROPERTY(v_report_id, REPORT_EXECUTION_MODE, RUNTIME);
SET_REPORT_OBJECT_PROPERTY(v_report_id, REPORT_COMM_MODE, SYNCHRONOUS);
SET_REPORT_OBJECT_PROPERTY(v_report_id, REPORT_DESTYPE, CACHE);
SET_REPORT_OBJECT_PROPERTY(v_report_id, REPORT_DESFORMAT, 'HTML');
SET_REPORT_OBJECT_PROPERTY(v_report_id, REPORT_FILENAME,ip_report_name_incl_path);
SET_REPORT_OBJECT_PROPERTY(v_report_id, REPORT_SERVER,ip_report_server_name);
Web.show_document ('/reports/rwservlet?server=rep_auh0030482_app_serv3&paramform=no&REPORT=C:\TESTFORM.rdf&destype=cache&desformat=html&userid=scott/tiger@orcl','_blank');
pls help me on this issue...

Steve,
can you check the Reports cache directory if the Reports file got created? I would assume yes, but better check.
Frank

How to Identify database sessions used by forms sso user sessions?

Hi:
When using forms with SSO, all database sessions are opened by the same OSUSER (usually oracle), from the same machine (usually the forms server) and by the same program (usually [email protected] [TNS V1-V3]).
I need a way to identify the database session (v$session) that is beeing used by a specific SSO user. By using SSO, we say implicitly that all users using that SSO resource will be connect to the database by a specific database user.
So, what can I do to identify the database session that a specific forms user is using ?
Thanks
Joao Oliveira

You could try something like the following in a when new form instance trigger:
declare
authenticated_username varchar2(30);
begin
authenticated_username := get_application_property(`sso_userid');
DBMS_APPLICATION_INFO.SET_CLIENT_INFO (
client_info IN VARCHAR2);
end;
This will store the sso userid in the client_info field of v$session.
I hope this works for you.
Randy McGregor

Passing SSO user id to database?

I would like to run my 10g forms in SSO mode and I know that I can get the SSO user id using the get_application_property built-in. How do I pass this user id to the database to be used in a database trigger.

Thanks Frank,
I suspected I would have to do something like that, but I have limited experience with calling stored procedures from forms. Would every form need to do this or could I just call the stored procedure and keep it in a variable for the duration of the session? We're probably going to have a form that acts as a menu and calls all other forms.

How to get all the windows ?

Hi all,
I created a timer which detects inactivity in the first form launched by the forms runtime shortcut :
when-new-form-instance :
declare
hWind NUMBER;
CheckTimer TIMER;
begin
hWind := get_window_property(FORMS_MDI_WINDOW,WINDOW_HANDLE);
Win_API_Session.Timeout_Start_Timer(hWind);
CheckTimer := Create_Timer('T_INACTIVITY',10000);
end;
And in the when-timer-expired of the same form :
if upper(get_application_property(TIMER_NAME)) = 'T_INACTIVITY' then
if Win_API_Session.Timeout_get_inactive_time >= 8 then
set_window_property(:system.event_window,title,'Deconnected');
end if;
end if;
My problem is that when I click on a menu item in my menu, and I do nothing during 10 seconds then only the first form's window is titled 'Deconnected' but not the current form .
I have copied the trigger when-timer-expired of the first form to the form I called but there is nothing.
So how to make all the windows , whether it is the active window or it is hidden , to be titled 'Deconnected' when the timer expires ?
Thank you very much indeed.

execute a system process that will output this data and read/parse the output
[notice a pattern?]

File- Export not working after upgrade from 11i to R12

Hi,
File -> Export not working after upgrade from 11i to R12.1.3 in few systems. Can you please let me know what could be the issue.
If export record count more than 200 it is working fine in all the systems and if change the profile option "Export MIME type” value to ‘text/tab-separated-values’ from application/excel also it is wokring.
Thanks and Regards,
Jagadeesha

Enabled the FRD. Below are few last lines. Can you please let me know what i can in this log file contents.
In Argument 1 - Type: String Value: global.frd_debug
Executing GET_ITEM_PROPERTY/FIELD_CHARACTERISTIC Built-in:
In Argument 0 - Type: Integer Value: 196613
In Argument 1 - Type: Number Value: 54
Out Argument 0 - Type: String Value: 12
Executing COPY Built-in:
In Argument 0 - Type: String Value: Entering app_menu.set_prop.
In Argument 1 - Type: String Value: global.frd_debug
Executing FIND_MENU_ITEM Built-in:
In Argument 0 - Type: String Value: FILE.EXPORT
Out Argument 0 - Type: Integer Value: 19
Executing GET_MENU_ITEM_PROPERTY Built-in:
In Argument 0 - Type: Integer Value: 19
In Argument 1 - Type: Number Value: 79
Out Argument 0 - Type: String Value: TRUE
Executing COPY Built-in:
In Argument 0 - Type: String Value: Completed app_menu.set_prop.
In Argument 1 - Type: String Value: global.frd_debug
Executing COPY Built-in:
In Argument 0 - Type: String Value: Completed app_synch.menu_toolbar_sync. Event is WHEN-NEW-ITEM-INSTANCE.
In Argument 1 - Type: String Value: global.frd_debug
Executing NAME_IN Built-in:
In Argument 0 - Type: String Value: GLOBAL.APP_CUSTOM_MODE
Out Argument 0 - Type: String Value: NORMAL
Executing NAME_IN Built-in:
In Argument 0 - Type: String Value: GLOBAL.APP_CUSTOM_MODE
Out Argument 0 - Type: String Value: NORMAL
Executing COPY Built-in:
In Argument 0 - Type: String Value: NULL
In Argument 1 - Type: String Value: GLOBAL.OUT
Executing USER_EXIT Built-in:
In Argument 0 - Type: String Value: FND GETPROFILE NAME="UPK_RECORDING_ENABLED" FIELD="GLOBAL.OUT" N
FNDCPVCM, 11, Built-In, Entry, 316509814, USER_EXIT
FNDCPVCM, 11, Built-In, Exit, 316509814, USER_EXIT
Executing NAME_IN Built-in:
In Argument 0 - Type: String Value: GLOBAL.OUT
Out Argument 0 - Type: String Value: N
Executing NAME_IN Built-in:
In Argument 0 - Type: String Value: system.current_form
Out Argument 0 - Type: String Value: FNDCPVCM
Executing NAME_IN Built-in:
In Argument 0 - Type: String Value: system.current_block
Out Argument 0 - Type: String Value: MASTER
Executing NAME_IN Built-in:
In Argument 0 - Type: String Value: system.current_form
Out Argument 0 - Type: String Value: FNDCPVCM
Executing NAME_IN Built-in:
In Argument 0 - Type: String Value: system.current_block
Out Argument 0 - Type: String Value: MASTER
Executing GET_APPLICATION_PROPERTY Built-in:
In Argument 0 - Type: Number Value: 75
Out Argument 0 - Type: String Value: IHR40P
Executing COPY Built-in:
In Argument 0 - Type: String Value: Completed call_all_libraries. Event is WHEN-NEW-ITEM-INSTANCE.
In Argument 1 - Type: String Value: global.frd_debug
Executing COPY Built-in:
In Argument 0 - Type: String Value: Completed app_standard.event. Event is WHEN-NEW-ITEM-INSTANCE.
In Argument 1 - Type: String Value: global.frd_debug
FNDCPVCM, 10, Prog Unit, Exit, 316509814, /FNDCPVCM-3/P45_30_DEC_201223_28_33
FNDCPVCM, 9, Trigger, Exit, 316509814, WHEN-NEW-ITEM-INSTANCE
FNDCPVCM, 8, Prog Unit, Exit, 316509814, /DMU-4/P8_30_DEC_201223_23_12
# 15 - FNDCPVCM:MASTER.USER_CONCURRENT_QUEUE_NAME.1359399301498413820
WINDOW FNDCPVCM PROGRESS_INDICATOR RESIZE 4198 1500 3
# 16 - FNDCPVCM:MASTER.USER_CONCURRENT_QUEUE_NAME.1359399301512613925
WINDOW FNDCPVCM PROGRESS_INDICATOR RESIZE 4198 1500 3

Running reports from forms on the web

On forms and reports 6i we used the following code to run reports from forms.
We need to do the same on 9i forms and reports, we are running into problems.
Any help will be appreciated.
PROCEDURE web (inFileName VARCHAR2,
inRecordGroup RECORDGROUP) IS
outVirtualPath VARCHAR2(200) := '/forms90/f90servlet?p_url=/reports/rwservlet?'; outServer VARCHAR2(200) := 'server=rep_ora-app-4';
outReport VARCHAR2(200) := 'report='||inFileName;
outUserid VARCHAR2(200) :=
'userid='||GET_APPLICATION_PROPERTY(USERNAME)||'/'||GET_APPLICATION_PROPERTY(PAS
SWORD)||'@'||GET_APPLICATION_PROPERTY(CONNECT_STRING);
outDesType VARCHAR2(200) := 'DESTYPE=CACHE';
outDesFormat VARCHAR2(200) := 'DESFORMAT=PDF'; outUser VARCHAR2(2000);
outCount INTEGER;
error we are getting.
FRM-42017:Module name must be specified.

S Hatch (guest) wrote:
: I'm thinking that you're going to have to install the Reports
: cartridge, create an entry in the keymap with any parameters
and
: call your report via the url.
: Dessislava Gantcheva (guest) wrote:
: : How do I call a report from a form on the web?
: : I have installed Windows NT Server 4.0 with SP 5, OAS4.0.7
EE
: : with patch 1, Developer 6.0 with patch 1. Developer server
and
: : forms server work fine in a non-cartridge implementation,
but
: I
: : cannot run a report within a form. I just have no any info
how
: : to do this.
I have entries in my keymap file and I can call my reports via
the url, but I cannot run a report WITHIN a form. I mean to call
a report by clicking on a button of a form on the web. The
RUN_PRODUCT built-in does not work (at leas it seems like this)
If any one has expiriense with it, please, give me a hint.
Thanks
null

Report not working from forms.

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.

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

Get_application_property

Similar Messages

Maybe you are looking for