|
// *********************************************************
// コンストラクタ
// *********************************************************
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 );
// プログラムID
Dlg->EditSetText( IDC_PROGID, "HM210" );
// 項目属性設定
}
App_51::App_51()
{
}
App_51::~App_51()
{
}
// *********************************************************
// 選択行をチェック
// *********************************************************
void App_51::SelectCheck( void )
{
int nRow;
nRow = -1;
while( Lv->FindNextSelectedRow( &nRow ) ) {
Lv->SetCheck( nRow, true );
}
}
// *********************************************************
// 選択行のチェックを外す
// *********************************************************
void App_51::SelectCheckOff( void )
{
int nRow;
nRow = -1;
while( Lv->FindNextSelectedRow( &nRow ) ) {
Lv->SetCheck( nRow, false );
}
}
// *********************************************************
// 削除
// *********************************************************
BOOL App_51::DeleteData( void )
{
if ( !CurDb->Connect() ) {
Dlg->MsgOk("データベースの接続に失敗しました ");
return false;
}
int nRow;
BOOL bExist;
bExist = false;
nRow = -1;
Buff->operator = ("delete from 商品分類マスタ where 商品分類 = ");
while( Lv->FindNextSelectedRow( &nRow ) ) {
if ( Lv->GetCheck( nRow ) ) {
bExist = true;
Query->operator = (Buff);
Lv->GetColumnText( 1, Item );
Item->Enclose( "'" );
Query->operator += (Item);
if ( !(CurDb->Query( Query )) ) {
Dlg->MsgOk("データベースの更新に失敗しました ");
CurDb->DisConnect();
return false;
}
}
}
CurDb->DisConnect();
if ( !bExist ) {
Dlg->MsgOk("対象データが存在しません ");
return false;
}
return true;
}
// *********************************************************
// 問合せ実行
// *********************************************************
BOOL App_51::DataRequest( void )
{
BOOL bRet;
bRet = true;
if ( !CurDb->Connect() ) {
Dlg->MsgOk("データベースの接続に失敗しました ");
return false;
}
Query->operator = ("select * from 商品分類マスタ");
Dlg->EditGetText( IDC_COND, Item );
Item->Trim(" ");
if ( Item->operator != ("") ) {
Item->Enclose( "%" );
Item->Enclose( "'" );
Query->operator += (" where 名称 like ");
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 );
Lv->Fit();
Lv->Show();
CurDb->DisConnect();
return bRet;
}
| |