dialogoutstat.cpp

以前给一个印刷厂开发的业务管理软件

// MeterRecordView.cpp : implementation file
//

#include "stdafx.h"
#include "DialogOutStat.h"
#include "printfile//ListCtrlPrint.h"

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

/////////////////////////////////////////////////////////////////////////////
// CDialogOutStat

IMPLEMENT_DYNCREATE(CDialogOutStat, CDialog)

CDialogOutStat::CDialogOutStat()
	: CDialog(CDialogOutStat::IDD)
{
	//{{AFX_DATA_INIT(CDialogOutStat)
	m_timeFrom = CTime::GetCurrentTime();
	m_timeTo = CTime::GetCurrentTime();
	//}}AFX_DATA_INIT
}

void CDialogOutStat::DoDataExchange(CDataExchange* pDX)
{
	CDialog::DoDataExchange(pDX);
	//{{AFX_DATA_MAP(CDialogOutStat)
	DDX_Control(pDX, IDC_LIST_PHONE, m_List);
	DDX_DateTimeCtrl(pDX, IDC_FROM_DATETIME, m_timeFrom);
	DDX_DateTimeCtrl(pDX, IDC_TO_DATETIME, m_timeTo);
	//}}AFX_DATA_MAP
}


BEGIN_MESSAGE_MAP(CDialogOutStat, CDialog)
	//{{AFX_MSG_MAP(CDialogOutStat)
    ON_MESSAGE(WM_KICKIDLE, OnKickIdle)
	ON_BN_CLICKED(IDC_LIST_PRINT, OnListPrint)
	ON_BN_CLICKED(IDC_BUTTON_OUT_EXCEL, OnButtonOutExcel)
	ON_BN_CLICKED(IDC_BUTTON_SEARCH, OnButtonSearch)
	ON_WM_CLOSE()
	ON_WM_CHAR()
	//}}AFX_MSG_MAP
END_MESSAGE_MAP()

/////////////////////////////////////////////////////////////////////////////
// CDialogOutStat diagnostics

#ifdef _DEBUG
void CDialogOutStat::AssertValid() const
{
	CDialog::AssertValid();
}

#endif //_DEBUG

/////////////////////////////////////////////////////////////////////////////
// CDialogOutStat message handlers

BOOL CDialogOutStat::OnInitDialog() 
{
	CDialog::OnInitDialog();
	
	// TODO: Add extra initialization here
	CenterWindow();

	m_List.SetExtendedStyle
	   (m_List.GetExtendedStyle()|LVS_EX_FULLROWSELECT | LVS_EX_GRIDLINES);
	m_List.InsertColumn(0,"部门",LVCFMT_LEFT,160,-1);
	m_List.InsertColumn(1,"物品名",LVCFMT_LEFT,160,-1);
	m_List.InsertColumn(2,"型号",LVCFMT_LEFT,160,-1);
	m_List.InsertColumn(3,"计量单位",LVCFMT_LEFT,120,-1);
	m_List.InsertColumn(4,"数量合计",LVCFMT_LEFT,160,-1);
	m_List.InsertColumn(5,"金额",LVCFMT_LEFT,120,-1);

	if(m_pDepartmentSet->IsOpen())
		m_pDepartmentSet->Close();
	m_pDepartmentSet->Open();

	return TRUE;  // return TRUE unless you set the focus to a control
	              // EXCEPTION: OCX Property Pages should return FALSE
}

void CDialogOutStat::OnListPrint() 
{
	// TODO: Add your control notification handler code here
	if(m_List.GetItemCount() == 0)
		return;

	CListCtrlPrint cJob;
	CTime t = CTime::GetCurrentTime();
	cJob.csPageHead = "出库物品统计\r\n";
	cJob.csPageFooter.Format("打印日期：%d年%d月%d日\r\n", t.GetYear(), t.GetMonth(), t.GetDay());
	cJob.csPage = " %d页 / %d";
	cJob.pList = &m_List;
	cJob.OnFilePrint();
	
}

void CDialogOutStat::OnButtonSearch()
{
	UpdateData();
	CString strFtime, strTtime;
#if !defined(_ACCESS_DB)
	strFtime.Format("'%d/%d/%d'",m_timeFrom.GetMonth(),m_timeFrom.GetDay(),m_timeFrom.GetYear());
	strTtime.Format("'%d/%d/%d 23:59:59'",m_timeTo.GetMonth(),m_timeTo.GetDay(),m_timeTo.GetYear());
#endif
#if defined(_ACCESS_DB)
	strFtime.Format("#%d/%d/%d#",m_timeFrom.GetMonth(),m_timeFrom.GetDay(),m_timeFrom.GetYear());
	strTtime.Format("#%d/%d/%d 23:59:59#",m_timeTo.GetMonth(),m_timeTo.GetDay(),m_timeTo.GetYear());
#endif
	CString substrSql;
	substrSql.Format("[UpdateDate] between %s and %s", strFtime, strTtime);

	CString strSql;
	strSql.Format("select DepartmentId,WareTypeId, WareModeId,sum([Number]),sum(Number*Price) from [OutWare] where %s \
		 group by DepartmentId,WareTypeId, WareModeId", substrSql);

	CWaitCursor cursor; // this will automatically display a wait cursor
	if(m_pItemCountOrderSet->IsOpen())
		m_pItemCountOrderSet->Close();
	m_pItemCountOrderSet->Open(CRecordset::snapshot, strSql);
	int i = 0;
	m_List.DeleteAllItems();
	while(!m_pItemCountOrderSet->IsEOF())
	{
		strSql.Format("%d", m_pItemCountOrderSet->m_Long1);
		m_List.InsertItem(i, strSql);
		strSql.Format("%d", m_pItemCountOrderSet->m_Long2);
		m_List.SetItemText(i, 1, strSql);
		strSql.Format("%d", m_pItemCountOrderSet->m_Long3);
		m_List.SetItemText(i, 2, strSql);
		strSql.Format("%.2f", m_pItemCountOrderSet->m_Double1);
		m_List.SetItemText(i, 4, strSql);
		strSql.Format("%.2f", m_pItemCountOrderSet->m_Double2);
		m_List.SetItemText(i, 5, strSql);

		i++;
		m_pItemCountOrderSet->MoveNext();
	}

	m_pDepartmentSet->MoveFirst();
	while(!m_pDepartmentSet->IsEOF())
	{
		for(i = 0; i < m_List.GetItemCount(); i++)
		{
			if(atoi(m_List.GetItemText(i,0)) == m_pDepartmentSet->m_Id)
				m_List.SetItemText(i,0,m_pDepartmentSet->m_Department);
		}
		m_pDepartmentSet->MoveNext();
	}

	m_pWareTypeSet->MoveFirst();
	while(!m_pWareTypeSet->IsEOF())
	{
		for(i = 0; i < m_List.GetItemCount(); i++)
		{
			if(atoi(m_List.GetItemText(i,1)) == m_pWareTypeSet->m_Id)
			{
				m_List.SetItemText(i,1,m_pWareTypeSet->m_WareType);
				m_List.SetItemText(i,3,m_pWareTypeSet->m_Unit);
			}
		}
		m_pWareTypeSet->MoveNext();
	}

	m_pWareModeSet->MoveFirst();
	while(!m_pWareModeSet->IsEOF())
	{
		for(i = 0; i < m_List.GetItemCount(); i++)
		{
			if(atoi(m_List.GetItemText(i,2)) == m_pWareModeSet->m_Id)
				m_List.SetItemText(i,2,m_pWareModeSet->m_WareMode);
		}
		m_pWareModeSet->MoveNext();
	}

}

void CDialogOutStat::OnButtonOutExcel() 
{
	// TODO: Add your control notification handler code here
	int answer = MessageBox("确定导出？","确定", MB_OKCANCEL);
	if(answer != IDOK)
		return;

	CWaitCursor cursor; // this will automatically display a wait cursor
	CTime t = CTime::GetCurrentTime();
	CDatabase database;
	CString sDriver = "MICROSOFT EXCEL DRIVER (*.XLS)"; // exactly the same name as in the ODBC-Manager
	CString sExcelFile;// = "c:\\demo.xls";                // Filename and path for the file to be created
	CString sSql;
	sExcelFile.Format("c:\\出库物品统计_%d%d%d%d%d.xls", t.GetYear(),t.GetMonth(),t.GetDay(),t.GetHour(),t.GetMinute());
	static char BASED_CODE szFilter[] = "Worksheet Files (*.xls)|*.xls|";
	CFileDialog dlg(FALSE,"xls", sExcelFile, OFN_HIDEREADONLY | OFN_OVERWRITEPROMPT, szFilter);
	dlg.DoModal();
	sExcelFile = dlg.GetPathName();
    
	TRY
	{
    // Build the creation string for access without DSN
    sSql.Format("DRIVER={%s};DSN='';FIRSTROWHASNAMES=1;READONLY=FALSE;CREATE_DB=\"%s\";DBQ=%s", sDriver,sExcelFile,sExcelFile);
    // Create the database (i.e. Excel sheet)
    if( database.OpenEx(sSql,CDatabase::noOdbcDialog) )
    {
      // Create table structure
  	  CString strSql,header1,header2;
	  int i,k;
      HDITEM hdi;

	  header1 =  "Account ( ";
	  header2 =  "Account ( ";
	  char cc[50];
	  for(k = 0; k < m_List.GetHeaderCtrl()->GetItemCount(); k++)
	  {
			hdi.mask = HDI_TEXT;
			hdi.pszText = cc;
			hdi.cchTextMax = 50;
		   m_List.GetHeaderCtrl()->GetItem(k, &hdi);
		  header1 += cc;
		  header1 += ",";
		  header2 += cc;
		  if(k == 3 || k == 5)
			  header2 += " float,";
		  else
			  header2 += " TEXT,";
	  }
	  header1.Delete(header1.GetLength() - 1);
	  header1 += ")";
	  header2.Delete(header2.GetLength() - 1);
	  header2 += ")";

      sSql = "CREATE TABLE ";
	  sSql += header2;
      database.ExecuteSQL(sSql);

      // Insert data
     for(i = 0; i < m_List.GetItemCount(); i++)
	  {
		  strSql = " VALUES (";
		  for(k = 0; k <  m_List.GetHeaderCtrl()->GetItemCount(); k++)
		  {
			  if(k == 3 || k == 5)
			  {
				  strSql += m_List.GetItemText(i,k);
				  strSql += ",";
			  }
			  else
			  {
				  strSql += "'";
				  strSql += m_List.GetItemText(i,k);
				  strSql += "',";
			  }
		  }
		  strSql.Delete(strSql.GetLength() - 1);
		  sSql = "INSERT INTO ";
		  sSql += header1;
		  sSql += strSql;
		  sSql += ")";
		  database.ExecuteSQL(sSql);
	  }    
	}
    // Close database
    database.Close();
  }
  CATCH_ALL(e)
  {
	  TRACE1("Driver not installed: %s",sDriver);
	  sSql.Format("Driver not installed: %s",sDriver);
	  MessageBox(sSql);
	  return;
  }
  END_CATCH_ALL;
	
  sSql.Format("文件：%s，导出成功", sExcelFile);
  MessageBox(sSql);
		
}

void CDialogOutStat::PostNcDestroy() 
{
	// TODO: Add your specialized code here and/or call the base class
	
	CMDIChild::DelClassChild(this);
	CDialog::PostNcDestroy();
}

void CDialogOutStat::OnClose() 
{
	// TODO: Add your message handler code here and/or call default
	
	CDialog::OnClose();
	DestroyWindow();
}

LRESULT CDialogOutStat::OnKickIdle(WPARAM, LPARAM lCount)
{
       // Do idle processing here, just like CWinApp::OnIdle
       //
	Sleep(100); //1ms

	if(lCount >= 6000) //5分钟5*60*1000=3000*100
	{
		CDialogEnter dlg;
		dlg.m_strUser = m_strOperatorId;
		dlg.m_pOperatorSet = m_pOperatorSet;
		dlg.DoModal();
		return FALSE;
	}
   return TRUE;
}

void CDialogOutStat::OnCancel() 
{
	// TODO: Add extra cleanup here
	
	CDialog::OnCancel();
	DestroyWindow();
}