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

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

酒店行业

开发平台：

Java

CleardataDlg.cpp：源码内容
  1. // CleardataDlg.cpp : implementation file
  2. //
  4. #include "stdafx.h"
  5. #include "MyPos.h"
  6. #include "CleardataDlg.h"
  8. #ifdef _DEBUG
  9. #define new DEBUG_NEW
  10. #undef THIS_FILE
  11. static char THIS_FILE[] = __FILE__;
  12. #endif
  14. /////////////////////////////////////////////////////////////////////////////
  15. // CCleardataDlg dialog
  16. extern CMyPosApp theApp;
  19. CCleardataDlg::CCleardataDlg(CWnd* pParent /*=NULL*/)
  20. : CDialog(CCleardataDlg::IDD, pParent)
  21. {
  22. //{{AFX_DATA_INIT(CCleardataDlg)
  23. // NOTE: the ClassWizard will add member initialization here
  24. //}}AFX_DATA_INIT
  25. }
  28. void CCleardataDlg::DoDataExchange(CDataExchange* pDX)
  29. {
  30. CDialog::DoDataExchange(pDX);
  31. //{{AFX_DATA_MAP(CCleardataDlg)
  32. DDX_Control(pDX, IDC_DATETIMEPICKER_TO, m_oDateto);
  33. DDX_Control(pDX, IDC_DATETIMEPICKER_FROM, m_oDatefrom);
  34. //}}AFX_DATA_MAP
  35. }
  38. BEGIN_MESSAGE_MAP(CCleardataDlg, CDialog)
  39. //{{AFX_MSG_MAP(CCleardataDlg)
  40. ON_BN_CLICKED(IDC_BUTTON_CLEAR, OnButtonClear)
  41. //}}AFX_MSG_MAP
  42. END_MESSAGE_MAP()
  44. /////////////////////////////////////////////////////////////////////////////
  45. // CCleardataDlg message handlers
  47. void CCleardataDlg::OnButtonClear() 
  48. {
  49. CString sfrom,sto,sdate1,sdate2,sbeginid,sendid,sql;
  50. _RecordsetPtr m_pRecordset;
  52. m_oDatefrom.GetWindowText(sfrom);
  53. sdate1=Dateformat(sfrom);
  54. sfrom.Format("%s 00:00:00",sdate1);
  55. m_oDateto.GetWindowText(sto);
  56. sdate2=Dateformat(sto);
  57. sto.Format("%s 00:00:00",sdate2);
  59. sql="Select ID from SALEBILL where ENDDATE>='"+sfrom+"' and ENDDATE<='"+sto+"' and STATUS='已结帐'";
  60. if(AfxMessageBox("确定清除数据吗？",MB_YESNO)==IDYES)
  61. {
  62. try
  63. { 
  64. m_pRecordset.CreateInstance("ADODB.Recordset");
  65. m_pRecordset->Open((_variant_t)sql,_variant_t((IDispatch*)theApp.m_pConnection,true),adOpenStatic,adLockOptimistic,adCmdText);
  66. if(!m_pRecordset->adoEOF)
  67. {
  68. m_pRecordset->MoveFirst();
  69. sbeginid=(LPCTSTR)(_bstr_t)m_pRecordset->GetCollect("ID");
  70. m_pRecordset->MoveLast();
  71. sendid=(LPCTSTR)(_bstr_t)m_pRecordset->GetCollect("ID");
  72. }
  73. }
  74. catch(_com_error e)///捕捉异常
  75. {
  76. CString temp;
  77. temp.Format("[清除数据]获得单据编号出错:%s",e.ErrorMessage());
  78. AfxMessageBox(temp);
  79. return;
  80. }
  81. sql="Delete * from SALEBILL where ENDDATE>='"+sfrom+"' and ENDDATE<='"+sto+"' and STATUS='已结帐'";
  82. try
  83. { 
  84. _variant_t RecordsAffected;
  85. theApp.m_pConnection->Execute((_bstr_t)sql,&RecordsAffected,adCmdText);
  86. }
  87. catch(_com_error e)///捕捉异常
  88. {
  89. CString temp;
  90. temp.Format("[清除数据]删除单据头:%s",e.ErrorMessage());
  91. AfxMessageBox(temp);
  92. return;
  93. }
  95. if(sbeginid=="" || sendid=="")
  96. return;
  98. sql="Delete * from SALEDETAIL where BILLID>='"+sbeginid+"' and BILLID<='"+sendid+"'";
  99. try
  100. { 
  101. _variant_t RecordsAffected;
  102. theApp.m_pConnection->Execute((_bstr_t)sql,&RecordsAffected,adCmdText);
  103. sql="Delete * from PAYDETAIL where BILLID>='"+sbeginid+"' and BILLID<='"+sendid+"'";
  104. theApp.m_pConnection->Execute((_bstr_t)sql,&RecordsAffected,adCmdText);
  105. }
  106. catch(_com_error e)///捕捉异常
  107. {
  108. CString temp;
  109. temp.Format("[清除数据]删除单据商品或付款明细出错:%s",e.ErrorMessage());
  110. AfxMessageBox(temp);
  111. return;
  112. }
  113. }
  115. }
  117. CString CCleardataDlg::Dateformat(CString sdate)
  118. {
  119. if(sdate.GetLength()==8)
  120. {
  121. sdate.Insert(7,'0');
  122. sdate.Insert(5,'0');
  123. }
  124. if(sdate.GetLength()==9)
  125. {
  126. if(sdate.GetAt(6)=='-')
  127. sdate.Insert(5,'0');
  128. else
  129. sdate.Insert(8,'0');
  130. }
  131. return sdate;
  132. }
  134. BOOL CCleardataDlg::OnInitDialog() 
  135. {
  136. CDialog::OnInitDialog();
  138. // TODO: Add extra initialization here
  140. return TRUE;  // return TRUE unless you set the focus to a control
  141.               // EXCEPTION: OCX Property Pages should return FALSE
  142. }