dialoginlist.cpp

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

// MeterRecordView.cpp : implementation file
//

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

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

/////////////////////////////////////////////////////////////////////////////
// CDialogInList

IMPLEMENT_DYNCREATE(CDialogInList, CDialog)

CDialogInList::CDialogInList()
	: CDialog(CDialogInList::IDD)
{
	//{{AFX_DATA_INIT(CDialogInList)
	m_timeFrom = CTime::GetCurrentTime();
	m_timeTo = CTime::GetCurrentTime();
	m_strWareType = _T("");
	m_strWareMode = _T("");
	m_strWareProvider = _T("");
	//}}AFX_DATA_INIT
}

void CDialogInList::DoDataExchange(CDataExchange* pDX)
{
	CDialog::DoDataExchange(pDX);
	//{{AFX_DATA_MAP(CDialogInList)
	DDX_Control(pDX, IDC_COMBO_WARE_MODE, m_ComboWareMode);
	DDX_Control(pDX, IDC_LIST, m_List);
	DDX_Control(pDX, IDC_COMBO_WARE_TYPE, m_ComboWareType);
	DDX_DateTimeCtrl(pDX, IDC_FROM_DATE, m_timeFrom);
	DDX_DateTimeCtrl(pDX, IDC_TO_DATE, m_timeTo);
	DDX_CBString(pDX, IDC_COMBO_WARE_TYPE, m_strWareType);
	DDX_Control(pDX, IDC_COMBO_WARE_PURPOSE, m_ComboWarePurpose);
	DDX_CBString(pDX, IDC_COMBO_WARE_PURPOSE, m_strWarePurpose);
	DDX_CBString(pDX, IDC_COMBO_WARE_MODE, m_strWareMode);
	DDX_Text(pDX, IDC_EDIT_WARE_PROVIDER, m_strWareProvider);
	//}}AFX_DATA_MAP
}


BEGIN_MESSAGE_MAP(CDialogInList, CDialog)
	//{{AFX_MSG_MAP(CDialogInList)
    ON_MESSAGE(WM_KICKIDLE, OnKickIdle)
	ON_BN_CLICKED(IDC_BUTTON_OUT_EXCEL, OnButtonOutExcel)
	ON_BN_CLICKED(IDC_BUTTON_SEARCH, OnButtonSearch)
	ON_BN_CLICKED(IDC_LIST_PRINT, OnListPrint)
	ON_CBN_SELCHANGE(IDC_COMBO_WARE_PURPOSE, OnSelchangeComboWarePurpose)
	ON_WM_CLOSE()
	ON_CBN_SELCHANGE(IDC_COMBO_WARE_TYPE, OnSelchangeComboWareType)
	ON_WM_CHAR()
	//}}AFX_MSG_MAP
END_MESSAGE_MAP()

/////////////////////////////////////////////////////////////////////////////
// CDialogInList diagnostics

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

#endif //_DEBUG

/////////////////////////////////////////////////////////////////////////////
// CDialogInList message handlers

void CDialogInList::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());
    
	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 str,header1,header2;
	  int i,k;
      HDITEM hdi;

	  header1 =  "list ( ";
	  header2 =  "list ( ";
	  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;
		  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++)
	  {
		  str = " VALUES (";
		  for(k = 0; k <  m_List.GetHeaderCtrl()->GetItemCount(); k++)
		  {
			  str += "'";
			  str += m_List.GetItemText(i,k);
			  str += "',";
		  }
		  str.Delete(str.GetLength() - 1);
		  sSql = "INSERT INTO ";
		  sSql += header1;
		  sSql += str;
		  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 CDialogInList::OnButtonSearch() 
{
	// TODO: Add your control notification handler code here
	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	strSql;
	CString substrSql[4];
	if(m_strWarePurpose != "全部")
	{
		m_pWarePurposeSet->MoveFirst();
		while(!m_pWarePurposeSet->IsEOF())
		{
			if(m_pWarePurposeSet->m_WarePurpose == m_strWarePurpose)
			{
				substrSql[0].Format("[WarePurposeId] = %d", m_pWarePurposeSet->m_Id);
				break;
			}

			m_pWarePurposeSet->MoveNext();
		}
	}
	if(m_strWareType != "全部")
	{
		m_pWareTypeSet->MoveFirst();
		while(!m_pWareTypeSet->IsEOF())
		{
			if(m_pWareTypeSet->m_WareType == m_strWareType)
			{
				substrSql[1].Format("[WareTypeId] = %d", m_pWareTypeSet->m_Id);
				break;
			}

			m_pWareTypeSet->MoveNext();
		}
	}
	if(m_strWareMode != "全部")
	{
		m_pWareModeSet->MoveFirst();
		while(!m_pWareModeSet->IsEOF())
		{
			if(m_pWareModeSet->m_WareMode == m_strWareMode)
			{
				substrSql[2].Format("[WareModeId] = %d", m_pWareModeSet->m_Id);
				break;
			}

			m_pWareModeSet->MoveNext();
		}
	}
	if(!m_strWareProvider.IsEmpty())
		substrSql[3].Format("[WareProvidor] like '%%%s%%'", m_strWareProvider);

	CWaitCursor cursor; // this will automatically display a wait cursor
	strSql.Format("select *	from [InWare] where [UpdateDate] between %s and %s", strFtime, strTtime);
	for(int i = 0; i < 4; i++)
	{
		if(!substrSql[i].IsEmpty())
		{
			strSql += _T(" AND ");
			strSql += substrSql[i];
		}
	}

	if(m_pInWareSet->IsOpen())
		m_pInWareSet->Close();
	m_pInWareSet->Open(CRecordset::snapshot, strSql);
	i = 0;
	m_List.DeleteAllItems();
	double sellmoney = 0;
	while(!m_pInWareSet->IsEOF())
	{
		m_pWarePurposeSet->MoveFirst();
		while(!m_pWarePurposeSet->IsEOF())
		{
			if(m_pWarePurposeSet->m_Id == m_pInWareSet->m_WarePurposeId)
				break;

			m_pWarePurposeSet->MoveNext();
		}
		m_pWareTypeSet->MoveFirst();
		while(!m_pWareTypeSet->IsEOF())
		{
			if(m_pWareTypeSet->m_Id == m_pInWareSet->m_WareTypeId)
				break;

			m_pWareTypeSet->MoveNext();
		}
		m_pWareModeSet->MoveFirst();
		while(!m_pWareModeSet->IsEOF())
		{
			if(m_pWareModeSet->m_Id == m_pInWareSet->m_WareModeId)
				break;

			m_pWareModeSet->MoveNext();
		}

		m_List.InsertItem(i, m_pWarePurposeSet->m_WarePurpose);
		m_List.SetItemText(i, 1, m_pWareTypeSet->m_WareType );
		m_List.SetItemText(i, 2, m_pWareModeSet->m_WareMode );
		m_List.SetItemText(i, 3, m_pWareTypeSet->m_Unit );
		strSql.Format("%.2f", atof(m_pInWareSet->m_Price));
		m_List.SetItemText(i, 4, 	strSql );
		strSql.Format("%.2f", m_pInWareSet->m_Number);
		m_List.SetItemText(i, 5,	strSql );
		m_List.SetItemText(i, 6, 	m_pInWareSet->m_StockManId);
		m_List.SetItemText(i, 7, 	m_pInWareSet->m_WareProvidor );
		m_List.SetItemText(i, 8, 	m_pInWareSet->m_Factory );
		m_List.SetItemText(i, 9, 	m_pInWareSet->m_ConnectTele);
		m_List.SetItemText(i, 10, 	m_pInWareSet->m_Remarks);
		m_List.SetItemText(i, 11, 	m_pInWareSet->m_OperatorId );
		strSql.Format("%d.%d.%d", m_pInWareSet->m_UpdateDate.GetYear(),m_pInWareSet->m_UpdateDate.GetMonth(),m_pInWareSet->m_UpdateDate.GetDay());
		m_List.SetItemText(i, 12, 	strSql );

		sellmoney += atof(m_pInWareSet->m_Price) * m_pInWareSet->m_Number;
		m_pInWareSet->MoveNext();
		i++;
	}

	strSql.Format("%.2f", sellmoney);
	m_List.InsertItem(i, "金额总和" );
	m_List.SetItemText(i, 1, strSql);

}

BOOL CDialogInList::OnInitDialog() 
{
	CDialog::OnInitDialog();
	
	// TODO: Add extra initialization here
	m_List.SetExtendedStyle
	   (m_List.GetExtendedStyle()|LVS_EX_FULLROWSELECT | LVS_EX_GRIDLINES);
	m_List.InsertColumn(0,"原材料种类",LVCFMT_LEFT,100,-1);
	m_List.InsertColumn(1,"物品名",LVCFMT_LEFT,100,-1);
	m_List.InsertColumn(2,"物品型号",LVCFMT_LEFT,100,-1);
	m_List.InsertColumn(3,"计量单位",LVCFMT_LEFT,70,-1);
	m_List.InsertColumn(4,"进货单价",LVCFMT_LEFT,80,-1);
	m_List.InsertColumn(5,"进货数量",LVCFMT_LEFT,70,-1);
	m_List.InsertColumn(6,"采购员",LVCFMT_LEFT,60,-1);
	m_List.InsertColumn(7,"供货商",LVCFMT_LEFT,100,-1);
	m_List.InsertColumn(8,"产地",LVCFMT_LEFT,100,-1);
	m_List.InsertColumn(9,"联系电话",LVCFMT_LEFT,90,-1);
	m_List.InsertColumn(10,"备注",LVCFMT_LEFT,80,-1);
	m_List.InsertColumn(11,"入库人",LVCFMT_LEFT,60,-1);
	m_List.InsertColumn(12,"入库时间",LVCFMT_LEFT,100,-1);

	m_pWarePurposeSet->MoveFirst();
	m_ComboWarePurpose.AddString("全部");
	while(!m_pWarePurposeSet->IsEOF())
	{
		m_ComboWarePurpose.AddString(m_pWarePurposeSet->m_WarePurpose);
		m_pWarePurposeSet->MoveNext();
	}
	m_ComboWarePurpose.SetCurSel(0);
	OnSelchangeComboWarePurpose();

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


void CDialogInList::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 CDialogInList::OnSelchangeComboWarePurpose() 
{
	// TODO: Add your control notification handler code here
	UpdateData();
	if(m_strWarePurpose == "全部")
	{
		m_ComboWareType.ResetContent();
		m_ComboWareType.AddString("全部");
		m_ComboWareType.SetCurSel(0);
		m_ComboWareMode.ResetContent();
		m_ComboWareMode.AddString("全部");
		m_ComboWareMode.SetCurSel(0);
		return;
	}

	m_pWarePurposeSet->MoveFirst();
	while(!m_pWarePurposeSet->IsEOF())
	{
		if(m_strWarePurpose == m_pWarePurposeSet->m_WarePurpose)
		{
			m_pWareTypeSet->MoveFirst();
			m_ComboWareType.ResetContent();
			m_ComboWareType.AddString("全部");
			while(!m_pWareTypeSet->IsEOF())
			{
				if(m_pWarePurposeSet->m_Id == m_pWareTypeSet->m_WarePurposeId)
					m_ComboWareType.AddString(m_pWareTypeSet->m_WareType);
				m_pWareTypeSet->MoveNext();
			}
			m_ComboWareType.SetCurSel(0);
			break;
		}

		m_pWarePurposeSet->MoveNext();
	}

	OnSelchangeComboWareType();
}

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

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

void CDialogInList::OnSelchangeComboWareType() 
{
	// TODO: Add your control notification handler code here
	UpdateData();
	if(m_strWareType == "全部")
	{
		m_ComboWareMode.ResetContent();
		m_ComboWareMode.AddString("全部");
		m_ComboWareMode.SetCurSel(0);
		return;
	}

	m_pWareTypeSet->MoveFirst();
	while(!m_pWareTypeSet->IsEOF())
	{
		if(m_strWareType == m_pWareTypeSet->m_WareType)
		{
			m_ComboWareMode.ResetContent();
			m_ComboWareMode.AddString("全部");
			m_pWareModeSet->MoveFirst();
			while(!m_pWareModeSet->IsEOF())
			{
				if(m_pWareModeSet->m_WareTypeId == m_pWareTypeSet->m_Id)
					m_ComboWareMode.AddString(m_pWareModeSet->m_WareMode);
				m_pWareModeSet->MoveNext();
			}
			m_ComboWareMode.SetCurSel(0);
			break;
		}

		m_pWareTypeSet->MoveNext();
	}	
	
}

LRESULT CDialogInList::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 CDialogInList::OnCancel() 
{
	// TODO: Add extra cleanup here
	
	CDialog::OnCancel();
	DestroyWindow();
}