financetangibledlg.cpp

这是一个学生信息管理系统

// FinanceTangibleDlg.cpp : 实现文件
//

#include "stdafx.h"
#include "SMS.h"
#include "FinanceTangibleDlg.h"


// CFinanceTangibleDlg 对话框

IMPLEMENT_DYNAMIC(CFinanceTangibleDlg, CDialog)

CFinanceTangibleDlg::CFinanceTangibleDlg(CWnd* pParent /*=NULL*/)
	: CDialog(CFinanceTangibleDlg::IDD, pParent)
	, m_iTangibleAmount(0)
	, m_pSet(&theApp.m_db )
	, m_pCashSet(&theApp.m_db )
	, m_pTransferSet(&theApp.m_db )
{
	//显示窗口颜色
	m_backcolor=m_RGB_BkColor;
	m_brush.CreateSolidBrush(m_backcolor);
	m_bItemClick=false;
}

CFinanceTangibleDlg::~CFinanceTangibleDlg()
{
}

void CFinanceTangibleDlg::DoDataExchange(CDataExchange* pDX)
{
	CDialog::DoDataExchange(pDX);
	DDX_Text(pDX, IDC_TANGIBLE_AMOUNT_STATIC, m_iTangibleAmount);
	DDX_Control(pDX, IDC_FINANCE_TANGIBLE_LIST, m_cTangibleListCtrl);
	DDX_Control(pDX, IDC_FINANCE_TANGIBLE_DELETE_BT, m_cDeleteBt);
	DDX_Control(pDX, IDC_FINANCE_TANGIBLE_UPDATE_BT, m_cUpdateBt);
	DDX_Control(pDX, IDC_FINANCE_TANGIBLE_PRINT_BT, m_cPrintBt);
	DDX_Control(pDX, IDC_FINANCE_TANGIBLE_TRANSFER_BT, m_cTransferBt);
}


BEGIN_MESSAGE_MAP(CFinanceTangibleDlg, CDialog)
	ON_BN_CLICKED(IDC_FINANCE_TANGIBLE_ALL_BT, &CFinanceTangibleDlg::OnBnClickedFinanceTangibleAllBt)
	ON_BN_CLICKED(IDC_TANGIBLE_KIND_BT, &CFinanceTangibleDlg::OnBnClickedTangibleKindBt)
	ON_BN_CLICKED(IDC_FINANCE_TANGIBLE_ADD_BT, &CFinanceTangibleDlg::OnBnClickedFinanceTangibleAddBt)
	ON_BN_CLICKED(IDC_FINANCE_TANGIBLE_UPDATE_BT, &CFinanceTangibleDlg::OnBnClickedFinanceTangibleUpdateBt)
	ON_BN_CLICKED(IDC_FINANCE_TANGIBLE_DELETE_BT, &CFinanceTangibleDlg::OnBnClickedFinanceTangibleDeleteBt)
	ON_BN_CLICKED(IDC_FINANCE_TANGIBLE_TRANSFER_BT, &CFinanceTangibleDlg::OnBnClickedFinanceTangibleTransferBt)
	ON_BN_CLICKED(IDC_FINANCE_TANGIBLE_SEARCH_BT, &CFinanceTangibleDlg::OnBnClickedFinanceTangibleSearchBt)
	ON_WM_QUERYDRAGICON()//打印
	ON_BN_CLICKED(IDC_FINANCE_TANGIBLE_PRINT_BT, &CFinanceTangibleDlg::OnBnClickedFinanceTangiblePrintBt)
	ON_WM_CTLCOLOR()
	ON_NOTIFY(HDN_ITEMCLICK, 0, &CFinanceTangibleDlg::OnHdnItemclickFinanceTangibleList)
	ON_WM_CLOSE()
	ON_WM_CONTEXTMENU()
	ON_WM_TIMER()
	ON_COMMAND(ID_TANGIBLE_ALL, &CFinanceTangibleDlg::OnTangibleAll)
	ON_COMMAND(ID_TANGIBLE_KIND, &CFinanceTangibleDlg::OnTangibleKind)
	ON_COMMAND(ID_TANGIBLE_ADD, &CFinanceTangibleDlg::OnTangibleAdd)
	ON_COMMAND(ID_TANGIBLE_UPDATE, &CFinanceTangibleDlg::OnTangibleUpdate)
	ON_COMMAND(ID_TANGIBLE_DELETE, &CFinanceTangibleDlg::OnTangibleDelete)
	ON_COMMAND(ID_TANGIBLE_TRANSFER, &CFinanceTangibleDlg::OnTangibleTransfer)
	ON_COMMAND(ID_TANGIBLE_SEARCH, &CFinanceTangibleDlg::OnTangibleSearch)
	ON_COMMAND(ID_TANGIBLE_PRINT, &CFinanceTangibleDlg::OnTangiblePrint)
    ON_UPDATE_COMMAND_UI(ID_TANGIBLE_UPDATE, &CFinanceTangibleDlg::OnUpdateTangibleUpdate )
	ON_UPDATE_COMMAND_UI(ID_TANGIBLE_DELETE, &CFinanceTangibleDlg::OnUpdateTangibleDelete )
	ON_UPDATE_COMMAND_UI(ID_TANGIBLE_TRANSFER, &CFinanceTangibleDlg::OnUpdateTangibleTransfer )
	ON_UPDATE_COMMAND_UI(ID_TANGIBLE_PRINT, &CFinanceTangibleDlg::OnUpdateTangiblePrint )
    ON_WM_INITMENUPOPUP()
END_MESSAGE_MAP()


// CFinanceTangibleDlg 消息处理程序
void CFinanceTangibleDlg::ViewAll()
{
	BeginWaitCursor();
	CString s;
	int Length;
	m_cTangibleListCtrl.DeleteAllItems ();
	if(m_pSet.IsOpen ())
		m_pSet.Close ();
	m_pSet.Open (AFX_DB_USE_DEFAULT_TYPE,L"Select * from Tangible order by tDate");
	m_pSet.m_strFilter .Empty ();
	int count;
	count=m_pSet.GetRecordCount ();
	if(count==0)//如果该数据表为空，则不用显示
	{
		EndWaitCursor();
		m_pSet.Close ();
		return ;
	}
	m_pSet.MoveFirst ();
	int i=0; 
	while (!m_pSet.IsEOF ())
	{
		m_cTangibleListCtrl.InsertItem(i,m_pSet.m_tName ,0);
		m_cTangibleListCtrl.SetItemText (i,1,m_pSet.m_tKind );
		s.Format (L"%d",m_pSet.m_tQuantity );
		m_cTangibleListCtrl.SetItemText (i,2,s);
		s.Format (L"%f",m_pSet.m_tPrice );
		Length=s.GetLength ();
		s.Delete (Length-4,4);
	    m_cTangibleListCtrl.SetItemText (i,3,s );
		m_cTangibleListCtrl.SetItemText (i,4,FormatDate(m_pSet.m_tDate ));
		s.Format (L"%f",m_pSet.m_tSum );
		Length=s.GetLength ();
		s.Delete (Length-4,4);
	    m_cTangibleListCtrl.SetItemText (i,5,s );
		m_cTangibleListCtrl.SetItemText (i,6,m_pSet.m_tRemark );
        s.Format (L"%d",m_pSet.m_tId );
		m_cTangibleListCtrl.SetItemText (i,7,s);
        i++;
		m_pSet.MoveNext ();
	}
	m_pSet.Close ();
	//现在在右边显示个数
	m_iTangibleAmount=i;
	s.Format (L"%d",m_iTangibleAmount);
	SetDlgItemText(IDC_TANGIBLE_AMOUNT_STATIC,s);//显示
	EndWaitCursor();
}
void CFinanceTangibleDlg::OnBnClickedFinanceTangibleAllBt()
{
	// TODO: 在此添加控件通知处理程序代码
	ViewAll();
}

void CFinanceTangibleDlg::Kind()
{
	CString s;
	int Length;
	int i=0;
    CFinanceTangibleKindDlg dlg;
	if(dlg.DoModal ()==IDOK)
	{
		BeginWaitCursor();
		m_cTangibleListCtrl.DeleteAllItems ();
	    if(m_pSet.IsOpen ())
		    m_pSet.Close ();
	    m_pSet.Open (AFX_DB_USE_DEFAULT_TYPE,L"Select * from Tangible order by tDate");
	    m_pSet.m_strFilter .Empty ();
	    m_pSet.Requery ();
	    if(m_pSet.IsEOF ())
	    {
	        m_iTangibleAmount=i;
	        s.Format (L"%d",m_iTangibleAmount);
	        SetDlgItemText(IDC_TANGIBLE_AMOUNT_STATIC,s);//显示
		    MessageBox(L"\n不存在这样的记录！\n",L"提示",MB_ICONEXCLAMATION);
		    m_pSet.Close ();
			EndWaitCursor();
		    return ;
	    }
	    else
	    {
	        if(m_pSet.GetRecordCount ()==0)
		    {
				m_iTangibleAmount=i;
				s.Format (L"%d",m_iTangibleAmount);
				SetDlgItemText(IDC_TANGIBLE_AMOUNT_STATIC,s);//显示
				MessageBox(L"\n不存在这样的记录！\n",L"提示",MB_ICONEXCLAMATION);
			    m_pSet.Close ();
				EndWaitCursor();
			    return ;
		    }
		    m_pSet.MoveFirst ();
	        while (!m_pSet.IsEOF ())
	        {  
				if(dlg.m_sKind ==m_pSet.m_tKind )
				{
					m_cTangibleListCtrl.InsertItem(i,m_pSet.m_tName ,0);
					m_cTangibleListCtrl.SetItemText (i,1,m_pSet.m_tKind );
					s.Format (L"%d",m_pSet.m_tQuantity );
					m_cTangibleListCtrl.SetItemText (i,2,s);
					s.Format (L"%f",m_pSet.m_tPrice );
					Length=s.GetLength ();
					s.Delete (Length-4,4);
				    m_cTangibleListCtrl.SetItemText (i,3,s );
					m_cTangibleListCtrl.SetItemText (i,4,FormatDate(m_pSet.m_tDate ));
					s.Format (L"%f",m_pSet.m_tSum );
					Length=s.GetLength ();
					s.Delete (Length-4,4);
					m_cTangibleListCtrl.SetItemText (i,5,s );
					m_cTangibleListCtrl.SetItemText (i,6,m_pSet.m_tRemark );
					s.Format (L"%d",m_pSet.m_tId );
					m_cTangibleListCtrl.SetItemText (i,7,s);
					i++;
				}
				m_pSet.MoveNext ();
	        }
	        m_pSet.Close ();
	       if(i==0)
	       {
   				m_iTangibleAmount=i;
				s.Format (L"%d",m_iTangibleAmount);
				SetDlgItemText(IDC_TANGIBLE_AMOUNT_STATIC,s);//显示
				MessageBox(L"\n不存在这样的记录！\n",L"提示",MB_ICONEXCLAMATION);
				m_pSet.Close ();
				EndWaitCursor();
				return ;
			}
	        //现在在右边显示个数
	        m_iTangibleAmount=i;
	        s.Format (L"%d",m_iTangibleAmount);
	        SetDlgItemText(IDC_TANGIBLE_AMOUNT_STATIC,s);//显示
		}
		EndWaitCursor();
	}
}
void CFinanceTangibleDlg::OnBnClickedTangibleKindBt()
{
	// TODO: 在此添加控件通知处理程序代码
    Kind();
}

void CFinanceTangibleDlg::Add()
{
	CString s;
	int Length;
	CFinanceTangibleAddDlg dlg;
	if(dlg.DoModal ()==IDOK)
	{
		if(!theApp.m_db.CanTransact ())
		{
			//虽然不支持事务处理的数据库很少，但是我强硬地不允许这种情况出现
			MessageBox(L"\n系统不支持事务处理，添加不成功！\n",L"错误", MB_ICONSTOP);
			return ;                                    
		}
		theApp.m_db.BeginTrans ();//开始事务处理
		TRY
		{
			//先处理物品表
	        m_pSet.Open (AFX_DB_USE_DEFAULT_TYPE,L"Select * from Tangible order by tDate");
		    m_pSet.m_strFilter.Empty ();
			m_pSet.AddNew ();
			m_pSet.m_tName=dlg.m_sName ;
			m_pSet.m_tKind =dlg.m_sKind ;
			m_pSet.m_tQuantity =dlg.m_iQuantity ;
			m_pSet.m_tPrice =dlg.m_dPrice ;
			m_pSet.m_tDate =dlg.m_tDate ;
			m_pSet.m_tSum =dlg.m_iQuantity *dlg.m_dPrice;
			m_pSet.m_tRemark =dlg.m_sRemark ;
			m_pSet.Update ();
			m_pSet.MoveLast ();
		    m_pSet.Close ();
			//再修改现金表，默认是用现金去买东西
			double MoneyLast;
			if(m_pCashSet.IsOpen ())
				m_pCashSet.Close ();
			m_pCashSet.Open (AFX_DB_USE_DEFAULT_TYPE,L"Select * from Cash order by cDate ASC");
			m_pCashSet.m_strFilter .Empty ();
			if(m_pCashSet.GetRecordCount ()==0)
				MoneyLast=0;
			else
			{
				m_pCashSet.MoveLast ();
				MoneyLast=m_pCashSet.m_cAmount ;
			}
			MoneyLast-=dlg.m_dSum ;//减去消费总额
			m_pCashSet.AddNew ();
			m_pCashSet.m_cAmount =MoneyLast;
			m_pCashSet.m_cDate =CTime::GetCurrentTime();
			m_pCashSet.Update();
			m_pCashSet.MoveLast ();
			m_pCashSet.Close ();
            theApp.m_db.CommitTrans ();//添加成功了
		}
		CATCH_ALL(e)
		{
			theApp.m_db.Rollback ();
		    MessageBox(L"\n事务处理出错，添加失败！\n",L"错误", MB_ICONSTOP);
			return;
	    }
	    END_CATCH_ALL
		//添加成功了，就要在列表中显示出来
		m_cTangibleListCtrl.InsertItem(0,dlg.m_sName ,0);
		m_cTangibleListCtrl.SetItemText (0,1,dlg.m_sKind );
		s.Format (L"%d",m_pSet.m_tQuantity );
		m_cTangibleListCtrl.SetItemText (0,2,s);
		s.Format (L"%f",dlg.m_dPrice );
		Length=s.GetLength ();
		s.Delete (Length-4,4);
	    m_cTangibleListCtrl.SetItemText (0,3,s );
		m_cTangibleListCtrl.SetItemText (0,4,FormatDate(dlg.m_tDate  ));
		s.Format (L"%f",dlg.m_dSum );
		Length=s.GetLength ();
		s.Delete (Length-4,4);
		m_cTangibleListCtrl.SetItemText (0,5,s );
		m_cTangibleListCtrl.SetItemText (0,6,dlg.m_sRemark );
		s.Format (L"%d",m_pSet.m_tId );
		m_cTangibleListCtrl.SetItemText (0,7,s);
		//然后再在个数中加一,显示给用户
		m_iTangibleAmount++;
		s.Format (L"%d",m_iTangibleAmount);
		SetDlgItemText(IDC_TANGIBLE_AMOUNT_STATIC,s);//显示
	}
}
void CFinanceTangibleDlg::OnBnClickedFinanceTangibleAddBt()
{
	// TODO: 在此添加控件通知处理程序代码
    Add();
}

void CFinanceTangibleDlg::Update ()
{
	CString s;
	int Length;
	POSITION pos = m_cTangibleListCtrl.GetFirstSelectedItemPosition();
    if (pos == NULL)
	{
		MessageBox(L"你没有选择要修改的财产\n请在列表中选择要修改的财产！",L"提示",MB_ICONEXCLAMATION);
		return ;//没有选择表项则不用做下面的事情
	}
    else
    {
		if(!theApp.m_db.CanTransact ())
		{
			//虽然不支持事务处理的数据库很少，但是我强硬地不允许这种情况出现
			MessageBox(L"\n系统不支持事务处理，修改不成功！\n",L"错误", MB_ICONSTOP);
			return ;                                    
		}
	    int nItem = m_cTangibleListCtrl.GetNextSelectedItem(pos);//列表中的项目序号也即数据库中的编号
		//下面获取该表项的数据，用于在修改对话框中显示
		int Id=_ttol(m_cTangibleListCtrl.GetItemText (nItem,7));
		if(m_pSet.IsOpen ())
			m_pSet.Close ();
		m_pSet.Open ();
		m_pSet.m_strFilter .Empty ();
		m_pSet.MoveFirst ();
		while(!m_pSet.IsEOF ())
		{
			if(m_pSet.m_tId ==Id)//说明找到了相应的那个字段
			{
				m_iFinanceTangible_Id=m_pSet.m_tId ;
				m_sFinanceTangible_Name=m_pSet.m_tName ;
				m_sFinanceTangible_Kind=m_pSet.m_tKind ;
				m_iFinanceTangible_Quantity=m_pSet.m_tQuantity ;
				m_dFinanceTangible_Price=m_pSet.m_tPrice ;
				m_tFinanceTangible_Date=m_pSet.m_tDate ;
				m_dFinanceTangible_Sum=m_pSet.m_tSum ;
				m_sFinanceTangible_Remark=m_pSet.m_tRemark ;
				break;
			}
			m_pSet.MoveNext ();
		}
		m_pSet.Close ();//记得要关闭!
		//下面弹出修改对话框，初始化数据由上面部分提供
		CFinanceTangibleUpdateDlg dlg;
		if(dlg.DoModal ()!=IDOK)
		{
			return ;//万一用户没有输入正确信息，则退出，不给修改
		}
		theApp.m_db.BeginTrans ();//开始事务处理
		TRY
		{
			//先处理物品表
	        m_pSet.Open (AFX_DB_USE_DEFAULT_TYPE,L"Select * from Tangible order by tDate");
		    m_pSet.m_strFilter.Empty ();
			m_pSet.MoveFirst ();//刚开始移动到第一个位置
			while(!m_pSet.IsEOF ())
			{
				if(m_pSet.m_tId ==m_iFinanceTangible_Id)
				{
					m_pSet.Edit ();
					m_pSet.m_tName=dlg.m_sName ;
					m_pSet.m_tKind =dlg.m_sKind ;
					m_pSet.m_tQuantity =dlg.m_iQuantity ;
					m_pSet.m_tPrice =dlg.m_dPrice ;
					m_pSet.m_tDate =dlg.m_tDate ;
					m_pSet.m_tSum =dlg.m_dSum;
					m_pSet.m_tRemark =dlg.m_sRemark ;
			        m_pSet.Update ();
			        m_pSet.Requery ();
					m_pSet.MoveNext ();
					break;
				}
				m_pSet.MoveNext ();
			}
        m_pSet.Close ();
		//再修改现金表，默认是用现金去买东西
		double MoneyLast;
		if(m_pCashSet.IsOpen ())
			m_pCashSet.Close ();
		m_pCashSet.Open (AFX_DB_USE_DEFAULT_TYPE,L"Select * from Cash order by cDate ASC");
		m_pCashSet.m_strFilter .Empty ();
		if(m_pCashSet.GetRecordCount ()==0)
			MoneyLast=0;
		else
		{
			m_pCashSet.MoveLast ();