7/25/2019 Script CorrigeVPD

1/5

/*---------------------------------------------------------------------Script de Relacionamento de Elemento de Despesa com VPA - Padro ContasCriado para a Contar por: Roberto Tosta em: 29/02/2016---------------------------------------------------------------------*/

-- CRIANDO VARIAVEL

create variable @entidade integer;

-- SELECIONANDO ENTIDADEset @entidade = 1;

call bethadba.pg_setoption('fire_triggers', 'off');call bethadba.pg_setoption('wait_for_commit','on');Begin

--Atualiza as VPDs

update sapo.elementos_contas_ativo_vpd set i_contas = (select i_contas from sapo.contas where i_entidades = @entidade and i_Plano_contas = 5 and mascara = '3550100000000000000000000' ) where i_entidades = @entidade and portaria = 2016 andi_elementos = 31717000000000 ;update sapo.elementos_contas_ativo_vpd set i_contas = (select i_contas from sapo.contas where i_entidades = @entidade and i_Plano_contas = 5 and mascara = '3112104990000000000000000' ) where i_entidades = @entidade and portaria = 2016 andi_elementos = 31900400000000 ;update sapo.elementos_contas_ativo_vpd set i_contas = (select i_contas from sapo.contas where i_entidades = @entidade and i_Plano_contas = 5 and mascara = '3299100000000000000000000' ) where i_entidades = @entidade and portaria = 2016 andi_elementos = 31900900000000 ;update sapo.elementos_contas_ativo_vpd set i_contas = (select i_contas from sapo

.contas where i_entidades = @entidade and i_Plano_contas = 5 and mascara = '3122301000000000000000000' ) where i_entidades = @entidade and portaria = 2016 andi_elementos = 31901301000000 ;update sapo.elementos_contas_ativo_vpd set i_contas = (select i_contas from sapo.contas where i_entidades = @entidade and i_Plano_contas = 5 and mascara = '3122399000000000000000000' ) where i_entidades = @entidade and portaria = 2016 andi_elementos = 31901309000000 ;update sapo.elementos_contas_ativo_vpd set i_contas = (select i_contas from sapo.contas where i_entidades = @entidade and i_Plano_contas = 5 and mascara = '3112103000000000000000000' ) where i_entidades = @entidade and portaria = 2016 andi_elementos = 31909100000000 ;update sapo.elementos_contas_ativo_vpd set i_contas = (select i_contas from sapo

.contas where i_entidades = @entidade and i_Plano_contas = 5 and mascara = '3199101000000000000000000' ) where i_entidades = @entidade and portaria = 2016 andi_elementos = 31909300000000 ;update sapo.elementos_contas_ativo_vpd set i_contas = (select i_contas from sapo.contas where i_entidades = @entidade and i_Plano_contas = 5 and mascara = '3191100000000000000000000' ) where i_entidades = @entidade and portaria = 2016 andi_elementos = 31909400000000 ;update sapo.elementos_contas_ativo_vpd set i_contas = (select i_contas from sapo.contas where i_entidades = @entidade and i_Plano_contas = 5 and mascara = '3531103000000000000000000' ) where i_entidades = @entidade and portaria = 2016 andi_elementos = 33504300000000 ;update sapo.elementos_contas_ativo_vpd set i_contas = (select i_contas from sapo.contas where i_entidades = @entidade and i_Plano_contas = 5 and mascara = '355

0100000000000000000000' ) where i_entidades = @entidade and portaria = 2016 andi_elementos = 33717000000000 ;update sapo.elementos_contas_ativo_vpd set i_contas = (select i_contas from sapo

7/25/2019 Script CorrigeVPD

2/5

.contas where i_entidades = @entidade and i_Plano_contas = 5 and mascara = '3321101000000000000000000' ) where i_entidades = @entidade and portaria = 2016 andi_elementos = 33901400000000 ;update sapo.elementos_contas_ativo_vpd set i_contas = (select i_contas from sapo.contas where i_entidades = @entidade and i_Plano_contas = 5 and mascara = '3941199000000000000000000' ) where i_entidades = @entidade and portaria = 2016 andi_elementos = 33901800000000 ;

update sapo.elementos_contas_ativo_vpd set i_contas = (select i_contas from sapo.contas where i_entidades = @entidade and i_Plano_contas = 5 and mascara = '3311117000000000000000000' ) where i_entidades = @entidade and portaria = 2016 andi_elementos = 33903001000000 ;update sapo.elementos_contas_ativo_vpd set i_contas = (select i_contas from sapo.contas where i_entidades = @entidade and i_Plano_contas = 5 and mascara = '3311101000000000000000000' ) where i_entidades = @entidade and portaria = 2016 andi_elementos = 33903002000000 ;update sapo.elementos_contas_ativo_vpd set i_contas = (select i_contas from sapo.contas where i_entidades = @entidade and i_Plano_contas = 5 and mascara = '3311116000000000000000000' ) where i_entidades = @entidade and portaria = 2016 andi_elementos = 33903003000000 ;

update sapo.elementos_contas_ativo_vpd set i_contas = (select i_contas from sapo.contas where i_entidades = @entidade and i_Plano_contas = 5 and mascara = '3311108000000000000000000' ) where i_entidades = @entidade and portaria = 2016 andi_elementos = 33903004000000 ;update sapo.elementos_contas_ativo_vpd set i_contas = (select i_contas from sapo.contas where i_entidades = @entidade and i_Plano_contas = 5 and mascara = '3311117000000000000000000' ) where i_entidades = @entidade and portaria = 2016 andi_elementos = 33903005000000 ;update sapo.elementos_contas_ativo_vpd set i_contas = (select i_contas from sapo.contas where i_entidades = @entidade and i_Plano_contas = 5 and mascara = '3311139000000000000000000' ) where i_entidades = @entidade and portaria = 2016 andi_elementos = 33903006000000 ;update sapo.elementos_contas_ativo_vpd set i_contas = (select i_contas from sapo

.contas where i_entidades = @entidade and i_Plano_contas = 5 and mascara = '3311125000000000000000000' ) where i_entidades = @entidade and portaria = 2016 andi_elementos = 33903007000000 ;update sapo.elementos_contas_ativo_vpd set i_contas = (select i_contas from sapo.contas where i_entidades = @entidade and i_Plano_contas = 5 and mascara = '3311124000000000000000000' ) where i_entidades = @entidade and portaria = 2016 andi_elementos = 33903008000000 ;update sapo.elementos_contas_ativo_vpd set i_contas = (select i_contas from sapo.contas where i_entidades = @entidade and i_Plano_contas = 5 and mascara = '3311125000000000000000000' ) where i_entidades = @entidade and portaria = 2016 andi_elementos = 33903009000000 ;update sapo.elementos_contas_ativo_vpd set i_contas = (select i_contas from sapo.contas where i_entidades = @entidade and i_Plano_contas = 5 and mascara = '3311136000000000000000000' ) where i_entidades = @entidade and portaria = 2016 andi_elementos = 33903010000000 ;update sapo.elementos_contas_ativo_vpd set i_contas = (select i_contas from sapo.contas where i_entidades = @entidade and i_Plano_contas = 5 and mascara = '3311106000000000000000000' ) where i_entidades = @entidade and portaria = 2016 andi_elementos = 33903011000000 ;update sapo.elementos_contas_ativo_vpd set i_contas = (select i_contas from sapo.contas where i_entidades = @entidade and i_Plano_contas = 5 and mascara = '3311106000000000000000000' ) where i_entidades = @entidade and portaria = 2016 andi_elementos = 33903012000000 ;update sapo.elementos_contas_ativo_vpd set i_contas = (select i_contas from sapo.contas where i_entidades = @entidade and i_Plano_contas = 5 and mascara = '331

2199000000000000000000' ) where i_entidades = @entidade and portaria = 2016 andi_elementos = 33903201000000 ;update sapo.elementos_contas_ativo_vpd set i_contas = (select i_contas from sapo

7/25/2019 Script CorrigeVPD

3/5

.contas where i_entidades = @entidade and i_Plano_contas = 5 and mascara = '3312102000000000000000000' ) where i_entidades = @entidade and portaria = 2016 andi_elementos = 33903202000000 ;update sapo.elementos_contas_ativo_vpd set i_contas = (select i_contas from sapo.contas where i_entidades = @entidade and i_Plano_contas = 5 and mascara = '3312199000000000000000000' ) where i_entidades = @entidade and portaria = 2016 andi_elementos = 33903203000000 ;

update sapo.elementos_contas_ativo_vpd set i_contas = (select i_contas from sapo.contas where i_entidades = @entidade and i_Plano_contas = 5 and mascara = '3312199000000000000000000' ) where i_entidades = @entidade and portaria = 2016 andi_elementos = 33903204000000 ;update sapo.elementos_contas_ativo_vpd set i_contas = (select i_contas from sapo.contas where i_entidades = @entidade and i_Plano_contas = 5 and mascara = '3312102000000000000000000' ) where i_entidades = @entidade and portaria = 2016 andi_elementos = 33903205000000 ;update sapo.elementos_contas_ativo_vpd set i_contas = (select i_contas from sapo.contas where i_entidades = @entidade and i_Plano_contas = 5 and mascara = '3312199000000000000000000' ) where i_entidades = @entidade and portaria = 2016 andi_elementos = 33903299000000 ;

update sapo.elementos_contas_ativo_vpd set i_contas = (select i_contas from sapo.contas where i_entidades = @entidade and i_Plano_contas = 5 and mascara = '3323156000000000000000000' ) where i_entidades = @entidade and portaria = 2016 andi_elementos = 33903301000000 ;update sapo.elementos_contas_ativo_vpd set i_contas = (select i_contas from sapo.contas where i_entidades = @entidade and i_Plano_contas = 5 and mascara = '3323156000000000000000000' ) where i_entidades = @entidade and portaria = 2016 andi_elementos = 33903302000000 ;update sapo.elementos_contas_ativo_vpd set i_contas = (select i_contas from sapo.contas where i_entidades = @entidade and i_Plano_contas = 5 and mascara = '3323156000000000000000000' ) where i_entidades = @entidade and portaria = 2016 andi_elementos = 33903303000000 ;update sapo.elementos_contas_ativo_vpd set i_contas = (select i_contas from sapo

.contas where i_entidades = @entidade and i_Plano_contas = 5 and mascara = '3323156000000000000000000' ) where i_entidades = @entidade and portaria = 2016 andi_elementos = 33903399000000 ;update sapo.elementos_contas_ativo_vpd set i_contas = (select i_contas from sapo.contas where i_entidades = @entidade and i_Plano_contas = 5 and mascara = '3322121000000000000000000' ) where i_entidades = @entidade and portaria = 2016 andi_elementos = 33903601000000 ;update sapo.elementos_contas_ativo_vpd set i_contas = (select i_contas from sapo.contas where i_entidades = @entidade and i_Plano_contas = 5 and mascara = '3322115000000000000000000' ) where i_entidades = @entidade and portaria = 2016 andi_elementos = 33903602000000 ;update sapo.elementos_contas_ativo_vpd set i_contas = (select i_contas from sapo.contas where i_entidades = @entidade and i_Plano_contas = 5 and mascara = '3322116000000000000000000' ) where i_entidades = @entidade and portaria = 2016 andi_elementos = 33903603000000 ;update sapo.elementos_contas_ativo_vpd set i_contas = (select i_contas from sapo.contas where i_entidades = @entidade and i_Plano_contas = 5 and mascara = '3323105000000000000000000' ) where i_entidades = @entidade and portaria = 2016 andi_elementos = 33903901000000 ;update sapo.elementos_contas_ativo_vpd set i_contas = (select i_contas from sapo.contas where i_entidades = @entidade and i_Plano_contas = 5 and mascara = '3323110000000000000000000' ) where i_entidades = @entidade and portaria = 2016 andi_elementos = 33903902000000 ;update sapo.elementos_contas_ativo_vpd set i_contas = (select i_contas from sapo.contas where i_entidades = @entidade and i_Plano_contas = 5 and mascara = '332

3110000000000000000000' ) where i_entidades = @entidade and portaria = 2016 andi_elementos = 33903903000000 ;update sapo.elementos_contas_ativo_vpd set i_contas = (select i_contas from sapo

7/25/2019 Script CorrigeVPD

4/5

.contas where i_entidades = @entidade and i_Plano_contas = 5 and mascara = '3323199000000000000000000' ) where i_entidades = @entidade and portaria = 2016 andi_elementos = 33903904000000 ;update sapo.elementos_contas_ativo_vpd set i_contas = (select i_contas from sapo.contas where i_entidades = @entidade and i_Plano_contas = 5 and mascara = '3323199000000000000000000' ) where i_entidades = @entidade and portaria = 2016 andi_elementos = 33903905000000 ;

update sapo.elementos_contas_ativo_vpd set i_contas = (select i_contas from sapo.contas where i_entidades = @entidade and i_Plano_contas = 5 and mascara = '3323111000000000000000000' ) where i_entidades = @entidade and portaria = 2016 andi_elementos = 33903906000000 ;update sapo.elementos_contas_ativo_vpd set i_contas = (select i_contas from sapo.contas where i_entidades = @entidade and i_Plano_contas = 5 and mascara = '3323146000000000000000000' ) where i_entidades = @entidade and portaria = 2016 andi_elementos = 33903907000000 ;update sapo.elementos_contas_ativo_vpd set i_contas = (select i_contas from sapo.contas where i_entidades = @entidade and i_Plano_contas = 5 and mascara = '3323156000000000000000000' ) where i_entidades = @entidade and portaria = 2016 andi_elementos = 33903908000000 ;

update sapo.elementos_contas_ativo_vpd set i_contas = (select i_contas from sapo.contas where i_entidades = @entidade and i_Plano_contas = 5 and mascara = '3323108000000000000000000' ) where i_entidades = @entidade and portaria = 2016 andi_elementos = 33903909000000 ;update sapo.elementos_contas_ativo_vpd set i_contas = (select i_contas from sapo.contas where i_entidades = @entidade and i_Plano_contas = 5 and mascara = '3323108000000000000000000' ) where i_entidades = @entidade and portaria = 2016 andi_elementos = 33903910000000 ;update sapo.elementos_contas_ativo_vpd set i_contas = (select i_contas from sapo.contas where i_entidades = @entidade and i_Plano_contas = 5 and mascara = '3323108000000000000000000' ) where i_entidades = @entidade and portaria = 2016 andi_elementos = 33903911000000 ;update sapo.elementos_contas_ativo_vpd set i_contas = (select i_contas from sapo

.contas where i_entidades = @entidade and i_Plano_contas = 5 and mascara = '3323140000000000000000000' ) where i_entidades = @entidade and portaria = 2016 andi_elementos = 33903912000000 ;update sapo.elementos_contas_ativo_vpd set i_contas = (select i_contas from sapo.contas where i_entidades = @entidade and i_Plano_contas = 5 and mascara = '3323199000000000000000000' ) where i_entidades = @entidade and portaria = 2016 andi_elementos = 33903913000000 ;update sapo.elementos_contas_ativo_vpd set i_contas = (select i_contas from sapo.contas where i_entidades = @entidade and i_Plano_contas = 5 and mascara = '3323199000000000000000000' ) where i_entidades = @entidade and portaria = 2016 andi_elementos = 33903914000000 ;update sapo.elementos_contas_ativo_vpd set i_contas = (select i_contas from sapo.contas where i_entidades = @entidade and i_Plano_contas = 5 and mascara = '3323110000000000000000000' ) where i_entidades = @entidade and portaria = 2016 andi_elementos = 33903915000000 ;update sapo.elementos_contas_ativo_vpd set i_contas = (select i_contas from sapo.contas where i_entidades = @entidade and i_Plano_contas = 5 and mascara = '3323110000000000000000000' ) where i_entidades = @entidade and portaria = 2016 andi_elementos = 33903916000000 ;update sapo.elementos_contas_ativo_vpd set i_contas = (select i_contas from sapo.contas where i_entidades = @entidade and i_Plano_contas = 5 and mascara = '3323110000000000000000000' ) where i_entidades = @entidade and portaria = 2016 andi_elementos = 33903917000000 ;update sapo.elementos_contas_ativo_vpd set i_contas = (select i_contas from sapo.contas where i_entidades = @entidade and i_Plano_contas = 5 and mascara = '372

1302000000000000000000' ) where i_entidades = @entidade and portaria = 2016 andi_elementos = 33904700000000 ;update sapo.elementos_contas_ativo_vpd set i_contas = (select i_contas from sapo

7/25/2019 Script CorrigeVPD

5/5

.contas where i_entidades = @entidade and i_Plano_contas = 5 and mascara = '3523100000000000000000000' ) where i_entidades = @entidade and portaria = 2016 andi_elementos = 33904800000000 ;update sapo.elementos_contas_ativo_vpd set i_contas = (select i_contas from sapo.contas where i_entidades = @entidade and i_Plano_contas = 5 and mascara = '3311198000000000000000000' ) where i_entidades = @entidade and portaria = 2016 andi_elementos = 33909100000000 ;

update sapo.elementos_contas_ativo_vpd set i_contas = (select i_contas from sapo.contas where i_entidades = @entidade and i_Plano_contas = 5 and mascara = '3996100000000000000000000' ) where i_entidades = @entidade and portaria = 2016 andi_elementos = 33909400000000 ;update sapo.elementos_contas_ativo_vpd set i_contas = (select i_contas from sapo.contas where i_entidades = @entidade and i_Plano_contas = 5 and mascara = '3323108000000000000000000' ) where i_entidades = @entidade and portaria = 2016 andi_elementos = 33913911000000 ;

-- Deleta Lanamentos

delete FROM sapo.liquidacao_eventos_contabeis where i_entidades = @entidade andano_exerc = 2016;

-- Deleta as VPDs

delete FROM sapo.elementos_contas_ativo_vpd where i_entidades = @entidade and portaria = 2016 and i_elementos = 33909300000000 ;delete FROM sapo.elementos_contas_ativo_vpd where i_entidades = @entidade and portaria = 2016 and i_elementos = 33903999000000 ;delete FROM sapo.elementos_contas_ativo_vpd where i_entidades = @entidade and portaria = 2016 and i_elementos = 33903699000000 ;delete FROM sapo.elementos_contas_ativo_vpd where i_entidades = @entidade and p

ortaria = 2016 and i_elementos = 33903500000000 ;delete FROM sapo.elementos_contas_ativo_vpd where i_entidades = @entidade and portaria = 2016 and i_elementos = 33903099000000 ;delete FROM sapo.elementos_contas_ativo_vpd where i_entidades = @entidade and portaria = 2016 and i_elementos = 31901100000000 ;delete FROM sapo.elementos_contas_ativo_vpd where i_entidades = @entidade and portaria = 2016 and i_elementos = 31901200000000 ;delete FROM sapo.elementos_contas_ativo_vpd where i_entidades = @entidade and portaria = 2016 and i_elementos = 33909200000000 ;delete FROM sapo.elementos_contas_ativo_vpd where i_entidades = @entidade and portaria = 2016 and i_elementos = 31909200000000 ;delete FROM sapo.elementos_contas_ativo_vpd where i_entidades = @entidade and portaria = 2016 and i_elementos = 33903100000000 ;delete FROM sapo.elementos_contas_ativo_vpd where i_entidades = @entidade and portaria = 2016 and i_elementos = 33904800000000 ;

End;call bethadba.pg_setoption('wait_for_commit','off');call bethadba.pg_setoption('fire_triggers', 'on');