Script to push SO Line status from AWAITING_SHIPPING or AWAITING_FULFILLMENT to CLOSED

DECLARE
   l_org_id     NUMBER;
   l_count      NUMBER;
   l_result     VARCHAR2 (30);
   l_file_val   VARCHAR2 (60);

   CURSOR c_rec
   IS
      SELECT oel.line_id
        FROM apps.oe_order_lines_all oel
       WHERE oel.line_id IN
                ('5569696',
                 '5569705',
                 '6057802');
BEGIN
   oe_debug_pub.debug_on;
   oe_debug_pub.initialize;
   l_file_val := OE_DEBUG_PUB.Set_Debug_Mode ('FILE');
   oe_Debug_pub.setdebuglevel (5);
   DBMS_OUTPUT.put_line ('File : ' || l_file_val);

   FOR i IN c_rec
   LOOP
      UPDATE apps.oe_order_lines_all
         SET invoice_interface_status_code = NULL
       WHERE line_id = i.line_id;

      OE_Standard_WF.OEOL_SELECTOR (p_itemtype   => 'OEOL',
                                    p_itemkey    => TO_CHAR (i.line_id),
                                    p_actid      => 12345,
                                    p_funcmode   => 'SET_CTX',
                                    p_result     => l_result);
      wf_engine.handleError ('OEOL',
                             i.line_id,
                             'INVOICE_INTERFACE',
                             'RETRY',
                             NULL);
      DBMS_OUTPUT.put_line (
         'File name ' || OE_DEBUG_PUB.G_DIR || '/' || OE_DEBUG_PUB.G_FILE);
   COMMIT;
   END LOOP;
END;