【VC#】【Dapper】Execute(UPDATE)時に停止

Question

お世話になります。

Dapperを使ってOracleDBへUPDATEを行う際について質問させてください。

下記ソースを実行すると、添付画像の箇所で止まってしまいます（例外にはならない）。
FileInfoやtry-catchは不必要かもしれませんが念のため残してあります、、。

何が原因でしょうか。
また、「ネイティブフレームが呼び出し履歴の最初にあるため、式を評価できません」というメッセージがひたすら並んでいますが、これは何を意味しているのでしょうか。

恐れ入りますがよろしくお願い致します。

以下ソースです。

using System;
using System.Data;
using System.Windows.Forms;
using Oracle.DataAccess.Client;
using Dapper;

namespace WindowsFormsApplication
{
    public partial class Form1 : Form
    {
        private IDbConnection con;
        private IDbTransaction trn;
        
        public Form1()
        {
            InitializeComponent();

            con = new OracleConnection("User Id=xxxx;Password=xxxx;Data Source=XE;");
        }

//中略

        private void ProcessStart_Click(object sender, EventArgs e)
        {
            foreach (String selected in SampleList.Items)
            {
                System.IO.FileInfo fi = new System.IO.FileInfo(@"C:\test\sample.tif");
                string folder = selected.Substring(selected.Length - 3, 3);

                try
                {
                    System.IO.FileInfo copyFile =
                    fi.CopyTo(@"D:\{0}\{1}.tif".Replace("{0}", folder).Replace("{1}", selected));

                    var update = @"UPDATE T1
                                      SET C1 = 4
                                        , C2 = 1
                                        , C3 = 0
                                    WHERE C0 IN (SELECT MAX(C0) FROM T1 GROUP BY C1)
                                      AND C1 IN ({0})"
                                 .Replace("{0}", selected);
                    con.Open();
                    trn = con.BeginTransaction();

                    con.Execute(update);
                    trn.Commit();
                    con.Close();
                }
                catch (System.IO.IOException)
                {
                    if (MessageBox.Show
                   ("C1：{0}\r\n画像が既に存在しています。\r\n上書きしますか？"
                    .Replace("{0}",selected), ""
                    ,MessageBoxButtons.YesNo, MessageBoxIcon.Question) 
                      == DialogResult.Yes)
                    {
                        System.IO.FileInfo copyFile =
                        fi.CopyTo(@"D:\{0}\{1}.tif"
                        .Replace("{0}", folder)
                        .Replace("{1}", selected),true);

	                    var update = @"UPDATE T1
	                                      SET C1 = 4
	                                        , C2 = 1
	                                        , C3 = 0
	                                    WHERE C0 IN (SELECT MAX(C0) FROM T1 GROUP BY C1)
	                                      AND C1 IN ({0})"
	                                 .Replace("{0}", selected);
	                    con.Open();
	                    trn = con.BeginTransaction();

	                    con.Execute(update);
	                    trn.Commit();
	                    con.Close();
                    }
                    else
                    {
                    }
                }
            }
            SampleList.Items.Clear();
        }
    }
}

以下停止箇所の画像です。
![NativeFrame]WIDTH:600

Answer 1

int result = cmd.ExecuteNonQuery();の部分で止まるのであればODAC側で例外が発生していると思われます。
停止時にダイアログ等表示されていませんか？
また、プロジェクトのデバッグの設定で「アンマネージコードデバッグを有効にする」にチェックが入っていませんか？
「ネイティブフレームが呼び出し履歴の最初にあるため、式を評価できません」に関しては私の環境では再現できませんでした。

直接関係ありませんがコードで気になった点があったので少し書きなおしてみました。

private void ProcessStart_Click(object sender, EventArgs e)
{
    foreach (String selected in SampleList.Items)
    {
        // using System.IO;追加して記述を整理
        try
        {
            var fi = new FileInfo(@"C:\test\sample.tif");
            string folder = selected.Substring(selected.Length - 3, 3);

            // ファイルの存在有無は例外ではなくFile.Existsを使用
            // ファイル操作とDB操作は分離して記述
            // 文字列の置換はstring.Formatを利用
            if (File.Exists(string.Format(@"D:\{0}\{1}.tif",folder, selected)))
            {
                if (MessageBox.Show
               (this, string.Format(
               "C1：{0}\r\n画像が既に存在しています。\r\n上書きしますか？"
                , selected), ""
                , MessageBoxButtons.YesNo, MessageBoxIcon.Question)
                  == DialogResult.Yes)
                {
                    FileInfo copyFile =
                    fi.CopyTo(string.Format(@"D:\{0}\{1}.tif", folder, selected)
                    , true);
                }
                else
                {
                    // 上書きしないなら次のselectedに
                    continue;
                }
            }
            else
            {
                FileInfo copyFile =
                fi.CopyTo(string.Format(@"D:\{0}\{1}.tif", folder, selected));
            }
        }
        catch (IOException e)
        {
            MessageBox.Show(this, e.ToString());
        }

        try
        {
            // 名前付きパラメータを利用
            var update = @"UPDATE T1
                                  SET C1 = 4
                                    , C2 = 1
                                    , C3 = 0
                                WHERE C0 IN (SELECT MAX(C0) FROM T1 GROUP BY C1)
                                  AND C1 IN (:Selected)";
            con.Open();
            trn = con.BeginTransaction();

            con.Execute(update, new {Selected=selected });
            trn.Commit();
            con.Close();
        }
        catch (OracleException oe)
        {
            MessageBox.Show(this, oe.ToString());
        }
        finally
        {
            if (con != null)
                con.Close();
        }

    }
    SampleList.Items.Clear();
}

Comments

[KentaYanagida]

sho_cs様、いつもありがとうございます。
コードレビューまで頂き感激です。とても勉強になります。
参考に修正させて頂きました。

停止時にはダイアログは出ず、放っておけば処理も実行されるようです。
「アンマネージコードデバッグを有効にする」のチェックも入っておりませんでした。

ODAC側の例外であったり、sho_cs様の環境で再現しないようであれば、私の環境を疑ったほうが良さそうですね…。

[KentaYanagida]

使用するOracleDBと、UPDATE文の簡略化を行った所、正常に処理が完了しました。
Oracle側の問題のようですので、DBAと相談致します。

この度も誠にありがとうございました。
よろしければ今後ともよろしくお願い致します。