Subversion Repositories DevTools

Rev

Blame | Last modification | View Log | RSS feed

CREATE PROCEDURE "RELEASE_MANAGER"."ADD_VIEW_MEMBERS" (nGroupId IN NUMBER, sUserList IN VARCHAR2) IS

/******************************************************************************
   NAME:       ADD_VIEW_MEMBERS
   PURPOSE:    

   REVISIONS:
   Ver        Date        Author           Description
   ---------  ----------  ---------------  ------------------------------------
   1.0        11/04/2006          1. Created this procedure.

   NOTES:

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

******************************************************************************/
CURSOR user_cur IS
        SELECT u.USER_ID
          FROM USERS u
         WHERE u.USER_ID IN (
                                                SELECT * 
                                                  FROM THE ( SELECT CAST( IN_LIST_NUMBER( sUserList ) AS RELMGR_NUMBER_TAB_t ) FROM dual ) 
                                                );
user_rec user_cur%ROWTYPE;


BEGIN

         OPEN user_cur;
         FETCH user_cur INTO user_rec;
         
         WHILE user_cur%FOUND
         LOOP
                 INSERT INTO MEMBERS_GROUP (GROUP_EMAIL_ID, USER_ID)
                 VALUES ( nGroupId, user_rec.USER_ID);
                 
                 FETCH user_cur INTO user_rec;   
         END LOOP;       
                 
                 
                 
END ADD_VIEW_MEMBERS;
/