板块市盈率(总股本加权) =∑(股票i总市值) /∑(净利润*加权系数)
板块市盈率(流通股本加权) =∑(股票i流通市值) /∑(股票i报告期净利润/股票i报告期总股本*股票i报告期流通股本*加权系数)
板块市盈率(算术平均) = ∑(股票i总市值/(净利润*加权系数))/股票个数
注:上述总市值、流通市值所在时点由EndT决定;财务指标的报告期由RDate决定;加权系数由RDate决定,若RDate为一季报,则加权系数为4;若RDate为中报,则加权系数为2;若RDate为三季报,则加权系数为4/3;若RDate为年报,则加权系数为1。
//返回沪深3002010年3月15日的成分股在2011年3月15日的市盈率,总股本加权
EndT := inttodate(20110315);
setsysparam(pn_date(),EndT);
Stks := getbkbydate('SH000300',EndT);
return StocksPE2(Stks,EndT,20101231,0,0,0,0);
//返回结果:14.87
Bk_PE2