以文本方式查看主题

-  金字塔客服中心 - 专业程序化交易软件提供商  (http://222.73.7.161/bbs/index.asp)
--  金字塔软件问题提交  (http://222.73.7.161/bbs/list.asp?boardid=2)
----  TISREMAIN(0)函数有问题  (http://222.73.7.161/bbs/dispbbs.asp?boardid=2&id=55709)
--  作者：lcgs005
--  发布时间：2013/8/26 14:20:40
--  TISREMAIN(0)函数有问题
当满足开仓条件，发出委托后，tholding未返回正确值前，此时应为有未成交单存在，但目前使用 TISREMAIN(0)仍返回为0，的错误值
--  作者：lichenghu
--  发布时间：2013/8/26 14:40:22
--  

您好，用debugfile输出值看下，发下记录
--  作者：lcgs005
--  发布时间：2013/8/26 16:14:57
--  整数关口
2013-08-26 14:08:19.281    开空条件1
2013-08-26 14:08:19.281    开空后真实持仓0
2013-08-26 14:08:19.281    开空后全局值-1
2013-08-26 14:08:19.281    开空后未成交委托0
2013-08-26 14:08:19.281    手动平仓后全局值0

程序代码如下：
//开空部份
kk:=tholding=0  and sc and islastbar ;
if kk then begin
DEBUGFILE(\'d:\\text\',\'开空条件%.0f\',kk);
tbuyshort(1,1,mkt);
DEBUGFILE(\'d:\\text\',\'开空后真实持仓%.0f\',tholding); 
extgbdataset(\'cw\',-1); 
DEBUGFILE(\'d:\\text\',\'开空后全局值%.0f\',extgbdata(\'cw\')); 
DEBUGFILE(\'d:\\text\',\'开空后未成交委托%.0f\',TISREMAIN(0));
end

if tholding=0 and islastbar  then begin//TISREMAIN(0)=0
extgbdataset(\'cw\',0); 
DEBUGFILE(\'d:\\text\',\'手动平仓后全局值%.0f\',extgbdata(\'cw\')); 
end
[此贴子已经被作者于2013/8/26 16:16:53编辑过]