The following lines contain the word 'select', 'insert', 'update' or 'delete':
PROCEDURE Update_Scheduling_Results (
p_api_version IN NUMBER := 1.0,
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_sched_Orders_Tbl IN Sched_Orders_Tbl,
x_return_status OUT NOCOPY VARCHAR2)
IS
CURSOR Check_Sched_Mat_Cur(c_sch_mat_id IN NUMBER)
IS
SELECT 1 FROM ahl_schedule_materials
WHERE scheduled_material_id = c_sch_mat_id;
l_api_name CONSTANT VARCHAR2(30) := 'Update_Scheduling_Results';
'ahl.plsql.AHL_LTP_ASCP_ORDERS_PVT.Update_Scheduling_Results.begin',
'At the start of PLSQL procedure'
);
SAVEPOINT Update_Scheduling_Results;
'Request for Update Scheduled Sales Orders Number of Records : ' || p_sched_Orders_tbl.COUNT
);
UPDATE AHL_SCHEDULE_MATERIALS
SET scheduled_date = p_sched_Orders_tbl(i).schedule_ship_date,
scheduled_quantity = p_sched_Orders_tbl(i).Quantity_By_Due_Date,
object_version_number = object_version_number + 1
WHERE scheduled_material_id = p_sched_Orders_tbl(i).order_line_id;
'ahl.plsql.AHL_LTP_ASCP_ORDERS_PVT.Update_Scheduling_Results.end',
'At the end of PLSQL procedure'
);
ROLLBACK TO Update_Scheduling_Results;
ROLLBACK TO Update_Scheduling_Results;
ROLLBACK TO Update_Scheduling_Results;
p_procedure_name => 'UPDATE_SCHEDULING_RESULTS',
p_error_text => SUBSTR(SQLERRM,1,240));
END Update_Scheduling_Results;