🚀 go-pugleaf

Hi,
I have an ADOQuery component in my application which is used as a common
component for all my SQL queries.  I set the SQL Command and assign it to
the ADOQuery component and open the query.  Everthing works fine, but I have
one query that works fine the first time the application is launched after
that the problem starts.

First SQL Command

SELECT WeldsDone.Project, WeldsDone.StampNo1, Welders.Initials,
Welders.Surname, Count(WeldsDone.DateWelded) AS CountOfDateWelded,
Sum(IIf([WeldsDone].[WeldFailure]<>'Fitter',1,0)) AS Rejected,
Sum(IIf([WeldsDone].[WeldFailure]<>'Fitter',WeldsDone.FailLength,0)) AS
SumOfFailLength, Sum(Welds.NB1) AS SumOfNB1
FROM ((WeldsDone INNER JOIN Welders ON WeldsDone.StampNo1 = Welders.StampNo)
INNER JOIN Welds ON (WeldsDone.Project = Welds.Project) AND
(WeldsDone.Drawing = Welds.Drawing) AND (WeldsDone.Location =
Welds.Location) AND (WeldsDone.WeldType = Welds.WeldType) AND
(WeldsDone.Sheet = Welds.Sheet) AND (WeldsDone.WeldNo = Welds.WeldNo)) INNER
JOIN ProjectDetails ON WeldsDone.Project = ProjectDetails.Project
WHERE ProjectDetails.Active AND (WeldsDone.RBSR=True OR WeldsDone.RASR=True)
GROUP BY WeldsDone.Project, WeldsDone.StampNo1, Welders.Initials,
Welders.Surname
ORDER BY WeldsDone.Project, WeldsDone.StampNo1

I then run the following SQL command

SELECT WeldsDone.Project, WeldsDone.StampNo1, Welders.Initials,
Welders.Surname, Count(WeldsDone.DateWelded) AS CountOfDateWelded,
Sum(IIf([WeldsDone].[WeldFailure]<>'Fitter',1,0)) AS Rejected,
Sum(IIf([WeldsDone].[WeldFailure]<>'Fitter',WeldsDone.FailLength,0)) AS
SumOfFailLength, Sum(Welds.NB1) AS SumOfNB1
FROM ((WeldsDone INNER JOIN Welders ON WeldsDone.StampNo1 = Welders.StampNo)
INNER JOIN Welds ON (WeldsDone.Project = Welds.Project) AND
(WeldsDone.Drawing = Welds.Drawing) AND (WeldsDone.Location =
Welds.Location) AND (WeldsDone.WeldType = Welds.WeldType) AND
(WeldsDone.Sheet = Welds.Sheet) AND (WeldsDone.WeldNo = Welds.WeldNo)) INNER
JOIN ProjectDetails ON WeldsDone.Project = ProjectDetails.Project
WHERE ProjectDetails.Project = :PROJECT AND (WeldsDone.RBSR=True OR
WeldsDone.RASR=True)
GROUP BY WeldsDone.Project, WeldsDone.StampNo1, Welders.Initials,
Welders.Surname
ORDER BY WeldsDone.Project, WeldsDone.StampNo1

When I reassign the first SQL Command again to the query the result is still
as if I assigned the second SQL Command.  You will notice that the two
commands are identical except in the WHERE clause "WHERE
ProjectDetails.Active AND (WeldsDone.RBSR=True OR WeldsDone.RASR=True)" vs
"WHERE ProjectDetails.Project = :PROJECT AND (WeldsDone.RBSR=True OR
WeldsDone.RASR=True)".  The secong SQL WHERE clause uses a parameter which
may be the problem but I have tried several things like clearing parameters
before assigning the SQL Command to no avail.

Totally Stumped
Please help
Nigel Hussey

P.S. The SQL Command is originally generated by Access were if works fine.