dlgstockvelocity.cpp

用VC编写的立体仓库的管理软件源程序和设计说明书。

// DlgStockVelocity.cpp : implementation file
//

#include "stdafx.h"
#include "manage_wh.h"
#include "DlgStockVelocity.h"

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

/////////////////////////////////////////////////////////////////////////////
// CDlgStockVelocity dialog


CDlgStockVelocity::CDlgStockVelocity(CWnd* pParent /*=NULL*/)
	: CDialog(CDlgStockVelocity::IDD, pParent)
{
	//{{AFX_DATA_INIT(CDlgStockVelocity)
	//}}AFX_DATA_INIT
	m_hIcon = AfxGetApp()->LoadIcon(IDI_MYICON);
}


void CDlgStockVelocity::DoDataExchange(CDataExchange* pDX)
{
	CDialog::DoDataExchange(pDX);
	//{{AFX_DATA_MAP(CDlgStockVelocity)
	DDX_Control(pDX, IDC_YEAR, m_EdtYear);
	DDX_Control(pDX, IDC_LIST, m_list);
	//}}AFX_DATA_MAP
}


BEGIN_MESSAGE_MAP(CDlgStockVelocity, CDialog)
	//{{AFX_MSG_MAP(CDlgStockVelocity)
	ON_BN_CLICKED(IDC_SEARCH, OnSearch)
	//}}AFX_MSG_MAP
END_MESSAGE_MAP()

/////////////////////////////////////////////////////////////////////////////
// CDlgStockVelocity message handlers

BOOL CDlgStockVelocity::PreTranslateMessage(MSG* pMsg) 
{
	if (pMsg->message==WM_KEYDOWN && (pMsg->wParam==13 || pMsg->wParam==27))
		return TRUE;
	return CDialog::PreTranslateMessage(pMsg);
}

BOOL CDlgStockVelocity::OnInitDialog() 
{
	CDialog::OnInitDialog();
	
	SetIcon(m_hIcon,TRUE);

	m_list.InsertColumn(0,"月份",LVCFMT_LEFT,80,-1);
	m_list.InsertColumn(1,"出库数量",LVCFMT_LEFT,120,-1);
	m_list.InsertColumn(2,"库存周转率(%)",LVCFMT_LEFT,160,-1);
	m_list.SetExtendedStyle( LVS_EX_GRIDLINES|LVS_EX_FULLROWSELECT );

	CTime tm(CTime::GetCurrentTime());
	CString sYear;
	sYear.Format("%.4d",tm.GetYear());
	static_cast<CEdit *>(GetDlgItem(IDC_YEAR))->SetWindowText(sYear);
	
	return TRUE;
}

void CDlgStockVelocity::OnSearch() 
{
	m_list.DeleteAllItems();
	UpdateData();
	int iYear;
	CString szYear;
	static_cast<CEdit *>(GetDlgItem(IDC_YEAR))->GetWindowText(szYear);
	iYear = atoi(szYear);
	if (szYear.IsEmpty() || szYear.Mid(0,1)=="0" || iYear > 3000 || iYear < 2006)
		return;

	CAdoConnection cn;
	CAdoRecordSet  rs,rs2;
	int row(0),iKind(0),iSum,iCount(0);
	CString sBeginTime,sEndTime,sMonth,sOrder,sCurMonth,sSum,sSQL;

	cn.OpenUDLFile(gstrConSQLSer);
	rs.SetAdoConnection(&cn);
	rs2.SetAdoConnection(&cn);
	for (int i=1;i<=12;i++)
	{
		iSum = 0;
		sCurMonth.Format("%d月",i);
		sMonth.Format("%.2d",i);
		if (sMonth == "12")
		{
			sBeginTime = ""+szYear+"-"+sMonth+"-01 00:00:00";
			sEndTime   = ""+szYear+"-"+sMonth+"-31 23:59:59";
		}
		else
		{
			sBeginTime = ""+szYear+"-"+sMonth+"-01 00:00:00";
			sMonth.Format("%.2d",i+1);
			sEndTime   = ""+szYear+"-"+sMonth+"-01 00:00:00";
		}

		row = m_list.InsertItem(row,"");
		
		rs.Open("select * from T_Order_History where F_EndTime>='"+sBeginTime+"' and F_EndTime<'"+sEndTime+"' and F_Status=1 and F_Kind!=2",adCmdText);
		if (rs.GetRecordCount() > 0)
		{
			rs.MoveFirst();
			while (!rs.IsEOF())
			{
				rs.GetCollect("F_OrderIndex",sOrder);
				rs.GetCollect("F_Kind",iKind);
				
				switch(iKind)
				{
				case 1:sSQL = "select F_Count from T_InOutLibRec where F_TaskKind=4 and F_OrderIndex1='"+sOrder+"'";break;
				case 3:sSQL = "select F_Count from T_InOutLibRec where F_TaskKind=2 and F_OrderIndex1='"+sOrder+"'";break;
				}
				rs2.Open(sSQL,adCmdText);
				if (rs2.GetRecordCount() > 0)
				{
					rs2.MoveFirst();
					while (!rs2.IsEOF())
					{
						rs2.GetCollect("F_Count",iCount);
						iSum += iCount;
						rs2.MoveNext();
					}
				}
				rs2.Close();
				rs.MoveNext();
			}
		}
		rs.Close();
		sSum.Format("%d",iSum);
		CString sVelocity;
		if (iSum == 0)
			sVelocity = "0";
		else
		{
			double dVelocity = iSum/1792.0;
			sVelocity.Format("%.6f",dVelocity);
		}

		m_list.SetItemText(row,0,sCurMonth);
		m_list.SetItemText(row,1,sSum);
		m_list.SetItemText(row,2,sVelocity);

		row++;
	}
	cn.Close();
}