//**********************参数设置***********************//
N := 5;
endt := today();
stocks := getbk("上证50");
//**********************网格模版*********************//
gridNo := 3; //网格个数,0:表示只使用本地服务器
func := FunctionName() + '.tsubbystocks'; //网格函数
parms := array(N,endt,stocks);
parmstype := array(0, 0, 1);
return unit(MultiProc_unit).fastmap(gridNo,func,parms,parmstype);
//***********************子函数**********************//
function tsubbystocks(N, endt,stocks);
begin
sp_s(pn_date(),endt);
i := 0;
ret := array();
for _,stk in stocks do
begin
sp_s(PN_Stock(),stk);
for j := 0 to N do
begin
ret[I,'截止日'] := ref(sp_time(),j);
ret[i,'代码'] := stk;
ret[i,'名称'] := stockname(stk);
ret[I,'涨幅(%)'] := ref(stockzf3(),j);
i++;
end
end;
return ret;
end;
//返回