SET SAFETY off

USE aliq1
SELECT 0
USE aliq EXCL
INDEX ON no TAG no

lnTotalCopied = 0

FOR i = 1 TO 14 && assume 20 values for flag

   lnTotalNeedingCopy = (thisform.text1.Value * i) - lnTotalCopied

   SEEK i

   COPY TO temp1 NEXT (lnTotalNeedingCopy) WHILE no = i

   lnTotalCopied = lnTotalCopied + RECCOUNT('temp1')

   SELECT aliq1
   APPEND FROM temp1
   SELECT aliq

NEXT