Como retornar um resultado dinâmico definido na função Oracle
Pergunta
Encontrei uma consulta de tokenizador de string na rede e a empacotei na função abaixo, que retornam o conjunto dinâmico de tokens. A função é compilada com sucesso, mas de alguma forma recebo o erro "ORA-00933: comando sql não terminou corretamente". Alguém pode me ajudar a depurar isso? Obrigada.
CREATE OR REPLACE TYPE KEY_VALUE_TYPE is object (k varchar2(4000), v varchar2(4000));
CREATE OR REPLACE TYPE KEY_VALUE_TABLE is table of key_value_type;
CREATE OR REPLACE FUNCTION StrTokenizer
(string IN VARCHAR2, delimiter IN VARCHAR2)
RETURN key_value_table AS
v_ret key_value_table;
BEGIN
SELECT
CAST(
multiset(
SELECT
LEVEL k,
SUBSTR(STRING_TO_TOKENIZE,
DECODE(LEVEL, 1, 1, INSTR(STRING_TO_TOKENIZE, DELIMITER, 1, LEVEL-1)+1),
INSTR(STRING_TO_TOKENIZE, DELIMITER, 1, LEVEL)
- DECODE( LEVEL, 1, 1, INSTR(STRING_TO_TOKENIZE, DELIMITER, 1, LEVEL-1)+1)) v
FROM
(
SELECT
':string'||':delimiter' AS STRING_TO_TOKENIZE , ':delimiter' AS DELIMITER
FROM
DUAL
)
CONNECT BY INSTR(STRING_TO_TOKENIZE, DELIMITER, 1, LEVEL)>0
ORDER BY level ASC)
As key_value_table)
INTO
v_ret
FROM dual;
return v_ret;
END;
select * from strtokenizer('a,b,c',',')
ORA-00933: SQL command not properly ended
Editar:
select * from table(strtokenizer('a,b,c',','))
fornece "ORA-30732: A tabela não contém colunas visíveis ao usuário".ORA-30732
Acabou quando eu conectei como o proprietário da função, mas a função não pode substituir ': string' || ': delimiter' com os valores passados. Como posso corrigir isso? E como posso executar uma função quando não estou conectado como seu proprietário? Obrigada.
Solução
Supondo que a função compila, tente:
SELECT *
FROM TABLE(strtokenizer('a,b,c',','));
Referência:
A função precisa ser corrigida - Use:
CREATE OR REPLACE FUNCTION StrTokenizer (string IN VARCHAR2,
delimiter IN VARCHAR2)
RETURN key_value_table AS v_ret key_value_table
BEGIN
SELECT CAST(MULTISET(SELECT LEVEL k,
SUBSTR(STRING_TO_TOKENIZE, DECODE(LEVEL, 1, 1, INSTR(STRING_TO_TOKENIZE, DELIMITER, 1, LEVEL-1)+1),
INSTR(STRING_TO_TOKENIZE, DELIMITER, 1, LEVEL) - DECODE( LEVEL, 1, 1, INSTR(STRING_TO_TOKENIZE, DELIMITER, 1, LEVEL-1)+1)) v
FROM (SELECT string || delimiter AS STRING_TO_TOKENIZE ,
delimiter AS DELIMITER
FROM DUAL)
CONNECT BY INSTR(STRING_TO_TOKENIZE, DELIMITER, 1, LEVEL)>0
ORDER BY level ASC) AS key_value_table)
INTO v_ret
FROM DUAL;
RETURN v_ret;
END;
Licenciado em: CC-BY-SA com atribuição
Não afiliado a StackOverflow