|
TSQLDataSet(self.CompilingDSBroker.DataSet).close;
TSQLDataSet(self.CompilingDSBroker.DataSet).SQL.Clear;
TSQLDataSet(self.CompilingDSBroker.DataSet).SQL.Text:='SELECT VIEW_XHP.HCDL, VIEW_XHP.XHGG, '+
' isnull(sum(VIEW_XHP.SJLYSL),0) as 实领数量[SJLYSL],isnull(sum(VIEW_XHP.ZJ),0) as ZJ '+
' FROM VIEW_XHP where year(VIEW_XHP.SQRQ) like ''%'+ComboBox2.Text+'%'' and '+
' VIEW_XHP.LYBM like ''%'+ComboBox1.Text+'%'' '+
'GROUP BY VIEW_XHP.HCDL, VIEW_XHP.XHGG ORDER BY VIEW_XHP.HCDL, VIEW_XHP.XHGG';
TSQLDataSet(self.CompilingDSBroker.DataSet).Open;
XHPTJ.TTJB(dvDetail.Doc).DataGridSJLYSL.Caption:='实领数量';
XHPTJ.TTJB(dvDetail.Doc).DataGridZJ.Caption:='总价';
|
|