How to close if open for time

[Matt_mm]

Hi,

I'm trying to close pending positions if open for more than a certain time

I've tried:

Code: Select all

for i:=0 to OrdersTotal - 1 do
begin
  GetOrderInfo(i, info);
  if OrderSelect(i, SELECT_BY_POS, MODE_TRADES) then
  begin
    if (OrderType in [tp_BuyStop, tp_SellStop]) and ((info.OpenTime + DateUtils.OneHour*24) < DateOf(time)) then
    begin
       DeleteOrder(OrderTicket);
    end;
  end;
end;

With no luck.

I'd appreciate any suggestions.

[Terranin]

Hi,

I'm trying to close pending positions if open for more than a certain time

I've tried:

Code: Select all

for i:=0 to OrdersTotal - 1 do
begin
  GetOrderInfo(i, info);
  if OrderSelect(i, SELECT_BY_POS, MODE_TRADES) then
  begin
    if (OrderType in [tp_BuyStop, tp_SellStop]) and ((info.OpenTime + DateUtils.OneHour*24) < DateOf(time)) then
    begin
       DeleteOrder(OrderTicket);
    end;
  end;
end;

With no luck.

I'd appreciate any suggestions.

It is unclear for me what is Time variable? If you did not set it, then it is standard function returning current time (your computer time, not trading time). If you need current trading time, use TimeCurrent (this function is available with new 2.1 version) or iTime(Symbol, 1, 0) to get time of the last 1 minute bar.

Also there is no need in GetOrderInfo, you can use OrderOpenTime instead of info.OpenTime.

[Matt_mm]

Thanks Terranin,

It's working now, thanks for pointing out with the time variable I hadn't defined it:-)

Cheers,

Matt