CREATE OR REPLACE PROCEDURE alterarTemperaturaTorre(p_codTorre torre.codigo%TYPE, p_temperatura torre.temperatura%TYPE) AS
BEGIN 
UPDATE torre SET temperatura = p_temperatura where codigo = p_codTorre;
COMMIT;
END alterarTemperaturaTorre;
/

CREATE OR REPLACE PROCEDURE aumentarTemperaturaTorres(p_temperatura torre.temperatura%TYPE) AS
BEGIN 


set serveroutput on;
DECLARE

v_codigo torre.codigo%TYPE;

CURSOR c_torre IS
SELECT temperatura, codigo FROM torre;

BEGIN

OPEN c_torre;

LOOP
FETCH c_torre INTO v_temperatura, v_codigo;
EXIT WHEN c_torre%NOTFOUND;

DBMS_OUTPUT.PUT_LINE('temperatura: '|| ''|| TO_CHAR(v_temperatura)|| ' código: '|| TO_CHAR(v_codigo));

END LOOP;

CLOSE c_torre;
END;


COMMIT;
END aumentarTemperaturaTorres;
/










set serveroutput on;
DECLARE
 
p_nome empregado.nome%TYPE;
p_salario empregado.salario%TYPE;
p_telefone empregado.telefone%TYPE;

CURSOR granaGalera IS
SELECT nome, salario, telefone FROM empregado;

BEGIN

OPEN granaGalera;

LOOP

FETCH granaGalera INTO p_nome, p_salario, p_telefone;
EXIT WHEN granaGalera%NOTFOUND;

DBMS_OUTPUT.PUT_LINE('nome: '|| p_nome || ' salário: ' || TO_CHAR(p_salario) || ' telefone: ' || TO_CHAR(p_telefone));

END LOOP;

CLOSE granaGalera;
END;
/


//====


//====

set serveroutput on;
DECLARE

v_temperatura torre.temperatura%TYPE;
v_codigo torre.codigo%TYPE;

CURSOR c_torre IS
SELECT temperatura, codigo FROM torre;

BEGIN

OPEN c_torre;

LOOP
FETCH c_torre INTO v_temperatura, v_codigo;
EXIT WHEN c_torre%NOTFOUND;

DBMS_OUTPUT.PUT_LINE('temperatura: '|| ''|| TO_CHAR(v_temperatura)|| ' código: '|| TO_CHAR(v_codigo));

END LOOP;

CLOSE c_torre;
END;
/