The following lines contain the word 'select', 'insert', 'update' or 'delete':
l_updated_by NUMBER;
l_update_date DATE;
IF (p_itm_rec.LAST_UPDATED_BY IS NULL
OR p_itm_rec.LAST_UPDATED_BY = FND_API.G_MISS_NUM) THEN
l_updated_by := p_itm_rec.CREATED_BY;
ELSE l_updated_by := p_itm_rec.LAST_UPDATED_BY;
IF (p_itm_rec.LAST_UPDATE_DATE IS NULL OR p_itm_rec.LAST_UPDATE_DATE = FND_API.G_MISS_DATE) THEN
l_update_date := l_creation_date;
l_update_date := p_itm_rec.LAST_UPDATE_DATE;
l_pvt.LAST_UPDATED_BY := l_updated_by;
l_pvt.LAST_UPDATE_DATE := l_update_date;
l_pvt.LAST_UPDATE_LOGIN := p_itm_rec.LAST_UPDATE_LOGIN;
** Call private API to do the insert
***************************************************************************/
JTF_CAL_ITEMS_PVT.insert_row
( p_api_version => 1.0
, p_init_msg_list => p_init_msg_list
, p_commit => FND_API.g_false
, 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_itm_rec => l_pvt
, x_cal_item_id => x_cal_item_id
);
PROCEDURE UpdateItem
( p_api_version IN NUMBER
, p_init_msg_list IN VARCHAR2
, p_commit IN VARCHAR2
, p_validation_level IN NUMBER
, x_return_status OUT NOCOPY VARCHAR2
, x_msg_count OUT NOCOPY NUMBER
, x_msg_data OUT NOCOPY VARCHAR2
, p_itm_rec IN CalItemRec
, x_object_version_number OUT NOCOPY NUMBER
) IS
l_api_name CONSTANT VARCHAR2(30) := 'UpdateItem';
l_last_update_date DATE;
SAVEPOINT update_item_pub;
IF (p_itm_rec.LAST_UPDATED_BY IS NULL
OR p_itm_rec.LAST_UPDATED_BY = FND_API.G_MISS_NUM) THEN
FND_MESSAGE.set_name('JTF', 'JTF_CAL_INVALID_LAST_UPDATE');
IF (p_itm_rec.LAST_UPDATE_DATE IS NULL
OR p_itm_rec.LAST_UPDATE_DATE = FND_API.G_MISS_DATE) THEN
l_last_update_date := sysdate;
l_last_update_date := p_itm_rec.LAST_UPDATE_DATE;
l_pvt.LAST_UPDATED_BY := p_itm_rec.LAST_UPDATED_BY;
l_pvt.LAST_UPDATE_DATE := l_last_update_date;
l_pvt.LAST_UPDATE_LOGIN := p_itm_rec.LAST_UPDATE_LOGIN;
** Call private API to do update
***************************************************************************/
JTF_CAL_ITEMS_PVT.Update_Row
( p_api_version => 1.0
, p_init_msg_list => p_init_msg_list
, p_commit => FND_API.g_false
, 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_itm_rec => l_pvt
, x_object_version_number => x_object_version_number
);
ROLLBACK TO update_item_pub;
ROLLBACK TO update_item_pub;
ROLLBACK TO update_item_pub;
END UpdateItem;
PROCEDURE DeleteItem
( p_api_version IN NUMBER
, p_init_msg_list IN VARCHAR2
, p_commit IN VARCHAR2
, p_validation_level IN NUMBER
, x_return_status OUT NOCOPY VARCHAR2
, x_msg_count OUT NOCOPY NUMBER
, x_msg_data OUT NOCOPY VARCHAR2
, p_cal_item_id IN NUMBER
, p_object_version_number IN NUMBER
)
IS
l_api_name CONSTANT VARCHAR2(30) := 'DeleteItem';
SAVEPOINT delete_item_pub;
** Call private API to do update
***************************************************************************/
JTF_CAL_ITEMS_PVT.Delete_Row
( p_api_version => 1.0
, p_init_msg_list => p_init_msg_list
, p_commit => FND_API.g_false
, 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_cal_item_id => p_cal_item_id
, p_object_version_number => p_object_version_number
);
ROLLBACK TO delete_item_pub;
ROLLBACK TO delete_item_pub;
ROLLBACK TO delete_item_pub;
END DeleteItem;