dexamine_cy.cpp

用VC+SQL实现的物流管理系统 “RxMediaPlayer” 文件夹中存放《物流综合管理系统》中《媒体播放平台》源程序 “数据库设置”文件夹中存放《物流综合管理系统》辅助工具《数据库设置》源程

// DExamine_cy.cpp : implementation file
//

#include "stdafx.h"
#include "MyProject.h"
#include "DExamine_cy.h"
#include "ExternDllHeader.h"

#ifdef _DEBUG
#define new DEBUG_NEW
#undef THIS_FILE
static char THIS_FILE[] = __FILE__;
#endif

/////////////////////////////////////////////////////////////////////////////
// CDExamine_cy dialog


CDExamine_cy::CDExamine_cy(CWnd* pParent /*=NULL*/)
	: CDialog(CDExamine_cy::IDD, pParent)
{
	//{{AFX_DATA_INIT(CDExamine_cy)
	//}}AFX_DATA_INIT
}


void CDExamine_cy::DoDataExchange(CDataExchange* pDX)
{
	CDialog::DoDataExchange(pDX);
	//{{AFX_DATA_MAP(CDExamine_cy)
	DDX_Control(pDX, IDC_DTCYSJ, m_DtCYSJ);
	DDX_Control(pDX, IDC_RADYES, m_RadYES);
	DDX_Control(pDX, IDC_RADNO, m_RadNO);
	DDX_Control(pDX, IDC_RADALL, m_RadALL);
	DDX_Control(pDX, IDC_EDTYSGJBK, m_EdtTYSGJBK);
	DDX_Control(pDX, IDC_EDTLRRBM, m_EdtLRRBM);
	DDX_Control(pDX, IDC_EDTLRR, m_EdtLRR);
	DDX_Control(pDX, IDC_EDTFSFY, m_EdtFSFY);
	DDX_Control(pDX, IDC_EDTCYDBH, m_EdtCYDBH);
	DDX_Control(pDX, IDC_EDTBZ, m_EdtBZ);
	DDX_Control(pDX, IDC_EDTBGYWBH, m_EdtBGYWBH);
	DDX_Control(pDX, IDC_DTZZSJ, m_DtZZSJ);
	DDX_Control(pDX, IDC_DTQSSJ, m_DtQSSJ);
	DDX_Control(pDX, IDC_DTLRSJ, m_DtLRSJ);
	DDX_Control(pDX, IDC_DTJSSJ, m_DtJSSJ);
	DDX_Control(pDX, IDC_COMID, m_ComID);
	DDX_Control(pDX, IDC_CHEJSBZ, m_CheJSBZ);
	DDX_Control(pDX, IDC_BUTSAVE, m_ButSave);
	DDX_Control(pDX, IDC_BUTINTO, m_ButInto);
	//}}AFX_DATA_MAP
}


BEGIN_MESSAGE_MAP(CDExamine_cy, CDialog)
	//{{AFX_MSG_MAP(CDExamine_cy)
	ON_CBN_SETFOCUS(IDC_COMID, OnSetfocusComid)
	ON_BN_CLICKED(IDC_BUTINTO, OnButinto)
	ON_BN_CLICKED(IDC_BUTSAVE, OnButsave)
	//}}AFX_MSG_MAP
END_MESSAGE_MAP()

/////////////////////////////////////////////////////////////////////////////
// CDExamine_cy message handlers

void CDExamine_cy::OnOK() 
{
	// TODO: Add extra validation here
	
	//CDialog::OnOK();
}

void CDExamine_cy::OnCancel() 
{
	// TODO: Add extra cleanup here
	
	CDialog::OnCancel();
}

void CDExamine_cy::Clear()
{
	m_EdtTYSGJBK.SetWindowText("");
	m_EdtLRRBM.SetWindowText("");
	m_EdtLRR.SetWindowText("");
	m_EdtFSFY.SetWindowText("");
	m_EdtCYDBH.SetWindowText("");
	m_EdtBZ.SetWindowText("");
	m_EdtBGYWBH.SetWindowText("");
}

void CDExamine_cy::Display()
{
	CString sID,sSQL;
	m_ComID.GetWindowText(sID);
	RxRecordset rst;
	sSQL.Format("SELECT * FROM 查验表 WHERE 报关业务编号='%s'",sID);
	rst.Open(sSQL,adCmdText);
	m_EdtTYSGJBK.SetWindowText(rst.GetFieldValue("运输工具白卡"));
	m_EdtLRRBM.SetWindowText(rst.GetFieldValue("录入人部门"));
	m_EdtLRR.SetWindowText(rst.GetFieldValue("录入人"));
	m_EdtFSFY.SetWindowText(rst.GetFieldValue("发生费用"));
	m_EdtCYDBH.SetWindowText(rst.GetFieldValue("查验单编号"));
	m_EdtBZ.SetWindowText(rst.GetFieldValue("备注"));
	m_EdtBGYWBH.SetWindowText(rst.GetFieldValue("报关业务编号"));	
	CTime tLRSJ,tCYSJ,tJSSJ;
	tLRSJ=CStringTOCTime(rst.GetFieldValue("录入时间"));
	tCYSJ=CStringTOCTime(rst.GetFieldValue("查验时间"));
	tJSSJ=CStringTOCTime(rst.GetFieldValue("结束时间"));
	m_DtLRSJ.SetTime(&tLRSJ);
	m_DtCYSJ.SetTime(&tCYSJ);
	m_DtJSSJ.SetTime(&tJSSJ);
	m_CheJSBZ.SetCheck(atoi(rst.GetFieldValue("结束标志")));


}

void CDExamine_cy::Enabled(bool bEnabled)
{
	m_RadYES.EnableWindow(!bEnabled);
	m_RadNO.EnableWindow(!bEnabled);
	m_RadALL.EnableWindow(!bEnabled);
	m_EdtTYSGJBK.EnableWindow(bEnabled);
	m_EdtLRRBM.EnableWindow(bEnabled);
	m_EdtLRR.EnableWindow(bEnabled);
	m_EdtFSFY.EnableWindow(bEnabled);
//	m_EdtCYDBH.EnableWindow(bEnabled);
	m_EdtBZ.EnableWindow(bEnabled);
//	m_EdtBGYWBH.EnableWindow(bEnabled);
	m_DtZZSJ.EnableWindow(!bEnabled);
	m_DtQSSJ.EnableWindow(!bEnabled);
	m_DtLRSJ.EnableWindow(bEnabled);
	m_DtCYSJ.EnableWindow(bEnabled);
	m_DtJSSJ.EnableWindow(bEnabled);
	m_ComID.EnableWindow(!bEnabled);
	m_CheJSBZ.EnableWindow(bEnabled);
	m_ButSave.EnableWindow(bEnabled);
	m_ButInto.EnableWindow(!bEnabled);
}

BOOL CDExamine_cy::OnInitDialog() 
{
	CDialog::OnInitDialog();
	this->m_RadALL.SetCheck(1);
	this->m_EdtFSFY.IsMoneyOnly(true);
	// TODO: Add extra initialization here
	
	return TRUE;  // return TRUE unless you set the focus to a control
	              // EXCEPTION: OCX Property Pages should return FALSE
}

void CDExamine_cy::OnSetfocusComid() 
{
	m_ComID.ClearAllString();
	CTime tQs,tJs;
	this->m_DtZZSJ.GetTime(tJs);
	this->m_DtQSSJ.GetTime(tQs);
	CString sQs,sJs,sSQL;
	sQs=CTimeToCString(tQs);
	sJs=CTimeToCString(tJs);
	if(this->m_RadALL.GetCheck()==1)
		sSQL.Format("select * from 报关单表 WHERE 录入日期 BETWEEN '%s' AND '%s' AND 报关单类别 NOT LIKE '%%备案%%'",sQs,sJs);
	if(this->m_RadYES.GetCheck()==1)
		sSQL.Format("select b.报关业务编号 from 查验表 a inner join  报关单表 b ON a.报关业务编号= b.报关业务编号 WHERE b.录入日期 BETWEEN '%s' AND '%s' AND b.报关单类别 NOT LIKE '%%备案%%'",sQs,sJs);
	if(this->m_RadNO.GetCheck()==1)
		sSQL.Format("select * from 报关单表 where 报关业务编号 not in (select 报关业务编号 FROM 查验表) AND 录入日期 BETWEEN '%s' AND '%s' AND 报关单类别 NOT LIKE '%%备案%%'",sQs,sJs);
	RxRecordset rst;
	rst.Open(sSQL,adCmdText);
	m_ComID.ClearAllString();
	this->m_ComID.SetRecordset(rst,"报关业务编号");	
}

void CDExamine_cy::OnButinto() 
{
	Clear();
	CString sID,sSQL;
	RxRecordset rst;
	m_ComID.GetWindowText(sID);
	if(sID.IsEmpty())
	{
		MessageBox("请选择一个报关业务编号！","系统提示",MB_OK|MB_ICONSTOP);
		m_ComID.SetFocus();
		return;
	}
	this->m_EdtBGYWBH.SetWindowText(sID);
	sSQL.Format("SELECT * FROM 查验表 WHERE 报关业务编号='%s'",sID);
	rst.Open(sSQL,adCmdText);
	if(rst.GetRecordCount()<1)
	{
		Enabled(true);
		m_bInsertOrUpdate=true;
		CString sNewID;
		sNewID=ado.AutoNumber("查验表","查验单编号","CY",3);
		this->m_EdtCYDBH.SetWindowText(sNewID);
	}
	else
	{
		Display();
		Enabled(true);
		m_bInsertOrUpdate=false;	
	}
	this->m_DtCYSJ.SetFocus();
}

void CDExamine_cy::OnButsave() 
{
	if(MessageBox("确定要保存此查验单吗？","系统提示",MB_OKCANCEL|MB_ICONQUESTION)!=1)
		return;
	CString sCYDBH,sBGYWBH,sCYSJ,sYSGJBK,sJSBZ,sJSSJ,sFSFY,sBZ,sLRR,sLRRBM,sLRSJ;

	m_EdtTYSGJBK.GetWindowText(sYSGJBK);
	m_EdtLRRBM.GetWindowText(sLRRBM);
	m_EdtLRR.GetWindowText(sLRR);
	m_EdtFSFY.GetWindowText(sFSFY);
	m_EdtCYDBH.GetWindowText(sCYDBH);
	m_EdtBGYWBH.GetWindowText(sBGYWBH);
	m_EdtBZ.GetWindowText(sBZ);
	sJSBZ.Format("%d",m_CheJSBZ.GetCheck());

	CTime tLRSJ,tCYSJ,tJSSJ;
	m_DtLRSJ.GetTime(tLRSJ);
	m_DtCYSJ.GetTime(tCYSJ);
	m_DtJSSJ.GetTime(tJSSJ);
	
	sLRSJ=CTimeToCString(tLRSJ);
	sCYSJ=CTimeToCString(tCYSJ);
	sJSSJ=CTimeToCString(tJSSJ);

	CString sSQL;
	if(m_bInsertOrUpdate==true)
		sSQL.Format("INSERT INTO 查验表 VALUES('%s','%s','%s','%s',%s,'%s',%s,'%s','%s','%s','%s')",sCYDBH,sBGYWBH,sCYSJ,sYSGJBK,sJSBZ,sJSSJ,sFSFY,sBZ,sLRR,sLRRBM,sLRSJ);
	else
		sSQL.Format("UPDATE 查验表 SET 查验单编号='%s',查验时间='%s',运输工具白卡='%s',结束标志=%s,结束时间='%s',发生费用=%s,备注='%s',录入人='%s',录入人部门='%s',录入时间='%s' WHERE 报关业务编号='%s'",sCYDBH,sCYSJ,sYSGJBK,sJSBZ,sJSSJ,sFSFY,sBZ,sLRR,sLRRBM,sLRSJ,sBGYWBH);
	RxRecordset rst;
	rst.Open(sSQL,adCmdText);
	this->Enabled(false);
	this->m_DtQSSJ.SetFocus();	
}