//----------------------------------------
//
// macro to plot checklist validation plots
//
// author: lysak@fnal.gov
//----------------------------------------
int create_checklist_plots(int MinRun=252836,int MaxRun=252910,char *Pass="17TEST1")
{
  //-------------------------------
  //LOAD necesary modules, macros
  //-------------------------------
  gROOT->ProcessLine(".x cdfopr/validation/load_oracle.C");
    
  gROOT->LoadMacro("cdfopr/validation/validate_used_sets.C");

  cout << "-----------------------------------------------------------" << endl;
  cout << " going to produce the plots for checklist for period of runs: " 
       << MinRun << " - " << MaxRun << endl;
  cout << "-----------------------------------------------------------" << endl;

  int savePlot=1;
  //------------------------------------
  // get the plots for svx alignment
  //------------------------------------
  cout << "-------------------------------------------" << endl;
  cout << "getting plots for SVX alignment            " << endl;
  cout << "-------------------------------------------" << endl;
  plot_svx_alignment_run("SIALIGNBARREL",MinRun,MaxRun, Pass, savePlot);
  TGraph *g_SiAlignBarrel = (TGraph*) c1->FindObject("Graph");
  c1->Close();
  plot_svx_alignment_run("SIALIGNFRAME",MinRun,MaxRun, Pass, savePlot);
  TGraph *g_SiAlignFrame = (TGraph*) c1->FindObject("Graph");
  c1->Close();
  plot_svx_alignment_run("SIALIGNLADDER",MinRun,MaxRun, Pass, savePlot);
  TGraph *g_SiAlignLadder = (TGraph*) c1->FindObject("Graph");
  c1->Close();
  plot_svx_alignment_run("SIALIGNWAFER", MinRun,MaxRun, Pass, savePlot);
  TGraph *g_SiAlignWafer = (TGraph*) c1->FindObject("Graph");
  c1->Close();
  plot_svx_alignment_run("SIALIGNWARP", MinRun,MaxRun, Pass, savePlot);
  TGraph *g_SiAlignWarp = (TGraph*) c1->FindObject("Graph");
  c1->Close();

  plot_svx_alignment_run("SICHIPON",MinRun,MaxRun,Pass, savePlot);	
  TGraph *g_SiChippon = (TGraph*) c1->FindObject("Graph");
  c1->Close();
  plot_svx_alignment_run("SICHIPPED",MinRun,MaxRun,Pass, savePlot);	
  TGraph *g_SiChipped = (TGraph*) c1->FindObject("Graph");
  c1->Close();
  plot_svx_alignment_run("SISTRIPDH",MinRun,MaxRun,Pass, savePlot);	
  TGraph *g_SiStripdh = (TGraph*) c1->FindObject("Graph");
  c1->Close();
  plot_svx_alignment_run("SISTRIPMASK",MinRun,MaxRun,Pass,savePlot);	
  TGraph *g_SiStripmask = (TGraph*) c1->FindObject("Graph");
  c1->Close();
  plot_svx_alignment_run("SIFIBOFFSETS",MinRun,MaxRun,Pass,savePlot); 
  TGraph *g_SiFiboffsets = (TGraph*) c1->FindObject("Graph");
  c1->Close();

  //------------------------------------
  // get the plot for number of tables
  //------------------------------------
  cout << "---------------------------------------------" << endl;
  cout << "getting plot for number of tables in used_sets" << endl;
  cout << "---------------------------------------------" << endl;
  plot_n_tables( MinRun, MaxRun, Pass, savePlot);
  TGraph *g_NTables = (TGraph*) c1->FindObject("Graph");
  c1->Close();


  //------------------------------------
  // get beamline info from database
  //------------------------------------
  cout << "-------------------------------------------" << endl;
  cout << "getting beamlines information from database" << endl;
  cout << "-------------------------------------------" << endl;
  fill_beamlines(MinRun,MaxRun,Pass);

  //------------------------------------
  // get the plots for fit code
  //------------------------------------
  plot_beamlines("svx_fit_code",MinRun,MaxRun,savePlot);
  TGraph *g_svx_fit_code = (TGraph*) c1->FindObject("Graph");
  c1->Close();
  plot_beamlines("cot_fit_code",MinRun,MaxRun,savePlot);
  TGraph *g_cot_fit_code = (TGraph*) c1->FindObject("Graph");
  c1->Close();

  plot_beamlines("svx_cid",MinRun,MaxRun,savePlot);
  TGraph *g_svx_cid = (TGraph*) c1->FindObject("Graph");
  c1->Close();
  plot_beamlines("cot_cid",MinRun,MaxRun,savePlot);
  TGraph *g_cot_cid = (TGraph*) c1->FindObject("Graph");
  c1->Close();

  plot_beamlines("cot_x",MinRun,MaxRun,savePlot);
  TGraph *g_cot_x = (TGraph*) c1->FindObject("Graph");
  c1->Close();
  plot_beamlines("cot_y",MinRun,MaxRun,savePlot);
  TGraph *g_cot_y = (TGraph*) c1->FindObject("Graph");
  c1->Close();
  plot_beamlines("svx_x",MinRun,MaxRun,savePlot);
  TGraph *g_svx_x = (TGraph*) c1->FindObject("Graph");
  c1->Close();
  plot_beamlines("svx_y",MinRun,MaxRun,savePlot);
  TGraph *g_svx_y = (TGraph*) c1->FindObject("Graph");
  c1->Close();
  plot_beamlines("dx",MinRun,MaxRun,savePlot);
  TGraph *g_dx = (TGraph*) c1->FindObject("Graph");
  c1->Close();
  plot_beamlines("dy",MinRun,MaxRun,savePlot);
  TGraph *g_dy = (TGraph*) c1->FindObject("Graph");
  c1->Close();


  //------------------------------------
  // SHOW PLOTS
  //------------------------------------
  int id=0;
  TCanvas *cc[100];

  cc[id] = new TCanvas(Form("cc_%d",id));
  cc[id]->cd();
  g_SiAlignBarrel->Draw("AP");
  id++;
  cc[id] = new TCanvas(Form("cc_%d",id));
  cc[id]->cd();
  g_SiAlignFrame->Draw("AP"); 
  id++;
  cc[id] = new TCanvas(Form("cc_%d",id));
  cc[id]->cd();
  g_SiAlignLadder->Draw("AP");
  id++;
  cc[id] = new TCanvas(Form("cc_%d",id));
  cc[id]->cd();
  g_SiAlignWafer->Draw("AP");
  id++;
  cc[id] = new TCanvas(Form("cc_%d",id));
  cc[id]->cd();
  g_SiAlignWarp->Draw("AP");
  id++;
  cc[id] = new TCanvas(Form("cc_%d",id));
  cc[id]->cd();  
  g_SiChippon->Draw("AP");
  id++;
  cc[id] = new TCanvas(Form("cc_%d",id));
  cc[id]->cd();
  g_SiChipped->Draw("AP");
  id++;
  cc[id] = new TCanvas(Form("cc_%d",id));
  cc[id]->cd();
  g_SiStripdh->Draw("AP");
  id++;
  cc[id] = new TCanvas(Form("cc_%d",id));
  cc[id]->cd();
  g_SiStripmask->Draw("AP");
  id++;
  cc[id] = new TCanvas(Form("cc_%d",id));
  cc[id]->cd();
  g_SiFiboffsets->Draw("AP");


  id++;
  cc[id] = new TCanvas(Form("cc_%d",id));
  cc[id]->cd();
  g_NTables->Draw("AP");
  id++;
  cc[id] = new TCanvas(Form("cc_%d",id));
  cc[id]->cd();
  g_svx_fit_code->Draw("AP");
  id++;
  cc[id] = new TCanvas(Form("cc_%d",id));
  cc[id]->cd();
  g_cot_fit_code->Draw("AP");
  id++;
  cc[id] = new TCanvas(Form("cc_%d",id));
  cc[id]->cd();
  g_svx_cid->Draw("AP");
  id++;
  cc[id] = new TCanvas(Form("cc_%d",id));
  cc[id]->cd();
  g_cot_cid->Draw("AP");
  id++;
  cc[id] = new TCanvas(Form("cc_%d",id));
  cc[id]->cd();
  g_cot_x->Draw("AP");
  id++;
  cc[id] = new TCanvas(Form("cc_%d",id));
  cc[id]->cd();
  g_cot_y->Draw("AP");
  id++;
  cc[id] = new TCanvas(Form("cc_%d",id));
  cc[id]->cd();
  g_svx_x->Draw("AP");
  id++;
  cc[id] = new TCanvas(Form("cc_%d",id));
  cc[id]->cd();
  g_svx_y->Draw("AP");
  id++;
  cc[id] = new TCanvas(Form("cc_%d",id));
  cc[id]->cd();
  g_dx->Draw("AP");
  id++;
  cc[id] = new TCanvas(Form("cc_%d",id));
  cc[id]->cd();
  g_dy->Draw("AP");


  print_table("CHAOFFLER",MinRun,MaxRun,"17",savePlot);
  plot_chaoffler(savePlot);


  return 0;
}