]> git.uio.no Git - u/mrichter/AliRoot.git/blobdiff - PHOS/AliPHOSDigitizer.cxx
Splitting of the QA maker into simulation and reconstruction dependent parts (Yves)
[u/mrichter/AliRoot.git] / PHOS / AliPHOSDigitizer.cxx
index aa47cf42ed17ecc61fbd596e44b46344df2985a5..86d465962fbe248fe1dc3ee91fd09f1183cba517 100644 (file)
 
 /* $Id$ */
 
+/* History of cvs commits:
+ *
+ * $Log$
+ * Revision 1.103  2007/11/07 11:25:06  schutz
+ * Comment out the QA checking before starting digitization
+ *
+ * Revision 1.102  2007/10/19 18:04:29  schutz
+ * The standalone QA data maker is called from AliSimulation and AliReconstruction outside the event loop; i.e. re-reading the data. The QA data making in the event loop has been commented out.
+ *
+ * Revision 1.101  2007/10/14 21:08:10  schutz
+ * Introduced the checking of QA results from previous step before entering the event loop
+ *
+ * Revision 1.100  2007/10/10 09:05:10  schutz
+ * Changing name QualAss to QA
+ *
+ * Revision 1.99  2007/09/30 17:08:20  schutz
+ * Introducing the notion of QA data acquisition cycle (needed by online)
+ *
+ * Revision 1.98  2007/09/26 14:22:17  cvetan
+ * Important changes to the reconstructor classes. Complete elimination of the run-loaders, which are now steered only from AliReconstruction. Removal of the corresponding Reconstruct() and FillESD() methods.
+ *
+ * Revision 1.97  2007/08/07 14:12:03  kharlov
+ * Quality assurance added (Yves Schutz)
+ *
+ * Revision 1.96  2007/04/28 10:43:36  policheh
+ * Dead channels simulation: digit energy sets to 0.
+ *
+ * Revision 1.95  2007/04/10 07:20:52  kharlov
+ * Decalibration should use the same CDB as calibration in AliPHOSClusterizerv1
+ *
+ * Revision 1.94  2007/02/01 10:34:47  hristov
+ * Removing warnings on Solaris x86
+ *
+ * Revision 1.93  2006/10/17 13:17:01  kharlov
+ * Replace AliInfo by AliDebug
+ *
+ * Revision 1.92  2006/08/28 10:01:56  kharlov
+ * Effective C++ warnings fixed (Timur Pocheptsov)
+ *
+ * Revision 1.91  2006/04/29 20:25:30  hristov
+ * Decalibration is implemented (Yu.Kharlov)
+ *
+ * Revision 1.90  2006/04/22 10:30:17  hristov
+ * Add fEnergy to AliPHOSDigit and operate with EMC amplitude in energy units (Yu.Kharlov)
+ *
+ * Revision 1.89  2006/04/11 15:22:59  hristov
+ * run number in query set to -1: forces AliCDBManager to use its run number (A.Colla)
+ *
+ * Revision 1.88  2006/03/13 14:05:43  kharlov
+ * Calibration objects for EMC and CPV
+ *
+ * Revision 1.87  2005/08/24 15:33:49  kharlov
+ * Calibration data for raw digits
+ *
+ * Revision 1.86  2005/07/12 20:07:35  hristov
+ * Changes needed to run simulation and reconstrruction in the same AliRoot session
+ *
+ * Revision 1.85  2005/05/28 14:19:04  schutz
+ * Compilation warnings fixed by T.P.
+ *
+ */
+
 //_________________________________________________________________________
 //*-- Author :  Dmitri Peressounko (SUBATECH & Kurchatov Institute) 
 //////////////////////////////////////////////////////////////////////////////
 //
 
 // --- ROOT system ---
-#include "TFile.h"
 #include "TTree.h"
 #include "TSystem.h"
-#include "TROOT.h"
-#include "TFolder.h"
-#include "TObjString.h"
-#include "TGeometry.h"
 #include "TBenchmark.h"
+#include "TRandom.h"
 
 // --- Standard library ---
 
 // --- AliRoot header files ---
-#include "AliRun.h"
-#include "AliHeader.h"
-#include "AliStream.h"
+#include "AliLog.h"
 #include "AliRunDigitizer.h"
 #include "AliPHOSDigit.h"
-#include "AliPHOS.h"
 #include "AliPHOSGetter.h"
 #include "AliPHOSDigitizer.h"
 #include "AliPHOSSDigitizer.h"
@@ -83,70 +138,202 @@ ClassImp(AliPHOSDigitizer)
 
 
 //____________________________________________________________________________ 
-  AliPHOSDigitizer::AliPHOSDigitizer() 
+AliPHOSDigitizer::AliPHOSDigitizer() :
+  AliDigitizer("",""),
+  fDefaultInit(kTRUE),
+  fDigitsInRun(0),
+  fInit(kFALSE),
+  fInput(0),
+  fInputFileNames(0x0),
+  fEventNames(0x0),
+  fEmcCrystals(0),
+  fPinNoise(0.f),
+  fEMCDigitThreshold(0.f),
+  fCPVNoise(0.f),
+  fCPVDigitThreshold(0.f),
+  fTimeResolution(0.f),
+  fTimeThreshold(0.f),
+  fTimeSignalLength(0.f),
+  fADCchanelEmc(0.f),
+  fADCpedestalEmc(0.f),
+  fNADCemc(0),
+  fADCchanelCpv(0.f),
+  fADCpedestalCpv(0.f),
+  fNADCcpv(0),
+  fEventFolderName(""),
+  fFirstEvent(0),
+  fLastEvent(0), 
+//  fQADM (0x0), 
+  fEventCounter(0)
 {
   // ctor
   InitParameters() ; 
-  fDefaultInit = kTRUE ;
   fManager = 0 ;                     // We work in the standalong mode
-
- }
+}
 
 //____________________________________________________________________________ 
-AliPHOSDigitizer::AliPHOSDigitizer(const char *headerFile, const char * name, const Bool_t toSplit)
+AliPHOSDigitizer::AliPHOSDigitizer(TString alirunFileName, 
+                                  TString eventFolderName):
+  AliDigitizer("PHOS"+AliConfig::Instance()->GetDigitizerTaskName(), alirunFileName), 
+  fDefaultInit(kFALSE),
+  fDigitsInRun(0),
+  fInit(kFALSE),
+  fInput(0),
+  fInputFileNames(0x0),
+  fEventNames(0x0),
+  fEmcCrystals(0),
+  fPinNoise(0.f),
+  fEMCDigitThreshold(0.f),
+  fCPVNoise(0.f),
+  fCPVDigitThreshold(0.f),
+  fTimeResolution(0.f),
+  fTimeThreshold(0.f),
+  fTimeSignalLength(0.f),
+  fADCchanelEmc(0.f),
+  fADCpedestalEmc(0.f),
+  fNADCemc(0),
+  fADCchanelCpv(0.f),
+  fADCpedestalCpv(0.f),
+  fNADCcpv(0),
+  fEventFolderName(eventFolderName),
+  fFirstEvent(0),
+  fLastEvent(0), 
+//  fQADM (0x0), 
+  fEventCounter(0)
 {
   // ctor
-
-  SetTitle(headerFile) ;
-  SetName(name) ;
-  fManager = 0 ;                     // We work in the standalong mode
-  fSplitFile= 0 ; 
   InitParameters() ; 
-  fToSplit = toSplit ;
   Init() ;
   fDefaultInit = kFALSE ; 
+  fManager = 0 ;                     // We work in the standalong mode
+ // //Initialize the quality assurance data maker only once
+//  fQADM = new AliPHOSQADataMaker() ;  
+//  //FIXME: get the run number
+//  Int_t run = 0 ;
+//  //EMXIF    
+//   GetQADataMaker()->Init(AliQA::kDIGITS, run, fgkCycles) ;    
+//   GetQADataMaker()->StartOfCycle(AliQA::kDIGITS) ;    
 }
 
 //____________________________________________________________________________ 
-AliPHOSDigitizer::AliPHOSDigitizer(AliRunDigitizer * ard):AliDigitizer(ard)
+AliPHOSDigitizer::AliPHOSDigitizer(const AliPHOSDigitizer & d) : 
+  AliDigitizer(d),
+  fDefaultInit(d.fDefaultInit),
+  fDigitsInRun(d.fDigitsInRun),
+  fInit(d.fInit),
+  fInput(d.fInput),
+  fInputFileNames(0x0),//?
+  fEventNames(0x0),//?
+  fEmcCrystals(d.fEmcCrystals),
+  fPinNoise(d.fPinNoise),
+  fEMCDigitThreshold(d.fEMCDigitThreshold),
+  fCPVNoise(d.fCPVNoise),
+  fCPVDigitThreshold(d.fCPVDigitThreshold),
+  fTimeResolution(d.fTimeResolution),
+  fTimeThreshold(d.fTimeThreshold),
+  fTimeSignalLength(d.fTimeSignalLength),
+  fADCchanelEmc(d.fADCchanelEmc),
+  fADCpedestalEmc(d.fADCpedestalEmc),
+  fNADCemc(d.fNADCemc),
+  fADCchanelCpv(d.fADCchanelCpv),
+  fADCpedestalCpv(d.fADCpedestalCpv),
+  fNADCcpv(d.fNADCcpv),
+  fEventFolderName(d.fEventFolderName),
+  fFirstEvent(d.fFirstEvent),
+  fLastEvent(d.fLastEvent), 
+//  fQADM (d.fQADM), 
+  fEventCounter(0)
+
 {
-  // ctor
-  SetTitle(ard->GetInputFileName(0,0)) ;
+  // copyy ctor 
+  SetName(d.GetName()) ; 
+  SetTitle(d.GetTitle()) ; 
+//Initialize the quality assurance data maker only once
+ //FIXME: get the run number
+//  Int_t run = 0 ;
+//  //EMXIF    
+//  GetQADataMaker()->Init(AliQA::kDIGITS, run, fgkCycles) ;    
+//  GetQADataMaker()->StartOfCycle(AliQA::kDIGITS) ;    
+}
+
+//____________________________________________________________________________ 
+AliPHOSDigitizer::AliPHOSDigitizer(AliRunDigitizer * rd) :
+  AliDigitizer(rd,"PHOS"+AliConfig::Instance()->GetDigitizerTaskName()),
+  fDefaultInit(kFALSE),
+  fDigitsInRun(0),
+  fInit(kFALSE),
+  fInput(0),
+  fInputFileNames(0x0),
+  fEventNames(0x0),
+  fEmcCrystals(0),
+  fPinNoise(0.f),
+  fEMCDigitThreshold(0.f),
+  fCPVNoise(0.f),
+  fCPVDigitThreshold(0.f),
+  fTimeResolution(0.f),
+  fTimeThreshold(0.f),
+  fTimeSignalLength(0.f),
+  fADCchanelEmc(0.f),
+  fADCpedestalEmc(0.f),
+  fNADCemc(0),
+  fADCchanelCpv(0.f),
+  fADCpedestalCpv(0.f),
+  fNADCcpv(0),
+  fEventFolderName(fManager->GetInputFolderName(0)),
+  fFirstEvent(0),
+  fLastEvent(0), 
+//  fQADM (0x0), 
+  fEventCounter(0)
+
+{
+  // ctor Init() is called by RunDigitizer
+  fManager = rd ; 
+  SetTitle(dynamic_cast<AliStream*>(fManager->GetInputStream(0))->GetFileName(0));
   InitParameters() ; 
   fDefaultInit = kFALSE ; 
-  fSplitFile   = 0 ; 
-
-  if (ard->GetOutputFile()) {
-    SetName(ard->GetOutputFile().Data());
-    fToSplit = kTRUE ;
-  } else {
-    SetName("Default") ;
-    fToSplit = kFALSE ;
-  }
+//Initialize the quality assurance data maker only once
+//  fQADM = new AliPHOSQADataMaker() ;  
+// //FIXME: get the run number
+//  Int_t run = 0 ;
+//  //EMXIF    
+//  GetQADataMaker()->Init(AliQA::kDIGITS, run) ;    
+//  GetQADataMaker()->StartOfCycle(AliQA::kDIGITS) ;    
 }
 
 //____________________________________________________________________________ 
   AliPHOSDigitizer::~AliPHOSDigitizer()
 {
+  AliPHOSGetter * gime = AliPHOSGetter::Instance(GetTitle()) ;
+
+  // Clean Digitizer from the white board
+  gime->PhosLoader()->CleanDigitizer() ;
   // dtor
-     
-   fSplitFile = 0 ; 
+  delete [] fInputFileNames ; 
+  delete [] fEventNames ; 
+
+//  delete fQADM ; 
+
 }
 
 //____________________________________________________________________________
-void AliPHOSDigitizer::Digitize(const Int_t event) 
+void AliPHOSDigitizer::Digitize(Int_t event) 
 { 
   
   // Makes the digitization of the collected summable digits.
   //  It first creates the array of all PHOS modules
-  //  filled with noise (different for EMC, CPV and PPSD) and
+  //  filled with noise (different for EMC, and CPV) and
   //  then adds contributions from SDigits. 
   // This design avoids scanning over the list of digits to add 
   // contribution to new SDigits only.
 
-  AliPHOSGetter * gime = AliPHOSGetter::GetInstance() ; 
-  TClonesArray * digits = gime->Digits(GetName()) ; 
-
+  AliPHOSGetter * gime = AliPHOSGetter::Instance(GetTitle()) ; 
+  Int_t ReadEvent = event ; 
+  if (fManager) 
+    ReadEvent = dynamic_cast<AliStream*>(fManager->GetInputStream(0))->GetCurrentEventNumber() ; 
+  AliDebug(1,Form("Adding event %d from input stream 0 %s %s", 
+                 ReadEvent, GetTitle(), fEventFolderName.Data())) ; 
+  gime->Event(ReadEvent, "S") ;
+  TClonesArray * digits = gime->Digits() ; 
   digits->Clear() ;
 
   const AliPHOSGeometry *geom = gime->PHOSGeometry() ; 
@@ -155,79 +342,80 @@ void AliPHOSDigitizer::Digitize(const Int_t event)
   
   Int_t nCPV ;
   Int_t absID ;
-  TString name      =  geom->GetName() ;
   
-  nCPV = nEMC + geom->GetNumberOfCPVPadsZ()*geom->GetNumberOfCPVPadsPhi()*
-    geom->GetNModules() ;
-
+  nCPV = nEMC + geom->GetNumberOfCPVPadsZ() * geom->GetNumberOfCPVPadsPhi() * geom->GetNModules() ;
+  
   digits->Expand(nCPV) ;
 
-  // get first the sdigitizer from the tasks list (must have same name as the digitizer)
-  const AliPHOSSDigitizer * sDigitizer = gime->SDigitizer(GetName()); 
-  if ( !sDigitizer) {
-    Error("Digitize", "SDigitizer with name %s not found", GetName() ) ; 
-    abort() ; 
-  }
-    
-  // loop through the sdigits posted to the White Board and add them to the noise
-  TCollection * folderslist = gime->SDigitsFolder()->GetListOfFolders() ; 
-  TIter next(folderslist) ; 
-  TFolder * folder = 0 ; 
-  TClonesArray * sdigits = 0 ;
-  Int_t input = 0 ;
-  TObjArray * sdigArray = new TObjArray(2) ;
-  while ( (folder = (TFolder*)next()) ) { 
-    if ( (sdigits = (TClonesArray*)folder->FindObject(GetName()) ) ) {
-      TString fileName(folder->GetName()) ;
-      fileName.ReplaceAll("_","/") ;
-//       Info("Digitize", "Adding SDigits %s from %s", GetName(), fileName() ) ;  
-      sdigArray->AddAt(sdigits, input) ;
-      input++ ;
-    }
+  // get first the sdigitizer from the tasks list 
+  if ( !gime->SDigitizer() ) 
+    gime->LoadSDigitizer();
+  AliPHOSSDigitizer * sDigitizer = gime->SDigitizer(); 
+
+  if ( !sDigitizer )
+    AliFatal(Form("SDigitizer with name %s %s not found", 
+                 GetTitle(), fEventFolderName.Data() )) ; 
+
+  //take all the inputs to add together and load the SDigits
+  TObjArray * sdigArray = new TObjArray(fInput) ;
+  sdigArray->AddAt(gime->SDigits(), 0) ;
+  Int_t i ;
+  for(i = 1 ; i < fInput ; i++){
+    TString tempo(fEventNames[i]) ; 
+    tempo += i ;
+    AliPHOSGetter * gime1 = AliPHOSGetter::Instance(fInputFileNames[i], tempo) ;
+    if (fManager) 
+      ReadEvent = dynamic_cast<AliStream*>(fManager->GetInputStream(i))->GetCurrentEventNumber() ; 
+    AliInfo(Form("Adding event %d from input stream %d %s %s", 
+                ReadEvent, i, fInputFileNames[i].Data(), tempo.Data())) ; 
+    gime1->Event(ReadEvent,"S");
+    sdigArray->AddAt(gime1->SDigits(), i) ;
   }
 
-  //Find the first crystall with signal
+  //Find the first crystal with signal
   Int_t nextSig = 200000 ; 
-  Int_t i;
-  for(i=0; i<input; i++){
-    sdigits = (TClonesArray *)sdigArray->At(i) ;
+  TClonesArray * sdigits ;  
+  for(i = 0 ; i < fInput ; i++){
+    sdigits = dynamic_cast<TClonesArray *>(sdigArray->At(i)) ;
     if ( !sdigits->GetEntriesFast() )
       continue ; 
-    Int_t curNext = ((AliPHOSDigit *)sdigits->At(0))->GetId() ;
-     if(curNext < nextSig) 
-       nextSig = curNext ;
+    Int_t curNext = dynamic_cast<AliPHOSDigit *>(sdigits->At(0))->GetId() ;
+    if(curNext < nextSig) 
+      nextSig = curNext ;
   }
-
-  TArrayI index(input) ;
+  
+  TArrayI index(fInput) ;
   index.Reset() ;  //Set all indexes to zero
-
+  
   AliPHOSDigit * digit ;
   AliPHOSDigit * curSDigit ;
-
+  
   TClonesArray * ticks = new TClonesArray("AliPHOSTick",1000) ;
-
+  
   //Put Noise contribution
-  for(absID = 1; absID <= nEMC; absID++){
+  for(absID = 1 ; absID <= nEMC ; absID++){
     Float_t noise = gRandom->Gaus(0., fPinNoise) ; 
-    new((*digits)[absID-1]) AliPHOSDigit( -1,absID,sDigitizer->Digitize(noise), TimeOfNoise() ) ;
+    // YVK: do not digitize amplitudes for EMC
+//     new((*digits)[absID-1]) AliPHOSDigit( -1, absID, sDigitizer->Digitize(noise), TimeOfNoise() ) ;
+    new((*digits)[absID-1]) AliPHOSDigit( -1, absID, noise, TimeOfNoise() ) ;
     //look if we have to add signal?
-    digit = (AliPHOSDigit *) digits->At(absID-1) ;
+    digit = dynamic_cast<AliPHOSDigit *>(digits->At(absID-1)) ;
+    
     if(absID==nextSig){
       //Add SDigits from all inputs 
       ticks->Clear() ;
       Int_t contrib = 0 ;
-      Float_t a = digit->GetAmp() ;
-      Float_t b = TMath::Abs( a /fTimeSignalLength) ;
-      //Mark the beginnign of the signal
+      Float_t a = digit->GetEnergy() ;
+      Float_t b = TMath::Abs( a / fTimeSignalLength) ;
+      //Mark the beginning of the signal
       new((*ticks)[contrib++]) AliPHOSTick(digit->GetTime(),0, b);  
-      //Mark the end of the ignal     
+      //Mark the end of the signal     
       new((*ticks)[contrib++]) AliPHOSTick(digit->GetTime()+fTimeSignalLength, -a, -b); 
-
+      
       //loop over inputs
-      for(i=0; i<input; i++){
-       if(((TClonesArray *)sdigArray->At(i))->GetEntriesFast() > index[i] )
-         curSDigit = (AliPHOSDigit*)((TClonesArray *)sdigArray->At(i))->At(index[i]) ;         
+      for(i = 0 ; i < fInput ; i++){
+       if( dynamic_cast<TClonesArray *>(sdigArray->At(i))->GetEntriesFast() > index[i] )
+         curSDigit = dynamic_cast<AliPHOSDigit*>(dynamic_cast<TClonesArray *>(sdigArray->At(i))->At(index[i])) ;       
        else
          curSDigit = 0 ;
        //May be several digits will contribute from the same input
@@ -240,33 +428,32 @@ void AliPHOSDigitizer::Digitize(const Int_t event)
            primaryoffset = 10000000*i ;
          curSDigit->ShiftPrimary(primaryoffset) ;
          
-         a = curSDigit->GetAmp() ;
+         a = curSDigit->GetEnergy() ;
          b = a /fTimeSignalLength ;
          new((*ticks)[contrib++]) AliPHOSTick(curSDigit->GetTime(),0, b);  
          new((*ticks)[contrib++]) AliPHOSTick(curSDigit->GetTime()+fTimeSignalLength, -a, -b); 
-
-         *digit = *digit + *curSDigit ;  //add energies
+         
+         *digit += *curSDigit ;  //add energies
 
          index[i]++ ;
-         if(((TClonesArray *)sdigArray->At(i))->GetEntriesFast() > index[i] )
-           curSDigit = (AliPHOSDigit*)((TClonesArray *)sdigArray->At(i))->At(index[i]) ;       
+         if( dynamic_cast<TClonesArray *>(sdigArray->At(i))->GetEntriesFast() > index[i] )
+           curSDigit = dynamic_cast<AliPHOSDigit*>(dynamic_cast<TClonesArray *>(sdigArray->At(i))->At(index[i])) ;     
          else
            curSDigit = 0 ;
        }
       }
-
+      
       //calculate and set time
       Float_t time = FrontEdgeTime(ticks) ;
       digit->SetTime(time) ;
-
+      
       //Find next signal module
       nextSig = 200000 ;
-      for(i=0; i<input; i++){
-       sdigits = ((TClonesArray *)sdigArray->At(i)) ;
+      for(i = 0 ; i < fInput ; i++){
+       sdigits = dynamic_cast<TClonesArray *>(sdigArray->At(i)) ;
        Int_t curNext = nextSig ;
        if(sdigits->GetEntriesFast() > index[i] ){
-         curNext = ((AliPHOSDigit *) sdigits->At(index[i]))->GetId() ;
-         
+         curNext = dynamic_cast<AliPHOSDigit *>(sdigits->At(index[i]))->GetId() ;
        }
        if(curNext < nextSig) nextSig = curNext ;
       }
@@ -275,19 +462,18 @@ void AliPHOSDigitizer::Digitize(const Int_t event)
   
   ticks->Delete() ;
   delete ticks ;
-
-
+  
   //Now CPV digits (different noise and no timing)
   for(absID = nEMC+1; absID <= nCPV; absID++){
     Float_t noise = gRandom->Gaus(0., fCPVNoise) ; 
     new((*digits)[absID-1]) AliPHOSDigit( -1,absID,sDigitizer->Digitize(noise), TimeOfNoise() ) ;
     //look if we have to add signal?
     if(absID==nextSig){
-      digit = (AliPHOSDigit *) digits->At(absID-1) ;
+      digit = dynamic_cast<AliPHOSDigit *>(digits->At(absID-1)) ;
       //Add SDigits from all inputs
-      for(i=0; i<input; i++){
-       if(((TClonesArray *)sdigArray->At(i))->GetEntriesFast() > index[i] )
-         curSDigit = (AliPHOSDigit*)((TClonesArray *)sdigArray->At(i))->At(index[i]) ;         
+      for(i = 0 ; i < fInput ; i++){
+       if( dynamic_cast<TClonesArray *>(sdigArray->At(i))->GetEntriesFast() > index[i] )
+         curSDigit = dynamic_cast<AliPHOSDigit*>( dynamic_cast<TClonesArray *>(sdigArray->At(i))->At(index[i])) ;      
        else
          curSDigit = 0 ;
 
@@ -302,10 +488,10 @@ void AliPHOSDigitizer::Digitize(const Int_t event)
          curSDigit->ShiftPrimary(primaryoffset) ;
 
          //add energies
-         *digit = *digit + *curSDigit ;  
+         *digit += *curSDigit ;  
          index[i]++ ;
-         if(((TClonesArray *)sdigArray->At(i))->GetEntriesFast() > index[i] )
-           curSDigit = (AliPHOSDigit*)((TClonesArray *)sdigArray->At(i))->At(index[i]) ;       
+         if( dynamic_cast<TClonesArray *>(sdigArray->At(i))->GetEntriesFast() > index[i] )
+           curSDigit = dynamic_cast<AliPHOSDigit*>( dynamic_cast<TClonesArray *>(sdigArray->At(i))->At(index[i]) ) ;   
          else
            curSDigit = 0 ;
        }
@@ -313,24 +499,24 @@ void AliPHOSDigitizer::Digitize(const Int_t event)
 
       //Find next signal module
       nextSig = 200000 ;
-      for(i=0; i<input; i++){
-       sdigits = (TClonesArray *)sdigArray->At(i) ;
+      for(i = 0 ; i < fInput ; i++){
+       sdigits = dynamic_cast<TClonesArray *>(sdigArray->At(i)) ;
        Int_t curNext = nextSig ;
        if(sdigits->GetEntriesFast() > index[i] )
-         curNext = ((AliPHOSDigit *) sdigits->At(index[i]))->GetId() ;
+         curNext = dynamic_cast<AliPHOSDigit *>( sdigits->At(index[i]) )->GetId() ;
        if(curNext < nextSig) nextSig = curNext ;
       }
       
     }
   }
-  delete sdigArray ; //We should not delete its contents
-  
-  
+
+  delete sdigArray ; //We should not delete its contents 
   
   //remove digits below thresholds
-  for(i = 0; i < nEMC ; i++){
+  for(i = 0 ; i < nEMC ; i++){
     digit = dynamic_cast<AliPHOSDigit*>( digits->At(i) ) ;
-    if(sDigitizer->Calibrate( digit->GetAmp() ) < fEMCDigitThreshold)
+    DecalibrateEMC(digit);
+    if(digit->GetEnergy() < fEMCDigitThreshold)
       digits->RemoveAt(i) ;
     else
       digit->SetTime(gRandom->Gaus(digit->GetTime(),fTimeResolution) ) ;
@@ -338,7 +524,8 @@ void AliPHOSDigitizer::Digitize(const Int_t event)
 
 
   for(i = nEMC; i < nCPV ; i++)
-    if(sDigitizer->Calibrate(((AliPHOSDigit*)digits->At(i))->GetAmp()) < fCPVDigitThreshold)
+//     if( sDigitizer->Calibrate( dynamic_cast<AliPHOSDigit*>(digits->At(i))->GetAmp() ) < fCPVDigitThreshold )
+    if( dynamic_cast<AliPHOSDigit*>(digits->At(i))->GetEnergy() < fCPVDigitThreshold )
       digits->RemoveAt(i) ;
     
   digits->Compress() ;  
@@ -350,129 +537,177 @@ void AliPHOSDigitizer::Digitize(const Int_t event)
   for (i = 0 ; i < ndigits ; i++) { 
     digit = dynamic_cast<AliPHOSDigit*>( digits->At(i) ) ; 
     digit->SetIndexInList(i) ;     
-    Float_t energy = sDigitizer->Calibrate(digit->GetAmp()) ;
-    digit->SetAmp(DigitizeEnergy(energy,digit->GetId()) ) ;
+    if(digit->GetId() > fEmcCrystals){ //digitize CPV only
+      digit->SetAmp(DigitizeCPV(digit->GetEnergy(),digit->GetId()) ) ;
+    }
+  }
+
+  Int_t relId[4];
+
+  //set amplitudes in bad channels to zero
+  for(i = 0 ; i <digits->GetEntries(); i++){
+    digit = dynamic_cast<AliPHOSDigit*>( digits->At(i) ) ;
+    gime->PHOSGeometry()->AbsToRelNumbering(digit->GetId(),relId);
+    if(relId[1] == 0) // Emc
+      if(gime->CalibData()->IsBadChannelEmc(relId[0],relId[3],relId[2])) digit->SetEnergy(0.); 
   }
 
 }
 
 //____________________________________________________________________________
-Int_t AliPHOSDigitizer::DigitizeEnergy(Float_t energy, Int_t absId)
+void AliPHOSDigitizer::DecalibrateEMC(AliPHOSDigit *digit)
+{
+  // Decalibrate EMC digit, i.e. change its energy by a factor read from CDB
+
+  AliPHOSGetter* gime = AliPHOSGetter::Instance();
+
+  if(!gime->CalibData()) {
+    AliPHOSCalibData* cdb = new AliPHOSCalibData(-1);
+    gime->SetCalibData(cdb);
+  }
+
+  //Determine rel.position of the cell absolute ID
+  Int_t relId[4];
+  gime->PHOSGeometry()->AbsToRelNumbering(digit->GetId(),relId);
+  Int_t module=relId[0];
+  Int_t row   =relId[2];
+  Int_t column=relId[3];
+  Float_t decalibration = gime->CalibData()->GetADCchannelEmc(module,column,row);
+  Float_t energy = digit->GetEnergy() / decalibration;
+  digit->SetEnergy(energy);
+}
+//____________________________________________________________________________
+Int_t AliPHOSDigitizer::DigitizeCPV(Float_t charge, Int_t absId)
 {
-  Int_t chanel ;
-  if(absId <= fEmcCrystals){ //digitize as EMC 
-    chanel = (Int_t) TMath::Ceil((energy - fADCpedestalEmc)/fADCchanelEmc) ;       
-    if(chanel > fNADCemc ) chanel =  fNADCemc ;
+  // Returns digitized value of the CPV charge in a pad absId
+
+  AliPHOSGetter* gime = AliPHOSGetter::Instance();
+
+  if(!gime->CalibData()) {
+    AliPHOSCalibData* cdb = new AliPHOSCalibData(-1); // use AliCDBManager's run number
+    gime->SetCalibData(cdb);
   }
-  else{ //Digitize as CPV
-    chanel = (Int_t) TMath::Ceil((energy - fADCpedestalCpv)/fADCchanelCpv) ;       
-    if(chanel > fNADCcpv ) chanel =  fNADCcpv ;
+
+  //Determine rel.position of the cell absId
+  Int_t relId[4];
+  gime->PHOSGeometry()->AbsToRelNumbering(absId,relId);
+  Int_t module=relId[0];
+  Int_t row   =relId[2];
+  Int_t column=relId[3];
+  
+  Int_t channel = 0;
+  
+  if(absId > fEmcCrystals){ //digitize CPV only
+
+    //reading calibration data for cell absId.
+    //If no calibration DB found, accept default values.
+
+    if(gime->CalibData()) {
+      fADCpedestalCpv = gime->CalibData()->GetADCpedestalCpv(module,column,row);
+      fADCchanelCpv   = gime->CalibData()->GetADCchannelCpv( module,column,row);
+    }
+
+    channel = (Int_t) TMath::Ceil((charge - fADCpedestalCpv)/fADCchanelCpv) ;       
+    if(channel > fNADCcpv ) channel =  fNADCcpv ;
   }
-  return chanel ;
+  return channel ;
 }
 
 //____________________________________________________________________________
 void AliPHOSDigitizer::Exec(Option_t *option) 
 { 
-  // Managing method
+  // Steering method to process digitization for events
+  // in the range from fFirstEvent to fLastEvent.
+  // This range is optionally set by SetEventRange().
+  // if fLastEvent=-1, then process events until the end.
+  // by default fLastEvent = fFirstEvent (process only one event)
+
+  if (!fInit) { // to prevent overwrite existing file
+    AliError(Form("Give a version name different from %s", 
+                 fEventFolderName.Data() )) ;
+    return ;
+  }   
 
-  if(strcmp(GetName(), "") == 0 )   
-    Init() ;
   if (strstr(option,"print")) {
-    Print("");
+    Print();
     return ; 
   }
   
-  if(strstr(option,"tim"))
-    gBenchmark->Start("PHOSDigitizer");
-
-  AliPHOSGetter * gime = AliPHOSGetter::GetInstance() ;
-  
-  Int_t nevents ;
+ // // check the QA result for Hits and SDigits
+//  AliQA * qa = AliQA::Instance(AliQA::kPHOS) ; 
+//  if ( qa->IsSet(AliQA::kPHOS, AliQA::kSIM, AliQA::kFATAL)) {
+//     AliFatal("QA status in Hits and/or SDIGITS was Fatal") ;
+//  } else if ( qa->IsSet(AliQA::kPHOS, AliQA::kSIM, AliQA::kERROR)) {
+//     AliError("QA status in Hits and/or SDIGITS was Error") ;
+//  } else if ( qa->IsSet(AliQA::kPHOS, AliQA::kSIM, AliQA::kWARNING) ) {
+//     AliWarning("QA status in Hits and/or SDIGITS was Warning") ;
+//  } else if ( qa->IsSet(AliQA::kPHOS, AliQA::kSIM, AliQA::kINFO) ) {
+//     AliInfo("QA status in Hits and/or SDIGITS was Info") ;
+//  }
+   
+ if(strstr(option,"tim"))
+     gBenchmark->Start("PHOSDigitizer");
   
-  TTree * treeD ;
+  AliPHOSGetter * gime = AliPHOSGetter::Instance(GetTitle()) ;
+
+  // Post Digitizer to the white board
+  gime->PostDigitizer(this) ;
   
-  if(fManager){
-    treeD = fManager->GetTreeD() ;
-    nevents = 1 ;    // Will process only one event
-    
-    //Check, if this branch already exits
-    if (treeD) { 
-      TObjArray * lob = (TObjArray*)treeD->GetListOfBranches() ;
-      TIter next(lob) ; 
-      TBranch * branch = 0 ;  
-      Bool_t phosfound = kFALSE, digitizerfound = kFALSE ; 
-      
-      while ( (branch = (TBranch*)next()) && (!phosfound || !digitizerfound) ) {
-       if ( (strcmp(branch->GetName(), "PHOS")==0) && 
-            (strcmp(branch->GetTitle(), GetName())==0) ) 
-         phosfound = kTRUE ;
-       
-       else if ( (strcmp(branch->GetName(), "AliPHOSDigitizer")==0) && 
-                 (strcmp(branch->GetTitle(), GetName())==0) ) 
-         digitizerfound = kTRUE ; 
-      }
-      
-      if ( phosfound ) {
-       Error("Exec", "Digits branch with name %s already exists", GetName() ) ;
-       return ; 
-      }   
-      if ( digitizerfound ) {
-       Error("Exec", "Digitizer branch with name %s already exists", GetName() );
-       return ; 
-      }
-    }   
-  }
-  else { //PHOS standalone
-    if(gime->BranchExists("Digits") ) 
-      return ;
-    nevents=gime->MaxEvent() ;
-  }
+  if (fLastEvent == -1) 
+    fLastEvent = gime->MaxEvent() - 1 ;
+  else if (fManager) 
+    fLastEvent = fFirstEvent ; 
+  Int_t nEvents   = fLastEvent - fFirstEvent + 1;
   
   Int_t ievent ;
-  
-  for(ievent = 0; ievent < nevents; ievent++){
-  
-    if(fManager){
-
-      Int_t input ;
-      for(input = 0 ; input < fManager->GetNinputs(); input ++){
-       TTree * treeS = fManager->GetInputTreeS(input) ;
-       if(!treeS){
-         Error("Exec", "No Input") ;  
-         return ;
-       }
-       gime->ReadTreeS(treeS,input) ;
-      }
 
-    }
-    else
-      gime->Event(ievent,"S") ;
-    
+  for (ievent = fFirstEvent; ievent <= fLastEvent; ievent++) {
+    fEventCounter++ ; 
+    gime->Event(ievent,"S") ;
+
     Digitize(ievent) ; //Add prepared SDigits to digits and add the noise
-    
-    WriteDigits(ievent) ;
-    
+
+//    //makes the quality assurance data
+//    if (GetQADataMaker()->IsCycleDone() ) {
+//      GetQADataMaker()->EndOfCycle(AliQA::kDIGITS) ; 
+//       GetQADataMaker()->StartOfCycle(AliQA::kDIGITS) ; 
+//    }
+//    GetQADataMaker()->Exec(AliQA::kDIGITS, gime->Digits()) ; 
+//     GetQADataMaker()->Increment() ;
+                                  
+    WriteDigits() ;
+
     if(strstr(option,"deb"))
       PrintDigits(option);
     
     //increment the total number of Digits per run 
     fDigitsInRun += gime->Digits()->GetEntriesFast() ;  
-  }
-   
+ }
+//   //Write the quality assurance data only after the last event 
+// if ( fEventCounter == gime->MaxEvent() ) { 
+//    GetQADataMaker()->EndOfCycle(AliQA::kDIGITS) ;    
+//     GetQADataMaker()->Finish() ;
+//  }
+  
+  gime->PhosLoader()->CleanDigitizer();
+
   if(strstr(option,"tim")){
     gBenchmark->Stop("PHOSDigitizer");
     TString message ; 
     message = "  took %f seconds for Digitizing %f seconds per event\n" ; 
-    Info("Exec", message.Data(), 
+    AliInfo(Form( message.Data(), 
         gBenchmark->GetCpuTime("PHOSDigitizer"), 
-        gBenchmark->GetCpuTime("PHOSDigitizer")/nevents ); 
+        gBenchmark->GetCpuTime("PHOSDigitizer")/nEvents )); 
   } 
 }
 
 //____________________________________________________________________________ 
-Float_t AliPHOSDigitizer::FrontEdgeTime(TClonesArray * ticks) 
-{ // 
+Float_t AliPHOSDigitizer::FrontEdgeTime(TClonesArray * ticks) const
+{
+  // Returns the shortest time among all time ticks
+
   ticks->Sort() ; //Sort in accordance with times of ticks
   TIter it(ticks) ;
   AliPHOSTick * ctick = (AliPHOSTick *) it.Next() ;
@@ -494,81 +729,77 @@ Float_t AliPHOSDigitizer::FrontEdgeTime(TClonesArray * ticks)
 Bool_t AliPHOSDigitizer::Init()
 {
   // Makes all memory allocations
-
-  if( strcmp(GetTitle(), "") == 0 )
-    SetTitle("galice.root") ;
-  
-  AliPHOSGetter * gime = AliPHOSGetter::GetInstance(GetTitle(), GetName(), fToSplit) ; 
+  fInit = kTRUE ; 
+  AliPHOSGetter * gime = AliPHOSGetter::Instance(GetTitle(), fEventFolderName) ; 
   if ( gime == 0 ) {
-    Error("Init", "Could not obtain the Getter object !") ; 
+    AliFatal(Form("Could not obtain the Getter object for file %s and event %s !", 
+                 GetTitle(), fEventFolderName.Data()));  
     return kFALSE;
   } 
   
   const AliPHOSGeometry * geom = gime->PHOSGeometry() ;
 
-  fEmcCrystals = geom->GetNModules() *  geom->GetNCristalsInModule() ;
-  
-  // Post Digits to the white board
-  gime->PostDigits(GetName() ) ;   
+  fEmcCrystals = geom->GetNModules() * geom->GetNCristalsInModule() ;
   
-  // Post Digitizer to the white board
-  gime->PostDigitizer(this) ;
-
-  fSplitFile = 0 ;
-  if(fToSplit){
-    // construct the name of the file as /path/PHOS.SDigits.root
-    //First - extract full path if necessary
-    TString digitsFileName(GetTitle()) ;
-    Ssiz_t islash = digitsFileName.Last('/') ;
-    if(islash<digitsFileName.Length())
-      digitsFileName.Remove(islash+1,digitsFileName.Length()) ;
-    else
-      digitsFileName="" ;
-    // Next - append the file name 
-    digitsFileName+="PHOS.Digits." ;
-    if((strcmp(GetName(),"Default")!=0)&&(strcmp(GetName(),"")!=0)){
-      digitsFileName+=GetName() ;
-      digitsFileName+="." ;
-    }
-    digitsFileName+="root" ;
-    // Finally - check if the file already opened or open the file
-    fSplitFile = static_cast<TFile*>(gROOT->GetFile(digitsFileName.Data()));   
-    if(!fSplitFile)
-      fSplitFile =  TFile::Open(digitsFileName.Data(),"update") ;
+  TString opt("Digits") ; 
+  if(gime->VersionExists(opt) ) { 
+    AliError(Form("Give a version name different from %s", 
+                 fEventFolderName.Data() )) ;
+    fInit = kFALSE ; 
   }
+
+  fFirstEvent = 0 ; 
+  fLastEvent = fFirstEvent ; 
+  if (fManager) 
+    fInput = fManager->GetNinputs() ; 
+  else 
+    fInput           = 1 ;
   
-  //Mark that we will use current header file
-  if(!fManager){
-    gime->PostSDigits(GetName(),GetTitle()) ;
-    gime->PostSDigitizer(GetName(),GetTitle()) ;
+  fInputFileNames  = new TString[fInput] ; 
+  fEventNames      = new TString[fInput] ; 
+  fInputFileNames[0] = GetTitle() ; 
+  fEventNames[0]     = fEventFolderName.Data() ; 
+  Int_t index ; 
+  for (index = 1 ; index < fInput ; index++) {
+    fInputFileNames[index] = dynamic_cast<AliStream*>(fManager->GetInputStream(index))->GetFileName(0); 
+    TString tempo = fManager->GetInputFolderName(index) ;
+    fEventNames[index] = tempo.Remove(tempo.Length()-1) ; // strip of the stream number added by fManager
   }
-  return kTRUE ;
+
+  //to prevent cleaning of this object while GetEvent is called
+  gime->PhosLoader()->GetDigitsDataLoader()->GetBaseTaskLoader()->SetDoNotReload(kTRUE);
+
+  return fInit ; 
 }
 
 //____________________________________________________________________________ 
 void AliPHOSDigitizer::InitParameters()
 {
-  fPinNoise           = 0.004 ;
-  fEMCDigitThreshold  = 0.012 ;
-  fCPVNoise           = 0.01;
-  fCPVDigitThreshold  = 0.09 ;
-  fTimeResolution     = 0.5e-9 ;
-  fTimeSignalLength   = 1.0e-9 ;
+  // Set initial parameters Digitizer
+
+  fPinNoise           = 0.004 ;  // [GeV]
+  fEMCDigitThreshold  = 0.012 ;  // [GeV]
+  fCPVNoise           = 0.01;    // [aux units]
+  fCPVDigitThreshold  = 0.09 ;   // [aux units]
+  fTimeResolution     = 0.5e-9 ; // [sec]
+  fTimeSignalLength   = 1.0e-9 ; // [sec]
   fDigitsInRun  = 0 ; 
-  fADCchanelEmc = 0.0015;        // width of one ADC channel in GeV
-  fADCpedestalEmc = 0.005 ;      //
+  fADCchanelEmc = 1.0;        // Coefficient between real and measured energies in EMC
+  fADCpedestalEmc = 0. ;      //
   fNADCemc = (Int_t) TMath::Power(2,16) ;  // number of channels in EMC ADC
 
   fADCchanelCpv = 0.0012 ;          // width of one ADC channel in CPV 'popugais'
   fADCpedestalCpv = 0.012 ;         // 
   fNADCcpv = (Int_t) TMath::Power(2,12);      // number of channels in CPV ADC
 
-  fTimeThreshold = 0.001*10000000 ; //Means 1 MeV in terms of SDigits amplitude
+//   fTimeThreshold = 0.001*10000000 ; //Means 1 MeV in terms of SDigits amplitude
+  fTimeThreshold = 0.001 ; // [GeV]
+  SetEventRange(0,-1) ;
     
 }
 
 //__________________________________________________________________
-void AliPHOSDigitizer::MixWith(const char* headerFile)
+void AliPHOSDigitizer::MixWith(TString alirunFileName, TString eventFolderName)
 {
   // Allows to produce digits by superimposing background and signal event.
   // It is assumed, that headers file with SIGNAL events is opened in 
@@ -582,133 +813,116 @@ void AliPHOSDigitizer::MixWith(const char* headerFile)
   // However only Sdigits with the same name (i.e. constructed with the same SDigitizer)
   // can be mixed.
 
-  if( strcmp(GetName(), "") == 0 )
+  if( strcmp(fEventFolderName, "") == 0 )
     Init() ;
 
   if(fManager){
-    Warning("MixWith", "Can not use this method under AliRunDigitizer\n" ) ;
+    Warning("MixWith", "Cannot use this method with AliRunDigitizer\n" ) ;
     return ;
   }
-  
-  // check if the specified SDigits do not already exist on the White Board:
-  // //Folders/RunMC/Event/Data/PHOS/SDigits/headerFile/sdigitsname
-
-  AliPHOSGetter * gime = AliPHOSGetter::GetInstance() ; 
-  TString path = gime->SDigitsFolder()->GetName() ; 
-
-  // before it was ???? "Folders/RunMC/Event/Data/PHOS/SDigits" ; 
-  path += headerFile ; 
-  path += "/" ; 
-  path += GetName() ;
-  if ( gROOT->FindObjectAny(path.Data()) ) {
-    Warning("MixWith", "Entry already exists, do not add\n" ) ;
-    return;
+  // looking for file which contains AliRun
+  if (gSystem->AccessPathName(alirunFileName)) {// file does not exist
+    AliError(Form("File %s does not exist!", alirunFileName.Data())) ;
+    return ; 
   }
-  
-  gime->PostSDigits(GetName(),headerFile) ;
-  
-  // check if the requested file is already open or exist and if SDigits Branch exist
-  TFile * file = (TFile*)gROOT->FindObject(headerFile); 
-  if ( !file ) { 
-    file = new TFile(headerFile, "READ") ; 
-    if (!file) { 
-      Error("MixWith", "File %s does not exist\n", headerFile ); 
-      return ; 
+  // looking for the file which contains SDigits
+  AliPHOSGetter * gime = AliPHOSGetter::Instance() ; 
+  TString fileName( gime->GetSDigitsFileName() ) ; 
+    if ( eventFolderName != AliConfig::GetDefaultEventFolderName()) // only if not the default folder name 
+      fileName = fileName.ReplaceAll(".root", "") + "_" + eventFolderName + ".root" ;
+    if ( (gSystem->AccessPathName(fileName)) ) { 
+      AliError(Form("The file %s does not exist!", fileName.Data())) ;
+      return ;
     }
-  }
+    // need to increase the arrays
+    TString tempo = fInputFileNames[fInput-1] ; 
+    delete [] fInputFileNames ; 
+    fInputFileNames = new TString[fInput+1] ; 
+    fInputFileNames[fInput-1] = tempo ; 
+    tempo = fEventNames[fInput-1] ; 
+    delete [] fEventNames ; 
+    fEventNames = new TString[fInput+1] ; 
+    fEventNames[fInput-1] = tempo ; 
+
+    fInputFileNames[fInput] = alirunFileName ; 
+    fEventNames[fInput]     = eventFolderName ;
+    fInput++ ;
 }
 
 //__________________________________________________________________
-void AliPHOSDigitizer::Print(Option_t* option)const 
+void AliPHOSDigitizer::Print(const Option_t *)const 
 {
   // Print Digitizer's parameters
-  if( strcmp(GetName(), "") != 0 ){
-
-    TString message("\n-------------------") ; 
-    message += GetName() ; 
-    message += "-------------\n" ;
-
-    const Int_t nStreams = GetNInputStreams() ; 
-    if (nStreams) {
-      Int_t index = 0 ;  
-      for (index = 0 ; index < nStreams ; index++) {  
-       message += "Adding SDigits " ; 
-       message += GetName() ;
-       message += "from " ; 
-       message += fManager->GetInputFileName(index, 0) ; 
-      }
-      message += "\nWriting digits to " ; 
-      message += fManager->GetInputFileName(0, 0) ;   
-    } else { 
-      //       AliPHOSGetter * gime = AliPHOSGetter::GetInstance() ;  
-      //       gime->Folder("sdigits")  ;
-      //       TCollection * folderslist = gime->Folder("sdigits")->GetListOfFolders() ; 
-      //       TIter next(folderslist) ; 
-      //       TFolder * folder = 0 ; 
-      
-      //       while ( (folder = (TFolder*)next()) ) {
-      //       if ( folder->FindObject(GetName())  ) 
-      //      }
-      message += "\nWriting digits to " ;
-      message += GetTitle() ;
-    }    
-    message += "\nWith following parameters:\n" ;
-    message += "     Electronics noise in EMC (fPinNoise) = %f\n" ; 
-    message += "  Threshold  in EMC  (fEMCDigitThreshold) = %f\n" ; 
-    message += "                 Noise in CPV (fCPVNoise) = %f\n" ;
-    message += "    Threshold in CPV (fCPVDigitThreshold) = %f\n" ;
-    message += "---------------------------------------------------\n" ; 
-    Info("Print", message.Data(),  
-        fPinNoise, 
-        fEMCDigitThreshold, 
-        fCPVNoise, 
-        fCPVDigitThreshold ) ; 
+  AliInfo(Form("\n------------------- %s -------------", GetName() )) ; 
+  if( strcmp(fEventFolderName.Data(), "") != 0 ){
+    printf(" Writing Digits to branch with title  %s\n", fEventFolderName.Data()) ;
+    
+    Int_t nStreams ; 
+    if (fManager) 
+      nStreams =  GetNInputStreams() ;
+    else 
+      nStreams = fInput ; 
+    
+    Int_t index = 0 ;  
+    for (index = 0 ; index < nStreams ; index++) {  
+      TString tempo(fEventNames[index]) ; 
+      tempo += index ;
+      AliPHOSGetter * gime = AliPHOSGetter::Instance(fInputFileNames[index], tempo) ; 
+      TString fileName( gime->GetSDigitsFileName() ) ; 
+      if ( fEventNames[index] != AliConfig::GetDefaultEventFolderName()) // only if not the default folder name 
+       fileName = fileName.ReplaceAll(".root", "") + "_" + fEventNames[index]  + ".root" ;
+      printf ("Adding SDigits from %s %s\n", fInputFileNames[index].Data(), fileName.Data()) ; 
+    }
+    AliPHOSGetter * gime = AliPHOSGetter::Instance(GetTitle(), fEventFolderName) ; 
+    printf("\nWriting digits to %s", gime->GetDigitsFileName().Data()) ;
+    
+    printf("\nWith following parameters:\n") ;
+    printf("  Electronics noise in EMC (fPinNoise)    = %f GeV\n", fPinNoise ) ; 
+    printf("  Threshold  in EMC  (fEMCDigitThreshold) = %f GeV\n", fEMCDigitThreshold ) ;  
+    printf("  Noise in CPV (fCPVNoise)                = %f aux units\n", fCPVNoise ) ; 
+    printf("  Threshold in CPV (fCPVDigitThreshold)   = %f aux units\n",fCPVDigitThreshold ) ;  
+    printf(" ---------------------------------------------------\n") ;   
   }
   else
-    Info("Print", "AliPHOSDigitizer not initialized\n" ) ;
+    AliInfo(Form("AliPHOSDigitizer not initialized" )) ;
   
 }
+
 //__________________________________________________________________
  void AliPHOSDigitizer::PrintDigits(Option_t * option)
 {
   // Print a table of digits
   
-  AliPHOSGetter * gime = AliPHOSGetter::GetInstance() ; 
+  AliPHOSGetter * gime = AliPHOSGetter::Instance(GetTitle(), fEventFolderName) ; 
   TClonesArray * digits = gime->Digits() ; 
   
-  TString message ; 
-  message  = "\nevent " ;
-  message += gAlice->GetEvNumber() ;
-  message += "\n       Number of entries in Digits list " ;  
-  message += digits->GetEntriesFast()  ;  
-  
+  AliInfo(Form("%d", digits->GetEntriesFast())) ; 
+  printf("\nevent %d", gAlice->GetEvNumber()) ;
+  printf("\n       Number of entries in Digits list %d", digits->GetEntriesFast() )  ;  
+
   if(strstr(option,"all")||strstr(option,"EMC")){  
     //loop over digits
     AliPHOSDigit * digit;
-    message += "\nEMC digits (with primaries):\n"  ;
-    message += "Digit Id Amplitude Index Nprim  Primaries list\n" ; 
+    printf("\nEMC digits (with primaries):\n")  ;
+    printf("\n   Id  Amplitude    Time          Index Nprim: Primaries list \n") ;    
     Int_t maxEmc = gime->PHOSGeometry()->GetNModules()*gime->PHOSGeometry()->GetNCristalsInModule() ;
     Int_t index ;
     for (index = 0 ; (index < digits->GetEntriesFast()) && 
-          (((AliPHOSDigit * )  digits->At(index))->GetId() <= maxEmc) ; index++) {
+          (dynamic_cast<AliPHOSDigit *>(digits->At(index))->GetId() <= maxEmc) ; index++) {
       digit = (AliPHOSDigit * )  digits->At(index) ;
       if(digit->GetNprimary() == 0) 
        continue;
-      message += "\n" ; 
-      message += digit->GetId() ; 
-      message += " " ; 
-      message += digit->GetAmp() ;  
-      message += " " ; 
-      message += digit->GetIndexInList() ;      
-      message += " " ; 
-      message += digit->GetNprimary()  ;
-      message += " : " ; 
+//       printf("%6d  %8d    %6.5e %4d      %2d :",
+//           digit->GetId(), digit->GetAmp(), digit->GetTime(), digit->GetIndexInList(), digit->GetNprimary()) ;  // YVK
+      printf("%6d  %.4f    %6.5e %4d      %2d :",
+             digit->GetId(), digit->GetEnergy(), digit->GetTime(), digit->GetIndexInList(), digit->GetNprimary()) ;  
       Int_t iprimary;
       for (iprimary=0; iprimary<digit->GetNprimary(); iprimary++) {
-       message += digit->GetPrimary(iprimary+1)  ;
-       message += " " ; 
+       printf("%d ",digit->GetPrimary(iprimary+1) ) ; 
       }    
+      printf("\n") ;
     }
   }
   
@@ -716,45 +930,51 @@ void AliPHOSDigitizer::Print(Option_t* option)const
     
     //loop over CPV digits
     AliPHOSDigit * digit;
-    message += "\nCPV digits:\n" ;
-    message += "Digit Id Amplitude Index Nprim Primaries list\n" ;
-
+    printf("\nCPV digits (with primaries):\n")  ;
+    printf("\n   Id  Amplitude    Time          Index Nprim: Primaries list \n") ;    
     Int_t maxEmc = gime->PHOSGeometry()->GetNModules()*gime->PHOSGeometry()->GetNCristalsInModule() ;
     Int_t index ;
     for (index = 0 ; index < digits->GetEntriesFast(); index++) {
       digit = (AliPHOSDigit * )  digits->At(index) ;
       if(digit->GetId() > maxEmc){
-       message += "\n" ; 
-       message += digit->GetId();  
-       message += " " ; 
-       message += digit->GetAmp() ; 
-       message += " " ; 
-       message += digit->GetIndexInList() ;  
-       message += " " ; 
-       message += digit->GetNprimary() ;
-       message += " : " ; 
-       
+       printf("%6d  %8d    %4d      %2d :",
+               digit->GetId(), digit->GetAmp(), digit->GetIndexInList(), digit->GetNprimary()) ;  
        Int_t iprimary;
        for (iprimary=0; iprimary<digit->GetNprimary(); iprimary++) {
-         message += digit->GetPrimary(iprimary+1)  ;
-         message += " " ; 
+         printf("%d ",digit->GetPrimary(iprimary+1) ) ; 
        }    
+       printf("\n") ;
       }
     }
   }
-  Info("Print", message.Data() ) ; 
+
 }
 
 //__________________________________________________________________
-Float_t AliPHOSDigitizer::TimeOfNoise(void)
+Float_t AliPHOSDigitizer::TimeOfNoise(void) const
 {  // Calculates the time signal generated by noise
-  //to be rewritten, now returns just big number
-  return 1. ;
+  //PH  Info("TimeOfNoise", "Change me") ; 
+  return gRandom->Rndm() * 1.28E-5;
+}
 
+//__________________________________________________________________
+void AliPHOSDigitizer::Unload() 
+{  
+  
+  Int_t i ; 
+  for(i = 1 ; i < fInput ; i++){
+    TString tempo(fEventNames[i]) ; 
+    tempo += i ;
+    AliPHOSGetter * gime = AliPHOSGetter::Instance(fInputFileNames[i], tempo) ; 
+    gime->PhosLoader()->UnloadSDigits() ; 
+  }
+  
+  AliPHOSGetter * gime = AliPHOSGetter::Instance(GetTitle(), fEventFolderName) ; 
+  gime->PhosLoader()->UnloadDigits() ; 
 }
 
 //____________________________________________________________________________
-void AliPHOSDigitizer::WriteDigits(Int_t event)
+void AliPHOSDigitizer::WriteDigits()
 {
 
   // Makes TreeD in the output file. 
@@ -765,32 +985,19 @@ void AliPHOSDigitizer::WriteDigits(Int_t event)
   //      and branch "AliPHOSDigitizer", with the same title to keep all the parameters
   //      and names of files, from which digits are made.
 
-  AliPHOSGetter * gime = AliPHOSGetter::GetInstance() ; 
-  const TClonesArray * digits = gime->Digits(GetName()) ; 
-  TTree * treeD ;
-  
-  if(fManager) 
-    treeD = fManager->GetTreeD() ;
-  else {
-    if((gAlice->TreeD() == 0) || (fSplitFile))  // we should not create TreeD if it is already here
-      gAlice->MakeTree("D", fSplitFile);       // We overwrite TreeD in split file in the case of second reconstruction
-    if(fSplitFile)
-      fSplitFile->cd() ;
-    treeD = gAlice->TreeD();
-  }
-  
+  AliPHOSGetter * gime = AliPHOSGetter::Instance(GetTitle()) ; 
+  const TClonesArray * digits = gime->Digits() ; 
+  TTree * treeD = gime->TreeD();
+
   // -- create Digits branch
   Int_t bufferSize = 32000 ;    
-  TBranch * digitsBranch = treeD->Branch("PHOS",&digits,bufferSize);
-  digitsBranch->SetTitle(GetName());
+  TBranch * digitsBranch = treeD->Branch("PHOS","TClonesArray",&digits,bufferSize);
+  digitsBranch->SetTitle(fEventFolderName);
+  digitsBranch->Fill() ;
   
-  // -- Create Digitizer branch
-  Int_t splitlevel = 0 ;
-  const AliPHOSDigitizer * d = dynamic_cast<const AliPHOSDigitizer *>(gime->Digitizer()) ;
-  TBranch * digitizerBranch = treeD->Branch("AliPHOSDigitizer", "AliPHOSDigitizer", &d,bufferSize,splitlevel); 
-  digitizerBranch->SetTitle(GetName());
+  gime->WriteDigits("OVERWRITE");
+  gime->WriteDigitizer("OVERWRITE");
+
+  Unload() ; 
 
-  digitsBranch->Fill() ;
-  digitizerBranch->Fill() ; 
-  treeD->AutoSave() ; 
 }