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