⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 dlgorderoutlibsearch.cpp

📁 用VC编写的立体仓库的管理软件源程序和设计说明书。
💻 CPP
📖 第 1 页 / 共 2 页
字号:
// DlgOrderOutlibSearch.cpp : implementation file
//

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

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

/////////////////////////////////////////////////////////////////////////////
// CDlgOrderOutlibSearch dialog


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


void CDlgOrderOutlibSearch::DoDataExchange(CDataExchange* pDX)
{
	CDialog::DoDataExchange(pDX);
	//{{AFX_DATA_MAP(CDlgOrderOutlibSearch)
	DDX_Control(pDX, IDC_LIST_MAIN, m_listMain);
	DDX_Control(pDX, IDC_LIST_FROM, m_listFrom);
	DDX_Text(pDX, IDC_CONDITION, m_condition);
	DDX_DateTimeCtrl(pDX, IDC_BEGIN_DATE, m_beginDate);
	DDX_DateTimeCtrl(pDX, IDC_END_DATE, m_endDate);
	//}}AFX_DATA_MAP
}


BEGIN_MESSAGE_MAP(CDlgOrderOutlibSearch, CDialog)
	//{{AFX_MSG_MAP(CDlgOrderOutlibSearch)
	ON_BN_CLICKED(IDC_SEARCH, OnSearch)
	ON_NOTIFY(NM_DBLCLK, IDC_LIST_MAIN, OnDblclkListMain)
	ON_BN_CLICKED(IDC_PRINT, OnPrint)
	//}}AFX_MSG_MAP
END_MESSAGE_MAP()

/////////////////////////////////////////////////////////////////////////////
// CDlgOrderOutlibSearch message handlers

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

BOOL CDlgOrderOutlibSearch::OnInitDialog() 
{
	CDialog::OnInitDialog();
	
	SetIcon(m_hIcon,TRUE);
	m_listMain.InsertColumn(0,"订货单号",LVCFMT_LEFT,120,-1);
	m_listMain.InsertColumn(1,"客户名称",LVCFMT_LEFT,160,-1);
	m_listMain.InsertColumn(2,"订货数量",LVCFMT_LEFT,100,-1);
	m_listMain.InsertColumn(3,"交货日期",LVCFMT_LEFT,120,-1);
	m_listMain.SetExtendedStyle( LVS_EX_GRIDLINES|LVS_EX_FULLROWSELECT);
	
	m_listFrom.InsertColumn(0,"订货单号",LVCFMT_LEFT,100,-1);
	m_listFrom.InsertColumn(1,"商品名称",LVCFMT_LEFT,120,-1);
	m_listFrom.InsertColumn(2,"商品条形码",LVCFMT_LEFT,120,-1);
	m_listFrom.InsertColumn(3,"商品价格(RMB)",LVCFMT_LEFT,120,-1);
	m_listFrom.InsertColumn(4,"商品规格",LVCFMT_LEFT,120,-1);
	m_listFrom.InsertColumn(5,"商品颜色",LVCFMT_LEFT,120,-1);
	m_listFrom.InsertColumn(6,"商品重量(KG)",LVCFMT_LEFT,120,-1);
	m_listFrom.InsertColumn(7,"计量单位",LVCFMT_LEFT,120,-1);
	m_listFrom.InsertColumn(8,"客户名称",LVCFMT_LEFT,160,-1);
	m_listFrom.InsertColumn(9,"交货日期",LVCFMT_LEFT,140,-1);
	m_listFrom.SetExtendedStyle( LVS_EX_GRIDLINES|LVS_EX_FULLROWSELECT);

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

void CDlgOrderOutlibSearch::OnSearch() 
{
	UpdateData(TRUE);
	CString sSQL,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());
	if (m_condition.IsEmpty())
	{
		sSQL = "select * from T_Order_History where (F_Kind=1 or F_Kind=3) and F_Status=1 and F_EndTime>='"+sBeginDate+"' and F_EndTime<='"+sEndDate+"'";
	}
	else
	{
		sSQL = "select * from T_Order_History where (F_Kind=1 or F_Kind=3)and F_Status=1 and F_OrderIndex='"+m_condition+"'";
	}
	CAdoConnection cn;
	CAdoRecordSet  rs;

	cn.OpenUDLFile(gstrConSQLSer);
	rs.SetAdoConnection(&cn);
	rs.Open(sSQL,adCmdText);
	if (rs.GetRecordCount() > 0)
	{
		int row = 0,iCount = 0,iTaskKind;
		CString sFormNum,sCustomer,sDate,sCount,sGoodsName;
		m_iTaskKindArra.RemoveAll();
		m_sGoodsNameArra.RemoveAll();
		m_listMain.DeleteAllItems();
		rs.MoveFirst();
		while (!rs.IsEOF())
		{
			rs.GetCollect("F_OrderIndex",sFormNum);
			rs.GetCollect("F_Kind",iTaskKind);
			rs.GetCollect("F_GoodsName",sGoodsName);
			rs.GetCollect("F_Count",iCount);
			rs.GetCollect("F_CompanyName",sCustomer);
			rs.GetCollect("F_EndTime",sDate);
			sCount.Format("%d",iCount);
			m_iTaskKindArra.Add(iTaskKind);
			m_sGoodsNameArra.Add(sGoodsName);
			row = m_listMain.InsertItem(row,"");
			m_listMain.SetItemText(row,0,sFormNum);
			m_listMain.SetItemText(row,1,sCustomer);
			m_listMain.SetItemText(row,2,sCount);
			m_listMain.SetItemText(row,3,sDate);
			rs.MoveNext();
			row++;
		}
	}
}

void CDlgOrderOutlibSearch::OnDblclkListMain(NMHDR* pNMHDR, LRESULT* pResult) 
{
	for (int i=0;i<m_listMain.GetItemCount();i++)
	{
		if (m_listMain.GetItemState(i,LVIS_SELECTED) == LVIS_SELECTED)
		{
			CString sGoodsCode,sPrice,sSpec,sColor,sWeight,sUnit,sSQL,sDate,sCode,sGoodsName;
			m_sFormNum	 = m_listMain.GetItemText(i,0);
			m_sCustomer	 = m_listMain.GetItemText(i,1);
			sDate = m_listMain.GetItemText(i,3);
			
			int row=0;
			int h=0;
			CAdoConnection cn;
			CAdoRecordSet  rs;
			cn.OpenUDLFile(gstrConSQLSer);
			rs.SetAdoConnection(&cn);
			//判断订单类型
			switch (m_iTaskKindArra[i])
			{
			case 1:
				m_listFrom.DeleteAllItems();
				rs.Open("select * from T_InOutLibRec where F_TaskKind=4 and F_OrderIndex1='"+m_sFormNum+"'",adCmdText);
				if (rs.GetRecordCount() > 0)
				{
					rs.MoveFirst();
					CString s;
					while (!rs.IsEOF())
					{
						for (int k=1;k<9;k++)
						{
							s.Format("%d",k);
							s = "F_Index"+s+"";
							rs.GetCollect(s,sGoodsCode);
							if (!sGoodsCode.IsEmpty())
							{
								row = m_listFrom.InsertItem(row,"");
								m_listFrom.SetItemText(row,0,m_sFormNum);
								m_listFrom.SetItemText(row,2,sGoodsCode);
								m_listFrom.SetItemText(row,8,m_sCustomer);
								m_listFrom.SetItemText(row,9,sDate);
								row++;
							}
						}
						rs.MoveNext();
					}
				}
				rs.Close();
				for (h;h<m_listFrom.GetItemCount();h++)
				{
					sCode = m_listFrom.GetItemText(h,2).Mid(0,2);
					rs.Open("select * from T_Products where F_Code='"+sCode+"'",adCmdText);
					if (rs.GetRecordCount() > 0)
					{
						rs.MoveFirst();
						rs.GetCollect("F_Name",sGoodsName);
						rs.GetCollect("F_Price",sPrice);
						rs.GetCollect("F_Spec",sSpec);
						rs.GetCollect("F_Color",sColor);
						rs.GetCollect("F_Weight",sWeight);
						rs.GetCollect("F_Unit",sUnit);
					}
					rs.Close();
					m_listFrom.SetItemText(h,1,sGoodsName);
					m_listFrom.SetItemText(h,3,sPrice);
					m_listFrom.SetItemText(h,4,sSpec);
					m_listFrom.SetItemText(h,5,sColor);
					m_listFrom.SetItemText(h,6,sWeight);
					m_listFrom.SetItemText(h,7,sUnit);
				}
				break;
			case 3:
				rs.Open("select * from T_Products where F_Name='"+m_sGoodsNameArra[i]+"'",adCmdText);
				if (rs.GetRecordCount() > 0)
				{
					rs.MoveFirst();
					rs.GetCollect("F_Price",sPrice);
					rs.GetCollect("F_Spec",sSpec);
					rs.GetCollect("F_Color",sColor);
					rs.GetCollect("F_Weight",sWeight);
					rs.GetCollect("F_Unit",sUnit);
				}
				rs.Close();
				rs.Open("select * from T_InOutLibRec where F_TaskKind=2 and F_OrderIndex1='"+m_sFormNum+"'",adCmdText);
				m_listFrom.DeleteAllItems();
				if (rs.GetRecordCount() > 0)
				{
					rs.MoveFirst();
					CString s;
					while (!rs.IsEOF())
					{
						for (int k=0;k<8;k++)
						{
							s.Format("%d",k);
							s = "F_Index"+s+"";
							rs.GetCollect(s,sGoodsCode);
							if (!sGoodsCode.IsEmpty())
							{
								row = m_listFrom.InsertItem(row,"");
								m_listFrom.SetItemText(row,0,m_sFormNum);
								m_listFrom.SetItemText(row,1,m_sGoodsNameArra[i]);
								m_listFrom.SetItemText(row,2,sGoodsCode);
								m_listFrom.SetItemText(row,3,sPrice);
								m_listFrom.SetItemText(row,4,sSpec);
								m_listFrom.SetItemText(row,5,sColor);
								m_listFrom.SetItemText(row,6,sWeight);
								m_listFrom.SetItemText(row,7,sUnit);
								m_listFrom.SetItemText(row,8,m_sCustomer);
								m_listFrom.SetItemText(row,9,sDate);
								row++;
							}
						}
						rs.MoveNext();
					}
				}
				break;
			}
			cn.Close();
		}
	}
	*pResult = 0;
}

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

void CDlgOrderOutlibSearch::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, rt6,rt7,rtSupp,rtGoodsName,rtNum,rtCount;
	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;

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -