?? listxsth.cpp
字號:
// ListXSTH.cpp: implementation of the CListXSTH class.
//
//////////////////////////////////////////////////////////////////////
#include "stdafx.h"
#include "a1.h"
#include "ListXSTH.h"
#ifdef _DEBUG
#undef THIS_FILE
static char THIS_FILE[]=__FILE__;
#define new DEBUG_NEW
#endif
//////////////////////////////////////////////////////////////////////
// Construction/Destruction
//////////////////////////////////////////////////////////////////////
CListXSTH::CListXSTH(bool isxsth,CString djph)
{
this->m_bXsth=isxsth;
this->m_strDjPh=djph;
this->m_pstrlistThYp=new CStringList[6];
for(int i=0;i<100;i++)
{
m_iTheItemState[i]=NONE;
this->m_iYpKcSelected[i]=-1;
}
this->InitValuesFromDB();
}
CListXSTH::~CListXSTH()
{
delete [] this->m_pstrlistThYp;
}
bool CListXSTH::InitValuesFromDB()
{
LRunSql m_runsql;
CString sql,yp_id;
long sl;long l_temp;
_variant_t value;
m_pstrlistThYp[0].AddTail("藥品編號");
m_pstrlistThYp[1].AddTail("藥品名稱");
m_pstrlistThYp[2].AddTail("倉庫");
m_pstrlistThYp[4].AddTail("登記數(shù)量");
m_pstrlistThYp[5].AddTail("該藥品可退貨數(shù)量");
if(m_bXsth)
{
m_pstrlistThYp[3].AddTail("單價");
sql.Format("select tabxsdj.yp_id,sum(tabxsdj.sl) as sl,tabxsdj.ck_name,\
tabypinfo.yp_name,tabxsdj.dj from tabxsdj,tabypinfo \
where tabxsdj.yp_id=tabypinfo.yp_id and tabxsdj.xs_ph = '%s' \
group by tabxsdj.yp_id,tabxsdj.ck_name,\
tabypinfo.yp_name,tabxsdj.dj",
this->m_strDjPh);
}
else
{
m_pstrlistThYp[3].AddTail("進價");
sql.Format("select tabrkdj.yp_id,sum(tabrkdj.sl) as sl,tabrkdj.ck_name,\
tabypinfo.yp_name,tabrkdj.dj from tabrkdj,tabypinfo \
where tabrkdj.yp_id=tabypinfo.yp_id and tabrkdj.rk_ph = '%s'\
group by tabrkdj.yp_id,tabrkdj.ck_name,\
tabypinfo.yp_name,tabrkdj.dj",
this->m_strDjPh);
}
m_runsql.CheckSQLResult(sql);
while(!m_runsql.m_recordset->adoEOF)
{
value=m_runsql.m_recordset->GetCollect("yp_id");
if(value.vt!=VT_NULL)
m_pstrlistThYp[0].AddTail((char*)(_bstr_t)value);
yp_id=(char*)(_bstr_t)value;
value=m_runsql.m_recordset->GetCollect("yp_name");
if(value.vt!=VT_NULL)
m_pstrlistThYp[1].AddTail((char*)(_bstr_t)value);
value=m_runsql.m_recordset->GetCollect("ck_name");
if(value.vt!=VT_NULL)
m_pstrlistThYp[2].AddTail((char*)(_bstr_t)value);
value=m_runsql.m_recordset->GetCollect("dj");
if(value.vt!=VT_NULL)
m_pstrlistThYp[3].AddTail((char*)(_bstr_t)value);
value=m_runsql.m_recordset->GetCollect("sl");
if(value.vt!=VT_NULL)
m_pstrlistThYp[4].AddTail((char*)(_bstr_t)value);
sl=value.dblVal;
m_pstrlistThYp[5].AddTail("0");
//累加可退貨藥品數(shù)量；
if(m_strtolongYpIdToSl.Lookup(yp_id,l_temp))
this->m_strtolongYpIdToSl.SetAt(yp_id,sl+l_temp);
else
this->m_strtolongYpIdToSl.SetAt(yp_id,sl);
m_runsql.m_recordset->MoveNext();
}
if(m_bXsth)
{
sql.Format("select tabxsthdj.yp_id,sum(tabxsthdj.sl) as sl from tabxsthdj,tabxsthph where tabxsthph.xsth_ph = tabxsthdj.xsth_ph and tabxsthph.xs_ph = '%s' group by yp_id",this->m_strDjPh);
}
else
{
sql.Format("select tabrkthdj.yp_id,sum(tabrkthdj.sl) as sl from tabrkthdj,tabrkthph where tabrkthph.rkth_ph = tabrkthdj.rkth_ph and tabrkthph.rk_ph = '%s' group by yp_id",this->m_strDjPh);
}
m_runsql.CheckSQLResult(sql);
while(!m_runsql.m_recordset->adoEOF)
{
value=m_runsql.m_recordset->GetCollect("yp_id");
if(value.vt!=VT_NULL)
yp_id=(char*)(_bstr_t)value;
value=m_runsql.m_recordset->GetCollect("sl");
if(value.vt!=VT_NULL)
sl=value.dblVal;
if(m_strtolongYpIdToSl.Lookup(yp_id,l_temp))
this->m_strtolongYpIdToSl.SetAt(yp_id,l_temp-sl);
else
MessageBox("登記時沒有的藥品，退貨登記卻有!","問題");
m_runsql.m_recordset->MoveNext();
}
this->SetLeftNumber();
return true;
}
bool CListXSTH::Create(DWORD dwStyle, const RECT &rect, CWnd *pParentWnd, UINT nID)
{
bool b=CBaseList::Create(dwStyle,rect,pParentWnd,nID);
m_poplist->SelectStringList(6,this->m_pstrlistThYp);
return b;
}
void CListXSTH::OnEditKillFocus(const int& item,const int& subitem)
{
TRACE("void CListXSDJ::OnEditKillFocus()\n");
CString str;
m_edit.GetWindowText(str);
switch(subitem)
{
// case 0:
// case 1:
case 2:
{
str.MakeUpper();
this->SetValueUnChange(str);
break;
}
case 4:
{
CString id=this->GetItemText(item,0);
long l_left=0;
l_left=this->m_edit.kc_number-atoi(str)+m_edit.m_dSetFocusValue;//- cur show number + setfocus value= left
m_strtolongYpIdToSl.SetAt(id,l_left);
this->SetLeftNumber();
this->m_poplist->SelectStringList(6,this->m_pstrlistThYp);
break;
}
}
CBaseList::OnEditKillFocus(item,subitem);
if(subitem==5)
this->SetZje();
}
bool CListXSTH::OnEditReturn(const int& item,const int& subitem)
{
CString str;
m_edit.GetWindowText(str);
switch(subitem)
{
case 0:
{
if(this->m_poplist->IsWindowVisible()&&this->m_poplist->GetSelectedMark()>=0)
{
this->SetValueUnChange(m_poplist->GetListCtrlSel(0));
this->SetItemText(m_nItem,0,this->m_poplist->GetListCtrlSel(0));
this->SetItemText(m_nItem,1,this->m_poplist->GetListCtrlSel(1));
this->SetItemText(m_nItem,3,this->m_poplist->GetListCtrlSel(3));
// this->InitListYpCk(item,m_poplist->GetListCtrlSel(0));
m_iTheItemState[item]=NONE;
m_iTheItemState[item]&=NOCK;
m_iTheItemState[item]|=YPTRUE;
}
else
SetValueUnChange("");
break;
}
case 1:
{
if(this->m_poplist->IsWindowVisible()&&this->m_poplist->GetSelectedMark()>=0)
{
SetValueUnChange(m_poplist->GetListCtrlSel(1));
this->SetItemText(m_nItem,0,this->m_poplist->GetListCtrlSel(0));
this->SetItemText(m_nItem,1,this->m_poplist->GetListCtrlSel(1));
this->SetItemText(m_nItem,3,this->m_poplist->GetListCtrlSel(3));
// this->InitListYpCk(item,m_poplist->GetListCtrlSel(0));
m_iTheItemState[item]=NONE;
m_iTheItemState[item]&=NOCK;
m_iTheItemState[item]|=YPTRUE;
}
else
SetValueUnChange("");
break;
}
case 2:
{
if(this->m_poplist->IsWindowVisible()&&this->m_poplist->GetSelectedMark()>=0)
{
SetValueUnChange(m_poplist->GetListCtrlSel(2));
this->SetItemText(m_nItem,2,this->m_poplist->GetListCtrlSel(2));
m_iTheItemState[item]=CKTRUE;
}
else
SetValueUnChange("");
break;
}
}
CBaseList::OnEditReturn(item,subitem);
return true;
}
void CListXSTH::OnEditSetFocus(const int& item,const int& subitem)
{
CString str;
m_edit.m_dSetFocusValue=0;
m_edit.GetWindowText(str);
this->m_sSetFocus=str;
m_edit.GetWindowRect(&this->m_rectWindow);
str.MakeUpper();
switch(subitem)
{
case 0:
{
this->m_poplist->ShowWindow(SW_HIDE);
ASSERT(this->m_poplist!=NULL);
// m_poplist->SelectStringList(5,this->m_pstrlistYp);
this->m_poplist->SetShowPosition(this->m_rectWindow,&m_edit);
this->m_poplist->RefreshListCtrlView(0,str);
if(!m_poplist->IsWindowVisible())
m_poplist->ShowListPop();
break;
}
case 1:
{
this->m_poplist->ShowWindow(SW_HIDE);
ASSERT(this->m_poplist!=NULL);
// m_poplist->SelectStringList(5,this->m_pstrlistYp);
this->m_poplist->SetShowPosition(this->m_rectWindow,&m_edit);
CString id=this->GetItemText(item,0);
m_poplist->RefreshListCtrlView(1,str,id,0);
if(!m_poplist->IsWindowVisible())
m_poplist->ShowListPop();
break;
}
case 2:
{
if(!(CheckYp(item)&YPTRUE))
goto wrong_mission;
ASSERT(this->m_poplist!=NULL);
// m_iTheItemState[item]&=NOCK;
this->m_poplist->ShowWindow(SW_HIDE);
CString id=this->GetItemText(item,0);
this->m_poplist->SetShowPosition(this->m_rectWindow,&m_edit);
m_poplist->RefreshListCtrlView(0,id,2,str);
if(!m_poplist->IsWindowVisible())
m_poplist->ShowListPop();
break;
}
case 3:
{
if(CheckCk(item)!=CKTRUE)
goto wrong_mission;
ASSERT(this->m_poplist!=NULL);
// m_poplist->SelectStringList(5,this->m_pstrlistYp);
this->m_poplist->SetShowPosition(this->m_rectWindow,&m_edit);
CString id=this->GetItemText(item,0);
CString ck_name=this->GetItemText(item,2);
m_poplist->RefreshListCtrlView(0,id,2,ck_name);
if(str=="")
{
str=m_poplist->GetListCtrlSel(3);
this->SetValueUnChange(str);
}
m_edit.SetSel(0,-1);
//計算
long sl=0;double dj=0,je=0;
sl=atoi(this->GetItemText(item,4));
dj=atof(str);
je=sl*dj;
CString s_je;
s_je.Format("%0.2f",je);
this->SetItemText(item,5,s_je);
this->SetItemText(item,6,s_je);
if(!m_poplist->IsWindowVisible())
m_poplist->ShowListPop();
break;
}
case 4:
{
if(CheckCk(item)!=CKTRUE)
goto wrong_mission;
if(str!="")
m_edit.m_dSetFocusValue=atoi(str);
// this->InitListCurYpKc(item);
ASSERT(this->m_poplist!=NULL);
CString id=this->GetItemText(item,0);
CString ck_name=this->GetItemText(item,2);
// m_poplist->SelectStringList(4,this->m_pstrlistCurYpKc);
this->SetLeftNumber();
if(!this->m_strtolongYpIdToSl.Lookup(id,this->m_edit.kc_number))
{
MessageBox("目前的情況是：你選擇的藥品編號，沒找到它的剩余值!","問題"); //cur kc_number;
break;
}
this->m_poplist->SetShowPosition(this->m_rectWindow,&m_edit);
m_poplist->SelectStringList(6,this->m_pstrlistThYp);
m_poplist->RefreshListCtrlView(0,id,2,ck_name);
//計算
long sl=0;double dj=0,je=0;
dj=atof(this->GetItemText(item,3));
sl=atoi(str);
je=sl*dj;
CString s_je;
s_je.Format("%0.2f",je);
this->SetItemText(item,5,s_je);
this->SetItemText(item,6,s_je);
if(!m_poplist->IsWindowVisible())
m_poplist->ShowListPop();
break;
}
case 5:
{
if(m_poplist->IsWindowVisible())
this->m_poplist->ShowWindow(SW_HIDE);
if(CheckCk(item)!=CKTRUE)
goto wrong_mission;
CString str=this->GetItemText(item,4);
if(str==""||str=="0")
{
this->m_iEditedIndex=3;
m_edit.ShowWindow(SW_HIDE);
this->SetNextItemFocus();
}
break;
}
}
return;
wrong_mission:
{
this->m_iEditedIndex=-1;
m_edit.ShowWindow(SW_HIDE);
this->SetNextItemFocus();
}
TRACE("aftersetfocus\n");
}
void CListXSTH::OnNewEditChange(const int& item,const int& sub_item)
{
TRACE("void CListXSDJ::OnNewEditChange()\n");
if(this->m_bSetValue) return ;
ASSERT(this->m_poplist!=NULL);
CString str;
m_edit.GetWindowText(str);
CString str_sl=this->GetItemText(item,4);
switch(sub_item)
{
case 0:
?? 快捷鍵說明
復(fù)制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -