dialogproduceclientlist.cpp

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

// MeterRecordView.cpp : implementation file
//

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

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

/////////////////////////////////////////////////////////////////////////////
// CDialogProduceClientList

IMPLEMENT_DYNCREATE(CDialogProduceClientList, CDialog)

CDialogProduceClientList::CDialogProduceClientList()
	: CDialog(CDialogProduceClientList::IDD)
{
	//{{AFX_DATA_INIT(CDialogProduceClientList)
	m_timeFrom = CTime::GetCurrentTime();
	m_timeTo = CTime::GetCurrentTime();
	m_nState = 0;
	m_strClient = _T("");
	m_strSerial = _T("");
	m_nFeeState = 0;
	//}}AFX_DATA_INIT
}

void CDialogProduceClientList::DoDataExchange(CDataExchange* pDX)
{
	CDialog::DoDataExchange(pDX);
	//{{AFX_DATA_MAP(CDialogProduceClientList)
	DDX_Control(pDX, IDC_LIST, m_List);
	DDX_DateTimeCtrl(pDX, IDC_FROM_DATE, m_timeFrom);
	DDX_DateTimeCtrl(pDX, IDC_TO_DATE, m_timeTo);
	DDX_CBIndex(pDX, IDC_COMBO_STATE, m_nState);
	DDX_Text(pDX, IDC_EDIT_CLIENT, m_strClient);
	DDX_Text(pDX, IDC_EDIT_SERIAL, m_strSerial);
	DDX_CBIndex(pDX, IDC_COMBO_FEE_STATE, m_nFeeState);
	//}}AFX_DATA_MAP
}


BEGIN_MESSAGE_MAP(CDialogProduceClientList, CDialog)
	//{{AFX_MSG_MAP(CDialogProduceClientList)
    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_WM_CLOSE()
	ON_NOTIFY(NM_RCLICK, IDC_LIST, OnRclickList)
	ON_WM_CHAR()
	ON_COMMAND(ID_MENU_EDIT_PRODUCT_CLIENT, OnMenuEditProductClient)
	//}}AFX_MSG_MAP
END_MESSAGE_MAP()

/////////////////////////////////////////////////////////////////////////////
// CDialogProduceClientList diagnostics

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

#endif //_DEBUG

/////////////////////////////////////////////////////////////////////////////
// CDialogProduceClientList message handlers

void CDialogProduceClientList::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 CDialogProduceClientList::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;
	if(m_nState != 0)
		strSql.Format("select *	from [ProduceClient] where [UpdateDate] between %s and %s and State = %d", strFtime, strTtime, m_nState - 1);
	else
		strSql.Format("select *	from [ProduceClient] where [UpdateDate] between %s and %s", strFtime, strTtime);

	CString substrSql[3];
	if(!m_strClient.IsEmpty())
		substrSql[0].Format("[ClientName] like '%%%s%%'", m_strClient);
	if(!m_strSerial.IsEmpty())
		substrSql[1].Format("[Serial] = '%s'", m_strSerial);
	if(m_nFeeState == 1)
		substrSql[2].Format("[FeeDate] is null");
	else if(m_nFeeState == 2)
		substrSql[2].Format("[FeeDate] is not null");

	CWaitCursor cursor; // this will automatically display a wait cursor
	for(int i = 0; i < 3; i++)
	{
		if(!substrSql[i].IsEmpty())
		{
			strSql += _T(" AND ");
			strSql += substrSql[i];
		}
	}

	i = 0;
	m_List.DeleteAllItems();
	if(m_pProduceClientSet->IsOpen())
		m_pProduceClientSet->Close();
	m_pProduceClientSet->Open(CRecordset::snapshot, strSql);
	while(!m_pProduceClientSet->IsEOF())
	{
		m_List.InsertItem(i, m_pProduceClientSet->m_Serial);
		m_List.SetItemText(i, 1, m_pProduceClientSet->m_ClientName );
		m_List.SetItemText(i, 2, m_pProduceClientSet->m_ClientAddress );
		m_List.SetItemText(i, 3, m_pProduceClientSet->m_ClientTele );
		m_List.SetItemText(i, 4, 	m_pProduceClientSet->m_ClientRemarks );
		m_List.SetItemText(i, 5,	m_pProduceClientSet->m_Production );
		if(m_pProduceClientSet->m_HandDate != 0)
		{
			strSql.Format("%d.%d.%d", m_pProduceClientSet->m_HandDate.GetYear(),m_pProduceClientSet->m_HandDate.GetMonth(),m_pProduceClientSet->m_HandDate.GetDay());
			m_List.SetItemText(i, 6, 	strSql);
		}
		m_List.SetItemText(i, 7, 	m_pProduceClientSet->m_ComputerMan );
		m_List.SetItemText(i, 8, 	m_pProduceClientSet->m_KaiLiaoMan );
		m_List.SetItemText(i, 9, 	m_pProduceClientSet->m_ProduceDayMan);
		m_List.SetItemText(i, 10, 	m_pProduceClientSet->m_ProduceNightMan);
		m_List.SetItemText(i, 11, 	m_pProduceClientSet->m_CutProductMan );
		m_List.SetItemText(i, 12, 	m_pProduceClientSet->m_ProduceRemarks );
		if(m_pProduceClientSet->m_State == 0)
			strSql = "生产中";
		else
			strSql = "完成";
		m_List.SetItemText(i, 13, 	strSql );
	
		strSql.Format("%.2f", atof(m_pProduceClientSet->m_Fee));
		m_List.SetItemText(i, 14, 	strSql );
		
		if(m_pProduceClientSet->m_FeeDate != 0)
		{
			strSql.Format("%d.%d.%d", m_pProduceClientSet->m_FeeDate.GetYear(),m_pProduceClientSet->m_FeeDate.GetMonth(),m_pProduceClientSet->m_FeeDate.GetDay());
			m_List.SetItemText(i, 15, 	strSql );
		}

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

}

BOOL CDialogProduceClientList::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,90,-1);
	m_List.InsertColumn(4,"客户说明",LVCFMT_LEFT,100,-1);
	m_List.InsertColumn(5,"产品名称",LVCFMT_LEFT,70,-1);
	m_List.InsertColumn(6,"交货日期",LVCFMT_LEFT,100,-1);
	m_List.InsertColumn(7,"电脑员",LVCFMT_LEFT,70,-1);
	m_List.InsertColumn(8,"开料员",LVCFMT_LEFT,70,-1);
	m_List.InsertColumn(9,"白天生产员",LVCFMT_LEFT,80,-1);
	m_List.InsertColumn(10,"晚上生产员",LVCFMT_LEFT,80,-1);
	m_List.InsertColumn(11,"切成品员",LVCFMT_LEFT,70,-1);
	m_List.InsertColumn(12,"生产说明",LVCFMT_LEFT,100,-1);
	m_List.InsertColumn(13,"状态",LVCFMT_LEFT,60,-1);
	m_List.InsertColumn(14,"已缴金额",LVCFMT_LEFT,80,-1);
	m_List.InsertColumn(15,"结算日期",LVCFMT_LEFT,100,-1);

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


void CDialogProduceClientList::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 CDialogProduceClientList::PostNcDestroy() 
{
	// TODO: Add your specialized code here and/or call the base class
	
	CMDIChild::DelClassChild(this);
	CDialog::PostNcDestroy();
}

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

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

void CDialogProduceClientList::OnRclickList(NMHDR* pNMHDR, LRESULT* pResult) 
{
	// TODO: Add your control notification handler code here
	m_nSelectItem = 0;
	POSITION pos = m_List.GetFirstSelectedItemPosition();
	if (pos != NULL)
	{
	   while (pos)
	   {
			m_nSelectItem = m_List.GetNextSelectedItem(pos);
	   }
	}
	else
	{
		*pResult = 0;
		return;
	}

	CPoint pt;
	pt.x= GetCurrentMessage()->pt.x;
	pt.y= GetCurrentMessage()->pt.y;

//	CMenu* menu_bar = AfxGetMainWnd()->GetMenu();
//	CMenu* file_menu = menu_bar->GetSubMenu(7);    
//	ASSERT(file_menu);

//	file_menu->TrackPopupMenu(TPM_LEFTALIGN |TPM_RIGHTBUTTON, pt.x, 
//	  pt.y, this);

	CMenu menu;
	if (menu.LoadMenu(ID_POPUP_MENU))
	{
		CMenu* pPopup = menu.GetSubMenu(0);
		ASSERT(pPopup != NULL);

		pPopup->TrackPopupMenu(TPM_LEFTALIGN | TPM_RIGHTBUTTON,
		pt.x, pt.y,	this); // use main window for cmds
	}

	
	*pResult = 0;
}

#include "DialogProduceClient.h"
void CDialogProduceClientList::OnMenuEditProductClient() 
{
	// TODO: Add your command handler code here
	CDialogProduceClient dlg;
	dlg.m_pProduceClientSet = m_pProduceClientSet;
	dlg.m_pProductWareSet = m_pProductWareSet;
	dlg.m_pWareModeSet = m_pWareModeSet;
	dlg.m_pWarePurposeSet = m_pWarePurposeSet;
	dlg.m_pWareTypeSet = m_pWareTypeSet;
	dlg.m_pOperatorSet = m_pOperatorSet;
	dlg.m_strOperatorId = m_strOperatorId;
	dlg.m_strSerial = m_List.GetItemText(m_nSelectItem, 0);
	dlg.DoModal();
}