API to Delete FND Attachment From Oracle Apps

DECLARE
   l_entity_name            VARCHAR2 (20) :=  'AR INVOICE IMAGE';
  -- l_pk1_value              VARCHAR2 (20) := '200487';
   l_delete_document_flag   VARCHAR2 (1) := 'Y';
      CURSOR c1
   IS
      SELECT CUSTOMER_TRX_ID
        FROM  ra_customer_trx_all
       WHERE TRUNC (CREATION_DATE) >= (SYSDATE - 51)
       AND org_id=1;  
BEGIN
 
          FOR c1_rec IN c1
   LOOP                    
   fnd_attached_documents2_pkg.delete_attachments (
      X_entity_name            => l_entity_name,
      X_pk1_value              => c1_rec.CUSTOMER_TRX_ID,
      X_delete_document_flag   => l_delete_document_flag);
      END LOOP;
      Commit;
END;