// *********************************************************
// HEAD 部チェック
// *********************************************************
BOOL App_01::HeadCheck( void )
{
	// 商品分類取得
	Dlg->EditGetText( IDC_KEY, Item );
	Item->Trim( " 　" );

	// 商品分類未入力チェック
	if ( Item->operator == ("") ) {
		Dlg->EditSetText( IDC_KEY, "" );
		Dlg->EditFocus( IDC_KEY );

		GetMessageString( "1001" );
		Dlg->MsgOk(Message);
		return false;
	}

	// 商品分類桁数チェック
	if ( Item->Length() != 3 ) {
		Dlg->EditFocus( IDC_KEY );

		GetMessageString( "1002" );
		Dlg->MsgOk(Message);
		return false;
	}

	// DB接続
	if ( !(CurDb->Connect()) ) {
		Dlg->MsgOk("データベースの接続に失敗しました　　　　");
		return false;
	}	

	// 商品分類データチェック
	Query->operator = ("select * from 商品分類マスタ where 商品分類 = ");
	Item->Enclose( "'" );
	Query->operator += (Item);
	// 存在する
	if ( CurDb->Query( Query ) ) {
		Dlg->EditFocus( IDC_KEY );

		GetMessageString( "0001" );
		Dlg->MsgOk(Message);
		return false;
	}

	// DB切断
	CurDb->DisConnect();

	return true;
}