05-CursorColumns.txt

create or replace procedure PRODUCT_UPDATE_CURSOR_COLUMNS(P_CATEGORYID number,P_PERCENT number)
  
is
  cursor C_PRODUCT is select  PRODUCTID, SALESPRICE from PRODUCT where CATEGORYID=P_CATEGORYID ;
  V_PRODUCTID PRODUCT.PRODUCTID%TYPE;
  V_SALESPRICE PRODUCT.SALESPRICE%TYPE;
begin

    open C_PRODUCT;
    
    loop
        fetch C_PRODUCT into V_PRODUCTID,V_SALESPRICE;
        exit when C_PRODUCT%notfound;
        update PRODUCT
        set SALESPRICE=V_SALESPRICE+ V_SALESPRICE*P_PERCENT/100
		where PRODUCT.PRODUCTID=V_PRODUCTID;
    end loop;

    close C_PRODUCT;

end;​
/

begin
	
	PRODUCT_UPDATE_CURSOR_COLUMNS(2,15);
  
end;