행위

오라클 LONG TO CHAR 함수

DB CAFE

Dbcafe (토론 | 기여)님의 2020년 5월 18일 (월) 16:19 판 (새 문서: <source lang=sql> CREATE OR REPLACE FUNCTION LONG_TO_CHAR * EX ) long_to_char('DBA_TAB_COLS', 'DATA_DEFAULT', COLUMN_NAME, TABLE_NAME) *: ( in_table_name varchar, in_column varch...)
(차이) ← 이전 판 | 최신판 (차이) | 다음 판 → (차이)
thumb_up 추천메뉴 바로가기


CREATE OR REPLACE FUNCTION LONG_TO_CHAR
/**
EX ) long_to_char('DBA_TAB_COLS', 'DATA_DEFAULT', COLUMN_NAME, TABLE_NAME)
**/
( in_table_name varchar,
  in_column varchar2,
  in_column_name varchar2,
  in_tab_name varchar2)
RETURN varchar AS
text_c1 varchar2(32767);
sql_cur varchar2(2000);
begin
sql_cur := 'select '||in_column||' from
'||in_table_name||' where column_name = ' ||
chr(39)||in_column_name||chr(39) ||' AND TABLE_NAME=' ||
chr(39)||in_tab_name||chr(39); --1 AND ROWNUM = 1';
dbms_output.put_line (sql_cur);
execute immediate sql_cur into text_c1;
text_c1 := substr(text_c1, 1, 4000);
RETURN TRIM(TEXT_C1);
END;