StockMSHPercentage1to10
简述
前10大股东所占比例(%)。
(1)Gtype=0时,股东持股数据从十大股东表中获得;Gtype=1时,股东持股数据从十大流通股东表中获得;
(2)计算股东持股占总股本比例。
StockMSHPercentage1to10 (ReportDate:Integer,GType:Integer):Real
ReportDate:整数,报告期;
GType:整数,股东类型;
返回:实数,股东所占比例(%)。
范例:
//返回截止20101010最新报告期前10大股东所占总股本比例(%)
ov:=BackUpSystemParameters();
SetSysParam(pn_stock(),"SZ000002");
RDate:=NewReportDateOfEndT2(Inttodate(20121010));
R:= StockMSHPercentage1to10 (RDate,0);
RestoreSystemParameters(ov);
Return R;
//结果:22.58