database.cpp

主要功能 商品销售管理系统属于小型的进销存管理系统

			sprintf(m_szSql, "select * from tb_sell_sub where SellID = '%s'", CancelID) ;
			m_Rsp1 = m_Connection->Execute(_bstr_t(m_szSql), &v, adCmdText) ;
			if(!m_Rsp1->GetadoEOF())
			{
				v = m_Rsp1->GetCollect("merchandiseID") ;
				m_hEditMerchandiseID->SetWindowText(_bstr_t(v)) ;
				
				v = m_Rsp1->GetCollect("unitPrice") ;
				m_hEditUnitPrice->SetWindowText(_bstr_t(v)) ;
				
				v = m_Rsp1->GetCollect("numbers") ;
				m_hEditNumbers->SetWindowText(_bstr_t(v)) ;
				
				v = m_Rsp1->GetCollect("stockname") ;
				m_hEditStockName->SetWindowText(_bstr_t(v)) ;
			}

			m_Rsp->MoveNext() ;
		}
	}
	catch(_com_error & e) 
	{
		char m_szTmp[1024] ;
		sprintf(m_szTmp, "执行==>%s<==, 数据库操作失败,错误原因：%s\n",m_szSql, LPCTSTR(e.Description()));
	}

}

void CDatabase::ListCancelInStockToCtrl(CListCtrl *m_hListCtrl)
{
	m_hListCtrl->DeleteAllItems() ;

	_variant_t v(0L) ;
	_RecordsetPtr m_Rsp ;
	char m_szSql[512] ;
	sprintf(m_szSql, "select * from tb_cancelinstock_main a, tb_cancelinstock_sub b where a.CancelID = b.CancelID") ;
	try{
		
			
		m_Rsp = m_Connection->Execute(_bstr_t(m_szSql), &v, adCmdText) ;
		while(!m_Rsp->GetadoEOF())
		{
			m_hListCtrl->InsertItem(0, "") ;

			v = m_Rsp->GetCollect("CancelID") ;
			m_hListCtrl->SetItemText(0, 0, _bstr_t(v)) ;

			v = m_Rsp->GetCollect("Provider") ;
			m_hListCtrl->SetItemText(0, 1, _bstr_t(v)) ;

			v = m_Rsp->GetCollect("operator") ;
			m_hListCtrl->SetItemText(0, 2, _bstr_t(v)) ;

			v = m_Rsp->GetCollect("rebate") ;
			m_hListCtrl->SetItemText(0, 3, _bstr_t(v)) ;

			v = m_Rsp->GetCollect("sumtotal") ;
			m_hListCtrl->SetItemText(0, 4, _bstr_t(v)) ;

			v = m_Rsp->GetCollect("paymoney") ;
			m_hListCtrl->SetItemText(0, 5, _bstr_t(v)) ;

			v = m_Rsp->GetCollect("factmoney") ;
			m_hListCtrl->SetItemText(0, 6, _bstr_t(v)) ;

			v = m_Rsp->GetCollect("stockname") ;
			m_hListCtrl->SetItemText(0, 7, _bstr_t(v)) ;

			v = m_Rsp->GetCollect("merchandiseID") ;
			m_hListCtrl->SetItemText(0, 8, _bstr_t(v)) ;

			v = m_Rsp->GetCollect("unitPrice") ;
			m_hListCtrl->SetItemText(0, 9, _bstr_t(v)) ;

			v = m_Rsp->GetCollect("numbers") ;
			m_hListCtrl->SetItemText(0, 10, _bstr_t(v)) ;

			v = m_Rsp->GetCollect("paymoney") ;
			m_hListCtrl->SetItemText(0, 11, _bstr_t(v)) ;

			v = m_Rsp->GetCollect("intime") ;
			m_hListCtrl->SetItemText(0, 12, _bstr_t(v)) ;

			m_Rsp->MoveNext() ;
		}
	}
	catch(_com_error & e) 
	{
		char m_szTmp[1024] ;
		sprintf(m_szTmp, "执行==>%s<==, 数据库操作失败,错误原因：%s\n",m_szSql, LPCTSTR(e.Description()));
	}
}

void CDatabase::UpdateCancelInStockData(char *CancelID,char *Provider,char *ooperator,char *rebate,char *sumtotal,char *paymoney,char *factmoney,char *intime,char *merchandiseID,char *unitPrice,char *numbers,char *stockname)
{
	char m_szSql[512] ;
	_variant_t v(0L) ;
	sprintf(m_szSql, "select * from tb_cancelinstock_main where CancelID = '%s'", CancelID) ;
	_RecordsetPtr m_Rsp ;
	try{
		m_Rsp = m_Connection->Execute(_bstr_t(m_szSql), &v, adCmdText) ;
		if(!m_Rsp->GetadoEOF())
		{//存在数据，更新
			sprintf(m_szSql, "update tb_cancelinstock_main set Provider = '%s', \
				operator = '%s', rebate = %s, sumtotal = %s, paymoney = %s, \
				factmoney = %s, intime = '%s' where CancelID = '%s'", 
				Provider,ooperator,rebate,sumtotal,paymoney,factmoney, intime, CancelID) ;
			m_Connection->Execute(_bstr_t(m_szSql), &v, adCmdText) ;

			sprintf(m_szSql, "update tb_cancelinstock_sub set merchandiseID = '%s', \
				unitPrice = %s, numbers = %s, rebate = %s, paymoney = %s, \
				stockname = '%s' where CancelID = '%s'", 
				merchandiseID,unitPrice,numbers,rebate,paymoney,stockname, CancelID) ;
			m_Connection->Execute(_bstr_t(m_szSql), &v, adCmdText) ;
		}
		else
		{//不存在数据，增加
			sprintf(m_szSql, "insert into tb_cancelinstock_main (Provider, operator,rebate,sumtotal,paymoney,factmoney, intime, CancelID) \
				values ('%s', '%s', '%s', %s, %s, %s, '%s','%s')" ,Provider,ooperator,rebate,sumtotal,paymoney,factmoney, intime, CancelID) ;
			m_Connection->Execute(_bstr_t(m_szSql), &v, adCmdText) ;

			sprintf(m_szSql, "insert into tb_cancelinstock_sub (merchandiseID,unitPrice,numbers,rebate,paymoney,stockname, CancelID) \
				values ('%s', %s, '%s', '%s', %s, '%s', '%s')" ,merchandiseID,unitPrice,numbers,rebate,paymoney,stockname, CancelID) ;
			m_Connection->Execute(_bstr_t(m_szSql), &v, adCmdText) ;
		}
	}
	catch(_com_error & e) 
	{
		char m_szTmp[1024] ;
		sprintf(m_szTmp, "执行==>%s<==, 数据库操作失败,错误原因：%s\n",m_szSql, LPCTSTR(e.Description()));
	}
}

void CDatabase::EditCancelInStockToCtrl( CDateTimeCtrl* date,char *CancelID, CEdit *m_hEditCancelID, CEdit *m_hEditUnitPrice, CEdit *m_hEditSumTotal, CEdit *m_hEditStockName, CEdit *m_hEditRebate, CEdit *m_hEditPayMoney, CEdit *m_hEditOperator, CEdit *m_hEditNumbers, CEdit *m_hEditMerchandiseID, CEdit *m_hEditFactMoney, CEdit *m_hEditProvider)
{
	_variant_t v(0L) ;
	_RecordsetPtr m_Rsp, m_Rsp1 ;
	char m_szSql[512] ;
	sprintf(m_szSql, "select * from tb_cancelinstock_main where CancelID = '%s'", CancelID) ;
	try{
		
		m_Rsp = m_Connection->Execute(_bstr_t(m_szSql), &v, adCmdText) ;
		while(!m_Rsp->GetadoEOF())
		{
			v = m_Rsp->GetCollect("CancelID") ;
			m_hEditCancelID->SetWindowText(_bstr_t(v)) ;

			v = m_Rsp->GetCollect("Provider") ;
			m_hEditProvider->SetWindowText(_bstr_t(v)) ;

			v = m_Rsp->GetCollect("operator") ;
			m_hEditOperator->SetWindowText(_bstr_t(v)) ;

			v = m_Rsp->GetCollect("rebate") ;
			m_hEditRebate->SetWindowText(_bstr_t(v)) ;
			
			v = m_Rsp->GetCollect("sumtotal") ;
			m_hEditSumTotal->SetWindowText(_bstr_t(v)) ;

			v = m_Rsp->GetCollect("intime");
			CString temp;
		    temp.Format(_bstr_t(v));


			v = m_Rsp->GetCollect("paymoney") ;
			m_hEditPayMoney->SetWindowText(_bstr_t(v)) ;

			v = m_Rsp->GetCollect("factmoney") ;
			m_hEditFactMoney->SetWindowText(_bstr_t(v)) ;

			sprintf(m_szSql, "select * from tb_cancelinstock_sub where CancelID = '%s'", CancelID) ;
			m_Rsp1 = m_Connection->Execute(_bstr_t(m_szSql), &v, adCmdText) ;
			if(!m_Rsp1->GetadoEOF())
			{
				v = m_Rsp1->GetCollect("merchandiseID") ;
				m_hEditMerchandiseID->SetWindowText(_bstr_t(v)) ;
				
				v = m_Rsp1->GetCollect("unitPrice") ;
				m_hEditUnitPrice->SetWindowText(_bstr_t(v)) ;
				v = m_Rsp1->GetCollect("rebate") ;
				m_hEditRebate->SetWindowText(_bstr_t(v)) ;				
				v = m_Rsp1->GetCollect("numbers") ;
				m_hEditNumbers->SetWindowText(_bstr_t(v)) ;
				
				v = m_Rsp1->GetCollect("stockname") ;
				m_hEditStockName->SetWindowText(_bstr_t(v)) ;
			}

			m_Rsp->MoveNext() ;
		}
	}
	catch(_com_error & e) 
	{
		char m_szTmp[1024] ;
		sprintf(m_szTmp, "执行==>%s<==, 数据库操作失败,错误原因：%s\n",m_szSql, LPCTSTR(e.Description()));
	}
}


void CDatabase::ListProviderPayToCtrl(CListCtrl *m_hListCtrl)
{
	m_hListCtrl->DeleteAllItems() ;

	_variant_t v(0L) ;
	_RecordsetPtr m_Rsp ;
	char m_szSql[512] ;
	sprintf(m_szSql, "select * from tb_providerpay") ;
	try{
		
		m_Rsp = m_Connection->Execute(_bstr_t(m_szSql), &v, adCmdText) ;
		while(!m_Rsp->GetadoEOF())
		{
			m_hListCtrl->InsertItem(0, "") ;

			v = m_Rsp->GetCollect("PayID") ;
			m_hListCtrl->SetItemText(0, 0, _bstr_t(v)) ;

			v = m_Rsp->GetCollect("Provider") ;
			m_hListCtrl->SetItemText(0, 1, _bstr_t(v)) ;

			v = m_Rsp->GetCollect("checker") ;
			m_hListCtrl->SetItemText(0, 2, _bstr_t(v)) ;

			v = m_Rsp->GetCollect("paymoney") ;
			m_hListCtrl->SetItemText(0, 3, _bstr_t(v)) ;

			v = m_Rsp->GetCollect("paytime") ;
			m_hListCtrl->SetItemText(0, 4, _bstr_t(v)) ;

			m_Rsp->MoveNext() ;
		}
	}
	catch(_com_error & e) 
	{
		char m_szTmp[1024] ;
		sprintf(m_szTmp, "执行==>%s<==, 数据库操作失败,错误原因：%s\n",m_szSql, LPCTSTR(e.Description()));
	}

}

void CDatabase::UpdateProviderPayData(char *PayID, char *Provider, char *Checker, char *PayMoney, char *PayTime)
{
	char m_szSql[512] ;
	_variant_t v(0L) ;
	sprintf(m_szSql, "select * from tb_providerpay where PayID = '%s'", PayID) ;
	_RecordsetPtr m_Rsp ;
	try{
		m_Rsp = m_Connection->Execute(_bstr_t(m_szSql), &v, adCmdText) ;
		if(!m_Rsp->GetadoEOF())
		{//存在数据，更新
			sprintf(m_szSql, "update tb_providerpay set Provider = '%s', \
				Checker = '%s', paymoney = %s where PayID = '%s'", 
				Provider,Checker,PayMoney,PayID) ;
			m_Connection->Execute(_bstr_t(m_szSql), &v, adCmdText) ;
		}
		else
		{//不存在数据，增加
			sprintf(m_szSql, "insert into tb_providerpay (Provider,Checker,PayMoney,PayID, PayTime) \
				values ('%s', '%s', %s, '%s', '%s')" ,Provider,Checker,PayMoney,PayID, PayTime) ;
			m_Connection->Execute(_bstr_t(m_szSql), &v, adCmdText) ;
		}
	}
	catch(_com_error & e) 
	{
		char m_szTmp[1024] ;
		sprintf(m_szTmp, "执行==>%s<==, 数据库操作失败,错误原因：%s\n",m_szSql, LPCTSTR(e.Description()));
	}

}

void CDatabase::EditProviderPayToCtrl(char *PayID, CEdit *m_hEditPayID, CEdit *m_hEditProvider, CEdit *m_hEditChecker, CEdit *m_hEditPayMoney)
{
	_variant_t v(0L) ;
	_RecordsetPtr m_Rsp, m_Rsp1 ;
	char m_szSql[512] ;
	sprintf(m_szSql, "select * from tb_providerpay where PayID = '%s'", PayID) ;
	try{
		
		m_Rsp = m_Connection->Execute(_bstr_t(m_szSql), &v, adCmdText) ;
		while(!m_Rsp->GetadoEOF())
		{
			v = m_Rsp->GetCollect("PayID") ;
			m_hEditPayID->SetWindowText(_bstr_t(v)) ;

			v = m_Rsp->GetCollect("Provider") ;
			m_hEditProvider->SetWindowText(_bstr_t(v)) ;

			v = m_Rsp->GetCollect("checker") ;
			m_hEditChecker->SetWindowText(_bstr_t(v)) ;

			v = m_Rsp->GetCollect("paymoney") ;
			m_hEditPayMoney->SetWindowText(_bstr_t(v)) ;

			m_Rsp->MoveNext() ;
		}
	}
	catch(_com_error & e) 
	{
		char m_szTmp[1024] ;
		sprintf(m_szTmp, "执行==>%s<==, 数据库操作失败,错误原因：%s\n",m_szSql, LPCTSTR(e.Description()));
	}
}

void CDatabase::ListCustomerPayToCtrl(CListCtrl *m_hListCtrl)
{
	m_hListCtrl->DeleteAllItems() ;

	_variant_t v(0L) ;
	_RecordsetPtr m_Rsp ;
	char m_szSql[512] ;
	sprintf(m_szSql, "select * from tb_customerpay") ;
	try{
		
		m_Rsp = m_Connection->Execute(_bstr_t(m_szSql), &v, adCmdText) ;
		while(!m_Rsp->GetadoEOF())
		{
			m_hListCtrl->InsertItem(0, "") ;

			v = m_Rsp->GetCollect("PayID") ;
			m_hListCtrl->SetItemText(0, 0, _bstr_t(v)) ;

			v = m_Rsp->GetCollect("customer") ;
			m_hListCtrl->SetItemText(0, 1, _bstr_t(v)) ;

			v = m_Rsp->GetCollect("checker") ;
			m_hListCtrl->SetItemText(0, 2, _bstr_t(v)) ;

			v = m_Rsp->GetCollect("paymoney") ;
			m_hListCtrl->SetItemText(0, 3, _bstr_t(v)) ;

			v = m_Rsp->GetCollect("paytime") ;
			m_hListCtrl->SetItemText(0, 4, _bstr_t(v)) ;

			m_Rsp->MoveNext() ;
		}
	}
	catch(_com_error & e) 
	{
		char m_szTmp[1024] ;
		sprintf(m_szTmp, "执行==>%s<==, 数据库操作失败,错误原因：%s\n",m_szSql, LPCTSTR(e.Description()));
	}

}

void CDatabase::UpdateCustomerPayData(char *PayID, char *Customer, char *Checker, char *PayMoney, char *PayTime)
{
	char m_szSql[512] ;
	_variant_t v(0L) ;
	sprintf(m_szSql, "select * from tb_customerpay where PayID = '%s'", PayID) ;
	_RecordsetPtr m_Rsp ;
	try{
		m_Rsp = m_Connection->Execute(_bstr_t(m_szSql), &v, adCmdText) ;
		if(!m_Rsp->GetadoEOF())
		{//存在数据，更新
			sprintf(m_szSql, "update tb_customerpay set customer = '%s', \
				Checker = '%s', paymoney = %s where PayID = '%s'", 
				Customer,Checker,PayMoney,PayID) ;
			m_Connection->Execute(_bstr_t(m_szSql), &v, adCmdText) ;
		}
		else
		{//不存在数据，增加
			sprintf(m_szSql, "insert into tb_customerpay (customer,Checker,PayMoney,PayID, PayTime) \
				values ('%s', '%s', %s, '%s', '%s')" ,Customer,Checker,PayMoney,PayID, PayTime) ;
			m_Connection->Execute(_bstr_t(m_szSql), &v, adCmdText) ;
		}
	}
	catch(_com_error & e) 
	{
		char m_szTmp[1024] ;
		sprintf(m_szTmp, "执行==>%s<==, 数据库操作失败,错误原因：%s\n",m_szSql, LPCTSTR(e.Description()));
	}

}

void CDatabase::EditCustomerPayToCtrl(char *PayID, CEdit *m_hEditPayID, CEdit *m_hEditCustomer, CEdit *m_hEditChecker, CEdit *m_hEditPayMoney)
{
	_variant_t v(0L) ;
	_RecordsetPtr m_Rsp, m_Rsp1 ;
	char m_szSql[512] ;
	sprintf(m_szSql, "select * from tb_customerpay where PayID = '%s'", PayID) ;
	try{
		
		m_Rsp = m_Connection->Execute(_bstr_t(m_szSql), &v, adCmdText) ;
		while(!m_Rsp->GetadoEOF())
		{
			v = m_Rsp->GetCollect("PayID") ;
			m_hEditPayID->SetWindowText(_bstr_t(v)) ;

			v = m_Rsp->GetCollect("customer") ;
			m_hEditCustomer->SetWindowText(_bstr_t(v)) ;

			v = m_Rsp->GetCollect("checker") ;
			m_hEditChecker->SetWindowText(_bstr_t(v)) ;

			v = m_Rsp->GetCollect("paymoney") ;
			m_hEditPayMoney->SetWindowText(_bstr_t(v)) ;

			m_Rsp->MoveNext() ;
		}
	}
	catch(_com_error & e) 
	{
		char m_szTmp[1024] ;
		sprintf(m_szTmp, "执行==>%s<==, 数据库操作失败,错误原因：%s\n",m_szSql, LPCTSTR(e.Description()));
	}
}