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

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

酒店行业

开发平台：

Java

OffdutyDlg.cpp：源码内容
  1. // OffdutyDlg.cpp : implementation file
  2. //
  4. #include "stdafx.h"
  5. #include "MyPos.h"
  6. #include "OffdutyDlg.h"
  7. #include "MyPosDlg.h"
  9. #ifdef _DEBUG
  10. #define new DEBUG_NEW
  11. #undef THIS_FILE
  12. static char THIS_FILE[] = __FILE__;
  13. #endif
  15. /////////////////////////////////////////////////////////////////////////////
  16. // COffdutyDlg dialog
  17. extern CMyPosApp theApp;
  20. COffdutyDlg::COffdutyDlg(CWnd* pParent /*=NULL*/)
  21. : CDialog(COffdutyDlg::IDD, pParent)
  22. {
  23. //{{AFX_DATA_INIT(COffdutyDlg)
  24. //}}AFX_DATA_INIT
  25. }
  28. void COffdutyDlg::DoDataExchange(CDataExchange* pDX)
  29. {
  30. CDialog::DoDataExchange(pDX);
  31. //{{AFX_DATA_MAP(COffdutyDlg)
  32. DDX_Control(pDX, IDC_EDIT_OFFRFMONEY, m_oOffrfmoney);
  33. DDX_Control(pDX, IDC_EDIT_OFFRF, m_oOffrf);
  34. DDX_Control(pDX, IDC_LIST3, m_oHanglist);
  35. DDX_Control(pDX, IDC_LIST2, m_oNonchecklist);
  36. DDX_Control(pDX, IDC_LIST1, m_oMoneylist);
  37. DDX_Control(pDX, IDC_EDIT_OFFBILLS, m_oOffbills);
  38. DDX_Control(pDX, IDC_EDIT_OFFTIME, m_oOfftime);
  39. DDX_Control(pDX, IDC_EDIT_OFFPEOPLES, m_oOffpeoples);
  40. DDX_Control(pDX, IDC_EDIT_CHECKMAN, m_oCheckman);
  41. //}}AFX_DATA_MAP
  42. }
  45. BEGIN_MESSAGE_MAP(COffdutyDlg, CDialog)
  46. //{{AFX_MSG_MAP(COffdutyDlg)
  47. ON_BN_CLICKED(IDC_BUTTON_OFFPRINT, OnButtonOffprint)
  48. //}}AFX_MSG_MAP
  49. END_MESSAGE_MAP()
  51. /////////////////////////////////////////////////////////////////////////////
  52. // COffdutyDlg message handlers
  54. void COffdutyDlg::OnOK() 
  55. {
  56. //When the offduty button is click down,send a message(WM_OFFDUTY) to the CPosDlg.
  57. LRESULT Res=::SendMessage(theApp.pWndoff, WM_OFFDUTY, 0, 0);
  59. CDialog::OnOK();
  60. }
  62. BOOL COffdutyDlg::OnInitDialog() 
  63. {
  64. CDialog::OnInitDialog();
  66. _RecordsetPtr m_pRecordset;
  67. //得到系统时间
  68. CTime now=CTime::GetCurrentTime();
  69. CString snowtime=now.Format(_T("%Y-%m-%d %H:%M:%S"));
  70. m_oCheckman.SetWindowText(theApp.name);
  71. m_oOfftime.SetWindowText(snowtime);
  72. CString starttime,stime;
  73. starttime=snowtime.Left(10);
  74. stime=snowtime.Mid(11,2);
  76. if(atoi(stime)>8)
  77. starttime=starttime+" 08:00:00";
  78. else
  79. {
  80. CString smonth=starttime.Mid(5,2);
  81. int imonth=atoi(smonth);
  82. CString sday=starttime.Right(2);
  84. starttime=YearMonthDay("2003",smonth,sday);
  85. starttime=starttime+" 08:00:00";
  86. }
  88. _variant_t vtemp;
  89. //RMB Checkout bills stat.
  90. CString soffsum="0.00",speoplesum="0",sbillsum="0",space=" ";
  91. long lbillsum=0,lpeoplesum=0;
  92. float foffsum=0,fttl=0;
  93. int i,n;
  94. CString sql;
  95. sql="Select sum(ACTTOTAL) as XXX, sum(PEOPLES) as PPP, count(*) as NNN from (Select * from SALEBILL where ENDDATE>'"+starttime+
  96. "' and ENDDATE<'"+snowtime+"') where SALES='"+theApp.name+"' and STATUS='已结帐' and PAYMODE<>88";
  97. try
  98. { 
  99. m_pRecordset.CreateInstance("ADODB.Recordset");
  100. m_pRecordset->Open((_variant_t)sql,_variant_t((IDispatch*)theApp.m_pConnection,true),adOpenStatic,adLockOptimistic,adCmdText);
  101. vtemp=m_pRecordset->GetCollect("XXX");
  102. if(vtemp.dblVal>0)
  103. foffsum=vtemp.dblVal;
  104. vtemp=m_pRecordset->GetCollect("NNN");
  105. if(vtemp.lVal>0)
  106. lbillsum=vtemp.lVal;
  107. vtemp=m_pRecordset->GetCollect("PPP");
  108. if(vtemp.iVal>0)
  109. lpeoplesum=vtemp.iVal;
  110. // lpeoplesum=(long)m_pRecordset->GetCollect("PPP");
  111. soffsum.Format("%.2f",foffsum);
  112. if(lpeoplesum>0)
  113. speoplesum.Format("%d",lpeoplesum);
  114. sbillsum.Format("%d",lbillsum);
  115. fttl=foffsum;
  116. }
  117. catch(_com_error e)///捕捉异常
  118. {
  119. CString temp;
  120. temp.Format("[下班]计算结帐总金额出错:%s",e.ErrorMessage());
  121. AfxMessageBox(temp);
  122. return FALSE;
  123. }
  124. m_oOffbills.SetWindowText(sbillsum);
  125. m_oOffpeoples.SetWindowText(speoplesum);
  126. n=17-soffsum.GetLength();
  127. for(i=0;i<n-1;i++)
  128. space=space+" ";
  129. m_oMoneylist.AddString("人民币:"+space+soffsum);
  130. //Non-RMB Checkout bills stat.
  131. sql="Select sum(ACTTOTAL) as XXX from (Select * from SALEBILL where ENDDATE>'"+starttime+
  132. "' and ENDDATE<'"+snowtime+"') where SALES='"+theApp.name+"' and STATUS='已结帐' and PAYMODE<>1 and PAYMODE<>88";
  133. try
  134. { 
  135. m_pRecordset.CreateInstance("ADODB.Recordset");
  136. m_pRecordset->Open((_variant_t)sql,_variant_t((IDispatch*)theApp.m_pConnection,true),adOpenStatic,adLockOptimistic,adCmdText);
  137. vtemp=m_pRecordset->GetCollect("XXX");
  138. foffsum=vtemp.dblVal;
  139. soffsum="0.00";
  140. if(foffsum>0)
  141. {
  142. soffsum.Format("%.2f",foffsum);
  143. fttl=fttl+foffsum;
  144. }
  145. }
  146. catch(_com_error e)///捕捉异常
  147. {
  148. CString temp;
  149. temp.Format("[下班]计算非人民币结帐总金额出错:%s",e.ErrorMessage());
  150. AfxMessageBox(temp);
  151. return FALSE;
  152. }
  153. n=17-soffsum.GetLength();
  154. space=" ";
  155. for(i=0;i<n-1;i++)
  156. space=space+" ";
  157. m_oMoneylist.AddString("其　它:"+space+soffsum);
  158. soffsum.Format("%.2f",fttl);
  159. n=17-soffsum.GetLength();
  160. space=" ";
  161. for(i=0;i<n-1;i++)
  162. space=space+" ";
  163. m_oMoneylist.AddString("合　计:"+space+soffsum);
  164. //Noncheck bills and hang bills.
  165. sql="Select ID,TOTAL,STATUS from (Select * from SALEBILL where BEGINDATE>'"+starttime+
  166. "' and BEGINDATE<'"+snowtime+"') where STATUS<>'已结帐'";
  167. try
  168. { 
  169. m_pRecordset.CreateInstance("ADODB.Recordset");
  170. m_pRecordset->Open((_variant_t)sql,_variant_t((IDispatch*)theApp.m_pConnection,true),adOpenStatic,adLockOptimistic,adCmdText);
  171. float ftotal=0,ftotal1=0;
  172. while(!m_pRecordset->adoEOF)
  173. {
  174. CString sbillid,sbilltotal,status;
  175. sbillid=(LPCTSTR)(_bstr_t)m_pRecordset->GetCollect("ID");
  176. float fbilltotal=(float)m_pRecordset->GetCollect("TOTAL");
  177. sbilltotal.Format("%.2f",fbilltotal);
  178. status=(LPCTSTR)(_bstr_t)m_pRecordset->GetCollect("STATUS");
  179. n=10-sbilltotal.GetLength();
  180. space=" ";
  181. for(i=0;i<n-1;i++)
  182. space=space+" ";
  183. if(status=="等待")
  184. {
  185. m_oNonchecklist.AddString(sbillid+space+sbilltotal);
  186. ftotal=ftotal+fbilltotal;
  187. }
  188. if(status=="挂帐")
  189. {
  190. m_oHanglist.AddString(sbillid+space+sbilltotal);
  191. ftotal1=ftotal1+fbilltotal;
  192. }
  193. m_pRecordset->MoveNext();
  194. }
  195. CString stotal;
  196. stotal.Format("%.2f",ftotal);
  197. n=17-stotal.GetLength();
  198. space=" ";
  199. for(i=0;i<n-1;i++)
  200. space=space+" ";
  201. m_oNonchecklist.AddString("合　计:"+space+stotal);
  202. stotal.Format("%.2f",ftotal1);
  203. n=17-stotal.GetLength();
  204. space=" ";
  205. for(i=0;i<n-1;i++)
  206. space=space+" ";
  207. m_oHanglist.AddString("合　计:"+space+stotal);
  208. }
  209. catch(_com_error e)///捕捉异常
  210. {
  211. CString temp;
  212. temp.Format("[下班]查找未结帐单据和挂帐出错:%s",e.ErrorMessage());
  213. return FALSE;
  214. AfxMessageBox(temp);
  215. }
  216. //RF bills stat.
  217. CString srfsum="0.00";
  218. float frfsum;
  219. sql="Select sum(TOTAL) as XXX, count(*) as NNN from (Select * from SALEBILL where ENDDATE>'"+starttime+
  220. "' and ENDDATE<'"+snowtime+"') where SALES='"+theApp.name+"' and STATUS='已结帐' and PAYMODE=88";
  221. try
  222. { 
  223. m_pRecordset.CreateInstance("ADODB.Recordset");
  224. m_pRecordset->Open((_variant_t)sql,_variant_t((IDispatch*)theApp.m_pConnection,true),adOpenStatic,adLockOptimistic,adCmdText);
  225. vtemp=m_pRecordset->GetCollect("XXX");
  226. lbillsum=(long)m_pRecordset->GetCollect("NNN");
  227. sbillsum.Format("%d",lbillsum);
  228. if(vtemp.dblVal>0)
  229. {
  230. frfsum=vtemp.dblVal;
  231. srfsum.Format("%.2f",frfsum);
  232. }
  233. }
  234. catch(_com_error e)///捕捉异常
  235. {
  236. CString temp;
  237. temp.Format("[下班]计算RF金额出错:%s",e.ErrorMessage());
  238. return FALSE;
  239. AfxMessageBox(temp);
  240. }
  241. m_oOffrf.SetWindowText(sbillsum);
  242. m_oOffrfmoney.SetWindowText(srfsum);
  244. return TRUE;  // return TRUE unless you set the focus to a control
  245.               // EXCEPTION: OCX Property Pages should return FALSE
  246. }
  248. CString COffdutyDlg::YearMonthDay(CString y, CString m, CString d)
  249. {
  250. CString sday,smonth,sy,sdate;
  251. int ny=atoi(y);
  252. sy=y;
  253. int imonth=atoi(m);
  254. smonth=m;
  255. int nday=0;
  256. nday=atoi(d)-1;
  257. sday.Format("%02d",nday);
  258. //If it is 1st,Janurary.
  259. if(nday==0 && imonth==1)
  260. {
  261. ny=ny-1;
  262. sy.Format("%d",ny);
  263. imonth=12;
  264. sday="31";
  265. }
  266. //If it is 1st of the month.
  267. if(nday==0)
  268. {
  269. switch(imonth)
  270. {
  271. case 2:
  272. sday="31";
  273. break;
  274. case 3:
  275. if(ny%4>0)
  276. sday="28";
  277. else
  278. sday="29";
  279. break;
  280. case 4:
  281. sday="31";
  282. break;
  283. case 5:
  284. sday="30";
  285. break;
  286. case 6:
  287. sday="31";
  288. break;
  289. case 7:
  290. sday="30";
  291. break;
  292. case 8:
  293. sday="31";
  294. break;
  295. case 9:
  296. sday="31";
  297. break;
  298. case 10:
  299. sday="30";
  300. break;
  301. case 11:
  302. sday="31";
  303. break;
  304. case 12:
  305. sday="30";
  306. break;
  307. default:
  308. break;
  309. }
  310. imonth=imonth-1;
  311. smonth.Format("%2d",imonth);
  312. }
  313. sdate=sy+"-"+smonth+"-"+sday;
  315. return sdate;
  316. }
  318. void COffdutyDlg::OnButtonOffprint() 
  319. {
  320. int i,ncount;
  321. CDC dc;
  322. //把打印设备环境附加到DC对象
  323. CPrintDialog pdlg(FALSE,PD_NOPAGENUMS|PD_NOSELECTION,this);
  324. BOOL bFindPrinter=pdlg.GetDefaults();
  325. if(!bFindPrinter)
  326. return;
  327. dc.Attach(pdlg.GetPrinterDC());
  329. //取打印机的横方向和纵方向的分辨率
  330. //即每英寸点数
  331. short cxInch = dc.GetDeviceCaps(LOGPIXELSX);
  332. short cyInch = dc.GetDeviceCaps(LOGPIXELSY);
  333. //字体
  334. CFont font;
  335. VERIFY(font.CreatePointFont(96, "宋体", &dc));//为DC创建字体
  336. CFont* def_font = dc.SelectObject(&font);//保存现在的字体
  338. //根据字体宽度、高度计算每行最大字数及每页最大行数
  339. //取打印纸张高度和宽度
  340. int nPageHeight, nPageWidth;
  341. nPageHeight = dc.GetDeviceCaps(VERTRES);
  342. nPageWidth = dc.GetDeviceCaps(HORZRES);
  344. TEXTMETRIC TextM;
  345. dc.GetTextMetrics(&TextM);
  346. //字体高度 //字体平均宽度
  347. int nCharHeight = (unsigned short)TextM.tmHeight;
  348. int nCharWidth=(unsigned short)TextM.tmAveCharWidth;
  350. //每行最大字数 //每页最大行数
  351. int m_MaxLineChar = nPageWidth / nCharWidth - 8; 
  352. //每页最大行数
  353. int nMaxLinePerPage = nPageHeight/nCharHeight -3;
  354. int nCurPage =1;
  355. //页边距
  356. int nXMargin = 2;
  357. int nYMargin = 2;
  359. //设置所需打印纸张数目
  360. DOCINFO di;
  361. di.cbSize = sizeof(DOCINFO);
  362. di.lpszDocName = "Report printing"; 
  363. di.lpszOutput = (LPTSTR) NULL; 
  364. di.lpszDatatype = (LPTSTR) NULL; 
  365. di.fwType = 0; 
  366. dc.StartDoc(&di);
  367. dc.StartPage();
  369. //输出报表名称
  370. CString stitle,sftitle;
  371. stitle="销售日报表";
  372. sftitle.Format("%23s",stitle);
  373. dc.TextOut(2, nYMargin+nCharHeight,sftitle, strlen(sftitle));
  374. stitle="==============";
  375. sftitle.Format("%25s",stitle);
  376. dc.TextOut(2, nYMargin+nCharHeight*2,sftitle, strlen(sftitle));
  378. //输出报表内容
  379. //收银、日期、人数、单数、RF、金额
  380. CString ssale,sdate,speople,sbills,sRF,sRFtotal,stemp;
  381. m_oCheckman.GetWindowText(ssale);
  382. m_oOfftime.GetWindowText(sdate);
  383. m_oOffpeoples.GetWindowText(speople);
  384. m_oOffbills.GetWindowText(sbills);
  385. m_oOffrf.GetWindowText(sRF);
  386. m_oOffrfmoney.GetWindowText(sRFtotal);
  387. stemp.Format("%-7s",ssale);//use stemp save ssale's value.
  388. ssale="收银:"+stemp+"日期:"+sdate;
  389. dc.TextOut(2, nYMargin+nCharHeight*3,ssale, strlen(ssale));//Out put the first line.
  390. stemp.Format("%-7s",speople);//use stemp save ssale's value.
  391. speople="人数:"+stemp+"单数:"+sbills;
  392. dc.TextOut(2, nYMargin+nCharHeight*4,speople, strlen(speople));//Out put the first line.
  393. stemp.Format("%-7s",sRF);//use stemp save ssale's value.
  394. sRF="R  F:"+stemp+"RF金额:"+sRFtotal;
  395. dc.TextOut(2, nYMargin+nCharHeight*5,sRF, strlen(sRF));//Out put the first line.
  396. //输出付款汇总内容
  397. stitle="-------------付款汇总-------------";
  398. dc.TextOut(2, nYMargin+nCharHeight*7,stitle, strlen(stitle));
  399. ncount=m_oMoneylist.GetCount();
  400. CString sline;
  401. for(i=0; i<ncount; i++)
  402. {
  403. if(ncount+7-(nCurPage-1)*nMaxLinePerPage > nMaxLinePerPage)
  404. {
  405. //新的一页
  406. dc.EndPage();
  407. dc.StartPage();
  408. nCurPage ++;
  409. }
  410. m_oMoneylist.GetText(i, sline);//得到选中项的文本
  411. dc.TextOut( 2, nYMargin+(i+8-(nCurPage-1)*nMaxLinePerPage)*nCharHeight, 
  412. sline, strlen(sline));
  413. }
  414. //输出未结单据内容
  415. stitle="-------------未结单据-------------";
  416. dc.TextOut(2, nYMargin+nCharHeight*(ncount+8),stitle, strlen(stitle));
  417. int ncount1=m_oNonchecklist.GetCount();
  418. for(i=0; i<ncount1; i++)
  419. {
  420. if(ncount+ncount1+7-(nCurPage-1)*nMaxLinePerPage > nMaxLinePerPage)
  421. {
  422. //新的一页
  423. dc.EndPage();
  424. dc.StartPage();
  425. nCurPage ++;
  426. }
  427. m_oNonchecklist.GetText(i, sline);//得到选中项的文本
  428. dc.TextOut( 2, nYMargin+(i+ncount+9-(nCurPage-1)*nMaxLinePerPage)*nCharHeight, 
  429. sline, strlen(sline));
  430. }
  431. //输出挂帐单据内容
  432. stitle="-------------挂帐单据-------------";
  433. dc.TextOut(2, nYMargin+nCharHeight*(ncount1+ncount+9),stitle, strlen(stitle));
  434. int ncount2=m_oHanglist.GetCount();
  435. for(i=0; i<ncount2; i++)
  436. {
  437. if(ncount+7-(nCurPage-1)*nMaxLinePerPage > nMaxLinePerPage)
  438. {
  439. //新的一页
  440. dc.EndPage();
  441. dc.StartPage();
  442. nCurPage ++;
  443. }
  444. m_oHanglist.GetText(i, sline);//得到选中项的文本
  445. dc.TextOut( 2, nYMargin+(i+ncount1+ncount+10-(nCurPage-1)*nMaxLinePerPage)*nCharHeight, 
  446. sline, strlen(sline));
  447. }
  449. dc.EndPage();
  450. dc.EndDoc();
  451. //打印结束
  452. //最后不要忘记将字体还原，这一句是必需的
  453. dc.SelectObject(def_font); //恢复原来的字体
  454. font.DeleteObject(); 
  456. DeleteDC(dc.Detach()); 
  457. }