开通博客赚积分
发布资源赚积分
分类

源码开发语言/平台
当前位置：首页 > 源码/资料 > 行业应用 > 酒店行业 > 查看源码
PosDlg.cpp
资源名称：jdcy.rar　[点击查看]
上传用户：sztwq510
上传日期：2013-06-26
资源大小：4045k
文件大小：37k
源码类别：

酒店行业

开发平台：

Java

PosDlg.cpp：源码内容
  1. // PosDlg.cpp : implementation file
  2. //
  4. #include "stdafx.h"
  5. #include "MyPos.h"
  6. #include "PosDlg.h"
  7. #include "SelectDlg.h"
  8. #include "ModifyqaDlg.h"
  9. #include "CallDlg.h"
  10. #include "CheckDlg.h"
  11. #include "OffdutyDlg.h"
  13. #ifdef _DEBUG
  14. #define new DEBUG_NEW
  15. #undef THIS_FILE
  16. static char THIS_FILE[] = __FILE__;
  17. #endif
  19. /////////////////////////////////////////////////////////////////////////////
  20. // CPosDlg dialog
  21. extern CMyPosApp theApp;
  24. CPosDlg::CPosDlg(CWnd* pParent /*=NULL*/)
  25. : CDialog(CPosDlg::IDD, pParent)
  26. {
  27. //{{AFX_DATA_INIT(CPosDlg)
  28. //}}AFX_DATA_INIT
  29. }
  32. void CPosDlg::DoDataExchange(CDataExchange* pDX)
  33. {
  34. CDialog::DoDataExchange(pDX);
  35. //{{AFX_DATA_MAP(CPosDlg)
  36. DDX_Control(pDX, IDC_EDIT_ACTTOTAL, m_oActtotal);
  37. DDX_Control(pDX, IDC_EDIT_TOTAL, m_oTotal);
  38. DDX_Control(pDX, IDC_BUTTON_SELMATERIEL, m_oButton);
  39. DDX_Control(pDX, IDC_LIST_FORM, m_oFormlist);
  40. DDX_Control(pDX, IDC_EDIT_BEGINTIME, m_oBegintime);
  41. DDX_Control(pDX, IDC_EDIT_ENDTIME, m_oEndtime);
  42. DDX_Control(pDX, IDC_EDIT_CKECK, m_oCheck);
  43. DDX_Control(pDX, IDC_EDIT_STATUS, m_oStatus);
  44. DDX_Control(pDX, IDC_EDIT_PEASONS, m_oPeasons);
  45. DDX_Control(pDX, IDC_EDIT_TABLENO, m_oTableno);
  46. DDX_Control(pDX, IDC_LIST_BILL, m_oListbill);
  47. //}}AFX_DATA_MAP
  48. }
  51. BEGIN_MESSAGE_MAP(CPosDlg, CDialog)
  52. //{{AFX_MSG_MAP(CPosDlg)
  53. ON_BN_CLICKED(IDC_BUTTON_ADDF, OnButtonAddf)
  54. ON_LBN_SELCHANGE(IDC_LIST_BILL, OnSelchangeListBill)
  55. ON_BN_CLICKED(IDC_BUTTON_SELMATERIEL, OnButtonSelmateriel)
  56. ON_NOTIFY(NM_DBLCLK, IDC_LIST_FORM, OnDblclkListForm)
  57. ON_BN_CLICKED(IDC_BUTTON_CALLF, OnButtonCallf)
  58. ON_BN_CLICKED(IDC_BUTTON_DELF, OnButtonDelf)
  59. ON_BN_CLICKED(IDC_BUTTON_HIDEF, OnButtonHidef)
  60. ON_BN_CLICKED(IDC_BUTTON_CHECKF, OnButtonCheckf)
  61. ON_EN_KILLFOCUS(IDC_EDIT_TABLENO, OnKillfocusEditTableno)
  62. ON_EN_KILLFOCUS(IDC_EDIT_PEASONS, OnKillfocusEditPeasons)
  63. ON_BN_CLICKED(IDC_BUTTON_OFF, OnButtonOff)
  64. ON_BN_CLICKED(IDC_BUTTON_FINDF, OnButtonFindf)
  65. ON_BN_CLICKED(IDC_BUTTON_LOCALP, OnButtonLocalp)
  66. //}}AFX_MSG_MAP
  67. ON_MESSAGE(WM_APPLY,OnMyMessage)//Map WM_APPLY message to OnMyMessage function.
  68. ON_MESSAGE(WM_CHECKOUT,OnMyCheckMessage)//Map WM_CHECKOUT message to OnMyMessage function.
  69. END_MESSAGE_MAP()
  71. /////////////////////////////////////////////////////////////////////////////
  72. // CPosDlg message handlers
  74. BOOL CPosDlg::OnInitDialog() 
  75. {
  76. CDialog::OnInitDialog();
  78. //设置list控件的文字和背景颜色
  79. m_oFormlist.SetBkColor(RGB(255,255,255));
  80. m_oFormlist.SetTextBkColor(RGB(161,223,212));
  82. //清空list控件的数据
  83. for(int delcolumn=100;delcolumn>=0;delcolumn--)
  84. m_oFormlist.DeleteColumn(delcolumn);
  85. //设置list对话框的列
  86. DWORD dwStyle;
  87. RECT rect;
  88. LV_COLUMN lvc;
  90. dwStyle = m_oFormlist.GetStyle();
  91. dwStyle |= LVS_EX_GRIDLINES |LVS_EX_FULLROWSELECT |LVS_SHOWSELALWAYS |LVS_EDITLABELS ;
  93. m_oFormlist.SetExtendedStyle(dwStyle);
  94. m_oFormlist.GetClientRect(&rect);
  96. lvc.mask = LVCF_TEXT | LVCF_SUBITEM | LVCF_WIDTH |LVCF_FMT;
  97. lvc.fmt=LVCFMT_LEFT;
  99. lvc.iSubItem = 0;
  100. lvc.pszText = _T("序号");
  101. lvc.cx = 70;
  102. m_oFormlist.InsertColumn(1,&lvc);
  104. lvc.iSubItem = 1;
  105. lvc.pszText = _T("名称");
  106. lvc.cx = 220;
  107. m_oFormlist.InsertColumn(2,&lvc);
  109. lvc.iSubItem = 2;
  110. lvc.pszText = _T("数量");
  111. lvc.cx = 80;
  112. m_oFormlist.InsertColumn(3,&lvc);
  114. lvc.iSubItem = 3;
  115. lvc.pszText = _T("金额");
  116. lvc.cx = 120;
  117. m_oFormlist.InsertColumn(4,&lvc);
  119. //Add all bill whos state is "等待" to listbill.
  120. CString sql="Select * from SALEBILL where STATUS<>'已结帐'";
  121. _RecordsetPtr m_pRecordset; //Must define it in function!!!!
  122. try
  123. { 
  124. m_pRecordset.CreateInstance("ADODB.Recordset");
  125. m_pRecordset->Open((_variant_t)sql,_variant_t((IDispatch*)theApp.m_pConnection,true),adOpenStatic,adLockOptimistic,adCmdText);
  127. while(!m_pRecordset->adoEOF)
  128. {
  129. m_oListbill.AddString((LPCTSTR)(_bstr_t)m_pRecordset->GetCollect("ID"));
  130. m_pRecordset->MoveNext();
  131. }
  132. m_pRecordset->Close();
  133. }
  134. catch(_com_error e)///捕捉异常
  135. {
  136. CString stemp;
  137. stemp.Format("[初始化]读取 '等待' 单据出错:%s",e.ErrorMessage());
  138. AfxMessageBox(stemp);
  139. }
  141. //Select the last billid in listbox and read its items to listctrl and head to edit.
  142. int ncount=m_oListbill.GetCount();
  143. if(ncount>0)
  144. {
  145. CString sbillid;
  146. int nselect;
  147. nselect=m_oListbill.SetCurSel(ncount-1);
  148. m_oListbill.GetText(nselect,sbillid);
  149. ReadBillHead(sbillid);
  150. ReadToFormlist(sbillid);
  151. }
  152. else
  153. {
  154. //Put the button to the first list row.
  155. //将button移到合适的位置并设置其大小
  156. m_oFormlist.GetWindowRect(&rect);
  157. m_oButton.MoveWindow(440,95, rect.right/33, rect.bottom/25);
  158. m_oButton.BringWindowToTop();
  159. m_oButton.ShowWindow(SW_SHOW);//从隐藏变为显示
  160. }
  161. theApp.pWnd=GetSafeHwnd();//Initialize pWnd;
  162. m_BMButton3.AutoLoad(IDC_BUTTON_ADDF,this);
  188. return TRUE;  // return TRUE unless you set the focus to a control
  189.               // EXCEPTION: OCX Property Pages should return FALSE
  190. }
  192. void CPosDlg::OnButtonAddf() 
  193. {
  194. CString snowtime,sfloor,snewid,sbillno;
  195. CString sql;
  196. _RecordsetPtr m_pRecordset; //Must define it in function!!!!
  198. sfloor=GetCompanyFloor(FALSE);
  199. //Clear the edit ctrl.
  200. m_oTableno.SetWindowText("");
  201. m_oPeasons.SetWindowText("");
  203. //得到系统时间
  204. CTime now=CTime::GetCurrentTime();
  205. snowtime=now.Format(_T("%Y-%m-%d %H:%M:%S"));
  207. sbillno=GenNewBillID();
  208. sql="Insert into SALEBILL (ID,BEGINDATE,STATUS,TOTAL,ACTTOTAL,PAYMODE,FLOOR) values ('"+sbillno+"','"+snowtime+"','等待',0,0,1,'"+sfloor+"')";
  209. try
  210. { 
  211. _variant_t RecordsAffected;
  212. theApp.m_pConnection->Execute((_bstr_t)sql,&RecordsAffected,adCmdText);
  213. }
  214. catch(_com_error e)///捕捉异常
  215. {
  216. CString temp;
  217. temp.Format("[开单]生成单据出错:%s",e.ErrorMessage());
  218. AfxMessageBox(temp);
  219. return;
  220. }
  221. m_oStatus.SetWindowText("等待");
  222. m_oBegintime.SetWindowText(snowtime);
  223. m_oTotal.SetWindowText("0.00");
  224. m_oActtotal.SetWindowText("0.00");
  226. m_oListbill.AddString(sbillno);
  227. m_oListbill.SelectString(-1,sbillno);
  228. theApp.scallid=sbillno;//Get current bill id.
  229. m_oFormlist.DeleteAllItems();
  231. RECT rect;
  232. m_oFormlist.GetWindowRect(&rect);
  233. m_oButton.MoveWindow(440,95, rect.right/40, rect.bottom/35);
  234. m_oButton.BringWindowToTop();
  235. m_oButton.ShowWindow(SW_SHOW);//从隐藏变为显示
  236. }
  238. CString CPosDlg::GenNewBillID()
  239. {
  240. CString sql,snowtime;
  241. CString sNewID,scurid,snewid;
  242. long lnewid,lcount;
  243. _RecordsetPtr m_pRecordset; //Must define it in function!!!!
  245. //得到系统时间
  246. CTime now=CTime::GetCurrentTime();
  247. snowtime=now.Format(_T("%Y%m%d"));
  248. sql="Select count(*) as XXX from SALEBILL where ID like '"+snowtime+"%""'";
  250. lcount=GetRecordCount(sql);
  251. if(lcount==0)
  252. {
  253. sNewID.Format("%s-00001",snowtime);
  254. return sNewID;
  255. }
  257. sql="Select Max(ID) as AAA from SALEBILL where ID like '"+snowtime+"%""'";
  258. try
  259. { 
  260. m_pRecordset.CreateInstance("ADODB.Recordset");
  261. m_pRecordset->Open((_variant_t)sql,_variant_t((IDispatch*)theApp.m_pConnection,true),adOpenStatic,adLockOptimistic,adCmdText);
  263. scurid=(LPCTSTR)(_bstr_t)m_pRecordset->GetCollect("AAA");
  264. lnewid=atol(scurid.Right(5))+1;
  265. snewid.Format("-%05d",lnewid);
  266. sNewID=snowtime+snewid;
  267. m_pRecordset->Close();
  268. }
  269. catch(_com_error e)///捕捉异常
  270. {
  271. CString stemp;
  272. stemp.Format("获取最大单据编号出错:%s",e.ErrorMessage());
  273. AfxMessageBox(stemp);
  274. }
  275. return sNewID;
  276. }
  278. void CPosDlg::OnSelchangeListBill() 
  279. {
  280. CString stemp,sql,sbillid;
  281. int iOption; 
  282. _RecordsetPtr m_pRecordset;
  284. iOption = m_oListbill.GetCurSel();
  285. m_oListbill.GetText(iOption, sbillid);//得到选中项的文本
  286. theApp.scallid=sbillid;//Get current bill id.
  287. //Clear the edit ctrl.
  288. m_oTableno.SetWindowText("");
  289. m_oPeasons.SetWindowText("");
  290. sql="select * from SALEBILL where ID='"+sbillid+"'";
  291. try
  292. {
  293. m_pRecordset.CreateInstance("ADODB.Recordset");
  294. m_pRecordset->Open((_variant_t)sql,_variant_t((IDispatch*)theApp.m_pConnection,true),adOpenStatic,adLockOptimistic,adCmdText);
  296. if(!m_pRecordset->adoEOF)
  297. {
  298. m_oTableno.SetWindowText((LPCTSTR)(_bstr_t)m_pRecordset->GetCollect("TABLENO"));
  299. m_oPeasons.SetWindowText((LPCTSTR)(_bstr_t)m_pRecordset->GetCollect("PEOPLES"));
  300. m_oCheck.SetWindowText((LPCTSTR)(_bstr_t)m_pRecordset->GetCollect("SALES"));
  301. m_oStatus.SetWindowText((LPCTSTR)(_bstr_t)m_pRecordset->GetCollect("STATUS"));
  302. m_oBegintime.SetWindowText((LPCTSTR)(_bstr_t)m_pRecordset->GetCollect("BEGINDATE"));
  303. m_oEndtime.SetWindowText((LPCTSTR)(_bstr_t)m_pRecordset->GetCollect("ENDDATE"));
  304. float ftotal=(float)m_pRecordset->GetCollect("TOTAL");
  305. CString stotal;
  306. stotal.Format("%.2f",ftotal);
  307. m_oTotal.SetWindowText(stotal);
  308. ftotal=(float)m_pRecordset->GetCollect("ACTTOTAL");
  309. stotal.Format("%.2f",ftotal);
  310. m_oActtotal.SetWindowText(stotal);
  311. }
  312. m_pRecordset->Close();
  313. }
  314. catch(_com_error e)///捕捉异常
  315. {
  316. CString temp;
  317. temp.Format("读取单据头到编辑框出错:%s",e.ErrorMessage());
  318. AfxMessageBox(temp);
  319. return;
  320. }
  321. ReadToFormlist(sbillid);//Get bill items from database.
  323. int i=m_oFormlist.GetItemCount();
  324. RECT rect;
  325. m_oFormlist.GetWindowRect(&rect);
  326. m_oButton.MoveWindow(440,95+i*15, rect.right/40, rect.bottom/35);
  327. m_oButton.BringWindowToTop();
  328. m_oButton.ShowWindow(SW_SHOW);//从隐藏变为显示
  329. }
  331. BEGIN_EVENTSINK_MAP(CPosDlg, CDialog)
  332.    //{{AFX_EVENTSINK_MAP(CPosDlg)
  333. //}}AFX_EVENTSINK_MAP
  334. END_EVENTSINK_MAP()
  336. void CPosDlg::OnMyMessage()
  337. {
  338. //When CPosDlgDlg received the WM_APPLY message from CSelectDlg 
  339. //it call the AddItemToList() to fill list.
  340. AddItemToList();
  342. //-------------------------------------------------//
  343. CString smID,sqa,ssum,sno,sql,stotal,sbillid;
  344. CString sclassid;
  345. long lrowno;
  346. int iOption;
  347. _RecordsetPtr m_pRecordset; //Must define it in function!!!!
  349. iOption = m_oListbill.GetCurSel();
  350. m_oListbill.GetText(iOption, sbillid);//得到选中项的文本
  352. lrowno=GetRowNo(sbillid);
  353. sno.Format("%d",lrowno); //rowno.
  354. ssum=theApp.sprice;
  355. //Get class ID.
  356. sql="Select CLASSID from materiel where ID="+theApp.smID+"";
  357. try
  358. { 
  359. m_pRecordset.CreateInstance("ADODB.Recordset");
  360. m_pRecordset->Open((_variant_t)sql,_variant_t((IDispatch*)theApp.m_pConnection,true),adOpenDynamic,adLockOptimistic,adCmdText);
  361. long lclassid=(long)m_pRecordset->GetCollect("CLASSID");//How to get field value in only 1 record and 1 field condition.
  362. sclassid.Format("%d",lclassid);
  363. m_pRecordset->Close();
  364. }
  365. catch(_com_error e)///捕捉异常
  366. {
  367. CString temp;
  368. temp.Format("[选择商品]读取商品类别ID出错:%s",e.ErrorMessage());
  369. AfxMessageBox(temp);
  370. return;
  371. }
  373. sql="Insert into SALEDETAIL (BILLID,MATERIELID,ITEMCOUNT,ITEMTOTAL,CLASSID,ROWNO,ACTPRICE) values ('"+sbillid+"',"
  374. +theApp.smID+",1,"+ssum+","+sclassid+","+sno+","+ssum+")";
  375. try
  376. {  _variant_t RecordsAffected;
  377. theApp.m_pConnection->Execute((_bstr_t)sql,&RecordsAffected,adCmdText);
  378. UpdateData(FALSE);
  379. }
  380. catch(_com_error e)///捕捉异常
  381. {
  382. CString temp;
  383. temp.Format("[选择商品]插入商品到数据库出错:%s",e.ErrorMessage());
  384. AfxMessageBox(temp);
  385. return;
  386. }
  388. stotal=SumItemtotal(sbillid);
  389. sql="Update SALEBILL set TOTAL="+stotal+" where ID='"+sbillid+"'";
  390. try
  391. { 
  392. _variant_t RecordsAffected;
  393. theApp.m_pConnection->Execute((_bstr_t)sql,&RecordsAffected,adCmdText);
  394. }
  395. catch(_com_error e)///捕捉异常
  396. {
  397. CString temp;
  398. temp.Format("[结帐]更新单据总金额出错:%s",e.ErrorMessage());
  399. AfxMessageBox(temp);
  400. return;
  401. }
  402. m_oTotal.SetWindowText(stotal);
  403. // ReadToFormlist(sbillid);
  404. }
  406. void CPosDlg::AddItemToList()
  407. {
  408. CString snumline;
  409. int numline=0,nmax;
  410. LV_ITEM lvitem;
  412. lvitem.pszText="";
  413. lvitem.mask=LVIF_TEXT;
  414. lvitem.iSubItem=0;
  416. numline=m_oFormlist.GetItemCount();
  417. lvitem.iItem=numline;
  419. snumline=m_oFormlist.GetItemText(numline-1,0);
  420. nmax=atoi(snumline)+1;
  421. snumline.Format("%d",nmax);
  423. m_oFormlist.InsertItem(&lvitem);
  425. //读出数据写入到list中
  426. m_oFormlist.SetItemText(numline,0,snumline);
  427. m_oFormlist.SetItemText(numline,1,theApp.smname);
  428. m_oFormlist.SetItemText(numline,2,"1");
  429. m_oFormlist.SetItemText(numline,3,theApp.sprice);
  431. //Move the select button to next line.
  432. RECT rect;
  433. m_oFormlist.GetWindowRect(&rect);
  434. m_oButton.MoveWindow(440,110+numline*15, rect.right/40, rect.bottom/35);
  435. m_oButton.BringWindowToTop();
  436. m_oButton.ShowWindow(SW_SHOW);//从隐藏变为显示
  437. }
  439. long CPosDlg::GetRowNo(CString sbillid)
  440. {
  441. _RecordsetPtr m_pRecordset; //Must define it in function!!!!
  442. CString sql,sname;
  443. long lrowno,lcount;
  445. sql="Select Count(*) AS XXX from SALEDETAIL where BILLID='"+sbillid+"'";
  446. lcount=GetRecordCount(sql);
  448. if(lcount==0)
  449. {
  450. lrowno=1;
  451. return lrowno;
  452. }
  454. sql="Select MAX(ROWNO) AS RRR from SALEDETAIL where BILLID='"+sbillid+"'";
  455. try
  456. {
  457. m_pRecordset.CreateInstance("ADODB.Recordset");
  458. m_pRecordset->Open((_variant_t)sql,_variant_t((IDispatch*)theApp.m_pConnection,true),adOpenDynamic,adLockOptimistic,adCmdText);
  459. lrowno=(long)m_pRecordset->GetCollect("RRR")+1;//How to get field value in only 1 record and 1 field condition.
  460. }
  461. catch(_com_error e)///捕捉异常
  462. {
  463. CString temp;
  464. temp.Format("[单据]读取商品序号出错:%s",e.ErrorMessage());
  465. AfxMessageBox(temp);
  466. }
  467. return lrowno;
  468. }
  470. CString CPosDlg::GetMaterielName(long materielid)
  471. {
  472. _RecordsetPtr m_pRecordset; //Must define it in function!!!!
  473. CString sql,smaterielid,sname;
  475. smaterielid.Format("%d",materielid);
  476. sql="Select NAME from MATERIEL where ID="+smaterielid+"";
  477. try
  478. {
  479. m_pRecordset.CreateInstance("ADODB.Recordset");
  480. m_pRecordset->Open((_variant_t)sql,_variant_t((IDispatch*)theApp.m_pConnection,true),adOpenDynamic,adLockOptimistic,adCmdText);
  482. if(!m_pRecordset->adoEOF)
  483. sname=(LPCTSTR)(_bstr_t)m_pRecordset->GetCollect("NAME");
  484. }
  485. catch(_com_error e)///捕捉异常
  486. {
  487. CString temp;
  488. temp.Format("获取商品名称出错:%s",e.ErrorMessage());
  489. AfxMessageBox(temp);
  490. }
  491. return sname;
  492. }
  494. void CPosDlg::OnButtonSelmateriel() 
  495. {
  496. int iOption;
  497. CString sbillid;
  498. iOption = m_oListbill.GetCurSel();
  499. if(iOption<0)
  500. return;
  501. m_oListbill.GetText(iOption, sbillid);//得到选中项的文本
  503. if(bGetBillStatus(sbillid))
  504. return;
  506. CSelectDlg selectdlg;
  507. selectdlg.DoModal();
  508. }
  510. void CPosDlg::ReadToFormlist(CString sbillid)
  511. {
  512. _RecordsetPtr m_pRecordset; //Must define it in function!!!!
  513. CString sql,sname,sno,sqa,ssum;
  514. long rowcount=0;
  515. long lmid;
  516. float fsum;
  517. LV_ITEM lvitem;
  519. //清空list控件的数据
  520. m_oFormlist.DeleteAllItems();
  522. int numline=0;
  523. lvitem.pszText="";
  524. lvitem.mask=LVIF_TEXT;
  525. lvitem.iSubItem=0;
  527. sql="Select * from SALEDETAIL where BILLID='"+sbillid+"'";
  528. try
  529. {
  530. m_pRecordset.CreateInstance("ADODB.Recordset");
  531. m_pRecordset->Open((_variant_t)sql,_variant_t((IDispatch*)theApp.m_pConnection,true),adOpenDynamic,adLockOptimistic,adCmdText);
  533. while(!m_pRecordset->adoEOF)
  534. {
  535. sno=(LPCTSTR)(_bstr_t)m_pRecordset->GetCollect("ROWNO");
  536. sqa=(LPCTSTR)(_bstr_t)m_pRecordset->GetCollect("ITEMCOUNT");
  537. lmid=(long)m_pRecordset->GetCollect("MATERIELID");
  538. sname=GetMaterielName(lmid);
  539. fsum=(float)m_pRecordset->GetCollect("ITEMTOTAL");
  540. ssum.Format("%.2f",fsum);
  542. lvitem.iItem=numline;
  543. m_oFormlist.InsertItem(&lvitem);
  544. //读出数据写入到list中
  545. m_oFormlist.SetItemText(numline,0,sno);
  546. m_oFormlist.SetItemText(numline,1,sname);
  547. m_oFormlist.SetItemText(numline,2,sqa);
  548. m_oFormlist.SetItemText(numline,3,ssum);
  550. m_pRecordset->MoveNext();
  551. numline++;
  552. }
  553. RECT rect;
  554. m_oFormlist.GetWindowRect(&rect);
  555. m_oButton.MoveWindow(440,95+numline*15, rect.right/40, rect.bottom/35);
  556. m_oButton.BringWindowToTop();
  557. m_oButton.ShowWindow(SW_SHOW);//从隐藏变为显示
  558. m_pRecordset->Close();///关闭记录集rowcount
  559. }
  560. catch(_com_error e)///捕捉异常
  561. {
  562. CString temp;
  563. temp.Format("读取单据商品到列表中出错:%s",e.ErrorMessage());
  564. AfxMessageBox(temp);
  565. }
  566. }
  568. void CPosDlg::OnDblclkListForm(NMHDR* pNMHDR, LRESULT* pResult) 
  569. {
  570. CString sno,ssum,sname,scount,sql;
  571. CString sbillid;
  572. float fprice,fsum;
  573. int ncount,nqa,iOption;
  575. iOption = m_oListbill.GetCurSel();
  576. m_oListbill.GetText(iOption, sbillid);//得到选中项的文本
  578. if(bGetBillStatus(sbillid))
  579. return;
  581. //得到当前选中的行
  582. POSITION pos = m_oFormlist.GetFirstSelectedItemPosition();
  583. //如果选中一行
  584. if(pos)
  585. {
  586. int nItem = m_oFormlist.GetNextSelectedItem(pos);
  587. sno=m_oFormlist.GetItemText(nItem,0);
  588. scount=m_oFormlist.GetItemText(nItem,2);
  589. ncount=atoi(scount);
  590. theApp.sqa=scount;
  591. ssum=m_oFormlist.GetItemText(nItem,3);
  592. fsum=atof(ssum);
  593. fprice=fsum;
  594. if(ncount>0)
  595. fprice=fsum/ncount;
  596. //Open the modifyqa dlg. 
  597. CModifyqaDlg modifydlg;
  598. modifydlg.DoModal();
  600. nqa=atoi(theApp.sqa);
  601. fsum=nqa*fprice;
  602. ssum.Format("%.2f",fsum);
  604. m_oFormlist.SetItemText(nItem,2,theApp.sqa);
  605. m_oFormlist.SetItemText(nItem,3,ssum);
  606. //Update saledetail.
  607. sql="Update SALEDETAIL set ITEMCOUNT="+theApp.sqa+",ITEMTOTAL="+ssum+" where BILLID='"+sbillid+"' and ROWNO="+sno+"";
  608. try
  609. {  _variant_t RecordsAffected;
  610. theApp.m_pConnection->Execute((_bstr_t)sql,&RecordsAffected,adCmdText);
  611. UpdateData(FALSE);
  612. }
  613. catch(_com_error e)///捕捉异常
  614. {
  615. CString temp;
  616. temp.Format("[修改数量]更新商品出错:%s",e.ErrorMessage());
  617. AfxMessageBox(temp);
  618. return;
  619. }
  620. //Update salebill.
  621. _RecordsetPtr m_pRecordset; //Must define it in function!!!!
  622. float ftotal;
  623. CString stotal;
  624. sql="select Sum(ITEMTOTAL) as SSS from SALEDETAIL where BILLID='"+sbillid+"'";
  625. try
  626. { 
  627. m_pRecordset.CreateInstance("ADODB.Recordset");
  628. m_pRecordset->Open((_variant_t)sql,_variant_t((IDispatch*)theApp.m_pConnection,true),adOpenStatic,adLockOptimistic,adCmdText);
  630. ftotal=(float)m_pRecordset->GetCollect("SSS");
  631. m_pRecordset->Close();
  632. }
  633. catch(_com_error e)///捕捉异常
  634. {
  635. CString stemp;
  636. stemp.Format("[修改数量]计算单据金额出错:%s",e.ErrorMessage());
  637. AfxMessageBox(stemp);
  638. return;
  639. }
  640. stotal.Format("%.2f",ftotal);
  641. sql="Update SALEBILL set TOTAL="+stotal+" where ID='"+sbillid+"'";
  642. try
  643. {  _variant_t RecordsAffected;
  644. theApp.m_pConnection->Execute((_bstr_t)sql,&RecordsAffected,adCmdText);
  645. }
  646. catch(_com_error e)///捕捉异常
  647. {
  648. CString temp;
  649. temp.Format("[修改数量]更新总金额出错:%s",e.ErrorMessage());
  650. AfxMessageBox(temp);
  651. return;
  652. }
  653. m_oTotal.SetWindowText(stotal);
  655. }
  656. *pResult = 0;
  657. }
  659. BOOL CPosDlg::PreTranslateMessage(MSG* pMsg) 
  660. {
  661. int i,iState,iOption;
  662. RECT rect;
  663. CString sql,sno,sbillid,stotal;
  665. if(pMsg->message==WM_KEYDOWN)
  666. {
  667. switch(pMsg->wParam)
  668. {
  669. case VK_F1:
  670. OnButtonAddf();
  671. break;
  672. case VK_F2:
  673. OnButtonDelf();
  674. break;
  675. case VK_F3:
  676. OnButtonCallf();
  677. break;
  678. case VK_F4:
  679. OnButtonHidef();
  680. break;
  681. case VK_F5:
  682. OnButtonCheckf();
  683. break;
  684. case VK_F6:
  686. break;
  687. case VK_F7:
  689. break;
  690. case VK_F8:
  692. break;
  693. case VK_F9:
  695. break;
  696. case VK_F10:
  697. OnButtonOff();
  698. break;
  699. }
  700. }
  701. // if(GetFocus()->GetDlgCtrlID()==IDC_LIST_FORM)//针对特定的控件，也可以不用判断  
  702. // {  
  703. if(pMsg->message==WM_KEYDOWN && pMsg->wParam==VK_DELETE)  
  704.         {  
  705. iOption = m_oListbill.GetCurSel();
  706. m_oListbill.GetText(iOption, sbillid);//得到选中项的文本
  708. if(bGetBillStatus(sbillid))
  709. return FALSE;
  711. int nItemSelected=m_oFormlist.GetSelectedCount();//所选表项数
  712. int nItemCount=m_oFormlist.GetItemCount();//表项总数
  713. if(nItemSelected<1) 
  714. return FALSE;
  715. for(i=nItemCount-1;i>=0;i--)
  716. {
  717. iState=m_oFormlist.GetItemState(i,LVIS_SELECTED);
  718. if(iState!=0) 
  719. {
  720. sno=m_oFormlist.GetItemText(i,0);
  721. m_oFormlist.DeleteItem(i);
  723. sql="delete * from SALEDETAIL where BILLID='"+sbillid+"' and ROWNO="+sno+"";
  724. try
  725. {  _variant_t RecordsAffected;
  726. theApp.m_pConnection->Execute((_bstr_t)sql,&RecordsAffected,adCmdText);
  727. UpdateData(FALSE);
  728. }
  729. catch(_com_error e)///捕捉异常
  730. {
  731. CString temp;
  732. temp.Format("从数据库中删除单据出错:%s",e.ErrorMessage());
  733. AfxMessageBox(temp);
  734. return FALSE;
  735. }
  736. }
  737. }
  738. ReadToFormlist(sbillid);//Refresh formlist.
  739. m_oFormlist.GetWindowRect(&rect);
  740. m_oButton.MoveWindow(440,95+(nItemCount-1)*15, rect.right/40, rect.bottom/35);
  741. m_oButton.BringWindowToTop();
  742. m_oButton.ShowWindow(SW_SHOW);//从隐藏变为显示
  744. stotal=SumItemtotal(sbillid);
  745. m_oTotal.SetWindowText(stotal);
  746. sql="Update SALEBILL set TOTAL="+stotal+" where ID='"+sbillid+"'";
  747. try
  748. { 
  749. _variant_t RecordsAffected;
  750. theApp.m_pConnection->Execute((_bstr_t)sql,&RecordsAffected,adCmdText);
  751. }
  752. catch(_com_error e)///捕捉异常
  753. {
  754. CString temp;
  755. temp.Format("[删除商品]更新商品总金额出错:%s",e.ErrorMessage());
  756. AfxMessageBox(temp);
  757. return FALSE;
  758. }
  759.          }  
  760. // }
  761. return CDialog::PreTranslateMessage(pMsg);
  762. }
  764. void CPosDlg::OnButtonCallf() 
  765. {
  766. _RecordsetPtr m_pRecordset; //Must define it in function!!!!
  767. CString sql;
  769. if(!theApp.VerifyPower("CallBill"))
  770. {
  771. AfxMessageBox("没有权限调单!");
  772. return;
  773. }
  775. CCallDlg calldlg;//Create a dialog to enter billid to call.
  776. calldlg.dowhat="imhappy";
  777. calldlg.DoModal();
  779. if(!bGetBillStatus(theApp.scallid))
  780. return;
  782. sql="select * from SALEBILL where ID='"+theApp.scallid+"'";
  783. try
  784. {
  785. m_pRecordset.CreateInstance("ADODB.Recordset");
  786. m_pRecordset->Open((_variant_t)sql,_variant_t((IDispatch*)theApp.m_pConnection,true),adOpenStatic,adLockOptimistic,adCmdText);
  788. if(!m_pRecordset->adoEOF)
  789. {
  790. m_oTableno.SetWindowText((LPCTSTR)(_bstr_t)m_pRecordset->GetCollect("TABLENO"));
  791. m_oPeasons.SetWindowText((LPCTSTR)(_bstr_t)m_pRecordset->GetCollect("PEOPLES"));
  792. m_oCheck.SetWindowText((LPCTSTR)(_bstr_t)m_pRecordset->GetCollect("SALES"));
  793. m_oStatus.SetWindowText((LPCTSTR)(_bstr_t)m_pRecordset->GetCollect("STATUS"));
  794. m_oBegintime.SetWindowText((LPCTSTR)(_bstr_t)m_pRecordset->GetCollect("BEGINDATE"));
  795. m_oEndtime.SetWindowText((LPCTSTR)(_bstr_t)m_pRecordset->GetCollect("ENDDATE"));
  796. float ftotal=(float)m_pRecordset->GetCollect("TOTAL");
  797. CString stotal;
  798. stotal.Format("%.2f",ftotal);
  799. m_oTotal.SetWindowText(stotal);
  800. ftotal=(float)m_pRecordset->GetCollect("ACTTOTAL");
  801. stotal.Format("%.2f",ftotal);
  802. m_oActtotal.SetWindowText(stotal);
  803. ReadToFormlist(theApp.scallid);//Get bill items from database.
  805. m_oListbill.AddString(theApp.scallid);
  806. m_oListbill.SelectString(-1,theApp.scallid);
  807. }
  808. if(m_pRecordset->adoEOF)
  809. {
  810. CString temp="单据 '"+theApp.scallid+"' 不存在！";
  811. AfxMessageBox(temp);
  812. theApp.scallid="";
  813. }
  814. m_pRecordset->Close();
  815. }
  816. catch(_com_error e)///捕捉异常
  817. {
  818. CString temp;
  819. temp.Format("从列表读取单据头到编辑框出错:%s",e.ErrorMessage());
  820. AfxMessageBox(temp);
  821. return;
  822. }
  823. m_oButton.ShowWindow(SW_HIDE);//从显示变为隐藏
  824. }
  826. long CPosDlg::GetRecordCount(CString sql)
  827. {
  828. long lcount;
  829. _RecordsetPtr m_pRecordset; //Must define it in function!!!!
  831. try
  832. { 
  833. m_pRecordset.CreateInstance("ADODB.Recordset");
  834. m_pRecordset->Open((_variant_t)sql,_variant_t((IDispatch*)theApp.m_pConnection,true),adOpenStatic,adLockOptimistic,adCmdText);
  836. lcount=(long)m_pRecordset->GetCollect("XXX");
  837. m_pRecordset->Close();
  838. }
  839. catch(_com_error e)///捕捉异常
  840. {
  841. CString stemp;
  842. stemp.Format("获得记录数出错:%s",e.ErrorMessage());
  843. AfxMessageBox(stemp);
  844. }
  845. return lcount;
  846. }
  848. void CPosDlg::OnButtonDelf() 
  849. {
  850. CString sql,sbillid;
  851. int iOption;
  852. _RecordsetPtr m_pRecordset;
  854. if(!theApp.VerifyPower("DelBill"))
  855. {
  856. AfxMessageBox("没有权限删除单据!");
  857. return;
  858. }
  860. iOption = m_oListbill.GetCurSel();
  861. if(iOption==-1)
  862. return;
  863. m_oListbill.GetText(iOption, sbillid);//得到选中项的文本
  866. if(bGetBillStatus(sbillid))
  867. {
  868. AfxMessageBox("不能删除已结帐单据!");
  869. return;
  870. }
  872. if(AfxMessageBox("确定删除此单据吗？",MB_YESNO)==IDYES)
  873. {
  874. sql="Delete * from SALEBILL where ID='"+sbillid+"'";
  875. try
  876. { 
  877. _variant_t RecordsAffected;
  878. theApp.m_pConnection->Execute((_bstr_t)sql,&RecordsAffected,adCmdText);
  879. }
  880. catch(_com_error e)///捕捉异常
  881. {
  882. CString temp;
  883. temp.Format("Delete bill id error:%s",e.ErrorMessage());
  884. AfxMessageBox(temp);
  885. return;
  886. }
  887. sql="Delete * from SALEDETAIL where BILLID='"+sbillid+"'";
  888. try
  889. { 
  890. _variant_t RecordsAffected;
  891. theApp.m_pConnection->Execute((_bstr_t)sql,&RecordsAffected,adCmdText);
  892. }
  893. catch(_com_error e)///捕捉异常
  894. {
  895. CString temp;
  896. temp.Format("删除单据商品出错:%s",e.ErrorMessage());
  897. AfxMessageBox(temp);
  898. return;
  899. }
  900. m_oListbill.DeleteString(iOption);
  901. if(m_oListbill.GetCount()>0)
  902. {
  903. if(m_oListbill.GetCount()>iOption)
  904. m_oListbill.SetCurSel(iOption);
  905. if(m_oListbill.GetCount()==iOption)
  906. m_oListbill.SetCurSel(iOption-1);
  908. iOption = m_oListbill.GetCurSel();
  909. m_oListbill.GetText(iOption, sbillid);//Again得到选中项的文本
  910. theApp.scallid=sbillid;//Get current bill id.
  911. ReadBillHead(sbillid);
  912. ReadToFormlist(sbillid);
  913. }
  914. }
  915. else
  916. return;
  917. }
  919. void CPosDlg::OnButtonHidef() 
  920. {
  921. int iOption;
  922. CString sbillid;
  924. iOption = m_oListbill.GetCurSel();
  925. if(iOption==-1)
  926. return;
  928. m_oListbill.GetText(iOption, sbillid);//Again得到选中项的文本
  930. if(!bGetBillStatus(sbillid))
  931. {
  932. AfxMessageBox("未结帐单据不能隐藏!");
  933. return;
  934. }
  936. m_oListbill.DeleteString(iOption);
  937. if(m_oListbill.GetCount()==0)
  938. m_oFormlist.DeleteAllItems();
  940. if(m_oListbill.GetCount()>0)
  941. {
  942. if(m_oListbill.GetCount()>iOption)
  943. m_oListbill.SetCurSel(iOption);
  944. if(m_oListbill.GetCount()==iOption)
  945. m_oListbill.SetCurSel(iOption-1);
  947. iOption = m_oListbill.GetCurSel();
  948. m_oListbill.GetText(iOption, sbillid);//Again得到选中项的文本
  949. theApp.scallid=sbillid;//Get current bill id.
  950. ReadBillHead(sbillid);
  951. ReadToFormlist(sbillid);//Refresh listctrl.
  952. }
  953. }
  956. void CPosDlg::OnButtonCheckf() 
  957. {
  958. int iOption;
  960. iOption = m_oListbill.GetCurSel();
  961. if(iOption==-1)
  962. return;
  964. m_oListbill.GetText(iOption, theApp.scallid);//得到选中项的文本
  966. if(bGetBillStatus(theApp.scallid))
  967. {
  968. AfxMessageBox("已结帐单据不能再结帐!");
  969. return;
  970. }
  971. if(m_oFormlist.GetItemCount()==0)
  972. {
  973. AfxMessageBox("不能结帐空单据!");
  974. return;
  975. }
  976. else
  977. {
  978. CCheckDlg checkdlg;
  979. checkdlg.DoModal();
  980. }
  981. }
  983. void CPosDlg::OnMyCheckMessage()
  984. {
  985. //When user click the button of checkdlg
  986. //it send a message to posdlg to do the following things.
  987. OnButtonLocalp();
  988. OnButtonHidef();
  989. }
  991. CString CPosDlg::SumItemtotal(CString sbillid)
  992. {
  993. //Sum bill Items money from database.
  994. CString stotal,sql;
  995. float ftotal;
  996. long lcount;
  997. _RecordsetPtr m_pRecordset;
  999. sql="Select count(*) as XXX from SALEDETAIL where BILLID ='"+sbillid+"'";
  1000. lcount=GetRecordCount(sql);
  1001. if(lcount==0)
  1002. {
  1003. stotal="0.00";
  1004. return stotal;
  1005. }
  1007. sql="Select SUM(ITEMTOTAL) as SSS from SALEDETAIL where BILLID='"+sbillid+"'";
  1008. try
  1009. { 
  1010. m_pRecordset.CreateInstance("ADODB.Recordset");
  1011. m_pRecordset->Open((_variant_t)sql,_variant_t((IDispatch*)theApp.m_pConnection,true),adOpenStatic,adLockOptimistic,adCmdText);
  1012. ftotal=(float)m_pRecordset->GetCollect("SSS");
  1013. }
  1014. catch(_com_error e)///捕捉异常
  1015. {
  1016. CString temp;
  1017. temp.Format("[前台销售]计算商品总金额出错:%s",e.ErrorMessage());
  1018. AfxMessageBox(temp);
  1019. }
  1020. stotal.Format("%.2f",ftotal);
  1022. return stotal;
  1023. }
  1025. void CPosDlg::ReadBillHead(CString sbillid)
  1026. {
  1027. CString sql,status;
  1028. _RecordsetPtr m_pRecordset;
  1030. sql="select * from SALEBILL where ID='"+sbillid+"'";
  1031. try
  1032. {
  1033. m_pRecordset.CreateInstance("ADODB.Recordset");
  1034. m_pRecordset->Open((_variant_t)sql,_variant_t((IDispatch*)theApp.m_pConnection,true),adOpenStatic,adLockOptimistic,adCmdText);
  1036. if(!m_pRecordset->adoEOF)
  1037. {
  1038. m_oTableno.SetWindowText((LPCTSTR)(_bstr_t)m_pRecordset->GetCollect("TABLENO"));
  1039. m_oPeasons.SetWindowText((LPCTSTR)(_bstr_t)m_pRecordset->GetCollect("PEOPLES"));
  1040. m_oCheck.SetWindowText((LPCTSTR)(_bstr_t)m_pRecordset->GetCollect("SALES"));
  1041. m_oStatus.SetWindowText((LPCTSTR)(_bstr_t)m_pRecordset->GetCollect("STATUS"));
  1042. m_oBegintime.SetWindowText((LPCTSTR)(_bstr_t)m_pRecordset->GetCollect("BEGINDATE"));
  1043. m_oEndtime.SetWindowText((LPCTSTR)(_bstr_t)m_pRecordset->GetCollect("ENDDATE"));
  1044. float ftotal=(float)m_pRecordset->GetCollect("TOTAL");
  1045. CString stotal;
  1046. stotal.Format("%.2f",ftotal);
  1047. m_oTotal.SetWindowText(stotal);
  1048. ftotal=(float)m_pRecordset->GetCollect("ACTTOTAL");
  1049. stotal.Format("%.2f",ftotal);
  1050. m_oActtotal.SetWindowText(stotal);
  1051. }
  1052. m_pRecordset->Close();
  1053. }
  1054. catch(_com_error e)///捕捉异常
  1055. {
  1056. CString temp;
  1057. temp.Format("读取单据头到编辑框出错:%s",e.ErrorMessage());
  1058. AfxMessageBox(temp);
  1059. return;
  1060. }
  1061. }
  1063. BOOL CPosDlg::bGetBillStatus(CString sbillid)
  1064. {
  1065. CString sql,sstatus;
  1066. BOOL bstatus;
  1067. _RecordsetPtr m_pRecordset;
  1069. sql="select STATUS from SALEBILL where ID='"+sbillid+"'";
  1070. try
  1071. {
  1072. m_pRecordset.CreateInstance("ADODB.Recordset");
  1073. m_pRecordset->Open((_variant_t)sql,_variant_t((IDispatch*)theApp.m_pConnection,true),adOpenStatic,adLockOptimistic,adCmdText);
  1075. if(!m_pRecordset->adoEOF)
  1076. {
  1077. sstatus=(LPCTSTR)(_bstr_t)m_pRecordset->GetCollect("STATUS");
  1078. if(sstatus=="等待"||sstatus=="挂帐")
  1079. bstatus=FALSE;
  1080. else
  1081. bstatus=TRUE;
  1082. }
  1083. m_pRecordset->Close();
  1084. }
  1085. catch(_com_error e)///捕捉异常
  1086. {
  1087. CString temp;
  1088. temp.Format("读取单据状态出错:%s",e.ErrorMessage());
  1089. AfxMessageBox(temp);
  1090. }
  1091. return bstatus;
  1092. }
  1094. void CPosDlg::OnKillfocusEditTableno() 
  1095. {
  1096. CString sql,stemp,sbillid;
  1097. _RecordsetPtr m_pRecordset;
  1098. int iOption;
  1100. iOption = m_oListbill.GetCurSel();
  1101. m_oListbill.GetText(iOption, sbillid);//得到选中项的文本
  1102. if(bGetBillStatus(theApp.scallid))
  1103. return;
  1105. m_oTableno.GetWindowText(stemp);
  1107. sql="Update SALEBILL set TABLENO='"+stemp+"' where ID='"+sbillid+"'";
  1108. try
  1109. {  _variant_t RecordsAffected;
  1110. theApp.m_pConnection->Execute((_bstr_t)sql,&RecordsAffected,adCmdText);
  1111. }
  1112. catch(_com_error e)///捕捉异常
  1113. {
  1114. CString temp;
  1115. temp.Format("更新单据头(桌号) 出错:%s",e.ErrorMessage());
  1116. AfxMessageBox(temp);
  1117. return;
  1118. }
  1119. }
  1121. void CPosDlg::OnKillfocusEditPeasons() 
  1122. {
  1123. CString sql,stemp,sbillid;
  1124. _RecordsetPtr m_pRecordset;
  1125. int iOption;
  1127. iOption = m_oListbill.GetCurSel();
  1128. m_oListbill.GetText(iOption, sbillid);//得到选中项的文本
  1130. if(bGetBillStatus(theApp.scallid))
  1131. return;
  1132. m_oPeasons.GetWindowText(stemp);
  1134. sql="Update SALEBILL set PEOPLES='"+stemp+"' where ID='"+sbillid+"'";
  1135. try
  1136. {  _variant_t RecordsAffected;
  1137. theApp.m_pConnection->Execute((_bstr_t)sql,&RecordsAffected,adCmdText);
  1138. }
  1139. catch(_com_error e)///捕捉异常
  1140. {
  1141. CString temp;
  1142. temp.Format("更新单据头(人数)出错:%s",e.ErrorMessage());
  1143. AfxMessageBox(temp);
  1144. return;
  1145. }
  1146. }
  1149. void CPosDlg::OnButtonOff() 
  1150. {
  1151. COffdutyDlg offdlg;
  1152. offdlg.DoModal();
  1153. }
  1156. void CPosDlg::OnButtonFindf() 
  1157. {
  1158. CString sql,sbillid;
  1159. _RecordsetPtr m_pRecordset;
  1161. CCallDlg calldlg;//Create a dialog to enter billid to call.
  1162. calldlg.dowhat="pleased";
  1163. calldlg.DoModal();
  1165. sql="select ID from SALEBILL where STATUS<>'已结帐' and TABLENO='"+calldlg.dowhat+"'";
  1166. try
  1167. {
  1168. m_pRecordset.CreateInstance("ADODB.Recordset");
  1169. m_pRecordset->Open((_variant_t)sql,_variant_t((IDispatch*)theApp.m_pConnection,true),adOpenStatic,adLockOptimistic,adCmdText);
  1170. if(!m_pRecordset->adoEOF)
  1171. {
  1172. sbillid=(LPCTSTR)(_bstr_t)m_pRecordset->GetCollect("ID");
  1173. m_oListbill.SelectString(-1,sbillid);
  1174. ReadToFormlist(sbillid);
  1175. }
  1176. if(m_pRecordset->adoEOF)
  1177. {
  1178. CString temp="桌号为 '"+calldlg.dowhat+"' 单据不存在！";
  1179. AfxMessageBox(temp);
  1180. }
  1181. m_pRecordset->Close();
  1182. }
  1183. catch(_com_error e)///捕捉异常
  1184. {
  1185. CString temp;
  1186. temp.Format("查找桌号出错:%s",e.ErrorMessage());
  1187. AfxMessageBox(temp);
  1188. }
  1189. }
  1191. BOOL CPosDlg::PrintListCtrl(CListCtrl &list)
  1192. {
  1193. CDC dc;
  1194. //把打印设备环境附加到DC对象
  1195. CPrintDialog pdlg(FALSE,PD_NOPAGENUMS|PD_NOSELECTION,this);
  1196. BOOL bFindPrinter=pdlg.GetDefaults();
  1197. if(!bFindPrinter)
  1198. return FALSE;
  1199. dc.Attach(pdlg.GetPrinterDC());
  1201. //取打印机的横方向和纵方向的分辨率
  1202. //即每英寸点数
  1203. short cxInch = dc.GetDeviceCaps(LOGPIXELSX);
  1204. short cyInch = dc.GetDeviceCaps(LOGPIXELSY);
  1205. //字体
  1206. CFont font;
  1207. VERIFY(font.CreatePointFont(96, "宋体", &dc));//为DC创建字体
  1208. CFont* def_font = dc.SelectObject(&font);//保存现在的字体
  1210. //根据字体宽度、高度计算每行最大字数及每页最大行数
  1211. //取打印纸张高度和宽度
  1212. int nPageHeight, nPageWidth;
  1213. nPageHeight = dc.GetDeviceCaps(VERTRES);
  1214. nPageWidth = dc.GetDeviceCaps(HORZRES);
  1216. TEXTMETRIC TextM;
  1217. dc.GetTextMetrics(&TextM);
  1218. //字体高度 //字体平均宽度
  1219. int nCharHeight = (unsigned short)TextM.tmHeight;
  1220. int nCharWidth=(unsigned short)TextM.tmAveCharWidth;
  1222. //每行最大字数 //每页最大行数
  1223. int m_MaxLineChar = nPageWidth / nCharWidth - 8; 
  1224. int m_LinesPerPage = nPageHeight/ nCharHeight; 
  1225. //页边距
  1226. int nXMargin = 2;
  1227. int nYMargin = 2;
  1229. //获得行数
  1230. int nLineCount = list.GetItemCount();
  1231. int i;
  1233. //设置所需打印纸张数目
  1234. DOCINFO di;
  1235. di.cbSize = sizeof(DOCINFO);
  1236. di.lpszDocName = "Mypos printing"; 
  1237. di.lpszOutput = (LPTSTR) NULL; 
  1238. di.lpszDatatype = (LPTSTR) NULL; 
  1239. di.fwType = 0; 
  1240. dc.StartDoc(&di);
  1241. dc.StartPage();
  1243. //输出公司名称
  1244. CString stitle,sftitle,space="";
  1245. stitle=GetCompanyFloor(TRUE);
  1246. int n=(36-stitle.GetLength())/2;
  1247. for(i=0;i<n;i++)
  1248. space=space+" ";
  1249. sftitle=space+stitle;
  1250. dc.TextOut(2, nYMargin+nCharHeight,sftitle, strlen(sftitle));
  1252. //输出单号
  1253. CString sbillid;
  1254. int iOption = m_oListbill.GetCurSel();
  1255. m_oListbill.GetText(iOption, sbillid);//得到选中项的文本
  1256. sbillid="单号:"+sbillid;
  1257. dc.TextOut( 2, nYMargin+nCharHeight*2, sbillid, strlen(sbillid));
  1259. //输出桌号、开台时间、人数、结帐时间、收银、付款方式
  1260. CString stable,speople,sbegin,ssale,stable1,speople1,send,spaymode;
  1261. m_oTableno.GetWindowText(stable);
  1262. stable1.Format("%-8s",stable);//Table No.
  1263. m_oPeasons.GetWindowText(speople);
  1264. speople1.Format("%-8s",speople);//People quantity.
  1265. m_oBegintime.GetWindowText(sbegin);
  1266. m_oCheck.GetWindowText(ssale);//Checkman.
  1267. spaymode.Format("%-15s",theApp.spaymodep);
  1268. if(ssale=="无")
  1269. {
  1270. ssale.Format("%-8s",theApp.name);
  1271. spaymode="";
  1272. }
  1273. m_oEndtime.GetWindowText(send);//End time.
  1274. if(send=="无")
  1275. send=theApp.snowtimep;
  1276. stable="开台:"+sbegin+" 桌号:"+stable1;
  1277. speople="结账:"+send+" 人数:"+speople1;
  1278. ssale="付款方式:"+spaymode+" 收银:"+ssale;
  1279. dc.TextOut( 2, nYMargin+nCharHeight*3, stable, strlen(stable));
  1280. dc.TextOut( 2, nYMargin+nCharHeight*4, speople, strlen(speople));
  1281. dc.TextOut( 2, nYMargin+nCharHeight*5, ssale, strlen(ssale));
  1283. //输出列表控件的列标题
  1284. CString slisttitle;
  1285. slisttitle="名称                  数量      金额";
  1286. dc.TextOut( 2, nYMargin+nCharHeight*7,slisttitle, strlen(slisttitle));
  1288. int nMaxLinePerPage = nPageHeight/nCharHeight -3;//每页最大行数
  1289. int nCurPage =1;
  1290. //输出各列的数据
  1291. CString subitem,sfsub,sfsub1,sfsub2;
  1292. for(i =0; i<nLineCount; i++)
  1293. {
  1294. if(nLineCount+7-(nCurPage-1)*nMaxLinePerPage > nMaxLinePerPage)
  1295. {
  1296. //新的一页
  1297. dc.EndPage();
  1298. dc.StartPage();
  1299. nCurPage ++;
  1300. }
  1301. subitem= list.GetItemText(i, 1);
  1302. sfsub.Format("%-20s",subitem);
  1303. subitem= list.GetItemText(i, 2);
  1304. sfsub1.Format("%6s",subitem);
  1305. subitem= list.GetItemText(i, 3);
  1306. sfsub2.Format("%10s",subitem);
  1307. sfsub=sfsub+sfsub1+sfsub2;
  1308. dc.TextOut( 2, nYMargin+(i+8-(nCurPage-1)*nMaxLinePerPage)*nCharHeight, 
  1309. sfsub, strlen(sfsub));
  1310. }
  1311. stitle="------------------------------------";
  1312. dc.TextOut( 2, nYMargin+(nLineCount+8-(nCurPage-1)*nMaxLinePerPage)*nCharHeight, 
  1313. stitle, strlen(stitle));
  1314. //输出总金额
  1315. CString stotal,sacttotal,sdiscount;
  1316. float fdiscount;
  1317. stotal.Format("%27s",theApp.sconsume);
  1318. sacttotal.Format("%27s",theApp.sactsum);
  1319. fdiscount=atof(stotal)-atof(sacttotal);
  1320. sdiscount.Format("%31.2f",fdiscount);
  1321. stotal="消费金额:"+stotal;
  1322. sdiscount="折扣:"+sdiscount;
  1323. sacttotal="应收金额:"+sacttotal;
  1324. dc.TextOut( 2, nYMargin+(nLineCount+9-(nCurPage-1)*nMaxLinePerPage)*nCharHeight, 
  1325. stotal, strlen(stotal));
  1326. dc.TextOut( 2, nYMargin+(nLineCount+10-(nCurPage-1)*nMaxLinePerPage)*nCharHeight, 
  1327. sdiscount, strlen(sdiscount));
  1328. dc.TextOut( 2, nYMargin+(nLineCount+11-(nCurPage-1)*nMaxLinePerPage)*nCharHeight, 
  1329. sacttotal, strlen(sacttotal));
  1330. stitle="------------------------------------";
  1331. dc.TextOut( 2, nYMargin+(nLineCount+12-(nCurPage-1)*nMaxLinePerPage)*nCharHeight, 
  1332. stitle, strlen(stitle));
  1333. sacttotal="谢谢惠顾，欢迎再次光临！";
  1334. dc.TextOut( 2, nYMargin+(nLineCount+13-(nCurPage-1)*nMaxLinePerPage)*nCharHeight, 
  1335. sacttotal, strlen(sacttotal));
  1337. dc.EndPage();
  1338. dc.EndDoc();
  1339. //打印结束
  1340. //最后不要忘记将字体还原，这一句是必需的
  1341. dc.SelectObject(def_font); //恢复原来的字体
  1342. font.DeleteObject(); 
  1344. DeleteDC(dc.Detach()); 
  1346. return TRUE;
  1347. }
  1349. CString CPosDlg::GetCompanyFloor(BOOL bCompany)
  1350. {
  1351. _RecordsetPtr m_pRecordset; //Must define it in function!!!!
  1352. CString sql,scompany,sfloor;
  1354. sql="Select * from COMPANY";
  1355. try
  1356. { 
  1357. m_pRecordset.CreateInstance("ADODB.Recordset");
  1358. m_pRecordset->Open((_variant_t)sql,_variant_t((IDispatch*)theApp.m_pConnection,true),adOpenStatic,adLockOptimistic,adCmdText);
  1359. if(!m_pRecordset->adoEOF)
  1360. {
  1361.  scompany=(LPCTSTR)(_bstr_t)m_pRecordset->GetCollect("COMPANYNAME");
  1362.  sfloor=(LPCTSTR)(_bstr_t)m_pRecordset->GetCollect("FLOORNUMBER");
  1363. }
  1364. m_pRecordset->Close();
  1365. }
  1366. catch(_com_error e)///捕捉异常
  1367. {
  1368. CString stemp;
  1369. if(!bCompany)
  1370. stemp.Format("[初始化]读取楼层号出错:%s",e.ErrorMessage());
  1371. if(bCompany)
  1372. stemp.Format("[打印]读取公司名出错:%s",e.ErrorMessage());
  1373. AfxMessageBox(stemp);
  1374. }
  1375. if(!bCompany)
  1376. return sfloor;
  1377. if(bCompany)
  1378. return scompany;
  1379. }
  1381. void CPosDlg::OnButtonLocalp() 
  1382. {
  1383. PrintListCtrl(m_oFormlist);
  1384. }