RetainedProfit
简述
每股未分配利润=未分配利润/总股本。
函数从合并合并资产负债表中取得指定报告期的未分配利润,然后从股本结构表中取得总股本,根据算法就得到每股未分配利润。
RetainedProfit(RDate:Integer):Real
RDate:整数,报告期。
返回:实数,每股未分配利润。
范例:
//指定2011年报,取万科A每股未分配利润
oV:=BackUpSystemParameters2();
setsysparam(pn_stock(),'SZ000002');
v:=RetainedProfit(20111231);
return v;
//结果:1.72