dlgrj.cpp

进销存管理系统介绍了企业的现状以及进销存数据管理系统的特点、功能和使用对象

// DlgRj.cpp : implementation file
//

#include "stdafx.h"
#include "a1.h"
#include "DlgRj.h"
#include "ScrollPrintView.h"

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

/////////////////////////////////////////////////////////////////////////////
// CDlgRj dialog


CDlgRj::CDlgRj(bool isrj,CWnd* pParent /*=NULL*/)
	: CDialog(CDlgRj::IDD, pParent)
{
	//{{AFX_DATA_INIT(CDlgRj)
	m_iYue = -1;
	//}}AFX_DATA_INIT
	m_bRj=isrj;
	this->m_iOldYue=-1;

	 m_draw=new CDrawJZ(this);
}


void CDlgRj::DoDataExchange(CDataExchange* pDX)
{
	CDialog::DoDataExchange(pDX);
	//{{AFX_DATA_MAP(CDlgRj)
	DDX_Control(pDX, IDC_LIST1, m_list);
	DDX_Control(pDX, IDC_COMBO1, m_comboYue);
	DDX_Control(pDX, IDC_DATETIMEPICKER1, m_tcRq);
	DDX_CBIndex(pDX, IDC_COMBO1, m_iYue);
	//}}AFX_DATA_MAP
}


BEGIN_MESSAGE_MAP(CDlgRj, CDialog)
	//{{AFX_MSG_MAP(CDlgRj)
	ON_NOTIFY(DTN_DATETIMECHANGE, IDC_DATETIMEPICKER1, OnDatetimechangeDatetimepicker1)
	ON_CBN_SELENDOK(IDC_COMBO1, OnSelendokCombo1)
	ON_BN_CLICKED(IDC_BUTTON_PRINT, OnButtonPrint)
	//}}AFX_MSG_MAP
	ON_MESSAGE(MYMESSAGE_RQCHANGE,OnMyRqChange)
END_MESSAGE_MAP()

/////////////////////////////////////////////////////////////////////////////
// CDlgRj message handlers

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

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

BOOL CDlgRj::OnInitDialog() 
{
	CDialog::OnInitDialog();
	
		InitWhiteFrame();
		InitBaseInfo();
		InitListView();
	if(this->m_bRj)
	{
		this->SetWindowText("日结");
		this->m_tcRq.ShowWindow(SW_SHOW);
		this->m_comboYue.ShowWindow(SW_HIDE);
		m_tcRq.SetFocus();
	}
	else
	{
		this->SetWindowText("月结");
		this->m_tcRq.ShowWindow(SW_HIDE);
		this->m_comboYue.ShowWindow(SW_SHOW);
		m_comboYue.SetFocus();
	}

	return FALSE;  
}

bool CDlgRj::InitWhiteFrame()
{
	CRect rect;
	this->GetClientRect(&rect);
	rect.top+=10;
	rect.bottom=400;
	rect.left+=5;
	rect.right-=5;
m_whiteframe.Create("日期：",WS_CHILD|WS_VISIBLE,rect,this);
return true;
}

bool CDlgRj::InitBaseInfo()
{
	CTime t=CTime::GetCurrentTime();
	m_tcRq.SetTime(&t);

	if(m_bRj)
	{m_tcRq.SetParent(&this->m_whiteframe);
	m_tcRq.GetWindowText(m_strRq);
	}
	else
	{
	this->m_comboYue.SetParent(&this->m_whiteframe);

	
		//&m_whiteframe
		int i=t.GetYear();
		CString a;
		a.Format("%d",i);
	}
	return true;
}

bool CDlgRj::InitListView()
{

	if(m_whiteframe.m_hWnd==NULL)return false;
	CRect rect;
	m_whiteframe.GetClientRect(&rect);
	rect.top+=25;
	rect.left+=2;
	rect.right-=2;
	rect.bottom-=2;
	m_list.MoveWindow(&rect);
	m_list.SetParent(&m_whiteframe);
//		this->m_list.SetBkColor(::GetSysColor(COLOR_BTNFACE));
//		m_list.SetTextBkColor(::GetSysColor(COLOR_BTNFACE));
	this->m_list.ModifyStyle(LVS_EDITLABELS, 0L);		//禁止标题编辑
	m_list.ModifyStyle(0L, LVS_REPORT);			//设为Report类型
	m_list.ModifyStyle(0L, LVS_SHOWSELALWAYS);		//始终高亮度被选中的表项
	m_list.ModifyStyle(0L, LVS_NOSORTHEADER);
	m_list.ModifyStyle( LVS_OWNERDRAWFIXED,0L);
	m_list.SetExtendedStyle( LVS_EX_FULLROWSELECT |		//允许整行选中
		LVS_EX_GRIDLINES |	//画出网格线
		LVS_EX_FLATSB				//扁平风格的滚动条	
		);			//		this->m_list.set
//		CRect rect;
		m_list.GetClientRect(&rect);
		for(int k=0;k<6;k++)
		{
			m_list.InsertColumn(k,"");
		}
		m_list.SetColumnWidth(0,115);
		m_list.SetColumnWidth(1,115);
		m_list.SetColumnWidth(2,115);
		m_list.SetColumnWidth(3,115);
		m_list.SetColumnWidth(4,150);
		m_list.SetColumnWidth(5,150);
		for(int i=0;i<25;i++)
		{
			m_list.InsertItem(i,"");

			for(int j=1;j<6;j++)
			{
			m_list.SetItemText(i,j,"");
			}
		}
		if(m_bRj)
		this->RefreshListView(CString(""));
		else
		{
			CTime t=CTime::GetCurrentTime();
			m_iYue=t.GetMonth();
			CString yue;
			yue.Format("%d",m_iYue);
			CString next_yue;
			next_yue.Format("%d",m_iYue+1);
			CString y=t.Format("%Y");
			if(this->m_iYue==12)
			{
				int l_y=atoi(y);
				l_y++;
				CString upy;
				upy.Format("%d",l_y);
				this->m_strRqUp=upy+'-'+'1'+'-'+'1';
			}
			else
			{
				m_strRqUp=y+'-'+next_yue+'-'+'1';
			}
			m_strRqDown=y+'-'+yue+'-'+'1';
			m_iOldYue=m_iYue;
			this->m_comboYue.SetCurSel(m_iYue-1);
			this->RefreshListView(CString(""));
		}
		return true;
}

void CDlgRj::OnDatetimechangeDatetimepicker1(NMHDR* pNMHDR, LRESULT* pResult) 
{
	this->PostMessage(MYMESSAGE_RQCHANGE,0,0);
	*pResult = 0;
}

BOOL CDlgRj::PreTranslateMessage(MSG* pMsg) 
{
	const HWND hwnd = (pMsg!=NULL)?pMsg->hwnd:NULL;
		if(hwnd==NULL) goto a;
	if(hwnd==this->m_tcRq.GetSafeHwnd()&&pMsg->message==WM_CHAR)
	{

		//if()
	}
a:
		return CDialog::PreTranslateMessage(pMsg);
}
void CDlgRj::OnMyRqChange()
{
	CString str;
	this->m_tcRq.GetWindowText(str);
	if(str==this->m_strRq)
		return ;
	else
	{
		m_strRq=str;
		this->RefreshListView(CString(""));
	}
}

bool CDlgRj::RefreshListView(CString sql)
{
	m_list.SetRedraw(false);	
	m_list.DeleteAllItems();	
	int i=0;
	i=this->RefreshXSList(i)+1;
	m_list.InsertItem(i,"");
	i=this->RefreshRKList(i)+1;
	m_list.InsertItem(i,"");
	i=this->RefreshXSTHList(i)+1;

	m_list.InsertItem(i,"");
	this->RefreshRKTHList(i);

	for(int j=0;j<6;j++)
	this->m_list.SetColumnWidth(j,-2);

	m_list.SetRedraw(true);
	m_list.ShowWindow(SW_SHOW);
	m_list.Invalidate();
	return true;
}

CString CDlgRj::PrepareXSSQL()
{
	CString sql;
	if(this->m_bRj)
	sql.Format("SELECT Sum(tabxsdj.sl) AS sumsl,Sum(tabxsdj.je) AS sumje, Sum(tabxsdj.profit) AS profit, tabxsdj.yp_id AS yp_id,tabypinfo.yp_name FROM tabxsdj, tabxsph, tabypinfo 	WHERE ((tabxsph.xs_ph=tabxsdj.xs_ph) AND (tabxsph.rq='%s') AND (tabxsdj.yp_id=tabypinfo.yp_id)) GROUP BY tabxsdj.yp_id,tabypinfo.yp_name ",this->m_strRq);
	else
	sql.Format("SELECT Sum(tabxsdj.sl) AS sumsl, Sum(tabxsdj.je) AS sumje,Sum(tabxsdj.profit) AS profit,tabxsdj.yp_id AS yp_id,tabypinfo.yp_name FROM tabxsdj, tabxsph, tabypinfo WHERE tabxsph.xs_ph=tabxsdj.xs_ph AND tabxsph.rq>='%s' AND tabxsph.rq<'%s' AND tabxsdj.yp_id=tabypinfo.yp_id GROUP BY tabxsdj.yp_id,tabypinfo.yp_name",this->m_strRqDown,this->m_strRqUp);
	return sql;
}
CString CDlgRj::PrepareXSTHSQL()
{
	CString sql;
	if(this->m_bRj)
	sql.Format("SELECT Sum(tabxsthdj.sl) AS sumsl,Sum(tabxsthdj.je) AS sumje, tabxsthdj.yp_id AS yp_id,tabypinfo.yp_name FROM tabxsthdj, tabxsthph, tabypinfo WHERE ((tabxsthph.xsth_ph=tabxsthdj.xsth_ph) AND (tabxsthph.rq='%s') AND (tabxsthdj.yp_id=tabypinfo.yp_id)) GROUP BY tabxsthdj.yp_id,tabypinfo.yp_name ",this->m_strRq);
	else
	sql.Format("SELECT Sum(tabxsthdj.sl) AS sumsl,Sum(tabxsthdj.je) AS sumje,tabxsthdj.yp_id AS yp_id,tabypinfo.yp_name	FROM tabxsthdj, tabxsthph, tabypinfo WHERE tabxsthph.xsth_ph=tabxsthdj.xsth_ph 	AND tabxsthph.rq>='%s' AND tabxsthph.rq<'%s' AND tabxsthdj.yp_id=tabypinfo.yp_id GROUP BY tabxsthdj.yp_id,tabypinfo.yp_name	",this->m_strRqDown,this->m_strRqUp);
	return sql;

}
CString CDlgRj::PrepareRKSQL()
{
	CString sql;
	if(this->m_bRj)
	sql.Format("SELECT Sum(tabrkdj.sl) AS sumsl, Sum(tabrkdj.je) AS sumje,tabrkdj.yp_id AS yp_id,tabypinfo.yp_name	FROM tabrkdj, tabrkph, tabypinfo WHERE ((tabrkph.rk_ph=tabrkdj.rk_ph) AND (tabrkph.rq)='%s') AND (tabrkdj.yp_id=tabypinfo.yp_id)) GROUP BY tabrkdj.yp_id,tabypinfo.yp_name ",this->m_strRq);
	else
	sql.Format("SELECT Sum(tabrkdj.sl) AS sumsl, Sum(tabrkdj.je) AS sumje, tabrkdj.yp_id AS yp_id,tabypinfo.yp_name FROM tabrkdj, tabrkph, tabypinfo WHERE tabrkph.rk_ph=tabrkdj.rk_ph	AND tabrkph.rq>='%s' AND tabrkph.rq<'%s' AND tabrkdj.yp_id=tabypinfo.yp_id GROUP BY tabrkdj.yp_id,tabypinfo.yp_name	",this->m_strRqDown,this->m_strRqUp);
	return sql;
}
CString CDlgRj::PrepareRKTHSQL()
{
	CString sql;
	if(this->m_bRj)
	sql.Format("SELECT Sum(tabrkthdj.sl) AS sumsl, Sum(tabrkthdj.je) AS sumje, tabrkthdj.yp_id AS yp_id,tabypinfo.yp_name FROM tabrkthdj, tabrkthph, tabypinfo WHERE ((tabrkthph.rkth_ph=tabrkthdj.rkth_ph) AND (tabrkthph.rq='%s') AND (tabrkthdj.yp_id=tabypinfo.yp_id)) GROUP BY tabrkthdj.yp_id,tabypinfo.yp_name ",this->m_strRq);
	else
	sql.Format("SELECT Sum(tabrkthdj.sl) AS sumsl, Sum(tabrkthdj.je) AS sumje,tabrkthdj.yp_id AS yp_id,tabypinfo.yp_name FROM tabrkthdj, tabrkthph, tabypinfo WHERE tabrkthph.rkth_ph=tabrkthdj.rkth_ph AND tabrkthph.rq>='%s' AND tabrkthph.rq<'%s' AND tabrkthdj.yp_id=tabypinfo.yp_id GROUP BY tabrkthdj.yp_id,tabypinfo.yp_name	",this->m_strRqDown,this->m_strRqUp);
	return sql;
}

int CDlgRj::RefreshXSList(int i)
{
	CString sql;
	sql=this->PrepareXSSQL();
	afxDump<<"\n"<<sql;
	if(!m_runsql.CheckSQLResult(sql))
	{
		m_list.SetRedraw(true);	
		return --i;
	}

	m_list.InsertItem(i,"");
	if(m_bRj)
	m_list.SetItemText(i,0,"销售日结：");
	else
	m_list.SetItemText(i,0,"销售月结：");
	m_list.SetItemText(i,1,"销售商品编号");
	m_list.SetItemText(i,2,"销售商品名称");
	m_list.SetItemText(i,3,"销售商品数量");
	m_list.SetItemText(i,4,"销售商品金额");
	m_list.SetItemText(i,5,"销售商品利润");
	i++;
	_variant_t value;
	double je=0,profit=0;
	long pzs=0 ,sl=0;
	while(!m_runsql.m_recordset->adoEOF)
	{
		m_list.InsertItem(i,"");
		value=m_runsql.m_recordset->GetCollect("yp_id");
		if(value.vt!=VT_NULL)
		m_list.SetItemText(i,1,(char*)(_bstr_t)value);
		value=m_runsql.m_recordset->GetCollect("yp_name");
		if(value.vt!=VT_NULL)
		m_list.SetItemText(i,2,(char*)(_bstr_t)value);
		value=m_runsql.m_recordset->GetCollect("sumsl");

		if(value.vt!=VT_NULL)
		m_list.SetItemText(i,3,(char*)(_bstr_t)value);
		sl=sl+value.intVal;
		value=m_runsql.m_recordset->GetCollect("sumje");