Posted By

wh0emPah on 04/01/10


Tagged


Versions (?)

azeae


 / Published in: PL/SQL
 

  1. PROCEDURE P2_2_HOOGSTE_VOORRAADWAARDE AS
  2. TYPE TYPE_REC_VOORRAADWAARDE IS RECORD(
  3. WHID S_INVENTORY.WAREHOUSE_ID%TYPE,
  4. WHVALUE NUMBER
  5. );
  6.  
  7. TYPE TYPE_COL_VOORRAAD
  8. IS TABLE OF TYPE_REC_VOORRAADWAARDE
  9.  
  10. t_voorraad TYPE_COL_VOORRAAD;
  11. SELECT WAREHOUSE_ID, SUM(I.AMOUNT_IN_STOCK * P.SUGGESTED_WHLSL_PRICE) Waarde
  12. BULK COLLECT INTO t_voorraad
  13. FROM S_INVENTORY I, S_PRODUCT P
  14. WHERE I.PRODUCT_ID = P.ID
  15. GROUP BY WAREHOUSE_ID
  16. ORDER BY Waarde DESC;
  17.  
  18. DBMS_OUTPUT.PUT_LINE('De 3 voorraadruimten met de hoogste voorraadwaarde :');
  19. FOR I IN 1..3 LOOP
  20. DBMS_OUTPUT.PUT_LINE('Voorraadruimte: ' || t_voorraad(I).WHID ||' Waarde: ' ||t_voorraad(I).WHVALUE);
  21.  
  22. END P2_2_HOOGSTE_VOORRAADWAARDE;

Report this snippet  

You need to login to post a comment.