anchor.diff:      fSourceProjection: TGIS_CSProjectedCoordinateSystem; // ref
       fTablePrefix: String;
       fBlockID: Integer;
  -    fSoCPalette: TRampPalette;
  +    fSoCPalette: TWDPalette;
       fTimeSliderTimer: TTimer;
       fBaseDay: array of word; // [d,m,y]
       fChargerTypes: TStrings;
  
positive.code:   entries[5] := TRampPaletteEntry.Create(HighChargeColor, 90, '');
    entries[6] := TRampPaletteEntry.Create(HighChargeColor, 100, '100');
    fSoCPalette := TRampPalette.Create('State of Charge', entries, Nothing, Nothing, HighChargeColor);
  
    legendJSON := BuildRamplLegendJSON(fSoCPalette);
  
    oraSession := TOraSession.Create(nil);
    try
  
negative.code:   fBusData := TBusData.Create;
    fSliderData := TSliderData.Create;
  
    {
    setlength(entries, 7);
    entries[0] := TRampPaletteEntry.Create(NoChargeColor, 0, '0');
    entries[1] := TRampPaletteEntry.Create(NoChargeColor, 10, '10');
  