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

源码开发语言/平台
当前位置：首页 > 源码/资料 > 行业应用 > 百货/超市行业 > 查看源码
FinaceDlg.cpp
资源名称：SuperMarket.rar　[点击查看]
上传用户：tyjx315
上传日期：2015-01-18
资源大小：1685k
文件大小：7k
源码类别：

百货/超市行业

开发平台：

Visual C++

FinaceDlg.cpp：源码内容
  1. // FinaceDlg.cpp : implementation file
  2. //
  4. #include "stdafx.h"
  5. #include "SuperMarket.h"
  6. #include "FinaceDlg.h"
  7. #include "afxdb.h"
  9. #ifdef _DEBUG
  10. #define new DEBUG_NEW
  11. #undef THIS_FILE
  12. static char THIS_FILE[] = __FILE__;
  13. #endif
  15. /////////////////////////////////////////////////////////////////////////////
  16. // CFinaceDlg dialog
  19. CFinaceDlg::CFinaceDlg(CWnd* pParent /*=NULL*/)
  20. : CDialog(CFinaceDlg::IDD, pParent)
  21. {
  22. //{{AFX_DATA_INIT(CFinaceDlg)
  23. m_month = _T("");
  24. m_investment = 0.0f;
  25. m_stock_money = 0.0f;
  26. //}}AFX_DATA_INIT
  27. }
  30. void CFinaceDlg::DoDataExchange(CDataExchange* pDX)
  31. {
  32. CDialog::DoDataExchange(pDX);
  33. //{{AFX_DATA_MAP(CFinaceDlg)
  34. DDX_Control(pDX, IDC_LIST1, m_list);
  35. DDX_Text(pDX, IDC_EDIT1, m_month);
  36. DDX_Text(pDX, IDC_EDIT2, m_investment);
  37. DDX_Text(pDX, IDC_EDIT5, m_stock_money);
  38. //}}AFX_DATA_MAP
  39. }
  42. BEGIN_MESSAGE_MAP(CFinaceDlg, CDialog)
  43. //{{AFX_MSG_MAP(CFinaceDlg)
  44. ON_BN_CLICKED(IDC_UPDATE, OnUpdate)
  45. ON_BN_CLICKED(IDC_ACCOUNT, OnAccount)
  46. //}}AFX_MSG_MAP
  47. END_MESSAGE_MAP()
  49. /////////////////////////////////////////////////////////////////////////////
  50. // CFinaceDlg message handlers
  52. void CFinaceDlg::OnUpdate() //更新
  53. {
  54. // TODO: Add your control notification handler code here
  55.      UpdateData(); 
  56.  CDatabase dbTemp;
  57.  CRecordset  rs( &dbTemp);
  58.  CString strSQL; 
  59.  CString str0,str1;
  60.  float invest,stock;
  61.  
  62.  dbTemp.OpenEx("Driver={Microsoft Access Driver (*.mdb)};DBQ=超市管理数据库.mdb;"); 
  63.  rs.Open(AFX_DB_USE_DEFAULT_TYPE,"select * From 财务报表 where month='"+m_month+"'");
  64.  if(!rs.IsEOF())
  65.  { 
  66.  rs.GetFieldValue((short)1,str0);   
  67.      rs.GetFieldValue((short)5,str1);
  68.  invest=atof(str0);
  69.  stock=atof(str1);
  70.  invest=invest+m_investment;
  71.  stock=stock+m_stock_money;
  72.  str0.Format("%.2f",invest);
  73.  str1.Format("%.2f",stock);
  74.  strSQL="update 财务报表 set investment='"+str0+"' where month='"+m_month+"'"; 
  75.      dbTemp.ExecuteSQL(strSQL);
  76.          strSQL="update 财务报表 set stock='"+str1+"' where month='"+m_month+"'"; 
  77.      dbTemp.ExecuteSQL(strSQL);
  78.      rs.Close();    
  79.  }
  80.  else
  81.  {
  82.  str0.Format("%.2f",m_investment);
  83.  str1.Format("%.2f",m_stock_money);
  84.  strSQL="insert into 财务报表 values('"+m_month+"','"+str0+"','0.00','0.00','0.00','"+str1+"')"; 
  85.  dbTemp.ExecuteSQL(strSQL);  
  86.      rs.Close();
  87.  }
  88.  MessageBox("更新成功!");
  89. m_month = _T("");
  90. m_investment = 0.0f;
  91. m_stock_money = 0.0f;
  92. UpdateData(false);
  93. }
  94. int CFinaceDlg::Cet_Month(CString str)
  95. {
  96. int year,month,day;
  97. sscanf(str,"%d-%d-%d",&year,&month,&day);
  98. return month;
  99. }
  102. void CFinaceDlg::OnAccount()  //结算
  103. {
  104. // TODO: Add your control notification handler code here
  105.      CTime time;
  106.  UpdateData(); 
  107.  CDatabase dbTemp;
  108.  CRecordset  rs( &dbTemp);
  109.  CString str0,str1,str2,str3,str4,str5;
  110.  CString strSQL;
  111.  int month;
  112.  float money,totalmoney=0;
  113.  m_time = time.GetCurrentTime();
  114.  m_time.GetMonth();
  115.  month=atoi(m_month);
  116.  dbTemp.OpenEx("Driver={Microsoft Access Driver (*.mdb)};DBQ=超市管理数据库.mdb;");
  117.  
  118.  if(month<m_time.GetMonth())  //如果是已结算过的月份，输出财务报表
  119.  {
  120.  rs.Open(AFX_DB_USE_DEFAULT_TYPE,"select * From 财务报表 where month='"+m_month+"'");
  121.          rs.GetFieldValue((short)0,str0);   
  122.      rs.GetFieldValue((short)1,str1);
  123.  rs.GetFieldValue((short)2,str2);   
  124.      rs.GetFieldValue((short)3,str3);
  125.  rs.GetFieldValue((short)4,str4);   
  126.      rs.GetFieldValue((short)5,str5);
  127.  m_list.InsertItem   (addtime,str0);//写第一列；   
  128.  m_list.SetItemText   (addtime,1,str1);//第二列；   
  129.  m_list.SetItemText   (addtime,2,str2);//第三列；   
  130.  m_list.SetItemText   (addtime,3,str3);//第四列；  
  131.  m_list.SetItemText   (addtime,4,str4);//第五列; 
  132.  m_list.SetItemText   (addtime,5,str5);//第五列;
  133.  addtime++;
  134.  UpdateData(false);
  135.  rs.Close();  
  136.  }
  137.  else if(month==m_time.GetMonth()) //如果是当前月份，计算财务报表并输出
  138.  {
  139.  rs.Open(AFX_DB_USE_DEFAULT_TYPE,"select * From 工资表");
  140.  while(!rs.IsEOF())   //计算月工资发放额
  141.  {
  142.             rs.GetFieldValue((short)2,str2);
  143. money=atof(str2);
  144. totalmoney=totalmoney+money;
  145. rs.MoveNext(); 
  146.  }
  147.  str2.Format("%.2f",totalmoney);
  148.  strSQL="update 财务报表 set totalsalary='"+str2+"' where month='"+m_month+"'"; 
  149.      dbTemp.ExecuteSQL(strSQL);
  150.  totalmoney=0;
  151.  rs.Close();
  153.  rs.Open(AFX_DB_USE_DEFAULT_TYPE,"select * From 销售表");  //计算月销售总额
  154.  while(!rs.IsEOF())
  155.  {
  156.  rs.GetFieldValue((short)2,str2);
  157.  month = Cet_Month(str2);
  158.  if(month==m_time.GetMonth())
  159.  {
  160.  rs.GetFieldValue((short)1,str2);
  161.  money=atof(str2);
  162.      totalmoney=totalmoney+money;
  163.  }
  164.  rs.MoveNext();
  165.  str2.Format("%.2f",totalmoney);
  166.      strSQL="update 财务报表 set sale='"+str2+"' where month='"+m_month+"'"; 
  167.          dbTemp.ExecuteSQL(strSQL);
  168.  }
  169.  totalmoney=0;
  170.  rs.Close();
  171.  
  172.  rs.Open(AFX_DB_USE_DEFAULT_TYPE,"select * From 退货表");  //计算退货总额
  173.  while(!rs.IsEOF())
  174.  {
  175.  rs.GetFieldValue((short)5,str2);
  176.  month = Cet_Month(str2);
  177.  if(month==m_time.GetMonth())
  178.  {
  179.  rs.GetFieldValue((short)4,str2);
  180.  money=atof(str2);
  181.      totalmoney=totalmoney+money;
  182.  }
  183.  rs.MoveNext();
  184.  str2.Format("%.2f",totalmoney);
  185.      strSQL="update 财务报表 set refundent='"+str2+"' where month='"+m_month+"'"; 
  186.          dbTemp.ExecuteSQL(strSQL);
  187.  }
  188.  rs.Close();
  190.  rs.Open(AFX_DB_USE_DEFAULT_TYPE,"select * From 财务报表 where month='"+m_month+"'");
  191.          rs.GetFieldValue((short)0,str0);   
  192.      rs.GetFieldValue((short)1,str1);
  193.  rs.GetFieldValue((short)2,str2);   
  194.      rs.GetFieldValue((short)3,str3);
  195.  rs.GetFieldValue((short)4,str4);   
  196.      rs.GetFieldValue((short)5,str5);
  197.  m_list.InsertItem   (addtime,str0);//写第一列；   
  198.  m_list.SetItemText   (addtime,1,str1);//第二列；   
  199.  m_list.SetItemText   (addtime,2,str2);//第三列；   
  200.  m_list.SetItemText   (addtime,3,str3);//第四列；  
  201.  m_list.SetItemText   (addtime,4,str4);//第五列; 
  202.  m_list.SetItemText   (addtime,5,str5);//第五列;
  203.  addtime++;
  204.  UpdateData(false);
  205.  rs.Close();  
  206.  }
  207.  else    //如果是还未到的月份，输出不能结算
  208.  {
  209.  MessageBox("还未到该月份，不能结算");  
  210.  }
  211. m_month = _T("");
  212. m_investment = 0.0f;
  213. m_stock_money = 0.0f;
  214. UpdateData(false);
  215. }
  217. BOOL CFinaceDlg::OnInitDialog() 
  218. {
  219. CDialog::OnInitDialog();
  220. addtime=0;
  222. // TODO: Add extra initialization here
  223. m_list.SetExtendedStyle(LVS_EX_GRIDLINES|LVS_EX_FULLROWSELECT|LVS_EX_ONECLICKACTIVATE);
  224. m_list.InsertColumn(0,"月份",LVCFMT_LEFT,80);
  225. m_list.InsertColumn(1,"经理投资",LVCFMT_LEFT,100);
  226. m_list.InsertColumn(2,"工资额",LVCFMT_LEFT,100);
  227. m_list.InsertColumn(3,"销售额",LVCFMT_LEFT,100);
  228. m_list.InsertColumn(4,"退款额",LVCFMT_LEFT,100);
  229.     m_list.InsertColumn(5,"采购金",LVCFMT_LEFT,100);
  230.  
  231. return TRUE;  // return TRUE unless you set the focus to a control
  232.               // EXCEPTION: OCX Property Pages should return FALSE
  233. }