void AddSingleInputDebugItemAfterException(IExecutionEnvironment environment, IAssignValue assignValue, int update, DebugItem debugItem, string VariableLabelText, string NewFieldLabelText)
{
if (DataListUtil.IsEvaluated(assignValue.Value))
{
var newValueResult = environment.Eval(assignValue.Value, update);
if (newValueResult.IsWarewolfAtomResult)
{
if (newValueResult is CommonFunctions.WarewolfEvalResult.WarewolfAtomResult valueResult)
{
AddDebugItem(new DebugItemWarewolfAtomResult("", ExecutionEnvironment.WarewolfAtomToString(valueResult.Item), environment.EvalToExpression(assignValue.Name, update), assignValue.Value, VariableLabelText, NewFieldLabelText, "="), debugItem);
}
}
else
{
if (newValueResult.IsWarewolfAtomListresult)
{
AddDebugItem(new DebugItemWarewolfAtomListResult(null, newValueResult, environment.EvalToExpression(assignValue.Value, update), assignValue.Name, VariableLabelText, NewFieldLabelText, "="), debugItem);
}
}
}
else
{
AddDebugItem(new DebugItemWarewolfAtomResult("", assignValue.Value, environment.EvalToExpression(assignValue.Name, update), "", VariableLabelText, NewFieldLabelText, "="), debugItem);
}
}
private void AddErrorDebugItem(IExecutionEnvironment environment, int innerCount, IAssignValue assignValue, int update, DebugItem debugItem, string VariableLabelText, string NewFieldLabelText)
{
AddDebugItem(new DebugItemStaticDataParams("", innerCount.ToString(CultureInfo.InvariantCulture)), debugItem);
if (DataListUtil.IsEvaluated(assignValue.Value))
{
var newValueResult = environment.Eval(assignValue.Value, update);
if (newValueResult.IsWarewolfAtomResult)
{
if (newValueResult is CommonFunctions.WarewolfEvalResult.WarewolfAtomResult valueResult)
{
AddDebugItem(new DebugItemWarewolfAtomResult("", ExecutionEnvironment.WarewolfAtomToString(valueResult.Item), environment.EvalToExpression(assignValue.Name, update), assignValue.Value, VariableLabelText, NewFieldLabelText, "="), debugItem);
}
}
else
{
if (newValueResult.IsWarewolfAtomListresult)
{
AddDebugItem(new DebugItemWarewolfAtomListResult(null, newValueResult, environment.EvalToExpression(assignValue.Value, update), assignValue.Name, VariableLabelText, NewFieldLabelText, "="), debugItem);
}
}
}
else
{
AddDebugItem(new DebugItemWarewolfAtomResult("", assignValue.Value, environment.EvalToExpression(assignValue.Name, update), "", VariableLabelText, NewFieldLabelText, "="), debugItem);
}
}
public DebugEvalResult(string inputVariable, string label, IExecutionEnvironment environment, bool isDataMerge = false)
{
_inputVariable = inputVariable.Trim();
_label = label;
try
{
if (ExecutionEnvironment.IsRecordsetIdentifier(_inputVariable) && DataListUtil.IsEvaluated(_inputVariable))
{
if (DataListUtil.GetRecordsetIndexType(_inputVariable) == enRecordsetIndexType.Blank)
{
var length = environment.GetLength(DataListUtil.ExtractRecordsetNameFromValue(_inputVariable));
_inputVariable = DataListUtil.ReplaceRecordsetBlankWithIndex(_inputVariable, length);
}
}
if (isDataMerge)
{
var evalForDataMerge = environment.EvalForDataMerge(_inputVariable);
var innerIterator = new WarewolfListIterator();
var innerListOfIters = new List <WarewolfIterator>();
foreach (var listOfIterator in evalForDataMerge)
{
var inIterator = new WarewolfIterator(listOfIterator);
innerIterator.AddVariableToIterateOn(inIterator);
innerListOfIters.Add(inIterator);
}
var atomList = new List <DataASTMutable.WarewolfAtom>();
while (innerIterator.HasMoreData())
{
var stringToUse = "";
// ReSharper disable once LoopCanBeConvertedToQuery
foreach (var warewolfIterator in innerListOfIters)
{
stringToUse += warewolfIterator.GetNextValue();
}
atomList.Add(DataASTMutable.WarewolfAtom.NewDataString(stringToUse));
}
var finalString = string.Join("", atomList);
_evalResult = WarewolfDataEvaluationCommon.WarewolfEvalResult.NewWarewolfAtomListresult(new WarewolfAtomList <DataASTMutable.WarewolfAtom>(DataASTMutable.WarewolfAtom.Nothing, atomList));
if (DataListUtil.IsFullyEvaluated(finalString))
{
_inputVariable = finalString;
_evalResult = environment.Eval(finalString);
}
}
else
{
var evalToExpression = environment.EvalToExpression(_inputVariable);
if (DataListUtil.IsEvaluated(evalToExpression))
{
_inputVariable = evalToExpression;
}
_evalResult = environment.Eval(_inputVariable);
}
}
catch (Exception e)
{
Dev2Logger.Log.Error(e.Message, e);
_evalResult = WarewolfDataEvaluationCommon.WarewolfEvalResult.NewWarewolfAtomResult(DataASTMutable.WarewolfAtom.Nothing);
}
}
private void RegularItem(IExecutionEnvironment environment, int update, bool isCalculate)
{
var evalToExpression = environment.EvalToExpression(_inputVariable, update);
if (DataListUtil.IsEvaluated(evalToExpression))
{
_inputVariable = evalToExpression;
}
_evalResult = environment.Eval(_inputVariable, update);
string cleanExpression;
var isCalcExpression = DataListUtil.IsCalcEvaluation(_inputVariable, out cleanExpression);
if (isCalcExpression && !isCalculate)
{
if (_evalResult.IsWarewolfAtomResult)
{
var atomResult = _evalResult as CommonFunctions.WarewolfEvalResult.WarewolfAtomResult;
if (atomResult != null)
{
var res = atomResult.Item.ToString();
string resValue;
DataListUtil.IsCalcEvaluation(res, out resValue);
_evalResult = CommonFunctions.WarewolfEvalResult.NewWarewolfAtomResult(DataStorage.WarewolfAtom.NewDataString(resValue));
}
}
_inputVariable = cleanExpression;
}
}
void DataMergeItem(IExecutionEnvironment environment, int update)
{
var evalForDataMerge = environment.EvalForDataMerge(_inputVariable, update);
var innerIterator = new WarewolfListIterator();
var innerListOfIters = new List <WarewolfIterator>();
foreach (var listOfIterator in evalForDataMerge)
{
var inIterator = new WarewolfIterator(listOfIterator);
innerIterator.AddVariableToIterateOn(inIterator);
innerListOfIters.Add(inIterator);
}
var atomList = new List <DataStorage.WarewolfAtom>();
while (innerIterator.HasMoreData())
{
var stringToUse = "";
foreach (var warewolfIterator in innerListOfIters)
{
stringToUse += warewolfIterator.GetNextValue();
}
atomList.Add(DataStorage.WarewolfAtom.NewDataString(stringToUse));
}
var finalString = string.Join("", atomList);
_evalResult = CommonFunctions.WarewolfEvalResult.NewWarewolfAtomListresult(new WarewolfAtomList <DataStorage.WarewolfAtom>(DataStorage.WarewolfAtom.Nothing, atomList));
if (DataListUtil.IsFullyEvaluated(finalString))
{
_inputVariable = finalString;
_evalResult = environment.Eval(finalString, update);
}
else
{
var evalToExpression = environment.EvalToExpression(_inputVariable, update);
if (DataListUtil.IsEvaluated(evalToExpression))
{
_inputVariable = evalToExpression;
}
}
}
void AddWarewolfAtomListDebugResult(IExecutionEnvironment environment, IAssignValue assignValue, int update, DebugItem debugItem, string VariableLabelText, string NewFieldLabelText, CommonFunctions.WarewolfEvalResult evalResult)
{
if (evalResult.IsWarewolfAtomListresult)
{
if (DataListUtil.GetRecordsetIndexType(assignValue.Name) == enRecordsetIndexType.Blank)
{
AddDebugItem(new DebugItemWarewolfAtomListResult(null, assignValue.Value, "", environment.EvalToExpression(assignValue.Name, update), VariableLabelText, NewFieldLabelText, "="), debugItem);
}
else
{
if (evalResult is CommonFunctions.WarewolfEvalResult.WarewolfAtomListresult recSetResult)
{
AddDebugItem(new DebugItemWarewolfAtomListResult(recSetResult, assignValue.Value, "", environment.EvalToExpression(assignValue.Name, update), VariableLabelText, NewFieldLabelText, "="), debugItem);
}
}
}
}
void CreateDebugInput(IExecutionEnvironment environment, int innerCount, IAssignValue assignValue, int update, DebugItem debugItem, string VariableLabelText, string NewFieldLabelText)
{
if (!DataListUtil.IsEvaluated(assignValue.Value))
{
var evalResult = environment.Eval(assignValue.Name, update);
AddDebugItem(new DebugItemStaticDataParams("", innerCount.ToString(CultureInfo.InvariantCulture)), debugItem);
if (evalResult.IsWarewolfAtomResult)
{
if (evalResult is CommonFunctions.WarewolfEvalResult.WarewolfAtomResult scalarResult)
{
AddDebugItem(new DebugItemWarewolfAtomResult(ExecutionEnvironment.WarewolfAtomToString(scalarResult.Item), assignValue.Value, environment.EvalToExpression(assignValue.Name, update), "", VariableLabelText, NewFieldLabelText, "="), debugItem);
}
}
else
{
AddWarewolfAtomListDebugResult(environment, assignValue, update, debugItem, VariableLabelText, NewFieldLabelText, evalResult);
}
}
else
{
if (DataListUtil.IsEvaluated(assignValue.Value))
{
AddEvaluatedDebugItem(environment, innerCount, assignValue, update, NewFieldLabelText, VariableLabelText, debugItem);
}
}
}
public string EvalToExpression(string exp, int update)
{
return(_inner.EvalToExpression(exp, 0));
}
void AddSingleDebugOutputItem(IExecutionEnvironment environment, int innerCount, IAssignValue assignValue, int update)
{
const string VariableLabelText = "";
const string NewFieldLabelText = "";
var debugItem = new DebugItem();
try
{
if (!DataListUtil.IsEvaluated(assignValue.Value))
{
AddNotEvaluatedDebugOutputItem(environment, innerCount, assignValue, update, VariableLabelText, NewFieldLabelText, debugItem);
}
if (DataListUtil.IsEvaluated(assignValue.Value))
{
AddEvaluatedDebugOutputItem(environment, innerCount, assignValue, update, VariableLabelText, NewFieldLabelText, debugItem);
}
}
catch (NullValueInVariableException)
{
AddDebugItem(new DebugItemWarewolfAtomResult("", assignValue.Value, "", environment.EvalToExpression(assignValue.Name, update), VariableLabelText, NewFieldLabelText, "="), debugItem);
}
_debugOutputs.Add(debugItem);
}
DebugItem AddSingleInputDebugItem(IExecutionEnvironment environment, int innerCount, IAssignValue assignValue, int update)
{
var debugItem = new DebugItem();
const string VariableLabelText = "Variable";
const string NewFieldLabelText = "New Value";
try
{
if (!DataListUtil.IsEvaluated(assignValue.Value))
{
AddNotEvaluatedDebugInputItem(environment, innerCount, assignValue, update, debugItem, VariableLabelText, NewFieldLabelText);
}
if (DataListUtil.IsEvaluated(assignValue.Value))
{
AddEvaluatedDebugInputItem(environment, innerCount, assignValue, update, debugItem, VariableLabelText, NewFieldLabelText);
}
}
catch (Exception e)
{
if (e.Message.Contains("ParseError"))
{
AddDebugItem(new DebugItemWarewolfAtomResult("", assignValue.Value, environment.EvalToExpression(assignValue.Name, update), "", VariableLabelText, NewFieldLabelText, "="), debugItem);
return(debugItem);
}
if (!ExecutionEnvironment.IsValidVariableExpression(assignValue.Name, out string errorMessage, update))
{
return(null);
}
AddDefaultDebugItem(innerCount, debugItem);
AddSingleInputDebugItemAfterException(environment, assignValue, update, debugItem, VariableLabelText, NewFieldLabelText);
}
return(debugItem);
}
private void AddDebugInputItem(IExecutionEnvironment environment, int innerCount, IAssignValue assignValue, int update, DebugItem debugItem, string VariableLabelText, string NewFieldLabelText)
{
if (assignValue.Name.EndsWith("()]]"))
{
throw new Exception("Append data to array");
}
var evalResult = environment.Eval(assignValue.Name, update);
AddDebugItem(new DebugItemStaticDataParams("", innerCount.ToString(CultureInfo.InvariantCulture)), debugItem);
if (evalResult.IsWarewolfAtomResult)
{
if (evalResult is CommonFunctions.WarewolfEvalResult.WarewolfAtomResult scalarResult)
{
AddDebugItem(new DebugItemWarewolfAtomResult(ExecutionEnvironment.WarewolfAtomToString(scalarResult.Item), assignValue.Value, environment.EvalToExpression(assignValue.Name, update), "", VariableLabelText, NewFieldLabelText, "="), debugItem);
}
}
else
{
if (evalResult.IsWarewolfAtomListresult)
{
AddDebugItem(new DebugItemWarewolfAtomListResult(null, assignValue.Value, "", environment.EvalToExpression(assignValue.Name, update), VariableLabelText, NewFieldLabelText, "="), debugItem);
}
}
}
private void AddScalarValueResult(IExecutionEnvironment environment, IAssignValue assignValue, int update, DebugItem debugItem, CommonFunctions.WarewolfEvalResult oldValueResult, CommonFunctions.WarewolfEvalResult newValueResult)
{
var scalarResult = oldValueResult as CommonFunctions.WarewolfEvalResult.WarewolfAtomResult;
if (newValueResult is CommonFunctions.WarewolfEvalResult.WarewolfAtomResult valueResult && scalarResult != null)
{
AddDebugItem(new DebugItemWarewolfAtomResult(ExecutionEnvironment.WarewolfAtomToString(scalarResult.Item), ExecutionEnvironment.WarewolfAtomToString(valueResult.Item), assignValue.Name, environment.EvalToExpression(assignValue.Value, update), VariableLabelText, NewFieldLabelText, "="), debugItem);
}
}
void AddEvaluatedDebugItem(IExecutionEnvironment environment, int innerCount, IAssignValue assignValue, int update, DebugItem debugItem)
{
var oldValueResult = environment.Eval(assignValue.Name, update);
var newValueResult = environment.Eval(assignValue.Value, update);
AddDebugItem(new DebugItemStaticDataParams("", innerCount.ToString(CultureInfo.InvariantCulture)), debugItem);
if (oldValueResult.IsWarewolfAtomResult && newValueResult.IsWarewolfAtomResult)
{
AddScalarValueResult(environment, assignValue, update, debugItem, oldValueResult, newValueResult);
}
else if (newValueResult.IsWarewolfAtomResult && oldValueResult.IsWarewolfAtomListresult)
{
AddDebugItem(new DebugItemWarewolfAtomListResult(null, newValueResult, environment.EvalToExpression(assignValue.Value, update), environment.EvalToExpression(assignValue.Name, update), VariableLabelText, NewFieldLabelText, "="), debugItem);
}
else if (oldValueResult.IsWarewolfAtomResult && newValueResult.IsWarewolfAtomListresult)
{
AddDebugItem(new DebugItemWarewolfAtomListResult(null, newValueResult, environment.EvalToExpression(assignValue.Value, update), environment.EvalToExpression(assignValue.Name, update), VariableLabelText, NewFieldLabelText, "="), debugItem);
}
else
{
if (oldValueResult.IsWarewolfAtomListresult && newValueResult.IsWarewolfAtomListresult)
{
var recSetResult = oldValueResult as CommonFunctions.WarewolfEvalResult.WarewolfAtomListresult;
AddDebugItem(new DebugItemWarewolfAtomListResult(recSetResult, newValueResult, environment.EvalToExpression(assignValue.Value, update), environment.EvalToExpression(assignValue.Name, update), VariableLabelText, NewFieldLabelText, "="), debugItem);
}
}
}
private void AddSingleDebugOutputItem(IExecutionEnvironment environment, int innerCount, IAssignValue assignValue, int update)
{
const string VariableLabelText = "";
const string NewFieldLabelText = "";
var debugItem = new DebugItem();
try
{
if (!DataListUtil.IsEvaluated(assignValue.Value))
{
var evalResult = environment.Eval(assignValue.Name, update);
AddDebugItem(new DebugItemStaticDataParams("", innerCount.ToString(CultureInfo.InvariantCulture)), debugItem);
if (evalResult.IsWarewolfAtomResult)
{
var scalarResult = evalResult as CommonFunctions.WarewolfEvalResult.WarewolfAtomResult;
if (scalarResult != null)
{
AddDebugItem(new DebugItemWarewolfAtomResult(ExecutionEnvironment.WarewolfAtomToString(scalarResult.Item), assignValue.Value, environment.EvalToExpression(assignValue.Name, update), "", VariableLabelText, NewFieldLabelText, "="), debugItem);
}
}
else if (evalResult.IsWarewolfAtomListresult)
{
var recSetResult = evalResult as CommonFunctions.WarewolfEvalResult.WarewolfAtomListresult;
if (recSetResult != null)
{
AddDebugItem(new DebugItemWarewolfAtomListResult(recSetResult, "", "", environment.EvalToExpression(assignValue.Name, update), VariableLabelText, NewFieldLabelText, "="), debugItem);
}
}
}
else if (DataListUtil.IsEvaluated(assignValue.Value))
{
var evalResult = environment.Eval(assignValue.Name, update);
AddDebugItem(new DebugItemStaticDataParams("", innerCount.ToString(CultureInfo.InvariantCulture)), debugItem);
if (evalResult.IsWarewolfAtomResult)
{
var scalarResult = evalResult as CommonFunctions.WarewolfEvalResult.WarewolfAtomResult;
if (scalarResult != null)
{
AddDebugItem(new DebugItemWarewolfAtomResult(ExecutionEnvironment.WarewolfAtomToString(scalarResult.Item), "", environment.EvalToExpression(assignValue.Name, update), "", VariableLabelText, NewFieldLabelText, "="), debugItem);
}
}
var evalResult2 = environment.Eval(assignValue.Value, update);
if (evalResult.IsWarewolfAtomListresult)
{
var recSetResult = evalResult as CommonFunctions.WarewolfEvalResult.WarewolfAtomListresult;
if (recSetResult != null)
{
// ReSharper disable once ConvertIfStatementToConditionalTernaryExpression
if (DataListUtil.GetRecordsetIndexType(assignValue.Name) == enRecordsetIndexType.Blank)
{
AddDebugItem(new DebugItemWarewolfAtomListResult(recSetResult, evalResult2, "", assignValue.Name, VariableLabelText, NewFieldLabelText, "="), debugItem);
}
else
{
AddDebugItem(new DebugItemWarewolfAtomListResult(recSetResult, environment.EvalToExpression(assignValue.Value, update), "", environment.EvalToExpression(assignValue.Name, update), VariableLabelText, NewFieldLabelText, "="), debugItem);
}
}
}
}
}
catch (NullValueInVariableException)
{
AddDebugItem(new DebugItemWarewolfAtomResult("", assignValue.Value, "", environment.EvalToExpression(assignValue.Name, update), VariableLabelText, NewFieldLabelText, "="), debugItem);
}
_debugOutputs.Add(debugItem);
}
private DebugItem AddSingleInputDebugItem(IExecutionEnvironment environment, int innerCount, IAssignValue assignValue, int update)
{
var debugItem = new DebugItem();
const string VariableLabelText = "Variable";
const string NewFieldLabelText = "New Value";
try
{
if (!DataListUtil.IsEvaluated(assignValue.Value))
{
var evalResult = environment.Eval(assignValue.Name, update);
AddDebugItem(new DebugItemStaticDataParams("", innerCount.ToString(CultureInfo.InvariantCulture)), debugItem);
if (evalResult.IsWarewolfAtomResult)
{
var scalarResult = evalResult as CommonFunctions.WarewolfEvalResult.WarewolfAtomResult;
if (scalarResult != null)
{
AddDebugItem(new DebugItemWarewolfAtomResult(ExecutionEnvironment.WarewolfAtomToString(scalarResult.Item), assignValue.Value, environment.EvalToExpression(assignValue.Name, update), "", VariableLabelText, NewFieldLabelText, "="), debugItem);
}
}
else if (evalResult.IsWarewolfAtomListresult)
{
if (DataListUtil.GetRecordsetIndexType(assignValue.Name) == enRecordsetIndexType.Blank)
{
AddDebugItem(new DebugItemWarewolfAtomListResult(null, assignValue.Value, "", environment.EvalToExpression(assignValue.Name, update), VariableLabelText, NewFieldLabelText, "="), debugItem);
}
else
{
var recSetResult = evalResult as CommonFunctions.WarewolfEvalResult.WarewolfAtomListresult;
if (recSetResult != null)
{
AddDebugItem(new DebugItemWarewolfAtomListResult(recSetResult, assignValue.Value, "", environment.EvalToExpression(assignValue.Name, update), VariableLabelText, NewFieldLabelText, "="), debugItem);
}
}
}
}
else if (DataListUtil.IsEvaluated(assignValue.Value))
{
var oldValueResult = environment.Eval(assignValue.Name, update);
var newValueResult = environment.Eval(assignValue.Value, update);
AddDebugItem(new DebugItemStaticDataParams("", innerCount.ToString(CultureInfo.InvariantCulture)), debugItem);
if (oldValueResult.IsWarewolfAtomResult && newValueResult.IsWarewolfAtomResult)
{
var valueResult = newValueResult as CommonFunctions.WarewolfEvalResult.WarewolfAtomResult;
var scalarResult = oldValueResult as CommonFunctions.WarewolfEvalResult.WarewolfAtomResult;
if (valueResult != null && scalarResult != null)
{
AddDebugItem(new DebugItemWarewolfAtomResult(ExecutionEnvironment.WarewolfAtomToString(scalarResult.Item), ExecutionEnvironment.WarewolfAtomToString(valueResult.Item), assignValue.Name, environment.EvalToExpression(assignValue.Value, update), VariableLabelText, NewFieldLabelText, "="), debugItem);
}
}
else if (newValueResult.IsWarewolfAtomResult && oldValueResult.IsWarewolfAtomListresult)
{
AddDebugItem(new DebugItemWarewolfAtomListResult(null, newValueResult, environment.EvalToExpression(assignValue.Value, update), environment.EvalToExpression(assignValue.Name, update), VariableLabelText, NewFieldLabelText, "="), debugItem);
}
else if (oldValueResult.IsWarewolfAtomResult && newValueResult.IsWarewolfAtomListresult)
{
AddDebugItem(new DebugItemWarewolfAtomListResult(null, newValueResult, environment.EvalToExpression(assignValue.Value, update), environment.EvalToExpression(assignValue.Name, update), VariableLabelText, NewFieldLabelText, "="), debugItem);
}
else if (oldValueResult.IsWarewolfAtomListresult && newValueResult.IsWarewolfAtomListresult)
{
var recSetResult = oldValueResult as CommonFunctions.WarewolfEvalResult.WarewolfAtomListresult;
AddDebugItem(new DebugItemWarewolfAtomListResult(recSetResult, newValueResult, environment.EvalToExpression(assignValue.Value, update), environment.EvalToExpression(assignValue.Name, update), VariableLabelText, NewFieldLabelText, "="), debugItem);
}
}
}
catch (Exception e)
{
if (e.Message.Contains("ParseError"))
{
AddDebugItem(new DebugItemWarewolfAtomResult("", assignValue.Value, environment.EvalToExpression(assignValue.Name, update), "", VariableLabelText, NewFieldLabelText, "="), debugItem);
return(debugItem);
}
string errorMessage;
if (!ExecutionEnvironment.IsValidVariableExpression(assignValue.Name, out errorMessage, update))
{
return(null);
}
AddDebugItem(new DebugItemStaticDataParams("", innerCount.ToString(CultureInfo.InvariantCulture)), debugItem);
if (DataListUtil.IsEvaluated(assignValue.Value))
{
var newValueResult = environment.Eval(assignValue.Value, update);
if (newValueResult.IsWarewolfAtomResult)
{
var valueResult = newValueResult as CommonFunctions.WarewolfEvalResult.WarewolfAtomResult;
if (valueResult != null)
{
AddDebugItem(new DebugItemWarewolfAtomResult("", ExecutionEnvironment.WarewolfAtomToString(valueResult.Item), environment.EvalToExpression(assignValue.Name, update), assignValue.Value, VariableLabelText, NewFieldLabelText, "="), debugItem);
}
}
else if (newValueResult.IsWarewolfAtomListresult)
{
AddDebugItem(new DebugItemWarewolfAtomListResult(null, newValueResult, environment.EvalToExpression(assignValue.Value, update), assignValue.Name, VariableLabelText, NewFieldLabelText, "="), debugItem);
}
}
else
{
AddDebugItem(new DebugItemWarewolfAtomResult("", assignValue.Value, environment.EvalToExpression(assignValue.Name, update), "", VariableLabelText, NewFieldLabelText, "="), debugItem);
}
}
return(debugItem);
}
#pragma warning disable S1541 // Methods and properties should not be too complex
private void AddEvaluatedDebugInputItem(IExecutionEnvironment environment, int innerCount, IAssignValue assignValue, int update, DebugItem debugItem, string VariableLabelText, string NewFieldLabelText)
#pragma warning restore S1541 // Methods and properties should not be too complex
{
if (assignValue.Name.EndsWith("()]]"))
{
throw new Exception("Append data to array");
}
var oldValueResult = environment.Eval(assignValue.Name, update);
var newValueResult = environment.Eval(assignValue.Value, update);
AddDebugItem(new DebugItemStaticDataParams("", innerCount.ToString(CultureInfo.InvariantCulture)), debugItem);
if (oldValueResult.IsWarewolfAtomResult && newValueResult.IsWarewolfAtomResult)
{
var valueResult = newValueResult as CommonFunctions.WarewolfEvalResult.WarewolfAtomResult;
var scalarResult = oldValueResult as CommonFunctions.WarewolfEvalResult.WarewolfAtomResult;
if (valueResult != null && scalarResult != null)
{
AddDebugItem(new DebugItemWarewolfAtomResult(ExecutionEnvironment.WarewolfAtomToString(scalarResult.Item), ExecutionEnvironment.WarewolfAtomToString(valueResult.Item), assignValue.Name, environment.EvalToExpression(assignValue.Value, update), VariableLabelText, NewFieldLabelText, "="), debugItem);
}
}
else if (newValueResult.IsWarewolfAtomResult && oldValueResult.IsWarewolfAtomListresult)
{
AddDebugItem(new DebugItemWarewolfAtomListResult(null, newValueResult, environment.EvalToExpression(assignValue.Value, update), assignValue.Name, VariableLabelText, NewFieldLabelText, "="), debugItem);
}
else if (oldValueResult.IsWarewolfAtomResult && newValueResult.IsWarewolfAtomListresult)
{
AddDebugItem(new DebugItemWarewolfAtomListResult(null, newValueResult, environment.EvalToExpression(assignValue.Value, update), assignValue.Name, VariableLabelText, NewFieldLabelText, "="), debugItem);
}
else
{
if (oldValueResult.IsWarewolfAtomListresult && newValueResult.IsWarewolfAtomListresult)
{
var old = (CommonFunctions.WarewolfEvalResult.WarewolfAtomListresult)oldValueResult;
if (!old.Item.Any())
{
AddDebugItem(new DebugItemWarewolfAtomListResult(null, newValueResult, environment.EvalToExpression(assignValue.Value, update), assignValue.Name, VariableLabelText, NewFieldLabelText, "="), debugItem);
}
else
{
var recSetResult = oldValueResult as CommonFunctions.WarewolfEvalResult.WarewolfAtomListresult;
AddDebugItem(new DebugItemWarewolfAtomListResult(recSetResult, newValueResult, environment.EvalToExpression(assignValue.Value, update), assignValue.Name, VariableLabelText, NewFieldLabelText, "="), debugItem);
}
}
}
}
public DebugEvalResult(string inputVariable, string label, IExecutionEnvironment environment, bool isDataMerge = false)
{
_inputVariable = inputVariable.Trim();
_label = label;
try
{
if (ExecutionEnvironment.IsRecordsetIdentifier(_inputVariable) && DataListUtil.IsEvaluated(_inputVariable))
{
if (DataListUtil.GetRecordsetIndexType(_inputVariable) == enRecordsetIndexType.Blank)
{
var length = environment.GetLength(DataListUtil.ExtractRecordsetNameFromValue(_inputVariable));
_inputVariable = DataListUtil.ReplaceRecordsetBlankWithIndex(_inputVariable, length);
}
}
if (isDataMerge)
{
var evalForDataMerge = environment.EvalForDataMerge(_inputVariable);
var innerIterator = new WarewolfListIterator();
var innerListOfIters = new List<WarewolfIterator>();
foreach (var listOfIterator in evalForDataMerge)
{
var inIterator = new WarewolfIterator(listOfIterator);
innerIterator.AddVariableToIterateOn(inIterator);
innerListOfIters.Add(inIterator);
}
var atomList = new List<DataASTMutable.WarewolfAtom>();
while (innerIterator.HasMoreData())
{
var stringToUse = "";
// ReSharper disable once LoopCanBeConvertedToQuery
foreach (var warewolfIterator in innerListOfIters)
{
stringToUse += warewolfIterator.GetNextValue();
}
atomList.Add(DataASTMutable.WarewolfAtom.NewDataString(stringToUse));
}
var finalString = string.Join("", atomList);
_evalResult = WarewolfDataEvaluationCommon.WarewolfEvalResult.NewWarewolfAtomListresult(new WarewolfAtomList<DataASTMutable.WarewolfAtom>(DataASTMutable.WarewolfAtom.Nothing, atomList));
if (DataListUtil.IsFullyEvaluated(finalString))
{
_inputVariable = finalString;
_evalResult = environment.Eval(finalString);
}
}
else
{
var evalToExpression = environment.EvalToExpression(_inputVariable);
if (DataListUtil.IsEvaluated(evalToExpression))
{
_inputVariable = evalToExpression;
}
_evalResult = environment.Eval(_inputVariable);
}
}
catch(Exception e)
{
Dev2Logger.Log.Error(e.Message,e);
_evalResult = WarewolfDataEvaluationCommon.WarewolfEvalResult.NewWarewolfAtomResult(DataASTMutable.WarewolfAtom.Nothing);
}
}
private void AddDebugOutputItem(IExecutionEnvironment environment, int innerCount, IAssignValue assignValue, int update, string VariableLabelText, string NewFieldLabelText, DebugItem debugItem)
{
var evalResult = environment.Eval(assignValue.Name, update);
AddDebugItem(new DebugItemStaticDataParams("", innerCount.ToString(CultureInfo.InvariantCulture)), debugItem);
if (evalResult.IsWarewolfAtomResult)
{
if (evalResult is CommonFunctions.WarewolfEvalResult.WarewolfAtomResult scalarResult)
{
AddDebugItem(new DebugItemWarewolfAtomResult(ExecutionEnvironment.WarewolfAtomToString(scalarResult.Item), assignValue.Value, environment.EvalToExpression(assignValue.Name, update), "", VariableLabelText, NewFieldLabelText, "="), debugItem);
}
}
else
{
if (evalResult.IsWarewolfAtomListresult && evalResult is CommonFunctions.WarewolfEvalResult.WarewolfAtomListresult recSetResult)
{
AddDebugItem(new DebugItemWarewolfAtomListResult(recSetResult, "", "", environment.EvalToExpression(assignValue.Name, update), VariableLabelText, NewFieldLabelText, "="), debugItem);
}
}
}
public string EvalToExpression(string exp, int update) => _inner.EvalToExpression(exp, 0);
void AddEvaluatedDebugInputItem(IExecutionEnvironment environment, int innerCount, IAssignValue assignValue, int update, DebugItem debugItem, string VariableLabelText, string NewFieldLabelText)
{
var oldValueResult = environment.Eval(assignValue.Name, update);
var newValueResult = environment.Eval(assignValue.Value, update);
AddDefaultDebugItem(innerCount, debugItem);
if (oldValueResult.IsWarewolfAtomResult && newValueResult.IsWarewolfAtomResult)
{
var valueResult = newValueResult as CommonFunctions.WarewolfEvalResult.WarewolfAtomResult;
var scalarResult = oldValueResult as CommonFunctions.WarewolfEvalResult.WarewolfAtomResult;
if (valueResult != null && scalarResult != null)
{
AddDebugItem(new DebugItemWarewolfAtomResult(ExecutionEnvironment.WarewolfAtomToString(scalarResult.Item), ExecutionEnvironment.WarewolfAtomToString(valueResult.Item), assignValue.Name, environment.EvalToExpression(assignValue.Value, update), VariableLabelText, NewFieldLabelText, "="), debugItem);
}
}
else if (newValueResult.IsWarewolfAtomResult && oldValueResult.IsWarewolfAtomListresult || oldValueResult.IsWarewolfAtomResult && newValueResult.IsWarewolfAtomListresult)
{
AddDebugItem(new DebugItemWarewolfAtomListResult(null, newValueResult, environment.EvalToExpression(assignValue.Value, update), environment.EvalToExpression(assignValue.Name, update), VariableLabelText, NewFieldLabelText, "="), debugItem);
}
else
{
if (oldValueResult.IsWarewolfAtomListresult && newValueResult.IsWarewolfAtomListresult)
{
var recSetResult = oldValueResult as CommonFunctions.WarewolfEvalResult.WarewolfAtomListresult;
AddDebugItem(new DebugItemWarewolfAtomListResult(recSetResult, newValueResult, environment.EvalToExpression(assignValue.Value, update), environment.EvalToExpression(assignValue.Name, update), VariableLabelText, NewFieldLabelText, "="), debugItem);
}
}
}
private void AddEvaluatedDebugItem(IExecutionEnvironment environment, int innerCount, IAssignValue assignValue, int update, string VariableLabelText, string NewFieldLabelText, DebugItem debugItem)
{
if (DataListUtil.IsEvaluated(assignValue.Value))
{
var evalResult = environment.Eval(assignValue.Name, update);
AddDebugItem(new DebugItemStaticDataParams("", innerCount.ToString(CultureInfo.InvariantCulture)), debugItem);
if (evalResult.IsWarewolfAtomResult && evalResult is CommonFunctions.WarewolfEvalResult.WarewolfAtomResult scalarResult)
{
AddDebugItem(new DebugItemWarewolfAtomResult(ExecutionEnvironment.WarewolfAtomToString(scalarResult.Item), "", environment.EvalToExpression(assignValue.Name, update), "", VariableLabelText, NewFieldLabelText, "="), debugItem);
}
var evalResult2 = environment.Eval(assignValue.Value, update);
if (evalResult.IsWarewolfAtomListresult && evalResult is CommonFunctions.WarewolfEvalResult.WarewolfAtomListresult recSetResult)
{
AddDebugItem(DataListUtil.GetRecordsetIndexType(assignValue.Name) == enRecordsetIndexType.Blank ? new DebugItemWarewolfAtomListResult(recSetResult, evalResult2, "", assignValue.Name, VariableLabelText, NewFieldLabelText, "=") : new DebugItemWarewolfAtomListResult(recSetResult, environment.EvalToExpression(assignValue.Value, update), "", environment.EvalToExpression(assignValue.Name, update), VariableLabelText, NewFieldLabelText, "="), debugItem);
}
}
}
void AddNotEvaluatedDebugOutputItem(IExecutionEnvironment environment, int innerCount, IAssignValue assignValue, int update, string VariableLabelText, string NewFieldLabelText, DebugItem debugItem)
{
var evalResult = environment.Eval(assignValue.Name, update);
AddDefaultDebugItem(innerCount, debugItem);
if (evalResult.IsWarewolfAtomResult && evalResult is CommonFunctions.WarewolfEvalResult.WarewolfAtomResult scalarResult)
{
AddDebugItem(new DebugItemWarewolfAtomResult(ExecutionEnvironment.WarewolfAtomToString(scalarResult.Item), assignValue.Value, environment.EvalToExpression(assignValue.Name, update), "", VariableLabelText, NewFieldLabelText, "="), debugItem);
}
if (evalResult.IsWarewolfAtomListresult && evalResult is CommonFunctions.WarewolfEvalResult.WarewolfAtomListresult recSetResult)
{
AddDebugItem(new DebugItemWarewolfAtomListResult(recSetResult, "", "", environment.EvalToExpression(assignValue.Name, update), VariableLabelText, NewFieldLabelText, "="), debugItem);
}
}
DebugItem TryCreateDebugItem(IExecutionEnvironment environment, int innerCount, IAssignValue assignValue, int update)
{
var debugItem = new DebugItem();
const string VariableLabelText = "";
const string NewFieldLabelText = "";
try
{
CreateDebugInput(environment, innerCount, assignValue, update, debugItem, VariableLabelText, NewFieldLabelText);
}
catch (Exception e)
{
if (e.Message.Contains("ParseError"))
{
AddDebugItem(new DebugItemWarewolfAtomResult("", assignValue.Value, environment.EvalToExpression(assignValue.Name, update), "", VariableLabelText, NewFieldLabelText, "="), debugItem);
return(debugItem);
}
if (!ExecutionEnvironment.IsValidVariableExpression(assignValue.Name, out string errorMessage, update))
{
return(null);
}
AddErrorDebugItem(environment, innerCount, assignValue, update, debugItem, VariableLabelText, NewFieldLabelText);
}
return(debugItem);
}
