The following lines contain the word 'select', 'insert', 'update' or 'delete':
v_lit_sql := ' select l.created_by, l.litigation_id, r.SOURCE_NAME, ' ;
v_wof_sql := ' select l.created_by, l.writeoff_id, r.SOURCE_NAME, ' ;
v_ban_sql := ' select l.created_by, l.bankruptcy_id, r.SOURCE_NAME, ' ;
v_rep_sql := ' select l.created_by, l.repossession_id, r.SOURCE_NAME, ' ;
select 'LIT_' || to_char(IEX_DEL_WF_S.Nextval)
INTO v_itemkey
from dual ;
select 'BAN_' || to_char(IEX_DEL_WF_S.Nextval)
INTO v_itemkey
from dual ;
select 'WRI_' || to_char(IEX_DEL_WF_S.Nextval)
INTO v_itemkey
from dual ;
select 'REP_' || to_char(IEX_DEL_WF_S.Nextval)
INTO v_itemkey
from dual ;
PROCEDURE SELECT_NOTICE
__________________________________________________________________________*/
----------- procedure update_approval_status -----------------------------
PROCEDURE select_notice(itemtype IN varchar2,
itemkey IN varchar2,
actid IN number,
funcmode IN varchar2,
result OUT NOCOPY varchar2) is
l_responder VARCHAR2(100);
l_api_name VARCHAR2(100) := 'select_notice';
WF_CORE.Context('IEX_WF_DEL_CUR_STATUS_NOTE_PUB', 'Select Notice',
itemtype, itemkey, actid, funcmode);
END select_notice;
PROCEDURE select_resource_info(
p_delinquency_id IN NUMBER) IS
BEGIN
null;
WF_CORE.Context('IEX_WF_DEL_CUR_STATUS_NOTE_PUB', 'Select Notice' );
END select_resource_info;
p_wf_item_NUMBER_VALUE.DELETE(2, p_wf_item_NUMBER_NAME.LAST) ;
p_wf_item_TEXT_VALUE.DELETE(p_wf_item_NUMBER_NAME.FIRST, p_wf_item_NUMBER_NAME.LAST) ;
SELECT DISTINCT DELINQUENCY_ID
BULK COLLECT INTO ld_del_tbl
From IEX_DEL_CHILDREN ;