how can i have best performance?

This is my loop:

LOOP AT appoggio INTO appoggio1.

READ TABLE tb_dfkkzw WITH KEY opbel = appoggio1-opbel INTO tb_dfkkzw BINARY SEARCH.

IF sy-subrc = 0.

DELETE appoggio WHERE opbel = appoggio1-opbel.

ENDIF.

ENDLOOP.

In appoggio there are 650.000 record and for do this loop my job during 80.000 seconds how i can improving performance?

thanks

sorry for my english