Guest User

Untitled

a guest
Jan 22nd, 2019
69
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 0.84 KB | None | 0 0
  1. Create or replace procedure readEmpDetails (empRowList NUMBER_LIST_TYPE,
  2. created_by VARCHAR2,
  3. accessid NUMBER )
  4. is
  5.  
  6. begin readEmpDetails([124, 155, 147], '100', 2); end;
  7.  
  8. create or replace type T_array_readEmpDetails AS VARRAY(10) of number(4)
  9. /
  10.  
  11. Create or replace procedure readEmpDetails (t_ar T_array_readEmpDetails,
  12. created_by VARCHAR2,
  13. accessid NUMBER )
  14. is
  15. begin
  16. FOR i IN 1..t_ar.count LOOP
  17. dbms_output.put_line(t_ar(i));
  18. END LOOP;
  19. end;
  20. /
  21. DECLARE
  22. v T_array_readEmpDetails;
  23. BEGIN
  24. v := T_array_readEmpDetails();
  25. v.EXTEND(3);
  26. v(1) := 124;
  27. v(2) := 155;
  28. v(3) := 147;
  29. readEmpDetails(v,'A',1);
  30. END;
  31. /
Add Comment
Please, Sign In to add comment