Código
SBQL65