[Oracle] 테이블 기준 Dao 자동으로 만들어주는 프로시저

CREATE OR REPLACE PROCEDURE UNIVCOOP_DEV.PROC_TABLE_TO_DAO_INTERFACE
(
	V_TABLE_NAME IN VARCHAR2,
	SQL_DESC OUT VARCHAR2
)
IS
	V_BASE_CLASS VARCHAR(20) := '';
BEGIN
	SQL_DESC := '';
	V_BASE_CLASS := REPLACE(INITCAP( V_TABLE_NAME  ),'_','');
   
	SQL_DESC := SQL_DESC || '@Mapper ' || CHR(13);
	SQL_DESC := SQL_DESC || 'public interface ' || V_BASE_CLASS || 'Dao extends BossDBDao<' || V_BASE_CLASS || 'DtoReq,  '  || V_BASE_CLASS || 'Dto' || '>' || CHR(13);
	SQL_DESC := SQL_DESC || '{}';
END;