azeae

CREATE OR REPLACE PROCEDURE P3_3_NOOIT_BESTELD AS 
  CURSOR C_NBESTELD IS
  SELECT ID, NAME, SHORT_DESC
  FROM S_PRODUCT
  WHERE NOT EXISTS (SELECT *
                    FROM S_ITEM
                    WHERE PRODUCT_ID = ID);
BEGIN
  FOR R_NBESTELD IN C_NBESTELD LOOP
    DBMS_OUTPUT.PUT_LINE(R_NBESTELD.ID || ' ' || R_NBESTELD.NAME || ' ' || R_NBESTELD.SHORT_DESC);
    UPDATE s_product
    SET SUGGESTED_WHLSL_PRICE = SUGGESTED_WHLSL_PRICE * 0.9
    WHERE ID = R_NBESTELD.ID;
  END LOOP;
END P3_3_NOOIT_BESTELD;