VBA 关于重复报单的问题

注册专用

几个问题请教一下：
代码示例：Sub MarketData_ReportNotify(ReportData)

Call Order.HoldingInfoByCode2("AG01","SQ",BuyHolding,BuyCost,BuyTodayHolding,SellHolding,SellCost,SellTodayHolding,PNL,UseMargin,"")
If  [size=14.6667px]BuyHolding<4 and NewPrice<5000  Then  [size=14.6667px]sOrderID=Order.Buy(0,1,5100,0,"AG01","AQ"",0)    '持多单小于4手时，按1手开多单，并返回 OrderID
[size=14.6667px]End Sub
[size=14.6667px]在实际执行过程中，会发现经常出现开仓数量超出  4 手的情况，有时又不会。经分析，认为是收到行情数据即触发开仓动作，但前一笔申报还在进行中或未成交(挂单价远高于卖1价)导致，增加 OrderStatusEx 事件监测发现报单、撤单、刷新[size=14.6667px]BuyHolding 之间有个时间差的问题所导致，平仓情况类似。
[size=14.6667px]1、象这种情况，是否有较好的方法来避免超限开仓的方案？
[size=14.6667px]2、[size=14.6667px]OrderID 返回的数据（订单ID号），是不是一定为数字型？
[size=14.6667px]3、[size=14.6667px]TraderDetaild3.mdb  文档发现经常丢失 “盈亏” 字段的值，笔数倒没错，成交后写这个文档的数据是实时的吗？
[size=14.6667px]4、TraderDetaild3.mdb 这个文档中，是否可以增加成交价字段？便于取用
[size=14.6667px]谢谢！

注册专用

几个问题请教一下：
代码示例：Sub MarketData_ReportNotify(ReportData)

Call Order.HoldingInfoByCode2("AG01","SQ",BuyHolding,BuyCost,BuyTodayHolding,SellHolding,SellCost,SellTodayHolding,PNL,UseMargin,"")
If  BuyHolding<4 and NewPrice<5000  Then  [size=14.6667px]sOrderID=Order.Buy(0,1,5100,0,"AG01","AQ"",0)    '持多单小于4手时，按1手开多单，并返回 OrderID
End Sub
在实际执行过程中，会发现经常出现开仓数量超出  4 手的情况，有时又不会。经分析，认为是收到行情数据即触发开仓动作，但前一笔申报还在进行中或未成交(挂单价远高于卖1价)导致，增加 OrderStatusEx 事件监测发现报单、撤单、刷新BuyHolding 之间有个时间差的问题所导致，平仓情况类似。
1、象这种情况，是否有较好的方法来避免超限开仓的方案？
2、OrderID 返回的数据（订单ID号），是不是一定为数字型？
3、TraderDetaild3.mdb  文档发现经常丢失 “盈亏” 字段的值，笔数倒没错，成交后写这个文档的数据是实时的吗？
4、TraderDetaild3.mdb 这个文档中，是否可以增加成交价字段？便于取用
谢谢！

技术007

1. BuyHolding<4     这个BuyHolding判断的是持有的仓位数量，从触发下单到实际成交，是有时间差的。    需要用OrderInfo2 方法加上未成交单的判断，持有的仓位+未成交单<4，才开仓。撤单后，才能再开仓
2. OrderID 返回的数据（订单ID号），为数字型，可能包含负数

注册专用

谢谢回复！
TraderDetaild3.mdb 这个文档中，是否可以增加成交价字段？便于取用
这个需求供参考，并望能增加，自己再去创建一个数据库也挺麻烦的

技术007

TraderDetaild3.mdb文档中，需要的成交价字段，也会反馈提交，感谢您的建议。