Advertisement
Guest User

for loop

a guest
Aug 20th, 2018
84
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
PL/SQL 1.44 KB | None | 0 0
  1.      /*BUSCA PROPOSICOES AUSENTES*/  
  2.      --Quando a sigla_casa for CN (Congresso Nacional) deve-se utilizar a estrutura do Senado (SF)  
  3.      FOR cur1 IN (SELECT * FROM proposicao_ausente WHERE DECODE(sigla_casa,'CN','SF', sigla_casa) = p_sigla_casa) LOOP  
  4.              
  5.            v_url := F_URL_PROPOSICAO_AUSENTE(p_sigla_casa,cur1.SIGLA_TIPO, cur1.NUMERO, cur1.ANO);  
  6.              
  7.            --HTP.P('URL da proposicao ausente: '||v_url);  
  8.              
  9.            v_clob := apex_web_service.make_rest_request(  
  10.               p_url => v_url,  
  11.               p_http_method => 'GET'  
  12.            );  
  13.              
  14.             --Recebe o XML em um CLOB e insere as proposições. Esta procedure faz também o registro no histórico de eventos e    
  15.             PROC_INSERE_PROPOSICOES(p_sigla_casa, v_clob, v_se_sucesso, v_cod_proposicao);  
  16.                
  17.             --Insere log em caso de sucesso  
  18.             IF v_se_sucesso = 'S' THEN  
  19.                    
  20.                 --HTP.P('Buscou com sucesso a proposicao ausente');  
  21.                 --Buscou com sucesso e inseriu no log  
  22.                 INSERT INTO LOG_EXECUCAO_WEBSERVICE VALUES(NULL, SYSDATE,  'Sucesso na recuperação da proposição '||p_sigla_casa||' '||cur1.SIGLA_TIPO||' '||cur1.NUMERO||'/'||cur1.ANO,  
  23.                                                   p_sigla_casa, NULL, v_url, v_clob);  
  24.             END IF;  
  25.                
  26.      END LOOP;
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement