Walk thru all database table records until match is found then delete

Question

I have a database connected form. It has a scipt that checks to see if that forms data has already been submitted by searching thru the records for the formID number. I want the records to be deleted if found and then add new records incase the form data has been changed. I can make this work once by using the script below. Is there a short way to make it continue searching and deleting all the records that start with that form ID number instead having to copy this script 12 times (maximum number of records allowed).
var oFile = Subform1.FileName.formattedValue;
var bFound = false;
while(!oDB.isEOF()){
if(xfa.record.DataConnection2.FileName.value == oFile){
bFound = true;
break;
oDB.next();
if(bFound){ 
oDB.delete();
oDB.update();

Answer 1

types : begin of ty_jtab,
       f1(10) type c,
       end of ty_jtab.
data : jtab type standard table of ty_jtab with header line,
       itab type standard table of ty_jtab with header line.
data : wa_jtab type  ty_jtab,
       wa_itab type  ty_jtab.
*populate itab for say db
itab-f1 = '1000'. append itab.
itab-f1 = '2000'. append itab.
itab-f1 = '3000'. append itab.
*populate jtab
jtab-f1 = '1000'. append jtab.
jtab-f1 = '4000'. append jtab.
jtab-f1 = '8000'. append jtab.
jtab-f1 = '9000'. append jtab.
sort itab by f1.
sort jtab by f1.
clear: itab, wa_itab.
loop at itab into wa_itab.
  read table jtab into wa_jtab with key f1 = wa_itab-f1
                                         binary search.
  if sy-subrc ne 0.
    delete itab from wa_itab.
    if sy-subrc ne 0.
      write :/ 'fail', wa_itab-f1.
    endif.
  endif.
endloop.
*o/p is two times fail which shows the assumption.
br,
vijay