storehousematerialsummary.cpp

企业库存管理系统, 企业库存管理系统

// StoreHouseMaterialSummary.cpp : implementation file
//

#include "stdafx.h"
#include "Store.h"
#include "StoreHouseMaterialSummary.h"

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

/////////////////////////////////////////////////////////////////////////////
// CStoreHouseMaterialSummary dialog


CStoreHouseMaterialSummary::CStoreHouseMaterialSummary(CWnd* pParent /*=NULL*/)
	: CDialog(CStoreHouseMaterialSummary::IDD, pParent)
{
	//{{AFX_DATA_INIT(CStoreHouseMaterialSummary)
	m_year = _T("");
	m_monthBegin = _T("");
	m_monthEnd = _T("");
	m_storeHouse = _T("");
	m_materialName = _T("");
	//}}AFX_DATA_INIT
}


void CStoreHouseMaterialSummary::DoDataExchange(CDataExchange* pDX)
{
	CDialog::DoDataExchange(pDX);
	//{{AFX_DATA_MAP(CStoreHouseMaterialSummary)
	DDX_Control(pDX, IDC_COMBO4, m_materialNameCombo);
	DDX_Control(pDX, IDC_LIST1, m_list);
	DDX_Control(pDX, IDC_COMBO2, m_storeHouseCombo);
	DDX_CBString(pDX, IDC_COMBO1, m_year);
	DDX_CBString(pDX, IDC_COMBO3, m_monthBegin);
	DDX_CBString(pDX, IDC_COMBO5, m_monthEnd);
	DDX_CBString(pDX, IDC_COMBO2, m_storeHouse);
	DDX_CBString(pDX, IDC_COMBO4, m_materialName);
	//}}AFX_DATA_MAP
}


BEGIN_MESSAGE_MAP(CStoreHouseMaterialSummary, CDialog)
	//{{AFX_MSG_MAP(CStoreHouseMaterialSummary)
	ON_BN_CLICKED(IDC_BUTTON1, OnSummary)
	//}}AFX_MSG_MAP
END_MESSAGE_MAP()

/////////////////////////////////////////////////////////////////////////////
// CStoreHouseMaterialSummary message handlers

void CStoreHouseMaterialSummary::OnSummary() 
{
	UpdateData(true);
	m_list.DeleteAllItems();
	HRESULT hTRes;
	int flag=0;
	_RecordsetPtr m_pProductInputFormRecordset;
	CString strSQL;	
	hTRes=m_pProductInputFormRecordset.CreateInstance(_T("ADODB.Recordset"));
	_variant_t RecordsAffected;
	if(m_year==""||m_monthBegin==""||m_monthEnd=="")
	{
		AfxMessageBox("必须指定会计年度和会计期间！");
		return;
	}
	if(m_materialName!=""&&m_storeHouse=="")
	{
		strSQL="exec allSummary01 '";
		strSQL=strSQL+m_year+"-"+m_monthBegin+"-1', "+"'"+m_year+"-"+m_monthEnd+"-1', '"+m_materialName+"'";
	}
	else if(m_materialName!=""&&m_storeHouse!="")
	{
		strSQL="exec allSummary11 '";
		strSQL=strSQL+m_year+"-"+m_monthBegin+"-1', "+"'"+m_year+"-"+m_monthEnd+"-1', '"+m_materialName+"' , '"+m_storeHouse+"'";
	}
	else if(m_materialName=""&&m_storeHouse!="")
	{
		strSQL="exec allSummary10 '";
		strSQL=strSQL+m_year+"-"+m_monthBegin+"-1', "+"'"+m_year+"-"+m_monthEnd+"-1', '"+m_storeHouse+"'";
	}
	else if(m_materialName==""&&m_storeHouse=="")
	{
		strSQL="exec allSummary00 '";
		strSQL=strSQL+m_year+"-"+m_monthBegin+"-1', "+"'"+m_year+"-"+m_monthEnd+"-1'";
	}
//	AfxMessageBox(strSQL);
	m_pProductInputFormRecordset=((CStoreApp*)AfxGetApp())->m_pConn->Execute((_bstr_t)strSQL,&RecordsAffected,adCmdText);
	int i=0;
	while(!(m_pProductInputFormRecordset->adoEOF))
	{
		m_list.InsertItem(i,((CStoreApp*)AfxGetApp())->GetStringFromVariant(m_pProductInputFormRecordset->GetCollect("storeHouse")));
		m_list.SetItemText(i,1,((CStoreApp*)AfxGetApp())->GetStringFromVariant(m_pProductInputFormRecordset->GetCollect("productID")));
		m_list.SetItemText(i,2,((CStoreApp*)AfxGetApp())->GetStringFromVariant(m_pProductInputFormRecordset->GetCollect("productName")));
		m_list.SetItemText(i,3,((CStoreApp*)AfxGetApp())->GetStringFromVariant(m_pProductInputFormRecordset->GetCollect("beginNum")));
		m_list.SetItemText(i,4,((CStoreApp*)AfxGetApp())->GetStringFromVariant(m_pProductInputFormRecordset->GetCollect("beginPrice")));
		m_list.SetItemText(i,5,((CStoreApp*)AfxGetApp())->GetStringFromVariant(m_pProductInputFormRecordset->GetCollect("beginTotal")));
		m_list.SetItemText(i,6,((CStoreApp*)AfxGetApp())->GetStringFromVariant(m_pProductInputFormRecordset->GetCollect("inputNum")));
		m_list.SetItemText(i,7,((CStoreApp*)AfxGetApp())->GetStringFromVariant(m_pProductInputFormRecordset->GetCollect("inputPrice")));
		m_list.SetItemText(i,8,((CStoreApp*)AfxGetApp())->GetStringFromVariant(m_pProductInputFormRecordset->GetCollect("inputTotal")));
		m_list.SetItemText(i,9,((CStoreApp*)AfxGetApp())->GetStringFromVariant(m_pProductInputFormRecordset->GetCollect("outputNum")));
		m_list.SetItemText(i,10,((CStoreApp*)AfxGetApp())->GetStringFromVariant(m_pProductInputFormRecordset->GetCollect("outputPrice")));
		m_list.SetItemText(i,11,((CStoreApp*)AfxGetApp())->GetStringFromVariant(m_pProductInputFormRecordset->GetCollect("outputTotal")));
		m_list.SetItemText(i,12,((CStoreApp*)AfxGetApp())->GetStringFromVariant(m_pProductInputFormRecordset->GetCollect("sumNum")));
		m_list.SetItemText(i,13,((CStoreApp*)AfxGetApp())->GetStringFromVariant(m_pProductInputFormRecordset->GetCollect("sumPrice")));
		m_list.SetItemText(i,14,((CStoreApp*)AfxGetApp())->GetStringFromVariant(m_pProductInputFormRecordset->GetCollect("sumTotal")));
		m_pProductInputFormRecordset->MoveNext();
		i++;
	}
	
}

BOOL CStoreHouseMaterialSummary::OnInitDialog() 
{
	CDialog::OnInitDialog();
	
	DWORD style;
	style=m_list.GetExStyle();
	style=(style|LVS_EX_GRIDLINES|LVS_EX_FULLROWSELECT)&(~LVS_EX_CHECKBOXES) ;
	m_list.SetExtendedStyle(style);

	m_list.InsertColumn(1,"仓库名称",LVCFMT_LEFT,100);
	m_list.InsertColumn(2,"物料编码",LVCFMT_LEFT,100);
	m_list.InsertColumn(3,"物料名称",LVCFMT_LEFT,100);

	m_list.InsertColumn(4,"期初数量",LVCFMT_LEFT,100);
	m_list.InsertColumn(5,"期初单价",LVCFMT_LEFT,100);
	m_list.InsertColumn(6,"期初金额",LVCFMT_LEFT,100);

	m_list.InsertColumn(7,"入库数量",LVCFMT_LEFT,100);
	m_list.InsertColumn(8,"入库单价",LVCFMT_LEFT,100);
	m_list.InsertColumn(9,"入库金额",LVCFMT_LEFT,100);

	m_list.InsertColumn(10,"出库数量",LVCFMT_LEFT,100);
	m_list.InsertColumn(11,"出库单价",LVCFMT_LEFT,100);
	m_list.InsertColumn(12,"出库金额",LVCFMT_LEFT,100);

	m_list.InsertColumn(13,"结存数量",LVCFMT_LEFT,100);
	m_list.InsertColumn(14,"结存单价",LVCFMT_LEFT,100);
	m_list.InsertColumn(15,"结存金额",LVCFMT_LEFT,100);
		

	CString strSQL;
	HRESULT hTRes;
	_RecordsetPtr m_pRecordset;
	strSQL="select distinct storeHouseName from storeHouse";	
	hTRes = m_pRecordset.CreateInstance(_T("ADODB.Recordset"));
	if (SUCCEEDED(hTRes))
	{
		//----------------------------------------------------
		hTRes = m_pRecordset->Open((LPTSTR)strSQL.GetBuffer(130),
		((CStoreApp*)AfxGetApp())->m_pConn.GetInterfacePtr(),
				adOpenDynamic,adLockPessimistic,adCmdText);
		if(SUCCEEDED(hTRes))
		{
			while(!(m_pRecordset->adoEOF))
			{		
			m_storeHouseCombo.AddString(((CStoreApp*)AfxGetApp())->GetStringFromVariant(m_pRecordset->GetCollect("storeHouseName")));
			m_pRecordset->MoveNext();
			}
		}
	}
	m_pRecordset->Close();

	strSQL="select distinct materialName from material";
	hTRes = m_pRecordset->Open((LPTSTR)strSQL.GetBuffer(130),
		((CStoreApp*)AfxGetApp())->m_pConn.GetInterfacePtr(),
				adOpenDynamic,adLockPessimistic,adCmdText);
	if(SUCCEEDED(hTRes))
	{
		while(!(m_pRecordset->adoEOF))
		{		
			m_materialNameCombo.AddString(((CStoreApp*)AfxGetApp())->GetStringFromVariant(m_pRecordset->GetCollect("materialName")));
			m_pRecordset->MoveNext();
		}
	}
	m_pRecordset->Close();
	
	return TRUE;  // return TRUE unless you set the focus to a control
	              // EXCEPTION: OCX Property Pages should return FALSE
}