Hacer los procesos de forma masiva con selects, inserts, updates, deletes.
Para el caso especifico del codigo que posteaste la alternativa seria algo como:
Código:
declare @sCadenaCuentas as nvarchar(8000)
set @sCadenaCuentas=''
select @sCadenaCuentas = @sCadenaCuentas + ''''+ Cuenta +''','
FROM Apuntes
WHERE Opc1=@Opc1 and
(Cuenta LIKE '651%')
Saludos!