anchor.diff:        procedure (const PreviousState, CurrentState : TApplicationState; const UsedCommand : TApplicationCommand)
         begin
           with StateHolder do
  +        begin
  +          FStartTime := Now;
             FProjects := FProjectGroupParser.GetIncludedProjectsFiles;
  +        end;
         end
       )
       .AddTransition(asProjectGroupParsed, asFixInsightRan, acRunFixInsight,
  
positive.code:         with StateHolder do
          begin
            FReportBuilder.BeginReport;
            FReportBuilder.AddHeader(TWorkflowHelper.FormatReportTitle(StateHolder), Now);
            FReportBuilder.AddTotalSummary(TWorkflowHelper.CalcTotalSummary(StateHolder));
  
            for F in FProjects do
  
negative.code:       FMessages : TDictionary<TFileName, TArray<TFixInsightMessage>>;
        FProjects : TArray<TFileName>;
        FReports : TArray<TPair<TFileName, TFileName>>;
        FStartTime : TDateTime;
  
        procedure InitReportBuilder;
      public
  