Subversion Repositories DevTools

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;

/