API to Delete Assignment Set

*** Before going to Delete Assignment Set first we have to delete the Assignment Amendments after that only we have to delete the Assignment Set.

/*------------------------------------------------------
1) API to Delete Assignment Set Amendments
-------------------------------------------------------*/
DECLARE
   CURSOR c1
   IS
      SELECT hasa.ROWID, has.assignment_set_name, hasa.*
        FROM hr_assignment_set_amendments hasa, hr_assignment_sets has
       WHERE has.assignment_set_id = hasa.assignment_set_id
             AND has.assignment_set_name = 'Leave_Salary_FEB_20';
BEGIN
   FOR i IN c1
   LOOP
      BEGIN
         hr_assignment_set_amds_pkg.delete_row (i.ROWID);
         COMMIT;
         DBMS_OUTPUT.
          put_line (
               i.assignment_id
            || ' has been Removed from Assignment Set '
            || i.assignment_set_name);
      EXCEPTION
         WHEN OTHERS
         THEN
            DBMS_OUTPUT.put_line ('Inner Exception: ' || SQLERRM);
      END;
   END LOOP;
EXCEPTION
   WHEN OTHERS
   THEN
      DBMS_OUTPUT.put_line ('Main Exception: ' || SQLERRM);
END;



/*---------------------------------------
2) API to Delete Assignment Set
------------------------------------------*/

DECLARE
   CURSOR c1
   IS
      SELECT ROWID, has.*
        FROM hr_assignment_sets has
       WHERE has.assignment_set_name = 'Leave_Salary_FEB_20';
BEGIN
   FOR i IN c1
   LOOP
      BEGIN
         hr_assignment_sets_pkg.delete_row (i.ROWID);
         COMMIT;
         DBMS_OUTPUT.
          put_line (
            i.assignment_set_name || ' has been Deleted Successfully !!!');
      EXCEPTION
         WHEN OTHERS
         THEN
            DBMS_OUTPUT.put_line ('Inner Exception: ' || SQLERRM);
      END;
   END LOOP;
EXCEPTION
   WHEN OTHERS
   THEN
      DBMS_OUTPUT.put_line ('Main Exception: ' || SQLERRM);

END;