jambrocio

CONSUMIR SERVICIO REST DESDE ORACLE CREATE STORE create or replace PROCEDURE CONSUMIR_REST_SMS(IN_NUMERO IN VARCHAR2, IN_MENSAJE IN VARCHAR2) IS   request   utl_http.req;   response  utl_http.resp;   url       VARCHAR2(4000) := ' http://10.10.10.8:8080/RSSMS/enviar.json ';   name      VARCHAR2(4000);   buffer    VARCHAR2(4000);   content   VARCHAR2(4000) := '{"numeroTelefonico":"' || IN_NUMERO || '", "mensaje":"' || IN_MENSAJE || '"}'; BEGIN   request := utl_http.begin_request(url, 'POST',' HTTP/1.1');   utl_http.set_header(request, 'user-agent', 'mozilla/4.0');   utl_http.set_header(request, 'content-type', 'application/json');   utl_http.set_header(request, 'Content-Length', length(content));   utl_http.write_text(request, content);   response := utl_http.get_response(request);   -- process the response from the HTTP call   BE...

CREAR CURSOR A STRING O VARCHAR Crear Función create or replace function join (     p_cursor sys_refcursor,     p_del varchar2 := ',' ) return varchar2 is     l_value   varchar2(32767);     l_result  varchar2(32767); begin     loop         fetch p_cursor into l_value;         exit when p_cursor%notfound;         if l_result is not null then             l_result := l_result || p_del;         end if;         l_result := l_result || l_value;     end loop;     return l_result; end join; Prueba select join(cursor(SELECT 'A' AS LETRA FROM DUAL UNION SELECT 'B' AS LETRA FROM DUAL),'-') from dual; Resultado 2 A-B

CREAR FUNCION SPLIT Crear Tipo create or replace type split_tbl as table of varchar2(32767); Crear Función create or replace function SPLIT (     p_list varchar2,     p_del varchar2 := ',' ) return split_tbl pipelined is     l_idx    pls_integer;     l_list    varchar2(32767) := p_list;     l_value    varchar2(32767); begin     loop         l_idx := instr(l_list,p_del);         if l_idx > 0 then             pipe row(substr(l_list,1,l_idx-1));             l_list := substr(l_list,l_idx+length(p_del));         else             pipe row(l_list);             exit;         end if;     end loop;     return; end SPLIT; Prueba SELECT * FROM TABLE...