lyfz_repos/经典版源码/lyfzddfClient/trunk/625/Singleincomemoney.cpp

// Singleincomemoney.cpp : implementation file
//

#include "stdafx.h"
#include "ylgl.h"
#include "Singleincomemoney.h"
#include "InputMemberno.h"
#include "SelPayType.h"
#include "Login2.h"
#include "SelExpendType.h"
#ifdef _DEBUG
#define new DEBUG_NEW
#undef THIS_FILE
static char THIS_FILE[] = __FILE__;
#endif

/////////////////////////////////////////////////////////////////////////////
// Singleincomemoney dialog IDC_EDIT3
Singleincomemoney::Singleincomemoney(CWnd* pParent /*=NULL*/)
: CDialog(Singleincomemoney::IDD, pParent)
{
	//{{AFX_DATA_INIT(Singleincomemoney)
	m_money = _T("");
	m_time1 = g_date;
	m_ren2 = g_user.name;
	m_money1 = _T("");
	m_money2 = _T("");
	m_money3 = _T("");
	m_phone = _T("");
	m_sitem = _T("");
	m_id = _T("");
	m_name = _T("");
	//}}AFX_DATA_INIT
}

void Singleincomemoney::DoDataExchange(CDataExchange* pDX)
{
	CDialog::DoDataExchange(pDX);
	//{{AFX_DATA_MAP(Singleincomemoney)
	DDX_Control(pDX, IDC_LIST1, m_List1);
	DDX_Control(pDX, IDC_EDIT2, m_editdate1);
	DDX_Control(pDX, IDC_EDIT1, m_editctrl1);
	DDX_Text(pDX, IDC_EDIT1, m_money);
	DDX_Text(pDX, IDC_EDIT2, m_time1);
	DDX_Text(pDX, IDC_EDITren2, m_ren2);
	DDX_Text(pDX, IDC_EDITmoney2, m_money1);
	DDX_Text(pDX, IDC_EDITmoney3, m_money2);
	DDX_Text(pDX, IDC_EDITmoney5, m_money3);
	DDX_Text(pDX, IDC_EDITphone, m_phone);
	DDX_Text(pDX, IDC_EDITsitem, m_sitem);
	DDX_Text(pDX, IDC_EDITid, m_id);
	DDX_Text(pDX, IDC_EDITname1, m_name);
	//}}AFX_DATA_MAP
}

BEGIN_MESSAGE_MAP(Singleincomemoney, CDialog)
	//{{AFX_MSG_MAP(Singleincomemoney)
	ON_WM_LBUTTONDOWN()
	ON_BN_CLICKED(IDC_BUTTON1, OnButton1)
	ON_BN_CLICKED(IDC_BUTTON3, OnButton3)
	ON_BN_CLICKED(IDC_BUTTON8, OnButton8)
	//}}AFX_MSG_MAP
END_MESSAGE_MAP()

/////////////////////////////////////////////////////////////////////////////
// Singleincomemoney message handlers

BOOL Singleincomemoney::OnInitDialog() 
{
	CDialog::OnInitDialog();
	GetDlgItem(IDC_BUTTON1)->EnableWindow(IsHasRights2new(49));

	//	if(IsHasRights2new(49)==0)((CEdit*)GetDlgItem(IDC_EDIT2))->SetReadOnly ();
	//	else
	((CEdit*)GetDlgItem(IDC_EDIT2))->SetReadOnly ();

	if(atoi(g_cominfoarray.ElementAt(0).ElementAt(115)))
		m_List1.SetHeadings("id,0;金额,80;日期,120;收款人,120;支付方式,120;接单点,80" );
	else
		m_List1.SetHeadings("id,0;金额,80;日期,120;收款人,120;支付方式,120" );

	m_List1.LoadColumnInfo (300);
	// TODO: Add extra initialization here
	g_sendhead.bsql=0;
	g_sendhead.code[0]=197;
	g_sendhead.tabcount=1;
	CString filter="id='"+m_id+"'";
	g_pMainWnd->ProcessChatMessageRequest2(filter);
	if(g_bSendOK==0)
	{
		CDialog::OnCancel ();
		return 0;
	}
	DataToArray( &m_List1array);
	CenterWindow(g_pMainWnd);

	FillGrid();
	return TRUE;  // return TRUE unless you set the focus to a control
	// EXCEPTION: OCX Property Pages should return FALSE
}

void Singleincomemoney::OnOK() 
{
	// TODO: Add extra validation here
	UpdateData();
	if(m_money.IsEmpty ())
	{
		AfxMessageBox("资料不全!", MB_ICONINFORMATION);
		return;
	}
	if(!CheckDateOK(m_time1))return;
	CString m_date=m_time1;
	BOOL bexist1=0;
	BOOL bexist2=0;
	if(bexist1==0)
	{
		for(int i=0; i<m_List1array.GetSize (); i++)
		{
			if(m_List1array.ElementAt (i).ElementAt (0)==m_money)
			{
				bexist1=1;
				break;
			}
		}
	}
	if(bexist2==0)
	{
		for(int i=0; i<m_List1array.GetSize (); i++)
		{
			if(m_List1array.ElementAt (i).ElementAt (1)==m_time1)
			{
				bexist2=1;
				break;
			}
		}
	}
	if(bexist1 && bexist2)
	{
		if(AfxMessageBox("已有相似的记录, 确认没有重复吗? 是否继续?", MB_YESNO|MB_ICONINFORMATION)!=IDYES)
			return;
	}
	CString sql;

	CString paytype;
	SelPayType seltype;
	seltype.m_paymoney=m_money;
	if(seltype.DoModal ()!=IDOK)return;
	if(seltype.m_radio1==0)
		paytype="现金";
	else if(seltype.m_radio1==1)
		paytype="POS机刷卡";
	else if(seltype.m_radio1==2)
		paytype="储值卡扣款";
	else if(seltype.m_radio1==3)
		paytype="积分兑换";
	else if(seltype.m_radio1==4)
		paytype="银行转账";

	CString jdd;
	if(atoi(g_cominfoarray.ElementAt(0).ElementAt(115)))
	{
		SelExpendType dlg;
		dlg.m_mode=3;
		if(dlg.DoModal()==IDOK)
			jdd=dlg.m_sel;
	}

	sql.Format("insert into [singleincomemoney]([id],[money],[date],[clerk],[paytype],[time],[jdd])values('%s','%s','%s','%s','%s','curtimereplace','%s')***refresh singleincomemoney%s",
		m_id, m_money, m_date, m_ren2, paytype, jdd, m_id);



	CString m_id="其它二销:"+m_sitem;
	if(paytype=="储值卡扣款")
	{
		if(seltype.m_bChildMoneyCard)
		{
			sql+="***insert into [membercard3childusereg]([memberno],[dindanid],[money],[date])values('"+seltype.m_cardno+"','"+m_id+"','"+m_money+"','"+m_date+"')";
			sql+="***refresh balance memberreg4"+seltype.m_parentno+";"+seltype.m_cardno;
		}
		else
		{
			sql+="***insert into [membercard3usereg]([memberno],[dindanid],[money],[date])values('"+seltype.m_cardno+"','"+m_id+"','"+m_money+"','"+m_date+"')";
			sql+="***refresh balance memberreg3";sql+=seltype.m_cardno;
		}
	}
	else if(paytype=="积分兑换")
	{
		CString point;
		float rate=atof(g_cominfoarray.ElementAt (0).ElementAt (38))/100.0;
		point.Format ("%d", (int)(atof(m_money)*GetPointScale2()/rate));
		sql+="***insert into [memberreg2]([memberno],[dindanid],[money],[point],[date])values('"+seltype.m_cardno+"','"+m_id+"','"+m_money+"','"+point+"','"+g_date+"')";
		sql+="***refresh balance memberreg2";
		sql+=seltype.m_cardno;
	}

	g_sendhead.bsql=1;
	g_pMainWnd->ProcessChatMessageRequest2(sql);if(g_bSendOK==0)return;
	AfxMessageBox("保存成功!", MB_ICONINFORMATION);
	GetData();
	//	CDialog::OnOK();
}

HBRUSH Singleincomemoney::OnCtlColor(CDC* pDC, CWnd* pWnd, UINT nCtlColor) 
{
	HBRUSH hbr = CDialog::OnCtlColor(pDC, pWnd, nCtlColor);
	// TODO: Change any attributes of the DC here
	if (nCtlColor==CTLCOLOR_STATIC)
	{
		pDC-> SetBkMode(TRANSPARENT); //设置字体背景为透明
		return (HBRUSH)::GetStockObject(NULL_BRUSH); // 设置背景色
	}
	// TODO: Return a different brush if the default is not desired
	return hbr;
}

void Singleincomemoney::OnLButtonDown(UINT nFlags, CPoint point) 
{
	// TODO: Add your message handler code here and/or call default

	CDialog::OnLButtonDown(nFlags, point);
}

void Singleincomemoney::GetData()
{
	g_sendhead.bsql=0;
	g_sendhead.code[0]=197;
	g_sendhead.tabcount=1;
	CString filter="id='"+m_id+"'";
	g_pMainWnd->ProcessChatMessageRequest2(filter);
	if(g_bSendOK==0)return;
	DataToArray( &m_List1array);
	FillGrid();

	float payed=0;
	for(int i=0; i<m_List1.GetItemCount(); i++)
	{
		payed+=atof(m_List1.GetItemText(i, 1));
	}
	m_money2.Format("%0.1f", payed);
	m_money3.Format("%0.1f", atof(m_money1)-atof(m_money2));
	UpdateData(0);
}

void Singleincomemoney::FillGrid()
{
	m_List1.DeleteAllItems2 ();
	int ii=0;
	m_List1.m_arLabels.SetSize( m_List1array.GetSize (), 1 );
	int count=0;

	for(ii=0; ii<m_List1.m_arLabels.GetSize (); ii++)
	{
		m_List1.m_arLabels.ElementAt (count++).Copy (m_List1array.ElementAt (ii));
	}

	m_List1.m_arLabels.SetSize(count, 1);
	ii=count;
	m_List1.m_LabelCount=ii;
	m_List1.SetItemCountEx (ii);
}

BOOL Singleincomemoney::PreTranslateMessage(MSG* pMsg) 
{
	// TODO: Add your specialized code here and/or call the base class
	if(pMsg->message==WM_KEYDOWN)
	{
		switch (pMsg->wParam)
		{
		case VK_RETURN:
			return 1;
		}
	}
	return CDialog::PreTranslateMessage(pMsg);
}

void Singleincomemoney::OnButton1() 
{
	// TODO: Add your control notification handler code here
	if(IsHasRights2new(49)==0)return;
	// TODO: Add your control notification handler code here
	POSITION pos;
	pos=m_List1.GetFirstSelectedItemPosition();	
	if(pos==NULL)
	{
		AfxMessageBox("请先选中您要删除的项目!", MB_ICONINFORMATION);
		return;
	}
	if(AfxMessageBox("是否删除此项目?", MB_YESNO|MB_ICONINFORMATION)!=IDYES)return;
	int iItem=m_List1.GetNextSelectedItem(pos);	
	CString id=m_List1.GetItemText (iItem, 0);
	CString money=m_List1.GetItemText (iItem, 1);
	CString bz=m_List1.GetItemText (iItem, 2)+m_List1.GetItemText (iItem, 3);
	CString sql;
	sql.Format ("delete from singleincomemoney where [autoid]=%d***refresh singleincomemoney%s", atol(id), m_id);



	g_sendhead.bsql=1;
	g_pMainWnd->ProcessChatMessageRequest2(sql);if(g_bSendOK==0)return;

	GetData();
	CString str;
	str=m_List1.GetItemText (iItem, 3);
	str+="删除客人";
	str+=m_name;
	str+=m_List1.GetItemText (iItem, 2);
	str+="其它二销收款:";
	str+=money;
	WriteLog(str);
}

void Singleincomemoney::OnButton3() 
{
	// TODO: Add your control notification handler code here
	Login2 dlg;
	dlg.m_mode=3;
	if(dlg.DoModal ()!=IDOK)return;	
	if(IsHasRightsnew2(49, dlg.m_rights)==0)return;
	((CEdit*)GetDlgItem(IDC_EDIT2))->SetReadOnly (0);
}

void Singleincomemoney::OnButton8() // 其它二销打印;
{
	// TODO: Add your control notification handler code here
	//AfxMessageBox("789");
	POSITION pos;
	pos=m_List1.GetFirstSelectedItemPosition();	
	if(pos==NULL)
	{
		AfxMessageBox("请先选中您要打单的项目!", MB_ICONINFORMATION);
		return;
	}
	int iItem;
	CStringArray array;
	array.Add ("");
	array.Add (g_cominfoarray.ElementAt (0).ElementAt (48));
	array.Add ("NO."+m_id);
	CString str="地址:"+g_cominfoarray.ElementAt (0).ElementAt (12);
	str+="   电话:"+g_cominfoarray.ElementAt (0).ElementAt (11);
	array.Add (str);
	CString name=m_name;
	CString phone=m_phone;

	array.Add ("客户姓名:"+name);

	if(IsHasRights2new(31)==0)
		array.Add ("");
	else 
		array.Add ("联系电话:"+phone);

	CString date;
	date.Format ("日期:%s年%s月%s日", g_date.Mid (0,4), g_date.Mid (5,2), g_date.Mid (8,2));
	array.Add (date);
	array.Add (" 收 款 项 目 ");
#if 1 // Jeff 显示打印支付方式;
	array.Add(" 支付方式 ");
#endif
	array.Add (" 金  额  ");
	array.Add (" 开单人  ");
	int count=0;
	float money=0;
	while (pos)
	{
		count++;
		if(m_bz!="" && count>3)break;
		if(count>4)break;
		iItem = m_List1.GetNextSelectedItem(pos);


		array.Add (m_sitem);
#if 1	// 显示打印支付方式;
		array.Add(m_List1.GetItemText(iItem,4));	// add by Jeff:添加支付方式;
#endif
		array.Add (m_List1.GetItemText (iItem,  1));
		money+=atof(m_List1.GetItemText (iItem,  1));
		array.Add (m_ren);
	}

	if(m_bz!="" && count==1)
	{	
		array.Add ("");	
		array.Add ("");
		array.Add ("");
		array.Add ("");

		array.Add ("");
		array.Add ("");	
		array.Add ("");	
		array.Add ("");

		array.Add (m_bz);
		array.Add ("");
		array.Add ("");
		array.Add ("");
	}
	if(m_bz!="" && count==2)
	{
		array.Add ("");	
		array.Add ("");
		array.Add ("");
		array.Add ("");

		array.Add (m_bz);	
		array.Add ("");	
		array.Add ("");
		array.Add ("");
	}
	if(m_bz!="" && count==3)
	{
		array.Add (m_bz);	
		array.Add ("");	
		array.Add ("");
		array.Add ("");
	}
	if(m_bz!="" && count==4)
	{
		array.Add (m_bz);	
		array.Add ("");	
		array.Add ("");
		array.Add ("");
	}
	//while(array.GetSize ()<22)	array.Add ("");
	while(array.GetSize()<27) array.Add(""); // 显示打印支付方式;
	CString smoney;
	smoney.Format ("%0.1f", money);

	if(atoi(g_cominfoarray.ElementAt(0).ElementAt(87)))//小单
	{
		str="付款情况         应付:"+m_money1;
		str+="      实付:"+m_money2;
		str+="      欠款:"+m_money3;
	}
	else
	{
		str="付款情况            应付:"+m_money1;
		str+="         实付:"+m_money2;
		str+="         欠款:"+m_money3;
	}

	array.Add (str);
	if(atoi(g_cominfoarray.ElementAt(0).ElementAt(87)))//小单
	{
		str.Format("合计人民币(大写):        %s 萬  %s 仟  %s 佰  %s 拾  %s 元",\
			GetHMoney(GetW(smoney)),GetHMoney(GetK(smoney)),GetHMoney(GetB(smoney)),GetHMoney(GetS(smoney)),GetHMoney(GetG(smoney)));
	}
	else
	{
		str.Format("合计人民币(大写):                %s 萬     %s 仟     %s 佰     %s 拾     %s 元",\
			GetHMoney(GetW(smoney)),GetHMoney(GetK(smoney)),GetHMoney(GetB(smoney)),GetHMoney(GetS(smoney)),GetHMoney(GetG(smoney)));
	}
	array.Add (str);

	array.Add (g_cominfoarray.ElementAt (0).ElementAt (120));

	array.Add ("  收银:"+g_user.name);
	array.Add ("顾客签名:");
	array.Add ("");//第\r\n一\r\n联\r\n存\r\n根\r\n∧\r\n白\r\n∨\r\n第\r\n二\r\n联\r\n财\r\n务\r\n∧\r\n黄\r\n∨\r\n第\r\n三\r\n联\r\n客\r\n户\r\n∧\r\n红\r\n∨");
	g_pMainWnd->PrintReceipt_01(&array);	// 2销收入，应该使用PrintReceipt_01,需要显示支付方式 Jeff
}
/*
insert into [singleincomemoney]([id],[money],[date],[clerk],[paytype]) select [id],[money],[dat],[renyuan2],[paytype] from singleincome where payed is null***update [singleincome] set [payed]=(select sum(cast(money as float)) from [singleincomemoney] where [singleincome].[id]=[singleincomemoney].[id])***update [singleincome] set [balance]=cast(money as float)-cast(payed as float)
*/