Bom dia! Eu tive algumas dificuldades em rodar o exemplo do último vídeo com a aula prática sobre funções. Achei que seria interessante mencionar que a execução da função falha se não houver pelo menos um instrutor cadastrado. Do contrário, o cálculo do percentual dá um erro de divisão por zero.
Abaixo coloco o script com a verificação de que há pelo menos um instrutor cadastrado (esse teste é feito depois do loop FOR):
DROP TABLE IF EXISTS instrutor CASCADE;
CREATE TABLE instrutor(
id SERIAL PRIMARY KEY,
nome VARCHAR(255) NOT NULL,
salario DECIMAL(10, 2)
);
DROP TABLE IF EXISTS log_instrutores;
CREATE TABLE log_instrutores(
id SERIAL PRIMARY KEY,
informacao VARCHAR(255),
momento_criacao TIMESTAMP DEFAULT CURRENT_TIMESTAMP -- CURRENT_TIMESTAMP retorna a data e a hora de agora.
);
DROP FUNCTION IF EXISTS cria_instrutor(VARCHAR, DECIMAL);
CREATE FUNCTION cria_instrutor(nome_instrutor VARCHAR, salario_instrutor DECIMAL) RETURNS VOID AS $$
DECLARE
id_instrutor_inserido INTEGER;
media_salarial DECIMAL;
instrutores_recebem_menos INTEGER DEFAULT 0;
total_instrutores INTEGER DEFAULT 0;
salario DECIMAL;
percentual DECIMAL;
BEGIN
INSERT INTO instrutor (nome, salario) VALUES (nome_instrutor, salario_instrutor) RETURNING id INTO id_instrutor_inserido;
SELECT AVG(instrutor.salario) INTO media_salarial FROM instrutor WHERE id <> id_instrutor_inserido;
IF salario_instrutor > media_salarial THEN
INSERT INTO log_instrutores(informacao) VALUES (nome_instrutor || ' recebe acima da média');
END IF;
FOR salario IN SELECT instrutor.salario FROM instrutor WHERE id <> id_instrutor_inserido LOOP
total_instrutores := total_instrutores +1;
IF salario_instrutor > salario THEN
instrutores_recebem_menos := instrutores_recebem_menos + 1;
END IF;
END LOOP;
IF total_instrutores = 0 THEN -- A função não vai funcionar se não houver instrutores cadastrados.
INSERT INTO log_instrutores (informacao) VALUES('Primeiro instrutor inserido.');
ELSE
percentual := instrutores_recebem_menos::DECIMAL / total_instrutores::DECIMAL * 100;
INSERT INTO log_instrutores (informacao)
VALUES(nome_instrutor || ' recebe mais do que ' || ROUND(percentual,2) || '% dos instrutores.');
END IF;
END;
$$ LANGUAGE PLPGSQL;
SELECT cria_instrutor('Xicó', 700);
SELECT cria_instrutor('Thiago', 10000);
SELECT cria_instrutor('Zina', 5000);
SELECT * FROM instrutor;
SELECT * FROM log_instrutores;