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

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

百货/超市行业

开发平台：

Visual C++

DlgRuKuKaiDan.cpp：源码内容
  1. // DlgRuKuKaiDan.cpp : implementation file
  2. //
  4. #include "stdafx.h"
  5. #include "ncshop.h"
  6. #include "DlgRuKuKaiDan.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. // CDlgRuKuKaiDan dialog
  21. CDlgRuKuKaiDan::CDlgRuKuKaiDan(CWnd* pParent /*=NULL*/)
  22. : CDialog(CDlgRuKuKaiDan::IDD, pParent)
  23. {
  24. //{{AFX_DATA_INIT(CDlgRuKuKaiDan)
  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 CDlgRuKuKaiDan::DoDataExchange(CDataExchange* pDX)
  39. {
  40. CDialog::DoDataExchange(pDX);
  41. //{{AFX_DATA_MAP(CDlgRuKuKaiDan)
  42. DDX_Control(pDX, IDC_BUTTON8, m_Btn10);
  43. DDX_Control(pDX, IDC_BUTTON5, m_Btn9);
  44. DDX_Control(pDX, IDC_BUTTON2, m_Btn2);
  45. DDX_Control(pDX, IDC_BUTTON4, m_Btn8);
  46. DDX_Control(pDX, IDC_LIST1, m_listMain);
  47. DDX_Control(pDX, IDFIND, m_Btn6);
  48. DDX_Control(pDX, IDDEL, m_Btn5);
  49. DDX_Control(pDX, IDCANCEL, m_Btn4);
  50. DDX_Control(pDX, IDC_BUTTON3, m_Btn3);
  51. DDX_Control(pDX, IDC_BUTTON1, m_Btn1);
  52. DDX_Text(pDX, IDC_EDIT1, m_str1);
  53. DDX_Text(pDX, IDC_EDIT2, m_str2);
  54. DDX_Text(pDX, IDC_EDIT20, m_str8);
  55. DDX_Text(pDX, IDC_EDIT3, m_str3);
  56. DDX_Text(pDX, IDC_EDIT4, m_str4);
  57. DDX_Text(pDX, IDC_EDIT5, m_str5);
  58. DDX_Text(pDX, IDC_EDIT16, m_flt6);
  59. DDX_Text(pDX, IDC_EDIT18, m_flt7);
  60. //}}AFX_DATA_MAP
  61. }
  64. BEGIN_MESSAGE_MAP(CDlgRuKuKaiDan, CDialog)
  65. //{{AFX_MSG_MAP(CDlgRuKuKaiDan)
  66. // NOTE: the ClassWizard will add message map macros here
  67. ON_BN_CLICKED(IDC_BUTTON4, OnButton4)
  68. ON_BN_CLICKED(IDC_BUTTON2, OnButton2)
  69. ON_BN_CLICKED(IDFIND, OnFind)
  70. ON_BN_CLICKED(IDC_BUTTON1, OnButton1)
  71. ON_BN_CLICKED(IDDEL, OnDel)
  72. ON_BN_CLICKED(IDC_BUTTON3, OnButton3)
  73. ON_NOTIFY(NM_CLICK, IDC_LIST1, OnClickList1)
  74. ON_BN_CLICKED(IDC_BUTTON5, OnButton5)
  75. ON_BN_CLICKED(IDC_BUTTON8, OnButton8)
  76. //}}AFX_MSG_MAP
  77. END_MESSAGE_MAP()
  79. /////////////////////////////////////////////////////////////////////////////
  80. // CDlgRuKuKaiDan message handlers
  81. BOOL CDlgRuKuKaiDan::OnInitDialog() 
  82. {
  83. CDialog::OnInitDialog();
  84. // TODO: Add extra initialization here
  85. CString strSql;
  86. m_Btn1.SetXIcon(IDI_ICONALL);
  87. m_Btn2.SetXIcon(IDI_ICONALL);
  88. m_Btn3.SetXIcon(IDI_ICONBUTTON);
  89. m_Btn4.SetXIcon(IDI_ICONBUTTON);
  90. m_Btn5.SetXIcon(IDI_ICONBUTTON);
  91. m_Btn6.SetXIcon(IDI_ICONFIND);
  92. m_Btn8.SetXIcon(IDI_ICONBUTTON);
  93. m_Btn9.SetXIcon(IDI_ICONBUTTON);
  94. m_Btn10.SetXIcon(IDI_ICONBUTTON);
  95. m_listMain.InsertColumn(0,"条形码",LVCFMT_CENTER,100);
  96. m_listMain.InsertColumn(1,"名称",LVCFMT_CENTER,100);
  97. m_listMain.InsertColumn(2,"库存上限",LVCFMT_CENTER,100);
  98. m_listMain.InsertColumn(3,"库存下限",LVCFMT_CENTER,100);
  99. m_listMain.InsertColumn(4,"进货价",LVCFMT_CENTER,100);
  100. m_listMain.InsertColumn(5,"库存",LVCFMT_CENTER,100);
  101. m_listMain.InsertColumn(6,"数量",LVCFMT_CENTER,100);
  102. m_listMain.SetExtendedStyle(LVS_EX_GRIDLINES|LVS_EX_FULLROWSELECT);
  103. GetDlgItem(IDC_STATIC1)->SetFont(&ftHeader,TRUE);
  104. return TRUE;  // return TRUE unless you set the focus to a control
  105.               // EXCEPTION: OCX Property Pages should return FALSE
  106. }
  108. void CDlgRuKuKaiDan::OnButton4() 
  109. {
  110. // TODO: Add your control notification handler code here
  111. int i;
  112. CString strSql,str;
  113. CADOConn adoMain;
  114. CMyTime time1;
  115. if(m_str1!="")
  116. {
  118. for(i=0;i<m_listMain.GetItemCount();i++)
  119. {
  120. strSql="update 商品库存数量统计表 set 进货价=";
  121. strSql=strSql+m_listMain.GetItemText(i,4)+",库存=";
  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 CDlgRuKuKaiDan::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 CDlgRuKuKaiDan::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 CDlgRuKuKaiDan::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=2;
  231. if(dlg.DoModal()==IDOK)
  232. {
  233. m_str4=dlg.strKey;
  234. UpdateData(FALSE);
  235. }
  236. }
  238. void CDlgRuKuKaiDan::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 CDlgRuKuKaiDan::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. strSql="update 商品库存数量统计表 set 进货价=";
  313. strSql=strSql+m_listMain.GetItemText(i,4)+",库存=";
  314. strSql=strSql+m_listMain.GetItemText(i,5)+" where 条形码='";
  315. strSql=strSql+m_listMain.GetItemText(i,0)+"'";
  316. adoMain.ExecuteSQL(strSql);
  317. }
  318. for(i=0;i<m_listMain.GetItemCount();i++)
  319. {
  320. dbl=dbl+atof(m_listMain.GetItemText(i,4))*atof(m_listMain.GetItemText(i,6));
  321. }
  322. str.Format("%0.2f",dbl);
  323. GetDlgItem(IDC_EDIT19)->SetWindowText(str);
  325. adoMain.ExitConnect();
  326. }
  328. void CDlgRuKuKaiDan::OnClickList1(NMHDR* pNMHDR, LRESULT* pResult) 
  329. {
  330. // TODO: Add your control notification handler code here
  331. UpdateData(TRUE);
  332. POSITION pos;
  333. int i;
  334. pos=m_listMain.GetFirstSelectedItemPosition();
  335. i=m_listMain.GetNextSelectedItem(pos);
  336. if (i>=0)
  337. {
  338. m_flt6=atof(m_listMain.GetItemText(i,4));
  339. m_flt7=atof(m_listMain.GetItemText(i,6));
  340. UpdateData(FALSE);
  341. }
  342. *pResult = 0;
  343. }
  345. void CDlgRuKuKaiDan::OnButton5() 
  346. {
  347. // TODO: Add your control notification handler code here
  348. int i;
  349. CString strSql,str;
  350. CADOConn adoMain;
  351. if(m_str1!="")
  352. {
  354. for(i=0;i<m_listMain.GetItemCount();i++)
  355. {
  356. strSql="update 商品库存数量统计表 set 进货价=";
  357. strSql=strSql+m_listMain.GetItemText(i,4)+",库存=";
  358. str.Format("%0.2f",atof(m_listMain.GetItemText(i,5))+atof(m_listMain.GetItemText(i,6)));
  359. strSql=strSql+str+" where 条形码='";
  360. strSql=strSql+m_listMain.GetItemText(i,0)+"'";
  361. adoMain.ExecuteSQL(strSql);
  362. }
  363. }
  364. m_str1="";
  365. m_str2="";
  366. m_str3="";
  367. m_str4="";
  368. m_str5="";
  369. m_flt6=0;
  370. m_flt7=0;
  371. UpdateData(FALSE);
  372. m_listMain.DeleteAllItems();
  373. }
  374. void CDlgRuKuKaiDan::OnButton8()
  375. {
  376. UpdateData(TRUE);
  377. CDlgPrint dlg;
  378. dlg.strTitle=m_str1;
  379. dlg.strSql="SELECT '' as 条形码,'' as 名称,'' as 库存上限,'' as 库存下限,'' as 进货价,'' as 库存,'' as 数量";
  380. dlg.strSql=dlg.strSql+" from 商品库存数量统计表";
  381. dlg.m_ListMain=&m_listMain;
  382. dlg.DoModal();
  383. }