www.gusucode.com > VC++宾馆管理系统（Access）程序 > VC++宾馆管理系统（Access）程序\code\CheckDlg.cpp

    // CheckDlg.cpp : implementation file
// Download by http://www.NewXing.com

#include "stdafx.h"
#include "HotelManageSys.h"
#include "CheckDlg.h"

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

/////////////////////////////////////////////////////////////////////////////
// CCheckDlg dialog
extern CHotelManageSysApp theApp;

CCheckDlg::CCheckDlg(CWnd* pParent /*=NULL*/)
	: CDialog(CCheckDlg::IDD, pParent)
{
	//{{AFX_DATA_INIT(CCheckDlg)
	m_strCheckType = _T("");
	m_timeCheckD = 0;
	m_timeCheckT = 0;
	m_strCheckId = _T("");
	m_nCheckMoney = 0;
	m_strCheckName = _T("");
	m_strCheckNums = _T("");
	m_nCheckPeople = 0;
	m_nYajin = 0;
	m_timeOrderD = 0;
	m_timeOrderT = 0;
	m_nDinner = 0;
	//}}AFX_DATA_INIT
}


void CCheckDlg::DoDataExchange(CDataExchange* pDX)
{
	CDialog::DoDataExchange(pDX);
	//{{AFX_DATA_MAP(CCheckDlg)
	DDX_Control(pDX, IDC_DATETIMEPICKER_TIME, m_timectrlOrderT);
	DDX_Control(pDX, IDC_DATETIMEPICKER_DAY, m_timectrlOrderD);
	DDX_CBString(pDX, IDC_COMBO_CHECK_TYPE, m_strCheckType);
	DDX_DateTimeCtrl(pDX, IDC_DATETIMEPICKER_CHECKDAY, m_timeCheckD);
	DDX_DateTimeCtrl(pDX, IDC_DATETIMEPICKER_CHECKTIME, m_timeCheckT);
	DDX_Text(pDX, IDC_EDIT_CHECK_ID, m_strCheckId);
	DDX_Text(pDX, IDC_EDIT_CHECK_MONEY, m_nCheckMoney);
	DDX_Text(pDX, IDC_EDIT_CHECK_NAME, m_strCheckName);
	DDX_Text(pDX, IDC_EDIT_CHECK_NUM, m_strCheckNums);
	DDX_Text(pDX, IDC_EDIT_CHECK_PEOPLE, m_nCheckPeople);
	DDX_Text(pDX, IDC_EDIT_CHECK_YAJIN, m_nYajin);
	DDX_DateTimeCtrl(pDX, IDC_DATETIMEPICKER_DAY, m_timeOrderD);
	DDX_DateTimeCtrl(pDX, IDC_DATETIMEPICKER_TIME, m_timeOrderT);
	DDX_Text(pDX, IDC_EDIT_CHECK_DINNER, m_nDinner);
	//}}AFX_DATA_MAP
}


BEGIN_MESSAGE_MAP(CCheckDlg, CDialog)
	//{{AFX_MSG_MAP(CCheckDlg)
	ON_EN_CHANGE(IDC_EDIT_CHECK_ID, OnChangeEditCheckId)
	ON_BN_CLICKED(IDC_CHECK_BTN, OnCheckBtn)
	ON_BN_CLICKED(IDC_CAL_BTN, OnCalBtn)
	//}}AFX_MSG_MAP
END_MESSAGE_MAP()

/////////////////////////////////////////////////////////////////////////////
// CCheckDlg message handlers

void CCheckDlg::OnChangeEditCheckId() 
{	
	// TODO: Add your control notification handler code here
	UpdateData(TRUE);

	CString sql,str,str1;
	sql = "select * from OrderInfo where ID = '"+m_strCheckId+"'";
	m_pRecordset.CreateInstance("ADODB.Recordset");
	m_pRecordset->Open((_variant_t)sql,_variant_t((IDispatch *)theApp.m_pConnection,true),adOpenDynamic,adLockPessimistic,adCmdText);       	

	if(m_pRecordset->GetRecordCount()!= 0)
	{
		m_strCheckType = m_pRecordset->GetCollect("OrderType").bstrVal;		
		m_strCheckName = m_pRecordset->GetCollect("OrderName").bstrVal;
		m_strCheckNums = m_pRecordset->GetCollect("OrderPaper").bstrVal;
		m_nCheckPeople = m_pRecordset->GetCollect("OrderAcount").lVal;
		m_nDinner = m_pRecordset->GetCollect("Dinner").lVal;
		m_nYajin = m_pRecordset->GetCollect("Deposit").lVal;

		str = m_pRecordset->GetCollect("StartDay").bstrVal;
		m_timectrlOrderD.SetFormat(str);

		str = m_pRecordset->GetCollect("StartTime").bstrVal;
		m_timectrlOrderT.SetFormat(str);
		
		str = m_pRecordset->GetCollect("StartDay").bstrVal;
		m_timectrlOrderD.SetFormat(str);

		str1 = m_pRecordset->GetCollect("StartTime").bstrVal;
		m_timectrlOrderT.SetFormat(str1);
		//str to CTime		
		m_timeOrderD   =   strtotime(str, str1); 
		//
	}
	m_pRecordset->Close();

	UpdateData(FALSE);	
}

void CCheckDlg::OnCheckBtn() 
{
	// TODO: Add your control notification handler code here
	if((!(theApp.m_level >=4 && theApp.m_level <= 7)) && (!(theApp.m_level >=12 && theApp.m_level <= 15)) )
	{
		AfxMessageBox("您不具有退房权限");
		return;
	}
	UpdateData(TRUE);
	CString sql,str;
	//将房间状态设置为“空闲”
	_RecordsetPtr m_pRecordset_room;
	str = "已满";
	sql = "select * from RoomInformation where ID = '"+m_strCheckId+"'and Status = '"+str+"'";
	m_pRecordset_room.CreateInstance("ADODB.Recordset");
	m_pRecordset_room->Open((_variant_t)sql,_variant_t((IDispatch *)theApp.m_pConnection,true),adOpenDynamic,adLockPessimistic,adCmdText);       	
	if(m_pRecordset_room->GetRecordCount()!=0)
	{
		m_pRecordset_room->PutCollect("Status",(_variant_t)"空闲");
		m_pRecordset_room->Update();
	}
	else
	{
		AfxMessageBox("没有该客房的订房信息，退房失败！");
		return;
	}
	m_pRecordset_room->Close();
	//删除该订房信息
	sql = "select * from OrderInfo where ID = '"+m_strCheckId+"'";
	m_pRecordset.CreateInstance("ADODB.Recordset");
	m_pRecordset->Open((_variant_t)sql,_variant_t((IDispatch *)theApp.m_pConnection,true),adOpenDynamic,adLockPessimistic,adCmdText);       	
	if(m_pRecordset->GetRecordCount()!=0)
		m_pRecordset->Delete(adAffectCurrent);
	m_pRecordset->Update();
	m_pRecordset->Close();

	AfxMessageBox("退房成功！");
	UpdateData(FALSE);	
}


int   CCheckDlg::StrToIntAt(CString   string,   int   startPos,   int   endPos)   
{   
	CString   strChange   =   _T("");   
	char   c_change;   
	for   (int   i=startPos;   i<=endPos;   i++)   
	{   
		c_change   =   string.GetAt   (i);   
		strChange   +=   c_change;   
	}   
	int   iresult   =   (int)atof(strChange);   
	return   iresult;   
} 

CTime CCheckDlg::strtotime(CString   str,CString str1)
{
		int  iYear,   iMonth,   iDay, iHour,   iMinute,   iSecond;  

		int one = str.Find("-", 1) ;
		int two = str.Find("-",one+1) ;
		int length = str.GetLength();

		iYear   =   StrToIntAt(str,   0,   one-1);
		iMonth  =   StrToIntAt(str,   one+1,   two-1);   
		iDay    =   StrToIntAt(str,   two+1,   length-1);  
		
		one = str1.Find(":", 1) ;
		two = str1.Find(":",one+1) ;
		length = str1.GetLength();

		iHour   =   StrToIntAt(str1,  0,   one-1);   
		iMinute =   StrToIntAt(str1,  one+1,   two-1); 
		iSecond =   StrToIntAt(str1,  two+1,   length-1);
		
		CTime time = CTime(iYear,   iMonth,   iDay,   iHour,   iMinute,   iSecond);
		return time;
}  

void CCheckDlg::OnCalBtn() 
{
	// TODO: Add your control notification handler code here
	if( theApp.m_level%2 == 0)//取余
	{
		AfxMessageBox("您不具有添加结算信息的权限");
		return;
	}

	UpdateData(TRUE);

	CString sql,str,str1;
	int price;
	//获取客房单价
	_RecordsetPtr m_pRecordset_room;
	str = "已满";
	sql = "select * from RoomInformation where ID = '"+m_strCheckId+"' and Status = '"+str+"'";
	m_pRecordset_room.CreateInstance("ADODB.Recordset");
	m_pRecordset_room->Open((_variant_t)sql,_variant_t((IDispatch *)theApp.m_pConnection,true),adOpenDynamic,adLockPessimistic,adCmdText);       	
	if(m_pRecordset_room->GetRecordCount()!=0)
	{
		price = m_pRecordset_room->GetCollect("Price").lVal;
	}
	else
	{
		AfxMessageBox("获取该客房信息失败，暂时不能结算！");
		return;
	}
	m_pRecordset_room->Close();
	//计算入住时间段:10点以后结算加一天
	m_timeCheckD = CTime::GetCurrentTime();
	m_timeCheckT = CTime::GetCurrentTime();
	CTimeSpan d1 = m_timeCheckD - m_timeOrderD;
	int day = d1.GetDays() ;
	if(m_timeCheckD.GetHour() >=10)
		day +=1 ;
	
	//折扣
	float repay;
	if(m_strCheckType.CompareNoCase("会员") == 0)//8折
		repay = (float)0.8;
	else if(m_strCheckType.CompareNoCase("团体") == 0)//9折
		repay = (float)0.9;	
	else
		repay = (float)1.0;	
		
	//计算总金额
	m_nCheckMoney = (int)((m_nDinner + price )*day*repay - m_nYajin);

	_RecordsetPtr m_pRecordset_check;
	//添加结算信息
	sql = "select * from CheckInfo ";
	m_pRecordset_check.CreateInstance("ADODB.Recordset");
	m_pRecordset_check->Open((_variant_t)sql,_variant_t((IDispatch *)theApp.m_pConnection,true),adOpenDynamic,adLockPessimistic,adCmdText);       	
	m_pRecordset_check->AddNew();
	m_pRecordset_check->PutCollect("ID",(_variant_t)m_strCheckId);
	str.Format("%d",price);
	m_pRecordset_check->PutCollect("Price",(_variant_t)str);
	str.Format("%d",m_nDinner);
	m_pRecordset_check->PutCollect("Dinner",(_variant_t)str);
	str.Format("%d-%d-%d",m_timeCheckD.GetYear(),m_timeCheckD.GetMonth(),m_timeCheckD.GetDay());
	m_pRecordset_check->PutCollect("EndDay",(_variant_t)str);
	str.Format("%d:%d:%d",m_timeCheckT.GetHour(),m_timeCheckT.GetMinute(),m_timeCheckT.GetSecond());
	m_pRecordset_check->PutCollect("EndTime",(_variant_t)str);
	str.Format("%d",day);
	m_pRecordset_check->PutCollect("Day",(_variant_t)str);
	str.Format("%2f",repay);
	m_pRecordset_check->PutCollect("Repay",(_variant_t)str);
	str.Format("%d",m_nCheckMoney);
	m_pRecordset_check->PutCollect("Money",(_variant_t)str);
	
	m_pRecordset_check->Update();
	m_pRecordset_check->Close();	
	UpdateData(FALSE);
}