>select gisum (parent) >replace lc_action with "D" >dele >currec= recno() >csessionkey = gisum.sessionkey >Select gidetail >LOCATE for gidetail.sessionkey = csessionkey >if !eof() > lnDelrec= recno() > replace gidetail.lc_action with "D" while gidetail.sessionkey = csessionkey > goto lnDelrec > delete while gidetail.sessionkey = csessionkey >endif >go currecHi Mark: