欢迎使用金字塔普通技术服务论坛,您可以在相关区域发表技术支持贴。
我司技术服务人员将优先处理 VIP客服论坛 服务贴,普通区问题处理速度慢,请耐心等待。谢谢您对我们的支持与理解。


金字塔客服中心 - 专业程序化交易软件提供商金字塔软件高级功能研发区 → HoldingInfo2和HoldingInfoByCode2返回的同一合约持仓成本不一样

   

欢迎使用金字塔普通技术服务论坛,您可以在相关区域发表技术支持贴。
我司技术服务人员将优先处理 VIP客服论坛 服务贴,普通区问题处理速度慢,请耐心等待。谢谢您对我们的支持与理解。    


  共有4487人关注过本帖树形打印复制链接

主题:HoldingInfo2和HoldingInfoByCode2返回的同一合约持仓成本不一样

帅哥哟,离线,有人找我吗?
guotx2010
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:蜘蛛侠 帖子:1366 积分:5210 威望:0 精华:7 注册:2010/12/11 18:00:33
HoldingInfo2和HoldingInfoByCode2返回的同一合约持仓成本不一样  发帖心情 Post By:2011/5/30 17:17:50 [只看该作者]

Sub GetAllHolding()
  dim HoldingCount
  dim i
  
 dim BuyHolding
 dim BuyCost
 dim BuyTodayHolding
 dim SellHolding
 dim SellCost
 dim SellTodayHolding
 dim PNL
 dim UseMargin
 dim Code
 dim Market

  HoldingCount=Order.Holding2()
  application.MsgOut HoldingCount
  If HoldingCount>0 then
   For i=0 to HoldingCount-1
    Call Order.HoldingInfo2(i,BuyHolding,BuyCost,BuyTodayHolding,SellHolding,SellCost,SellTodayHolding,PNL,UseMargin,Code,Market)

    '如果上面那句能准确提取持仓信息,下面那句可以不要,可是现在的问题是上面的提出的价格不对,只好增加一句,提取上一句返回的Code的持仓信息
    Call Order.HoldingInfoByCode2(Code,Market,BuyHolding,BuyCost,BuyTodayHolding,SellHolding,SellCost,SellTodayHolding,PNL,UseMargin)

    application.msgout Code
    application.msgout BuyHolding

    application.msgout BuyTodayHolding

    application.msgout BuyCost
    application.msgout SellHolding
    application.msgout SellTodayHolding
    application.msgout SellCost
   Next
  End if
 End Sub

 

请金字塔开发人员测试,并修改这个问题,同时,帮助文件中的这两个方法的例子程序,holding都写成了hoding,导致后面你如果写成正确的单词反而取不到值,也请修改。

如果要自己解决,得取合约信息,通过计算获取正确的开仓价。

buyCost/合约乘数

 

[此贴子已经被作者于2011-5-30 17:38:49编辑过]

 回到顶部
帅哥哟,离线,有人找我吗?
admin
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:管理员 帖子:7302 积分:32559 威望:1000 精华:45 注册:2003/12/30 16:34:32
  发帖心情 Post By:2011/5/30 18:14:32 [只看该作者]

问题只在特定情况出现还是每次都出现?


 回到顶部
帅哥哟,离线,有人找我吗?
guotx2010
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:蜘蛛侠 帖子:1366 积分:5210 威望:0 精华:7 注册:2010/12/11 18:00:33
  发帖心情 Post By:2011/5/30 22:02:17 [只看该作者]

每次都出现

 回到顶部