StocksMarketValue
简述
计算当前板块的板块指定日流通市值。
StocksMarketValue(StockArr:Array,EndT:TDateTime,SType:Integer):Real
StockArr:数组,股票列表;
EndT:日期,统计截止日期;
SType:整数,加权方法;
返回:实数,当前板块的板块指定日流通市值(万)。
范例:
oV:=BackUpSystemParameters2();
//取'沪深300'板块在2011年12月31日的板块流通市值
//加权方法为只考虑A股
EndT:=inttodate(20111231);
bk:=getbkbydate('SH000300',EndT);
Return StocksMarketValue(bk,EndT,1);
//结果:1155014639.47,单位:万