The following lines contain the word 'select', 'insert', 'update' or 'delete':
select ID
from okc_k_processes_v
where CHR_ID = p_contract_id
and PDF_ID = p_process_id
--because of bug in lock API
for update of process_id nowait;
select H.CONTRACT_NUMBER,
H.CONTRACT_NUMBER_MODIFIER,
H.DATE_APPROVED,
S.MEANING,
S.STE_CODE
from OKC_K_HEADERS_B H, okc_statuses_v S
where H.ID = p_contract_id
and H.STS_CODE=S.CODE;
select WF_NAME, WF_PROCESS_NAME, USAGE
from OKC_PROCESS_DEFS_B
where ID = p_process_id
and begin_date<=sysdate
and (end_date is NULL or end_date>=sysdate) and PDF_TYPE='WPS';
select item_type
from WF_ITEMS
where item_type in
( select wf_name
from OKC_PROCESS_DEFS_B
where USAGE='APPROVE' and PDF_TYPE='WPS')
and item_key = l_key
and end_date is NULL;
select '!'
from WF_ITEMS
where item_type = l_wf_name
and item_key = l_key;
select
NAME,
DATA_TYPE,
DEFAULT_VALUE
from OKC_PROCESS_DEF_PARAMETERS_V
where PDF_ID = p_process_id;
OKC_CONTRACT_PUB.update_contract_process(
p_api_version => l_api_version,
x_return_status => l_return_status,
x_msg_count => l_msg_count,
x_msg_data => l_msg_data,
p_cpsv_rec => L1_CPSV_REC,
x_cpsv_rec => L2_CPSV_REC);
select value into L_NLS_VALUE
from NLS_SESSION_PARAMETERS
where PARAMETER='NLS_LANGUAGE';
select value into L_NLS_VALUE
from NLS_SESSION_PARAMETERS
where PARAMETER='NLS_DATE_FORMAT';
select value into L_NLS_VALUE
from NLS_SESSION_PARAMETERS
where PARAMETER='NLS_DATE_LANGUAGE';
select '"'||value||'"' into L_NLS_VALUE
from NLS_SESSION_PARAMETERS
where PARAMETER='NLS_NUMERIC_CHARACTERS';
select WF_NAME
from OKC_PROCESS_DEFS_B
where ID = p_process_id and PDF_TYPE='WPS';
select CONTRACT_NUMBER||CONTRACT_NUMBER_MODIFIER wf_key
from OKC_K_HEADERS_B
where ID = p_contract_id;
select '!'
from WF_ITEMS
where item_type = l_wf_name
and item_key = l_key;
select CONTRACT_NUMBER||CONTRACT_NUMBER_MODIFIER wf_key,
CONTRACT_NUMBER, CONTRACT_NUMBER_MODIFIER,
short_description
from OKC_K_HDR_AGREEDS_V
where ID = p_contract_id;
select item_type
from WF_ITEMS
where item_type in
( select wf_name
from OKC_PROCESS_DEFS_B
where USAGE='APPROVE' and PDF_TYPE='WPS')
and item_key = l_key
and end_date is NULL;
select '!'
from wf_activities
where item_type=l_wf_name_active
and TYPE='PROCESS' and NAME='ABORT_PROCESS'
;
select display_name
from wf_roles
where orig_system = 'FND_USR'
and orig_system_id=fnd_global.user_id
-- changed to boost perf
*/
select user_name display_name from fnd_user where user_id=fnd_global.user_id and EMPLOYEE_ID is null
union all
select
PER.FULL_NAME display_name
from
PER_PEOPLE_F PER,
FND_USER USR
where trunc(SYSDATE)
between PER.EFFECTIVE_START_DATE and PER.EFFECTIVE_END_DATE
and PER.PERSON_ID = USR.EMPLOYEE_ID
and USR.USER_ID = fnd_global.user_id
;
select value into L_NLS_VALUE
from NLS_SESSION_PARAMETERS
where PARAMETER='NLS_LANGUAGE';
select value into L_NLS_VALUE
from NLS_SESSION_PARAMETERS
where PARAMETER='NLS_DATE_FORMAT';
select value into L_NLS_VALUE
from NLS_SESSION_PARAMETERS
where PARAMETER='NLS_DATE_LANGUAGE';
select '"'||value||'"' into L_NLS_VALUE
from NLS_SESSION_PARAMETERS
where PARAMETER='NLS_NUMERIC_CHARACTERS';
select value
from NLS_SESSION_PARAMETERS
where PARAMETER=p;
(select '!'
from OKC_K_ACCESSES
where chr_id = p_contract_id
and user_id = p_user_id
and (p_level='R' or access_level='U')
)
UNION ALL
(select '!' from dual
where exists
(select agp_code
from OKC_K_ACCESSES
where chr_id = P_CONTRACT_ID
and (p_level='R' or access_level='U')
INTERSECT
SELECT AGP_CODE
FROM okc_acc_group_members
where begin_date<=sysdate
and (end_date is null or end_date>=sysdate)
start with user_id = p_user_id
CONNECT BY PRIOR AGP_CODE = AGP_CODE_COMPOSED_OF
)
);
select object_version_number
from okc_k_headers_b
where ID = p
;
OKC_CONTRACT_PUB.update_contract_header(
p_api_version => l_api_version,
x_return_status => x_return_status,
p_init_msg_list => OKE_API.G_TRUE,
x_msg_count => l_msg_count,
x_msg_data => l_msg_data,
p_restricted_update => OKE_API.G_TRUE,
p_chrv_rec => L1_header_rec,
x_chrv_rec => L2_header_rec);
select '!'
from OKC_K_HEADERS_B
where ID = p_contract_id and date_approved is not null;
select object_version_number
from OKC_K_HEADERS_B
where ID = p
;
OKC_CONTRACT_PUB.update_contract_header(
p_api_version => l_api_version,
x_return_status => x_return_status,
x_msg_count => l_msg_count,
x_msg_data => l_msg_data,
p_restricted_update => OKC_API.G_TRUE,
p_chrv_rec => L1_header_rec,
x_chrv_rec => L2_header_rec);
select object_version_number, START_DATE, END_DATE
from okc_k_headers_b
where ID = p
;
select code from okc_statuses_b
where ste_code='SIGNED'
and default_yn='Y';
select code from okc_statuses_b
where ste_code='ACTIVE'
and default_yn='Y';
select code from okc_statuses_b
where ste_code='EXPIRED'
and default_yn='Y';
select L.ID ID, L.object_version_number
,decode(sign(months_between(sysdate-1, NVL(L.end_date,sysdate))),-1,
decode(sign(months_between(p_date_signed-1,sysdate)),-1,
decode(sign(months_between(L.start_date-1,sysdate)),-1,
l_active_status,l_signed_status),l_signed_status),l_expired_status) STS_CODE
from okc_k_lines_b L
, okc_statuses_b S
where L.dnz_chr_id = p_contract_id
and S.code = L.sts_code
and S.ste_code='ENTERED'
;
OKC_CONTRACT_PUB.update_contract_header(
p_api_version => l_api_version,
x_return_status => x_return_status,
x_msg_count => l_msg_count,
x_msg_data => l_msg_data,
p_restricted_update => OKC_API.G_TRUE,
p_chrv_rec => L1_header_rec,
x_chrv_rec => L2_header_rec);
OKC_CONTRACT_PUB.update_contract_line(
p_api_version => l_api_version,
x_return_status => x_return_status,
x_msg_count => l_msg_count,
x_msg_data => l_msg_data,
p_restricted_update => OKC_API.G_TRUE,
p_clev_tbl => l2_lines,
x_clev_tbl => l3_lines);