Error con pl sql

[Diegon]

BUENAS TARDES AMIGOS NECESITIO POR FAVOR QUE ME COLABOREN CON ESTE PROBLEMA ; TENGO BUCLE Y DENTRO DE ESTE BUCLE SALE UNA CONSULTA A LA BASE DE DATOS

ASI ES MAS OMENOS

WHILE TRUE
LOOP
SELECT dcd.acronimo_diagnostico
FROM cargos_directos_hc
INNER JOIN diag_cargos_directos_hc dcd
ON (dcd.codigo_cargo_directo=cd.codigo_datos_hc)
WHERE cd.numero_solicitud = sol
AND dcd.principal = 'N'
AND dcd.complicacion = 'N'
ORDER BY dcd.codigo
END LOOP;
LOOP IF total = nume THEN acronimo := registro.acronimo_diagnostico;
END IF;
END LOOP;
total := total + 1;
END LOOP;
END IF;
END IF;
RETURN acronimo;
END;

LA COSA ES QUE ME SACA UN ERRO DE statement ingnored