?? statdlg.cpp
字號(hào):
{
CString stemp;
stemp.Format("[報(bào)表]計(jì)算單據(jù)RF金額出錯(cuò):%s",e.ErrorMessage());
AfxMessageBox(stemp);
}
//Calculate class's acttotal and valtotal.
// sql="Select CLASS,Sum(ACTTOTAL) as XXX,Sum(VALTOTAL) as VVV from PAYDETAIL where BILLID in (Select ID from SALEBILL "+scondition+") group by CLASS ";
sql="Select CLASS,Sum(ACTTOTAL) as XXX,Sum(VALTOTAL) as VVV, count(*) from PAYDETAIL where BILLID in (Select ID from SALEBILL "+scondition+") group by CLASS having count(*)>=1";
try
{
m_pRecordset.CreateInstance("ADODB.Recordset");
m_pRecordset->Open((_variant_t)sql,_variant_t((IDispatch*)theApp.m_pConnection,true),adOpenStatic,adLockOptimistic,adCmdText);
float fat=0;
float fvt=0;
while(!m_pRecordset->adoEOF)
{
CString sclassname =(LPCTSTR)(_bstr_t)m_pRecordset->GetCollect("CLASS");
float facttotal=m_pRecordset->GetCollect("XXX");
float fvaltotal=m_pRecordset->GetCollect("VVV");
fat=fat+facttotal;
fvt=fvt+fvaltotal;
CString sacttotal,svaltotal;
sacttotal.Format("%.2f",facttotal);
svaltotal.Format("%.2f",fvaltotal);
n=25-sclassname.GetLength()-sacttotal.GetLength();
space=" ";
for(i=0;i<n-1;i++)
space=space+" ";
CString space1=" ";
n=14-svaltotal.GetLength();
for(i=0;i<n-1;i++)
space1=space1+" ";
m_oListreport.AddString(sclassname+space+sacttotal+space1+svaltotal);
m_pRecordset->MoveNext();
}
m_oListreport.AddString(" ");
CString sat,svt;
sat.Format("%.2f",fat);
svt.Format("%.2f",fvt);
n=20-sat.GetLength();
space=" ";
for(i=0;i<n-1;i++)
space=space+" ";
space1=" ";
n=14-svt.GetLength();
for(i=0;i<n-1;i++)
space1=space1+" ";
m_oListreport.AddString("總計(jì):"+space+sat+space1+svt);
m_oListreport.AddString(" ");
n=28-spersonqa.GetLength()-sbillqa.GetLength();
space=" ";
for(i=0;i<n-1;i++)
space=space+" ";
m_oListreport.AddString("人數(shù):"+spersonqa+space+"單數(shù):"+sbillqa);
m_oListreport.AddString(" ");
m_oListreport.AddString("-----------------未結(jié)單----------------");
m_pRecordset->Close();
}
catch(_com_error e)///捕捉異常
{
CString stemp;
stemp.Format("[報(bào)表]計(jì)算類別金額出錯(cuò):%s",e.ErrorMessage());
AfxMessageBox(stemp);
}
//Get non-check bill.
float fnonttl=0;
CString snontotal;
sql="Select ID,TOTAL from SALEBILL where STATUS<>'已結(jié)帳'";
try
{
m_pRecordset.CreateInstance("ADODB.Recordset");
m_pRecordset->Open((_variant_t)sql,_variant_t((IDispatch*)theApp.m_pConnection,true),adOpenStatic,adLockOptimistic,adCmdText);
while(!m_pRecordset->adoEOF)
{
CString snoncheck=(LPCTSTR)(_bstr_t)m_pRecordset->GetCollect("ID");
float fnontotal=(float)m_pRecordset->GetCollect("TOTAL");
snontotal.Format("%.2f",fnontotal);
n=38-snoncheck.GetLength()-snontotal.GetLength();
space=" ";
for(i=0;i<n-1;i++)
space=space+" ";
m_oListreport.AddString(snoncheck+space+snontotal);
fnonttl=fnonttl+fnontotal;
m_pRecordset->MoveNext();
}
if(fnonttl!=0)
{
snontotal.Format("%.2f",fnonttl);
n=38-snontotal.GetLength();
space=" ";
for(i=0;i<n-1;i++)
space=space+" ";
m_oListreport.AddString(" ----------------");
m_oListreport.AddString(space+snontotal);
}
m_pRecordset->Close();
}
catch(_com_error e)///捕捉異常
{
CString stemp;
stemp.Format("[報(bào)表]讀取未結(jié)單出錯(cuò):%s",e.ErrorMessage());
AfxMessageBox(stemp);
}
}
void CStatDlg::SumSingleItem(CString scondition)
{
CString sql,sitemsum,smname;
long litemsum,lmid;
_RecordsetPtr m_pRecordset; //Must define it in function!!!!
//Select suit records and insert them into SINGLEREPORT.
sql="Delete * from SINGLEREPORT";
try
{
_variant_t RecordsAffected;
theApp.m_pConnection->Execute((_bstr_t)sql,&RecordsAffected,adCmdText);
sql="Insert into SINGLEREPORT (ITEMCOUNT,MATERIELID) Select ITEMCOUNT,MATERIELID from SALEDETAIL Where BILLID in (Select ID from SALEBILL "+scondition+")";
theApp.m_pConnection->Execute((_bstr_t)sql,&RecordsAffected,adCmdText);
}
catch(_com_error e)///捕捉異常
{
CString stemp;
stemp.Format("[單品]插入單品項(xiàng)目出錯(cuò):%s",e.ErrorMessage());
AfxMessageBox(stemp);
return;
}
//Get records and insert them into report listbox.
sql="Select MATERIELID,Sum(ITEMCOUNT) as XXX,count(*) from SINGLEREPORT group by MATERIELID having count(*)>=1";
try
{
m_pRecordset.CreateInstance("ADODB.Recordset");
m_pRecordset->Open((_variant_t)sql,_variant_t((IDispatch*)theApp.m_pConnection,true),adOpenStatic,adLockOptimistic,adCmdText);
while(!m_pRecordset->adoEOF)
{
litemsum =(long)m_pRecordset->GetCollect("XXX");
sitemsum.Format("%6d",litemsum);
lmid=(long)m_pRecordset->GetCollect("MATERIELID");
smname=GetMaterielName(lmid);
CString soutname;
soutname.Format("%-32s",smname);
// int n=38-sitemsum.GetLength()-smname.GetLength();
// CString space=" ";
// for(int i=0;i<n-1;i++)
// space=space+" ";
// m_oListreport.AddString(smname+space+sitemsum);
m_oListreport.AddString(soutname+sitemsum);
m_pRecordset->MoveNext();//Don't forget this function!!
}
m_pRecordset->Close();
}
catch(_com_error e)///捕捉異常
{
CString stemp;
stemp.Format("[單品]計(jì)算單品數(shù)量出錯(cuò):%s",e.ErrorMessage());
AfxMessageBox(stemp);
}
}
CString CStatDlg::GetMaterielName(long materielid)
{
_RecordsetPtr m_pRecordset; //Must define it in function!!!!
CString sql,smaterielid,sname;
smaterielid.Format("%d",materielid);
sql="Select NAME from MATERIEL where ID="+smaterielid+"";
try
{
m_pRecordset.CreateInstance("ADODB.Recordset");
m_pRecordset->Open((_variant_t)sql,_variant_t((IDispatch*)theApp.m_pConnection,true),adOpenDynamic,adLockOptimistic,adCmdText);
if(!m_pRecordset->adoEOF)
sname=(LPCTSTR)(_bstr_t)m_pRecordset->GetCollect("NAME");
}
catch(_com_error e)///捕捉異常
{
CString temp;
temp.Format("獲取商品名稱出錯(cuò):%s",e.ErrorMessage());
AfxMessageBox(temp);
}
return sname;
}
void CStatDlg::OnButtonPrintreport()
{
//獲得行數(shù)
int ncount = m_oListreport.GetCount();
if(ncount==0)
{
MessageBox("無打印內(nèi)容!");
return;
}
int i;
CDC dc;
//把打印設(shè)備環(huán)境附加到DC對(duì)象
CPrintDialog pdlg(FALSE,PD_NOPAGENUMS|PD_NOSELECTION,this);
BOOL bFindPrinter=pdlg.GetDefaults();
if(!bFindPrinter)
return;
dc.Attach(pdlg.GetPrinterDC());
//取打印機(jī)的橫方向和縱方向的分辨率
//即每英寸點(diǎn)數(shù)
short cxInch = dc.GetDeviceCaps(LOGPIXELSX);
short cyInch = dc.GetDeviceCaps(LOGPIXELSY);
//字體
CFont font;
VERIFY(font.CreatePointFont(96, "宋體", &dc));//為DC創(chuàng)建字體
CFont* def_font = dc.SelectObject(&font);//保存現(xiàn)在的字體
//根據(jù)字體寬度、高度計(jì)算每行最大字?jǐn)?shù)及每頁(yè)最大行數(shù)
//取打印紙張高度和寬度
int nPageHeight, nPageWidth;
nPageHeight = dc.GetDeviceCaps(VERTRES);
nPageWidth = dc.GetDeviceCaps(HORZRES);
TEXTMETRIC TextM;
dc.GetTextMetrics(&TextM);
//字體高度 //字體平均寬度
int nCharHeight = (unsigned short)TextM.tmHeight;
int nCharWidth=(unsigned short)TextM.tmAveCharWidth;
//每行最大字?jǐn)?shù) //每頁(yè)最大行數(shù)
int m_MaxLineChar = nPageWidth / nCharWidth - 8;
//每頁(yè)最大行數(shù)
int nMaxLinePerPage = nPageHeight/nCharHeight -3;
int nCurPage =1;
//頁(yè)邊距
int nXMargin = 2;
int nYMargin = 2;
//設(shè)置所需打印紙張數(shù)目
DOCINFO di;
di.cbSize = sizeof(DOCINFO);
di.lpszDocName = "Report printing";
di.lpszOutput = (LPTSTR) NULL;
di.lpszDatatype = (LPTSTR) NULL;
di.fwType = 0;
dc.StartDoc(&di);
dc.StartPage();
//輸出報(bào)表名稱
CString stitle,sftitle,space="";
m_oListreport.GetWindowText(stitle);
int n=(36-stitle.GetLength())/2;
for(i=0;i<n;i++)
space=space+" ";
sftitle=space+stitle;
dc.TextOut(2, nYMargin+nCharHeight,sftitle, strlen(sftitle));
//輸出報(bào)表內(nèi)容
CString sline;
for(i=0; i<ncount; i++)
{
if(ncount+7-(nCurPage-1)*nMaxLinePerPage > nMaxLinePerPage)
{
//新的一頁(yè)
dc.EndPage();
dc.StartPage();
nCurPage ++;
}
m_oListreport.GetText(i, sline);//得到選中項(xiàng)的文本
dc.TextOut( 2, nYMargin+(i+1-(nCurPage-1)*nMaxLinePerPage)*nCharHeight,
sline, strlen(sline));
}
dc.EndPage();
dc.EndDoc();
//打印結(jié)束
//最后不要忘記將字體還原，這一句是必需的
dc.SelectObject(def_font); //恢復(fù)原來的字體
font.DeleteObject();
DeleteDC(dc.Detach());
}
?? 快捷鍵說明
復(fù)制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號(hào)
Ctrl + =
減小字號(hào)
Ctrl + -