The following lines contain the word 'select', 'insert', 'update' or 'delete':
PROCEDURE update_strat_org
(
ERRBUF OUT NOCOPY VARCHAR2,
RETCODE OUT NOCOPY VARCHAR2
);
select score_value
from iex_score_histories
where score_object_id = p_object_id
and score_object_code = p_object_type
order by creation_date desc;
select score_value, score_object_id, score_object_code
from iex_score_histories
where score_object_id in (p_object_id, p_object_id2)
and score_object_code in (p_object_type, p_object_type2)
order by creation_date desc;
SELECT decode(COUNT(*), 0, 'N', 'Y') into pre_delinquency_flag FROM IEX_STRATEGY_TEMPLATES_VL
WHERE CATEGORY_TYPE = l_DelStatusPreDel;
l_del_query := 'select d.party_cust_id, null, null, null, null, null,';
l_del_query := l_del_query || ' and not exists (select 1 from iex_strategies where JTF_OBJECT_TYPE = ''PARTY'' and JTF_OBJECT_ID = d.party_cust_id and STATUS_CODE = ''OPEN'') ';
l_del_query := 'select d.party_cust_id, d.cust_account_id, null, null, null, null,';
l_del_query := l_del_query || ' and not exists (select 1 from iex_strategies where JTF_OBJECT_TYPE = ''IEX_ACCOUNT'' and JTF_OBJECT_ID = d.cust_account_id and STATUS_CODE = ''OPEN'') ';
l_del_query := 'select d.party_cust_id, d.cust_account_id, d.customer_site_use_id, null, null, null,';
l_del_query := l_del_query || ' and not exists (select 1 from iex_strategies where JTF_OBJECT_TYPE = ''IEX_BILLTO'' and JTF_OBJECT_ID = d.customer_site_use_id and STATUS_CODE = ''OPEN'') ';
l_del_query := 'select d.party_cust_id, d.cust_account_id, d.customer_site_use_id, d.delinquency_id,';
l_del_query := l_del_query || ' and not exists (select 1 from iex_strategies where JTF_OBJECT_TYPE = ''IEX_DELINQUENCY'' and JTF_OBJECT_ID = d.delinquency_id and STATUS_CODE = ''OPEN'') ';
l_del_query := 'select d.party_cust_id, d.cust_account_id, d.customer_site_use_id, d.delinquency_id,';
l_del_query := l_del_query || ' and not exists (select 1 from iex_strategies where JTF_OBJECT_TYPE = ''IEX_DELINQUENCY'' and JTF_OBJECT_ID = d.delinquency_id and STATUS_CODE = ''OPEN'') ';
select c.creation_date from iex_delinquencies_all c
where (c.status = l_DelStatusDel or c.status = l_delStatusPreDel)
and c.party_cust_id = l_stry_cnt_rec.PARTY_CUST_ID
order by c.creation_date desc;
select c.creation_date from iex_delinquencies_all c
where (c.status = l_DelStatusDel or c.status = l_delStatusPreDel)
and c.party_cust_id = l_stry_cnt_rec.PARTY_CUST_ID
and c.cust_account_id = l_stry_cnt_rec.CUST_ACCOUNT_ID
order by c.creation_date desc;
select c.creation_date from iex_delinquencies_all c
where (c.status = l_DelStatusDel or c.status = l_delStatusPreDel)
and c.party_cust_id = l_stry_cnt_rec.PARTY_CUST_ID
and c.cust_account_id = l_stry_cnt_rec.CUST_ACCOUNT_ID
and c.customer_site_use_id = l_stry_cnt_rec.customer_site_use_ID
order by c.creation_date desc;
select c.creation_date from iex_delinquencies_all c
where (c.status = l_DelStatusDel or c.status = l_delStatusPreDel)
and c.party_cust_id = l_stry_cnt_rec.PARTY_CUST_ID
and c.cust_account_id = l_stry_cnt_rec.CUST_ACCOUNT_ID
and c.customer_site_use_id = l_stry_cnt_rec.customer_site_use_ID
and c.delinquency_id = l_stry_cnt_rec.delinquency_id
order by c.creation_date desc;
select status_code, decode(score_value, null, 0, score_value), strategy_id, strategy_template_id
from iex_strategies where party_id = l_stry_cnt_rec.PARTY_CUST_ID
and jtf_object_id = l_stry_cnt_rec.jtf_object_id
and jtf_object_type = l_stry_cnt_rec.jtf_object_type
and checklist_yn = vCheckList;
select status_code, decode(score_value, null, 0, score_value), strategy_id, strategy_template_id
from iex_strategies where CUST_ACCOUNT_ID = l_stry_cnt_rec.CUST_ACCOUNT_ID
and jtf_object_id = l_stry_cnt_rec.jtf_object_id
and jtf_object_type = l_stry_cnt_rec.jtf_object_type
and checklist_yn = vCheckList;
select status_code, decode(score_value, null, 0, score_value), strategy_id, strategy_template_id
from iex_strategies where customer_site_use_ID = l_stry_cnt_rec.customer_site_use_ID
and jtf_object_id = l_stry_cnt_rec.jtf_object_id
and jtf_object_type = l_stry_cnt_rec.jtf_object_type
and checklist_yn = vCheckList;
select status_code, decode(score_value, null, 0, score_value), strategy_id, strategy_template_id
from iex_strategies where delinquency_id = l_stry_cnt_rec.delinquency_id
and jtf_object_id = l_stry_cnt_rec.jtf_object_id
and jtf_object_type = l_stry_cnt_rec.jtf_object_type
and checklist_yn = vCheckList;
select strategy_rank, decode(score_tolerance, null, 0, score_tolerance), change_strategy_yn
into vStrategyRank, vScoreTolerance, vChangeStrategy
from iex_strategy_templates_vl where strategy_temp_id = vStrategyTemplateId;
' Strategy Template ID selected ' || l_strategy_template_id );
UPDATE IEX_STRATEGIES SET STATUS_code = 'CANCELLED',
last_update_date=sysdate --Added for bug#7594370 by PNAVEENK
WHERE STRATEGY_ID = vStrategyId;
UPDATE IEX_STRATEGIES SET STATUS_code = 'CANCELLED' WHERE STRATEGY_ID = vStrategyId;*/
select count(1)
into l_strat_count
from iex_strategies
where jtf_object_id = l_stry_cnt_rec.jtf_object_id
and jtf_object_type = l_stry_cnt_rec.jtf_object_type
and checklist_yn = vCheckList
and last_update_date>=trunc(sysdate)-1
and status_code not in ('OPEN','ONHOLD');
select s.strategy_id, s.delinquency_id,
s.object_id, s.object_type, s.strategy_template_id, s.jtf_object_type, s.jtf_object_id
from iex_strategies s where s.status_code IN (l_StratStatusOpen, l_StratStatusOnhold) AND
checklist_yn = 'N';
select s.strategy_id, s.strategy_template_id, S.STATUS_CODE from iex_strategies s, iex_delinquencies_all d
where s.strategy_level = l_DefaultStrategyLevel and
s.status_code IN (l_StratStatusOpen, l_StratStatusOnhold, l_StratStatusPending) and
/* begin add for bug 4408860 - add checking CLOSE status from case delinquency */
(d.status = l_DelStatusCurrent or d.status = l_DelStatusClose) and d.party_cust_id = s.party_id
/* end add for bug 4408860 - add checking CLOSE status from case delinquency */
and not exists (select null from iex_delinquencies_all dd where dd.status
= l_DelStatusDel and dd.party_cust_id = s.party_id)
--and dd.org_id = decode(l_org_enabled,'Y',l_org_id,dd.org_id))
and nvl(s.org_id,-99) = decode(l_org_enabled,'Y',l_org_id,nvl(s.org_id,-99)) --Bug# 6870773 Naveen
group by s.strategy_id, s.strategy_template_id, S.STATUS_CODE;
select s.strategy_id, s.strategy_template_id, S.STATUS_CODE from iex_strategies s, iex_delinquencies_all d
where s.strategy_level = l_DefaultStrategyLevel and
s.status_code IN (l_StratStatusOpen, l_StratStatusOnhold, l_StratStatusPending) and
/* begin add for bug 4408860 - add checking CLOSE status from case delinquency */
(d.status = l_DelStatusCurrent or d.status = l_DelStatusClose) and d.CUST_ACCOUNT_id = s.CUST_ACCOUNT_id
/* end add for bug 4408860 - add checking CLOSE status from case delinquency */
and not exists (select null from iex_delinquencies_all dd where dd.status
= l_DelStatusDel and dd.CUST_ACCOUNT_id = s.CUST_ACCOUNT_id)
--and dd.org_id = decode(l_org_enabled,'Y',l_org_id,dd.org_id))
and nvl(s.org_id,-99) = decode(l_org_enabled,'Y',l_org_id,nvl(s.org_id,-99)) --Bug# 6870773 Naveen
group by s.strategy_id, s.strategy_template_id, S.STATUS_CODE;
select s.strategy_id, s.strategy_template_id, S.STATUS_CODE from iex_strategies s, iex_delinquencies_all d
where s.strategy_level = l_DefaultStrategyLevel and
s.status_code IN (l_StratStatusOpen, l_StratStatusOnhold, l_StratStatusPending) and
/* begin add for bug 4408860 - add checking CLOSE status from case delinquency */
(d.status = l_DelStatusCurrent or d.status = l_DelStatusClose) and d.customer_site_use_id = s.customer_site_use_id
/* end add for bug 4408860 - add checking CLOSE status from case delinquency */
and not exists (select null from iex_delinquencies_all dd where dd.status
= l_DelStatusDel and dd.customer_site_use_id = s.customer_site_use_id)
-- and dd.org_id = decode(l_org_enabled,'Y',l_org_id,dd.org_id))
and nvl(s.org_id,-99) = decode(l_org_enabled,'Y',l_org_id,nvl(s.org_id,-99)) --Bug# 6870773 Naveen
group by s.strategy_id, s.strategy_template_id, S.STATUS_CODE;
select s.strategy_id, s.strategy_template_id, s.status_code
from iex_strategies s, iex_delinquencies_all d where d.status = l_DelStatusCurrent and
s.strategy_level = l_DefaultStrategyLevel and
s.object_id = d.delinquency_id and
s.status_code IN (l_StratStatusOpen, l_StratStatusOnhold, l_StratStatusPending);
select s.strategy_id, s.strategy_template_id, s.status_code
from iex_strategies s, iex_delinquencies_all d
/* begin add for bug 4408860 - add checking CLOSE status from case delinquency */
where (d.status = l_DelStatusCurrent or d.status = l_DelStatusClose) and
/* end add for bug 4408860 - add checking CLOSE status from case delinquency */
s.strategy_level = l_DefaultStrategyLevel and
s.jtf_object_id = d.delinquency_id and
s.status_code IN (l_StratStatusOpen, l_StratStatusOnhold, l_StratStatusPending)
and nvl(s.org_id,-99) = decode(l_org_enabled,'Y',l_org_id,nvl(s.org_id,-99)); --Bug# 6870773 Naveen
select s.strategy_id strategy_id,
s.strategy_template_id strategy_template_id,
S.STATUS_CODE STATUS_CODE,
d.party_cust_id party_id
from iex_strategies s, iex_delinquencies_all d
where s.strategy_level = 10 and
s.status_code = 'ONHOLD' and
d.status in ('DELINQUENT','PREDELINQUENT') and
d.party_cust_id = s.party_id and
not exists (select 1 from iex_promise_details p
where p.status='COLLECTABLE'
AND d.delinquency_id=p.delinquency_id)
and nvl(s.org_id,-99) = decode(l_org_enabled,'Y',l_org_id,nvl(s.org_id,-99))
group by s.strategy_id, s.strategy_template_id, S.STATUS_CODE,d.party_cust_id;
select s.strategy_id strategy_id,
s.strategy_template_id strategy_template_id,
S.STATUS_CODE STATUS_CODE,
d.cust_account_id cust_account_id
from iex_strategies s, iex_delinquencies_all d
where s.strategy_level = 20 and
s.status_code = 'ONHOLD' and
d.status in ('DELINQUENT','PREDELINQUENT') and
d.CUST_ACCOUNT_id = s.CUST_ACCOUNT_id and
not exists (select 1 from iex_promise_details p
where p.status='COLLECTABLE'
AND d.delinquency_id=p.delinquency_id)
and nvl(s.org_id,-99) = decode(l_org_enabled,'Y',l_org_id,nvl(s.org_id,-99))
group by s.strategy_id, s.strategy_template_id, S.STATUS_CODE,d.cust_account_id;
select s.strategy_id strategy_id,
s.strategy_template_id strategy_template_id,
S.STATUS_CODE STATUS_CODE,
d.customer_site_use_id billto_id
from iex_strategies s, iex_delinquencies_all d
where s.strategy_level = 30 and
s.status_code = 'ONHOLD' and
d.status in ('DELINQUENT','PREDELINQUENT') and
d.customer_site_use_id = s.customer_site_use_id and
not exists (select 1 from iex_promise_details p
where p.status='COLLECTABLE'
AND d.delinquency_id=p.delinquency_id)
and nvl(s.org_id,-99) = decode(l_org_enabled,'Y',l_org_id,nvl(s.org_id,-99))
group by s.strategy_id, s.strategy_template_id, S.STATUS_CODE,d.customer_site_use_id;
select decode(preference_value, 'CUSTOMER', 10, 'ACCOUNT', 20, 'BILL_TO', 30, 'DELINQUENCY', 40, 50),preference_value
into l_DefaultStrategyLevel,l_StrategyLevelName
from iex_app_preferences_vl
where preference_name = 'COLLECTIONS STRATEGY LEVEL' and enabled_flag = 'Y';
write_log(FND_LOG.LEVEL_UNEXPECTED, 'Update strategy for party id : = ' || r_party.party_id);
write_log(FND_LOG.LEVEL_UNEXPECTED, 'Strategy updated. id = ' || r_party.strategy_id);
write_log(FND_LOG.LEVEL_UNEXPECTED, 'Update strategy for account id: = ' || r_account.cust_account_id);
write_log(FND_LOG.LEVEL_UNEXPECTED, 'Strategy updated. id = ' || r_account.strategy_id);
write_log(FND_LOG.LEVEL_UNEXPECTED, 'Update strategy for customer site use id : = ' || r_billto.billto_id);
write_log(FND_LOG.LEVEL_UNEXPECTED, 'Strategy updated. id = ' || r_billto.strategy_id);
write_log(FND_LOG.LEVEL_STATEMENT, ' Strategy level is: ' || l_DefaultStrategyLevel || ', no need to update the strategy');
SELECT ST.strategy_temp_id, ST.strategy_rank, OBF.ENTITY_NAME
from IEX_STRATEGY_TEMPLATES_B ST, IEX_OBJECT_FILTERS OBF
where ST.category_type = pCategoryType and ST.Check_List_YN = 'N' AND
OBF.OBJECT_ID(+) = ST.Strategy_temp_Group_ID and
OBF.OBJECT_FILTER_TYPE(+) = 'IEXSTRAT'
and not exists
(select 'x' from iex_strategies SS where SS.delinquency_id = pDelinquencyID
and SS.OBJECT_TYPE = pCategoryType)
ORDER BY strategy_rank DESC;
vstr1 := ' select 1 from ' ;
FOR SELECT ST.strategy_temp_id, to_number(ST.strategy_rank), OBF.ENTITY_NAME, obf.active_flag
from IEX_STRATEGY_TEMPLATES_B ST, IEX_OBJECT_FILTERS OBF
where ST.Check_List_YN = l_No AND
((ST.ENABLED_FLAG IS NULL) or ST.ENABLED_FLAG <> l_No) and
st.strategy_level = l_DefaultStrategyLevel and
OBF.OBJECT_ID(+) = ST.Strategy_temp_Group_ID and
OBF.OBJECT_FILTER_TYPE(+) = l_StratObjectFilterType
and (TRUNC(SYSDATE) BETWEEN TRUNC(NVL(st.valid_from_dt, SYSDATE))
AND TRUNC(NVL(st.valid_to_dt, SYSDATE)))
and exists (select 1 from IEX_STRATEGY_WORK_TEMP_XREF strx
where strx.strategy_temp_id = st.strategy_temp_id)
-- Begin - Andre Araujo -- 01/18/2005 - 4924879 - Improve performance by selecting less records
and ST.STRATEGY_RANK <= p_stry_cnt_rec.SCORE_VALUE
-- End - Andre Araujo -- 01/18/2005 - 4924879 - Improve performance by selecting less records
-- Bug 7392752 by Ehuh
and exists (select 1 from iex_strategy_template_groups tg
where tg.group_id = st.strategy_temp_group_id
and tg.enabled_flag <> 'N'
and trunc(sysdate) between trunc(nvl(tg.valid_from_dt,sysdate))
and trunc(nvl(tg.valid_to_dt,sysdate)) )
and category_type in ('DELINQUENT','PREDELINQUENT') -- added for bug#7709114 by PNAVEENK on 22-1-2009
ORDER BY to_number(strategy_rank) DESC;
FOR SELECT ST.strategy_temp_id, to_number(ST.strategy_rank), OBF.ENTITY_NAME, obf.active_flag
from IEX_STRATEGY_TEMPLATES_B ST, IEX_OBJECT_FILTERS OBF
where ST.category_type = chk_obj_type and ST.Check_List_YN = l_No AND
((ST.ENABLED_FLAG IS NULL) or ST.ENABLED_FLAG <> l_No) and
st.strategy_level = l_DefaultStrategyLevel and
OBF.OBJECT_ID(+) = ST.Strategy_temp_Group_ID and
OBF.OBJECT_FILTER_TYPE(+) = l_StratObjectFilterType
and (TRUNC(SYSDATE) BETWEEN TRUNC(NVL(st.valid_from_dt, SYSDATE))
AND TRUNC(NVL(st.valid_to_dt, SYSDATE)))
and exists (select 1 from IEX_STRATEGY_WORK_TEMP_XREF strx
where strx.strategy_temp_id = st.strategy_temp_id)
-- Begin - Andre Araujo -- 01/18/2005 - 4924879 - Improve performance by selecting less records
and ST.STRATEGY_RANK <= p_stry_cnt_rec.SCORE_VALUE
-- End - Andre Araujo -- 01/18/2005 - 4924879 - Improve performance by selecting less records
-- Bug 7392752 by Ehuh
and exists (select 1 from iex_strategy_template_groups tg
where tg.group_id = st.strategy_temp_group_id
and tg.enabled_flag <> 'N'
and trunc(sysdate) between trunc(nvl(tg.valid_from_dt,sysdate))
and trunc(nvl(tg.valid_to_dt,sysdate)) )
ORDER BY to_number(strategy_rank) DESC;
' select 1 from ' || c_Rec_ENTITY_NAME ||
' where delinquency_id = ' || p_stry_cnt_rec.delinquency_id ||
' and rownum < 2 ';
' select 1 from ' || c_Rec_ENTITY_NAME ||
' where CUST_ACCOUNT_id = ' || p_stry_cnt_rec.CUST_ACCOUNT_id ||
' and rownum < 2 ';
' select 1 from ' || c_Rec_ENTITY_NAME ||
' where party_id = ' || p_stry_cnt_rec.PARTY_CUST_ID ||
' and rownum < 2 ';
Select st.Strategy_Temp_ID FROM IEX_STRATEGY_TEMPLATES_B st where
st.Check_List_YN = l_No AND st.ENABLED_FLAG <> l_No
-- Bug 7392752 by Ehuh
and (TRUNC(SYSDATE) BETWEEN TRUNC(NVL(st.valid_from_dt, SYSDATE)) AND TRUNC(NVL(st.valid_to_dt, SYSDATE)))
and exists (select 1 from iex_strategy_template_groups tg
where tg.group_id = st.strategy_temp_group_id
and tg.enabled_flag <> 'N'
and trunc(sysdate) between trunc(nvl(tg.valid_from_dt,sysdate))
and trunc(nvl(tg.valid_to_dt,sysdate)) );
SELECT organization_id from hr_operating_units where
mo_global.check_access(organization_id) = 'Y'
AND organization_id = nvl(P_ORG_ID,organization_id);
select count(1)
into l_count
from iex_strategies
where org_id is null
and strategy_level=l_DefaultStrategyLevel;
select count(1)
into l_count
from iex_strategies
where org_id is not null
and strategy_level=l_DefaultStrategyLevel;
PROCEDURE update_strat_org
(
ERRBUF OUT NOCOPY VARCHAR2,
RETCODE OUT NOCOPY VARCHAR2
) IS
cursor c_bill_strat_wo_ou(p_org_id number)
is select st.strategy_id,su.org_id
from iex_strategies st,
hz_cust_site_uses_all su
where st.object_type='BILL_TO'
and st.org_id is null
and st.object_id=su.site_use_id
and su.org_id = p_org_id;
is select st.strategy_id,p_org_id
from iex_strategies st,
hz_parties hp
where st.object_type='PARTY'
and st.org_id is null
and st.object_id=hp.party_id
and not exists(select 1 from
hz_cust_accounts ca,
hz_cust_acct_sites_all cas,
hz_cust_site_uses_all su
where hp.party_id = ca.party_id
and ca.cust_account_id=cas.cust_account_id
and cas.cust_acct_site_id=su.cust_acct_site_id
and su.org_id <> p_org_id)
group by st.strategy_id,p_org_id;
is select st.strategy_id,p_org_id
from iex_strategies st,
hz_cust_accounts ca
where st.object_type='ACCOUNT'
and st.org_id is null
and st.object_id=ca.cust_account_id
and not exists(select 1 from
hz_cust_acct_sites_all cas,
hz_cust_site_uses_all su
where ca.cust_account_id=cas.cust_account_id
and cas.cust_acct_site_id=su.cust_acct_site_id
and su.org_id <> p_org_id);
is select st.strategy_id,del.org_id
from iex_strategies st,
iex_delinquencies_all del
where st.object_type='DELINQUENT'
and st.org_id is null
and st.object_id=del.delinquency_id
and del.org_id = p_org_id;
is select st.strategy_id,null
from iex_strategies st
where st.object_type=p_object_type
and st.org_id is not null;
update iex_strategies
set org_id=rec1.org_id
where strategy_id = rec1.strategy_id;
update iex_strategies
set org_id=null
where strategy_id = rec1.strategy_id;
update iex_strategies
set org_id=rec1.org_id
where strategy_id = rec1.strategy_id;
update iex_strategies
set org_id=null
where strategy_id = rec1.strategy_id;
update iex_strategies
set org_id=orgs(i)
where strategy_id = strategies(i);
write_log(FND_LOG.LEVEL_STATEMENT, 'In API update_strat_org raised Exception ' || ' sqlcode = ' || sqlcode || ' sqlerrm = ' || sqlerrm);
fnd_file.put_line(FND_FILE.LOG, 'In API update_strat_org raised Exception ' || ' sqlcode = ' || sqlcode || ' sqlerrm = ' || sqlerrm);
select STRATEGY_NAME ,ENABLED_FLAG
into l_DefaultTempName, l_EnabledFlag
from iex_strategy_templates_vl
where STRATEGY_TEMP_ID=l_DefaultTempID;
select SOURCE_NAME,USER_NAME
into l_SourceName,l_UserName
from jtf_rs_resource_extns
where RESOURCE_ID=l_default_rs_id;
select decode(preference_value, 'CUSTOMER', 10, 'ACCOUNT', 20, 'BILL_TO', 30, 'DELINQUENCY', 40, 50),preference_value
into l_DefaultStrategyLevel,l_StrategyLevelName
from iex_app_preferences_vl
where preference_name = 'COLLECTIONS STRATEGY LEVEL' and enabled_flag = l_Yes;