All pastes #918631 Raw Edit

updatede

public text v1 · immutable
#918631 ·published 2008-02-26 07:35 UTC
rendered paste body
PROCEDURE ActualizarRegiones (
	b_regionid BOOLEAN,
	p_regionid REGIONES.REGION_ID%TYPE,
	b_regionname BOOLEAN,
	p_regionname REGIONES.REGION_NAME%TYPE,
	p_predicado REGIONES.REGION_ID%TYPE,
	p_curres IN OUT mi_cursor
)
IS BEGIN
	IF (b_regionid=1) THEN
		UPDATE empleados SET REGION_ID=p_regionid WHERE REGION_ID=p_predicado;
		COMMIT;
	END IF;
	IF (b_regionname=1) THEN
		UPDATE empleados SET REGION_NAME=p_regionname WHERE REGION_ID=p_predicado;
		COMMIT;
	END IF;
	OPEN p_curres FOR
		SELECT * FROM regiones;
END ActualizarRegiones;