Fórum Uma query inútil, mas legal .... #28226

SELECT MAX(DECODE( TO_CHAR(DT,´D´), 1, TO_CHAR(DT,´DD´), NULL )) DO,
       MAX(DECODE( TO_CHAR(DT,´D´), 2, TO_CHAR(DT,´DD´), NULL )) SE,
       MAX(DECODE( TO_CHAR(DT,´D´), 3, TO_CHAR(DT,´DD´), NULL )) TE,
       MAX(DECODE( TO_CHAR(DT,´D´), 4, TO_CHAR(DT,´DD´), NULL )) QA,
       MAX(DECODE( TO_CHAR(DT,´D´), 5, TO_CHAR(DT,´DD´), NULL )) QI,
       MAX(DECODE( TO_CHAR(DT,´D´), 6, TO_CHAR(DT,´DD´), NULL )) SX,
       MAX(DECODE( TO_CHAR(DT,´D´), 7, TO_CHAR(DT,´DD´), NULL )) SA
  FROM ( SELECT TRUNC(TO_DATE(´29-JUL-2005´),´YEAR´)+ROWNUM-1 DT,
                TRUNC((ROWNUM + TO_CHAR(TRUNC(TO_DATE(´29-JUL-2005´),´YEAR´),´D´) - 1  )
                / 7 + .9999) WEEKOFYEAR
         FROM ALL_OBJECTS
         WHERE ROWNUM <= TO_NUMBER((TO_CHAR(TRUNC(TO_DATE(´29-JUL-2005´),´MM´), ´DDD´) -1))
                         + 31) CALENDAR
  WHERE TO_CHAR(DT, ´MM´) = TO_CHAR(TO_DATE(´29-JUL-2005´), ´MM´)
  GROUP BY WEEKOFYEAR
  ORDER BY WEEKOFYEAR;