hi all

at this code under i nedd to delete what i choice from mytable(newammar66),
i'll try to put delete at my code but nothing happend.
any idea.

CLOSE all
SET TALK OFF
SET ECHO OFF
SET SAFETY OFF

thisform.text3.SetFocus
USE home1 excl
zap
SELECT 0
USE newamar66 EXCL
*SET DELETED on
INDEX ON VAL(char18) TO hh

set order to "hh"

lnTotalCopied = 0

FOR i = 1 TO (thisform.text3.Value)  && assume 20 values for flag
   lnTotalNeedingCopy = (thisform.text3.Value * i) - lnTotalCopied
   SEEK i
   COPY TO temp2 NEXT (lnTotalNeedingCopy) WHILE VAL(char18) = i
   lnTotalCopied = lnTotalCopied + _Tally
   SELECT home1
   APPEND FROM temp2

   SELECT newamar66
*delete   
NEXT
thisform.text3.SetFocus

CLOSE ALL
use home1 excl
BROWSE

thanks.
m.qasem