The following lines contain the word 'select', 'insert', 'update' or 'delete':
PROCEDURE insert_row
(
p_mini_site_section_section_id IN NUMBER,
p_object_version_number IN NUMBER,
p_mini_site_id IN NUMBER,
p_parent_section_id IN NUMBER,
p_child_section_id IN NUMBER,
p_start_date_active IN DATE,
p_end_date_active IN DATE,
p_level_number IN NUMBER,
p_sort_order IN NUMBER,
p_concat_ids IN VARCHAR2,
p_creation_date IN DATE,
p_created_by IN NUMBER,
p_last_update_date IN DATE,
p_last_updated_by IN NUMBER,
p_last_update_login IN NUMBER,
x_rowid OUT NOCOPY VARCHAR2,
x_mini_site_section_section_id OUT NOCOPY NUMBER
)
IS
CURSOR c IS SELECT rowid FROM ibe_dsp_msite_sct_sects
WHERE mini_site_section_section_id = x_mini_site_section_section_id;
CURSOR c2 IS SELECT ibe_dsp_msite_sct_sects_s1.nextval FROM dual;
INSERT INTO ibe_dsp_msite_sct_sects
(
mini_site_section_section_id,
object_version_number,
mini_site_id,
parent_section_id,
child_section_id,
start_date_active,
end_date_active,
level_number,
sort_order,
concat_ids,
creation_date,
created_by,
last_update_date,
last_updated_by,
last_update_login
)
VALUES
(
x_mini_site_section_section_id,
p_object_version_number,
p_mini_site_id,
decode(p_parent_section_id, FND_API.G_MISS_NUM, NULL, p_parent_section_id),
p_child_section_id,
p_start_date_active,
decode(p_end_date_active, FND_API.G_MISS_DATE, NULL, p_end_date_active),
decode(p_level_number, FND_API.G_MISS_NUM, NULL, p_level_number),
decode(p_sort_order, FND_API.G_MISS_NUM, NULL, p_sort_order),
decode(p_concat_ids, FND_API.G_MISS_CHAR, NULL, p_concat_ids),
decode(p_creation_date, FND_API.G_MISS_DATE, sysdate, NULL, sysdate,
p_creation_date),
decode(p_created_by, FND_API.G_MISS_NUM, FND_GLOBAL.user_id,
NULL, FND_GLOBAL.user_id, p_created_by),
decode(p_last_update_date, FND_API.G_MISS_DATE, sysdate, NULL, sysdate,
p_last_update_date),
decode(p_last_updated_by, FND_API.G_MISS_NUM, FND_GLOBAL.user_id,
NULL, FND_GLOBAL.user_id, p_last_updated_by),
decode(p_last_update_login, FND_API.G_MISS_NUM, FND_GLOBAL.login_id,
NULL, FND_GLOBAL.login_id, p_last_update_login)
);
END insert_row;
PROCEDURE update_row
(
p_mini_site_section_section_id IN NUMBER,
p_object_version_number IN NUMBER := FND_API.G_MISS_NUM,
p_start_date_active IN DATE,
p_end_date_active IN DATE,
p_level_number IN NUMBER,
p_sort_order IN NUMBER,
p_concat_ids IN VARCHAR2,
p_last_update_date IN DATE,
p_last_updated_by IN NUMBER,
p_last_update_login IN NUMBER
)
IS
BEGIN
-- update base
UPDATE ibe_dsp_msite_sct_sects SET
object_version_number = object_version_number + 1,
level_number = decode(p_level_number, FND_API.G_MISS_NUM,
level_number, p_level_number),
sort_order = decode(p_sort_order, FND_API.G_MISS_NUM,
sort_order, p_sort_order),
concat_ids = decode(p_concat_ids, FND_API.G_MISS_CHAR,
concat_ids, p_concat_ids),
start_date_active = decode(p_start_date_active, FND_API.G_MISS_DATE,
start_date_active, p_start_date_active),
end_date_active = decode(p_end_date_active, FND_API.G_MISS_DATE,
end_date_active, p_end_date_active),
last_update_date = decode(p_last_update_date, FND_API.G_MISS_DATE,
sysdate, NULL, sysdate, p_last_update_date),
last_updated_by = decode(p_last_updated_by, FND_API.G_MISS_NUM,
FND_GLOBAL.user_id, NULL, FND_GLOBAL.user_id,
p_last_updated_by),
last_update_login = decode(p_last_update_login, FND_API.G_MISS_NUM,
FND_GLOBAL.login_id, NULL,
FND_GLOBAL.login_id, p_last_update_login)
WHERE mini_site_section_section_id = p_mini_site_section_section_id
AND object_version_number = decode(p_object_version_number,
FND_API.G_MISS_NUM,
object_version_number,
p_object_version_number);
END update_row;
PROCEDURE delete_row
(
p_mini_site_section_section_id IN NUMBER
)
IS
BEGIN
DELETE FROM ibe_dsp_msite_sct_sects
WHERE mini_site_section_section_id = p_mini_site_section_section_id;
END delete_row;
P_LAST_UPDATE_DATE IN VARCHAR2,
P_CUSTOM_MODE IN VARCHAR2
)
IS
l_user_id NUMBER := 0;
f_ludate date; -- entity update date in file
db_ludate date; -- entity update date in db
f_ludate := nvl(to_date(P_LAST_UPDATE_DATE, 'YYYY/MM/DD'), sysdate);
select LAST_UPDATED_BY, LAST_UPDATE_DATE
into db_luby, db_ludate
from ibe_dsp_msite_sct_sects
where mini_site_id = p_mini_site_id and child_section_id=p_child_section_id;
update_row
(
p_mini_site_section_section_id => p_mini_site_section_section_id,
p_object_version_number => p_object_version_number,
p_start_date_active => p_start_date_active,
p_end_date_active => p_end_date_active,
p_level_number => p_level_number,
p_sort_order => p_sort_order,
p_concat_ids => p_concat_ids,
p_last_update_date => f_ludate,--sysdate,
p_last_updated_by => f_luby,--l_user_id,
p_last_update_login => 0
);
insert_row
(
p_mini_site_section_section_id => p_mini_site_section_section_id,
p_object_version_number => l_object_version_number,
p_mini_site_id => p_mini_site_id,
p_parent_section_id => p_parent_section_id,
p_child_section_id => p_child_section_id,
p_start_date_active => p_start_date_active,
p_end_date_active => p_end_date_active,
p_level_number => p_level_number,
p_sort_order => p_sort_order,
p_concat_ids => p_concat_ids,
p_creation_date => f_ludate,--sysdate,
p_created_by => f_luby,--l_user_id,
p_last_update_date => f_ludate,--sysdate,
p_last_updated_by => f_luby,--l_user_id,
p_last_update_login => 0,
x_rowid => l_rowid,
x_mini_site_section_section_id => l_mini_site_section_section_id
);
SELECT mini_site_section_section_id INTO l_tmp_msite_sct_sect_id
FROM ibe_dsp_msite_sct_sects
WHERE mini_site_id = p_mini_site_id
AND parent_section_id = p_parent_section_id
AND child_section_id = p_child_section_id;
SELECT mini_site_section_section_id INTO l_tmp_msite_sct_sect_id
FROM ibe_dsp_msite_sct_sects
WHERE mini_site_id = p_mini_site_id
AND parent_section_id IS NULL
AND child_section_id = p_child_section_id;
SELECT msite_id INTO l_mini_site_id FROM ibe_msites_b
WHERE msite_id = p_mini_site_id and site_type = 'I';
SELECT section_id INTO l_parent_section_id FROM ibe_dsp_sections_b
WHERE section_id = p_parent_section_id;
SELECT section_id INTO l_child_section_id FROM ibe_dsp_sections_b
WHERE section_id = p_child_section_id;
PROCEDURE Validate_Update
(
p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
p_mini_site_section_section_id IN NUMBER,
p_object_version_number IN NUMBER,
p_start_date_active IN DATE,
p_end_date_active IN DATE,
p_level_number IN NUMBER,
p_sort_order IN NUMBER,
p_concat_ids IN VARCHAR2,
x_return_status OUT NOCOPY VARCHAR2,
x_msg_count OUT NOCOPY NUMBER,
x_msg_data OUT NOCOPY VARCHAR2
)
IS
l_api_name CONSTANT VARCHAR2(30) := 'Validate_Update';
END Validate_Update;
insert_row
(
FND_API.G_MISS_NUM,
l_object_version_number,
p_mini_site_id,
p_parent_section_id,
p_child_section_id,
p_start_date_active,
p_end_date_active,
p_level_number,
p_sort_order,
p_concat_ids,
SYSDATE,
FND_GLOBAL.user_id,
SYSDATE,
FND_GLOBAL.user_id,
FND_GLOBAL.login_id,
l_rowid,
x_mini_site_section_section_id
);
FND_MESSAGE.Set_Name('IBE', 'IBE_DSP_MSS_INSERT_FAIL');
FND_MESSAGE.Set_Name('IBE', 'IBE_DSP_MSS_INSERT_FAIL');
PROCEDURE Update_MSite_Section_Section
(
p_api_version IN NUMBER,
p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
p_commit IN VARCHAR2 := FND_API.G_FALSE,
p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
p_mini_site_section_section_id IN NUMBER := FND_API.G_MISS_NUM,
p_object_version_number IN NUMBER,
p_mini_site_id IN NUMBER := FND_API.G_MISS_NUM,
p_parent_section_id IN NUMBER := FND_API.G_MISS_NUM,
p_child_section_id IN NUMBER := FND_API.G_MISS_NUM,
p_start_date_active IN DATE := FND_API.G_MISS_DATE,
p_end_date_active IN DATE := FND_API.G_MISS_DATE,
p_level_number IN NUMBER := FND_API.G_MISS_NUM,
p_sort_order IN NUMBER := FND_API.G_MISS_NUM,
p_concat_ids IN VARCHAR2 := FND_API.G_MISS_CHAR,
x_return_status OUT NOCOPY VARCHAR2,
x_msg_count OUT NOCOPY NUMBER,
x_msg_data OUT NOCOPY VARCHAR2
)
IS
l_api_name CONSTANT VARCHAR2(30) := 'Update_MSite_Section_Section';
SAVEPOINT UPDATE_MSITE_SCT_SECT_PVT;
SELECT mini_site_section_section_id INTO l_msite_sct_sect_id
FROM ibe_dsp_msite_sct_sects
WHERE mini_site_id = p_mini_site_id
AND parent_section_id = p_parent_section_id
AND child_section_id = p_child_section_id;
SELECT mini_site_section_section_id INTO l_msite_sct_sect_id
FROM ibe_dsp_msite_sct_sects
WHERE mini_site_id = p_mini_site_id
AND parent_section_id IS NULL
AND child_section_id = p_child_section_id;
Validate_Update
(
p_init_msg_list => FND_API.G_FALSE,
p_validation_level => p_validation_level,
p_mini_site_section_section_id => l_msite_sct_sect_id,
p_object_version_number => p_object_version_number,
p_start_date_active => p_start_date_active,
p_end_date_active => p_end_date_active,
p_level_number => p_level_number,
p_sort_order => p_sort_order,
p_concat_ids => p_concat_ids,
x_return_status => l_return_status,
x_msg_count => l_msg_count,
x_msg_data => l_msg_data
);
FND_MESSAGE.Set_Name('IBE', 'IBE_DSP_MSS_INVALID_UPDATE');
update_row
(
l_msite_sct_sect_id,
p_object_version_number,
p_start_date_active,
p_end_date_active,
p_level_number,
p_sort_order,
p_concat_ids,
SYSDATE,
FND_GLOBAL.user_id,
FND_GLOBAL.login_id
);
FND_MESSAGE.Set_Name('IBE', 'IBE_DSP_MSS_UPDATE_FAIL');
FND_MESSAGE.Set_Name('IBE', 'IBE_DSP_MSS_UPDATE_FAIL');
ROLLBACK TO UPDATE_MSITE_SCT_SECT_PVT;
ROLLBACK TO UPDATE_MSITE_SCT_SECT_PVT;
ROLLBACK TO UPDATE_MSITE_SCT_SECT_PVT;
END Update_MSite_Section_Section;
PROCEDURE Delete_MSite_Section_Section
(
p_api_version IN NUMBER,
p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
p_commit IN VARCHAR2 := FND_API.G_FALSE,
p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
p_mini_site_section_section_id IN NUMBER := FND_API.G_MISS_NUM,
p_mini_site_id IN NUMBER := FND_API.G_MISS_NUM,
p_parent_section_id IN NUMBER := FND_API.G_MISS_NUM,
p_child_section_id IN NUMBER := FND_API.G_MISS_NUM,
x_return_status OUT NOCOPY VARCHAR2,
x_msg_count OUT NOCOPY NUMBER,
x_msg_data OUT NOCOPY VARCHAR2
)
IS
l_api_name CONSTANT VARCHAR2(30) := 'Delete_MSite_Section_Section';
SAVEPOINT DELETE_MSITE_SCT_SECT_PVT;
SELECT mini_site_section_section_id INTO l_msite_sct_sect_id
FROM ibe_dsp_msite_sct_sects
WHERE mini_site_id = p_mini_site_id
AND parent_section_id = p_parent_section_id
AND child_section_id = child_section_id;
SELECT mini_site_section_section_id INTO l_msite_sct_sect_id
FROM ibe_dsp_msite_sct_sects
WHERE mini_site_id = p_mini_site_id
AND parent_section_id IS NULL
AND child_section_id = child_section_id;
delete_row(l_msite_sct_sect_id);
ROLLBACK TO DELETE_MSITE_SCT_SECT_PVT;
ROLLBACK TO DELETE_MSITE_SCT_SECT_PVT;
ROLLBACK TO DELETE_MSITE_SCT_SECT_PVT;
END Delete_MSite_Section_Section;
PROCEDURE Update_MSite_Section_Sections
(
p_api_version IN NUMBER,
p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
p_commit IN VARCHAR2 := FND_API.G_FALSE,
p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
p_msite_section_section_ids IN JTF_NUMBER_TABLE,
p_object_version_numbers IN JTF_NUMBER_TABLE,
p_start_date_actives IN JTF_DATE_TABLE,
p_end_date_actives IN JTF_DATE_TABLE,
p_sort_orders IN JTF_NUMBER_TABLE,
x_return_status OUT NOCOPY VARCHAR2,
x_msg_count OUT NOCOPY NUMBER,
x_msg_data OUT NOCOPY VARCHAR2
)
IS
l_api_name CONSTANT VARCHAR2(30) := 'Update_MSite_Section_Sections';
SAVEPOINT UPDATE_MSITE_SCT_SECTS_PVT;
Update_MSite_Section_Section
(
p_api_version => p_api_version,
p_init_msg_list => FND_API.G_FALSE,
p_commit => FND_API.G_FALSE,
p_validation_level => p_validation_level,
p_mini_site_section_section_id => p_msite_section_section_ids(i),
p_object_version_number => p_object_version_numbers(i),
p_mini_site_id => FND_API.G_MISS_NUM,
p_parent_section_id => FND_API.G_MISS_NUM,
p_child_section_id => FND_API.G_MISS_NUM,
p_start_date_active => p_start_date_actives(i),
p_end_date_active => p_end_date_actives(i),
p_level_number => FND_API.G_MISS_NUM,
p_sort_order => p_sort_orders(i),
p_concat_ids => FND_API.G_MISS_CHAR,
x_return_status => l_return_status,
x_msg_count => x_msg_count,
x_msg_data => x_msg_data
);
ROLLBACK TO UPDATE_MSITE_SCT_SECTS_PVT;
ROLLBACK TO UPDATE_MSITE_SCT_SECTS_PVT;
ROLLBACK TO UPDATE_MSITE_SCT_SECTS_PVT;
END Update_MSite_Section_Sections;
PROCEDURE Update_Delete_Sct_Scts
(
p_api_version IN NUMBER,
p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
p_commit IN VARCHAR2 := FND_API.G_FALSE,
p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
p_msite_section_section_ids IN JTF_NUMBER_TABLE,
p_object_version_numbers IN JTF_NUMBER_TABLE,
p_start_date_actives IN JTF_DATE_TABLE,
p_end_date_actives IN JTF_DATE_TABLE,
p_sort_orders IN JTF_NUMBER_TABLE,
p_delete_flags IN JTF_VARCHAR2_TABLE_300,
x_return_status OUT NOCOPY VARCHAR2,
x_msg_count OUT NOCOPY NUMBER,
x_msg_data OUT NOCOPY VARCHAR2
)
IS
l_api_name CONSTANT VARCHAR2(30) := 'Update_Delete_Sct_Scts';
SAVEPOINT UPDATE_DELETE_SCT_SCTS_PVT;
IF (p_delete_flags(i) = 'Y') THEN
Delete_MSite_Section_Section
(
p_api_version => p_api_version,
p_init_msg_list => FND_API.G_FALSE,
p_commit => FND_API.G_FALSE,
p_validation_level => FND_API.G_VALID_LEVEL_FULL,
p_mini_site_section_section_id => p_msite_section_section_ids(i),
p_mini_site_id => FND_API.G_MISS_NUM,
p_parent_section_id => FND_API.G_MISS_NUM,
p_child_section_id => FND_API.G_MISS_NUM,
x_return_status => x_return_status,
x_msg_count => x_msg_count,
x_msg_data => x_msg_data
);
Update_Msite_Section_Section
(
p_api_version => p_api_version,
p_init_msg_list => FND_API.G_FALSE,
p_commit => FND_API.G_FALSE,
p_validation_level => p_validation_level,
p_mini_site_section_section_id => p_msite_section_section_ids(i),
p_object_version_number => p_object_version_numbers(i),
p_mini_site_id => FND_API.G_MISS_NUM,
p_parent_section_id => FND_API.G_MISS_NUM,
p_child_section_id => FND_API.G_MISS_NUM,
p_start_date_active => p_start_date_actives(i),
p_end_date_active => p_end_date_actives(i),
p_level_number => FND_API.G_MISS_NUM,
p_sort_order => p_sort_orders(i),
p_concat_ids => FND_API.G_MISS_CHAR,
x_return_status => l_return_status,
x_msg_count => x_msg_count,
x_msg_data => x_msg_data
);
ROLLBACK TO UPDATE_DELETE_SCT_SCTS_PVT;
ROLLBACK TO UPDATE_DELETE_SCT_SCTS_PVT;
ROLLBACK TO UPDATE_DELETE_SCT_SCTS_PVT;
END Update_Delete_Sct_Scts;
P_LAST_UPDATE_DATE IN VARCHAR2,
P_CUSTOM_MODE IN VARCHAR2,
P_UPLOAD_MODE IN VARCHAR2
)
IS
BEGIN
If (P_UPLOAD_MODE='NLS') Then
Null;
P_LAST_UPDATE_DATE,
P_CUSTOM_MODE);