C++物流管理系统(功能结构图+源代码+论文参考文献) 第10页
RxRecordset rst;
CString sSQL;
sSQL.Format("SELECT * FROM 往来单位信息表 WHERE 类型='客户'");
rst.Open(sSQL,adCmdText);
m_EdtOperation.Initialize(this->GetParent());
m_EdtOperation.StartUpAssciation=true;//启动联想输入
m_EdtOperation.SetRecordset(rst);//设置数据源
m_EdtOperation.SetSelectField("全称");
rst.Open("员工信息表");
m_EdtMan.Initialize(this->GetParent());
m_EdtMan.SetRecordset(rst);//设置数据源
m_EdtMan.SetSelectField("姓名");
sSQL.Format("SELECT a.销售票号,b.全称,a.开票日期 FROM 销售记录表 a INNER EILJOIN 往来单位信息表 b ON a.客户编号=b.编号 AND 结款否=0");
rst.Open(sSQL,adCmdText);
m_EdtStore.StartUpAssciation=true;
m_EdtStore.Initialize(this->GetParent());
m_EdtStore.SetRecordset(rst);//设置数据源
m_EdtStore.SetSelectField("销售票号");
m_Grid.m_Edit.PopHide=true;
m_Grid.m_Edit.Initialize(this->GetParent());
m_Grid.m_Edit.SetRecordset(rst);//设置数据源
m_Grid.m_Edit.SetSelectField("仓库名称");
m_Grid.m_bReadOnly=true;
}
重载父类中“登记”按钮的消息响应函数：
void CDCheck::OnButEnrol()
{
this->m_EdtMan.IsShowing=true;
this->m_EdtMan.SetWindowText("");
this->m_EdtMan.IsShowing=false;
this->m_EdtOperation.IsShowing=true;
this->m_EdtOperation.SetWindowText("");
this->m_EdtOperation.IsShowing=false;
this->m_EdtStore.IsShowing=true;
this->m_EdtStore.SetWindowText("");
this->m_EdtStore.IsShowing=false;
this->m_StaBigTotal.SetWindowText("零元");
this->m_StaTotal.SetWindowText("0");
this->m_StaSumNumber.SetWindowText("0");
Clear();
CString sNewID;
sNewID=ado.AutoNumber("销售结款表","结款票号","JK",3);
this->m_StaIDValue.SetWindowText(sNewID);
this->m_StaIDValue.Invalidate();
this->Enabled(true);
this->m_EdtOperation.SetFocus();
}
重载父类中“保存”按钮的消息响应函数：
void CDCheck::OnButSave()
{
if(MessageBox("确定要保存吗？","系统提示",MB_OKCANCEL|MB_ICONQUESTION)!=1)
return;
CString sNoPay,CheckTime;
this->m_StaNoPayValue.GetWindowText(sNoPay);
if(atoi(sNoPay)>0)
{
CDDlg dlg;
dlg.DoModal();
CheckTime=dlg.m_Time;
if(CheckTime.IsEmpty())
return;
}
CString sID,sSQL,sCode,sOperation,sDate,sMan,sOPID,sMoney,sPay;
this->m_StaIDValue.GetWindowText(sID);
this->m_EdtOperation.GetWindowText(sOperation);
this->m_EdtStore.GetWindowText(sCode);
this->m_StaDateValue.GetWindowText(sDate);
this->m_EdtMan.GetWindowText(sMan);
sMan=ado.FieldToOtherField("员工信息表","姓名",sMan,"编号",1);
sOPID=ado.FieldToOtherField("操作员信息表","用户名",OP,"操作员编号",1);
this->m_StaTotal.GetWindowText(sMoney);
this->m_EdtPay.GetWindowText(sPay);
if(sOperation.IsEmpty()==true){
MessageBox("请输入客户名称！","系统提示",MB_OK|MB_ICONSTOP);
m_EdtOperation.SetFocus();
return;
}
if(sCode.IsEmpty()==true){
MessageBox("请输入销售票号！","系统提示",MB_OK|MB_ICONSTOP);
m_EdtStore.SetFocus();
return;
}
if(sMan.IsEmpty()==true){
MessageBox("请输入经手人！","系统提示",MB_OK|MB_ICONSTOP);
m_EdtMan.SetFocus();
return;
}
//存入销售结款表
sSQL.Format("INSERT INTO 销售结款表 VALUES('%s','%s','%s',%s,%s,%s,%s)",\
sID,sCode,sDate,sMoney,sPay,sMan,sOPID);
RxRecordset rst;
rst.Open(sSQL,adCmdText);
//存入销售挂帐表
if(atoi(sNoPay)>0){
sSQL.Format("INSERT INTO 销售挂帐表 VALUES('%s','%s','%s',%s,0)",\
sCode,sDate,CheckTime,sNoPay);
rst.Open(sSQL,adCmdText);
}
//更新销售记录表
sSQL.Format("UPDATE 销售记录表 SET 结款否 =1 WHERE 销售票号='%s'",sCode);
rst.Open(sSQL,adCmdText);
this->Enabled(false);
}
重载父类中右单击表格的消息响应函数，去掉弹出的快捷菜单：
void CDCheck::OnRclickGrid(NMHDR *pNMHDR, LRESULT *pResult)
{
}
2．库存盘点模块
实现目标
库存盘点模块主要完成如下功能：
自动生成盘点票号及开票日期。
通过条形码扫描仪自动生成库存数据，用户只输入实际的盘点数据，简化了用户工作量。
支持库存盘点单据的打印。
库存盘点模块运行界面如图9所示。
上一页 [1] [2] [3] [4] [5] [6] [7] [8] [9] [10] ... 下一页 >>
C++物流管理系统(功能结构图+源代码+论文参考文献) 第10页下载如图片无法显示或论文不完整，请联系qq752018766
