CREATE  PROCEDURE task_IN (pm IN NUMBER, updated_count OUT NUMBER) 
IS

	id INT;
    zp INT;
    okl INT := 0;
    i INT;
    new_zp INT;
	CURSOR  cur1 IS  SELECT ID_CONTR, ZARPLATA, OKLAD FROM contracts;
--	CONTINUE HANDLER FOR NOT FOUND SET i = 1;
BEGIN
	OPEN cur1;
	i := 0;
	new_zp := 0;
	updated_count := 0;

	WHILE i = 0 
    LOOP
    
		FETCH cur1 INTO id, zp, okl;
		IF pm > okl THEN
			new_zp := 1.5*pm;
		ELSE IF okl > 1.5*pm THEN
			new_zp := 1.05*zp;
		END IF;
        END IF;
		IF new_zp > 0 THEN
			updated_count := updated_count+1;
			UPDATE contracts SET ZARPLATA = new_zp WHERE ID_CONTR = id;
		END IF;
	END LOOP;
	CLOSE cur1;
END;