API to Delete Batch Header

DECLARE
   CURSOR c1
   IS
      SELECT * FROM pay_batch_headers;
BEGIN
   FOR i IN c1
   LOOP
      pay_batch_element_entry_api.
       delete_batch_header (
         p_validate                => FALSE,
         p_batch_id                => i.batch_id,
         p_object_version_number   => i.object_version_number);
       
         COMMIT;

      DBMS_OUTPUT.put_line (i.batch_id || ' has been Deleted !!!!');
   END LOOP;
EXCEPTION
   WHEN OTHERS
   THEN
      DBMS_OUTPUT.put_line ('Main Exception: ' || SQLERRM);
END;


SELECT * FROM pay_batch_headers