dlginlibrecsearch.cpp

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

// DlgInlibRecSearch.cpp : implementation file
//

#include "stdafx.h"
#include "Manage_WH.h"
#include "DlgInlibRecSearch.h"
#include "DlgPreparent.h"

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

/////////////////////////////////////////////////////////////////////////////
// CDlgInlibRecSearch dialog


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


void CDlgInlibRecSearch::DoDataExchange(CDataExchange* pDX)
{
	CDialog::DoDataExchange(pDX);
	//{{AFX_DATA_MAP(CDlgInlibRecSearch)
	DDX_Control(pDX, IDC_LIST, m_list);
	DDX_DateTimeCtrl(pDX, IDC_DATE_BEGIN, m_beginDate);
	DDX_DateTimeCtrl(pDX, IDC_DATE_END, m_endDate);
	//}}AFX_DATA_MAP
}


BEGIN_MESSAGE_MAP(CDlgInlibRecSearch, CDialog)
	//{{AFX_MSG_MAP(CDlgInlibRecSearch)
	ON_BN_CLICKED(IDC_QUERY, OnQuery)
	ON_BN_CLICKED(IDC_PRINT, OnPrint)
	//}}AFX_MSG_MAP
END_MESSAGE_MAP()

/////////////////////////////////////////////////////////////////////////////
// CDlgInlibRecSearch message handlers

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

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

	m_list.InsertColumn(0,"货位索引",LVCFMT_LEFT,100,-1);
	m_list.InsertColumn(1,"托盘索引",LVCFMT_LEFT,120,-1);
	m_list.InsertColumn(2,"商品名称",LVCFMT_LEFT,100,-1);
	m_list.InsertColumn(3,"商品数量",LVCFMT_LEFT,90,-1);
	m_list.InsertColumn(4,"入库时间",LVCFMT_LEFT,140,-1);
	m_list.SetExtendedStyle( LVS_EX_GRIDLINES|LVS_EX_FULLROWSELECT);

	CTime time(CTime::GetCurrentTime());
	m_beginDate = m_endDate = time;
	UpdateData(FALSE);
	
	return TRUE;
}

void CDlgInlibRecSearch::OnQuery() 
{
	UpdateData(TRUE);
	CString sBeginDate,sEndDate;
	sBeginDate.Format("%.4d-%.2d-%.2d 00:00:00",m_beginDate.GetYear(),m_beginDate.GetMonth(),m_beginDate.GetDay());
	sEndDate.Format("%.4d-%.2d-%.2d 23:59:59",m_endDate.GetYear(),m_endDate.GetMonth(),m_endDate.GetDay());

	m_list.DeleteAllItems();
	CAdoConnection cn;
	CAdoRecordSet  rs;
	cn.OpenUDLFile(gstrConSQLSer);
	rs.SetAdoConnection(&cn);
	rs.Open("select * from V_InLibRecInfo where F_EndTime>='"+sBeginDate+"' and F_EndTime<='"+sEndDate+"'",adCmdText);
	if (rs.GetRecordCount() > 0)
	{
		rs.MoveFirst();
		int row=0,iCount=0;
		CString sSiteIndex,sTrayIndex,sGoodsName,sInTime,sCount;
		while (!rs.IsEOF())
		{
			rs.GetCollect("F_SiteIndex",sSiteIndex);
			rs.GetCollect("F_TrayIndex",sTrayIndex);
			rs.GetCollect("F_Name",sGoodsName);
			rs.GetCollect("F_Count",iCount);
			rs.GetCollect("F_EndTime",sInTime);
			sCount.Format("%d",iCount);

			row = m_list.InsertItem(row,"");
			m_list.SetItemText(row,0,sSiteIndex);
			m_list.SetItemText(row,1,sTrayIndex);
			m_list.SetItemText(row,2,sGoodsName);
			m_list.SetItemText(row,3,sCount);
			m_list.SetItemText(row,4,sInTime);
			rs.MoveNext();
			row++;
		}
	}
	rs.Close();
	cn.Close();
}

void CDlgInlibRecSearch::OnPrint() 
{
	if(m_list.GetItemCount() <= 0)
		return;
	PRNINFO PrnInfo = {0};
	PrnInfo.hListView = m_list.m_hWnd;
	PrnInfo.hWnd = this->m_hWnd;
	PrnInfo.IsPrint = FALSE;
	PrnInfo.nCurPage = 1;
	PrnInfo.nMaxLine = m_list.GetItemCount();
	
	CDlgPreparent DlgPreView;
	DlgPreView.SetCallBackFun(DrawInfo, PrnInfo);
	DlgPreView.DoModal();		
}

void CDlgInlibRecSearch::DrawInfo(CDC &memDC, PRNINFO PrnInfo)
{
	if(memDC.m_hDC == NULL)
		return;

	int nCurPage = PrnInfo.nCurPage;	//当前页
	BOOL IsPrint = PrnInfo.IsPrint;		//是否打印
	int nMaxPage = PrnInfo.nCountPage;	//最大页码
	HWND hWnd = PrnInfo.hWnd;
	HWND hList = PrnInfo.hListView;
	CString csLFinality, csRFinality;
	CTime time;
	time=CTime::GetCurrentTime();
	csLFinality = time.Format("报表日期:%Y年%m月%d日");
	csRFinality.Format("第 %i 页/共 %i 页", nCurPage, nMaxPage);

	TCHAR szTitle[] = TEXT("入库记录报表");

	CRect rc, rt1, rt2, rt3, rt4, rt5;
	CPen *hPenOld;
	CPen cPen;
	CFont TitleFont, DetailFont, *oldfont;
	//标题字体
	TitleFont.CreateFont(-MulDiv(14,memDC.GetDeviceCaps(LOGPIXELSY),72),
		0,0,0,FW_NORMAL,0,0,0,GB2312_CHARSET,
		OUT_STROKE_PRECIS,CLIP_STROKE_PRECIS,DRAFT_QUALITY,
		VARIABLE_PITCH|FF_SWISS,_T("黑体"));
	//细节字体
	DetailFont.CreateFont(-MulDiv(10,memDC.GetDeviceCaps(LOGPIXELSY),72),
		0,0,0,FW_NORMAL,0,0,0,GB2312_CHARSET,
		OUT_STROKE_PRECIS,CLIP_STROKE_PRECIS,DRAFT_QUALITY,
		VARIABLE_PITCH|FF_SWISS,_T("宋体"));
	//粗笔
	cPen.CreatePen(PS_SOLID, 2, RGB(0, 0, 0));

 	int xP = GetDeviceCaps(memDC.m_hDC, LOGPIXELSX);	//x方向每英寸像素点数
	int yP = GetDeviceCaps(memDC.m_hDC, LOGPIXELSY);	//y方向每英寸像素点数

	DOUBLE xPix = (DOUBLE)xP*10/254;	//每 mm 宽度的像素
	DOUBLE yPix = (DOUBLE)yP*10/254;	//每 mm 高度的像素
	DOUBLE fAdd = 7*yPix;		//每格递增量
	DOUBLE nTop = 25*yPix;		//第一页最上线
	int	  iStart = 0;			//从第几行开始读取
	DOUBLE nBottom = nTop+A4_ONELINE*fAdd;
	if(nCurPage != 1)
		nTop = 25*yPix-fAdd;	//非第一页最上线
	if(nCurPage == 2)
		iStart = A4_ONELINE;
	if(nCurPage>2)
		iStart = A4_ONELINE+(nCurPage - 2)*A4_OTHERLINE;

	DOUBLE nLeft = 10*xPix;			//最左线
	DOUBLE nRight = xPix*(A4_W-10);	//最右线



	DOUBLE nTextAdd = 1.5*xPix;
	if(IsPrint)
	{
		//真正打印部分
		static DOCINFO di = {sizeof (DOCINFO),  szTitle} ;
		//开始文档打印
		if(memDC.StartDoc(&di)<0)
		{
			::MessageBox(hWnd, "连接到打印机化败!", "错误", MB_ICONSTOP);
		}
		else
		{
			iStart = 0;
			nTop = 25*yPix;		//第一页最上线
			for(int iTotalPages = 1; iTotalPages<=nMaxPage; iTotalPages++)
			{
				int nCurPage = iTotalPages;
				csRFinality.Format("第 %i 页/共 %i 页", nCurPage, nMaxPage);
				time=CTime::GetCurrentTime();
				csLFinality = time.Format("报表日期:%Y-%m-%d");

				if(nCurPage != 1)
					nTop = 25*yPix-fAdd;	//非第一页最上线
				if(nCurPage == 2)
					iStart = A4_ONELINE;
				if(nCurPage>2)
					iStart = A4_ONELINE+(nCurPage - 2)*A4_OTHERLINE;
				//开始页
				if(memDC.StartPage() < 0)
				{
					::MessageBox(hWnd, _T("打印失败!"), "错误", MB_ICONSTOP);
					memDC.AbortDoc();
					return;
				}
				else
				{