⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 material_misview.cpp

📁 支持ACCESS数据库的数据的查询、打印、统计等
💻 CPP
📖 第 1 页 / 共 5 页
字号:
// Material_MISView.cpp : implementation of the CMaterial_MISView class
//

#include "stdafx.h"
#include "Material_MIS.h"
#include "stdio.h"
#include "string.h"

#include "Material_MISDoc.h"
#include "Material_MISView.h"

#include "date.h"

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

/////////////////////////////////////////////////////////////////////////////
// CMaterial_MISView

IMPLEMENT_DYNCREATE(CMaterial_MISView, CView)

BEGIN_MESSAGE_MAP(CMaterial_MISView, CView)
	//{{AFX_MSG_MAP(CMaterial_MISView)
	ON_WM_CONTEXTMENU()
	ON_COMMAND(ID_MENU_LISTBASICINFO, OnMenuListbasicinfo)
	ON_COMMAND(ID_MENU_LISTBASICINFO1, OnMenuListbasicinfo1)
	ON_COMMAND(ID_MENUITEM_PI, OnMenuitemPi)
	ON_COMMAND(ID_MENUITEM_pipo, OnMENUITEMpipo)
	ON_COMMAND(ID_MENUITEM_PO, OnMenuitemPo)
	ON_COMMAND(ID_MENUITEM_POPBS, OnMenuitemPopbs)
	ON_COMMAND(ID_MENUITEM_PBS, OnMenuitemPbs)
	ON_COMMAND(ID_MENU_PBS, OnMenuPbs)
	ON_COMMAND(ID_MENU_pio, OnMENUpio)
	ON_COMMAND(ID_MENU_popbs, OnMENUpopbs)
	ON_COMMAND(ID_S, OnS)
	//}}AFX_MSG_MAP
END_MESSAGE_MAP()

/////////////////////////////////////////////////////////////////////////////
// CMaterial_MISView construction/destruction

CMaterial_MISView::CMaterial_MISView()
{
	// TODO: add construction code here
	del_confirm = FALSE;
	Drcx();
	flag=0;

}

CMaterial_MISView::~CMaterial_MISView()
{
}



/////////////////////////////////////////////////////////////////////////////
// CMaterial_MISView drawing

void CMaterial_MISView::OnDraw(CDC* pDC)
{
	CMaterial_MISDoc* pDoc = GetDocument();
	ASSERT_VALID(pDoc);

	// TODO: add draw code for native data here
	// ... Add by jackie ...

	CRect rect_client, rect;
	GetClientRect(&rect_client);

	rect.left = rect.top =0;
    rect.bottom = 30;
	rect.right = rect_client.Width();

	m_StaticCtrl.MoveWindow(&rect);
	m_StaticCtrl.SetFont(&font);
}

/////////////////////////////////////////////////////////////////////////////
// CMaterial_MISView diagnostics

#ifdef _DEBUG
void CMaterial_MISView::AssertValid() const
{
	CView::AssertValid();
}

void CMaterial_MISView::Dump(CDumpContext& dc) const
{
	CView::Dump(dc);
}

CMaterial_MISDoc* CMaterial_MISView::GetDocument() // non-debug version is inline
{
	ASSERT(m_pDocument->IsKindOf(RUNTIME_CLASS(CMaterial_MISDoc)));
	return (CMaterial_MISDoc*)m_pDocument;
}
#endif //_DEBUG

/////////////////////////////////////////////////////////////////////////////
// CMaterial_MISView message handlers





//DEL void CMaterial_MISView::OnMenuDelbasicinfo() 
//DEL {
//DEL 	// TODO: Add your command handler code here
//DEL 		if ( m_ListCtrl && m_sCurrentList!="物资列表" )	
//DEL 	{
//DEL 		m_ListCtrl.DestroyWindow();
//DEL 	    CreateMaterialInfo();
//DEL 	    return;
//DEL 	}
//DEL     if ( !m_ListCtrl )
//DEL 	{
//DEL 		CreateMaterialInfo();
//DEL 	    return;
//DEL 	}
//DEL 	
//DEL 	//删除记录
//DEL 	POSITION pos = m_ListCtrl.GetFirstSelectedItemPosition();
//DEL     if ( pos == NULL ) 
//DEL 	{
//DEL 		AfxMessageBox(_T("没有选中记录!"), MB_ICONEXCLAMATION);
//DEL 		return;
//DEL 	}
//DEL     else
//DEL 	{
//DEL 		// ... Add by jackie ...
//DEL 		CDelConfirm m_delconf;
//DEL 		m_delconf.DoModal();
//DEL 		if(!del_confirm)
//DEL 			return;
//DEL 
//DEL         int iItem;       
//DEL 		CString sID;
//DEL 		_variant_t Holder, strQuery;
//DEL 		while (pos)
//DEL 		{
//DEL             iItem = m_ListCtrl.GetNextSelectedItem(pos);
//DEL             sID = m_ListCtrl.GetItemText(iItem, 0);
//DEL 		    strQuery = "delete from tblMaterial where fldWzid='"+sID+"'";
//DEL 	        theApp.ADOExecute(theApp.m_pADOSet, strQuery);
//DEL 		}
//DEL 	}
//DEL 	//刷新列表
//DEL 	RefreshMaterial();
//DEL }

//DEL void CMaterial_MISView::OnMenuDelininfo() 
//DEL {
//DEL 	// TODO: Add your command handler code here
//DEL 	_variant_t Holder, strQuery;
//DEL 		if ( m_ListCtrl && m_sCurrentList!="物资入库列表" )	
//DEL 	{
//DEL 		m_ListCtrl.DestroyWindow();
//DEL 		strQuery = "select * from tblMsave";
//DEL 	    CreateIn(strQuery);
//DEL 
//DEL 		m_sCurrentList = _T("物资入库列表");
//DEL         m_StaticCtrl.SetWindowText(m_sCurrentList);
//DEL 	    return;
//DEL 	}
//DEL     if ( !m_ListCtrl )
//DEL 	{
//DEL 		strQuery = "select * from tblMsave";
//DEL 		CreateIn(strQuery);
//DEL 
//DEL 		m_sCurrentList = _T("物资入库列表");
//DEL         m_StaticCtrl.SetWindowText(m_sCurrentList);
//DEL 	    return;
//DEL 	}
//DEL 	
//DEL 	//删除记录
//DEL 	POSITION pos = m_ListCtrl.GetFirstSelectedItemPosition();
//DEL     if ( pos == NULL ) 
//DEL 	{
//DEL 		AfxMessageBox(_T("没有选中记录!"), MB_ICONEXCLAMATION);
//DEL 		return;
//DEL 	}
//DEL     else
//DEL 	{
//DEL 		// ... Add by jackie ...
//DEL 		CDelConfirm m_delconf;
//DEL 		m_delconf.DoModal();
//DEL 		if(!del_confirm)
//DEL 			return;
//DEL 
//DEL         int iItem;       
//DEL 		CString sNO;
//DEL 		CString sID;
//DEL 		CString sAccount;
//DEL 		CString sValue;
//DEL 		CString sBase;
//DEL 
//DEL 		
//DEL 		while (pos)
//DEL 		{
//DEL             iItem = m_ListCtrl.GetNextSelectedItem(pos);
//DEL             sNO = m_ListCtrl.GetItemText(iItem, 0);
//DEL 			sID = m_ListCtrl.GetItemText(iItem, 1);
//DEL 			sAccount = m_ListCtrl.GetItemText(iItem, 6);
//DEL 			//double sfAccount=atof(sAccount);
//DEL 			sValue = m_ListCtrl.GetItemText(iItem,8);
//DEL 			//double sfValue=atof(sValue);
//DEL 			sBase = m_ListCtrl.GetItemText(iItem,12);
//DEL 
//DEL 		    strQuery = "delete from tblMsave where fldRkno='"+sNO+"'";
//DEL 	        theApp.ADOExecute(theApp.m_pADOSet, strQuery);
//DEL 			
//DEL 			strQuery="update tblMsurplus set fldYeaccount=fldYeaccount-"+sAccount+",fldYevalue=fldYevalue-"\
//DEL 				+sValue+" where fldYeid='"+sID+"'and fldYebase='"+sBase+"'";
//DEL 			theApp.ADOExecute(theApp.m_pADOSet,strQuery); 
//DEL 
//DEL 			strQuery="delete from tblMsurplus where fldYeaccount=0";
//DEL 			theApp.ADOExecute(theApp.m_pADOSet,strQuery);
//DEL 	
//DEL 		}
//DEL 	}
//DEL 	//刷新列表
//DEL 	RefreshIn();
//DEL }

//DEL void CMaterial_MISView::OnMenuDeloutinfo() 
//DEL {
//DEL 	// TODO: Add your command handler code here
//DEL 	_variant_t Holder, strQuery;
//DEL 		if ( m_ListCtrl && m_sCurrentList!="物资出库列表" )	
//DEL 	{
//DEL 		m_ListCtrl.DestroyWindow();
//DEL 		strQuery = "select * from tblMuse";
//DEL 	    CreateOut(strQuery);
//DEL 
//DEL 		m_sCurrentList = _T("物资出库列表");
//DEL         m_StaticCtrl.SetWindowText(m_sCurrentList);
//DEL 	    return;
//DEL 	}
//DEL     if ( !m_ListCtrl )
//DEL 	{
//DEL 		strQuery = "select * from tblMuse";
//DEL 		CreateOut(strQuery);
//DEL 
//DEL 		m_sCurrentList = _T("物资出库列表");
//DEL         m_StaticCtrl.SetWindowText(m_sCurrentList);
//DEL 	    return;
//DEL 	}
//DEL 	
//DEL 	//删除记录
//DEL 	POSITION pos = m_ListCtrl.GetFirstSelectedItemPosition();
//DEL     if ( pos == NULL ) 
//DEL 	{
//DEL 		AfxMessageBox(_T("没有选中记录!"), MB_ICONEXCLAMATION);
//DEL 		return;
//DEL 	}
//DEL     else
//DEL 	{
//DEL 		// ... Add by jackie ...
//DEL 		CDelConfirm m_delconf;
//DEL 		m_delconf.DoModal();
//DEL 		if(!del_confirm)
//DEL 			return;
//DEL 
//DEL         int iItem;       
//DEL 		CString sNO;
//DEL 		CString sID;
//DEL 		CString sAccount;
//DEL 		CString sValue;
//DEL 		CString sBase;
//DEL 
//DEL 		
//DEL 		while (pos)
//DEL 		{
//DEL             iItem = m_ListCtrl.GetNextSelectedItem(pos);
//DEL             sNO = m_ListCtrl.GetItemText(iItem, 0);
//DEL 			sID = m_ListCtrl.GetItemText(iItem, 1);
//DEL 			sAccount = m_ListCtrl.GetItemText(iItem, 6);
//DEL 			sValue = m_ListCtrl.GetItemText(iItem,8);
//DEL 			sBase = m_ListCtrl.GetItemText(iItem,12);
//DEL 		    strQuery = "delete from tblMuse where fldLyno='"+sNO+"'";
//DEL 	        theApp.ADOExecute(theApp.m_pADOSet, strQuery);
//DEL 			
//DEL 			strQuery="update tblMsurplus set fldYeaccount=fldYeaccount+"+sAccount+",fldYevalue=fldYevalue+"\
//DEL 				+sValue+" where fldYeid='"+sID+"'and fldYebase='"+sBase+"'";
//DEL 			theApp.ADOExecute(theApp.m_pADOSet,strQuery); 
//DEL 
//DEL 			strQuery="delete from tblMsurplus where fldYeaccount=0";
//DEL 			theApp.ADOExecute(theApp.m_pADOSet,strQuery);
//DEL 	
//DEL 		}
//DEL 	}
//DEL 	//刷新列表
//DEL 	RefreshOut();
//DEL }



//DEL void CMaterial_MISView::OnMenuSearchininfo() 
//DEL {
//DEL 	// TODO: Add your command handler code here
//DEL 	
//DEL 	CSearch dlg;
//DEL 	dlg.m_sType=true;
//DEL 	_variant_t strQuery;
//DEL 	strQuery="select * from tblMsave";
//DEL 	theApp.ADOExecute(theApp.m_pADOSet,strQuery);
//DEL 	int icount=theApp.m_pADOSet->GetRecordCount();
//DEL 	if(0==icount)
//DEL 	{
//DEL 		AfxMessageBox(_T("目前没有入库信息!"), MB_ICONEXCLAMATION);
//DEL 		return;
//DEL 	}
//DEL 	dlg.DoModal();
//DEL }

//DEL void CMaterial_MISView::OnMenuSearchoutinfo() 
//DEL {
//DEL 	// TODO: Add your command handler code here
//DEL 	CSearch dlg;
//DEL 	dlg.m_sType=false;
//DEL 	_variant_t strQuery;
//DEL 	strQuery="select * from tblMuse";
//DEL 	theApp.ADOExecute(theApp.m_pADOSet,strQuery);
//DEL 	int icount=theApp.m_pADOSet->GetRecordCount();
//DEL 	if(0==icount)
//DEL 	{
//DEL 		AfxMessageBox(_T("目前没有出库信息!"), MB_ICONEXCLAMATION);
//DEL 		return;
//DEL 	}
//DEL 	dlg.DoModal();
//DEL }

//DEL void CMaterial_MISView::OnMenuSearchsurplus() 
//DEL {
//DEL 	// TODO: Add your command handler code here
//DEL 	_variant_t strQuery;
//DEL 	
//DEL 	m_ListCtrl.DestroyWindow();
//DEL 	strQuery = "select * from tblMsurplus";
//DEL 	CreateSurplusInfo(strQuery);
//DEL 	m_sCurrentList = _T("物资余额列表");
//DEL     m_StaticCtrl.SetWindowText(m_sCurrentList);
//DEL 
//DEL 	CSearchplusInfo dlg;
//DEL 	dlg.DoModal();
//DEL 	return;
//DEL }


//DEL void CMaterial_MISView::RefreshMaterial()
//DEL {
//DEL 	if (m_ListCtrl)	m_ListCtrl.DestroyWindow();
//DEL 	
//DEL     CreateMaterialInfo();
//DEL     
//DEL 	m_sCurrentList = _T("物资列表");
//DEL     m_StaticCtrl.SetWindowText(m_sCurrentList);
//DEL }
//paint out table x11
void CMaterial_MISView::CreateMaterialInfo()
{


	// 获得所有记录
	_variant_t Holder, strQuery;
    CString sty,stm,std,sth,stmm,sts,ety,etm,etd,eth,etmm,ets,t3;
	sty.Format("%2d",m_t1.GetYear());
	stm.Format("%d",m_t1.GetMonth());
	std.Format("%d",m_t1.GetDay());

	sth.Format("%d",m_t1.GetHour());
	stmm.Format("%d",m_t1.GetMinute());
	sts.Format("%d",m_t1.GetSecond());
	
	ety.Format("%d",m_t2.GetYear());
	etm.Format("%d",m_t2.GetMonth());
	etd.Format("%d",m_t2.GetDay());
	eth.Format("%d",m_t2.GetHour());
	etmm.Format("%d",m_t2.GetMinute());
	ets.Format("%d",m_t2.GetSecond());
 
    strQuery = "select * from x11 where Pipo='PO' and 记录时间> ctot('"+stm+"'+'/'+'"+std+"'+'/'+'"+sty+"'+' "+sth+"'+':'+'"+stmm+"'+':'+'"+sts+"')	and 记录时间 <= ctot('"+etm+"'+'/'+'"+etd+"'+'/'+'"+ety+"'+' "+eth+"'+':'+'"+etmm+"'+':'+'"+ets+"') order by 记录时间 desc";
	theApp.ADOExecute(theApp.m_pADOSet, strQuery);

    int iCount = theApp.m_pADOSet->GetRecordCount();
	CString zs;
	zs.Format("Paint Out Detail 结果: %d条 时间段为 %s-%s-%s %s:%s:%s --- %s-%s-%s %s:%s:%s",iCount,
		sty,stm,std,sth,stmm,sts,ety,etm,etd,eth,etmm,ets);
	m_sCurrentList = _T(zs);

    m_StaticCtrl.SetWindowText(m_sCurrentList);
	
	CRect rect;
	GetClientRect(rect);
	rect.top += 30;

	m_ListCtrl.Create(WS_CHILD|WS_VISIBLE|WS_BORDER|LVS_REPORT, rect, this, 1);

	m_ListCtrl.SetBkColor(RGB(177, 151, 240));
	m_ListCtrl.SetTextColor(RGB(0,0,0));
	m_ListCtrl.SetTextBkColor(RGB(177, 151, 240));
	
	// Set EX-Style
	m_ListCtrl.SetExtendedStyle(LVS_EX_FULLROWSELECT|LVS_EX_GRIDLINES|LVS_EX_HEADERDRAGDROP);

	// 创建标题
	m_ListCtrl.InsertColumn(0,_T("No."), LVCFMT_LEFT, 50);
	m_ListCtrl.InsertColumn(1,_T("SEQ"), LVCFMT_LEFT, 50);
	m_ListCtrl.InsertColumn(2,_T("车型车身号"), LVCFMT_LEFT, 100);
    m_ListCtrl.InsertColumn(3,_T("Pipo"), LVCFMT_LEFT, 40);
	m_ListCtrl.InsertColumn(4,_T("W_order"), LVCFMT_LEFT, 120);
	m_ListCtrl.InsertColumn(5,_T("Mi"), LVCFMT_LEFT, 120);
	m_ListCtrl.InsertColumn(6,_T("内色"), LVCFMT_LEFT, 80);
	m_ListCtrl.InsertColumn(7,_T("外色"), LVCFMT_LEFT, 80);
	m_ListCtrl.InsertColumn(8,_T("时间"), LVCFMT_LEFT, 120);
    tt=iCount ;
	if ( 0==iCount ) return;
	//	return;	

    CString str;
	theApp.m_pADOSet->MoveFirst();
	for(int i=0; i<iCount; i++)
	{
		str.Format("%d",i+1);
		m_ListCtrl.InsertItem(i, str);
		
		Holder = theApp.m_pADOSet->GetCollect("Seq");
	    str = Holder.vt==VT_NULL?"":(char*)(_bstr_t)Holder;
	   // m_ListCtrl.InsertItem(i,1, str);
		m_ListCtrl.SetItemText(i,1, str);
		seq[i]=str;
	    
        Holder = theApp.m_pADOSet->GetCollect("车型车身号");
	    str = Holder.vt==VT_NULL?"":(char*)(_bstr_t)Holder;
	    m_ListCtrl.SetItemText(i, 2, str);
		chex[i]=str;
		
        Holder = theApp.m_pADOSet->GetCollect("Pipo");
		str = Holder.vt==VT_NULL?"":(char*)(_bstr_t)Holder;
	    m_ListCtrl.SetItemText(i, 3, str);
        pipo[i]=str;

		
        Holder = theApp.m_pADOSet->GetCollect("W_order");
	    str = Holder.vt==VT_NULL?"":(char*)(_bstr_t)Holder;
	    m_ListCtrl.SetItemText(i, 4, str);
		wo[i]=str;

        Holder = theApp.m_pADOSet->GetCollect("Mi");
	    str = Holder.vt==VT_NULL?"":(char*)(_bstr_t)Holder;
	    m_ListCtrl.SetItemText(i, 5, str);		
		mi[i]=str;

        Holder = theApp.m_pADOSet->GetCollect("内色");
	    str = Holder.vt==VT_NULL?"":(char*)(_bstr_t)Holder;
	    m_ListCtrl.SetItemText(i, 6, str);		
		neis[i]=str;

        Holder = theApp.m_pADOSet->GetCollect("外色");
	    str = Holder.vt==VT_NULL?"":(char*)(_bstr_t)Holder;
	    m_ListCtrl.SetItemText(i, 7, str);		
		wais[i]=str;

        Holder = theApp.m_pADOSet->GetCollect("记录时间");
	    str = Holder.vt==VT_NULL?"":(char*)(_bstr_t)Holder;
	    m_ListCtrl.SetItemText(i, 8, str);	

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -