sellmaterialview.cpp

客户端服务器源码

	m_strOID = strOID.c_str();
	m_dateSell = strDateSell.c_str();

	UpdateData(FALSE);
//	g_pAdoServer->get_BookMark(&m_vBookMark); 
}

void CSellMaterialView::OnBtnPrevious() 
{
	// TODO: Add your control notification handler code here
	HRESULT hr;
	VARIANT_BOOL bEmpty;
	hr = g_pAdoServer->get_Empty(&bEmpty);

	if(bEmpty)
	{
		MessageBox("当前记录集为空！", "Client Error:", MB_OK);
		return;
	}
	
	g_pAdoServer->Prev();
	hr = g_pAdoServer->get_BOF(&bEmpty);
	if(bEmpty)
	{
		MessageBox("已经到记录集头部！", NULL, MB_OK);
		g_pAdoServer->First();
	}

	string strMID;
	string strOID;
	string strDateSell;
	
	strMID = (_bstr_t)g_pAdoServer->Field["M_ID"];
	strOID = (_bstr_t)g_pAdoServer->Field["O_ID"];
	strDateSell = (_bstr_t)g_pAdoServer->Field["SellDate"];

	m_nNumber = g_pAdoServer->Field["SellNumber"];
	m_blnSell = abs((VARIANT_BOOL)g_pAdoServer->Field["Selled"]);

	m_strMID = strMID.c_str();
	m_strOID = strOID.c_str();
	m_dateSell = strDateSell.c_str();

	UpdateData(FALSE);
}

void CSellMaterialView::OnBtnNext() 
{
	// TODO: Add your control notification handler code here
	HRESULT hr;
	VARIANT_BOOL bEmpty;
	hr = g_pAdoServer->get_Empty(&bEmpty);

	if(bEmpty)
	{
		MessageBox("当前记录集为空！", "Client Error:", MB_OK);
		return;
	}
	

	g_pAdoServer->Next();
	hr = g_pAdoServer->get_ADOEOF(&bEmpty);
	if(bEmpty)
	{
		MessageBox("已经到记录集尾部！", NULL, MB_OK);
		g_pAdoServer->Last();
	}

	
	string strMID;
	string strOID;
	string strDateSell;
	
	strMID = (_bstr_t)g_pAdoServer->Field["M_ID"];
	strOID = (_bstr_t)g_pAdoServer->Field["O_ID"];
	strDateSell = (_bstr_t)g_pAdoServer->Field["SellDate"];

	m_nNumber = g_pAdoServer->Field["SellNumber"];
	m_blnSell = abs((VARIANT_BOOL)g_pAdoServer->Field["Selled"]);

	m_strMID = strMID.c_str();
	m_strOID = strOID.c_str();
	m_dateSell = strDateSell.c_str();

	UpdateData(FALSE);
}

void CSellMaterialView::OnBtnModify() 
{
	// TODO: Add your control notification handler code here
	CString str_MID;
	CString str_OID;
	BOOL blnJudge;

	str_MID = m_strMID;
	str_OID = m_strOID;
	blnJudge = m_blnSell;

	UpdateData(TRUE);
	if((m_strOID == "")||(m_dateSell == ""))
	{
		MessageBox("记录字段都不能为空！", NULL, MB_OK);
		return;
	}

	/////////////////////////// 对订单表进行查询 ///////////////////
	g_pAdoServer->get_BookMark(&m_vBookMark);  // 保存当前的记录状态
	
	string strMID;
	CString str;
	//long  nSell;

	g_pAdoServer->CloseRecordset();
	_bstr_t strSql("select * from T_Orders where O_ID = '" + m_strOID + "'");
	g_pAdoServer->OpenRecordset(strSql);

	strMID = (_bstr_t)g_pAdoServer->Field["M_ID"];
	m_nNumber = g_pAdoServer->Field["Quantity"];
	m_strMID = strMID.c_str();

	//////开始对 仓储表 进行操作 ///////////////////////////////////

	if((str_MID == m_strMID) && (str_OID == m_strOID) && (blnJudge))
	{
		m_blnSell = blnJudge;
	}
	else
	{
		g_pAdoServer->CloseRecordset();
		strSql = "select * from T_Storage where M_ID = '" + m_strMID + "'";
		g_pAdoServer->OpenRecordset(strSql);

		HRESULT hr;
		VARIANT_BOOL bEmpty;
		long nTotal;
		
		hr = g_pAdoServer->get_Empty(&bEmpty);
		if(bEmpty)
		{
			MessageBox("库中没有该材料!", NULL, MB_OK);
			return;
		}

		nTotal = g_pAdoServer->Field["Total"];
		nTotal -= m_nNumber; 
		if( nTotal  < 0)
		{
			str.Format("%d", abs(nTotal));
			MessageBox("仓库中存货不足，缺货数为：" + str, NULL, MB_OK);
			return;
		}
		
		if(m_blnSell)
		{
			g_pAdoServer->Field["Total"] = nTotal;
			g_pAdoServer->Update();
		}
	}

	////恢复初始的记录状态
	g_pAdoServer->CloseRecordset();
	g_pAdoServer->OpenRecordset(m_strSql);
	g_pAdoServer->put_BookMark(m_vBookMark);
	////////////////////////////////////////////////////////////////

	g_pAdoServer->Field["M_ID"] = LPCSTR(m_strMID);
	g_pAdoServer->Field["O_ID"] = LPCSTR(m_strOID);
	g_pAdoServer->Field["SellNumber"] = m_nNumber;
	g_pAdoServer->Field["SellDate"] = LPCSTR(m_dateSell);
	g_pAdoServer->Field["Selled"] = (VARIANT_BOOL)m_blnSell;
	
	g_pAdoServer->Update();
}

void CSellMaterialView::OnBtnDelete() 
{
	// TODO: Add your control notification handler code here
	HRESULT hr;
	VARIANT_BOOL bEmpty;
	hr = g_pAdoServer->get_Empty(&bEmpty);

	if(bEmpty)
	{
		MessageBox("当前记录集为空！", "Client Error:", MB_OK);
		return;
	}
	
	g_pAdoServer->Delete();
	g_pAdoServer->Update();

	hr = g_pAdoServer->get_ADOEOF(&bEmpty);
	if(bEmpty)
	{
		MessageBox("已经到记录集尾部！", NULL, MB_OK);
		g_pAdoServer->Last();
	}
	else
	{
		g_pAdoServer->Next();
		hr = g_pAdoServer->get_ADOEOF(&bEmpty);
		if(bEmpty)
		{
			MessageBox("已经到记录集尾部！", NULL, MB_OK);
			g_pAdoServer->Last();
		}
	}
		
	string strMID;
	string strOID;
	string strDateSell;
	
	strMID = (_bstr_t)g_pAdoServer->Field["M_ID"];
	strOID = (_bstr_t)g_pAdoServer->Field["O_ID"];
	strDateSell = (_bstr_t)g_pAdoServer->Field["SellDate"];

	m_nNumber = g_pAdoServer->Field["SellNumber"];
	m_blnSell = abs((VARIANT_BOOL)g_pAdoServer->Field["Selled"]);

	m_strMID = strMID.c_str();
	m_strOID = strOID.c_str();
	m_dateSell = strDateSell.c_str();

	UpdateData(FALSE);
}

void CSellMaterialView::OnActivateView(BOOL bActivate, CView* pActivateView, CView* pDeactiveView) 
{
	// TODO: Add your specialized code here and/or call the base class
	if(bActivate == FALSE)
	{
		HRESULT hr;
		VARIANT_BOOL bEmpty;
		hr = g_pAdoServer->get_Empty(&bEmpty);

		if(bEmpty)
		{
			return;
		}
		else
		{
			g_pAdoServer->get_BookMark(&m_vBookMark);
			return;
		}
	}
	else
	{
		g_pAdoServer->CloseRecordset();
		g_pAdoServer->OpenRecordset(m_strSql);

	//	OnBtnFind();
		HRESULT hr;
		VARIANT_BOOL bEmpty;
		hr = g_pAdoServer->get_Empty(&bEmpty);

		if(bEmpty)
		{
			return;
		}
		else
		{
			g_pAdoServer->put_BookMark(m_vBookMark);
		}

		string strMID;
		string strOID;
		string strDateSell;
		
		strMID = (_bstr_t)g_pAdoServer->Field["M_ID"];
		strOID = (_bstr_t)g_pAdoServer->Field["O_ID"];
		strDateSell = (_bstr_t)g_pAdoServer->Field["SellDate"];

		m_nNumber = g_pAdoServer->Field["SellNumber"];
		m_blnSell = abs((VARIANT_BOOL)g_pAdoServer->Field["Selled"]);

		m_strMID = strMID.c_str();
		m_strOID = strOID.c_str();
		m_dateSell = strDateSell.c_str();

		UpdateData(FALSE);
	}
	
	CFormView::OnActivateView(bActivate, pActivateView, pDeactiveView);
}

void CSellMaterialView::OnBtnQuery() 
{
	// TODO: Add your control notification handler code here
	HRESULT hr;
	IGxp_adoQueryPtr  pQuery;
	MULTI_QI MultiQI;
	
	MultiQI.hr = NOERROR;	MultiQI.pItf = NULL;	
	MultiQI.pIID = &__uuidof(IGxp_adoQuery);	
	

	hr = CoCreateInstanceEx( __uuidof(Gxp_adoQuery), NULL, CLSCTX_LOCAL_SERVER, NULL, 1, &MultiQI);
	
	if(SUCCEEDED(hr))
	{
		pQuery = (IGxp_adoQuery *)MultiQI.pItf;
		//MessageBox(NULL,"CoCreateInstance Successful.",NULL,MB_OK);
	}
	else
	{
		MessageBox("CoCreateInstance Failed","Client Error:",MB_OK);
		return ;
	}
	
	IDispatch* pDisp;

	// 下面是一系列的处理过程，包括了调用通用查询对话框，处理字符串等
	string strSpace = " where ";
	string strSource;
	string strResult;

	hr = g_pAdoServer->raw_GetRs(_variant_t(m_strVSql), &pDisp);
	strResult = pQuery->GetQuery(pDisp);
	
	if(strResult.empty())
	{
		return;
	}
	strSource = m_strVSql;
	strResult = strSource + strSpace + strResult;

	_bstr_t strDest(strResult.c_str());
	
	hr = g_pAdoServer->raw_GetRs(_variant_t(strDest), &pDisp);
	m_grdViewAll.SetRefDataSource(pDisp);
}

void CSellMaterialView::OnBtnPrint() 
{
	// TODO: Add your control notification handler code here
	CCommPrintDlg  printDlg;
	printDlg.m_strSql = m_strPSql;
	printDlg.DoModal();
}