用VBA取夜盘铜铅等品种的涨跌停价格与盘口信息中的涨跌停数值不同,如果是取RB等普通非夜盘品种,就没有错误。
代码如下:
Call Order.HoldingInfo2(i,BuyHolding,BuyCost,BuyTodayHolding,SellHolding,SellCost,SellTodayHolding,PNL,UseMargin,Code,Market,MyAccount) '*取当前持仓合约信息
CurCode=Code
CurMarket=Market
BuyHold=BuyHolding
SellHold=SellHolding
set info=MarketData.GetReportData(CurCode,CurMarket) '取涨跌停价
stoph=info.UpperLimitPrice '涨停价
stopl=info.LowerLimitPrice '跌停价
set info=MarketData.GetReportData(CurCode,CurMarket)
这里加上调试代码
application.msgout CurCode
application.msgout CurMarket
看看是不是市场搞错了依旧读的上海老市场的代码