/// <summary>
/// performs execution of the UNDELETE command
/// </summary>
/// <returns>object</returns>
public override object Execute()
{
int NumberOfUnDeletes = 0;
StringBuilder HTMLString = new StringBuilder();
if (this.Context.CurrentRead != null && this.Context.CurrentRead.IsEpi7ProjectRead)
{
if (this.Context.CurrentDataRow == null)
{
Project currentProject = this.Context.CurrentProject;
Rule_Read currentRead = this.Context.CurrentRead;
View currentView = currentProject.Views[currentRead.Identifier.ToLowerInvariant()];
string viewName = currentView.TableName;
string pSQL = "Select * From [" + viewName + "]";
DataTable completeTable = Epi.Data.DBReadExecute.GetDataTable(currentRead.File, pSQL);
foreach (Page page in currentProject.Views[currentRead.Identifier].Pages)
{
completeTable = currentRead.JoinTables(completeTable, Epi.Data.DBReadExecute.GetDataTable(currentRead.File, "Select * From [" + page.TableName + "]"));
}
foreach (DataRow row in completeTable.Rows)
{
this.Context.CurrentDataRow = row;
string compareExpression = this.CompareExpression.Execute().ToString();
if (compareExpression.Equals("true", StringComparison.CurrentCultureIgnoreCase))
{
NumberOfUnDeletes++;
row["RecStatus"] = 1;
Epi.Data.DBReadExecute.ExecuteSQL(this.Context.CurrentProject.FullName, "UPDATE " + this.Context.CurrentRead.Identifier + " SET RecStatus=1 Where GlobalRecordId='" + row["GlobalRecordId"] + "'");
}
}
this.Context.CurrentDataRow = null;
this.Context.CurrentRead.Execute();
}
HTMLString.Append("<p>");
HTMLString.Append(string.Format(SharedStrings.NUMBER_RECORDS_UNDELETED, NumberOfUnDeletes.ToString()));
HTMLString.Append("</p>");
}
else
{
HTMLString.Append("<p>The current Read must be an Epi7 project. 0 items marked as deleted.</p>");
}
Dictionary <string, string> args = new Dictionary <string, string>();
args.Add("COMMANDNAME", "UNDELETE");
args.Add("COMMANDTEXT", CommandText);
args.Add("ROWCOUNT", NumberOfUnDeletes.ToString());
args.Add("HTMLRESULTS", HTMLString.ToString());
this.Context.AnalysisCheckCodeInterface.Display(args);
return(null);
}
public static AnalysisRule BuildStatments(Rule_Context context, Token token)
{
AnalysisRule result = null;
if (token is NonterminalToken)
{
NonterminalToken nonterminal = (NonterminalToken)token;
switch (nonterminal.Symbol.ToString())
{
case "<Statements>":
result = new Rule_Statements(context, nonterminal);
break;
case "<Statement>":
result = new Rule_Statement(context, nonterminal);
break;
case "<Always_Statement>":
result = new Rule_Always(context, nonterminal);
break;
case "<Simple_Assign_Statement>":
case "<Let_Statement>":
case "<Assign_Statement>":
result = new Rule_Assign(context, nonterminal);
break;
case "<Assign_DLL_Statement>":
result = new Rule_Assign_DLL_Statement(context, nonterminal);
break;
case "<If_Statement>":
case "<If_Else_Statement>":
result = new Rule_If_Then_Else_End(context, nonterminal);
break;
case "<Define_Variable_Statement>":
result = new Rule_Define(context, nonterminal);
break;
case "<FuncName2>":
case "<FunctionCall>":
result = new Rule_FunctionCall(context, nonterminal);
break;
case "<Simple_Dialog_Statement>":
case "<Numeric_Dialog_Implicit_Statement>":
case "<Numeric_Dialog_Explicit_Statement>":
case "<TextBox_Dialog_Statement>":
case "<Db_Values_Dialog_Statement>":
case "<YN_Dialog_Statement>":
case "<Db_Views_Dialog_Statement>":
case "<Databases_Dialog_Statement>":
case "<Db_Variables_Dialog_Statement>":
case "<Multiple_Choice_Dialog_Statement>":
case "<Dialog_Read_Statement>":
case "<Dialog_Write_Statement>":
case "<Dialog_Read_Filter_Statement>":
case "<Dialog_Write_Filter_Statement>":
case "<Dialog_Date_Statement>":
case "<Dialog_Date_Mask_Statement>":
result = new Rule_Dialog(context, nonterminal);
break;
case "<Read_Epi_Statement>":
case "<Simple_Read_Statement>":
case "<Read_Epi_File_Spec_Statement>":
case "<Read_Sql_Statement>":
case "<Read_Excel_File_Statement>":
case "<Read_Db_Table_Statement>":
result = new Rule_Read(context, nonterminal);
break;
case "<Merge_Table_Statement>":
case "<Merge_Db_Table_Statement>":
case "<Merge_File_Statement>":
case "<Merge_Excel_File_Statement>":
result = new Rule_Merge(context, nonterminal);
break;
case "<Write_All_Statement>":
case "<Write_Some_Statement>":
case "<Write_Except_Statement>":
result = new Rule_Write(context, nonterminal);
break;
case "<Select_Statement>":
case "<Cancel_Select_By_Selecting_Statement>":
case "<Cancel_Select_Statement>":
result = new Rule_Select(context, nonterminal);
break;
case "<Recode_Statement>":
result = new Rule_Recode(context, nonterminal);
break;
case "<Comment_Line>":
result = new Rule_CommentLine(context, nonterminal);
break;
case "<Execute_Statement>":
result = new Rule_Execute(context, nonterminal);
break;
case "<Report_Display_Statement>":
case "<Report_File_Statement>":
case "<Report_Print_Statement>":
result = new Rule_Report(context, nonterminal);
break;
case "<List_Statement>":
result = new Rule_List(context, nonterminal);
break;
case "<Simple_Tables_Statement>":
case "<Tables_One_Variable_Statement>":
case "<Row_All_Tables_Statement>":
case "<Row_Except_Tables_Statement>":
case "<Column_All_Tables_Statement>":
case "<Column_Except_Tables_Statement>":
case "<Row_Column_Tables_Statement>":
result = new Rule_Tables(context, nonterminal);
break;
case "<Freq_All_Statement>":
case "<Freq_Columns_Statement>":
case "<Freq_All_Except_Statement>":
result = new Rule_Freq(context, nonterminal);
break;
case "<Cancel_Sort_By_Sorting_Statement>":
case "<Cancel_Sort_Statement>":
case "<Sort_Statement>":
result = new Rule_Sort(context, nonterminal);
break;
case "<Means_Statement>":
result = new Rule_Means(context, nonterminal);
break;
case "<Relate_Epi_Table_Statement>":
case "<Relate_Table_Statement>":
case "<Relate_Db_Table_With_Identifier_Statement>":
case "<Relate_Db_Table_Statement>":
case "<Relate_File_Statement>":
case "<Relate_Excel_File_Statement>":
result = new Rule_Relate(context, nonterminal);
break;
case "<Beep_Statement>":
result = new Rule_Beep(context, nonterminal);
break;
case "<Quit_Statement>":
result = new Rule_Quit(context, nonterminal);
break;
case "<Delete_Table_Long_Statement>":
result = new Rule_Delete_Table_Long(context, nonterminal);
break;
case "<Delete_File_Statement>":
result = new Rule_Delete_File(context, nonterminal);
break;
case "<Delete_Table_Statement>":
result = new Rule_Delete_Table(context, nonterminal);
break;
case "<Type_Out_String_Statement>":
case "<Type_Out_File_Statement>":
case "<Type_Out_String_With_Font_Statement>":
case "<Type_Out_File_With_Font_Statement>":
result = new Rule_Typeout(context, nonterminal);
break;
case "<Simple_Routeout_Statement>":
case "<Replace_Routeout_Statement>":
case "<Append_Routeout_Statement>":
result = new Rule_RouteOut(context, nonterminal);
break;
case "<Close_Out_Statement>":
result = new Rule_CloseOut(context, nonterminal);
break;
case "<Variables_Display_Statement>":
case "<Views_Display_Statement>":
case "<Tables_Display_Statement>":
result = new Rule_Display(context, nonterminal);
break;
case "<Header_Title_String_Statement>":
case "<Header_Title_Font_Statement>":
case "<Header_Title_String_And_Font_Statement>":
result = new Rule_Header(context, nonterminal);
break;
case "<Simple_Undefine_Statement>":
result = new Rule_Undefine(context, nonterminal);
break;
case "<Run_File_PGM_Statement>":
result = new Rule_Run_File_PGM_Statement(context, nonterminal);
break;
case "<Run_String_Statement>":
result = new Rule_Run_String_Statement(context, nonterminal);
break;
case "<Run_PGM_In_Db_Statement>":
result = new Rule_Run_PGM_In_Db_Statement(context, nonterminal);
break;
case "<Delete_Records_All_Statement>":
result = new Rule_Delete_Records_All_Statement(context, nonterminal);
break;
case "<Delete_Records_Selected_Statement>":
result = new Rule_Delete_Records_Selected_Statement(context, nonterminal);
break;
case "<Simple_Print_Out_Statement>":
case "<File_Print_Out_Statement>":
result = new Rule_Printout(context, nonterminal);
break;
case "<SQL_Execute_Command>":
result = new Rule_SQLExec(context, nonterminal);
break;
case "<RecordSet_Command>":
result = new Rule_RecordSet(context, nonterminal);
break;
case "<Define_Connection_Command>":
result = new Rule_Define_Connection(context, nonterminal);
break;
case "<Regress_Statement>":
result = new Rule_LinearRegression(context, nonterminal);
break;
case "<Logistic_Statement>":
result = new Rule_LogisticRegression(context, nonterminal);
break;
case "<CoxPH_Statement>":
result = new Rule_CoxPH(context, nonterminal);
break;
case "<KM_Survival_Statement>":
result = new Rule_KMSurvival(context, nonterminal);
break;
case "<Define_Dll_Statement>":
result = new Rule_DLL_Statement(context, nonterminal);
break;
case "<Define_Group_Statement>":
result = new Rule_Define_Group(context, nonterminal);
break;
case "<Summarize_Statement>":
result = new Rule_Summarize(context, nonterminal);
break;
case "<Set_Statement>":
result = new Rule_Set(context, nonterminal);
break;
case "<Match_Row_All_Statement>":
case "<Match_Row_Except_Statement>":
case "<Match_Column_All_Statement>":
case "<Match_Column_Except_Statement>":
case "<Match_Row_Column_Statement>":
result = new Rule_Match(context, nonterminal);
break;
case "<Graph_Statement>":
case "<Simple_Graph_Statement>":
case "<Strata_Var_Graph_Statement>":
case "<Weight_Var_Graph_Statement>":
case "<Stra_Wei_Var_Graph_Statement>":
case "<Graph_Opt_1_Statement>":
case "<Graph_Opt_2_Statement>":
case "<Graph_Opt_3_Statement>":
case "<Graph_Opt_4_Statement>":
case "<Graph_Opt_5_Statement>":
case "<Graph_Generic_Opt_Statement>":
result = new Rule_Graph(context, nonterminal);
break;
case "<Expr List>":
result = new Rule_ExprList(context, nonterminal);
break;
case "<Expression>":
result = new Rule_Expression(context, nonterminal);
break;
case "<And Exp>":
result = new Rule_AndExp(context, nonterminal);
break;
case "<Not Exp>":
result = new Rule_NotExp(context, nonterminal);
break;
case "<Compare Exp>":
result = new Rule_CompareExp(context, nonterminal);
break;
case "<Concat Exp>":
result = new Rule_ConcatExp(context, nonterminal);
break;
case "<Add Exp>":
result = new Rule_AddExp(context, nonterminal);
break;
case "<Mult Exp>":
result = new Rule_MultExp(context, nonterminal);
break;
case "<Pow Exp>":
result = new Rule_PowExp(context, nonterminal);
break;
case "<Negate Exp>":
result = new Rule_NegateExp(context, nonterminal);
break;
default:
case "<Value>":
result = new Rule_Value(context, nonterminal);
break;
case "<Undelete_All_Statement>":
result = new Rule_UnDelete(context, nonterminal);
break;
case "<QualifiedIdList>":
result = new Rule_QualifiedIdList(context, nonterminal);
break;
case "<Subroutine_Statement>":
result = new Rule_Subroutine_Statement(context, nonterminal);
break;
//**these are not yet implemented; move up when completed
//**these are not yet implemented; move up when completed
//**these are not yet implemented; move up when completed
//**these are not yet implemented; move up when completed
//**these are not yet implemented; move up when completed
case "<Simple_Run_Statement>":
case "<About_Statement>":
case "<Browser_Statement>":
case "<Browser_Size_Statement>":
case "<Button_Offset_Size_1_Statement>":
case "<Button_Offset_Size_2_Statement>":
case "<Button_Offset_1_Statement>":
case "<Button_Offset_2_Statement>":
case "<Call_Statement>":
case "<Simple_CMD_Statement>":
case "<CMD_Line_Statement>":
case "<Delete_Table_Short_Statement>":
case "<Exit_Statement>":
case "<File_Dialog_Statement>":
case "<Get_Path_Statement>":
case "<Help_File_Statement>":
case "<Simple_Help_Statement>":
case "<Link_Statement>":
case "<Link_Remove_Statement>":
case "<Map_AVG_Statement>":
case "<Map_Case_Statement>":
case "<Map_Sum_Statement>":
case "<Map_Count_Statement>":
case "<Map_Min_Statement>":
case "<Map_Max_Statement>":
case "<Map_Opt_1_Statement>":
case "<Map_Opt_2_Statement>":
case "<Map_Opt_3_Statement>":
case "<Map_Opt_4_Statement>":
case "<Map_Opt_5_Statement>":
case "<Menu_Statement>":
case "<Menu_Command_Statement>":
case "<Menu_Dialog_Statement>":
case "<Menu_Execute_Statement>":
case "<Menu_Item_Block_Name_Statement>":
case "<Menu_Item_Separator_Statement>":
case "<Menu_Replace_Statement>":
case "<Move_Buttons_Statement>":
case "<New_Page_Statement>":
case "<On_Browser_Exit_Block>":
case "<Picture_Statement>":
case "<Picture_Size_Statement>":
case "<Popup_Statement>":
case "<Repeat_Statement>":
case "<Screen_Text_Statement>":
case "<Set_Buttons_Statement>":
case "<Set_DB_Version_Statement>":
case "<Set_DOS_Win_Statement>":
case "<Set_Import_Year_Statement>":
case "<Set_Ini_Dir_Statement>":
case "<Set_Language_Statement>":
case "<Set_Picture_Statement>":
case "<Set_Work_Dir_Statement>":
case "<ShutDown_Block>":
case "<Startup_Block>":
case "<Sys_Info_Statement>":
case "<All_Standard_Undefine_Statement>":
case "<All_Global_Undefine_Statement>":
case "<Wait_For_Statement>":
case "<Wait_For_Exit_Statement>":
case "<Wait_For_File_Exists_Statement>":
case "<Command_Block>":
case "<On_Browser_Exit_Empty_Block>":
case "<Startup_Empty_Block>":
case "<ShutDown_Empty_Block>":
case "<Menu_Empty_Block>":
case "<Popup_Empty_Block>":
case "<Empty_Command_Block>":
break;
}
}
else // terminal token
{
TerminalToken terminal = (TerminalToken)token;
switch (terminal.Symbol.ToString())
{
case "<Value>":
default:
result = new Rule_Value(context, terminal);
break;
}
}
return result;
}
/// <summary>
/// Clears the session state
/// </summary>
public void ClearState()
{
MemoryRegion.RemoveVariablesInScope(VariableType.Standard);
if (DataInfo != null)
{
DataInfo.Dispose();
}
OverriddenSetOptions = new Dictionary<string, string>(StringComparer.OrdinalIgnoreCase);
DataInfo = new DataSourceInfo();
Recodes.Clear();
Reset();
CurrentRead = null;
IsFirstStatement = false;
ProgramText.Length = 0;
DataTableRefreshNeeded = true;
AnalysisOut = new AnalysisOutput(this);
isCancelRequest = false;
GroupVariableList = new Dictionary<string, List<string>>();
}
