The following lines contain the word 'select', 'insert', 'update' or 'delete':
select WRR.ROLE
into owner
from WF_ROUTING_RULES WRR
where WRR.RULE_ID = RuleOwner.ruleid;
select WRRA.TEXT_VALUE, WRRA.NUMBER_VALUE, WRRA.DATE_VALUE
into tvalue, nvalue, dvalue
from WF_ROUTING_RULE_ATTRIBUTES WRRA
where WRRA.RULE_ID = GetAttrValue.ruleid
and WRRA.NAME = GetAttrValue.attrname;
select WL.MEANING
into meaning
from WF_LOOKUPS WL
where WL.LOOKUP_TYPE = GetLookupMeaning.ltype
and WL.LOOKUP_CODE = GetLookupMeaning.lcode;
select MEANING, LOOKUP_CODE
from WF_LOOKUPS
where LOOKUP_TYPE = p_lookup_type
order by MEANING;
htf.formSelectOpen('h_fvalues',
cattributes=>'id="i_attr'||seq||'"');
htf.formSelectOption(i.meaning, 'SELECTED');
htf.formSelectOption(i.meaning);
template := template||wf_core.newline||htf.formSelectClose;
select NAME
into rname
from WF_ROLE_LOV_VL
where DISPLAY_NAME = ValidateRole.role;
select WL.LOOKUP_CODE
into tvalue
from WF_LOOKUPS WL
where Wl.LOOKUP_TYPE = SetAttribute.attr_fmt
and MEANING = SetAttribute.attr_value;
update WF_ROUTING_RULE_ATTRIBUTES WRRA set
TEXT_VALUE = SetAttribute.tvalue,
NUMBER_VALUE = SetAttribute.nvalue,
DATE_VALUE = SetAttribute.dvalue
where WRRA.RULE_ID = SetAttribute.ruleid
and WRRA.NAME = SetAttribute.attr_name;
insert into WF_ROUTING_RULE_ATTRIBUTES (
RULE_ID,
NAME,
TYPE,
TEXT_VALUE,
NUMBER_VALUE,
DATE_VALUE
) values (
SetAttribute.ruleid,
SetAttribute.attr_name,
'RESPOND',
SetAttribute.tvalue,
SetAttribute.nvalue,
SetAttribute.dvalue
);
procedure DeleteRule(
user in varchar2 ,
ruleid in varchar2)
is
owner varchar2(320);
delete from WF_ROUTING_RULE_ATTRIBUTES
where RULE_ID = ruleid;
delete from WF_ROUTING_RULES
where RULE_ID = ruleid;
wf_core.context('Wf_Route', 'DeleteRule', ruleid, user);
procedure SubmitUpdate(
rule_id in varchar2,
action in varchar2,
fmode in varchar2 ,
action_argument in varchar2 ,
display_action_argument in varchar2 ,
begin_date in varchar2 ,
end_date in varchar2 ,
rule_comment in varchar2 ,
h_fnames in Name_Array,
h_fvalues in Value_Array,
h_fdocnames in Value_Array,
h_counter in varchar2,
delete_button in varchar2 ,
update_button in varchar2 )
is
nruleid number;
if (delete_button is not null) then
/*
-- Now delete rule in the List procedure instead of here
-- Delete this rule along with any child attributes
delete from WF_ROUTING_RULE_ATTRIBUTES
where RULE_ID = nruleid;
delete from WF_ROUTING_RULES
where RULE_ID = nruleid;
update WF_ROUTING_RULES WRR set
ACTION = l_action,
ACTION_ARGUMENT = SubmitUpdate.forwardee,
BEGIN_DATE = SubmitUpdate.begdate,
END_DATE = SubmitUpdate.enddate,
RULE_COMMENT = SubmitUpdate.rule_comment
where WRR.RULE_ID = SubmitUpdate.nruleid;
update WF_ROUTING_RULE_ATTRIBUTES WRRA set
TEXT_VALUE = null,
NUMBER_VALUE = null,
DATE_VALUE = null
where WRRA.RULE_ID = nruleid;
wf_core.context('Wf_Route', 'SubmitUpdate', rule_id, action,
action_argument, begin_date, end_date);
end SubmitUpdate;
procedure UpdateRule(
ruleid in varchar2)
is
nruleid number;
select WRR.MESSAGE_TYPE,
WRR.MESSAGE_NAME,
to_char(WRR.BEGIN_DATE)||to_char(WRR.BEGIN_DATE, ' HH24:MI:SS')
CBEGIN_DATE,
to_char(WRR.END_DATE) ||to_char(WRR.END_DATE, ' HH24:MI:SS')
CEND_DATE,
WRR.ACTION,
WRR.ACTION_ARGUMENT,
WRR.RULE_COMMENT,
WIT.DISPLAY_NAME TYPE_DISPLAY,
WM.SUBJECT
from WF_ROUTING_RULES WRR, WF_ITEM_TYPES_VL WIT, WF_MESSAGES_VL WM,
WF_LOOKUPS WL
where WRR.RULE_ID = nruleid
and WRR.MESSAGE_TYPE = WIT.NAME (+)
and WRR.MESSAGE_TYPE = WM.TYPE (+)
and WRR.MESSAGE_NAME = WM.NAME (+)
and WRR.ACTION = WL.LOOKUP_CODE
and WL.LOOKUP_TYPE = 'WFSTD_ROUTING_ACTIONS';
select WMA.NAME,
WMA.DISPLAY_NAME,
WMA.VALUE_TYPE,
decode(WMA.VALUE_TYPE, 'ITEMATTR', WIA.TEXT_DEFAULT,
WMA.TEXT_DEFAULT) TEXT_VALUE,
decode(WMA.VALUE_TYPE, 'ITEMATTR', WIA.NUMBER_DEFAULT,
WMA.NUMBER_DEFAULT) NUMBER_VALUE,
decode(WMA.VALUE_TYPE, 'ITEMATTR', WIA.DATE_DEFAULT,
WMA.DATE_DEFAULT) DATE_VALUE,
WMA.TYPE,
WMA.FORMAT
from WF_ROUTING_RULES WRR,
WF_MESSAGE_ATTRIBUTES_VL WMA,
WF_ITEM_ATTRIBUTES WIA
where WRR.RULE_ID = nruleid
and WRR.MESSAGE_TYPE = WMA.MESSAGE_TYPE
and WRR.MESSAGE_NAME = WMA.MESSAGE_NAME
and WMA.SUBTYPE = 'RESPOND'
and WMA.TYPE not in ('FORM', 'URL')
and WMA.MESSAGE_TYPE = WIA.ITEM_TYPE (+)
and WMA.TEXT_DEFAULT = WIA.NAME (+)
order by decode(WMA.NAME, 'RESULT', 9999, WMA.SEQUENCE);
htp.title(wf_core.translate('WFRTG_UPDATE_TITLE')||' '||realname);
wfa_sec.Header(FALSE,'',wf_core.translate('WFRTG_UPDATE_TITLE'), TRUE);
htp.p('
select MESSAGE_TYPE, MESSAGE_NAME
into msg_type, msg_name
from WF_ROUTING_RULES
where RULE_ID = ruleid;
select count(WMA.NAME) into rowcount
from WF_ROUTING_RULES WRR,
WF_MESSAGE_ATTRIBUTES_VL WMA,
WF_ITEM_ATTRIBUTES WIA
where WRR.RULE_ID = nruleid
and WRR.MESSAGE_TYPE = WMA.MESSAGE_TYPE
and WRR.MESSAGE_NAME = WMA.MESSAGE_NAME
and WMA.SUBTYPE = 'RESPOND'
and WMA.TYPE not in ('FORM', 'URL')
and WMA.MESSAGE_TYPE = WIA.ITEM_TYPE (+)
and WMA.TEXT_DEFAULT = WIA.NAME (+)
order by decode(WMA.NAME, 'RESULT', 9999, WMA.SEQUENCE);
wf_core.context('Wf_Route', 'UpdateRule', ruleid);
end UpdateRule;
delete_button in varchar2 ,
done_button in varchar2 )
is
owner varchar2(320);
if (delete_button is not null) then
--
-- Raise DELETE so that it won't create a record
--
Wf_Route.List(user, '--EDITSCREEN--');
select WF_ROUTING_RULES_S.NEXTVAL
into ruleid
from SYS.DUAL;
insert into WF_ROUTING_RULES (
RULE_ID,
ROLE,
ACTION,
BEGIN_DATE,
END_DATE,
MESSAGE_TYPE,
MESSAGE_NAME,
ACTION_ARGUMENT,
RULE_COMMENT
) values (
ruleid,
SubmitCreate.owner,
SubmitCreate.l_action,
begdate,
enddate,
SubmitCreate.typebuf,
SubmitCreate.namebuf,
SubmitCreate.forwardee,
SubmitCreate.rule_comment
);
insert_button in varchar2 ,
cancel_button in varchar2 )
is
begin
NULL;
insert_button in varchar2 ,
cancel_button in varchar2 )
is
begin
NULL;
select WRR.MESSAGE_TYPE,
WRR.MESSAGE_NAME,
WRR.BEGIN_DATE,
WRR.END_DATE,
WRR.ACTION,
WRR.ACTION_ARGUMENT,
WRR.RULE_ID,
WIT.DISPLAY_NAME TYPE_DISPLAY,
WM.DISPLAY_NAME MSG_DISPLAY,
WM.SUBJECT,
WL.MEANING ACTION_DISPLAY
from WF_ROUTING_RULES WRR, WF_ITEM_TYPES_VL WIT, WF_MESSAGES_VL WM,
WF_LOOKUPS WL
where WRR.ROLE = username
and WRR.MESSAGE_TYPE = WIT.NAME (+)
and WRR.MESSAGE_TYPE = WM.TYPE (+)
and WRR.MESSAGE_NAME = WM.NAME (+)
and WRR.ACTION = WL.LOOKUP_CODE
and WL.LOOKUP_TYPE = 'WFSTD_ROUTING_ACTIONS'
order by TYPE_DISPLAY, MSG_DISPLAY, BEGIN_DATE;
select sysdate into today from sys.dual;
wf_core.translate('WFRTG_DELETE')||'',
calign=>'Center',
cattributes=>'id="' || wf_core.translate('WFRTG_DELETE') || '"');
'/Wf_Route.UpdateRule?ruleid='||
to_char(rule.rule_id),
wf_core.translate('DELEGATE')||':'||
forwardname),
'left',cattributes=>'id=""');
'/Wf_Route.UpdateRule?ruleid='||
to_char(rule.rule_id),
wf_core.translate('TRANSFER')||':'||
forwardname),
'left',cattributes=>'id=""');
'/Wf_Route.UpdateRule?ruleid='||
to_char(rule.rule_id),
wf_core.translate('WFRTG_DELIVERTOME')),
'left',cattributes=>'id=""');
select count(WMA.NAME)
into rowcount
from WF_ROUTING_RULES WRR,
WF_MESSAGE_ATTRIBUTES_VL WMA,
WF_ITEM_ATTRIBUTES WIA
where WRR.RULE_ID = rule.rule_id
and WRR.MESSAGE_TYPE = WMA.MESSAGE_TYPE
and WRR.MESSAGE_NAME = WMA.MESSAGE_NAME
and WMA.SUBTYPE = 'RESPOND'
and WMA.TYPE not in ('FORM', 'URL')
and WMA.MESSAGE_TYPE = WIA.ITEM_TYPE (+)
and WMA.TEXT_DEFAULT = WIA.NAME (+)
order by decode(WMA.NAME, 'RESULT', 9999, WMA.SEQUENCE);
select TEXT_VALUE
into att_tvalue
from WF_ROUTING_RULE_ATTRIBUTES
where RULE_ID = rule.rule_id
and NAME = 'RESULT';
select WL.MEANING
into att_tvalue
from WF_LOOKUPS WL,
WF_MESSAGE_ATTRIBUTES_VL WMA,
WF_ROUTING_RULES WRR,
WF_ROUTING_RULE_ATTRIBUTES WRA
where WRA.RULE_ID = rule.rule_id
and WRA.NAME = 'RESULT'
and WRR.RULE_ID = WRA.RULE_ID
and WMA.NAME = WRA.NAME
and WRR.MESSAGE_TYPE = WMA.MESSAGE_TYPE
and WRR.MESSAGE_NAME = WMA.MESSAGE_NAME
and WL.LOOKUP_TYPE = WMA.FORMAT
and WL.LOOKUP_CODE = WRA.TEXT_VALUE;
'/Wf_Route.UpdateRule?ruleid='||
to_char(rule.rule_id),
wf_core.translate('WFRTG_CLOSE')),
'left',cattributes=>'id="' ||
wf_core.translate('WFRTG_CLOSE') || '"');
'/Wf_Route.UpdateRule?ruleid='||
to_char(rule.rule_id),
wf_core.translate('WFITD_MSG_SOURCE_TYPE_RESPOND')||':'
||att_tvalue),
'left',cattributes=>'id="' || wf_core.translate('WFITD_MSG_SOURCE_TYPE_RESPOND') || '"');
'/Wf_Route.UpdateRule?ruleid='||
to_char(rule.rule_id),
wf_core.translate('WFITD_MSG_SOURCE_TYPE_RESPOND')),
'left',cattributes=>'id="' || wf_core.translate('WFITD_MSG_SOURCE_TYPE_RESPOND') || '"');
'/Wf_Route.DeleteRule?user='||username||
'&'||'ruleid='||to_char(rule.rule_id),
ctext=>'
'),
'center', cattributes=>'valign="MIDDLE" id=""');
wf_core.translate('WFRTG_INSERT'),
wfa_html.image_loc,
'FNDJLFOK.gif',
wf_core.translate('WFRTG_INSERT'));
update WF_ROUTING_RULES
set MESSAGE_NAME = upper(p_newMessageName)
where MESSAGE_TYPE = p_itemType
and MESSAGE_NAME = p_oldMessageName;