Advertisement
Guest User

Untitled

a guest
May 27th, 2015
250
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 2.10 KB | None | 0 0
  1. CREATE OR REPLACE FUNCTION _car_validacao(id_car integer, id_pessoa integer) RETURNS integer as $$
  2. DECLARE
  3. id_validacao integer;
  4.  
  5. BEGIN
  6. -- Cria Validação
  7. insert into validacoes(car_id, pessoa_id, created) values(id_car, id_pessoa, NOW());
  8.  
  9. --select id from validacoes where car_id = id_car order by created desc limit 1 into id_validacao;
  10. select id from validacoes where car_id = id_car order by id desc limit 1 into id_validacao;
  11.  
  12. -- Munícipio Principal
  13. PERFORM _car_mun_sobreposicao_beta(id_car, id_validacao);
  14.  
  15. -- Sobreposições entre Propriedades
  16. --PERFORM _car_shape_sobreposicao_beta(id_car, id_validacao);
  17. PERFORM car_shape_validacao(id_car, id_validacao);
  18.  
  19. -- Áreas Protegidas
  20. --PERFORM _car_fundiario_ti_beta(id_car, id_validacao);
  21. --PERFORM _car_fundiario_uc_beta(id_car, id_validacao);
  22. PERFORM _car_fundiario_ap_beta(id_car, id_validacao);
  23.  
  24. -- Áreas Especiais
  25. --PERFORM _car_fundiario_assentamento_beta(id_car, id_validacao);
  26. --PERFORM _car_fundiario_quilombo_beta(id_car, id_validacao);
  27. PERFORM _car_fundiario_dagua_beta(id_car, id_validacao);
  28. PERFORM _car_fundiario_militar_beta(id_car, id_validacao);
  29. PERFORM _car_fundiario_urbana_beta(id_car, id_validacao);
  30.  
  31. -- Legislação: Resultados armazenados em ca_resultado
  32.  
  33. -- Módulo Fiscal
  34. -- _car_mun_sobreposicao_beta(Executada no Início)
  35.  
  36. -- Amazônia legal
  37. -- _ca_rl_regiao2(Pré Executada)
  38.  
  39. -- UCTI Estado/UCTI Muncípio
  40.  
  41. -- Tipologia Vegetal
  42. PERFORM _ca_rl_tipologia_vegetal_beta(id_car, id_validacao);
  43.  
  44. -- ZEE
  45. PERFORM _ca_rl_zee_consolidada_beta(id_car, id_validacao);
  46.  
  47.  
  48. -- Definição de Reserva Legal
  49. --PERFORM _car_rl_definicao_beta_2(id_car, id_validacao);
  50. PERFORM _car_rl_definicao_beta_2_teste(id_car, id_validacao);
  51.  
  52. -- APP E APPD
  53. PERFORM _car_area_app_beta(id_car, id_validacao);
  54.  
  55. -- AUAS
  56. PERFORM _car_area_auas_beta(id_car, id_validacao);
  57. --CAR DESMATAMENTO
  58. PERFORM _ca_desmatamento(id_car, id_validacao);
  59. PERFORM _ca_desmatamento_prodes(id_car, id_validacao);
  60. PERFORM _car_embargo (id_car, id_validacao);
  61.  
  62. RETURN id_validacao;
  63. END;
  64. $$ language plpgsql;
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement