The following lines contain the word 'select', 'insert', 'update' or 'delete':
mydebug('Need to update reservation record',l_api_name,9);
mydebug('Reservation record that needs to be updated',l_api_name,9);
mydebug('Calling update reservations to update reservation record',l_api_name,9);
inv_reservation_pub.update_reservation
(p_api_version_number => 1.0,
p_init_msg_lst => fnd_api.g_false,
x_return_status => l_return_status,
x_msg_count => x_msg_count,
x_msg_data => x_msg_data,
x_quantity_reserved => l_quantity_reserved,
x_secondary_quantity_reserved => l_secondary_quantity_reserved, -- INVCONV
p_original_rsv_rec => l_mtl_reservation_tbl(i),
p_to_rsv_rec => l_to_rsv_rec,
p_original_serial_number => p_serial_number,
p_to_serial_number => p_serial_number,
p_validation_flag => fnd_api.g_true,
p_partial_reservation_flag => p_partial_reservation_flag,
p_check_availability => fnd_api.g_true
);
l_rsv_updated := TRUE;
IF NOT l_rsv_updated THEN
--End. Commenting the code as this is moved to the private package
********************/
/*** End R12 ***/
l_progress := 180;
PROCEDURE update_reservation
(
p_api_version_number IN NUMBER
, p_init_msg_lst IN VARCHAR2 DEFAULT fnd_api.g_false
, x_return_status OUT NOCOPY VARCHAR2
, x_msg_count OUT NOCOPY NUMBER
, x_msg_data OUT NOCOPY VARCHAR2
, x_quantity_reserved OUT NOCOPY NUMBER
, x_secondary_quantity_reserved OUT NOCOPY NUMBER
, p_original_rsv_rec IN inv_reservation_global.mtl_reservation_rec_type
, p_to_rsv_rec IN inv_reservation_global.mtl_reservation_rec_type
, p_original_serial_number IN inv_reservation_global.serial_number_tbl_type
, p_to_serial_number IN inv_reservation_global.serial_number_tbl_type
, p_validation_flag IN VARCHAR2 DEFAULT fnd_api.g_true
, p_partial_reservation_flag IN VARCHAR2 DEFAULT fnd_api.g_false
, p_check_availability IN VARCHAR2 DEFAULT fnd_api.g_false
, p_over_reservation_flag IN NUMBER DEFAULT 0
) IS
l_api_version_number CONSTANT NUMBER := 1.0;
l_api_name CONSTANT VARCHAR2(30) := 'Update_Reservation';
inv_reservation_pvt.update_reservation
(
p_api_version_number => 1.0
, p_init_msg_lst => fnd_api.g_false
, x_return_status => l_return_status
, x_msg_count => x_msg_count
, x_msg_data => x_msg_data
, x_quantity_reserved => l_quantity_reserved
, x_secondary_quantity_reserved => l_secondary_quantity_reserved
, p_original_rsv_rec => p_original_rsv_rec
, p_to_rsv_rec => p_to_rsv_rec
, p_original_serial_number => p_original_serial_number
, p_to_serial_number => p_to_serial_number
, p_validation_flag => p_validation_flag
, p_partial_reservation_flag => p_partial_reservation_flag
, p_check_availability => p_check_availability
, p_over_reservation_flag => p_over_reservation_flag
);
END update_reservation;
PROCEDURE update_reservation
(
p_api_version_number IN NUMBER
, p_init_msg_lst IN VARCHAR2 DEFAULT fnd_api.g_false
, x_return_status OUT NOCOPY VARCHAR2
, x_msg_count OUT NOCOPY NUMBER
, x_msg_data OUT NOCOPY VARCHAR2
, p_original_rsv_rec IN inv_reservation_global.mtl_reservation_rec_type
, p_to_rsv_rec IN inv_reservation_global.mtl_reservation_rec_type
, p_original_serial_number IN inv_reservation_global.serial_number_tbl_type
, p_to_serial_number IN inv_reservation_global.serial_number_tbl_type
, p_validation_flag IN VARCHAR2 DEFAULT fnd_api.g_true
, p_check_availability IN VARCHAR2 DEFAULT fnd_api.g_false
, p_over_reservation_flag IN NUMBER DEFAULT 0
) IS
l_api_version_number CONSTANT NUMBER := 1.0;
l_api_name CONSTANT VARCHAR2(30) := 'Update_Reservation';
mydebug('Calling the overloaded procedure update_reservation',l_api_name,9);
inv_reservation_pub.update_reservation
(p_api_version_number => 1.0,
p_init_msg_lst => fnd_api.g_false,
x_return_status => l_return_status,
x_msg_count => x_msg_count,
x_msg_data => x_msg_data,
x_quantity_reserved => l_quantity_reserved,
x_secondary_quantity_reserved => l_secondary_quantity_reserved,
p_original_rsv_rec => p_original_rsv_rec,
p_to_rsv_rec => p_to_rsv_rec,
p_original_serial_number => p_original_serial_number ,
p_to_serial_number => p_to_serial_number,
p_validation_flag => p_validation_flag,
p_partial_reservation_flag => fnd_api.g_false,
p_check_availability => p_check_availability,
p_over_reservation_flag => p_over_reservation_flag
);
END update_reservation;
PROCEDURE delete_reservation
(
p_api_version_number IN NUMBER
, p_init_msg_lst IN VARCHAR2 DEFAULT fnd_api.g_false
, x_return_status OUT NOCOPY VARCHAR2
, x_msg_count OUT NOCOPY NUMBER
, x_msg_data OUT NOCOPY VARCHAR2
, p_rsv_rec
IN inv_reservation_global.mtl_reservation_rec_type
, p_serial_number
IN inv_reservation_global.serial_number_tbl_type
)IS
l_api_version_number CONSTANT NUMBER := 1.0;
l_api_name CONSTANT VARCHAR2(30) := 'Delete_Reservation';
inv_reservation_pvt.delete_reservation
(
p_api_version_number => 1.0
, p_init_msg_lst => fnd_api.g_false
, x_return_status => l_return_status
, x_msg_count => x_msg_count
, x_msg_data => x_msg_data
, p_rsv_rec => p_rsv_rec
, p_original_serial_number => p_serial_number
, p_validation_flag => fnd_api.g_true
);
END delete_reservation;