4: --
5: -- Error (PRIVATE)
6: -- Print a page with an error message.
7: -- Errors are retrieved from these sources in order: 8: -- 1. wf_core errors 9: -- 2. Oracle errors
10: -- 3. Unspecified INTERNAL error
11: --
12: procedure Error
Line 39: Wf_Core.Token('RULE', to_char(ruleid));
35: from WF_ROUTING_RULES WRR
36: where WRR.RULE_ID = RuleOwner.ruleid;
37: exception
38: when no_data_found then 39: Wf_Core.Token('RULE', to_char(ruleid)); 40: Wf_Core.Raise('WFRTG_INVALID_RULE');
41: end;
42:
43: return owner;
Line 40: Wf_Core.Raise('WFRTG_INVALID_RULE');
36: where WRR.RULE_ID = RuleOwner.ruleid;
37: exception
38: when no_data_found then
39: Wf_Core.Token('RULE', to_char(ruleid)); 40: Wf_Core.Raise('WFRTG_INVALID_RULE'); 41: end;
42:
43: return owner;
44: exception
Line 46: wf_core.context('Wf_Route', 'RuleOwner', to_char(ruleid));
42:
43: return owner;
44: exception
45: when others then 46: wf_core.context('Wf_Route', 'RuleOwner', to_char(ruleid)); 47: raise;
48: end RuleOwner;
49:
50: --
Line 77: admin_role := wf_core.translate('WF_ADMIN_ROLE');
73: end if;
74:
75: -- If admin granted to current user,
76: -- grant access and pretend to be 77: admin_role := wf_core.translate('WF_ADMIN_ROLE'); 78: if (admin_role = '*' or
79: Wf_Directory.IsPerformer(curuser, admin_role)) then
80: return(user);
81: end if;
Line 85: Wf_Core.Token('CURUSER', curuser);
81: end if;
82:
83: -- Otherwise current user must match the user checking
84: if (curuser <> user) then 85: Wf_Core.Token('CURUSER', curuser); 86: Wf_Core.Token('USER', user);
87: Wf_Core.Raise('WFRTG_ACCESS_USER');
88: end if;
89:
Line 86: Wf_Core.Token('USER', user);
82:
83: -- Otherwise current user must match the user checking
84: if (curuser <> user) then
85: Wf_Core.Token('CURUSER', curuser); 86: Wf_Core.Token('USER', user); 87: Wf_Core.Raise('WFRTG_ACCESS_USER');
88: end if;
89:
90: return(user);
Line 87: Wf_Core.Raise('WFRTG_ACCESS_USER');
83: -- Otherwise current user must match the user checking
84: if (curuser <> user) then
85: Wf_Core.Token('CURUSER', curuser);
86: Wf_Core.Token('USER', user); 87: Wf_Core.Raise('WFRTG_ACCESS_USER'); 88: end if;
89:
90: return(user);
91: exception
Line 93: wf_core.context('Wf_Route', 'Authenticate', user);
89:
90: return(user);
91: exception
92: when others then 93: wf_core.context('Wf_Route', 'Authenticate', user); 94: raise;
95: end Authenticate;
96:
97: --
Line 130: wf_core.context('Wf_Route', 'GetAttrValue', to_char(ruleid), attrname);
126: exception
127: when no_data_found then
128: return(FALSE);
129: when others then 130: wf_core.context('Wf_Route', 'GetAttrValue', to_char(ruleid), attrname); 131: raise;
132: end GetAttrValue;
133:
134: --
Line 161: wf_core.context('Wf_Route', 'GetLookupMeaning', ltype, lcode);
157: exception
158: when no_data_found then
159: return(lcode);
160: when others then 161: wf_core.context('Wf_Route', 'GetLookupMeaning', ltype, lcode); 162: raise;
163: end GetLookupMeaning;
164:
165: --
Line 245: wf_core.context('Wf_Route', 'GetDisplayWindow', type, format,
241: return(value);
242:
243: exception
244: when others then 245: wf_core.context('Wf_Route', 'GetDisplayWindow', type, format, 246: tvalue, to_char(nvalue), to_char(dvalue));
247: raise;
248: end GetDisplayValue;
249:
Line 260: l_message varchar2(240) := wfa_html.replace_onMouseOver_quotes(wf_core.translate ('WFPREF_LOV'));
256: dvalue in varchar2,
257: seq in varchar2 )
258: is
259: len pls_integer; 260: l_message varchar2(240) := wfa_html.replace_onMouseOver_quotes(wf_core.translate ('WFPREF_LOV')); 261:
262: -- variable for LOV
263: l_url varchar2(1000);
264: l_media varchar2(240) := wfa_html.image_loc;
Line 307: wf_core.context('Wf_route', 'GetRole', name, seq);
303: cattributes=>'id=""');
304:
305: exception
306: when others then 307: wf_core.context('Wf_route', 'GetRole', name, seq); 308: raise;
309: end GetRole;
310:
311:
Line 345: wf_core.newline||
341: htp.formHidden('h_fdocnames', '');
342:
343: -- Create hidden field and select list
344: template := htf.formHidden('h_fnames', name||'#LOOKUP#'||format)|| 345: wf_core.newline|| 346: htf.formSelectOpen('h_fvalues',
347: cattributes=>'id="i_attr'||seq||'"');
348:
349:
Line 353: template := template||wf_core.newline||
349:
350: -- Add all lookups to select list
351: for i in lookup_codes(format) loop
352: if (i.lookup_code = value) then 353: template := template||wf_core.newline|| 354: htf.formSelectOption(i.meaning, 'SELECTED');
355: else
356: template := template||wf_core.newline||
357: htf.formSelectOption(i.meaning);
Line 356: template := template||wf_core.newline||
352: if (i.lookup_code = value) then
353: template := template||wf_core.newline||
354: htf.formSelectOption(i.meaning, 'SELECTED');
355: else 356: template := template||wf_core.newline|| 357: htf.formSelectOption(i.meaning);
358: end if;
359: end loop;
360: template := template||wf_core.newline||htf.formSelectClose;
Line 360: template := template||wf_core.newline||htf.formSelectClose;
356: template := template||wf_core.newline||
357: htf.formSelectOption(i.meaning);
358: end if;
359: end loop; 360: template := template||wf_core.newline||htf.formSelectClose; 361:
362: if (not submit) then
363: -- Draw a normal field
364: htp.tableData(template, 'left',cattributes=>'id=""');
Line 369: ||wf_core.newline||template);
365: else
366: -- Draw a submit-style field for the result.
367: -- Leave TableData open so reassign button can be added to same cell.
368: htp.p('
Line 370: htp.formSubmit('Submit', wf_core.translate('SUBMIT'), 'NOBORDER');
366: -- Draw a submit-style field for the result.
367: -- Leave TableData open so reassign button can be added to same cell.
368: htp.p('
'
369: ||wf_core.newline||template); 370: htp.formSubmit('Submit', wf_core.translate('SUBMIT'), 'NOBORDER'); 371: end if;
372:
373: exception
374: when others then
Line 375: wf_core.context('Wf_Route', 'GetLookup', name, value, format, seq);
371: end if;
372:
373: exception
374: when others then 375: wf_core.context('Wf_Route', 'GetLookup', name, value, format, seq); 376: raise;
377: end GetLookup;
378:
379: -- GetDocument (PRIVATE)
Line 423: wf_core.context('Wf_route', 'GetDocument', name, format, dvalue);
419: cattributes=>'id=""');
420:
421: exception
422: when others then 423: wf_core.context('Wf_route', 'GetDocument', name, format, dvalue); 424: raise;
425: end GetDocument;
426:
427: --
Line 484: wf_core.context('Wf_Route', 'GetField', name, type, format, dvalue,
480: cattributes=>'id=""');
481: end if;
482: exception
483: when others then 484: wf_core.context('Wf_Route', 'GetField', name, type, format, dvalue, 485: index_num);
486: raise;
487: end GetField;
488:
Line 525: wf_core.token('ROLE', role);
521: return(rname);
522: exception
523: when no_data_found then
524: -- Not displayed or internal role name, error 525: wf_core.token('ROLE', role); 526: wf_core.raise('WFNTF_ROLE');
527: end;
528:
529: exception
Line 526: wf_core.raise('WFNTF_ROLE');
522: exception
523: when no_data_found then
524: -- Not displayed or internal role name, error
525: wf_core.token('ROLE', role); 526: wf_core.raise('WFNTF_ROLE'); 527: end;
528:
529: exception
530: when others then
Line 531: wf_core.context('Wf_Route', 'ValidateRole', role);
527: end;
528:
529: exception
530: when others then 531: wf_core.context('Wf_Route', 'ValidateRole', role); 532: raise;
533: end ValidateRole;
534:
535: --
Line 594: wf_core.context('Wf_Route', 'StringToDate', dstring);
590:
591: return(datebuf);
592: exception
593: when others then 594: wf_core.context('Wf_Route', 'StringToDate', dstring); 595: raise;
596: end StringToDate;
597:
598: --
Line 652: wf_core.token('TYPE', attr_fmt);
648: where Wl.LOOKUP_TYPE = SetAttribute.attr_fmt
649: and MEANING = SetAttribute.attr_value;
650: exception
651: when no_data_found then 652: wf_core.token('TYPE', attr_fmt); 653: wf_core.token('CODE', attr_value);
654: wf_core.raise('WFSQL_LOOKUP_CODE');
655: end;
656: elsif (attr_type = 'ROLE') then
Line 653: wf_core.token('CODE', attr_value);
649: and MEANING = SetAttribute.attr_value;
650: exception
651: when no_data_found then
652: wf_core.token('TYPE', attr_fmt); 653: wf_core.token('CODE', attr_value); 654: wf_core.raise('WFSQL_LOOKUP_CODE');
655: end;
656: elsif (attr_type = 'ROLE') then
657:
Line 654: wf_core.raise('WFSQL_LOOKUP_CODE');
650: exception
651: when no_data_found then
652: wf_core.token('TYPE', attr_fmt);
653: wf_core.token('CODE', attr_value); 654: wf_core.raise('WFSQL_LOOKUP_CODE'); 655: end;
656: elsif (attr_type = 'ROLE') then
657:
658: -- Decode role to internal name
Line 695: wf_core.context('Wf_Route', 'SetAttribute',
691: );
692: end if;
693: exception
694: when others then 695: wf_core.context('Wf_Route', 'SetAttribute', 696: to_char(ruleid), attr_name_type, attr_value);
697: raise;
698: end SetAttribute;
699:
Line 728: wf_core.context('Wf_Route', 'DeleteRule', ruleid, user);
724: -- Return to opening page
725: Wf_Route.List(user, '--EDITSCREEN--');
726: exception
727: when others then 728: wf_core.context('Wf_Route', 'DeleteRule', ruleid, user); 729: wf_route.error;
730: end;
731:
732: --
Line 813: wf_core.raise('WFRTG_BAD_DATE_RANGE');
809: enddate := StringToDate(end_date);
810:
811: -- Validate date range
812: if (enddate <= begdate) then 813: wf_core.raise('WFRTG_BAD_DATE_RANGE'); 814: end if;
815:
816: -- Update columns in main table
817: update WF_ROUTING_RULES WRR set
Line 857: wf_core.context('Wf_Route', 'SubmitUpdate', rule_id, action,
853: when CANCEL_RECORD then
854: Wf_Route.List(owner);
855:
856: when others then 857: wf_core.context('Wf_Route', 'SubmitUpdate', rule_id, action, 858: action_argument, begin_date, end_date);
859: wf_route.error;
860: end SubmitUpdate;
861:
Line 882: l_onmouseover varchar2(240) := wfa_html.replace_onMouseOver_quotes(wf_core.translate('WFA_FIND_USER'));
Line 965: Wf_Core.Token('RULE', to_char(nruleid));
961: -- Get rule data
962: open rulecurs;
963: fetch rulecurs into rulerec;
964: if (rulecurs%notfound) then 965: Wf_Core.Token('RULE', to_char(nruleid)); 966: Wf_Core.Raise('WFRTG_INVALID_RULE');
967: end if;
968: close rulecurs;
969:
Line 966: Wf_Core.Raise('WFRTG_INVALID_RULE');
962: open rulecurs;
963: fetch rulecurs into rulerec;
964: if (rulecurs%notfound) then
965: Wf_Core.Token('RULE', to_char(nruleid)); 966: Wf_Core.Raise('WFRTG_INVALID_RULE'); 967: end if;
968: close rulecurs;
969:
970: -- Set page title
Line 973: htp.title(wf_core.translate('WFRTG_UPDATE_TITLE')||' '||realname);
969:
970: -- Set page title
971: htp.htmlOpen;
972: htp.headOpen; 973: htp.title(wf_core.translate('WFRTG_UPDATE_TITLE')||' '||realname); 974: wfa_html.create_help_function('wf/links/upr.htm?UPRULE');
975: fnd_document_management.get_open_dm_display_window;
976:
977: -- Add the java script to the header to open the dm window for
Line 982: wfa_sec.Header(FALSE,'',wf_core.translate('WFRTG_UPDATE_TITLE'), TRUE);
978: -- any DM function that and any standard LOV
979: fnd_document_management.get_open_dm_attach_window;
980:
981: htp.headClose; 982: wfa_sec.Header(FALSE,'',wf_core.translate('WFRTG_UPDATE_TITLE'), TRUE); 983:
984: -- Open form
985: -- Add dummy fields to start both array-type input fields.
986: -- These dummy values are needed so that the array parameters to
Line 1005: htp.tableData(cvalue=>wf_core.translate('MESSAGE_TYPE'),
Line 1107: wf_core.translate('WFA_ASSIGNTO') || '');
1103:
1104: end if;
1105:
1106: htp.p('');
1108: htp.formHidden('action_argument', rulerec.action_argument);
1109:
1110: if (rulerec.action_argument IS NOT NULL) then
1111:
Line 1146: wf_core.translate('WFA_GROUP_REASSIGN_DELEGATE') || '');
Line 1152: wf_core.translate('WFA_GROUP_REASSIGN_TRANSFER') || '');
1148: htp.p('&'||'nbsp;&'||'nbsp;&'||'nbsp;');
1149: htp.formRadio(cname=>'fmode', cvalue=>'TRANSFER', cchecked=>tchecked,
1150: cattributes=>'id="i_transfer"');
1151: htp.p('');
1153: htp.br;
1154:
1155: -- ### Comment below out since we have Delegate and Transfer implemented
1156: -- Instead put a hidden field to make fmode forward
Line 1193: wf_core.translate('WFRTG_CLOSE') || '');
1189: -- a choice of 'close', otherwise 'respond'.
1190: --
1191: if (rowcount = 0) then
1192: htp.p('');
1194: else
1195: htp.p('');
1197: -- Draw attr fields
Line 1196: wf_core.translate('WFITD_MSG_SOURCE_TYPE_RESPOND') || '');