關于order下單的問題 [金字塔]
- 咨詢內容：
忽然想到一個有點"杞人憂天"的想法,比如下面的語句:
result=order.buy()if result=-1 then ....
order下單之后,如果回報較慢,會不會出現明明下單成功了,但由于程序運行速度過快,以致于沒有等到成交回報就返回,導致result錯誤返回-1.可能出現這種情況嗎?不知道這個擔心是不是很白癡
- 金字塔客服：
不用擔心，返回值是你的報單ID,不是成交回報，報單ID不用等成交回報的
- 用戶回復：
這個Result=ORDER.BUY(....)我感覺肯定有問題,我今天早上,不斷重復開倉,就是因為下單成功但Result錯誤返回0造成的.具體來說
BUYcon=Document.GetPrivateProfileString("OrderCon",tLabel & "BUYCon_" & tIndex,"","D:\SystemSet.ini") '本次觸發條件 BUYconL=Document.GetPrivateProfileString("OrderCon",tLabel & "BUYConL_" & tIndex,"","D:\SystemSet.ini") '保存的上次觸發條件,以便一根k線一條語句僅執行一遍
if BUYcon<>BUYconL then order.OrderQueue = 1 orderlog=Date & " " & Time & ",賬戶:" & tAcc & "," & tMarket & tCode & "在VBABUY中下單,手數:" & Num & ",原因:" & BUYcon & "<>" & BUYconL '每句下單命令前都要寫入下單日志便于查找原因 Document.DebugFile "D:\OrderLog.txt",orderlog,0 Result=ORDER.BUY(1,Num,0,0,tCode,tMarket,tAcc,0)
if Result=0 then orderstr="賬號:" & tAcc & "," & tMarket & tCode & "," & Num & "手多開下單失敗!重點檢查賬號是否登錄" JIANGE tCode & "orderfail1",orderstr exit sub end if
Document.WritePrivateProfileString "OrderCon",tLabel & "BUYConL_"& tIndex,BUYcon,"D:\SystemSet.ini" '我現在是把這句放在if Result=0 then前面,因為發現有時下單成功卻result返回0,以致執行了exit sub,后面無法寫入tLabel & "BUYConL_"& tIndex,從而不斷重復開倉! ordermsg tCode,tMarket,Num,1
end if [此貼子已經被作者于2014/9/10 13:26:02編輯過] - 網友回復：
請你們再測試一下
- 網友回復： 是否方便將你記錄的日志也發過來,最好是別用INI文件,我們需要是那種連續記錄的日志,這樣可以對歷史下單記錄進行分析的
有思路，想編寫各種指標公式，程序化交易模型，選股公式，預警公式的朋友
可聯系技術人員 QQ: 1145508240 進行 有償 編寫！（不貴！點擊查看價格！）
相關文章
-
沒有相關內容
會員登錄/注冊