FalsePositive O803

The following code displays
[FixInsight Optimization] uMain.pas(25): O803 Constant 'ValueBit' is declared but never used

If the constant is moved inside the procedure then there is no warning.

const
  ValueBit: byte = $80;

procedure FalsePositive(var AFlag: byte; AActive: boolean);
begin
  if AActive then begin
    AFlag:= AFLag OR ValueBit;
  end;
end;

Odd. Actually, I cannot reproduce this issue.

This is the project I made.
I'm using Berlin 10.1 version 24.0.24468.8770
and FixInsight version 2016.09

http://star-oddi.com/updates/projects.zip