BStockPrice
简述
如果公司同时发行A+B股,返回B股的收盘价,否则返回公司本身的收盘。
BStockPrice (EndT:TDateTime):Real
EndT:实数,截止日期
返回:实数,收盘价。
范例:
//返回" SH600602"对应的B股收盘价
ov:=BackUpSystemParameters();
SetSysParam(pn_stock(),"SH600602");
EndT:=Inttodate(20120910);
R:= BStockPrice (EndT);
RestoreSystemParameters(ov);
Return R;
//结果:0.33