From 6d694051bed1729ee8045d7a8e9da9b7652d8322 Mon Sep 17 00:00:00 2001
From: michael <michael@freepascal.org>
Date: Sat, 17 Mar 2018 17:17:23 +0000
Subject: [PATCH] * Fix bug #33407, duplicate variable when loading report
 twice

git-svn-id: trunk@38551 -
---
 packages/fcl-report/src/fpreport.pp | 1 +
 1 file changed, 1 insertion(+)

diff --git a/packages/fcl-report/src/fpreport.pp b/packages/fcl-report/src/fpreport.pp
index a2025e72ad..59f78333d8 100644
--- a/packages/fcl-report/src/fpreport.pp
+++ b/packages/fcl-report/src/fpreport.pp
@@ -8026,6 +8026,7 @@ begin
       E := AReader.FindChild('Variables');
       if Assigned(E) then
       begin
+        Variables.Clear;
         AReader.PushElement(E);
         for i := 0 to AReader.ChildCount-1 do
         begin