sellmaterialview.cpp

客户端服务器源码

// SellMaterialView.cpp : implementation file
//

#include "stdafx.h"
#include "clientmain.h"
#include "SellMaterialView.h"

#include "CommPrintDlg.h"
#include <string>

#ifdef _DEBUG
#define new DEBUG_NEW
#undef THIS_FILE
static char THIS_FILE[] = __FILE__;
#endif

using namespace std;
/////////////////////////////////////////////////////////////////////////////
// CSellMaterialView

IMPLEMENT_DYNCREATE(CSellMaterialView, CFormView)

CSellMaterialView::CSellMaterialView()
	: CFormView(CSellMaterialView::IDD)
{
	//{{AFX_DATA_INIT(CSellMaterialView)
	m_blnSell = FALSE;
	m_strOID = _T("");
	m_nNumber = 0;
	m_dateSell = _T("");
	m_strMID = _T("");
	//}}AFX_DATA_INIT
	m_strSql = L"select * from T_Sell";
	m_strVSql = L"select * from V_Sell";
	m_strPSql = m_strVSql;
}

CSellMaterialView::~CSellMaterialView()
{
}

void CSellMaterialView::DoDataExchange(CDataExchange* pDX)
{
	CFormView::DoDataExchange(pDX);
	//{{AFX_DATA_MAP(CSellMaterialView)
	DDX_Control(pDX, IDC_BTN_PRINT, m_btnPrint);
	DDX_Control(pDX, IDC_BTN_QUERY, m_btnQuery);
	DDX_Control(pDX, IDC_COMBO_OID, m_cmbOID);
	DDX_Control(pDX, IDC_BTN_VIEW, m_btnViewAll);
	DDX_Control(pDX, IDC_BTN_PREVIOUS, m_btnPrev);
	DDX_Control(pDX, IDC_BTN_NEXT, m_btnNext);
	DDX_Control(pDX, IDC_BTN_MODIFY, m_btnModify);
	DDX_Control(pDX, IDC_BTN_LAST, m_btnLast);
	DDX_Control(pDX, IDC_BTN_FIRST, m_btnFirst);
	DDX_Control(pDX, IDC_BTN_FIND, m_btnFind);
	DDX_Control(pDX, IDC_BTN_DELETE, m_btnDel);
	DDX_Control(pDX, IDC_BTN_CANCEL, m_btnCancel);
	DDX_Control(pDX, IDC_BTN_ADD, m_btnAddNew);
	DDX_Check(pDX, IDC_CHECK_SELL, m_blnSell);
	DDX_CBString(pDX, IDC_COMBO_OID, m_strOID);
	DDX_Text(pDX, IDC_EDIT_NUMBER, m_nNumber);
	DDX_Control(pDX, IDC_GRID_VIEWALL, m_grdViewAll);
	DDX_Text(pDX, IDC_EDIT_STARDATE, m_dateSell);
	DDX_Text(pDX, IDC_EDIT_MID, m_strMID);
	//}}AFX_DATA_MAP
}


BEGIN_MESSAGE_MAP(CSellMaterialView, CFormView)
	//{{AFX_MSG_MAP(CSellMaterialView)
	ON_BN_CLICKED(IDC_BTN_FIND, OnBtnFind)
	ON_BN_CLICKED(IDC_BTN_ADD, OnBtnAdd)
	ON_BN_CLICKED(IDC_BTN_MODIFY, OnBtnModify)
	ON_BN_CLICKED(IDC_BTN_DELETE, OnBtnDelete)
	ON_BN_CLICKED(IDC_BTN_CANCEL, OnBtnCancel)
	ON_BN_CLICKED(IDC_BTN_FIRST, OnBtnFirst)
	ON_BN_CLICKED(IDC_BTN_PREVIOUS, OnBtnPrevious)
	ON_BN_CLICKED(IDC_BTN_NEXT, OnBtnNext)
	ON_BN_CLICKED(IDC_BTN_LAST, OnBtnLast)
	ON_BN_CLICKED(IDC_BTN_VIEW, OnBtnView)
	ON_BN_CLICKED(IDC_BTN_QUERY, OnBtnQuery)
	ON_BN_CLICKED(IDC_BTN_PRINT, OnBtnPrint)
	//}}AFX_MSG_MAP
END_MESSAGE_MAP()

/////////////////////////////////////////////////////////////////////////////
// CSellMaterialView diagnostics

#ifdef _DEBUG
void CSellMaterialView::AssertValid() const
{
	CFormView::AssertValid();
}

void CSellMaterialView::Dump(CDumpContext& dc) const
{
	CFormView::Dump(dc);
}
#endif //_DEBUG

/////////////////////////////////////////////////////////////////////////////
// CSellMaterialView message handlers

void CSellMaterialView::OnInitialUpdate() 
{
	CFormView::OnInitialUpdate();
	
	// TODO: Add your specialized code here and/or call the base class
	CString strTitle ;
	strTitle = "材料出库管理";
	GetParentFrame()->SetWindowText(strTitle);

	// 初始化组合框控件
	_bstr_t strOrder("select Distinct O_ID from T_Orders");
	CString strField = "O_ID";
	CClientMainApp::InitCmbBox(strOrder, strField, &m_cmbOID);
	
	m_btnAddNew.SetIcon(AfxGetApp()->LoadIcon(IDI_ADDNEW));
	m_btnModify.SetIcon(AfxGetApp()->LoadIcon(IDI_MODIFY));
	m_btnDel.SetIcon(AfxGetApp()->LoadIcon(IDI_DELETE));
	m_btnCancel.SetIcon(AfxGetApp()->LoadIcon(IDI_CANCEL));
	m_btnFirst.SetIcon(AfxGetApp()->LoadIcon(IDI_FIRST));
	m_btnPrev.SetIcon(AfxGetApp()->LoadIcon(IDI_PREVIOUS));
	m_btnNext.SetIcon(AfxGetApp()->LoadIcon(IDI_NEXT));
	m_btnLast.SetIcon(AfxGetApp()->LoadIcon(IDI_LAST));
	m_btnViewAll.SetIcon(AfxGetApp()->LoadIcon(IDI_VIEWALL));
	m_btnFind.SetIcon(AfxGetApp()->LoadIcon(IDI_FIND));
	m_btnQuery.SetIcon(AfxGetApp()->LoadIcon(IDI_QUERY));
	m_btnPrint.SetIcon(AfxGetApp()->LoadIcon(IDI_PRINT));
	
	GetParentFrame()->ShowWindow(SW_SHOWMAXIMIZED);
}

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

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

	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::OnBtnAdd() 
{
	// TODO: Add your control notification handler code here
	UpdateData(TRUE);
	if((m_strOID == "")||(m_dateSell == ""))
	{
		MessageBox("记录字段都不能为空！", NULL, MB_OK);
		return;
	}
	
	/////////////////////////// 对订单表进行查询 ///////////////////
	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(m_blnSell)
	{
		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;
		}
		
		g_pAdoServer->Field["Total"] = nTotal;
		g_pAdoServer->Update();
	}

	g_pAdoServer->CloseRecordset();
	g_pAdoServer->OpenRecordset(m_strSql);
	////////////////////////////////////////////////////////////////

	g_pAdoServer->AddNew();

	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();

	UpdateData(FALSE);
}

void CSellMaterialView::OnBtnView() 
{
	// TODO: Add your control notification handler code here
	HRESULT hr;
	IDispatch* pDisp;
	_bstr_t strSql("Select * from T_Sell");
	//strSql = L"Select * from T_";
	hr = g_pAdoServer->raw_GetRs(_variant_t(strSql), &pDisp);

	//g_pAdoServer->GetRs();
	m_grdViewAll.SetRefDataSource(pDisp);
}

void CSellMaterialView::OnBtnCancel() 
{
	// TODO: Add your control notification handler code here
	g_pAdoServer->CancelUpdate();
}

void CSellMaterialView::OnBtnFind() 
{
	// TODO: Add your control notification handler code here
	UpdateData(TRUE);

	HRESULT hr;

	if((m_strMID == "") || (m_strOID == ""))
	{
		MessageBox("请输入材料和订单编号！", NULL, MB_OK);
		return;
	}

	VARIANT_BOOL bEmpty;
	hr = g_pAdoServer->get_Empty(&bEmpty);
	if(bEmpty)
	{
		MessageBox("当前记录集为空！", "Client Error:", MB_OK);
		return;
	}
	
	g_pAdoServer->First();

	CString strTemp;
	strTemp = "O_ID = '" + m_strOID +"'";

	_bstr_t strFind(strTemp); 
	hr = g_pAdoServer->Find(strFind);
	if(SUCCEEDED(hr))
	{
		hr = g_pAdoServer->get_ADOEOF(&bEmpty);
		if(bEmpty)
		{
			MessageBox("没有找到记录！", NULL, MB_OK);
			return;
		}

		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::OnBtnLast() 
{
	// 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->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();