CREATE OR REPLACE package test_pkg AS
   TYPE my_tab IS TABLE OF NUMBER INDEX BY BINARY_INTEGER;
   PROCEDURE main (errbuff            OUT VARCHAR2
                  ,retcode            OUT NUMBER);

   PROCEDURE tab_test (l_id IN NUMBER, l_tab OUT my_tab); 
END test_pkg;

CREATE OR REPLACE package body test_pkg AS
   PROCEDURE main ( errbuff            OUT VARCHAR2
                  ,retcode            OUT NUMBER ) IS
      l_id NUMBER;
      TYPE my_tab IS TABLE OF NUMBER INDEX BY BINARY_INTEGER;
      l_tab my_tab;
     BEGIN
      l_id :=10;
      tab_test(l_id,l_tab);
-- ERROR MESSAGE: "PLS-00306: wrong number or types of arguments in call to 'test_pkg'"
   END main;

   PROCEDURE tab_test (p_id IN NUMBER, p_tab OUT my_tab) IS
   i NUMBER;
   BEGIN
      FOR i IN 1..5 LOOP
         p_tab(i) := 'Line '||i;
      END LOOP;
   END tab_test;
END test_pkg;
/