begt:=20141201T;
endt:=20150120T;
stockid:="SZ000562";
SetSysParam(pn_stock(),stockid);
SetSysParam(PN_Cycle(),cy_day());
daylist:=MarketTradedayQK3(begt,endt);//获取市场交易日序列
ret:=array();
for i,day in daylist do
begin
SetSysParam(PN_Date(),day);
ret[i,"StockID"]:=stockid;
ret[i,"StockName"]:=StockName(stockid);
ret[i,"date"]:=datetostr(day);
ret[i,"close"]:=close();
end
return ret;