我想通过AddStock在对应市场新建一个品种用来存储某个品种某一时点的数据用于后期运算。新建的品种与当前品种在一个市场,编码为市场id加上00E。但却发现一个奇怪的事情,向高手请教一二
我的代码如下
Sub SaveDataInfo(codeid, marketid)
if(Not MarketData.IsExistStock(marketid&"00E", marketid)) then
Application.MsgOut(marketid&"00E")
Call MarketData.AddStock(marketid&"00E", marketid, marketid&"扩展展示")
end if
Set History = MarketData.GetHistoryData(codeid, marketid,0)
Call History.SaveData(marketid&"00E", marketid, 1)
Set History = MarketData.GetHistoryData(codeid, marketid,1)
Call History.SaveData(marketid&"00E", marketid, 2)
Set History = MarketData.GetHistoryData(codeid, marketid,5)
Call History.SaveData(marketid&"00E", marketid, 0)
End Sub
当程序运行时,就出现了奇怪的事情,当我传入的参数是 CU13, SQ 时,我切换到SQ00E查看数据是正确的。但当我传入的参数是IF13, ZJ时,当我切换到ZJ00E却发现数据没有保存。
通过测试,好像就是ZJ这个市场我新增的品种不能保存原有品种的数据,不知道这是什么原因?麻烦解惑,是不是有地方我没有考虑清楚,还是ZJ有其特殊性。
刚刚试了一下,SH也不行,很奇怪。如果我把IF00保存到SQ市场的SQ00E,好像倒是能保存,但是由于SQ市场H,C,L,O四个值只精确到个位数,而IF00是小数点后1位,所以好像也不行。