The following lines contain the word 'select', 'insert', 'update' or 'delete':
Update IEX_DEL_ASSETS
SET ACTIVE_YN = 'Y'
where asset_id = p_id_tbl(i)
AND delinquency_id = p_del_id
AND object_id = p_object_id
AND object_code = p_object_code;
INSERT INTO IEX_DEL_ASSETS
(DEL_ASSET_ID ,
LAST_UPDATE_DATE ,
LAST_UPDATED_BY ,
LAST_UPDATE_LOGIN ,
CREATION_DATE ,
CREATED_BY ,
OBJECT_VERSION_NUMBER ,
ASSET_ID ,
OBJECT_CODE ,
OBJECT_ID ,
ACTIVE_YN ,
DELINQUENCY_ID)
VALUES
(IEX_DEL_ASSETS_S.NEXTVAL ,
sysdate ,
FND_GLOBAL.USER_ID,
FND_GLOBAL.LOGIN_ID,
sysdate ,
FND_GLOBAL.USER_ID,
1 ,
p_id_tbl(i),
p_object_code ,
p_object_id ,
'Y' ,
p_del_id);
('Add_rec: ' || '[ ' || p_source_module ||' ] - ADD Records Exception - INSERT >>
' || SQLCODE || ' >> ' || SQLERRM);
('Add_rec: ' || '[ ' || p_source_module ||' ] - ADD Records Exception - UPDATE >>
' || SQLCODE || ' >> ' || SQLERRM);
Update IEX_WRITEOFF_CONTRACTS
SET ACTIVE_YN = 'Y'
where contract_id = p_id_tbl(i)
AND delinquency_id = p_del_id
AND object_id = p_object_id
AND object_code = p_object_code;
INSERT INTO IEX_WRITEOFF_CONTRACTS
(WRITEOFF_CONTRACT_ID ,
LAST_UPDATE_DATE ,
LAST_UPDATED_BY ,
LAST_UPDATE_LOGIN ,
CREATION_DATE ,
CREATED_BY ,
OBJECT_VERSION_NUMBER ,
CONTRACT_ID ,
OBJECT_CODE ,
OBJECT_ID ,
ACTIVE_YN ,
DELINQUENCY_ID)
VALUES
(IEX_WRITEOFF_CONTRACTS_S.NEXTVAL,
sysdate ,
FND_GLOBAL.USER_ID,
FND_GLOBAL.LOGIN_ID,
sysdate ,
FND_GLOBAL.USER_ID,
1 ,
p_id_tbl(i),
p_object_code ,
p_object_id ,
'Y' ,
p_del_id);
('Add_rec: ' || '[ ' || p_source_module ||' ] - ADD Records Exception - INSERT >>
' || SQLCODE || ' >> ' || SQLERRM);
('Add_rec: ' || '[ ' || p_source_module ||' ] - ADD Records Exception - UPDATE >>
' || SQLCODE || ' >> ' || SQLERRM);
Update IEX_WRITEOFF_INVOICES
SET ACTIVE_YN = 'Y'
where lease_inv_line_id = p_id_tbl(i)
AND delinquency_id = p_del_id
AND object_id = p_object_id
AND object_code = p_object_code;
INSERT INTO IEX_WRITEOFF_INVOICES
(WRITEOFF_INVOICE_ID ,
LAST_UPDATE_DATE ,
LAST_UPDATED_BY ,
LAST_UPDATE_LOGIN ,
CREATION_DATE ,
CREATED_BY ,
OBJECT_VERSION_NUMBER ,
LEASE_INV_LINE_ID ,
OBJECT_CODE ,
OBJECT_ID ,
ACTIVE_YN ,
DELINQUENCY_ID)
VALUES
(IEX_WRITEOFF_INVOICES_S.NEXTVAL,
sysdate,
FND_GLOBAL.USER_ID,
FND_GLOBAL.LOGIN_ID,
sysdate,
FND_GLOBAL.USER_ID,
1,
p_id_tbl(i),
p_object_code,
p_object_id,
'Y',
p_del_id);
('Add_rec: ' || '[ ' || p_source_module ||' ] - ADD Records Exception - INSERT >>
' || SQLCODE || ' >> ' || SQLERRM);
('Add_rec: ' || '[ ' || p_source_module ||' ] - ADD Records Exception - INSERT >>
' || SQLCODE || ' >> ' || SQLERRM);
UPDATE IEX_DEL_ASSETS
SET ACTIVE_YN = 'N'
WHERE DEL_ASSET_ID = p_id_tbl(cnt) ;
UPDATE IEX_WRITEOFF_CONTRACTS
SET ACTIVE_YN = 'N'
WHERE WRITEOFF_CONTRACT_ID = p_id_tbl(cnt) ;
UPDATE IEX_WRITEOFF_INVOICES
SET ACTIVE_YN = 'N'
WHERE WRITEOFF_INVOICE_ID = p_id_tbl(cnt) ;
select asset_id
BULK COLLECT INTO v_id_tbl
from iex_available_assets_v ;
-- Select id from Left Side Bali Spread for WriteOff Contract
--select contract_id
-- BULK COLLECT INTO v_id_tbl
--from iex_available_assets_v
--where delinquency_id = p_del_id ;
-- Select id from Left Side Bali Spread for WriteOff Invoice
--select asset_id
-- BULK COLLECT INTO v_id_tbl
--from iex_available_assets_v
--where delinquency_id = p_del_id ;
UPDATE IEX_DEL_ASSETS
SET ACTIVE_YN = 'N'
WHERE DELINQUENCY_ID = p_del_id ;
UPDATE IEX_WRITEOFF_CONTRACTS
SET ACTIVE_YN = 'N'
WHERE DELINQUENCY_ID = p_del_id ;
UPDATE IEX_WRITEOFF_INVOICES
SET ACTIVE_YN = 'N'
WHERE DELINQUENCY_ID = p_del_id ;
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 user_name
FROM JTF_RS_RESOURCE_EXTNS
WHERE user_id = p_user_id ;
select IEX_DEL_WF_S.NEXTVAL
Into Itemkey
from dual ;