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


金字塔客服中心 - 专业程序化交易软件提供商金字塔软件高级功能研发区 → VBA STKINDI 的问题

   

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


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

主题:VBA STKINDI 的问题

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


加好友 发短信
等级:论坛游侠 帖子:581 积分:171 威望:0 精华:0 注册:2013/4/2 6:58:20
VBA STKINDI 的问题  发帖心情 Post By:2019/5/28 13:39:26 [只看该作者]


sPolicyName = "IF2019A1" '策略名称
iPeriod=13 '13多分钟,2分钟
Set Formula = marketdata.STKINDI("IF00","ZJ",sPolicyName,0,iPeriod,2,2300)  'IF300 
CounTmp = Formula.DataSize-1
TRDKCC   = Formula.GetBufData("ccc",CounTmp) '取得PEL策略持仓
application.MsgOut cdate(time) & ",IF00 pel持仓:" & TRDKCC

sPolicyName = "RB2019A1" '策略名称
iPeriod=0 '0,1分钟
Set Formula = marketdata.STKINDI("RB00","SQ",sPolicyName,0,iPeriod,0,2300)   'RB00 
CounTmp = Formula.DataSize-1
TRDKCC   = Formula.GetBufData("ccc",CounTmp) '取得PEL策略持仓
application.MsgOut cdate(time) & ",RB00 pel持仓:" & TRDKCC

sPolicyName = "RU2019A1" '策略名称
iPeriod=1 '1,5分钟
Set Formula = marketdata.STKINDI("RU00","SQ",sPolicyName,0,iPeriod,0,2300)   'RU00 
CounTmp = Formula.DataSize-1
TRDKCC   = Formula.GetBufData("ccc",CounTmp) '取得PEL策略持仓
application.MsgOut cdate(time) & ",RU00 pel持仓:" & TRDKCC
……
……

都是这样的写法,总共有18个品种,不同的策略名称、不同的周期,为什么读取不到PEL中的 CCC值?  (策略加载在图表看到CCC是有数值的)


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


加好友 发短信
等级:论坛游侠 帖子:581 积分:171 威望:0 精华:0 注册:2013/4/2 6:58:20
  发帖心情 Post By:2019/5/28 13:45:41 [只看该作者]

补充一下,单个品种、单个策略来调取是可以得到 PEL 的CCC参数的

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


加好友 发短信
等级:超级版主 帖子:21598 积分:0 威望:0 精华:1 注册:2010/7/31 16:35:30
  发帖心情 Post By:2019/5/28 16:53:01 [只看该作者]

注意: 该方法返回的Formula对象将使用共享的内存缓冲区,如果你有多个品种需要转换并且同时处理,请使用数组类Array保存转换后的Formula对象数据.

返回的数据你要一个个保存

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


加好友 发短信
等级:论坛游侠 帖子:581 积分:171 威望:0 精华:0 注册:2013/4/2 6:58:20
  发帖心情 Post By:2019/5/28 17:08:53 [只看该作者]

现在是调用后用  application.MsgOut 输出,这个结果全部都是0,  保存到数据也是0.

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


加好友 发短信
等级:管理员 帖子:2437 积分:0 威望:0 精华:0 注册:2016/3/5 22:53:41
  发帖心情 Post By:2019/5/28 17:26:35 [只看该作者]

Formula.DataSize 打印调试看一下这个变量是多少,如果是0那么检查marketdata.STKINDI参数是否有误

 回到顶部