Subversion Repositories DevTools

CREATE PROCEDURE "RELEASE_MANAGER"."TEST" 

IS

proc_id NUMBER;

/******************************************************************************

   NAME:       DELETE_DO_NOT_RIPPLE

   PURPOSE:    TO DELETE ENTRIES FROM THE DO_NOT_RIPPLE TABLE WHEN A PACKAGE

               IS RELEASED

   REVISIONS:

   Ver        Date        Author           Description

   ---------  ----------  ---------------  ------------------------------------

   1.0        21/04/2006  Rupesh Solanki     1. Created this procedure.

   NOTES:

   Automatically available Auto Replace Keywords:

      Object Name:     DELETE_DO_NOT_RIPPLE

      Sysdate:         21/04/2006

      Date and Time:   21/04/2006, 3:21:55 PM, and 21/04/2006 3:21:55 PM

      Username:         (set in TOAD Options, Procedure Editor)

      Table Name:       (set in the "New PL/SQL Object" dialog)

******************************************************************************/

   CURSOR ripple_cur

   IS

      select distinct pkg_health_tag, cmd_interface, pkg_owner, is_interface from deployment_manager.processes_config;

   ripple_rec   ripple_cur%ROWTYPE;

BEGIN

   OPEN ripple_cur;

   FETCH ripple_cur

    INTO ripple_rec;

   WHILE ripple_cur%FOUND

   LOOP

   select deployment_manager.seq_proc_id.nextval into proc_id from dual;

insert into processes (PROC_ID, PROC_NAME, RUN_AS, PKG_OWNER, IS_INTERFACE) 

values(proc_id, ripple_rec.pkg_health_tag, ripple_rec.cmd_interface, ripple_rec.pkg_owner, ripple_rec.is_interface);

      FETCH ripple_cur

       INTO ripple_rec;

   END LOOP;

END test;

/