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


金字塔客服中心 - 专业程序化交易软件提供商 → 金字塔软件 → 高级功能研发区 → 如何在限定时间内不成交即撤单？、这个功能如何实现，求具体的代码？？

   

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

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

主题：如何在限定时间内不成交即撤单？、这个功能如何实现，求具体的代码？？
帅哥哟，离线，有人找我吗？
啊东西
 小大  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：新手上路 帖子：63 积分：0 威望：0 精华：0 注册：2014/8/15 10:20:25 		如何在限定时间内不成交即撤单？、这个功能如何实现，求具体的代码？？  发帖心情 Post By：2014/11/20 19:15:32 [显示全部帖子]

 fglongorderid=Getlongpendingorder("FG06","ZQ")
fglongorderidtime=order.OrderInfoTime2(fglongorderid)
上面两行，我已经取得了未成交单子的单号和委托的时间，假如说我要委托后十秒钟不能成交就撤单，我该怎么写？
 回到顶部
帅哥哟，离线，有人找我吗？
啊东西
 小大  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：新手上路 帖子：63 积分：0 威望：0 精华：0 注册：2014/8/15 10:20:25 		  发帖心情 Post By：2014/11/23 21:20:13 [显示全部帖子]

请教版主一下，如果是我要取得某一个品种的空头多仓或者空仓的未成交单子，请问这样子的写法对吗？？
Function Getshortpendingorder(Scode,Smarket)  '获取未成交单
Dim Orderid   '订单Id
Dim Filled   '提交手数
Dim Remaining  '剩余手数
Dim Action   '买卖
Dim Ordertype  '订单类型
Dim Lmtprice  '委托价
Dim Account1   '账户
Dim Kaiping   '开平
Getshortpendingorder=0
Pendingcount=Order.Ordernum2
For i=0 To Pendingcount-1
    Call Order.Orderinfo2(i,Orderid,Consign,Filled,Remaining,Action,Ordertype,Lmtprice,Account1,Kaiping,Code,Market)
    If Code=Scode and action=1 and kaiping=0 Then
    
        GETshortPENDINGORDER=ORDERID
    End If
    if Code=Scode and action=0 and kaiping=2 then
        GETshortPENDINGORDER1=ORDERID
    end if
Next
End Function
 回到顶部
帅哥哟，离线，有人找我吗？
啊东西
 小大  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：新手上路 帖子：63 积分：0 威望：0 精华：0 注册：2014/8/15 10:20:25 		  发帖心情 Post By：2014/11/23 21:21:40 [显示全部帖子]

写错了，应该是取得空头的开仓单子或者平仓单子？


 回到顶部
帅哥哟，离线，有人找我吗？
啊东西
 小大  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：新手上路 帖子：63 积分：0 威望：0 精华：0 注册：2014/8/15 10:20:25 		  发帖心情 Post By：2014/11/23 21:28:36 [显示全部帖子]

请问你给的代码当中的 OrdTime=right(Order.OrderInfoTime2(i),8)是什么意思呢？

 回到顶部
帅哥哟，离线，有人找我吗？
啊东西
 小大  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：新手上路 帖子：63 积分：0 威望：0 精华：0 注册：2014/8/15 10:20:25 		  发帖心情 Post By：2014/11/24 9:32:17 [显示全部帖子]

版主大哥，我的疑惑主要在于

OrdTime=right(Order.OrderInfoTime2(i),8)这个语句里面有这个right(  ,8)是不是因为是因为某些品种的交易时间因为在金字塔上经过修改，与实际时间不一致，所以会将时间前移8个小时，请问是不是这样？、
 回到顶部
帅哥哟，离线，有人找我吗？
啊东西
 小大  6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：新手上路 帖子：63 积分：0 威望：0 精华：0 注册：2014/8/15 10:20:25 		  发帖心情 Post By：2014/11/24 9:34:49 [显示全部帖子]

小弟还有一个问题想请教一下大哥：金字塔VBA在一个项目当中的一个小模块当中，最多可以写多少行VBA代码？？如果是使用专业机构版的多账户功能，在VBA的情况下，是不是最多可以登录15个账户？？


 回到顶部
RSS2.0 | Xhtml无图版 | Xslt无图版    Powered By weistock 2012
页面执行时间 0.20313 秒, 6 次数据查询