板块市盈率(总股本加权) =∑(股票i总市值) /∑(净利润*加权系数)
板块市盈率(流通股本加权) =∑(股票i流通市值) /∑(股票i报告期净利润/股票i报告期总股本*股票i报告期流通股本*加权系数)
板块市盈率(算术平均) = ∑(股票i总市值/(净利润*加权系数))/股票个数
注:上述总市值、流通市值所在时点由EndT决定;财务指标的报告期由RDate决定;加权系数由RDate决定,若RDate为一季报,则加权系数为4;若RDate为中报,则加权系数为2;若RDate为三季报,则加权系数为4/3;若RDate为年报,则加权系数为1。
//假设构建了用户板块mybk(此处以沪深300的成分股代替)
//计算mybk板块2011年3月15日的按总股本加权的市盈率
EndT := inttodate(20110315);
setsysparam(pn_date(),EndT);
stockArr := getbkbydate('SH000300',EndT);
savebk('mybk','新建分类',stockArr);
SetSysParam(pn_bk(),'mybk');
return BK_PE2(EndT,20101231,0,0,0,0);
//返回结果:14.87
StocksPE2