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

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

百货/超市行业

开发平台：

Visual C++

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