/Go4CommandsAnalysis/TGo4ComPrintDynList.cxx Source File

00001 //---------------------------------------------------------------
00002 //        Go4 Release Package v2.10-5 (build 21005) 
00003 //                      03-Nov-2005
00004 //---------------------------------------------------------------
00005 //       The GSI Online Offline Object Oriented (Go4) Project
00006 //       Experiment Data Processing at DVEE department, GSI
00007 //---------------------------------------------------------------
00008 //
00009 //Copyright (C) 2000- Gesellschaft f. Schwerionenforschung, GSI
00010 //                    Planckstr. 1, 64291 Darmstadt, Germany
00011 //Contact:            http://go4.gsi.de
00012 //----------------------------------------------------------------
00013 //This software can be used under the license agreements as stated
00014 //in Go4License.txt file which is part of the distribution.
00015 //----------------------------------------------------------------
00016 #include "TGo4ComPrintDynList.h"
00017 
00018 #include "Go4Log/TGo4Log.h"
00019 #include "Go4AnalysisClient/TGo4AnalysisClientImp.h"
00020 #include "Go4Analysis/TGo4AnalysisImp.h"
00021 
00022 TGo4ComPrintDynList::TGo4ComPrintDynList()
00023 :TGo4AnalysisCommand("ANPrdyn","Printout of dynamic list")
00024 {
00025    SetReceiverName("AnalysisClient");  // this command needs client as receiver
00026                                        // override default receiver
00027 }
00028 
00029 TGo4ComPrintDynList::~TGo4ComPrintDynList()
00030 {
00031 }
00032 
00033 Int_t TGo4ComPrintDynList::ExeCom()
00034 {
00035    TGo4AnalysisClient* cli=dynamic_cast<TGo4AnalysisClient*> (fxReceiverBase);
00036    if (cli!=0)
00037       {
00038          TGo4Analysis* ana= TGo4Analysis::Instance();
00039          if(ana)
00040             {
00041                ana->PrintDynamicList();
00042                cli->SendStatusMessage(1, kFALSE,"Analysis %s prints out dynamic list status.",ana->GetName());
00043             }
00044          else
00045             {
00046                     cli->SendStatusMessage(3, kTRUE," %s ERROR no analysis ",GetName());
00047             } // if(ana)
00048       }
00049    else
00050       {
00051          TGo4Log::Debug(" !!! ''%s'': NO RECEIVER ERROR!!!",GetName());
00052          return 1;
00053       }
00054    return -1;
00055 }
00056 
00057 ClassImp(TGo4ComPrintDynList)
00058 
00059 //----------------------------END OF GO4 SOURCE FILE ---------------------