StocksMarketValuePercent
简述
计算当前板块的板块流通市值占市场流通市值比重。
StocksMarketValuePercent(StockArr:Array;EndT:TDateTime;MarketName:String;SType:Integer):Real
名称 | 类型 | 说明 |
---|
StockArr | Array | 数组,股票列表; |
EndT | TDateTime | 日期,统计截止日期; |
MarketName | String | 市场名称; |
SType | Integer | 整数,加权方法;
 |
返回 | Real | 实数,当前板块的板块流通市值占市场流通市值比重。 |
oV:=BackUpSystemParameters2();
//取'沪深300'板块在2011年年报的指定日流通市值比重
//加权方法为只考虑A股,市场名称为"上证A股;深证A股"
EndT:=inttodate(20111231);
bk:=getbkbydate('SH000300',EndT);
Return StocksMarketValuePercent(bk,EndT,"上证A股;深证A股",1);
//结果:79.41。