【超入門】MQL5　ＥＡ講座　第90回「待機注文を修正する関数を実装する」

public:

bool SetSLTP(ulong parTicket, double parStop, double parProfit = 0);
  //待機注文を修正する
  bool ChangePending(ulong parTicket, double parPrice, double parStop, double parProfit, datetime parExpiration = 0);
  //ポジションをクローズする
  bool ClosePosition(ulong parTicket, double parVolume = 0, string parComment = NULL);

//待機注文を修正する
 bool ChangePending(ulong parTicket, 
                    double parPrice, 
                    double parStop, 
                    double parProfit,
                    datetime parExpiration = 0);

//待機注文の内容を修正する
bool OriginalCTrade::ChangePending(ulong parTicket,double parPrice,double parStop,double parProfit,datetime parExpiration=0)
{
   //インスタンスのリセット
	ZeroMemory(request);
	ZeroMemory(result);
	
	//各種メンバ変数への値代入
	request.action = TRADE_ACTION_MODIFY;
	request.order = parTicket;
	request.sl = parStop;
	request.tp = parProfit;
	
	////待機注文の選択
	bool select = OrderSelect(parTicket);
	
	//parPriceに値が入力されていれば、parPriceの値をrequest.priceにセット
	if(parPrice > 0) request.price = parPrice;
	else request.price = OrderGetDouble(ORDER_PRICE_OPEN);
	
	//parExpirationに値が入力されていれば、request.expirationにセット
	if(parExpiration > 0)
	{
		request.expiration = parExpiration;
		request.type_time = ORDER_TIME_SPECIFIED;
	}
	else request.type_time = ORDER_TIME_GTC;
	
	// リトライ回数とリターンコードを格納する変数を宣言
	int retryCount = 0;//再試行回数を格納する
	int checkCode = 0;//リターンコードを格納する
	
	do 
	{  //待機注文の修正注文を出す。
		bool sent = OrderSend(request,result);
		//注文結果を返す
		checkCode = ReturnCodeCheck(result.retcode);
		
		//約定成功の場合do-whileループを抜ける
		if(checkCode == CHECK_RETCODE_OK) break;
		//再試行しても解決しないエラーの場合
		else if(checkCode == CHECK_RETCODE_ERROR)
		{  //リターンコードを取得
			string errDesc = TradeServerReturnCodeDescription(result.retcode);
			//アラートを発出
			Alert("待機注文修正エラー: エラー内容 ",result.retcode," - ",errDesc);
			//ログの出力
			TradeLog();
			break;//ループを抜ける
		}
		
		//再試行すれば解決する可能性のあるエラーの場合
		else
		{
			Print("サーバーエラーを検知。 再試行中...");
			//次の処理までの待機
			Sleep(RETRY_MILLISECONDS);
			//再試行回数をカウントする変数をインクリメントする
			retryCount++;
		}
	}
	while(retryCount < RETRY_LIMIT);
	
	if(retryCount >= RETRY_LIMIT)
	{
		string errDesc = TradeServerReturnCodeDescription(result.retcode);
		Alert("再注文上限回数に達しました: エラー内容 ",result.retcode," - ",errDesc);
	}
	
	select = OrderSelect(parTicket);
	
	string errDesc = TradeServerReturnCodeDescription(result.retcode);
	Print("待機注文の修正 #",parTicket,": ",
	      result.retcode," - ",errDesc,", Price: ",
	      OrderGetDouble(ORDER_PRICE_OPEN),", SL: ",request.sl,
	      ", TP: ",request.tp,", Expiration: ",request.expiration);
	
	if(checkCode == CHECK_RETCODE_OK) 
	{
		Comment("待機注文 ",parTicket," 修正後の内容,",
		" Price: ",OrderGetDouble(ORDER_PRICE_OPEN),
		", SL: ",request.sl,", TP: ",request.tp);
		
		//注文が成功した場合、trueを返す
		return(true);
	}
	//注文が失敗した場合、falseを返す
	else return(false);
}

//インスタンスのリセット
	ZeroMemory(request);
	ZeroMemory(result);
	
	//各種メンバ変数への値代入
	request.action = TRADE_ACTION_MODIFY;
	request.order = parTicket;
	request.sl = parStop;
	request.tp = parProfit;
	
	//待機注文の選択
	bool select = OrderSelect(parTicket);
	
	//parPriceに値が入力されていれば、parPriceの値をrequest.priceにセット
	if(parPrice > 0) request.price = parPrice;
	else request.price = OrderGetDouble(ORDER_PRICE_OPEN);
	
	//parExpirationに値が入力されていれば、request.expirationにセット
	if(parExpiration > 0)
	{
		request.expiration = parExpiration;
		request.type_time = ORDER_TIME_SPECIFIED;
	}
	else request.type_time = ORDER_TIME_GTC;

	// リトライ回数とリターンコードを格納する変数を宣言
	int retryCount = 0;//再試行回数を格納する
	int checkCode = 0;//リターンコードを格納する

do 
	{  //待機注文の修正注文を出す。
		bool sent = OrderSend(request,result);
		//注文結果を返す
		checkCode = ReturnCodeCheck(result.retcode);
		
		//約定成功の場合do-whileループを抜ける
		if(checkCode == CHECK_RETCODE_OK) break;
		//再試行しても解決しないエラーの場合
		else if(checkCode == CHECK_RETCODE_ERROR)
		{  //リターンコードを取得
			string errDesc = TradeServerReturnCodeDescription(result.retcode);
			//アラートを発出
			Alert("待機注文修正エラー: エラー内容 ",result.retcode," - ",errDesc);
			//ログの出力
			TradeLog();
			break;//ループを抜ける
		}
		
		//再試行すれば解決する可能性のあるエラーの場合
		else
		{
			Print("サーバーエラーを検知。 再試行中...");
			//次の処理までの待機
			Sleep(RETRY_MILLISECONDS);
			//再試行回数をカウントする変数をインクリメントする
			retryCount++;
		}
	}
	while(retryCount < RETRY_LIMIT);

if(retryCount >= RETRY_LIMIT)
	{
		string errDesc = TradeServerReturnCodeDescription(result.retcode);
		Alert("再注文上限回数に達しました: エラー内容 ",result.retcode," - ",errDesc);
	}

select = OrderSelect(parTicket);
	
	string errDesc = TradeServerReturnCodeDescription(result.retcode);
	Print("待機注文の修正 #",parTicket,": ",
	      result.retcode," - ",errDesc,", Price: ",
	      OrderGetDouble(ORDER_PRICE_OPEN),", SL: ",request.sl,
	      ", TP: ",request.tp,", Expiration: ",request.expiration);

if(checkCode == CHECK_RETCODE_OK) 
	{
		Comment("待機注文 ",parTicket," 修正後の内容,",
		" Price: ",OrderGetDouble(ORDER_PRICE_OPEN),
		", SL: ",request.sl,", TP: ",request.tp);
		
		//注文が成功した場合、trueを返す
		return(true);
	}
	//注文が失敗した場合、falseを返す
	else return(false);
}

 //待機注文を修正する
  bool ChangePending(ulong parTicket, //待機注文のオーダー番号が記述される想定
                     double parPrice,//約定予定価格が記述される想定
                     double parStop,//損切り価格（ストップロス）が記述される想定
                     double parProfit,//利益確定価格が記述される想定
                    datetime parExpiration = 0);//待機注文の有効期限が記述される想定

//待機注文の内容を修正する
bool OriginalCTrade::ChangePending(ulong parTicket,double parPrice,double parStop,double parProfit,datetime parExpiration=0)
{
   //インスタンスのリセット
	ZeroMemory(request);
	ZeroMemory(result);
	
	//各種メンバ変数への値代入
	request.action = TRADE_ACTION_MODIFY;
	request.order = parTicket;
	request.sl = parStop;
	request.tp = parProfit;
	
	//待機注文の選択
	bool select = OrderSelect(parTicket);
	
	//parPriceに値が入力されていれば、parPriceの値をrequest.priceにセット
	if(parPrice > 0) request.price = parPrice;
	else request.price = OrderGetDouble(ORDER_PRICE_OPEN);
	
	//parExpirationに値が入力されていれば、request.expirationにセット
	if(parExpiration > 0)
	{
		request.expiration = parExpiration;
		request.type_time = ORDER_TIME_SPECIFIED;
	}
	else request.type_time = ORDER_TIME_GTC;
	
	// リトライ回数とリターンコードを格納する変数を宣言
	int retryCount = 0;//再試行回数を格納する
	int checkCode = 0;//リターンコードを格納する
	
	do 
	{  //待機注文の修正注文を出す。
		bool sent = OrderSend(request,result);
		//注文結果を返す
		checkCode = ReturnCodeCheck(result.retcode);
		
		//約定成功の場合do-whileループを抜ける
		if(checkCode == CHECK_RETCODE_OK) break;
		//再試行しても解決しないエラーの場合
		else if(checkCode == CHECK_RETCODE_ERROR)
		{  //リターンコードを取得
			string errDesc = TradeServerReturnCodeDescription(result.retcode);
			//アラートを発出
			Alert("待機注文修正エラー: エラー内容 ",result.retcode," - ",errDesc);
			//ログの出力
			TradeLog();
			break;//ループを抜ける
		}
		
		//再試行すれば解決する可能性のあるエラーの場合
		else
		{
			Print("サーバーエラーを検知。 再試行中...");
			//次の処理までの待機
			Sleep(RETRY_MILLISECONDS);
			//再試行回数をカウントする変数をインクリメントする
			retryCount++;
		}
	}
	while(retryCount < RETRY_LIMIT);
	
	if(retryCount >= RETRY_LIMIT)
	{
		string errDesc = TradeServerReturnCodeDescription(result.retcode);
		Alert("再注文上限回数に達しました: エラー内容 ",result.retcode," - ",errDesc);
	}
	
	select = OrderSelect(parTicket);
	
	string errDesc = TradeServerReturnCodeDescription(result.retcode);
	Print("待機注文の修正 #",parTicket,": ",
	      result.retcode," - ",errDesc,", Price: ",
	      OrderGetDouble(ORDER_PRICE_OPEN),", SL: ",request.sl,
	      ", TP: ",request.tp,", Expiration: ",request.expiration);
	
	if(checkCode == CHECK_RETCODE_OK) 
	{
		Comment("待機注文 ",parTicket," 修正後の内容,",
		" Price: ",OrderGetDouble(ORDER_PRICE_OPEN),
		", SL: ",request.sl,", TP: ",request.tp);
		
		//注文が成功した場合、trueを返す
		return(true);
	}
	//注文が失敗した場合、falseを返す
	else return(false);
}