The following lines contain the word 'select', 'insert', 'update' or 'delete':
G_NO_UPDATE_ALLOWED_EXCEPTION exception;
G_NO_UPDATE_ALLOWED CONSTANT VARCHAR2(200) := 'OKE_NO_UPDATE_ALLOWED';
OKE_CHR_PVT.Insert_Row(
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_chr_rec => l_chr_rec,
x_chr_rec => x_chr_rec);
OKE_CHR_PVT.Insert_Row(
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_chr_tbl => p_chr_tbl,
x_chr_tbl => x_chr_tbl);
PROCEDURE update_contract_header(
p_api_version IN NUMBER,
p_init_msg_list IN VARCHAR2 DEFAULT OKE_API.G_FALSE,
x_return_status OUT NOCOPY VARCHAR2,
x_msg_count OUT NOCOPY NUMBER,
x_msg_data OUT NOCOPY VARCHAR2,
p_chr_rec IN OKE_CHR_PVT.chr_rec_type,
x_chr_rec OUT NOCOPY OKE_CHR_PVT.chr_rec_type) IS
BEGIN
OKE_CHR_PVT.Update_Row(
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_chr_rec => p_chr_rec,
x_chr_rec => x_chr_rec);
END update_contract_header;
PROCEDURE update_contract_header(
p_api_version IN NUMBER,
p_init_msg_list IN VARCHAR2 DEFAULT OKE_API.G_FALSE,
x_return_status OUT NOCOPY VARCHAR2,
x_msg_count OUT NOCOPY NUMBER,
x_msg_data OUT NOCOPY VARCHAR2,
p_chr_tbl IN OKE_CHR_PVT.chr_tbl_type,
x_chr_tbl OUT NOCOPY OKE_CHR_PVT.chr_tbl_type) IS
BEGIN
OKE_CHR_PVT.Update_Row(
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_chr_tbl => p_chr_tbl,
x_chr_tbl => x_chr_tbl);
END update_contract_header;
PROCEDURE delete_contract_header(
p_api_version IN NUMBER,
p_init_msg_list IN VARCHAR2 DEFAULT OKE_API.G_FALSE,
x_return_status OUT NOCOPY VARCHAR2,
x_msg_count OUT NOCOPY NUMBER,
x_msg_data OUT NOCOPY VARCHAR2,
p_chr_rec IN OKE_CHR_PVT.chr_rec_type) IS
BEGIN
OKE_CHR_PVT.delete_row(
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_chr_rec => p_chr_rec);
END delete_contract_header;
PROCEDURE delete_contract_header(
p_api_version IN NUMBER,
p_init_msg_list IN VARCHAR2 DEFAULT OKE_API.G_FALSE,
x_return_status OUT NOCOPY VARCHAR2,
x_msg_count OUT NOCOPY NUMBER,
x_msg_data OUT NOCOPY VARCHAR2,
p_chr_tbl IN OKE_CHR_PVT.chr_tbl_type) IS
BEGIN
OKE_CHR_PVT.Delete_Row(
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_chr_tbl => p_chr_tbl);
END delete_contract_header;
OKE_CLE_PVT.Insert_Row(
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_rec => l_cle_rec,
x_cle_rec => x_cle_rec);
OKE_CLE_PVT.Insert_Row(
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_tbl => p_cle_tbl,
x_cle_tbl => x_cle_tbl);
PROCEDURE update_contract_line(
p_api_version IN NUMBER,
p_init_msg_list IN VARCHAR2 DEFAULT OKE_API.G_FALSE,
x_return_status OUT NOCOPY VARCHAR2,
x_msg_count OUT NOCOPY NUMBER,
x_msg_data OUT NOCOPY VARCHAR2,
p_cle_rec IN OKE_CLE_PVT.cle_rec_type,
x_cle_rec OUT NOCOPY OKE_CLE_PVT.cle_rec_type) IS
BEGIN
OKE_CLE_PVT.Update_Row(
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_rec => p_cle_rec,
x_cle_rec => x_cle_rec);
END update_contract_line;
PROCEDURE update_contract_line(
p_api_version IN NUMBER,
p_init_msg_list IN VARCHAR2 DEFAULT OKE_API.G_FALSE,
x_return_status OUT NOCOPY VARCHAR2,
x_msg_count OUT NOCOPY NUMBER,
x_msg_data OUT NOCOPY VARCHAR2,
p_cle_tbl IN OKE_CLE_PVT.cle_tbl_type,
x_cle_tbl OUT NOCOPY OKE_CLE_PVT.cle_tbl_type) IS
BEGIN
OKE_CLE_PVT.Update_Row(
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_tbl => p_cle_tbl,
x_cle_tbl => x_cle_tbl);
END update_contract_line;
PROCEDURE delete_contract_line(
p_api_version IN NUMBER,
p_init_msg_list IN VARCHAR2 DEFAULT OKE_API.G_FALSE,
x_return_status OUT NOCOPY VARCHAR2,
x_msg_count OUT NOCOPY NUMBER,
x_msg_data OUT NOCOPY VARCHAR2,
p_cle_rec IN OKE_CLE_PVT.cle_rec_type) IS
l_return_status VARCHAR2(1) := OKE_API.G_RET_STS_SUCCESS;
SELECT COUNT(*)
FROM OKE_K_LINES_V
WHERE PARENT_LINE_ID = p_cle_rec.K_LINE_ID;
OKE_CLE_PVT.delete_row(
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_rec => p_cle_rec);
END delete_contract_line;
PROCEDURE delete_contract_line(
p_api_version IN NUMBER,
p_init_msg_list IN VARCHAR2 DEFAULT OKE_API.G_FALSE,
x_return_status OUT NOCOPY VARCHAR2,
x_msg_count OUT NOCOPY NUMBER,
x_msg_data OUT NOCOPY VARCHAR2,
p_cle_tbl IN OKE_CLE_PVT.cle_tbl_type) IS
BEGIN
OKE_CLE_PVT.Delete_Row(
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_tbl => p_cle_tbl);
END delete_contract_line;
PROCEDURE delete_contract_line(
p_api_version IN NUMBER,
p_init_msg_list IN VARCHAR2 DEFAULT OKE_API.G_FALSE,
x_return_status OUT NOCOPY VARCHAR2,
x_msg_count OUT NOCOPY NUMBER,
x_msg_data OUT NOCOPY VARCHAR2,
p_line_id IN NUMBER) IS
l_cle_Id NUMBER;
IS SELECT ID
FROM OKc_K_Lines_b
WHERE cle_id=P_Parent_Id;
IS SELECT ID
FROM Okc_K_Lines_b
WHERE cle_Id=P_Parent_Id;
IS SELECT ID
FROM Okc_K_Lines_b
WHERE cle_Id=P_Parent_Id;
IS SELECT ID
FROM Okc_K_Lines_b
WHERE cle_Id=P_Parent_Id;
IS SELECT ID
FROM Okc_K_Lines_b
WHERE cle_Id=P_Parent_Id;
l_api_name CONSTANT VARCHAR2(30) := 'Delete_Contract_Line';
SELECT COUNT(*) FROM OKC_K_LINES_V
WHERE id=P_Line_Id;
delete_contract_line(
p_api_version => l_api_version,
p_init_msg_list => l_init_msg_list,
x_return_status => l_return_status,
x_msg_count => l_msg_count,
x_msg_data => l_msg_data,
p_cle_tbl => l_cle_tbl_in);
'Delete_Contract_Line',
'OKE_API.G_RET_STS_ERROR',
l_msg_count,
l_msg_data,
'_PVT'
);
'Delete_Contract_Line',
'OKE_API.G_RET_STS_ERROR',
l_msg_count,
l_msg_data,
'_PVT'
);
'Delete_Contract_Line',
'OKE_API.G_RET_STS_UNEXP_ERROR',
l_msg_count,
l_msg_data,
'_PVT'
);
END delete_contract_line;
select b.type_code,
b.attribute_category,
b.attribute1,
b.attribute2,
b.attribute3,
b.attribute4,
b.attribute5,
b.attribute6,
b.attribute7,
b.attribute8,
b.attribute9,
b.attribute10,
b.attribute11,
b.attribute12,
b.attribute13,
b.attribute14,
b.attribute15,
t.sfwt_flag,
t.description,
t.name,
t.text
from oke_k_standard_notes_b b, oke_k_standard_notes_tl t
where k_line_id = p_id;
select oke_k_standard_notes_s.nextval into l_id from dual;
insert into oke_k_standard_notes_b
(standard_notes_id,
creation_date,
created_by,
last_update_date,
last_update_login,
last_updated_by,
k_header_id,
k_line_id,
deliverable_id,
type_code,
attribute_category,
attribute1,
attribute2,
attribute3,
attribute4,
attribute5,
attribute6,
attribute7,
attribute8,
attribute9,
attribute10,
attribute11,
attribute12,
attribute13,
attribute14,
attribute15)
values(
l_id,
sysdate,
fnd_global.user_id,
sysdate,
fnd_global.login_id,
fnd_global.user_id,
null,
null,
p_deliverable_id,
l_standard_notes.type_code,
l_standard_notes.attribute_category,
l_standard_notes.attribute1,
l_standard_notes.attribute2,
l_standard_notes.attribute3,
l_standard_notes.attribute4,
l_standard_notes.attribute5,
l_standard_notes.attribute6,
l_standard_notes.attribute7,
l_standard_notes.attribute8,
l_standard_notes.attribute9,
l_standard_notes.attribute10,
l_standard_notes.attribute11,
l_standard_notes.attribute12,
l_standard_notes.attribute13,
l_standard_notes.attribute14,
l_standard_notes.attribute15);
OKE_DELIVERABLE_PVT.Insert_Row(
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_del_rec => l_del_rec,
x_del_rec => x_del_rec);
OKE_DELIVERABLE_PVT.Insert_Row(
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_del_tbl => p_del_tbl,
x_del_tbl => x_del_tbl);
PROCEDURE update_deliverable(
p_api_version IN NUMBER,
p_init_msg_list IN VARCHAR2 DEFAULT OKE_API.G_FALSE,
x_return_status OUT NOCOPY VARCHAR2,
x_msg_count OUT NOCOPY NUMBER,
x_msg_data OUT NOCOPY VARCHAR2,
p_del_rec IN OKE_DELIVERABLE_PVT.del_rec_type,
x_del_rec OUT NOCOPY OKE_DELIVERABLE_PVT.del_rec_type) IS
BEGIN
OKE_DELIVERABLE_PVT.Update_Row(
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_del_rec => p_del_rec,
x_del_rec => x_del_rec);
END update_deliverable;
PROCEDURE update_deliverable(
p_api_version IN NUMBER,
p_init_msg_list IN VARCHAR2 DEFAULT OKE_API.G_FALSE,
x_return_status OUT NOCOPY VARCHAR2,
x_msg_count OUT NOCOPY NUMBER,
x_msg_data OUT NOCOPY VARCHAR2,
p_del_tbl IN OKE_DELIVERABLE_PVT.del_tbl_type,
x_del_tbl OUT NOCOPY OKE_DELIVERABLE_PVT.del_tbl_type) IS
BEGIN
OKE_DELIVERABLE_PVT.Update_Row(
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_del_tbl => p_del_tbl,
x_del_tbl => x_del_tbl);
END update_deliverable;
PROCEDURE delete_deliverable(
p_api_version IN NUMBER,
p_init_msg_list IN VARCHAR2 DEFAULT OKE_API.G_FALSE,
x_return_status OUT NOCOPY VARCHAR2,
x_msg_count OUT NOCOPY NUMBER,
x_msg_data OUT NOCOPY VARCHAR2,
p_del_rec IN OKE_DELIVERABLE_PVT.del_rec_type) IS
l_return_status VARCHAR2(1) := OKE_API.G_RET_STS_SUCCESS;
SELECT COUNT(*)
FROM OKE_K_DELIVERABLES_VL
WHERE PARENT_DELIVERABLE_ID = p_del_rec.DELIVERABLE_ID;
OKE_DELIVERABLE_PVT.delete_row(
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_del_rec => p_del_rec);
END delete_deliverable;
PROCEDURE delete_deliverable(
p_api_version IN NUMBER,
p_init_msg_list IN VARCHAR2 DEFAULT OKE_API.G_FALSE,
x_return_status OUT NOCOPY VARCHAR2,
x_msg_count OUT NOCOPY NUMBER,
x_msg_data OUT NOCOPY VARCHAR2,
p_del_tbl IN OKE_DELIVERABLE_PVT.del_tbl_type) IS
BEGIN
OKE_DELIVERABLE_PVT.Delete_Row(
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_del_tbl => p_del_tbl);
END delete_deliverable;
PROCEDURE delete_deliverable(
p_api_version IN NUMBER,
p_init_msg_list IN VARCHAR2 DEFAULT OKE_API.G_FALSE,
x_return_status OUT NOCOPY VARCHAR2,
x_msg_count OUT NOCOPY NUMBER,
x_msg_data OUT NOCOPY VARCHAR2,
p_deliverable_id IN NUMBER) IS
l_del_Id NUMBER;
IS SELECT DELIVERABLE_ID
FROM OKE_K_DELIVERABLES_B
WHERE parent_deliverable_id=P_Parent_Id;
IS SELECT DELIVERABLE_ID
FROM oke_k_deliverables_b
WHERE parent_deliverable_id = P_Parent_Id;
IS SELECT DELIVERABLE_ID
FROM oke_k_deliverables_b
WHERE parent_deliverable_id = P_Parent_Id ;
IS SELECT DELIVERABLE_ID
FROM oke_k_deliverables_b
WHERE parent_deliverable_id=P_Parent_Id;
IS SELECT DELIVERABLE_ID
FROM oke_k_deliverables_b
WHERE parent_deliverable_id=P_Parent_Id;
l_api_name CONSTANT VARCHAR2(30) := 'Delete_Deliverable';
SELECT COUNT(*) FROM oke_k_deliverables_b
WHERE deliverable_id=P_Deliverable_Id;
delete_deliverable(
p_api_version => l_api_version,
p_init_msg_list => l_init_msg_list,
x_return_status => l_return_status,
x_msg_count => l_msg_count,
x_msg_data => l_msg_data,
p_del_tbl => l_del_tbl_in);
'Delete_Deliverable',
'OKE_API.G_RET_STS_ERROR',
l_msg_count,
l_msg_data,
'_PVT'
);
'Delete_Deliverable',
'OKE_API.G_RET_STS_ERROR',
l_msg_count,
l_msg_data,
'_PVT'
);
'Delete_Deliverable',
'OKE_API.G_RET_STS_UNEXP_ERROR',
l_msg_count,
l_msg_data,
'_PVT'
);
END delete_deliverable;
PROCEDURE delete_minor_entities (
p_header_id IN NUMBER,
x_return_status OUT NOCOPY VARCHAR2) IS
cursor project_parties is
select project_party_id
from pa_project_parties
where object_type='OKE_K_HEADERS'
and resource_type_id=101
and object_id = p_header_id;
pa_project_parties_pkg.delete_row
(x_project_id => null,
x_project_party_id => c.project_party_id,
x_record_version_number => null);
delete from oke_k_user_attributes
where k_header_id = p_header_id;
delete from oke_chg_logs
where chg_request_id in
(select chg_request_id
from oke_chg_requests
where k_header_id = p_header_id);
delete from oke_chg_requests
where k_header_id = p_header_id;
delete from oke_k_holds
where k_header_id = p_header_id;
delete from oke_k_communications
where k_header_id = p_header_id;
delete from oke_dependencies
where deliverable_id in
(select deliverable_id
from oke_k_deliverables_b
where k_header_id = p_header_id);
delete from oke_k_billing_methods
where k_header_id = p_header_id;
delete from oke_k_related_entities
where k_header_id=p_header_id;
delete from oke_k_related_entities
where related_entity_id = p_header_id;
delete from oke_k_fifo_logs
where k_header_id = p_header_id;
delete from okc_k_grpings
where included_chr_id = p_header_id;
delete from oke_k_billing_events
where k_header_id= p_header_id;
END delete_minor_entities;
PROCEDURE delete_version_records (
p_api_version IN VARCHAR2,
p_header_id IN NUMBER,
x_return_status OUT NOCOPY varchar2,
x_msg_count OUT NOCOPY NUMBER,
x_msg_data OUT NOCOPY VARCHAR2) IS
l_return_status VARCHAR2(1);
l_api_name CONSTANT VARCHAR2(30) := 'Delete_Version_Records';
delete from OKE_K_HEADERS_H
where k_header_id = p_header_id;
delete from OKE_K_LINES_H
where k_line_id in
(select id from okc_k_lines_bh
where dnz_chr_id = p_header_id);
delete from OKE_K_DELIVERABLES_TLH
where deliverable_id in
(select deliverable_id from OKE_K_DELIVERABLES_BH
where k_header_id = p_header_id);
delete from OKE_K_DELIVERABLES_BH
where k_header_id = p_header_id;
delete from OKE_K_FUNDING_SOURCES_H
where object_id = p_header_id and object_type = 'OKE_K_HEADER';
delete from OKE_K_FUND_ALLOCATIONS_H
where object_id = p_header_id;
delete from OKE_K_TERMS_H
where k_header_id = p_header_id;
delete from OKE_K_BILLING_METHODS_H
where k_header_id = p_header_id;
delete from OKE_K_STANDARD_NOTES_TLH
where standard_notes_id in(
select standard_notes_id
from oke_k_standard_notes_bh
where k_header_id = p_header_id);
delete from OKE_K_STANDARD_NOTES_BH
where k_header_id = p_header_id;
delete from OKE_K_USER_ATTRIBUTES_H
where k_header_id = p_header_id;
delete from OKE_K_VERS_NUMBERS_H
where k_header_id = p_header_id;
OKC_VERSION_PVT.delete_version
(p_chr_id => p_header_id,
p_major_version => 0,
p_minor_version => 0,
p_called_from => 'RESTORE_VERSION');
END delete_version_records;