コード名称マスタメンテ


  App_51.cpp



ここでは、更新処理を実装していません。


  
// *********************************************************
// コンストラクタ
// *********************************************************
App_51::App_51( HWND hDlg, LboxListview *Lview )
{

	Lv = Lview;

	// ダイアログオブジェクト作成
	Dlg = new LboxDlg( hDlg );
	Dlg->ChangeStyle( WS_MINIMIZEBOX | WS_SYSMENU, 0 );
	Dlg->ChangeExStyle( WS_EX_APPWINDOW, 0 );
	Dlg->StatusCreate( 0 );

	// 区分
	Kubun = new LboxCombobox( Dlg->GetHandle(IDC_KUBUN) );
	Kubun->ChangeWindowSize( 
		Kubun->Width(),
		300
	);
	if ( !CurDb->Connect() ) {
		Dlg->MsgOk("データベースの接続に失敗しました    ");
	}
	else {
		Query->operator = (
			"select distinct 区分,区分 from コード名称マスタ"
			" order by 区分"
		);
		CurDb->LoadSqlData( Kubun, Query );
		CurDb->DisConnect();
		Kubun->Insert( 0, "", "" );
	}

	// プログラムID
	Dlg->EditSetText( IDC_PROGID, "HM220" );

	// 項目属性設定

}

App_51::App_51()
{

}

App_51::~App_51()
{

}

// *********************************************************
// 行追加
// *********************************************************
void App_51::AddRow( void )
{
	Lv->InsertRow( 0 );
	Kubun->SelectedGetData( Item );
	Lv->SetColumnText( 1, Item );
	Lv->SetImage( 0, 0, 1 );
}

// *********************************************************
// 更新
// *********************************************************
BOOL App_51::UpdateData( void )
{
	return true;
}

// *********************************************************
// 問合せ実行
// *********************************************************
BOOL App_51::DataRequest( void )
{
	BOOL bRet;

	bRet = true;

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

	Query->operator = (
		"select 区分,コード,名称,数値1,数値2"
		" from コード名称マスタ"
	);
	Item->SetChar( 0, 0 );
	Kubun->SelectedGetData( Item );
	if ( Item->operator != ("") ) {
		Query->operator += (" where 区分 = ");
		Query->operator += (Item);
	}
	if ( Column->operator == ( "" ) ) {
		Query->operator += (" order by 区分,コード");
	}
	else {
		Query->operator += (" order by ");
		Query->operator += (Column);
	}

	Lv->Hide();
	CurDb->LoadSqlData( Lv, 1 , Query );

	int nRow;
	nRow = -1;
	while( Lv->FindNextRow( &nRow ) ) {
		Lv->SetImage(
			Lv->nCurrentRow,
			0,
			0
		);
	}
	Lv->Fit();
	Lv->SetColumnWidth( 0, 16 );
	Lv->Show();

	CurDb->DisConnect();

	return bRet;
}
  










  infoboard   管理者用   
このエントリーをはてなブックマークに追加





フリーフォントWEBサービス
SQLの窓WEBサービス

SQLの窓フリーソフト

素材

一般WEBツールリンク

SQLの窓

フリーソフト

JSライブラリ