Rem    NAME 
Rem      ckupgend.sql
Rem    DESCRIPTION
Rem      Perform Specific Upgrade Cleanup
Rem    RETURNS
Rem 	 None
Rem    NOTES
Rem      <other useful comments, qualifications, etc.>
Rem    CREATED
Rem	  14/04/1999

DECLARE

BEGIN

   update ck_migration_objects set ci_created = 'N' where ci_stage = 'CKUPGEND';

   ck_upgrade_mod.cleanup;

   update ck_migration_objects set ci_created = 'Y' where ci_stage = 'CKUPGEND';

   commit;

EXCEPTION 
   when others then
   dbms_output.put_line (' ** Exception Raised ** ');
   dbms_output.put_line ('...ERROR: '||substrb(sqlerrm, 1, 200));
   raise;

END;
/
