TDateTime dt;
if(pSocka->Receive(&dt,sizeof(dt)) <= 0) return false;
char szStationID[10]={0};
if(pSocka->Receive(szStationID,sizeof(szStationID)) <= 0) return false;
AnsiString strSql = "exec ups_StatisticsOfMonth :qtime,:sid,:Remain output";
OutputDebugInfo("发送12个月统计数据:"+strSql,pSocka);
m_pAdo->Active = false;
m_pAdo->SQL->Clear();
m_pAdo->SQL->Add(strSql);
m_pAdo->Parameters->Items[0]->Value = dt;
m_pAdo->Parameters->Items[1]->Value = szStationID;
m_pAdo->Parameters->Items[2]->Value = 0;
m_pAdo->Active = true;
STWeight12Month wh={0};
int i = 0;
while(!m_pAdo->Eof)
{
wh.nTonWeight[i] = m_pAdo->FieldByName("TonWeight")->AsInteger;
wh.nDisWeight[i] = m_pAdo->FieldByName("DisWeight")->AsInteger;
i++;
m_pAdo->Next();
}
wh.nTonWeight[12] = wh.nTonWeight[0];
wh.nDisWeight[12] = wh.nDisWeight[0];
wh.nRemainWeight = m_pAdo->Parameters->ParamByName("Remain")->Value;
pSocka->Send(&wh,sizeof(wh));
OutputDebugInfo("发送12个月统计数据",pSocka);
来源:CSDN
作者:chinayu2007
链接:https://blog.csdn.net/chinayu2007/article/details/103937837