By: newkid

newkid — Fri, 25 Jun 2010 15:48:36 +0000
VAR v_width NUMBER;
EXEC :v_width :=35;

WITH t3 AS (
select 1 as id,
'Stop all the clocks, cut off the telephone, prevent the dog from barking with a juicy bone. The quick brown fox jumps over the lazy dog. Assiduously avoid any and all asinine alliterations.'
as str from dual
)
,t2 AS (
SELECT id,rn, REGEXP_SUBSTR(str,'[^ ]+',1,rn) str2
  FROM t3,(SELECT ROWNUM rn FROM (SELECT MAX(LENGTH(str)) m FROM t3) CONNECT BY ROWNUM<=m)
)
,t1 AS (
SELECT id,rn,str2,MAX(rn) OVER(PARTITION BY id) len
  FROM t2
 WHERE str2 IS NOT NULL
)
,t (id,rn,str,cnt,len) AS (
SELECT id,1,str2,LENGTH(str2),len
 FROM t1
 WHERE rn=1
UNION ALL
SELECT t.id,t1.rn
      ,t.str||(CASE WHEN cnt+LENGTH(t1.str2)+1<=:v_width THEN ' ' ELSE CHR(10) END)||t1.str2
      ,CASE WHEN cnt+LENGTH(t1.str2)+1<=:v_width THEN cnt+LENGTH(t1.str2)+1
            ELSE LENGTH(t1.str2)
       END
      ,t.len
 FROM t,t1
WHERE t.id = t1.id
      AND t.rn=t1.rn-1
)
SELECT id,str FROM t WHERE rn=len
;

        ID
----------
STR
-------------------------------------------------
         1
Stop all the clocks, cut off the
telephone, prevent the dog from
barking with a juicy bone. The
quick brown fox jumps over the lazy
dog. Assiduously avoid any and all
asinine alliterations.
Comments on: How to solve the Text Formatting Problem in SQL

By: newkid
