The following lines contain the word 'select', 'insert', 'update' or 'delete':
SELECT JTF_LOC_HIERARCHIES_B_S.NEXTVAL
FROM DUAL;
SELECT COUNT(*)
FROM JTF_LOC_HIERARCHIES_B
WHERE location_hierarchy_id = hier_id;
JTF_Utility_PVT.debug_message(l_full_name || ': insert');
INSERT INTO JTF_LOC_HIERARCHIES_B
(
location_hierarchy_id,
last_update_date,
last_updated_by,
creation_date,
created_by,
last_update_login,
object_version_number,
request_id,
program_application_id,
program_id,
program_update_date,
created_by_application_id,
location_type_code,
start_date_active,
end_date_active,
area1_id,
area1_code,
area2_id,
area2_code,
country_id,
country_code,
country_region_id,
country_region_code,
state_id,
state_code,
state_region_id,
state_region_code,
city_id,
city_code,
postal_code_id
)
VALUES
(
l_loc_hier_rec.location_hierarchy_id,
SYSDATE,
FND_GLOBAL.user_id,
SYSDATE,
FND_GLOBAL.user_id,
FND_GLOBAL.conc_login_id,
1,
l_loc_hier_rec.request_id,
l_loc_hier_rec.program_application_id,
l_loc_hier_rec.program_id,
l_loc_hier_rec.program_update_date,
l_loc_hier_rec.created_by_application_id,
l_loc_hier_rec.location_type_code,
l_loc_hier_rec.start_date_active,
l_loc_hier_rec.end_date_active,
l_loc_hier_rec.area1_id,
l_loc_hier_rec.area1_code,
l_loc_hier_rec.area2_id,
l_loc_hier_rec.area2_code,
l_loc_hier_rec.country_id,
l_loc_hier_rec.country_code,
l_loc_hier_rec.country_region_id,
l_loc_hier_rec.country_region_code,
l_loc_hier_rec.state_id,
l_loc_hier_rec.state_code,
l_loc_hier_rec.state_region_id,
l_loc_hier_rec.state_region_code,
l_loc_hier_rec.city_id,
l_loc_hier_rec.city_code,
l_loc_hier_rec.postal_code_id
);
PROCEDURE update_hierarchy
(
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,
x_return_status OUT NOCOPY /* file.sql.39 change */ VARCHAR2,
x_msg_count OUT NOCOPY /* file.sql.39 change */ NUMBER,
x_msg_data OUT NOCOPY /* file.sql.39 change */ VARCHAR2,
p_loc_hier_rec IN loc_hier_rec_type
)
IS
l_api_version CONSTANT NUMBER := 1.0;
l_api_name CONSTANT VARCHAR2(30) := 'update_hierarchy';
SAVEPOINT update_hierarchy;
p_validation_mode => JTF_PLSQL_API.g_update,
x_return_status => l_return_status,
p_loc_hier_rec => l_loc_hier_rec
);
JTF_Utility_PVT.debug_message(l_full_name||': update');
UPDATE JTF_LOC_HIERARCHIES_B SET
last_update_date = sysdate,
last_updated_by = fnd_global.user_id,
object_version_number = l_loc_hier_rec.object_version_number + 1,
last_update_login = fnd_global.conc_login_id,
request_id = l_loc_hier_rec.request_id,
program_application_id = l_loc_hier_rec.program_application_id,
program_id = l_loc_hier_rec.program_id,
program_update_date = l_loc_hier_rec.program_update_date,
created_by_application_id = l_loc_hier_rec.created_by_application_id,
location_type_code = l_loc_hier_rec.location_type_code,
start_date_active = l_loc_hier_rec.start_date_active,
end_date_active = l_loc_hier_rec.end_date_active,
area1_id = l_loc_hier_rec.area1_id,
area1_code = l_loc_hier_rec.area1_code,
area2_id = l_loc_hier_rec.area2_id,
area2_code = l_loc_hier_rec.area2_code,
country_id = l_loc_hier_rec.country_id,
country_code = l_loc_hier_rec.country_code,
country_region_id = l_loc_hier_rec.country_region_id,
country_region_code = l_loc_hier_rec.country_region_code,
state_id = l_loc_hier_rec.state_id,
state_code = l_loc_hier_rec.state_code,
state_region_id = l_loc_hier_rec.state_region_id,
state_region_code = l_loc_hier_rec.state_region_code,
city_id = l_loc_hier_rec.city_id,
city_code = l_loc_hier_rec.city_code,
postal_code_id = l_loc_hier_rec.postal_code_id
WHERE location_hierarchy_id = l_loc_hier_rec.location_hierarchy_id
AND object_version_number = l_loc_hier_rec.object_version_number;
ROLLBACK TO update_hierarchy;
ROLLBACK TO update_hierarchy;
ROLLBACK TO update_hierarchy;
END update_hierarchy;
PROCEDURE delete_hierarchy
(
p_api_version IN NUMBER,
p_init_msg_list IN VARCHAR2 := FND_API.g_false,
p_commit IN VARCHAR2 := FND_API.g_false,
x_return_status OUT NOCOPY /* file.sql.39 change */ VARCHAR2,
x_msg_count OUT NOCOPY /* file.sql.39 change */ NUMBER,
x_msg_data OUT NOCOPY /* file.sql.39 change */ VARCHAR2,
p_hier_id IN NUMBER,
p_object_version IN NUMBER
)
IS
l_api_version CONSTANT NUMBER := 1.0;
l_api_name CONSTANT VARCHAR2(30) := 'delete_hierarchy';
SAVEPOINT delete_hierarchy;
JTF_Utility_PVT.debug_message(l_full_name || ': delete');
DELETE FROM JTF_LOC_HIERARCHIES_B
WHERE location_hierarchy_id = p_hier_id
AND object_version_number = p_object_version;
ROLLBACK TO delete_hierarchy;
ROLLBACK TO delete_hierarchy;
ROLLBACK TO delete_hierarchy;
END delete_hierarchy;
SELECT location_hierarchy_id
FROM JTF_LOC_HIERARCHIES_B
WHERE location_hierarchy_id = p_hier_id
AND object_version_number = p_object_version
FOR UPDATE OF location_hierarchy_id NOWAIT;
AND p_validation_mode = JTF_PLSQL_API.g_update THEN
IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
FND_MESSAGE.set_name('JTF', 'JTF_LOC_HIER_NO_LOC_HIER_ID');
AND p_validation_mode = JTF_PLSQL_API.g_update
THEN
IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
FND_MESSAGE.set_name('JTF', 'JTF_NO_OBJ_VER_NUM');
SELECT * FROM JTF_LOC_HIERARCHIES_B
WHERE location_hierarchy_id = p_loc_hier_rec.location_hierarchy_id;
IF p_loc_hier_rec.program_update_date = FND_API.g_miss_char THEN
x_complete_rec.program_update_date := l_loc_hier_rec.program_update_date;
x_loc_hier_rec.last_update_date := FND_API.g_miss_date;
x_loc_hier_rec.last_updated_by := FND_API.g_miss_num;
x_loc_hier_rec.last_update_login := FND_API.g_miss_num;
x_loc_hier_rec.program_update_date := FND_API.g_miss_date;