SELECT DISTINCT M.Nombre,
                M.Apellido,
                M.Telefono,
                M.Nromed
FROM ((((Medico M INNER JOIN  Consulta Co ON M.Nromed=Co.Nromed)
      INNER JOIN Especialidad Esp ON  Esp.Nroesp=Co.Nroesp)
      INNER JOIN Medicoespecialidad Me ON Me.Nroesp=Esp.Nroesp)
      INNER JOIN Internacion I ON I.Nroconsultaesgenerada=Co.Nroconsulta)
WHERE M.Nromed = Co.Nromed
  AND Esp.Especialidad = 'Oftalmologia'
   AND (To_Date (Me.Hasta,'DD.MM.YYYY HH24:MI')- To_Date (Sysdate,'DD.MM.YYYY HH24:MI'))<=30;