TPC/AliTPCPreprocessor.cxx

   1 /**************************************************************************
   2  * Copyright(c) 2007, ALICE Experiment at CERN, All rights reserved.      *
   3  *                                                                        *
   4  * Author: The ALICE Off-line Project.                                    *
   5  * Contributors are mentioned in the code where appropriate.              *
   6  *                                                                        *
   7  * Permission to use, copy, modify and distribute this software and its   *
   8  * documentation strictly for non-commercial purposes is hereby granted   *
   9  * without fee, provided that the above copyright notice appears in all   *
  10  * copies and that both the copyright notice and this permission notice   *
  11  * appear in the supporting documentation. The authors make no claims     *
  12  * about the suitability of this software for any purpose. It is          *
  13  * provided "as is" without express or implied warranty.                  *
  14  **************************************************************************/
  15
  16
  17 #include "AliTPCPreprocessor.h"
  18 #include "AliShuttleInterface.h"
  19
  20 #include "AliCDBMetaData.h"
  21 #include "AliDCSValue.h"
  22 #include "AliLog.h"
  23 #include "AliTPCSensorTempArray.h"
  24 #include "AliTPCROC.h"
  25 #include "AliTPCCalROC.h"
  26 #include "AliTPCCalPad.h"
  27 #include "AliTPCCalibPedestal.h"
  28 #include "AliTPCCalibPulser.h"
  29 #include "AliTPCCalibCE.h"
  30 #include "TFile.h"
  31 #include "TTree.h"
  32 #include "TEnv.h"
  33
  34 #include <TTimeStamp.h>
  35
  36 const Int_t kValCutTemp = 100;               // discard temperatures > 100 degrees
  37 const Int_t kDiffCutTemp = 5;                // discard temperature differences > 5 degrees
  38 const TString kPedestalRunType = "PEDESTAL_RUN";  // pedestal run identifier
  39 const TString kPulserRunType = "PULSER_RUN";   // pulser run identifier
  40 const TString kPhysicsRunType = "PHYSICS";   // physics run identifier
  41 const TString kStandAloneRunType = "STANDALONE"; // standalone run identifier
  42 const TString kDaqRunType = "DAQ"; // DAQ run identifier
  43 const TString kAmandaTemp = "tpc_PT_%d.Temperature"; // Amanda string for temperature entries
  44 //const Double_t kFitFraction = 0.7;                 // Fraction of DCS sensor fits required
  45 const Double_t kFitFraction = -1.0;          // Don't require minimum number of fits in commissioning run
  46
  47 //
  48 // This class is the SHUTTLE preprocessor for the TPC detector.
  49 //
  50
  51 ClassImp(AliTPCPreprocessor)
  52
  53 //______________________________________________________________________________________________
  54 AliTPCPreprocessor::AliTPCPreprocessor(AliShuttleInterface* shuttle) :
  55   AliPreprocessor("TPC",shuttle),
  56   fConfEnv(0), fTemp(0), fHighVoltage(0), fConfigOK(kTRUE), fROC(0)
  57 {
  58   // constructor
  59   fROC = AliTPCROC::Instance();
  60 }
  61 //______________________________________________________________________________________________
  62 // AliTPCPreprocessor::AliTPCPreprocessor(const AliTPCPreprocessor& org) :
  63 //   AliPreprocessor(org),
  64 //   fConfEnv(0), fTemp(0), fHighVoltage(0), fConfigOK(kTRUE)
  65 // {
  66 //   // copy constructor not implemented
  67 //   //   -- missing underlying copy constructor in AliPreprocessor
  68 //
  69 //   Fatal("AliTPCPreprocessor", "copy constructor not implemented");
  70 //
  71 // //  fTemp = new AliTPCSensorTempArray(*(org.fTemp));
  72 // }
  73
  74 //______________________________________________________________________________________________
  75 AliTPCPreprocessor::~AliTPCPreprocessor()
  76 {
  77   // destructor
  78
  79   delete fTemp;
  80   delete fHighVoltage;
  81 }
  82 //______________________________________________________________________________________________
  83 AliTPCPreprocessor& AliTPCPreprocessor::operator = (const AliTPCPreprocessor& )
  84 {
  85   Fatal("operator =", "assignment operator not implemented");
  86   return *this;
  87 }
  88
  89
  90 //______________________________________________________________________________________________
  91 void AliTPCPreprocessor::Initialize(Int_t run, UInt_t startTime,
  92         UInt_t endTime)
  93 {
  94   // Creates AliTestDataDCS object
  95
  96   AliPreprocessor::Initialize(run, startTime, endTime);
  97
  98         AliInfo(Form("\n\tRun %d \n\tStartTime %s \n\tEndTime %s", run,
  99                 TTimeStamp(startTime).AsString(),
 100                 TTimeStamp(endTime).AsString()));
 101
 102   // Preprocessor configuration
 103
 104         AliCDBEntry* entry = GetFromOCDB("Config", "Preprocessor");
 105         if (entry) fConfEnv = (TEnv*) entry->GetObject();
 106         if ( fConfEnv==0 ) {
 107            Log("AliTPCPreprocsessor: Preprocessor Config OCDB entry missing.\n");
 108            fConfigOK = kFALSE;
 109            return;
 110         }
 111
 112   // Temperature sensors
 113
 114         TTree *confTree = 0;
 115         entry = GetFromOCDB("Config", "Temperature");
 116         if (entry) confTree = (TTree*) entry->GetObject();
 117         if ( confTree==0 ) {
 118            Log("AliTPCPreprocsessor: Temperature Config OCDB entry missing.\n");
 119            fConfigOK = kFALSE;
 120            return;
 121         }
 122         fTemp = new AliTPCSensorTempArray(fStartTime, fEndTime, confTree, kAmandaTemp);
 123         fTemp->SetValCut(kValCutTemp);
 124         fTemp->SetDiffCut(kDiffCutTemp);
 125
 126
 127   // High voltage measurements
 128
 129       if (false) {    // high voltage maps not yet implemented...
 130         confTree=0;
 131         entry=0;
 132         entry = GetFromOCDB("Config", "HighVoltage");
 133         if (entry) confTree = (TTree*) entry->GetObject();
 134         if ( confTree==0 ) {
 135            Log("AliTPCPreprocsessor: High Voltage Config OCDB entry missing.\n");
 136            fConfigOK = kFALSE;
 137            return;
 138         }
 139         fHighVoltage = new AliDCSSensorArray(fStartTime, fEndTime, confTree);
 140       }
 141 }
 142
 143 //______________________________________________________________________________________________
 144 UInt_t AliTPCPreprocessor::Process(TMap* dcsAliasMap)
 145 {
 146   // Fills data into TPC calibrations objects
 147
 148   // Amanda servers provide information directly through dcsAliasMap
 149
 150   if (!dcsAliasMap) return 9;
 151   if (dcsAliasMap->GetEntries() == 0 ) return 9;
 152   if (!fConfigOK) return 9;
 153
 154   TString runType = GetRunType();
 155
 156   // Temperature sensors are processed by AliTPCCalTemp
 157
 158
 159   UInt_t tempResult = MapTemperature(dcsAliasMap);
 160   UInt_t result=tempResult;
 161
 162   // High Voltage recordings
 163
 164
 165  if (false) {   // High Voltage maps not yet implemented..
 166
 167   UInt_t hvResult = MapHighVoltage(dcsAliasMap);
 168   result+=hvResult;
 169
 170  }
 171
 172   // Other calibration information will be retrieved through FXS files
 173   //  examples:
 174   //    TList* fileSourcesDAQ = GetFile(AliShuttleInterface::kDAQ, "pedestals");
 175   //    const char* fileNamePed = GetFile(AliShuttleInterface::kDAQ, "pedestals", "LDC1");
 176   //
 177   //    TList* fileSourcesHLT = GetFile(AliShuttleInterface::kHLT, "calib");
 178   //    const char* fileNameHLT = GetFile(AliShuttleInterface::kHLT, "calib", "LDC1");
 179
 180   // pedestal entries
 181
 182   if(runType == kPedestalRunType) {
 183     Int_t numSources = 1;
 184     Int_t pedestalSource[2] = {AliShuttleInterface::kDAQ,AliShuttleInterface::kHLT} ;
 185     TString source = fConfEnv->GetValue("Pedestal","DAQ");
 186     source.ToUpper();
 187     if ( source == "HLT") pedestalSource[0] = AliShuttleInterface::kHLT;
 188     if (!GetHLTStatus()) pedestalSource[0] = AliShuttleInterface::kDAQ;
 189     if (source == "HLTDAQ" ) {
 190         numSources=2;
 191         pedestalSource[0] = AliShuttleInterface::kHLT;
 192         pedestalSource[1] = AliShuttleInterface::kDAQ;
 193     }
 194     if (source == "DAQHLT" ) numSources=2;
 195     UInt_t pedestalResult=0;
 196     for (Int_t i=0; i<numSources; i++ ) {
 197       UInt_t pedestalResult = ExtractPedestals(pedestalSource[i]);
 198       if ( pedestalResult == 0 ) break;
 199     }
 200     result += pedestalResult;
 201
 202   }
 203
 204   // pulser trigger processing
 205
 206   if(runType == kPulserRunType) {
 207     Int_t numSources = 1;
 208     Int_t pulserSource[2] = {AliShuttleInterface::kDAQ,AliShuttleInterface::kHLT} ;
 209     TString source = fConfEnv->GetValue("Pulser","DAQ");
 210     source.ToUpper();
 211     if ( source == "HLT") pulserSource[0] = AliShuttleInterface::kHLT;
 212     if (!GetHLTStatus()) pulserSource[0] = AliShuttleInterface::kDAQ;
 213     if (source == "HLTDAQ" ) {
 214         numSources=2;
 215         pulserSource[0] = AliShuttleInterface::kHLT;
 216         pulserSource[1] = AliShuttleInterface::kDAQ;
 217     }
 218     if (source == "DAQHLT" ) numSources=2;
 219     UInt_t pulserResult=0;
 220     for (Int_t i=0; i<numSources; i++ ) {
 221       pulserResult = ExtractPulser(pulserSource[i]);
 222       if ( pulserResult == 0 ) break;
 223     }
 224     result += pulserResult;
 225
 226   }
 227
 228
 229
 230   // Central Electrode processing
 231
 232   if( runType == kPhysicsRunType || runType == kStandAloneRunType ||
 233       runType == kDaqRunType ) {
 234
 235     Int_t numSources = 1;
 236     Int_t ceSource[2] = {AliShuttleInterface::kDAQ,AliShuttleInterface::kHLT} ;
 237     TString source = fConfEnv->GetValue("CE","DAQ");
 238     source.ToUpper();
 239     if ( source == "HLT") ceSource[0] = AliShuttleInterface::kHLT;
 240     if (!GetHLTStatus()) ceSource[0] = AliShuttleInterface::kDAQ;
 241     if (source == "HLTDAQ" ) {
 242         numSources=2;
 243         ceSource[0] = AliShuttleInterface::kHLT;
 244         ceSource[1] = AliShuttleInterface::kDAQ;
 245     }
 246     if (source == "DAQHLT" ) numSources=2;
 247     UInt_t ceResult=0;
 248     for (Int_t i=0; i<numSources; i++ ) {
 249       ceResult = ExtractCE(ceSource[i]);
 250       if ( ceResult == 0 ) break;
 251     }
 252     result += ceResult;
 253
 254   }
 255
 256   return result;
 257 }
 258 //______________________________________________________________________________________________
 259 UInt_t AliTPCPreprocessor::MapTemperature(TMap* dcsAliasMap)
 260 {
 261
 262    // extract DCS temperature maps. Perform fits to save space
 263
 264   UInt_t result=0;
 265   TMap *map = fTemp->ExtractDCS(dcsAliasMap);
 266   if (map) {
 267     fTemp->MakeSplineFit(map);
 268     Double_t fitFraction = 1.0*fTemp->NumFits()/fTemp->NumSensors();
 269     if (fitFraction > kFitFraction ) {
 270       AliInfo(Form("Temperature values extracted, fits performed.\n"));
 271     } else {
 272       Log ("Too few temperature maps fitted. \n");
 273       result = 9;
 274     }
 275   } else {
 276     Log("No temperature map extracted. \n");
 277     result=9;
 278   }
 279   delete map;
 280   // Now store the final CDB file
 281
 282   if ( result == 0 ) {
 283         AliCDBMetaData metaData;
 284         metaData.SetBeamPeriod(0);
 285         metaData.SetResponsible("Haavard Helstrup");
 286         metaData.SetComment("Preprocessor AliTPC data base entries.");
 287
 288         Bool_t storeOK = Store("Calib", "Temperature", fTemp, &metaData, 0, kFALSE);
 289         if ( !storeOK )  result=1;
 290
 291    }
 292
 293    return result;
 294
 295 }
 296
 297 //______________________________________________________________________________________________
 298 UInt_t AliTPCPreprocessor::MapHighVoltage(TMap* dcsAliasMap)
 299 {
 300
 301    // extract DCS HV maps. Perform fits to save space
 302
 303   UInt_t result=0;
 304   TMap *map = fHighVoltage->ExtractDCS(dcsAliasMap);
 305   if (map) {
 306     fHighVoltage->MakeSplineFit(map);
 307     Double_t fitFraction = 1.0*fHighVoltage->NumFits()/fHighVoltage->NumSensors();
 308     if (fitFraction > kFitFraction ) {
 309       AliInfo(Form("High volatge recordings extracted, fits performed.\n"));
 310     } else {
 311       Log ("Too few high voltage recordings fitted. \n");
 312       result = 9;
 313     }
 314   } else {
 315     Log("No high voltage recordings extracted. \n");
 316     result=9;
 317   }
 318   delete map;
 319   // Now store the final CDB file
 320
 321   if ( result == 0 ) {
 322         AliCDBMetaData metaData;
 323         metaData.SetBeamPeriod(0);
 324         metaData.SetResponsible("Haavard Helstrup");
 325         metaData.SetComment("Preprocessor AliTPC data base entries.");
 326
 327         Bool_t storeOK = Store("Calib", "HighVoltage", fHighVoltage, &metaData, 0, kFALSE);
 328         if ( !storeOK )  result=1;
 329
 330    }
 331
 332    return result;
 333
 334 }
 335
 336
 337 //______________________________________________________________________________________________
 338
 339 UInt_t AliTPCPreprocessor::ExtractPedestals(Int_t sourceFXS)
 340 {
 341  //
 342  //  Read pedestal file from file exchage server
 343  //  Keep original entry from OCDB in case no new pedestals are available
 344  //
 345  AliTPCCalPad *calPadPed=0;
 346  AliCDBEntry* entry = GetFromOCDB("Calib", "Pedestals");
 347  if (entry) calPadPed = (AliTPCCalPad*)entry->GetObject();
 348  if ( calPadPed==NULL ) {
 349      Log("AliTPCPreprocsessor: No previous TPC pedestal entry available.\n");
 350      calPadPed = new AliTPCCalPad("PedestalsMean","PedestalsMean");
 351  }
 352
 353  AliTPCCalPad *calPadRMS=0;
 354  entry = GetFromOCDB("Calib", "Noise");
 355  if (entry) calPadRMS = (AliTPCCalPad*)entry->GetObject();
 356  if ( calPadRMS==NULL ) {
 357      Log("AliTPCPreprocsessor: No previous TPC noise entry available.\n");
 358      calPadRMS = new AliTPCCalPad("PedestalsRMS","PedestalsRMS");
 359  }
 360
 361
 362  UInt_t result=0;
 363
 364  Int_t nSectors = fROC->GetNSectors();
 365  TList* list = GetFileSources(sourceFXS,"pedestals");
 366
 367  if (list && list->GetEntries()>0) {
 368
 369 //  loop through all files from LDCs
 370
 371     Bool_t changed=false;
 372     UInt_t index = 0;
 373     while (list->At(index)!=NULL) {
 374      TObjString* fileNameEntry = (TObjString*) list->At(index);
 375      if (fileNameEntry!=NULL) {
 376         TString fileName = GetFile(sourceFXS, "pedestals",
 377                                          fileNameEntry->GetString().Data());
 378         TFile *f = TFile::Open(fileName);
 379         if (!f) {
 380           Log ("Error opening pedestal file.");
 381           result =2;
 382           break;
 383         }
 384         AliTPCCalibPedestal *calPed;
 385         f->GetObject("AliTPCCalibPedestal",calPed);
 386         if ( !calPed ) {
 387           Log ("No pedestal calibration object in file.");
 388           result = 2;
 389           break;
 390         }
 391
 392         //  replace entries for the sectors available in the present file
 393
 394         changed=true;
 395         for (Int_t sector=0; sector<nSectors; sector++) {
 396            AliTPCCalROC *rocPed=calPed->GetCalRocPedestal(sector, kFALSE);
 397            if ( rocPed )  calPadPed->SetCalROC(rocPed,sector);
 398            AliTPCCalROC *rocRMS=calPed->GetCalRocRMS(sector, kFALSE);
 399            if ( rocRMS )  calPadRMS->SetCalROC(rocRMS,sector);
 400         }
 401       }
 402      ++index;
 403     }  // while(list)
 404 //
 405 //  Store updated pedestal entry to OCDB
 406 //
 407     if (changed) {
 408      AliCDBMetaData metaData;
 409      metaData.SetBeamPeriod(0);
 410      metaData.SetResponsible("Haavard Helstrup");
 411      metaData.SetComment("Preprocessor AliTPC data base entries.");
 412
 413      Bool_t storeOK = Store("Calib", "Pedestals", calPadPed, &metaData, 0, kTRUE);
 414      if ( !storeOK ) ++result;
 415      storeOK = Store("Calib", "PadNoise", calPadRMS, &metaData, 0, kTRUE);
 416      if ( !storeOK ) ++result;
 417     }
 418   } else {
 419     Log ("Error: no entries in input file list!");
 420     result = 1;
 421   }
 422
 423   return result;
 424 }
 425
 426 //______________________________________________________________________________________________
 427
 428
 429 UInt_t AliTPCPreprocessor::ExtractPulser(Int_t sourceFXS)
 430 {
 431  //
 432  //  Read pulser calibration file from file exchage server
 433  //  Keep original entry from OCDB in case no new pulser calibration is available
 434  //
 435  TObjArray    *pulserObjects=0;
 436  AliTPCCalPad *pulserTmean=0;
 437  AliTPCCalPad *pulserTrms=0;
 438  AliTPCCalPad *pulserQmean=0;
 439  AliCDBEntry* entry = GetFromOCDB("Calib", "Pulser");
 440  if (entry) pulserObjects = (TObjArray*)entry->GetObject();
 441  if ( pulserObjects==NULL ) {
 442      Log("AliTPCPreprocsessor: No previous TPC pulser entry available.\n");
 443      pulserObjects = new TObjArray;
 444  }
 445
 446  pulserTmean = (AliTPCCalPad*)pulserObjects->FindObject("PulserTmean");
 447  if ( !pulserTmean ) {
 448     pulserTmean = new AliTPCCalPad("PulserTmean","PulserTmean");
 449     pulserObjects->Add(pulserTmean);
 450  }
 451  pulserTrms = (AliTPCCalPad*)pulserObjects->FindObject("PulserTrms");
 452  if ( !pulserTrms )  {
 453     pulserTrms = new AliTPCCalPad("PulserTrms","PulserTrms");
 454     pulserObjects->Add(pulserTrms);
 455  }
 456  pulserQmean = (AliTPCCalPad*)pulserObjects->FindObject("PulserQmean");
 457  if ( !pulserQmean )  {
 458     pulserQmean = new AliTPCCalPad("PulserQmean","PulserQmean");
 459     pulserObjects->Add(pulserQmean);
 460  }
 461
 462
 463  UInt_t result=0;
 464
 465  Int_t nSectors = fROC->GetNSectors();
 466  TList* list = GetFileSources(sourceFXS,"pulser");
 467
 468  if (list && list->GetEntries()>0) {
 469
 470 //  loop through all files from LDCs
 471
 472     Bool_t changed=false;
 473     UInt_t index = 0;
 474     while (list->At(index)!=NULL) {
 475      TObjString* fileNameEntry = (TObjString*) list->At(index);
 476      if (fileNameEntry!=NULL) {
 477         TString fileName = GetFile(sourceFXS, "pulser",
 478                                          fileNameEntry->GetString().Data());
 479         TFile *f = TFile::Open(fileName);
 480         if (!f) {
 481           Log ("Error opening pulser file.");
 482           result =2;
 483           break;
 484         }
 485         AliTPCCalibPulser *calPulser;
 486         f->GetObject("AliTPCCalibPulser",calPulser);
 487         if ( !calPulser ) {
 488           Log ("No pulser calibration object in file.");
 489           result = 2;
 490           break;
 491         }
 492
 493         //  replace entries for the sectors available in the present file
 494
 495         changed=true;
 496         for (Int_t sector=0; sector<nSectors; sector++) {
 497            AliTPCCalROC *rocTmean=calPulser->GetCalRocT0(sector);
 498            if ( rocTmean )  pulserTmean->SetCalROC(rocTmean,sector);
 499            AliTPCCalROC *rocTrms=calPulser->GetCalRocRMS(sector);
 500            if ( rocTrms )  pulserTrms->SetCalROC(rocTrms,sector);
 501            AliTPCCalROC *rocQmean=calPulser->GetCalRocQ(sector);
 502            if ( rocQmean )  pulserQmean->SetCalROC(rocQmean,sector);
 503         }
 504       }
 505      ++index;
 506     }  // while(list)
 507 //
 508 //  Store updated pedestal entry to OCDB
 509 //
 510     if (changed) {
 511      AliCDBMetaData metaData;
 512      metaData.SetBeamPeriod(0);
 513      metaData.SetResponsible("Haavard Helstrup");
 514      metaData.SetComment("Preprocessor AliTPC data base entries.");
 515
 516      Bool_t storeOK = Store("Calib", "Pulser", pulserObjects, &metaData, 0, kTRUE);
 517      if ( !storeOK ) ++result;
 518     }
 519   } else {
 520     Log ("Error: no entries in input file list!");
 521     result = 1;
 522   }
 523
 524   return result;
 525 }
 526
 527 UInt_t AliTPCPreprocessor::ExtractCE(Int_t sourceFXS)
 528 {
 529  //
 530  //  Read Central Electrode file from file exchage server
 531  //  Keep original entry from OCDB in case no new CE calibration is available
 532  //
 533  TObjArray    *ceObjects=0;
 534  AliTPCCalPad *ceTmean=0;
 535  AliTPCCalPad *ceTrms=0;
 536  AliTPCCalPad *ceQmean=0;
 537  AliCDBEntry* entry = GetFromOCDB("Calib", "CE");
 538  if (entry) ceObjects = (TObjArray*)entry->GetObject();
 539  if ( ceObjects==NULL ) {
 540      Log("AliTPCPreprocsessor: No previous TPC central electrode entry available.\n");
 541      ceObjects = new TObjArray;
 542  }
 543
 544  ceTmean = (AliTPCCalPad*)ceObjects->FindObject("CETmean");
 545  if ( !ceTmean ) {
 546     ceTmean = new AliTPCCalPad("CETmean","CETmean");
 547     ceObjects->Add(ceTmean);
 548  }
 549  ceTrms = (AliTPCCalPad*)ceObjects->FindObject("CETrms");
 550  if ( !ceTrms )  {
 551     ceTrms = new AliTPCCalPad("CETrms","CETrms");
 552     ceObjects->Add(ceTrms);
 553  }
 554  ceQmean = (AliTPCCalPad*)ceObjects->FindObject("CEQmean");
 555  if ( !ceQmean )  {
 556     ceQmean = new AliTPCCalPad("CEQmean","CEQmean");
 557     ceObjects->Add(ceQmean);
 558  }
 559
 560
 561  UInt_t result=0;
 562
 563  Int_t nSectors = fROC->GetNSectors();
 564  TList* list = GetFileSources(sourceFXS,"CE");
 565
 566  if (list && list->GetEntries()>0) {
 567
 568 //  loop through all files from LDCs
 569
 570     UInt_t index = 0;
 571     while (list->At(index)!=NULL) {
 572      TObjString* fileNameEntry = (TObjString*) list->At(index);
 573      if (fileNameEntry!=NULL) {
 574         TString fileName = GetFile(sourceFXS, "CE",
 575                                          fileNameEntry->GetString().Data());
 576         TFile *f = TFile::Open(fileName);
 577         if (!f) {
 578           Log ("Error opening central electrode file.");
 579           result =2;
 580           break;
 581         }
 582         AliTPCCalibCE *calCE;
 583         f->GetObject("AliTPCCalibCE",calCE);
 584
 585         //  replace entries for the sectors available in the present file
 586
 587         for (Int_t sector=0; sector<nSectors; sector++) {
 588            AliTPCCalROC *rocTmean=calCE->GetCalRocT0(sector);
 589            if ( rocTmean )  ceTmean->SetCalROC(rocTmean,sector);
 590            AliTPCCalROC *rocTrms=calCE->GetCalRocRMS(sector);
 591            if ( rocTrms )  ceTrms->SetCalROC(rocTrms,sector);
 592            AliTPCCalROC *rocQmean=calCE->GetCalRocQ(sector);
 593            if ( rocQmean )  ceQmean->SetCalROC(rocQmean,sector);
 594         }
 595       }
 596      ++index;
 597     }  // while(list)
 598 //
 599 //  Store updated pedestal entry to OCDB
 600 //
 601     AliCDBMetaData metaData;
 602     metaData.SetBeamPeriod(0);
 603     metaData.SetResponsible("Haavard Helstrup");
 604     metaData.SetComment("Preprocessor AliTPC data base entries.");
 605
 606     Bool_t storeOK = Store("Calib", "CE", ceObjects, &metaData, 0, kTRUE);
 607     if ( !storeOK ) ++result;
 608
 609   } else {
 610     Log ("Error: no entries!");
 611     result = 1;
 612   }
 613
 614   return result;
 615 }