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

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

酒店行业

开发平台：

Java

CheckDlg.cpp：源码内容
  1. // CheckDlg.cpp : implementation file
  2. //
  4. #include "stdafx.h"
  5. #include "MyPos.h"
  6. #include "CheckDlg.h"
  7. #include "PosDlg.h"
  9. #ifdef _DEBUG
  10. #define new DEBUG_NEW
  11. #undef THIS_FILE
  12. static char THIS_FILE[] = __FILE__;
  13. #endif
  15. /////////////////////////////////////////////////////////////////////////////
  16. // CCheckDlg dialog
  17. extern CMyPosApp theApp;
  20. CCheckDlg::CCheckDlg(CWnd* pParent /*=NULL*/)
  21. : CDialog(CCheckDlg::IDD, pParent)
  22. {
  23. //{{AFX_DATA_INIT(CCheckDlg)
  24. //}}AFX_DATA_INIT
  25. }
  28. void CCheckDlg::DoDataExchange(CDataExchange* pDX)
  29. {
  30. CDialog::DoDataExchange(pDX);
  31. //{{AFX_DATA_MAP(CCheckDlg)
  32. DDX_Control(pDX, IDC_EDIT_CONSUME, m_oConsume);
  33. DDX_Control(pDX, IDC_EDIT_CDISCOUNT, m_oCdiscount);
  34. DDX_Control(pDX, IDC_EDIT_RECEIVE, m_oReceive);
  35. DDX_Control(pDX, IDC_EDIT_CHANGE, m_oChange);
  36. DDX_Control(pDX, IDC_EDIT_TOTALM, m_oTotalm);
  37. DDX_Control(pDX, IDC_COMBO_PAYMODE, m_oCombopay);
  38. DDX_Control(pDX, IDC_LIST_CHECKLIST, m_oChecklist);
  39. //}}AFX_DATA_MAP
  40. }
  43. BEGIN_MESSAGE_MAP(CCheckDlg, CDialog)
  44. //{{AFX_MSG_MAP(CCheckDlg)
  45. ON_BN_CLICKED(IDC_BUTTON_CHECKOK, OnButtonCheckok)
  46. ON_EN_CHANGE(IDC_EDIT_RECEIVE, OnChangeEditReceive)
  47. ON_NOTIFY(NM_CLICK, IDC_LIST_CHECKLIST, OnClickListChecklist)
  48. ON_EN_CHANGE(IDC_EDIT_CDISCOUNT, OnChangeEditCdiscount)
  49. ON_BN_CLICKED(IDC_BUTTON_RF, OnButtonRf)
  50. ON_BN_CLICKED(IDC_BUTTON_HANG, OnButtonHang)
  51. //}}AFX_MSG_MAP
  52. END_MESSAGE_MAP()
  54. /////////////////////////////////////////////////////////////////////////////
  55. // CCheckDlg message handlers
  57. BOOL CCheckDlg::OnInitDialog() 
  58. {
  59. CDialog::OnInitDialog();
  61. //设置list控件的文字和背景颜色
  62. m_oChecklist.SetBkColor(RGB(255,255,255));
  63. m_oChecklist.SetTextBkColor(RGB(161,223,212));
  64. //清空list控件的数据
  65. for(int delcolumn=100;delcolumn>=0;delcolumn--)
  66. m_oChecklist.DeleteColumn(delcolumn);
  67. //设置list对话框的列
  68. DWORD dwStyle;
  69. RECT rect;
  70. LV_COLUMN lvc;
  72. dwStyle = m_oChecklist.GetStyle();
  73. dwStyle |= LVS_EX_GRIDLINES |LVS_EX_FULLROWSELECT|LVS_SHOWSELALWAYS ;
  75. m_oChecklist.SetExtendedStyle(dwStyle);
  76. m_oChecklist.GetClientRect(&rect);
  78. lvc.mask = LVCF_TEXT | LVCF_SUBITEM | LVCF_WIDTH |LVCF_FMT;
  79. lvc.fmt=LVCFMT_LEFT;
  81. lvc.iSubItem = 0;
  82. lvc.pszText = _T("商品类别");
  83. lvc.cx = 110;
  84. m_oChecklist.InsertColumn(1,&lvc);
  86. lvc.iSubItem = 1;
  87. lvc.pszText = _T("消费金额");
  88. lvc.cx = 90;
  89. m_oChecklist.InsertColumn(2,&lvc);
  91. lvc.iSubItem = 2;
  92. lvc.pszText = _T("可折扣金额");
  93. lvc.cx = 90;
  94. m_oChecklist.InsertColumn(3,&lvc);
  96. lvc.iSubItem = 3;
  97. lvc.pszText = _T("折扣%");
  98. lvc.cx = 60;
  99. m_oChecklist.InsertColumn(4,&lvc);
  101. lvc.iSubItem = 4;
  102. lvc.pszText = _T("结帐金额");
  103. lvc.cx = 90;
  104. m_oChecklist.InsertColumn(5,&lvc);
  106. //Add paymode to combobox.
  107. _RecordsetPtr m_pRecordset;
  108. CString sql="select * from PAYMODE";
  109. try
  110. {
  111. m_pRecordset.CreateInstance("ADODB.Recordset");
  112. m_pRecordset->Open((_variant_t)sql,_variant_t((IDispatch*)theApp.m_pConnection,true),adOpenStatic,adLockOptimistic,adCmdText);
  113. while(!m_pRecordset->adoEOF)
  114. {
  115. m_oCombopay.AddString((LPCTSTR)(_bstr_t)m_pRecordset->GetCollect("NAME"));
  116. m_pRecordset->MoveNext();
  117. }
  118. m_pRecordset->Close();
  119. m_oCombopay.SetCurSel(0);//Select the 1st string of combobox.
  120. }
  121. catch(_com_error e)///捕捉异常
  122. {
  123. CString temp;
  124. temp.Format("[结帐]读取付款方式到组合框出错:%s",e.ErrorMessage());
  125. AfxMessageBox(temp);
  126. }
  127. //Read class consume to list.
  128. ReadtoList(theApp.scallid);
  130. //Sum bill Items money from database.
  131. CString stotal;
  132. float ftotal=0;
  133. sql="Select SUM(ITEMTOTAL) as SSS from SALEDETAIL where BILLID='"+theApp.scallid+"'";
  134. try
  135. { 
  136. m_pRecordset.CreateInstance("ADODB.Recordset");
  137. m_pRecordset->Open((_variant_t)sql,_variant_t((IDispatch*)theApp.m_pConnection,true),adOpenStatic,adLockOptimistic,adCmdText);
  138. _variant_t vtemp = m_pRecordset->GetCollect("SSS");
  139. if(vtemp.dblVal>0) 
  140. ftotal=(float)m_pRecordset->GetCollect("SSS");
  141. else
  142. ftotal=0;
  143. stotal.Format("%.2f",ftotal);
  144. m_oTotalm.SetWindowText(stotal);
  145. m_oConsume.SetWindowText(stotal);
  146. }
  147. catch(_com_error e)///捕捉异常
  148. {
  149. CString temp;
  150. temp.Format("[结帐]计算单据商品金额出错:%s",e.ErrorMessage());
  151. AfxMessageBox(temp);
  152. }
  154. return TRUE;  // return TRUE unless you set the focus to a control
  155.               // EXCEPTION: OCX Property Pages should return FALSE
  156. }
  158. void CCheckDlg::OnButtonCheckok() 
  159. {
  160. CString stotal,sbilltotal,spayID,sql,spaymode,snowtime;
  161. long lpayID;
  162. _RecordsetPtr m_pRecordset;
  164. m_oConsume.GetWindowText(stotal);
  165. m_oTotalm.GetWindowText(sbilltotal);
  166. int nselect=m_oCombopay.GetCurSel();
  167. m_oCombopay.GetLBText(nselect,spaymode);
  168. lpayID=GetPaymodeID(spaymode);
  169. spayID.Format("%d",lpayID);
  171. if(fchange<0)
  172. return;
  174. //得到系统时间
  175. CTime now=CTime::GetCurrentTime();
  176. snowtime=now.Format(_T("%Y-%m-%d %H:%M:%S"));
  177. sql="Update SALEBILL set ENDDATE='"+snowtime+"',SALES='"+theApp.name+"',TOTAL="
  178. +stotal+",ACTTOTAL="+sbilltotal+",STATUS='已结帐',PAYMODE="+spayID+" where ID='"+theApp.scallid+"'";
  179. try
  180. { 
  181. _variant_t RecordsAffected;
  182. theApp.m_pConnection->Execute((_bstr_t)sql,&RecordsAffected,adCmdText);
  183. }
  184. catch(_com_error e)///捕捉异常
  185. {
  186. CString temp;
  187. temp.Format("[结帐]单据头更新数据库出错:%s",e.ErrorMessage());
  188. AfxMessageBox(temp);
  189. return;
  190. }
  191. //output the checkout time and paymode to the print.
  192. theApp.snowtimep=snowtime;
  193. theApp.spaymodep=spaymode;
  194. theApp.sconsume=stotal;
  195. theApp.sactsum=sbilltotal;
  196. //Insert data into PAYDETAIL.
  197. CString sclass,scontotal,sdiscount,sacttotal,svaltotal;
  198. int nItemCount=m_oChecklist.GetItemCount();//表项总数
  199. for(int i=0;i<nItemCount;i++)
  200. {
  201. sclass=m_oChecklist.GetItemText(i,0);
  202. scontotal=m_oChecklist.GetItemText(i,1);
  203. sdiscount=m_oChecklist.GetItemText(i,3);
  204. sacttotal=m_oChecklist.GetItemText(i,4);
  205. float fvaltotal=atof(scontotal)-atof(sacttotal);
  206. svaltotal.Format("%.2f",fvaltotal);
  207. sql="Insert into PAYDETAIL(BILLID,CLASS,TOTAL,DISCOUNT,ACTTOTAL,VALTOTAL) values('"+theApp.scallid+
  208. "','"+sclass+"',"+scontotal+",'"+sdiscount+"',"+sacttotal+","+svaltotal+")";
  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("[结帐]付款明细（PAYDETAIL）插入数据出错:%s",e.ErrorMessage());
  218. AfxMessageBox(temp);
  219. return;
  220. }
  221. }
  223. //When the check button is click down,send a message(WM_CHECKOUT) to the CPosDlg.
  224. LRESULT Res=::SendMessage(theApp.pWnd, WM_CHECKOUT, 0, 0);
  226. CDialog::OnOK();
  227. }
  229. long CCheckDlg::GetPaymodeID(CString payname)
  230. {
  231. long paymodeID;
  232. _RecordsetPtr m_pRecordset;
  234. CString sql="Select * from PAYMODE where NAME='"+payname+"'";
  235. try
  236. { 
  237. m_pRecordset.CreateInstance("ADODB.Recordset");
  238. m_pRecordset->Open((_variant_t)sql,_variant_t((IDispatch*)theApp.m_pConnection,true),adOpenStatic,adLockOptimistic,adCmdText);
  239. paymodeID=(long)m_pRecordset->GetCollect("ID");
  240. }
  241. catch(_com_error e)///捕捉异常
  242. {
  243. CString temp;
  244. temp.Format("[结帐]获取付款方式ID出错:%s",e.ErrorMessage());
  245. AfxMessageBox(temp);
  246. }
  247. return paymodeID;
  248. }
  250. void CCheckDlg::OnChangeEditReceive() 
  251. {
  252. // TODO: If this is a RICHEDIT control, the control will not
  253. // send this notification unless you override the CDialog::OnInitDialog()
  254. // function and call CRichEditCtrl().SetEventMask()
  255. // with the ENM_CHANGE flag ORed into the mask.
  257. CString sreceive,schange,stotal;
  259. m_oChange.SetWindowText("");
  260. m_oReceive.GetWindowText(sreceive);
  261. m_oTotalm.GetWindowText(stotal);
  262. fchange=atof(sreceive)-atof(stotal);
  263. if(fchange>=0)
  264. {
  265. schange.Format("%.2f",fchange);
  266. m_oChange.SetWindowText(schange);
  267. }
  268. }
  270. void CCheckDlg::ReadtoList(CString sbillid)
  271. {
  272. _RecordsetPtr m_pRecordset; //Must define it in function!!!!
  273. CString sql,sclassname,sclassname1,sctotal;
  274. long lclassid;
  275. float fctotal=0;
  277. sql="Select Sum(ITEMTOTAL) as XXX,CLASSID from SALEDETAIL where BILLID='"+sbillid+"' group by CLASSID ";
  278. //删除所有list中的数据。
  279. m_oChecklist.DeleteAllItems();
  281. int numline=0;
  282. try
  283. {
  284. m_pRecordset.CreateInstance("ADODB.Recordset");
  285. m_pRecordset->Open((_variant_t)sql,_variant_t((IDispatch*)theApp.m_pConnection,true),adOpenStatic,adLockOptimistic,adCmdText);
  286. LV_ITEM lvitem;
  287. lvitem.pszText="";
  288. lvitem.mask=LVIF_TEXT;
  289. lvitem.iSubItem=0;
  290. while(!m_pRecordset->adoEOF)
  291. {
  292. lvitem.iItem=numline;
  293. m_oChecklist.InsertItem(&lvitem);
  294. //读出数据写入到list中
  295. lclassid= (long)m_pRecordset->GetCollect("CLASSID");
  296. sclassname=GetClassName(lclassid);
  297. sclassname1=sclassname.Left(sclassname.GetLength()-4);
  298. m_oChecklist.SetItemText(numline,0,sclassname1);//Read class name to 0 column.
  299. fctotal=(float)m_pRecordset->GetCollect("XXX");
  300. sctotal.Format("%.2f",fctotal);
  301. m_oChecklist.SetItemText(numline,1,sctotal);//Read class consume total to 1st column.
  302. if(sclassname.Right(1)=="0")
  303. m_oChecklist.SetItemText(numline,2,"0.00");//Read class consume discount total to 2nd column.
  304. else
  305. m_oChecklist.SetItemText(numline,2,sctotal);
  306. m_oChecklist.SetItemText(numline,3,"100");
  307. m_oChecklist.SetItemText(numline,4,sctotal);//Read class consume act total to 4th column.
  309. numline++;
  310. m_pRecordset->MoveNext();
  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. }
  323. CString CCheckDlg::GetClassName(long lclassid)
  324. {
  325. _RecordsetPtr m_pRecordset; //Must define it in function!!!!
  326. CString sql,sclassid,sname,sdiscount;
  328. sclassid.Format("%d",lclassid);
  329. sql="Select NAME,DISCOUNT from MATERIELCLASS where ID="+sclassid+"";
  330. try
  331. {
  332. m_pRecordset.CreateInstance("ADODB.Recordset");
  333. m_pRecordset->Open((_variant_t)sql,_variant_t((IDispatch*)theApp.m_pConnection,true),adOpenDynamic,adLockOptimistic,adCmdText);
  335. if(!m_pRecordset->adoEOF)
  336. {
  337. sname=(LPCTSTR)(_bstr_t)m_pRecordset->GetCollect("NAME");
  338. sdiscount=(LPCTSTR)(_bstr_t)m_pRecordset->GetCollect("DISCOUNT");
  339. sname=sname+"xxx"+sdiscount;
  340. }
  341. }
  342. catch(_com_error e)///捕捉异常
  343. {
  344. CString temp;
  345. temp.Format("[结帐]获取类别名称出错:%s",e.ErrorMessage());
  346. AfxMessageBox(temp);
  347. }
  348. return sname;
  349. }
  351. void CCheckDlg::OnClickListChecklist(NMHDR* pNMHDR, LRESULT* pResult) 
  352. {
  353. //得到当前选中的行
  354. POSITION pos = m_oChecklist.GetFirstSelectedItemPosition();
  355. //如果选中一行
  356. if(pos)
  357. {
  358. int nItem = m_oChecklist.GetNextSelectedItem(pos);
  359. CString sdiscount=m_oChecklist.GetItemText(nItem,3);
  360. m_oCdiscount.SetWindowText(sdiscount);
  361. }
  363. *pResult = 0;
  364. }
  366. void CCheckDlg::OnChangeEditCdiscount() 
  367. {
  368. // TODO: If this is a RICHEDIT control, the control will not
  369. // send this notification unless you override the CDialog::OnInitDialog()
  370. // function and call CRichEditCtrl().SetEventMask()
  371. // with the ENM_CHANGE flag ORed into the mask.
  372. CString sdiscountsum,sdiscount,ssum;
  373. float fdiscountsum,fsum;
  374. long ldiscount;
  375. LV_ITEM lvitem;
  376. lvitem.pszText="";
  377. lvitem.mask=LVIF_TEXT;
  379. //得到当前选中的行
  380. POSITION pos = m_oChecklist.GetFirstSelectedItemPosition();
  381. //如果选中一行
  382. if(pos)
  383. {
  384. int nItem = m_oChecklist.GetNextSelectedItem(pos);
  385. sdiscountsum=m_oChecklist.GetItemText(nItem,2);
  386. fdiscountsum=atof(sdiscountsum);
  387. m_oCdiscount.GetWindowText(sdiscount);
  388. ldiscount=atol(sdiscount);
  389. if(ldiscount>100||ldiscount<0)
  390. {
  391. MessageBox("请确定折扣大于0并且小于100！");
  392. return;
  393. }
  394. if(ldiscount<VerifyDicsount())
  395. {
  396. CString temp;
  397. temp.Format("折扣不能小于%d！",VerifyDicsount());
  398. AfxMessageBox(temp);
  399. return;
  400. }
  401. fsum=ldiscount*fdiscountsum/100;
  402. ssum.Format("%.2f",fsum);
  403. if(fdiscountsum==0)//If the class could not be discount.
  404. {
  405. sdiscountsum=m_oChecklist.GetItemText(nItem,1);
  406. ssum=sdiscountsum;
  407. }
  408. lvitem.iItem=nItem;
  409. m_oChecklist.InsertItem(&lvitem);
  410. m_oChecklist.SetItemText(nItem,3,sdiscount);
  411. m_oChecklist.SetItemText(nItem,4,ssum);
  412. }
  414. float ftotal=0;
  415. int nItemCount=m_oChecklist.GetItemCount();//表项总数
  416. for(int i=0;i<nItemCount;i++)
  417. {
  418. sdiscountsum=m_oChecklist.GetItemText(i,4);
  419. fdiscountsum=atof(sdiscountsum);
  420. ftotal=ftotal+fdiscountsum;
  421. }
  422. CString stotal;
  423. stotal.Format("%.2f",ftotal);
  424. m_oTotalm.SetWindowText(stotal);
  425. }
  427. void CCheckDlg::OnButtonRf() 
  428. {
  429. CString sql;
  431. if(!theApp.VerifyPower("RF"))
  432. {
  433. AfxMessageBox("没有权限RF单据!");
  434. return;
  435. }
  437. //得到系统时间
  438. CTime now=CTime::GetCurrentTime();
  439. CString snowtime=now.Format(_T("%Y-%m-%d %H:%M:%S"));
  440. sql="Update SALEBILL set SALES='"+theApp.name+"',ENDDATE='"+snowtime+"',STATUS='已结帐', ACTTOTAL=0, PAYMODE=88 where ID='"+theApp.scallid+"'";
  441. try
  442. { 
  443. _variant_t RecordsAffected;
  444. theApp.m_pConnection->Execute((_bstr_t)sql,&RecordsAffected,adCmdText);
  445. }
  446. catch(_com_error e)///捕捉异常
  447. {
  448. CString temp;
  449. temp.Format("[结帐]RF更新数据库出错:%s",e.ErrorMessage());
  450. AfxMessageBox(temp);
  451. return;
  452. }
  454. //When the check button is click down,send a message(WM_CHECKOUT) to the CPosDlg.
  455. LRESULT Res=::SendMessage(theApp.pWnd, WM_CHECKOUT, 0, 0);
  457. EndDialog(1);//Close the dialog.
  458. }
  460. void CCheckDlg::OnButtonHang() 
  461. {
  462. if(!theApp.VerifyPower("Hang"))
  463. {
  464. AfxMessageBox("没有权限挂帐!");
  465. return;
  466. }
  468. CString sql;
  469. sql="Update SALEBILL set STATUS='挂帐' where ID='"+theApp.scallid+"'";
  470. try
  471. { 
  472. _variant_t RecordsAffected;
  473. theApp.m_pConnection->Execute((_bstr_t)sql,&RecordsAffected,adCmdText);
  474. }
  475. catch(_com_error e)///捕捉异常
  476. {
  477. CString temp;
  478. temp.Format("[结帐]挂帐更新数据库出错:%s",e.ErrorMessage());
  479. AfxMessageBox(temp);
  480. return;
  481. }
  483. EndDialog(1);//Close the dialog.
  484. }
  486. long CCheckDlg::VerifyDicsount()
  487. {
  488. CString sql;
  489. _RecordsetPtr m_pRecordset;
  490. long ldiscount;
  492. sql="Select DISCOUNT from USERS where NAME='"+theApp.name+"'";
  493. try
  494. {
  495. m_pRecordset.CreateInstance("ADODB.Recordset");
  496. m_pRecordset->Open((_variant_t)sql,_variant_t((IDispatch*)theApp.m_pConnection,true),adOpenStatic,adLockOptimistic,adCmdText);
  498. if(!m_pRecordset->adoEOF)
  499. ldiscount=(long)m_pRecordset->GetCollect("DISCOUNT");
  500. }
  501. catch(_com_error e)///捕捉异常
  502. {
  503. CString temp;
  504. temp.Format("读取用户权限出错:%s",e.ErrorMessage());
  505. AfxMessageBox(temp);
  506. return -1;
  507. }
  508. return ldiscount;
  509. }