anchor.diff:      fSantosLayers: TObjectDictionary<TScenario, TSantosLayer>; // ref
       fBaseDay: Array of Word;
     protected
  +    procedure HandleDataUpdate(aSession: TOrasession; aScenario: TScenario; aLayer: TSantosLayer; const aTablePrefix: string);
       function  ReadScenario(const aID: string): TScenario; override;
       procedure ReadChartBlockSoC(aSession: TOraSession; aScenario: TScenario; const aTablePrefix: string);
  -    procedure ReadChartChargerTotalPower(aSession: TOraSession; aScenario: TScenario; const aTablePrefix: string; aCharger: Integer);
  +    procedure ReadChartChargerTotalPower(aSession: TOraSession; aScenario: TScenario;  const aTablePrefix: string;
  +                                         aCharger: Integer; const aName: string = '');
     public
       procedure ReadBasicData(); override;
       procedure handleClientMessage(aClient: TClient; aScenario: TScenario; aJSONObject: TJSONObject); override;
  
positive.code: end;
  
  procedure TSantosProject.ReadChartChargerTotalPower(aSession: TOraSession; aScenario: TScenario;
    const aTablePrefix: string; aCharger: Integer);
  var
    zero, t: TDateTime;
    minOfDay: Integer;
  
negative.code:     finally
        TMonitor.Exit(fBusStops);
      end;
    end;
  end;
  
  procedure TSantosLayer.handleNewTime(aClient: TClient; aTime: string);
  