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

源码开发语言/平台
当前位置：首页 > 源码/资料 > 行业应用 > 百货/超市行业 > 查看源码
DlgChuKuKanDan.cpp
资源名称：chaoshiguanli.rar　[点击查看]
上传用户：jzscgs158
上传日期：2022-05-25
资源大小：8709k
文件大小：11k
源码类别：

百货/超市行业

开发平台：

Visual C++

DlgChuKuKanDan.cpp：源码内容
  1. // DlgChuKuKanDan.cpp : implementation file
  2. //
  4. #include "stdafx.h"
  5. #include "ncshop.h"
  6. #include "DlgChuKuKanDan.h"
  7. #include "ADOConn.h"
  8. #include "MyTime.h"
  9. #include "DlgAll.h"
  10. #include "DlgPrint.h"
  11. #ifdef _DEBUG
  12. #define new DEBUG_NEW
  13. #undef THIS_FILE
  14. static char THIS_FILE[] = __FILE__;
  15. #endif
  17. /////////////////////////////////////////////////////////////////////////////
  18. // CDlgChuKuKanDan dialog
  21. CDlgChuKuKanDan::CDlgChuKuKanDan(CWnd* pParent /*=NULL*/)
  22. : CDialog(CDlgChuKuKanDan::IDD, pParent)
  23. {
  24. //{{AFX_DATA_INIT(CDlgChuKuKanDan)
  25. // NOTE: the ClassWizard will add member initialization here
  26. m_str1 = _T("");
  27. m_str2 = _T("");
  28. m_str8 = _T("");
  29. m_str3 = _T("");
  30. m_str4 = _T("");
  31. m_str5 = _T("");
  32. m_flt6 = 0.0f;
  33. m_flt7 = 0.0f;
  34. //}}AFX_DATA_INIT
  35. }
  38. void CDlgChuKuKanDan::DoDataExchange(CDataExchange* pDX)
  39. {
  40. CDialog::DoDataExchange(pDX);
  41. //{{AFX_DATA_MAP(CDlgChuKuKanDan)
  42. // NOTE: the ClassWizard will add DDX and DDV calls here
  43. DDX_Control(pDX, IDC_BUTTON8, m_Btn10);
  44. DDX_Control(pDX, IDC_BUTTON5, m_Btn9);
  45. DDX_Control(pDX, IDC_BUTTON2, m_Btn2);
  46. DDX_Control(pDX, IDC_BUTTON4, m_Btn8);
  47. DDX_Control(pDX, IDC_LIST1, m_listMain);
  48. DDX_Control(pDX, IDFIND, m_Btn6);
  49. DDX_Control(pDX, IDDEL, m_Btn5);
  50. DDX_Control(pDX, IDCANCEL, m_Btn4);
  51. DDX_Control(pDX, IDC_BUTTON3, m_Btn3);
  52. DDX_Control(pDX, IDC_BUTTON1, m_Btn1);
  53. DDX_Text(pDX, IDC_EDIT1, m_str1);
  54. DDX_Text(pDX, IDC_EDIT2, m_str2);
  55. DDX_Text(pDX, IDC_EDIT20, m_str8);
  56. DDX_Text(pDX, IDC_EDIT3, m_str3);
  57. DDX_Text(pDX, IDC_EDIT4, m_str4);
  58. DDX_Text(pDX, IDC_EDIT5, m_str5);
  59. DDX_Text(pDX, IDC_EDIT16, m_flt6);
  60. DDX_Text(pDX, IDC_EDIT18, m_flt7);
  61. //}}AFX_DATA_MAP
  62. }
  65. BEGIN_MESSAGE_MAP(CDlgChuKuKanDan, CDialog)
  66. //{{AFX_MSG_MAP(CDlgChuKuKanDan)
  67. // NOTE: the ClassWizard will add message map macros here
  68. ON_BN_CLICKED(IDC_BUTTON4, OnButton4)
  69. ON_BN_CLICKED(IDC_BUTTON2, OnButton2)
  70. ON_BN_CLICKED(IDFIND, OnFind)
  71. ON_BN_CLICKED(IDC_BUTTON1, OnButton1)
  72. ON_BN_CLICKED(IDDEL, OnDel)
  73. ON_BN_CLICKED(IDC_BUTTON3, OnButton3)
  74. ON_NOTIFY(NM_CLICK, IDC_LIST1, OnClickList1)
  75. ON_BN_CLICKED(IDC_BUTTON5, OnButton5)
  76. ON_BN_CLICKED(IDC_BUTTON8, OnButton8)
  77. //}}AFX_MSG_MAP
  78. END_MESSAGE_MAP()
  80. /////////////////////////////////////////////////////////////////////////////
  81. // CDlgChuKuKanDan message handlers
  82. BOOL CDlgChuKuKanDan::OnInitDialog() 
  83. {
  84. CDialog::OnInitDialog();
  85. // TODO: Add extra initialization here
  86. CString strSql;
  87. m_Btn1.SetXIcon(IDI_ICONALL);
  88. m_Btn2.SetXIcon(IDI_ICONALL);
  89. m_Btn3.SetXIcon(IDI_ICONBUTTON);
  90. m_Btn4.SetXIcon(IDI_ICONBUTTON);
  91. m_Btn5.SetXIcon(IDI_ICONBUTTON);
  92. m_Btn6.SetXIcon(IDI_ICONFIND);
  93. m_Btn8.SetXIcon(IDI_ICONBUTTON);
  94. m_Btn9.SetXIcon(IDI_ICONBUTTON);
  95. m_Btn10.SetXIcon(IDI_ICONBUTTON);
  96. m_listMain.InsertColumn(0,"条形码",LVCFMT_CENTER,100);
  97. m_listMain.InsertColumn(1,"名称",LVCFMT_CENTER,100);
  98. m_listMain.InsertColumn(2,"库存上限",LVCFMT_CENTER,100);
  99. m_listMain.InsertColumn(3,"库存下限",LVCFMT_CENTER,100);
  100. m_listMain.InsertColumn(4,"销售价",LVCFMT_CENTER,100);
  101. m_listMain.InsertColumn(5,"库存",LVCFMT_CENTER,100);
  102. m_listMain.InsertColumn(6,"数量",LVCFMT_CENTER,100);
  103. m_listMain.SetExtendedStyle(LVS_EX_GRIDLINES|LVS_EX_FULLROWSELECT);
  104. GetDlgItem(IDC_STATIC1)->SetFont(&ftHeader,TRUE);
  105. return TRUE;  // return TRUE unless you set the focus to a control
  106.               // EXCEPTION: OCX Property Pages should return FALSE
  107. }
  109. void CDlgChuKuKanDan::OnButton4() 
  110. {
  111. // TODO: Add your control notification handler code here
  112. int i;
  113. CString strSql,str;
  114. CADOConn adoMain;
  115. CMyTime time1;
  116. if(m_str1!="")
  117. {
  119. for(i=0;i<m_listMain.GetItemCount();i++)
  120. {
  121. strSql="update 商品库存数量统计表 set 库存=";
  122. str.Format("%0.2f",atof(m_listMain.GetItemText(i,5))-atof(m_listMain.GetItemText(i,6)));
  123. strSql=strSql+str+" where 条形码='";
  124. strSql=strSql+m_listMain.GetItemText(i,0)+"'";
  125. adoMain.ExecuteSQL(strSql);
  126. }
  127. }
  128. time1.SetNow();
  129. m_str1=time1.GetSimpleString();
  130. m_str2=time1.GetDateString(FALSE);
  131. m_str3="";
  132. m_str4="";
  133. m_str5="";
  134. m_flt6=0;
  135. m_flt7=0;
  136. UpdateData(FALSE);
  137. strSql="insert into 非销售单统计表(单编号,开票日期) values('";
  138. strSql=strSql+m_str1+"','";
  139. strSql=strSql+m_str2+"')";
  140. adoMain.ExecuteSQL(strSql);
  141. adoMain.ExitConnect();
  142. m_listMain.DeleteAllItems();
  143. }
  145. void CDlgChuKuKanDan::OnButton2() 
  146. {
  147. // TODO: Add your control notification handler code here
  148. CDlgAll dlg;
  149. UpdateData(TRUE);
  150. dlg.strTitle="管理员基本信息表";
  151. dlg.strSql="select 编号,姓名 from 管理员基本信息表";
  152. dlg.intOpen=2;
  153. if(dlg.DoModal()==IDOK)
  154. {
  155. m_str3=dlg.strKey;
  156. UpdateData(FALSE);
  157. }
  158. }
  160. void CDlgChuKuKanDan::OnFind() 
  161. {
  162. // TODO: Add your control notification handler code heres
  163. UpdateData(TRUE);
  164. if(m_str1=="") 
  165. {
  166. MessageBox("请先开单，后加载商品!","提示",MB_OK|MB_ICONWARNING);
  167. return;
  168. }
  169. CADOConn adoMain;
  170. CString strSql,str;
  171. CDlgAll dlg;
  172. int i=0;
  173. strSql="SELECT 商品档案基本信息表.条形码, 商品档案基本信息表.名称,";
  174. strSql=strSql+"商品档案基本信息表.库存上限, 商品档案基本信息表.库存下限";
  175. strSql=strSql+",商品库存数量统计表.进货价," ;
  176. strSql=strSql+"商品库存数量统计表.库存 FROM 商品档案基本信息表 INNER JOIN 商品库存数量统计表 ON ";
  177. strSql=strSql+"商品档案基本信息表.条形码 = 商品库存数量统计表.条形码 where 商品档案基本信息表.条形码='";
  178. strSql=strSql+m_str8+"' or 商品档案基本信息表.商品编码='";
  179. strSql=strSql+m_str8+"' or 商品档案基本信息表.助记码='";
  180. strSql=strSql+m_str8+"' or 商品档案基本信息表.拼音码='";
  181. strSql=strSql+m_str8+"'";
  182. dlg.strTitle="商品档案基本信息";
  183. dlg.strSql=strSql;
  184. dlg.intOpen=6;
  185. dlg.intKey=0;
  186. if(dlg.DoModal()==IDOK)
  187. {
  188. while(i<m_listMain.GetItemCount()&&m_listMain.GetItemText(i,0)!=dlg.strKey)
  189. {
  190. i=i+1;
  191. }
  192. if(i<m_listMain.GetItemCount()) 
  193. {
  194. MessageBox("表中已经存在此商品!","提示",MB_OK|MB_ICONWARNING);
  195. return;
  196. }
  197. if(i==m_listMain.GetItemCount())
  198. {
  199. if(m_listMain.GetItemText(i,0)==dlg.strKey)
  200. {
  201. MessageBox("表中已经存在此商品!","提示",MB_OK|MB_ICONWARNING);
  202. return;
  203. }
  204. }
  205. strSql="SELECT 商品档案基本信息表.条形码, 商品档案基本信息表.名称,";
  206. strSql=strSql+"商品档案基本信息表.库存上限, 商品档案基本信息表.库存下限";
  207. strSql=strSql+",商品库存数量统计表.零售价," ;
  208. strSql=strSql+"商品库存数量统计表.库存 FROM 商品档案基本信息表 INNER JOIN 商品库存数量统计表 ON ";
  209. strSql=strSql+"商品档案基本信息表.条形码 = 商品库存数量统计表.条形码 where 商品档案基本信息表.条形码='";
  210. strSql=strSql+dlg.strKey+"'";
  211. adoMain.Open(strSql);
  212. adoMain.FillList(&m_listMain);
  213. strSql="insert into 非销售商品管理表(单编号,条形码,销售单价,数量) values('";
  214. strSql=strSql+m_str1+"','";
  215. strSql=strSql+dlg.strKey+"',";
  216. strSql=strSql+m_listMain.GetItemText(0,4)+",1)";
  217. adoMain.ExecuteSQL(strSql);
  218. m_listMain.SetItemText(0,6,"1");
  219. }
  220. adoMain.ExitConnect();
  221. }
  223. void CDlgChuKuKanDan::OnButton1() 
  224. {
  225. // TODO: Add your control notification handler code here
  226. CDlgAll dlg;
  227. UpdateData(TRUE);
  228. dlg.strTitle="分机基本信息表";
  229. dlg.strSql="select * from 分机基本信息表";;
  230. dlg.intOpen=3;
  231. if(dlg.DoModal()==IDOK)
  232. {
  233. m_str4=dlg.strKey;
  234. UpdateData(FALSE);
  235. }
  236. }
  238. void CDlgChuKuKanDan::OnDel() 
  239. {
  240. // TODO: Add your control notification handler code here
  241. CADOConn adoMain,adoFile;
  242. CString strSql;
  243. POSITION pos;
  244. int i;
  245. UINT j=0;
  246. UpdateData(TRUE);
  247. pos=m_listMain.GetFirstSelectedItemPosition();
  248. i=m_listMain.GetNextSelectedItem(pos);
  249. if (i>=0)
  250. {
  251. if(MessageBox("确信删除这些信息吗?","提示",MB_YESNO|MB_ICONQUESTION)==IDNO) return;
  252. i=m_listMain.GetItemCount();
  253. while(j<m_listMain.GetSelectedCount()&&i>=0)
  254. {
  255. if(m_listMain.GetItemState(i,LVIS_SELECTED)==LVIS_SELECTED)
  256. {
  257. strSql="delete * from 非销售商品管理表 where 单编号='";
  258. strSql=strSql+m_str1+"' and 条形码='";
  259. strSql=strSql+m_listMain.GetItemText(i,0)+"'";
  260. adoMain.ExecuteSQL(strSql);
  261. m_listMain.DeleteItem(i);
  262. j=j+1;
  263. }
  264. i=i-1;
  265. }
  266. }
  267. adoMain.ExitConnect();
  268. m_flt6=0;
  269. m_flt7=0;
  270. UpdateData(FALSE);
  271. }
  272. void CDlgChuKuKanDan::OnButton3() 
  273. {
  274. // TODO: Add your control notification handler code here
  275. UpdateData(TRUE);
  276. if(m_str1=="") 
  277. {
  278. MessageBox("请先开单，后加载商品!","提示",MB_OK|MB_ICONWARNING);
  279. return;
  280. }
  281. POSITION pos;
  282. CString str;
  283. int i;
  284. pos=m_listMain.GetFirstSelectedItemPosition();
  285. i=m_listMain.GetNextSelectedItem(pos);
  286. if (i>=0)
  287. {
  288. str.Format("%0.2f",m_flt6);
  289. m_listMain.SetItemText(i,4,str);
  290. str.Format("%0.2f",m_flt7);
  291. m_listMain.SetItemText(i,6,str);
  292. UpdateData(FALSE);
  293. }
  294. CString strSql;
  295. CADOConn adoMain;
  296. double dbl=0;
  297. strSql="update 非销售单统计表 set 开票日期='";
  298. strSql=strSql+m_str2+"',经办人='";
  299. strSql=strSql+m_str3+"',分机号='";
  300. strSql=strSql+m_str4+"',备注='";
  301. strSql=strSql+m_str5+"' where 单编号='";
  302. strSql=strSql+m_str1+"'";
  303. adoMain.ExecuteSQL(strSql);
  304. for(i=0;i<m_listMain.GetItemCount();i++)
  305. {
  306. strSql="update 非销售商品管理表 set 销售单价=";
  307. strSql=strSql+m_listMain.GetItemText(i,4)+",数量=";
  308. strSql=strSql+m_listMain.GetItemText(i,6)+" where 单编号='";
  309. strSql=strSql+m_str1+"' and 条形码='";
  310. strSql=strSql+m_listMain.GetItemText(i,0)+"'";
  311. adoMain.ExecuteSQL(strSql);
  312. }
  313. for(i=0;i<m_listMain.GetItemCount();i++)
  314. {
  315. dbl=dbl+atof(m_listMain.GetItemText(i,4))*atof(m_listMain.GetItemText(i,6));
  316. }
  317. str.Format("%0.2f",dbl);
  318. GetDlgItem(IDC_EDIT19)->SetWindowText(str);
  320. adoMain.ExitConnect();
  321. }
  323. void CDlgChuKuKanDan::OnClickList1(NMHDR* pNMHDR, LRESULT* pResult) 
  324. {
  325. // TODO: Add your control notification handler code here
  326. UpdateData(TRUE);
  327. POSITION pos;
  328. int i;
  329. pos=m_listMain.GetFirstSelectedItemPosition();
  330. i=m_listMain.GetNextSelectedItem(pos);
  331. if (i>=0)
  332. {
  333. m_flt6=atof(m_listMain.GetItemText(i,4));
  334. m_flt7=atof(m_listMain.GetItemText(i,6));
  335. UpdateData(FALSE);
  336. }
  337. *pResult = 0;
  338. }
  340. void CDlgChuKuKanDan::OnButton5() 
  341. {
  342. // TODO: Add your control notification handler code here
  343. int i;
  344. CString strSql,str;
  345. CADOConn adoMain;
  346. if(m_str1!="")
  347. {
  349. for(i=0;i<m_listMain.GetItemCount();i++)
  350. {
  351. strSql="update 商品库存数量统计表 set 库存=";
  352. str.Format("%0.2f",atof(m_listMain.GetItemText(i,5))-atof(m_listMain.GetItemText(i,6)));
  353. strSql=strSql+str+" where 条形码='";
  354. strSql=strSql+m_listMain.GetItemText(i,0)+"'";
  355. adoMain.ExecuteSQL(strSql);
  356. }
  357. }
  358. m_str1="";
  359. m_str2="";
  360. m_str3="";
  361. m_str4="";
  362. m_str5="";
  363. m_flt6=0;
  364. m_flt7=0;
  365. UpdateData(FALSE);
  366. m_listMain.DeleteAllItems();
  367. }
  368. void CDlgChuKuKanDan::OnButton8()
  369. {
  370. UpdateData(TRUE);
  371. CDlgPrint dlg;
  372. dlg.strTitle=m_str1;
  373. dlg.strSql="SELECT '' as 条形码,'' as 名称,'' as 库存上限,'' as 库存下限,'' as 销售价,'' as 库存,'' as 数量";
  374. dlg.strSql=dlg.strSql+" from 商品库存数量统计表";
  375. dlg.m_ListMain=&m_listMain;
  376. dlg.DoModal();
  377. }