5: ** We need need to fetch URL prefix from WF_WEB_AGENT in wf_resources
6: ** since this function gets called from the forms environment
7: ** which doesn't know anything about the cgi variables.
8: */
9: dm_base_url varchar2(240) := wf_core.translate('WF_WEB_AGENT');
10:
11: --
12: -- Error (PRIVATE)
13: -- Print a page with an error message.
11: --
12: -- Error (PRIVATE)
13: -- Print a page with an error message.
14: -- Errors are retrieved from these sources in order:
15: -- 1. wf_core errors
16: -- 2. Oracle errors
17: -- 3. Unspecified INTERNAL error
18: --
19: procedure Error
23: error_stack varchar2(32000);
24: begin
25: htp.htmlOpen;
26: htp.headOpen;
27: htp.title(wf_core.translate('ERROR'));
28: htp.headClose;
29:
30: begin
31: wfa_sec.Header(background_only=>TRUE);
33: when others then
34: htp.bodyOpen;
35: end;
36:
37: htp.header(nsize=>1, cheader=>wf_core.translate('ERROR'));
38:
39: wf_core.get_error(error_name, error_message, error_stack);
40:
41: if (error_name is not null) then
35: end;
36:
37: htp.header(nsize=>1, cheader=>wf_core.translate('ERROR'));
38:
39: wf_core.get_error(error_name, error_message, error_stack);
40:
41: if (error_name is not null) then
42: htp.p(error_message);
43: else
44: htp.p(sqlerrm);
45: end if;
46:
47: htp.hr;
48: htp.p(wf_core.translate('WFENG_ERRNAME')||': '||error_name);
49: htp.br;
50: htp.p(wf_core.translate('WFENG_ERRSTACK')||': '||
51: replace(error_stack,wf_core.newline,'
'));
52:
46:
47: htp.hr;
48: htp.p(wf_core.translate('WFENG_ERRNAME')||': '||error_name);
49: htp.br;
50: htp.p(wf_core.translate('WFENG_ERRSTACK')||': '||
51: replace(error_stack,wf_core.newline,'
'));
52:
53: wfa_sec.Footer;
54: htp.htmlClose;
47: htp.hr;
48: htp.p(wf_core.translate('WFENG_ERRNAME')||': '||error_name);
49: htp.br;
50: htp.p(wf_core.translate('WFENG_ERRSTACK')||': '||
51: replace(error_stack,wf_core.newline,'
'));
52:
53: wfa_sec.Footer;
54: htp.htmlClose;
55:
152: l_username varchar2(80);
153: l_media varchar2(240) := wfa_html.image_loc;
154: l_icon varchar2(30) := 'FNDILOV.gif';
155: l_text varchar2(30) := '';
156: l_onmouseover varchar2(30) := wf_core.translate ('WFPREF_LOV');
157: l_url varchar2(4000);
158: l_error_msg varchar2(240);
159:
160: BEGIN
164:
165: -- Set page title
166: htp.htmlOpen;
167: htp.headOpen;
168: htp.title(wf_core.translate('ICX_FIND_QUESTIONS_TITLE'));
169: wfa_html.create_help_function('wf/links/dmr.htm?DMREP');
170: fnd_document_management.get_open_dm_display_window;
171: wf_lov.OpenLovWinHtml;
172:
172:
173: htp.headClose;
174:
175: -- Page header
176: wfa_sec.Header(FALSE, '', wf_core.translate('ICX_FIND_QUESTIONS_TITLE'), TRUE);
177:
178: htp.tableopen(calign=>'CENTER');
179:
180: htp.p('