The following lines contain the word 'select', 'insert', 'update' or 'delete':
select 'x'
from OKC_PROCESS_DEFS_B
where ID = p_ksqv_rec.pdf_id;
SELECT LINE_CODE,
SITE_YN,
BG_OU_NONE,
CLS_SCS_NONE,
USER_FUNCTION_YN,
PDF_ID,
MANUAL_OVERRIDE_YN,
OBJECT_VERSION_NUMBER,
CREATED_BY,
CREATION_DATE,
LAST_UPDATED_BY,
LAST_UPDATE_DATE,
LAST_UPDATE_LOGIN
FROM OKC_K_SEQ_HEADER
WHERE OKC_K_SEQ_HEADER.LINE_CODE = p_line_code;
l_ksq_rec.LAST_UPDATED_BY,
l_ksq_rec.LAST_UPDATE_DATE,
l_ksq_rec.LAST_UPDATE_LOGIN;
SELECT
LINE_CODE,
SITE_YN,
BG_OU_NONE,
CLS_SCS_NONE,
USER_FUNCTION_YN,
PDF_ID,
MANUAL_OVERRIDE_YN,
OBJECT_VERSION_NUMBER,
CREATED_BY,
CREATION_DATE,
LAST_UPDATED_BY,
LAST_UPDATE_DATE,
LAST_UPDATE_LOGIN
FROM OKC_K_SEQ_HEADER_V
WHERE OKC_K_SEQ_HEADER_V.LINE_CODE = p_line_code;
l_ksqv_rec.LAST_UPDATED_BY,
l_ksqv_rec.LAST_UPDATE_DATE,
l_ksqv_rec.LAST_UPDATE_LOGIN;
IF (l_ksqv_rec.last_updated_by = OKC_API.G_MISS_NUM) THEN
l_ksqv_rec.last_updated_by := NULL;
IF (l_ksqv_rec.last_update_date = OKC_API.G_MISS_DATE) THEN
l_ksqv_rec.last_update_date := NULL;
IF (l_ksqv_rec.last_update_login = OKC_API.G_MISS_NUM) THEN
l_ksqv_rec.last_update_login := NULL;
SELECT count(*)
FROM OKC_K_SEQ_HEADER;
If p_ksqv_rec.site_yn = 'N' And -- No site selected
p_ksqv_rec.user_function_yn = 'N' And -- Not a User Defined Function
p_ksqv_rec.bg_ou_none = 'NON' And -- No Business Group/OU selected
p_ksqv_rec.cls_scs_none = 'NON' Then -- No Class/Category selected
-- Display the error message
OKC_API.set_message(G_APP_NAME,
'OKC_NO_K_SEQ_SELECTED');
'OKC_FUNCTION_NAME_UNSELECTED');
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 ,
x_return_status OUT NOCOPY VARCHAR2,
x_msg_count OUT NOCOPY NUMBER,
x_msg_data OUT NOCOPY VARCHAR2,
p_ksq_rec IN ksq_rec_type,
x_ksq_rec OUT NOCOPY ksq_rec_type) IS
l_api_version CONSTANT NUMBER := 1;
l_api_name CONSTANT VARCHAR2(30) := 'K_SEQ_insert_row';
INSERT INTO OKC_K_SEQ_HEADER(
line_code,
site_yn,
bg_ou_none,
cls_scs_none,
user_function_yn,
pdf_id,
manual_override_yn,
object_version_number,
created_by,
creation_date,
last_updated_by,
last_update_date,
last_update_login)
VALUES (
l_ksq_rec.line_code,
l_ksq_rec.site_yn,
l_ksq_rec.bg_ou_none,
l_ksq_rec.cls_scs_none,
l_ksq_rec.user_function_yn,
l_ksq_rec.pdf_id,
l_ksq_rec.manual_override_yn,
l_ksq_rec.object_version_number,
l_ksq_rec.created_by,
l_ksq_rec.creation_date,
l_ksq_rec.last_updated_by,
l_ksq_rec.last_update_date,
l_ksq_rec.last_update_login);
END insert_row;
PROCEDURE insert_row(
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_ksqv_rec IN ksqv_rec_type,
x_ksqv_rec OUT NOCOPY ksqv_rec_type) IS
l_api_version CONSTANT NUMBER := 1;
l_api_name CONSTANT VARCHAR2(30) := 'V_insert_row';
l_ksqv_rec.LAST_UPDATE_DATE := l_ksqv_rec.CREATION_DATE;
l_ksqv_rec.LAST_UPDATED_BY := FND_GLOBAL.USER_ID;
l_ksqv_rec.LAST_UPDATE_LOGIN := FND_GLOBAL.LOGIN_ID;
insert_row(
p_init_msg_list,
x_return_status,
x_msg_count,
x_msg_data,
l_ksq_rec,
lx_ksq_rec
);
END insert_row;
PROCEDURE insert_row(
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_ksqv_tbl IN ksqv_tbl_type,
x_ksqv_tbl OUT NOCOPY ksqv_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_ksqv_rec => p_ksqv_tbl(i),
x_ksqv_rec => x_ksqv_tbl(i));
END insert_row;
SELECT OBJECT_VERSION_NUMBER
FROM OKC_K_SEQ_HEADER
WHERE LINE_CODE = p_ksq_rec.line_code
AND OBJECT_VERSION_NUMBER = p_ksq_rec.object_version_number
FOR UPDATE OF OBJECT_VERSION_NUMBER NOWAIT;
SELECT OBJECT_VERSION_NUMBER
FROM OKC_K_SEQ_HEADER
WHERE LINE_CODE = p_ksq_rec.line_code;
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 ,
x_return_status OUT NOCOPY VARCHAR2,
x_msg_count OUT NOCOPY NUMBER,
x_msg_data OUT NOCOPY VARCHAR2,
p_ksq_rec IN ksq_rec_type,
x_ksq_rec OUT NOCOPY ksq_rec_type) IS
l_api_version CONSTANT NUMBER := 1;
l_api_name CONSTANT VARCHAR2(30) := 'K_SEQ_update_row';
IF (x_ksq_rec.last_updated_by = OKC_API.G_MISS_NUM)
THEN
x_ksq_rec.last_updated_by := l_ksq_rec.last_updated_by;
IF (x_ksq_rec.last_update_date = OKC_API.G_MISS_DATE)
THEN
x_ksq_rec.last_update_date := l_ksq_rec.last_update_date;
IF (x_ksq_rec.last_update_login = OKC_API.G_MISS_NUM)
THEN
x_ksq_rec.last_update_login := l_ksq_rec.last_update_login;
UPDATE OKC_K_SEQ_HEADER
SET SITE_YN = l_def_ksq_rec.site_yn,
BG_OU_NONE = l_def_ksq_rec.bg_ou_none,
CLS_SCS_NONE = l_def_ksq_rec.cls_scs_none,
USER_FUNCTION_YN = l_def_ksq_rec.user_function_yn,
PDF_ID = l_def_ksq_rec.pdf_id,
MANUAL_OVERRIDE_YN = l_def_ksq_rec.manual_override_yn,
OBJECT_VERSION_NUMBER = l_def_ksq_rec.object_version_number,
CREATED_BY = l_def_ksq_rec.created_by,
CREATION_DATE = l_def_ksq_rec.creation_date,
LAST_UPDATED_BY = l_def_ksq_rec.last_updated_by,
LAST_UPDATE_DATE = l_def_ksq_rec.last_update_date,
LAST_UPDATE_LOGIN = l_def_ksq_rec.last_update_login
WHERE LINE_CODE = l_def_ksq_rec.line_code;
END update_row;
PROCEDURE update_row(
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_ksqv_rec IN ksqv_rec_type,
x_ksqv_rec OUT NOCOPY ksqv_rec_type) IS
l_api_version CONSTANT NUMBER := 1;
l_api_name CONSTANT VARCHAR2(30) := 'V_update_row';
l_ksqv_rec.LAST_UPDATE_DATE := SYSDATE;
l_ksqv_rec.LAST_UPDATED_BY := FND_GLOBAL.USER_ID;
l_ksqv_rec.LAST_UPDATE_LOGIN := FND_GLOBAL.LOGIN_ID;
IF (x_ksqv_rec.last_updated_by = OKC_API.G_MISS_NUM)
THEN
x_ksqv_rec.last_updated_by := l_ksqv_rec.last_updated_by;
IF (x_ksqv_rec.last_update_date = OKC_API.G_MISS_DATE)
THEN
x_ksqv_rec.last_update_date := l_ksqv_rec.last_update_date;
IF (x_ksqv_rec.last_update_login = OKC_API.G_MISS_NUM)
THEN
x_ksqv_rec.last_update_login := l_ksqv_rec.last_update_login;
update_row(
p_init_msg_list,
x_return_status,
x_msg_count,
x_msg_data,
l_ksq_rec,
lx_ksq_rec
);
END update_row;
PROCEDURE update_row(
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_ksqv_tbl IN ksqv_tbl_type,
x_ksqv_tbl OUT NOCOPY ksqv_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_ksqv_rec => p_ksqv_tbl(i),
x_ksqv_rec => x_ksqv_tbl(i));
END update_row;
PROCEDURE delete_row(
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_ksq_rec IN ksq_rec_type) IS
l_api_version CONSTANT NUMBER := 1;
l_api_name CONSTANT VARCHAR2(30) := 'K_SEQ_delete_row';
DELETE FROM OKC_K_SEQ_HEADER
WHERE LINE_CODE = l_ksq_rec.line_code;
END delete_row;
PROCEDURE delete_row(
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_ksqv_rec IN ksqv_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_ksq_rec
);
END delete_row;
PROCEDURE delete_row(
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_ksqv_tbl IN ksqv_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_ksqv_rec => p_ksqv_tbl(i));
END delete_row;
select line_code,
site_yn,
bg_ou_none,
cls_scs_none,
user_function_yn,
pdf_id,
manual_override_yn
from okc_k_seq_header;
select doc_sequence_id,
business_group_id,
operating_unit_id,
cls_code,
scs_code,
manual_override_yn,
contract_number_prefix,
contract_number_suffix,
number_format_length,
start_seq_no,
end_seq_no
from okc_k_seq_lines
where line_code = p_line_code;
select cls_code
from okc_subclasses_b
where code = p_scs_code;
SELECT BUSINESS_GROUP_ID
FROM HR_ALL_ORGANIZATION_UNITS
WHERE ORGANIZATION_ID = V_ORG_ID;
select application_id,
category_code,
set_of_books_id,
method_code
from fnd_doc_sequence_assignments
where doc_sequence_id = p_doc_sequence_id;
select name,
package_name,
procedure_name
from okc_process_defs_v
where id = p_id;
select name,
data_type,
replace(default_value, '''', '''''') parm_value
from okc_process_def_parameters_v
where pdf_id = p_id;
SELECT BUSINESS_GROUP_ID
FROM HR_ALL_ORGANIZATION_UNITS
WHERE ORGANIZATION_ID = V_ORG_ID;
select 'x'
--npalepu modified on 24-AUG-2006 for bug # 5487532
/* from okc_k_headers_b */
from okc_k_headers_all_b
--end npalepu
where contract_number = p_contract_number
and contract_number_modifier is null;
select 'x'
--npalepu modified on 24-AUG-2006 for bug # 5487532
/* from okc_k_headers_b */
from okc_k_headers_all_b
--end npalepu
where contract_number = p_contract_number
and contract_number_modifier = p_contract_number_modifier;
select okc_k_headers_s1.nextval
into l_contract_number
from dual;