ListOnlyB
简述
判断一个股票是否仅发行B股
ListOnlyB (EndT:TDateTime):Integer
EndT:实数,截止日期;
返回:是否仅发行B股,0表示‘不是’,1表示‘是’。
范例:
//返回" SH600602"是否仅发行B股
ov:=BackUpSystemParameters();
SetSysParam(pn_stock(),"SH600602");
EndT:=Inttodate(20120910);
R:= ListOnlyB (EndT);
RestoreSystemParameters(ov);
Return R;
//结果:0