procedure Disp_Long_String(long_string IN varchar2) is
--递归方法现实长字符串,oracle最多只能显示256个
--每行显示80个字符
begin
IF LENGTH (long_string) > 80 THEN
DBMS_OUTPUT.PUT_LINE (SUBSTR (long_string, 1, 80));
Disp_Long_String (SUBSTR (long_string, 81));
ELSE
DBMS_OUTPUT.PUT_LINE (long_string);
END IF;
EXCEPTION
WHEN OTHERS
THEN
DBMS_OUTPUT.ENABLE (1000000);
Disp_Long_String (long_string);
end Disp_Long_String;
--递归方法现实长字符串,oracle最多只能显示256个
--每行显示80个字符
begin
IF LENGTH (long_string) > 80 THEN
DBMS_OUTPUT.PUT_LINE (SUBSTR (long_string, 1, 80));
Disp_Long_String (SUBSTR (long_string, 81));
ELSE
DBMS_OUTPUT.PUT_LINE (long_string);
END IF;
EXCEPTION
WHEN OTHERS
THEN
DBMS_OUTPUT.ENABLE (1000000);
Disp_Long_String (long_string);
end Disp_Long_String;