The following lines contain the word 'select', 'insert', 'update' or 'delete':
SELECT WO.VISIT_TASK_ID
FROM AHL_WORKORDERS WO
WHERE WIP_ENTITY_ID = c_wip_entity_id;
SELECT *
FROM AHL_SCHEDULE_MATERIALS
WHERE VISIT_TASK_ID = c_visit_task_id
-- Fix for bug 13099886: Look at ACTIVE requirements only
AND STATUS = 'ACTIVE';
PROCEDURE UPDATE_WO_MATERIALS
(
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_wip_entity_id IN NUMBER,
p_alt_item_tbl IN Alt_Item_Tbl_Type) IS
l_api_version CONSTANT NUMBER := 1.0;
l_api_name CONSTANT VARCHAR2(30) := 'update_wo_materials';
SELECT scheduled_start_date
FROM wip_discrete_jobs
WHERE wip_entity_id = p_wip_entity_id;
SELECT asmt.scheduled_material_id
FROM ahl_workorders awo, ahl_schedule_materials asmt
WHERE awo.visit_task_id = asmt.visit_task_id
AND awo.wip_entity_id= c_wip_entity_id
AND asmt.requested_date <> trunc(c_requested_date)
AND asmt.status <> 'DELETED';
SELECT asmt.scheduled_material_id
FROM ahl_workorders awo, ahl_schedule_materials asmt
WHERE awo.wip_entity_id= c_wip_entity_id
AND awo.visit_task_id = asmt.visit_task_id
AND asmt.inventory_item_id = c_inventory_item_id
AND asmt.operation_sequence = c_operation_sequence
AND asmt.status <> 'DELETED';
SAVEPOINT update_wo_materials_pvt;
AHL_RSV_RESERVATIONS_PVT.Update_Reservation(
p_api_version => 1.0,
p_init_msg_list => FND_API.G_FALSE,
p_commit => FND_API.G_FALSE,
p_module_type => NULL,
x_return_status => l_return_status,
x_msg_count => x_msg_count,
x_msg_data => x_msg_data,
p_scheduled_material_id => l_scheduled_material_id,
p_requested_date => l_requested_date);
FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, L_DEBUG_KEY, 'Returned success from AHL_RSV_RESERVATIONS_PVT.Update_Reservation');
UPDATE AHL_SCHEDULE_MATERIALS
SET requested_date = trunc(l_requested_date),
last_update_date = sysdate,
last_updated_by = fnd_global.user_id,
last_update_login = fnd_global.login_id
WHERE scheduled_material_id = l_scheduled_material_id;
UPDATE AHL_SCHEDULE_MATERIALS
SET inventory_item_id = p_alt_item_tbl(i).ALTERNATE_ITEM_ID,
last_update_date = sysdate,
last_updated_by = fnd_global.user_id,
last_update_login = fnd_global.login_id
WHERE scheduled_material_id = l_scheduled_material_id;
Rollback to update_wo_materials_pvt;
Rollback to update_wo_materials_pvt;
Rollback to update_wo_materials_pvt;
END update_wo_materials;