Advertisement
cozcaio

copia_config_erp

Dec 13th, 2017
83
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
  1. /*
  2.     Copia configurações (Configurações -> Configurações da Unidade) existentes de uma unidade para uma nova.
  3. */
  4. do $$
  5. declare
  6.   sUnidOrigem varchar(3);
  7.   sUnidNova varchar(3);
  8.  
  9. begin
  10.  
  11. -- Definir abaixo os códigos das unidades conforme nomenclatura das variáveis
  12. sUnidOrigem := '001'; --Código da unidade já existente que possuem os dados que serão copiados
  13. sUnidNova := '100'; --Código da nova unidade que ainda não possui configuração no FlexDB
  14.  
  15. insert into config1
  16. select
  17.     replace(cfg1_nome, sUnidOrigem, sUnidNova),
  18.     cfg1_tipo,
  19.     cfg1_conteudo
  20. from config1
  21. where
  22.     cfg1_nome ilike '%' || sUnidOrigem;
  23.  
  24. insert into configautom
  25. SELECT
  26.     cfga_funcao, sUnidNova, cfga_cpo11, cfga_cpo12, cfga_cpo13,
  27.     cfga_cpo14, cfga_cpo15, cfga_cpo16, cfga_cpo17, cfga_cpo18, cfga_cpo19,
  28.     cfga_cpo20, cfga_cpo101, cfga_cpo102, cfga_cpo103, cfga_cpo104,
  29.     cfga_cpo105, cfga_cpo106, cfga_cpo107, cfga_cpo108, cfga_cpo109,
  30.     cfga_cpo110, cfga_cpo1001, cfga_cpo1002, cfga_cpo1003, cfga_cpo4001,
  31.     cfga_cpo4002, cfga_cpo4003
  32. FROM configautom
  33. where cfga_unid_codigo = sUnidOrigem;
  34.  
  35. end;
  36. $$ language plpgsql;
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement