Quando a View AD_CONFIGAV e a Function GET_LINHAS não compilam, é necessário ciar o objeto abaixo no banco de dados:
OS 978262
CREATE OR REPLACE TYPE "T_VARCHAR2" AS OBJECT (
SEQ NUMBER(5),
TEXTO varchar2(100)
)
/
CREATE OR REPLACE TYPE "T_VARCHAR2_TYPE" aS TABLE OF T_VARCHAR2
/
CREATE OR REPLACE FUNCTION get_linhas(
P_PARAMETRO VARCHAR2
)
RETURN T_VARCHAR2_TYPE AS
v_ret T_VARCHAR2_TYPE;
CURSOR RSLCD IS
select TO_CHAR(regexp_substr((SELECT TEXTO FROM TSIPAR WHERE CHAVE = P_PARAMETRO AND CODUSU = 0),'[^,]+', 1, level)) testess from dual
connect by regexp_substr((SELECT TEXTO FROM TSIPAR WHERE CHAVE = P_PARAMETRO AND CODUSU = 0), '[^,]+', 1, level) is not null;
BEGIN
v_ret := T_VARCHAR2_TYPE();
FOR PES IN RSLCD LOOP
v_ret.EXTEND;
v_ret(v_ret.COUNT) := T_VARCHAR2(v_ret.COUNT ,TRIM(PES.testess));
END LOOP;
RETURN v_ret;
END;
/
Nenhum comentário:
Postar um comentário