?? appendoutinfo.cpp
字號:
// AppendOutInfo.cpp : implementation file
//
#include "stdafx.h"
#include "Material_MIS.h"
#include "AppendOutInfo.h"
#include "Material_MISView.h"
#ifdef _DEBUG
#define new DEBUG_NEW
#undef THIS_FILE
static char THIS_FILE[] = __FILE__;
#endif
/////////////////////////////////////////////////////////////////////////////
// CAppendOutInfo dialog
CAppendOutInfo::CAppendOutInfo(CWnd* pParent /*=NULL*/)
: CDialog(CAppendOutInfo::IDD, pParent)
{
//{{AFX_DATA_INIT(CAppendOutInfo)
m_sDealPerson = _T("");
m_rkNO = _T("");
m_sMemo = _T("");
m_sMoney = _T("");
m_sQuantity = _T("");
m_sSavePerson = _T("");
m_sStorage = _T("");
m_sTime = COleDateTime::GetCurrentTime();
m_sUnit = _T("");
m_wzID = _T("");
m_wzKind = _T("");
m_wzName = _T("");
m_wzSpec = _T("");
m_wzUnit = _T("");
//}}AFX_DATA_INIT
}
void CAppendOutInfo::DoDataExchange(CDataExchange* pDX)
{
CDialog::DoDataExchange(pDX);
//{{AFX_DATA_MAP(CAppendOutInfo)
DDX_Text(pDX, IDC_OUT_DEALPERSON, m_sDealPerson);
DDX_Text(pDX, IDC_OUT_LYNO, m_rkNO);
DDX_Text(pDX, IDC_OUT_MEMO, m_sMemo);
DDX_Text(pDX, IDC_OUT_MONEY, m_sMoney);
DDX_Text(pDX, IDC_OUT_QUANTITY, m_sQuantity);
DDX_Text(pDX, IDC_OUT_SAVEPERSON, m_sSavePerson);
DDX_Text(pDX, IDC_OUT_STORAGE, m_sStorage);
DDX_Text(pDX, IDC_OUT_TIME, m_sTime);
DDX_Text(pDX, IDC_OUT_UNIT, m_sUnit);
DDX_CBString(pDX, IDC_OUT_WZID, m_wzID);
DDX_Text(pDX, IDC_OUT_WZKIND, m_wzKind);
DDX_Text(pDX, IDC_OUT_WZNAME, m_wzName);
DDX_Text(pDX, IDC_OUT_WZSPEC, m_wzSpec);
DDX_Text(pDX, IDC_OUT_WZUNIT, m_wzUnit);
//}}AFX_DATA_MAP
}
BEGIN_MESSAGE_MAP(CAppendOutInfo, CDialog)
//{{AFX_MSG_MAP(CAppendOutInfo)
ON_CBN_SELCHANGE(IDC_OUT_WZID, OnSelchangeOutWzid)
//}}AFX_MSG_MAP
END_MESSAGE_MAP()
/////////////////////////////////////////////////////////////////////////////
// CAppendOutInfo message handlers
BOOL CAppendOutInfo::OnInitDialog()
{
CDialog::OnInitDialog();
((CEdit*)GetDlgItem(IDC_OUT_QUANTITY))->SetLimitText(50);
((CEdit*)GetDlgItem(IDC_OUT_UNIT))->SetLimitText(50);
((CEdit*)GetDlgItem(IDC_OUT_MONEY))->SetLimitText(50);
((CEdit*)GetDlgItem(IDC_OUT_TIME))->SetLimitText(50);
((CEdit*)GetDlgItem(IDC_OUT_DEALPERSON))->SetLimitText(50);
((CEdit*)GetDlgItem(IDC_OUT_SAVEPERSON))->SetLimitText(50);
((CEdit*)GetDlgItem(IDC_OUT_STORAGE))->SetLimitText(50);
((CEdit*)GetDlgItem(IDC_OUT_MEMO))->SetLimitText(50);
// TODO: Add extra initialization here
_variant_t strQuery, Holder;
if (m_bAppend)
{
// 初始化下拉列表
SetWindowText(_T("添加物資出庫信息"));
strQuery = "select distinct yeid from msurplus";
theApp.ADOExecute(theApp.m_pADOSet, strQuery);
int count= theApp.m_pADOSet->GetRecordCount();
theApp.m_pADOSet->MoveFirst();
Holder = theApp.m_pADOSet->GetCollect("yeid");
CString firstid=Holder.bstrVal;
theApp.m_pADOSet->MoveFirst();
for (int j=0; j<count;j++)
{
Holder = theApp.m_pADOSet->GetCollect("yeid");
((CComboBox*)GetDlgItem(IDC_OUT_WZID))->InsertString(j, Holder.vt==VT_NULL?"":(char*)(_bstr_t)Holder);
theApp.m_pADOSet->MoveNext();
}
((CComboBox*)GetDlgItem(IDC_OUT_WZID))->SetCurSel(0);
strQuery="select * from material where wzid='"+firstid+"'";
theApp.ADOExecute(theApp.m_pADOSet, strQuery);
Holder = theApp.m_pADOSet->GetCollect("wzname");
m_wzName=Holder.bstrVal;
Holder = theApp.m_pADOSet->GetCollect("wzkind");
m_wzKind=Holder.bstrVal;
Holder = theApp.m_pADOSet->GetCollect("wzspec");
m_wzSpec=Holder.bstrVal;
Holder = theApp.m_pADOSet->GetCollect("wzunit");
m_wzUnit=Holder.bstrVal;
}
else//修改記錄
{
SetWindowText(_T("修改物資出庫信息"));
m_rkOldNO=m_rkNO;
m_soldaccount=m_sQuantity;
m_soldvalue=m_sMoney;
_variant_t strQuery, Holder;
CString NO;
int iSel = 0;
strQuery = "select * from muse";
theApp.ADOExecute(theApp.m_pADOSet, strQuery);
int iCount = theApp.m_pADOSet->GetRecordCount();
theApp.m_pADOSet->MoveFirst();
for (int i=0; i<iCount; i++)
{
Holder = theApp.m_pADOSet->GetCollect("lyno");
NO = Holder.vt==VT_NULL?"":(char*)(_bstr_t)Holder;
Holder = theApp.m_pADOSet->GetCollect("lyid");
m_wzID = Holder.vt==VT_NULL?"":(char*)(_bstr_t)Holder;
((CComboBox*)GetDlgItem(IDC_OUT_WZID))->InsertString(i, Holder.vt==VT_NULL?"":(char*)(_bstr_t)Holder);
if (NO==m_rkNO)
{
Holder = theApp.m_pADOSet->GetCollect("lyname");
m_wzName = Holder.vt==VT_NULL?"":(char*)(_bstr_t)Holder;
Holder = theApp.m_pADOSet->GetCollect("lyspec");
m_wzSpec = Holder.vt==VT_NULL?"":(char*)(_bstr_t)Holder;
Holder = theApp.m_pADOSet->GetCollect("lykind");
m_wzKind = Holder.vt==VT_NULL?"":(char*)(_bstr_t)Holder;
Holder = theApp.m_pADOSet->GetCollect("lyunit");
m_wzUnit = Holder.vt==VT_NULL?"":(char*)(_bstr_t)Holder;
iSel=i;
}
theApp.m_pADOSet->MoveNext();
}
((CComboBox*)GetDlgItem(IDC_OUT_WZID))->SetCurSel(iSel);
}
UpdateData(false);
return TRUE; // return TRUE unless you set the focus to a control
// EXCEPTION: OCX Property Pages should return FALSE
}
void CAppendOutInfo::OnOK()
{
// TODO: Add extra validation here
UpdateData(true);
m_sDealPerson.TrimRight(" ");
m_sMoney.TrimRight(" ");
m_sQuantity.TrimRight(" ");
m_sSavePerson.TrimRight(" ");
m_sStorage.TrimRight(" ");
m_sUnit.TrimRight(" ");
m_sMemo.TrimRight(" ");
CString sWarning="";
if( ""==m_sQuantity ) sWarning=_T("數量");
else if ( ""==m_sUnit ) sWarning=_T("單價");
else if ( ""==m_sMoney ) sWarning=_T("金額");
else if ( ""==m_sDealPerson ) sWarning=_T("領用人");
else if ( ""==m_sSavePerson ) sWarning=_T("經辦人");
else if ( ""==m_sStorage ) sWarning=_T("倉庫");
if ( ""!=sWarning )
{
sWarning += _T("不能為空！");
AfxMessageBox(sWarning, MB_ICONEXCLAMATION);
return;
}
double fQuantity=atof(m_sQuantity);
if ( 0==fQuantity )
{
AfxMessageBox(_T("數量請輸入非零整數！"), MB_ICONEXCLAMATION);
return;
}
double fUnit=atof(m_sUnit);
if(0==fUnit)
{
AfxMessageBox(_T("單價請輸入非零數字！"), MB_ICONEXCLAMATION);
return;
}
m_sUnit.Format("%.2f", fUnit);
double fMoney=atof(m_sMoney);
if(0==fMoney)
{
AfxMessageBox(_T("金額請輸入非零數字！"), MB_ICONEXCLAMATION);
return;
}
m_sMoney.Format("%.2f", fMoney);
_variant_t strQuery;
_variant_t strQuery1;
_variant_t strQuery2;
// 刪除舊記錄
if ( !m_bAppend )
{
strQuery="update msurplus set yeaccount=yeaccount+"+m_soldaccount+",yevalue=yevalue+"\
+m_soldvalue+" where yeid='"+m_wzID+"'and yebase='"+m_sStorage+"'";
theApp.ADOExecute(theApp.m_pADOSet,strQuery);
strQuery = "delete from muse where lyno='"+m_rkNO+"'";
theApp.ADOExecute(theApp.m_pADOSet, strQuery);
}
// 產生序列號
CString sSN;
COleDateTime today = COleDateTime::GetCurrentTime();
sSN = today.Format("%y%m%d%H%M%S");
// 獲得入庫日期
CString sInDate;
sInDate = m_sTime.Format("%Y-%m-%d");
// 插入記錄
strQuery = "insert muse (lyno, lyid, lyname, lyspec, lykind, lyunit, lyaccount,lyprice,\
lyvalue,lydate,lyuse_person,lydeal_person,lybase,lymemo) values ('"+sSN+"', '"\
+m_wzID+"','" +m_wzName+"','"+m_wzSpec+"','"+m_wzKind+"','"\
+m_wzUnit+"',"+m_sQuantity+","+m_sUnit+","+m_sMoney+",'"\
+sInDate+"','"+m_sDealPerson+"','"+m_sSavePerson+"','"\
+m_sStorage+"','"+m_sMemo+"')";
if ( theApp.ADOExecute(theApp.m_pADOSet, strQuery) )
{
if ( m_bAppend )
{
AfxMessageBox(_T("添加記錄成功！"), MB_ICONINFORMATION);
strQuery2="update msurplus set yeaccount=yeaccount-"+m_sQuantity+",yevalue=yevalue-"\
+m_sMoney+" where yeid='"+m_wzID+"'and yebase='"+m_sStorage+"'";
theApp.ADOExecute(theApp.m_pADOSet,strQuery2);
// 清除所有輸入
m_sQuantity=m_sUnit=m_sMoney=sInDate=m_sDealPerson=m_sSavePerson=\
m_sStorage=m_sMemo="";
UpdateData(false);
}
else
{
strQuery2="update msurplus set yeaccount=yeaccount-"+m_sQuantity+",yevalue=yevalue-"\
+m_sMoney+" where yeid='"+m_wzID+"'and yebase='"+m_sStorage+"'";
theApp.ADOExecute(theApp.m_pADOSet,strQuery2);
AfxMessageBox(_T("修改記錄成功！"), MB_ICONINFORMATION);
}
}
else
{
if ( m_bAppend ) AfxMessageBox(_T("添加記錄失敗！"), MB_ICONEXCLAMATION);
else AfxMessageBox(_T("修改記錄失敗！"), MB_ICONEXCLAMATION);
}
// 刷新入庫信息列表
strQuery = "select * from muse";
CMaterial_MISView* p = (CMaterial_MISView*)(((CMainFrame*)AfxGetMainWnd())->GetActiveView());
p->RefreshOut(strQuery);
if (!m_bAppend) CDialog::OnOK();
}
void CAppendOutInfo::OnSelchangeOutWzid()
{
// TODO: Add your control notification handler code here
UpdateData(true);
_variant_t strQuery, Holder;
//
strQuery = "select * from material where wzid='"+m_wzID+"'";
theApp.ADOExecute(theApp.m_pADOSet, strQuery);
Holder = theApp.m_pADOSet->GetCollect("wzname");
m_wzName = Holder.vt==VT_NULL?"":(char*)(_bstr_t)Holder;
CString name=m_wzName;
Holder = theApp.m_pADOSet->GetCollect("wzspec");
m_wzSpec = Holder.vt==VT_NULL?"":(char*)(_bstr_t)Holder;
Holder = theApp.m_pADOSet->GetCollect("wzKind");
m_wzKind = Holder.vt==VT_NULL?"":(char*)(_bstr_t)Holder;
Holder = theApp.m_pADOSet->GetCollect("wzunit");
m_wzUnit = Holder.vt==VT_NULL?"":(char*)(_bstr_t)Holder;
UpdateData(false);
}
?? 快捷鍵說明
復制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -