STEER/AliGRPPreprocessor.cxx

   1 /**************************************************************************
   2  * Copyright(c) 1998-1999, 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 /* $Id$ */
  17
  18 //-------------------------------------------------------------------------
  19 //                          Class AliGRPPreprocessor
  20 //                  Global Run Parameters (GRP) preprocessor
  21 //    Origin: Panos Christakoglou, UOA-CERN, Panos.Christakoglou@cern.ch
  22 //-------------------------------------------------------------------------
  23
  24 #include <TChain.h>
  25 #include <TList.h>
  26 #include <TMap.h>
  27 #include <TObjString.h>
  28 #include <TTimeStamp.h>
  29 #include <TSystem.h>
  30 #include <TFile.h>
  31
  32 #include "AliGRPPreprocessor.h"
  33 #include "AliGRPDCS.h"
  34 #include "AliDCSSensorArray.h"
  35
  36 #include "AliCDBMetaData.h"
  37 #include "AliLog.h"
  38
  39 class AliDCSValue;
  40 class AliShuttleInterface;
  41
  42 #include <TH1.h>
  43
  44 const Double_t kFitFraction = 0.7;                 // Fraction of DCS sensor fits required
  45
  46 ClassImp(AliGRPPreprocessor)
  47
  48 //_______________________________________________________________
  49   const char* AliGRPPreprocessor::fgkDCSDataPoints[12] = {"LHCState","LHCPeriod","LHCLuminosity","BeamIntensity","L3Current","L3Polarity","DipoleCurrent","DipolePolarity","CavernTemperature","CavernAtmosPressure","gva_cr5AtmosphericPressure","gva_meyrinAtmosphericPressure"};
  50
  51 //_______________________________________________________________
  52 AliGRPPreprocessor::AliGRPPreprocessor():
  53   AliPreprocessor("GRP",0), fPressure(0) {
  54   // default constructor - Don't use this!
  55
  56 }
  57
  58 //_______________________________________________________________
  59 AliGRPPreprocessor::AliGRPPreprocessor(AliShuttleInterface* shuttle):
  60   AliPreprocessor("GRP",shuttle), fPressure(0) {
  61   // constructor - shuttle must be instantiated!
  62
  63 }
  64
  65 //_______________________________________________________________
  66 AliGRPPreprocessor::~AliGRPPreprocessor() {
  67   //destructor
  68   delete fPressure;
  69 }
  70
  71 //_______________________________________________________________
  72 void AliGRPPreprocessor::Initialize(Int_t run, UInt_t startTime, UInt_t endTime) {
  73   // Initialize preprocessor
  74
  75   AliInfo(Form("\n\tRun %d \n\tStartTime %s \n\tEndTime %s", run, TTimeStamp(startTime).AsString(), TTimeStamp(endTime).AsString()));
  76
  77   fRun = run;
  78   fStartTime = startTime;
  79   fEndTime = endTime;
  80   AliInfo("Initialization of the GRP preprocessor.");
  81
  82   TClonesArray * array = new TClonesArray("AliDCSSensor",2);
  83   for(Int_t j = 0; j < 2; j++) {
  84     AliDCSSensor * sens = new ((*array)[j])AliDCSSensor;
  85     sens->SetStringID(fgkDCSDataPoints[j+10]);
  86   }
  87   AliInfo(Form("Pressure Entries: %d",array->GetEntries()));
  88
  89   fPressure = new AliDCSSensorArray(fStartTime, fEndTime, array);
  90 }
  91
  92 //_______________________________________________________________
  93 UInt_t AliGRPPreprocessor::Process(TMap* valueMap) {
  94   // process data retrieved by the Shuttle
  95
  96   //=================//
  97   // DAQ logbook     //
  98   //=================//
  99
 100   TList *daqlblist = ProcessDaqLB();
 101   if(!daqlblist) {
 102     Log(Form("Problem with the DAQ logbook parameters!!!"));
 103     return 1;
 104   }
 105   TMap *m1 = (TMap *)daqlblist->At(0);
 106   TObjString *s1 = (TObjString *)m1->GetValue("fAliceStartTime");
 107   UInt_t iStartTime = atoi(s1->String().Data());
 108   TMap *m2 = (TMap *)daqlblist->At(1);
 109   TObjString *s2 = (TObjString *)m2->GetValue("fAliceStopTime");
 110   UInt_t iStopTime = atoi(s2->String().Data());
 111
 112   //=================//
 113   // DAQ FXS         //
 114   //=================//
 115   UInt_t iDaqFxs = ProcessDaqFxs();
 116   if(iDaqFxs == 1) {
 117         Log(Form("Raw data tags merged successfully!"));
 118   } else {
 119         Log(Form("Could not store run raw tag file!"));
 120         return 1;
 121   }
 122
 123
 124   //=================//
 125   // DCS data points //
 126   //=================//
 127   TList *dcsdplist = ProcessDcsDPs(valueMap, iStartTime, iStopTime);
 128   if(!dcsdplist) {
 129     Log(Form("Problem with the DCS data points!!!"));
 130     return 1;
 131   }
 132   if(dcsdplist->GetEntries() != 10) {
 133     Log(Form("Problem with the DCS data points!!!"));
 134     // return 1; // TODO:COMMENTED FOR TESTING PURPOSES!
 135   }
 136   //NEEDS TO BE REVISED - BREAKS!!!
 137 //   AliDCSSensorArray *dcsSensorArray = GetPressureMap(valueMap,fPressure);
 138 //   if(!dcsSensorArray) {
 139 //     Log(Form("Problem with the pressure sensor values!!!"));
 140 //     return 0;
 141 //   }
 142
 143   TList * list = new TList();
 144   list = GetGlobalList(daqlblist,dcsdplist);
 145   list->SetOwner(1);
 146   AliInfo(Form("Final list entries: %d",list->GetEntries()));
 147
 148   AliCDBMetaData md;
 149   md.SetResponsible("Panos Christakoglou");
 150   md.SetComment("Output parameters from the GRP preprocessor.");
 151
 152   Bool_t result = Store("GRP", "Data", list, &md);
 153
 154   delete list;
 155
 156   if (result)
 157     return 0;
 158   else
 159     return 1;
 160 }
 161
 162 //_______________________________________________________________
 163 TList *AliGRPPreprocessor::GetGlobalList(TList *l1, TList *l2) {
 164   //Getting the global output TList
 165   TList *list = new TList();
 166   TMap *map = new TMap();
 167   for(Int_t i = 0; i < l1->GetEntries(); i++)
 168     list->AddLast(map = (TMap *)l1->At(i));
 169   for(Int_t i = 0; i < l2->GetEntries(); i++)
 170     list->AddLast(map = (TMap *)l2->At(i));
 171
 172   return list;
 173 }
 174
 175 //_______________________________________________________________
 176 TList *AliGRPPreprocessor::ProcessDaqLB() {
 177   //Getting the DAQ lb informnation
 178   const char* timeStart = GetRunParameter("time_start");
 179   const char* timeEnd = GetRunParameter("time_end");
 180   const char* beamEnergy = GetRunParameter("beamEnergy");
 181   const char* beamType = GetRunParameter("beamType");
 182   const char* numberOfDetectors = GetRunParameter("numberOfDetectors");
 183   const char* detectorMask = GetRunParameter("detectorMask");
 184   const char* lhcPeriod = GetRunParameter("LHCperiod");
 185
 186   if (timeStart) {
 187     Log(Form("Start time for run %d: %s",fRun, timeStart));
 188   } else {
 189     Log(Form("Start time not put in logbook!"));
 190   }
 191   TMap *mapDAQ1 = new TMap();
 192   mapDAQ1->Add(new TObjString("fAliceStartTime"),new TObjString(timeStart));
 193
 194   if (timeEnd) {
 195     Log(Form("End time for run %d: %s",fRun, timeEnd));
 196   } else {
 197     Log(Form("End time not put in logbook!"));
 198   }
 199   TMap *mapDAQ2 = new TMap();
 200   mapDAQ2->Add(new TObjString("fAliceStopTime"),new TObjString(timeEnd));
 201
 202   if (beamEnergy) {
 203     Log(Form("Beam energy for run %d: %s",fRun, beamEnergy));
 204   } else {
 205     Log(Form("Beam energy not put in logbook!"));
 206   }
 207   TMap *mapDAQ3 = new TMap();
 208   mapDAQ3->Add(new TObjString("fAliceBeamEnergy"),new TObjString(beamEnergy));
 209
 210   if (beamType) {
 211     Log(Form("Beam type for run %d: %s",fRun, beamType));
 212   } else {
 213     Log(Form("Beam type not put in logbook!"));
 214   }
 215   TMap *mapDAQ4 = new TMap();
 216   mapDAQ4->Add(new TObjString("fAliceBeamType"),new TObjString(beamType));
 217
 218   if (numberOfDetectors) {
 219     Log(Form("Number of active detectors for run %d: %s",fRun, numberOfDetectors));
 220   } else {
 221     Log(Form("Number of active detectors not put in logbook!"));
 222   }
 223   TMap *mapDAQ5 = new TMap();
 224   mapDAQ5->Add(new TObjString("fNumberOfDetectors"),new TObjString(numberOfDetectors));
 225
 226   if (detectorMask) {
 227     Log(Form("Detector mask for run %d: %s",fRun, detectorMask));
 228   } else {
 229     Log(Form("Detector mask not put in logbook!"));
 230   }
 231   TMap *mapDAQ6 = new TMap();
 232   mapDAQ6->Add(new TObjString("fDetectorMask"),new TObjString(detectorMask));
 233
 234   if (lhcPeriod) {
 235     Log(Form("LHC period (DAQ) for run %d: %s",fRun, lhcPeriod));
 236   } else {
 237     Log(Form("LHCperiod not put in logbook!"));
 238   }
 239   TMap *mapDAQ7 = new TMap();
 240   mapDAQ7->Add(new TObjString("fLHCPeriod"),new TObjString(lhcPeriod));
 241
 242   TList *list = new TList();
 243   list->Add(mapDAQ1); list->Add(mapDAQ2);
 244   list->Add(mapDAQ3); list->Add(mapDAQ4);
 245   list->Add(mapDAQ5); list->Add(mapDAQ6);
 246   list->Add(mapDAQ7);
 247
 248   return list;
 249 }
 250
 251 //_______________________________________________________________
 252 UInt_t AliGRPPreprocessor::ProcessDaqFxs() {
 253   //======DAQ FXS======//
 254   TChain *fRawTagChain = new TChain("T");
 255
 256   TList* list = GetFileSources(kDAQ);
 257   if (!list) {
 258     Log("No raw data tag list found!!!");
 259     return 0;
 260   }
 261   TIterator* iter = list->MakeIterator();
 262   TObject* obj = 0;
 263   while ((obj = iter->Next())) {
 264     TObjString* objStr = dynamic_cast<TObjString*> (obj);
 265     if (objStr) {
 266       Log(Form("Found source %s", objStr->String().Data()));
 267       TList* list2 = GetFileIDs(kDAQ, objStr->String());
 268       if (!list2) {
 269         Log("No list with ids from DAQ was found!!!");
 270         return 0;
 271       }
 272       Log(Form("Number of ids: %d",list2->GetEntries()));
 273       for(Int_t i = 0; i < list2->GetEntries(); i++) {
 274         TObjString *idStr = (TObjString *)list2->At(i);
 275         //Log(Form("Filename1: %s",idStr->String().Data()));
 276         TString fileName = GetFile(kDAQ,idStr->String().Data(),objStr->String().Data());
 277         Log(Form("Adding file in the chain: %s",fileName.Data()));
 278         fRawTagChain->Add(fileName.Data());
 279         //fRawDataFileName = fileName(0,fileName.First("_"));
 280       }
 281       delete list2;
 282     }
 283   }
 284   delete iter;
 285   delete list;
 286   TString fRawDataFileName = "GRP_Merged.tag.root";
 287   Log(Form("Merging raw data tags into file: %s",fRawDataFileName.Data()));
 288   fRawTagChain->Merge(fRawDataFileName);
 289
 290   TString outputfile = Form("Run%d.Merged.RAW.tag.root", fRun);
 291   Bool_t result = StoreRunMetadataFile(fRawDataFileName.Data(),outputfile.Data());
 292
 293   return (UInt_t) result;
 294 }
 295
 296 //_______________________________________________________________
 297 TList *AliGRPPreprocessor::ProcessDcsDPs(TMap* valueMap, UInt_t iStartTime, UInt_t iStopTime) {
 298   //Getting the DCS dps
 299   //===========//
 300
 301   TList *list = new TList();
 302
 303   //DCS data points
 304   //===========//
 305   AliInfo(Form("==========LHCState==========="));
 306   TObjArray *aliasLHCState = (TObjArray *)valueMap->GetValue(fgkDCSDataPoints[0]);
 307   if(!aliasLHCState) {
 308     Log(Form("LHCState not found!!!"));
 309     return list;
 310   }
 311   AliGRPDCS *dcs1 = new AliGRPDCS(aliasLHCState,iStartTime,iStopTime);
 312   TString sLHCState = dcs1->ProcessDCS(3);
 313   if (sLHCState) {
 314     Log(Form("<LHCState> for run %d: %s",fRun, sLHCState.Data()));
 315   } else {
 316     Log(Form("LHCState not put in TMap!"));
 317   }
 318   TMap *mapDCS1 = new TMap();
 319   mapDCS1->Add(new TObjString("fLHCState"),new TObjString(sLHCState));
 320   list->Add(mapDCS1);
 321
 322   AliInfo(Form("==========LHCPeriod==========="));
 323   TObjArray *aliasLHCPeriod = (TObjArray *)valueMap->GetValue(fgkDCSDataPoints[1]);
 324   if(!aliasLHCPeriod) {
 325     Log(Form("LHCPeriod not found!!!"));
 326     return list;
 327   }
 328   AliGRPDCS *dcs2 = new AliGRPDCS(aliasLHCPeriod,iStartTime,iStopTime);
 329   TString sLHCPeriod = dcs2->ProcessDCS(3);
 330   if (sLHCPeriod) {
 331     Log(Form("<LHCPeriod> for run %d: %s",fRun, sLHCPeriod.Data()));
 332   } else {
 333     Log(Form("LHCPeriod not put in TMap!"));
 334   }
 335   TMap *mapDCS2 = new TMap();
 336   mapDCS2->Add(new TObjString("fLHCCondition"),new TObjString(sLHCPeriod));
 337   list->Add(mapDCS2);
 338
 339   AliInfo(Form("==========LHCLuminosity==========="));
 340   TObjArray *aliasLHCLuminosity = (TObjArray *)valueMap->GetValue(fgkDCSDataPoints[2]);
 341   if(!aliasLHCLuminosity) {
 342     Log(Form("LHCLuminosity not found!!!"));
 343     return list;
 344   }
 345   AliGRPDCS *dcs3 = new AliGRPDCS(aliasLHCLuminosity,iStartTime,iStopTime);
 346   TString sMeanLHCLuminosity = dcs3->ProcessDCS(2);
 347   if (sMeanLHCLuminosity) {
 348     Log(Form("<LHCLuminosity> for run %d: %s",fRun, sMeanLHCLuminosity.Data()));
 349   } else {
 350     Log(Form("LHCLuminosity not put in TMap!"));
 351   }
 352   TMap *mapDCS3 = new TMap();
 353   mapDCS3->Add(new TObjString("fLHCLuminosity"),new TObjString(sMeanLHCLuminosity));
 354   list->Add(mapDCS3);
 355
 356   AliInfo(Form("==========BeamIntensity==========="));
 357   TObjArray *aliasBeamIntensity = (TObjArray *)valueMap->GetValue(fgkDCSDataPoints[3]);
 358   if(!aliasBeamIntensity) {
 359     Log(Form("BeamIntensity not found!!!"));
 360     return list;
 361   }
 362   AliGRPDCS *dcs4 = new AliGRPDCS(aliasBeamIntensity,iStartTime,iStopTime);
 363   TString sMeanBeamIntensity = dcs4->ProcessDCS(2);
 364   if (sMeanBeamIntensity) {
 365     Log(Form("<BeamIntensity> for run %d: %s",fRun, sMeanBeamIntensity.Data()));
 366   } else {
 367     Log(Form("BeamIntensity not put in TMap!"));
 368   }
 369   TMap *mapDCS4 = new TMap();
 370   mapDCS4->Add(new TObjString("fBeamIntensity"),new TObjString(sMeanBeamIntensity));
 371   list->Add(mapDCS4);
 372
 373   AliInfo(Form("==========L3Current==========="));
 374   TObjArray *aliasL3Current = (TObjArray *)valueMap->GetValue(fgkDCSDataPoints[4]);
 375   if(!aliasL3Current) {
 376     Log(Form("L3Current not found!!!"));
 377     return list;
 378   }
 379   AliGRPDCS *dcs5 = new AliGRPDCS(aliasL3Current,iStartTime,iStopTime);
 380   TString sMeanL3Current = dcs5->ProcessDCS(2);
 381   if (sMeanL3Current) {
 382     Log(Form("<L3Current> for run %d: %s",fRun, sMeanL3Current.Data()));
 383   } else {
 384     Log(Form("L3Current not put in TMap!"));
 385   }
 386   TMap *mapDCS5 = new TMap();
 387   mapDCS5->Add(new TObjString("fL3Current"),new TObjString(sMeanL3Current));
 388   list->Add(mapDCS5);
 389
 390   AliInfo(Form("==========L3Polarity==========="));
 391   TObjArray *aliasL3Polarity = (TObjArray *)valueMap->GetValue(fgkDCSDataPoints[5]);
 392   if(!aliasL3Polarity) {
 393     Log(Form("L3Polarity not found!!!"));
 394     return list;
 395   }
 396   AliGRPDCS *dcs6 = new AliGRPDCS(aliasL3Polarity,iStartTime,iStopTime);
 397   TString sL3Polarity = dcs6->ProcessDCS(4);
 398   if (sL3Polarity) {
 399     Log(Form("<L3Polarity> for run %d: %s",fRun, sL3Polarity.Data()));
 400   } else {
 401     Log(Form("L3Polarity not put in TMap!"));
 402   }
 403   TMap *mapDCS6 = new TMap();
 404   mapDCS6->Add(new TObjString("fL3Polarity"),new TObjString(sL3Polarity));
 405   list->Add(mapDCS6);
 406
 407   AliInfo(Form("==========DipoleCurrent==========="));
 408   TObjArray *aliasDipoleCurrent = (TObjArray *)valueMap->GetValue(fgkDCSDataPoints[6]);
 409   if(!aliasDipoleCurrent) {
 410     Log(Form("DipoleCurrent not found!!!"));
 411     return list;
 412   }
 413   AliGRPDCS *dcs7 = new AliGRPDCS(aliasDipoleCurrent,iStartTime,iStopTime);
 414   TString sMeanDipoleCurrent = dcs7->ProcessDCS(2);
 415   if (sMeanDipoleCurrent) {
 416     Log(Form("<DipoleCurrent> for run %d: %s",fRun, sMeanDipoleCurrent.Data()));
 417   } else {
 418     Log(Form("DipoleCurrent not put in TMap!"));
 419   }
 420   TMap *mapDCS7 = new TMap();
 421   mapDCS7->Add(new TObjString("fDipoleCurrent"),new TObjString(sMeanDipoleCurrent));
 422   list->Add(mapDCS7);
 423
 424   AliInfo(Form("==========DipolePolarity==========="));
 425   TObjArray *aliasDipolePolarity = (TObjArray *)valueMap->GetValue(fgkDCSDataPoints[7]);
 426   if(!aliasDipolePolarity) {
 427     Log(Form("DipolePolarity not found!!!"));
 428     return list;
 429   }
 430   AliGRPDCS *dcs8 = new AliGRPDCS(aliasDipolePolarity,iStartTime,iStopTime);
 431   TString sDipolePolarity = dcs8->ProcessDCS(4);
 432   if (sDipolePolarity) {
 433     Log(Form("<DipolePolarity> for run %d: %s",fRun, sDipolePolarity.Data()));
 434   } else {
 435     Log(Form("DipolePolarity not put in TMap!"));
 436   }
 437   TMap *mapDCS8 = new TMap();
 438   mapDCS8->Add(new TObjString("fDipolePolarity"),new TObjString(sDipolePolarity));
 439   list->Add(mapDCS8);
 440
 441   AliInfo(Form("==========CavernTemperature==========="));
 442   TObjArray *aliasCavernTemperature = (TObjArray *)valueMap->GetValue(fgkDCSDataPoints[8]);
 443   if(!aliasCavernTemperature) {
 444     Log(Form("CavernTemperature not found!!!"));
 445     return list;
 446   }
 447   AliGRPDCS *dcs9 = new AliGRPDCS(aliasCavernTemperature,iStartTime,iStopTime);
 448   TString sMeanCavernTemperature = dcs9->ProcessDCS(2);
 449   if (sMeanCavernTemperature) {
 450     Log(Form("<CavernTemperature> for run %d: %s",fRun, sMeanCavernTemperature.Data()));
 451   } else {
 452     Log(Form("CavernTemperature not put in TMap!"));
 453   }
 454   TMap *mapDCS9 = new TMap();
 455   mapDCS9->Add(new TObjString("fCavernTemperature"),new TObjString(sMeanCavernTemperature));
 456   list->Add(mapDCS9);
 457
 458   AliInfo(Form("==========CavernPressure==========="));
 459   TObjArray *aliasCavernPressure = (TObjArray *)valueMap->GetValue(fgkDCSDataPoints[9]);
 460   if(!aliasCavernPressure) {
 461     Log(Form("CavernPressure not found!!!"));
 462     return list;
 463   }
 464   AliGRPDCS *dcs10 = new AliGRPDCS(aliasCavernPressure,iStartTime,iStopTime);
 465   TString sMeanCavernPressure = dcs10->ProcessDCS(2);
 466   if (sMeanCavernPressure) {
 467     Log(Form("<CavernPressure> for run %d: %s",fRun, sMeanCavernPressure.Data()));
 468   } else {
 469     Log(Form("CavernPressure not put in TMap!"));
 470   }
 471   TMap *mapDCS10 = new TMap();
 472   mapDCS10->Add(new TObjString("fCavernPressure"),new TObjString(sMeanCavernPressure));
 473   list->Add(mapDCS10);
 474
 475   return list;
 476 }
 477
 478 //_______________________________________________________________
 479 AliDCSSensorArray *AliGRPPreprocessor::GetPressureMap(TMap* dcsAliasMap, AliDCSSensorArray *fPressure) {
 480   // extract DCS pressure maps. Perform fits to save space
 481
 482   TMap *map = fPressure->ExtractDCS(dcsAliasMap);
 483   if (map) {
 484     fPressure->MakeSplineFit(map);
 485     Double_t fitFraction = fPressure->NumFits()/fPressure->NumSensors();
 486     if (fitFraction > kFitFraction ) {
 487       AliInfo(Form("Pressure values extracted, fits performed.\n"));
 488     } else {
 489       AliInfo("Too few pressure maps fitted. \n");
 490     }
 491   } else {
 492     AliInfo("AliGRPDCS: no atmospheric pressure map extracted. \n");
 493   }
 494   delete map;
 495
 496   return fPressure;
 497 }
 498
 499 //_______________________________________________________________
 500 /*UInt_t AliGRPPreprocessor::MapPressure(TMap* dcsAliasMap) {
 501   // extract DCS pressure maps. Perform fits to save space
 502
 503   UInt_t result=0;
 504   TMap *map = fPressure->ExtractDCS(dcsAliasMap);
 505   if (map) {
 506     fPressure->MakeSplineFit(map);
 507     Double_t fitFraction = fPressure->NumFits()/fPressure->NumSensors();
 508     if (fitFraction > kFitFraction ) {
 509       AliInfo(Form("Pressure values extracted, fits performed.\n"));
 510     } else {
 511       Log ("Too few pressure maps fitted. \n");
 512       result = 9;
 513     }
 514   } else {
 515     Log("AliTPCPreprocsessor: no atmospheric pressure map extracted. \n");
 516     result=9;
 517   }
 518   delete map;
 519   // Now store the final CDB file
 520
 521   if ( result == 0 ) {
 522     AliCDBMetaData metaData;
 523     metaData.SetBeamPeriod(0);
 524     metaData.SetResponsible("Panos Christakoglou");
 525     metaData.SetComment("Preprocessor AliGRP data base pressure entries.");
 526
 527     Bool_t storeOK = Store("Calib", "Pressure", fPressure, &metaData, 0, 0);
 528     if ( !storeOK ) result=1;
 529   }
 530
 531   return result;
 532   }*/