SetSysParam(PN_Stock(),'IF1601');
begt:=inttodate(base(703002,0));//上市日
endt:=inttodate(base(703018));//最后交易日
dt:=MarketTradeDayQk(begt,endt);
rt:=array();
for i:= 0 to length(dt)-1 do
begin
GetFuturesTradeRankingByDate(dt[i],t);
rt union= t;
end
return rt;
范例02:取历史多个合约的数据集合 实现:取多个期权合约的一段时间内的结算参数数据
stocks:=array("b2304-C-4050","b2304-C-4000");
t:=array();
for i:=0 to length(stocks)-1 do
begin
SetSysParam(pn_stock(),stocks[i]);
tmp:= OptionSPQK(20230301T,20230306T);
if istable(tmp) then begin
tmp[:,'StockID']:=stocks[i]; //补上stockid
t&=select ['StockID'],* from tmp end; //将stockid列提前并合并
end
end
return t;