The following lines contain the word 'select', 'insert', 'update' or 'delete':
SELECT 'x'
FROM OKL_TRX_QUOTES_V
WHERE ID = p_qpyv_rec.qte_id;
SELECT 'x'
FROM OKC_K_PARTY_ROLES_V
WHERE ID = p_qpyv_rec.cpl_id;
SELECT 'x'
FROM jtf_objects_vl OB
WHERE OB.OBJECT_CODE = p_qpyv_rec.party_jtot_object1_code;
select from_table,
trim(where_clause) where_clause
from jtf_objects_vl OB
where OB.OBJECT_CODE = p_qpyv_rec.party_jtot_object1_code;
'select ''x'' from '||l_from_table||
' where id1=:object1_id1 and id2=:object1_id2'||l_where_clause
INTO l_dummy_var
USING p_qpyv_rec.party_object1_id1, p_qpyv_rec.party_object1_id2;
SELECT 'x'
FROM jtf_objects_vl OB
WHERE OB.OBJECT_CODE = p_qpyv_rec.contact_jtot_object1_code;
select from_table,
trim(where_clause) where_clause
from jtf_objects_vl OB
where OB.OBJECT_CODE = p_qpyv_rec.contact_jtot_object1_code;
'select ''x'' from '||l_from_table||
' where id1=:object1_id1 and id2=:object1_id2'||l_where_clause
INTO l_dummy_var
USING p_qpyv_rec.contact_object1_id1, p_qpyv_rec.contact_object1_id2;
SELECT
ID,
QTE_ID,
CPL_ID,
OBJECT_VERSION_NUMBER,
DATE_SENT,
CREATED_BY,
CREATION_DATE,
LAST_UPDATED_BY,
LAST_UPDATE_DATE,
LAST_UPDATE_LOGIN,
DELAY_DAYS,
ALLOCATION_PERCENTAGE,
EMAIL_ADDRESS,
PARTY_JTOT_OBJECT1_CODE,
PARTY_OBJECT1_ID1,
PARTY_OBJECT1_ID2,
CONTACT_JTOT_OBJECT1_CODE,
CONTACT_OBJECT1_ID1,
CONTACT_OBJECT1_ID2,
QPT_CODE
FROM Okl_Quote_Parties
WHERE okl_quote_parties.id = p_id;
l_qpy_rec.LAST_UPDATED_BY,
l_qpy_rec.LAST_UPDATE_DATE,
l_qpy_rec.LAST_UPDATE_LOGIN,
l_qpy_rec.DELAY_DAYS,
l_qpy_rec.ALLOCATION_PERCENTAGE,
l_qpy_rec.EMAIL_ADDRESS,
l_qpy_rec.PARTY_JTOT_OBJECT1_CODE,
l_qpy_rec.PARTY_OBJECT1_ID1,
l_qpy_rec.PARTY_OBJECT1_ID2,
l_qpy_rec.CONTACT_JTOT_OBJECT1_CODE,
l_qpy_rec.CONTACT_OBJECT1_ID1,
l_qpy_rec.CONTACT_OBJECT1_ID2,
l_qpy_rec.QPT_CODE;
SELECT
ID,
OBJECT_VERSION_NUMBER,
QTE_ID,
CPL_ID,
DATE_SENT,
DELAY_DAYS,
ALLOCATION_PERCENTAGE,
EMAIL_ADDRESS,
PARTY_JTOT_OBJECT1_CODE,
PARTY_OBJECT1_ID1,
PARTY_OBJECT1_ID2,
CONTACT_JTOT_OBJECT1_CODE,
CONTACT_OBJECT1_ID1,
CONTACT_OBJECT1_ID2,
QPT_CODE,
CREATED_BY,
CREATION_DATE,
LAST_UPDATED_BY,
LAST_UPDATE_DATE,
LAST_UPDATE_LOGIN
FROM Okl_Quote_Parties_V
WHERE okl_quote_parties_v.id = p_id;
l_qpyv_rec.LAST_UPDATED_BY,
l_qpyv_rec.LAST_UPDATE_DATE,
l_qpyv_rec.LAST_UPDATE_LOGIN;
IF (l_qpyv_rec.last_updated_by = OKC_API.G_MISS_NUM) THEN
l_qpyv_rec.last_updated_by := NULL;
IF (l_qpyv_rec.last_update_date = OKC_API.G_MISS_DATE) THEN
l_qpyv_rec.last_update_date := NULL;
IF (l_qpyv_rec.last_update_login = OKC_API.G_MISS_NUM) THEN
l_qpyv_rec.last_update_login := NULL;
SELECT
ID,
OBJECT_VERSION_NUMBER,
SFWT_FLAG,
CHR_ID,
CPL_ID,
CLE_ID,
RLE_CODE,
DNZ_CHR_ID,
OBJECT1_ID1,
OBJECT1_ID2,
JTOT_OBJECT1_CODE,
COGNOMEN,
CODE,
FACILITY,
MINORITY_GROUP_LOOKUP_CODE,
SMALL_BUSINESS_FLAG,
WOMEN_OWNED_FLAG,
ALIAS,
ROLE,
ATTRIBUTE_CATEGORY,
ATTRIBUTE1,
ATTRIBUTE2,
ATTRIBUTE3,
ATTRIBUTE4,
ATTRIBUTE5,
ATTRIBUTE6,
ATTRIBUTE7,
ATTRIBUTE8,
ATTRIBUTE9,
ATTRIBUTE10,
ATTRIBUTE11,
ATTRIBUTE12,
ATTRIBUTE13,
ATTRIBUTE14,
ATTRIBUTE15,
CREATED_BY,
CREATION_DATE,
LAST_UPDATED_BY,
LAST_UPDATE_DATE,
LAST_UPDATE_LOGIN
FROM Okc_K_Party_Roles_V
WHERE okc_k_party_roles_v.id = p_id;
p_to.last_updated_by := p_from.last_updated_by;
p_to.last_update_date := p_from.last_update_date;
p_to.last_update_login := p_from.last_update_login;
p_to.last_updated_by := p_from.last_updated_by;
p_to.last_update_date := p_from.last_update_date;
p_to.last_update_login := p_from.last_update_login;
PROCEDURE insert_row(
p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
x_return_status OUT NOCOPY VARCHAR2,
x_msg_count OUT NOCOPY NUMBER,
x_msg_data OUT NOCOPY VARCHAR2,
p_qpy_rec IN qpy_rec_type,
x_qpy_rec OUT NOCOPY qpy_rec_type) IS
l_api_version CONSTANT NUMBER := 1;
l_api_name CONSTANT VARCHAR2(30) := 'PARTIES_insert_row';
INSERT INTO OKL_QUOTE_PARTIES(
id,
qte_id,
cpl_id,
object_version_number,
date_sent,
created_by,
creation_date,
last_updated_by,
last_update_date,
last_update_login,
delay_days,
allocation_percentage,
email_address,
party_jtot_object1_code,
party_object1_id1,
party_object1_id2,
contact_jtot_object1_code,
contact_object1_id1,
contact_object1_id2,
qpt_code)
VALUES (
l_qpy_rec.id,
l_qpy_rec.qte_id,
l_qpy_rec.cpl_id,
l_qpy_rec.object_version_number,
l_qpy_rec.date_sent,
l_qpy_rec.created_by,
l_qpy_rec.creation_date,
l_qpy_rec.last_updated_by,
l_qpy_rec.last_update_date,
l_qpy_rec.last_update_login,
l_qpy_rec.delay_days,
l_qpy_rec.allocation_percentage,
l_qpy_rec.email_address,
l_qpy_rec.party_jtot_object1_code,
l_qpy_rec.party_object1_id1,
l_qpy_rec.party_object1_id2,
l_qpy_rec.contact_jtot_object1_code,
l_qpy_rec.contact_object1_id1,
l_qpy_rec.contact_object1_id2,
l_qpy_rec.qpt_code);
END insert_row;
PROCEDURE insert_row(
p_api_version IN NUMBER,
p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
x_return_status OUT NOCOPY VARCHAR2,
x_msg_count OUT NOCOPY NUMBER,
x_msg_data OUT NOCOPY VARCHAR2,
p_qpyv_rec IN qpyv_rec_type,
x_qpyv_rec OUT NOCOPY qpyv_rec_type) IS
l_api_version CONSTANT NUMBER := 1;
l_api_name CONSTANT VARCHAR2(30) := 'V_insert_row';
l_qpyv_rec.LAST_UPDATE_DATE := SYSDATE;
l_qpyv_rec.LAST_UPDATED_BY := FND_GLOBAL.USER_ID;
l_qpyv_rec.LAST_UPDATE_LOGIN := FND_GLOBAL.LOGIN_ID;
insert_row(
p_init_msg_list,
x_return_status,
x_msg_count,
x_msg_data,
l_qpy_rec,
lx_qpy_rec
);
END insert_row;
PROCEDURE insert_row(
p_api_version IN NUMBER,
p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
x_return_status OUT NOCOPY VARCHAR2,
x_msg_count OUT NOCOPY NUMBER,
x_msg_data OUT NOCOPY VARCHAR2,
p_qpyv_tbl IN qpyv_tbl_type,
x_qpyv_tbl OUT NOCOPY qpyv_tbl_type) IS
l_api_version CONSTANT NUMBER := 1;
l_api_name CONSTANT VARCHAR2(30) := 'V_tbl_insert_row';
insert_row (
p_api_version => p_api_version,
p_init_msg_list => OKC_API.G_FALSE,
x_return_status => x_return_status,
x_msg_count => x_msg_count,
x_msg_data => x_msg_data,
p_qpyv_rec => p_qpyv_tbl(i),
x_qpyv_rec => x_qpyv_tbl(i));
END insert_row;
SELECT OBJECT_VERSION_NUMBER
FROM OKL_QUOTE_PARTIES
WHERE ID = p_qpy_rec.id
AND OBJECT_VERSION_NUMBER = p_qpy_rec.object_version_number
FOR UPDATE OF OBJECT_VERSION_NUMBER NOWAIT;
SELECT OBJECT_VERSION_NUMBER
FROM OKL_QUOTE_PARTIES
WHERE ID = p_qpy_rec.id;
OKC_API.set_message(G_FND_APP,G_FORM_RECORD_DELETED);
OKC_API.set_message(G_APP_NAME,G_RECORD_LOGICALLY_DELETED);
PROCEDURE update_row(
p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
x_return_status OUT NOCOPY VARCHAR2,
x_msg_count OUT NOCOPY NUMBER,
x_msg_data OUT NOCOPY VARCHAR2,
p_qpy_rec IN qpy_rec_type,
x_qpy_rec OUT NOCOPY qpy_rec_type) IS
l_api_version CONSTANT NUMBER := 1;
l_api_name CONSTANT VARCHAR2(30) := 'PARTIES_update_row';
IF (x_qpy_rec.last_updated_by = OKC_API.G_MISS_NUM)
THEN
x_qpy_rec.last_updated_by := l_qpy_rec.last_updated_by;
IF (x_qpy_rec.last_update_date = OKC_API.G_MISS_DATE)
THEN
x_qpy_rec.last_update_date := l_qpy_rec.last_update_date;
IF (x_qpy_rec.last_update_login = OKC_API.G_MISS_NUM)
THEN
x_qpy_rec.last_update_login := l_qpy_rec.last_update_login;
UPDATE OKL_QUOTE_PARTIES
SET QTE_ID = l_def_qpy_rec.qte_id,
CPL_ID = l_def_qpy_rec.cpl_id,
OBJECT_VERSION_NUMBER = l_def_qpy_rec.object_version_number,
DATE_SENT = l_def_qpy_rec.date_sent,
CREATED_BY = l_def_qpy_rec.created_by,
CREATION_DATE = l_def_qpy_rec.creation_date,
LAST_UPDATED_BY = l_def_qpy_rec.last_updated_by,
LAST_UPDATE_DATE = l_def_qpy_rec.last_update_date,
LAST_UPDATE_LOGIN = l_def_qpy_rec.last_update_login,
DELAY_DAYS = l_def_qpy_rec.delay_days,
ALLOCATION_PERCENTAGE = l_def_qpy_rec.allocation_percentage,
EMAIL_ADDRESS = l_def_qpy_rec.email_address,
PARTY_JTOT_OBJECT1_CODE = l_def_qpy_rec.party_jtot_object1_code,
PARTY_OBJECT1_ID1 = l_def_qpy_rec.party_object1_id1,
PARTY_OBJECT1_ID2 = l_def_qpy_rec.party_object1_id2,
CONTACT_JTOT_OBJECT1_CODE = l_def_qpy_rec.contact_jtot_object1_code,
CONTACT_OBJECT1_ID1 = l_def_qpy_rec.contact_object1_id1,
CONTACT_OBJECT1_ID2 = l_def_qpy_rec.contact_object1_id2,
QPT_CODE = l_def_qpy_rec.qpt_code
WHERE ID = l_def_qpy_rec.id;
END update_row;
PROCEDURE update_row(
p_api_version IN NUMBER,
p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
x_return_status OUT NOCOPY VARCHAR2,
x_msg_count OUT NOCOPY NUMBER,
x_msg_data OUT NOCOPY VARCHAR2,
p_qpyv_rec IN qpyv_rec_type,
x_qpyv_rec OUT NOCOPY qpyv_rec_type) IS
l_api_version CONSTANT NUMBER := 1;
l_api_name CONSTANT VARCHAR2(30) := 'V_update_row';
l_qpyv_rec.LAST_UPDATE_DATE := SYSDATE;
l_qpyv_rec.LAST_UPDATED_BY := FND_GLOBAL.USER_ID;
l_qpyv_rec.LAST_UPDATE_LOGIN := FND_GLOBAL.LOGIN_ID;
IF (x_qpyv_rec.last_updated_by = OKC_API.G_MISS_NUM)
THEN
x_qpyv_rec.last_updated_by := l_qpyv_rec.last_updated_by;
IF (x_qpyv_rec.last_update_date = OKC_API.G_MISS_DATE)
THEN
x_qpyv_rec.last_update_date := l_qpyv_rec.last_update_date;
IF (x_qpyv_rec.last_update_login = OKC_API.G_MISS_NUM)
THEN
x_qpyv_rec.last_update_login := l_qpyv_rec.last_update_login;
update_row(
p_init_msg_list,
x_return_status,
x_msg_count,
x_msg_data,
l_qpy_rec,
lx_qpy_rec
);
END update_row;
PROCEDURE update_row(
p_api_version IN NUMBER,
p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
x_return_status OUT NOCOPY VARCHAR2,
x_msg_count OUT NOCOPY NUMBER,
x_msg_data OUT NOCOPY VARCHAR2,
p_qpyv_tbl IN qpyv_tbl_type,
x_qpyv_tbl OUT NOCOPY qpyv_tbl_type) IS
l_api_version CONSTANT NUMBER := 1;
l_api_name CONSTANT VARCHAR2(30) := 'V_tbl_update_row';
update_row (
p_api_version => p_api_version,
p_init_msg_list => OKC_API.G_FALSE,
x_return_status => x_return_status,
x_msg_count => x_msg_count,
x_msg_data => x_msg_data,
p_qpyv_rec => p_qpyv_tbl(i),
x_qpyv_rec => x_qpyv_tbl(i));
END update_row;
PROCEDURE delete_row(
p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
x_return_status OUT NOCOPY VARCHAR2,
x_msg_count OUT NOCOPY NUMBER,
x_msg_data OUT NOCOPY VARCHAR2,
p_qpy_rec IN qpy_rec_type) IS
l_api_version CONSTANT NUMBER := 1;
l_api_name CONSTANT VARCHAR2(30) := 'PARTIES_delete_row';
DELETE FROM OKL_QUOTE_PARTIES
WHERE ID = l_qpy_rec.id;
END delete_row;
PROCEDURE delete_row(
p_api_version IN NUMBER,
p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
x_return_status OUT NOCOPY VARCHAR2,
x_msg_count OUT NOCOPY NUMBER,
x_msg_data OUT NOCOPY VARCHAR2,
p_qpyv_rec IN qpyv_rec_type) IS
l_api_version CONSTANT NUMBER := 1;
l_api_name CONSTANT VARCHAR2(30) := 'V_delete_row';
delete_row(
p_init_msg_list,
x_return_status,
x_msg_count,
x_msg_data,
l_qpy_rec
);
END delete_row;
PROCEDURE delete_row(
p_api_version IN NUMBER,
p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
x_return_status OUT NOCOPY VARCHAR2,
x_msg_count OUT NOCOPY NUMBER,
x_msg_data OUT NOCOPY VARCHAR2,
p_qpyv_tbl IN qpyv_tbl_type) IS
l_api_version CONSTANT NUMBER := 1;
l_api_name CONSTANT VARCHAR2(30) := 'V_tbl_delete_row';
delete_row (
p_api_version => p_api_version,
p_init_msg_list => OKC_API.G_FALSE,
x_return_status => x_return_status,
x_msg_count => x_msg_count,
x_msg_data => x_msg_data,
p_qpyv_rec => p_qpyv_tbl(i));
END delete_row;