DECLARE
   l_approval_group_name     VARCHAR2 (500) := 'AZHD AP Approval';
   l_approval_group_id       NUMBER := NULL;
   l_object_version_number   NUMBER := NULL;
   l_start_date              DATE := NULL;
   l_end_date                DATE := NULL;
BEGIN
   SELECT approval_group_id, object_version_number
     INTO
l_approval_group_id, l_object_version_number
     FROM
ame_approval_groups
    WHERE name = l_approval_group_name;
   ame_approver_group_api.
    delete_ame_approver_group (
      p_validate                => FALSE,
      p_approval_group_id       => l_approval_group_id,
      p_object_version_number   => l_object_version_number,
      p_start_date              => l_start_date,
      p_end_date                => l_end_date);
   COMMIT;
   DBMS_OUTPUT.put_line (l_approval_group_id || ' has been deleted ');
END;
--select * from ame_approval_groups where  name = 'Testing with Actual API';
 
No comments:
Post a Comment