Need help with the close all postions script

Quoting zseventy1

Disliked

Hello everyone,

I am trying to run the Close All Positions Script because I want to be able to close about 10 to 20 open orders at a time. However when I attach the script to one of my charts the Alert comes up and tells me "Order Failed To close. Error:4109" Can someone advise me on what I am doing wrong.

Also, what I would really like to be able to run is a script that would allow me to put a take profit of either a cash balance or pip value of the total open orders. Once the total orders hits this value the script would automatically close all the positions. Can anyone advise me.

Thanks,
zseventy1

Ignored

//+------------------------------------------------------------------+
//|                                          close_all_positions.mq4 |
//|                                                         Zen Leow |
//|                                                                  |
//+------------------------------------------------------------------+
#property copyright "Zen Leow"
#property link      ""
#property show_confirm
#include <stdlib.mqh>
//+------------------------------------------------------------------+
//| script program start function                                    |
//+------------------------------------------------------------------+
int start()
{
//----
   int total = OrdersTotal()-1;
   int positionType;
   if (total > 0)
   {
      for(int cnt=total;cnt>=0;cnt--)
      {
         if(OrderSelect(cnt,SELECT_BY_POS))
         {
            positionType = OrderType();
            if (positionType == OP_BUY)
            {
               if (!OrderClose(OrderTicket(),OrderLots(),MarketInfo(OrderSymbol(),MODE_BID),3))
               {
                  OrderError();
               }
            }
            if (positionType == OP_SELL)
            {
               if (!OrderClose(OrderTicket(),OrderLots(),MarketInfo(OrderSymbol(),MODE_ASK),3))
               {
                  OrderError();
               }
            }
            if (positionType != OP_SELL && positionType != OP_BUY) // pending orders
            {
               if (!OrderDelete(OrderTicket()))
               {
                  OrderError();
               }
            }
         }
      }
   }
//----
   return(0);
}
void OrderError() {
  int iError=GetLastError();
  Print("Order:",OrderTicket()," GetLastError()=",iError," ",ErrorDescription(iError));
}
//+------------------------------------------------------------------+