StocksDR
简述
计算当前板块的板块对大盘涨跌贡献度(%)。
(1)RightType=0时,为“总股本加权”的加权方法;
(2)RightType=1时,为“流通股本加权”的加权方法。
(3)板块对大盘涨跌幅贡献度V=VCP/MCP*100
VCP:股票组合市值;
MCP:基准板块市值。
StocksDR(StockArr:Array;BegT:TDateTime;EndT:TDateTime;RightType:Integer;MarketName:String):Real
名称 | 类型 | 说明 |
---|
StockArr | Array | 数组,股票列表; |
BegT | TDateTime | 日期,开始日期; |
EndT | TDateTime | 日期,截止日期; |
RightType | Integer | 整数,加权方法;
 |
MarketName | String | 市场名称。 |
返回 | Real | 实数,当前板块的板块对大盘涨跌贡献度。 |
oV:=BackUpSystemParameters2();
//取'沪深300'在2011年1月1日至2011年12月31日板块市值的对大盘涨跌贡献度
//加权方式为'流通股本',市场名称为"上证A股;深证A股"
bk:=getbkbydate('SH000300',inttodate(20111231));
BegT:=inttodate(20110101);
EndT:=inttodate(20111231);
Return StocksDR(bk,BegT,EndT,1,"上证A股;深证A股");
//结果:70.2。