The following lines contain the word 'select', 'insert', 'update' or 'delete':
SELECT AMS_ACT_GEO_AREAS_S.NEXTVAL
FROM DUAL;
SELECT COUNT(*)
FROM AMS_ACT_GEO_AREAS
WHERE activity_geo_area_id = geo_area_id;
AMS_Utility_PVT.debug_message(l_full_name || ': insert');
INSERT INTO AMS_ACT_GEO_AREAS
(
activity_geo_area_id,
last_update_date,
last_updated_by,
creation_date,
created_by,
last_update_login,
object_version_number,
act_geo_area_used_by_id,
arc_act_geo_area_used_by,
geo_area_type_code,
geo_hierarchy_id,
attribute_category,
attribute1,
attribute2,
attribute3,
attribute4,
attribute5,
attribute6,
attribute7,
attribute8,
attribute9,
attribute10,
attribute11,
attribute12,
attribute13,
attribute14,
attribute15
)
VALUES
(
l_geo_area_rec.activity_geo_area_id,
SYSDATE,
FND_GLOBAL.user_id,
SYSDATE,
FND_GLOBAL.user_id,
FND_GLOBAL.conc_login_id,
1,
l_geo_area_rec.act_geo_area_used_by_id,
l_geo_area_rec.arc_act_geo_area_used_by,
l_geo_area_rec.geo_area_type_code,
l_geo_area_rec.geo_hierarchy_id,
l_geo_area_rec.attribute_category,
l_geo_area_rec.attribute1,
l_geo_area_rec.attribute2,
l_geo_area_rec.attribute3,
l_geo_area_rec.attribute4,
l_geo_area_rec.attribute5,
l_geo_area_rec.attribute6,
l_geo_area_rec.attribute7,
l_geo_area_rec.attribute8,
l_geo_area_rec.attribute9,
l_geo_area_rec.attribute10,
l_geo_area_rec.attribute11,
l_geo_area_rec.attribute12,
l_geo_area_rec.attribute13,
l_geo_area_rec.attribute14,
l_geo_area_rec.attribute15
);
PROCEDURE update_geo_area
(
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 VARCHAR2,
x_msg_count OUT NOCOPY NUMBER,
x_msg_data OUT NOCOPY VARCHAR2,
p_geo_area_rec IN geo_area_rec_type
)
IS
l_api_version CONSTANT NUMBER := 1.0;
l_api_name CONSTANT VARCHAR2(30) := 'update_geo_area';
SAVEPOINT update_geo_area;
p_validation_mode => JTF_PLSQL_API.g_update,
x_return_status => l_return_status,
p_geo_area_rec => l_geo_area_rec
);
AMS_Utility_PVT.debug_message(l_full_name||': update');
UPDATE AMS_ACT_GEO_AREAS SET
last_update_date = SYSDATE,
last_updated_by = FND_GLOBAL.user_id,
last_update_login = FND_GLOBAL.conc_login_id,
object_version_number = l_geo_area_rec.object_version_number + 1,
act_geo_area_used_by_id = l_geo_area_rec.act_geo_area_used_by_id,
arc_act_geo_area_used_by = l_geo_area_rec.arc_act_geo_area_used_by,
geo_area_type_code = l_geo_area_rec.geo_area_type_code,
geo_hierarchy_id = l_geo_area_rec.geo_hierarchy_id,
attribute_category = l_geo_area_rec.attribute_category,
attribute1 = l_geo_area_rec.attribute1,
attribute2 = l_geo_area_rec.attribute2,
attribute3 = l_geo_area_rec.attribute3,
attribute4 = l_geo_area_rec.attribute4,
attribute5 = l_geo_area_rec.attribute5,
attribute6 = l_geo_area_rec.attribute6,
attribute7 = l_geo_area_rec.attribute7,
attribute8 = l_geo_area_rec.attribute8,
attribute9 = l_geo_area_rec.attribute9,
attribute10 = l_geo_area_rec.attribute10,
attribute11 = l_geo_area_rec.attribute11,
attribute12 = l_geo_area_rec.attribute12,
attribute13 = l_geo_area_rec.attribute13,
attribute14 = l_geo_area_rec.attribute14,
attribute15 = l_geo_area_rec.attribute15
WHERE activity_geo_area_id = l_geo_area_rec.activity_geo_area_id
AND object_version_number = l_geo_area_rec.object_version_number;
ROLLBACK TO update_geo_area;
ROLLBACK TO update_geo_area;
ROLLBACK TO update_geo_area;
END update_geo_area;
PROCEDURE delete_geo_area
(
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 VARCHAR2,
x_msg_count OUT NOCOPY NUMBER,
x_msg_data OUT NOCOPY VARCHAR2,
p_geo_area_id IN NUMBER,
p_object_version IN NUMBER
)
IS
l_api_version CONSTANT NUMBER := 1.0;
l_api_name CONSTANT VARCHAR2(30) := 'delete_geo_area';
SELECT act_geo_area_used_by_id, arc_act_geo_area_used_by
FROM ams_act_geo_areas
WHERE activity_geo_area_id = p_geo_area_id;
SELECT 1
FROM ams_act_geo_areas
WHERE act_geo_area_used_by_id = l_used_by_id
AND arc_act_geo_area_used_by = l_used_by;
SAVEPOINT delete_geo_area;
AMS_Utility_PVT.debug_message(l_full_name || ': delete');
DELETE FROM AMS_ACT_GEO_AREAS
WHERE activity_geo_area_id = p_geo_area_id
AND object_version_number = p_object_version;
ROLLBACK TO delete_geo_area;
ROLLBACK TO delete_geo_area;
ROLLBACK TO delete_geo_area;
END delete_geo_area;
SELECT activity_geo_area_id
FROM AMS_ACT_GEO_AREAS
WHERE activity_geo_area_id = p_geo_area_id
AND object_version_number = p_object_version
FOR UPDATE OF activity_geo_area_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('AMS', 'AMS_GEO_NO_ACT_AREA_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('AMS', 'AMS_API_NO_OBJ_VER_NUM');
IF p_geo_area_rec.activity_geo_area_id IS NOT NULL THEN -- UPDATE RECORD
l_uk_flag := AMS_Utility_PVT.check_uniqueness
(
'AMS_ACT_GEO_AREAS',
'activity_geo_area_id <> ' || p_geo_area_rec.activity_geo_area_id
|| ' AND geo_hierarchy_id = ' || p_geo_area_rec.geo_hierarchy_id
|| ' AND act_geo_area_used_by_id = ' || p_geo_area_rec.act_geo_area_used_by_id
|| ' AND arc_act_geo_area_used_by = ''' || p_geo_area_rec.arc_act_geo_area_used_by || ''''
);
SELECT * FROM AMS_ACT_GEO_AREAS
WHERE activity_geo_area_id = p_geo_area_rec.activity_geo_area_id;
x_geo_area_rec.last_update_date := FND_API.g_miss_date;
x_geo_area_rec.last_updated_by := FND_API.g_miss_num;
x_geo_area_rec.last_update_login := FND_API.g_miss_num;