?? material_misview.cpp

?? 一開發環境 OS: Windows 2000 Server + SP2 IDE: Visual Studio 6.0 + SP5 DataBase: SQL 2000 Server + SP2
?? CPP
?? 第 1 頁 / 共 3 頁
字號:
上一頁 1 23
		theApp.m_pADOSet->MoveNext();
	}
}

void CMaterial_MISView::CreateIn(_variant_t strQuery)
{
	// Get Client Rect
	CRect rect;
	GetClientRect(rect);
	rect.top += 30;

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

	// Set Color
	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);

	// Create Header
	m_ListCtrl.InsertColumn(0,_T("入庫編號"), LVCFMT_LEFT,100);
	m_ListCtrl.InsertColumn(1,_T("物資編號"), LVCFMT_LEFT, 100);
	m_ListCtrl.InsertColumn(2,_T("物資名稱"), LVCFMT_LEFT, 100);
    m_ListCtrl.InsertColumn(3,_T("規格型號"), LVCFMT_LEFT, 100);
	m_ListCtrl.InsertColumn(4,_T("類    別"), LVCFMT_LEFT, 100);
	m_ListCtrl.InsertColumn(5,_T("計量單位"), LVCFMT_LEFT, 100);
	m_ListCtrl.InsertColumn(6,_T("數    量"), LVCFMT_LEFT, 100);
    m_ListCtrl.InsertColumn(7,_T("單    價"), LVCFMT_LEFT, 100);
	m_ListCtrl.InsertColumn(8,_T("金    額"), LVCFMT_LEFT, 100);
	m_ListCtrl.InsertColumn(9,_T("入庫時間"), LVCFMT_LEFT, 100);
	m_ListCtrl.InsertColumn(10,_T("經辦人"), LVCFMT_LEFT, 100);
	m_ListCtrl.InsertColumn(11,_T("保管人"), LVCFMT_LEFT, 100);
	m_ListCtrl.InsertColumn(12,_T("倉    庫"), LVCFMT_LEFT, 100);
	m_ListCtrl.InsertColumn(13,_T("備    注"), LVCFMT_LEFT, 100);

	// Get all records
	_variant_t Holder;
    theApp.ADOExecute(theApp.m_pADOSet, strQuery);
    int iCount = theApp.m_pADOSet->GetRecordCount();
	if ( 0==iCount ) return;
	
    CString str;
	COleDateTime time;
	theApp.m_pADOSet->MoveFirst();
	for(int i=0; i<iCount; i++)
	{
		Holder = theApp.m_pADOSet->GetCollect("rkno");
	    str = Holder.vt==VT_NULL?"":(char*)(_bstr_t)Holder;
	    m_ListCtrl.InsertItem(i, str);
		
		Holder = theApp.m_pADOSet->GetCollect("rkid");
	    str = Holder.vt==VT_NULL?"":(char*)(_bstr_t)Holder;
	    m_ListCtrl.SetItemText(i, 1, str);
	    // Get customname
        Holder = theApp.m_pADOSet->GetCollect("rkname");
	    str = Holder.vt==VT_NULL?"":(char*)(_bstr_t)Holder;
	    m_ListCtrl.SetItemText(i, 2, str);
		// Get customID
        Holder = theApp.m_pADOSet->GetCollect("rkspec");
	   	str = Holder.vt==VT_NULL?"":(char*)(_bstr_t)Holder;
	    m_ListCtrl.SetItemText(i, 3, str);
		// Get roomno
        Holder = theApp.m_pADOSet->GetCollect("rkkind");
	    str = Holder.vt==VT_NULL?"":(char*)(_bstr_t)Holder;
	    m_ListCtrl.SetItemText(i, 4, str);
		// Get indate
		Holder = theApp.m_pADOSet->GetCollect("rkunit");
	    str = Holder.vt==VT_NULL?"":(char*)(_bstr_t)Holder;
	    m_ListCtrl.SetItemText(i, 5, str);

		Holder = theApp.m_pADOSet->GetCollect("rkaccount");
		str.Format("%.2f",  Holder.vt==VT_NULL?0:Holder.dblVal);
	    //str = Holder.vt==VT_NULL?"":(char*)(_bstr_t)Holder;
	    m_ListCtrl.SetItemText(i, 6, str);

		Holder = theApp.m_pADOSet->GetCollect("rkprice");
		str.Format("%.2f",  Holder.vt==VT_NULL?0:Holder.dblVal);
	    //str = Holder.vt==VT_NULL?"":(char*)(_bstr_t)Holder;
	    m_ListCtrl.SetItemText(i, 7, str);

		Holder = theApp.m_pADOSet->GetCollect("rkvalue");
		str.Format("%.2f",  Holder.vt==VT_NULL?0:Holder.dblVal);
	    //str = Holder.vt==VT_NULL?"":(char*)(_bstr_t)Holder;
	    m_ListCtrl.SetItemText(i, 8, str);

        Holder = theApp.m_pADOSet->GetCollect("rkdate");
	    time = Holder;
		str = time.Format("%Y-%m-%d");
		m_ListCtrl.SetItemText(i, 9, str);

		Holder = theApp.m_pADOSet->GetCollect("rkdeal_person");
	    str = Holder.vt==VT_NULL?"":(char*)(_bstr_t)Holder;
	    m_ListCtrl.SetItemText(i, 10, str);

		Holder = theApp.m_pADOSet->GetCollect("rksave_person");
	    str = Holder.vt==VT_NULL?"":(char*)(_bstr_t)Holder;
	    m_ListCtrl.SetItemText(i, 11, str);
		// Get discount
		Holder = theApp.m_pADOSet->GetCollect("rkbase");
	    str = Holder.vt==VT_NULL?"":(char*)(_bstr_t)Holder;
	    m_ListCtrl.SetItemText(i, 12, str);

		Holder = theApp.m_pADOSet->GetCollect("rkmemo");
	    str = Holder.vt==VT_NULL?"":(char*)(_bstr_t)Holder;
	    m_ListCtrl.SetItemText(i, 13, str);

		theApp.m_pADOSet->MoveNext();
	}
}

void CMaterial_MISView::RefreshIn(_variant_t strQuery)
{
	if (m_ListCtrl)	m_ListCtrl.DestroyWindow();
 	
  	CreateIn( strQuery );
 
 	m_sCurrentList = _T("物資入庫列表");
    m_StaticCtrl.SetWindowText(m_sCurrentList);
}

void CMaterial_MISView::RefreshIn()
{
	if (m_ListCtrl)	m_ListCtrl.DestroyWindow();
	
	_variant_t strQuery;
	strQuery="select * from msave";
    CreateIn(strQuery);
    
	m_sCurrentList = _T("物資入庫列表");
    m_StaticCtrl.SetWindowText(m_sCurrentList);
}

void CMaterial_MISView::RefreshOut(_variant_t strQuery)
{
	if (m_ListCtrl)	m_ListCtrl.DestroyWindow();
 	
  	CreateOut( strQuery );
 
 	m_sCurrentList = _T("物資出庫列表");
    m_StaticCtrl.SetWindowText(m_sCurrentList);
}

void CMaterial_MISView::CreateOut(_variant_t strQuery)
{
	CRect rect;
	GetClientRect(rect);
	rect.top += 30;

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

	// Set Color
	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);

	// Create Header
	m_ListCtrl.InsertColumn(0,_T("出庫編號"), LVCFMT_LEFT,100);
	m_ListCtrl.InsertColumn(1,_T("物資編號"), LVCFMT_LEFT, 100);
	m_ListCtrl.InsertColumn(2,_T("物資名稱"), LVCFMT_LEFT, 100);
    m_ListCtrl.InsertColumn(3,_T("規格型號"), LVCFMT_LEFT, 100);
	m_ListCtrl.InsertColumn(4,_T("類    別"), LVCFMT_LEFT, 100);
	m_ListCtrl.InsertColumn(5,_T("計量單位"), LVCFMT_LEFT, 100);
	m_ListCtrl.InsertColumn(6,_T("數    量"), LVCFMT_LEFT, 100);
    m_ListCtrl.InsertColumn(7,_T("單    價"), LVCFMT_LEFT, 100);
	m_ListCtrl.InsertColumn(8,_T("金    額"), LVCFMT_LEFT, 100);
	m_ListCtrl.InsertColumn(9,_T("出庫時間"), LVCFMT_LEFT, 100);
	m_ListCtrl.InsertColumn(10,_T("領用人"), LVCFMT_LEFT, 100);
	m_ListCtrl.InsertColumn(11,_T("經辦人"), LVCFMT_LEFT, 100);
	m_ListCtrl.InsertColumn(12,_T("倉    庫"), LVCFMT_LEFT, 100);
	m_ListCtrl.InsertColumn(13,_T("備    注"), LVCFMT_LEFT, 100);

	// Get all records
	_variant_t Holder;
    theApp.ADOExecute(theApp.m_pADOSet, strQuery);
    int iCount = theApp.m_pADOSet->GetRecordCount();
	if ( 0==iCount ) return;
	
    CString str;
	COleDateTime time;
	theApp.m_pADOSet->MoveFirst();
	for(int i=0; i<iCount; i++)
	{
		Holder = theApp.m_pADOSet->GetCollect("lyno");
	    str = Holder.vt==VT_NULL?"":(char*)(_bstr_t)Holder;
	    m_ListCtrl.InsertItem(i, str);
		
		Holder = theApp.m_pADOSet->GetCollect("lyid");
	    str = Holder.vt==VT_NULL?"":(char*)(_bstr_t)Holder;
	    m_ListCtrl.SetItemText(i, 1, str);
	    // Get customname
        Holder = theApp.m_pADOSet->GetCollect("lyname");
	    str = Holder.vt==VT_NULL?"":(char*)(_bstr_t)Holder;
	    m_ListCtrl.SetItemText(i, 2, str);
		// Get customID
        Holder = theApp.m_pADOSet->GetCollect("lyspec");
	   	str = Holder.vt==VT_NULL?"":(char*)(_bstr_t)Holder;
	    m_ListCtrl.SetItemText(i, 3, str);
		// Get roomno
        Holder = theApp.m_pADOSet->GetCollect("lykind");
	    str = Holder.vt==VT_NULL?"":(char*)(_bstr_t)Holder;
	    m_ListCtrl.SetItemText(i, 4, str);
		// Get indate
		Holder = theApp.m_pADOSet->GetCollect("lyunit");
	    str = Holder.vt==VT_NULL?"":(char*)(_bstr_t)Holder;
	    m_ListCtrl.SetItemText(i, 5, str);

		Holder = theApp.m_pADOSet->GetCollect("lyaccount");
		str.Format("%.2f",  Holder.vt==VT_NULL?0:Holder.dblVal);
	    //str = Holder.vt==VT_NULL?"":(char*)(_bstr_t)Holder;
	    m_ListCtrl.SetItemText(i, 6, str);

		Holder = theApp.m_pADOSet->GetCollect("lyprice");
		str.Format("%.2f",  Holder.vt==VT_NULL?0:Holder.dblVal);
	    //str = Holder.vt==VT_NULL?"":(char*)(_bstr_t)Holder;
	    m_ListCtrl.SetItemText(i, 7, str);

		Holder = theApp.m_pADOSet->GetCollect("lyvalue");
		str.Format("%.2f",  Holder.vt==VT_NULL?0:Holder.dblVal);
	    //str = Holder.vt==VT_NULL?"":(char*)(_bstr_t)Holder;
	    m_ListCtrl.SetItemText(i, 8, str);

        Holder = theApp.m_pADOSet->GetCollect("lydate");
	    time = Holder;
		str = time.Format("%Y-%m-%d");
		m_ListCtrl.SetItemText(i, 9, str);

		Holder = theApp.m_pADOSet->GetCollect("lyuse_person");
	    str = Holder.vt==VT_NULL?"":(char*)(_bstr_t)Holder;
	    m_ListCtrl.SetItemText(i, 10, str);

		Holder = theApp.m_pADOSet->GetCollect("lydeal_person");
	    str = Holder.vt==VT_NULL?"":(char*)(_bstr_t)Holder;
	    m_ListCtrl.SetItemText(i, 11, str);
		// Get discount
		Holder = theApp.m_pADOSet->GetCollect("lybase");
	    str = Holder.vt==VT_NULL?"":(char*)(_bstr_t)Holder;
	    m_ListCtrl.SetItemText(i, 12, str);

		Holder = theApp.m_pADOSet->GetCollect("lymemo");
	    str = Holder.vt==VT_NULL?"":(char*)(_bstr_t)Holder;
	    m_ListCtrl.SetItemText(i, 13, str);

		theApp.m_pADOSet->MoveNext();
	}
}

void CMaterial_MISView::RefreshOut()
{
	if (m_ListCtrl)	m_ListCtrl.DestroyWindow();
	
	_variant_t strQuery;
	strQuery="select * from muse";
    CreateIn(strQuery);
    
	m_sCurrentList = _T("物資出庫列表");
    m_StaticCtrl.SetWindowText(m_sCurrentList);
}

void CMaterial_MISView::CreateSurplusInfo(_variant_t strQuery)
{
	CRect rect;
	GetClientRect(rect);
	rect.top += 30;

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

	// Set Color
	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);

	// Create Header
	m_ListCtrl.InsertColumn(0,_T("物資編號"), LVCFMT_LEFT, 100);
	m_ListCtrl.InsertColumn(1,_T("物資名稱"), LVCFMT_LEFT, 100);
    m_ListCtrl.InsertColumn(2,_T("規格型號"), LVCFMT_LEFT, 100);
	m_ListCtrl.InsertColumn(3,_T("類    別"), LVCFMT_LEFT, 100);
	m_ListCtrl.InsertColumn(4,_T("計量單位"), LVCFMT_LEFT, 100);
	m_ListCtrl.InsertColumn(5,_T("數    量"), LVCFMT_LEFT, 100);
	m_ListCtrl.InsertColumn(6,_T("金    額"), LVCFMT_LEFT, 100);
	m_ListCtrl.InsertColumn(7,_T("倉    庫"), LVCFMT_LEFT, 100);
	m_ListCtrl.InsertColumn(8,_T("備    注"), LVCFMT_LEFT, 100);


	_variant_t Holder;

    theApp.ADOExecute(theApp.m_pADOSet, strQuery);
    int iCount = theApp.m_pADOSet->GetRecordCount();
	if ( 0==iCount ) return;
	
    CString str;
	theApp.m_pADOSet->MoveFirst();
	for(int i=0; i<iCount; i++)
	{
		Holder = theApp.m_pADOSet->GetCollect("yeid");
	    str = Holder.vt==VT_NULL?"":(char*)(_bstr_t)Holder;
	    m_ListCtrl.InsertItem(i, str);

        Holder = theApp.m_pADOSet->GetCollect("yename");
	    str = Holder.vt==VT_NULL?"":(char*)(_bstr_t)Holder;
	    m_ListCtrl.SetItemText(i, 1, str);

        Holder = theApp.m_pADOSet->GetCollect("yespec");
	   	str = Holder.vt==VT_NULL?"":(char*)(_bstr_t)Holder;
	    m_ListCtrl.SetItemText(i, 2, str);

        Holder = theApp.m_pADOSet->GetCollect("yekind");
	    str = Holder.vt==VT_NULL?"":(char*)(_bstr_t)Holder;
	    m_ListCtrl.SetItemText(i, 3, str);

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

		Holder = theApp.m_pADOSet->GetCollect("yeaccount");
		str.Format("%.2f",  Holder.vt==VT_NULL?0:Holder.dblVal);
	    m_ListCtrl.SetItemText(i, 5, str);

		Holder = theApp.m_pADOSet->GetCollect("yevalue");
		str.Format("%.2f",  Holder.vt==VT_NULL?0:Holder.dblVal);
	    m_ListCtrl.SetItemText(i, 6, str);

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

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

		theApp.m_pADOSet->MoveNext();
	}
}

void CMaterial_MISView::RefreshSurplus(_variant_t strQuery)
{
	if (m_ListCtrl)	m_ListCtrl.DestroyWindow();
 	
  	CreateSurplusInfo( strQuery );
 
 	m_sCurrentList = _T("物資余額列表");
    m_StaticCtrl.SetWindowText(m_sCurrentList);
}
上一頁 1 23
?? 文件大小 106 K
?? 上傳用戶 ranzige
?? 所屬分類 SQL Server
??? 相關標簽

#Server #2000 #SP2 #DataBase
?? 快捷鍵說明

復制代碼 Ctrl + C
搜索代碼 Ctrl + F
全屏模式 F11
切換主題 Ctrl + Shift + D
顯示快捷鍵 ?
增大字號 Ctrl + =
減小字號 Ctrl + -
亚洲欧美第一页_禁久久精品乱码_粉嫩av一区二区三区免费野_久草精品视频

?? material_misview.cpp

?? 快捷鍵說明
