Subversion Repositories DevTools

CREATE PROCEDURE "RELEASE_MANAGER"."ADD_PACKAGE_INTEREST" (nProjId IN PROJECTS.PROJ_ID%TYPE,
                                                                                                  nPkgIdList IN VARCHAR2,
                                                                                                  nUserId IN NUMBER
                                                                                                  ) IS

/******************************************************************************
   NAME:       ADD_PACKAGE_INTEREST
   PURPOSE:    

   REVISIONS:
   Ver        Date        Author           Description
   ---------  ----------  ---------------  ------------------------------------
   1.0        12/05/2006  Rupesh Solanki     1. Created this procedure.

   NOTES:

   Automatically available Auto Replace Keywords:
      Object Name:     ADD_PACKAGE_INTEREST
      Sysdate:         12/05/2006
      Date and Time:   12/05/2006, 9:11:12 AM, and 12/05/2006 9:11:12 AM
      Username:         (set in TOAD Options, Procedure Editor)
      Table Name:       (set in the "New PL/SQL Object" dialog)

******************************************************************************/
   npkgidcollector   relmgr_number_tab_t := relmgr_number_tab_t ();
   nPkgId NUMBER;
BEGIN

         npkgidcollector := in_list_number2 (nPkgIdList);
         
        FOR i IN 1..npkgidcollector.COUNT
        LOOP
                nPkgId := npkgidcollector(i);

         --- Insert into PACKAGE_INTEREST TABLE
         INSERT INTO PACKAGE_INTEREST (PROJ_ID, PKG_ID, USER_ID)
         VALUES(nProjId, nPkgId, nUserId);
        END LOOP;        
         

END ADD_PACKAGE_INTEREST;
/