|
DECLARE
v_str VARCHAR2(250) := '1121121123115';
i NUMBER;
j NUMBER;
s NUMBER;
v_count NUMBER;
BEGIN
FOR r IN 1 .. length(v_str) LOOP
FOR r1 IN 1 .. length(v_str) LOOP
i := substr(v_str, r1, r);
FOR r2 IN 1 .. length(v_str) LOOP
j := substr(v_str, r + r1, r2);
s := i + j;
SELECT COUNT(1)
INTO v_count
FROM (SELECT substr(v_str, r + r2 + r1) str FROM dual) t
WHERE t.str LIKE s || '%';
IF v_count > 0 THEN
dbms_output.put_line(i || '+' || j || '=' || s);
END IF;
END LOOP;
END LOOP;
END LOOP;
END; |
|