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


金字塔客服中心 - 专业程序化交易软件提供商金字塔软件高级功能研发区 → SAVEDATA无法保存数据的问题?

   

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


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

主题:SAVEDATA无法保存数据的问题?

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


加好友 发短信
等级:新手上路 帖子:34 积分:0 威望:0 精华:0 注册:2011/3/17 0:27:50
SAVEDATA无法保存数据的问题?  发帖心情 Post By:2013/9/10 14:27:33 [显示全部帖子]

 

Sub SaveDataInfo'(codeid, marketid)

set grid=technic.GetGridByIndex(0)
set historydata=grid.gethistorydata()

getCode=grid.stocklabel
codeid="zb0001"
marketid=grid.market


if(Not MarketData.IsExistStock(codeid, marketid)) then
    Application.MsgOut(codeid)
    Call MarketData.AddStock(codeid, marketid, codeid&"自编")
 end if
 
 Set History = MarketData.GetHistoryData(getCode, marketid,0)
 Call History.SaveData(codeid, marketid, 1)
 Set History = MarketData.GetHistoryData(getCode, marketid,1)
 Call History.SaveData(codeid, marketid, 2)
 Set History = MarketData.GetHistoryData(getCode, marketid,5)
 Call History.SaveData(codeid, marketid, 0)

 

msgbox MarketData.GetHistoryData(getCode, marketid,5).count & "," & marketdata.GetHistoryData(codeid,marketid,5).count
End Sub

 

程序的本意是新建一个证券,并把getCode的数据保存到codeid的证券中,但结果codeid中的数据为空,请问是什么原因??谢谢!

 

 

 


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


加好友 发短信
等级:新手上路 帖子:34 积分:0 威望:0 精华:0 注册:2011/3/17 0:27:50
  发帖心情 Post By:2013/9/10 16:03:51 [显示全部帖子]

不行,addstock这个函数应该是有问题的,就是在部分市场无法存储成功数据!!请管理员反映这个问题,并解决

 


 回到顶部