TEXT |
---|
PROCEDURE verificar_qtd_lugares_reserva(id_reserva_p NUMBER) IS erro_qtd_lugares EXCEPTION; BEGIN IF reserva_cabe_mesas(id_reserva_p) = 0 THEN DELETE FROM mesa_reservada MR WHERE MR.id_reserva = id_reserva_p; DELETE FROM reserva R WHERE R.id = id_reserva_p; COMMIT; RAISE erro_qtd_lugares; END IF; EXCEPTION WHEN erro_qtd_lugares THEN RAISE_APPLICATION_ERROR(-20123, 'Reserva inválida: a quantidade de lugares das mesas não comporta a quantidade de pessoas.'); END verificar_qtd_lugares_reserva; |