CREATE OR REPLACE PROCEDURE ASD_INS_PATIENT
(naissance IN asd_patient.pat_date_naissance%TYPE, numero IN asd_patient.per_num%TYPE) AS
var int := 0;
personneInexistante EXCEPTION;
BEGIN
  SELECT COUNT(*) INTO var FROM asd_personne WHERE per_num = numero;
  IF var = 0 THEN
    RAISE personneInexistante;
  ELSE
    INSERT INTO asd_patient (per_num, pat_date_naissance) VALUES (numero, naissance);
  END IF;

  EXCEPTION
    WHEN personneInexistante THEN
      DBMS_OUTPUT.put_line('Personne inexistante');
END ASD_INS_PATIENT;