The following lines contain the word 'select', 'insert', 'update' or 'delete':
PROCEDURE Update_Ps_Strats(
p_api_version_number 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_ps_strats_rec IN ps_strats_rec_type,
x_object_version_number OUT NOCOPY NUMBER
)
IS
L_API_NAME CONSTANT VARCHAR2(30) := 'Update_Ps_Strats';
SAVEPOINT UPDATE_Ps_Strats_PUB;
AMS_Ps_Strats_PVT.Update_Ps_Strats(
p_api_version_number => 1.0,
p_init_msg_list => FND_API.G_FALSE,
p_commit => p_commit,
p_validation_level => FND_API.G_VALID_LEVEL_FULL,
x_return_status => x_return_status,
x_msg_count => x_msg_count,
x_msg_data => x_msg_data,
p_ps_strats_rec => l_pvt_ps_strats_rec,
x_object_version_number => l_object_version_number );
ROLLBACK TO UPDATE_Ps_Strats_PUB;
ROLLBACK TO UPDATE_Ps_Strats_PUB;
ROLLBACK TO UPDATE_Ps_Strats_PUB;
End Update_Ps_Strats;
PROCEDURE Delete_Ps_Strats(
p_api_version_number 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_strategy_id IN NUMBER,
p_object_version_number IN NUMBER
)
IS
L_API_NAME CONSTANT VARCHAR2(30) := 'Delete_Ps_Strats';
SAVEPOINT DELETE_Ps_Strats_PUB;
AMS_Ps_Strats_PVT.Delete_Ps_Strats(
p_api_version_number => 1.0,
p_init_msg_list => FND_API.G_FALSE,
p_commit => p_commit,
p_validation_level => FND_API.G_VALID_LEVEL_FULL,
x_return_status => x_return_status,
x_msg_count => x_msg_count,
x_msg_data => x_msg_data,
p_strategy_id => l_strategy_id,
p_object_version_number => l_object_version_number );
ROLLBACK TO DELETE_Ps_Strats_PUB;
ROLLBACK TO DELETE_Ps_Strats_PUB;
ROLLBACK TO DELETE_Ps_Strats_PUB;
End Delete_Ps_Strats;