anchor.diff:            calcLon := aPayload.bb_read_double(aCursor);
             //ValueStored[calculated_longitude, sensorid] := value;
           end;
  +      }
         meteodata_windspeed:
           begin
             value := aPayload.bb_read_double(aCursor);
  
positive.code:             layer := imlep.value.CreateUSLayer(
                self, tablePrefix, ConnectStringFromSession(oraSession),
                SubscribeUSDataEvents(USUserName, imlep.value.IMB_EVENTCLASS, USTablePrefix, fIMB3Connection),
                USSourceProjection, imlep.value.Domain, imlep.value.description, 0.2, True);
              if Assigned(layer) then
              begin
                AddLayer(layer);
  
negative.code:       begin
          if layerECLive is TUSLayer then
          begin
            if dp.value>0 then
            begin
              if (dp.modeOfTransportation=motUnknown) or (dp.modeOfTransportation=motStationary)
              then factorIndoor := factorCompensationConcentrationIndoor
              else factorIndoor := 1.0;
              (layerECLive as TUSLayer).tilerLayer.onPointValue :=
                procedure(aTilerLayer: TTilerLayer; const aRequestID: TWDID; aLat, aLon: Double; aTimeStampSlice: TDateTime; aValue: Double)
                var
                  timeStamp: TDateTime;
                  _factorIndoor: Double;
                begin
                  timeStamp := StrToDateTime(string(UTF8String(aRequestID)));
                  _factorIndoor := factorIndoor;
                  fCalculatedECValuesChart.AddValue(timeStamp, [_factorIndoor*aValue*chartCalculatedValueFactor]);
                end;
              (layerECLive as TUSLayer).tilerLayer.signalSliceRequestPointValue(
                RawByteString(UTF8String(DateTimeToStr(aTimeStamp))),
                dp.geometry.y, dp.geometry.x);
            end
            else
            begin
              fCalculatedECValuesChart.AddValue(aTimeStamp, [0]);
            end;
          end;
        end;
      end;
  