Taşıma Emri Başlığının Onaylandı Statüsüne Getirilmesi İşlemi

DECLARE
   p_move_order_number   VARCHAR2 (30) := '6201409';
   v_header_id           NUMBER;
BEGIN
   BEGIN
      SELECT hd.header_id
        INTO v_header_id
        FROM mtl_txn_request_headers hd
       WHERE hd.request_number = p_move_order_number;
   EXCEPTION
      WHEN OTHERS
      THEN
         v_header_id := NULL;
   END;
 
   inv_trohdr_util.update_row_status (v_header_id,
                                      inv_globals.g_to_status_approved
                                     );
/*
 
invtroap.start_to_approval (to_header_id      => v_header_id,
                            item_type         => 'INVTROAP',
                            item_key          => TO_CHAR (v_header_id)
                           );
 
                           */
END;