Hrms Technical API's - (API to Purge(Delete from base Tables) the Element Entry at Assignment Level)

***This API used to completely delete the element entries from the base tables.

DECLARE
   ld_effective_start_date    DATE;
   ld_effective_end_date      DATE;
   lb_delete_warning          BOOLEAN;
   ln_object_version_number   pay_element_entries_f.object_version_number%TYPE
                                                                         := 1;

   CURSOR c1
   IS
      SELECT   pe.*
          FROM pay_element_entries_f pe
         WHERE pe.element_type_id = 864
           AND pe.effective_start_date = '01-Dec-2019'
           AND pe.element_entry_id IN (
                  SELECT MAX (p.element_entry_id)
                    FROM pay_element_entries_f p
                   WHERE 1 = 1
                     AND p.element_type_id = 864
                     AND p.effective_start_date = '01-Dec-2019'
                     AND pe.assignment_id = p.assignment_id)
      ORDER BY assignment_id;
BEGIN
   FOR i IN c1
   LOOP
-- Delete Element Entry
-- -------------------------------
      pay_element_entry_api.delete_element_entry
                        (                   -- Input data elements
                                            -- ------------------------------
                         p_datetrack_delete_mode      => 'ZAP',--Purge
                         p_effective_date             => i.effective_start_date,
                         p_element_entry_id           => i.element_entry_id,
-- Output data elements
-- --------------------------------
                         p_object_version_number      => ln_object_version_number,
                         p_effective_start_date       => ld_effective_start_date,
                         p_effective_end_date         => ld_effective_end_date,
                         p_delete_warning             => lb_delete_warning
                        );
      COMMIT;
   END LOOP;
EXCEPTION
   WHEN OTHERS
   THEN
      ROLLBACK;
      DBMS_OUTPUT.put_line (SQLERRM);

END;