do while not sqlca.sqlcode = 100
filtro2 += "detalle_cod_ped = '" + deta + "' AND " // Equivalente: filtro2 = filtro2 + "detalle_cod_ped = '" + deta + "' AND "
fetch detalle into :deta;
loop
close detalle;
filtro2= trim(filtro2)
if len(filtro2)>3
filtro2 = trim(mid(filtro2,1,len(filtro2)-3 )) //Quitar el "AND" sobrante
end if
dw_2.setfilter(filtro2)
dw_2.filter()
dw_2.retrieve()