開発のあいまに

Crystal Reports でユーザー設定用紙の印刷を行う場合。

Crystal Reports が標準でサポートしている用紙サイズ以外に、ユーザーが独自に設定した用紙サイズ（11×5 ｲﾝﾁ など）で印刷する場合、対象の端末全てに用紙サイズを登録しますが、Crystal Reports の場合、それだけでは実現できません。

Crystal Reports は用紙設定を「11×5 ｲﾝﾁ」などの名称で保持せず、インデックス化して保持し、また、そのインデックスはＰＣ毎に異なる為、Crystal Reports を実行したＰＣから、必要な用紙サイズのインデックスを、取得する必要があります。

その為の共通メソッドを作りました。このメソッドのreturn値を、Crystal Reports の PaperSize に設定すれば、ＰＣによって用紙サイズが変わるといったバグは解決できます。

 

１、このメソッドを実装する際に必要となる参照設定はこの辺です。 

using System;
using System.Collections.Generic;
using System.Text;
using System.Drawing.Printing;
using System.Windows.Forms;
using System.Reflection;
using System.Data;
using System.IO;

 

２、これがメソッドの実態です。 

public static int GetPaperSize(string strPrinterName, string strPaperName)
{
 PrintDocument doctoprint = new PrintDocument();
 doctoprint.PrinterSettings.PrinterName = strPrinterName;

 int rawKind = 0;
 for (int i = 0; i < doctoprint.PrinterSettings.PaperSizes.Count; i++)
 {
  if (doctoprint.PrinterSettings.PaperSizes[i].PaperName.Equals(strPaperName) == false)
   continue;

  rawKind = Convert.ToInt32(doctoprint.PrinterSettings.PaperSizes[i].GetType()
   .GetField("kind", BindingFlags.NonPublic | BindingFlags.Instance)
   .GetValue(doctoprint.PrinterSettings.PaperSizes[i]));

  break;
 }

 return rawKind;
}

 

３、このメソッドのreturn値を使うには、(CrystalDecisions.Shared.PaperSize)でキャストする必要があります。

CrystalReport1 MyReport = new CrystalReport1();
MyReport.PrintOptions.PaperSize = (CrystalDecisions.Shared.PaperSize)GetPaperSize("LBP4500", "11×5 ｲﾝﾁ");

C#上でパスを追加する。

アプリケーションのサイズが大きくなって来ると、複数のEXEを設け、複数のフォルダに分散させたりしますが、その際、カレントフォルダに無いDLLを参照していると、実行時に参照エラーになったりします。

それを解決するには、DLLのあるフォルダへ、C#上からパスを通してあげる必要があります。
以下のコードは、現在のパスに「C:\Next\CRM\bin」フォルダをパスとして追加しています。

Environment.SetEnvironmentVariable("Path", Environment.GetEnvironmentVariable("Path") + @";C:\Next\CRM\bin");

Visual Studio 2010 で作成したDateSetの、Insertメソッドが参照できない。

Visual Studio 2008 で作成していたDataSetを纏めたDLL作成用のプロジェクトを、Visual Studio 2010 に移行したら、WCF用のプロジェクトから、Insert、Update、Delete系のメソッドが全て参照できなくなりました。

結構悩んだのですが、DataSet側のプロジェクトで、対応フレームワークを「.Net Framework 3.5」から「.Net Framework 4」に変更し、リビルドしたらInsert、Update、Delete系のメソッドが全て参照できるようになりました。

Visual Studio 2010 の開発では「.Net Framework 4」をベースにするのが、無難かも知れません。

.Net Framework におけるスタックとヒープ

スタックとヒープについてザックリ表現すると、スタックで書かれたプログラムはメモリー上に保持され、ヒープで書かれたプログラムはハードディスクに保持される。という違いがあります。

ハードディスクに比べて、メモリーの処理速度は十倍から百倍くらい速いので、ヒープで書かれたプログラムより、スタックで書かれたプログラムは、十倍から百倍くらい速いと言えます。

VCや、VC++で開発していた10年位前は、可能な限りスタックで処理することを、シビアに求められていましたが、.Net Framework が主流になってからは、あまり聞かなくなりました。

しかし、スタックとヒープの概念は、最新版の .Net Framework にも存在しているので、スタックの力を上手く引き出せば、高速なアプリケーションを開発する事ができます。

スタックを使っているかどうかで、「あの人の作るプログラムは速い！」と言われるか、「あいつのプログラムは遅い！」と言われる違いを生みますので、プロフェッショナル・プログラマーを目指す方には、必須の知識だと言えます。

スタックプログラムをC#で記述する場合、定数と共通処理が対象となり、static class（静的クラス）で表現します。
何度も呼ばれる処理を、静的クラスで定義する事で、プログラムのパフォーマンスを改善するのは、プロフェッショナル・プログラマーの定石だと言えます。

C#で例を示しますが、VB.NETでも同様です。

1.静的クラスで記述した定数の、具体的なソースを以下に示します。

【定義例】
public static class C_画面最小サイズ
{
    public const int メイン_縦 = 768;
    public const int メイン_幅 = 1024;
}

【使用例】
int a = C_画面最小サイズ.メイン_縦;

2.静的クラスで記述した共通処理の、具体的なソースを以下に示します。

【定義例】
public static class C02業務共通処理
{
    private static string CSV規定書式変換(string field)
    {
        string ret = field;
        if ((field.IndexOf('"') > -1)
            || (field.IndexOf(',') > -1)
            || (field.IndexOf('\r') > -1)
            || (field.IndexOf('\n') > -1)
            || (field.StartsWith(" "))
            || (field.StartsWith("\t"))
            || (field.EndsWith(" "))
            || (field.EndsWith("\t")))
        {
            if (field.IndexOf('"') > -1)
            {
                //"を""とする
                ret = field.Replace("\"", "\"\"");
            }

            ret = "\"" + field + "\"";
        }

        return ret;
    }
}

【使用例】
string value = CSV規定書式変換(grid.Columns[iCol].HeaderText);

スタックが静的クラスなのに対して、ヒープは動的クラスで記述します。
動的クラスは、new メソッドでインスタンスを生成しないと、使用できないのが特徴です。
フォームのように、static が宣言されていない class は全て動的クラスです。

動的クラスで記述されたフォームの具体的なソースを以下に示します。

【使用例】
_502スタッフ詳細 _502スタッフ詳細 = null;
_502スタッフ詳細 = new _502スタッフ詳細();
_502スタッフ詳細.ShowDialog();

DropDownStyleのComboBoxを使う場合

DropDownStyleのComboBoxを使う場合、ComboBoxのLostFocusイベントに以下のロジックを加えておくと、ユーザーがリストに存在しない値を入力する事が無くなるので便利。

  private void ComboBoxLostFocus(object sender, EventArgs e)
  {
   if (((ComboBox)sender).Text.Length > 0)
   {
    if (((ComboBox)sender).FindStringExact(((ComboBox)sender).Text) < 0)
    {
     MessageBox.Show("入力した値は、リストにありません。", "コンボボックス"
      , MessageBoxButtons.OK, MessageBoxIcon.Error);

     ((ComboBox)sender).Focus();
    }
   }
  }

WCF開発で、まずは一本通す。

WCFベースで開発する際、まずは一本通して、それを横展開する事になると思います。

一本通すまでの、もっともスマートなやり方はこちらです。　

※Visual Studio 2008 Pro を使っていますが、他も基本は同じです。

　

１、「新規作成　⇒　プロジェクト」で「WCF サービス ライブラリ」を選択。

　プロジェクト名を「WcfService」とします。

　スケルトンとして、IService1サービスにGetDataメソッドが自動で作られるので、まずはGetDataメソッドに対して一本通します。

　

２、「コントロールパネル　⇒　管理ツール　⇒　インターネット インフォメーション サービス」を立ち上げ、仮想ディレクトリを新規作成し、物理パスを「WcfService」プロジェクトフォルダに設定。

　Internet Explorer で「http://localhost/WcfService/Service1.svc」へアクセスし、「Service1 サービス」画面が表示されれば、WCFサーバーサイドの準備は完了です。

 

　

　

１、「新規作成　⇒　プロジェクト」で「Windows フォーム アプリケーション」を選択。

　プロジェクト名を「WcfClient」とします。

２、「ソリューション エクスプローラ　⇒　WcfClient　⇒　参照設定」を右クリックし、「サービス参照の追加」を選択。

３、「サービス参照の追加」画面で、アドレスに「http://localhost/WcfService/Service1.svc」を入力し「OK」を選択。

４、フォームにボタンを追加し、ボタン押下イベントに以下のコードを記述します。

ServiceReference1.Service1Client client = new ServiceReference1.Service1Client();
int intInput = 100;
string strReturn = null;

strReturn = client.GetData(intInput);

５、「WcfClient」をデバッグ実行し、フォームのボタンを押下。

　「strReturn」変数に、"You entered: 100"　が入ればＯＫです。

　

これで、一本通った事になるので、あとはGetDataメソッドを横展開して行けばすみます。

「WCF 簡単クッキング」でした！

　

「ASP.NET Web サービス アプリケーション」よりも「WCF サービス ライブラリ」の方がパフォーマンスは優れていて、コーディング量はほとんど変わらないので、今後、新しく立ち上げるWeb サービスでは、WCFを採用することをお勧めします。

VB.NET ではなく C# で開発するメリット。

VB.NET のコンパイルオプションにある「Option Explicit」「Option Strict」「Option Inger」を全て「On」に設定した場合にチェックされる内容より、C# でコンパイルした際にチェックされる内容の方が厳しいので、コンパイル段階で発見できるバグの量と、それに伴うコンパイルの最適化という点で、C#の方が優れている。

VB.NET で作られたソースを、C#に移植した場合、VB.NETでは警告さえ出なかったバグでも、C#側ではコンパイルエラーになったりする。

C#サンプル：DLLから環境設定を読み込む。

exeが読み込んだ環境設定を、dll側で利用したい事があります。

exeからdllへ、パラメータで渡す方法もありますが、.Net2.0からでは、exeが読み込んだ環境設定を、dllから直接参照できるようになっています。

private string GetSystemMessage = System.Configuration.ConfigurationSettings.AppSettings["Comment"]

C#サンプル：CurrentUICulture にニュートラルカルチャーを設定する。

//コンボボックスにニュートラルカルチャーをリストアップ。
CultureInfo[] cultures = CultureInfo.GetCultures(CultureTypes.NeutralCultures);
cmb言語.DataSource = cultures;
cmb言語.DisplayMember = "DisplayName";
cmb言語.Text = Application.CurrentCulture.Parent.DisplayName;

//コンボボックスで「日本語」を初期選択状態にする。
CultureInfo culture = new CultureInfo("ja", true);
cmb言語.Text = culture.DisplayName;

//フォームを表示して、コンボボックスから対象の言語を選択。

//選択されたニュートラル言語をCurrentUICultureに設定する。
CultureInfo culture = (CultureInfo)cmb言語.SelectedItem;
Thread.CurrentThread.CurrentUICulture = new CultureInfo(culture.Name, true);

SQLServer 2005 インデックス チューニング ライフサイクル

１、コーディングされているSelect文を全て、Management Studio のクエリエディタに貼り付ける。

２、ツールバーの「データベース エンジン チューニング アドバイザでのクエリの分析」アイコンをクリックして、「データベース エンジン チューニング アドバイザ」画面を開く。

 

３、「データベース エンジン チューニング アドバイザ」画面では、クエリエディタに記入したSQLのチューニング設定が初期値として入力済みになっている。

４、必要であれば「チューニング オプション」の内容を変更。

５、ツールバーにある「分析の開始」アイコンをクリックして開始。

６、分析対象のデータベースサイズが小さ過ぎたり、大き過ぎたりすると、「ワークロードを使用しています」タスクでエラーになる。その場合は、「チューニング オプション　⇒　詳細設定オプション　⇒　推奨インデックス用の最大領域を定義する」にチェックを付け、実際のＤＢサイズを入力し、再度「分析の開始」アイコンをクリック。

７、分析結果として登録した方が良いインデックスが、「推奨インデックス」にリストアップされるので、全てのインデックスと統計情報を、クエリエディタ画面で実行する。

８、インデックスと統計情報を追加したら、その対象となったテーブルに、sp_recompile を実行する。

InsertやUpdateが遅くならないようにインデックスを張らない方が良いものはないか気になりますが、実験した結果では、推奨される全てのインデックスを張った場合、InsertやUpdateは少し遅くなりますが、Select文は圧倒的に速くなり、トランザクション全体の処理時間が改善するので、何も考えずに全て適用してしまうのが一番です。

ただ、テラバイトクラスのDBの場合は、1つのインデックスを追加しただけで、100GB消費することは有りますので、ディスク容量は考慮した方が良いです。

また、不要なインデックスが増えないように、6ヶ月以上使われていないインデックスを抽出するSQLを定期的に実施た方が良いです。

それと、インデックスと統計情報を追加しても、ストアドが古い実行プランをキャッシュしたままになっている事がありますので、SQLServerで、IISからのDB処理だけが遅い場合は、ストアドをリコンパイルする こともにも、注意が必要です。

 

【関連記事】
チューニングアドバイザーによる、インデックスと統計情報の抽出と追加
テーブルの統計情報を、週次で更新
ストアドとファンクションを、日次のジョブで毎朝リコンパイル
IISと関連サービスを、日次で毎朝再起動。
IISと関連サービスからのDB処理が、極端に遅くなるストアド、ファンクションは、使用するインデックスをヒント文で固定する
SQLServerで、IISからのDB処理だけが遅い場合は、ストアドをリコンパイルする
SQLServer 2005 インデックス チューニング ライフサイクル
6ヶ月以上使われていないインデックスを抽出するSQL