2 //Class (base) responsible for management of data:
3 // - opening and closing proper files
4 // - posting data to folders
5 // - writing data from folders to proper files
7 //Author: Alice Offline Group http://alisoft.cern.ch
8 //Responsible: Piotr.Skowronski@cern.ch
10 #include <AliLoader.h>
23 #include <AliRunLoader.h>
24 #include <AliRunDigitizer.h>
25 #include <AliDigitizer.h>
26 #include <AliDetector.h>
27 #include "AliConfig.h"
29 Int_t AliLoader::fgDebug = 0;
31 const TString AliLoader::fgkDefaultHitsContainerName("TreeH");
32 const TString AliLoader::fgkDefaultDigitsContainerName = "TreeD";
33 const TString AliLoader::fgkDefaultSDigitsContainerName = "TreeS";
34 const TString AliLoader::fgkDefaultRecPointsContainerName = "TreeR";
35 const TString AliLoader::fgkDefaultTracksContainerName = "TreeT";
36 const TString AliLoader::fgkDefaultRecParticlesContainerName = "TreeP";
37 const TString AliLoader::fgkLoaderBaseName("Loader");
40 //___________________________________________________________________
41 /////////////////////////////////////////////////////////////////////
45 // Base class for Loaders. //
46 // Loader provides base I/O fascilities for "standard" data. //
47 // Each detector has a laoder data member //
48 // loader is accessible via folder structure as well //
50 /////////////////////////////////////////////////////////////////////
52 /*****************************************************************************/
54 AliLoader::AliLoader():
59 fDetectorDataFolder(0x0),
67 /******************************************************************/
69 AliLoader::AliLoader(const Char_t* detname,const Char_t* eventfoldername):
70 fDataLoaders(new TObjArray(kNDataTypes)),
74 fDetectorDataFolder(0x0),
80 if (GetDebug()) Info("AliLoader(const Char_t* detname,const Char_t* eventfoldername)",
81 "detname = %s eventfoldername = %s",detname,eventfoldername);
83 //try to find folder eventfoldername in top alice folder
84 //safe because GetTopFolder will abort in case of failure
86 fDetectorName = detname;
87 fName = fDetectorName+"Loader";
90 TObject* fobj = GetTopFolder()->FindObject(eventfoldername);
91 fEventFolder = (fobj)?dynamic_cast<TFolder*>(fobj):0x0;//in case FindObject returns NULL dynamic cast cause seg. fault
92 SetEventFolder(fEventFolder);
95 /*****************************************************************************/
97 AliLoader::AliLoader(const Char_t * detname,TFolder* eventfolder):
98 fDataLoaders(new TObjArray(kNDataTypes)),
99 fDetectorName(detname),
102 fDetectorDataFolder(0x0),
108 fDetectorName = detname;
109 fName = fDetectorName+"Loader";
111 SetEventFolder(eventfolder);
112 //fileoption's don't need to initialized because default TString ctor does it correctly
114 /*****************************************************************************/
115 AliLoader::AliLoader(const AliLoader& source):TNamed(source) {
116 // dummy copy constructor
117 if(&source==this)return;
119 Fatal("AliLoader","Copy constructor not implemented. Aborting");
123 /*****************************************************************************/
124 AliLoader& AliLoader::operator=(const AliLoader& source) {
125 // dummy assignment operator
126 if(&source==this) return *this;
128 Fatal("AliLoader","Assignment operator not implemented. Aborting");
132 /*****************************************************************************/
133 AliLoader::~AliLoader()
136 if (fDataLoaders) fDataLoaders->SetOwner();
139 /*****************************************************************************/
141 void AliLoader::InitDefaults()
145 dl = new AliDataLoader(fDetectorName + ".Hits.root",fgkDefaultHitsContainerName, "Hits" );
146 fDataLoaders->AddAt(dl,kHits);
149 // S U M M A B L E D I G I T S
150 dl = new AliDataLoader(fDetectorName + ".SDigits.root",fgkDefaultSDigitsContainerName, "Summable Digits");
151 AliTaskLoader* tl = new AliTaskLoader(fDetectorName + AliConfig::Instance()->GetSDigitizerTaskName(),
152 dl,AliRunLoader::GetRunSDigitizer(),kTRUE);
153 dl->SetBaseTaskLoader(tl);
154 fDataLoaders->AddAt(dl,kSDigits);
157 dl = new AliDataLoader(fDetectorName + ".Digits.root",fgkDefaultDigitsContainerName, "Digits");
158 tl = new AliTaskLoader(fDetectorName + AliConfig::Instance()->GetDigitizerTaskName(),
159 dl,AliRunLoader::GetRunDigitizer(),kTRUE);
160 dl->SetBaseTaskLoader(tl);
161 fDataLoaders->AddAt(dl,kDigits);
163 // R E C O N S T R U C T E D P O I N T S aka C L U S T E R S
164 dl = new AliDataLoader(fDetectorName + ".RecPoints.root",fgkDefaultRecPointsContainerName, "Reconstructed Points");
165 tl = new AliTaskLoader(fDetectorName + AliConfig::Instance()->GetReconstructionerTaskName(),
166 dl,AliRunLoader::GetRunReconstructioner(),kTRUE);
167 dl->SetBaseTaskLoader(tl);
168 fDataLoaders->AddAt(dl,kRecPoints);
171 dl = new AliDataLoader(fDetectorName + ".Tracks.root",fgkDefaultTracksContainerName, "Tracks");
172 tl = new AliTaskLoader(fDetectorName + AliConfig::Instance()->GetTrackerTaskName(),
173 dl,AliRunLoader::GetRunTracker(),kTRUE);
174 dl->SetBaseTaskLoader(tl);
175 fDataLoaders->AddAt(dl,kTracks);
177 // R E C O N S T R U C T E D P O I N T S aka C L U S T E R S
178 dl = new AliDataLoader(fDetectorName + ".RecParticles.root",fgkDefaultRecParticlesContainerName, "Reconstructed Particles");
179 tl = new AliTaskLoader(fDetectorName + AliConfig::Instance()->GetPIDTaskName(),
180 dl,AliRunLoader::GetRunPIDTask(),kTRUE);
181 dl->SetBaseTaskLoader(tl);
182 fDataLoaders->AddAt(dl,kRecParticles);
185 /*****************************************************************************/
187 AliDataLoader* AliLoader::GetDataLoader(const char* name)
189 //returns Data Loader with specified name
190 return dynamic_cast<AliDataLoader*>(fDataLoaders->FindObject(name));
192 /*****************************************************************************/
193 void AliLoader::AddDataLoader(AliDataLoader* dl)
198 Error("AddDataLoader","Pointer is NULL");
201 if (fDataLoaders->FindObject(dl->GetName()))
203 Error("AddDataLoader","Such a loader exists");
206 fDataLoaders->AddLast(dl);
207 dl->SetEventFolder(fEventFolder);
208 dl->SetFolder(GetDetectorDataFolder()); //Must exists - ensure register is called before
210 /*****************************************************************************/
212 Int_t AliLoader::SetEvent()
214 //basically the same that GetEvent but do not post data to folders
215 TIter next(fDataLoaders);
217 while ((dl = (AliDataLoader*)next()))
223 /******************************************************************/
225 void AliLoader::UnloadAll()
227 //calls UnloadAll for all base laoders
229 TIter next(fDataLoaders);
231 while ((dl = (AliDataLoader*)next()))
236 /******************************************************************/
238 Int_t AliLoader::GetEvent()
240 //changes to proper root directory and tries to load data from files to folders
241 // event number is defined in RunLoader
244 // 0 - in case of no error
245 // 1 - event not found
249 TIter next(fDataLoaders);
251 while ((dl = (AliDataLoader*)next()))
253 retval = dl->GetEvent();
256 Error("GetEvent","Error occured while GetEvent for %s",dl->GetName());
264 /******************************************************************/
266 TFolder* AliLoader::GetTopFolder()
268 //returns TOP aliroot folder, just a simple interface to AliConfig (gives shorter notation)
269 return AliConfig::Instance()->GetTopFolder();
272 /******************************************************************/
274 TFolder* AliLoader::GetEventFolder()
276 //get EVENT folder (data that are changing from event to event, even in single run)
279 /******************************************************************/
280 TFolder* AliLoader::GetDataFolder()
282 //returns the folder speciofic to given detector e.g. /Folders/Event/Data/
285 fDataFolder = dynamic_cast<TFolder*>(GetEventFolder()->FindObject(AliConfig::fgkDataFolderName));
289 Fatal("GetDataFolder","Can not find AliRoot data folder. Aborting");
296 /*****************************************************************************/
298 TFolder* AliLoader::GetTasksFolder()
300 //Returns pointer to Folder with Alice Tasks
303 fTasksFolder = dynamic_cast<TFolder*>(GetTopFolder()->FindObject(AliConfig::fgkTasksFolderName));
307 Fatal("GetTasksFolder","Can not find tasks folder. Aborting");
314 /*****************************************************************************/
316 TFolder* AliLoader::GetModulesFolder()
318 //returns pointer to the folder containing modules
321 fModuleFolder = dynamic_cast<TFolder*>(GetEventFolder()->FindObjectAny(AliConfig::GetModulesFolderName()));
325 Fatal("GetModulesFolder","Can not find modules folder. Aborting");
329 return fModuleFolder;
332 /*****************************************************************************/
334 TFolder* AliLoader::GetQAFolder()
336 //returns folder with Quality assurance
337 if (fQAFolder == 0x0)
339 TObject *obj = GetEventFolder()->FindObjectAny(AliConfig::Instance()->GetQAFolderName());
340 fQAFolder = (obj)?dynamic_cast<TFolder*>(obj):0x0;
342 if (fQAFolder == 0x0)
344 Fatal("GetQAFolder","Can not find Quality Assurance folder. Aborting");
351 /*****************************************************************************/
352 TTask* AliLoader::SDigitizer() const
354 //returns SDigitizer task for this detector
355 return GetSDigitsDataLoader()->GetBaseTaskLoader()->Task();
358 /*****************************************************************************/
360 AliDigitizer* AliLoader::Digitizer() const
362 //returns Digitizer task for this detector
363 return dynamic_cast<AliDigitizer*>(GetDigitsDataLoader()->GetBaseTaskLoader()->Task());
365 /*****************************************************************************/
367 TTask* AliLoader::Reconstructioner() const
369 //returns Recontructioner (Cluster Finder, Cluster Maker,
370 //or whatever you want to call it) task for this detector
371 return GetRecPointsDataLoader()->GetBaseTaskLoader()->Task();
373 /*****************************************************************************/
375 TTask* AliLoader::Tracker() const
378 return dynamic_cast<TTask*>(GetTracksDataLoader()->GetBaseTaskLoader()->Task());
381 /*****************************************************************************/
382 TTask* AliLoader::PIDTask() const
385 return dynamic_cast<TTask*>(GetRecParticlesDataLoader()->GetBaseTaskLoader()->Task());
388 /*****************************************************************************/
390 TTask* AliLoader::QAtask(const char* name) const
392 // Returns pointer to the quality assurance task
393 TTask* qat = AliRunLoader::GetRunQATask();
396 Error("QAtask","Can not get RunQATask. (Name:%s)",GetName());
400 TString dqatname(fDetectorName + AliConfig::Instance()->GetQATaskName());
401 TTask* dqat = dynamic_cast<TTask*>(qat->GetListOfTasks()->FindObject(dqatname));
405 Error("QAtask","Can not find QATask in RunQATask for %s",GetDetectorName().Data());
409 if (strlen(name) == 0) return dqat;
411 TList* list = dqat->GetListOfTasks();
415 while((task = static_cast<TTask *>(it.Next()) ))
417 TString taskname(task->GetName()) ;
418 if(taskname.BeginsWith(name))
421 Error("QAtask","Can not find sub-task with name starting with %s in task %s",name,dqat->GetName());
424 /*****************************************************************************/
426 TDirectory* AliLoader::ChangeDir(TFile* file, Int_t eventno)
428 //changes the root directory in "file" to "dirname" which corresponds to event 'eventno'
429 //in case of success returns the pointer to directory
434 ::Error("AliLoader::ChangeDir","File is null");
437 if (file->IsOpen() == kFALSE)
439 ::Error("AliLoader::ChangeDir","File is not opened");
443 TString dirname("Event");
445 if (AliLoader::fgDebug > 1)
446 ::Info("AliLoader::ChangeDir","Changing Dir to %s in file %s.",dirname.Data(),file->GetName());
450 TDirectory* dir = dynamic_cast<TDirectory*>(file->Get(dirname));
454 if (AliLoader::fgDebug > 1)
455 ::Info("AliLoader::ChangeDir","Can not find directory %s in file %s, creating...",
456 dirname.Data(),file->GetName());
458 if (file->IsWritable() == kFALSE)
460 ::Error("AliLoader::ChangeDir","Can not create directory. File %s in not writable.",
465 TDirectory* newdir = file->mkdir(dirname);
468 ::Error("AliLoader::ChangeDir","Failed to create new directory in file %s.",
472 result = file->cd(dirname);
473 if (result == kFALSE)
480 file->cd();//make a file active
481 file->cd(dirname);//cd event dir
486 /*****************************************************************************/
488 TString AliLoader::GetUnixDir() const
490 //This Method will manage jumping through unix directories in case of
491 //run with more events per run than defined in gAlice
497 /*****************************************************************************/
498 /************************************************************/
500 void AliLoader::MakeTree(Option_t *option)
502 //Makes a tree depending on option
505 // S: - Summable Digits
506 // R: - Reconstructed Points (clusters)
507 // T: - Tracks (tracklets)
509 const char *oH = strstr(option,"H");
510 const char *oD = strstr(option,"D");
511 const char *oS = strstr(option,"S");
512 const char *oR = strstr(option,"R");
513 const char *oT = strstr(option,"T");
514 const char *oP = strstr(option,"P");
516 if (oH) MakeHitsContainer();
517 if (oD) MakeDigitsContainer();
518 if (oS) MakeSDigitsContainer();
519 if (oR) MakeRecPointsContainer();
520 if (oT) MakeTracksContainer();
521 if (oP) MakeRecParticlesContainer();
524 /*****************************************************************************/
525 Int_t AliLoader::WriteHits(Option_t* opt) const
528 AliDataLoader* dl = GetHitsDataLoader();
529 Int_t ret = dl->WriteData(opt);
532 /*****************************************************************************/
534 Int_t AliLoader::WriteSDigits(Option_t* opt) const
536 // Writes summable digits
537 AliDataLoader* dl = GetSDigitsDataLoader();
538 Int_t ret = dl->WriteData(opt);
542 /*****************************************************************************/
544 Int_t AliLoader::PostSDigitizer(TTask* sdzer) const
547 return GetSDigitsDataLoader()->GetBaseTaskLoader()->Post(sdzer);
549 /*****************************************************************************/
551 Int_t AliLoader::PostDigitizer(AliDigitizer* task) const
554 return GetDigitsDataLoader()->GetBaseTaskLoader()->Post(task);
556 /*****************************************************************************/
558 Int_t AliLoader::PostReconstructioner(TTask* task) const
560 // Posts Reconstructioner
561 return GetRecPointsDataLoader()->GetBaseTaskLoader()->Post(task);
563 /*****************************************************************************/
565 Int_t AliLoader::PostTracker(TTask* task) const
568 return GetTracksDataLoader()->GetBaseTaskLoader()->Post(task);
570 /*****************************************************************************/
572 Int_t AliLoader::PostPIDTask(TTask* task) const
574 // Posts particle identification task
575 return GetRecParticlesDataLoader()->GetBaseTaskLoader()->Post(task);
577 /*****************************************************************************/
579 TObject** AliLoader::GetDetectorDataRef(TObject *obj)
581 // Returns pointer to an entry in the list of folders pointing to "obj"
586 return GetDetectorDataFolder()->GetListOfFolders()->GetObjectRef(obj) ;
588 /*****************************************************************************/
590 TObject** AliLoader::SDigitizerRef()
592 // Returns pointer to a Runloader's task-list entry pointing to SDigitizer
593 TTask* rsd = AliRunLoader::GetRunSDigitizer();
598 return rsd->GetListOfTasks()->GetObjectRef(SDigitizer());
600 /*****************************************************************************/
602 TObject** AliLoader::DigitizerRef()
604 // Returns pointer to a Runloader's task-list entry pointing to Digitizer
605 TTask* rd = AliRunLoader::GetRunDigitizer();
610 return rd->GetListOfTasks()->GetObjectRef(Digitizer()) ;
612 /*****************************************************************************/
614 TObject** AliLoader::ReconstructionerRef()
616 // Returns pointer to a Runloader's task-list entry pointing to Reconstructioner
617 TTask* rrec = AliRunLoader::GetRunReconstructioner();
622 return rrec->GetListOfTasks()->GetObjectRef(Reconstructioner());
624 /*****************************************************************************/
626 TObject** AliLoader::TrackerRef()
628 // Returns pointer to a Runloader's task-list entry pointing to Tracker
629 TTask* rrec = AliRunLoader::GetRunTracker();
634 return rrec->GetListOfTasks()->GetObjectRef(Tracker());
636 /*****************************************************************************/
638 TObject** AliLoader::PIDTaskRef()
640 // Returns pointer to a Runloader's task-list entry pointing to PIDTask
641 TTask* rrec = AliRunLoader::GetRunPIDTask();
646 return rrec->GetListOfTasks()->GetObjectRef(PIDTask());
649 /*****************************************************************************/
650 void AliLoader::CleanFolders()
652 //Cleans all posted objects == removes from folders and deletes them
653 TIter next(fDataLoaders);
655 while ((dl = (AliDataLoader*)next()))
657 if (GetDebug()) Info("CleanFolders","name = %s cleaning",dl->GetName());
661 /*****************************************************************************/
663 /*****************************************************************************/
665 void AliLoader::CleanSDigitizer()
667 //removes and deletes detector task from Run Task
668 if ( GetSDigitsDataLoader()->GetBaseTaskLoader() == 0x0 )
670 Warning("CleanSDigitizer","Task Loader for SDigits does not exist");
673 GetSDigitsDataLoader()->GetBaseTaskLoader()->Clean();
675 /*****************************************************************************/
677 void AliLoader::CleanDigitizer()
679 //removes and deletes detector task from Run Task
680 if ( GetDigitsDataLoader()->GetBaseTaskLoader() == 0x0 )
682 Warning("CleanDigitizer","Task Loader for Digits does not exist");
685 GetDigitsDataLoader()->GetBaseTaskLoader()->Clean();
687 /*****************************************************************************/
689 void AliLoader::CleanReconstructioner()
691 //removes and deletes detector Reconstructioner from Run Reconstructioner
692 if ( GetRecPointsDataLoader()->GetBaseTaskLoader() == 0x0 )
694 Warning("CleanSDigitizer","Task Loader for SDigits does not exist");
697 GetRecPointsDataLoader()->GetBaseTaskLoader()->Clean();
699 /*****************************************************************************/
701 void AliLoader::CleanTracker()
703 //removes and deletes detector task from Run Task
704 if ( GetTracksDataLoader()->GetBaseTaskLoader() == 0x0 )
706 Warning("CleanTracker","Task Loader for Tracks does not exist");
709 GetTracksDataLoader()->GetBaseTaskLoader()->Clean();
711 /*****************************************************************************/
713 void AliLoader::CleanPIDTask()
715 //removes and deletes detector Reconstructioner from Run Reconstructioner
717 if ( GetRecParticlesDataLoader()->GetBaseTaskLoader() == 0x0 )
719 Warning("CleanPIDTask","Task Loader for Reconstructed Particles does not exist");
722 GetRecParticlesDataLoader()->GetBaseTaskLoader()->Clean();
724 /*****************************************************************************/
726 Int_t AliLoader::ReloadAll()
728 // Calling Reload function for all the data loaders
729 TIter next(fDataLoaders);
732 while((dl = (AliDataLoader*)next()))
734 Int_t err = dl->Reload();
737 Error("ReloadAll","Reload returned error for %s",dl->GetName());
743 /*****************************************************************************/
745 void AliLoader::CloseFiles()
747 //close files for data loaders
748 TIter next(fDataLoaders);
750 while((dl = (AliDataLoader*)next()))
755 /*****************************************************************************/
757 Int_t AliLoader::SetEventFolder(TFolder* eventfolder)
759 //sets the event folder
760 if (eventfolder == 0x0)
762 Error("SetEventFolder","Stupid joke. Argument is NULL");
766 fEventFolder = eventfolder;
767 TIter next(fDataLoaders);
770 while((dl = (AliDataLoader*)next()))
772 dl->SetEventFolder(fEventFolder);
773 dl->SetFolder(GetDetectorDataFolder()); //Must exists - ensure register is called before
777 }//sets the event folder
778 /*****************************************************************************/
780 Int_t AliLoader::Register(TFolder* eventFolder)
782 //triggers creation of subfolders for a given detector
783 //this method is called when session is read from disk
785 //warning: AliDetector in constructor (not default) calls
786 //creation of folder structure as well (some detectors needs folders
787 //alrady in constructors)
789 if (GetDebug()) Info("Register","Name is %s.",GetName());
790 if (eventFolder == 0x0)
792 Error("Register","Event folder is not set.");
795 Int_t retval = AliConfig::Instance()->AddDetector(eventFolder,fDetectorName,fDetectorName);
798 Error("SetEventFolder","Can not create tasks and/or folders for %s. Event folder name is %s",
799 fDetectorName.Data(),eventFolder->GetName());
802 SetEventFolder(eventFolder);
805 /*****************************************************************************/
806 AliRunLoader* AliLoader::GetRunLoader()
808 //gets the run-loader from event folder
809 AliRunLoader* rg = 0x0;
810 TObject * obj = GetEventFolder()->FindObject(AliRunLoader::fgkRunLoaderName);
811 if (obj) rg = dynamic_cast<AliRunLoader*>(obj);
814 /*****************************************************************************/
815 Bool_t AliLoader::TestFileOption(Option_t* opt)
817 //tests the TFile::Option
818 //if file is truncated at opening moment ("recreate", "new" or "create") returns kFALSE;
819 //else kTRUE (means opened with "read" or "update" mode)
821 if (option.CompareTo("recreate",TString::kIgnoreCase) == 0) return kFALSE;
822 if (option.CompareTo("new",TString::kIgnoreCase) == 0) return kFALSE;
823 if (option.CompareTo("create",TString::kIgnoreCase) == 0) return kFALSE;
826 /*****************************************************************************/
827 void AliLoader::SetDirName(TString& dirname)
829 //adds "dirname/" to each file
830 TIter next(fDataLoaders);
832 while((dl = (AliDataLoader*)next()))
834 dl->SetDirName(dirname);
838 /*****************************************************************************/
840 void AliLoader::SetDigitsFileNameSuffix(const TString& suffix) const
842 //adds the suffix before ".root",
843 //e.g. TPC.Digits.root -> TPC.DigitsMerged.root
844 //made on Jiri Chudoba demand
845 GetDigitsDataLoader()->SetFileNameSuffix(suffix);
847 /*****************************************************************************/
849 void AliLoader::SetCompressionLevel(Int_t cl)
851 //sets comression level for data defined by di
852 TIter next(fDataLoaders);
854 while((dl = (AliDataLoader*)next()))
856 dl->SetCompressionLevel(cl);
859 /*****************************************************************************/
861 void AliLoader::Clean()
863 //Cleans all data loaders
864 TIter next(fDataLoaders);
866 while((dl = (AliDataLoader*)next()))
871 /*****************************************************************************/
873 void AliLoader::Clean(const TString& name)
875 // Removes object with "name" from the detector's data folder
876 // and from the memory
877 TObject* obj = GetDetectorDataFolder()->FindObject(name);
881 Info("Clean(const TString&)","name=%s, cleaning %s.",GetName(),name.Data());
882 GetDetectorDataFolder()->Remove(obj);
887 /*****************************************************************************/
889 Bool_t AliLoader::IsOptionWritable(const TString& opt)
891 // Returns "true" if the option means also "writable"
892 if (opt.CompareTo("recreate",TString::kIgnoreCase)) return kTRUE;
893 if (opt.CompareTo("new",TString::kIgnoreCase)) return kTRUE;
894 if (opt.CompareTo("create",TString::kIgnoreCase)) return kTRUE;
895 if (opt.CompareTo("update",TString::kIgnoreCase)) return kTRUE;
898 /*****************************************************************************/
900 void AliLoader::SetTAddrInDet()
902 //calls SetTreeAddress for corresponding detector
903 AliRunLoader* rl = GetRunLoader();
904 if (rl == 0x0) return;
905 AliRun* ar = rl->GetAliRun();
906 if (ar == 0x0) return;
907 AliDetector* det = ar->GetDetector(fDetectorName);
908 if (det == 0x0) return;
909 det->SetTreeAddress();
911 /*****************************************************************************/
913 void AliLoader::Synchronize()
915 //synchrinizes all writtable files
916 TIter next(fDataLoaders);
918 while ((dl = (AliDataLoader*)next()))
924 /*****************************************************************************/
925 /*****************************************************************************/
926 /*****************************************************************************/