以文本方式查看主题

-  金字塔客服中心 - 专业程序化交易软件提供商  (http://weistock.com/bbs/index.asp)
--  金字塔软件问题提交  (http://weistock.com/bbs/list.asp?boardid=2)
----  3.0的正式什么时候出  (http://weistock.com/bbs/dispbbs.asp?boardid=2&id=54782)

--  作者:leelatan
--  发布时间:2013/8/7 12:54:05
--  3.0的正式什么时候出

 

什么时候可以通过软件里面的升级功能自动升级。

 

现在的测试版要重新安装,怕跟原来的软件冲突。


--  作者:bbking
--  发布时间:2013/8/7 13:03:09
--  

等你用3.0测试版实盘没什么bug的时候就出3.0正式版了


--  作者:sky01
--  发布时间:2013/8/7 13:05:07
--  

2楼老兄回答正确.


--  作者:lichenghu
--  发布时间:2013/8/7 13:08:01
--  
正解,等稳定后就会发布。哈哈
--  作者:klc
--  发布时间:2013/8/7 17:43:05
--  

测试重点应该在同步持仓,大家可以写段代码自己监控下是否持仓一致,不一致发email通知:

 

我有一点代码大家可以参考:

 

首先把公式的holding写到全局变量中(EXTGBDATA),比较简单,这个就不给代码了

 

VBA监控代码:

Holding = Document.GetExtData("IFHOLDING")

dim BuyHoding
 dim BuyTodayHoding
 dim SellHoding
 dim SellTodayHoding
 dim BuyCost
 dim SellCost
 dim PNL
 Dim UseMargin

strcon = ""

Result = Order.HoldingInfoByCode2("IF08","ZJ",BuyHoding,BuyCost,BuyTodayHoding,SellHoding,SellCost,SellTodayHoding,PNL,UseMargin,"资金账户账号")
 If Result = 1 Then
  if Round(BuyHoding-SellHoding)<>Round(Holding) then
   strcon = strcon & code(0) & "持仓不同步,实际持仓" & Round(BuyHoding-SellHoding) & "手,应为" & Holding & "手" & vbCrLf
  end if
 End If

以上VBA代码可根据自己的需要每隔一段时间运行一次(例如1分钟循环检查),例子是监控IF08,看你交易的是什么了


--  作者:lichenghu
--  发布时间:2013/8/7 20:13:14
--  
好方法,回头大家可以试试。力求版本的稳定性