report2dlg.cpp

本网站是一个库存管理系统

// Report2Dlg.cpp : implementation file

#include "stdafx.h"
#include "Stock.h"
#include "Report2Dlg.h"
#include "Excel9.h" 
#include "COMDEF.H"
#include "_recordset.h"
#include "columns.h"
#include "column.h"
#include "SysLog.h"
#include "Users.h"
#include "DialogResize.h"

extern CUsers curUser;

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

CReport2Dlg::CReport2Dlg(CWnd* pParent /*=NULL*/)
	: CDialogResize(CReport2Dlg::IDD, pParent)
{
	//{{AFX_DATA_INIT(CReport2Dlg)
		// NOTE: the ClassWizard will add member initialization here
	//}}AFX_DATA_INIT
}


void CReport2Dlg::DoDataExchange(CDataExchange* pDX)
{
	CDialogResize::DoDataExchange(pDX);
	//{{AFX_DATA_MAP(CReport2Dlg)
	DDX_Control(pDX, IDC_ADODC1, m_adodc1);
	DDX_Control(pDX, IDC_ADODC2, m_adodc2);
	DDX_Control(pDX, IDC_ADODC3, m_adodc3);
	DDX_Control(pDX, IDC_ADODC5, m_adodc5);
	DDX_Control(pDX, IDC_DATACOMBO1, m_datacombo1);
	DDX_Control(pDX, IDC_DATACOMBO3, m_datacombo3);
	DDX_Control(pDX, IDC_DATACOMBO2, m_datacombo2);
	DDX_Control(pDX, IDC_DATAGRID1, m_datagrid);
	//}}AFX_DATA_MAP
}


BEGIN_MESSAGE_MAP(CReport2Dlg, CDialogResize)
	//{{AFX_MSG_MAP(CReport2Dlg)
	ON_BN_CLICKED(IDC_TOEXCEL_BUTTON, OnToexcelButton)
	ON_BN_CLICKED(IDC_PRINT_BUTTON, OnPrintButton)
	//}}AFX_MSG_MAP
END_MESSAGE_MAP()

BEGIN_DLGRESIZE_MAP(CReport2Dlg)
    DLGRESIZE_CONTROL(IDC_DATACOMBO1, DLSZ_REPAINT)
	DLGRESIZE_CONTROL(IDC_DATACOMBO2, DLSZ_REPAINT)
	DLGRESIZE_CONTROL(IDC_DATACOMBO3, DLSZ_REPAINT)
	DLGRESIZE_CONTROL(IDC_DATAGRID1, DLSZ_SIZE_X | DLSZ_SIZE_Y | DLSZ_REPAINT)
	DLGRESIZE_CONTROL(IDC_TOEXCEL_BUTTON, DLSZ_MOVE_Y)
	DLGRESIZE_CONTROL(IDC_PRINT_BUTTON, DLSZ_MOVE_Y)
	DLGRESIZE_CONTROL(IDCANCEL, DLSZ_MOVE_X | DLSZ_MOVE_Y)
END_DLGRESIZE_MAP()

// CReport2Dlg message handlers

void CReport2Dlg::Refresh_Data()
{
	CString cPid;
	cPid = m_datacombo3.GetBoundText();
	if (cPid == "")
		cPid = "0";
	// 生成SELECT语句
	CString cSource;
	cSource = "SELECT r.SiType As 入出库类型, p.Pname As 产品名称, r.Pprice As 产品单价,";
    cSource += " r.Pnum As 产品数量, r.Amount As 总金额, c.Cname As 客户单位, s.Sname As 存放仓库,";
    cSource += " r.EmpName As 经办人, r.OptDate As 入出库日期"; 
    cSource += " FROM Report2 r, Product p, Client c, Storehouse s";
    cSource += " WHERE r.Pid=p.Pid AND r.Cid=c.Cid AND";
    cSource += " r.Sid=s.Sid AND p.Pid=" + cPid;
    // 设置记录源
	m_adodc3.SetRecordSource(cSource);
	m_adodc3.Refresh();
}



BOOL CReport2Dlg::OnInitDialog() 
{
	CDialogResize::OnInitDialog();

	InitResizing();
	
	// TODO: Add extra initialization here
	Refresh_Data();
	
	return TRUE;  // return TRUE unless you set the focus to a control
	              // EXCEPTION: OCX Property Pages should return FALSE
}

BEGIN_EVENTSINK_MAP(CReport2Dlg, CDialogResize)
    //{{AFX_EVENTSINK_MAP(CReport2Dlg)
	ON_EVENT(CReport2Dlg, IDC_DATACOMBO1, -600 /* Click */, OnClickDatacombo1, VTS_I2)
	ON_EVENT(CReport2Dlg, IDC_DATACOMBO2, -600 /* Click */, OnClickDatacombo2, VTS_I2)
	ON_EVENT(CReport2Dlg, IDC_DATACOMBO3, -600 /* Click */, OnClickDatacombo3, VTS_I2)
	//}}AFX_EVENTSINK_MAP
END_EVENTSINK_MAP()

void CReport2Dlg::OnClickDatacombo1(short Area) 
{
	// 读取一级产品类别编号
	CString cUpperId;
	cUpperId = m_datacombo1.GetBoundText();
	if (cUpperId == "")
		cUpperId = "0";
	// 设置查询二级产品类型的SELECT语句
	CString cSource;
	cSource = "SELECT * FROM ProType WHERE UpperId=" + cUpperId;

	m_datacombo2.SetText("");
	// 设置m_adodc3，从而刷新二级产品类别的列表
	m_adodc2.SetRecordSource(cSource);
	m_adodc2.Refresh();		
	// 设置产品列表框，因为没有选中二级产品类别，所以要清空产品列表框
	cSource = "SELECT * FROM Product WHERE TypeId=0";

	m_datacombo3.SetText("");
	// 设置m_adodc5，从而刷新产品的列表
	m_adodc5.SetRecordSource(cSource);
	m_adodc5.Refresh();
	// 刷新库存产品表格
	Refresh_Data();	
}

void CReport2Dlg::OnClickDatacombo2(short Area) 
{
	// 读取二级产品类别编号
	CString cTypeId;
	cTypeId = m_datacombo2.GetBoundText();
	if (cTypeId == "")
		cTypeId = "0";
	// 设置查询二级产品类型的SELECT语句
	CString cSource;
	cSource = "SELECT * FROM Product WHERE TypeId=" + cTypeId;

	m_datacombo3.SetText("");
	// 设置m_adodc5，从而刷新产品的列表
	m_adodc5.SetRecordSource(cSource);
	m_adodc5.Refresh();		
	// 刷新库存产品表格
	Refresh_Data();		
}

void CReport2Dlg::OnClickDatacombo3(short Area) 
{
	Refresh_Data();	
}

void CReport2Dlg::OnToexcelButton() 
{
	//定义操作Excel必要的对象
	COleVariant VOptional((long)DISP_E_PARAMNOTFOUND, VT_ERROR);
    _Application objApp;
	Workbooks objBooks;
	_Workbook objBook;
	Worksheets objSheets;
	_Worksheet objSheet;
	Range objRange;	
	//创建Excel对象
	objApp.CreateDispatch("Excel.Application");
	objBooks=objApp.GetWorkbooks();	//返回工作簿对象
	// 打开指定Excel文件
	objBook.AttachDispatch(objBooks.Add(_variant_t("C:\\Report2.xls")));
	objSheets=objBook.GetSheets();
	// 定义第一个Sheet为对象
	objSheet=objSheets.GetItem((_variant_t)short(1));
	objRange.AttachDispatch(objSheet.GetCells(),true); 
	// 取得结果集中记录个数，列数
	int ss,nn;
	double dTotal;
	dTotal = 0;
	CString cc;
	// 得到结果集中记录个数
	nn = m_adodc3.GetRecordset().GetRecordCount();
	// 定义列对象并取得列的个数
	CColumns cls;
	cls = m_datagrid.GetColumns();
	ss = cls.GetCount();
	// 双层循环取得所有数据放入Excel表中
	for(int i=0;i<nn;i++)
	{
		// 设定数据所在行
		m_datagrid.SetRow(i);
		for(int j=0;j<ss;j++)
		{
			// 设定数据所在列
			m_datagrid.SetCol(j);
			// 取得指定列的值
			cc = m_datagrid.GetText();
			// 计算原值
			if(j==9)
				dTotal = dTotal + atoi(cc);
			// 把列值放入Excel指定单元格
			objRange.SetItem(_variant_t((long)(i+2)),_variant_t((long)(j+1)),_variant_t(cc)); 
		}
	}
	// 设置Excel为可见
	objApp.SetVisible(true);
	// 释放句柄
	objRange.ReleaseDispatch();
	objSheet.ReleaseDispatch();
	objSheets.ReleaseDispatch();
	objBook.ReleaseDispatch();
	objBooks.ReleaseDispatch();
	objApp.ReleaseDispatch();	
	
	// 保存日志
	CSysLog log;
	log.SetLogType(12);
	log.SetTitle("导出库存产品流水线统计报表到Excel");
	log.SetBody("用户名称：" + curUser.GetUserName());
	log.sql_insert();
}

void CReport2Dlg::OnPrintButton() 
{
	//定义操作Excel必要的对象
	COleVariant covOptional((long)DISP_E_PARAMNOTFOUND, VT_ERROR);
	COleVariant covTrue((short)TRUE), covFalse((short)FALSE);
    _Application objApp;
	Workbooks objBooks;
	_Workbook objBook;
	Worksheets objSheets;
	_Worksheet objSheet;
	Range objRange;	
	//创建Excel对象
	objApp.CreateDispatch("Excel.Application");
	objBooks=objApp.GetWorkbooks();	//返回工作簿对象
	// 打开指定Excel文件
	objBook.AttachDispatch(objBooks.Add(_variant_t("C:\\Report2.xls")));
	objSheets=objBook.GetSheets();
	// 定义第一个Sheet为对象
	objSheet=objSheets.GetItem((_variant_t)short(1));
	objRange.AttachDispatch(objSheet.GetCells(),true); 
	// 取得结果集中记录个数，列数
	int ss,nn;
	double dTotal;
	dTotal = 0;
	CString cc;
	// 得到结果集中记录个数
	nn = m_adodc3.GetRecordset().GetRecordCount();
	// 定义列对象并取得列的个数
	CColumns cls;
	cls = m_datagrid.GetColumns();
	ss = cls.GetCount();
	// 双层循环取得所有数据放入Excel表中
	for(int i=0;i<nn;i++)
	{
		// 设定数据所在行
		m_datagrid.SetRow(i);
		for(int j=0;j<ss;j++)
		{
			// 设定数据所在列
			m_datagrid.SetCol(j);
			// 取得指定列的值
			cc = m_datagrid.GetText();
			// 计算原值
			if(j==9)
				dTotal = dTotal + atoi(cc);
			// 把列值放入Excel指定单元格
			objRange.SetItem(_variant_t((long)(i+2)),_variant_t((long)(j+1)),_variant_t(cc)); 
		}
	}
	// 设置Excel为不可见
	objApp.SetVisible(false);
	objBook.PrintOut(covOptional,covOptional,COleVariant(long(1)), covFalse,covOptional,covOptional,covOptional,covOptional);
	// 释放句柄
	objRange.ReleaseDispatch();
	objSheet.ReleaseDispatch();
	objSheets.ReleaseDispatch();
	objBook.ReleaseDispatch();
	objBooks.ReleaseDispatch();
	objApp.ReleaseDispatch();		
	
	// 保存日志
	CSysLog log;
	log.SetLogType(12);
	log.SetTitle("打印库存产品流水线统计报表");
	log.SetBody("用户名称：" + curUser.GetUserName());
	log.sql_insert();
}

void CReport2Dlg::OnSize(UINT nType, int cx, int cy)
{
	CDialogResize::OnSize(nType, cx, cy);
}