以文本方式查看主题

-  金字塔客服中心 - 专业程序化交易软件提供商  (http://222.73.7.161/bbs/index.asp)
--  高级功能研发区  (http://222.73.7.161/bbs/list.asp?boardid=5)
----  请问如何通过order对象实现某个合约可开仓数量查询  (http://222.73.7.161/bbs/dispbbs.asp?boardid=5&id=2022)

--  作者:wattwei
--  发布时间:2010/7/2 16:15:14
--  请问如何通过order对象实现某个合约可开仓数量查询
1.通过Account方法,置入参数19,获得当前交易帐户中的当前可用资金
2.通过Contract方法,获得指定合约的开仓保证金
3.做除法运算得到可开合约数量(暂不考虑手续费因素)

谢谢

--  作者:admin
--  发布时间:2010/7/3 16:20:21
--  
Sub Test()
 \'显示当前默认帐户的可用资金
 msgbox order.Account(3)
 
 \'显示股指07的开仓保证金
 dim Multipliter
 dim MinTick
 dim ShortPercent
 dim LongPercent
 call order.Contract("IF07","ZJ",Multipliter,MinTick,ShortPercent,LongPercent)
 msgbox LongPercent
 
 \'计算可开手数 
 set Report1 = marketdata.GetReportData("IF07","ZJ") \'先得到品种的行情数据
 Num = order.Account(3) / (Report1.NewPrice*(LongPercent/100)*Multipliter)
 msgbox Int(num)
End Sub

--  作者:wattwei
--  发布时间:2010/7/3 17:28:41
--  
 谢谢,学习了
--  作者:guotx2010
--  发布时间:2010/12/25 14:30:42
--  
收藏了