BTW,

> qryStages->OrderingItemNo = 0;

Since you're using Delphi, this would become:

qryStages.OrderingItemNo := 0;


Grtz,
Paul Vinkenoog