AStockCode
简述
如果公司同时发行A+B股,返回A股代码,否则返回公司本身代码。
AStockCode(EndT:TDateTime):String
EndT:实数,截止日期;
返回:字符串,股票代码
范例:
//返回"SH900901"对应的A股代码
ov:=BackUpSystemParameters();
SetSysParam(pn_stock(),"SH900901");
EndT:=Inttodate(20120910);
R:= AStockCode(EndT);
RestoreSystemParameters(ov);
Return R;
//结果:"SH600602"