工作日志 针对SQL Server做的些改动

with ADoquery3 do
begin
close;
sql.Clear;
{ sql.Add('select a.GoodsName,a.BillCode,a.Price,a.RNumber,a.RMoney,a.Pccode,b.AddDate,b.CustName from (SELECT * FROM T_DepotGoodsInDetail WHERE GoodsName='+QuotedStr(ADOquery2.Fields[0].AsString)+') AS a JOIN (SELECT * FROM T_DepotGoodsIn WHERE AddDate>='+Formatdatetime('yyyy-mm-dd',dtpDateBegin.DateTime)+' and AddDate<='+Formatdatetime('yyyy-mm-dd',dtpDateEnd.DateTime)+' AND Custname ='+QuotedStr(cbbWorkPlace.Text)+') AS b ON a.BillCode = b.Billcode'
); }
sql.Add('select a.GoodsName,''采购收货'',a.BillCode,a.Price,a.RNumber,a.RMoney,a.Pccode,b.AddDate,b.CustName from (SELECT * FROM T_DepotGoodsInDetail WHERE GoodsName='+QuotedStr(ADOquery2.Fields[0].AsString)+') AS a JOIN (SELECT * FROM T_DepotGoodsIn WHERE AddDate>='+QuotedStr(Formatdatetime('yyyy-mm-dd',dtpDateBegin.DateTime))+' and AddDate<='+QuotedStr(Formatdatetime('yyyy-mm-dd',dtpDateEnd.DateTime))+' AND Custname ='+QuotedStr(cbbWorkPlace.Text)+') AS b ON a.BillCode = b.Billcode '+
'UNION '+
'select c.GoodsName,''销售出货'',c.BillCode,c.Price,c.RNumber,c.RMoney,c.Pccode,d.AddDate,d.CustName from (SELECT * FROM T_DepotGoodsOutDetail WHERE GoodsName='+QuotedStr(ADOquery2.Fields[0].AsString)+') AS c JOIN (SELECT * FROM T_DepotGoodsOut WHERE AddDate>='+QuotedStr(Formatdatetime('yyyy-mm-dd',dtpDateBegin.DateTime))+' and AddDate<='+QuotedStr(Formatdatetime('yyyy-mm-dd',dtpDateEnd.DateTime))+' AND Custname ='+QuotedStr(cbbWorkPlace.Text)+') AS d ON c.BillCode = d.Billcode '+
'UNION');
sql.Add('select g.GoodsName,''领用出库'',g.BillCode,g.Price,g.RNumber,g.RMoney,g.Pccode,h.AddDate,h.CustName from (SELECT * FROM T_DepotDyeOutDetail WHERE GoodsName='+QuotedStr(ADOquery2.Fields[0].AsString)+') AS g JOIN (SELECT * FROM T_DepotDyeOut WHERE AddDate>='+QuotedStr(Formatdatetime('yyyy-mm-dd',dtpDateBegin.DateTime))+' and AddDate<='+QuotedStr(Formatdatetime('yyyy-mm-dd',dtpDateEnd.DateTime))+' AND Custname ='+QuotedStr(cbbWorkPlace.Text)+') AS h ON g.BillCode = h.Billcode '+
'UNION');
sql.Add('select e.GoodsName,''产品入库'',e.BillCode,e.Price,e.RNumber,e.RMoney,e.Pccode,f.AddDate,f.CustName from (SELECT * FROM T_DepotDyeInDetail WHERE GoodsName='+QuotedStr(ADOquery2.Fields[0].AsString)+') AS e JOIN (SELECT * FROM T_DepotDyeIn WHERE AddDate>='+QuotedStr(Formatdatetime('yyyy-mm-dd',dtpDateBegin.DateTime))+' and AddDate<='+QuotedStr(Formatdatetime('yyyy-mm-dd',dtpDateEnd.DateTime))+' AND Custname ='+QuotedStr(cbbWorkPlace.Text)+') AS f ON e.BillCode = f.Billcode '+
'ORDER BY AddDate');
// sql.Add('select GoodsName,Type,BillCode,Price,RNumber,RMoney,Pccode from T_DepotDetail where Pccode in (select top 100 percent PcCode from T_Depot where AddDate>=:b and AddDate<=:c and Custname ='+QuotedStr(cbbWorkPlace.Text)+') order by Pccode');
//parameters.ParamByName('a').Value:=ADOquery2.Fields[0].AsString;
//parameters.ParamByName('b').Value:=Formatdatetime('yyyy-mm-dd',dtpDateBegin.DateTime);
//parameters.ParamByName('c').Value:=Formatdatetime('yyyy-mm-dd',dtpDateEnd.DateTime);
//parameters.ParamByName('d').Value:=cbbWorkPlace.Text;
open;
//ShowMessage(ADOquery2.Fields[0].AsString);

end;