tabl1.id is an example I used,because my real program is too complex and big for me to write it here. However, here is what my program is doing:

Select Counts
go top
do while .not. eof()
replace count.counter with 1
replace count.matchcode with ''
do case
case count.result $ "E101 ,E213 ,E600"
replace count.keyfield with 'supp'

case '' $ count.zip
replace count.zip '0000'
endcase
IF seek(counts.id,"Flag")
Select Flag
do while count.id = flag.id
do case
case upper(flag.flag_code) 'del'
replace count.matchcode with 'flag del'
.
.
endcase
enddo
endif
select count
skip
enddo

Now I need to convert this into either stored procedures or some kind of dts package using activex script or vb. Since I am new to dts, should I be using dts or store procedures. What do I need to do in order for this code to be coverted into sql?