The following lines contain the word 'select', 'insert', 'update' or 'delete':
SELECT b.user_id, b.user_name
FROM JTF_RS_RESOURCE_EXTNS a
, JTF_RS_RESOURCE_EXTNS b
WHERE b.source_id = a.source_mgr_id
AND a.user_id = p_user_id;
SELECT TO_CHAR(IEX_DEL_WF_S.NEXTVAL) INTO itemkey FROM dual;
SELECT user_name INTO l_user_name from JTF_RS_RESOURCE_EXTNS
WHERE user_id = p_user_id;
PROCEDURE update_approval_status(
itemtype IN VARCHAR2,
itemkey IN VARCHAR2,
actid IN NUMBER,
funcmode IN VARCHAR2,
result OUT NOCOPY VARCHAR2
) is
l_manager_name varchar2(60);
l_api_name VARCHAR2(100) := 'update_approval_status';
update IEX_DELINQUENCIES_ALL
set CREDIT_HOLD_APPROVED_FLAG = 'Y'
where delinquency_id = l_delinquency_id;
update IEX_REPOSSESSIONS
set CREDIT_HOLD_APPROVED_FLAG = 'Y'
where repossession_id = l_repossession_id;
update IEX_LITIGATIONS
set CREDIT_HOLD_APPROVED_FLAG = 'Y'
where litigation_id = l_litigation_id;
update IEX_WRITEOFFS
set CREDIT_HOLD_APPROVED_FLAG = 'Y'
where writeoff_id = l_writeoff_id;
update IEX_BANKRUPTCIES
set CREDIT_HOLD_APPROVED_FLAG = 'Y'
where bankruptcy_id = l_bankruptcy_id;
END update_approval_status;
procedure update_rejection_status(
itemtype IN VARCHAR2,
itemkey IN VARCHAR2,
actid IN NUMBER,
funcmode IN VARCHAR2,
result OUT NOCOPY VARCHAR2
) is
l_manager_name varchar2(60);
l_api_name VARCHAR2(100) := 'update_rejection_status';
update IEX_DELINQUENCIES_ALL
set CREDIT_HOLD_APPROVED_FLAG = 'N'
where delinquency_id = l_delinquency_id;
update IEX_REPOSSESSIONS
set CREDIT_HOLD_APPROVED_FLAG = 'N'
where repossession_id = l_repossession_id;
update IEX_LITIGATIONS
set CREDIT_HOLD_APPROVED_FLAG = 'N'
where litigation_id = l_litigation_id;
update IEX_WRITEOFFS
set CREDIT_HOLD_APPROVED_FLAG = 'N'
where writeoff_id = l_writeoff_id;
update IEX_BANKRUPTCIES
set CREDIT_HOLD_APPROVED_FLAG = 'N'
where bankruptcy_id = l_bankruptcy_id;
END update_rejection_status;