CREATE PROCEDURE ALOCAR_SALA
(IN PREPETITIVO CHAR(3), PHORARIOINICIO TIME, PHORARIOTERMINO TIME, PNOME VARCHAR(20),
PDIASEMANA VARCHAR(10), CONTATO VARCHAR(100), PIDSALA VARCHAR(10), PIDSEMESTRE INTEGER,
PIDEMPREGADO INTEGER, PTIPO VARCHAR(20), PSUBTIPO VARCHAR(20), OUT MENSAGEM VARCHAR(200))
BEGIN

IF phorarioinicio NOT IN(SELECT HORARIOINICIO FROM EVENTO WHERE EVENTO.IDSALA = PIDSALA AND EVENTO.DIASEMANA = PDIASEMANA)
 AND phorariotermino NOT IN(SELECT HORARIOTERMINO FROM EVENTO WHERE EVENTO.IDSALA = PIDSALA AND EVENTO.DIASEMANA = PDIASEMANA) THEN

    IF (PTIPO = 'AULA') THEN
        INSERT INTO EVENTO(HORARIOINICIO, HORARIOTERMINO, NOME, DIASEMANA, CONTATO, IDSALA, IDSEMESTRE, IDEMPREGADO)
        VALUES (PHORARIOINICIO, PHORARIOTERMINO, PNOME, PDIASEMANA, PCONTATO, PIDSALA, PIDSEMESTRE, PIDEMPREGADO);
        SET MENSAGEM = "SALA ALOCADA COM SUCESSO";
    END IF;

    IF (PTIPO = 'LABORATORIO') THEN
        IF (SELECT IDTIPO FROM SALA WHERE IDSALA = PIDSALA) = (SELECT IDTIPO FROM TIPOSALA WHERE TIPO = 'LABORATORIO') THEN
            IF (PSUBTIPO <> 'COMPUTACAO') THEN
                IF (PSUBTIPO = (SELECT SUBTIPO FROM TIPOSALA WHERE IDTIPO = (SELECT IDTIPO FROM SALA WHERE IDSALA = PIDSALA))) THEN
                            INSERT INTO EVENTO(HORARIOINICIO, HORARIOTERMINO, NOME, DIASEMANA, CONTATO, IDSALA, IDSEMESTRE, IDEMPREGADO)
                            VALUES (PHORARIOINICIO, PHORARIOTERMINO, PNOME, PDIASEMANA, PCONTATO, PIDSALA, PIDSEMESTRE, PIDEMPREGADO);
                            SET MENSAGEM = "SALA ALOCADA COM SUCESSO";
                ELSE
                    SET MENSAGEM = "NAO FOI POSSIVEL ALOCAR A SALA";
            ELSE IF (PSUBTIPO = 'COMPUTACAO_ABERTO') THEN
                    SET MENSAGEM = "NAO FOI POSSIVEL ALOCAR A SALA";