The following lines contain the word 'select', 'insert', 'update' or 'delete':
G_WF_EVT_CONTRACT_TERM_UPDATED CONSTANT VARCHAR2(70):= 'oracle.apps.okl.la.lease_contract.asset_filing_terms_updated';
G_WF_EVT_ASSET_FILING_UPDATED CONSTANT VARCHAR2(70):= 'oracle.apps.okl.la.lease_contract.asset_filing_updated';
G_WF_EVT_ASSET_PROPTAX_UPDATED CONSTANT VARCHAR2(70):= 'oracle.apps.okl.la.lease_contract.asset_property_tax_updated';
G_WF_EVT_SERV_PASS_UPDATED CONSTANT VARCHAR2(70):= 'oracle.apps.okl.la.lease_contract.service_fee_passthrough_updated';
G_WF_EVT_FEE_PASS_UPDATED CONSTANT VARCHAR2(70):= 'oracle.apps.okl.la.lease_contract.fee_passthrough_updated';
G_WF_EVT_SERV_FEXP_UPDATED CONSTANT VARCHAR2(70):= 'oracle.apps.okl.la.lease_contract.service_fee_expense_updated';
G_WF_EVT_FEE_EXP_UPDATED CONSTANT VARCHAR2(70):= 'oracle.apps.okl.la.lease_contract.fee_expense_updated';
x_rulv_rec.last_updated_by := p_rgr_rec.last_updated_by;
x_rulv_rec.last_update_date := p_rgr_rec.last_update_date;
x_rulv_rec.last_update_login := p_rgr_rec.last_update_login;
PROCEDURE update_rule_rec(
p_api_version IN NUMBER,
p_init_msg_list IN VARCHAR2,
x_return_status OUT NOCOPY VARCHAR2,
x_msg_count OUT NOCOPY NUMBER,
x_msg_data OUT NOCOPY VARCHAR2,
p_rgr_rec IN rgr_rec_type) IS
l_rgr_rec rgr_rec_type := p_rgr_rec;
l_proc_name VARCHAR2(35) := 'UPDATE_RULE_REC';
OKL_RULE_PUB.update_rule(
p_api_version => l_api_version,
p_init_msg_list => p_init_msg_list,
x_return_status => x_return_status,
x_msg_count => x_msg_count,
x_msg_data => x_msg_data,
p_rulv_rec => l_rulv_rec,
x_rulv_rec => lx_rulv_rec);
END update_rule_rec;
SELECT ID FROM OKC_RULE_GROUPS_B
WHERE CHR_ID = P_CHR_ID AND
DNZ_CHR_ID = P_CHR_ID AND
CLE_ID IS NULL AND
RGD_CODE = P_RGD_CODE;
SELECT ID FROM OKC_RULE_GROUPS_B
WHERE CHR_ID = P_CHR_ID AND
DNZ_CHR_ID = P_CHR_ID AND
CLE_ID IS NULL AND
RGD_CODE = P_RGD_CODE;
SELECT ID FROM OKC_RULE_GROUPS_B
WHERE CHR_ID IS NULL AND
DNZ_CHR_ID = P_CHR_ID AND
CLE_ID = P_LINE_ID AND
RGD_CODE = P_RGD_CODE;
SELECT ID FROM OKC_RULES_V
WHERE DNZ_CHR_ID = P_CHR_ID AND
RGP_ID = P_RGP_ID AND
RULE_INFORMATION_CATEGORY = P_RULE_CODE;
Select chr.id,
chr.last_update_date
from okc_k_headers_b chr
where chr.id = ChrId
for update of chr.last_update_date nowait;
l_update_date date;
Fetch l_lock_hdr_csr into l_chr_id, l_update_date;
Select cle.id,
cle.last_update_date
from okc_k_lines_b cle
where cle.id = CleId
for update of cle.last_update_date nowait;
l_update_date date;
Fetch l_lock_cle_csr into l_cle_id, l_update_date;
SELECT term.printing_lead_days printing_lead_days,
khr.cust_acct_id,
khr.bill_to_site_use_id
FROM okc_k_headers_b khr
,hz_customer_profiles cp
,ra_terms term
WHERE khr.id = p_chr_id
AND khr.bill_to_site_use_id = cp.site_use_id
AND cp.standard_terms = term.term_id;
update_rule_rec(
p_api_version => p_api_version,
p_init_msg_list => p_init_msg_list,
x_return_status => x_return_status,
x_msg_count => x_msg_count,
x_msg_data => x_msg_data,
p_rgr_rec => lx_rgr_rec);
update_rule_rec(
p_api_version => p_api_version,
p_init_msg_list => p_init_msg_list,
x_return_status => x_return_status,
x_msg_count => x_msg_count,
x_msg_data => x_msg_data,
p_rgr_rec => lx_rgr_rec);
SELECT ID FROM OKC_RG_PARTY_ROLES
WHERE DNZ_CHR_ID = P_CHR_ID AND
RGP_ID = P_RGP_ID AND
CPL_ID = P_CPL_ID AND
RRD_ID = P_RRD_ID;
SELECT RGP_ID FROM OKC_RG_PARTY_ROLES
WHERE DNZ_CHR_ID = P_CHR_ID AND
CPL_ID = P_CPL_ID AND
RRD_ID = P_RRD_ID;
update_rule_rec(
p_api_version => p_api_version,
p_init_msg_list => p_init_msg_list,
x_return_status => x_return_status,
x_msg_count => x_msg_count,
x_msg_data => x_msg_data,
p_rgr_rec => lx_rgr_rec);
OKL_RULE_PUB.update_rule(
p_api_version => p_api_version,
p_init_msg_list => p_init_msg_list,
x_return_status => x_return_status,
x_msg_count => x_msg_count,
x_msg_data => x_msg_data,
p_rulv_rec => l_rulv_rec,
x_rulv_rec => lx_rulv_rec);
SELECT id
FROM okc_rule_groups_b
WHERE dnz_chr_id = p_chr_id AND
rgd_code = p_rgd_code AND
cle_id IS NULL ;
SELECT lty_code
FROM okc_k_lines_b line,
okc_line_styles_b style
WHERE line.lse_id = style.id
AND line.id = p_line_id;
SELECT rlobj.object1_id1
FROM okc_k_rel_objs_v rlobj
WHERE rlobj.chr_id = p_chr_id
AND rlobj.cle_id = p_line_id
AND rlobj.rty_code = 'OKLSRV'
AND rlobj.jtot_object1_code = 'OKL_SERVICE_LINE';
SELECT dnz_chr_id
FROM okc_k_lines_b
WHERE id = p_serv_top_line_id;
OKL_LLA_UTIL_PVT.check_line_update_allowed
(p_api_version => p_api_version,
p_init_msg_list => p_init_msg_list,
x_return_status => x_return_status,
x_msg_count => x_msg_count,
x_msg_data => x_msg_data,
p_cle_id => p_line_id);
p_update_type => 'VIR_PAYMENT',
x_rulv_tbl => x_rulv_tbl);
l_business_event_name := G_WF_EVT_CONTRACT_TERM_UPDATED;
l_business_event_name := G_WF_EVT_ASSET_FILING_UPDATED;
l_business_event_name := G_WF_EVT_ASSET_PROPTAX_UPDATED;
l_business_event_name := G_WF_EVT_SERV_PASS_UPDATED;
l_business_event_name := G_WF_EVT_FEE_PASS_UPDATED;
l_business_event_name := G_WF_EVT_SERV_FEXP_UPDATED;
l_business_event_name := G_WF_EVT_FEE_EXP_UPDATED;