From c2a048c45c586d1c774b3284da2bbb52dd2a55a8 Mon Sep 17 00:00:00 2001 From: Gelson Date: Fri, 11 Dec 2015 09:00:36 -0200 Subject: [PATCH] Atualização --- config.php | 3 +-- gestaoAdministrativa/fontes/PHP/CGM/cgm/manutencao/converteCgmInterno.php | 2 -- gestaoAdministrativa/fontes/PHP/CGM/instancias/logradouro/FLManterLogradouro.php | 2 +- gestaoAdministrativa/fontes/PHP/CGM/instancias/logradouro/FMManterLogradouro.php | 122 +++++++++++++++++++++++++++++++++++++++++++++++++++++++++----------------------------------------------------------------- gestaoAdministrativa/fontes/PHP/CGM/instancias/logradouro/JSManterLogradouro.js | 10 ++++++---- gestaoAdministrativa/fontes/PHP/CGM/instancias/logradouro/LSManterLogradouro.php | 7 ++++--- gestaoAdministrativa/fontes/PHP/CGM/instancias/logradouro/OCManterLogradouro.php | 248 ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++---------------------------------------------------------------------------- gestaoAdministrativa/fontes/PHP/CGM/instancias/logradouro/PRManterLogradouro.php | 30 ++++++++++++++++++++++++++++-- gestaoAdministrativa/fontes/PHP/CGM/instancias/processamento/OCProcurarCgm.php | 6 +++++- gestaoAdministrativa/fontes/PHP/CGM/popups/cgm/FMManterCgm.php | 2 -- gestaoAdministrativa/fontes/PHP/CGM/popups/cgm/LSProcurarCgm.php | 5 ++++- gestaoAdministrativa/fontes/PHP/CGM/popups/cgm/OCManterCgm.php | 2 -- gestaoAdministrativa/fontes/PHP/CGM/popups/cgm/PRManterCgm.php | 2 -- gestaoAdministrativa/fontes/PHP/CSE/cse/classTratamento/alteraClassTratamento.php | 1 - gestaoAdministrativa/fontes/PHP/CSE/cse/classTratamento/excluiClassTratamento.php | 1 - gestaoAdministrativa/fontes/PHP/CSE/cse/classTratamento/incluiClassTratamento.php | 1 - gestaoAdministrativa/fontes/PHP/CSE/cse/deficiencia/alteraDeficiencia.php | 1 - gestaoAdministrativa/fontes/PHP/CSE/cse/deficiencia/excluiDeficiencia.php | 1 - gestaoAdministrativa/fontes/PHP/CSE/cse/deficiencia/incluiDeficiencia.php | 1 - gestaoAdministrativa/fontes/PHP/CSE/cse/empresa/alteraEmpresa.php | 1 - gestaoAdministrativa/fontes/PHP/CSE/cse/empresa/excluiEmpresa.php | 1 - gestaoAdministrativa/fontes/PHP/CSE/cse/empresa/incluiEmpresa.php | 1 - gestaoAdministrativa/fontes/PHP/CSE/cse/exame/alteraExame.php | 1 - gestaoAdministrativa/fontes/PHP/CSE/cse/exame/excluiExame.php | 1 - gestaoAdministrativa/fontes/PHP/CSE/cse/exame/incluiExame.php | 1 - gestaoAdministrativa/fontes/PHP/CSE/cse/instituicaoSaude/alteraInstituicaoSaude.php | 1 - gestaoAdministrativa/fontes/PHP/CSE/cse/instituicaoSaude/excluiInstituicaoSaude.php | 1 - gestaoAdministrativa/fontes/PHP/CSE/cse/instituicaoSaude/incluiInstituicaoSaude.php | 1 - gestaoAdministrativa/fontes/PHP/CSE/cse/programa/alteraPrograma.php | 1 - gestaoAdministrativa/fontes/PHP/CSE/cse/programa/excluiPrograma.php | 1 - gestaoAdministrativa/fontes/PHP/CSE/cse/programa/incluiPrograma.php | 1 - gestaoAdministrativa/fontes/PHP/CSE/cse/relatorios/relatorioCidadao.php | 2 +- gestaoAdministrativa/fontes/PHP/CSE/cse/relatorios/relatorioExames.php | 2 +- gestaoAdministrativa/fontes/PHP/CSE/cse/tipoTratamento/alteraTipoTratamento.php | 1 - gestaoAdministrativa/fontes/PHP/CSE/cse/tipoTratamento/excluiTipoTratamento.php | 1 - gestaoAdministrativa/fontes/PHP/CSE/cse/tipoTratamento/incluiTipoTratamento.php | 1 - gestaoAdministrativa/fontes/PHP/CSE/cse/tratamento/alteraTratamento.php | 10 +--------- gestaoAdministrativa/fontes/PHP/CSE/cse/tratamento/consultaPrescricoes.php | 10 +--------- gestaoAdministrativa/fontes/PHP/CSE/popups/Cidadao/procuraCidadao.php | 1 - gestaoAdministrativa/fontes/PHP/administracao/administracao/agencia/alteraAgencia.php | 1 - gestaoAdministrativa/fontes/PHP/administracao/administracao/banco/incluiBanco.php | 1 - gestaoAdministrativa/fontes/PHP/administracao/administracao/local/incluiLocal.php | 1 - gestaoAdministrativa/fontes/PHP/administracao/administracao/relatorios/relatorioPermissao.php | 5 +---- gestaoAdministrativa/fontes/PHP/administracao/administracao/sistema/responsavelModulo.php | 1 - gestaoAdministrativa/fontes/PHP/administracao/administracao/usuarios/definePermissoes.php | 12 +----------- gestaoAdministrativa/fontes/PHP/administracao/administracao/usuarios/interfaceUsuario.class.php | 1 - gestaoAdministrativa/fontes/PHP/administracao/administracao/usuarios/validaDados.php | 2 +- gestaoAdministrativa/fontes/PHP/administracao/classes/mapeamento/TAdministracaoLogradouro.class.php | 3 ++- gestaoAdministrativa/fontes/PHP/administracao/classes/negocio/RConfiguracaoGeral.class.php | 1 - gestaoAdministrativa/fontes/PHP/administracao/classes/negocio/RFuncao.class.php | 6 +++--- gestaoAdministrativa/fontes/PHP/administracao/instancias/geradorcalculo/FLManterFuncao.php | 39 ++++++++++++++++++++------------------- gestaoAdministrativa/fontes/PHP/administracao/instancias/geradorcalculo/FMPopupAtribuicaoTrataErros.php | 9 +++------ gestaoAdministrativa/fontes/PHP/administracao/instancias/geradorcalculo/FMPopupCondicao.php | 4 ++-- gestaoAdministrativa/fontes/PHP/administracao/instancias/geradorcalculo/FMReplicarFuncao.php | 6 +++++- gestaoAdministrativa/fontes/PHP/administracao/instancias/geradorcalculo/OCPopupAtribuicaoTrataErros.php | 4 ---- gestaoAdministrativa/fontes/PHP/administracao/instancias/geradorcalculo/OCReplicarFuncao.php | 18 +++++++----------- gestaoAdministrativa/fontes/PHP/administracao/instancias/geradorcalculo/PRManterFuncao.php | 4 ++-- gestaoAdministrativa/fontes/PHP/administracao/instancias/geradorcalculo/PRPopupAtribuicaoFuncao.php | 1 - gestaoAdministrativa/fontes/PHP/administracao/instancias/geradorcalculo/PRPopupCondicao.php | 3 +-- gestaoAdministrativa/fontes/PHP/administracao/instancias/processamento/OCIMontaLocalizacao.php | 1 - gestaoAdministrativa/fontes/PHP/administracao/popups/funcao/FLBuscarFuncao.php | 125 +++++++++++++++++++++++++++++++++++++++++++++-------------------------------------------------------------------------------- gestaoAdministrativa/fontes/PHP/administracao/popups/funcao/OCBuscarFuncao.php | 13 +++++-------- gestaoAdministrativa/fontes/PHP/framework/URBEM/SistemaLegado.class.php | 7 +------ gestaoAdministrativa/fontes/PHP/framework/bancoDados/postgreSQL/Auditoria.class.php | 9 +++++++-- gestaoAdministrativa/fontes/PHP/framework/bancoDados/postgreSQL/PersistenteAtributosValores.class.php | 1 - gestaoAdministrativa/fontes/PHP/framework/bancoDados/postgreSQL/PersistenteSIAM.class.php | 2 -- gestaoAdministrativa/fontes/PHP/framework/componentes/HTML/ComponenteBase.class.php | 2 +- gestaoAdministrativa/fontes/PHP/framework/componentes/HTML/IMontaQuantidadeValores.class.php | 6 ++++-- gestaoAdministrativa/fontes/PHP/framework/componentes/HTML/Lista.class.php | 4 ++-- gestaoAdministrativa/fontes/PHP/framework/componentes/HTML/Paginacao.class.php | 36 +++++++++++++++++++++--------------- gestaoAdministrativa/fontes/PHP/framework/componentes/HTML/Periodicidade.class.php | 46 +++++++++++++++++++++++++++++++++++++++++++--- gestaoAdministrativa/fontes/PHP/framework/componentes/HTML/Span.class.php | 16 ++++++++++++++++ gestaoAdministrativa/fontes/PHP/framework/componentes/mascara/Mascara.class.php | 4 +--- gestaoAdministrativa/fontes/PHP/framework/include/cabecalho.inc.php | 3 ++- gestaoAdministrativa/fontes/PHP/framework/instancias/index/menu.php | 4 ++-- gestaoAdministrativa/fontes/PHP/framework/instancias/processamento/OCPeriodicidade.php | 15 ++++++++++----- gestaoAdministrativa/fontes/PHP/framework/legado/cabecalho.php | 4 +--- gestaoAdministrativa/fontes/PHP/framework/legado/filtrosLOLegado.inc.php | 3 +-- gestaoAdministrativa/fontes/PHP/framework/legado/funcoesLegado.lib.php | 1 - gestaoAdministrativa/fontes/PHP/framework/legado/mascarasLegado.lib.php | 2 -- gestaoAdministrativa/fontes/PHP/framework/legado/usuarioLegado.class.php | 7 +++---- gestaoAdministrativa/fontes/PHP/framework/legado/valida/validacaoLegada.php | 3 --- gestaoAdministrativa/fontes/PHP/framework/popups/alerta/alerta.php | 276 ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++------------------------------------------------------------------------------------------------------------------------------------------------ gestaoAdministrativa/fontes/PHP/framework/popups/alerta/alertaGenerico.php | 5 ++--- gestaoAdministrativa/fontes/PHP/framework/request/Request.class.php | 10 ++++++++++ gestaoAdministrativa/fontes/PHP/framework/temas/padrao/CSS/paginacao.css | 134 ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ gestaoAdministrativa/fontes/PHP/framework/temas/padrao/CSS/stylos_ns.css | 272 ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++------------------------------------------------------------------------------------------------------------------------------------------------------------------------ gestaoAdministrativa/fontes/PHP/framework/temas/padrao/CSS/stylos_ns_menu.css | 20 ++++---------------- gestaoAdministrativa/fontes/PHP/normas/popups/normas/OCManterNorma2.php | 1 - gestaoAdministrativa/fontes/PHP/normas/popups/normas/PRManterNorma.php | 2 +- gestaoAdministrativa/fontes/PHP/organograma/classes/mapeamento/TOrganogramaOrgao.class.php | 55 ++++++++++++++++++++++++++++++++++++++++++++++++++++++- gestaoAdministrativa/fontes/PHP/protocolo/protocolo/andamento.class.php | 4 +--- gestaoAdministrativa/fontes/PHP/protocolo/protocolo/andamentoPadrao/alteraAndamentoPadrao.php | 3 --- gestaoAdministrativa/fontes/PHP/protocolo/protocolo/andamentoPadrao/excluiAndamentoPadrao.php | 3 --- gestaoAdministrativa/fontes/PHP/protocolo/protocolo/apensamento.class.php | 4 ++-- gestaoAdministrativa/fontes/PHP/protocolo/protocolo/processos/alteraDespacho.php | 3 +-- gestaoAdministrativa/fontes/PHP/protocolo/protocolo/processos/consultaProcessoDespacho.php | 3 +-- gestaoAdministrativa/fontes/PHP/protocolo/protocolo/processos/encaminhaProcessoLote.php | 3 +-- gestaoAdministrativa/fontes/PHP/protocolo/protocolo/processos/incluiDespacho.php | 5 +---- gestaoAdministrativa/fontes/javaScript/genericas.js | 11 +++++++---- gestaoFinanceira/fontes/PHP/LRF/classes/negocio/RLRFRelatorioModelos3.class.php | 8 +------- gestaoFinanceira/fontes/PHP/contabilidade/classes/componentes/IPopUpEstruturalPlano.class.php | 11 +++++++---- gestaoFinanceira/fontes/PHP/contabilidade/classes/mapeamento/TContabilidadeConfiguracaoContasExtras.class.php | 75 +++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ gestaoFinanceira/fontes/PHP/contabilidade/classes/mapeamento/TContabilidadePlanoBanco.class.php | 50 +++++++++++++++++++++++++++++++------------------- gestaoFinanceira/fontes/PHP/contabilidade/classes/mapeamento/TContabilidadePlanoConta.class.php | 50 +++++++++++++++++++++++++------------------------- gestaoFinanceira/fontes/PHP/contabilidade/classes/negocio/RContabilidadePlanoConta.class.php | 44 +++++++++++++++++++------------------------- gestaoFinanceira/fontes/PHP/contabilidade/classes/negocio/RContabilidadePlanoContaAnalitica.class.php | 4 ++-- gestaoFinanceira/fontes/PHP/contabilidade/classes/negocio/RContabilidadeRelatorioBalanceteVerificacao.class.php | 4 ++-- gestaoFinanceira/fontes/PHP/contabilidade/classes/negocio/RContabilidadeRelatorioRazaoReceita.class.php | 2 -- gestaoFinanceira/fontes/PHP/contabilidade/classes/negocio/RContabilidadeSistemaContabil.class.php | 4 ++-- gestaoFinanceira/fontes/PHP/contabilidade/instancias/configuracao/FMConfigurarLancamentosDespesa.php | 2 +- gestaoFinanceira/fontes/PHP/contabilidade/instancias/configuracao/FMConfigurarLancamentosReceita.php | 2 +- gestaoFinanceira/fontes/PHP/contabilidade/instancias/configuracao/FMManterConfiguracao.php | 2 +- gestaoFinanceira/fontes/PHP/contabilidade/instancias/configuracao/FMManterEncerramentoMes.php | 1 - gestaoFinanceira/fontes/PHP/contabilidade/instancias/configuracao/FMManterReceitaDespesaExtraRecurso.php | 121 +++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ gestaoFinanceira/fontes/PHP/contabilidade/instancias/configuracao/JSManterReceitaDespesaExtraRecurso.js | 77 +++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ gestaoFinanceira/fontes/PHP/contabilidade/instancias/configuracao/OCManterReceitaDespesaExtraRecurso.php | 290 ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ gestaoFinanceira/fontes/PHP/contabilidade/instancias/configuracao/PRManterReceitaDespesaExtraRecurso.php | 104 ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ gestaoFinanceira/fontes/PHP/contabilidade/instancias/encerramento/OCGeraRelatorioRestosAPagar.php | 2 +- gestaoFinanceira/fontes/PHP/contabilidade/instancias/encerramento/PRDefinirContasRP.php | 4 +--- gestaoFinanceira/fontes/PHP/contabilidade/instancias/lancamentoContabil/LSAberturaOrcamentoAnual.php | 1 - gestaoFinanceira/fontes/PHP/contabilidade/instancias/lancamentoContabil/PRManterLancamentoPartidaDobrada.php | 6 +----- gestaoFinanceira/fontes/PHP/contabilidade/instancias/planoConta/FMEncerrarConta.php | 4 ++-- gestaoFinanceira/fontes/PHP/contabilidade/instancias/planoConta/FMManterPlanoConta.php | 24 ++++++++++++------------ gestaoFinanceira/fontes/PHP/contabilidade/instancias/planoConta/OCManterPlanoConta.php | 8 ++++---- gestaoFinanceira/fontes/PHP/contabilidade/instancias/planoConta/PRManterPlanoConta.php | 31 +++++++++++++++++++++++++------ gestaoFinanceira/fontes/PHP/contabilidade/instancias/processamento/OCContaAnalitica.php | 30 +++++++++++++++--------------- gestaoFinanceira/fontes/PHP/contabilidade/instancias/processamento/OCEstruturalPlano.php | 57 +++++++++++++++++++++++++++++++++++++++++++-------------- gestaoFinanceira/fontes/PHP/contabilidade/instancias/relatorio/FLBalanceteVerificacao.php | 10 +++++----- gestaoFinanceira/fontes/PHP/contabilidade/instancias/relatorio/FLConsistenciaPCASP.php | 8 ++++---- gestaoFinanceira/fontes/PHP/contabilidade/instancias/relatorio/OCGeraRelatorioBalanceteVerificacao.php | 4 ++-- gestaoFinanceira/fontes/PHP/contabilidade/popups/planoConta/LSPlanoConta.php | 60 +++++++++++++++++++++++++++++++++++++++--------------------- gestaoFinanceira/fontes/PHP/contabilidade/popups/planoConta/OCPlanoConta.php | 4 ++-- gestaoFinanceira/fontes/PHP/empenho/classes/mapeamento/FEmpenhoEmpenhoEmissao.class.php | 3 --- gestaoFinanceira/fontes/PHP/empenho/classes/mapeamento/FEmpenhoEmpenhoEstornoRestosAPagar.class.php | 2 +- gestaoFinanceira/fontes/PHP/empenho/classes/mapeamento/FEmpenhoEmpenhoLiquidacaoRestosAPagar.class.php | 2 +- gestaoFinanceira/fontes/PHP/empenho/classes/mapeamento/FEmpenhoEmpenhoLiquidacaoRestosAPagarAnulacao.class.php | 2 +- gestaoFinanceira/fontes/PHP/empenho/classes/mapeamento/FEmpenhoEmpenhoPagamento.class.php | 2 +- gestaoFinanceira/fontes/PHP/empenho/classes/mapeamento/FEmpenhoEmpenhoPagamentoAnulacao.class.php | 2 +- gestaoFinanceira/fontes/PHP/empenho/classes/mapeamento/FEmpenhoEmpenhoPagamentoRestosAPagar.class.php | 2 +- gestaoFinanceira/fontes/PHP/empenho/classes/mapeamento/FEmpenhoEmpenhoPagamentoRestosAPagarAnulacao.class.php | 2 +- gestaoFinanceira/fontes/PHP/empenho/classes/mapeamento/TEmpenhoEmpenhoContrato.class.php | 80 +++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++--------- gestaoFinanceira/fontes/PHP/empenho/classes/mapeamento/TEmpenhoItemPreEmpenho.class.php | 62 ++++++++++++++++++++++++++------------------------------------ gestaoFinanceira/fontes/PHP/empenho/classes/mapeamento/TEmpenhoItemPreEmpenhoJulgamento.class.php | 150 ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++---------------------------- gestaoFinanceira/fontes/PHP/empenho/classes/mapeamento/TEmpenhoNotaLiquidacao.class.php | 4 ++-- gestaoFinanceira/fontes/PHP/empenho/classes/mapeamento/TEmpenhoOrdemPagamentoRetencao.class.php | 2 +- gestaoFinanceira/fontes/PHP/empenho/classes/mapeamento/TEmpenhoPreEmpenho.class.php | 91 ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++----------- gestaoFinanceira/fontes/PHP/empenho/classes/mapeamento/TEmpenhoResponsavelAdiantamento.class.php | 1 - gestaoFinanceira/fontes/PHP/empenho/classes/negocio/REmpenhoEmpenho.class.php | 24 +++++++++++++----------- gestaoFinanceira/fontes/PHP/empenho/classes/negocio/REmpenhoEmpenhoAutorizacao.class.php | 39 ++++++++------------------------------- gestaoFinanceira/fontes/PHP/empenho/classes/negocio/REmpenhoItemPreEmpenho.class.php | 263 ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++----------------------------------------------------------------------------------------------------------------------------------------- gestaoFinanceira/fontes/PHP/empenho/classes/negocio/REmpenhoNotaLiquidacao.class.php | 18 +++++++----------- gestaoFinanceira/fontes/PHP/empenho/classes/negocio/REmpenhoOrdemPagamento.class.php | 4 ++-- gestaoFinanceira/fontes/PHP/empenho/classes/negocio/REmpenhoPagamentoLiquidacao.class.php | 1007 +++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------ gestaoFinanceira/fontes/PHP/empenho/classes/negocio/REmpenhoPreEmpenho.class.php | 159 ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++------------------------------------------- gestaoFinanceira/fontes/PHP/empenho/classes/negocio/REmpenhoRelatorioNotaLiquidacaoEmpenhoAnulado.class.php | 2 -- gestaoFinanceira/fontes/PHP/empenho/classes/negocio/REmpenhoRelatorioOrdemPagamentoAnulado.class.php | 3 --- gestaoFinanceira/fontes/PHP/empenho/classes/negocio/REmpenhoRelatorioSituacaoAutorizacaoEmpenho.class.php | 1 - gestaoFinanceira/fontes/PHP/empenho/instancias/autorizacao/FMManterAutorizacao.php | 42 ++++++++++++++++++++++++++---------------- gestaoFinanceira/fontes/PHP/empenho/instancias/autorizacao/JSManterAutorizacao.js | 62 ++++++++++++++++++++++++++------------------------------------ gestaoFinanceira/fontes/PHP/empenho/instancias/autorizacao/LSDuplicarAutorizacao.php | 2 +- gestaoFinanceira/fontes/PHP/empenho/instancias/autorizacao/OCGeraRelatorioAutorizacao.php | 7 +++++-- gestaoFinanceira/fontes/PHP/empenho/instancias/autorizacao/OCManterAutorizacao.php | 146 +++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++--------------------------------------------------------------- gestaoFinanceira/fontes/PHP/empenho/instancias/autorizacao/PRManterAutorizacao.php | 385 +++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------ gestaoFinanceira/fontes/PHP/empenho/instancias/configuracao/LSManterDespesasMensaisFixas.php | 2 -- gestaoFinanceira/fontes/PHP/empenho/instancias/empenho/FLManterVinculoEmpenhoContrato.php | 52 +++++++++++++++++++++++++++++++--------------------- gestaoFinanceira/fontes/PHP/empenho/instancias/empenho/FMConsultarEmpenho.php | 138 ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++-------------------------------------------------------------- gestaoFinanceira/fontes/PHP/empenho/instancias/empenho/FMManterEmpenho.php | 129 ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++----------------------------------------------------------- gestaoFinanceira/fontes/PHP/empenho/instancias/empenho/FMManterEmpenhoComplementar.php | 100 ++++++++++++++++++++++++++++++++++++++++++++++++++-------------------------------------------------- gestaoFinanceira/fontes/PHP/empenho/instancias/empenho/FMManterEmpenhoDiversos.php | 38 +++++++++++++++++++++++++++----------- gestaoFinanceira/fontes/PHP/empenho/instancias/empenho/FMManterVinculoEmpenhoContrato.php | 120 +++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++------------------------------------------------- gestaoFinanceira/fontes/PHP/empenho/instancias/empenho/LSManterVinculoEmpenhoContrato.php | 50 +++++++++++++++++++++++++++++++++++--------------- gestaoFinanceira/fontes/PHP/empenho/instancias/empenho/OCGeraRelatorioEmpenhoOrcamentario.php | 16 ++++++++++++---- gestaoFinanceira/fontes/PHP/empenho/instancias/empenho/OCManterDespesasMensaisFixas.php | 3 --- gestaoFinanceira/fontes/PHP/empenho/instancias/empenho/OCManterEmpenho.php | 473 ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++------------------------------------------------------------------------------------------------------------------------------------------------------------------------- gestaoFinanceira/fontes/PHP/empenho/instancias/empenho/OCManterVinculoEmpenhoContrato.php | 18 +++++++++--------- gestaoFinanceira/fontes/PHP/empenho/instancias/empenho/PRManterEmpenho.php | 118 ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++-------------------------------------------------- gestaoFinanceira/fontes/PHP/empenho/instancias/empenho/PRManterEmpenhoDiversos.php | 170 ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++---------------------------------------------------------------------------- gestaoFinanceira/fontes/PHP/empenho/instancias/empenho/PRManterVinculoEmpenhoContrato.php | 4 ++-- gestaoFinanceira/fontes/PHP/empenho/instancias/liquidacao/FMAnularLiquidacao.php | 2 +- gestaoFinanceira/fontes/PHP/empenho/instancias/liquidacao/FMManterLiquidacao.php | 4 ++-- gestaoFinanceira/fontes/PHP/empenho/instancias/liquidacao/PRManterLiquidacao.php | 253 ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++------------------------------------------------------------------------------------------------------------------- gestaoFinanceira/fontes/PHP/empenho/instancias/manutencao/OCManutencaoDatas.php | 2 +- gestaoFinanceira/fontes/PHP/empenho/instancias/ordemPagamento/FMManterEstornoPagamentoOrdem.php | 17 ----------------- gestaoFinanceira/fontes/PHP/empenho/instancias/relatorio/OCEmpenhoRPAnuLiqEstLiq.php | 1 - gestaoFinanceira/fontes/PHP/empenho/instancias/relatorio/OCGeraRelatorioEmpenhoEmpenhoPagarBirt.php | 1 - gestaoFinanceira/fontes/PHP/empenho/instancias/relatorio/OCGeraRelatorioRestosPagarAnuladoPagamentoEstorno.php | 4 ++-- gestaoFinanceira/fontes/PHP/empenho/popups/empenho/LSConsultaEmpenhoPago.php | 11 ----------- gestaoFinanceira/fontes/PHP/exportacao/instancias/tceRJ/FMManterAjustesEmpenho.php | 3 --- gestaoFinanceira/fontes/PHP/exportacao/instancias/tceSC/PRGeraArquivosEsfingeConcursos.php | 2 -- gestaoFinanceira/fontes/PHP/exportacao/instancias/tceSC/PRGeraArquivosEsfingeContratos.php | 2 -- gestaoFinanceira/fontes/PHP/exportacao/instancias/tceSC/PRGeraArquivosEsfingeConvenios.php | 3 --- gestaoFinanceira/fontes/PHP/exportacao/instancias/tceSC/PRGeraArquivosEsfingePlanoCargos.php | 2 -- gestaoFinanceira/fontes/PHP/exportacao/instancias/tceSC/PRGeraArquivosEsfingeRegContabeis.php | 271 ------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------- gestaoFinanceira/fontes/PHP/ldo/classes/visao/VLDODespesaReceita.class.php | 8 ++++---- gestaoFinanceira/fontes/PHP/orcamento/classes/componentes/ILabelEntidade.class.php | 1 + gestaoFinanceira/fontes/PHP/orcamento/classes/mapeamento/FOrcamentoBalanceteDespesa.class.php | 4 +--- gestaoFinanceira/fontes/PHP/orcamento/classes/mapeamento/TOrcamentoRecurso.class.php | 39 +++++++++++++++++++++++++++++++++++++++ gestaoFinanceira/fontes/PHP/orcamento/classes/mapeamento/TOrcamentoRecursoDestinacao.class.php | 4 ++-- gestaoFinanceira/fontes/PHP/orcamento/classes/mapeamento/TOrcamentoSuplementacao.class.php | 19 +++++++++---------- gestaoFinanceira/fontes/PHP/orcamento/classes/mapeamento/TOrcamentoSuplementacaoSuplementada.class.php | 19 +++---------------- gestaoFinanceira/fontes/PHP/orcamento/classes/negocio/ROrcamentoClassificacaoReceita.class.php | 8 +++----- gestaoFinanceira/fontes/PHP/orcamento/classes/negocio/ROrcamentoReceita.class.php | 6 +++--- gestaoFinanceira/fontes/PHP/orcamento/classes/negocio/ROrcamentoRelatorioAnexo9.class.php | 3 --- gestaoFinanceira/fontes/PHP/orcamento/classes/negocio/ROrcamentoSuplementacao.class.php | 24 ++++-------------------- gestaoFinanceira/fontes/PHP/orcamento/instancias/alteracaoOrcamento/FMManterExcesso.php | 8 ++++---- gestaoFinanceira/fontes/PHP/orcamento/instancias/alteracaoOrcamento/PRManterExcesso.php | 7 ++++--- gestaoFinanceira/fontes/PHP/orcamento/instancias/processamento/OCReceita.php | 6 +++--- gestaoFinanceira/fontes/PHP/orcamento/instancias/recurso/PRRecurso.php | 12 ++++++------ gestaoFinanceira/fontes/PHP/orcamento/instancias/relatorio/OCGeraRelatorioReservaSaldos.php | 1 - gestaoFinanceira/fontes/PHP/orcamento/instancias/relatorio/OCReservaSaldos.php | 2 +- gestaoFinanceira/fontes/PHP/orcamento/instancias/reservaSaldos/FMManterReservaSaldos.php | 3 ++- gestaoFinanceira/fontes/PHP/orcamento/instancias/reservaSaldos/OCManterReservaSaldos.php | 22 +++++++++------------- gestaoFinanceira/fontes/PHP/orcamento/popups/receita/LSReceita.php | 4 ++-- gestaoFinanceira/fontes/PHP/tesouraria/classes/mapeamento/FTesourariaEmitirBoletim.class.php | 5 +++-- gestaoFinanceira/fontes/PHP/tesouraria/classes/mapeamento/FTesourariaEstornoRealizacaoReceitaFixa.class.php | 4 ++-- gestaoFinanceira/fontes/PHP/tesouraria/classes/mapeamento/FTesourariaEstornoRealizacaoReceitaVariavel.class.php | 2 +- gestaoFinanceira/fontes/PHP/tesouraria/classes/mapeamento/FTesourariaExtratoBancario.class.php | 2 -- gestaoFinanceira/fontes/PHP/tesouraria/classes/mapeamento/FTesourariaRealizacaoReceitaFixa.class.php | 6 +++--- gestaoFinanceira/fontes/PHP/tesouraria/classes/mapeamento/FTesourariaRealizacaoReceitaVariavel.class.php | 2 +- gestaoFinanceira/fontes/PHP/tesouraria/classes/negocio/RTesourariaArrecadacao.class.php | 4 ++-- gestaoFinanceira/fontes/PHP/tesouraria/classes/negocio/RTesourariaBoletim.class.php | 46 +++++++++++++++++++++++----------------------- gestaoFinanceira/fontes/PHP/tesouraria/classes/negocio/RTesourariaRelatorioDemonstrativoSaldos.class.php | 10 ++++------ gestaoFinanceira/fontes/PHP/tesouraria/classes/negocio/RTesourariaRelatorioEmitirBoletim.class.php | 2 +- gestaoFinanceira/fontes/PHP/tesouraria/classes/negocio/RTesourariaRelatorioExtratoBancario.class.php | 10 ++-------- gestaoFinanceira/fontes/PHP/tesouraria/classes/negocio/RTesourariaRelatorioExtratoContaCorrente.class.php | 4 +--- gestaoFinanceira/fontes/PHP/tesouraria/classes/negocio/RTesourariaRelatorioResumoDespesa.class.php | 4 +--- gestaoFinanceira/fontes/PHP/tesouraria/classes/negocio/RTesourariaRelatorioResumoReceita.class.php | 4 +--- gestaoFinanceira/fontes/PHP/tesouraria/classes/negocio/RTesourariaRelatorioTransferenciasBancarias.class.php | 8 +++----- gestaoFinanceira/fontes/PHP/tesouraria/classes/negocio/RTesourariaTransferencia.class.php | 6 +++--- gestaoFinanceira/fontes/PHP/tesouraria/instancias/arrecadacao/OCManterArrecadacaoReceita.php | 4 +--- gestaoFinanceira/fontes/PHP/tesouraria/instancias/conciliacao/FLManterConciliacao.php | 18 ++---------------- gestaoFinanceira/fontes/PHP/tesouraria/instancias/pagamentos/FMManterPagamento.php | 6 +++--- gestaoFinanceira/fontes/PHP/tesouraria/instancias/pagamentos/PRManterPagamento.php | 54 ++++++++++++++++++++++++++++++++---------------------- gestaoFinanceira/fontes/PHP/tesouraria/instancias/relatorio/OCEmitirBoletim.php | 2 +- gestaoFinanceira/fontes/PHP/tesouraria/instancias/relatorio/OCGeraRelacaoDespesaExtra.php | 4 +--- gestaoFinanceira/fontes/PLPGSQL/contabilidade/balancoFinanceiro.plsql | 13 ++++++++++--- gestaoFinanceira/fontes/PLPGSQL/contabilidade/balancoPatrimonialAtivo.plsql | 965 +++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++---------------------------------------------------------------------------------- gestaoFinanceira/fontes/PLPGSQL/contabilidade/balancoPatrimonialPassivo.plsql | 189 +++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++---------------------------------------------------------------------------------------------------------------------- gestaoFinanceira/fontes/PLPGSQL/contabilidade/balancoPatrimonialPatrimonioLiquido.plsql | 151 ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++----------------------------------------------------------------- gestaoFinanceira/fontes/PLPGSQL/contabilidade/calculaAtivoBalancoPatrimonial.plsql | 243 +++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ gestaoFinanceira/fontes/PLPGSQL/contabilidade/calculaPassivoBalancoPatrimonial.plsql | 245 +++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ gestaoFinanceira/fontes/PLPGSQL/empenho/empenhoAnulacaoPagamentoRPLiquidadoTCEMS.plsql | 2 ++ gestaoFinanceira/fontes/PLPGSQL/empenho/empenhoEmpenhadoPagoLiquidado.plsql | 2 +- gestaoFinanceira/fontes/PLPGSQL/empenho/empenhoPagamentoRPLiquidadoTCEMS.plsql | 11 ++++++----- gestaoFinanceira/fontes/PLPGSQL/empenho/relatorioPagamentoOrdemNotaEmpenho.plsql | 299 +++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ gestaoFinanceira/fontes/PLPGSQL/empenho/saldoDotacaoDataAtualEmpenho.plsql | 325 +++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ gestaoFinanceira/fontes/PLPGSQL/empenho/saldoDotacaoDataEmpenho.plsql | 324 ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ gestaoFinanceira/fontes/RPT/contabilidade/report/design/balancoPatrimonial.rptdesign | 755 ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------- gestaoFinanceira/fontes/RPT/empenho/report/design/notaAutorizacaoEmpenho.rptdesign | 181 +++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++-------------------------------------------------------------------------------------- gestaoFinanceira/fontes/SQL/GF_2043.sql | 20 ++++++++++++++++++++ gestaoFinanceira/fontes/SQL/GF_2044.sql | 111 +++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ gestaoFinanceira/fontes/SQL/GF_2045.sql | 44 ++++++++++++++++++++++++++++++++++++++++++++ gestaoFinanceira/fontes/SQL/GF_2046.sql | 80 ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ gestaoPatrimonial/fontes/PHP/almoxarifado/classes/componentes/IMontaItemQuantidade.class.php | 9 ++++++--- gestaoPatrimonial/fontes/PHP/almoxarifado/classes/componentes/IMontaItemUnidade.class.php | 27 +++------------------------ gestaoPatrimonial/fontes/PHP/almoxarifado/classes/componentes/IPopUpCentroCustoUsuario.class.php | 38 +++++++++++++++++++++----------------- gestaoPatrimonial/fontes/PHP/almoxarifado/classes/negocio/RAlmoxarifadoPermissaoCentroDeCustos.class.php | 2 +- gestaoPatrimonial/fontes/PHP/almoxarifado/instancias/centroCusto/OCDefinirPermissao.php | 2 +- gestaoPatrimonial/fontes/PHP/almoxarifado/instancias/entrada/OCMovimentacaoTransferencia.php | 3 --- gestaoPatrimonial/fontes/PHP/almoxarifado/instancias/processamento/OCCentroCustoUsuario.php | 110 +++++++++++++++++++++++--------------------------------------------------------------------------------------- gestaoPatrimonial/fontes/PHP/almoxarifado/instancias/processamento/OCIMontaItemQuantidade.php | 2 -- gestaoPatrimonial/fontes/PHP/almoxarifado/instancias/requisicao/PRManterRequisicao.php | 4 ++-- gestaoPatrimonial/fontes/PHP/almoxarifado/popups/centroCusto/FLManterCentroCusto.php | 61 ++++++++++++++++++++++++------------------------------------- gestaoPatrimonial/fontes/PHP/almoxarifado/popups/centroCusto/LSManterCentroCusto.php | 44 ++++++++++++++++++++------------------------ gestaoPatrimonial/fontes/PHP/compras/classes/componentes/IMontaDotacaoDesdobramento.class.php | 57 ++++++++++++++++++++++++++------------------------------- gestaoPatrimonial/fontes/PHP/compras/classes/mapeamento/TComprasCotacaoFornecedorItem.class.php | 1118 ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------ gestaoPatrimonial/fontes/PHP/compras/classes/mapeamento/TComprasCotacaoItem.class.php | 12 ++++++------ gestaoPatrimonial/fontes/PHP/compras/classes/mapeamento/TComprasMapaItem.class.php | 66 ++++++++++++++++++++++++++++++------------------------------------ gestaoPatrimonial/fontes/PHP/compras/classes/mapeamento/TComprasOrdem.class.php | 38 ++++++++++++++++++++++++++++++++++++-- gestaoPatrimonial/fontes/PHP/compras/classes/mapeamento/TComprasSolicitacaoHomologadaReserva.class.php | 5 ++--- gestaoPatrimonial/fontes/PHP/compras/classes/mapeamento/TComprasSolicitacaoItem.class.php | 6 +++--- gestaoPatrimonial/fontes/PHP/compras/classes/mapeamento/TComprasSolicitacaoItemAnulacao.class.php | 35 ++++++++--------------------------- gestaoPatrimonial/fontes/PHP/compras/instancias/compraDireta/FMManterCompraDireta.php | 6 +++--- gestaoPatrimonial/fontes/PHP/compras/instancias/compraDireta/OCManterCompraDireta.php | 32 ++++++++++++++++++++------------ gestaoPatrimonial/fontes/PHP/compras/instancias/compraDireta/OCManterHomologacao.php | 12 ++++++------ gestaoPatrimonial/fontes/PHP/compras/instancias/compraDireta/PRManterAutorizacao.php | 3 ++- gestaoPatrimonial/fontes/PHP/compras/instancias/fornecedor/OCManterFornecedor.php | 3 +-- gestaoPatrimonial/fontes/PHP/compras/instancias/fornecedor/PRManterFornecedor.php | 12 +++++++++--- gestaoPatrimonial/fontes/PHP/compras/instancias/mapaCompras/FMManterMapaCompras.php | 10 ++++++---- gestaoPatrimonial/fontes/PHP/compras/instancias/mapaCompras/FMManterMapaComprasAbaItens.php | 11 ----------- gestaoPatrimonial/fontes/PHP/compras/instancias/mapaCompras/OCManterMapaCompras.php | 58 +++++++++++++++++++++++++++++++--------------------------- gestaoPatrimonial/fontes/PHP/compras/instancias/ordemCompra/JSManterOrdemCompra.js | 22 ++++++++++++---------- gestaoPatrimonial/fontes/PHP/compras/instancias/ordemCompra/LSManterOrdemCompra.php | 7 +++---- gestaoPatrimonial/fontes/PHP/compras/instancias/ordemCompra/OCManterOrdemCompra.php | 185 +++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++------------------------------------------------------------------------------ gestaoPatrimonial/fontes/PHP/compras/instancias/ordemCompra/PRManterOrdemCompra.php | 145 +++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++------------------------------------------------------------------------ gestaoPatrimonial/fontes/PHP/compras/instancias/solicitacaoCompra/OCManterAnulacaoSolicitacaoCompra.php | 29 ++++++++++++++++------------- gestaoPatrimonial/fontes/PHP/compras/instancias/solicitacaoCompra/OCManterHomologacaoSolicitacaoCompra.php | 16 ++++++++-------- gestaoPatrimonial/fontes/PHP/compras/instancias/solicitacaoCompra/OCManterSolicitacaoCompra.php | 42 ++++++++++++++++++++++-------------------- gestaoPatrimonial/fontes/PHP/compras/instancias/solicitacaoCompra/PRManterSolicitacaoCompra.php | 15 +++++++-------- gestaoPatrimonial/fontes/PHP/compras/popups/mapaCompras/LSBuscaMapaCompras.php | 107 +++++++++++++++++++++++++++++++++++++++++++++++++++++++---------------------------------------------------- gestaoPatrimonial/fontes/PHP/frota/instancias/posto/LSManterPosto.php | 2 -- gestaoPatrimonial/fontes/PHP/frota/instancias/veiculo/FMManterConsultarVeiculo.php | 4 +--- gestaoPatrimonial/fontes/PHP/frota/instancias/veiculo/PRManterVeiculo.php | 9 ++++++--- gestaoPatrimonial/fontes/PHP/licitacao/classes/componentes/IPopUpContrato.class.php | 48 ++++++++++++------------------------------------ gestaoPatrimonial/fontes/PHP/licitacao/classes/mapeamento/TLicitacaoContrato.class.php | 124 ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++------------------------------------------ gestaoPatrimonial/fontes/PHP/licitacao/classes/mapeamento/TLicitacaoHomologacao.class.php | 304 +++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++--- gestaoPatrimonial/fontes/PHP/licitacao/classes/mapeamento/TLicitacaoLicitacao.class.php | 225 ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++- gestaoPatrimonial/fontes/PHP/licitacao/classes/mapeamento/TLicitacaoRescisaoContrato.class.php | 3 +++ gestaoPatrimonial/fontes/PHP/licitacao/classes/mapeamento/TLicitacaoTipoContrato.class.php | 3 ++- gestaoPatrimonial/fontes/PHP/licitacao/instancias/adjudicacao/OCManterAdjudicacao.php | 6 +++--- gestaoPatrimonial/fontes/PHP/licitacao/instancias/adjudicacao/PRManterAdjudicacao.php | 5 +++-- gestaoPatrimonial/fontes/PHP/licitacao/instancias/autorizacao/FLManterAutorizacao.php | 61 ++++++++++++++++++++++++++++--------------------------------- gestaoPatrimonial/fontes/PHP/licitacao/instancias/autorizacao/FMManterAutorizacao.php | 26 ++++++++++++++++++++++++-- gestaoPatrimonial/fontes/PHP/licitacao/instancias/autorizacao/FMManterAutorizacaoParcial.php | 308 ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ gestaoPatrimonial/fontes/PHP/licitacao/instancias/autorizacao/JSManterAutorizacaoParcial.js | 52 ++++++++++++++++++++++++++++++++++++++++++++++++++++ gestaoPatrimonial/fontes/PHP/licitacao/instancias/autorizacao/LSManterAutorizacaoParcial.php | 180 ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ gestaoPatrimonial/fontes/PHP/licitacao/instancias/autorizacao/OCManterAutorizacaoParcial.php | 953 +++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ gestaoPatrimonial/fontes/PHP/licitacao/instancias/autorizacao/PRManterAutorizacao.php | 3 ++- gestaoPatrimonial/fontes/PHP/licitacao/instancias/autorizacao/PRManterAutorizacaoParcial.php | 614 ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ gestaoPatrimonial/fontes/PHP/licitacao/instancias/contrato/FLManterTipoContrato.php | 113 +++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ gestaoPatrimonial/fontes/PHP/licitacao/instancias/contrato/FMConsultarContrato.php | 747 +++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ gestaoPatrimonial/fontes/PHP/licitacao/instancias/contrato/FMManterContrato.php | 5 +++-- gestaoPatrimonial/fontes/PHP/licitacao/instancias/contrato/FMManterRescindirContrato.php | 1 + gestaoPatrimonial/fontes/PHP/licitacao/instancias/contrato/FMManterTipoContrato.php | 165 +++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ gestaoPatrimonial/fontes/PHP/licitacao/instancias/contrato/LSManterContrato.php | 10 +++++++--- gestaoPatrimonial/fontes/PHP/licitacao/instancias/contrato/LSManterTipoContrato.php | 158 ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ gestaoPatrimonial/fontes/PHP/licitacao/instancias/contrato/OCManterContrato.php | 412 +++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++--------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------- gestaoPatrimonial/fontes/PHP/licitacao/instancias/contrato/OCManterRescindirContrato.php | 42 +++++++++++++++++++++--------------------- gestaoPatrimonial/fontes/PHP/licitacao/instancias/contrato/PRManterRescindirContrato.php | 36 ++++++++++++++++++------------------ gestaoPatrimonial/fontes/PHP/licitacao/instancias/contrato/PRManterTipoContrato.php | 143 +++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ gestaoPatrimonial/fontes/PHP/licitacao/instancias/convenios/FMManterAditivoConvenio.php | 2 -- gestaoPatrimonial/fontes/PHP/licitacao/instancias/homologacao/OCManterHomologacao.php | 10 +++++----- gestaoPatrimonial/fontes/PHP/licitacao/instancias/processoLicitatorio/OCGeraManterJulgamentoProposta.php | 4 ++-- gestaoPatrimonial/fontes/PHP/licitacao/instancias/processoLicitatorio/OCGeraManterManutencaoProposta.php | 4 ++-- gestaoPatrimonial/fontes/PHP/licitacao/instancias/processoLicitatorio/OCManterJulgamentoProposta.php | 13 ++++++------- gestaoPatrimonial/fontes/PHP/licitacao/instancias/processoLicitatorio/OCManterManutencaoProposta.php | 74 +++++++++++++++++++++++++++++++++++++++----------------------------------- gestaoPatrimonial/fontes/PHP/licitacao/instancias/processoLicitatorio/OCManterProcessoLicitatorio.php | 15 ++++++++------- gestaoPatrimonial/fontes/PHP/licitacao/instancias/processoLicitatorio/PRManterManutencaoProposta.php | 5 ++--- gestaoPatrimonial/fontes/PHP/licitacao/popups/contrato/FLProcurarContrato.php | 84 ++++++++++++++++++++++++++++++++++++++++++++++++++++-------------------------------- gestaoPatrimonial/fontes/PHP/licitacao/popups/contrato/LSProcurarContrato.php | 100 +++++++++++++++++++++++++++++++++++++++------------------------------------------------------------- gestaoPatrimonial/fontes/PHP/patrimonio/classes/mapeamento/TPatrimonioAtributoPatrimonio.class.php | 1 - gestaoPatrimonial/fontes/PHP/patrimonio/classes/mapeamento/TPatrimonioBem.class.php | 82 +++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++----- gestaoPatrimonial/fontes/PHP/patrimonio/instancias/bem/FMManterConsultarBem.php | 44 ++++++++++++++++++++++++++++++++++---------- gestaoPatrimonial/fontes/PHP/patrimonio/instancias/bem/LSManterBem.php | 24 +++++++----------------- gestaoPatrimonial/fontes/PHP/patrimonio/instancias/bem/OCManterBem.php | 1568 ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++---------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------- gestaoPatrimonial/fontes/PHP/patrimonio/instancias/bem/PRDepreciacaoAutomatica.php | 164 +++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++------------------------------------------------------------------------- gestaoPatrimonial/fontes/PHP/patrimonio/instancias/relatorio/relatorioPatrimonialResumido.php | 2 -- gestaoPatrimonial/fontes/PHP/patrimonio/patrimonio/bens/consultaBens.php | 6 +----- gestaoPatrimonial/fontes/PHP/patrimonio/patrimonio/bens/interfaceBens.class.php | 4 ---- gestaoPatrimonial/fontes/PHP/patrimonio/patrimonio/bens/transfereBens.php | 3 --- gestaoPatrimonial/fontes/PHP/patrimonio/patrimonio/manutencao/agendaManutencao.php | 39 --------------------------------------- gestaoPatrimonial/fontes/PHP/patrimonio/patrimonio/relatorios/cargaPatrimonial.php | 2 +- gestaoPatrimonial/fontes/PHP/patrimonio/patrimonio/relatorios/cargaPatrimonialCompleto.php | 1 - gestaoPatrimonial/fontes/PHP/patrimonio/patrimonio/relatorios/financeiraNaturezaMostra.php | 1 - gestaoPatrimonial/fontes/PHP/patrimonio/patrimonio/relatorios/relatorioPatrimonialResumido.php | 2 -- gestaoPatrimonial/fontes/PLPGSQL/patrimonio/fn_depreciacao_automatica.plsql | 8 ++++++-- gestaoPatrimonial/fontes/RPT/compras/report/design/ordemCompra.rptdesign | 9 ++++++++- gestaoPatrimonial/fontes/RPT/compras/report/design/relSolicitacaoCompra.rptdesign | 2308 +++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------- gestaoPatrimonial/fontes/RPT/licitacao/report/design/mapaComparativoProposta.rptdesign | 6 +++--- gestaoPatrimonial/fontes/SQL/GP_2044.sql | 120 ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++-------------- gestaoPatrimonial/fontes/SQL/GP_2045.sql | 66 ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ gestaoPatrimonial/fontes/SQL/GP_2046.sql | 34 ++++++++++++++++++++++++++++++++++ gestaoPatrimonial/fontes/SQL/GP_2047.sql | 134 ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ gestaoPatrimonial/fontes/SQL/GP_2050.sql | 2193 +++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ gestaoPrestacaoContas/fontes/PHP/TCEAL/instancias/configuracao/PRManterConfiguracaoOcorrenciaFuncional.php | 16 +++++++++------- gestaoPrestacaoContas/fontes/PHP/TCEAM/classes/mapeamento/TTCEAMRecibos.class.php | 3 +-- gestaoPrestacaoContas/fontes/PHP/TCEMG/classes/mapeamento/2013/TTCEMGRelatorioRazaoDespesa.class.php | 7 ++----- gestaoPrestacaoContas/fontes/PHP/TCEMG/classes/mapeamento/2014/TTCEMGRelatorioRazaoDespesa.class.php | 7 ++----- gestaoPrestacaoContas/fontes/PHP/TCEMG/classes/mapeamento/2015/FNTCEMGSiaceDespesaTotalPessoal.plsql | 188 -------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------- gestaoPrestacaoContas/fontes/PHP/TCEMG/classes/mapeamento/2015/TTCEMGAberturaLicitacao.class.php | 773 ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++----------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------- gestaoPrestacaoContas/fontes/PHP/TCEMG/classes/mapeamento/2015/TTCEMGCAIXA.class.php | 150 +++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++----------------------------------- gestaoPrestacaoContas/fontes/PHP/TCEMG/classes/mapeamento/2015/TTCEMGCTB.class.php | 1183 +++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------ gestaoPrestacaoContas/fontes/PHP/TCEMG/classes/mapeamento/2015/TTCEMGDispensaInexigibilidade.class.php | 1337 ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++--------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------- gestaoPrestacaoContas/fontes/PHP/TCEMG/classes/mapeamento/2015/TTCEMGExportacaoARC.class.php | 286 ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++---------------------------------------------------------------------------------------------------------------------------- gestaoPrestacaoContas/fontes/PHP/TCEMG/classes/mapeamento/2015/TTCEMGExtraOrcamentarias.class.php | 39 +++++++++++++++++++++++++++------------ gestaoPrestacaoContas/fontes/PHP/TCEMG/classes/mapeamento/2015/TTCEMGJulgamentoLicitacao.class.php | 382 +++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++--------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------- gestaoPrestacaoContas/fontes/PHP/TCEMG/classes/mapeamento/2015/TTCEMGLQD.class.php | 787 +++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------ gestaoPrestacaoContas/fontes/PHP/TCEMG/classes/mapeamento/2015/TTCEMGOPS.class.php | 284 ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++------------------------------------------------------------------------------------------------------------------------------------------ gestaoPrestacaoContas/fontes/PHP/TCEMG/classes/mapeamento/2015/TTCEMGRelatorioRazaoDespesa.class.php | 7 ++----- gestaoPrestacaoContas/fontes/PHP/TCEMG/classes/mapeamento/TTCEMGRelatorioDividaFlutuante.class.php | 8 +++++--- gestaoPrestacaoContas/fontes/PHP/TCEMG/classes/negocio/RTCEMGExportacaoArquivosPlanejamento.class.php | 6 +++--- gestaoPrestacaoContas/fontes/PHP/TCEMG/instancias/configuracao/FMManterExt.php | 2 +- gestaoPrestacaoContas/fontes/PHP/TCEMG/instancias/configuracao/FMManterRegistroPreco.php | 4 ++-- gestaoPrestacaoContas/fontes/PHP/TCEMG/instancias/configuracao/JSManterRegistroPreco.js | 3 ++- gestaoPrestacaoContas/fontes/PHP/TCEMG/instancias/configuracao/OCManterExt.php | 2 +- gestaoPrestacaoContas/fontes/PHP/TCEMG/instancias/configuracao/OCManterRegistroPreco.php | 20 +++++++++++--------- gestaoPrestacaoContas/fontes/PHP/TCEMG/instancias/configuracao/PRManterRegistroPreco.php | 173 ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++----------------------------------------------------------------------- gestaoPrestacaoContas/fontes/PHP/TCEMG/instancias/exportacao/OCExportarBalanceteContabil.php | 3 +-- gestaoPrestacaoContas/fontes/PHP/TCEMG/instancias/layout_arquivos/acompanhamentoMesal/2014/ARC.csv.inc.php | 9 ++++----- gestaoPrestacaoContas/fontes/PHP/TCEMG/instancias/layout_arquivos/acompanhamentoMesal/2014/CTB.csv.inc.php | 3 +-- gestaoPrestacaoContas/fontes/PHP/TCEMG/instancias/layout_arquivos/acompanhamentoMesal/2015/ARC.csv.inc.php | 9 ++++----- gestaoPrestacaoContas/fontes/PHP/TCEMG/instancias/layout_arquivos/acompanhamentoMesal/2015/CAIXA.csv.inc.php | 12 ++++++------ gestaoPrestacaoContas/fontes/PHP/TCEMG/instancias/layout_arquivos/acompanhamentoMesal/2015/CTB.csv.inc.php | 3 +-- gestaoPrestacaoContas/fontes/PHP/TCEMG/instancias/relatorios/OCRelatorioDividaFlutuante.php | 4 ++-- gestaoPrestacaoContas/fontes/PHP/TCEMS/instancias/configuracao/OCManterRGFAnexo1.php | 1 - gestaoPrestacaoContas/fontes/PHP/TCEMS/instancias/relatoriosMensais/OCGeraDemonstrativoRestosPagar.php | 4 ---- gestaoPrestacaoContas/fontes/PHP/TCEPB/instancias/configuracao/OCManterEmpenhoObras.php | 1 - gestaoPrestacaoContas/fontes/PHP/TCEPE/instancias/configuracao/PRManterTipoCredor.php | 1 - gestaoPrestacaoContas/fontes/PHP/TCEPE/instancias/layoutArquivos/EOF/SaldosContasContabeis.inc.php | 11 +++++------ gestaoPrestacaoContas/fontes/PHP/TCERJ/classes/mapeamento/TCRJConfiguracao.class.php | 315 ++------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------- gestaoPrestacaoContas/fontes/PHP/TCERJ/instancias/configuracao/FMManterAjustesEmpenho.php | 9 +++------ gestaoPrestacaoContas/fontes/PHP/TCERN/classes/mapeamento/TTRNANEXO42.class.php | 15 +++++---------- gestaoPrestacaoContas/fontes/PHP/TCERN/instancias/configuracao/FMManterConfiguracaoUnidadeOrcamentaria.php | 6 +----- gestaoPrestacaoContas/fontes/PHP/TCESC/instancias/exportacao/PRGeraArquivosEsfingeConcursos.php | 2 -- gestaoPrestacaoContas/fontes/PHP/TCESC/instancias/exportacao/PRGeraArquivosEsfingeContratos.php | 1 - gestaoPrestacaoContas/fontes/PHP/TCESC/instancias/exportacao/PRGeraArquivosEsfingeConvenios.php | 2 -- gestaoPrestacaoContas/fontes/PHP/TCESC/instancias/exportacao/PRGeraArquivosEsfingePlanoCargos.php | 1 - gestaoPrestacaoContas/fontes/PHP/TCESC/instancias/exportacao/PRGeraArquivosEsfingeRegContabeis.php | 173 ----------------------------------------------------------------------------------------------------------------------------------------------------------------------------- gestaoPrestacaoContas/fontes/PHP/TCMBA/classes/mapeamento/2015/TTBAAdCont.class.php | 162 ++++++++++++++++++++++++++++++------------------------------------------------------------------------------------------------------------------------------------ gestaoPrestacaoContas/fontes/PHP/TCMBA/classes/mapeamento/2015/TTBAAltOrc.class.php | 112 ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++-------------------- gestaoPrestacaoContas/fontes/PHP/TCMBA/classes/mapeamento/2015/TTBACertidoesContratos.class.php | 11 +++++++---- gestaoPrestacaoContas/fontes/PHP/TCMBA/classes/mapeamento/2015/TTBACombustivel.class.php | 26 ++++++++++++++++---------- gestaoPrestacaoContas/fontes/PHP/TCMBA/classes/mapeamento/2015/TTBAConsContRazao.class.php | 159 +++++++++++++++++++++++++++------------------------------------------------------------------------------------------------------------------------------------ gestaoPrestacaoContas/fontes/PHP/TCMBA/classes/mapeamento/2015/TTBADotTermoParc.class.php | 120 +++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++----------------------------------------------------------- gestaoPrestacaoContas/fontes/PHP/TCMBA/classes/mapeamento/2015/TTBAEditalCadastro.class.php | 5 +++-- gestaoPrestacaoContas/fontes/PHP/TCMBA/classes/mapeamento/2015/TTBAFiscalCadastro.class.php | 20 ++++++++------------ gestaoPrestacaoContas/fontes/PHP/TCMBA/classes/mapeamento/2015/TTBAObrasFiscais.class.php | 11 ++++++++--- gestaoPrestacaoContas/fontes/PHP/TCMBA/classes/mapeamento/2015/TTBAPagamento.class.php | 334 +++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++--------------------------------------------------------------------------------------------------------------------------------------------------------- gestaoPrestacaoContas/fontes/PHP/TCMBA/classes/mapeamento/2015/TTBAPagamentoRetencao.class.php | 263 ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++------------------------------------------------------------------------------------------------------------------------- gestaoPrestacaoContas/fontes/PHP/TCMBA/classes/mapeamento/2015/TTBAPagamentoRetencaoEmpresa.class.php | 175 ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++----------------------------------------------------------------------------------------------------------------- gestaoPrestacaoContas/fontes/PHP/TCMBA/classes/mapeamento/2015/TTBAResCont.class.php | 4 ++-- gestaoPrestacaoContas/fontes/PHP/TCMBA/classes/mapeamento/2015/TTBARetencao.class.php | 7 +++++-- gestaoPrestacaoContas/fontes/PHP/TCMBA/classes/mapeamento/2015/TTCMBACadastroObra.class.php | 10 +++++++--- gestaoPrestacaoContas/fontes/PHP/TCMBA/classes/mapeamento/2015/TTCMBAContrataMdo.class.php | 2 +- gestaoPrestacaoContas/fontes/PHP/TCMBA/classes/mapeamento/2015/TTCMBAContrato2.class.php | 18 +++++++++++++----- gestaoPrestacaoContas/fontes/PHP/TCMBA/classes/mapeamento/2015/TTCMBADocDiver.class.php | 180 +++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++----------------------------------------------------------------------------------- gestaoPrestacaoContas/fontes/PHP/TCMBA/classes/mapeamento/2015/TTCMBAEditPregaoElet.class.php | 131 +++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ gestaoPrestacaoContas/fontes/PHP/TCMBA/classes/mapeamento/2015/TTCMBAEditalDotacao.class.php | 177 +++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ gestaoPrestacaoContas/fontes/PHP/TCMBA/classes/mapeamento/2015/TTCMBAEditalEndereco.class.php | 45 ++++++++++++++++++++++----------------------- gestaoPrestacaoContas/fontes/PHP/TCMBA/classes/mapeamento/2015/TTCMBAFolhaPgt.class.php | 180 ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ gestaoPrestacaoContas/fontes/PHP/TCMBA/classes/mapeamento/2015/TTCMBALancExtraOrc.class.php | 277 ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++------------------------------------------------------------------------------------------------- gestaoPrestacaoContas/fontes/PHP/TCMBA/classes/mapeamento/2015/TTCMBAMovRestoPagar.class.php | 15 ++++++++++----- gestaoPrestacaoContas/fontes/PHP/TCMBA/classes/mapeamento/2015/TTCMBAObraMedicao.class.php | 12 ++++++++++-- gestaoPrestacaoContas/fontes/PHP/TCMBA/classes/mapeamento/2015/TTCMBAPatrimonio.class.php | 6 +++--- gestaoPrestacaoContas/fontes/PHP/TCMBA/classes/mapeamento/2015/TTCMBAPessoal.class.php | 296 ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ gestaoPrestacaoContas/fontes/PHP/TCMBA/classes/mapeamento/2015/TTCMBAProrrogParc.class.php | 2 +- gestaoPrestacaoContas/fontes/PHP/TCMBA/classes/mapeamento/2015/TTCMBARetencaoEmpresa.class.php | 74 +++++++++++++++++++++++++++++++++++++++++++++++++++++++------------------- gestaoPrestacaoContas/fontes/PHP/TCMBA/classes/mapeamento/2015/TTCMBASalario2.class.php | 266 ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ gestaoPrestacaoContas/fontes/PHP/TCMBA/classes/mapeamento/2015/TTCMBATermoCont.class.php | 15 +++++++++++++++ gestaoPrestacaoContas/fontes/PHP/TCMBA/classes/mapeamento/2015/TTCMBATermoParc.class.php | 13 ++++++++++++- gestaoPrestacaoContas/fontes/PHP/TCMBA/classes/mapeamento/TTCMBACargoServidor.class.php | 96 ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ gestaoPrestacaoContas/fontes/PHP/TCMBA/classes/mapeamento/TTCMBACargoServidorTemporario.class.php | 96 ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ gestaoPrestacaoContas/fontes/PHP/TCMBA/classes/mapeamento/TTCMBAEmprestimoConsignado.class.php | 133 +++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ gestaoPrestacaoContas/fontes/PHP/TCMBA/classes/mapeamento/TTCMBAFonteRecursoLocal.class.php | 92 ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ gestaoPrestacaoContas/fontes/PHP/TCMBA/classes/mapeamento/TTCMBAFonteRecursoLotacao.class.php | 131 +++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ gestaoPrestacaoContas/fontes/PHP/TCMBA/classes/mapeamento/TTCMBAFonteRecursoServidor.class.php | 96 ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ gestaoPrestacaoContas/fontes/PHP/TCMBA/classes/mapeamento/TTCMBAGratificacaoFuncao.class.php | 92 ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ gestaoPrestacaoContas/fontes/PHP/TCMBA/classes/mapeamento/TTCMBAObra.class.php | 4 ++-- gestaoPrestacaoContas/fontes/PHP/TCMBA/classes/mapeamento/TTCMBAObraMedicao.class.php | 4 +++- gestaoPrestacaoContas/fontes/PHP/TCMBA/classes/mapeamento/TTCMBAPlanoSaude.class.php | 92 ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ gestaoPrestacaoContas/fontes/PHP/TCMBA/classes/mapeamento/TTCMBASalarioBase.class.php | 92 ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ gestaoPrestacaoContas/fontes/PHP/TCMBA/classes/mapeamento/TTCMBASalarioDescontos.class.php | 92 ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ gestaoPrestacaoContas/fontes/PHP/TCMBA/classes/mapeamento/TTCMBASalarioFamilia.class.php | 92 ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ gestaoPrestacaoContas/fontes/PHP/TCMBA/classes/mapeamento/TTCMBASalarioHorasExtras.class.php | 92 ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ gestaoPrestacaoContas/fontes/PHP/TCMBA/classes/mapeamento/TTCMBATermoParceria.class.php | 75 +++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ gestaoPrestacaoContas/fontes/PHP/TCMBA/classes/mapeamento/TTCMBATermoParceriaDotacao.class.php | 63 +++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ gestaoPrestacaoContas/fontes/PHP/TCMBA/classes/mapeamento/TTCMBATermoParceriaProrrogacao.class.php | 70 ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ gestaoPrestacaoContas/fontes/PHP/TCMBA/classes/mapeamento/TTCMBATipoFuncaoServidor.class.php | 93 +++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ gestaoPrestacaoContas/fontes/PHP/TCMBA/classes/mapeamento/TTCMBATipoFuncaoServidorTemporario.class.php | 93 +++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ gestaoPrestacaoContas/fontes/PHP/TCMBA/classes/mapeamento/TTCMBAVantagensSalariais.class.php | 92 ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ gestaoPrestacaoContas/fontes/PHP/TCMBA/instancias/configuracao/FLManterConfiguracaoParcSubvOSCIP.php | 92 ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ gestaoPrestacaoContas/fontes/PHP/TCMBA/instancias/configuracao/FLManterConfiguracaoProrrogacaoTermo.php | 115 +++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ gestaoPrestacaoContas/fontes/PHP/TCMBA/instancias/configuracao/FLManterConfiguracaoTipoSalario.php | 100 ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ gestaoPrestacaoContas/fontes/PHP/TCMBA/instancias/configuracao/FLRelacionarLotacoesOrgaos.php | 88 ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ gestaoPrestacaoContas/fontes/PHP/TCMBA/instancias/configuracao/FMManterConfiguracaoObrasServicos.php | 33 +++++++++++++++++++++++++-------- gestaoPrestacaoContas/fontes/PHP/TCMBA/instancias/configuracao/FMManterConfiguracaoParcSubvOSCIP.php | 306 ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ gestaoPrestacaoContas/fontes/PHP/TCMBA/instancias/configuracao/FMManterConfiguracaoProrrogacaoTermo.php | 262 ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ gestaoPrestacaoContas/fontes/PHP/TCMBA/instancias/configuracao/FMManterConfiguracaoTipoSalario.php | 483 +++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ gestaoPrestacaoContas/fontes/PHP/TCMBA/instancias/configuracao/FMRelacionarLotacoesOrgaos.php | 159 +++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ gestaoPrestacaoContas/fontes/PHP/TCMBA/instancias/configuracao/JSManterConfiguracaoParcSubvOSCIP.js | 63 +++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ gestaoPrestacaoContas/fontes/PHP/TCMBA/instancias/configuracao/JSManterConfiguracaoProrrogacaoTermo.js | 49 +++++++++++++++++++++++++++++++++++++++++++++++++ gestaoPrestacaoContas/fontes/PHP/TCMBA/instancias/configuracao/LSManterConfiguracaoObrasServicos.php | 12 +++++++++--- gestaoPrestacaoContas/fontes/PHP/TCMBA/instancias/configuracao/OCManterConfiguracaoObrasServicos.php | 21 ++++++++++++++++++++- gestaoPrestacaoContas/fontes/PHP/TCMBA/instancias/configuracao/OCManterConfiguracaoParcSubvOSCIP.php | 455 +++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ gestaoPrestacaoContas/fontes/PHP/TCMBA/instancias/configuracao/OCManterConfiguracaoProrrogacaoTermo.php | 442 ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ gestaoPrestacaoContas/fontes/PHP/TCMBA/instancias/configuracao/OCManterConfiguracaoTipoSalario.php | 1208 ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ gestaoPrestacaoContas/fontes/PHP/TCMBA/instancias/configuracao/PRManterConfiguracaoObrasServicos.php | 4 +++- gestaoPrestacaoContas/fontes/PHP/TCMBA/instancias/configuracao/PRManterConfiguracaoParcSubvOSCIP.php | 216 ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ gestaoPrestacaoContas/fontes/PHP/TCMBA/instancias/configuracao/PRManterConfiguracaoProrrogacaoTermo.php | 106 ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ gestaoPrestacaoContas/fontes/PHP/TCMBA/instancias/configuracao/PRManterConfiguracaoTipoSalario.php | 368 ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ gestaoPrestacaoContas/fontes/PHP/TCMBA/instancias/configuracao/PRRelacionarLotacoesOrgaos.php | 118 ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ gestaoPrestacaoContas/fontes/PHP/TCMBA/instancias/exportacao/FLManterExportacao.php | 64 ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++-- gestaoPrestacaoContas/fontes/PHP/TCMBA/instancias/exportacao/LSExportacao.php | 109 ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++----------------------- gestaoPrestacaoContas/fontes/PHP/TCMBA/instancias/exportacao/OCManterExportacao.php | 30 +++++++++++++++++++++++++++++- gestaoPrestacaoContas/fontes/PHP/TCMBA/instancias/layout_arquivos/2015/AltOrc.inc.php | 190 ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++---------------------------------------------------------------------------------- gestaoPrestacaoContas/fontes/PHP/TCMBA/instancias/layout_arquivos/2015/CadastroObra.inc.php | 2 +- gestaoPrestacaoContas/fontes/PHP/TCMBA/instancias/layout_arquivos/2015/CertCont.inc.php | 6 +++--- gestaoPrestacaoContas/fontes/PHP/TCMBA/instancias/layout_arquivos/2015/ConsContRazao.inc.php | 21 +++++++++------------ gestaoPrestacaoContas/fontes/PHP/TCMBA/instancias/layout_arquivos/2015/ConsRecOrc.inc.php | 4 ++++ gestaoPrestacaoContas/fontes/PHP/TCMBA/instancias/layout_arquivos/2015/Contrato2.inc.php | 3 +-- gestaoPrestacaoContas/fontes/PHP/TCMBA/instancias/layout_arquivos/2015/DocDiver.inc.php | 24 ++++++++++++++++++------ gestaoPrestacaoContas/fontes/PHP/TCMBA/instancias/layout_arquivos/2015/EditPregaoElet.inc.php | 95 +++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ gestaoPrestacaoContas/fontes/PHP/TCMBA/instancias/layout_arquivos/2015/EditalCadastro.inc.php | 2 +- gestaoPrestacaoContas/fontes/PHP/TCMBA/instancias/layout_arquivos/2015/EditalDotacao.inc.php | 106 ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ gestaoPrestacaoContas/fontes/PHP/TCMBA/instancias/layout_arquivos/2015/FiscalCadastro.inc.php | 15 ++++++++------- gestaoPrestacaoContas/fontes/PHP/TCMBA/instancias/layout_arquivos/2015/FolhaPgt.inc.php | 96 ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ gestaoPrestacaoContas/fontes/PHP/TCMBA/instancias/layout_arquivos/2015/ObraMedicao.inc.php | 10 +++++++++- gestaoPrestacaoContas/fontes/PHP/TCMBA/instancias/layout_arquivos/2015/PagEmp2.inc.php | 174 ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++------------------------------------------------------------------------ gestaoPrestacaoContas/fontes/PHP/TCMBA/instancias/layout_arquivos/2015/PagRetEmpres.inc.php | 231 +++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++---------------------------------------------------------------------------------------------------- gestaoPrestacaoContas/fontes/PHP/TCMBA/instancias/layout_arquivos/2015/PagRetencao.inc.php | 65 ++++++++++++++++++++++++++++++++++++++++++++++++----------------- gestaoPrestacaoContas/fontes/PHP/TCMBA/instancias/layout_arquivos/2015/Patrimonio.inc.php | 9 +++++++-- gestaoPrestacaoContas/fontes/PHP/TCMBA/instancias/layout_arquivos/2015/Pessoal.inc.php | 231 +++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ gestaoPrestacaoContas/fontes/PHP/TCMBA/instancias/layout_arquivos/2015/Salario2.inc.php | 316 ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ gestaoPrestacaoContas/fontes/PHP/TCMGO/classes/mapeamento/TTGOALQ.class.php | 15 ++++++--------- gestaoPrestacaoContas/fontes/PHP/TCMGO/classes/mapeamento/TTGOTFR.class.php | 6 ++---- gestaoPrestacaoContas/fontes/PHP/TCMGO/classes/mapeamento/TTGOTRB.class.php | 4 ---- gestaoPrestacaoContas/fontes/PHP/TCMGO/instancias/configuracao/OCManterObra.php | 4 +--- gestaoPrestacaoContas/fontes/PHP/TCMGO/instancias/configuracao/OCManterOrgao.php | 3 +-- gestaoPrestacaoContas/fontes/PHP/TCMGO/instancias/configuracao/PRManterContrato.php | 2 -- gestaoPrestacaoContas/fontes/PHP/TCMGO/instancias/exportacao/CONArq.inc.php | 4 +--- gestaoPrestacaoContas/fontes/PHP/TCMGO/instancias/exportacao/EMP.inc.php | 4 +--- gestaoPrestacaoContas/fontes/PHP/TCMPA/classes/mapeamento/bkp_configuraCargoSituacaoFuncional.php | 1 - gestaoPrestacaoContas/fontes/PLPGSQL/TCEMG/FNTCEMGSiaceDespesaTotalPessoal.plsql | 188 ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ gestaoPrestacaoContas/fontes/PLPGSQL/TCEMG/FTCEMGArquivoEXTRegistro20.plsql | 58 ++++++++++++++++++++++++++++++++++------------------------ gestaoPrestacaoContas/fontes/PLPGSQL/TCEMG/FTCEMGBalanceteContabil12.plsql | 49 +++++++++++++++++++++++++++++++++++++++++++++---- gestaoPrestacaoContas/fontes/PLPGSQL/TCEMG/TCEMGContasCTB.plsql | 211 ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++--------------------------------------------------------------------------------------------------------------------------- gestaoPrestacaoContas/fontes/PLPGSQL/TCEMG/TCEMGRelatorioDividaFlutuanteDepositos.plsql | 3 ++- gestaoPrestacaoContas/fontes/PLPGSQL/TCMBA/FTCMBADemonstrativoConsolidadoReceita.plsql | 7 +++---- gestaoPrestacaoContas/fontes/PLPGSQL/TCMBA/FTCMBARecuperaAtosDePessoalTCMBA.plsql | 382 ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ gestaoPrestacaoContas/fontes/PLPGSQL/TCMBA/FTCMBARecuperaSalario2.plsql | 958 ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ gestaoPrestacaoContas/fontes/PLPGSQL/TCMBA/FTCMBARecuperaServidorConsignado.plsql | 306 ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ gestaoPrestacaoContas/fontes/PLPGSQL/TCMBA/FTCMBARecuperaServidorValoresPorEvento.plsql | 106 ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ gestaoPrestacaoContas/fontes/PLPGSQL/TCMBA/FTCMBARecuperaServidorValoresPorEventoDecimo.plsql | 169 +++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ gestaoPrestacaoContas/fontes/PLPGSQL/TCMBA/FTCMBARecuperaServidorValoresPorEventoFerias.plsql | 159 +++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ gestaoPrestacaoContas/fontes/PLPGSQL/TCMBA/FTCMBARecuperaServidorValoresPorEventoPensao.plsql | 161 +++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ gestaoPrestacaoContas/fontes/PLPGSQL/TCMBA/TCMBAConsContRazao.plsql | 229 +++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ gestaoPrestacaoContas/fontes/SQL/GPC_2043.sql | 19 +++++++++++-------- gestaoPrestacaoContas/fontes/SQL/GPC_2044.sql | 503 +++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ gestaoRH/fontes/PHP/IMA/classes/mapeamento/TIMAConfiguracaoConvenioCaixaEconomicaFederal.class.php | 1 + gestaoRH/fontes/PHP/IMA/instancias/configuracao/FMExportacaoBancoCaixaEconomicaFederal.php | 24 +++++++++++++++++++++--- gestaoRH/fontes/PHP/IMA/instancias/configuracao/OCConfiguracaoBradesco.php | 26 +++++++++++++------------- gestaoRH/fontes/PHP/IMA/instancias/configuracao/OCConfiguracaoPASEP.php | 32 ++++++++++++++++---------------- gestaoRH/fontes/PHP/IMA/instancias/configuracao/OCExportacaoBancoCaixaEconomicaFederal.php | 49 +++++++++++++++++++++++++++---------------------- gestaoRH/fontes/PHP/IMA/instancias/configuracao/PRExportacaoBancoCaixaEconomicaFederal.php | 70 +++++++++++++++++++++++++++++++++++++++++----------------------------- gestaoRH/fontes/PHP/IMA/instancias/consignacao/OCCreditoBanrisul.php | 1 - gestaoRH/fontes/PHP/IMA/instancias/exportarPagamentos/FLExportarRemessaCaixaEconomicaFederal.php | 116 ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++---------------------------------------------------------- gestaoRH/fontes/PHP/IMA/instancias/exportarPagamentos/OCExportarBradesco.php | 1 - gestaoRH/fontes/PHP/IMA/instancias/exportarPagamentos/OCExportarRemessaBanrisul.php | 12 +----------- gestaoRH/fontes/PHP/IMA/instancias/exportarPagamentos/OCExportarRemessaCaixaEconomicaFederal.php | 210 ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++------------------------------------------------------------------------------------------------------------ gestaoRH/fontes/PHP/IMA/instancias/exportarPagamentos/PRExportarRemessaBanrisul.php | 3 +-- gestaoRH/fontes/PHP/IMA/instancias/exportarPagamentos/PRExportarRemessaCaixaEconomicaFederal.php | 991 +++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------ gestaoRH/fontes/PHP/IMA/instancias/pasep/PRExportarPASEP.php | 3 +-- gestaoRH/fontes/PHP/calendario/instancias/calendario/PRManterCalendario.php | 3 --- gestaoRH/fontes/PHP/diarias/instancias/concessao/OCConcederDiarias.php | 5 +---- gestaoRH/fontes/PHP/diarias/instancias/configuracao/OCTipoDiarias.php | 3 +-- gestaoRH/fontes/PHP/estagio/instancias/relatorios/PRReciboPagamento.php | 4 +--- gestaoRH/fontes/PHP/folhaPagamento/classes/componentes/IBscEvento.class.php | 1 + gestaoRH/fontes/PHP/folhaPagamento/classes/mapeamento/TFolhaPagamentoConcessaoDecimo.class.php | 67 +++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ gestaoRH/fontes/PHP/folhaPagamento/classes/negocio/RFolhaPagamentoCalcularFolhas.class.php | 300 ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ gestaoRH/fontes/PHP/folhaPagamento/classes/negocio/RFolhaPagamentoPeriodoMovimentacao.class.php | 291 ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++- gestaoRH/fontes/PHP/folhaPagamento/instancias/IRRF/OCManterTabelaIRRF.php | 1 - gestaoRH/fontes/PHP/folhaPagamento/instancias/configuracao/FMManterConfiguracaoDecimo.php | 45 ++++++++++++++++++++++++++++++++++++++++++++- gestaoRH/fontes/PHP/folhaPagamento/instancias/configuracao/FMManterConfiguracaoEventosAutomaticos.php | 104 ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ gestaoRH/fontes/PHP/folhaPagamento/instancias/configuracao/OCManterConfiguracaoEventosAutomaticos.php | 191 +++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ gestaoRH/fontes/PHP/folhaPagamento/instancias/configuracao/PRManterConfiguracaoDecimo.php | 55 +++++++++++++++++++++++++++++++++++-------------------- gestaoRH/fontes/PHP/folhaPagamento/instancias/configuracao/PRManterConfiguracaoEventosAutomaticos.php | 85 +++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ gestaoRH/fontes/PHP/folhaPagamento/instancias/decimo/FMManterRegistroEventoDecimo.php | 5 +++-- gestaoRH/fontes/PHP/folhaPagamento/instancias/decimo/OCManterRegistroEventoDecimo.php | 142 ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++---------------------------------------- gestaoRH/fontes/PHP/folhaPagamento/instancias/evento/FMManterEventoAbaSalario.php | 23 ----------------------- gestaoRH/fontes/PHP/folhaPagamento/instancias/movimentacaoFinanceira/FLConsultarRegistroEvento.php | 22 +++++++++++----------- gestaoRH/fontes/PHP/folhaPagamento/instancias/movimentacaoFinanceira/OCConsultarFichaFinanceira.php | 7 +++---- gestaoRH/fontes/PHP/folhaPagamento/instancias/movimentacaoFinanceira/OCManterRegistroEvento.php | 445 ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++----------------------------------------------------------------------------------------------------- gestaoRH/fontes/PHP/folhaPagamento/instancias/movimentacaoFinanceira/PRConsultarRegistroEvento.php | 21 ++++++++++++--------- gestaoRH/fontes/PHP/folhaPagamento/instancias/relatorio/PREmitirTermoRescisao.php | 2 +- gestaoRH/fontes/PHP/folhaPagamento/instancias/relatorio/PRRelatorioAuditoriaFolha.php | 1 - gestaoRH/fontes/PHP/folhaPagamento/instancias/relatorio/PRRelatorioCreditosBanco.php | 2 -- gestaoRH/fontes/PHP/folhaPagamento/instancias/rotinaMensal/FMManterPeriodoMovimentacao.php | 19 +++++++++---------- gestaoRH/fontes/PHP/folhaPagamento/instancias/rotinaMensal/FMReajustesSalariais.php | 16 ++++++++-------- gestaoRH/fontes/PHP/folhaPagamento/instancias/rotinaMensal/LSReajustesSalariais.php | 17 +++++++++-------- gestaoRH/fontes/PHP/folhaPagamento/instancias/rotinaMensal/PRManterPeriodoMovimentacao.php | 37 +++++++++++++++++-------------------- gestaoRH/fontes/PHP/folhaPagamento/instancias/rotinaMensal/PRReajustesSalariais.php | 4 ++-- gestaoRH/fontes/PHP/folhaPagamento/popups/movimentacaoFinanceira/FRConsultarFichaFinanceira.php | 7 +++++-- gestaoRH/fontes/PHP/folhaPagamento/popups/movimentacaoFinanceira/OCConsultarFichaFinanceira.php | 7 ++++--- gestaoRH/fontes/PHP/pessoal/classes/componentes/IContratoDigitoVerificador.class.php | 4 ++++ gestaoRH/fontes/PHP/pessoal/classes/mapeamento/TPessoalAssentamentoGerado.class.php | 14 +++++++------- gestaoRH/fontes/PHP/pessoal/classes/mapeamento/TPessoalAssentamentoGeradoNorma.class.php | 22 +++++++--------------- gestaoRH/fontes/PHP/pessoal/classes/mapeamento/TPessoalAtributoContratoServidorValor.class.php | 12 ++++++------ gestaoRH/fontes/PHP/pessoal/classes/mapeamento/TPessoalClassificacaoAssentamento.class.php | 1 - gestaoRH/fontes/PHP/pessoal/classes/mapeamento/TPessoalDeParaLotacaoOrgaoTCMBA.class.php | 57 +++++++++++++++++++++++++++++++++++++++++++++++++++++++++ gestaoRH/fontes/PHP/pessoal/classes/mapeamento/TPessoalServidor.class.php | 26 +++++++++++++------------- gestaoRH/fontes/PHP/pessoal/classes/negocio/RPessoalCargo.class.php | 4 ++-- gestaoRH/fontes/PHP/pessoal/classes/negocio/RPessoalDependente.class.php | 15 +++++++++------ gestaoRH/fontes/PHP/pessoal/classes/negocio/RPessoalServidor.class.php | 12 +++++++++++- gestaoRH/fontes/PHP/pessoal/instancias/adidosCedidos/FLManterAdidoCedido.php | 6 +++--- gestaoRH/fontes/PHP/pessoal/instancias/adidosCedidos/FMManterAdidoCedido.php | 69 +++++++++++++++++++++++++++++++++++++++------------------------------ gestaoRH/fontes/PHP/pessoal/instancias/adidosCedidos/OCManterAdidoCedido.php | 25 ++++++++++++++++++------- gestaoRH/fontes/PHP/pessoal/instancias/adidosCedidos/PRManterAdidoCedido.php | 2 +- gestaoRH/fontes/PHP/pessoal/instancias/cargo/OCManterCargo.php | 3 --- gestaoRH/fontes/PHP/pessoal/instancias/ferias/FLEmitirAvisoFerias.php | 1 + gestaoRH/fontes/PHP/pessoal/instancias/ferias/FLManterCadastroFerias.php | 6 +++--- gestaoRH/fontes/PHP/pessoal/instancias/ferias/FMManterCadastroFerias.php | 111 +++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++---------------------------------------------- gestaoRH/fontes/PHP/pessoal/instancias/ferias/LSManterCadastroFeriasLote.php | 20 +++++++++++++++++++- gestaoRH/fontes/PHP/pessoal/instancias/ferias/OCManterCadastroFerias.php | 43 ++++++++++++++++++++++++++++++------------- gestaoRH/fontes/PHP/pessoal/instancias/processamento/OCFiltroCGM.php | 23 +++++++++++++++++------ gestaoRH/fontes/PHP/pessoal/instancias/processamento/OCIFiltroAtributoDinamico.php | 23 +++++++++++++---------- gestaoRH/fontes/PHP/pessoal/instancias/processamento/OCIFiltroComponentes.php | 14 +++++++++----- gestaoRH/fontes/PHP/pessoal/instancias/relatorio/OCDefinivelServidor.php | 41 +++++++++++++++++++++++++++++------------ gestaoRH/fontes/PHP/pessoal/instancias/relatorio/PRDefinivelServidor.php | 82 +++++++++++++++++++++++++++++++++++++++++++++------------------------------------- gestaoRH/fontes/PHP/pessoal/instancias/servidor/FMManterServidor.php | 7 +++++-- gestaoRH/fontes/PHP/pessoal/instancias/servidor/PRManterServidor.php | 298 +++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++----------------------------------------------------------------------------------------------------------------------------------------------------- gestaoRH/fontes/PHP/pessoal/popups/cargo/PRInserirCBO.php | 57 ++++++++++++++++++++++++++++++++++++--------------------- gestaoRH/fontes/PHP/pessoal/popups/servidor/FLProcurarCgm.php | 7 ++++++- gestaoRH/fontes/PHP/pessoal/popups/servidor/LSProcurarCgm.php | 68 +++++++++++++++++++++++++++++++------------------------------------- gestaoRH/fontes/PHP/pessoal/popups/servidor/LSProcurarMatricula.php | 21 +++++++++++++++------ gestaoRH/fontes/PHP/ponto/instancias/manutencao/LSManterPonto.php | 1 - gestaoRH/fontes/PHP/ponto/instancias/manutencao/PRManterPonto.php | 3 +-- gestaoRH/fontes/PLPGSQL/folhaPagamento/FolhaRescisao/processarSomatorioDeducoesRescisao.plsql | 2 +- gestaoRH/fontes/PLPGSQL/folhaPagamento/RotinaMensal/abrirPeriodoMovimentacao.plsql | 197 +++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++-- gestaoRH/fontes/PLPGSQL/pessoal/cargo/recuperaCargoAcumuladoServidor.plsql | 91 +++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ gestaoRH/fontes/PLPGSQL/pessoal/relatorio/definivelServidor.plsql | 6 +++--- gestaoRH/fontes/PLPGSQL/pessoal/servidor/recuperarContratoServidor.plsql | 2 +- gestaoRH/fontes/RPT/pessoal/report/design/definivelServidor.rptdesign | 189 ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++------------------------------------------------------------------------------------------------- gestaoRH/fontes/SQL/GRH_2044.sql | 52 ++++++++++++++++++++++++++++++++++++++++++++++++++++ gestaoRH/fontes/SQL/GRH_2045.sql | 79 +++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ gestaoTributaria/fontes/PHP/arrecadacao/classes/boletos/RCarneDiversosCanaa.class.php | 13 +------------ gestaoTributaria/fontes/PHP/arrecadacao/classes/boletos/RCarneDiversosMarianaPimentel.class.php | 24 ++++++++++++++++++------ gestaoTributaria/fontes/PHP/arrecadacao/classes/boletos/RCarneDiversosMataSaoJoao2010.class.php | 2 +- gestaoTributaria/fontes/PHP/arrecadacao/classes/boletos/RCarneDiversosMataSaoJoao2011.class.php | 2 +- gestaoTributaria/fontes/PHP/arrecadacao/classes/boletos/RCarneDiversosUrbem.class.php | 11 ----------- gestaoTributaria/fontes/PHP/arrecadacao/classes/boletos/RCarneDividaMataSaoJoao.class.php | 13 ++----------- gestaoTributaria/fontes/PHP/arrecadacao/classes/boletos/RCarneDividaMataSaoJoao2010.class.php | 1 - gestaoTributaria/fontes/PHP/arrecadacao/classes/boletos/RCarneDividaRefis2009MataSaoJoao.class.php | 11 +---------- gestaoTributaria/fontes/PHP/arrecadacao/classes/boletos/RCarneIPTUMataSaoJoao2016.class.php | 2937 +++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ gestaoTributaria/fontes/PHP/arrecadacao/classes/boletos/RCarneISSVariavelCanaa.class.php | 17 +---------------- gestaoTributaria/fontes/PHP/arrecadacao/classes/boletos/RCarneITBICanaa.class.php | 18 ++---------------- gestaoTributaria/fontes/PHP/arrecadacao/classes/boletos/RCarneItbiUrbem.class.php | 14 -------------- gestaoTributaria/fontes/PHP/arrecadacao/classes/boletos/RCarneTFFMataSaoJoao2016.class.php | 1729 +++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ gestaoTributaria/fontes/PHP/arrecadacao/classes/boletos/RCodigoBarraFichaCompensacaoCaixa.class.php | 2 -- gestaoTributaria/fontes/PHP/arrecadacao/classes/mapeamento/FARRListaEmissaoGrafica.class.php | 13 ++++++++----- gestaoTributaria/fontes/PHP/arrecadacao/classes/mapeamento/FARRMontaCarneGrafica.class.php | 330 +++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++--------------------------------------------------------------------------------------------------------------------------------------------------------------------- gestaoTributaria/fontes/PHP/arrecadacao/classes/mapeamento/TARRCadastroEconomicoCalculo.class.php | 3 +-- gestaoTributaria/fontes/PHP/arrecadacao/classes/mapeamento/TARRCarne.class.php | 3 +-- gestaoTributaria/fontes/PHP/arrecadacao/classes/negocio/RARRCalculo.class.php | 12 +----------- gestaoTributaria/fontes/PHP/arrecadacao/classes/negocio/RARRRelatorioValoresLancados.class.php | 10 +--------- gestaoTributaria/fontes/PHP/arrecadacao/instancias/baixaDebitos/FMManterBaixaManual.php | 3 +-- gestaoTributaria/fontes/PHP/arrecadacao/instancias/baixaDebitos/FMResumoBaixaAutomatica.php | 3 +-- gestaoTributaria/fontes/PHP/arrecadacao/instancias/baixaDebitos/LSManterCompensacao.php | 4 +--- gestaoTributaria/fontes/PHP/arrecadacao/instancias/baixaDebitos/LSManterFechamentoBaixaManual.php | 3 +-- gestaoTributaria/fontes/PHP/arrecadacao/instancias/baixaDebitos/OCEstornarBaixaManual.php | 5 ++--- gestaoTributaria/fontes/PHP/arrecadacao/instancias/baixaDebitos/OCGeraRelatorioResumoLote.php | 13 ++----------- gestaoTributaria/fontes/PHP/arrecadacao/instancias/baixaDebitos/OCManterBaixaManual.php | 6 ++---- gestaoTributaria/fontes/PHP/arrecadacao/instancias/baixaDebitos/OCManterCancelamento.php | 4 +--- gestaoTributaria/fontes/PHP/arrecadacao/instancias/baixaDebitos/OCManterCompensacao.php | 4 +--- gestaoTributaria/fontes/PHP/arrecadacao/instancias/calculo/FMEmitirNotaAvulsa.php | 2 -- gestaoTributaria/fontes/PHP/arrecadacao/instancias/calculo/OCManterNotaAvulsa.php | 5 ----- gestaoTributaria/fontes/PHP/arrecadacao/instancias/calculo/PRManterCalculo.php | 8 +++++--- gestaoTributaria/fontes/PHP/arrecadacao/instancias/calculo/PRManterNotaAvulsa.php | 10 +--------- gestaoTributaria/fontes/PHP/arrecadacao/instancias/calculo/PRReterFonte.php | 6 +----- gestaoTributaria/fontes/PHP/arrecadacao/instancias/calendarioFiscal/OCManterVencimentos.php | 5 +---- gestaoTributaria/fontes/PHP/arrecadacao/instancias/configuracao/OCManterLayoutCarne.php | 1 - gestaoTributaria/fontes/PHP/arrecadacao/instancias/consultas/FMConsultaArrecadacao.php | 9 +-------- gestaoTributaria/fontes/PHP/arrecadacao/instancias/consultas/FMConsultaArrecadacaoDetalheParcela.php | 31 ++----------------------------- gestaoTributaria/fontes/PHP/arrecadacao/instancias/consultas/OCConsultaArrecadacao.php | 14 ++------------ gestaoTributaria/fontes/PHP/arrecadacao/instancias/consultas/OCConsultarLote.php | 3 +-- gestaoTributaria/fontes/PHP/arrecadacao/instancias/desoneracao/OCManterDesoneracao.php | 4 +--- gestaoTributaria/fontes/PHP/arrecadacao/instancias/documentos/OCEmitirCarne.php | 6 +++++- gestaoTributaria/fontes/PHP/arrecadacao/instancias/documentos/OCEmitirCarneIPTUDesoneradoMata.php | 1 - gestaoTributaria/fontes/PHP/arrecadacao/instancias/documentos/OCEmitirDocumento.php | 5 +---- gestaoTributaria/fontes/PHP/arrecadacao/instancias/documentos/PREmitirCarne.php | 120 +++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++------------------------------- gestaoTributaria/fontes/PHP/arrecadacao/instancias/grupoCreditos/OCManterGrupo.php | 3 +-- gestaoTributaria/fontes/PHP/arrecadacao/instancias/grupoCreditos/OCManterPermissoes.php | 6 +++--- gestaoTributaria/fontes/PHP/arrecadacao/instancias/grupoCreditos/PRManterGrupo.php | 3 +-- gestaoTributaria/fontes/PHP/arrecadacao/instancias/movimentacoes/PRPermissaoAvaliarImovel.php | 3 +-- gestaoTributaria/fontes/PHP/arrecadacao/instancias/parcelamento/FMParcelarCreditos.php | 4 +--- gestaoTributaria/fontes/PHP/arrecadacao/instancias/parcelamento/FMParcelarCreditosParcelamento.php | 4 +--- gestaoTributaria/fontes/PHP/arrecadacao/instancias/parcelamento/OCParcelarCreditos.php | 5 ++--- gestaoTributaria/fontes/PHP/arrecadacao/instancias/parcelamento/PRParcelarCreditos.php | 4 +--- gestaoTributaria/fontes/PHP/arrecadacao/instancias/relatorios/FMExtratoDebito.php | 3 +-- gestaoTributaria/fontes/PHP/arrecadacao/instancias/relatorios/OCGeraRelatorioExtratoDebitos.php | 3 +-- gestaoTributaria/fontes/PHP/arrecadacao/instancias/relatorios/OCRelatorioLancamentoAutomatico.php | 3 ++- gestaoTributaria/fontes/PHP/arrecadacao/instancias/relatorios/OCRelatorioValoresLancados.php | 3 +-- gestaoTributaria/fontes/PHP/arrecadacao/instancias/relatorios/OCResumoLotes.php | 3 +-- gestaoTributaria/fontes/PHP/arrecadacao/instancias/suspensao/LSManterSuspencao.php | 3 +-- gestaoTributaria/fontes/PHP/arrecadacao/instancias/tipoBaixaManual/PRManterTipoPagamento.php | 3 +-- gestaoTributaria/fontes/PHP/arrecadacao/instancias/tipoSuspensao/FMManterTipoSuspensao.php | 3 +-- gestaoTributaria/fontes/PHP/arrecadacao/popups/desoneracao/LSProcurarDesoneracao.php | 4 +--- gestaoTributaria/fontes/PHP/cadastroEconomico/anexos/alvara/alvara_atividade_MARIANA.odt | Bin 48235 -> 0 bytes gestaoTributaria/fontes/PHP/cadastroEconomico/anexos/alvara/alvara_atividade_sanitario_MARIANA.odt | Bin 32787 -> 0 bytes gestaoTributaria/fontes/PHP/cadastroEconomico/anexos/alvara/alvara_horario_especial_MARIANA.odt | Bin 47989 -> 0 bytes gestaoTributaria/fontes/PHP/cadastroEconomico/anexos/alvara/alvara_horario_especial_sanitario_MARIANA.odt | Bin 34356 -> 0 bytes gestaoTributaria/fontes/PHP/cadastroEconomico/classes/componentes/ITextLicenca.class.php | 3 +-- gestaoTributaria/fontes/PHP/cadastroEconomico/classes/componentes/MontaAtividade.class.php | 10 +++------- gestaoTributaria/fontes/PHP/cadastroEconomico/classes/mapeamento/TCEMCadastroEconomicoEmpresaDireito.class.php | 3 +-- gestaoTributaria/fontes/PHP/cadastroEconomico/classes/negocio/RCEMLicencaDiversa.class.php | 4 +--- gestaoTributaria/fontes/PHP/cadastroEconomico/classes/negocio/RCEMTipoLicencaUsoSolo.class.php | 11 ++--------- gestaoTributaria/fontes/PHP/cadastroEconomico/instancias/categoria/LSManterCategoria.php | 4 +--- gestaoTributaria/fontes/PHP/cadastroEconomico/instancias/categoria/PRManterCategoria.php | 4 +--- gestaoTributaria/fontes/PHP/cadastroEconomico/instancias/consultas/FMConsultarLicenca.php | 3 +-- gestaoTributaria/fontes/PHP/cadastroEconomico/instancias/consultas/OCConsultarCadastroEconomico.php | 4 +--- gestaoTributaria/fontes/PHP/cadastroEconomico/instancias/emissao/LSManterEmissaoImobiliaria.php | 4 ---- gestaoTributaria/fontes/PHP/cadastroEconomico/instancias/inscreconomica/FMDefinirAtividades.php | 3 +-- gestaoTributaria/fontes/PHP/cadastroEconomico/instancias/inscreconomica/FMManterInscricao.php | 3 +-- gestaoTributaria/fontes/PHP/cadastroEconomico/instancias/inscreconomica/FMManterInscricaoConvFD.php | 4 +--- gestaoTributaria/fontes/PHP/cadastroEconomico/instancias/inscreconomica/OCDefinirAtividades.php | 4 +--- gestaoTributaria/fontes/PHP/cadastroEconomico/instancias/inscreconomica/OCDefinirElementos.php | 4 +--- gestaoTributaria/fontes/PHP/cadastroEconomico/instancias/inscreconomica/PRDefinirElementos.php | 8 +------- gestaoTributaria/fontes/PHP/cadastroEconomico/instancias/licenca/FMAlterarLicencaGeralTipo.php | 3 +-- gestaoTributaria/fontes/PHP/cadastroEconomico/instancias/licenca/FMConcederLicencaGeralUsoSolo.php | 3 +-- gestaoTributaria/fontes/PHP/cadastroEconomico/instancias/licenca/LSLicencaGeral.php | 4 +--- gestaoTributaria/fontes/PHP/cadastroEconomico/instancias/licenca/OCConcederLicencaGeral.php | 7 +------ gestaoTributaria/fontes/PHP/cadastroEconomico/instancias/licenca/OCConcederLicencaGeralTipo.php | 11 ++--------- gestaoTributaria/fontes/PHP/cadastroEconomico/instancias/licenca/OCConcederLicencaGeralUsoSolo.php | 6 +----- gestaoTributaria/fontes/PHP/cadastroEconomico/instancias/licenca/PRConcederLicencaGeral.php | 5 +---- gestaoTributaria/fontes/PHP/cadastroEconomico/instancias/licenca/PRConcederLicencaGeral.php.bak | 34 ---------------------------------- gestaoTributaria/fontes/PHP/cadastroEconomico/instancias/licenca/PRConcederLicencaGeral.php.old | 332 -------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------- gestaoTributaria/fontes/PHP/cadastroEconomico/instancias/natjuridica/LSManterNatureza.php | 3 +-- gestaoTributaria/fontes/PHP/cadastroEconomico/instancias/relatorios/OCContadores.php | 3 +-- gestaoTributaria/fontes/PHP/cadastroEconomico/instancias/relatorios/OCGeraRelatorioCadastroEconomico.php | 4 +--- gestaoTributaria/fontes/PHP/cadastroEconomico/instancias/resptecnico/FMManterResponsavelAlteracao.php | 3 +-- gestaoTributaria/fontes/PHP/cadastroEconomico/instancias/resptecnico/FMManterResponsavelInclusao.php | 3 +-- gestaoTributaria/fontes/PHP/cadastroEconomico/instancias/resptecnico/LSManterResponsavel.php | 3 +-- gestaoTributaria/fontes/PHP/cadastroEconomico/instancias/servico/FMManterServicoNivel.php | 4 +--- gestaoTributaria/fontes/PHP/cadastroEconomico/instancias/servico/PRManterServico.php | 5 +---- gestaoTributaria/fontes/PHP/cadastroEconomico/instancias/tiplicenca/LSManterTipoLicenca.php | 3 +-- gestaoTributaria/fontes/PHP/cadastroEconomico/popups/cnae/OCProcurarCnae.php | 4 +--- gestaoTributaria/fontes/PHP/cadastroImobiliario/classes/componentes/MontaLocalizacao.class.php | 23 +++-------------------- gestaoTributaria/fontes/PHP/cadastroImobiliario/classes/componentes/MontaLocalizacaoCombos.class.php | 46 ++++++++++++++++++++++------------------------ gestaoTributaria/fontes/PHP/cadastroImobiliario/classes/mapeamento/VCIMLocalizacaoAtiva.class.php | 21 ++++++++++++++++++++- gestaoTributaria/fontes/PHP/cadastroImobiliario/classes/negocio/RCIMLocalizacao.class.php | 103 ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++--------------------------- gestaoTributaria/fontes/PHP/cadastroImobiliario/classes/negocio/RCIMLogradouro.class.php | 33 ++++++++++++++++++++++----------- gestaoTributaria/fontes/PHP/cadastroImobiliario/classes/negocio/RCIMNivel.class.php | 12 ++---------- gestaoTributaria/fontes/PHP/cadastroImobiliario/classes/negocio/RCIMRelatorioBairros.class.php | 4 +--- gestaoTributaria/fontes/PHP/cadastroImobiliario/classes/negocio/RCIMTransferencia.class.php | 6 +----- gestaoTributaria/fontes/PHP/cadastroImobiliario/instancias/consultas/OCCadastroImobiliario.php | 13 +------------ gestaoTributaria/fontes/PHP/cadastroImobiliario/instancias/hierarquia/PRManterHierarquia.php | 3 +-- gestaoTributaria/fontes/PHP/cadastroImobiliario/instancias/licencas/OCManterEmissaoImobiliaria.php | 1 - gestaoTributaria/fontes/PHP/cadastroImobiliario/instancias/localizacao/FLManterLocalizacao.php | 14 ++++---------- gestaoTributaria/fontes/PHP/cadastroImobiliario/instancias/localizacao/FMManterLocalizacao.php | 11 +++++++---- gestaoTributaria/fontes/PHP/cadastroImobiliario/instancias/localizacao/FMManterLocalizacaoNivel.php | 109 +++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++------------------------------------------------ gestaoTributaria/fontes/PHP/cadastroImobiliario/instancias/localizacao/JSManterLocalizacao.js | 14 ++------------ gestaoTributaria/fontes/PHP/cadastroImobiliario/instancias/localizacao/LSManterLocalizacao.php | 57 ++++++++++++++++++++++++++------------------------------- gestaoTributaria/fontes/PHP/cadastroImobiliario/instancias/localizacao/OCManterLocalizacao.php | 6 ++---- gestaoTributaria/fontes/PHP/cadastroImobiliario/instancias/localizacao/PRManterLocalizacao.php | 59 +++++++++++++++++++++++++++++++++-------------------------- gestaoTributaria/fontes/PHP/cadastroImobiliario/instancias/parametros/FMManterConfiguracao.php | 13 ++++++++----- gestaoTributaria/fontes/PHP/cadastroImobiliario/instancias/relatorios/OCBairros.php | 5 +---- gestaoTributaria/fontes/PHP/cadastroImobiliario/instancias/relatorios/OCCondominios.php | 4 +--- gestaoTributaria/fontes/PHP/cadastroImobiliario/instancias/relatorios/OCGeraRelatorioCadastroImobiliarioBoletim.php | 8 ++++---- gestaoTributaria/fontes/PHP/cadastroImobiliario/popups/bairroSistema/OCProcurarBairro.php | 4 +--- gestaoTributaria/fontes/PHP/cadastroImobiliario/popups/localizacao/FLBuscaLocalizacao.php | 22 ++++------------------ gestaoTributaria/fontes/PHP/cadastroImobiliario/popups/localizacao/JSBuscaLocalizacao.js | 4 ++-- gestaoTributaria/fontes/PHP/cadastroImobiliario/popups/localizacao/LSBuscaLocalizacao.php | 12 +++++++++--- gestaoTributaria/fontes/PHP/cadastroImobiliario/popups/localizacao/OCBuscaLocalizacao.php | 59 ++++++++++++++++++++++++++++------------------------------- gestaoTributaria/fontes/PHP/cadastroImobiliario/popups/logradouro/FMManterLogradouro.php | 24 ++++++++++++++++++++++-- gestaoTributaria/fontes/PHP/cadastroImobiliario/popups/logradouro/OCProcurarLogradouro.php | 543 +++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++-------------------------------------------------------------------------------- gestaoTributaria/fontes/PHP/cadastroImobiliario/popups/logradouro/PRProcurarLogradouro.php | 98 ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++------------------------------------ gestaoTributaria/fontes/PHP/cadastroImobiliario/popups/lote/LSBuscaLote.php | 3 +-- gestaoTributaria/fontes/PHP/cadastroMonetario/classes/mapeamento/TMONTipoConvenio.class.php | 3 +-- gestaoTributaria/fontes/PHP/cadastroMonetario/instancias/acrescimo/FLManterAcrescimo.php | 3 +-- gestaoTributaria/fontes/PHP/cadastroMonetario/instancias/acrescimo/LSManterAcrescimo.php | 5 ++--- gestaoTributaria/fontes/PHP/cadastroMonetario/instancias/acrescimo/OCManterAcrescimo.php | 4 +--- gestaoTributaria/fontes/PHP/cadastroMonetario/instancias/agenciaBancaria/LSManterAgencia.php | 3 +-- gestaoTributaria/fontes/PHP/cadastroMonetario/instancias/agenciaBancaria/OCMontaAgencia.php | 29 +++++++++++++++-------------- gestaoTributaria/fontes/PHP/cadastroMonetario/instancias/banco/LSManterBanco.php | 4 +--- gestaoTributaria/fontes/PHP/cadastroMonetario/instancias/carteira/LSManterCarteira.php | 3 +-- gestaoTributaria/fontes/PHP/cadastroMonetario/instancias/convenio/LSManterConvenio.php | 3 +-- gestaoTributaria/fontes/PHP/cadastroMonetario/instancias/credito/FLManterCredito.php | 3 +-- gestaoTributaria/fontes/PHP/cadastroMonetario/instancias/credito/LSManterCredito.php | 3 +-- gestaoTributaria/fontes/PHP/cadastroMonetario/instancias/especie/LSManterEspecie.php | 3 +-- gestaoTributaria/fontes/PHP/cadastroMonetario/instancias/indicadorEconomico/LSManterIndicador.php | 3 +-- gestaoTributaria/fontes/PHP/cadastroMonetario/instancias/indicadorEconomico/OCManterIndicador.php | 4 +--- gestaoTributaria/fontes/PHP/cadastroMonetario/instancias/indicadorEconomico/OCManterValor.php | 4 +--- gestaoTributaria/fontes/PHP/cadastroMonetario/instancias/moeda/LSManterMoeda.php | 5 ++--- gestaoTributaria/fontes/PHP/cadastroMonetario/instancias/moeda/OCManterMoeda.php | 4 +--- gestaoTributaria/fontes/PHP/cadastroMonetario/instancias/valor/LSManterValor.php | 3 +-- gestaoTributaria/fontes/PHP/cadastroMonetario/instancias/valor/OCManterValor.php | 4 +--- gestaoTributaria/fontes/PHP/cadastroMonetario/popups/contaCorrente/OCProcurarConta.php | 4 ++-- gestaoTributaria/fontes/PHP/cadastroMonetario/popups/convenio/OCProcurarConvenio.php | 4 ++-- gestaoTributaria/fontes/PHP/dividaAtiva/classes/componentes/IPopUpLivroIntervalo.class.php | 2 +- gestaoTributaria/fontes/PHP/dividaAtiva/classes/mapeamento/FDATInscricaoDivida.class.php | 1 - gestaoTributaria/fontes/PHP/dividaAtiva/classes/mapeamento/TARRRelatorioDevedores.class.php | 6 +++--- gestaoTributaria/fontes/PHP/dividaAtiva/classes/mapeamento/TARRRelatorioPagadores.class.php | 283 +++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ gestaoTributaria/fontes/PHP/dividaAtiva/classes/mapeamento/TDATModalidade.class.php | 4 +--- gestaoTributaria/fontes/PHP/dividaAtiva/instancias/cobranca/LSManterEstorno.php | 3 +-- gestaoTributaria/fontes/PHP/dividaAtiva/instancias/consultas/FMConsultaInscricao.php | 14 ++++++-------- gestaoTributaria/fontes/PHP/dividaAtiva/instancias/consultas/FMConsultaInscricaoDetalheCobranca.php | 4 ++-- gestaoTributaria/fontes/PHP/dividaAtiva/instancias/consultas/FMConsultaInscricaoDetalheValor.php | 10 ++-------- gestaoTributaria/fontes/PHP/dividaAtiva/instancias/consultas/FMConsultaInscricaoDocumento.php | 5 ++--- gestaoTributaria/fontes/PHP/dividaAtiva/instancias/consultas/OCGeraRelatorioConsultaDivida.php | 661 ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------- gestaoTributaria/fontes/PHP/dividaAtiva/instancias/consultas/OCRelatorioConsultaDivida.php | 108 ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ gestaoTributaria/fontes/PHP/dividaAtiva/instancias/inscricao/PREstornarInscricao.php | 6 +----- gestaoTributaria/fontes/PHP/dividaAtiva/instancias/relatorios/FLRelatorioPagadores.php | 86 ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ gestaoTributaria/fontes/PHP/dividaAtiva/instancias/relatorios/FMRelatorioPagadores.php | 198 ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ gestaoTributaria/fontes/PHP/dividaAtiva/instancias/relatorios/JSRelatorioPagadores.js | 199 +++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ gestaoTributaria/fontes/PHP/dividaAtiva/instancias/relatorios/OCGeraRelatorioPagadores.php | 51 +++++++++++++++++++++++++++++++++++++++++++++++++++ gestaoTributaria/fontes/PHP/dividaAtiva/instancias/relatorios/OCMonta2RelatorioDivida.php | 5 +---- gestaoTributaria/fontes/PHP/dividaAtiva/instancias/relatorios/OCRelatorioDivida.php | 4 ++-- gestaoTributaria/fontes/PHP/dividaAtiva/instancias/relatorios/OCRelatorioPagadores.php | 347 +++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ gestaoTributaria/fontes/PHP/dividaAtiva/instancias/relatorios/PRRelatorioPagadores.php | 114 ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ gestaoTributaria/fontes/PHP/dividaAtiva/instancias/remissao/OCConcederRemissao.php | 4 ++-- gestaoTributaria/fontes/PHP/dividaAtiva/popups/autoridade/LSProcurarAutoridade.php | 3 +-- gestaoTributaria/fontes/PHP/fiscalizacao/classes/visao/VFISInfracao.class.php | 4 +--- gestaoTributaria/fontes/PHP/fiscalizacao/classes/visao/VFISManterNota.class.php | 3 --- gestaoTributaria/fontes/PHP/fiscalizacao/classes/visao/VFISManterServico.class.php | 3 --- gestaoTributaria/fontes/PHP/fiscalizacao/classes/visao/VFISManterVinculo.class.php | 1 - gestaoTributaria/fontes/PHP/fiscalizacao/classes/visao/VFISNotificarProcesso.class.php | 3 +-- gestaoTributaria/fontes/PLPGSQL/arrecadacao/calculaValoresParcelasReemissao.plsql | 50 +++++++++++++++++++++++++++----------------------- gestaoTributaria/fontes/PLPGSQL/arrecadacao/diff_datas_em_meses.plsql | 49 +++++++++++++++++++++---------------------------- gestaoTributaria/fontes/PLPGSQL/arrecadacao/fn_carne_parcela.plsql | 45 +++++++++++++-------------------------------- gestaoTributaria/fontes/PLPGSQL/arrecadacao/fn_consulta_endereco_mata_saojoao.plsql | 127 ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++--------------------------------------------------- gestaoTributaria/fontes/PLPGSQL/arrecadacao/fn_correcao_mariana.plsql | 38 ++++++++++++++++++++------------------ gestaoTributaria/fontes/PLPGSQL/arrecadacao/fn_honorarios_mata.plsql | 66 ++++++++++++++++++++++-------------------------------------------- gestaoTributaria/fontes/PLPGSQL/arrecadacao/fn_lista_creditos_lancamento.plsql | 24 ++++++++++++------------ gestaoTributaria/fontes/PLPGSQL/arrecadacao/fn_urm_mariana.plsql | 101 +++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ gestaoTributaria/fontes/PLPGSQL/arrecadacao/listaEmissaoGraficaImobiliaria.plsql | 2180 +++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------- gestaoTributaria/fontes/PLPGSQL/arrecadacao/listaEmissaoGraficaImobiliariaEmissaoIsento.plsql | 2 +- gestaoTributaria/fontes/PLPGSQL/dividaAtiva/fn_aplica_reducao_modalidade_acrescimo.plsql | 4 ++-- gestaoTributaria/fontes/RPT/arrecadacao/report/design/relatorioDeLancamentosAutomatico.rptdesign | 115 +++++++++++++++++++++++++++++++++++++++++++++++++++---------------------------------------------------------------- gestaoTributaria/fontes/RPT/dividaAtiva/MPDF/LHRelatorioPagadores.php | 37 +++++++++++++++++++++++++++++++++++++ gestaoTributaria/fontes/SQL/GT_2044.sql | 395 +++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ 800 files changed, 47293 insertions(+), 17870 deletions(-) create mode 100644 gestaoAdministrativa/fontes/PHP/framework/temas/padrao/CSS/paginacao.css create mode 100644 gestaoFinanceira/fontes/PHP/contabilidade/classes/mapeamento/TContabilidadeConfiguracaoContasExtras.class.php create mode 100644 gestaoFinanceira/fontes/PHP/contabilidade/instancias/configuracao/FMManterReceitaDespesaExtraRecurso.php create mode 100644 gestaoFinanceira/fontes/PHP/contabilidade/instancias/configuracao/JSManterReceitaDespesaExtraRecurso.js create mode 100644 gestaoFinanceira/fontes/PHP/contabilidade/instancias/configuracao/OCManterReceitaDespesaExtraRecurso.php create mode 100644 gestaoFinanceira/fontes/PHP/contabilidade/instancias/configuracao/PRManterReceitaDespesaExtraRecurso.php create mode 100644 gestaoFinanceira/fontes/PLPGSQL/contabilidade/calculaAtivoBalancoPatrimonial.plsql create mode 100644 gestaoFinanceira/fontes/PLPGSQL/contabilidade/calculaPassivoBalancoPatrimonial.plsql create mode 100644 gestaoFinanceira/fontes/PLPGSQL/empenho/relatorioPagamentoOrdemNotaEmpenho.plsql create mode 100755 gestaoFinanceira/fontes/PLPGSQL/empenho/saldoDotacaoDataAtualEmpenho.plsql create mode 100755 gestaoFinanceira/fontes/PLPGSQL/empenho/saldoDotacaoDataEmpenho.plsql create mode 100644 gestaoFinanceira/fontes/SQL/GF_2044.sql create mode 100644 gestaoFinanceira/fontes/SQL/GF_2045.sql create mode 100644 gestaoFinanceira/fontes/SQL/GF_2046.sql create mode 100644 gestaoPatrimonial/fontes/PHP/licitacao/instancias/autorizacao/FMManterAutorizacaoParcial.php create mode 100644 gestaoPatrimonial/fontes/PHP/licitacao/instancias/autorizacao/JSManterAutorizacaoParcial.js create mode 100644 gestaoPatrimonial/fontes/PHP/licitacao/instancias/autorizacao/LSManterAutorizacaoParcial.php create mode 100644 gestaoPatrimonial/fontes/PHP/licitacao/instancias/autorizacao/OCManterAutorizacaoParcial.php create mode 100644 gestaoPatrimonial/fontes/PHP/licitacao/instancias/autorizacao/PRManterAutorizacaoParcial.php create mode 100644 gestaoPatrimonial/fontes/PHP/licitacao/instancias/contrato/FLManterTipoContrato.php create mode 100644 gestaoPatrimonial/fontes/PHP/licitacao/instancias/contrato/FMConsultarContrato.php create mode 100644 gestaoPatrimonial/fontes/PHP/licitacao/instancias/contrato/FMManterTipoContrato.php create mode 100644 gestaoPatrimonial/fontes/PHP/licitacao/instancias/contrato/LSManterTipoContrato.php create mode 100644 gestaoPatrimonial/fontes/PHP/licitacao/instancias/contrato/PRManterTipoContrato.php create mode 100644 gestaoPatrimonial/fontes/SQL/GP_2045.sql create mode 100644 gestaoPatrimonial/fontes/SQL/GP_2046.sql create mode 100644 gestaoPatrimonial/fontes/SQL/GP_2047.sql create mode 100644 gestaoPatrimonial/fontes/SQL/GP_2050.sql delete mode 100644 gestaoPrestacaoContas/fontes/PHP/TCEMG/classes/mapeamento/2015/FNTCEMGSiaceDespesaTotalPessoal.plsql create mode 100755 gestaoPrestacaoContas/fontes/PHP/TCMBA/classes/mapeamento/2015/TTCMBAEditPregaoElet.class.php create mode 100644 gestaoPrestacaoContas/fontes/PHP/TCMBA/classes/mapeamento/2015/TTCMBAEditalDotacao.class.php create mode 100644 gestaoPrestacaoContas/fontes/PHP/TCMBA/classes/mapeamento/2015/TTCMBAFolhaPgt.class.php create mode 100644 gestaoPrestacaoContas/fontes/PHP/TCMBA/classes/mapeamento/2015/TTCMBAPessoal.class.php create mode 100644 gestaoPrestacaoContas/fontes/PHP/TCMBA/classes/mapeamento/2015/TTCMBASalario2.class.php create mode 100644 gestaoPrestacaoContas/fontes/PHP/TCMBA/classes/mapeamento/TTCMBACargoServidor.class.php create mode 100644 gestaoPrestacaoContas/fontes/PHP/TCMBA/classes/mapeamento/TTCMBACargoServidorTemporario.class.php create mode 100644 gestaoPrestacaoContas/fontes/PHP/TCMBA/classes/mapeamento/TTCMBAEmprestimoConsignado.class.php create mode 100644 gestaoPrestacaoContas/fontes/PHP/TCMBA/classes/mapeamento/TTCMBAFonteRecursoLocal.class.php create mode 100644 gestaoPrestacaoContas/fontes/PHP/TCMBA/classes/mapeamento/TTCMBAFonteRecursoLotacao.class.php create mode 100644 gestaoPrestacaoContas/fontes/PHP/TCMBA/classes/mapeamento/TTCMBAFonteRecursoServidor.class.php create mode 100644 gestaoPrestacaoContas/fontes/PHP/TCMBA/classes/mapeamento/TTCMBAGratificacaoFuncao.class.php create mode 100644 gestaoPrestacaoContas/fontes/PHP/TCMBA/classes/mapeamento/TTCMBAPlanoSaude.class.php create mode 100644 gestaoPrestacaoContas/fontes/PHP/TCMBA/classes/mapeamento/TTCMBASalarioBase.class.php create mode 100644 gestaoPrestacaoContas/fontes/PHP/TCMBA/classes/mapeamento/TTCMBASalarioDescontos.class.php create mode 100644 gestaoPrestacaoContas/fontes/PHP/TCMBA/classes/mapeamento/TTCMBASalarioFamilia.class.php create mode 100644 gestaoPrestacaoContas/fontes/PHP/TCMBA/classes/mapeamento/TTCMBASalarioHorasExtras.class.php create mode 100644 gestaoPrestacaoContas/fontes/PHP/TCMBA/classes/mapeamento/TTCMBATermoParceria.class.php create mode 100644 gestaoPrestacaoContas/fontes/PHP/TCMBA/classes/mapeamento/TTCMBATermoParceriaDotacao.class.php create mode 100644 gestaoPrestacaoContas/fontes/PHP/TCMBA/classes/mapeamento/TTCMBATermoParceriaProrrogacao.class.php create mode 100644 gestaoPrestacaoContas/fontes/PHP/TCMBA/classes/mapeamento/TTCMBATipoFuncaoServidor.class.php create mode 100644 gestaoPrestacaoContas/fontes/PHP/TCMBA/classes/mapeamento/TTCMBATipoFuncaoServidorTemporario.class.php create mode 100644 gestaoPrestacaoContas/fontes/PHP/TCMBA/classes/mapeamento/TTCMBAVantagensSalariais.class.php create mode 100644 gestaoPrestacaoContas/fontes/PHP/TCMBA/instancias/configuracao/FLManterConfiguracaoParcSubvOSCIP.php create mode 100644 gestaoPrestacaoContas/fontes/PHP/TCMBA/instancias/configuracao/FLManterConfiguracaoProrrogacaoTermo.php create mode 100644 gestaoPrestacaoContas/fontes/PHP/TCMBA/instancias/configuracao/FLManterConfiguracaoTipoSalario.php create mode 100644 gestaoPrestacaoContas/fontes/PHP/TCMBA/instancias/configuracao/FLRelacionarLotacoesOrgaos.php create mode 100644 gestaoPrestacaoContas/fontes/PHP/TCMBA/instancias/configuracao/FMManterConfiguracaoParcSubvOSCIP.php create mode 100644 gestaoPrestacaoContas/fontes/PHP/TCMBA/instancias/configuracao/FMManterConfiguracaoProrrogacaoTermo.php create mode 100644 gestaoPrestacaoContas/fontes/PHP/TCMBA/instancias/configuracao/FMManterConfiguracaoTipoSalario.php create mode 100644 gestaoPrestacaoContas/fontes/PHP/TCMBA/instancias/configuracao/FMRelacionarLotacoesOrgaos.php create mode 100644 gestaoPrestacaoContas/fontes/PHP/TCMBA/instancias/configuracao/JSManterConfiguracaoParcSubvOSCIP.js create mode 100644 gestaoPrestacaoContas/fontes/PHP/TCMBA/instancias/configuracao/JSManterConfiguracaoProrrogacaoTermo.js create mode 100644 gestaoPrestacaoContas/fontes/PHP/TCMBA/instancias/configuracao/OCManterConfiguracaoParcSubvOSCIP.php create mode 100644 gestaoPrestacaoContas/fontes/PHP/TCMBA/instancias/configuracao/OCManterConfiguracaoProrrogacaoTermo.php create mode 100644 gestaoPrestacaoContas/fontes/PHP/TCMBA/instancias/configuracao/OCManterConfiguracaoTipoSalario.php create mode 100644 gestaoPrestacaoContas/fontes/PHP/TCMBA/instancias/configuracao/PRManterConfiguracaoParcSubvOSCIP.php create mode 100644 gestaoPrestacaoContas/fontes/PHP/TCMBA/instancias/configuracao/PRManterConfiguracaoProrrogacaoTermo.php create mode 100644 gestaoPrestacaoContas/fontes/PHP/TCMBA/instancias/configuracao/PRManterConfiguracaoTipoSalario.php create mode 100644 gestaoPrestacaoContas/fontes/PHP/TCMBA/instancias/configuracao/PRRelacionarLotacoesOrgaos.php create mode 100755 gestaoPrestacaoContas/fontes/PHP/TCMBA/instancias/layout_arquivos/2015/EditPregaoElet.inc.php create mode 100644 gestaoPrestacaoContas/fontes/PHP/TCMBA/instancias/layout_arquivos/2015/EditalDotacao.inc.php create mode 100644 gestaoPrestacaoContas/fontes/PHP/TCMBA/instancias/layout_arquivos/2015/FolhaPgt.inc.php create mode 100644 gestaoPrestacaoContas/fontes/PHP/TCMBA/instancias/layout_arquivos/2015/Pessoal.inc.php create mode 100644 gestaoPrestacaoContas/fontes/PHP/TCMBA/instancias/layout_arquivos/2015/Salario2.inc.php create mode 100644 gestaoPrestacaoContas/fontes/PLPGSQL/TCEMG/FNTCEMGSiaceDespesaTotalPessoal.plsql create mode 100644 gestaoPrestacaoContas/fontes/PLPGSQL/TCMBA/FTCMBARecuperaAtosDePessoalTCMBA.plsql create mode 100644 gestaoPrestacaoContas/fontes/PLPGSQL/TCMBA/FTCMBARecuperaSalario2.plsql create mode 100644 gestaoPrestacaoContas/fontes/PLPGSQL/TCMBA/FTCMBARecuperaServidorConsignado.plsql create mode 100644 gestaoPrestacaoContas/fontes/PLPGSQL/TCMBA/FTCMBARecuperaServidorValoresPorEvento.plsql create mode 100644 gestaoPrestacaoContas/fontes/PLPGSQL/TCMBA/FTCMBARecuperaServidorValoresPorEventoDecimo.plsql create mode 100644 gestaoPrestacaoContas/fontes/PLPGSQL/TCMBA/FTCMBARecuperaServidorValoresPorEventoFerias.plsql create mode 100644 gestaoPrestacaoContas/fontes/PLPGSQL/TCMBA/FTCMBARecuperaServidorValoresPorEventoPensao.plsql create mode 100644 gestaoPrestacaoContas/fontes/PLPGSQL/TCMBA/TCMBAConsContRazao.plsql create mode 100644 gestaoPrestacaoContas/fontes/SQL/GPC_2044.sql create mode 100644 gestaoRH/fontes/PHP/folhaPagamento/instancias/configuracao/FMManterConfiguracaoEventosAutomaticos.php create mode 100644 gestaoRH/fontes/PHP/folhaPagamento/instancias/configuracao/OCManterConfiguracaoEventosAutomaticos.php create mode 100644 gestaoRH/fontes/PHP/folhaPagamento/instancias/configuracao/PRManterConfiguracaoEventosAutomaticos.php create mode 100644 gestaoRH/fontes/PHP/pessoal/classes/mapeamento/TPessoalDeParaLotacaoOrgaoTCMBA.class.php create mode 100644 gestaoRH/fontes/PLPGSQL/pessoal/cargo/recuperaCargoAcumuladoServidor.plsql create mode 100644 gestaoRH/fontes/SQL/GRH_2044.sql create mode 100644 gestaoRH/fontes/SQL/GRH_2045.sql create mode 100644 gestaoTributaria/fontes/PHP/arrecadacao/classes/boletos/RCarneIPTUMataSaoJoao2016.class.php create mode 100644 gestaoTributaria/fontes/PHP/arrecadacao/classes/boletos/RCarneTFFMataSaoJoao2016.class.php delete mode 100644 gestaoTributaria/fontes/PHP/cadastroEconomico/instancias/licenca/PRConcederLicencaGeral.php.bak delete mode 100755 gestaoTributaria/fontes/PHP/cadastroEconomico/instancias/licenca/PRConcederLicencaGeral.php.old create mode 100644 gestaoTributaria/fontes/PHP/dividaAtiva/classes/mapeamento/TARRRelatorioPagadores.class.php create mode 100644 gestaoTributaria/fontes/PHP/dividaAtiva/instancias/consultas/OCRelatorioConsultaDivida.php create mode 100644 gestaoTributaria/fontes/PHP/dividaAtiva/instancias/relatorios/FLRelatorioPagadores.php create mode 100644 gestaoTributaria/fontes/PHP/dividaAtiva/instancias/relatorios/FMRelatorioPagadores.php create mode 100644 gestaoTributaria/fontes/PHP/dividaAtiva/instancias/relatorios/JSRelatorioPagadores.js create mode 100644 gestaoTributaria/fontes/PHP/dividaAtiva/instancias/relatorios/OCGeraRelatorioPagadores.php create mode 100644 gestaoTributaria/fontes/PHP/dividaAtiva/instancias/relatorios/OCRelatorioPagadores.php create mode 100644 gestaoTributaria/fontes/PHP/dividaAtiva/instancias/relatorios/PRRelatorioPagadores.php create mode 100644 gestaoTributaria/fontes/PLPGSQL/arrecadacao/fn_urm_mariana.plsql create mode 100644 gestaoTributaria/fontes/RPT/dividaAtiva/MPDF/LHRelatorioPagadores.php diff --git a/config.php b/config.php index 4e6384d..dc2cecc 100644 --- a/config.php +++ b/config.php @@ -29,12 +29,11 @@ * * Data de Criação: 26/05/2008 * @author Desenvolvedor: Lucas Stephanou - * $Id: config.php 59614 2014-09-02 12:20:19Z gelson $ + * $Id: config.php 63850 2015-10-23 17:45:08Z gelson $ */ /* hack para evitar erros */ //set_error_handler(create_function('$code,$msg', 'throw new Exception($msg, $code);'), E_ALL & ~E_NOTICE); - $path = realpath(dirname(__FILE__)).'/'; # diretorio do arquivo em execução diff --git a/gestaoAdministrativa/fontes/PHP/CGM/cgm/manutencao/converteCgmInterno.php b/gestaoAdministrativa/fontes/PHP/CGM/cgm/manutencao/converteCgmInterno.php index 589c7d6..ec9e870 100755 --- a/gestaoAdministrativa/fontes/PHP/CGM/cgm/manutencao/converteCgmInterno.php +++ b/gestaoAdministrativa/fontes/PHP/CGM/cgm/manutencao/converteCgmInterno.php @@ -141,8 +141,6 @@ switch ($controle) { if ($pessoa == "fisica") { if (comparaValor("cpf", $cpfigual, "sw_cgm_pessoa_fisica", "and numcgm <> $dadosCgm[numCgm]")) { - //mostravar($objCgm->alteraCgmConverte($dadosCgm)); - //die(); if ($objCgm->alteraCgmConverte($dadosCgm)) { //Insere auditoria //echo "1"; diff --git a/gestaoAdministrativa/fontes/PHP/CGM/instancias/logradouro/FLManterLogradouro.php b/gestaoAdministrativa/fontes/PHP/CGM/instancias/logradouro/FLManterLogradouro.php index 5429362..093068f 100644 --- a/gestaoAdministrativa/fontes/PHP/CGM/instancias/logradouro/FLManterLogradouro.php +++ b/gestaoAdministrativa/fontes/PHP/CGM/instancias/logradouro/FLManterLogradouro.php @@ -181,7 +181,7 @@ $obCmbUF->setNull ( false ); $obCmbUF->obEvento->setOnChange ( "preencheMunicipio('')" ); $obTxtCodMunicipio = new TextBox; -$obTxtCodMunicipio->setRotulo ( "Município" ); +$obTxtCodMunicipio->setRotulo ( "Município" ); $obTxtCodMunicipio->setName ( "inCodigoMunicipio" ); $obTxtCodMunicipio->setId ( "inCodigoMunicipio" ); $obTxtCodMunicipio->setValue ( $_REQUEST['inCodigoMunicipio'] ); diff --git a/gestaoAdministrativa/fontes/PHP/CGM/instancias/logradouro/FMManterLogradouro.php b/gestaoAdministrativa/fontes/PHP/CGM/instancias/logradouro/FMManterLogradouro.php index d62005d..0b802e4 100644 --- a/gestaoAdministrativa/fontes/PHP/CGM/instancias/logradouro/FMManterLogradouro.php +++ b/gestaoAdministrativa/fontes/PHP/CGM/instancias/logradouro/FMManterLogradouro.php @@ -121,6 +121,10 @@ $obHdninId->setName ( "inId" ); $obHdninId->setId ( "inId" ); //Hidden para atribuir o valor do campo html +$obHdnDescricaoNormaHistorico = new Hidden; +$obHdnDescricaoNormaHistorico->setName ( "stDescricaoNormaHistorico" ); +$obHdnDescricaoNormaHistorico->setId ( "stDescricaoNormaHistorico" ); + $obHdnDescricaoNorma = new Hidden; $obHdnDescricaoNorma->setName ( "stDescricaoNorma" ); $obHdnDescricaoNorma->setId ( "stDescricaoNorma" ); @@ -155,6 +159,51 @@ $obLblNomeMunicipio->setName ( "stNomeMunicipio" ); $obLblNomeMunicipio->setId ( "stNomeMunicipio" ); $obLblNomeMunicipio->setValue ( $request->get("stNomeMunicipio") ); +$obIPopUpNorma = new IPopUpNorma(); +$obIPopUpNorma->obInnerNorma->setRotulo ( "Norma" ); +$obIPopUpNorma->obInnerNorma->setTitle ( "Informe a Norma que determinou o Nome do Logradouro." ); +$obIPopUpNorma->obInnerNorma->obCampoCod->setId ( "inCodNorma" ); +$obIPopUpNorma->obInnerNorma->obCampoCod->setName( "inCodNorma" ); +$obIPopUpNorma->obInnerNorma->setNull ( false ); + +$obDtInicial = new Data(); +$obDtInicial->setRotulo ( "Data Inicial" ); +$obDtInicial->setTitle ( "Informe a Data Inicial do Nome do Logradouro." ); +$obDtInicial->setName ( "stDataInicial" ); +$obDtInicial->setId ( "stDataInicial" ); +$obDtInicial->setMaxLength ( 10 ); +$obDtInicial->setSize ( 10 ); +$obDtInicial->setNull ( false ); + +$obDtFinal = new Data(); +$obDtFinal->setRotulo ( "Data Final" ); +$obDtFinal->setTitle ( "Informe a Data Final do Nome do Logradouro." ); +$obDtFinal->setName ( "stDataFinal" ); +$obDtFinal->setId ( "stDataFinal" ); +$obDtFinal->setMaxLength ( 10 ); +$obDtFinal->setSize ( 10 ); +$obDtFinal->setNull ( true ); + +// Mostrar endereço. +$obRadHistoricoSim = new Radio(); +$obRadHistoricoSim->setId ('boMostraHistorico'); +$obRadHistoricoSim->setName ('boMostraHistorico'); +$obRadHistoricoSim->setValue ('S'); +$obRadHistoricoSim->setRotulo ('Histórico do Logradouro'); +$obRadHistoricoSim->setLabel ('Sim'); +$obRadHistoricoSim->obEvento->setOnChange(" jQuery('#spanListarHistorico').show(); "); + +$obRadHistoricoNao = new Radio(); +$obRadHistoricoNao->setId ('boMostraHistorico'); +$obRadHistoricoNao->setName ('boMostraHistorico'); +$obRadHistoricoNao->setValue ('N'); +$obRadHistoricoNao->setRotulo ('Histórico do Logradouro'); +$obRadHistoricoNao->setLabel ('Não'); +$obRadHistoricoNao->setChecked (true); +$obRadHistoricoNao->obEvento->setOnChange(" jQuery('#spanListarHistorico').hide(); "); + +$arRadHistorico = array($obRadHistoricoSim, $obRadHistoricoNao); + $obTxtCodigoLogradouro = new TextBox; $obTxtCodigoLogradouro->setRotulo ( "Código do Logradouro" ); $obTxtCodigoLogradouro->setName ( "inCodLogradouro" ); @@ -184,7 +233,6 @@ $obTxtNome->setSize ( 70 ); $obTxtNome->setMaxLength ( 60 ); $obTxtNome->setNull ( false ); $obTxtNome->setValue ( str_replace('\\', '', $request->get("stNomeLogradouro"))); -$obTxtNome->obEvento->setOnBlur(" jQuery('#stNomeLogradouroAnterior').val(this.value); "); $obBtnIncluirNovoBairro = new Button; $obBtnIncluirNovoBairro->setName ( "btnIncluirNovoBairro" ); @@ -285,59 +333,6 @@ $obCmbMunicipio->setNull ( false ); $obCmbMunicipio->setStyle ( "width: 220px" ); $obCmbMunicipio->obEvento->setOnChange ( "preencheBairro();" ); -$obTxtNomeAnterior = new TextBox; -if ($stAcao == "incluir") { - $obTxtNomeAnterior->setRotulo ( "*Nome"); - $obTxtNomeAnterior->setTitle ( "Nome do novo logradouro para manter seu historico." ); -}else{ - $obTxtNomeAnterior->setRotulo ( "*Nome Anterior" ); - $obTxtNomeAnterior->setTitle ( "Nome na qual o logradouro era chamado anteriormente" ); -} -$obTxtNomeAnterior->setName ( "stNomeLogradouroAnterior" ); -$obTxtNomeAnterior->setId ( "stNomeLogradouroAnterior" ); -$obTxtNomeAnterior->setSize ( 70 ); -$obTxtNomeAnterior->setMaxLength ( 60 ); -$obTxtNomeAnterior->setNull ( false ); -$obTxtNomeAnterior->setValue ( str_replace('\\', '', $request->get("stNomeLogradouroAnterior"))); - -//Norma autorizativa -$obIPopUpNorma = new IPopUpNorma(); -$obIPopUpNorma->obInnerNorma->setRotulo ( "**Norma" ); -$obIPopUpNorma->obInnerNorma->setTitle ( "Informe a Norma que determinou o Nome do Logradouro." ); -$obIPopUpNorma->obInnerNorma->obCampoCod->setId ( "inCodNorma" ); -$obIPopUpNorma->obInnerNorma->obCampoCod->setName( "inCodNorma" ); -$obIPopUpNorma->obInnerNorma->setNull ( true ); - -$obDtInicial = new Data(); -$obDtInicial->setRotulo ( "**Data Inicial" ); -$obDtInicial->setTitle ( "Informe a Data Inicial do Nome do Logradouro." ); -$obDtInicial->setName ( "stDataInicial" ); -$obDtInicial->setId ( "stDataInicial" ); -$obDtInicial->setMaxLength ( 10 ); -$obDtInicial->setSize ( 10 ); - -$obDtFinal = new Data(); -$obDtFinal->setRotulo ( "Data Final" ); -$obDtFinal->setTitle ( "Informe a Data Final do Nome do Logradouro." ); -$obDtFinal->setName ( "stDataFinal" ); -$obDtFinal->setId ( "stDataFinal" ); -$obDtFinal->setMaxLength ( 10 ); -$obDtFinal->setSize ( 10 ); -$obDtFinal->obEvento->setOnChange(" jQuery('#btIncluir').removeProp('disabled'); "); - -//Botoes da lista -$obOkLista = new Ok(false); -$obOkLista->setRotulo('Incluir'); -$obOkLista->setValue ('Incluir'); -$obOkLista->setId ('btIncluir'); -$obOkLista->setName ('btIncluir'); -$obOkLista->obEvento->setOnClick(" if ( validaCamposLista() ){ manterHistorico('incluirHistoricoLista'); }"); -$obLimparLista = new Button(); -$obLimparLista->setId ('btLimpaLista'); -$obLimparLista->setName ('btLimpaLista'); -$obLimparLista->setValue ('Limpar'); -$obLimparLista->obEvento->setOnClick(" manterHistorico('limparHistoricoLista'); "); - $obCmbTipo = new Select; $obCmbTipo->setName ( "inCodTipo" ); $obCmbTipo->setId ( "inCodTipo" ); @@ -438,6 +433,7 @@ $obFormulario->addHidden ( $obHdnPais ); $obFormulario->addHidden ( $obHdnCadastro ); $obFormulario->addHidden ( $obHdninId ); $obFormulario->addHidden ( $obHdnDescricaoNorma ); +$obFormulario->addHidden ( $obHdnDescricaoNormaHistorico ); switch ($stAcao) { case 'incluir': @@ -446,12 +442,10 @@ switch ($stAcao) { $obFormulario->addComponente ( $obTxtNome ); $obFormulario->addComponenteComposto ( $obTxtCodUF, $obCmbUF ); $obFormulario->addComponenteComposto ( $obTxtCodMunicipio, $obCmbMunicipio ); - $obFormulario->addTitulo ( "Histórico de Nome do Logradouro" ); - $obFormulario->addComponente ( $obTxtNomeAnterior ); $obIPopUpNorma->geraFormulario ( $obFormulario ); $obFormulario->addComponente ( $obDtInicial ); $obFormulario->addComponente ( $obDtFinal ); - $obFormulario->defineBarra ( array( $obOkLista, $obLimparLista ), 'center' ); + $obFormulario->agrupaComponentes ( $arRadHistorico ); $obFormulario->addSpan ( $obSpnListarHistorico ); $obFormulario->addTitulo ( "Bairro" ); $obFormulario->agrupaComponentes ( array( $obTxtNovoBairro, $obBtnIncluirNovoBairro )); @@ -477,13 +471,11 @@ switch ($stAcao) { $obFormulario->addComponente ( $obTxtNome ); $obFormulario->addComponente ( $obLblNomeUF ); $obFormulario->addComponente ( $obLblNomeMunicipio ); + $obIPopUpNorma->geraFormulario ( $obFormulario ); + $obFormulario->addComponente ( $obDtInicial ); + $obFormulario->addComponente ( $obDtFinal ); $obFormulario->addComponente ( $obLblExtensao ); - $obFormulario->addTitulo ( "Histórico de Nome do Logradouro" ); - $obFormulario->addComponente ( $obTxtNomeAnterior ); - $obIPopUpNorma->geraFormulario ( $obFormulario ); - $obFormulario->addComponente ( $obDtInicial ); - $obFormulario->addComponente ( $obDtFinal ); - $obFormulario->defineBarra ( array( $obOkLista, $obLimparLista ), 'center' ); + $obFormulario->agrupaComponentes ( $arRadHistorico ); $obFormulario->addSpan ( $obSpnListarHistorico ); $obFormulario->addTitulo ( "Bairro" ); $obFormulario->agrupaComponentes ( array( $obTxtNovoBairro, $obBtnIncluirNovoBairro )); @@ -541,10 +533,10 @@ if ($stAcao == 'alterar' || $stAcao == 'consultar') { if ($stAcao == 'consultar'){ sistemalegado::executaFrameOculto("preencheInnerConsultar();"); }else{ - sistemalegado::executaFrameOculto("preencheInner();"); + sistemalegado::executaFrameOculto("jQuery('#spanListarHistorico').hide(); preencheInner();"); } } else { - sistemalegado::executaFrameOculto("IniciaSessions();"); + sistemalegado::executaFrameOculto(" jQuery('#spanListarHistorico').hide(); IniciaSessions();"); } include_once '../../../../../../gestaoAdministrativa/fontes/PHP/framework/include/rodape.inc.php'; diff --git a/gestaoAdministrativa/fontes/PHP/CGM/instancias/logradouro/JSManterLogradouro.js b/gestaoAdministrativa/fontes/PHP/CGM/instancias/logradouro/JSManterLogradouro.js index 7a36a63..f1dbe1b 100644 --- a/gestaoAdministrativa/fontes/PHP/CGM/instancias/logradouro/JSManterLogradouro.js +++ b/gestaoAdministrativa/fontes/PHP/CGM/instancias/logradouro/JSManterLogradouro.js @@ -393,15 +393,17 @@ function verificaCodigoLogradouro() { function validaCamposLista() { - var inCodNorma = jQuery("#inCodNorma").val(); - var stDataInicial = jQuery("#stDataInicial").val(); + var inCodNorma = jQuery("#inCodNormaHistorico").val(); + var stDataInicial = jQuery("#stDataInicialHistorico").val(); + var stDataFinalHistorico = jQuery("#stDataFinalHistorico").val(); var stNomeLogradouroAnterior = jQuery("#stNomeLogradouroAnterior").val(); - if ( stDataInicial == '' || inCodNorma == '' || stNomeLogradouroAnterior == '') { + if ( stDataInicial == '' || inCodNorma == '' || stNomeLogradouroAnterior == '' || stDataFinalHistorico == '') { alertaAviso("Preencha todos os campos obrigatórios do histórico do logradouro.","erro","aviso",""); return false; }else{ - jQuery('#stDescricaoNorma').val(jQuery('#stNorma').html()); + jQuery("#stDescricaoNormaHistorico").val(jQuery("#stNormaHistorico").html()); + jQuery("#stDescricaoNorma").val(jQuery("#stNorma").html()); return true; }; } diff --git a/gestaoAdministrativa/fontes/PHP/CGM/instancias/logradouro/LSManterLogradouro.php b/gestaoAdministrativa/fontes/PHP/CGM/instancias/logradouro/LSManterLogradouro.php index ce81754..52ac393 100644 --- a/gestaoAdministrativa/fontes/PHP/CGM/instancias/logradouro/LSManterLogradouro.php +++ b/gestaoAdministrativa/fontes/PHP/CGM/instancias/logradouro/LSManterLogradouro.php @@ -66,9 +66,10 @@ if ($request->get('nomForm')) { $stLink .= "&nomForm=".$request->get("nomForm");} //MONTA OS FILTROS -if ($request->get("inCodigoBairro")) { - $obRCIMLogradouro->setBairro( $request->get("inCodigoBairro") ); - $stLink .= "&inCodigoBairro=".$request->get("inCodigoBairro"); +$inCodBairro = ($request->get("inCodigoBairro") != '') ? $request->get("inCodigoBairro") : $request->get("inCodBairro"); +if ($inCodBairro != '' ) { + $obRCIMLogradouro->setBairro( $inCodBairro ); + $stLink .= "&inCodigoBairro=".$inCodBairro; } if ($request->get("stCEP")) { $obRCIMLogradouro->setCEP( $request->get("stCEP") ); diff --git a/gestaoAdministrativa/fontes/PHP/CGM/instancias/logradouro/OCManterLogradouro.php b/gestaoAdministrativa/fontes/PHP/CGM/instancias/logradouro/OCManterLogradouro.php index 6577dad..fb2c6b6 100644 --- a/gestaoAdministrativa/fontes/PHP/CGM/instancias/logradouro/OCManterLogradouro.php +++ b/gestaoAdministrativa/fontes/PHP/CGM/instancias/logradouro/OCManterLogradouro.php @@ -241,8 +241,70 @@ function montaListaCEP($arListaCEP, $boRetorna = false, $boExcluir = true) function montaListaHistorico($arDadosHistorico) { - GLOBAL $request; + if ($_REQUEST['stAcao'] != 'consultar') { + include_once '../../../../../../gestaoAdministrativa/fontes/PHP/normas/classes/componentes/IPopUpNorma.class.php'; + $obTxtNomeAnterior = new TextBox; + $obTxtNomeAnterior->setRotulo ( "*Nome Anterior" ); + $obTxtNomeAnterior->setTitle ( "Nome na qual o logradouro era chamado anteriormente" ); + $obTxtNomeAnterior->setName ( "stNomeLogradouroAnterior" ); + $obTxtNomeAnterior->setId ( "stNomeLogradouroAnterior" ); + $obTxtNomeAnterior->setSize ( 70 ); + $obTxtNomeAnterior->setMaxLength ( 60 ); + $obTxtNomeAnterior->setNull ( false ); + $obTxtNomeAnterior->setValue ( str_replace('\\', '', $_REQUEST["stNomeLogradouroAnterior"])); + + $obIPopUpNorma = new IPopUpNorma(); + $obIPopUpNorma->obInnerNorma->setRotulo ( "**Norma" ); + $obIPopUpNorma->obInnerNorma->setTitle ( "Informe a Norma que determinou o Nome do Logradouro." ); + $obIPopUpNorma->obInnerNorma->setId ( "stNormaHistorico" ); + $obIPopUpNorma->obInnerNorma->obCampoCod->setId ( "inCodNormaHistorico" ); + $obIPopUpNorma->obInnerNorma->obCampoCod->setName( "inCodNormaHistorico" ); + $obIPopUpNorma->obInnerNorma->setNull ( true ); + + $obDtInicial = new Data(); + $obDtInicial->setRotulo ( "**Data Inicial" ); + $obDtInicial->setTitle ( "Informe a Data Inicial do Nome do Logradouro." ); + $obDtInicial->setName ( "stDataInicialHistorico" ); + $obDtInicial->setId ( "stDataInicialHistorico" ); + $obDtInicial->setMaxLength ( 10 ); + $obDtInicial->setSize ( 10 ); + + $obDtFinal = new Data(); + $obDtFinal->setRotulo ( "**Data Final" ); + $obDtFinal->setTitle ( "Informe a Data Final do Nome do Logradouro." ); + $obDtFinal->setName ( "stDataFinalHistorico" ); + $obDtFinal->setId ( "stDataFinalHistorico" ); + $obDtFinal->setMaxLength ( 10 ); + $obDtFinal->setSize ( 10 ); + + //Botoes da lista + $obOkLista = new Ok(false); + $obOkLista->setRotulo('Incluir'); + $obOkLista->setValue ('Incluir'); + $obOkLista->setId ('btIncluir'); + $obOkLista->setName ('btIncluir'); + $obOkLista->obEvento->setOnClick(" if ( validaCamposLista() ){ manterHistorico('incluirHistoricoLista'); }"); + + $obLimparLista = new Button(); + $obLimparLista->setId ('btLimpaLista'); + $obLimparLista->setName ('btLimpaLista'); + $obLimparLista->setValue ('Limpar'); + $obLimparLista->obEvento->setOnClick(" manterHistorico('limparHistoricoLista'); "); + + $obFormulario = new Formulario(); + $obFormulario->addTitulo ( "Histórico de Nome do Logradouro" ); + $obFormulario->addComponente ( $obTxtNomeAnterior ); + $obIPopUpNorma->geraFormulario ( $obFormulario ); + $obFormulario->addComponente ( $obDtInicial ); + $obFormulario->addComponente ( $obDtFinal ); + $obFormulario->defineBarra ( array( $obOkLista, $obLimparLista ), 'center' ); + $obFormulario->montaInnerHTML(); + $stHTMLHistorico = $obFormulario->getHTML(); + + $js .= "jq_(\"#spanListarHistorico\").html('".$stHTMLHistorico."'); \n"; + } + $rsLista = new RecordSet(); $rsLista->preenche($arDadosHistorico); @@ -305,32 +367,34 @@ function montaListaHistorico($arDadosHistorico) $obLista->ultimoDado->setCampo( "descricao_norma" ); $obLista->commitDado(); - $obLista->addCabecalho(); - $obLista->ultimoCabecalho->addConteudo("Ação"); - $obLista->ultimoCabecalho->setWidth( 3 ); - $obLista->commitCabecalho(); + if ($_REQUEST['stAcao'] != 'consultar') { + $obLista->addCabecalho(); + $obLista->ultimoCabecalho->addConteudo("Ação"); + $obLista->ultimoCabecalho->setWidth( 3 ); + $obLista->commitCabecalho(); + + $obLista->addAcao(); + $obLista->ultimaAcao->setAcao( "ALTERAR" ); + $obLista->ultimaAcao->setFuncao( true ); + $obLista->ultimaAcao->setLink( " JavaScript:modificaDado('alterarHistoricoLista'); " ); + $obLista->ultimaAcao->addCampo("1" , "inId"); + $obLista->commitAcao(); + + $obLista->addAcao(); + $obLista->ultimaAcao->setAcao( "EXCLUIR" ); + $obLista->ultimaAcao->setFuncao( true ); + $obLista->ultimaAcao->setLink( " JavaScript:modificaDado('excluirHistoricoLista'); " ); + $obLista->ultimaAcao->addCampo("1" , "inId"); + $obLista->commitAcao(); + } - $obLista->addAcao(); - $obLista->ultimaAcao->setAcao( "ALTERAR" ); - $obLista->ultimaAcao->setFuncao( true ); - $obLista->ultimaAcao->setLink( " JavaScript:modificaDado('alterarHistoricoLista'); " ); - $obLista->ultimaAcao->addCampo("1" , "inId"); - $obLista->commitAcao(); - - $obLista->addAcao(); - $obLista->ultimaAcao->setAcao( "EXCLUIR" ); - $obLista->ultimaAcao->setFuncao( true ); - $obLista->ultimaAcao->setLink( " JavaScript:modificaDado('excluirHistoricoLista'); " ); - $obLista->ultimaAcao->addCampo("1" , "inId"); - $obLista->commitAcao(); - - $obLista->montaHTML (); - $stHTML = $obLista->getHtml ( ); - $stHTML = str_replace ( "\n","",$stHTML ); - $stHTML = str_replace ( " ","",$stHTML ); - $stHTML = str_replace ( "'","\\'",$stHTML); + $obLista->montaHTML(); + $stHTMLLista = $obLista->getHtml(); + $stHTMLLista = str_replace( "\n","",$stHTMLLista ); + $stHTMLLista = str_replace( " ","",$stHTMLLista ); + $stHTMLLista = str_replace( "'","\\'",$stHTMLLista ); - $js .= "jq_('#spanListarHistorico').html('".$stHTML."'); \n"; + $js .= "jq_('#spanListarHistorico').append('".$stHTMLLista."'); \n"; return $js; @@ -410,17 +474,24 @@ function carregaDados() break; case 'alterar': - $stJs .= " jq_('#inCodigoLogradouro').html(".$request->get('inCodigoLogradouro')."); "; - $stJs .= " jq_('#stNomeUF').html('".$request->get('stNomeUF')."'); "; - $stJs .= " jq_('#stNomeMunicipio').html('".$request->get('stNomeMunicipio')."'); "; - $stJs .= " jq_('#inCodTipo').val(".$request->get('inCodigoTipo')."); "; - $obRCIMLogradouro = new RCIMLogradouro; $obRCIMLogradouro->setCodigoUF( $request->get("inCodUF") ); $obRCIMLogradouro->setCodigoMunicipio( $request->get("inCodMunicipio") ); $obRCIMLogradouro->setCodigoLogradouro( $request->get("inCodigoLogradouro") ); $obRCIMLogradouro->listarHistoricoLogradouros( $rsLista, $boTransacao, "" ); + + $stJs .= " jq_('#inCodigoLogradouro').html(".$request->get('inCodigoLogradouro')."); "; + $stJs .= " jq_('#stNomeUF').html('".$request->get('stNomeUF')."'); "; + $stJs .= " jq_('#stNomeMunicipio').html('".$request->get('stNomeMunicipio')."'); "; + $stJs .= " jq_('#inCodTipo').val(".$request->get('inCodigoTipo')."); "; + //buscando o ultimo dado cadastrado de acordo com a data inicial e final + $rsLista->setUltimoElemento(); + $stJs .= " jq_('#inCodNorma').val(".$rsLista->getCampo('cod_norma')."); "; + $stJs .= " jq_('#stNorma').html('".$rsLista->getCampo('descricao_norma')."'); "; + $stJs .= " jq_('#stDataInicial').val('".$rsLista->getCampo('dt_inicio')."'); "; + $stJs .= " jq_('#stDataFinal').val('".$rsLista->getCampo('dt_fim')."'); "; + foreach ($rsLista->getElementos() as $key => $value) { $arDadosHistorico[$key]['inId'] = $key; $arDadosHistorico[$key]['sequencial'] = $value['sequencial']; @@ -441,7 +512,26 @@ function carregaDados() $stJs .= " jq_('#stExtensao').html(".$rsRecordSet->getCampo('extensao_total')."); "; } break; - case 'consultar': + case 'consultar': + $obRCIMLogradouro = new RCIMLogradouro; + $obRCIMLogradouro->setCodigoUF( $request->get("inCodUF") ); + $obRCIMLogradouro->setCodigoMunicipio( $request->get("inCodMunicipio") ); + $obRCIMLogradouro->setCodigoLogradouro( $request->get("inCodigoLogradouro") ); + $obRCIMLogradouro->listarHistoricoLogradouros( $rsLista, $boTransacao, "" ); + + foreach ($rsLista->getElementos() as $key => $value) { + $arDadosHistorico[$key]['inId'] = $key; + $arDadosHistorico[$key]['sequencial'] = $value['sequencial']; + $arDadosHistorico[$key]['descricao_norma'] = $value['descricao_norma']; + $arDadosHistorico[$key]['nome_anterior'] = $value['nome_anterior']; + $arDadosHistorico[$key]['dt_inicio'] = $value['dt_inicio']; + $arDadosHistorico[$key]['dt_fim'] = $value['dt_fim']; + $arDadosHistorico[$key]['exercicio'] = $value['exercicio']; + $arDadosHistorico[$key]['cod_norma'] = $value['cod_norma']; + } + + Sessao::write('arDadosHistorico',$arDadosHistorico); + $stFiltro = ' WHERE cod_logradouro = '.$request->get('inCodigoLogradouro'); $obTCIMTrecho = new TCIMTrecho(); $obTCIMTrecho->retornaSomaExtensao($rsRecordSet, $stFiltro); @@ -478,28 +568,28 @@ function validaInclusaoLista($arDados) $boValida = true; foreach ($arDados as $key => $value) { if ($boValida == true) { - if ( $_REQUEST['inCodNorma'] == $value['cod_norma'] && - $_REQUEST['stDataInicial'] == $value['dt_inicio'] && - $_REQUEST['stDataFinal'] == $value['dt_fim'] && + if ( $_REQUEST['inCodNormaHistorico'] == $value['cod_norma'] && + $_REQUEST['stDataInicialHistorico'] == $value['dt_inicio'] && + $_REQUEST['stDataFinalHistorico'] == $value['dt_fim'] && $_REQUEST['stNomeLogradouroAnterior'] == $value['nome_anterior'] ) { $boValida = false; SistemaLegado::executaFrameOculto("alertaAviso('Não foi possível incluir porque o registro já existe na lista!','form','erro','".Sessao::getId()."','../');"); }else{ - if ( $_REQUEST['stDataFinal'] == '' ) { - if($_REQUEST['stDataFinal'] == $value['dt_fim']) { + if ( $_REQUEST['stDataFinalHistorico'] == '' ) { + if($_REQUEST['stDataFinalHistorico'] == $value['dt_fim']) { $stMensagem = "A data final deve ser preenchida."; $boValida = false; } } else { if ( $value['dt_fim'] != '') { - if (SistemaLegado::comparaDatas($_REQUEST['stDataFinal'],$value['dt_inicio'],false)) { - if (!SistemaLegado::comparaDatas($_REQUEST['stDataInicial'],$value['dt_fim'],false)) { + if (SistemaLegado::comparaDatas($_REQUEST['stDataFinalHistorico'],$value['dt_inicio'],false)) { + if (!SistemaLegado::comparaDatas($_REQUEST['stDataInicialHistorico'],$value['dt_fim'],false)) { $stMensagem = "A data inicial deve ser maior que a data final dos registros cadastrados"; $boValida = false; } }else{ - if (!SistemaLegado::comparaDatas($_REQUEST['stDataFinal'],$value['dt_inicio'],true)) { + if (!SistemaLegado::comparaDatas($_REQUEST['stDataFinalHistorico'],$value['dt_inicio'],true)) { $boValida = true; }else{ $stMensagem = "A data final deve ser menor que a data inicial dos registros cadastrados"; @@ -519,10 +609,10 @@ function validaInclusaoLista($arDados) function limparHistoricoLista() { $stJs = "jq_('#stNomeLogradouroAnterior').val(''); \n"; - $stJs .= "jq_('#inCodNorma').val(''); \n"; - $stJs .= "jq_('#stNorma').html(' '); \n"; - $stJs .= "jq_('#stDataInicial').val(''); \n"; - $stJs .= "jq_('#stDataFinal').val(''); \n"; + $stJs .= "jq_('#inCodNormaHistorico').val(''); \n"; + $stJs .= "jq_('#stNormaHistorico').html(' '); \n"; + $stJs .= "jq_('#stDataInicialHistorico').val(''); \n"; + $stJs .= "jq_('#stDataFinalHistorico').val(''); \n"; return $stJs ; } @@ -914,7 +1004,7 @@ switch ($request->get("stCtrl")) { $stJs .= carregaDados(); - $stJs .= montaListaHistorico($arDadosHistorico); + $stJs .= montaListaHistorico(Sessao::read("arDadosHistorico")); SistemaLegado::executaFrameOculto($stJs); break; @@ -936,24 +1026,30 @@ switch ($request->get("stCtrl")) { case 'verificaCodigoLogradouro': $inCodLogradouro = $request->get('inCodLogradouro'); - - if (empty($inCodLogradouro)) { - $stJs .= "f.submit();"; - SistemaLegado::executaFrameOculto($stJs); - break; + if ( $request->get('inCodNorma') == '' || $request->get('stDataInicial') == '') { + $stMensagem = "Preencha todos os campos obrigatórios"; } + if ( $stMensagem == '') { + if (empty($inCodLogradouro)) { + $stJs .= "f.submit();"; + SistemaLegado::executaFrameOculto($stJs); + break; + } - $obRCIMLogradouro = new RCIMLogradouro; - $obRCIMLogradouro->setCodigoLogradouro($inCodLogradouro); - $obRCIMLogradouro->consultarLogradouro($rsLogradouro); - - if ($rsLogradouro->inNumLinhas > 0) { - $obTLogradouro= new TLogradouro(); - $obTLogradouro->proximoCod($inProxCodLogradouro); + $obRCIMLogradouro = new RCIMLogradouro; + $obRCIMLogradouro->setCodigoLogradouro($inCodLogradouro); + $obRCIMLogradouro->consultarLogradouro($rsLogradouro); - $stJs .= "if (confirm('O Código ".$inCodLogradouro." já foi utilizado. Deseja utilizar próximo código: ".$inProxCodLogradouro."')) { f.submit(); } else { false; };"; - } else { - $stJs .= "f.submit();"; + if ($rsLogradouro->getNumLinhas() > 0) { + $obTLogradouro= new TLogradouro(); + $obTLogradouro->proximoCod($inProxCodLogradouro); + + $stJs .= "if (confirm('O Código ".$inCodLogradouro." já foi utilizado. Deseja utilizar próximo código: ".$inProxCodLogradouro."')) { f.submit(); } else { false; };"; + } else { + $stJs .= " jq_('#stDescricaoNorma').val(jq_('#stNorma').html()); f.submit();"; + } + }else{ + $stJs = "alertaAviso('".$stMensagem."','n_incluir','aviso','".Sessao::getId()."'); "; } SistemaLegado::executaFrameOculto($stJs); @@ -974,25 +1070,26 @@ switch ($request->get("stCtrl")) { } if ($boValida) { - $stDescricaoLei = $_REQUEST['inCodNorma'].' - '.$_REQUEST['stDescricaoNorma']; + $stDescricaoLei = $_REQUEST['inCodNormaHistorico'].' - '.$_REQUEST['stDescricaoNormaHistorico']; $arDadosHistorico[$inProx]['inId'] = $inProx; $arDadosHistorico[$inProx]['sequencial'] = ''; $arDadosHistorico[$inProx]['descricao_norma'] = $stDescricaoLei; $arDadosHistorico[$inProx]['nome_anterior'] = $request->get('stNomeLogradouroAnterior'); - $arDadosHistorico[$inProx]['dt_inicio'] = $request->get('stDataInicial'); - $arDadosHistorico[$inProx]['dt_fim'] = $request->get('stDataFinal'); + $arDadosHistorico[$inProx]['dt_inicio'] = $request->get('stDataInicialHistorico'); + $arDadosHistorico[$inProx]['dt_fim'] = $request->get('stDataFinalHistorico'); $arDadosHistorico[$inProx]['exercicio'] = Sessao::getExercicio(); - $arDadosHistorico[$inProx]['cod_norma'] = $request->get('inCodNorma'); + $arDadosHistorico[$inProx]['cod_norma'] = $request->get('inCodNormaHistorico'); ordenaArrayDados($arDadosHistorico); Sessao::write('arDadosHistorico',$arDadosHistorico); $stJs = montaListaHistorico($arDadosHistorico); - $stJs .= " jq_('#inCodNorma').val(''); \n"; - $stJs .= " jq_('#stNorma').html(' '); \n"; - $stJs .= " jq_('#stDataInicial').val(''); \n"; - $stJs .= " jq_('#stDataFinal').val(''); \n"; + $stJs .= " jq_('#stNomeLogradouroAnterior').val(''); \n"; + $stJs .= " jq_('#inCodNormaHistorico').val(''); \n"; + $stJs .= " jq_('#stNormaHistorico').html(' '); \n"; + $stJs .= " jq_('#stDataInicialHistorico').val(''); \n"; + $stJs .= " jq_('#stDataFinalHistorico').val(''); \n"; } SistemaLegado::executaFrameOculto($stJs); @@ -1004,13 +1101,12 @@ switch ($request->get("stCtrl")) { foreach ($arDadosHistorico as $key => $value) { if ($_REQUEST['inId'] == $value['inId']) { $stJs = " jq_('#stNomeLogradouroAnterior').val('".$value['nome_anterior']."'); \n"; - $stJs .= " jq_('#inCodNorma').val('".$value['cod_norma']."'); \n"; - $stJs .= " jq_('#inCodNorma').blur(); \n"; - $stJs .= " jq_('#stDataInicial').val('".$value['dt_inicio']."'); \n"; - $stJs .= " jq_('#stDataFinal').val('".$value['dt_fim']."'); \n"; + $stJs .= " jq_('#inCodNormaHistorico').val('".$value['cod_norma']."'); \n"; + $stJs .= " jq_('#inCodNormaHistorico').blur(); \n"; + $stJs .= " jq_('#stDataInicialHistorico').val('".$value['dt_inicio']."'); \n"; + $stJs .= " jq_('#stDataFinalHistorico').val('".$value['dt_fim']."'); \n"; $stJs .= " jq_('#btIncluir').val('Alterar'); \n"; $stJs .= " jq_('#btIncluir').attr('onclick','if ( validaCamposLista() ){ manterHistorico(\'alterarListaHistorico\');}'); \n"; - $stJs .= " jq_('#btIncluir').attr('disabled',true); \n"; } } @@ -1045,14 +1141,14 @@ switch ($request->get("stCtrl")) { foreach ($arDadosHistorico as $key => $value) { if ($_REQUEST['inId'] == $value['inId']) { - $stDescricaoLei = $_REQUEST['inCodNorma'].' - '.$_REQUEST['stDescricaoNorma']; + $stDescricaoLei = $_REQUEST['inCodNormaHistorico'].' - '.$_REQUEST['stDescricaoNormaHistorico']; $arDadosHistorico[$key]['inId'] = $value['inId']; $arDadosHistorico[$key]['descricao_norma'] = $stDescricaoLei; $arDadosHistorico[$key]['nome_anterior'] = $request->get('stNomeLogradouroAnterior'); - $arDadosHistorico[$key]['dt_inicio'] = $request->get('stDataInicial'); - $arDadosHistorico[$key]['dt_fim'] = $request->get('stDataFinal'); + $arDadosHistorico[$key]['dt_inicio'] = $request->get('stDataInicialHistorico'); + $arDadosHistorico[$key]['dt_fim'] = $request->get('stDataFinalHistorico'); $arDadosHistorico[$key]['exercicio'] = Sessao::getExercicio(); - $arDadosHistorico[$key]['cod_norma'] = $request->get('inCodNorma'); + $arDadosHistorico[$key]['cod_norma'] = $request->get('inCodNormaHistorico'); } } diff --git a/gestaoAdministrativa/fontes/PHP/CGM/instancias/logradouro/PRManterLogradouro.php b/gestaoAdministrativa/fontes/PHP/CGM/instancias/logradouro/PRManterLogradouro.php index b19e77a..0fffb25 100644 --- a/gestaoAdministrativa/fontes/PHP/CGM/instancias/logradouro/PRManterLogradouro.php +++ b/gestaoAdministrativa/fontes/PHP/CGM/instancias/logradouro/PRManterLogradouro.php @@ -64,7 +64,7 @@ switch ( $request->get('stAcao') ) { $obRCIMLogradouro->setCodigoLogradouro( $request->get("inCodLogradouro") ); $obRCIMLogradouro->consultarLogradouro($rsLogradouro); - if ($rsLogradouro->inNumLinhas > 0) { + if ($rsLogradouro->getNumLinhas() > 0) { $obTLogradouro= new TLogradouro(); $obTLogradouro->proximoCod($inProxCodLogradouro); $obRCIMLogradouro->setCodigoLogradouro($inProxCodLogradouro); @@ -75,6 +75,17 @@ switch ( $request->get('stAcao') ) { $arBairrosSessao = Sessao::read('bairros'); $arCepSessao = Sessao::read('cep'); $arDadosHistorico = Sessao::read('arDadosHistorico'); + //Adicionar dados da inclusao do logradouro no array de historico geral + $arDadosIncluir['inId'] = count($arDadosHistorico); + $arDadosIncluir['sequencial'] = ''; + $arDadosIncluir['descricao_norma'] = $request->get('stDescricaoNorma'); + //adicionando nome da inclusao no campos de nome_anterior do historico pq faz parte de um todo + $arDadosIncluir['nome_anterior'] = $request->get('stNomeLogradouro'); + $arDadosIncluir['dt_inicio'] = $request->get('stDataInicial'); + $arDadosIncluir['dt_fim'] = $request->get('stDataFinal'); + $arDadosIncluir['exercicio'] = Sessao::getExercicio(); + $arDadosIncluir['cod_norma'] = $request->get('inCodNorma'); + $arDadosHistorico[] = $arDadosIncluir; if ( count ($arBairrosSessao) < 1 ) { @@ -118,6 +129,8 @@ switch ( $request->get('stAcao') ) { $obErro = $obRCIMLogradouro->incluirLogradouro(); } + $inProxCodLogradouro = ($inProxCodLogradouro == '') ? $request->get('inCodLogradouro') : $inProxCodLogradouro; + if ( !$obErro->ocorreu() ) { SistemaLegado::alertaAviso($pgForm."?stAcao=".$request->get('stAcao'),"Logradouro: ".$inProxCodLogradouro." - ".$request->get("stNomeLogradouro"),"incluir","aviso",Sessao::getId(),"../"); } else { @@ -126,6 +139,19 @@ switch ( $request->get('stAcao') ) { break; case "alterar": $obErro = new Erro; + $arDadosHistorico = Sessao::read('arDadosHistorico'); + $arDadosHistorico = ($arDadosHistorico == '') ? array() : $arDadosHistorico; + $arTmp = end($arDadosHistorico); + foreach ($arDadosHistorico as $key => $value) { + if ( $value['inId'] == $arTmp['inId']) { + $arDadosHistorico[$key]['descricao_norma'] = $request->get('stDescricaoNorma'); + $arDadosHistorico[$key]['nome_anterior'] = $request->get('stNomeLogradouro'); + $arDadosHistorico[$key]['dt_inicio'] = $request->get('stDataInicial'); + $arDadosHistorico[$key]['dt_fim'] = $request->get('stDataFinal'); + $arDadosHistorico[$key]['exercicio'] = Sessao::getExercicio(); + $arDadosHistorico[$key]['cod_norma'] = $request->get('inCodNorma'); + } + } $obRCIMLogradouro->setCodigoLogradouro ( $request->get("inCodigoLogradouro") ); $obRCIMLogradouro->setCodigoUF ( $request->get('inCodUF') ); @@ -133,7 +159,7 @@ switch ( $request->get('stAcao') ) { $obRCIMLogradouro->setNomeLogradouro ( $request->get("stNomeLogradouro") ); $obRCIMLogradouro->setCodigoTipo ( $request->get("inCodigoTipo") ); $obRCIMLogradouro->setCEP ( Sessao::read('cep') ); - $obRCIMLogradouro->setDadosHistorico ( Sessao::read('arDadosHistorico') ); + $obRCIMLogradouro->setDadosHistorico ( $arDadosHistorico ); $obErro = $obRCIMLogradouro->addBairro( Sessao::read('bairros'), $boTransacao ); if ( $obErro->ocorreu() ) { diff --git a/gestaoAdministrativa/fontes/PHP/CGM/instancias/processamento/OCProcurarCgm.php b/gestaoAdministrativa/fontes/PHP/CGM/instancias/processamento/OCProcurarCgm.php index 7cdde08..96c3346 100755 --- a/gestaoAdministrativa/fontes/PHP/CGM/instancias/processamento/OCProcurarCgm.php +++ b/gestaoAdministrativa/fontes/PHP/CGM/instancias/processamento/OCProcurarCgm.php @@ -30,7 +30,7 @@ * @author Analista: Cassiano * @author Desenvolvedor: Cassiano -$Id: OCProcurarCgm.php 59612 2014-09-02 12:00:51Z gelson $ +$Id: OCProcurarCgm.php 63969 2015-11-12 18:43:12Z evandro $ $Revision: 26876 $ $Name$ $Author: hboaventura $ @@ -63,6 +63,10 @@ function buscaPopup() $stFiltroVinculado = $arCampo['stFiltroVinculado']; + if ( $request->get('stTabelaVinculo') == 'patrimonio.bem_responsavel') { + $stFiltroVinculado .= " AND tabela_vinculo.dt_fim IS NULL "; + } + if ($_REQUEST['buscaContrato']) { $stFiltro .= retornaFiltroBuscaContratos(); } diff --git a/gestaoAdministrativa/fontes/PHP/CGM/popups/cgm/FMManterCgm.php b/gestaoAdministrativa/fontes/PHP/CGM/popups/cgm/FMManterCgm.php index 2a76dd4..4158a03 100644 --- a/gestaoAdministrativa/fontes/PHP/CGM/popups/cgm/FMManterCgm.php +++ b/gestaoAdministrativa/fontes/PHP/CGM/popups/cgm/FMManterCgm.php @@ -67,8 +67,6 @@ if ( !$rsPermissaoIncluirInterno->eof() ) { $boPermissao = true; } -//SistemaLegado::mostravar( $_REQUEST ); - $obForm = new Form; $obForm->setAction( $pgProc ); $obForm->setTarget( "oculto" ); diff --git a/gestaoAdministrativa/fontes/PHP/CGM/popups/cgm/LSProcurarCgm.php b/gestaoAdministrativa/fontes/PHP/CGM/popups/cgm/LSProcurarCgm.php index 5e6d42c..8aba3cc 100755 --- a/gestaoAdministrativa/fontes/PHP/CGM/popups/cgm/LSProcurarCgm.php +++ b/gestaoAdministrativa/fontes/PHP/CGM/popups/cgm/LSProcurarCgm.php @@ -32,7 +32,7 @@ Casos de uso: uc-01.02.92, uc-02.08.05 - $Id: LSProcurarCgm.php 63681 2015-09-29 17:48:28Z evandro $ + $Id: LSProcurarCgm.php 63969 2015-11-12 18:43:12Z evandro $ */ include_once '../../../../../../gestaoAdministrativa/fontes/PHP/pacotes/FrameworkHTML.inc.php'; @@ -205,6 +205,9 @@ if ($arCampo['FLIPopUpCGMVinculado'] !="") { if ($arCampo['stFiltroVinculado'] !="") { $stFiltroVinculado.= $arCampo['stFiltroVinculado']; } +if ( $request->get('stTabelaVinculo') == 'patrimonio.bem_responsavel' ) { + $stFiltroVinculado .= " AND tabela_vinculo.dt_fim IS NULL"; +} if ( $request->get('stTabelaVinculo') ) { switch ($request->get('stTipoBusca')) { diff --git a/gestaoAdministrativa/fontes/PHP/CGM/popups/cgm/OCManterCgm.php b/gestaoAdministrativa/fontes/PHP/CGM/popups/cgm/OCManterCgm.php index 47b24f1..f01c5a6 100644 --- a/gestaoAdministrativa/fontes/PHP/CGM/popups/cgm/OCManterCgm.php +++ b/gestaoAdministrativa/fontes/PHP/CGM/popups/cgm/OCManterCgm.php @@ -47,8 +47,6 @@ include_once(CAM_GA_ADM_COMPONENTES."ISelectUF.class.php"); include_once(CAM_GP_FRO_COMPONENTES."ISelectCategoriaHabilitacao.class.php"); include_once(CAM_GRH_PES_COMPONENTES."ITextBoxPISPASEP.class.php"); -SistemaLegado::mostravar($_REQUEST); - function montaDadosPorTipo() { $stTipo = $_REQUEST['boPessoa']; diff --git a/gestaoAdministrativa/fontes/PHP/CGM/popups/cgm/PRManterCgm.php b/gestaoAdministrativa/fontes/PHP/CGM/popups/cgm/PRManterCgm.php index 0ac6076..0f3b5f2 100755 --- a/gestaoAdministrativa/fontes/PHP/CGM/popups/cgm/PRManterCgm.php +++ b/gestaoAdministrativa/fontes/PHP/CGM/popups/cgm/PRManterCgm.php @@ -47,8 +47,6 @@ include_once(CAM_GA_CGM_MAPEAMENTO."TCGMPessoaJuridica.class.php"); include_once(CAM_GA_CGM_MAPEAMENTO."TCGMAtributoValor.class.php"); include_once(CAM_GA_ADM_MAPEAMENTO."TAdministracaoLogradouro.class.php"); -//SistemaLegado::mostravar( $_POST ); - $stAcao = $request->get('stAcao'); //Define o nome dos arquivos PHP diff --git a/gestaoAdministrativa/fontes/PHP/CSE/cse/classTratamento/alteraClassTratamento.php b/gestaoAdministrativa/fontes/PHP/CSE/cse/classTratamento/alteraClassTratamento.php index e6f1538..7701685 100755 --- a/gestaoAdministrativa/fontes/PHP/CSE/cse/classTratamento/alteraClassTratamento.php +++ b/gestaoAdministrativa/fontes/PHP/CSE/cse/classTratamento/alteraClassTratamento.php @@ -214,7 +214,6 @@ $nomClassTratamento = pegaDado("nom_classificacao","cse.classificacao_tratamento //Inclusão, alteração ou exclusão de dados case 2: - //mostraVar($HTTP_POST_VARS); $js = ""; $ok = true; //Verifica se já existe o registro a ser incluido diff --git a/gestaoAdministrativa/fontes/PHP/CSE/cse/classTratamento/excluiClassTratamento.php b/gestaoAdministrativa/fontes/PHP/CSE/cse/classTratamento/excluiClassTratamento.php index 31aa3db..444439e 100755 --- a/gestaoAdministrativa/fontes/PHP/CSE/cse/classTratamento/excluiClassTratamento.php +++ b/gestaoAdministrativa/fontes/PHP/CSE/cse/classTratamento/excluiClassTratamento.php @@ -169,7 +169,6 @@ $conn->vaiPrimeiro(); //Inclusão, alteração ou exclusão de dados case 1: - //mostraVar($HTTP_POST_VARS); $js = ""; $ok = true; $obj = new cse(); diff --git a/gestaoAdministrativa/fontes/PHP/CSE/cse/classTratamento/incluiClassTratamento.php b/gestaoAdministrativa/fontes/PHP/CSE/cse/classTratamento/incluiClassTratamento.php index eee94f9..098d48a 100755 --- a/gestaoAdministrativa/fontes/PHP/CSE/cse/classTratamento/incluiClassTratamento.php +++ b/gestaoAdministrativa/fontes/PHP/CSE/cse/classTratamento/incluiClassTratamento.php @@ -113,7 +113,6 @@ case 0: //Inclusão, alteração ou exclusão de dados case 1: - //mostraVar($HTTP_POST_VARS); $js = ""; $ok = true; //Verifica se já existe o registro a ser incluido diff --git a/gestaoAdministrativa/fontes/PHP/CSE/cse/deficiencia/alteraDeficiencia.php b/gestaoAdministrativa/fontes/PHP/CSE/cse/deficiencia/alteraDeficiencia.php index 98e40e2..ad09431 100755 --- a/gestaoAdministrativa/fontes/PHP/CSE/cse/deficiencia/alteraDeficiencia.php +++ b/gestaoAdministrativa/fontes/PHP/CSE/cse/deficiencia/alteraDeficiencia.php @@ -212,7 +212,6 @@ $nomDeficiencia = pegaDado("nom_deficiencia","cse.deficiencia","Where cod_defici //Inclusão, alteração ou exclusão de dados case 2: - //mostraVar($HTTP_POST_VARS); $js = ""; $ok = true; //Verifica se já existe o registro a ser incluido diff --git a/gestaoAdministrativa/fontes/PHP/CSE/cse/deficiencia/excluiDeficiencia.php b/gestaoAdministrativa/fontes/PHP/CSE/cse/deficiencia/excluiDeficiencia.php index 0cb4266..f2bb781 100755 --- a/gestaoAdministrativa/fontes/PHP/CSE/cse/deficiencia/excluiDeficiencia.php +++ b/gestaoAdministrativa/fontes/PHP/CSE/cse/deficiencia/excluiDeficiencia.php @@ -171,7 +171,6 @@ onClick=\"alertaQuestao('".CAM_CSE."cse/deficiencia/excluiDeficiencia.php?".$ses //Inclusão, alteração ou exclusão de dados case 1: - //mostraVar($HTTP_POST_VARS); $js = ""; $ok = true; $cse = new cse(); diff --git a/gestaoAdministrativa/fontes/PHP/CSE/cse/deficiencia/incluiDeficiencia.php b/gestaoAdministrativa/fontes/PHP/CSE/cse/deficiencia/incluiDeficiencia.php index cfbd15d..4975c52 100755 --- a/gestaoAdministrativa/fontes/PHP/CSE/cse/deficiencia/incluiDeficiencia.php +++ b/gestaoAdministrativa/fontes/PHP/CSE/cse/deficiencia/incluiDeficiencia.php @@ -113,7 +113,6 @@ case 0: //Inclusão, alteração ou exclusão de dados case 1: - //mostraVar($HTTP_POST_VARS); $js = ""; $ok = true; //Verifica se já existe o registro a ser incluido diff --git a/gestaoAdministrativa/fontes/PHP/CSE/cse/empresa/alteraEmpresa.php b/gestaoAdministrativa/fontes/PHP/CSE/cse/empresa/alteraEmpresa.php index f8b74eb..1625a90 100755 --- a/gestaoAdministrativa/fontes/PHP/CSE/cse/empresa/alteraEmpresa.php +++ b/gestaoAdministrativa/fontes/PHP/CSE/cse/empresa/alteraEmpresa.php @@ -223,7 +223,6 @@ $cnpj = pegaDado("cnpj","cse.empresa","Where cod_empresa = '".$codEmpresa."' "); //Inclusão, alteração ou exclusão de dados case 2: - //mostraVar($HTTP_POST_VARS); $js = ""; $ok = true; $vet = $HTTP_POST_VARS; diff --git a/gestaoAdministrativa/fontes/PHP/CSE/cse/empresa/excluiEmpresa.php b/gestaoAdministrativa/fontes/PHP/CSE/cse/empresa/excluiEmpresa.php index 797622d..e36e9c1 100755 --- a/gestaoAdministrativa/fontes/PHP/CSE/cse/empresa/excluiEmpresa.php +++ b/gestaoAdministrativa/fontes/PHP/CSE/cse/empresa/excluiEmpresa.php @@ -169,7 +169,6 @@ $conn->vaiPrimeiro(); //Inclusão, alteração ou exclusão de dados case 1: - //mostraVar($HTTP_POST_VARS); $js = ""; $ok = true; $cse = new cse(); diff --git a/gestaoAdministrativa/fontes/PHP/CSE/cse/empresa/incluiEmpresa.php b/gestaoAdministrativa/fontes/PHP/CSE/cse/empresa/incluiEmpresa.php index 54034e3..26e0ecb 100755 --- a/gestaoAdministrativa/fontes/PHP/CSE/cse/empresa/incluiEmpresa.php +++ b/gestaoAdministrativa/fontes/PHP/CSE/cse/empresa/incluiEmpresa.php @@ -138,7 +138,6 @@ case 0: break; //Inclusão, alteração ou exclusão de dados case 1: - //mostraVar($HTTP_POST_VARS); $js = ""; $ok = true; $vet = $HTTP_POST_VARS; diff --git a/gestaoAdministrativa/fontes/PHP/CSE/cse/exame/alteraExame.php b/gestaoAdministrativa/fontes/PHP/CSE/cse/exame/alteraExame.php index c92ea20..2f85e17 100755 --- a/gestaoAdministrativa/fontes/PHP/CSE/cse/exame/alteraExame.php +++ b/gestaoAdministrativa/fontes/PHP/CSE/cse/exame/alteraExame.php @@ -358,7 +358,6 @@ $nomClassificacao = pegaDado("nom_classificacao","cse.classificacao_tratamento", //Inclusão, alteração ou exclusão de dados case 2: - //mostraVar($HTTP_POST_VARS); $js = ""; $ok = true; //Verifica se já existe o registro a ser incluido diff --git a/gestaoAdministrativa/fontes/PHP/CSE/cse/exame/excluiExame.php b/gestaoAdministrativa/fontes/PHP/CSE/cse/exame/excluiExame.php index 60a8a57..b4a44f1 100755 --- a/gestaoAdministrativa/fontes/PHP/CSE/cse/exame/excluiExame.php +++ b/gestaoAdministrativa/fontes/PHP/CSE/cse/exame/excluiExame.php @@ -293,7 +293,6 @@ break; //Formulário em HTML para entrada de dados //Inclusão, alteração ou exclusão de dados case 1: - //mostraVar($HTTP_POST_VARS); $js = ""; $ok = true; $cse = new cse(); diff --git a/gestaoAdministrativa/fontes/PHP/CSE/cse/exame/incluiExame.php b/gestaoAdministrativa/fontes/PHP/CSE/cse/exame/incluiExame.php index 9f3cef2..ff8dc31 100755 --- a/gestaoAdministrativa/fontes/PHP/CSE/cse/exame/incluiExame.php +++ b/gestaoAdministrativa/fontes/PHP/CSE/cse/exame/incluiExame.php @@ -176,7 +176,6 @@ case 0: //Inclusão, alteração ou exclusão de dados case 1: - //mostraVar($HTTP_POST_VARS); $js = ""; $ok = true; //Verifica se já existe o registro a ser incluido diff --git a/gestaoAdministrativa/fontes/PHP/CSE/cse/instituicaoSaude/alteraInstituicaoSaude.php b/gestaoAdministrativa/fontes/PHP/CSE/cse/instituicaoSaude/alteraInstituicaoSaude.php index 98f668d..3f66a2e 100755 --- a/gestaoAdministrativa/fontes/PHP/CSE/cse/instituicaoSaude/alteraInstituicaoSaude.php +++ b/gestaoAdministrativa/fontes/PHP/CSE/cse/instituicaoSaude/alteraInstituicaoSaude.php @@ -217,7 +217,6 @@ $nomInstituicao = pegaDado("nom_instituicao","cse.instituicao_saude","Where cod_ //Inclusão, alteração ou exclusão de dados case 2: - //mostraVar($HTTP_POST_VARS); $js = ""; $ok = true; //Verifica se já existe o registro a ser incluido diff --git a/gestaoAdministrativa/fontes/PHP/CSE/cse/instituicaoSaude/excluiInstituicaoSaude.php b/gestaoAdministrativa/fontes/PHP/CSE/cse/instituicaoSaude/excluiInstituicaoSaude.php index 612adfe..f9e23ce 100755 --- a/gestaoAdministrativa/fontes/PHP/CSE/cse/instituicaoSaude/excluiInstituicaoSaude.php +++ b/gestaoAdministrativa/fontes/PHP/CSE/cse/instituicaoSaude/excluiInstituicaoSaude.php @@ -177,7 +177,6 @@ if ($pagina > 0 and $conn->numeroDeLinhas==0) { //Inclusão, alteração ou exclusão de dados case 1: - //mostraVar($HTTP_POST_VARS); $js = ""; $ok = true; $obj = new cse(); diff --git a/gestaoAdministrativa/fontes/PHP/CSE/cse/instituicaoSaude/incluiInstituicaoSaude.php b/gestaoAdministrativa/fontes/PHP/CSE/cse/instituicaoSaude/incluiInstituicaoSaude.php index 63f206c..59b5b7c 100755 --- a/gestaoAdministrativa/fontes/PHP/CSE/cse/instituicaoSaude/incluiInstituicaoSaude.php +++ b/gestaoAdministrativa/fontes/PHP/CSE/cse/instituicaoSaude/incluiInstituicaoSaude.php @@ -113,7 +113,6 @@ case 0: //Inclusão, alteração ou exclusão de dados case 1: - //mostraVar($HTTP_POST_VARS); $js = ""; $ok = true; //Verifica se já existe o registro a ser incluido diff --git a/gestaoAdministrativa/fontes/PHP/CSE/cse/programa/alteraPrograma.php b/gestaoAdministrativa/fontes/PHP/CSE/cse/programa/alteraPrograma.php index 56bac1b..5109370 100755 --- a/gestaoAdministrativa/fontes/PHP/CSE/cse/programa/alteraPrograma.php +++ b/gestaoAdministrativa/fontes/PHP/CSE/cse/programa/alteraPrograma.php @@ -237,7 +237,6 @@ $descricao = pegaDado("descricao","cse.programa_social"," //Inclusão, alteração ou exclusão de dados case 2: - //mostraVar($HTTP_POST_VARS); $js = ""; $ok = true; //Verifica se já existe o registro a ser incluido diff --git a/gestaoAdministrativa/fontes/PHP/CSE/cse/programa/excluiPrograma.php b/gestaoAdministrativa/fontes/PHP/CSE/cse/programa/excluiPrograma.php index e9d7639..464c2aa 100755 --- a/gestaoAdministrativa/fontes/PHP/CSE/cse/programa/excluiPrograma.php +++ b/gestaoAdministrativa/fontes/PHP/CSE/cse/programa/excluiPrograma.php @@ -182,7 +182,6 @@ onClick=\"alertaQuestao('".CAM_CSE."cse/programa/excluiPrograma.php?".$sessao->i //Formulário em HTML para entrada de dados //Inclusão, alteração ou exclusão de dados case 1: - //mostraVar($HTTP_POST_VARS); $js = ""; $ok = true; $cse = new cse(); diff --git a/gestaoAdministrativa/fontes/PHP/CSE/cse/programa/incluiPrograma.php b/gestaoAdministrativa/fontes/PHP/CSE/cse/programa/incluiPrograma.php index 561584f..5a100ef 100755 --- a/gestaoAdministrativa/fontes/PHP/CSE/cse/programa/incluiPrograma.php +++ b/gestaoAdministrativa/fontes/PHP/CSE/cse/programa/incluiPrograma.php @@ -134,7 +134,6 @@ case 0: //Inclusão, alteração ou exclusão de dados case 1: - //mostraVar($HTTP_POST_VARS); $js = ""; $ok = true; //Verifica se já existe o registro a ser incluido diff --git a/gestaoAdministrativa/fontes/PHP/CSE/cse/relatorios/relatorioCidadao.php b/gestaoAdministrativa/fontes/PHP/CSE/cse/relatorios/relatorioCidadao.php index d643e57..39aad47 100755 --- a/gestaoAdministrativa/fontes/PHP/CSE/cse/relatorios/relatorioCidadao.php +++ b/gestaoAdministrativa/fontes/PHP/CSE/cse/relatorios/relatorioCidadao.php @@ -537,7 +537,7 @@ case 4: $nomCidadao = ""; } $js .= 'f.nomCidadao.value = "'.$nomCidadao.'" '; - //mostraVar($js); + break; }//fim switch diff --git a/gestaoAdministrativa/fontes/PHP/CSE/cse/relatorios/relatorioExames.php b/gestaoAdministrativa/fontes/PHP/CSE/cse/relatorios/relatorioExames.php index 4b1b20d..3a04b1f 100755 --- a/gestaoAdministrativa/fontes/PHP/CSE/cse/relatorios/relatorioExames.php +++ b/gestaoAdministrativa/fontes/PHP/CSE/cse/relatorios/relatorioExames.php @@ -355,7 +355,7 @@ case 4: $nomCidadao = ""; } $js .= 'f.nomCidadao.value = "'.$nomCidadao.'" '; - //mostraVar($js); + break; }//Fim switch diff --git a/gestaoAdministrativa/fontes/PHP/CSE/cse/tipoTratamento/alteraTipoTratamento.php b/gestaoAdministrativa/fontes/PHP/CSE/cse/tipoTratamento/alteraTipoTratamento.php index ed4f328..8d4fec4 100755 --- a/gestaoAdministrativa/fontes/PHP/CSE/cse/tipoTratamento/alteraTipoTratamento.php +++ b/gestaoAdministrativa/fontes/PHP/CSE/cse/tipoTratamento/alteraTipoTratamento.php @@ -329,7 +329,6 @@ $nomClassificacao = pegaDado("nom_classificacao","cse.classificacao_tratamento", //Inclusão, alteração ou exclusão de dados case 2: - //mostraVar($HTTP_POST_VARS); $js = ""; $ok = true; //Verifica se já existe o registro a ser incluido diff --git a/gestaoAdministrativa/fontes/PHP/CSE/cse/tipoTratamento/excluiTipoTratamento.php b/gestaoAdministrativa/fontes/PHP/CSE/cse/tipoTratamento/excluiTipoTratamento.php index 4696cf1..87f6956 100755 --- a/gestaoAdministrativa/fontes/PHP/CSE/cse/tipoTratamento/excluiTipoTratamento.php +++ b/gestaoAdministrativa/fontes/PHP/CSE/cse/tipoTratamento/excluiTipoTratamento.php @@ -266,7 +266,6 @@ if ( $pagina > 0 and $conn->eof() ) { //Inclusão, alteração ou exclusão de dados case 1: - //mostraVar($HTTP_POST_VARS); $js = ""; $ok = true; $cse = new cse(); diff --git a/gestaoAdministrativa/fontes/PHP/CSE/cse/tipoTratamento/incluiTipoTratamento.php b/gestaoAdministrativa/fontes/PHP/CSE/cse/tipoTratamento/incluiTipoTratamento.php index 210f482..67775d6 100755 --- a/gestaoAdministrativa/fontes/PHP/CSE/cse/tipoTratamento/incluiTipoTratamento.php +++ b/gestaoAdministrativa/fontes/PHP/CSE/cse/tipoTratamento/incluiTipoTratamento.php @@ -151,7 +151,6 @@ echo $lista; //Inclusão, alteração ou exclusão de dados case 1: - //mostraVar($HTTP_POST_VARS); $js = ""; $ok = true; //Verifica se já existe o registro a ser incluido diff --git a/gestaoAdministrativa/fontes/PHP/CSE/cse/tratamento/alteraTratamento.php b/gestaoAdministrativa/fontes/PHP/CSE/cse/tratamento/alteraTratamento.php index 1648781..f391dc8 100755 --- a/gestaoAdministrativa/fontes/PHP/CSE/cse/tratamento/alteraTratamento.php +++ b/gestaoAdministrativa/fontes/PHP/CSE/cse/tratamento/alteraTratamento.php @@ -52,11 +52,9 @@ if ($alterar == 1) { $alterar = 0; $obj = new cse(); $arr = $obj->retornaTratamento($HTTP_GET_VARS); - //mostraVar($arr[cse]); $sessao->transf['cse'][2] = $arr[cse]; $sessao->transf[exame] = $arr[exame]; $sessao->transf[internacao] = $arr[internacao]; - //mostraVar($sessao->transf['cse']); } if (isset($pagina)) { @@ -180,8 +178,6 @@ if ($ctrl >= 2) { "; - //echo $ctrl."
"; while (list($key, $val) = each($aAbas)) { if ($ctrl == $key) { $abas = "show_dados"; @@ -195,9 +191,6 @@ if ($ctrl >= 2) { } echo "
"; - //echo $ctrl."
"; - //mostravar($sessao->transf); - //Grava os campos do vetor como variáveis foreach ($sessao->transf['cse'] as $vet) { foreach ($vet as $chave=>$valor) { @@ -595,7 +588,6 @@ if (!isset($controle)) { switch ($controle) { //Inclusão, alteração ou exclusão de dados case 1: - //mostraVar($HTTP_POST_VARS); $js = "f.ok.disabled = false; \n"; //break; $js = ""; @@ -683,7 +675,7 @@ case 2: $nomCidadao = ""; } $js .= 'f.nomCidadao.value = "'.$nomCidadao.'" '; - //mostraVar($js); + break; //Cria uma lista de opções de Tipo de Tratamento de acordo com a Classificação de Tratamento escolhida diff --git a/gestaoAdministrativa/fontes/PHP/CSE/cse/tratamento/consultaPrescricoes.php b/gestaoAdministrativa/fontes/PHP/CSE/cse/tratamento/consultaPrescricoes.php index a14046b..5df07d0 100755 --- a/gestaoAdministrativa/fontes/PHP/CSE/cse/tratamento/consultaPrescricoes.php +++ b/gestaoAdministrativa/fontes/PHP/CSE/cse/tratamento/consultaPrescricoes.php @@ -52,11 +52,9 @@ if ($alterar == 1) { $alterar = 0; $obj = new cse(); $arr = $obj->retornaTratamento($HTTP_GET_VARS); - //mostraVar($arr[cse]); $sessao->transf['cse'][2] = $arr[cse]; $sessao->transf[exame] = $arr[exame]; $sessao->transf[internacao] = $arr[internacao]; - //mostraVar($sessao->transf['cse']); } if (isset($pagina)) { @@ -180,8 +178,6 @@ if ($ctrl >= 2) { "; - //echo $ctrl."
"; while (list($key, $val) = each($aAbas)) { if ($ctrl == $key) { $abas = "show_dados"; @@ -195,9 +191,6 @@ if ($ctrl >= 2) { } echo "
"; - //echo $ctrl."
"; - //mostravar($sessao->transf); - //Grava os campos do vetor como variáveis foreach ($sessao->transf['cse'] as $vet) { foreach ($vet as $chave=>$valor) { @@ -483,7 +476,6 @@ if (!isset($controle)) { switch ($controle) { //Inclusão, alteração ou exclusão de dados case 1: - //mostraVar($HTTP_POST_VARS); $js = "f.ok.disabled = false; \n"; //break; $js = ""; @@ -571,7 +563,7 @@ case 2: $nomCidadao = ""; } $js .= 'f.nomCidadao.value = "'.$nomCidadao.'" '; - //mostraVar($js); + break; //Cria uma lista de opções de Tipo de Tratamento de acordo com a Classificação de Tratamento escolhida diff --git a/gestaoAdministrativa/fontes/PHP/CSE/popups/Cidadao/procuraCidadao.php b/gestaoAdministrativa/fontes/PHP/CSE/popups/Cidadao/procuraCidadao.php index edc30a0..23e942d 100755 --- a/gestaoAdministrativa/fontes/PHP/CSE/popups/Cidadao/procuraCidadao.php +++ b/gestaoAdministrativa/fontes/PHP/CSE/popups/Cidadao/procuraCidadao.php @@ -151,7 +151,6 @@ switch ($ctrl) { if (!(isset($sessao->transf1))) { $sessao->transf1 = $select; } - //mostravar($HTTP_GET_VARS); $paginacao = new paginacaoLegada; $paginacao->pegaDados($sessao->transf1,"10"); $paginacao->pegaPagina($pagina); diff --git a/gestaoAdministrativa/fontes/PHP/administracao/administracao/agencia/alteraAgencia.php b/gestaoAdministrativa/fontes/PHP/administracao/administracao/agencia/alteraAgencia.php index 41ee643..7d7be5d 100755 --- a/gestaoAdministrativa/fontes/PHP/administracao/administracao/agencia/alteraAgencia.php +++ b/gestaoAdministrativa/fontes/PHP/administracao/administracao/agencia/alteraAgencia.php @@ -154,7 +154,6 @@ echo $html; retornaAgencia(); $nomBanco = $agencia->nomBanco; diff --git a/gestaoAdministrativa/fontes/PHP/administracao/administracao/banco/incluiBanco.php b/gestaoAdministrativa/fontes/PHP/administracao/administracao/banco/incluiBanco.php index 1a1ad87..d1ef0d0 100755 --- a/gestaoAdministrativa/fontes/PHP/administracao/administracao/banco/incluiBanco.php +++ b/gestaoAdministrativa/fontes/PHP/administracao/administracao/banco/incluiBanco.php @@ -131,7 +131,6 @@ case 0: break; case 1: $ok = true; - //mostraVar($HTTP_GET_VARS); $objeto = "Banco ".$codBanco." - ".$nomBanco; //$pag = $PHP_SELF."?".Sessao::getId()."&controle=0&codBanco=".$codBanco."&nomBanco=".$nomBanco; /*** Primeiro valida os dados, depois faz a inclusão ***/ diff --git a/gestaoAdministrativa/fontes/PHP/administracao/administracao/local/incluiLocal.php b/gestaoAdministrativa/fontes/PHP/administracao/administracao/local/incluiLocal.php index 236787a..52ecfc7 100755 --- a/gestaoAdministrativa/fontes/PHP/administracao/administracao/local/incluiLocal.php +++ b/gestaoAdministrativa/fontes/PHP/administracao/administracao/local/incluiLocal.php @@ -278,7 +278,6 @@ case 2: $js = ""; $js .= 'window.parent.frames["telaMensagem"].document.location = "'.CAM_FW_INSTANCIAS.'index/menu.html";'; $arCodSetor = preg_split( "/[^a-zA-Z0-9]/",$stCodSetor); - //mostraVar($arCodSetor); $stExercicio = $arCodSetor[4]; $inCodOrgao = (int) $arCodSetor[0]; $inCodUnidade = (int) $arCodSetor[1]; diff --git a/gestaoAdministrativa/fontes/PHP/administracao/administracao/relatorios/relatorioPermissao.php b/gestaoAdministrativa/fontes/PHP/administracao/administracao/relatorios/relatorioPermissao.php index 91635be..206c8e5 100755 --- a/gestaoAdministrativa/fontes/PHP/administracao/administracao/relatorios/relatorioPermissao.php +++ b/gestaoAdministrativa/fontes/PHP/administracao/administracao/relatorios/relatorioPermissao.php @@ -33,7 +33,7 @@ Casos de uso: uc-01.03.94 - $Id: relatorioPermissao.php 62838 2015-06-26 13:02:49Z diogo.zarpelon $ + $Id: relatorioPermissao.php 63829 2015-10-22 12:06:07Z franver $ */ @@ -48,9 +48,6 @@ setAjuda("UC-01.03.94"); $pagina = $_REQUEST['pagina']; $controle = $_REQUEST['controle']; -#SistemaLegado::mostravar($_REQUEST); -#die(); - if (isset($pagina)) { $controle = 1; } diff --git a/gestaoAdministrativa/fontes/PHP/administracao/administracao/sistema/responsavelModulo.php b/gestaoAdministrativa/fontes/PHP/administracao/administracao/sistema/responsavelModulo.php index 90f3ad0..4069aff 100755 --- a/gestaoAdministrativa/fontes/PHP/administracao/administracao/sistema/responsavelModulo.php +++ b/gestaoAdministrativa/fontes/PHP/administracao/administracao/sistema/responsavelModulo.php @@ -307,7 +307,6 @@ Casos de uso: uc-01.03.91 administracao.usuario WHERE numcgm = ".$usuarioResponsavel; - //mostravar($sSQL); $conn = new dataBaseLegado; $conn->abreBd(); $conn->abreSelecao($sSQL); diff --git a/gestaoAdministrativa/fontes/PHP/administracao/administracao/usuarios/definePermissoes.php b/gestaoAdministrativa/fontes/PHP/administracao/administracao/usuarios/definePermissoes.php index 6918ab7..e0fbd75 100755 --- a/gestaoAdministrativa/fontes/PHP/administracao/administracao/usuarios/definePermissoes.php +++ b/gestaoAdministrativa/fontes/PHP/administracao/administracao/usuarios/definePermissoes.php @@ -33,7 +33,7 @@ Casos de uso: uc-01.03.93 - $Id: definePermissoes.php 62838 2015-06-26 13:02:49Z diogo.zarpelon $ + $Id: definePermissoes.php 63829 2015-10-22 12:06:07Z franver $ */ session_cache_limiter('private_no_expire'); @@ -642,22 +642,14 @@ setAjuda("UC-01.03.93"); ?> pegaCampo("cod_funcionalidade") == 314 || $conectaBD->pegaCampo("cod_funcionalidade") == 315)) { - //sistemaLegado::mostravar(' funcionalidade'); - //sistemaLegado::mostravar($conectaBD->pegaCampo("nom_funcionalidade")); - //sistemaLegado::mostravar('acao'); - //sistemaLegado::mostravar($conectaBD->pegaCampo("nom_acao")); if (!preg_match('/ANEXO[ ]{0,}[0-9]{1,2}/i',$conectaBD->pegaCampo("nom_acao"))) { $nom_acao = $conectaBD->pegaCampo("nom_acao"); $cod_acao = $conectaBD->pegaCampo("cod_acao"); - //sistemaLegado::mostravar(' acao certa'); - //sistemaLegado::mostravar($nom_acao); ?> checaPermissaoAcao($cgm,$cod_acao,$exercicio)) { - //sistemaLegado::mostravar('CHECKED'); - //sistemaLegado::mostravar($nom_acao); echo "checked"; } ?> @@ -675,8 +667,6 @@ setAjuda("UC-01.03.93"); checaPermissaoAcao($cgm,$cod_acao,$exercicio)) { - //sistemaLegado::mostravar('CHECKED'); - //sistemaLegado::mostravar($nom_acao); echo "checked"; } ?> > diff --git a/gestaoAdministrativa/fontes/PHP/administracao/administracao/usuarios/interfaceUsuario.class.php b/gestaoAdministrativa/fontes/PHP/administracao/administracao/usuarios/interfaceUsuario.class.php index 9bc8747..4720309 100755 --- a/gestaoAdministrativa/fontes/PHP/administracao/administracao/usuarios/interfaceUsuario.class.php +++ b/gestaoAdministrativa/fontes/PHP/administracao/administracao/usuarios/interfaceUsuario.class.php @@ -261,7 +261,6 @@ class interfaceUsuario $paginacao->geraLinks(); $paginacao->pegaOrder("lower(G.nom_cgm)","ASC"); $stSql = $paginacao->geraSQL(); - //mostravar($stSql); $obDb = new dataBaseLegado; $obDb->abreBD(); diff --git a/gestaoAdministrativa/fontes/PHP/administracao/administracao/usuarios/validaDados.php b/gestaoAdministrativa/fontes/PHP/administracao/administracao/usuarios/validaDados.php index 01faf85..8ebd720 100755 --- a/gestaoAdministrativa/fontes/PHP/administracao/administracao/usuarios/validaDados.php +++ b/gestaoAdministrativa/fontes/PHP/administracao/administracao/usuarios/validaDados.php @@ -104,7 +104,7 @@ case 1: $js = ""; $ok = true; $setor = validaSetor($chave,$exercicio); - mostraVar($setor); + if ($setor) { $js .= "f.nomSetor.value = '".$setor[nomSetor]."'; \n"; } else { diff --git a/gestaoAdministrativa/fontes/PHP/administracao/classes/mapeamento/TAdministracaoLogradouro.class.php b/gestaoAdministrativa/fontes/PHP/administracao/classes/mapeamento/TAdministracaoLogradouro.class.php index 099f079..3a14e91 100755 --- a/gestaoAdministrativa/fontes/PHP/administracao/classes/mapeamento/TAdministracaoLogradouro.class.php +++ b/gestaoAdministrativa/fontes/PHP/administracao/classes/mapeamento/TAdministracaoLogradouro.class.php @@ -73,7 +73,8 @@ function montaRecuperaRelacionamento() , dt_inicio , MAX(dt_fim) as dt_fim , cod_norma - FROM sw_nome_logradouro as snl + FROM sw_nome_logradouro as snl + WHERE dt_fim IS NULL GROUP BY cod_logradouro , timestamp , cod_tipo diff --git a/gestaoAdministrativa/fontes/PHP/administracao/classes/negocio/RConfiguracaoGeral.class.php b/gestaoAdministrativa/fontes/PHP/administracao/classes/negocio/RConfiguracaoGeral.class.php index 88afe41..f3ca1c9 100755 --- a/gestaoAdministrativa/fontes/PHP/administracao/classes/negocio/RConfiguracaoGeral.class.php +++ b/gestaoAdministrativa/fontes/PHP/administracao/classes/negocio/RConfiguracaoGeral.class.php @@ -84,7 +84,6 @@ function consultarConfiguracaoGeral(&$rsConfiguracao, $boTransacao = "") { $this->obTAdministracaoConfiguracao->setDado( "cod_modulo", $this->getCodModulo() ); $obErro = $this->obTAdministracaoConfiguracao->recuperaPorChave( $rsConfiguracao, $boTransacao ); -// mostraVar($rsConfiguracao); // if ( !$obErro->ocorreu() ) { // $this->setCodUF ( $rsConfiguracao->getCampo('cod_uf') ); // $this->setCodMunicipio ( $rsConfiguracao->getCampo('cod_municipio') ); diff --git a/gestaoAdministrativa/fontes/PHP/administracao/classes/negocio/RFuncao.class.php b/gestaoAdministrativa/fontes/PHP/administracao/classes/negocio/RFuncao.class.php index 024824b..b117f35 100755 --- a/gestaoAdministrativa/fontes/PHP/administracao/classes/negocio/RFuncao.class.php +++ b/gestaoAdministrativa/fontes/PHP/administracao/classes/negocio/RFuncao.class.php @@ -30,7 +30,7 @@ * @author Analista: Cassiano * @author Desenvolvedor: Cassiano - $Id: RFuncao.class.php 61012 2014-11-28 16:32:54Z evandro $ + $Id: RFuncao.class.php 63893 2015-11-03 16:32:58Z evandro $ Casos de uso: uc-01.03.95 */ @@ -895,7 +895,7 @@ function montaCorpoFuncao($inChaveChecked='') $stPagina = 0; $stComplemento = ''; - if (substr($stConteudo,0,2)=='SE' && substr($stConteudo,0,3)!='SEN') { + if (substr(ltrim($stConteudo),0,2)=='SE' && substr($stConteudo,0,3)!='SEN') { $stPagina = "FMPopupCondicao"; $inNivelFuncao = $inNivel - 1; $stComplemento = ' '; @@ -945,7 +945,7 @@ function montaCorpoFuncao($inChaveChecked='') } //Verifica se não é estrutura condicional ou laço - if (substr($stConteudo,0,2)=='SE' || substr($stConteudo,0,2)=='EN') { + if (substr(ltrim($stConteudo),0,2)=='SE' || substr($stConteudo,0,2)=='EN') { $inCountNivel--; } for ($inCount=0; $inCount<($inCountNivel); $inCount++) { diff --git a/gestaoAdministrativa/fontes/PHP/administracao/instancias/geradorcalculo/FLManterFuncao.php b/gestaoAdministrativa/fontes/PHP/administracao/instancias/geradorcalculo/FLManterFuncao.php index 0d8a92e..bfee506 100755 --- a/gestaoAdministrativa/fontes/PHP/administracao/instancias/geradorcalculo/FLManterFuncao.php +++ b/gestaoAdministrativa/fontes/PHP/administracao/instancias/geradorcalculo/FLManterFuncao.php @@ -81,27 +81,28 @@ $obTxtNomeFuncao->setMaxLength ( 60 ); $obTxtNomeFuncao->setNull ( true ); $obCmbModulo = new Select(); -$obCmbModulo->setRotulo( "Módulo"); -$obCmbModulo->setName( "inCodModulo"); -$obCmbModulo->setTitle( "Informe o módulo."); -$obCmbModulo->setStyle( "width: 250px"); -$obCmbModulo->setNull( false); -$obCmbModulo->addOption( "","Selecione" ); -$obCmbModulo->setCampoId( "cod_modulo"); -$obCmbModulo->setCampoDesc( "[nom_modulo]"); -$obCmbModulo->preencheCombo( $rsModulo ); -$obCmbModulo->obEvento->setOnChange ( "BuscaValores('buscaCadastro');limpaCampoBiblioteca()" ); +$obCmbModulo->setRotulo ( "Módulo" ); +$obCmbModulo->setName ( "inCodModulo" ); +$obCmbModulo->setId ( "inCodModulo" ); +$obCmbModulo->setTitle ( "Informe o módulo." ); +$obCmbModulo->setStyle ( "width: 250px" ); +$obCmbModulo->setNull ( false ); +$obCmbModulo->addOption ( "","Selecione" ); +$obCmbModulo->setCampoId ( "cod_modulo" ); +$obCmbModulo->setCampoDesc ( "[nom_modulo]" ); +$obCmbModulo->preencheCombo ( $rsModulo ); +$obCmbModulo->obEvento->setOnChange( "BuscaValores('buscaCadastro');limpaCampoBiblioteca();" ); $obCmbBiblioteca = new Select(); -$obCmbBiblioteca->setRotulo( "Biblioteca"); -$obCmbBiblioteca->setId("stCodBiblioteca"); -$obCmbBiblioteca->setName( "inCodBiblioteca"); -$obCmbBiblioteca->setTitle( "Informe a biblioteca."); -$obCmbBiblioteca->setStyle( "width: 250px"); -$obCmbBiblioteca->setNull( false); -$obCmbBiblioteca->addOption( "","Selecione" ); -$obCmbBiblioteca->setCampoId( "cod_biblioteca" ); -$obCmbBiblioteca->setCampoDesc( "[cod_biblioteca] - [nom_biblioteca]"); +$obCmbBiblioteca->setRotulo ( "Biblioteca" ); +$obCmbBiblioteca->setId ( "inCodBiblioteca" ); +$obCmbBiblioteca->setName ( "inCodBiblioteca" ); +$obCmbBiblioteca->setTitle ( "Informe a biblioteca." ); +$obCmbBiblioteca->setStyle ( "width: 250px" ); +$obCmbBiblioteca->setNull ( false ); +$obCmbBiblioteca->addOption ( "","Selecione" ); +$obCmbBiblioteca->setCampoId ( "cod_biblioteca" ); +$obCmbBiblioteca->setCampoDesc( "[cod_biblioteca] - [nom_biblioteca]" ); $obForm = new Form; $obForm->setAction ( $pgList ); diff --git a/gestaoAdministrativa/fontes/PHP/administracao/instancias/geradorcalculo/FMPopupAtribuicaoTrataErros.php b/gestaoAdministrativa/fontes/PHP/administracao/instancias/geradorcalculo/FMPopupAtribuicaoTrataErros.php index a988f24..6098126 100755 --- a/gestaoAdministrativa/fontes/PHP/administracao/instancias/geradorcalculo/FMPopupAtribuicaoTrataErros.php +++ b/gestaoAdministrativa/fontes/PHP/administracao/instancias/geradorcalculo/FMPopupAtribuicaoTrataErros.php @@ -121,11 +121,8 @@ if ( empty($stAcao)||$stAcao=="incluir" ) { $x++; while ($stParametros[$x] != '"') { - $stTemp = $stTemp . $stParametros[$x]; - $x--; - - if ($stParametros[$x] == '"') - $stTemp = ''; + $stTemp = $stTemp.$stParametros[$x]; + $x++; } $arPar[] = $stTemp; @@ -137,7 +134,7 @@ if ( empty($stAcao)||$stAcao=="incluir" ) { $arPar[] = $stTemp; $stTemp = ''; } else { - $stTemp = $stTemp .$stParametros[$x]; + $stTemp = $stTemp.$stParametros[$x]; } } } diff --git a/gestaoAdministrativa/fontes/PHP/administracao/instancias/geradorcalculo/FMPopupCondicao.php b/gestaoAdministrativa/fontes/PHP/administracao/instancias/geradorcalculo/FMPopupCondicao.php index 27d6cc9..27121be 100755 --- a/gestaoAdministrativa/fontes/PHP/administracao/instancias/geradorcalculo/FMPopupCondicao.php +++ b/gestaoAdministrativa/fontes/PHP/administracao/instancias/geradorcalculo/FMPopupCondicao.php @@ -76,7 +76,7 @@ if ( empty($stAcao)||$stAcao=="incluir" ) { $arFuncao = Sessao::read('Funcao'); $stConteudo = $arFuncao['Corpo'][ $arPosicao[0] ]['Conteudo']; - $stHtml = substr($stConteudo,2, strlen($stConteudo)-8 ); + $stHtml = substr(ltrim($stConteudo),2, strlen(rtrim($stConteudo))-8 ); Sessao::write('Condicao',explode(" ",$stHtml)); $js = "d.getElementById('idCondicao').innerHTML = '".$stHtml."';"; $js .= "d.getElementById('hdnCondicao').value = '".$stHtml."';"; @@ -131,7 +131,7 @@ $obCmbVariavel->setCampoDesc ( "#[stNomeVariavel]" ); $obCmbVariavel->addOption ( "", "Selecione" ); $obCmbVariavel->addOption ( "VERDADEIRO", "VERDADEIRO" ); $obCmbVariavel->addOption ( "FALSO" , "FALSO" ); -$obCmbVariavel->addOption ( "NULO" , "NULO" ); +$obCmbVariavel->addOption ( "NULO" , "NULO" ); $obCmbVariavel->addOption ( "VAZIO" , "VAZIO" ); $obCmbVariavel->setValue ( $stVariavel ); $obCmbVariavel->setNull ( false ); diff --git a/gestaoAdministrativa/fontes/PHP/administracao/instancias/geradorcalculo/FMReplicarFuncao.php b/gestaoAdministrativa/fontes/PHP/administracao/instancias/geradorcalculo/FMReplicarFuncao.php index 1859a6d..61f33d2 100644 --- a/gestaoAdministrativa/fontes/PHP/administracao/instancias/geradorcalculo/FMReplicarFuncao.php +++ b/gestaoAdministrativa/fontes/PHP/administracao/instancias/geradorcalculo/FMReplicarFuncao.php @@ -34,7 +34,7 @@ * Casos de uso: uc-01.03.95 - $Id: FMReplicarFuncao.php 59612 2014-09-02 12:00:51Z gelson $ + $Id: FMReplicarFuncao.php 63893 2015-11-03 16:32:58Z evandro $ */ include_once '../../../../../../gestaoAdministrativa/fontes/PHP/pacotes/FrameworkHTML.inc.php'; @@ -77,6 +77,7 @@ $obTAdministracaoModulo->recuperaTodos($rsModulos,"","nom_modulo"); $obCmbModulo = new Select(); $obCmbModulo->setRotulo ( "Módulo Origem" ); $obCmbModulo->setName ( "inCodModulo" ); +$obCmbModulo->setId ( "inCodModulo" ); $obCmbModulo->setTitle ( "Informe o módulo." ); $obCmbModulo->setStyle ( "width: 250px" ); $obCmbModulo->setNull ( false ); @@ -89,6 +90,7 @@ $obCmbModulo->obEvento->setOnChange ( "montaParametrosGET('preencherBiblioteca', $obCmbBiblioteca = new Select(); $obCmbBiblioteca->setRotulo ( "Biblioteca Origem" ); $obCmbBiblioteca->setName ( "inCodBiblioteca" ); +$obCmbBiblioteca->setId ( "inCodBiblioteca" ); $obCmbBiblioteca->setTitle ( "Informe a bibliotéca." ); $obCmbBiblioteca->setStyle ( "width: 250px" ); $obCmbBiblioteca->setNull ( false ); @@ -116,6 +118,7 @@ $rsModulos->setPrimeiroElemento(true); $obCmbModuloC = new Select(); $obCmbModuloC->setRotulo ( "Módulo Destino" ); $obCmbModuloC->setName ( "inCodModuloC" ); +$obCmbModuloC->setId ( "inCodModuloC" ); $obCmbModuloC->setTitle ( "Informe o módulo em que será copiado." ); $obCmbModuloC->setStyle ( "width: 250px" ); $obCmbModuloC->setNull ( false ); @@ -128,6 +131,7 @@ $obCmbModuloC->obEvento->setOnChange ( "montaParametrosGET('preencherBibliotecaC $obCmbBibliotecaC = new Select(); $obCmbBibliotecaC->setRotulo ( "Biblioteca Destino" ); $obCmbBibliotecaC->setName ( "inCodBibliotecaC" ); +$obCmbBibliotecaC->setId ( "inCodBibliotecaC" ); $obCmbBibliotecaC->setTitle ( "Informe a bibliotéca em que será copiado." ); $obCmbBibliotecaC->setStyle ( "width: 250px" ); $obCmbBibliotecaC->setNull ( false ); diff --git a/gestaoAdministrativa/fontes/PHP/administracao/instancias/geradorcalculo/OCPopupAtribuicaoTrataErros.php b/gestaoAdministrativa/fontes/PHP/administracao/instancias/geradorcalculo/OCPopupAtribuicaoTrataErros.php index 5e1bc94..411d8af 100755 --- a/gestaoAdministrativa/fontes/PHP/administracao/instancias/geradorcalculo/OCPopupAtribuicaoTrataErros.php +++ b/gestaoAdministrativa/fontes/PHP/administracao/instancias/geradorcalculo/OCPopupAtribuicaoTrataErros.php @@ -58,8 +58,6 @@ switch ($stCtrl) { $obRegra->obRVariavel->listar( $rsParametros ); /* rsFuncao nome da funcao e tipo de retorno, rsParametros, nome e tipo de parametros que serao passados no array da trata_erro() -// SistemaLegado::mostravar($rsParametros); -// SistemaLegado::mostravar($rsFuncao); */ $prCount = 0; $VariaveisTipo = Sessao::read('VariaveisTipo'); @@ -75,8 +73,6 @@ switch ($stCtrl) { $stParametro = 'stParametro_'. $_POST['stFuncao'].'_'.$rsParametros->getCorrente(); $$stParametro = $_POST[ $stParametro ]; if ($$stParametro == '') { -// SistemaLegado::mostravar("!vazia"); - $arParametros = Sessao::read('arParametros'); $$stParametro = $arParametros[$prCount]; } diff --git a/gestaoAdministrativa/fontes/PHP/administracao/instancias/geradorcalculo/OCReplicarFuncao.php b/gestaoAdministrativa/fontes/PHP/administracao/instancias/geradorcalculo/OCReplicarFuncao.php index 024f2c4..d2793ac 100644 --- a/gestaoAdministrativa/fontes/PHP/administracao/instancias/geradorcalculo/OCReplicarFuncao.php +++ b/gestaoAdministrativa/fontes/PHP/administracao/instancias/geradorcalculo/OCReplicarFuncao.php @@ -34,7 +34,7 @@ * Casos de uso: uc-01.03.95 - $Id: OCReplicarFuncao.php 59612 2014-09-02 12:00:51Z gelson $ + $Id: OCReplicarFuncao.php 63910 2015-11-05 16:45:47Z evandro $ */ @@ -46,18 +46,14 @@ $stCtrl = $_GET['stCtrl'] ? $_GET['stCtrl'] : $_POST['stCtrl']; function preencherBiblioteca($stExtencao="") { - if (!empty($_GET['inCodModulo'.$stExtencao])) { + if (!empty($_REQUEST['inCodModulo'.$stExtencao])) { include_once(CAM_GA_ADM_MAPEAMENTO."TAdministracaoBiblioteca.class.php"); $obTAdminsitracaoBiblioteca = new TAdministracaoBiblioteca(); - $stFiltro = " WHERE cod_modulo = ".$_GET['inCodModulo'.$stExtencao]; - $obTAdminsitracaoBiblioteca->recuperaTodos($rsBiblioteca,$stFiltro,"nom_biblioteca"); - $stJs.= "limpaSelect(f.inCodBiblioteca".$stExtencao.",0); \n"; - $stJs.= "f.inCodBiblioteca".$stExtencao."[0] = new Option('Selecione','','selected'); \n"; - $inIndex = 1; - while (!$rsBiblioteca->eof()) { - $stJs.= "f.inCodBiblioteca".$stExtencao."[".$inIndex."] = new Option('".str_replace("\n","",$rsBiblioteca->getCampo("nom_biblioteca"))."','".$rsBiblioteca->getCampo("cod_biblioteca")."',''); \n"; - $inIndex++; - $rsBiblioteca->proximo(); + $stFiltro = " WHERE cod_modulo = ".$_REQUEST['inCodModulo'.$stExtencao]; + $obTAdminsitracaoBiblioteca->recuperaTodos($rsBiblioteca,$stFiltro,"nom_biblioteca"); + $stJs .= " jq(\"#inCodBiblioteca".$stExtencao."\").empty().append(new Option(\"Selecione\",\"\") ); \n"; + foreach ($rsBiblioteca->getElementos() as $value) { + $stJs .= " jq(\"#inCodBiblioteca".$stExtencao."\").append(new Option(\"".$value['nom_biblioteca']."\",\"".$value['cod_biblioteca']."\") ); \n"; } return $stJs; diff --git a/gestaoAdministrativa/fontes/PHP/administracao/instancias/geradorcalculo/PRManterFuncao.php b/gestaoAdministrativa/fontes/PHP/administracao/instancias/geradorcalculo/PRManterFuncao.php index 6a6ff41..6354a87 100755 --- a/gestaoAdministrativa/fontes/PHP/administracao/instancias/geradorcalculo/PRManterFuncao.php +++ b/gestaoAdministrativa/fontes/PHP/administracao/instancias/geradorcalculo/PRManterFuncao.php @@ -30,7 +30,7 @@ * @author Analista: Cassiano * @author Desenvolvedor: Cassiano - $Id: PRManterFuncao.php 59612 2014-09-02 12:00:51Z gelson $ + $Id: PRManterFuncao.php 63829 2015-10-22 12:06:07Z franver $ Casos de uso: uc-01.03.95 @@ -58,7 +58,7 @@ $obErro = new Erro; $rsCorpo = new RecordSet; $arFuncao = Sessao::read('Funcao'); -//SistemaLegado::mostravar($stAcao);exit; + switch ($stAcao) { case "incluir": diff --git a/gestaoAdministrativa/fontes/PHP/administracao/instancias/geradorcalculo/PRPopupAtribuicaoFuncao.php b/gestaoAdministrativa/fontes/PHP/administracao/instancias/geradorcalculo/PRPopupAtribuicaoFuncao.php index c307a90..50d24ac 100755 --- a/gestaoAdministrativa/fontes/PHP/administracao/instancias/geradorcalculo/PRPopupAtribuicaoFuncao.php +++ b/gestaoAdministrativa/fontes/PHP/administracao/instancias/geradorcalculo/PRPopupAtribuicaoFuncao.php @@ -95,7 +95,6 @@ if ( substr($stFuncao,strlen($stFuncao)-1,strlen($stFuncao)) == ',') { $stFuncao .= ' ); '; /////////////////////// -//SistemaLegado::mostravar("AQUI Funcao".$stAcao);die(); switch ($stAcao) { case "incluir": diff --git a/gestaoAdministrativa/fontes/PHP/administracao/instancias/geradorcalculo/PRPopupCondicao.php b/gestaoAdministrativa/fontes/PHP/administracao/instancias/geradorcalculo/PRPopupCondicao.php index 9c65339..be9cf5b 100755 --- a/gestaoAdministrativa/fontes/PHP/administracao/instancias/geradorcalculo/PRPopupCondicao.php +++ b/gestaoAdministrativa/fontes/PHP/administracao/instancias/geradorcalculo/PRPopupCondicao.php @@ -30,7 +30,7 @@ * @author Analista: Cassiano * @author Desenvolvedor: Cassiano - $Id: PRPopupCondicao.php 60991 2014-11-27 16:28:17Z carolina $ + $Id: PRPopupCondicao.php 63829 2015-10-22 12:06:07Z franver $ Casos de uso: uc-01.03.95 */ @@ -88,7 +88,6 @@ switch ($stAcao) { $arFuncao = Sessao::read('Funcao'); -// SistemaLegado::mostravar($arFuncao);exit; $inCountCorpo = count($arFuncao['Corpo']); for ($inCountElementos=0; $inCountElementos<$inQuantLinhas; $inCountElementos++) { for ($inCount=($arPosicao[0]+$inCountElementos); $inCount<$inCountCorpo; $inCount++) { diff --git a/gestaoAdministrativa/fontes/PHP/administracao/instancias/processamento/OCIMontaLocalizacao.php b/gestaoAdministrativa/fontes/PHP/administracao/instancias/processamento/OCIMontaLocalizacao.php index 3a5bb3d..0e8c2f8 100644 --- a/gestaoAdministrativa/fontes/PHP/administracao/instancias/processamento/OCIMontaLocalizacao.php +++ b/gestaoAdministrativa/fontes/PHP/administracao/instancias/processamento/OCIMontaLocalizacao.php @@ -220,7 +220,6 @@ switch ($_REQUEST['stCtrl']) { } break; case 'preencheCombos' : - //sistemaLegado::mostraVar($_REQUEST); //preenche os outros combos de acordo com o código da localizacao $stJs.= "$('".$obIMontaLocalizacao->obSelectOrgao->getId()."').selectedIndex = 0;"; $stJs.= "limpaSelect(f.".$obIMontaLocalizacao->obSelectUnidade->getName().",0);"; diff --git a/gestaoAdministrativa/fontes/PHP/administracao/popups/funcao/FLBuscarFuncao.php b/gestaoAdministrativa/fontes/PHP/administracao/popups/funcao/FLBuscarFuncao.php index cde73de..7c32fc5 100644 --- a/gestaoAdministrativa/fontes/PHP/administracao/popups/funcao/FLBuscarFuncao.php +++ b/gestaoAdministrativa/fontes/PHP/administracao/popups/funcao/FLBuscarFuncao.php @@ -32,7 +32,7 @@ Casos de uso: uc-01.03.95 - $Id: FLBuscarFuncao.php 59612 2014-09-02 12:00:51Z gelson $ + $Id: FLBuscarFuncao.php 64004 2015-11-17 15:41:41Z evandro $ */ @@ -40,6 +40,7 @@ include_once '../../../../../../gestaoAdministrativa/fontes/PHP/pacotes/Framewor include_once '../../../../../../gestaoAdministrativa/fontes/PHP/framework/include/cabecalho.inc.php'; include_once CAM_GA_ADM_NEGOCIO."RFuncao.class.php"; include_once CAM_GA_ADM_MAPEAMENTO."TAdministracaoModulo.class.php"; +include_once(CAM_GA_ADM_MAPEAMENTO."TAdministracaoBiblioteca.class.php"); $stPrograma = "BuscarFuncao"; $pgFilt = "FL".$stPrograma.".php"; @@ -53,55 +54,58 @@ include_once($pgJs); $stAcao = $request->get('stAcao'); -$_REQUEST['stCodModulo'] = isset($_REQUEST['stCodModulo']) ? $_REQUEST['stCodModulo'] : Sessao::read('stCodModulo'); -$_REQUEST['stCodBiblioteca'] = isset($_REQUEST['stCodBiblioteca']) ? $_REQUEST['stCodBiblioteca'] : Sessao::read('stCodBiblioteca'); +if ( $request->get('stCodModulo') == '' ) { + $inCodModulo = (Sessao::read('stCodModulo') == '') ? $_REQUEST['inCodModulo'] : Sessao::read('stCodModulo') ; +}else{ + $inCodModulo = $request->get('stCodModulo'); +} +if ( $request->get('stCodBiblioteca') == '' ) { + $inCodBiblioteca = (Sessao::read('stCodBiblioteca') == '') ? $_REQUEST['inCodBiblioteca'] : Sessao::read('stCodBiblioteca') ; +}else{ + $inCodBiblioteca = $request->get('stCodBiblioteca'); +} # Condição para armazenar na sessão quando telas específicas passaram a # biblioteca ou módulo permitidos para listagem. -Sessao::write('stCodModulo' , $_REQUEST['stCodModulo'] ); -Sessao::write('stCodBiblioteca' , $_REQUEST['stCodBiblioteca']); +Sessao::write('stCodModulo' , $inCodModulo ); +Sessao::write('stCodBiblioteca' , $inCodBiblioteca ); $obHdnInCodBiblioteca = new Hidden; -$obHdnInCodBiblioteca->setName( 'inCodBiblioteca' ); -$obHdnInCodBiblioteca->setValue( $_REQUEST['inCodBiblioteca'] ); +$obHdnInCodBiblioteca->setName ( 'inCodBiblioteca' ); +$obHdnInCodBiblioteca->setValue( $inCodBiblioteca ); $obHdnInCodModulo = new Hidden; -$obHdnInCodModulo->setName( 'inCodModulo' ); -$obHdnInCodModulo->setValue( $_REQUEST['inCodModulo'] ); +$obHdnInCodModulo->setName ( 'inCodModulo' ); +$obHdnInCodModulo->setValue( $inCodModulo ); $obTAdministracaoModulo = new TModulo; +$obTAdminsitracaoBiblioteca = new TAdministracaoBiblioteca(); -if ($_REQUEST['stCodBiblioteca'] && $_REQUEST['stCodModulo']) { - $stCondicao = " WHERE cod_modulo IN ( ".$_REQUEST['stCodModulo']." )"; - $obTAdministracaoModulo->recuperaListaModulos($rsModulos, $stCondicao, "", "", ""); - include_once(CAM_GA_ADM_MAPEAMENTO."TAdministracaoBiblioteca.class.php"); - $obTAdminsitracaoBiblioteca = new TAdministracaoBiblioteca(); - $stFiltro = " WHERE cod_modulo IN ( ".$_REQUEST['stCodModulo']." ) AND cod_biblioteca IN ( ".$_REQUEST['stCodBiblioteca']." )"; +//Caso o modulo venha vazio significa que o usuario pode usar qualquer funcao na acao que esta sendo chamada +if ($inCodModulo != '') { + $stCondicao = " WHERE cod_modulo IN ( ".$inCodModulo." )"; +} +$obTAdministracaoModulo->recuperaListaModulos($rsModulos, $stCondicao, "", "", ""); + +$rsBiblioteca = new RecordSet(); +if ($inCodBiblioteca != '') { + $stFiltro = " WHERE cod_modulo IN ( ".$inCodModulo." ) AND cod_biblioteca IN ( ".$inCodBiblioteca." )"; $obTAdminsitracaoBiblioteca->recuperaTodos($rsBiblioteca,$stFiltro,"cod_biblioteca"); -} else { - $obTAdminsitracaoBiblioteca = new TAdministracaoBiblioteca(); - if (empty($_REQUEST['inCodModulo'])) { - $obTAdminsitracaoBiblioteca->recuperaTodos($rsBiblioteca,"","cod_biblioteca"); - } elseif (!empty($_REQUEST['inCodModulo']) && !empty($_REQUEST['inCodBiblioteca'])) { - $obTAdminsitracaoBiblioteca->recuperaTodos($rsBiblioteca,"","cod_biblioteca"); - } - $obTAdministracaoModulo->recuperaTodos($rsModulos,"","nom_modulo"); } -//Se houver só um campo, já abre preenchido -if ($rsModulos->getNumLinhas() > 1) { $obCmbModulo = new Select; -$obCmbModulo->setRotulo ( "Módulo Origem" ); -$obCmbModulo->setId ( "inCodModulo" ); -$obCmbModulo->setName ( "inCodModulo" ); -$obCmbModulo->setTitle ( "Informe o módulo." ); -$obCmbModulo->setStyle ( "width: 250px" ); -$obCmbModulo->setNull ( false ); -$obCmbModulo->addOption ( "","Selecione" ); -$obCmbModulo->setCampoId ( "cod_modulo" ); -$obCmbModulo->setCampoDesc ( "nom_modulo" ); -$obCmbModulo->preencheCombo ( $rsModulos ); -$obCmbModulo->obEvento->setOnChange ( "executaFuncaoAjax('preencherBiblioteca','&inCodModulo='+this.value+'&inCodBiblioteca=".$_REQUEST['stCodBiblioteca']."');" ); +$obCmbModulo->setRotulo ( "Módulo Origem" ); +$obCmbModulo->setId ( "inCodModulo" ); +$obCmbModulo->setName ( "inCodModulo" ); +$obCmbModulo->setTitle ( "Informe o módulo." ); +$obCmbModulo->setStyle ( "width: 250px" ); +$obCmbModulo->setNull ( false ); +$obCmbModulo->addOption ( "","Selecione" ); +$obCmbModulo->setCampoId ( "cod_modulo" ); +$obCmbModulo->setCampoDesc ( "nom_modulo" ); +$obCmbModulo->preencheCombo ( $rsModulos ); +$obCmbModulo->setValue ( $inCodModulo ); +$obCmbModulo->obEvento->setOnChange ( "executaFuncaoAjax('preencherBiblioteca','&inCodModulo='+this.value+'&inCodBiblioteca=".$inCodBiblioteca."');"); $obCmbBiblioteca = new Select; $obCmbBiblioteca->setRotulo ( "Biblioteca Origem" ); @@ -110,40 +114,12 @@ $obCmbBiblioteca->setName ( "inCodBiblioteca" ); $obCmbBiblioteca->setTitle ( "Informe a bibliotéca." ); $obCmbBiblioteca->setStyle ( "width: 250px" ); $obCmbBiblioteca->setNull ( false ); -$obCmbBiblioteca->addOption ( "","Selecione"); +$obCmbBiblioteca->addOption ( "","Selecione" ); $obCmbBiblioteca->setCampoId ( "cod_biblioteca" ); -$obCmbBiblioteca->setCampoDesc ( "nom_biblioteca" ); -$obCmbBiblioteca->setValue ( $_REQUEST['stCodBiblioteca'] ); +$obCmbBiblioteca->setCampoDesc ( "nom_biblioteca" ); $obCmbBiblioteca->preencheCombo ( $rsBiblioteca ); -$obCmbBiblioteca->obEvento->setOnchange ("limpaCampoFuncao()" ); -} else { -$obCmbModulo = new Select; -$obCmbModulo->setRotulo ( "Módulo Origem" ); -$obCmbModulo->setId ( "inCodModulo" ); -$obCmbModulo->setName ( "inCodModulo" ); -$obCmbModulo->setTitle ( "Informe o módulo." ); -$obCmbModulo->setStyle ( "width: 250px" ); -$obCmbModulo->setNull ( false ); -$obCmbModulo->setValue ( "33" ); -$obCmbModulo->addOption ( "","Selecione" ); -$obCmbModulo->setCampoId ( "cod_modulo" ); -$obCmbModulo->setCampoDesc ( "nom_modulo" ); -$obCmbModulo->preencheCombo ( $rsModulos ); -$obCmbModulo->obEvento->setOnChange ( "executaFuncaoAjax('preencherBiblioteca','&inCodModulo='+this.value+'&inCodBiblioteca=".$_REQUEST['stCodBiblioteca']."');" ); - -$obCmbBiblioteca = new Select; -$obCmbBiblioteca->setRotulo ( "Biblioteca Origem" ); -$obCmbBiblioteca->setId ( "inCodBiblioteca" ); -$obCmbBiblioteca->setName ( "inCodBiblioteca" ); -$obCmbBiblioteca->setTitle ( "Informe a bibliotéca." ); -$obCmbBiblioteca->setStyle ( "width: 250px" ); -$obCmbBiblioteca->setNull ( false ); -$obCmbBiblioteca->setCampoId ( "cod_biblioteca" ); -$obCmbBiblioteca->setCampoDesc ( "nom_biblioteca" ); -$obCmbBiblioteca->setValue ( $_REQUEST['stCodBiblioteca'] ); -$obCmbBiblioteca->preencheCombo ( $rsBiblioteca ); -$obCmbBiblioteca->obEvento->setOnchange ("limpaCampoFuncao()" ); -} +$obCmbBiblioteca->setValue ( $inCodBiblioteca ); +$obCmbBiblioteca->obEvento->setOnchange ( "limpaCampoFuncao();" ); $obHdnForm = new Hidden; $obHdnForm->setName( 'nomForm' ); @@ -196,17 +172,6 @@ $obFormulario->addHidden ( $obHdnCampoNom ); $obFormulario->addHidden ( $obHdnCampoFuncao ); $obFormulario->addHidden ( $obHdnTipoFuncaoBusca ); -# Comentado até que alguém tenha uma explicação de porque esconder os filtros -# na tela de filtro. -# -# if (isset($_REQUEST['inCodBiblioteca']) and isset($_REQUEST['inCodModulo'])) { -# $obFormulario->addHidden ( $obHdnInCodModulo ); -# $obFormulario->addHidden ( $obHdnInCodBiblioteca ); -# } else { -# $obFormulario->addComponente ( $obCmbModulo ); -# $obFormulario->addComponente ( $obCmbBiblioteca ); -# } - $obFormulario->addComponente ( $obCmbModulo ); $obFormulario->addComponente ( $obCmbBiblioteca ); $obFormulario->addComponente ( $obTxtNomeFuncao ); @@ -228,7 +193,7 @@ $obBtnLimpar->setDisabled ( false ); $botoes = array( $obBtnOk, $obBtnLimpar ); $obFormulario->defineBarra($botoes, 'left', ''); -$obFormulario->show (); +$obFormulario->show(); $obIFrame->show(); $obIFrame2->show(); diff --git a/gestaoAdministrativa/fontes/PHP/administracao/popups/funcao/OCBuscarFuncao.php b/gestaoAdministrativa/fontes/PHP/administracao/popups/funcao/OCBuscarFuncao.php index 4cf9758..fc46920 100644 --- a/gestaoAdministrativa/fontes/PHP/administracao/popups/funcao/OCBuscarFuncao.php +++ b/gestaoAdministrativa/fontes/PHP/administracao/popups/funcao/OCBuscarFuncao.php @@ -57,15 +57,12 @@ function preencherBiblioteca($stExtencao="") $obTAdminsitracaoBiblioteca->recuperaTodos($rsBiblioteca,$stFiltro,"cod_biblioteca"); } - $stJs .= "jQuery('#inCodBiblioteca').removeOption(/./); \n"; - $stJs .= "jQuery('#inCodBiblioteca').addOption('', 'Selecione'); \n"; - - while (!$rsBiblioteca->eof()) { - $stJs .= "jQuery('#inCodBiblioteca').addOption('".$rsBiblioteca->getCampo("cod_biblioteca")."', '".$rsBiblioteca->getCampo("nom_biblioteca")."'); \n"; - $rsBiblioteca->proximo(); + $stJs .= " jQuery(\"#inCodBiblioteca\").empty().append(new Option(\"Selecione\",\"\")); \n"; + + foreach($rsBiblioteca->getElementos() as $value ) { + $stJs .= "jQuery(\"#inCodBiblioteca\").append( new Option(\"".$value["nom_biblioteca"]."\", \"".$value["cod_biblioteca"]."\") ); \n"; } - - $stJs .= "jQuery('#inCodBiblioteca option:first').attr('selected', 'selected'); \n"; + $stJs .= " jQuery(\"#inCodBiblioteca\").val(\"".$_REQUEST['inCodBiblioteca']."\"); \n"; return $stJs; } diff --git a/gestaoAdministrativa/fontes/PHP/framework/URBEM/SistemaLegado.class.php b/gestaoAdministrativa/fontes/PHP/framework/URBEM/SistemaLegado.class.php index 94aa8dd..abdf742 100644 --- a/gestaoAdministrativa/fontes/PHP/framework/URBEM/SistemaLegado.class.php +++ b/gestaoAdministrativa/fontes/PHP/framework/URBEM/SistemaLegado.class.php @@ -35,7 +35,7 @@ Casos de uso: uc-01.01.00 - $Id: SistemaLegado.class.php 63542 2015-09-10 12:37:11Z evandro $ + $Id: SistemaLegado.class.php 64153 2015-12-09 19:16:02Z evandro $ */ include_once '../../../../../../gestaoAdministrativa/fontes/PHP/framework/legado/dataBaseLegado.class.php'; @@ -72,9 +72,6 @@ public static function pegaConfiguracao($stParametro,$inCodModulo=2,$inExercicio // Usa o CNPJ do tribunal para verificar public static function is_tcems($boTransacao='') { - if (Sessao::getExercicio() > '2012') { - return true; - } $stSql = "SELECT valor FROM @@ -623,11 +620,9 @@ public static function validaMascaraDinamica($mascara,$digitos) //Explode a mascara $elementosMascara = preg_split( "/[^a-zA-Z0-9]/",$mascara); - //mostraVar($elementosMascara); //Pega somente os separadores da máscara $separadoresMascara = preg_replace( "/[a-zA-Z0-9]/","",$mascara); - //mostraVar($separadoresMascara); //Total de elementos da mascara $totalElMascara = sizeof($elementosMascara); diff --git a/gestaoAdministrativa/fontes/PHP/framework/bancoDados/postgreSQL/Auditoria.class.php b/gestaoAdministrativa/fontes/PHP/framework/bancoDados/postgreSQL/Auditoria.class.php index a2027e7..24ba1ba 100755 --- a/gestaoAdministrativa/fontes/PHP/framework/bancoDados/postgreSQL/Auditoria.class.php +++ b/gestaoAdministrativa/fontes/PHP/framework/bancoDados/postgreSQL/Auditoria.class.php @@ -30,7 +30,7 @@ * @package bancoDados * @subpackage postgreSQL * - * $Id: Auditoria.class.php 59612 2014-09-02 12:00:51Z gelson $ + * $Id: Auditoria.class.php 63894 2015-11-03 17:42:57Z jean $ * * Casos de uso: uc-01.01.00 */ @@ -381,7 +381,12 @@ class Auditoria foreach ($arEstrutura as $count => $key) { if ($key->getConteudo() != '' OR $key->getConteudo() != NULL) { - $arValores[$key->getNomeCampo()] = str_replace('"','\"',$key->getConteudo()); + //Fora colocado essa verificação porque na classe $request é feito um addslashes e está adicionando \ + //assim ao adicionar o \, o str_replace está adicionando novamente a \, então esse str_count verifica + //se já existem \" para não replicar mais + if (substr_count($key->getConteudo(), '\"') <= 0) { + $arValores[$key->getNomeCampo()] = str_replace('"','\"',$key->getConteudo()); + } } } } diff --git a/gestaoAdministrativa/fontes/PHP/framework/bancoDados/postgreSQL/PersistenteAtributosValores.class.php b/gestaoAdministrativa/fontes/PHP/framework/bancoDados/postgreSQL/PersistenteAtributosValores.class.php index 8e0c699..118937e 100755 --- a/gestaoAdministrativa/fontes/PHP/framework/bancoDados/postgreSQL/PersistenteAtributosValores.class.php +++ b/gestaoAdministrativa/fontes/PHP/framework/bancoDados/postgreSQL/PersistenteAtributosValores.class.php @@ -116,7 +116,6 @@ function RecuperaAtributosSelecionadosValoresHistorico(&$rsRecordSet, $stFiltro $stSql = $this->montaRecuperaAtributosSelecionadosValoresHistorico().$stFiltro.$stOrdem; $this->setDebug( $stSql ); - //mostravar( $stSql ); if( $this->getPersistenteAtributo() ) $obErro = $obConexao->executaSQL( $rsRecordSet, $stSql, $boTransacao ); else diff --git a/gestaoAdministrativa/fontes/PHP/framework/bancoDados/postgreSQL/PersistenteSIAM.class.php b/gestaoAdministrativa/fontes/PHP/framework/bancoDados/postgreSQL/PersistenteSIAM.class.php index 3075787..2452c7b 100755 --- a/gestaoAdministrativa/fontes/PHP/framework/bancoDados/postgreSQL/PersistenteSIAM.class.php +++ b/gestaoAdministrativa/fontes/PHP/framework/bancoDados/postgreSQL/PersistenteSIAM.class.php @@ -333,7 +333,6 @@ function exclusao($boTransacao = "") $stChave = $this->montaChave(); if ($stChave) { $stSql .= " WHERE ".$stChave; - //mostravar($stSql); $obErro = $obConexao->executaDML( $stSql, $boTransacao ); } else { $obErro->setDescricao( "Na classe persistente deve ser setada a chave!
\n" ); @@ -366,7 +365,6 @@ function alteracao($boTransacao = "") $stChave = $this->montaChave(); if ($stChave) { $stSql .= " WHERE ".$stChave; - //mostravar($stSql); $obErro = $obConexao->executaDML( $stSql, $boTransacao ); //if ( !$obErro->ocorreu() ) { // diff --git a/gestaoAdministrativa/fontes/PHP/framework/componentes/HTML/ComponenteBase.class.php b/gestaoAdministrativa/fontes/PHP/framework/componentes/HTML/ComponenteBase.class.php index 9f2cc02..acf6968 100755 --- a/gestaoAdministrativa/fontes/PHP/framework/componentes/HTML/ComponenteBase.class.php +++ b/gestaoAdministrativa/fontes/PHP/framework/componentes/HTML/ComponenteBase.class.php @@ -48,7 +48,7 @@ class ComponenteBase extends Objeto # Quando o Urbem estiver com PHP 5.4 esse deve ser o método utilizado, não será mais necessário o check encondig. # function setTitle($valor) { $this->stTitle = $valor; } - public function setTitle($valor) { $this->stTitle = mb_check_encoding($valor, 'UTF-8') ? utf8_decode($valor) : $valor; } + public function setTitle($valor) { $this->stTitle = (strnatcmp(phpversion(),'5.4.0') < 0) ? (mb_check_encoding($valor, 'UTF-8') ? utf8_decode($valor) : $valor ) : $valor; } public function setRotulo($valor) { $this->stRotulo = $valor; } public function setNull($valor) { $this->boNull = $valor; } public function setNullBarra($valor) { $this->boNullBarra = $valor; } diff --git a/gestaoAdministrativa/fontes/PHP/framework/componentes/HTML/IMontaQuantidadeValores.class.php b/gestaoAdministrativa/fontes/PHP/framework/componentes/HTML/IMontaQuantidadeValores.class.php index d2dd98d..e09e4d2 100755 --- a/gestaoAdministrativa/fontes/PHP/framework/componentes/HTML/IMontaQuantidadeValores.class.php +++ b/gestaoAdministrativa/fontes/PHP/framework/componentes/HTML/IMontaQuantidadeValores.class.php @@ -73,9 +73,11 @@ class IMontaQuantidadeValores extends Objeto $this->obValorUnitario = new ValorUnitario(); $this->obValorUnitario->setValue('0,0000'); - $this->obQuantidade = new Quantidade(); + $this->obQuantidade = new Quantidade(); $this->obQuantidade->setValue('0,0000'); - $this->obQuantidade->setSize (23); + $this->obQuantidade->setSize (14); + $this->obQuantidade->setMaxLength(13); + $this->obQuantidade->setDefinicao('NUMERIC'); $this->obValorTotal = new ValorTotal(); $this->obValorTotal->setValue('0,0000'); diff --git a/gestaoAdministrativa/fontes/PHP/framework/componentes/HTML/Lista.class.php b/gestaoAdministrativa/fontes/PHP/framework/componentes/HTML/Lista.class.php index 7643a9d..5dfe456 100755 --- a/gestaoAdministrativa/fontes/PHP/framework/componentes/HTML/Lista.class.php +++ b/gestaoAdministrativa/fontes/PHP/framework/componentes/HTML/Lista.class.php @@ -32,7 +32,7 @@ * @package framework * @subpackage componentes -* $Id: Lista.class.php 62838 2015-06-26 13:02:49Z diogo.zarpelon $ +* $Id: Lista.class.php 64140 2015-12-08 15:56:29Z diogo.zarpelon $ * Casos de uso: uc-01.01.00 @@ -1092,7 +1092,7 @@ function montaHTML() switch ( $obAcao->getAcao() ) { case 'excluir': $obAcao->setLink( str_replace('&','*_*',$obAcao->getLink()) ); - $obAcao->setLink( "javascript:alertaQuestao('".$obAcao->getLink()."','sn_excluir','".Sessao::getId()."');" ); + $obAcao->setLink( "javascript:alertaQuestao('".$obAcao->getLink()."','sn_excluir','".Sessao::getId()."'); BloqueiaFrames(true,false);" ); break; case 'remover': $obAcao->setLink( str_replace('&','*_*',$obAcao->getLink()) ); diff --git a/gestaoAdministrativa/fontes/PHP/framework/componentes/HTML/Paginacao.class.php b/gestaoAdministrativa/fontes/PHP/framework/componentes/HTML/Paginacao.class.php index d2d62cb..b4e3721 100755 --- a/gestaoAdministrativa/fontes/PHP/framework/componentes/HTML/Paginacao.class.php +++ b/gestaoAdministrativa/fontes/PHP/framework/componentes/HTML/Paginacao.class.php @@ -421,33 +421,36 @@ function geraHrefLinks() } else { $stFiltro = ""; } - + + # Foreach para montar o número de páginas, ex: 1|2|3|4... foreach ($arNumPaginas as $stLinks) { if ( (integer) $stLinks == $this->getPagAtual() ) { - $stLink .= trim( $stLinks )." | "; + $stLink .= "
  • ".trim( $stLinks )."
    • "; } else { - $stLink .= "".trim( $stLinks )." | "; + $stLink .= "
  • ".trim( $stLinks )."
    • "; } // mini hack, salva todos os links em um array $this->arLinksPaginas[] = $_SERVER["SCRIPT_NAME"]."?".Sessao::getId()."&pg=".(integer) $stLinks."&pos=".$inPosicao.$stFiltro.""; $inPosicao++; } - $stLink = substr($stLink, 0, strlen( $stLink ) - 3); + + #$stLink = substr($stLink, 0, strlen( $stLink ) - 3); $stLinkRecua = ""; + + # Link para voltar diversas páginas, conforme o retorno de getMaxPaginas() if ( $this->getBlocoAnt() > 1 ) { - $stLinkRecua .= "| getBlocoAnt()."&pos=".$this->getMaxPaginas().$stFiltro."\"><< | \n"; - } else { - $stLinkRecua .= "| << | "; + $stLinkRecua .= "
  • getBlocoAnt()."&pos=".$this->getMaxPaginas().$stFiltro."\"> Voltar ".$this->getMaxPaginas()."
    • \n"; } + if ( $this->getPosPagina() > 1 or $this->getBlocoAnt() > 1 ) { $inPosPagina = ( (integer) $this->getPosPagina() - 1 ); if ($inPosPagina <= 0) { $inPosPagina = $this->getMaxPaginas(); } - $stLinkRecua .= "getPagAtual() - 1)."&pos=".$inPosPagina.$stFiltro."\">< | "; + $stLinkRecua .= "
  • getPagAtual() - 1)."&pos=".$inPosPagina.$stFiltro."\"> Anterior
    • "; } else { - $stLinkRecua .= "< | "; + $stLinkRecua .= "
  • Anterior
    • "; } $stLinkAvanca = ""; @@ -458,16 +461,19 @@ function geraHrefLinks() } if ( $this->getPosPagina() and ( (integer) $this->getPagAtual() * $this->getMaxLinhas() ) < $this->getNumeroLinhas() ) { - $stLinkAvanca .= " | getPagAtual() + 1)."&pos=".$inPosPagina.$stFiltro."\">> | "; + $stLinkAvanca .= "
  • getPagAtual() + 1)."&pos=".$inPosPagina.$stFiltro."\"> Próximo
    • "; } else { - $stLinkAvanca .= " | > | "; + $stLinkAvanca .= "
  • Próximo
    • "; } + + # Link para avançar diversas páginas, conforme o retorno de getMaxPaginas() if ( $this->getBlocoPos() > 1 and ( (integer) $this->getBlocoPos() * $this->getMaxLinhas() ) < $this->getNumeroLinhas() ) { - $stLinkAvanca .= "getBlocoPos()."&pos=1".$stFiltro."\">>> | "; - } else { - $stLinkAvanca .= ">> | "; + $stLinkAvanca .= "
  • getBlocoPos()."&pos=1".$stFiltro."\"> Avançar ".$this->getMaxPaginas()."
    • "; } - $stLink = $stLinkRecua.trim( $stLink ).$stLinkAvanca; + + # Adiciona o estilo de paginação + $stLink = ""; + $this->setHTML( $stLink ); } diff --git a/gestaoAdministrativa/fontes/PHP/framework/componentes/HTML/Periodicidade.class.php b/gestaoAdministrativa/fontes/PHP/framework/componentes/HTML/Periodicidade.class.php index 7663e32..23215ee 100755 --- a/gestaoAdministrativa/fontes/PHP/framework/componentes/HTML/Periodicidade.class.php +++ b/gestaoAdministrativa/fontes/PHP/framework/componentes/HTML/Periodicidade.class.php @@ -33,7 +33,7 @@ * @package framework * @subpackage componentes - $Id: Periodicidade.class.php 63510 2015-09-04 15:12:29Z evandro $ + $Id: Periodicidade.class.php 63968 2015-11-12 18:00:32Z jean $ Casos de uso: uc-01.01.00 @@ -136,6 +136,12 @@ var $obDataFinal; var $boExibeDia; /** + * @access Private + * @var Object +*/ +var $boAnoVazio; + +/** * @access Public * @param String $valor */ @@ -226,6 +232,14 @@ function setExibeDia($valor) { $this->boExibeDia = $valor; } * @access Public * @return String */ + +function setAnoVazio($valor) { $this->boAnoVazio = $valor; } + +/** + * @access Public + * @return Boolean +*/ + function getExercicio() { return $this->stExercicio; } /** * @access Public @@ -312,6 +326,13 @@ function getExibeDia() { return $this->boExibeDia; } * Método Construtor * @access Public */ + +function getAnoVazio() { return $this->boAnoVazio; } +/** + * Método Construtor + * @access Public +*/ + function Periodicidade() { parent::Componente(); @@ -331,10 +352,12 @@ function Periodicidade() $this->setDia ( new Data ); $this->obDia->setName ("stDia".$this->getIdComponente() ); + $this->obDia->setId ("stDia".$this->getIdComponente() ); $this->obDia->setRotulo ( "Dia" ); $this->setMes ( new Select ); $this->obMes->setName ("stMes".$this->getIdComponente() ); + $this->obMes->setId ("stMes".$this->getIdComponente() ); $this->obMes->setRotulo ( "Mes" ); $this->obMes->setValue ( "" ); $this->obMes->addOption ( "","Selecione" ); @@ -353,6 +376,7 @@ function Periodicidade() $this->setHdnAnoMes ( new Hidden); $this->obHdnAnoMes->setName ( "stAnoMes".$this->getIdComponente() ); + $this->obHdnAnoMes->setId ( "stHdnAnoMes".$this->getIdComponente() ); $this->obHdnAnoMes->setValue( "" ); $this->setLblAnoMes ( new Label); @@ -361,6 +385,7 @@ function Periodicidade() $this->setAnoMes ( new TextBox ); $this->obAnoMes->setName ("stAnoMes".$this->getIdComponente() ); + $this->obAnoMes->setId ("stAnoMes".$this->getIdComponente() ); $this->obAnoMes->setRotulo ( "AnoMes" ); $this->obAnoMes->setSize ( 4 ); $this->obAnoMes->setMaxLength ( 4 ); @@ -369,6 +394,7 @@ function Periodicidade() $this->setAno ( new TextBox ); $this->obAno->setName ("stAno".$this->getIdComponente() ); + $this->obAno->setId ("stAno".$this->getIdComponente() ); $this->obAno->setRotulo ( "Ano" ); $this->obAno->setSize ( 4 ); $this->obAno->setMaxLength ( 4 ); @@ -377,10 +403,12 @@ function Periodicidade() $this->setPeriodoInicial ( new Data ); $this->obPeriodoInicial->setName ("stPeriodoInicial".$this->getIdComponente() ); + $this->obPeriodoInicial->setId ("stPeriodoInicial".$this->getIdComponente() ); $this->obPeriodoInicial->setRotulo ( "Intervalo" ); $this->setPeriodoFinal ( new Data ); $this->obPeriodoFinal->setName ("stPeriodoInicial".$this->getIdComponente() ); + $this->obPeriodoFinal->setId ("stPeriodoInicial".$this->getIdComponente() ); $this->obPeriodoFinal->setRotulo ( "Intervalo" ); $this->setPeriodoLabel ( new Label ); @@ -391,9 +419,14 @@ function Periodicidade() $this->setDataInicial ( new Hidden ); $this->obDataInicial->setName ('stDataInicial'.$this->getIdComponente() ); + $this->obDataInicial->setId ('stDataInicial'.$this->getIdComponente() ); $this->setDataFinal ( new Hidden ); $this->obDataFinal->setName ('stDataFinal'.$this->getIdComponente() ); + $this->obDataFinal->setId ('stDataFinal'.$this->getIdComponente() ); + + $this->setAnoVazio ( false ); + } /** @@ -414,27 +447,31 @@ function montaHtml() $this->obDataFinal->setName ($this->obDataFinal->getName().$this->getIdComponente() ); $this->obDia->setName ("stDia".$this->getIdComponente() ); + $this->obDia->setId ("stDia".$this->getIdComponente() ); $this->obDia->obEvento->setOnChange ("ajaxJavaScript('".CAM_FW_INSTANCIAS."processamento/OCPeriodicidade.php?".Sessao::getId()."&inIdComponente=".$this->getIdComponente()."&".$this->obDia->getName()."='+this.value,'preencheDia');"); $this->obAnoMes->setName ("stAnoMes".$this->getIdComponente() ); + $this->obAnoMes->setId ("stAnoMes".$this->getIdComponente() ); $this->obAnoMes->obEvento->setOnBlur ("ajaxJavaScript('".CAM_FW_INSTANCIAS."processamento/OCPeriodicidade.php?".Sessao::getId()."&inIdComponente=".$this->getIdComponente()."&".$this->obMes->getName().$this->getIdComponente()."='+document.frm.".$this->obMes->getName().$this->getIdComponente().".value+'&".$this->obAnoMes->getName()."='+this.value,'preencheMes');"); $this->obMes->setName ("stMes".$this->getIdComponente() ); + $this->obMes->setId ("stMes".$this->getIdComponente() ); $this->obMes->obEvento->setOnChange ("ajaxJavaScript('".CAM_FW_INSTANCIAS."processamento/OCPeriodicidade.php?".Sessao::getId()."&inIdComponente=".$this->getIdComponente()."&".$this->obMes->getName()."='+this.value+'&".$this->obAnoMes->getName()."='+document.frm.".$this->obAnoMes->getName().".value,'preencheMes');"); $this->setHdnAnoMes ( new Hidden); - $this->obHdnAnoMes->setName ( "stAnoMes".$this->getIdComponente() ); - $this->obLblAnoMes->setId ( "inAnoMes".$this->getIdComponente() ); $this->obAno->setName ("stAno".$this->getIdComponente() ); + $this->obAno->setId ("stAno".$this->getIdComponente() ); $this->obAno->obEvento->setOnChange ("ajaxJavaScript('".CAM_FW_INSTANCIAS."processamento/OCPeriodicidade.php?".Sessao::getId()."&inIdComponente=".$this->getIdComponente()."&".$this->obAno->getName()."='+this.value,'preencheAno');"); $this->obPeriodoInicial->setName ("stPeriodoInicial".$this->getIdComponente() ); + $this->obPeriodoInicial->setId ("stPeriodoInicial".$this->getIdComponente() ); $this->obPeriodoInicial->obEvento->setOnChange("ajaxJavaScript('".CAM_FW_INSTANCIAS."processamento/OCPeriodicidade.php?".Sessao::getId()."&inIdComponente=".$this->getIdComponente()."&".$this->obPeriodoInicial->getName()."='+this.value+'&stTipo=inicial','preenchePeriodo');"); $this->obPeriodoFinal->setName ("stPeriodoFinal".$this->getIdComponente() ); + $this->obPeriodoFinal->setId ("stPeriodoFinal".$this->getIdComponente() ); $this->obPeriodoFinal->obEvento->setOnChange("ajaxJavaScript('".CAM_FW_INSTANCIAS."processamento/OCPeriodicidade.php?".Sessao::getId()."&inIdComponente=".$this->getIdComponente()."&".$this->obPeriodoFinal->getName()."='+this.value+'&stTipo=final','preenchePeriodo');"); if ( $this->getExibeDia() ) { @@ -446,10 +483,12 @@ function montaHtml() if (!$this->obDataInicial->getName()) { $this->obDataInicial->setName ($this->obDataInicial->getName().$this->getIdComponente() ); + $this->obDataInicial->setId ($this->obDataInicial->getName().$this->getIdComponente() ); } if (!$this->obDataFinal->getName()) { $this->obDataFinal->setName ($this->obDataFinal->getName().$this->getIdComponente() ); + $this->obDataFinal->setId ($this->obDataFinal->getName().$this->getIdComponente() ); } //MONTA O OPÇÃO "PERIODO" @@ -468,6 +507,7 @@ function montaHtml() //MONTA A PERIODICIDADE $this->obPeriodicidade->setName( $this->obPeriodicidade->getName() ); + $this->obPeriodicidade->setId ( $this->obPeriodicidade->getName() ); $this->obPeriodicidade->obEvento->setOnChange("ajaxJavaScript('".CAM_FW_INSTANCIAS."processamento/OCPeriodicidade.php?".Sessao::getId()."&inIdComponente=".$this->getIdComponente()."&inCodPeriodo='+this.value,'montaSpan');" ); if($this->getValue()) diff --git a/gestaoAdministrativa/fontes/PHP/framework/componentes/HTML/Span.class.php b/gestaoAdministrativa/fontes/PHP/framework/componentes/HTML/Span.class.php index 9c08e77..92cc5fe 100755 --- a/gestaoAdministrativa/fontes/PHP/framework/componentes/HTML/Span.class.php +++ b/gestaoAdministrativa/fontes/PHP/framework/componentes/HTML/Span.class.php @@ -138,6 +138,12 @@ function setDestaque($Valor) {$this->boDestaque = $Valor; } */ function setStyle($valor) { $this->stStyle = $valor; } +/** + * @access Public + * @param String $valor +*/ +function setClass($valor) { $this->stClass = $valor; } + //GETTERS /** * @access Public @@ -182,6 +188,12 @@ function getDestaque() {return $this->boDestaque; } function getStyle() { return $this->stStyle; } /** + * @access Public + * @return String + */ +function getClass() { return $this->stClass; } + +/** * Método construtor * @access Public */ @@ -206,6 +218,10 @@ function montaHTML() if ($this->getDestaque()) { $stHTML .= ' class="spanDestaque" '; } + + if ($this->getClass()) { + $stHTML .= " class=\"".$this->getClass()."\" "; + } if ($this->getStyle()) { $stHTML .= " style=\"".$this->getStyle()."\" "; diff --git a/gestaoAdministrativa/fontes/PHP/framework/componentes/mascara/Mascara.class.php b/gestaoAdministrativa/fontes/PHP/framework/componentes/mascara/Mascara.class.php index 5aab35a..39038be 100755 --- a/gestaoAdministrativa/fontes/PHP/framework/componentes/mascara/Mascara.class.php +++ b/gestaoAdministrativa/fontes/PHP/framework/componentes/mascara/Mascara.class.php @@ -33,7 +33,7 @@ * @package framework * @subpackage componentes -$Id: Mascara.class.php 59612 2014-09-02 12:00:51Z gelson $ +$Id: Mascara.class.php 63829 2015-10-22 12:06:07Z franver $ Casos de uso: uc-01.01.00 */ @@ -231,11 +231,9 @@ public static function validaMascaraDinamica($mascara,$digitos) //Explode a mascara $elementosMascara = preg_split("/[^a-zA-Z0-9]/",$mascara); - //mostraVar($elementosMascara); //Pega somente os separadores da máscara $separadoresMascara = preg_replace("/[a-zA-Z0-9]/","",$mascara); - //mostraVar($separadoresMascara); //Total de elementos da mascara $totalElMascara = sizeof($elementosMascara); diff --git a/gestaoAdministrativa/fontes/PHP/framework/include/cabecalho.inc.php b/gestaoAdministrativa/fontes/PHP/framework/include/cabecalho.inc.php index 674b80d..1d19cda 100644 --- a/gestaoAdministrativa/fontes/PHP/framework/include/cabecalho.inc.php +++ b/gestaoAdministrativa/fontes/PHP/framework/include/cabecalho.inc.php @@ -33,7 +33,7 @@ * @package framework * @subpackage componentes - $Id: cabecalho.inc.php 63462 2015-08-31 17:12:23Z franver $ + $Id: cabecalho.inc.php 64012 2015-11-18 16:42:41Z diogo.zarpelon $ Casos de uso: uc-01.01.00 */ @@ -128,6 +128,7 @@ $jsPath = constant('ENV_TYPE') == 'dev' ? '' : 'compressed/'; + diff --git a/gestaoAdministrativa/fontes/PHP/framework/instancias/index/menu.php b/gestaoAdministrativa/fontes/PHP/framework/instancias/index/menu.php index c89686a..af48c86 100755 --- a/gestaoAdministrativa/fontes/PHP/framework/instancias/index/menu.php +++ b/gestaoAdministrativa/fontes/PHP/framework/instancias/index/menu.php @@ -33,7 +33,7 @@ * @ignore - $Id: menu.php 62838 2015-06-26 13:02:49Z diogo.zarpelon $ + $Id: menu.php 63977 2015-11-13 13:00:23Z diogo.zarpelon $ $Revision: 28718 $ $Name$ @@ -239,7 +239,7 @@ if (!Sessao::getId()) { ?>
    - +
    obAnoMes->montaHTML(); $stHTML .= $obComboPeriodicidade->obAnoMes->getHTML(); } + $obComboPeriodicidade->obMes->montaHTML(); $stHTML .= ' / '.$obComboPeriodicidade->obMes->getHTML(); @@ -99,11 +100,12 @@ switch ($_REQUEST["stCtrl"]) { break; } + //$obComboPeriodicidade->obAnoMes->setTitle("Informe o ano e mês. Se quiser recuperar todos os anos, deixe o campo ano em branco."); $stHTML = nl2br(addslashes(str_replace("\r\n", "\n", preg_replace("/(\r\n|\n|\r)/", "", $stHTML)))); - $stJs .= "$('".$obComboPeriodicidade->obSpan->getId()."').innerHTML = '".$stHTML."';"; - $stJs .= "document.frm.".$obComboPeriodicidade->obDataInicial->getName().".value = '".$stDataInicial."';"; - $stJs .= "document.frm.".$obComboPeriodicidade->obDataFinal->getName().".value = '".$stDataFinal."';"; - + $stJs .= "$('".$obComboPeriodicidade->obSpan->getId()."').innerHTML = '".$stHTML."';\n"; + $stJs .= "document.frm.".$obComboPeriodicidade->obDataInicial->getName().".value = '".$stDataInicial."';\n"; + $stJs .= "document.frm.".$obComboPeriodicidade->obDataFinal->getName().".value = '".$stDataFinal."';\n"; + $stJs .= "jq('#stAnoMes').prop('title', 'Se você quiser recuperar todos os anos, deixe este campo em branco.');\n"; break; case 'preencheDia' : @@ -121,6 +123,9 @@ switch ($_REQUEST["stCtrl"]) { $inUltDia = cal_days_in_month(CAL_GREGORIAN,$_REQUEST[$obComboPeriodicidade->obMes->getName()],$_REQUEST[$obComboPeriodicidade->obAnoMes->getName()] ); $stJs .= "document.forms[0].".$obComboPeriodicidade->obDataInicial->getName().".value = '01/".$_REQUEST[$obComboPeriodicidade->obMes->getName()]."/".$_REQUEST[$obComboPeriodicidade->obAnoMes->getName()]."'; "; $stJs .= "document.forms[0].".$obComboPeriodicidade->obDataFinal->getName().".value = '".$inUltDia."/".$_REQUEST[$obComboPeriodicidade->obMes->getName()]."/".$_REQUEST[$obComboPeriodicidade->obAnoMes->getName()]."';"; + } else if ($obComboPeriodicidade->getAnoVazio() == true AND $_REQUEST[$obComboPeriodicidade->obAnoMes->getName()] == '') { + $stJs .= "document.forms[0].".$obComboPeriodicidade->obDataInicial->getName().".value = '".$_REQUEST[$obComboPeriodicidade->obMes->getName()]."'; "; + $stJs .= "document.forms[0].".$obComboPeriodicidade->obDataFinal->getName().".value = '".$_REQUEST[$obComboPeriodicidade->obMes->getName()]."';"; } break; case 'preencheAno' : diff --git a/gestaoAdministrativa/fontes/PHP/framework/legado/cabecalho.php b/gestaoAdministrativa/fontes/PHP/framework/legado/cabecalho.php index 4a1f14b..f5a636d 100755 --- a/gestaoAdministrativa/fontes/PHP/framework/legado/cabecalho.php +++ b/gestaoAdministrativa/fontes/PHP/framework/legado/cabecalho.php @@ -119,7 +119,6 @@ function mostraTitulo()
    "; } /* -//mostravar(sessao); $sSQL = "SELECT count(cod_acao) as contar FROM administracao.permissao WHERE cod_acao = ".Sessao::read('acao')." AND numcgm = ".Sessao::read('numCgm')." And ano_exercicio = ".Sessao::getExercicio(); //echo $sSQL; @@ -173,9 +172,8 @@ while (!$dbEmp->eof()) { $dbEmp->limpaSelecao(); $dbEmp->fechaBD(); if ($codigomodulo != 0) { - //mostravar(sessao); $sSQL = "SELECT count(cod_acao) as contar FROM administracao.permissao WHERE cod_acao = ".Sessao::read('acao')." AND numcgm = ".Sessao::read('numCgm')." And ano_exercicio = ".Sessao::getExercicio(); - //echo $sSQL; + $dbEmp = new dataBaseLegado; $dbEmp->abreBD(); $dbEmp->abreSelecao($sSQL); diff --git a/gestaoAdministrativa/fontes/PHP/framework/legado/filtrosLOLegado.inc.php b/gestaoAdministrativa/fontes/PHP/framework/legado/filtrosLOLegado.inc.php index 1c02484..1f81ab9 100755 --- a/gestaoAdministrativa/fontes/PHP/framework/legado/filtrosLOLegado.inc.php +++ b/gestaoAdministrativa/fontes/PHP/framework/legado/filtrosLOLegado.inc.php @@ -53,13 +53,12 @@ $mascaraSetor = pegaConfiguracao('mascara_local',2); abreBD(); $dbEmp->abreSelecao($sSQL); $dbEmp->vaiPrimeiro(); $comboCodOrgao = ""; - //mostravar($sSQL); + while (!$dbEmp->eof()) { $codOrgaof = trim($dbEmp->pegaCampo("cod_orgao")); $nomOrgaof = trim($dbEmp->pegaCampo("nom_orgao")); diff --git a/gestaoAdministrativa/fontes/PHP/framework/legado/funcoesLegado.lib.php b/gestaoAdministrativa/fontes/PHP/framework/legado/funcoesLegado.lib.php index 2022e4f..092420b 100755 --- a/gestaoAdministrativa/fontes/PHP/framework/legado/funcoesLegado.lib.php +++ b/gestaoAdministrativa/fontes/PHP/framework/legado/funcoesLegado.lib.php @@ -453,7 +453,6 @@ function pegaID($sChave, $sTabela, $sWhere="") $DBx = new dataBaseLegado; $DBx->abreBD(); $sSQL = "select max($sChave) as ultima from $sTabela $sWhere"; -//sistemaLegado::mostraVar($sSQL);exit; $DBx->abreSelecao($sSQL); $DBx->vaiPrimeiro(); if (!$DBx->eof()) { diff --git a/gestaoAdministrativa/fontes/PHP/framework/legado/mascarasLegado.lib.php b/gestaoAdministrativa/fontes/PHP/framework/legado/mascarasLegado.lib.php index 2f74e1e..bd1398a 100755 --- a/gestaoAdministrativa/fontes/PHP/framework/legado/mascarasLegado.lib.php +++ b/gestaoAdministrativa/fontes/PHP/framework/legado/mascarasLegado.lib.php @@ -102,11 +102,9 @@ function validaMascaraDinamica($mascara,$digitos) //Explode a mascara $elementosMascara = preg_split("/[^a-zA-Z0-9]/",$mascara); - //mostraVar($elementosMascara); //Pega somente os separadores da máscara $separadoresMascara = preg_replace("/[a-zA-Z0-9]/","",$mascara); - //mostraVar($separadoresMascara); //Total de elementos da mascara $totalElMascara = sizeof($elementosMascara); diff --git a/gestaoAdministrativa/fontes/PHP/framework/legado/usuarioLegado.class.php b/gestaoAdministrativa/fontes/PHP/framework/legado/usuarioLegado.class.php index 0ca3a2f..171ccab 100755 --- a/gestaoAdministrativa/fontes/PHP/framework/legado/usuarioLegado.class.php +++ b/gestaoAdministrativa/fontes/PHP/framework/legado/usuarioLegado.class.php @@ -281,13 +281,12 @@ Atualiza estes dados na tabela usuario, em seguida atualiza a senha criptografad cod_orgao='$codOrgao', ano_exercicio='$exercicio', username='$usuario', status='$status' Where numcgm = '$cgm' "; - //echo"$sSQL"; - //mostravar($sSQL); + $conectaBD = new databaseLegado ; $conectaBD->abreBD(); $conectaBD->executaSql($sSQL); $conectaBD->fechaBD(); - //echo $sSQL; + //Criptografa a senha do usuário $modSenha = new sessao; $modSenha->setaVariaveis($usuario,$senha,$exercicio); @@ -392,7 +391,7 @@ nas respectivas variáveis da classe $conectaBD->limpaSelecao(); $conectaBD->fechaBD(); } - //mostraVar($this->vetCgm); + return $this->vetCgm; }//Fim function pegaDadosUsuario diff --git a/gestaoAdministrativa/fontes/PHP/framework/legado/valida/validacaoLegada.php b/gestaoAdministrativa/fontes/PHP/framework/legado/valida/validacaoLegada.php index 750d30a..176cb6b 100755 --- a/gestaoAdministrativa/fontes/PHP/framework/legado/valida/validacaoLegada.php +++ b/gestaoAdministrativa/fontes/PHP/framework/legado/valida/validacaoLegada.php @@ -43,8 +43,6 @@ include_once '../../../../../../gestaoAdministrativa/fontes/PHP/framework/legado $js = ""; $ok = true; -//mostraVar($HTTP_GET_VARS); - switch ($ctrl) { case ("cgm"): if ($numCgm>0) { @@ -74,7 +72,6 @@ case ("motorista"): //Verifica se o setor digitado é válido. Caso seja retorna o nome do setor case ("setor"): $setor = validaSetor($chave,$exercicio); - //mostraVar($setor); if ($setor) { $js .= "f.".$campo.".value = '".$setor[nomSetor]."'; \n"; } else { diff --git a/gestaoAdministrativa/fontes/PHP/framework/popups/alerta/alerta.php b/gestaoAdministrativa/fontes/PHP/framework/popups/alerta/alerta.php index 33f5f72..046ee33 100755 --- a/gestaoAdministrativa/fontes/PHP/framework/popups/alerta/alerta.php +++ b/gestaoAdministrativa/fontes/PHP/framework/popups/alerta/alerta.php @@ -86,81 +86,82 @@ if (stripslashes($stDescQuestao) > '' ) { $frameDestino = $frameDestino ? $frameDestino : 'telaPrincipal'; $pag = $pagQuestao; + switch ($tipo) { - case "incluir": - $msgs .= $obj." incluído com sucesso"; + case "incluir": + $msgs .= $obj." incluído com sucesso"; break; case "n_incluir": - $msgs .= "Não foi possível incluir ".$obj.", contate o Administrador"; + $msgs .= "Não foi possível incluir ".$obj.", contate o Administrador"; break; case "alterar": - $msgs .= $obj." alterado com sucesso"; + $msgs .= $obj." alterado com sucesso"; break; case "n_alterar": - $msgs .= "Não foi possível alterar ".$obj.", contate o Administrador"; + $msgs .= "Não foi possível alterar ".$obj.", contate o Administrador"; break; case "sn_excluir": - $msgs .= "Confirma ".$nomAcao." (".$obj.") ?"; - $imagem = "botao_confirma.png"; + $msgs .= "Confirma ".$nomAcao." (".$obj.") ?"; + $imagem = "botao_confirma.png"; break; case "sn_cancelar": - $msgs .= "Confirma ".$nomAcao." (".$obj.") ?"; - $imagem = "botao_confirma.png"; + $msgs .= "Confirma ".$nomAcao." (".$obj.") ?"; + $imagem = "botao_confirma.png"; break; case "pp_excluir": - $msgs .= "Confirma ".$nomAcao." (".$obj.") ?"; - $imagem = "botao_confirma.png"; + $msgs .= "Confirma ".$nomAcao." (".$obj.") ?"; + $imagem = "botao_confirma.png"; break; case "cc": - $msgs .= $obj; + $msgs .= $obj; break; case "excluir": - $msgs .= $obj." excluído com sucesso"; + $msgs .= $obj." excluído com sucesso"; break; case "n_excluir": - $msgs .= "Não foi possível excluir ".$obj.", contate o Administrador"; + $msgs .= "Não foi possível excluir ".$obj.", contate o Administrador"; break; case "cancelar": - $msgs .= $obj." cancelado com sucesso"; + $msgs .= $obj." cancelado com sucesso"; break; case "n_cancelar": - $msgs .= "Não foi possível cancelar ".$obj.", contate o Administrador"; + $msgs .= "Não foi possível cancelar ".$obj.", contate o Administrador"; break; case "form": - $ch_mensagem = substr($obj, 1); - $rel_mensagem = str_replace("@","\n","$ch_mensagem"); - $msgs .= $rel_mensagem; + $ch_mensagem = substr($obj, 1); + $rel_mensagem = str_replace("@","\n","$ch_mensagem"); + $msgs .= $rel_mensagem; break; case "unica": - $msgs .= $obj; + $msgs .= $obj; break; case "ccform": - $msgs .= $obj; - $imagem = "botao_confirma.png"; + $msgs .= $obj; + $imagem = "botao_confirma.png"; break; case "sn": - $msgs .= $obj; - $imagem = "botao_confirma.png"; + $msgs .= $obj; + $imagem = "botao_confirma.png"; break; case "pp": - $msgs .= $obj; - $imagem = "botao_confirma.png"; + $msgs .= $obj; + $imagem = "botao_confirma.png"; break; } @@ -175,31 +176,13 @@ switch ($chamada) { break; case "cc": - $sTitulo = "Confirmação"; - break; - case "sn": - $sTitulo = "Confirmação"; - break; - case "pp": - $sTitulo = "Confirmação"; - break; - case "decisao": - $sTitulo = "Confirmação"; - break; - case "ccform": - $sTitulo = "Confirmação"; - break; - case "oculto": - $sTitulo = "Confirmação"; - break; - case "decisao_sem_acao": - $sTitulo = "Confirmação"; + $sTitulo = "Confirmação"; break; } @@ -216,6 +199,24 @@ function fcsOnMe() mytimer = setTimeout('fcsOnMe()', 500); } +function LiberaFramesPopUp(){ + if (typeof jq == 'undefined') { + var jq = window.opener.parent.frames["telaPrincipal"].jQuery; + } + + jq("input:button").each(function(){ this.disabled = false; }); + + jq("input#Ok").removeAttr('readonly'); + + for(i=1;i<4;i++){ + jq('div#containerPopUp',window.opener.parent.frames[i].document).each(function(){ + jq(this).remove(); + }); + + jq('html',window.opener.parent.frames[i].document).css({'overflow':'auto'}); + } +} + @@ -223,130 +224,117 @@ function fcsOnMe()
    - - - - - - - - - - + + + + + + + + - + +
    - - -  - - -
    - - - - - -
    +
     
    + + + + + +
    '; - break; - case "aviso": - echo ''; + echo ''; break; case "cc": - echo " - - "; + echo " + + "; break; case "sn": - echo " - - "; + echo " + + + "; break; case "pp": - echo " - - "; + echo " + + "; break; case "decisao": - echo " - - "; + echo " + + "; break; case "ccform": - echo " - - "; + echo " + + "; break; case "oculto": - echo " - - "; + echo " + + "; break; } ?> -
    diff --git a/gestaoAdministrativa/fontes/PHP/framework/popups/alerta/alertaGenerico.php b/gestaoAdministrativa/fontes/PHP/framework/popups/alerta/alertaGenerico.php index d535311..9779ec8 100755 --- a/gestaoAdministrativa/fontes/PHP/framework/popups/alerta/alertaGenerico.php +++ b/gestaoAdministrativa/fontes/PHP/framework/popups/alerta/alertaGenerico.php @@ -69,13 +69,12 @@ $pagQuestao = implode('&',$arOut); */ foreach ($arPagQuestao as $stKey => $stValue) { $arKey = explode('=',$stValue); - //mostravar($stKey); + if ($arKey[0] == 'stDescQuestao') { $stDescQuestao = $arKey[1]; - //echo $stDescQuestao; } } -//mostravar ($arPagQuestao); + $obj = stripslashes($stDescQuestao); $pag = $pagQuestao; $tipo = $_REQUEST['tipo']; diff --git a/gestaoAdministrativa/fontes/PHP/framework/request/Request.class.php b/gestaoAdministrativa/fontes/PHP/framework/request/Request.class.php index 414ad98..439ab88 100644 --- a/gestaoAdministrativa/fontes/PHP/framework/request/Request.class.php +++ b/gestaoAdministrativa/fontes/PHP/framework/request/Request.class.php @@ -79,6 +79,16 @@ class Request } } // Fim do método get + /** + * Retorna todos os elementos do formulário. + * + * @return array + */ + public function getAll() + { + return $this->array; + } + /* * Método set * Seta variável no request se $key for string diff --git a/gestaoAdministrativa/fontes/PHP/framework/temas/padrao/CSS/paginacao.css b/gestaoAdministrativa/fontes/PHP/framework/temas/padrao/CSS/paginacao.css new file mode 100644 index 0000000..0c3064d --- /dev/null +++ b/gestaoAdministrativa/fontes/PHP/framework/temas/padrao/CSS/paginacao.css @@ -0,0 +1,134 @@ +.pagination { + display: inline-block; + padding-left: 0; + margin: 20px 0; + border-radius: 4px; +} +.pagination > li { + display: inline; +} +.pagination > li > a, +.pagination > li > span { + position: relative; + float: left; + padding: 6px 12px; + margin-left: -1px; + line-height: 1.42857143; + color: #337ab7; + text-decoration: none; + background-color: #fff; + border: 1px solid #ddd; +} +.pagination > li:first-child > a, +.pagination > li:first-child > span { + margin-left: 0; + border-top-left-radius: 4px; + border-bottom-left-radius: 4px; +} +.pagination > li:last-child > a, +.pagination > li:last-child > span { + border-top-right-radius: 4px; + border-bottom-right-radius: 4px; +} +.pagination > li > a:hover, +.pagination > li > span:hover, +.pagination > li > a:focus, +.pagination > li > span:focus { + z-index: 3; + color: #23527c; + background-color: #eee; + border-color: #ddd; +} +.pagination > .active > a, +.pagination > .active > span, +.pagination > .active > a:hover, +.pagination > .active > span:hover, +.pagination > .active > a:focus, +.pagination > .active > span:focus { + z-index: 2; + color: #fff; + cursor: default; + background-color: #337ab7; + border-color: #337ab7; +} +.pagination > .disabled > span, +.pagination > .disabled > span:hover, +.pagination > .disabled > span:focus, +.pagination > .disabled > a, +.pagination > .disabled > a:hover, +.pagination > .disabled > a:focus { + color: #777; + cursor: not-allowed; + background-color: #fff; + border-color: #ddd; +} +.pagination-lg > li > a, +.pagination-lg > li > span { + padding: 10px 16px; + font-size: 18px; + line-height: 1.3333333; +} +.pagination-lg > li:first-child > a, +.pagination-lg > li:first-child > span { + border-top-left-radius: 6px; + border-bottom-left-radius: 6px; +} +.pagination-lg > li:last-child > a, +.pagination-lg > li:last-child > span { + border-top-right-radius: 6px; + border-bottom-right-radius: 6px; +} +.pagination-sm > li > a, +.pagination-sm > li > span { + padding: 5px 10px; + font-size: 12px; + line-height: 1.5; +} +.pagination-sm > li:first-child > a, +.pagination-sm > li:first-child > span { + border-top-left-radius: 3px; + border-bottom-left-radius: 3px; +} +.pagination-sm > li:last-child > a, +.pagination-sm > li:last-child > span { + border-top-right-radius: 3px; + border-bottom-right-radius: 3px; +} +.pager { + padding-left: 0; + margin: 20px 0; + text-align: center; + list-style: none; +} +.pager li { + display: inline; +} +.pager li > a, +.pager li > span { + display: inline-block; + padding: 5px 14px; + background-color: #fff; + border: 1px solid #ddd; + border-radius: 15px; +} +.pager li > a:hover, +.pager li > a:focus { + text-decoration: none; + background-color: #eee; +} +.pager .next > a, +.pager .next > span { + float: right; +} +.pager .previous > a, +.pager .previous > span { + float: left; +} +.pager .disabled > a, +.pager .disabled > a:hover, +.pager .disabled > a:focus, +.pager .disabled > span { + color: #777; + cursor: not-allowed; + background-color: #fff; +} \ No newline at end of file diff --git a/gestaoAdministrativa/fontes/PHP/framework/temas/padrao/CSS/stylos_ns.css b/gestaoAdministrativa/fontes/PHP/framework/temas/padrao/CSS/stylos_ns.css index d1251d2..797e329 100755 --- a/gestaoAdministrativa/fontes/PHP/framework/temas/padrao/CSS/stylos_ns.css +++ b/gestaoAdministrativa/fontes/PHP/framework/temas/padrao/CSS/stylos_ns.css @@ -57,15 +57,15 @@ TEXTAREA.lista { } BODY { - /*background: url("../imagens/bg_fundo_home.png") 0 0 repeat-x;*/ background: #EDF4FA; font-family : Futura, Arial, Helvetica, sans-serif; font-size : 12px; - /*background-color : #E4EAE4;*/ } + BODY.tela_erro{ background-color : #85A5CC!important; } + TD.userTopo { color : White; font-family : Futura, Arial, Helvetica, sans-serif; @@ -139,9 +139,11 @@ INPUT { font-stretch : condensed; } + INPUT:focus{ background-color : #fff5dd; } + INPUT.aviso { font-family : Futura, Arial, Helvetica, sans-serif; font-size : 12px; @@ -155,18 +157,22 @@ A:link { font-weight : bold; outline:none; } + A:visited { color: black; font-weight : bold; } + A:active { color: Blue; font-weight : bold; } + A:hover { color: Blue; font-weight : bold; } + TD.status_cel_up { font-family : Futura, Arial, Helvetica, sans-serif; font-size : 12px; @@ -178,6 +184,7 @@ TD.status_cel_up { border-left : 1px solid #f4f4ff; border-top : 1px solid #f4f4ff; } + TD.status_cel_up_center { font-family : Futura, Arial, Helvetica, sans-serif; font-size : 12px; @@ -189,6 +196,7 @@ TD.status_cel_up_center { border-left : 1px solid #f4f4ff; border-top : 1px solid #f4f4ff; } + TD.status_cel_down{ font-family : Futura, Arial, Helvetica, sans-serif; font-size : 12px; @@ -223,6 +231,7 @@ TD.status_cel_up_center { border-left : 1px solid #f4f4ff; border-top : 1px solid #f4f4ff; } + TD.status_cel_down{ font-family : Futura, Arial, Helvetica, sans-serif; font-size : 12px; @@ -241,12 +250,14 @@ H1{ font-weight: bold; color : #174A81; } + H2{ font-family : Futura, Arial, Helvetica, sans-serif; font-size : 16px; font-weight: bold; color : #FF0000; } + H3{ font-family : Arial, Helvetica, sans-serif; font-size : 12px; @@ -261,20 +272,35 @@ H3{ text-align : center; color : #ff0000; } + +.observacao{ + background-color : #85A5CC; + color: #000000; + font-family : Futura, Arial, Helvetica, sans-serif; + font-size : 13px; + font-weight: bold; + padding: 5px; + text-align: center; + display: block !important; +} + table{ background-color: #ffffff; } + table#processos{ background-color: #ffffff; } + table#impressoras{ background-color: #ffffff; } + table#paginacao{ background-color:#EDF4FA; } -TD.label{ +TD.label, p.label{ background-color : #85A5CC; color: #000000; font-family : Futura, Arial, Helvetica, sans-serif; @@ -282,13 +308,8 @@ TD.label{ font-weight: bold; text-align : right; vertical-align : top; - - /* border: 1px outset #5F625F; - border-bottom : 1px solid #5F625F; - border-right : 1px solid #5F625F; - border-left : 1px solid #EBF2EB; - border-top : 1px solid #EBF2EB;*/ } + TD.labelleft{ background-color : #85A5CC; color: #FFFFFF; @@ -298,15 +319,10 @@ TD.labelleft{ height: 45px; text-align : left; vertical-align : middle; - /*border: 1px outset #5F625F; - border-bottom : 1px solid #5F625F; - border-right : 1px solid #5F625F; - border-left : 1px solid #EBF2EB; - border-top : 1px solid #EBF2EB;*/ } + TD.labelleftcabecalho{ background-color : #85a5cc!important; - /*border-bottom : 1px solid #929292;*/ color: #ffffff; font-family: Verdana, Arial, Helvetica, sans-serif; ; font-size : 12px; @@ -315,8 +331,8 @@ TD.labelleftcabecalho{ text-align : left; vertical-align : middle; } + TD.labelcenter{ - /*border-bottom : 1px solid #929292;*/ background-color : #edf4fa; font-family: Verdana, Arial, Helvetica, sans-serif; ; font-size : 12px; @@ -324,12 +340,8 @@ TD.labelcenter{ height: 45px; text-align : center; vertical-align : middle; - /* border: 1px outset #5F625F; - border-bottom : 1px solid #5F625F; - border-right : 1px solid #5F625F; - border-left : 1px solid #EBF2EB; - border-top : 1px solid #EBF2EB; */ } + TD.labelcenterTable{ background-color : #edf4fa; font-family: Verdana, Arial, Helvetica, sans-serif; ; @@ -338,15 +350,10 @@ TD.labelcenterTable{ height: 45px; text-align : center; vertical-align : middle; - /* border: 1px outset #5F625F; - border-bottom : 1px solid #5F625F; - border-right : 1px solid #5F625F; - border-left : 1px solid #EBF2EB; - border-top : 1px solid #EBF2EB; */ } + TD.labelcentercabecalho{ background-color : #85a5cc!important; - /*border-bottom : 1px solid #929292;*/ color: #ffffff; font-family: Verdana, Arial, Helvetica, sans-serif; ; font-size : 12px; @@ -355,6 +362,7 @@ TD.labelcentercabecalho{ text-align : center; vertical-align : middle; } + TD.labelcenterCalendario{ border-bottom : 1px solid #929292; background-color : #4A6491; @@ -364,16 +372,10 @@ TD.labelcenterCalendario{ height: 45px; text-align : center; vertical-align : middle; - /* border: 1px outset #5F625F; - border-bottom : 1px solid #5F625F; - border-right : 1px solid #5F625F; - border-left : 1px solid #EBF2EB; - border-top : 1px solid #EBF2EB; */ } TD.contadorClaro{ background-color : #edf4fa; - /*border-bottom : 1px solid #929292;*/ font-family: Futura, Arial, Helvetica, sans-serif; font-size : 13px; font-weight: bold; @@ -384,7 +386,6 @@ TD.contadorClaro{ TD.contadorEscuro{ background-color : #d0e4f2; - /*border-bottom : 1px solid #929292;*/ font-family : Futura, Arial, Helvetica, sans-serif; font-size : 13px; font-weight: bold; @@ -400,12 +401,6 @@ TD.titulocabecalho { font-weight : bold; font-style : normal; text-align : left; - /* background-color : #323232; - border: 1px outset #000000; - border-bottom : 1px solid #000000; - border-right : 1px solid #000000; - border-left : 1px solid #FFFFFF; - border-top : 1px solid #FFFFFF;*/ } TD.field { @@ -414,13 +409,6 @@ TD.field { font-size : 13px; vertical-align : top; height: 30px; - - /*border: 1px outset #808080; - border-bottom : 1px solid #808080; - border-right : 1px solid #808080; - border-top : 1px solid #e4e4e4; - border-left : 1px solid #e4e4e4; -*/ } TD.fieldfinanceiro { @@ -429,28 +417,15 @@ TD.fieldfinanceiro { font-size : 13px; vertical-align :middle; height: 30px; - - /*border: 1px outset #808080; - border-bottom : 1px solid #808080; - border-right : 1px solid #808080; - border-top : 1px solid #e4e4e4; - border-left : 1px solid #e4e4e4; -*/ } + TD.fieldcalendario { background-color : #edf4fa; font-family : Futura, Arial, Helvetica, sans-serif; font-size : 13px; vertical-align : top; - - - /*border: 1px outset #808080; - border-bottom : 1px solid #808080; - border-right : 1px solid #808080; - border-top : 1px solid #e4e4e4; - border-left : 1px solid #e4e4e4; -*/ } + TD.fieldMensagem { background-color : #4A6491; color: #ffffff; @@ -459,8 +434,8 @@ TD.fieldMensagem { font-weight: bold; height: 23px; vertical-align : middle; - } + TD.field TD{ background: #EDF4FA; } @@ -470,18 +445,15 @@ TD.fieldlabel { font-size : 12px; background-color : #EDF4FA; } + TD.fieldright { font-family : Futura, Arial, Helvetica, sans-serif; font-size : 12px; text-align : right; vertical-align : top; background-color : #EDF4FA; -/* border: 1px outset #808080; - border-bottom : 1px solid #808080; - border-right : 1px solid #808080; - border-top : 1px solid #e4e4e4; - border-left : 1px solid #e4e4e4;*/ } + TD.fieldright_noborder { font-family : Futura, Arial, Helvetica, sans-serif; font-size : 12px; @@ -489,30 +461,29 @@ TD.fieldright_noborder { vertical-align : top; background-color : #dcdcdc; } + TD.fieldcenter { font-family : Futura, Arial, Helvetica, sans-serif; font-size : 12px; text-align : center; vertical-align : top; background-color : #dcdcdc; -/* border: 1px outset #808080; - border-bottom : 1px solid #808080; - border-right : 1px solid #808080; - border-top : 1px solid #e4e4e4; - border-left : 1px solid #e4e4e4;*/ } + TD.fakefield { background : #FFFFFF!important; border: 1px solid #85A5CC; font-family : Futura, Arial, Helvetica, sans-serif; font-size : 12px; } + TD.botao { font-family : Futura, Arial, Helvetica, sans-serif; font-size : 12px; font-weight: bold; text-align : center; } + TH.contec { font-family : Futura, Arial, Helvetica, sans-serif; font-weight: bold; @@ -520,10 +491,6 @@ TH.contec { color: #000000; background: #ffcc00; text-align: left; - /* border-bottom : 1px solid #808080; - border-right : 1px solid #808080; - border-left : 1px solid #f5f5f5; - border-top : 1px solid #f5f5f5;*/ } TH.diasemana { @@ -539,6 +506,7 @@ TH.diasemana { border-left : 1px solid #ccccff; border-top : 1px solid #ccccff; } + TD.domingo { text-align : center; font-size : 12px; @@ -552,8 +520,8 @@ TD.domingo { border-right : 1px solid #000080; border-left : 1px solid #f4f4ff; border-top : 1px solid #f4f4ff; -/* background-image : url(../icones/label.jpg); */ } + TD.feriado { text-align : center; font-size : 12px; @@ -568,8 +536,8 @@ TD.feriado { border-right : 1px solid #000080; border-left : 1px solid #ffffff; border-top : 1px solid #ffffff; -/* background-image : url(../icones/label.jpg); */ } + TD.feriadofixo { text-align : center; font-size : 12px; @@ -584,6 +552,7 @@ TD.feriadofixo { border-top : 1px solid #ffffff; background-image : url(../../../../../../../gestaoAdministrativa/fontes/PHP/framework/temas/padrao/imagens/F.png); } + TD.feriadovariavel { text-align : center; font-size : 12px; @@ -598,6 +567,7 @@ TD.feriadovariavel { border-top : 1px solid #ffffff; background-image : url(../../../../../../../gestaoAdministrativa/fontes/PHP/framework/temas/padrao/imagens/V.png); } + TD.feriadopontofacultativo { text-align : center; font-size : 12px; @@ -612,6 +582,7 @@ TD.feriadopontofacultativo { border-top : 1px solid #ffffff; background-image : url(../../../../../../../gestaoAdministrativa/fontes/PHP/framework/temas/padrao/imagens/P.png); } + TD.feriadodiacompensado { text-align : center; font-size : 12px; @@ -641,6 +612,7 @@ TD.feriadodf{ border-top : 1px solid #ffffff; background-image : url(../../../../../../../gestaoAdministrativa/fontes/PHP/framework/temas/padrao/imagens/DF.png); } + TD.feriadodp{ text-align : center; font-size : 12px; @@ -670,6 +642,7 @@ TD.feriadodv{ border-top : 1px solid #ffffff; background-image : url(../../../../../../../gestaoAdministrativa/fontes/PHP/framework/temas/padrao/imagens/DV.png); } + TD.feriadofp{ text-align : center; font-size : 12px; @@ -684,6 +657,7 @@ TD.feriadofp{ border-top : 1px solid #ffffff; background-image : url(../../../../../../../gestaoAdministrativa/fontes/PHP/framework/temas/padrao/imagens/FP.png); } + TD.feriadofv{ text-align : center; font-size : 12px; @@ -698,6 +672,7 @@ TD.feriadofv{ border-top : 1px solid #ffffff; background-image : url(../../../../../../../gestaoAdministrativa/fontes/PHP/framework/temas/padrao/imagens/FV.png); } + TD.feriadopv{ text-align : center; font-size : 12px; @@ -712,6 +687,7 @@ TD.feriadopv{ border-top : 1px solid #ffffff; background-image : url(../../../../../../../gestaoAdministrativa/fontes/PHP/framework/temas/padrao/imagens/PV.png); } + TD.feriadodfp{ text-align : center; font-size : 12px; @@ -726,6 +702,7 @@ TD.feriadodfp{ border-top : 1px solid #ffffff; background-image : url(../../../../../../../gestaoAdministrativa/fontes/PHP/framework/temas/padrao/imagens/DFP.png); } + TD.feriadodfv{ text-align : center; font-size : 12px; @@ -740,6 +717,7 @@ TD.feriadodfv{ border-top : 1px solid #ffffff; background-image : url(../../../../../../../gestaoAdministrativa/fontes/PHP/framework/temas/padrao/imagens/DFV.png); } + TD.feriadodpv{ text-align : center; font-size : 12px; @@ -754,6 +732,7 @@ TD.feriadodpv{ border-top : 1px solid #ffffff; background-image : url(../../../../../../../gestaoAdministrativa/fontes/PHP/framework/temas/padrao/imagens/DPV.png); } + TD.feriadofpv{ text-align : center; font-size : 12px; @@ -768,6 +747,7 @@ TD.feriadofpv{ border-top : 1px solid #ffffff; background-image : url(../../../../../../../gestaoAdministrativa/fontes/PHP/framework/temas/padrao/imagens/FPV.png); } + TD.feriadodfpv{ text-align : center; font-size : 12px; @@ -783,7 +763,6 @@ TD.feriadodfpv{ background-image : url(../../../../../../../gestaoAdministrativa/fontes/PHP/framework/temas/padrao/imagens/DFPV.png); } - TD.hoje { text-align : center; font-size : 12px; @@ -797,8 +776,8 @@ TD.hoje { border-right : 1px solid #808080; border-left : 1px solid #f5f5f5; border-top : 1px solid #f5f5f5; -/* background-image : url(../icones/fundocopy.jpg); */ } + TD.labelDia{ background-color : #4A6491; color: #000000; @@ -807,13 +786,8 @@ TD.labelDia{ font-weight: bold; text-align : right; vertical-align : top; - - /* border: 1px outset #5F625F; - border-bottom : 1px solid #5F625F; - border-right : 1px solid #5F625F; - border-left : 1px solid #EBF2EB; - border-top : 1px solid #EBF2EB;*/ } + TD.dia { text-align : center; font-size : 12px; @@ -827,8 +801,8 @@ TD.dia { border-right : 1px solid #808080; border-left : 1px solid #f5f5f5; border-top : 1px solid #f5f5f5; - } + TD.alt_dados { background-color : #30395C!important; color : #FFFFFF; @@ -839,12 +813,8 @@ TD.alt_dados { height: 45px; padding:0 0 0 10px; text-align : left; - /* border: 1px outset #000000; - border-bottom : 1px solid #000000; - border-right : 1px solid #000000; - border-left : 1px solid #FFFFFF; - border-top : 1px solid #FFFFFF;*/ } + TD.alt_dados_dir { text-align : right; font-size : 12px; @@ -853,12 +823,9 @@ TD.alt_dados_dir { font-style : normal; background-color : #85A5CC; color : #000000; - /*border: 1px outset #929292;*/ border-bottom : 1px solid #929292; - /*border-right : 1px solid #000000; - border-left : 1px solid #FFFFFF; - border-top : 1px solid #FFFFFF;*/ } + TD.alt_dados_center { text-align : center; font-size : 12px; @@ -867,12 +834,8 @@ TD.alt_dados_center { font-style : normal; background-color : #30395C!important; color : #FFFFFF; -/* border: 1px outset #000000; - border-bottom : 1px solid #000000; - border-right : 1px solid #000000; - border-left : 1px solid #FFFFFF; - border-top : 1px solid #FFFFFF; */ } + TD.show_dados { text-align : left; font-size : 13px; @@ -882,12 +845,8 @@ TD.show_dados { background-color : #EDF4FA; color : #000000; height: 45px; - /*border-bottom : 1px solid #929292;*/ - /*border: 1px outset #929292; - border-right : 1px solid #000000; - border-left : 1px solid #CCCCCC; - border-top : 1px solid #CCCCCC;*/ } + TD.show_dados_center { background-color : #EDF4FA; color : #000000; @@ -897,21 +856,10 @@ TD.show_dados_center { font-family : Futura, Arial, Helvetica, sans-serif; font-weight : normal; font-style : normal; - /* border-bottom : 1px solid #929292; - border: 1px outset #000000; - border-bottom : 1px solid #000000;/ - border-right : 2px outset #000000; - border-left : 2px outset #000000; - border-top : 2px outset #000000; */ } TD.show_dados_center_bold { background-color : #EDF4FA; - /* border: 1px outset #000000; - border-bottom : 1px solid #000000; - border-right : 1px solid #000000; - border-left : 1px solid #CCCCCC; - border-top : 1px solid #CCCCCC; */ color : #000000; font-size : 13px; font-family : Futura, Arial, Helvetica, sans-serif; @@ -920,26 +868,22 @@ TD.show_dados_center_bold { text-align : center; height: 45px; } + tr.zb td { background:#D0E4F2; } + TD.show_dados_right { background-color : #EDF4FA; - /*border-bottom : 1px solid #929292;*/ color : #000000; - /*border: 1px outset #000000; - border-bottom : 1px solid #000000; - border-right : 1px solid #000000; - border-left : 1px solid #CCCCCC; - border-top : 1px solid #CCCCCC;*/ text-align : right; font-size : 12px; font-family: Verdana, Arial, Helvetica, sans-serif; - /*font-family : Futura, Arial, Helvetica, sans-serif;*/ font-weight : normal; font-style : normal; } + TD.status{ font-family : Futura, Arial, Helvetica, sans-serif; font-size : 12px; @@ -947,20 +891,20 @@ TD.status{ text-align : left; background-image : url("../../../../../../../gestaoAdministrativa/fontes/PHP/framework/temas/padrao/imagens/bg_barra_azul_baixo.png"); height: 27px; -/* border-bottom : 1px solid #5F625F; - border-right : 1px solid #5F625F; - border-left : 1px solid #EBF2EB; - border-top : 1px solid #EBF2EB;*/ } + .toUpperCase{ text-transform: uppercase; } + .toLowerCase{ text-transform: lowercase; } + .toCapitalize{ text-transform: capitalize; } + TD.botao { text-align : center; font-size : 12px; @@ -968,13 +912,7 @@ TD.botao { font-weight : normal; font-style : normal; background-color : #edf4fa; - /* border-bottom : 1px solid #929292;*/ color : #000000; - /* border: 1px outset #000000; - border-bottom : 1px solid #000000; - border-right : 1px solid #000000; - border-left : 1px solid #CCCCCC; - border-top : 1px solid #CCCCCC;*/ } TD.botaoEscuro{ @@ -983,7 +921,6 @@ TD.botaoEscuro{ font-family : Futura, Arial, Helvetica, sans-serif; font-weight : normal; font-style : normal; - /*border-bottom : 1px solid #929292;*/ color : #000000; background-color : #d0e4f2; } @@ -993,14 +930,8 @@ TD.intervalo { font-size : 12px; background-color : #dcdcdc; vertical-align : top; - -/* - border-bottom : 1px solid #808080; - border-right : 1px solid #808080; - border-top : 1px solid #e4e4e4; - border-left : 1px solid #e4e4e4; -*/ } + TD.fonte_programa { text-align : left; font-size : 12px; @@ -1011,6 +942,7 @@ TD.fonte_programa { color : #000000; border: 0px outset #000000; } + .t0i { font-family:Verdana, Geneva, Arial, Helvetica, sans-serif; font-size: 10px; @@ -1018,28 +950,30 @@ TD.fonte_programa { background-color: #ffffcc; text-decoration: none; } + .t0im { border: 0px; width: 19px; height: 16px; } + SPAN.TreeviewSpanArea A { font-size: 10pt; font-family: verdana,helvetica; text-decoration: none; color: black } + SPAN.TreeviewSpanArea A:hover { color: #820082; } + /********** bloqueia frames *********************/ #fundo_carregando{ - /* background-color:#E6EAE6;*/ background: url("../imagens/botao_menu_claro.png") 0 0 repeat-x; position:absolute; width:100%; height:100%; -/* padding: auto ;*/ margin: auto ; z-index:999; } @@ -1074,19 +1008,19 @@ TD.label a.dcontexto:hover span.contexto{ left:50px; top:10px; } + /* somente pra versao */ TD.versao a{ color:#FF9900; float:left; padding:3px 0 0 35px!important; text-decoration:none; - /*top:25px; - right:10px; - text-align:left;*/ } + .versao div#qTip{ right:10px; } + div.versaoFundo{ background: url("../imagens/bg_version.png") 0 0 no-repeat; color:#ff9900; @@ -1101,6 +1035,7 @@ a.versaoFundo{ margin: 0 30px 0 0; padding:0 6px!important; } + td.caminho{ padding: 0px 0px 0px 15px; @@ -1128,6 +1063,7 @@ TD.show_dados_center_aba{ -webkit-border-top-left-radius : 30px; -webkit-border-top-right-radius : 30px; } + TD.labelcenter_aba{ background-color : #85A5CC; border: 1px outset #30395C; @@ -1148,24 +1084,29 @@ TD.labelcenter_aba{ -webkit-border-top-left-radius : 30px; -webkit-border-top-right-radius : 30px; } + TD.show_dados_center a{ cursor: default; text-decoration:none; display:block; } + TD.labelcenter_aba a{ text-decoration:none; display:block; } + TD.labelcenter_aba:hover{ text-decoration:none; background-color: #EDF4FA; } + TD.show_dados_center_aba a{ display:block; text-decoration:none; color:#85A5CC; } + TD.labelcenter_aba a{ display:block; text-decoration:none; @@ -1180,7 +1121,6 @@ TD.labelcenter_aba a{ font-family : Futura, Arial, Helvetica, sans-serif; font-weight : bold; font-style : normal; - /* background-color : #323232; */ background: url("../imagens/bg_barra_azul.png") 0 0 repeat-x; height: 33px; color : #FFFFFF; @@ -1203,21 +1143,24 @@ TD.labelcenter_aba a{ text-align: left; visibility: hidden; z-index : 99999; +} -} a#link_ajuda { width: 25px; height:25px; background: transparent url(../../../../../../../gestaoAdministrativa/fontes/PHP/framework/temas/padrao/imagens//btnHelpOff.png) top left no-repeat; position: fixed; bottom: 1px; right: 1px; } + a#link_ajuda:hover{ background: transparent url(../../../../../../../gestaoAdministrativa/fontes/PHP/framework/temas/padrao/imagens//btnHelpOn.png) top left no-repeat; } + #link_ajuda span{ display:none; visibility:hidden; } + .titleBar { background-color: #323232; cursor: default; @@ -1244,6 +1187,7 @@ a#link_ajuda:hover{ width: 50px; height: 14px; } + .clientArea { background-color: #ffffff; border-color: #404040 #e0e0e0 #f0f0f0 #505050; @@ -1267,10 +1211,12 @@ a#link_ajuda:hover{ margin-left: 0px; margin-top: 0px; text-align: left; - } +} + #LSResult ul { list-style-type:none; } + #LSResult a { text-decoration:none; font-weight : normal; @@ -1280,13 +1226,13 @@ a#link_ajuda:hover{ padding:0px; margin:0px; } + #LSShadow { position: relative; color: inherit; -/* border: 2px inset #ccc;*/ top:1px; left:1px; - } +} #LSResult div { margin-left: 0px; @@ -1313,13 +1259,6 @@ a#link_ajuda:hover{ color: #fff; } -/*#livesearch { - width: 160px; - display: block; - padding:2px; - margin:2px; -}*/ - .searchHighlight { background-color: #ffffff; } @@ -1337,7 +1276,6 @@ a#link_volta { visibility:hidden; } - /** * * @@ -1352,8 +1290,6 @@ a#link_volta { width: 100%; } table.tabela{ - /*border: 1px solid #000; - border-top:none; */ margin:0px auto 3px auto; padding: 1px; } @@ -1369,10 +1305,8 @@ a#link_volta { width:99.5%; } table.tabela tr { background-color:#EDF4FA;} - /*table.tabela td { border: 1px outset #000;}*/ table.tabela th , table.tabela td.numeracao{ background-color:#85A5CC; - /*border: 1px outset #000; */ color: #fff; font-weight:bold; text-align:center; @@ -1391,8 +1325,6 @@ a#link_volta { /* link */ table.tabela th .link { text-decoration:underline;} - - /************************** * * Fim Estilos para o Pacote Table @@ -1546,13 +1478,17 @@ div#swTools{ right:50%; top:5px; } + div#swTools a{ border:none; color: #fff; text-decoration:none; } + div#swTools a#menu-abrir, div#swTools a#menu-fechar-oculto{display:none;} + div#swTools img{border:none;} + a#btnHelp{ bottom:5px; display:block; @@ -1562,4 +1498,4 @@ a#btnHelp{ right:5px; text-indent:-1999em; width:22px; -} +} \ No newline at end of file diff --git a/gestaoAdministrativa/fontes/PHP/framework/temas/padrao/CSS/stylos_ns_menu.css b/gestaoAdministrativa/fontes/PHP/framework/temas/padrao/CSS/stylos_ns_menu.css index 944978f..27fad16 100755 --- a/gestaoAdministrativa/fontes/PHP/framework/temas/padrao/CSS/stylos_ns_menu.css +++ b/gestaoAdministrativa/fontes/PHP/framework/temas/padrao/CSS/stylos_ns_menu.css @@ -60,14 +60,8 @@ TD { } a,a:link, a:visited ,span, span{ - /* background:#B4B6B4; - background: url("../imagens/botao_menu_claro.png") 0 0 no-repeat; - border:#585858 2px outset; - display:block;*/ display: table-cell; margin:0px; - /* padding-top:1px; - padding-bottom:1px; */ height: 31px; padding-left:10px; text-decoration:none; @@ -75,8 +69,7 @@ a,a:link, a:visited ,span, span{ width: 178px; } a:hover{ -/* border:#585858 2px inset; */ - background: url("../imagens/botao_menu_claro.png") 0 -31px no-repeat; + background:#85A5CC; color: #FFFFFF; padding-left:10px; } @@ -111,7 +104,8 @@ a:hover{ } .menu{ - background: url("../imagens/botao_menu_claro.png") 0 0 no-repeat; + background: #D0E4F2; + border-bottom: 1px solid #85A5CC; color:#000000; height: 30px; margin-left:10px; @@ -122,9 +116,7 @@ a:hover{ .menutitle, a.menutitle { margin:0px; background: url("../imagens/botao_menu_escuro.png") 0 0 no-repeat; - /* background:#6A696A;*/ color:#FFFFFF; - /* border:#585858 2px outset;*/ display: table-cell; height: 31px; padding-left:10px; @@ -132,11 +124,10 @@ a:hover{ vertical-align:middle; width: 178px; } + a:hover.menutitle{ background: url("../imagens/botao_menu_escuro.png") 0 -31px no-repeat; - /* border:#6A696A 2px inset;*/ color:#fff; - /* display:block;*/ display: table-cell; padding-left:10px; text-decoration: none; @@ -155,7 +146,6 @@ a imagem na tela */ top: 5px; } - #texto_carregando { position: absolute; Top: 50px; @@ -168,5 +158,3 @@ a imagem na tela */ /* O filtro é a imagem alpha_branca.gif */ background-color: #ccc; } - - diff --git a/gestaoAdministrativa/fontes/PHP/normas/popups/normas/OCManterNorma2.php b/gestaoAdministrativa/fontes/PHP/normas/popups/normas/OCManterNorma2.php index 94229a2..446e055 100755 --- a/gestaoAdministrativa/fontes/PHP/normas/popups/normas/OCManterNorma2.php +++ b/gestaoAdministrativa/fontes/PHP/normas/popups/normas/OCManterNorma2.php @@ -90,7 +90,6 @@ switch ($stCtrl) { //monta HTML com os ATRIBUTOS relativos ao TIPO DE NORMA selecionado case "MontaAtributos": - sistemaLegado::mostraVar($_REQUEST); if ($_REQUEST["inCodTipoNorma"] != "") { $inCodTipoNorma = $_REQUEST["inCodTipoNorma"]; $inCodNorma = $_REQUEST["inCodNorma"]; diff --git a/gestaoAdministrativa/fontes/PHP/normas/popups/normas/PRManterNorma.php b/gestaoAdministrativa/fontes/PHP/normas/popups/normas/PRManterNorma.php index 67280c8..765017a 100755 --- a/gestaoAdministrativa/fontes/PHP/normas/popups/normas/PRManterNorma.php +++ b/gestaoAdministrativa/fontes/PHP/normas/popups/normas/PRManterNorma.php @@ -70,7 +70,7 @@ switch ($stAcao) { $value = implode(",",$value); $obRegra->obRTipoNorma->obRCadastroDinamico->addAtributosDinamicos( $inCodAtributo , $value ); } - SistemaLegado::mostraVar($_POST); + $obRegra->setNumNorma ( $_POST['inNumNorma'] ); $obRegra->setExercicio ( $_POST['stExercicio'] ); $obRegra->setDataPublicacao ( $_POST['stDataPublicacao'] ); diff --git a/gestaoAdministrativa/fontes/PHP/organograma/classes/mapeamento/TOrganogramaOrgao.class.php b/gestaoAdministrativa/fontes/PHP/organograma/classes/mapeamento/TOrganogramaOrgao.class.php index 8c957e6..1cf0885 100755 --- a/gestaoAdministrativa/fontes/PHP/organograma/classes/mapeamento/TOrganogramaOrgao.class.php +++ b/gestaoAdministrativa/fontes/PHP/organograma/classes/mapeamento/TOrganogramaOrgao.class.php @@ -32,7 +32,7 @@ Casos de uso: uc-01.05.01, uc-01.05.02, uc-01.05.03, uc-04.05.40 - $Id: TOrganogramaOrgao.class.php 62319 2015-04-22 18:27:59Z evandro $ + $Id: TOrganogramaOrgao.class.php 63843 2015-10-23 14:02:35Z lisiane $ */ @@ -620,5 +620,58 @@ function montaRecuperaOrgaosInventario() return $stSql; } +function recuperaLotacaoOrgao(&$rsRecordSet, $stFiltro = "", $stOrdem = "", $boTransacao = "") +{ + $obErro = new Erro; + $obConexao = new Conexao; + $rsRecordSet = new RecordSet; + $stSql = $this->montaRecuperaLotacaoOrgao(); + $obErro = $obConexao->executaSQL( $rsRecordSet, $stSql, $boTransacao ); + $this->setDebug( $stSql ); + + return $obErro; +} + +function montaRecuperaLotacaoOrgao() +{ + $stSql = " SELECT orgao.cod_orgao + , organograma.fn_consulta_orgao(orgao_nivel.cod_organograma, orgao.cod_orgao) AS estrutural + , trim(orgao_descricao.descricao) AS descricao + , de_para_lotacao_orgao.num_orgao + FROM organograma.orgao + LEFT JOIN pessoal".$this->getDado('stEntidade').".de_para_lotacao_orgao + ON de_para_lotacao_orgao.cod_orgao = orgao.cod_orgao + INNER JOIN (SELECT orgao_descricao.cod_orgao + , MAX(orgao_descricao.timestamp) as orgao_descricao_timestamp + FROM organograma.orgao_descricao + GROUP BY orgao_descricao.cod_orgao + ) as od + ON od.cod_orgao = orgao.cod_orgao + INNER JOIN organograma.orgao_descricao + ON orgao_descricao.cod_orgao = od.cod_orgao + AND orgao_descricao.timestamp = od.orgao_descricao_timestamp + INNER JOIN organograma.orgao_nivel + ON orgao_nivel.cod_orgao = orgao.cod_orgao + INNER JOIN ( SELECT contrato_servidor_orgao.cod_orgao + FROM pessoal".$this->getDado('stEntidade') .".contrato_servidor_orgao + GROUP BY contrato_servidor_orgao.cod_orgao + UNION ALL + SELECT contrato_pensionista_orgao.cod_orgao + FROM pessoal".$this->getDado('stEntidade') .".contrato_pensionista_orgao + GROUP BY contrato_pensionista_orgao.cod_orgao + ORDER BY cod_orgao + ) AS orgao_servidor + ON orgao_servidor.cod_orgao = orgao.cod_orgao + GROUP BY orgao.cod_orgao + , organograma.fn_consulta_orgao(orgao_nivel.cod_organograma, orgao.cod_orgao) + , orgao_descricao.descricao + , de_para_lotacao_orgao.num_orgao + ORDER BY orgao.cod_orgao + "; + + return $stSql; +} + + } diff --git a/gestaoAdministrativa/fontes/PHP/protocolo/protocolo/andamento.class.php b/gestaoAdministrativa/fontes/PHP/protocolo/protocolo/andamento.class.php index 460707a..eae8be0 100755 --- a/gestaoAdministrativa/fontes/PHP/protocolo/protocolo/andamento.class.php +++ b/gestaoAdministrativa/fontes/PHP/protocolo/protocolo/andamento.class.php @@ -115,9 +115,7 @@ class andamento $dbConfig = new dataBaseLegado; $dbConfig->abreBd(); $insert = "INSERT INTO sw_andamento_padrao (cod_assunto, cod_classificacao, cod_orgao, num_passagens, descricao, ordem, num_dia) VALUES ('".$this->assunto."', '".$this->classificacao."', '".$this->codOrgao."', '".$this->numPassagens."', '".$this->descricao."', '".$this->ordem."', '".$this->numDia."')"; - //mostravar($this->anoE); - //print $insert; - //die(); + if ($dbConfig->executaSql($insert)) return true; else diff --git a/gestaoAdministrativa/fontes/PHP/protocolo/protocolo/andamentoPadrao/alteraAndamentoPadrao.php b/gestaoAdministrativa/fontes/PHP/protocolo/protocolo/andamentoPadrao/alteraAndamentoPadrao.php index 588ebf3..ecdb564 100755 --- a/gestaoAdministrativa/fontes/PHP/protocolo/protocolo/andamentoPadrao/alteraAndamentoPadrao.php +++ b/gestaoAdministrativa/fontes/PHP/protocolo/protocolo/andamentoPadrao/alteraAndamentoPadrao.php @@ -54,9 +54,6 @@ if (!(isset($_REQUEST["ctrl"]))) { $mascaraAssunto = pegaConfiguracao('mascara_assunto',5); $mascaraSetor = pegaConfiguracao('mascara_setor',2); -#sistemalegado::mostravar($ctrl); -#sistemalegado::mostravar($_REQUEST); - switch ($ctrl) { case 0: diff --git a/gestaoAdministrativa/fontes/PHP/protocolo/protocolo/andamentoPadrao/excluiAndamentoPadrao.php b/gestaoAdministrativa/fontes/PHP/protocolo/protocolo/andamentoPadrao/excluiAndamentoPadrao.php index f14b08d..d24af46 100755 --- a/gestaoAdministrativa/fontes/PHP/protocolo/protocolo/andamentoPadrao/excluiAndamentoPadrao.php +++ b/gestaoAdministrativa/fontes/PHP/protocolo/protocolo/andamentoPadrao/excluiAndamentoPadrao.php @@ -65,9 +65,6 @@ $codOrgao = $_REQUEST["codOrgao"]; comBegin = false; $dbApensar->abreBd(); $dbApensar->executaSql("BEGIN"); - //mostravar($aPensamentos); + while (list($vKey,$vValor) = each($aPensamentos)) { $aCod = explode("_",$vValor); $sInsert = " insert into sw_processo_apensado @@ -98,7 +98,7 @@ class apensamento $dbDesapensar->comBegin = false; $dbDesapensar->abreBd(); $dbDesapensar->executaSql("BEGIN"); - //mostravar($aDesapensamentos); + while (list($vKey,$vValor) = each($aDesapensamentos)) { $aCod = explode("_",$vValor); diff --git a/gestaoAdministrativa/fontes/PHP/protocolo/protocolo/processos/alteraDespacho.php b/gestaoAdministrativa/fontes/PHP/protocolo/protocolo/processos/alteraDespacho.php index b4c18b0..09e8e06 100755 --- a/gestaoAdministrativa/fontes/PHP/protocolo/protocolo/processos/alteraDespacho.php +++ b/gestaoAdministrativa/fontes/PHP/protocolo/protocolo/processos/alteraDespacho.php @@ -320,7 +320,7 @@ if (is_array($lista_domentos_processo)) { while (list($key,$val) = each($lista_domentos_processo)) { $selected = ""; - //mostravar($lista_domentos_entregues); + if (is_array($lista_domentos_entregues)) { //continue; } else { @@ -374,7 +374,6 @@ $obj = "Processo: ".$codProcesso."/".$anoE." (".$docObj.")"; $processo = new processos; $processo->setaValorDespacho($codAndamento,$codProcesso,$anoE,$codUsuario,$descricao); if ($processo->updateDespacho()) { - //mostravar($documento); //if ($processo->updateDocumento($documento,$codProcesso,$anoE)) { include '../../classes/auditoria.class.php'; $audicao = new auditoria; diff --git a/gestaoAdministrativa/fontes/PHP/protocolo/protocolo/processos/consultaProcessoDespacho.php b/gestaoAdministrativa/fontes/PHP/protocolo/protocolo/processos/consultaProcessoDespacho.php index 28e0e73..2299aa4 100755 --- a/gestaoAdministrativa/fontes/PHP/protocolo/protocolo/processos/consultaProcessoDespacho.php +++ b/gestaoAdministrativa/fontes/PHP/protocolo/protocolo/processos/consultaProcessoDespacho.php @@ -30,7 +30,7 @@ * @author Analista: Cassiano * @author Desenvolvedor: Cassiano -$Id: consultaProcessoDespacho.php 62838 2015-06-26 13:02:49Z diogo.zarpelon $ +$Id: consultaProcessoDespacho.php 63829 2015-10-22 12:06:07Z franver $ $Revision: 4412 $ $Name$ @@ -149,7 +149,6 @@ include '../../../framework/legado/processosLegado.class.php'; diff --git a/gestaoAdministrativa/fontes/PHP/protocolo/protocolo/processos/encaminhaProcessoLote.php b/gestaoAdministrativa/fontes/PHP/protocolo/protocolo/processos/encaminhaProcessoLote.php index 0802c90..6eafef3 100755 --- a/gestaoAdministrativa/fontes/PHP/protocolo/protocolo/processos/encaminhaProcessoLote.php +++ b/gestaoAdministrativa/fontes/PHP/protocolo/protocolo/processos/encaminhaProcessoLote.php @@ -33,7 +33,7 @@ Casos de uso: uc-01.06.98 - $Id: encaminhaProcessoLote.php 62838 2015-06-26 13:02:49Z diogo.zarpelon $ + $Id: encaminhaProcessoLote.php 63829 2015-10-22 12:06:07Z franver $ */ @@ -323,7 +323,6 @@ if (Sessao::read('ordem') =='') { $dbEmp = new dataBaseLegado; $dbEmp->abreBD(); $dbEmp->abreSelecao($sSQL); - //mostravar($dbEmp); $dbEmp->vaiPrimeiro(); //DIEGO - VERIFICANDO... diff --git a/gestaoAdministrativa/fontes/PHP/protocolo/protocolo/processos/incluiDespacho.php b/gestaoAdministrativa/fontes/PHP/protocolo/protocolo/processos/incluiDespacho.php index a0886d1..cd6c932 100755 --- a/gestaoAdministrativa/fontes/PHP/protocolo/protocolo/processos/incluiDespacho.php +++ b/gestaoAdministrativa/fontes/PHP/protocolo/protocolo/processos/incluiDespacho.php @@ -32,7 +32,7 @@ Casos de uso: uc-01.06.98 - $Id: incluiDespacho.php 62838 2015-06-26 13:02:49Z diogo.zarpelon $ + $Id: incluiDespacho.php 63829 2015-10-22 12:06:07Z franver $ */ include '../../../framework/include/cabecalho.inc.php'; @@ -382,12 +382,10 @@ case 1: Documentos setaValorDespacho($codAndamento,$codProcesso,$anoE,$codUsuario,$descricao); if ($processo->insertDespacho()) { - //mostravar($documento); //if ($processo->updateDocumento($documento,$codProcesso,$exercicio)) { include '../../classes/auditoria.class.php'; $audicao = new auditoria; diff --git a/gestaoAdministrativa/fontes/javaScript/genericas.js b/gestaoAdministrativa/fontes/javaScript/genericas.js index 69c1623..af91c22 100755 --- a/gestaoAdministrativa/fontes/javaScript/genericas.js +++ b/gestaoAdministrativa/fontes/javaScript/genericas.js @@ -384,10 +384,11 @@ function passaItem(objDe,objPara,acao,ordenacao){ // Caso não seja passado o parâmetro para ordenar, ordena default por texto. if (ordenacao == "") - ordenacao = "text"; + ordenacao = "text"; // Executa função que ordena o combo com base na ordenação setada (text ou value). - sortSelect(objPara, ordenacao); + if (ordenacao != "selacao") + sortSelect(objPara, ordenacao); return; } @@ -1487,7 +1488,8 @@ function alertPopUp(stTitle,stText,stMethod) 'background':'transparent url(../../../../../../gestaoAdministrativa/fontes/PHP/framework/temas/padrao/imagens/overlay.png) left', 'position':'absolute', 'left':'0', - 'top':'0' }; + 'top':'0' + }; for(i=1;i<4;i++){ jq('html',parent.frames[i].document).append(stHTMLFrames); @@ -1526,7 +1528,8 @@ function loadingModal(boPrincipal, boMenu, stText) 'background':'transparent url(../../../../../../gestaoAdministrativa/fontes/PHP/framework/temas/padrao/imagens/overlay.png) left', 'position':'fixed', 'left':'0', - 'top':'0' }; + 'top':'0', + 'z-index':'5' }; //Aplica o modal no frame de mensagens jq('html',parent.frames[3].document).append(stHTMLFrames); diff --git a/gestaoFinanceira/fontes/PHP/LRF/classes/negocio/RLRFRelatorioModelos3.class.php b/gestaoFinanceira/fontes/PHP/LRF/classes/negocio/RLRFRelatorioModelos3.class.php index 3ea4cb5..89b5f64 100755 --- a/gestaoFinanceira/fontes/PHP/LRF/classes/negocio/RLRFRelatorioModelos3.class.php +++ b/gestaoFinanceira/fontes/PHP/LRF/classes/negocio/RLRFRelatorioModelos3.class.php @@ -244,8 +244,7 @@ function geraRecordSet(&$rsRecordSet , &$rsRecordSetTotal, $stOrder = "") $stEntidade = substr( $stEntidade, 0, strlen($stEntidade) - 1 ); $stEntidade = $stEntidade; } - //mostravar($this->getCodEntidade()); - //exit; + $this->obFLRFModelosExecutivo->setDado("inCodQuadro","1"); $this->obFLRFModelosExecutivo->setDado("inCodModelo",$this->getCodModelo()); $this->obFLRFModelosExecutivo->setDado("stDataInicial",$this->getDataInicial()); @@ -255,8 +254,6 @@ function geraRecordSet(&$rsRecordSet , &$rsRecordSetTotal, $stOrder = "") $this->obFLRFModelosExecutivo->setDado("stFiltro",$this->getFiltro()); $this->obFLRFModelosExecutivo->setDado("stTipoValorDespesa",$this->getTipoValorDespesa()); $obErro = $this->obFLRFModelosExecutivo->recuperaTodos( $rsRecordSet, $stFiltro, $stOrder ); - //mostravar($rsRecordSet); - //exit; $inCount = 0; $inCount2 = 0; @@ -336,9 +333,6 @@ function geraRecordSet2(&$rsRecordSet , &$rsRecordSetTotal, $stOrder = "") $this->obFLRFModelosExecutivo->setDado("stFiltro",$this->getFiltro()); $this->obFLRFModelosExecutivo->setDado("stTipoValorDespesa",$this->getTipoValorDespesa()); $obErro = $this->obFLRFModelosExecutivo->recuperaTodos( $rsRecordSet, $stFiltro, $stOrder ); - $this->obFLRFModelosExecutivo->debug(); - //mostravar($rsRecordSet); - //exit; $inCount = 0; $inCount2 = 0; diff --git a/gestaoFinanceira/fontes/PHP/contabilidade/classes/componentes/IPopUpEstruturalPlano.class.php b/gestaoFinanceira/fontes/PHP/contabilidade/classes/componentes/IPopUpEstruturalPlano.class.php index 171db39..e3ae9a2 100644 --- a/gestaoFinanceira/fontes/PHP/contabilidade/classes/componentes/IPopUpEstruturalPlano.class.php +++ b/gestaoFinanceira/fontes/PHP/contabilidade/classes/componentes/IPopUpEstruturalPlano.class.php @@ -42,16 +42,18 @@ include_once '../../../../../../gestaoAdministrativa/fontes/PHP/pacotes/Framewor include_once ( CLA_BUSCAINNER ); include_once ( CAM_GA_ADM_MAPEAMENTO."TAdministracaoConfiguracao.class.php" ); + class IPopUpEstruturalPlano extends BuscaInner { + var $stEscrituracao = ''; + public function getTipoEscrituracao(){ return $this->stEscrituracao;} + public function setTipoEscrituracao( $valor ){ $this->stEscrituracao = $valor; } public function IPopUpEstruturalPlano() { - parent::BuscaInner(); $obTAdministracaoConfiguracao = new TAdministracaoConfiguracao; - $obTAdministracaoConfiguracao->setDado( "cod_modulo", 9); $obTAdministracaoConfiguracao->setDado( "exercicio", Sessao::getExercicio() ); $obTAdministracaoConfiguracao->pegaConfiguracao( $stMascara, "masc_plano_contas" ); @@ -60,6 +62,7 @@ class IPopUpEstruturalPlano extends BuscaInner $this->setTitle ( "Informe o código estrutural da conta contábil." ); $this->setNull ( true ); $this->setId ( "stDescricaoClassificacao" ); + $this->setTipoEscrituracao ( "estrutural" ); $this->obCampoCod->setName ( "stCodEstrutural" ); $this->obCampoCod->setValue ( "" ); $this->obCampoCod->setAlign ("left"); @@ -70,9 +73,9 @@ class IPopUpEstruturalPlano extends BuscaInner public function montaHTML() { - $pgOcul = "'".CAM_GF_CONT_PROCESSAMENTO."OCEstruturalPlano.php?".Sessao::getId()."&".$this->obCampoCod->getName()."='+this.value+'&stNomCampoCod=".$this->obCampoCod->getName()."&stIdCampoDesc=".$this->getId()."'"; + $pgOcul = "'".CAM_GF_CONT_PROCESSAMENTO."OCEstruturalPlano.php?".Sessao::getId()."&".$this->obCampoCod->getName()."='+this.value+'&stNomCampoCod=".$this->obCampoCod->getName()."&stIdCampoDesc=".$this->getId()."&stEscrituracao=".$this->getTipoEscrituracao()."'"; $this->obCampoCod->obEvento->setOnChange ( "ajaxJavaScript($pgOcul,'buscaPopup');" ); - $this->setFuncaoBusca ( "abrePopUp('".CAM_GF_CONT_POPUPS."planoConta/FLPlanoConta.php','frm','".$this->obCampoCod->getName()."','".$this->getId()."','estrutural','".Sessao::getId()."','800','550');"); + $this->setFuncaoBusca ( "abrePopUp('".CAM_GF_CONT_POPUPS."planoConta/FLPlanoConta.php','frm','".$this->obCampoCod->getName()."','".$this->getId()."','".$this->getTipoEscrituracao()."','".Sessao::getId()."','800','550');"); parent::montaHTML(); } } diff --git a/gestaoFinanceira/fontes/PHP/contabilidade/classes/mapeamento/TContabilidadeConfiguracaoContasExtras.class.php b/gestaoFinanceira/fontes/PHP/contabilidade/classes/mapeamento/TContabilidadeConfiguracaoContasExtras.class.php new file mode 100644 index 0000000..0676941 --- /dev/null +++ b/gestaoFinanceira/fontes/PHP/contabilidade/classes/mapeamento/TContabilidadeConfiguracaoContasExtras.class.php @@ -0,0 +1,75 @@ + +setTabela('contabilidade.configuracao_contas_extras'); + $this->setComplementoChave('exercicio, cod_conta'); + + $this->AddCampo('exercicio', 'varchar', true, '4', true, true); + $this->AddCampo('cod_conta', 'integer', true, '', true, true); + } + + public function montaRecuperaRelacionamento() + { + $stSql = " + SELECT plano_conta.cod_conta + , plano_conta.exercicio + , plano_conta.cod_estrutural + , plano_conta.nom_conta + FROM contabilidade.configuracao_contas_extras + INNER JOIN contabilidade.plano_conta + ON plano_conta.cod_conta = configuracao_contas_extras.cod_conta + AND plano_conta.exercicio = configuracao_contas_extras.exercicio + WHERE plano_conta.exercicio = '".$this->getDado('exercicio')."' + "; + return $stSql; + } + + public function __destruct(){} + +} + +?> \ No newline at end of file diff --git a/gestaoFinanceira/fontes/PHP/contabilidade/classes/mapeamento/TContabilidadePlanoBanco.class.php b/gestaoFinanceira/fontes/PHP/contabilidade/classes/mapeamento/TContabilidadePlanoBanco.class.php index e6aa4ac..80b81c0 100755 --- a/gestaoFinanceira/fontes/PHP/contabilidade/classes/mapeamento/TContabilidadePlanoBanco.class.php +++ b/gestaoFinanceira/fontes/PHP/contabilidade/classes/mapeamento/TContabilidadePlanoBanco.class.php @@ -406,7 +406,7 @@ function getProximoEstruturalRecurso(&$rsRecordSet, $boTransacao = "") $obErro = new Erro; $obConexao = new Conexao; $rsRecordSet = new RecordSet; - if ( SistemaLegado::is_tcems($boTransacao) ) { + if ( Sessao::getExercicio() > '2012' ) { $stSql = "SELECT SUBSTR( MAX(cod_estrutural), 11, 2) AS prox_cod_estrutural "; } else { $stSql = "SELECT SUBSTR( MAX(cod_estrutural), 17, 2) AS prox_cod_estrutural "; @@ -502,16 +502,12 @@ function montaContasRecurso($boTransacao = "") $stSql .= " JOIN contabilidade.plano_recurso \n"; $stSql .= " ON plano_recurso.cod_plano = plano_analitica.cod_plano \n"; $stSql .= " AND plano_recurso.exercicio = plano_analitica.exercicio \n"; - if ( SistemaLegado::is_tcems($boTransacao) ) { + if ( Sessao::getExercicio() > '2012' ) { $stSql .= " WHERE plano_conta.cod_estrutural LIKE '7.2.1.1.1.%' \n"; } else { $stSql .= " WHERE plano_conta.cod_estrutural LIKE '1.9.3.2.0.00.00.%' \n"; } $stSql .= " AND plano_recurso.cod_recurso = ".$this->getDado('cod_recurso')." \n"; - // if ( !SistemaLegado::is_tcems($boTransacao) ) { - // $stSql .= " AND plano_conta.cod_classificacao = 1 \n"; - // } - // $stSql .= " AND plano_conta.cod_sistema = 4 \n"; $stSql .= " AND plano_conta.exercicio = '".$this->getDado('exercicio')."' \n"; $stSql .= " ) as cod_plano_um , \n"; $stSql .= " ( SELECT plano_analitica.cod_plano \n"; @@ -522,16 +518,12 @@ function montaContasRecurso($boTransacao = "") $stSql .= " JOIN contabilidade.plano_recurso \n"; $stSql .= " ON plano_recurso.cod_plano = plano_analitica.cod_plano \n"; $stSql .= " AND plano_recurso.exercicio = plano_analitica.exercicio \n"; - if ( SistemaLegado::is_tcems($boTransacao) ) { + if ( Sessao::getExercicio() > '2012' ) { $stSql .= " WHERE plano_conta.cod_estrutural LIKE '8.2.1.1.1.%' \n"; } else { $stSql .= " WHERE plano_conta.cod_estrutural LIKE '2.9.3.2.0.00.00.%' \n"; } $stSql .= " AND plano_recurso.cod_recurso = ".$this->getDado('cod_recurso')." \n"; - // if ( !SistemaLegado::is_tcems($boTransacao) ) { - // $stSql .= " AND plano_conta.cod_classificacao = 1 \n"; - // } - // $stSql .= " AND plano_conta.cod_sistema = 4 \n"; $stSql .= " AND plano_conta.exercicio = '".$this->getDado('exercicio')."' \n"; $stSql .= " ) as cod_plano_dois \n"; @@ -562,10 +554,6 @@ function montaContasRecursoPagamentoTCEMS() $stSql .= " AND plano_recurso.exercicio = plano_analitica.exercicio \n"; $stSql .= " WHERE plano_conta.cod_estrutural LIKE '8.2.1.1.4.%' \n"; $stSql .= " AND plano_recurso.cod_recurso = ".$this->getDado('cod_recurso')." \n"; - // if ( !SistemaLegado::is_tcems($boTransacao) ) { - // $stSql .= " AND plano_conta.cod_classificacao = 1 \n"; - // } - // $stSql .= " AND plano_conta.cod_sistema = 4 \n"; $stSql .= " AND plano_conta.exercicio = '".$this->getDado('exercicio')."' \n"; $stSql .= " ) as cod_plano_um , \n"; $stSql .= " ( SELECT plano_analitica.cod_plano \n"; @@ -578,16 +566,40 @@ function montaContasRecursoPagamentoTCEMS() $stSql .= " AND plano_recurso.exercicio = plano_analitica.exercicio \n"; $stSql .= " WHERE plano_conta.cod_estrutural LIKE '8.2.1.1.3.%' \n"; $stSql .= " AND plano_recurso.cod_recurso = ".$this->getDado('cod_recurso')." \n"; - // if ( !SistemaLegado::is_tcems($boTransacao) ) { - // $stSql .= " AND plano_conta.cod_classificacao = 1 \n"; - // } - // $stSql .= " AND plano_conta.cod_sistema = 4 \n"; $stSql .= " AND plano_conta.exercicio = '".$this->getDado('exercicio')."' \n"; $stSql .= " ) as cod_plano_dois \n"; return $stSql; } +function testaRecursoPagamentoTCEMS(&$rsRecordSet, $boTransacao = "") +{ + $obErro = new Erro; + $obConexao = new Conexao; + $rsRecordSet = new RecordSet; + $stSql = $this->montaTestaRecursoPagamentoTCEMS(); + $this->setDebug ($stSql); + $obErro = $obConexao->executaSQL( $rsRecordSet, $stSql, $boTransacao ); + + return $obErro; +} + +function montaTestaRecursoPagamentoTCEMS() +{ + $stSql = "SELECT plano_analitica.cod_plano + FROM contabilidade.plano_conta + JOIN contabilidade.plano_analitica + ON plano_analitica.cod_conta = plano_conta.cod_conta + AND plano_analitica.exercicio = plano_conta.exercicio + JOIN contabilidade.plano_recurso + ON plano_recurso.cod_plano = plano_analitica.cod_plano + AND plano_recurso.exercicio = plano_analitica.exercicio + WHERE plano_conta.cod_estrutural LIKE '".$this->getDado('estrutural_teste')."' + AND plano_recurso.cod_recurso = ".$this->getDado('cod_recurso')." + AND plano_conta.exercicio = '".$this->getDado('exercicio')."'"; + return $stSql; +} + function getRecursoVinculoConta(&$rsRecordSet, $boTransacao = "") { $obErro = new Erro; diff --git a/gestaoFinanceira/fontes/PHP/contabilidade/classes/mapeamento/TContabilidadePlanoConta.class.php b/gestaoFinanceira/fontes/PHP/contabilidade/classes/mapeamento/TContabilidadePlanoConta.class.php index 0952c37..dd5000a 100755 --- a/gestaoFinanceira/fontes/PHP/contabilidade/classes/mapeamento/TContabilidadePlanoConta.class.php +++ b/gestaoFinanceira/fontes/PHP/contabilidade/classes/mapeamento/TContabilidadePlanoConta.class.php @@ -31,7 +31,7 @@ * @subpackage Mapeamento * Casos de uso: uc-02.02.02, uc-02.08.03, uc-02.08.07, uc-02.02.31, uc-02.04.03 - $Id: TContabilidadePlanoConta.class.php 63242 2015-08-06 21:09:37Z lisiane $ + $Id: TContabilidadePlanoConta.class.php 63906 2015-11-05 12:31:01Z franver $ */ include_once '../../../../../../gestaoAdministrativa/fontes/PHP/framework/include/valida.inc.php'; @@ -120,26 +120,6 @@ function montaRecuperaContaAnalitica() } -function montaRecuperaContaPlanoAnalitica() -{ - $stSQL = " SELECT \n"; - $stSQL .= " pa.cod_conta , \n"; - $stSQL .= " pc.exercicio , \n"; - $stSQL .= " pc.nom_conta , \n"; - $stSQL .= " pc.cod_classificacao , \n"; - $stSQL .= " pc.cod_sistema , \n"; - $stSQL .= " pc.cod_estrutural , \n"; - $stSQL .= " pa.cod_plano \n"; - $stSQL .= "FROM \n"; - $stSQL .= " contabilidade.plano_analitica as pa, \n"; - $stSQL .= " contabilidade.plano_conta as pc \n"; - $stSQL .= " WHERE pa.cod_conta = pc.cod_conta AND \n"; - $stSQL .= " pa.exercicio = pc.exercicio \n"; - - return $stSQL; - -} - /** * Executa um Select no banco de dados a partir do comando SQL montado no método * montaRecuperaVerificaImplantacaoSaldos @@ -279,12 +259,12 @@ function recuperaContaAnalitica(&$rsRecordSet, $stCondicao = "" , $stOrdem = "" * montaRecuperaContaPlanoAnalitica. * @access Public * @param Object $rsRecordSet Objeto RecordSet - * @param String $stCondicao String de condi��o do SQL (WHERE) - * @param String $stOrdem String de Ordena��o do SQL (ORDER BY) + * @param String $stCondicao String de condição do SQL (WHERE) + * @param String $stOrdem String de Ordenação do SQL (ORDER BY) * @param Boolean $boTransacao * @return Object Objeto Erro */ -function recuperaContaPlanoAnalitica(&$rsRecordSet, $stCondicao = "" , $stOrdem = "" , $boTransacao = "") +public function recuperaContaPlanoAnalitica(&$rsRecordSet, $stCondicao = "" , $stOrdem = "" , $boTransacao = "") { $obErro = new Erro; $obConexao = new Conexao; @@ -292,6 +272,7 @@ function recuperaContaPlanoAnalitica(&$rsRecordSet, $stCondicao = "" , $stOrdem if(trim($stOrdem)) $stOrdem = (strpos($stOrdem,"ORDER BY")===false)?" ORDER BY $stOrdem":$stOrdem; + $stSql = $this->montaRecuperaContaPlanoAnalitica().$stCondicao.$stOrdem; $this->setDebug( $stSql ); $obErro = $obConexao->executaSQL( $rsRecordSet, $stSql, $boTransacao ); @@ -299,6 +280,26 @@ function recuperaContaPlanoAnalitica(&$rsRecordSet, $stCondicao = "" , $stOrdem return $obErro; } +public function montaRecuperaContaPlanoAnalitica() +{ + $stSQL = " + SELECT pa.cod_conta + , pc.exercicio + , pc.nom_conta + , pc.cod_classificacao + , pc.cod_sistema + , pc.cod_estrutural + , pa.cod_plano + FROM contabilidade.plano_analitica AS pa + , contabilidade.plano_conta as pc + WHERE pa.cod_conta = pc.cod_conta + AND pa.exercicio = pc.exercicio + \n"; + + return $stSQL; + +} + /** * Executa um Select no banco de dados a partir do comando SQL montado no método * montaRecuperaContaAnaliticaAtivoPermanente. @@ -886,7 +887,6 @@ function recuperaDadosExportacaoBalVerificacao(&$rsRecordSet, $stCondicao = "" , if(trim($stOrdem)) $stOrdem = (strpos($stOrdem,"ORDER BY")===false)?" ORDER BY $stOrdem":$stOrdem; $stSql = $this->montaRecuperaDadosExportacaoBalVerificacao().$stCondicao.$stOrdem; -//SistemaLegado::mostravar($stSql); exit(); $this->setDebug( $stSql ); $obErro = $obConexao->executaSQL( $rsRecordSet, $stSql, $boTransacao ); diff --git a/gestaoFinanceira/fontes/PHP/contabilidade/classes/negocio/RContabilidadePlanoConta.class.php b/gestaoFinanceira/fontes/PHP/contabilidade/classes/negocio/RContabilidadePlanoConta.class.php index 05f582f..5654f35 100755 --- a/gestaoFinanceira/fontes/PHP/contabilidade/classes/negocio/RContabilidadePlanoConta.class.php +++ b/gestaoFinanceira/fontes/PHP/contabilidade/classes/negocio/RContabilidadePlanoConta.class.php @@ -344,7 +344,7 @@ function consultar($boTransacao = "") { include_once ( CAM_GF_CONT_MAPEAMENTO."TContabilidadePlanoConta.class.php" ); include_once ( CAM_GF_CONT_MAPEAMENTO."TContabilidadePlanoContaTCEMS.class.php" ); - if ( SistemaLegado::is_tcems($boTransacao) ) { + if ( Sessao::getExercicio() > '2012' ) { $obTContabilidadePlanoConta = new TContabilidadePlanoContaTCEMS; } else { $obTContabilidadePlanoConta = new TContabilidadePlanoConta; @@ -369,7 +369,7 @@ function consultar($boTransacao = "") if ( !$obErro->ocorreu() ) { $this->stNomConta = $rsRecordSet->getCampo( "nom_conta" ); $this->stCodEstrutural = $rsRecordSet->getCampo( "cod_estrutural" ); - if ( SistemaLegado::is_tcems($boTransacao) ) { + if ( Sessao::getExercicio() > '2012' ) { $this->stIndicadorSuperavit = trim($rsRecordSet->getCampo( "indicador_superavit" )); $this->stEscrituracao = trim($rsRecordSet->getCampo( "escrituracao" )); $this->stFuncao = trim($rsRecordSet->getCampo( "funcao" )); @@ -402,7 +402,7 @@ function listar(&$rsRecordSet, $stOrder = "" , $boTransacao = "") { include_once ( CAM_GF_CONT_MAPEAMENTO."TContabilidadePlanoConta.class.php" ); include_once ( CAM_GF_CONT_MAPEAMENTO."TContabilidadePlanoContaTCEMS.class.php" ); - if ( SistemaLegado::is_tcems($boTransacao) ) { + if ( Sessao::getExercicio() > '2012' ) { $obTContabilidadePlanoConta = new TContabilidadePlanoContaTCEMS; } else { $obTContabilidadePlanoConta = new TContabilidadePlanoConta; @@ -418,7 +418,7 @@ function listar(&$rsRecordSet, $stOrder = "" , $boTransacao = "") $stFiltro .= " publico.fn_mascarareduzida(cod_estrutural) like (publico.fn_mascarareduzida('".$this->stCodEstrutural."')||'%') AND "; if($this->inCodSistema) $stFiltro .= " cod_sistema = " . $this->inCodSistema . " AND "; - if ( SistemaLegado::is_tcems($boTransacao) ) { + if ( Sessao::getExercicio() > '2012' ) { if($this->stEscrituracao) $stFiltro .= " escrituracao = '" . $this->stEscrituracao . "' AND "; if($this->stNaturezaSaldo) @@ -446,7 +446,7 @@ function listarGrupos(&$rsRecordSet, $stOrder = "" , $boTransacao = "") { include_once ( CAM_GF_CONT_MAPEAMENTO."TContabilidadePlanoConta.class.php" ); include_once ( CAM_GF_CONT_MAPEAMENTO."TContabilidadePlanoContaTCEMS.class.php" ); - if ( SistemaLegado::is_tcems($boTransacao) ) { + if ( Sessao::getExercicio() > '2012' ) { $obTContabilidadePlanoConta = new TContabilidadePlanoContaTCEMS; } else { $obTContabilidadePlanoConta = new TContabilidadePlanoConta; @@ -462,7 +462,7 @@ function listarGrupos(&$rsRecordSet, $stOrder = "" , $boTransacao = "") $stFiltro .= " publico.fn_mascarareduzida(cod_estrutural) like (publico.fn_mascarareduzida('".$this->stCodEstrutural."')||'%') AND "; if($this->inCodSistema) $stFiltro .= " cod_sistema = " . $this->inCodSistema . " AND "; - if ( SistemaLegado::is_tcems($boTransacao) ) { + if ( Sessao::getExercicio() > '2012' ) { if($this->stEscrituracao) $stFiltro .= " escrituracao = '" . $this->stEscrituracao . "' AND "; if($this->stNaturezaSaldo) @@ -521,14 +521,8 @@ function gerarCodigoEstruturalPai() function validarCodigoEstrutural($boTransacao = "") { include_once ( CAM_GF_CONT_MAPEAMENTO."TContabilidadePlanoConta.class.php" ); - //include_once ( CAM_GF_CONT_MAPEAMENTO."TContabilidadePlanoContaTCEMS.class.php" ); - //if ( SistemaLegado::is_tcems($boTransacao) ) { - // $obTContabilidadePlanoConta = new TContabilidadePlanoContaTCEMS; - // $stFiltro = " WHERE cod_estrutural ilike '".substr($this->stCodEstrutural,0,15)."%' "; - //} else { - $obTContabilidadePlanoConta = new TContabilidadePlanoConta; - $stFiltro = " WHERE cod_estrutural = '".$this->stCodEstrutural."' "; - //} + $obTContabilidadePlanoConta = new TContabilidadePlanoConta; + $stFiltro = " WHERE cod_estrutural = '".$this->stCodEstrutural."' "; $stFiltro.= " AND exercicio = '".$this->stExercicio."' "; @@ -551,7 +545,7 @@ function validarCodigoEstruturalPai($boTransacao = "") { include_once ( CAM_GF_CONT_MAPEAMENTO."TContabilidadePlanoConta.class.php" ); include_once ( CAM_GF_CONT_MAPEAMENTO."TContabilidadePlanoContaTCEMS.class.php" ); - if ( SistemaLegado::is_tcems($boTransacao) ) { + if ( Sessao::getExercicio() > '2012' ) { $obTContabilidadePlanoConta = new TContabilidadePlanoContaTCEMS; } else { $obTContabilidadePlanoConta = new TContabilidadePlanoConta; @@ -560,7 +554,7 @@ function validarCodigoEstruturalPai($boTransacao = "") $obErro = new Erro; $stCodEstruturalPai = $this->gerarCodigoEstruturalPai(); if ($stCodEstruturalPai) { - if ( SistemaLegado::is_tcems($boTransacao) ) { + if ( Sessao::getExercicio() > '2012' ) { $stCodEstruturalPaiTCEMS = substr($stCodEstruturalPai, 0, 12); $stFiltro = ' WHERE cod_estrutural like \''.$stCodEstruturalPaiTCEMS.'%\' '; } else { @@ -588,7 +582,7 @@ function validarCodigoEstruturalFilho($boTransacao = "") $obTContabilidadePlanoConta = new TContabilidadePlanoConta; $stFiltro = " WHERE publico.fn_mascarareduzida(cod_estrutural) like (publico.fn_mascarareduzida('".$this->stCodEstrutural."')||'%') AND "; - if ( sistemaLegado::is_tcems( $boTransacao ) ) { + if ( Sessao::getExercicio() > '2012' ) { $stFiltro .= " publico.fn_mascara_completa((select valor from administracao.configuracao where cod_modulo = 9 and exercicio = '".$this->stExercicio."' and parametro = 'masc_plano_contas'), cod_estrutural) != '".$this->stCodEstrutural."' "; } else { @@ -609,7 +603,7 @@ function validarNivelConta($boTransacao = "") { include_once ( CAM_GF_CONT_MAPEAMENTO."TContabilidadePlanoConta.class.php" ); include_once ( CAM_GF_CONT_MAPEAMENTO."TContabilidadePlanoContaTCEMS.class.php" ); - if ( SistemaLegado::is_tcems($boTransacao) ) { + if ( Sessao::getExercicio() > '2012' ) { $obTContabilidadePlanoConta = new TContabilidadePlanoContaTCEMS; } else { $obTContabilidadePlanoConta = new TContabilidadePlanoConta; @@ -617,7 +611,7 @@ function validarNivelConta($boTransacao = "") $obTContabilidadePlanoConta->setDado( "exercicio" , $this->stExercicio ); - if ( SistemaLegado::is_tcems( $boTransacao ) ) { + if ( Sessao::getExercicio() > '2012' ) { $obErro = $this->recuperaMascaraConta( $stMascara, $boTransacao ); if ( !$obErro->ocorreu() ) { $obTContabilidadePlanoConta->setDado( "cod_estrutural" , SistemaLegado::doMask( $this->stCodEstrutural, $stMascara ) ); @@ -630,7 +624,7 @@ function validarNivelConta($boTransacao = "") $obErro = $obTContabilidadePlanoConta->recuperaNivelConta( $rsRecordSet, $stFiltro, '', $boTransacao ); - if ( !SistemaLegado::is_tcems( $boTransacao ) ) { + if ( !Sessao::getExercicio() > '2012' ) { if (strlen($this->stCodEstrutural) != 24) { $obErro->setDescricao('Código de classificação inválido!'); } @@ -657,7 +651,7 @@ function checarContaPai($boTransacao = "") { include_once ( CAM_GF_CONT_MAPEAMENTO."TContabilidadePlanoConta.class.php" ); include_once ( CAM_GF_CONT_MAPEAMENTO."TContabilidadePlanoContaTCEMS.class.php" ); - if ( SistemaLegado::is_tcems($boTransacao) ) { + if ( Sessao::getExercicio() > '2012' ) { $obTContabilidadePlanoConta = new TContabilidadePlanoContaTCEMS; } else { $obTContabilidadePlanoConta = new TContabilidadePlanoConta; @@ -690,7 +684,7 @@ function salvar($boTransacao = "") include_once ( CAM_GF_CONT_MAPEAMENTO."TContabilidadePlanoContaTCEMS.class.php" ); include_once ( CAM_GF_CONT_MAPEAMENTO."TContabilidadeClassificacaoPlano.class.php" ); $obTContabilidadeClassificacaoPlano = new TContabilidadeClassificacaoPlano; - if ( SistemaLegado::is_tcems($boTransacao) ) { + if ( Sessao::getExercicio() > '2012' ) { $obTContabilidadePlanoConta = new TContabilidadePlanoContaTCEMS; } else { $obTContabilidadePlanoConta = new TContabilidadePlanoConta; @@ -714,7 +708,7 @@ function salvar($boTransacao = "") $obTContabilidadePlanoConta->setDado( "cod_classificacao" , $this->obRContabilidadeClassificacaoContabil->getCodClassificacao() ); $obTContabilidadePlanoConta->setDado( "cod_sistema" , $this->obRContabilidadeSistemaContabil->getCodSistema() ); $obTContabilidadePlanoConta->setDado( "cod_estrutural" , $this->stCodEstrutural ); - if ( SistemaLegado::is_tcems($boTransacao) ) { + if ( Sessao::getExercicio() > '2012' ) { $obTContabilidadePlanoConta->setDado( "escrituracao" , $this->stEscrituracao ); $obTContabilidadePlanoConta->setDado( "natureza_saldo" , $this->stNaturezaSaldo ); $obTContabilidadePlanoConta->setDado( "indicador_superavit" , $this->stIndicadorSuperavit ); @@ -792,7 +786,7 @@ function salvarEscolhaPlanoConta($boTransacao = "") include_once ( CAM_GF_CONT_MAPEAMENTO."TContabilidadePlanoContaTCEMS.class.php" ); include_once ( CAM_GF_CONT_MAPEAMENTO."TContabilidadeClassificacaoPlano.class.php" ); $obTContabilidadeClassificacaoPlano = new TContabilidadeClassificacaoPlano; - if ( SistemaLegado::is_tcems($boTransacao) ) { + if ( Sessao::getExercicio() > '2012' ) { $obTContabilidadePlanoConta = new TContabilidadePlanoContaTCEMS; } else { $obTContabilidadePlanoConta = new TContabilidadePlanoConta; @@ -806,7 +800,7 @@ function salvarEscolhaPlanoConta($boTransacao = "") $obTContabilidadePlanoConta->setDado( "cod_estrutural" , $this->stCodEstrutural ); $obTContabilidadePlanoConta->setDado( "cod_classificacao" , $this->obRContabilidadeClassificacaoContabil->getCodClassificacao() ); $obTContabilidadePlanoConta->setDado( "cod_sistema" , $this->obRContabilidadeSistemaContabil->getCodSistema() ); - if ( SistemaLegado::is_tcems($boTransacao) ) { + if ( Sessao::getExercicio() > '2012' ) { $obTContabilidadePlanoConta->setDado( "escrituracao" , $this->stEscrituracao ); $obTContabilidadePlanoConta->setDado( "natureza_saldo" , $this->stNaturezaSaldo ); $obTContabilidadePlanoConta->setDado( "indicador_superavit" , $this->stIndicadorSuperavit ); diff --git a/gestaoFinanceira/fontes/PHP/contabilidade/classes/negocio/RContabilidadePlanoContaAnalitica.class.php b/gestaoFinanceira/fontes/PHP/contabilidade/classes/negocio/RContabilidadePlanoContaAnalitica.class.php index afc188c..29e3e61 100755 --- a/gestaoFinanceira/fontes/PHP/contabilidade/classes/negocio/RContabilidadePlanoContaAnalitica.class.php +++ b/gestaoFinanceira/fontes/PHP/contabilidade/classes/negocio/RContabilidadePlanoContaAnalitica.class.php @@ -30,7 +30,7 @@ * @author Analista: Jorge B. Ribarr * @author Desenvolvedor: Anderson R. M. Buzo - $Id: RContabilidadePlanoContaAnalitica.class.php 62341 2015-04-24 21:14:44Z carlos.silva $ + $Id: RContabilidadePlanoContaAnalitica.class.php 64153 2015-12-09 19:16:02Z evandro $ * Casos de uso: uc-02.02.02, uc-02.02.19, uc-02.04.03, uc-02.04.09, uc-02.03.23 */ @@ -519,7 +519,7 @@ function listarPlanoContaArrecadacao(&$rsRecordSet, $stOrder = "" , $boTransacao if( $this->stCodEstrutural ) $stFiltro .= " pc.cod_estrutural like publico.fn_mascarareduzida('".$this->stCodEstrutural."')||'%' AND "; - if ( SistemaLegado::is_tcems( $boTransacao ) ) { + if ( Sessao::getExercicio() > '2012' ) { $stFiltro .= " pb.cod_banco is not null AND "; if ( $this->obROrcamentoEntidade->getCodigoEntidade() ) { $stFiltro .= " pb.cod_entidade in ( ".$this->obROrcamentoEntidade->getCodigoEntidade()." ) AND "; diff --git a/gestaoFinanceira/fontes/PHP/contabilidade/classes/negocio/RContabilidadeRelatorioBalanceteVerificacao.class.php b/gestaoFinanceira/fontes/PHP/contabilidade/classes/negocio/RContabilidadeRelatorioBalanceteVerificacao.class.php index 4f1e2c9..d948472 100755 --- a/gestaoFinanceira/fontes/PHP/contabilidade/classes/negocio/RContabilidadeRelatorioBalanceteVerificacao.class.php +++ b/gestaoFinanceira/fontes/PHP/contabilidade/classes/negocio/RContabilidadeRelatorioBalanceteVerificacao.class.php @@ -32,7 +32,7 @@ * @ignore - * $Id: RContabilidadeRelatorioBalanceteVerificacao.class.php 59612 2014-09-02 12:00:51Z gelson $ + * $Id: RContabilidadeRelatorioBalanceteVerificacao.class.php 64153 2015-12-09 19:16:02Z evandro $ * Casos de uso: uc-02.02.22 */ @@ -186,7 +186,7 @@ class RContabilidadeRelatorioBalanceteVerificacao extends PersistenteRelatorio $inCount = 0; while (!$rsRecordSet->eof()) { - if ( SistemaLegado::is_tcems() ) { + if ( Sessao::getExercicio() > '2012' ) { switch ($rsRecordSet->getCampo('cod_sistema')) { case 1: $stCodSistema = 'P'; diff --git a/gestaoFinanceira/fontes/PHP/contabilidade/classes/negocio/RContabilidadeRelatorioRazaoReceita.class.php b/gestaoFinanceira/fontes/PHP/contabilidade/classes/negocio/RContabilidadeRelatorioRazaoReceita.class.php index 0a743d7..d2c7516 100755 --- a/gestaoFinanceira/fontes/PHP/contabilidade/classes/negocio/RContabilidadeRelatorioRazaoReceita.class.php +++ b/gestaoFinanceira/fontes/PHP/contabilidade/classes/negocio/RContabilidadeRelatorioRazaoReceita.class.php @@ -335,8 +335,6 @@ function geraRecordSet(&$rsRecordSet , $stOrder = "") $rsRecordSet->proximo(); } -//mostravar($arRecordSet); die; - $rsRecordSet = new RecordSet; $rsRecordSet->preenche( $arRecordSet ); diff --git a/gestaoFinanceira/fontes/PHP/contabilidade/classes/negocio/RContabilidadeSistemaContabil.class.php b/gestaoFinanceira/fontes/PHP/contabilidade/classes/negocio/RContabilidadeSistemaContabil.class.php index 1a873d9..a391253 100755 --- a/gestaoFinanceira/fontes/PHP/contabilidade/classes/negocio/RContabilidadeSistemaContabil.class.php +++ b/gestaoFinanceira/fontes/PHP/contabilidade/classes/negocio/RContabilidadeSistemaContabil.class.php @@ -208,12 +208,12 @@ function listarSistemaContaAnalitica(&$rsRecordSet, $stOrder = "" , $boTransacao $stFiltro .= " cod_sistema != 5 AND "; - if ( sistemaLegado::is_tcems($boTransacao) ) { + if ( Sessao::getExercicio() > '2012' ) { $stFiltro .= " cod_sistema < 4 AND "; } $stFiltro = ($stFiltro) ? " WHERE " . substr($stFiltro, 0, strlen($stFiltro)-4) : ""; - if ( sistemaLegado::is_tcems($boTransacao) ) { + if ( Sessao::getExercicio() > '2012' ) { } $stOrder = ($stOrder) ? $stOrder : "cod_sistema"; diff --git a/gestaoFinanceira/fontes/PHP/contabilidade/instancias/configuracao/FMConfigurarLancamentosDespesa.php b/gestaoFinanceira/fontes/PHP/contabilidade/instancias/configuracao/FMConfigurarLancamentosDespesa.php index b285ec6..80b369a 100644 --- a/gestaoFinanceira/fontes/PHP/contabilidade/instancias/configuracao/FMConfigurarLancamentosDespesa.php +++ b/gestaoFinanceira/fontes/PHP/contabilidade/instancias/configuracao/FMConfigurarLancamentosDespesa.php @@ -54,7 +54,7 @@ $pgJs = "JS".$stPrograma.".js"; include_once($pgJs); //não possui permissão de acesso a exercícios anteriores a 2012 -if ( !SistemaLegado::is_tcems() ) { +if ( !Sessao::getExercicio() > '2012' ) { SistemaLegado::AlertaAviso( CAM_FW_INSTANCIAS."index/inicial.php", "Esta ação não está disponível à exercícios anteriores à 2012!", "n_incluir", "erro" ); } diff --git a/gestaoFinanceira/fontes/PHP/contabilidade/instancias/configuracao/FMConfigurarLancamentosReceita.php b/gestaoFinanceira/fontes/PHP/contabilidade/instancias/configuracao/FMConfigurarLancamentosReceita.php index 3efb6fc..76c3893 100644 --- a/gestaoFinanceira/fontes/PHP/contabilidade/instancias/configuracao/FMConfigurarLancamentosReceita.php +++ b/gestaoFinanceira/fontes/PHP/contabilidade/instancias/configuracao/FMConfigurarLancamentosReceita.php @@ -57,7 +57,7 @@ $obTEntidade = new TEntidade; $obTEntidade->recuperaEntidades($rsEntidades, $stFiltroEntidade); //não possui permissão de acesso a exercícios anteriores a 2012 -if ( !SistemaLegado::is_tcems() ) { +if ( !Sessao::getExercicio() > '2012' ) { SistemaLegado::AlertaAviso( CAM_FW_INSTANCIAS."index/inicial.php", "Esta ação não está disponível à  exercícios anteriores a 2012!", "n_incluir", "erro" ); } diff --git a/gestaoFinanceira/fontes/PHP/contabilidade/instancias/configuracao/FMManterConfiguracao.php b/gestaoFinanceira/fontes/PHP/contabilidade/instancias/configuracao/FMManterConfiguracao.php index 8edab9d..0c57a59 100755 --- a/gestaoFinanceira/fontes/PHP/contabilidade/instancias/configuracao/FMManterConfiguracao.php +++ b/gestaoFinanceira/fontes/PHP/contabilidade/instancias/configuracao/FMManterConfiguracao.php @@ -110,7 +110,7 @@ $obRegra = new RContabilidadePlanoConta; $obRegra->setExercicio( Sessao::getExercicio() ); $obRegra->listar( $rsLista, "" ); -if ( ($rsLista->getNumLinhas() > 0) && (!SistemaLegado::is_tcems() ) ) { +if ( ($rsLista->getNumLinhas() > 0) && (!Sessao::getExercicio() > '2012' ) ) { $boExiste = true; } else { $boExiste = false; diff --git a/gestaoFinanceira/fontes/PHP/contabilidade/instancias/configuracao/FMManterEncerramentoMes.php b/gestaoFinanceira/fontes/PHP/contabilidade/instancias/configuracao/FMManterEncerramentoMes.php index 5ee2de9..f50565c 100644 --- a/gestaoFinanceira/fontes/PHP/contabilidade/instancias/configuracao/FMManterEncerramentoMes.php +++ b/gestaoFinanceira/fontes/PHP/contabilidade/instancias/configuracao/FMManterEncerramentoMes.php @@ -99,7 +99,6 @@ if ($boUtilizarEncerramentoMes == 'false') { } } - // SistemaLegado::mostravar($arTmp); exit; //*****************************************************// // Define COMPONENTES DO FORMULARIO //*****************************************************// diff --git a/gestaoFinanceira/fontes/PHP/contabilidade/instancias/configuracao/FMManterReceitaDespesaExtraRecurso.php b/gestaoFinanceira/fontes/PHP/contabilidade/instancias/configuracao/FMManterReceitaDespesaExtraRecurso.php new file mode 100644 index 0000000..38aec7f --- /dev/null +++ b/gestaoFinanceira/fontes/PHP/contabilidade/instancias/configuracao/FMManterReceitaDespesaExtraRecurso.php @@ -0,0 +1,121 @@ + +get("stCtrl"); +$stAcao = $request->get("stAcao"); + +$boIndicadorContasExtrasRecursos = SistemaLegado::pegaConfiguracao('indicador_contas_extras_recurso',9,Sessao::getExercicio(),$boTransacao); + +require_once($pgJs); + +//****************************************// +//Define COMPONENTES DO FORMULARIO +//****************************************// +//Instancia o formulário +$obForm = new Form; +$obForm->setAction($pgProc); +$obForm->setTarget("oculto"); + +//Define o objeto da ação stAcao +$obHdnAcao = new Hidden; +$obHdnAcao->setId ("stAcao"); +$obHdnAcao->setName ("stAcao"); +$obHdnAcao->setValue($stAcao); + +//Define o objeto de controle +$obHdnCtrl = new Hidden; +$obHdnCtrl->setName ("stCtrl2"); +$obHdnCtrl->setId ("stCtrl2"); +$obHdnCtrl->setValue($stCtrl); + +$obRdSaldoContasRecursoSim = new Radio(); +$obRdSaldoContasRecursoSim->setRotulo ("Permitir Saldo de Contas por Recurso."); +$obRdSaldoContasRecursoSim->setTitle ("Selecione caso tenha a opção de preencher Saldos de Contas por Recurso."); +$obRdSaldoContasRecursoSim->setLabel ("Sim"); +$obRdSaldoContasRecursoSim->setName ("boIndicadorSaldoContasRecurso"); +$obRdSaldoContasRecursoSim->setId ("boIndicadorSaldoContasRecurso"); +if($boIndicadorContasExtrasRecursos == 't'){ + $obRdSaldoContasRecursoSim->setChecked (true); +} +$obRdSaldoContasRecursoSim->setValue ('t'); +$obRdSaldoContasRecursoSim->setNull ( false ); +$obRdSaldoContasRecursoSim->obEvento->setOnChange("montaParametrosGET('montaContas');"); + +$obRdSaldoContasRecursoNao = new Radio(); +$obRdSaldoContasRecursoNao->setRotulo ("Permitir Saldo de Contas por Recurso."); +$obRdSaldoContasRecursoNao->setTitle ("Selecione caso tenha a opção de preencher Saldos de Contas por Recurso."); +$obRdSaldoContasRecursoNao->setLabel ("Não"); +$obRdSaldoContasRecursoNao->setName ("boIndicadorSaldoContasRecurso"); +$obRdSaldoContasRecursoNao->setId ("boIndicadorSaldoContasRecurso"); +if($boIndicadorContasExtrasRecursos == 'f'){ + $obRdSaldoContasRecursoNao->setChecked (true); +} +$obRdSaldoContasRecursoNao->setValue ('f'); +$obRdSaldoContasRecursoNao->setNull ( false ); +$obRdSaldoContasRecursoNao->obEvento->setOnChange("montaParametrosGET('montaContas');"); + +$obSpnContaReceitaDespesaExtra = new Span(); +$obSpnContaReceitaDespesaExtra->setId("spnContaReceitaDespesaExtra"); + +//****************************************// +//Monta FORMULARIO +//****************************************// +$obFormulario = new Formulario; +$obFormulario->addForm ( $obForm ); +$obFormulario->addHidden ( $obHdnCtrl ); +$obFormulario->addHidden ( $obHdnAcao ); +$obFormulario->addTitulo ( "Dados para Configuração de Receita/Despesa Extra por Fonte de Recurso" ); +$obFormulario->addComponenteComposto ( $obRdSaldoContasRecursoSim, $obRdSaldoContasRecursoNao ); +$obFormulario->addSpan ( $obSpnContaReceitaDespesaExtra ); +$obFormulario->OK(true); +$obFormulario->show(); + +require_once '../../../../../../gestaoAdministrativa/fontes/PHP/framework/include/rodape.inc.php'; +?> \ No newline at end of file diff --git a/gestaoFinanceira/fontes/PHP/contabilidade/instancias/configuracao/JSManterReceitaDespesaExtraRecurso.js b/gestaoFinanceira/fontes/PHP/contabilidade/instancias/configuracao/JSManterReceitaDespesaExtraRecurso.js new file mode 100644 index 0000000..87214d5 --- /dev/null +++ b/gestaoFinanceira/fontes/PHP/contabilidade/instancias/configuracao/JSManterReceitaDespesaExtraRecurso.js @@ -0,0 +1,77 @@ + + + \ No newline at end of file diff --git a/gestaoFinanceira/fontes/PHP/contabilidade/instancias/configuracao/OCManterReceitaDespesaExtraRecurso.php b/gestaoFinanceira/fontes/PHP/contabilidade/instancias/configuracao/OCManterReceitaDespesaExtraRecurso.php new file mode 100644 index 0000000..67c02c4 --- /dev/null +++ b/gestaoFinanceira/fontes/PHP/contabilidade/instancias/configuracao/OCManterReceitaDespesaExtraRecurso.php @@ -0,0 +1,290 @@ + +setDado('exercicio', Sessao::getExercicio()); + $obErro = $obTContabilidadeConfiguracaoContasExtras->recuperaRelacionamento($rsContas, $stCondicao, $stOrdem, $boTransacao); + + while(!$rsContas->eof()) + { + $inNovo = ($rsContas->getCorrente()-1); + + $arContas[$inNovo]['inId'] = $inNovo; + $arContas[$inNovo]['exercicio'] = $rsContas->getCampo('exercicio'); + $arContas[$inNovo]['cod_conta'] = $rsContas->getCampo('cod_conta'); + $arContas[$inNovo]['nom_conta'] = $rsContas->getCampo('nom_conta'); + $arContas[$inNovo]['cod_estrutural'] = $rsContas->getCampo('cod_estrutural'); + + $rsContas->proximo(); + } + $rsContas->setPrimeiroElemento(); + + Sessao::write("arContas", $arContas); + } + + return $stJs; +} + + +function montaCampoConta(){ + + $obHdnEscrituracao = new Hidden(); + $obHdnEscrituracao->setName ("stEscrituracao"); + $obHdnEscrituracao->setId ("stEscrituracao"); + $obHdnEscrituracao->setValue("sintetica"); + + require_once CAM_GF_CONT_COMPONENTES.'IPopUpEstruturalPlano.class.php'; + + $obIIntervaloPopUpEstruturalPlano = new IPopUpEstruturalPlano(); + $obIIntervaloPopUpEstruturalPlano->setId("stDescEstruturalConta"); + $obIIntervaloPopUpEstruturalPlano->setTipoEscrituracao('sintetica'); + $obIIntervaloPopUpEstruturalPlano->setObrigatorioBarra(true); + $obIIntervaloPopUpEstruturalPlano->obCampoCod->setNull(false); + $obIIntervaloPopUpEstruturalPlano->obCampoCod->setId("stCodEstruturalConta"); + + $obSpnListaContas = new Span(); + $obSpnListaContas->setId("spnListaContas"); + + $obBtnIncluir = new Button(); + $obBtnIncluir->setValue("Incluir"); + $obBtnIncluir->obEvento->setOnClick("if( ValidaContas() ) { montaParametrosGET('incluirContas') }"); + + $obFormulario = new Formulario(); + $obFormulario->addHidden ( $obHdnEscrituracao ); + $obFormulario->addTitulo ( "Contas de Receita/Despesa Extra por Fonte de Recurso" ); + $obFormulario->addComponente( $obIIntervaloPopUpEstruturalPlano ); + $obFormulario->defineBarra ( array($obBtnIncluir) ); + $obFormulario->addSpan ( $obSpnListaContas ); + + $obFormulario->montaInnerHTML(); + + $stHTML = $obFormulario->getHTML(); + + $stJs .= " jQuery(\"#spnContaReceitaDespesaExtra\").html('".$stHTML."'); \n"; + + return $stJs; +} + +function montaContas( $boIndicadorSaldoContasRecurso ) +{ + if($boIndicadorSaldoContasRecurso == "t"){ + $stJs .= montaCampoConta(); + $stJs .= gerarSpanContas(); + } else { + $stJs .= "jQuery('#spnContaReceitaDespesaExtra').html(\"\");\n"; + } + + return $stJs; +} + +function incluirContas() +{ + $stJs = processarContas('incluir'); + + return $stJs; +} + +function processarContas($stAcao){ + + $arContas = Sessao::read('arContas'); + + if(!is_array($arContas)){ + $arContas = array(); + } + + if ( validaInclusaoListaContas($arContas) ) { + $rsConta = new RecordSet(); + + $stCondicao = " AND plano_conta.escrituracao = '".$_REQUEST['stEscrituracao']."' \n"; + + $obTContabilidadePlanoConta = new TContabilidadePlanoConta(); + $obTContabilidadePlanoConta->setDado('exercicio' , Sessao::getExercicio() ); + $obTContabilidadePlanoConta->setDado('cod_estrutural', $_REQUEST['stCodEstrutural']); + + $obTContabilidadePlanoConta->recuperaContaSintetica($rsConta, $stCondicao, $stOrdem, $boTransacao); + + $inNovo = count($arContas); + $arContas[$inNovo]['inId'] = $inNovo; + $arContas[$inNovo]['exercicio'] = Sessao::getExercicio(); + $arContas[$inNovo]['cod_conta'] = $rsConta->getCampo('cod_conta'); + $arContas[$inNovo]['nom_conta'] = $rsConta->getCampo('nom_conta'); + $arContas[$inNovo]['cod_estrutural'] = $rsConta->getCampo('cod_estrutural'); + + Sessao::write("arContas", $arContas); + + $stJs .= gerarSpanContas(); + $stJs .= limparFormConta(); + } else { + $stJs .= "alertaAviso('Essa conta já foi incluida na lista.','form','aviso','".Sessao::getId()."');\n"; + } + return $stJs; +} + +function validaInclusaoListaContas($arContas) +{ + foreach ($arContas as $key => $value) { + if ( $_REQUEST['stCodEstrutural'] == $value['cod_estrutural'] && Sessao::getExercicio() == $value['exercicio']) { + return false; + } + } + return true; +} + + +function gerarSpanContas(){ + $rsRecordSet = new recordset(); + $rsRecordSet->preenche(Sessao::read("arContas")); + + $rsRecordSet->ordena('cod_estrutural', "ASC", SORT_STRING); + + $obLista = new Lista; + $obLista->setMostraPaginacao( false ); + $obLista->setTitulo( "Lista de Contas de Despesa/Receita Extra" ); + $obLista->setRecordSet( $rsRecordSet ); + + $obLista->addCabecalho(); + $obLista->ultimoCabecalho->addConteudo(" "); + $obLista->ultimoCabecalho->setWidth( 3 ); + $obLista->commitCabecalho(); + + $obLista->addCabecalho(); + $obLista->ultimoCabecalho->addConteudo( "Código Estrutural" ); + $obLista->ultimoCabecalho->setWidth( 13 ); + $obLista->commitCabecalho(); + + $obLista->addCabecalho(); + $obLista->ultimoCabecalho->addConteudo( "Nome da Conta" ); + $obLista->ultimoCabecalho->setWidth( 73 ); + $obLista->commitCabecalho(); + + $obLista->addCabecalho(); + $obLista->ultimoCabecalho->addConteudo( "Ação" ); + $obLista->ultimoCabecalho->setWidth( 5 ); + $obLista->commitCabecalho(); + + $obLista->addDado(); + $obLista->ultimoDado->setCampo( "[cod_estrutural]"); + $obLista->ultimoDado->setAlinhamento( 'CENTRO' ); + $obLista->commitDado(); + + $obLista->addDado(); + $obLista->ultimoDado->setCampo( "[nom_conta]"); + $obLista->ultimoDado->setAlinhamento( 'ESQUERDA' ); + $obLista->commitDado(); + + $obLista->addAcao(); + $obLista->ultimaAcao->setAcao( "EXCLUIR" ); + $obLista->ultimaAcao->setFuncaoAjax( true ); + $obLista->ultimaAcao->setLink( "JavaScript:executaFuncaoAjax('excluirContas');"); + $obLista->ultimaAcao->addCampo("1","inId"); + $obLista->commitAcao(); + + $obLista->montaInnerHtml(); + $stHtml = $obLista->getHTML(); + $stJs .= "jQuery('#spnListaContas').html('".$stHtml."');"; + + return $stJs; +} + +function limparFormConta(){ + + $stJs .= "jQuery('#stCodEstruturalConta').val('');"; + $stJs .= "jQuery('#HdnstCodEstrutural').val('');"; + $stJs .= "jQuery('#stDescEstruturalConta').html('');"; + + return $stJs; +} + +function excluirContas() +{ + $arContas = Sessao::read("arContas"); + + $arTemp = array(); + foreach ($arContas as $arConta) { + if ($arConta["inId"] != $_GET["inId"]) { + $arTemp[] = $arConta; + } + } + Sessao::write('arContas',$arTemp); + $stJs .= gerarSpanContas(); + + return $stJs; +} + + +$stSctrl = $request->get('stCtrl'); +switch ($stSctrl) { + case 'consultarConfiguracao': + $stJs .= consultarConfiguracao(); + break; + case 'montaContas': + $boValidaRadio = $request->get('boIndicadorSaldoContasRecurso'); + $stJs .= montaContas( $boValidaRadio ); + break; + case 'incluirContas': + $stJs .= incluirContas(); + break; + case 'excluirContas': + $stJs .= excluirContas(); + break; +} + +echo $stJs; + +?> \ No newline at end of file diff --git a/gestaoFinanceira/fontes/PHP/contabilidade/instancias/configuracao/PRManterReceitaDespesaExtraRecurso.php b/gestaoFinanceira/fontes/PHP/contabilidade/instancias/configuracao/PRManterReceitaDespesaExtraRecurso.php new file mode 100644 index 0000000..d8b7f40 --- /dev/null +++ b/gestaoFinanceira/fontes/PHP/contabilidade/instancias/configuracao/PRManterReceitaDespesaExtraRecurso.php @@ -0,0 +1,104 @@ + +abreTransacao($boFlagTransacao, $boTransacao); + +$obTContabilidadeConfiguracaoContasExtras = new TContabilidadeConfiguracaoContasExtras(); + +$obTAdministracaoConfiguracao = new TAdministracaoConfiguracao(); +$obTAdministracaoConfiguracao->setDado('exercicio' , Sessao::getExercicio() ); +$obTAdministracaoConfiguracao->setDado('cod_modulo', 9); +$obTAdministracaoConfiguracao->setDado('parametro' , 'indicador_contas_extras_recurso'); +$obTAdministracaoConfiguracao->setDado('valor' , $request->get('boIndicadorSaldoContasRecurso')); +$obErro = $obTAdministracaoConfiguracao->alteracao($boTransacao); + +if($request->get('boIndicadorSaldoContasRecurso') == 't' && !$obErro->ocorreu()) { + $arContas = Sessao::read('arContas'); + + if(!is_array($arContas)){ + $arContas = array(); + } + + if(count($arContas) <= 0){ + $obErro->setDescricao("É necessário ao menos uma conta ser configurada."); + } + + if( !$obErro->ocorreu() ) { + $obTContabilidadeConfiguracaoContasExtras->setDado('exercicio', Sessao::getExercicio()); + $obErro = $obTContabilidadeConfiguracaoContasExtras->exclusao($boTransacao); + } + + if(!$obErro->ocorreu()){ + foreach($arContas AS $arConta){ + $obTContabilidadeConfiguracaoContasExtras->setDado('exercicio', $arConta['exercicio']); + $obTContabilidadeConfiguracaoContasExtras->setDado('cod_conta', $arConta['cod_conta']); + $obErro = $obTContabilidadeConfiguracaoContasExtras->inclusao($boTransacao); + } + } +} + +if($request->get('boIndicadorSaldoContasRecurso') == 'f' && !$obErro->ocorreu()){ + $obTContabilidadeConfiguracaoContasExtras->setDado('exercicio', Sessao::getExercicio()); + $obErro = $obTContabilidadeConfiguracaoContasExtras->exclusao($boTransacao); + +} +if(!$obErro->ocorreu()){ + SistemaLegado::alertaAviso($pgForm."?stAcao=".$request->get('stAcao'), "Alteração feita com sucesso".$stNroProcesso."! ", 'incluir', "aviso", Sessao::getId(), "../"); + Sessao::remove('arContas'); + $obTransacao->fechaTransacao($boFlagTransacao, $boTransacao, $obErro, $obTTCMBATermoParceria); + +} else { + SistemaLegado::exibeAviso(urlencode($obErro->getDescricao()),"n_incluir","erro"); + SistemaLegado::LiberaFrames(true,true); +} + +?> \ No newline at end of file diff --git a/gestaoFinanceira/fontes/PHP/contabilidade/instancias/encerramento/OCGeraRelatorioRestosAPagar.php b/gestaoFinanceira/fontes/PHP/contabilidade/instancias/encerramento/OCGeraRelatorioRestosAPagar.php index 7955741..a3a010b 100755 --- a/gestaoFinanceira/fontes/PHP/contabilidade/instancias/encerramento/OCGeraRelatorioRestosAPagar.php +++ b/gestaoFinanceira/fontes/PHP/contabilidade/instancias/encerramento/OCGeraRelatorioRestosAPagar.php @@ -44,7 +44,7 @@ include_once( CAM_FW_PDF."RRelatorio.class.php" ); $obRRelatorio = new RRelatorio; $obPDF = new ListaPDF("L"); $arDados = Sessao::Read('argeral'); -//SistemaLegado::mostravar($arDados);exit; + $rsRecordSet = new RecordSet; $obRRelatorio->setCodigoEntidade( $arDados['entidade'][0] ); diff --git a/gestaoFinanceira/fontes/PHP/contabilidade/instancias/encerramento/PRDefinirContasRP.php b/gestaoFinanceira/fontes/PHP/contabilidade/instancias/encerramento/PRDefinirContasRP.php index 76a56c3..1c441b4 100644 --- a/gestaoFinanceira/fontes/PHP/contabilidade/instancias/encerramento/PRDefinirContasRP.php +++ b/gestaoFinanceira/fontes/PHP/contabilidade/instancias/encerramento/PRDefinirContasRP.php @@ -32,7 +32,7 @@ * @ignore - * $Id: PRDefinirContasRP.php 59612 2014-09-02 12:00:51Z gelson $ + * $Id: PRDefinirContasRP.php 63831 2015-10-22 12:51:00Z franver $ * Casos de uso: uc-02.02.31 */ @@ -58,8 +58,6 @@ $obTContabilidadeContaLancamentoRp->excluiTudo( " WHERE exercicio = '".Sessao::g $arContasDebito = Sessao::read('arContasDebito'); $arContasCreditos = Sessao::read('arContasCredito'); -//sistemaLegado::mostravar($arContasDebito); -//sistemaLegado::mostravar($arContasCreditos);exit; if (is_array($arContasDebito)) { foreach ($arContasDebito as $arConta) { diff --git a/gestaoFinanceira/fontes/PHP/contabilidade/instancias/lancamentoContabil/LSAberturaOrcamentoAnual.php b/gestaoFinanceira/fontes/PHP/contabilidade/instancias/lancamentoContabil/LSAberturaOrcamentoAnual.php index f865f2f..ec3a75c 100644 --- a/gestaoFinanceira/fontes/PHP/contabilidade/instancias/lancamentoContabil/LSAberturaOrcamentoAnual.php +++ b/gestaoFinanceira/fontes/PHP/contabilidade/instancias/lancamentoContabil/LSAberturaOrcamentoAnual.php @@ -46,7 +46,6 @@ $pgJS = "JS".$stPrograma.".js"; include_once ( $pgJS ); -//Sistemalegado::mostravar($_REQUEST); $boTransacao = new Transacao(); $stFiltro = ""; $stJs = "jQuery('#nuValor_2').hide();"; diff --git a/gestaoFinanceira/fontes/PHP/contabilidade/instancias/lancamentoContabil/PRManterLancamentoPartidaDobrada.php b/gestaoFinanceira/fontes/PHP/contabilidade/instancias/lancamentoContabil/PRManterLancamentoPartidaDobrada.php index 860d692..fc464ad 100644 --- a/gestaoFinanceira/fontes/PHP/contabilidade/instancias/lancamentoContabil/PRManterLancamentoPartidaDobrada.php +++ b/gestaoFinanceira/fontes/PHP/contabilidade/instancias/lancamentoContabil/PRManterLancamentoPartidaDobrada.php @@ -32,7 +32,7 @@ * @ignore - * $Id: PRManterLancamentoPartidaDobrada.php 59612 2014-09-02 12:00:51Z gelson $ + * $Id: PRManterLancamentoPartidaDobrada.php 63831 2015-10-22 12:51:00Z franver $ * Casos de uso: uc-02.02.33 */ @@ -54,10 +54,6 @@ $pgJs = "JS".$stPrograma.".js"; $arValoresDebito = Sessao::read('arValoresDebito'); $arValoresCredito = Sessao::read('arValoresCredito'); -//sistemaLegado::mostravar($_REQUEST); -//sistemaLegado::mostravar($arValoresCredito); -//sistemaLegado::mostravar($arValoresDebito);die; - $rsValoresDebito = new RecordSet; $rsValoresCredito = new RecordSet; diff --git a/gestaoFinanceira/fontes/PHP/contabilidade/instancias/planoConta/FMEncerrarConta.php b/gestaoFinanceira/fontes/PHP/contabilidade/instancias/planoConta/FMEncerrarConta.php index 02de06c..86187b1 100644 --- a/gestaoFinanceira/fontes/PHP/contabilidade/instancias/planoConta/FMEncerrarConta.php +++ b/gestaoFinanceira/fontes/PHP/contabilidade/instancias/planoConta/FMEncerrarConta.php @@ -32,7 +32,7 @@ * @ignore - * $Id: FMEncerrarConta.php 60107 2014-09-30 17:56:47Z evandro $ + * $Id: FMEncerrarConta.php 64153 2015-12-09 19:16:02Z evandro $ * Casos de uso: uc-02.02.02 */ @@ -177,7 +177,7 @@ if (!$inCodEntidade) { } if ($stAcao == "encerrar") { - if ( ($inCodSistemaContabil == "5") || ( $inCodSistemaContabil == "4" && SistemaLegado::is_tcems() && $stEscrituracao == 'sintetica' ) ) { + if ( ($inCodSistemaContabil == "5") || ( $inCodSistemaContabil == "4" && Sessao::getExercicio() > '2012' && $stEscrituracao == 'sintetica' ) ) { $js .= " buscaValor('tipoContaSintetica');"; } else { $js .= " buscaValor('tipoContaAnalitica');"; diff --git a/gestaoFinanceira/fontes/PHP/contabilidade/instancias/planoConta/FMManterPlanoConta.php b/gestaoFinanceira/fontes/PHP/contabilidade/instancias/planoConta/FMManterPlanoConta.php index 60b13fd..2b75022 100755 --- a/gestaoFinanceira/fontes/PHP/contabilidade/instancias/planoConta/FMManterPlanoConta.php +++ b/gestaoFinanceira/fontes/PHP/contabilidade/instancias/planoConta/FMManterPlanoConta.php @@ -29,7 +29,7 @@ * @ignore - * $Id: FMManterPlanoConta.php 61379 2015-01-12 20:10:17Z arthur $ + * $Id: FMManterPlanoConta.php 64153 2015-12-09 19:16:02Z evandro $ * Casos de uso: uc-02.02.02 */ @@ -149,7 +149,7 @@ if ($stAcao == 'alterar') { $stIndicadorSuperavit = ''; $stFuncao = ''; - if ( SistemaLegado::is_tcems() ) { + if ( Sessao::getExercicio() > '2012' ) { if ( !empty( $_REQUEST['inCodPlano'] ) ) { $stIndicadorSuperavit = $obRContabilidadePlanoBanco->getIndicadorSuperavit(); } @@ -195,7 +195,7 @@ if ($stAcao == "incluir") { $js .= " buscaValor('tipoContaAnalitica');"; } elseif ($stAcao == "alterar") { - if ( ($inCodSistemaContabil == "5") || ( $inCodSistemaContabil == "4" && SistemaLegado::is_tcems() && $stEscrituracao == 'sintetica' ) ) { + if ( ($inCodSistemaContabil == "5") || ( $inCodSistemaContabil == "4" && Sessao::getExercicio() > '2012' && $stEscrituracao == 'sintetica' ) ) { $js .= " buscaValor('tipoContaSintetica');"; } else { $js .= " buscaValor('tipoContaAnalitica');"; @@ -223,7 +223,7 @@ $obHdnCtrl->setValue( "" ); if ($stAcao == 'alterar') { // Verifica se a conta tem movimentacao - if ( SistemaLegado::is_tcems() ) { + if ( Sessao::getExercicio() > '2012' ) { $obTContabilidadePlanoConta = new TContabilidadePlanoContaTCEMS; } else { $obTContabilidadePlanoConta = new TContabilidadePlanoConta; @@ -235,7 +235,7 @@ if ($stAcao == 'alterar') { $boTemMovimentacao = true; } - if ( SistemaLegado::is_tcems() ) { + if ( Sessao::getExercicio() > '2012' ) { $obTContabilidadePlanoConta = new TContabilidadePlanoContaTCEMS; } else { $obTContabilidadePlanoConta = new TContabilidadePlanoConta; @@ -282,7 +282,7 @@ if ($stAcao == 'alterar') { //Define Objeto Label para Código da Classificacao Contabil $obLblCodClassContabil = new Label; $obLblCodClassContabil->setRotulo ( "Código de Classificação" ); - if ( !SistemaLegado::is_tcems() ) { + if ( !Sessao::getExercicio() > '2012' ) { $obLblCodClassContabil->setValue( $stCodClassificacao ); } else { $obLblCodClassContabil->setValue( $stCodClassificacao ); @@ -298,7 +298,7 @@ $obHdnCodClassContabil->setValue( $inCodClassContabil ); $obSpanSistemaContabil = new Span; $obSpanSistemaContabil->setId( "spnSistemaContabil" ); -if ( !SistemaLegado::is_tcems() ) { +if ( !Sessao::getExercicio() > '2012' ) { // Define Objeto TextBox para Codigo da Classificacao Contabil $obTxtClassContabil = new TextBox; $obTxtClassContabil->setName ( "txtCodClassContabil" ); @@ -352,7 +352,7 @@ $obTxtDescrConta->setRotulo ( "Descrição da Conta" ); $obTxtDescrConta->setTitle ( "Informe a descrição da conta" ); $obTxtDescrConta->setNull ( false ); -if ( SistemaLegado::is_tcems() ) { +if ( Sessao::getExercicio() > '2012' ) { // Define Objeto TextArea para a Função $obTxtFuncao = new TextArea; $obTxtFuncao->setName ( "stFuncao" ); @@ -757,7 +757,7 @@ if($rsContaEncerrada->getNumLinhas() > 0 && $stAcao == 'alterar'){ } $obLblSistemaContabil->setValue ( $stNomeContaContabil ); - if ( sistemaLegado::is_tcems() ) { + if ( Sessao::getExercicio() > '2012' ) { $stIndicadorSuperavit = $obRContabilidadePlanoBanco->getIndicadorSuperavit(); $obLblIndicadorSuperavit = new Label; $obLblIndicadorSuperavit->setRotulo ( "Indicador Superávit" ); @@ -791,7 +791,7 @@ if($rsContaEncerrada->getNumLinhas() > 0 && $stAcao == 'alterar'){ $obFormulario->addComponente( $obLblNaturezaSaldo ); if($boContaAnalitica){ $obFormulario->addComponente( $obLblSistemaContabil ); - if ( sistemaLegado::is_tcems() ) { + if ( Sessao::getExercicio() > '2012' ) { $obFormulario->addComponente( $obLblIndicadorSuperavit ); } } @@ -895,7 +895,7 @@ if($rsContaEncerrada->getNumLinhas() > 0 && $stAcao == 'alterar'){ $obFormulario->addSpan( $obSpanSistemaContabil ); - if ( !SistemaLegado::is_tcems() ) { + if ( !Sessao::getExercicio() > '2012' ) { $obFormulario->addComponenteComposto( $obTxtClassContabil , $obCmbClassContabil ); } @@ -906,7 +906,7 @@ if($rsContaEncerrada->getNumLinhas() > 0 && $stAcao == 'alterar'){ } $obFormulario->addComponente( $obTxtDescrConta ); - if ( SistemaLegado::is_tcems() ) { + if ( Sessao::getExercicio() > '2012' ) { $obFormulario->addComponente( $obTxtFuncao ); } diff --git a/gestaoFinanceira/fontes/PHP/contabilidade/instancias/planoConta/OCManterPlanoConta.php b/gestaoFinanceira/fontes/PHP/contabilidade/instancias/planoConta/OCManterPlanoConta.php index 2169005..c1e3282 100755 --- a/gestaoFinanceira/fontes/PHP/contabilidade/instancias/planoConta/OCManterPlanoConta.php +++ b/gestaoFinanceira/fontes/PHP/contabilidade/instancias/planoConta/OCManterPlanoConta.php @@ -32,7 +32,7 @@ * @ignore - * $Id: OCManterPlanoConta.php 60235 2014-10-07 20:38:22Z arthur $ + * $Id: OCManterPlanoConta.php 64153 2015-12-09 19:16:02Z evandro $ * Casos de uso: uc-02.02.02 */ @@ -85,7 +85,7 @@ switch ($stCtrl) { $obHdnCodSistemaContabil = new Hidden; $obHdnCodSistemaContabil->setName ( "inCodSistemaContabil" ); - if ( sistemaLegado::is_tcems() ) { + if ( Sessao::getExercicio() > '2012' ) { $obHdnCodSistemaContabil->setValue( "4" ); $obHdnIndicadorSuperavit = new Hidden; $obHdnIndicadorSuperavit->setName( "stIndicadorSuperavit" ); @@ -102,7 +102,7 @@ switch ($stCtrl) { $obFormulario = new Formulario; - if ( sistemaLegado::is_tcems() ) { + if ( Sessao::getExercicio() > '2012' ) { $obFormulario->addHidden ($obHdnIndicadorSuperavit); } $obFormulario->addHidden ($obHdnCodSistemaContabil); @@ -176,7 +176,7 @@ switch ($stCtrl) { $stIndicadorSuperavit = $obRContabilidadePlanoBanco->getIndicadorSuperavit(); - if ( sistemaLegado::is_tcems() ) { + if ( Sessao::getExercicio() > '2012' ) { // Define Objeto Select para o Indicador Superávit $obCmbIndicadorSuperavit = new Select; diff --git a/gestaoFinanceira/fontes/PHP/contabilidade/instancias/planoConta/PRManterPlanoConta.php b/gestaoFinanceira/fontes/PHP/contabilidade/instancias/planoConta/PRManterPlanoConta.php index 8c07141..d7f3046 100755 --- a/gestaoFinanceira/fontes/PHP/contabilidade/instancias/planoConta/PRManterPlanoConta.php +++ b/gestaoFinanceira/fontes/PHP/contabilidade/instancias/planoConta/PRManterPlanoConta.php @@ -29,7 +29,7 @@ * @ignore - * $Id: PRManterPlanoConta.php 61374 2015-01-12 17:48:14Z arthur $ + * $Id: PRManterPlanoConta.php 64153 2015-12-09 19:16:02Z evandro $ * Casos de uso: uc-02.02.02 */ @@ -69,6 +69,25 @@ if($stAcao != 'excluir') { SistemaLegado::exibeAviso('É obrigatório o preenchimento correto do campo Código de Classificação', 'n_incluir', 'erro'); exit; } + /* + #23315 + Validação ao cadastrar uma nova conta com fonte de recurso o sistema deve verificar se neste grupos + 72112. 72.111, 82.111,82.112,82.113 e 82.114 já existe uma conta com esta mesma fonte de recurso. + Até porque já existe uma regra estabelecida como uma unica conta por fonte de recurso. + */ + + // Adicionada validação porque campo inCodRecurso não é obrigatório + if($request->get('inCodRecurso') != '') { + $obTOrcamentoRecurso = new TOrcamentoRecurso; + $obTOrcamentoRecurso->setDado('exercicio' , Sessao::getExercicio() ); + $obTOrcamentoRecurso->setDado('cod_estrutural', $request->get('stCodClass') ); + $obTOrcamentoRecurso->setDado('cod_recurso', $request->get('inCodRecurso') ); + $obTOrcamentoRecurso->verificaContaRecurso($rsContaRecurso100, $boTransacao); + if ($rsContaRecurso100->getNumLinhas() > 0) { + SistemaLegado::exibeAviso("Já existe uma conta com o recurso ".$request->get('inCodRecurso'). " nesse grupo de contas", 'n_incluir', 'aviso'); + exit; + } + } } switch ($stAcao) { @@ -116,7 +135,7 @@ switch ($stAcao) { $obRContabilidadePlanoBanco->setTipoContaCorrenteTCEMG($_REQUEST['inTipoContaCorrenteTCEMG']); } - if ( SistemaLegado::is_tcems($boTransacao) ) { + if ( Sessao::getExercicio() > '2012' ) { $stNaturezaSaldo = ''; switch ($_REQUEST['stNatSaldo']) { case 'D': @@ -139,7 +158,7 @@ switch ($stAcao) { if ($_POST['stTipoConta'] == 'A') { $obRContabilidadePlanoBanco->setContaAnalitica( true ); - if ( $boDestinacao == 'true' && !SistemaLegado::is_tcems($boTransacao) ) { + if ( $boDestinacao == 'true' && !Sessao::getExercicio() > '2012' ) { if ($_REQUEST['stDestinacaoRecurso'] != '') { $arDestinacaoRecurso = explode('.',$_REQUEST['stDestinacaoRecurso']); @@ -338,7 +357,7 @@ switch ($stAcao) { if (SistemaLegado::pegaConfiguracao('cod_uf', 2, Sessao::getExercicio(), $boTransacao) == 11) { $obRContabilidadePlanoBanco->setTipoContaCorrenteTCEMG($_POST['inTipoContaCorrenteTCEMG']); } - if ( SistemaLegado::is_tcems($boTransacao) ) { + if ( Sessao::getExercicio() > '2012' ) { $stNaturezaSaldo = ''; switch ($_REQUEST['stNatSaldo']) { case 'D': @@ -359,7 +378,7 @@ switch ($stAcao) { //if( $_POST['inTipoConta'] == 'Analitica' ) if ($_POST['stTipoConta'] == 'A') { $obRContabilidadePlanoBanco->setContaAnalitica( true ); - if ($boDestinacao == 'true' && !SistemaLegado::is_tcems($boTransacao) ) { + if ($boDestinacao == 'true' && !Sessao::getExercicio() > '2012' ) { $obErro = new Erro; $arDestinacaoRecurso = explode('.',$_REQUEST['stDestinacaoRecurso']); @@ -740,7 +759,7 @@ case 'excluir': if (!$obErro->ocorreu()) { $obTransacao->commitAndClose(); - SistemaLegado::alertaAviso($pgList.'?stAcao=excluir&'.$stFiltro, $_GET['stCodEstrutural'].' - '.$_GET['stNomConta'], 'excluir', 'aviso', Sessao::getId(), '../'); + SistemaLegado::alertaAviso($pgList.'?stAcao=excluir&'.$stFiltro, $_GET['inCodPlano']." - ". $_GET['stCodEstrutural'].' - '.$_GET['stNomConta'], 'excluir', 'aviso', Sessao::getId(), '../'); } else { $obTransacao->rollbackAndClose(); diff --git a/gestaoFinanceira/fontes/PHP/contabilidade/instancias/processamento/OCContaAnalitica.php b/gestaoFinanceira/fontes/PHP/contabilidade/instancias/processamento/OCContaAnalitica.php index 0e522ee..3a228f4 100755 --- a/gestaoFinanceira/fontes/PHP/contabilidade/instancias/processamento/OCContaAnalitica.php +++ b/gestaoFinanceira/fontes/PHP/contabilidade/instancias/processamento/OCContaAnalitica.php @@ -35,7 +35,7 @@ $Name: $ $Author: lbbarreiro $ $Date: 2007-10-31 15:55:22 -0200 (Qua, 31 Out 2007) $ - $Id: OCContaAnalitica.php 63740 2015-10-05 11:17:51Z franver $ + $Id: OCContaAnalitica.php 64153 2015-12-09 19:16:02Z evandro $ Casos de uso: uc-02.02.02,uc-02.04.28,uc-02.02.31,uc-02.03.28 */ @@ -78,7 +78,7 @@ switch ( $request->get('stCtrl') ) { $stFiltro .= "\n pa.cod_plano is not null AND "; $stFiltro .= "\n pa.cod_plano = ".$_GET[$_GET['stNomCampoCod']]." AND "; $stFiltro .= "\n pc.exercicio = '".Sessao::getExercicio()."' AND "; - if ( SistemaLegado::is_tcems() ) { + if ( Sessao::getExercicio() > '2012' ) { $stFiltro .= " ( pb.cod_banco IS NOT NULL AND pb.cod_entidade IN ( ".$request->get('inCodEntidade').") AND ( pc.cod_estrutural LIKE '1.1.1.%' @@ -114,7 +114,7 @@ switch ( $request->get('stCtrl') ) { $stFiltro .= "\n pa.cod_plano is not null AND "; $stFiltro .= "\n pa.cod_plano = ".$_GET[$_GET['stNomCampoCod']]." AND "; $stFiltro .= "\n pc.exercicio = '".Sessao::getExercicio()."' AND "; - if ( SistemaLegado::is_tcems() ) { + if ( Sessao::getExercicio() > '2012' ) { $stFiltro .= " ( pb.cod_banco IS NOT NULL AND pb.cod_entidade IN ( ".$request->get('inCodEntidade').") AND ( pc.cod_estrutural LIKE '1.1.1.%' @@ -151,7 +151,7 @@ switch ( $request->get('stCtrl') ) { $stFiltro .= "\n pa.cod_plano is not null AND "; $stFiltro .= "\n pa.cod_plano = ".$_GET[$_GET['stNomCampoCod']]." AND "; $stFiltro .= "\n pc.exercicio = '".Sessao::getExercicio()."' AND "; - if ( SistemaLegado::is_tcems() ) { + if ( Sessao::getExercicio() > '2012' ) { $stFiltro .= "( pb.cod_banco IS NOT NULL AND pb.cod_entidade IN ( ".$request->get('inCodEntidade').") AND ( pc.cod_estrutural LIKE '1.1.1.%' @@ -190,7 +190,7 @@ switch ( $request->get('stCtrl') ) { $stFiltro .= "\n pa.cod_plano is not null AND "; $stFiltro .= "\n pa.cod_plano = ".$_GET[$_GET['stNomCampoCod']]." AND "; $stFiltro .= "\n pc.exercicio = '".Sessao::getExercicio()."' AND "; - if ( SistemaLegado::is_tcems() ) { + if ( Sessao::getExercicio() > '2012' ) { $stFiltro .= " ( pb.cod_banco IS NOT NULL AND pb.cod_entidade IN ( ".$request->get('inCodEntidade').") AND ( pc.cod_estrutural LIKE '1.1.1.%' @@ -228,7 +228,7 @@ switch ( $request->get('stCtrl') ) { $stFiltro .= "\n pa.cod_plano is not null AND "; $stFiltro .= "\n pa.cod_plano = ".$_GET[$_GET['stNomCampoCod']]." AND "; $stFiltro .= "\n pc.exercicio = '".Sessao::getExercicio()."' AND "; - if ( SistemaLegado::is_tcems($boTransacao) ) { + if ( Sessao::getExercicio() > '2012' ) { $stFiltro .= " ( pb.cod_banco IS NOT NULL AND pb.cod_entidade IN ( ".$request->get('inCodEntidade').") AND ( pc.cod_estrutural LIKE '1.1.1.%' @@ -267,7 +267,7 @@ switch ( $request->get('stCtrl') ) { $stFiltro .= "\n pa.cod_plano is not null AND "; $stFiltro .= "\n pa.cod_plano = ".$_GET[$_GET['stNomCampoCod']]." AND "; $stFiltro .= "\n pc.exercicio = '".Sessao::getExercicio()."' AND "; - if ( SistemaLegado::is_tcems($boTransacao) ) { + if ( Sessao::getExercicio() > '2012' ) { $stFiltro .= " ( pb.cod_banco IS NOT NULL AND pb.cod_entidade IN ( ".$request->get('inCodEntidade').") AND ( pc.cod_estrutural like '1.1.1.%' @@ -305,7 +305,7 @@ switch ( $request->get('stCtrl') ) { $stFiltro .= "\n pa.cod_plano is not null AND "; $stFiltro .= "\n pa.cod_plano = ".$_GET[$_GET['stNomCampoCod']]." AND "; $stFiltro .= "\n pc.exercicio = '".Sessao::getExercicio()."' AND "; - if ( SistemaLegado::is_tcems() ) { + if ( Sessao::getExercicio() > '2012' ) { $stFiltro .= "\n ( pc.cod_estrutural like '1.1.2.%' OR pc.cod_estrutural like '1.1.3.%' OR pc.cod_estrutural like '1.1.4.9.%' @@ -342,7 +342,7 @@ switch ( $request->get('stCtrl') ) { $stFiltro .= "\n pa.cod_plano = ".$_GET[$_GET['stNomCampoCod']]." AND "; $stFiltro .= "\n pc.exercicio = '".Sessao::getExercicio()."' AND "; - if (SistemaLegado::is_tcems()) { + if (Sessao::getExercicio() > '2012') { $stFiltro .= "\n pc.cod_estrutural like '7.1.1.1.%' AND "; } else { $stFiltro .= "\n pc.cod_estrutural like '1.9.9.1%' AND "; @@ -369,7 +369,7 @@ switch ( $request->get('stCtrl') ) { $stFiltro .= "\n pa.cod_plano is not null AND "; $stFiltro .= "\n pa.cod_plano = ".$_GET[$_GET['stNomCampoCod']]." AND "; $stFiltro .= "\n pc.exercicio = '".Sessao::getExercicio()."' AND "; - if ( SistemaLegado::is_tcems($boTransacao) ) { + if ( Sessao::getExercicio() > '2012' ) { $stFiltro .= "\n( pb.cod_banco is not null AND "; $stFiltro .= "\n pb.cod_entidade in ( ".$_REQUEST['inCodEntidade'].") AND "; $stFiltro .= "\n ( pc.cod_estrutural like '1.1.1.%' OR "; @@ -409,7 +409,7 @@ switch ( $request->get('stCtrl') ) { $stFiltro .= "\n pa.cod_plano is not null AND "; $stFiltro .= "\n pa.cod_plano = ".$_GET[$_GET['stNomCampoCod']]." AND "; $stFiltro .= "\n pc.exercicio = '".Sessao::getExercicio()."' AND "; - if ( SistemaLegado::is_tcems($boTransacao) ) { + if ( Sessao::getExercicio() > '2012' ) { $stFiltro .= "\n( pb.cod_banco is not null AND "; $stFiltro .= "\n pb.cod_entidade in ( ".$_REQUEST['inCodEntidade'].") AND "; $stFiltro .= "\n ( pc.cod_estrutural like '1.1.1.%' OR "; @@ -449,7 +449,7 @@ switch ( $request->get('stCtrl') ) { $stFiltro .= "\n pa.cod_plano is not null AND "; $stFiltro .= "\n pa.cod_plano = ".$_GET[$_GET['stNomCampoCod']]." AND "; $stFiltro .= "\n pc.exercicio = '".Sessao::getExercicio()."' AND "; - if ( SistemaLegado::is_tcems() ) { + if ( Sessao::getExercicio() > '2012' ) { $stFiltro .= "\n ( pc.cod_estrutural like '1.1.2.%' OR pc.cod_estrutural like '1.1.3.%' OR pc.cod_estrutural like '1.1.4.9.%' @@ -511,7 +511,7 @@ switch ( $request->get('stCtrl') ) { $stFiltro .= "\n pa.cod_plano is not null AND "; $stFiltro .= "\n pa.cod_plano = ".$_GET[$_GET['stNomCampoCod']]." AND "; $stFiltro .= "\n pc.exercicio = '".Sessao::getExercicio()."' AND "; - if ( SistemaLegado::is_tcems() ) { + if ( Sessao::getExercicio() > '2012' ) { $stFiltro .= "\n( pb.cod_banco is not null AND "; $stFiltro .= "\n pb.cod_entidade in ( ".$stCodEntidades.") AND "; $stFiltro .= "\n ( pc.cod_estrutural like '1.1.1.%' OR "; @@ -627,7 +627,7 @@ switch ( $request->get('stCtrl') ) { $stFiltro .= "\n pa.cod_plano = ".$_GET[$_GET['stNomCampoCod']]." AND "; $stFiltro .= "\n pc.exercicio = '". $inExercicio ."' AND "; - if (SistemaLegado::is_tcems()) { + if (Sessao::getExercicio() > '2012') { $stFiltro .= "\n pc.cod_estrutural like '8.1.1.1.%' AND "; } else { $stFiltro .= "\n pc.cod_estrutural like '2.9.9.1.%' AND "; @@ -655,7 +655,7 @@ switch ( $request->get('stCtrl') ) { $stFiltro .= "\n pa.cod_plano is not null AND "; $stFiltro .= "\n pa.cod_plano = ".$_GET[$_GET['stNomCampoCod']]." AND "; $stFiltro .= "\n pc.exercicio = '".Sessao::getExercicio()."' AND "; - if ( SistemaLegado::is_tcems() ) { + if ( Sessao::getExercicio() > '2012' ) { $stFiltro .= "\n ( pc.cod_estrutural like '1.1.2.%' OR "; $stFiltro .= "\n pc.cod_estrutural like '1.1.3.%' OR "; $stFiltro .= "\n pc.cod_estrutural like '1.2.1.%' OR "; diff --git a/gestaoFinanceira/fontes/PHP/contabilidade/instancias/processamento/OCEstruturalPlano.php b/gestaoFinanceira/fontes/PHP/contabilidade/instancias/processamento/OCEstruturalPlano.php index 06cfbfa..d719d23 100755 --- a/gestaoFinanceira/fontes/PHP/contabilidade/instancias/processamento/OCEstruturalPlano.php +++ b/gestaoFinanceira/fontes/PHP/contabilidade/instancias/processamento/OCEstruturalPlano.php @@ -30,29 +30,58 @@ * @author Analista: Cassiano * @author Desenvolvedor: Cassiano -* $Id: OCEstruturalPlano.php 62511 2015-05-15 17:45:15Z evandro $ +* $Id: OCEstruturalPlano.php 63906 2015-11-05 12:31:01Z franver $ Casos de uso: uc-02.02.02 */ - -include_once '../../../../../../gestaoAdministrativa/fontes/PHP/pacotes/FrameworkHTML.inc.php'; -include_once '../../../../../../gestaoAdministrativa/fontes/PHP/framework/include/valida.inc.php'; -include_once( CAM_GF_CONT_NEGOCIO."RContabilidadePlanoContaAnalitica.class.php"); +require_once '../../../../../../gestaoAdministrativa/fontes/PHP/pacotes/FrameworkHTML.inc.php'; +require_once '../../../../../../gestaoAdministrativa/fontes/PHP/framework/include/valida.inc.php'; +require_once CAM_GF_CONT_NEGOCIO.'RContabilidadePlanoContaAnalitica.class.php'; +require_once CAM_GF_CONT_MAPEAMENTO.'TContabilidadePlanoConta.class.php'; function buscaPopup() { - if ($_GET[$_GET['stNomCampoCod']]) { + $stErro = ''; + + if( $_REQUEST['stEscrituracao'] == 'sintetica' ) { + $rsConta = new RecordSet(); + $stCondicao = " AND plano_conta.escrituracao = '".$_REQUEST['stEscrituracao']."' \n"; + + $obTContabilidadePlanoConta = new TContabilidadePlanoConta(); + $obTContabilidadePlanoConta->setDado('exercicio',Sessao::getExercicio()); + $obTContabilidadePlanoConta->setDado('cod_estrutural',$_REQUEST['stCodEstrutural']); + $obTContabilidadePlanoConta->recuperaContaSintetica($rsConta, $stCondicao, $stOrdem, $boTransacao); + + $stDescricao = $rsConta->getCampo('nom_conta'); + + if(trim($stDescricao) == '') { + $stErro = "Conta (".$_REQUEST['stCodEstrutural'].") não foi encontrada, ou não é do tipo Sintética."; + } - isset($_REQUEST['stExercicio']) ? $stExercicio = $_REQUEST['stExercicio'] : Sessao::getExercicio(); + } else { + if ($_GET[$_GET['stNomCampoCod']]) { + + $stExercicio = isset($_REQUEST['stExercicio']) ? $_REQUEST['stExercicio'] : Sessao::getExercicio(); + + $obRContabilidadePlanoContaAnalitica = new RContabilidadePlanoContaAnalitica; + $obRContabilidadePlanoContaAnalitica->setCodEstrutural( $_GET[$_GET['stNomCampoCod']] ); + $obRContabilidadePlanoContaAnalitica->setExercicio( $stExercicio ); + $obErro = $obRContabilidadePlanoContaAnalitica->consultar(); + + $stDescricao = $obRContabilidadePlanoContaAnalitica->getNomConta(); - $obRContabilidadePlanoContaAnalitica = new RContabilidadePlanoContaAnalitica; - $obRContabilidadePlanoContaAnalitica->setCodEstrutural( $_GET[$_GET['stNomCampoCod']] ); - $obRContabilidadePlanoContaAnalitica->setExercicio( $stExercicio ); - $obRContabilidadePlanoContaAnalitica->consultar(); - $stDescricao = $obRContabilidadePlanoContaAnalitica->getNomConta(); + if(trim($stDescricao) == '') { + $stErro = "Conta (".$_REQUEST['stCodEstrutural'].") não foi encontrada."; + } + } } - $stJs .= "retornaValorBscInner( '".$_GET['stNomCampoCod']."', '".$_GET['stIdCampoDesc']."', 'frm', '".$stDescricao."')"; - + + if(trim($stErro) != '') { + $stJs .= " alertaAviso('".$stErro."','form','aviso','".Sessao::getId()."'); \n"; + } + $stJs .= "retornaValorBscInner( '".$_GET['stNomCampoCod']."', '".$_GET['stIdCampoDesc']."', 'frm', '".$stDescricao."');"; + + return $stJs; } switch ($_GET['stCtrl']) { diff --git a/gestaoFinanceira/fontes/PHP/contabilidade/instancias/relatorio/FLBalanceteVerificacao.php b/gestaoFinanceira/fontes/PHP/contabilidade/instancias/relatorio/FLBalanceteVerificacao.php index 63a9018..3035c24 100755 --- a/gestaoFinanceira/fontes/PHP/contabilidade/instancias/relatorio/FLBalanceteVerificacao.php +++ b/gestaoFinanceira/fontes/PHP/contabilidade/instancias/relatorio/FLBalanceteVerificacao.php @@ -32,7 +32,7 @@ * @ignore - * $Id: FLBalanceteVerificacao.php 59612 2014-09-02 12:00:51Z gelson $ + * $Id: FLBalanceteVerificacao.php 64153 2015-12-09 19:16:02Z evandro $ * Casos de uso: uc-02.02.22 */ @@ -82,7 +82,7 @@ $obHdnValidacao = new HiddenEval; $obHdnValidacao->setName("boValidacao"); $obHdnValidacao->setValue( " " ); //Preenchido a partir do JS -if ( SistemaLegado::is_tcems() ) { +if ( Sessao::getExercicio() > '2012' ) { $stEval = " if ( !document.getElementById('stEstiloContaAnalitica').checked && !document.getElementById('stEstiloContaSintetica').checked ) { erro = true; @@ -118,7 +118,7 @@ $obHdnEval = new HiddenEval; $obHdnEval->setName ( "stEval" ); $obHdnEval->setValue ( $stEval ); -if ( !SistemaLegado::is_tcems() ) { +if ( !Sessao::getExercicio() > '2012' ) { while (!$rsGrupos->EOF()) { if($rsGrupos->getCampo('nom_conta') == "(R) DEDUCOES DA RECEITA") $stNomConta = "(R) Deduções da Receita"; @@ -191,7 +191,7 @@ $radioEstruturalNao->setId ( "stEstrutural" ); $radioEstruturalNao->setValue( "N" ); $radioEstruturalNao->setLabel( "Não" ); -if ( SistemaLegado::is_tcems() ) { +if ( Sessao::getExercicio() > '2012' ) { $radioEstruturalSim->setChecked( true ); $radioEstruturalNao->setChecked( false ); } else { @@ -211,7 +211,7 @@ $obFormulario->addHidden( $obHdnEval, true ); $obFormulario->addTitulo( "Dados para Filtro" ); $rsGrupos->setPrimeiroElemento(); -if ( !SistemaLegado::is_tcems() ) { +if ( !Sessao::getExercicio() > '2012' ) { while ( !$rsGrupos->EOF() ) { $objeto = 'obChkGrupo_'.$rsGrupos->getCampo('cod_grupo'); $obFormulario->addComponente( $$objeto ); diff --git a/gestaoFinanceira/fontes/PHP/contabilidade/instancias/relatorio/FLConsistenciaPCASP.php b/gestaoFinanceira/fontes/PHP/contabilidade/instancias/relatorio/FLConsistenciaPCASP.php index e9d40bb..326fcdc 100755 --- a/gestaoFinanceira/fontes/PHP/contabilidade/instancias/relatorio/FLConsistenciaPCASP.php +++ b/gestaoFinanceira/fontes/PHP/contabilidade/instancias/relatorio/FLConsistenciaPCASP.php @@ -73,7 +73,7 @@ $obHdnValidacao = new HiddenEval; $obHdnValidacao->setName("boValidacao"); $obHdnValidacao->setValue( " " ); //Preenchido a partir do JS -if ( SistemaLegado::is_tcems() ) { +if ( Sessao::getExercicio() > '2012' ) { $stEval = " if ( !document.getElementById('stEstiloContaAnalitica').checked && !document.getElementById('stEstiloContaSintetica').checked ) { erro = true; @@ -109,7 +109,7 @@ $obHdnEval = new HiddenEval; $obHdnEval->setName ( "stEval" ); $obHdnEval->setValue ( $stEval ); -if ( !SistemaLegado::is_tcems() ) { +if ( !Sessao::getExercicio() > '2012' ) { while (!$rsGrupos->EOF()) { if($rsGrupos->getCampo('nom_conta') == "(R) DEDUCOES DA RECEITA") $stNomConta = "(R) Deduções da Receita"; @@ -167,7 +167,7 @@ $radioEstruturalNao->setId ( "stEstrutural" ); $radioEstruturalNao->setValue( "N" ); $radioEstruturalNao->setLabel( "Não" ); -if ( SistemaLegado::is_tcems() ) { +if ( Sessao::getExercicio() > '2012' ) { $radioEstruturalSim->setChecked( true ); $radioEstruturalNao->setChecked( false ); } else { @@ -186,7 +186,7 @@ $obFormulario->addHidden( $obHdnEval, true ); $obFormulario->addTitulo( "Dados para Filtro" ); $rsGrupos->setPrimeiroElemento(); -if ( !SistemaLegado::is_tcems() ) { +if ( !Sessao::getExercicio() > '2012' ) { while ( !$rsGrupos->EOF() ) { $objeto = 'obChkGrupo_'.$rsGrupos->getCampo('cod_grupo'); $obFormulario->addComponente( $$objeto ); diff --git a/gestaoFinanceira/fontes/PHP/contabilidade/instancias/relatorio/OCGeraRelatorioBalanceteVerificacao.php b/gestaoFinanceira/fontes/PHP/contabilidade/instancias/relatorio/OCGeraRelatorioBalanceteVerificacao.php index 693d21d..0750c2d 100755 --- a/gestaoFinanceira/fontes/PHP/contabilidade/instancias/relatorio/OCGeraRelatorioBalanceteVerificacao.php +++ b/gestaoFinanceira/fontes/PHP/contabilidade/instancias/relatorio/OCGeraRelatorioBalanceteVerificacao.php @@ -32,7 +32,7 @@ * @ignore - * $Id: OCGeraRelatorioBalanceteVerificacao.php 59612 2014-09-02 12:00:51Z gelson $ + * $Id: OCGeraRelatorioBalanceteVerificacao.php 64153 2015-12-09 19:16:02Z evandro $ * Casos de uso: uc-02.02.22 */ @@ -102,7 +102,7 @@ if ($arFiltro['stEstrutural'] == 'S') { $obPDF->setAlinhamento ('C'); -if ( SistemaLegado::is_tcems() ) { +if ( Sessao::getExercicio() > '2012' ) { $obPDF->addCabecalho ('N.C.' , 4 , 10); } else { $obPDF->addCabecalho ('S.C.' , 4 , 10); diff --git a/gestaoFinanceira/fontes/PHP/contabilidade/popups/planoConta/LSPlanoConta.php b/gestaoFinanceira/fontes/PHP/contabilidade/popups/planoConta/LSPlanoConta.php index e7b947f..935cac9 100755 --- a/gestaoFinanceira/fontes/PHP/contabilidade/popups/planoConta/LSPlanoConta.php +++ b/gestaoFinanceira/fontes/PHP/contabilidade/popups/planoConta/LSPlanoConta.php @@ -32,7 +32,7 @@ * @ignore - * $Id: LSPlanoConta.php 63747 2015-10-05 17:04:20Z franver $ + * $Id: LSPlanoConta.php 64153 2015-12-09 19:16:02Z evandro $ * Casos de uso: uc-02.02.02,uc-02.04.09,uc-02.04.28,uc-02.02.31,uc-02.03.28 */ @@ -174,7 +174,7 @@ if ($_REQUEST['tipoBusca'] == "banco" || $_REQUEST['tipoBusca'] == "codigoReduzi ) AND "; } } - if ( SistemaLegado::is_tcems() ) { + if ( Sessao::getExercicio() > '2012' ) { $stFiltro2 .= ' ( pc.cod_estrutural like \'1.1.2.%\' OR pc.cod_estrutural like \'1.1.3.%\' OR pc.cod_estrutural like \'1.2.1.%\' OR @@ -182,7 +182,9 @@ if ($_REQUEST['tipoBusca'] == "banco" || $_REQUEST['tipoBusca'] == "codigoReduzi pc.cod_estrutural like \'2.1.2.%\' OR pc.cod_estrutural like \'2.1.9.%\' OR pc.cod_estrutural like \'2.2.1.%\' OR - pc.cod_estrutural like \'2.2.2.%\' ) AND '; + pc.cod_estrutural like \'2.2.2.%\' OR + pc.cod_estrutural like \'3.5.%\' OR + pc.cod_estrutural like \'4.5.%\' ) AND '; } $obRegra->listarContaAnaliticaFiltro( $rsLista, $stFiltro2 ); } elseif ($_REQUEST['tipoBusca'] == "somente_contas_analiticas") { @@ -193,7 +195,7 @@ if ($_REQUEST['tipoBusca'] == "banco" || $_REQUEST['tipoBusca'] == "codigoReduzi $obRegra->listarContaAnaliticaFiltro( $rsLista, $stFiltro2 ); } elseif ($_REQUEST['tipoBusca'] == 'estrutural') { - if ( SistemaLegado::is_tcems() ) { + if ( Sessao::getExercicio() > '2012' ) { $stFiltro2 .= ' pc.cod_estrutural like \'1.1.1.%\' AND '; } $obRegra->listarContaAnaliticaFiltro( $rsLista, $stFiltro2 ); @@ -228,7 +230,7 @@ if ($_REQUEST['tipoBusca']) { if( $_REQUEST['stDescricao'] ) $stFiltro .= "\n lower(pc.nom_conta) like lower('%".$_REQUEST['stDescricao']."%') AND "; if ($_REQUEST['inCodEntidade']) { - if ( SistemaLegado::is_tcems() ) { + if ( Sessao::getExercicio() > '2012' ) { $stFiltro .= "( pb.cod_banco is not null AND "; $stFiltro .= " pb.cod_entidade in ( ".$_REQUEST['inCodEntidade'].") AND "; $stFiltro .= "( pc.cod_estrutural like '1.1.1.%' OR pc.cod_estrutural like '1.2.2.3%' )) AND "; @@ -255,7 +257,7 @@ if ($_REQUEST['tipoBusca']) { if( $_REQUEST['stDescricao'] ) $stFiltro .= "\n lower(pc.nom_conta) like lower('%".$_REQUEST['stDescricao']."%') AND "; if ($_REQUEST['inCodEntidade']) { - if ( SistemaLegado::is_tcems() ) { + if ( Sessao::getExercicio() > '2012' ) { $stFiltro .= "( pb.cod_banco is not null AND "; $stFiltro .= " pb.cod_entidade in ( ".$_REQUEST['inCodEntidade'].") AND "; $stFiltro .= "( pc.cod_estrutural like '1.1.1.%' @@ -282,7 +284,7 @@ if ($_REQUEST['tipoBusca']) { if( $_REQUEST['stDescricao'] ) $stFiltro .= "\n lower(pc.nom_conta) like lower('%".$_REQUEST['stDescricao']."%') AND "; if ($_REQUEST['inCodEntidade']) { - if ( SistemaLegado::is_tcems() ) { + if ( Sessao::getExercicio() > '2012' ) { $stFiltro .= "( pb.cod_banco is not null AND "; $stFiltro .= " pb.cod_entidade in ( ".$_REQUEST['inCodEntidade'].") AND "; $stFiltro .= "( pc.cod_estrutural like '1.1.1.%' @@ -310,7 +312,7 @@ if ($_REQUEST['tipoBusca']) { if( $_REQUEST['stDescricao'] ) $stFiltro .= "\n lower(pc.nom_conta) like lower('%".$_REQUEST['stDescricao']."%') AND "; if ($_REQUEST['inCodEntidade']) { - if ( SistemaLegado::is_tcems() ) { + if ( Sessao::getExercicio() > '2012' ) { $stFiltro .= "( pb.cod_banco is not null AND "; $stFiltro .= " pb.cod_entidade in ( ".$_REQUEST['inCodEntidade'].") AND "; $stFiltro .= "( pc.cod_estrutural like '1.1.1.%' @@ -338,7 +340,7 @@ if ($_REQUEST['tipoBusca']) { if( $_REQUEST['stDescricao'] ) $stFiltro .= "\n lower(pc.nom_conta) like lower('%".$_REQUEST['stDescricao']."%') AND "; if ($_REQUEST['inCodEntidade']) { - if ( SistemaLegado::is_tcems() ) { + if ( Sessao::getExercicio() > '2012' ) { $stFiltro .= "( pb.cod_banco is not null AND "; $stFiltro .= " pb.cod_entidade in ( ".$_REQUEST['inCodEntidade'].") AND "; $stFiltro .= "( pc.cod_estrutural like '1.1.1.%' @@ -364,7 +366,7 @@ if ($_REQUEST['tipoBusca']) { if( $_REQUEST['stDescricao'] ) $stFiltro .= "\n lower(pc.nom_conta) like lower('%".$_REQUEST['stDescricao']."%') AND "; if ($_REQUEST['inCodEntidade']) { - if ( SistemaLegado::is_tcems() ) { + if ( Sessao::getExercicio() > '2012' ) { $stFiltro .= "\n( pb.cod_banco is not null AND "; $stFiltro .= "\n pb.cod_entidade in ( ".$_REQUEST['inCodEntidade'].") AND "; $stFiltro .= "\n( pc.cod_estrutural like '1.1.1.%' @@ -385,7 +387,7 @@ if ($_REQUEST['tipoBusca']) { case 'tes_pagamento_extra_despesa': $stFiltro .= "\n pa.cod_plano is not null AND "; $stFiltro .= "\n pc.exercicio = '" . Sessao::getExercicio() . "' AND "; - if ( SistemaLegado::is_tcems() ) { + if ( Sessao::getExercicio() > '2012' ) { $stFiltro .= "\n ( pc.cod_estrutural like '1.1.2.%' OR pc.cod_estrutural like '1.1.3.%' OR pc.cod_estrutural like '1.1.4.9%' @@ -414,7 +416,7 @@ if ($_REQUEST['tipoBusca']) { $stFiltro .= "\n pa.cod_plano is not null AND "; $stFiltro .= "\n pc.exercicio = '" . Sessao::getExercicio() . "' AND "; - if (SistemaLegado::is_tcems()) { + if (Sessao::getExercicio() > '2012') { $stFiltro .= "\n pc.cod_estrutural like '7.1.1.1.%' AND "; } else { $stFiltro .= "\n pc.cod_estrutural like '1.9.9.1%' AND "; @@ -435,7 +437,7 @@ if ($_REQUEST['tipoBusca']) { if( $_REQUEST['stDescricao'] ) $stFiltro .= "\n lower(pc.nom_conta) like lower('%".$_REQUEST['stDescricao']."%') AND "; if ($_REQUEST['inCodEntidade']) { - if ( SistemaLegado::is_tcems() ) { + if ( Sessao::getExercicio() > '2012' ) { $stFiltro .= "\n( pb.cod_banco is not null AND "; $stFiltro .= "\n pb.cod_entidade in ( ".$_REQUEST['inCodEntidade'].") AND "; $stFiltro .= "\n ( pc.cod_estrutural like '1.1.1.%' OR "; @@ -464,7 +466,7 @@ if ($_REQUEST['tipoBusca']) { if( $_REQUEST['stDescricao'] ) $stFiltro .= "\n lower(pc.nom_conta) like lower('%".$_REQUEST['stDescricao']."%') AND "; if ($_REQUEST['inCodEntidade']) { - if ( SistemaLegado::is_tcems() ) { + if ( Sessao::getExercicio() > '2012' ) { $stFiltro .= "\n( pb.cod_banco is not null AND "; $stFiltro .= "\n pb.cod_entidade in ( ".$_REQUEST['inCodEntidade'].") AND "; $stFiltro .= "\n ( pc.cod_estrutural like '1.1.1.%' OR "; @@ -486,7 +488,7 @@ if ($_REQUEST['tipoBusca']) { $stFiltro .= "\n pc.cod_estrutural like publico.fn_mascarareduzida('".$_REQUEST['stCodEstrutural']."')||'%' AND "; if( $_REQUEST['stDescricao'] ) $stFiltro .= "\n lower(pc.nom_conta) like lower('%".$_REQUEST['stDescricao']."%') AND "; - if ( SistemaLegado::is_tcems() ) { + if ( Sessao::getExercicio() > '2012' ) { $stFiltro .= "\n pb.cod_banco is not null AND "; $stFiltro .= "\n ( pc.cod_estrutural like '1.1.1.%' OR "; $stFiltro .= "\n pc.cod_estrutural like '1.1.4.%' ) AND "; @@ -507,7 +509,7 @@ if ($_REQUEST['tipoBusca']) { case 'tes_arrecadacao_extra_receita': $stFiltro .= "\n pa.cod_plano is not null AND "; $stFiltro .= "\n pc.exercicio = '" . Sessao::getExercicio() . "' AND "; - if ( SistemaLegado::is_tcems() ) { + if ( Sessao::getExercicio() > '2012' ) { $stFiltro .= "\n ( pc.cod_estrutural like '1.1.2.%' OR pc.cod_estrutural like '1.1.3.%' OR pc.cod_estrutural like '1.1.4.9.%' @@ -552,7 +554,7 @@ if ($_REQUEST['tipoBusca']) { if( $_REQUEST['stDescricao'] ) $stFiltro .= "\n lower(pc.nom_conta) like lower('%".$_REQUEST['stDescricao']."%') AND "; if ($_REQUEST['inCodEntidade']) { - if ( SistemaLegado::is_tcems() ) { + if ( Sessao::getExercicio() > '2012' ) { $stFiltro .= "\n( pb.cod_banco is not null AND "; $stFiltro .= "\n pb.cod_entidade in ( ".$_REQUEST['inCodEntidade'].") AND "; $stFiltro .= "\n ( pc.cod_estrutural like '1.1.1.%' OR "; @@ -622,7 +624,7 @@ if ($_REQUEST['tipoBusca']) { if( $_REQUEST['stDescricao'] ) $stFiltro .= "\n lower(pc.nom_conta) like lower('%".$_REQUEST['stDescricao']."%') AND "; - if (SistemaLegado::is_tcems()) { + if (Sessao::getExercicio() > '2012') { $stFiltro .= "\n pc.cod_estrutural like '8.1.1.1.%' AND "; } else { $stFiltro .= "\n pc.cod_estrutural like '2.9.9.1.%' AND "; @@ -640,7 +642,7 @@ if ($_REQUEST['tipoBusca']) { if( $_REQUEST['stDescricao'] ) $stFiltro .= "\n lower(pc.nom_conta) like lower('%".$_REQUEST['stDescricao']."%') AND "; - if ( SistemaLegado::is_tcems() ) { + if ( Sessao::getExercicio() > '2012' ) { $stFiltro .= "\n ( pc.cod_estrutural like '1.1.2.%' OR "; $stFiltro .= "\n pc.cod_estrutural like '1.1.3.%' OR "; $stFiltro .= "\n pc.cod_estrutural like '1.2.1.%' OR "; @@ -749,7 +751,7 @@ if ($_REQUEST['tipoBusca']) { break; case 'banco': - if ( SistemaLegado::is_tcems() ) { + if ( Sessao::getExercicio() > '2012' ) { $stFiltro .= "\n pb.cod_banco is not null AND "; $stFiltro .= "\n pc.cod_estrutural LIKE '1.1.1.%' AND "; $stFiltro .= "\n pc.exercicio = '".Sessao::getExercicio()."' AND "; @@ -783,6 +785,20 @@ if ($_REQUEST['tipoBusca']) { $obRegra->setCodEstrutural($inCodEstrutural); $obRegra->listarContaAnaliticaAtivoPermanente ($rsLista,""); break; + + case 'sintetica': + require_once CAM_GF_CONT_MAPEAMENTO.'TContabilidadePlanoConta.class.php'; + + $stCondicao = " AND plano_conta.escrituracao = '".$_REQUEST['tipoBusca']."' \n"; + $stOrdem = " ORDER BY plano_conta.cod_estrutural ASC \n"; + + $obTContabilidadePlanoConta = new TContabilidadePlanoConta(); + $obTContabilidadePlanoConta->setDado('exercicio' , Sessao::getExercicio() ); + $obTContabilidadePlanoConta->setDado('cod_estrutural', $_REQUEST['stCodEstrutural']); + + $obTContabilidadePlanoConta->recuperaContaSintetica($rsLista, $stCondicao, $stOrdem, $boTransacao); + + break; } if ($stFiltro) { @@ -841,7 +857,9 @@ $obLista->ultimaAcao->setLink( "JavaScript:insere();" ); if ($_REQUEST['tipoBusca'] == 'estrutural') { $obLista->ultimaAcao->addCampo("1","cod_estrutural"); -} else { +} else if ($_REQUEST['tipoBusca'] == 'sintetica') { + $obLista->ultimaAcao->addCampo("1","cod_estrutural"); +}else { $obLista->ultimaAcao->addCampo("1","cod_plano"); } $obLista->ultimaAcao->addCampo("2",""); diff --git a/gestaoFinanceira/fontes/PHP/contabilidade/popups/planoConta/OCPlanoConta.php b/gestaoFinanceira/fontes/PHP/contabilidade/popups/planoConta/OCPlanoConta.php index e21d19c..456a62b 100755 --- a/gestaoFinanceira/fontes/PHP/contabilidade/popups/planoConta/OCPlanoConta.php +++ b/gestaoFinanceira/fontes/PHP/contabilidade/popups/planoConta/OCPlanoConta.php @@ -99,7 +99,7 @@ switch ($_GET['stCtrl']) { $stFiltro = "\n pa.cod_plano is not null AND "; $stFiltro .= "\n pc.exercicio = '" . Sessao::getExercicio() . "' AND "; $stFiltro .= "\n(( pb.cod_banco is not null AND "; - if ( SistemaLegado::is_tcems() ) { + if ( Sessao::getExercicio() > '2012' ) { $stFiltro .= "\n ( pc.cod_estrutural like '1.1.1.%' "; $stFiltro .= "\n OR pc.cod_estrutural like '1.1.4.%' )) "; $stFiltro .= "\n ) AND "; @@ -134,7 +134,7 @@ switch ($_GET['stCtrl']) { $stFiltro = "\n pa.cod_plano is not null AND "; $stFiltro .= "\n pc.exercicio = '" . Sessao::getExercicio() . "' AND "; $stFiltro .= "\n(( pb.cod_banco is not null AND "; - if ( SistemaLegado::is_tcems() ) { + if ( Sessao::getExercicio() > '2012' ) { $stFiltro .= "\n ( pc.cod_estrutural like '1.1.1.%' "; $stFiltro .= "\n OR pc.cod_estrutural like '1.1.4.%' )) "; $stFiltro .= "\n ) AND "; diff --git a/gestaoFinanceira/fontes/PHP/empenho/classes/mapeamento/FEmpenhoEmpenhoEmissao.class.php b/gestaoFinanceira/fontes/PHP/empenho/classes/mapeamento/FEmpenhoEmpenhoEmissao.class.php index a52d2a0..c23fa97 100755 --- a/gestaoFinanceira/fontes/PHP/empenho/classes/mapeamento/FEmpenhoEmpenhoEmissao.class.php +++ b/gestaoFinanceira/fontes/PHP/empenho/classes/mapeamento/FEmpenhoEmpenhoEmissao.class.php @@ -114,7 +114,6 @@ function executaFuncao(&$rsRecordSet, $boTransacao = "") if ( !$this->getDado("cod_lote") ) { $stSql = $this->montaInsereLote(); $this->setDebug( $stSql ); - sistemalegado::mostravar($stSql); $obErro = $obConexao->executaSQL( $rsRecordSetLote, $stSql, $boTransacao ); if ( !$obErro->ocorreu() ) { $this->setDado("cod_lote", $rsRecordSetLote->getCampo("cod_lote")); @@ -124,10 +123,8 @@ function executaFuncao(&$rsRecordSet, $boTransacao = "") if ( !$obErro->ocorreu() ) { $stSql = $this->montaExecutaFuncao(); $this->setDebug( $stSql ); - //sistemalegado::mostravar($stSql);exit; $obErro = $obConexao->executaSQL( $rsRecordSet, $stSql, $boTransacao ); -//sistemalegado::mostravar($rsRecordSet);exit; if ( !$obErro->ocorreu() ) { $this->setDado("sequencia", $rsRecordSet->getCampo("sequencia")); } diff --git a/gestaoFinanceira/fontes/PHP/empenho/classes/mapeamento/FEmpenhoEmpenhoEstornoRestosAPagar.class.php b/gestaoFinanceira/fontes/PHP/empenho/classes/mapeamento/FEmpenhoEmpenhoEstornoRestosAPagar.class.php index f3f3e1b..f5c0649 100755 --- a/gestaoFinanceira/fontes/PHP/empenho/classes/mapeamento/FEmpenhoEmpenhoEstornoRestosAPagar.class.php +++ b/gestaoFinanceira/fontes/PHP/empenho/classes/mapeamento/FEmpenhoEmpenhoEstornoRestosAPagar.class.php @@ -144,7 +144,7 @@ function executaFuncao(&$rsRecordSet, $boTransacao = "") } if ( !$obErro->ocorreu() ) { - if ((SistemaLegado::is_tcems($boTransacao)) && ($this->getDado("exerc_rp") < Sessao::getExercicio())) { + if ((Sessao::getExercicio() > '2012') && ($this->getDado("exerc_rp") < Sessao::getExercicio())) { $stSql = $this->montaExecutaFuncaoTCEMS(); } else { $stSql = $this->montaExecutaFuncao(); diff --git a/gestaoFinanceira/fontes/PHP/empenho/classes/mapeamento/FEmpenhoEmpenhoLiquidacaoRestosAPagar.class.php b/gestaoFinanceira/fontes/PHP/empenho/classes/mapeamento/FEmpenhoEmpenhoLiquidacaoRestosAPagar.class.php index e4b0a05..1000146 100755 --- a/gestaoFinanceira/fontes/PHP/empenho/classes/mapeamento/FEmpenhoEmpenhoLiquidacaoRestosAPagar.class.php +++ b/gestaoFinanceira/fontes/PHP/empenho/classes/mapeamento/FEmpenhoEmpenhoLiquidacaoRestosAPagar.class.php @@ -140,7 +140,7 @@ function executaFuncao(&$rsRecordSet, $boTransacao = "") } } if ( !$obErro->ocorreu() ) { - if (SistemaLegado::is_tcems($boTransacao)) { + if (Sessao::getExercicio() > '2012') { $stSql = $this->montaExecutaFuncaoTCEMS(); } else { $stSql = $this->montaExecutaFuncao(); diff --git a/gestaoFinanceira/fontes/PHP/empenho/classes/mapeamento/FEmpenhoEmpenhoLiquidacaoRestosAPagarAnulacao.class.php b/gestaoFinanceira/fontes/PHP/empenho/classes/mapeamento/FEmpenhoEmpenhoLiquidacaoRestosAPagarAnulacao.class.php index 9b91931..6713847 100755 --- a/gestaoFinanceira/fontes/PHP/empenho/classes/mapeamento/FEmpenhoEmpenhoLiquidacaoRestosAPagarAnulacao.class.php +++ b/gestaoFinanceira/fontes/PHP/empenho/classes/mapeamento/FEmpenhoEmpenhoLiquidacaoRestosAPagarAnulacao.class.php @@ -143,7 +143,7 @@ function executaFuncao(&$rsRecordSet, $boTransacao = "") } } if ( !$obErro->ocorreu() ) { - if (SistemaLegado::is_tcems($boTransacao)) { + if (Sessao::getExercicio() > '2012') { $stSql = $this->montaExecutaFuncaoTCEMS(); } else { $stSql = $this->montaExecutaFuncao(); diff --git a/gestaoFinanceira/fontes/PHP/empenho/classes/mapeamento/FEmpenhoEmpenhoPagamento.class.php b/gestaoFinanceira/fontes/PHP/empenho/classes/mapeamento/FEmpenhoEmpenhoPagamento.class.php index aca965d..7062e20 100755 --- a/gestaoFinanceira/fontes/PHP/empenho/classes/mapeamento/FEmpenhoEmpenhoPagamento.class.php +++ b/gestaoFinanceira/fontes/PHP/empenho/classes/mapeamento/FEmpenhoEmpenhoPagamento.class.php @@ -152,7 +152,7 @@ function executaFuncao(&$rsRecordSet, $boTransacao = "") } } if ( !$obErro->ocorreu() ) { - if (SistemaLegado::is_tcems($boTransacao)) { + if (Sessao::getExercicio() > '2012') { $stSql = $this->montaExecutaFuncaoTCEMS(); } else { $stSql = $this->montaExecutaFuncao(); diff --git a/gestaoFinanceira/fontes/PHP/empenho/classes/mapeamento/FEmpenhoEmpenhoPagamentoAnulacao.class.php b/gestaoFinanceira/fontes/PHP/empenho/classes/mapeamento/FEmpenhoEmpenhoPagamentoAnulacao.class.php index 58a4063..67c45f0 100755 --- a/gestaoFinanceira/fontes/PHP/empenho/classes/mapeamento/FEmpenhoEmpenhoPagamentoAnulacao.class.php +++ b/gestaoFinanceira/fontes/PHP/empenho/classes/mapeamento/FEmpenhoEmpenhoPagamentoAnulacao.class.php @@ -158,7 +158,7 @@ function executaFuncao(&$rsRecordSet, $stCondicao = "" , $stOrdem = "" , $boTran if ( !$obErro->ocorreu() ) { if(trim($stOrdem)) $stOrdem = (strpos($stOrdem,"ORDER BY")===false)?" ORDER BY $stOrdem":$stOrdem; - if (SistemaLegado::is_tcems($boTransacao)) { + if (Sessao::getExercicio() > '2012') { $stSql = $this->montaExecutaFuncaoTCEMS().$stCondicao.$stOrdem; } else { $stSql = $this->montaExecutaFuncao().$stCondicao.$stOrdem; diff --git a/gestaoFinanceira/fontes/PHP/empenho/classes/mapeamento/FEmpenhoEmpenhoPagamentoRestosAPagar.class.php b/gestaoFinanceira/fontes/PHP/empenho/classes/mapeamento/FEmpenhoEmpenhoPagamentoRestosAPagar.class.php index 68d6fd5..ba4e94b 100755 --- a/gestaoFinanceira/fontes/PHP/empenho/classes/mapeamento/FEmpenhoEmpenhoPagamentoRestosAPagar.class.php +++ b/gestaoFinanceira/fontes/PHP/empenho/classes/mapeamento/FEmpenhoEmpenhoPagamentoRestosAPagar.class.php @@ -156,7 +156,7 @@ function executaFuncao(&$rsRecordSet, $stCondicao = "" , $stOrdem = "" , $boTran if ( !$obErro->ocorreu() ) { if(trim($stOrdem)) $stOrdem = (strpos($stOrdem,"ORDER BY")===false)?" ORDER BY $stOrdem":$stOrdem; - if (SistemaLegado::is_tcems($boTransacao)) { + if (Sessao::getExercicio() > '2012') { $stSql = $this->montaExecutaFuncaoTCEMS(); } else { $stSql = $this->montaExecutaFuncao(); diff --git a/gestaoFinanceira/fontes/PHP/empenho/classes/mapeamento/FEmpenhoEmpenhoPagamentoRestosAPagarAnulacao.class.php b/gestaoFinanceira/fontes/PHP/empenho/classes/mapeamento/FEmpenhoEmpenhoPagamentoRestosAPagarAnulacao.class.php index b061d33..589735f 100755 --- a/gestaoFinanceira/fontes/PHP/empenho/classes/mapeamento/FEmpenhoEmpenhoPagamentoRestosAPagarAnulacao.class.php +++ b/gestaoFinanceira/fontes/PHP/empenho/classes/mapeamento/FEmpenhoEmpenhoPagamentoRestosAPagarAnulacao.class.php @@ -150,7 +150,7 @@ function executaFuncao(&$rsRecordSet, $stCondicao = "" , $stOrdem = "" , $boTran if ( !$obErro->ocorreu() ) { if(trim($stOrdem)) $stOrdem = (strpos($stOrdem,"ORDER BY")===false)?" ORDER BY $stOrdem":$stOrdem; - if ( SistemaLegado::is_tcems($boTransacao) ) { + if ( Sessao::getExercicio() > '2012' ) { $stSql = $this->montaExecutaFuncaoTCEMS(); } else { $stSql = $this->montaExecutaFuncao(); diff --git a/gestaoFinanceira/fontes/PHP/empenho/classes/mapeamento/TEmpenhoEmpenhoContrato.class.php b/gestaoFinanceira/fontes/PHP/empenho/classes/mapeamento/TEmpenhoEmpenhoContrato.class.php index 68c4c03..c3e24e6 100755 --- a/gestaoFinanceira/fontes/PHP/empenho/classes/mapeamento/TEmpenhoEmpenhoContrato.class.php +++ b/gestaoFinanceira/fontes/PHP/empenho/classes/mapeamento/TEmpenhoEmpenhoContrato.class.php @@ -33,11 +33,13 @@ * @package URBEM * @subpackage Mapeamento + $Id: TEmpenhoEmpenhoContrato.class.php 64081 2015-11-30 15:36:50Z michel $ + * Casos de uso: uc-02.03.37 */ include_once '../../../../../../gestaoAdministrativa/fontes/PHP/framework/include/valida.inc.php'; -include_once ( CLA_PERSISTENTE ); +include_once CLA_PERSISTENTE; class TEmpenhoEmpenhoContrato extends Persistente { @@ -45,19 +47,18 @@ class TEmpenhoEmpenhoContrato extends Persistente * Método Construtor * @access Private */ -function TEmpenhoEmpenhoContrato() +function __construct() { parent::Persistente(); - $this->setTabela("empenho".Sessao::getEntidade().".empenho_contrato"); + $this->setTabela("empenho.empenho_contrato"); $this->setCampoCod(''); $this->setComplementoChave('exercicio,cod_entidade,cod_empenho'); - $this->AddCampo('exercicio' ,'char' ,true ,'4' ,true,'TLicitacaoContrato'); - $this->AddCampo('cod_entidade','integer',true ,'' ,true,'TLicitacaoContrato'); - $this->AddCampo('cod_empenho' ,'integer',true ,'' ,true,'TEmpenhoEmpenho'); - $this->AddCampo('num_contrato','integer',true ,'' ,false,'TLicitacaoContrato'); - + $this->AddCampo('exercicio' ,'char' ,true ,'4' ,true ,'TLicitacaoContrato' ); + $this->AddCampo('cod_entidade' ,'integer',true ,'' ,true ,'TLicitacaoContrato' ); + $this->AddCampo('cod_empenho' ,'integer',true ,'' ,true ,'TEmpenhoEmpenho' ); + $this->AddCampo('num_contrato' ,'integer',true ,'' ,false,'TLicitacaoContrato' ); } function montaRecuperaTodos() @@ -91,6 +92,7 @@ function recuperaRelacionamentoEmpenhoContrato(&$rsRecordSet, $stFiltro = "") $rsRecordSet = new RecordSet; $stSql = $this->montaRecuperaRelacionamentoEmpenhoContrato().$stFiltro; + $this->stDebug = $stSql; $obErro = $obConexao->executaSQL( $rsRecordSet, $stSql); return $obErro; @@ -145,5 +147,65 @@ function montaRecuperaProximoContrato() return $stSql; } +public function recuperaEmpenhoPorContrato(&$rsRecordSet) { + $obErro = new Erro; + $obConexao = new Conexao; + $rsRecordSet = new RecordSet; + + $stSql = $this->montaRecuperaEmpenhoPorContrato(); + $obErro = $obConexao->executaSQL( $rsRecordSet, $stSql); + + return $obErro; +} + + +public function montaRecuperaEmpenhoPorContrato() { + + $stSql = "SELECT + empenho.cod_empenho + , sw_cgm.numcgm + , sw_cgm.nom_cgm + , TO_CHAR(empenho.dt_empenho, 'dd/mm/yyyy') AS dt_empenho + , SUM(COALESCE(item_pre_empenho.vl_total, 0.00)) AS valor_empenho + , SUM(COALESCE(empenho_anulado_item.vl_anulado, 0.00)) AS valor_anulado + , SUM(COALESCE(item_pre_empenho.vl_total, 0.00)) - SUM(COALESCE(empenho_anulado_item.vl_anulado, 0.00)) AS valor_total + + FROM empenho.empenho_contrato + + INNER JOIN empenho.empenho + ON empenho.cod_entidade = empenho_contrato.cod_entidade + AND empenho.exercicio = empenho_contrato.exercicio + AND empenho.cod_empenho = empenho_contrato.cod_empenho + + INNER JOIN empenho.pre_empenho + ON pre_empenho.exercicio = empenho.exercicio + AND pre_empenho.cod_pre_empenho = empenho.cod_pre_empenho + + INNER JOIN empenho.item_pre_empenho + ON item_pre_empenho.exercicio = empenho.exercicio + AND item_pre_empenho.cod_pre_empenho = empenho.cod_pre_empenho + + LEFT JOIN empenho.empenho_anulado_item + ON empenho_anulado_item.exercicio = item_pre_empenho.exercicio + AND empenho_anulado_item.cod_pre_empenho = item_pre_empenho.cod_pre_empenho + AND empenho_anulado_item.num_item = item_pre_empenho.num_item + + INNER JOIN sw_cgm + ON sw_cgm.numcgm = pre_empenho.cgm_beneficiario + + WHERE empenho_contrato.cod_entidade = ".$this->getDado('cod_entidade')." + AND empenho_contrato.exercicio = '".$this->getDado('exercicio')."' + AND empenho_contrato.num_contrato = ".$this->getDado('num_contrato')." + + GROUP BY empenho.cod_empenho + , sw_cgm.numcgm + , sw_cgm.nom_cgm + , empenho.dt_empenho + + ORDER BY empenho.cod_empenho"; + + return $stSql; +} + + } -?> diff --git a/gestaoFinanceira/fontes/PHP/empenho/classes/mapeamento/TEmpenhoItemPreEmpenho.class.php b/gestaoFinanceira/fontes/PHP/empenho/classes/mapeamento/TEmpenhoItemPreEmpenho.class.php index d3e1822..7ba9c8a 100755 --- a/gestaoFinanceira/fontes/PHP/empenho/classes/mapeamento/TEmpenhoItemPreEmpenho.class.php +++ b/gestaoFinanceira/fontes/PHP/empenho/classes/mapeamento/TEmpenhoItemPreEmpenho.class.php @@ -33,50 +33,40 @@ * @package URBEM * @subpackage Mapeamento - $Revision: 30668 $ - $Name$ - $Autor: $ - $Date: 2006-07-05 17:51:50 -0300 (Qua, 05 Jul 2006) $ + $Id: TEmpenhoItemPreEmpenho.class.php 64005 2015-11-17 16:49:06Z michel $ * Casos de uso: uc-02.03.03 */ -/* -$Log$ -Revision 1.7 2006/07/05 20:46:56 cleisson -Adicionada tag Log aos arquivos - -*/ - include_once '../../../../../../gestaoAdministrativa/fontes/PHP/framework/include/valida.inc.php'; -include_once ( CLA_PERSISTENTE ); +include_once CLA_PERSISTENTE; class TEmpenhoItemPreEmpenho extends Persistente { -/** - * Método Construtor - * @access Private -*/ -function TEmpenhoItemPreEmpenho() -{ - parent::Persistente(); - $this->setTabela('empenho.item_pre_empenho'); + /** + * Método Construtor + * @access Private + */ + function __construct() + { + parent::Persistente(); + $this->setTabela('empenho.item_pre_empenho'); - $this->setCampoCod('num_item'); - $this->setComplementoChave('cod_pre_empenho,exercicio'); + $this->setCampoCod('num_item'); + $this->setComplementoChave('cod_pre_empenho,exercicio'); - $this->AddCampo('cod_pre_empenho','integer',true,'',true,true); - $this->AddCampo('exercicio' ,'char' ,true,'04',true,true); - $this->AddCampo('num_item' ,'integer',true,'',true,false); - $this->AddCampo('cod_unidade' ,'integer',true,'',false,true); - $this->AddCampo('cod_grandeza' ,'integer',true,'',false,true); - $this->AddCampo('quantidade' ,'numeric',true,'14.4',false,false); - $this->AddCampo('nom_unidade' ,'varchar',true,'80',false,false); - $this->AddCampo('sigla_unidade' ,'varchar',true,'20',false,false); - $this->AddCampo('vl_total' ,'numeric',true,'14.2',false,false); - $this->AddCampo('nom_item' ,'varchar',true,'160',false,false); - $this->AddCampo('complemento' ,'text' ,true,'',false,false); - $this->AddCampo('cod_item' ,'integer',false,'',false,true); - -} + $this->AddCampo('cod_pre_empenho', 'integer', true , '' , true , true ); + $this->AddCampo('exercicio' , 'char' , true , '04' , true , true ); + $this->AddCampo('num_item' , 'integer', true , '' , true , false ); + $this->AddCampo('cod_unidade' , 'integer', true , '' , false, true ); + $this->AddCampo('cod_grandeza' , 'integer', true , '' , false, true ); + $this->AddCampo('quantidade' , 'numeric', true , '14.4' , false, false ); + $this->AddCampo('nom_unidade' , 'varchar', true , '80' , false, false ); + $this->AddCampo('sigla_unidade' , 'varchar', true , '20' , false, false ); + $this->AddCampo('vl_total' , 'numeric', true , '14.2' , false, false ); + $this->AddCampo('nom_item' , 'varchar', true , '160' , false, false ); + $this->AddCampo('complemento' , 'text' , true , '' , false, false ); + $this->AddCampo('cod_item' , 'integer', false, '' , false, true ); + $this->AddCampo('cod_centro' , 'integer', false, '' , false, true ); + } } diff --git a/gestaoFinanceira/fontes/PHP/empenho/classes/mapeamento/TEmpenhoItemPreEmpenhoJulgamento.class.php b/gestaoFinanceira/fontes/PHP/empenho/classes/mapeamento/TEmpenhoItemPreEmpenhoJulgamento.class.php index f49a556..63de3b4 100644 --- a/gestaoFinanceira/fontes/PHP/empenho/classes/mapeamento/TEmpenhoItemPreEmpenhoJulgamento.class.php +++ b/gestaoFinanceira/fontes/PHP/empenho/classes/mapeamento/TEmpenhoItemPreEmpenhoJulgamento.class.php @@ -33,37 +33,21 @@ * @package URBEM * @subpackage Mapeamento - $Revision: 30668 $ - $Name$ - $Autor: $ - $Date: 2007-02-15 15:55:02 -0200 (Qui, 15 Fev 2007) $ + $Id: TEmpenhoItemPreEmpenhoJulgamento.class.php 64023 2015-11-19 19:40:11Z carlos.silva $ * Casos de uso: uc-02.03.03, uc-02.03.02, uc-03.05.21 */ -/* -$Log$ -Revision 1.1 2007/02/15 17:55:02 domluc -Mapeamento da Tabela empenho.item_pre_empenho_julgamento - -Revision 1.2 2007/02/14 16:04:59 domluc -Alteração para corresponder ao ER - -Revision 1.1 2007/01/18 19:19:28 domluc -Autorização de Licitação - -*/ - include_once '../../../../../../gestaoAdministrativa/fontes/PHP/framework/include/valida.inc.php'; -include_once ( CLA_PERSISTENTE ); +include_once CLA_PERSISTENTE; class TEmpenhoItemPreEmpenhoJulgamento extends Persistente { /** * Método Construtor * @access Private -*/ - public function TEmpenhoItemPreEmpenhoJulgamento() + */ + public function __construct() { parent::Persistente(); $this->setTabela('empenho.item_pre_empenho_julgamento'); @@ -71,13 +55,123 @@ class TEmpenhoItemPreEmpenhoJulgamento extends Persistente $this->setCampoCod(''); $this->setComplementoChave('cod_pre_empenho,exercicio,num_item'); - $this->AddCampo('cod_pre_empenho','integer',true,'',true,true); - $this->AddCampo('exercicio','char',true,'04',true,true); - $this->AddCampo('num_item','integer',true,'',true,false); - $this->AddCampo('cod_item','integer',true,'',true,false); - $this->AddCampo('cod_cotacao','integer',true,'',false,true); - $this->AddCampo('exercicio_julgamento','char',true,'4',false,true); - $this->AddCampo('lote','integer',true,'',false,true); - $this->AddCampo('cgm_fornecedor','integer',true,'',false,true); + $this->AddCampo('cod_pre_empenho' , 'integer' , true, '' , true , true ); + $this->AddCampo('exercicio' , 'char' , true, '04', true , true ); + $this->AddCampo('num_item' , 'integer' , true, '' , true , false ); + $this->AddCampo('cod_item' , 'integer' , true, '' , true , false ); + $this->AddCampo('cod_cotacao' , 'integer' , true, '' , false , true ); + $this->AddCampo('exercicio_julgamento' , 'char' , true, '4' , false , true ); + $this->AddCampo('lote' , 'integer' , true, '' , false , true ); + $this->AddCampo('cgm_fornecedor' , 'integer' , true, '' , false , true ); + } + + function recuperaCentroCustoMapaItem(&$rsRecordSet, $stFiltro = '') + { + $obErro = new Erro; + $obConexao = new Conexao; + $rsRecordSet = new RecordSet; + + if( $this->getDado('exercicio') != "" ) + $stFiltro .= " AND pre_empenho.exercicio = '".$this->getDado('exercicio')."' \n"; + if( $this->getDado('cod_pre_empenho') != "" ) + $stFiltro .= " AND pre_empenho.cod_pre_empenho = ".$this->getDado('cod_pre_empenho')." \n"; + if( $this->getDado('num_item') != "" ) + $stFiltro .= " AND item_pre_empenho_julgamento.num_item = ".$this->getDado('num_item')." \n"; + + if( $stFiltro ) + $stFiltro = " WHERE ".substr($stFiltro,5,strlen($stFiltro)-4); + + $stOrder = "ORDER BY autorizacao_empenho.exercicio \n"; + $stOrder .= " , autorizacao_empenho.cod_autorizacao \n"; + $stOrder .= " , item_pre_empenho_julgamento.num_item \n"; + + $stSql = $this->montaRecuperaCentroCustoMapaItem().$stFiltro.$stOrder; + $this->stDebug = $stSql; + $obErro = $obConexao->executaSQL( $rsRecordSet, $stSql, "", $boTransacao ); + + return $obErro; + } + + function montaRecuperaCentroCustoMapaItem() + { + $stSql = " SELECT autorizacao_empenho.cod_autorizacao + , autorizacao_empenho.exercicio + , autorizacao_empenho.cod_entidade + , autorizacao_empenho.cod_pre_empenho + , item_pre_empenho_julgamento.cod_cotacao + , item_pre_empenho_julgamento.exercicio_julgamento + , mapa_item.cod_mapa + , mapa_item.exercicio AS exercicio_mapa + , mapa_item.cod_solicitacao + , mapa_item.exercicio_solicitacao + , item_pre_empenho_julgamento.num_item + , item_pre_empenho_julgamento.cod_item + , CASE WHEN item_pre_empenho.cod_centro IS NOT NULL THEN + item_pre_empenho.cod_centro + ELSE + mapa_item.cod_centro + END AS cod_centro + + FROM compras.julgamento + + INNER JOIN compras.julgamento_item + ON julgamento.exercicio = julgamento_item.exercicio + AND julgamento.cod_cotacao = julgamento_item.cod_cotacao + + INNER JOIN empenho.item_pre_empenho_julgamento + ON julgamento_item.exercicio = item_pre_empenho_julgamento.exercicio + AND julgamento_item.cod_cotacao = item_pre_empenho_julgamento.cod_cotacao + AND julgamento_item.cod_item = item_pre_empenho_julgamento.cod_item + AND julgamento_item.lote = item_pre_empenho_julgamento.lote + AND julgamento_item.cgm_fornecedor = item_pre_empenho_julgamento.cgm_fornecedor + + INNER JOIN empenho.item_pre_empenho + ON item_pre_empenho_julgamento.cod_pre_empenho = item_pre_empenho.cod_pre_empenho + AND item_pre_empenho_julgamento.exercicio = item_pre_empenho.exercicio + AND item_pre_empenho_julgamento.num_item = item_pre_empenho.num_item + + INNER JOIN empenho.pre_empenho + ON item_pre_empenho.cod_pre_empenho = pre_empenho.cod_pre_empenho + AND item_pre_empenho.exercicio = pre_empenho.exercicio + + INNER JOIN empenho.autorizacao_empenho + ON pre_empenho.exercicio = autorizacao_empenho.exercicio + AND pre_empenho.cod_pre_empenho = autorizacao_empenho.cod_pre_empenho + + INNER JOIN compras.cotacao_fornecedor_item + ON cotacao_fornecedor_item.exercicio = julgamento_item.exercicio + AND cotacao_fornecedor_item.cod_cotacao = julgamento_item.cod_cotacao + AND cotacao_fornecedor_item.cod_item = julgamento_item.cod_item + AND cotacao_fornecedor_item.cgm_fornecedor = julgamento_item.cgm_fornecedor + AND cotacao_fornecedor_item.lote = julgamento_item.lote + + INNER JOIN compras.cotacao_item + ON cotacao_fornecedor_item.exercicio = cotacao_item.exercicio + AND cotacao_fornecedor_item.cod_cotacao = cotacao_item.cod_cotacao + AND cotacao_fornecedor_item.cod_item = cotacao_item.cod_item + AND cotacao_fornecedor_item.lote = cotacao_item.lote + + INNER JOIN compras.mapa_cotacao + ON cotacao_item.cod_cotacao = mapa_cotacao.cod_cotacao + AND cotacao_item.exercicio = mapa_cotacao .exercicio_cotacao + + INNER JOIN compras.mapa + ON mapa_cotacao.cod_mapa = mapa.cod_mapa + AND mapa_cotacao.exercicio_mapa = mapa.exercicio + + INNER JOIN compras.mapa_item + ON mapa_item.exercicio = mapa.exercicio + AND mapa_item.cod_mapa = mapa.cod_mapa + AND mapa_item.cod_item = cotacao_fornecedor_item.cod_item + AND mapa_item.lote = cotacao_fornecedor_item.lote + + INNER JOIN compras.mapa_solicitacao + ON mapa_solicitacao.exercicio = mapa_item.exercicio + AND mapa_solicitacao.cod_entidade = mapa_item.cod_entidade + AND mapa_solicitacao.cod_solicitacao = mapa_item.cod_solicitacao + AND mapa_solicitacao.cod_mapa = mapa_item.cod_mapa + AND mapa_solicitacao.exercicio_solicitacao = mapa_item.exercicio_solicitacao "; + + return $stSql; } } diff --git a/gestaoFinanceira/fontes/PHP/empenho/classes/mapeamento/TEmpenhoNotaLiquidacao.class.php b/gestaoFinanceira/fontes/PHP/empenho/classes/mapeamento/TEmpenhoNotaLiquidacao.class.php index d648acd..e575ee0 100755 --- a/gestaoFinanceira/fontes/PHP/empenho/classes/mapeamento/TEmpenhoNotaLiquidacao.class.php +++ b/gestaoFinanceira/fontes/PHP/empenho/classes/mapeamento/TEmpenhoNotaLiquidacao.class.php @@ -33,7 +33,7 @@ * @package URBEM * @subpackage Mapeamento - $Id: TEmpenhoNotaLiquidacao.class.php 59612 2014-09-02 12:00:51Z gelson $ + $Id: TEmpenhoNotaLiquidacao.class.php 63889 2015-10-30 16:13:06Z franver $ $Revision: 30668 $ $Name$ @@ -1086,7 +1086,7 @@ function montaRecuperaRelacionamentoPagos() $stSql .= " --Ligação CONTA_CREDITO : PLANO ANALITICA \n"; $stSql .= " AND cc.cod_plano = pa.cod_plano \n"; $stSql .= " AND cc.exercicio = pa.exercicio \n"; - if ($this->getDado('exercicio') > $this->getDado('exercicio_empenho')) { + if ($this->getDado('exercicio') == $this->getDado('exercicio_empenho')) { $stSql .= " AND cc.sequencia = 3 \n"; } else { $stSql .= " AND cc.sequencia = 2 \n"; diff --git a/gestaoFinanceira/fontes/PHP/empenho/classes/mapeamento/TEmpenhoOrdemPagamentoRetencao.class.php b/gestaoFinanceira/fontes/PHP/empenho/classes/mapeamento/TEmpenhoOrdemPagamentoRetencao.class.php index 3eb081e..9537109 100755 --- a/gestaoFinanceira/fontes/PHP/empenho/classes/mapeamento/TEmpenhoOrdemPagamentoRetencao.class.php +++ b/gestaoFinanceira/fontes/PHP/empenho/classes/mapeamento/TEmpenhoOrdemPagamentoRetencao.class.php @@ -197,7 +197,7 @@ function recuperaCodPlanoReceita(&$rsRecordSet, $boTransacao = "") $obErro = new Erro; $obConexao = new Conexao; $rsRecordSet = new RecordSet; - if ( sistemaLegado::is_tcems($boTransacao) ) { + if ( Sessao::getExercicio() > '2012' ) { $stSql = $this->montaRecuperaCodPlanoReceitaTCE().$stOrdem; } else { $stSql = $this->montaRecuperaCodPlanoReceita().$stOrdem; diff --git a/gestaoFinanceira/fontes/PHP/empenho/classes/mapeamento/TEmpenhoPreEmpenho.class.php b/gestaoFinanceira/fontes/PHP/empenho/classes/mapeamento/TEmpenhoPreEmpenho.class.php index 339c6cc..255f31c 100755 --- a/gestaoFinanceira/fontes/PHP/empenho/classes/mapeamento/TEmpenhoPreEmpenho.class.php +++ b/gestaoFinanceira/fontes/PHP/empenho/classes/mapeamento/TEmpenhoPreEmpenho.class.php @@ -44,16 +44,6 @@ include_once '../../../../../../gestaoAdministrativa/fontes/PHP/framework/include/valida.inc.php'; include_once CLA_PERSISTENTE; -/** - * Efetua conexão com a tabela EMPENHO.PRE_EMPENHO - * Data de Criação: 30/11/2004 - - * @author Analista: Jorge B. Ribarr - * @author Desenvolvedor: Eduardo Martins - - * @package URBEM - * @subpackage Mapeamento -*/ class TEmpenhoPreEmpenho extends Persistente { /** @@ -275,7 +265,6 @@ class TEmpenhoPreEmpenho extends Persistente $stSql .= " '".$this->getDado( "exercicio" )."' \n"; $stSql .= " ,".$this->getDado( "cod_despesa" )." \n"; $stSql .= " ) AS saldo_anterior \n"; - return $stSql; } @@ -341,6 +330,86 @@ class TEmpenhoPreEmpenho extends Persistente return $stSql; } + + /** + * @access Public + * @param Object $rsRecordSet Objeto RecordSet + * @param String $stOrdem String de Ordenação do SQL (ORDER BY) + * @param Boolean $boTransacao + * @return Object Objeto Erro + */ + public function recuperaSaldoAnteriorDataEmpenho(&$rsRecordSet, $stOrdem = "" , $boTransacao = "") + { + $obErro = new Erro; + $obConexao = new Conexao; + $rsRecordSet = new RecordSet; + + if(trim($stOrdem)) + $stOrdem = (strpos($stOrdem,"ORDER BY")===false)?" ORDER BY $stOrdem":$stOrdem; + + $stSql = $this->montaRecuperaSaldoAnteriorDataEmpenho(); + $this->setDebug( $stSql ); + $obErro = $obConexao->executaSQL( $rsRecordSet, $stSql, $boTransacao ); + + return $obErro; + } + + /** + * Seta os dados pra fazer o montaRecuperaSaldoAnteriorDataEmpenho + * @access Private + * @return $stSql + */ + public function montaRecuperaSaldoAnteriorDataEmpenho() + { + $stSql = "SELECT empenho.fn_saldo_dotacao_data_empenho ( '".$this->getDado( "exercicio" )."' + , ".$this->getDado( "cod_despesa" )." + ,'".$this->getDado( "dt_empenho" )."' + , ".$this->getDado( "entidade" )." + , '".$this->getDado( "tipo_emissao" )."' + ) AS saldo_anterior "; + + return $stSql; + } + + /** + * @access Public + * @param Object $rsRecordSet Objeto RecordSet + * @param String $stOrdem String de Ordenação do SQL (ORDER BY) + * @param Boolean $boTransacao + * @return Object Objeto Erro + */ + public function recuperaSaldoAnteriorDataAtualEmpenho(&$rsRecordSet, $stOrdem = "" , $boTransacao = "") + { + $obErro = new Erro; + $obConexao = new Conexao; + $rsRecordSet = new RecordSet; + + if(trim($stOrdem)) + $stOrdem = (strpos($stOrdem,"ORDER BY")===false)?" ORDER BY $stOrdem":$stOrdem; + + $stSql = $this->montaRecuperaSaldoAnteriorDataAtualEmpenho(); + $this->setDebug( $stSql ); + $obErro = $obConexao->executaSQL( $rsRecordSet, $stSql, $boTransacao ); + + return $obErro; + } + + /** + * Seta os dados pra fazer o recuperaSaldoAnteriorDataAtualEmpenho + * @access Private + * @return $stSql + */ + public function montaRecuperaSaldoAnteriorDataAtualEmpenho() + { + $stSql = "SELECT empenho.fn_saldo_dotacao_data_atual_empenho ( '".$this->getDado( "exercicio" )."' + , ".$this->getDado( "cod_despesa" )." + , '".Sessao::read('data_reserva_saldo_GF')."' + , '".$this->getDado( "dt_empenho" )."' + , ".$this->getDado( "entidade" )." + , '".$this->getDado( "tipo_emissao" )."' + ) AS saldo_anterior "; + return $stSql; + } /** * Executa um Select no banco de dados a partir do comando SQL montado no método montaRecuperaDadosExportacao. diff --git a/gestaoFinanceira/fontes/PHP/empenho/classes/mapeamento/TEmpenhoResponsavelAdiantamento.class.php b/gestaoFinanceira/fontes/PHP/empenho/classes/mapeamento/TEmpenhoResponsavelAdiantamento.class.php index dd98860..809e588 100644 --- a/gestaoFinanceira/fontes/PHP/empenho/classes/mapeamento/TEmpenhoResponsavelAdiantamento.class.php +++ b/gestaoFinanceira/fontes/PHP/empenho/classes/mapeamento/TEmpenhoResponsavelAdiantamento.class.php @@ -193,7 +193,6 @@ class TEmpenhoResponsavelAdiantamento extends Persistente if(trim($stOrdem)) $stOrdem = (strpos($stOrdem,"ORDER BY")===false)?" ORDER BY $stOrdem":$stOrdem; $stSql = $this->montaConsultaEmpenhosFornecedor().$stCondicao.$stOrdem; -//sistemaLegado::mostravar($stSql); $this->setDebug( $stSql ); $obErro = $obConexao->executaSQL( $rsRecordSet, $stSql, $boTransacao ); diff --git a/gestaoFinanceira/fontes/PHP/empenho/classes/negocio/REmpenhoEmpenho.class.php b/gestaoFinanceira/fontes/PHP/empenho/classes/negocio/REmpenhoEmpenho.class.php index 04b5dfb..90de15f 100755 --- a/gestaoFinanceira/fontes/PHP/empenho/classes/negocio/REmpenhoEmpenho.class.php +++ b/gestaoFinanceira/fontes/PHP/empenho/classes/negocio/REmpenhoEmpenho.class.php @@ -35,7 +35,7 @@ * @package URBEM * @subpackage Regra - $Id: REmpenhoEmpenho.class.php 63657 2015-09-24 21:19:41Z michel $ + $Id: REmpenhoEmpenho.class.php 64153 2015-12-09 19:16:02Z evandro $ * Casos de uso: uc-02.01.23 uc-02.01.08 @@ -764,9 +764,7 @@ function incluir($boTransacao = "") $obTContabilidadeEmpenhamento = new TContabilidadeEmpenhamento; $obTEmpenhoEmpenho = new TEmpenhoEmpenho; - $boTCEMS = SistemaLegado::is_tcems($boTransacao); - - if ($boTCEMS) { + if (Sessao::getExercicio() > '2012') { $obFEmpenhoEmpenhoEmissao = new FEmpenhoEmpenhoEmissaoTCEMS; } else { $obFEmpenhoEmpenhoEmissao = new FEmpenhoEmpenhoEmissao; @@ -824,7 +822,7 @@ function incluir($boTransacao = "") $obFEmpenhoEmpenhoEmissao->setDado( "cod_entidade" , $this->obROrcamentoEntidade->getCodigoEntidade() ); $obFEmpenhoEmpenhoEmissao->setDado( "cod_pre_empenho" , $this->inCodPreEmpenho ); //como fazer para passar o cod_despesa somente para o tcems com exercicio acima de 2012 - if ($boTCEMS) { + if (Sessao::getExercicio() > '2012') { $obFEmpenhoEmpenhoEmissao->setDado( "cod_despesa", $this->obROrcamentoDespesa->getCodDespesa() ); $obFEmpenhoEmpenhoEmissao->setDado( "cod_class_despesa", $this->obROrcamentoClassificacaoDespesa->getMascClassificacao() ); } @@ -974,10 +972,16 @@ function emitirEmpenhoDiverso($boTransacao = "") } if ( !$obErro->ocorreu() ) { - $obErro = $this->consultaSaldoAnterior( $nuSaldoAnterior, '', $boTransacao ); - $nuVlReserva = str_replace( '.','',$this->obROrcamentoReservaSaldos->getVlReserva()); + + $this->setdataEmpenho($this->getDtEmpenho()); + $this->setCodEntidade($this->obROrcamentoEntidade->getCodigoEntidade()); + + $obErro = $this->consultaSaldoAnteriorDataEmpenho( $nuSaldoAnterior, '', $boTransacao ); + + $nuVlReserva = str_replace( '.','',$this->obROrcamentoReservaSaldos->getVlReserva()); $nuVlReserva = str_replace( ',','.',$nuVlReserva ); $this->setVlSaldoAnterior( $nuSaldoAnterior ); + if ( $this->getVlSaldoAnterior() < $nuVlReserva ) { $obErro->setDescricao( "Valor da reserva é superior ao Saldo Anterior" ); } @@ -1037,9 +1041,7 @@ function anular($boTransacao = "") $obErro = $this->obTransacao->abreTransacao( $boFlagTransacao, $boTransacao ); - $boTCEMS = SistemaLegado::is_tcems($boTransacao); - - if ($boTCEMS) { + if (Sessao::getExercicio() > '2012') { $obFEmpenhoEmpenhoEmissaoAnulacao = new FEmpenhoEmpenhoEmissaoAnulacaoTCEMS; } else { $obFEmpenhoEmpenhoEmissaoAnulacao = new FEmpenhoEmpenhoEmissaoAnulacao; @@ -1110,7 +1112,7 @@ function anular($boTransacao = "") $obFEmpenhoEmpenhoEmissaoAnulacao->setDado( "tipo_lote" , 'E' ); $obFEmpenhoEmpenhoEmissaoAnulacao->setDado( "cod_entidade" , $this->obROrcamentoEntidade->getCodigoEntidade() ); $obFEmpenhoEmpenhoEmissaoAnulacao->setDado( "cod_pre_empenho" , $this->inCodPreEmpenho ); - if ($boTCEMS) { + if (Sessao::getExercicio() > '2012') { $obFEmpenhoEmpenhoEmissaoAnulacao->setDado( "cod_despesa" , $this->obROrcamentoDespesa->getCodDespesa() ); $obFEmpenhoEmpenhoEmissaoAnulacao->setDado( "cod_class_despesa", $this->obROrcamentoClassificacaoDespesa->getMascClassificacao() ); } diff --git a/gestaoFinanceira/fontes/PHP/empenho/classes/negocio/REmpenhoEmpenhoAutorizacao.class.php b/gestaoFinanceira/fontes/PHP/empenho/classes/negocio/REmpenhoEmpenhoAutorizacao.class.php index ee10390..13db50f 100755 --- a/gestaoFinanceira/fontes/PHP/empenho/classes/negocio/REmpenhoEmpenhoAutorizacao.class.php +++ b/gestaoFinanceira/fontes/PHP/empenho/classes/negocio/REmpenhoEmpenhoAutorizacao.class.php @@ -43,37 +43,11 @@ uc-02.03.02 */ -/* -$Log$ -Revision 1.15 2007/09/06 14:52:01 rodrigo_sr -Ticket#9851# - -Revision 1.14 2007/08/17 20:43:45 vitor -Bug#9851# - -Revision 1.13 2007/01/04 18:15:59 rodrigo -#7857# - -Revision 1.12 2006/07/14 17:58:02 andre.almeida -Bug #6556# - -Alterado scripts de NOT IN para NOT EXISTS. - -Revision 1.11 2006/07/05 20:47:06 cleisson -Adicionada tag Log aos arquivos - -*/ - include_once '../../../../../../gestaoAdministrativa/fontes/PHP/framework/include/valida.inc.php'; -include_once ( CAM_FW_BANCO_DADOS ."Transacao.class.php" ); -include_once ( CAM_GF_EMP_NEGOCIO ."REmpenhoEmpenho.class.php" ); -include_once ( CAM_GF_EMP_NEGOCIO ."REmpenhoAutorizacaoEmpenho.class.php" ); +include_once CAM_FW_BANCO_DADOS."Transacao.class.php"; +include_once CAM_GF_EMP_NEGOCIO."REmpenhoEmpenho.class.php"; +include_once CAM_GF_EMP_NEGOCIO."REmpenhoAutorizacaoEmpenho.class.php"; -/** - * Classe de Regra de EmpenhoAutorizacao - * @author Analista: Jorge B. Ribarr - * @author Desenvolvedor: Eduardo Martins -*/ class REmpenhoEmpenhoAutorizacao { /* @@ -186,7 +160,8 @@ function autorizarEmpenho($boTransacao = "") $obTEmpenhoEmpenhoAutorizacao = new TEmpenhoEmpenhoAutorizacao; $obErro = $this->obTransacao->abreTransacao( $boFlagTransacao, $boTransacao ); - $obErro = $this->obREmpenhoEmpenho->consultaSaldoAnterior( $nuSaldoAnterior, '', $boTransacao ); + $obErro = $this->obREmpenhoEmpenho->consultaSaldoAnteriorDataEmpenho( $nuSaldoAnterior, '', $boTransacao ); + $nuVlReserva = str_replace( '.','',$this->obREmpenhoAutorizacaoEmpenho->obROrcamentoReservaSaldos->getVlReserva() ); $nuVlReserva = str_replace( ',','.',$nuVlReserva ); $this->obREmpenhoAutorizacaoEmpenho->obROrcamentoReservaSaldos->setExercicio( $this->obREmpenhoEmpenho->getExercicio() ); @@ -227,7 +202,7 @@ function autorizarEmpenho($boTransacao = "") $obErro->setDescricao( "Data de Empenho deve ser maior que '".$rsMaiorData->getCampo( "dataempenho" )."'!" ); } - if (SistemaLegado::comparaDatas($this->obREmpenhoAutorizacaoEmpenho->getDtAutorizacao(),$_REQUEST['stDtEmpenho'])) { + if (SistemaLegado::comparaDatas($this->obREmpenhoAutorizacaoEmpenho->getDtAutorizacao(),$this->obREmpenhoEmpenho->getDtEmpenho())) { $obErro->setDescricao( "A data de Empenho deve ser igual ou posterior à data da Autorização de Empenho." ); } @@ -412,3 +387,5 @@ function listarAutorizacao(&$rsRecordSet, $stOrder = "" , $boTransacao = "") } } + +?> \ No newline at end of file diff --git a/gestaoFinanceira/fontes/PHP/empenho/classes/negocio/REmpenhoItemPreEmpenho.class.php b/gestaoFinanceira/fontes/PHP/empenho/classes/negocio/REmpenhoItemPreEmpenho.class.php index 129c37b..ac5f343 100755 --- a/gestaoFinanceira/fontes/PHP/empenho/classes/negocio/REmpenhoItemPreEmpenho.class.php +++ b/gestaoFinanceira/fontes/PHP/empenho/classes/negocio/REmpenhoItemPreEmpenho.class.php @@ -33,366 +33,350 @@ * @package URBEM * @subpackage Regra - $Revision: 30668 $ - $Name$ - $Author: domluc $ - $Date: 2007-02-15 15:56:01 -0200 (Qui, 15 Fev 2007) $ + $Id: REmpenhoItemPreEmpenho.class.php 64005 2015-11-17 16:49:06Z michel $ * Casos de uso: uc-02.03.03, uc-02.03.02, uc-02.03.30 */ -/** - -/* -$Log$ -Revision 1.16 2007/02/15 17:55:46 domluc -Refletir mudanças na base - -Revision 1.15 2007/01/18 19:12:51 domluc -Autorização de Licitação - -Revision 1.14 2006/09/26 17:58:16 tonismar -Manter Empenho Despesas Mensais Fixas - -Revision 1.13 2006/08/09 12:54:38 jose.eduardo -Bug #6741# - -Revision 1.12 2006/07/11 20:28:24 eduardo -Bug #6531# - -Revision 1.11 2006/07/05 20:47:06 cleisson -Adicionada tag Log aos arquivos - -*/ - include_once '../../../../../../gestaoAdministrativa/fontes/PHP/framework/include/valida.inc.php'; -include_once ( CAM_FW_BANCO_DADOS."Transacao.class.php" ); -include_once ( CAM_GF_EMP_NEGOCIO."REmpenhoPreEmpenho.class.php" ); -include_once ( CAM_GA_ADM_NEGOCIO."RUnidadeMedida.class.php" ); +include_once CAM_FW_BANCO_DADOS."Transacao.class.php"; +include_once CAM_GF_EMP_NEGOCIO."REmpenhoPreEmpenho.class.php"; +include_once CAM_GA_ADM_NEGOCIO."RUnidadeMedida.class.php"; +include_once CAM_GF_EMP_MAPEAMENTO.'TEmpenhoItemPreEmpenho.class.php'; +include_once CAM_GF_EMP_MAPEAMENTO.'TEmpenhoItemPreEmpenhoCompra.class.php'; +include_once CAM_GF_EMP_MAPEAMENTO.'TEmpenhoItemPreEmpenhoJulgamento.class.php'; -/** - * Classe de Regra de Item Pre Empenho - * @author Analista: Jorge B. Ribarr - * @author Desenvolvedor: Anderson R. M. Buzo -*/ class REmpenhoItemPreEmpenho { /** * @access Private * @var Object -*/ + **/ public $obRUnidadeMedida; /** * @access Private * @var Integer -*/ + **/ public $inNumItem; /** * @access Private * @var Integer -*/ + **/ public $inCodMaterial; /** * @access Private * @var Integer -*/ + **/ public $inQuantidade; /** * @access Private * @var String -*/ + **/ public $stNomUnidade; /** * @access Private * @var String -*/ + **/ public $stSiglaUnidade; /** * @access Private * @var String -*/ + **/ public $stNomItem; /** * @access Private * @var String -*/ + **/ public $stComplemento; /** * @access Private * @var Numeric -*/ + **/ public $nuValorTotal; /** * @access Private * @var Numeric -*/ + **/ public $nuValorEmpenhadoAnulado; /** * @access Private * @var Numeric -*/ + **/ public $nuValorALiquidar; /** * @access Private * @var Numeric -*/ + **/ public $nuValorAAnular; /** * @access Private * @var Numeric -*/ + **/ public $nuValorLiquidado; /** * @access Private * @var Numeric -*/ + **/ public $nuValorLiquidadoAnulado; /** * @access Private * @var Reference Object -*/ + **/ public $roPreEmpenho; /** * @access Public; * @var Date; -*/ + **/ public $dtDataDocumento; /** * @access Public; * @var Boolean; -*/ + **/ public $boCompra; /** * @access Public; * @var Integer; -*/ + **/ public $inCodCotacao; /** * @access Public; * @var Integer; - */ + **/ public $inExercicioJulgamento; /** * @access Public; * @var Integer; - */ + **/ public $inCgmFornecedor; /** * @access Public; * @var Integer; - */ + **/ public $inLoteCompras; - /** * @access Public; * @var Integer; -*/ + **/ public $inCodItem; /** * @access Public; * @var Integer; -*/ + **/ public $inCodItemPreEmp; /** + * @access Public; + * @var Integer; + **/ + public $inCodCentroCusto; + /** * @access Public * @param Object $Valor -*/ + **/ public function setRUnidadeMedida($valor) { $this->obRUnidadeMedida = $valor; } /** * @access Public * @param Integer $Valor - */ + **/ public function setNumItem($valor) { $this->inNumItem = $valor; } /** * @access Public * @param Integer $Valor -*/ + **/ public function setCodMaterial($valor) { $this->inCodMaterial = $valor; } /** * @access Public * @param Integer $Valor -*/ + **/ public function setQuantidade($valor) { $this->inQuantidade = $valor; } /** * @access Public * @param String $Valor -*/ + **/ public function setNomUnidade($valor) { $this->stNomUnidade = $valor; } /** * @access Public * @param String $Valor -*/ + **/ public function setSiglaUnidade($valor) { $this->stSiglaUnidade = $valor; } /** * @access Public * @param String $Valor -*/ + **/ public function setNomItem($valor) { $this->stNomItem = $valor; } /** * @access Public * @param String $Valor -*/ + **/ public function setComplemento($valor) { $this->stComplemento = $valor; } /** * @access Public * @param Numeric $Valor -*/ + **/ public function setValorTotal($valor) { $this->nuValorTotal = $valor; } /** * @access Public * @param Numeric $Valor -*/ + **/ public function setValorEmpenhadoAnulado($valor) { $this->nuValorEmpenhadoAnulado = $valor; } /** * @access Public * @param Numeric $Valor -*/ + **/ public function setValorALiquidar($valor) { $this->nuValorALiquidar = $valor; } /** * @access Public * @param Numeric $Valor -*/ + **/ public function setValorAAnular($valor) { $this->nuValorAAnular = $valor; } /** * @access Public * @param Numeric $Valor -*/ + **/ public function setValorLiquidado($valor) { $this->nuValorLiquidado = $valor; } /** * @access Public * @param Numeric $Valor -*/ + **/ public function setValorLiquidadoAnulado($valor) { $this->nuValorLiquidadoAnulado = $valor; } /** * @access Public * @param Date $Valor -*/ + **/ public function setDataDocumento($valor) { $this->dtDataDocumento = $valor; } /** * @access Public * @param Boolean $Valor -*/ + **/ public function setCompra($valor) { $this->boCompra = $valor; } -/** + /** * @access Public * @param Integer $Valor - */ + **/ public function setCodItem($valor) { $this->inCodItem = $valor; } /** * @access Public * @param Integer $Valor - */ - public function setCodItemPreEmp($valor) { $this->inCodItemPreEmp = $valor; } -/** + **/ + public function setCodItemPreEmp($valor) { $this->inCodItemPreEmp = $valor; } + /** * @access Public * @param Integer $Valor - */ + **/ + public function setCodCentroCusto($valor) { $this->inCodCentroCusto = $valor; } + /** + * @access Public + * @param Integer $Valor + **/ public function setCodCotacao($valor) { $this->inCodCotacao = $valor; } public function setExercicioJulgamento($valor) { $this->inExercicioJulgamento = $valor; } public function setLoteCompras($valor) { $this->inLoteCompras = $valor; } public function setCgmFornecedor($valor) { $this->inCgmFornecedor = $valor; } -/** + /** * @access Public * @param Integer $Valor */ public function setExercicioMapa($valor) { $this->inExercicioMapa= $valor; } - /** * @access Public * @return Object -*/ + **/ public function getRUnidadeMedida() { return $this->obRUnidadeMedida; } /** * @access Public * @return Integer -*/ + **/ public function getNumItem() { return $this->inNumItem; } /** * @access Public * @return Integer -*/ + **/ public function getCodMaterial() { return $this->inCodMaterial; } /** * @access Public * @return Integer -*/ + **/ public function getQuantidade() { return $this->inQuantidade; } /** * @access Public * @return String -*/ + **/ public function getNomUnidade() { return $this->stNomUnidade; } /** * @access Public * @return String -*/ + **/ public function getSiglaUnidade() { return $this->stSiglaUnidade; } /** * @access Public * @return String -*/ + **/ public function getNomItem() { return $this->stNomItem; } /** * @access Public * @return String -*/ + **/ public function getComplemento() { return $this->stComplemento; } /** * @access Public * @return Numeric -*/ + **/ public function getValorTotal() { return $this->nuValorTotal; } /** * @access Public * @return Numeric -*/ + **/ public function getValorEmpenhadoAnulado() { return $this->nuValorEmpenhadoAnulado; } /** * @access Public * @return Numeric -*/ + **/ public function getValorALiquidar() { return $this->nuValorALiquidar; } /** * @access Public * @return Numeric -*/ + **/ public function getValorAAnular() { return $this->nuValorAAnular; } /** * @access Public * @return Numeric -*/ + **/ public function getValorLiquidado() { return $this->nuValorLiquidado; } /** * @access Public * @return Numeric -*/ + **/ public function getValorLiquidadoAnulado() { return $this->nuValorLiquidadoAnulado; } /** * @access Public * @return Date -*/ + **/ public function getDataDocumento() { return $this->dtDataDocumento; } /** * @access Public * @return Boolean -*/ + **/ public function getCompra() { return $this->boCompra; } /** * @access Public * @return Integer -*/ + */ public function getCodItemPreEmp() { return $this->inCodItemPreEmp; } + /** + * @access Public + * @return Integer + */ + public function getCodCentroCusto() { return $this->inCodCentroCusto; } /** - * Método construtor - * @access Public - * @param Reference Object $roPreEmpenho -*/ + * Método construtor + * @access Public + * @param Reference Object $roPreEmpenho + **/ public function REmpenhoItemPreEmpenho(&$roPreEmpenho) { - $this->obTransacao = new Transacao; - $this->obRUnidadeMedida = new RUnidadeMedida; - $this->roPreEmpenho = &$roPreEmpenho; + $this->obTransacao = new Transacao; + $this->obRUnidadeMedida = new RUnidadeMedida; + $this->roPreEmpenho = &$roPreEmpenho; } /** @@ -401,10 +385,9 @@ class REmpenhoItemPreEmpenho * @param String $stOrder Parâmetro de Ordenação * @param Object $boTransacao Parâmetro Transação * @return Object Objeto Erro -*/ + **/ public function consultar(&$rsRecordSet,$boTransacao = "") { - include_once ( CAM_GF_EMP_MAPEAMENTO."TEmpenhoItemPreEmpenho.class.php" ); $obTEmpenhoItemPreEmpenho = new TEmpenhoItemPreEmpenho; $obTEmpenhoItemPreEmpenho->setDado( "cod_pre_empenho", $this->roPreEmpenho->getCodPreEmpenho() ); @@ -431,10 +414,9 @@ class REmpenhoItemPreEmpenho * @param String $stOrder Parâmetro de Ordenação * @param Object $boTransacao Parâmetro Transação * @return Object Objeto Erro -*/ + **/ public function listar(&$rsRecordSet, $stOrder = "" , $boTransacao = "") { - include_once ( CAM_GF_EMP_MAPEAMENTO."TEmpenhoItemPreEmpenho.class.php" ); $obTEmpenhoItemPreEmpenho = new TEmpenhoItemPreEmpenho; if( $this->roPreEmpenho->getCodPreEmpenho() ) @@ -466,7 +448,6 @@ class REmpenhoItemPreEmpenho public function consultaCodMaterial($boTransacao = "") { - include_once ( CAM_GF_EMP_MAPEAMENTO."TEmpenhoItemPreEmpenhoCompra.class.php" ); $obTEmpenhoItemPreEmpenhoCompra = new TEmpenhoItemPreEmpenhoCompra; $obTEmpenhoItemPreEmpenhoCompra->setDado( 'cod_pre_empenho', $this->roPreEmpenho->getCodPreEmpenho() ); @@ -478,20 +459,31 @@ class REmpenhoItemPreEmpenho $this->inCodMaterial = $obTEmpenhoItemPreEmpenhoCompra->getDado( 'cod_item' ); } + public function consultaCodCentroCusto($boTransacao = "") + { + $obTEmpenhoItemPreEmpenhoJulgamento = new TEmpenhoItemPreEmpenhoJulgamento(); + + $obTEmpenhoItemPreEmpenhoJulgamento->setDado( "cod_pre_empenho" , $this->roPreEmpenho->getCodPreEmpenho() ); + $obTEmpenhoItemPreEmpenhoJulgamento->setDado( "exercicio" , $this->roPreEmpenho->getExercicio() ); + $obTEmpenhoItemPreEmpenhoJulgamento->setDado( "num_item" , $this->getNumItem() ); + + $obErro = $obTEmpenhoItemPreEmpenhoJulgamento->recuperaCentroCustoMapaItem( $rsCentroCusto, $boTransacao ); + + if ( !$obErro->ocorreu() ) + $this->setCodCentroCusto( $rsCentroCusto->getCampo( "cod_centro" ) ); + } + /** * Incluir Pre Empenho * @access Public * @param Object $boTransacao Parâmetro Transação * @return Object Objeto Erro -*/ + **/ public function incluir($boTransacao = "") { - include_once ( CAM_GF_EMP_MAPEAMENTO."TEmpenhoItemPreEmpenho.class.php" ); - include_once ( CAM_GF_EMP_MAPEAMENTO."TEmpenhoItemPreEmpenhoCompra.class.php" ); - include_once ( CAM_GF_EMP_MAPEAMENTO."TEmpenhoItemPreEmpenhoJulgamento.class.php" ); - $obTEmpenhoItemPreEmpenho = new TEmpenhoItemPreEmpenho; - $obTEmpenhoItemPreEmpenhoCompra = new TEmpenhoItemPreEmpenhoCompra; - $obTEmpenhoItemPreEmpenhoJulgamento = new TEmpenhoItemPreEmpenhoJulgamento(); + $obTEmpenhoItemPreEmpenho = new TEmpenhoItemPreEmpenho; + $obTEmpenhoItemPreEmpenhoCompra = new TEmpenhoItemPreEmpenhoCompra; + $obTEmpenhoItemPreEmpenhoJulgamento = new TEmpenhoItemPreEmpenhoJulgamento(); $boFlagTransacao = false; $obErro = $this->obTransacao->abreTransacao( $boFlagTransacao, $boTransacao ); @@ -513,6 +505,7 @@ class REmpenhoItemPreEmpenho $obTEmpenhoItemPreEmpenho->setDado( "cod_unidade" , $this->obRUnidadeMedida->getCodUnidade() ); $obTEmpenhoItemPreEmpenho->setDado( "cod_grandeza" , $this->obRUnidadeMedida->obRGrandeza->getCodGrandeza() ); $obTEmpenhoItemPreEmpenho->setDado( "cod_item" , $this->inCodItemPreEmp ); + $obTEmpenhoItemPreEmpenho->setDado( "cod_centro" , $this->inCodCentroCusto ); $obErro = $obTEmpenhoItemPreEmpenho->inclusao( $boTransacao ); if ( !$obErro->ocorreu() ) { @@ -527,14 +520,14 @@ class REmpenhoItemPreEmpenho if ( !$obErro->ocorreu() ) { // vincula autorização ao compras if ( $this->getCompra() ) { - $obTEmpenhoItemPreEmpenhoJulgamento->setDado( "cod_pre_empenho" , $this->roPreEmpenho->getCodPreEmpenho() ); - $obTEmpenhoItemPreEmpenhoJulgamento->setDado( "exercicio" , $this->roPreEmpenho->getExercicio() ); - $obTEmpenhoItemPreEmpenhoJulgamento->setDado( "num_item" , $this->inNumItem ); - $obTEmpenhoItemPreEmpenhoJulgamento->setDado( "cod_cotacao" , $this->inCodCotacao ); - $obTEmpenhoItemPreEmpenhoJulgamento->setDado( "exercicio_julgamento" , $this->inExercicioJulgamento ); - $obTEmpenhoItemPreEmpenhoJulgamento->setDado( "cgm_fornecedor" , $this->inCgmFornecedor ); - $obTEmpenhoItemPreEmpenhoJulgamento->setDado( "lote" , $this->inLoteCompras ); - $obTEmpenhoItemPreEmpenhoJulgamento->setDado( "cod_item" , $this->inCodItem ); + $obTEmpenhoItemPreEmpenhoJulgamento->setDado( "cod_pre_empenho" , $this->roPreEmpenho->getCodPreEmpenho() ); + $obTEmpenhoItemPreEmpenhoJulgamento->setDado( "exercicio" , $this->roPreEmpenho->getExercicio() ); + $obTEmpenhoItemPreEmpenhoJulgamento->setDado( "num_item" , $this->inNumItem ); + $obTEmpenhoItemPreEmpenhoJulgamento->setDado( "cod_cotacao" , $this->inCodCotacao ); + $obTEmpenhoItemPreEmpenhoJulgamento->setDado( "exercicio_julgamento", $this->inExercicioJulgamento ); + $obTEmpenhoItemPreEmpenhoJulgamento->setDado( "cgm_fornecedor" , $this->inCgmFornecedor ); + $obTEmpenhoItemPreEmpenhoJulgamento->setDado( "lote" , $this->inLoteCompras ); + $obTEmpenhoItemPreEmpenhoJulgamento->setDado( "cod_item" , $this->inCodItem ); $obErro = $obTEmpenhoItemPreEmpenhoJulgamento->inclusao( $boTransacao ); } @@ -551,11 +544,10 @@ class REmpenhoItemPreEmpenho * @access Public * @param Object $boTransacao Parâmetro Transação * @return Object Objeto Erro -*/ + **/ public function alterar($boTransacao = "") { - include_once ( CAM_GF_EMP_MAPEAMENTO."TEmpenhoItemPreEmpenho.class.php" ); - $obTEmpenhoItemPreEmpenho = new TEmpenhoItemPreEmpenho; + $obTEmpenhoItemPreEmpenho = new TEmpenhoItemPreEmpenho; $boFlagTransacao = false; $obErro = $this->obTransacao->abreTransacao( $boFlagTransacao, $boTransacao ); @@ -584,13 +576,11 @@ class REmpenhoItemPreEmpenho * @access Public * @param Object $obTransacao Parâmetro Transação * @return Object Objeto Erro -*/ + **/ public function excluir($boTransacao = "") { - include_once ( CAM_GF_EMP_MAPEAMENTO."TEmpenhoItemPreEmpenho.class.php" ); - include_once ( CAM_GF_EMP_MAPEAMENTO."TEmpenhoItemPreEmpenhoCompra.class.php" ); - $obTEmpenhoItemPreEmpenho = new TEmpenhoItemPreEmpenho; - $obTEmpenhoItemPreEmpenhoCompra = new TEmpenhoItemPreEmpenhoCompra; + $obTEmpenhoItemPreEmpenho = new TEmpenhoItemPreEmpenho; + $obTEmpenhoItemPreEmpenhoCompra = new TEmpenhoItemPreEmpenhoCompra; $boFlagTransacao = false; $obErro = $this->obTransacao->abreTransacao( $boFlagTransacao, $boTransacao ); @@ -602,7 +592,6 @@ class REmpenhoItemPreEmpenho if ( !$obErro->ocorreu() ) { $obTEmpenhoItemPreEmpenho->setDado("cod_pre_empenho", $this->roPreEmpenho->getCodPreEmpenho() ); $obTEmpenhoItemPreEmpenho->setDado("exercicio" , $this->roPreEmpenho->getExercicio() ); - // $obTEmpenhoItemPreEmpenho->setDado("num_item" , $this->inNumItem ); $stCampoCodTEMP = $obTEmpenhoItemPreEmpenho->getCampoCod(); $obTEmpenhoItemPreEmpenho->setCampoCod( "" ); $obErro = $obTEmpenhoItemPreEmpenho->exclusao( $boTransacao ); diff --git a/gestaoFinanceira/fontes/PHP/empenho/classes/negocio/REmpenhoNotaLiquidacao.class.php b/gestaoFinanceira/fontes/PHP/empenho/classes/negocio/REmpenhoNotaLiquidacao.class.php index bff6fcb..3b11c28 100755 --- a/gestaoFinanceira/fontes/PHP/empenho/classes/negocio/REmpenhoNotaLiquidacao.class.php +++ b/gestaoFinanceira/fontes/PHP/empenho/classes/negocio/REmpenhoNotaLiquidacao.class.php @@ -33,7 +33,7 @@ * @package URBEM * @subpackage Regra - $Id: REmpenhoNotaLiquidacao.class.php 63657 2015-09-24 21:19:41Z michel $ + $Id: REmpenhoNotaLiquidacao.class.php 64153 2015-12-09 19:16:02Z evandro $ * Casos de uso: uc-02.03.18, uc-02.03.20, uc-02.03.03, uc-02.03.04, uc-02.03.14 */ @@ -664,11 +664,9 @@ function incluir($boTransacao = "") $obTContabilidadeLiquidacao = new TContabilidadeLiquidacao; $obFEmpenhoEmpenhoLiquidacaoRestosAPagar = new FEmpenhoEmpenhoLiquidacaoRestosAPagar; $obTEmpenhoIncorporacaoPatrimonio = new TEmpenhoIncorporacaoPatrimonio; - $this->obTEmpenhoNotaLiquidacao = new TEmpenhoNotaLiquidacao; + $this->obTEmpenhoNotaLiquidacao = new TEmpenhoNotaLiquidacao; - $boTCEMS = SistemaLegado::is_tcems($boTransacao); - - if ($boTCEMS) + if (Sessao::getExercicio() > '2012') $obFEmpenhoEmpenhoLiquidacao = new FEmpenhoEmpenhoLiquidacaoTCEMS; else $obFEmpenhoEmpenhoLiquidacao = new FEmpenhoEmpenhoLiquidacao; @@ -783,7 +781,7 @@ function incluir($boTransacao = "") $obFEmpenhoEmpenhoLiquidacao->setDado( "cod_historico_patrimon" , $this->inCodHistorico ); $obFEmpenhoEmpenhoLiquidacao->setDado( "num_orgao" , $this->roREmpenhoEmpenho->obROrcamentoDespesa->obROrcamentoUnidadeOrcamentaria->obROrcamentoOrgaoOrcamentario->getNumeroOrgao() ); - if ($boTCEMS) { + if (Sessao::getExercicio() > '2012') { $obFEmpenhoEmpenhoLiquidacao->setDado( "cod_despesa" , $this->roREmpenhoEmpenho->obROrcamentoDespesa->getCodDespesa() ); $obFEmpenhoEmpenhoLiquidacao->setDado( "cod_classificacao" , $this->inCodContaContabilFinanc ); } @@ -1017,11 +1015,9 @@ function anularItens($boTransacao = "") $obTEmpenhoIncorporacaoPatrimonio = new TEmpenhoIncorporacaoPatrimonio; $boFlagTransacao = false; - $obErro = $this->obTransacao->abreTransacao( $boFlagTransacao, $boTransacao ); - - $boTCEMS = SistemaLegado::is_tcems($boTransacao); + $obErro = $this->obTransacao->abreTransacao( $boFlagTransacao, $boTransacao ); - if ($boTCEMS) { + if (Sessao::getExercicio() > '2012') { $obFEmpenhoEmpenhoLiquidacaoAnulacao = new FEmpenhoEmpenhoLiquidacaoAnulacaoTCEMS; } else { $obFEmpenhoEmpenhoLiquidacaoAnulacao = new FEmpenhoEmpenhoLiquidacaoAnulacao; @@ -1138,7 +1134,7 @@ function anularItens($boTransacao = "") $obFEmpenhoEmpenhoLiquidacaoAnulacao->setDado( "cod_historico_patrimon", $this->inCodHistorico ); $obFEmpenhoEmpenhoLiquidacaoAnulacao->setDado( "num_orgao", $this->roREmpenhoEmpenho->obROrcamentoDespesa->obROrcamentoUnidadeOrcamentaria->obROrcamentoOrgaoOrcamentario->getNumeroOrgao() ); - if ($boTCEMS) { + if (Sessao::getExercicio() > '2012') { $obFEmpenhoEmpenhoLiquidacaoAnulacao->setDado( "cod_despesa", $this->roREmpenhoEmpenho->obROrcamentoDespesa->getCodDespesa() ); $obFEmpenhoEmpenhoLiquidacaoAnulacao->setDado( "cod_classificacao",$this->inCodContaContabilFinanc); } diff --git a/gestaoFinanceira/fontes/PHP/empenho/classes/negocio/REmpenhoOrdemPagamento.class.php b/gestaoFinanceira/fontes/PHP/empenho/classes/negocio/REmpenhoOrdemPagamento.class.php index 2dfad42..bf048a6 100755 --- a/gestaoFinanceira/fontes/PHP/empenho/classes/negocio/REmpenhoOrdemPagamento.class.php +++ b/gestaoFinanceira/fontes/PHP/empenho/classes/negocio/REmpenhoOrdemPagamento.class.php @@ -33,7 +33,7 @@ * @package URBEM * @subpackage Regra - $Id: REmpenhoOrdemPagamento.class.php 62712 2015-06-11 15:00:29Z evandro $ + $Id: REmpenhoOrdemPagamento.class.php 64153 2015-12-09 19:16:02Z evandro $ * Casos de uso: uc-02.03.03,uc-02.03.05,uc-02.03.20,uc-02.03.23,uc-02.04.05,uc-02.03.28 */ @@ -648,7 +648,7 @@ function incluir($boTransacao = "", $boFlagTransacao = true) $obTEmpenhoOrdemPagamentoRetencao->setDado( "exercicio", $this->stExercicio ); $obTEmpenhoOrdemPagamentoRetencao->setDado( "cod_entidade", $this->obROrcamentoEntidade->getCodigoEntidade() ); $obTEmpenhoOrdemPagamentoRetencao->setDado( "cod_ordem", $this->inCodigoOrdem ); - if ( sistemaLegado::is_tcems($boTransacao) ) { + if ( Sessao::getExercicio() > '2012' ) { $obTEmpenhoOrdemPagamentoRetencao->setDado( "estorno", 'f' ); } foreach ($this->arRetencoes as $arRetencao => $item) { diff --git a/gestaoFinanceira/fontes/PHP/empenho/classes/negocio/REmpenhoPagamentoLiquidacao.class.php b/gestaoFinanceira/fontes/PHP/empenho/classes/negocio/REmpenhoPagamentoLiquidacao.class.php index 3c51e33..1c90f8d 100755 --- a/gestaoFinanceira/fontes/PHP/empenho/classes/negocio/REmpenhoPagamentoLiquidacao.class.php +++ b/gestaoFinanceira/fontes/PHP/empenho/classes/negocio/REmpenhoPagamentoLiquidacao.class.php @@ -33,7 +33,7 @@ * @package URBEM * @subpackage Regra - $Id: REmpenhoPagamentoLiquidacao.class.php 62476 2015-05-13 14:50:56Z evandro $ + $Id: REmpenhoPagamentoLiquidacao.class.php 64153 2015-12-09 19:16:02Z evandro $ $Revision: 30805 $ $Name: $ @@ -989,7 +989,7 @@ function pagarOP($boTransacao = "") // Verifica qual o cod_recurso que possui conta contabil vinculada $obTOrcamentoRecursoDestinacao->setDado('exercicio', Sessao::getExercicio()); $obTOrcamentoRecursoDestinacao->setDado('cod_especificacao', $inCodEspecificacao); - if ( SistemaLegado::is_tcems( $boTransacao ) ) { + if ( Sessao::getExercicio() > '2012' ) { $obTOrcamentoRecursoDestinacao->setDado('cod_estrutural', "'8.2.1.1.3.%'"); } else { $obTOrcamentoRecursoDestinacao->setDado('cod_estrutural', "'2.9.3.2.0.00.00.%'"); @@ -1001,8 +1001,30 @@ function pagarOP($boTransacao = "") } $obRContabilidadePlanoBanco->obROrcamentoRecurso->setCodRecurso($inCodRecurso); - if (SistemaLegado::is_tcems($boTransacao)) { - $obErro = $obRContabilidadePlanoBanco->getContasRecursoPagamentoTCEMS($rsContasRecurso, $boTransacao); + if (Sessao::getExercicio() > '2012') { + $obTContabilidadePlanoBancoTeste = new TContabilidadePlanoBanco; + $obTContabilidadePlanoBancoTeste->setDado('cod_recurso', $obRContabilidadePlanoBanco->obROrcamentoRecurso->getCodRecurso()); + $obTContabilidadePlanoBancoTeste->setDado('exercicio', Sessao::getExercicio()); + $obTContabilidadePlanoBancoTeste->setDado('estrutural_teste', '8.2.1.1.4.%'); + $obTContabilidadePlanoBancoTeste->testaRecursoPagamentoTCEMS($rsContasRecurso, $boTransacao); + if ($rsContasRecurso->getNumLinhas() > 1) { + $obErro->setDescricao('Erro ao efetuar pagamento, existe mais de uma conta do grupo 8 cadastradas para este pagamento. Favor verificar.'); + break; + } + + if (!$obErro->ocorreu()) { + $obTContabilidadePlanoBancoTeste->setDado('estrutural_teste', '8.2.1.1.3.%'); + $obTContabilidadePlanoBancoTeste->testaRecursoPagamentoTCEMS($rsContasRecurso, $boTransacao); + + if ($rsContasRecurso->getNumLinhas() > 1) { + $obErro->setDescricao('Erro ao efetuar pagamento, existe mais de uma conta do grupo 8 cadastradas para este pagamento. Favor verificar.'); + break; + } + } + + if (!$obErro->ocorreu()) { + $obErro = $obRContabilidadePlanoBanco->getContasRecursoPagamentoTCEMS($rsContasRecurso, $boTransacao); + } } else { $obErro = $obRContabilidadePlanoBanco->getContasRecurso($rsContasRecurso, $boTransacao); } @@ -1013,534 +1035,547 @@ function pagarOP($boTransacao = "") $inCodPlanoUm = ''; } - if ( $obRNotaLiquidacao->getValorPago() > 0 || $boValidaPagamentoRetencao == 'TRUE') { - $obErro = $this->incluirNotaLiquidacao( $obRNotaLiquidacao, $boTransacao ); - if ( $obErro->ocorreu() ) { - break; - } + if ( !$obErro->ocorreu() ) { - $obErro = $this->incluirPagamentoNotaLiquidacao( $obRNotaLiquidacao, $boTransacao ); + if ( $obRNotaLiquidacao->getValorPago() > 0 || $boValidaPagamentoRetencao == 'TRUE') { + $obErro = $this->incluirNotaLiquidacao( $obRNotaLiquidacao, $boTransacao ); + if ( $obErro->ocorreu() ) { + break; + } - if( $obErro->ocorreu() ) - break; - $obErro = $this->incluirNotaLiquidacaoAuditoria( $obRNotaLiquidacao, $boTransacao ); - if( $obErro->ocorreu() ) - break; + $obErro = $this->incluirPagamentoNotaLiquidacao( $obRNotaLiquidacao, $boTransacao ); - if ( $this->obRContabilidadePlanoContaAnalitica->getCodPlano() ) - $obErro = $this->obRContabilidadePlanoContaAnalitica->consultar( $boTransacao ); + if( $obErro->ocorreu() ) + break; - if ( $obRNotaLiquidacao->roREmpenhoEmpenho->getExercicio() == substr($this->stTimestamp,0,4) ) { - $obFEmpenhoEmpenhoPagamento->setDado("exercicio" , substr($this->stTimestamp,0,4) ); - $obFEmpenhoEmpenhoPagamento->setDado("exercicio_liquidacao" ,$obRNotaLiquidacao->getExercicio() ); - $obFEmpenhoEmpenhoPagamento->setDado("cod_entidade" ,$obRNotaLiquidacao->roREmpenhoEmpenho->obROrcamentoEntidade->getCodigoEntidade() ); - $obFEmpenhoEmpenhoPagamento->setDado("valor" ,$obRNotaLiquidacao->getValorPago() ); + $obErro = $this->incluirNotaLiquidacaoAuditoria( $obRNotaLiquidacao, $boTransacao ); - if ($this->obRContabilidadeLancamento->stComplemento) { - $obFEmpenhoEmpenhoPagamento->setDado("complemento" ,$this->obRContabilidadeLancamento->stComplemento ) ; - $stComplemento = $this->obRContabilidadeLancamento->stComplemento; - } else { - if ($this->stObservacao) { - $obFEmpenhoEmpenhoPagamento->setDado("complemento" ,$obRNotaLiquidacao->roREmpenhoEmpenho->getCodEmpenho().'/'.$obRNotaLiquidacao->roREmpenhoEmpenho->getExercicio() ." - ".$this->stObservacao) ; - $stComplemento = $obRNotaLiquidacao->roREmpenhoEmpenho->getCodEmpenho().'/'.$obRNotaLiquidacao->roREmpenhoEmpenho->getExercicio() ." - ".$this->stObservacao; - } else { - $obFEmpenhoEmpenhoPagamento->setDado("complemento" ,$obRNotaLiquidacao->roREmpenhoEmpenho->getCodEmpenho().'/'.$obRNotaLiquidacao->roREmpenhoEmpenho->getExercicio() ) ; - $stComplemento = $obRNotaLiquidacao->roREmpenhoEmpenho->getCodEmpenho().'/'.$obRNotaLiquidacao->roREmpenhoEmpenho->getExercicio(); - } - } + if( $obErro->ocorreu() ) + break; - if ($this->obRContabilidadeLancamento->obRContabilidadeLote->stNomLote) { - $obFEmpenhoEmpenhoPagamento->setDado("nom_lote" ,$this->obRContabilidadeLancamento->obRContabilidadeLote->stNomLote ); - } else { - $obFEmpenhoEmpenhoPagamento->setDado("nom_lote" ,"Pagamento de Empenho n° ".$obRNotaLiquidacao->roREmpenhoEmpenho->getCodEmpenho().'/'.$obRNotaLiquidacao->roREmpenhoEmpenho->getExercicio() ) ; - } + if ( $this->obRContabilidadePlanoContaAnalitica->getCodPlano() ) + $obErro = $this->obRContabilidadePlanoContaAnalitica->consultar( $boTransacao ); - if ( SistemaLegado::is_tcems( $boTransacao ) ) { - $stFiltroContaCredito = " WHERE liquidacao.cod_nota = ".$obRNotaLiquidacao->getCodNota()." - AND liquidacao.exercicio_liquidacao = '".$obRNotaLiquidacao->roREmpenhoEmpenho->getExercicio()."' - AND lancamento.tipo = 'L' - AND lancamento.sequencia = 2 - AND lancamento.cod_entidade = ".$obRNotaLiquidacao->roREmpenhoEmpenho->obROrcamentoEntidade->getCodigoEntidade(); - $obTContabilidadeLancamento = new TContabilidadeLancamento; - $obTContabilidadeLancamento->recuperaLancamentoEmpenhoContaCredito( $rsContaCredito, $stFiltroContaCredito, $boTransacao ); + if ( $obRNotaLiquidacao->roREmpenhoEmpenho->getExercicio() == substr($this->stTimestamp,0,4) ) { + $obFEmpenhoEmpenhoPagamento->setDado("exercicio" , substr($this->stTimestamp,0,4) ); + $obFEmpenhoEmpenhoPagamento->setDado("exercicio_liquidacao" ,$obRNotaLiquidacao->getExercicio() ); + $obFEmpenhoEmpenhoPagamento->setDado("cod_entidade" ,$obRNotaLiquidacao->roREmpenhoEmpenho->obROrcamentoEntidade->getCodigoEntidade() ); + $obFEmpenhoEmpenhoPagamento->setDado("valor" ,$obRNotaLiquidacao->getValorPago() ); - if ( stristr($rsContaCredito->getCampo('cod_estrutural_mascara'), '2.1.1.1') ) { - $stCodEstruturalPagamento = $rsContaCredito->getCampo('cod_estrutural'); - $stCodPlanoCredito = $rsContaCredito->getCampo('cod_plano'); + if ($this->obRContabilidadeLancamento->stComplemento) { + $obFEmpenhoEmpenhoPagamento->setDado("complemento" ,$this->obRContabilidadeLancamento->stComplemento ) ; + $stComplemento = $this->obRContabilidadeLancamento->stComplemento; } else { - $stFiltroContaFixaCredito = " AND REPLACE(pc.cod_estrutural, '.', '') like '213110100%' AND pc.exercicio = '".Sessao::getExercicio()."'"; - $obTContabilidadePlanoConta = new TContabilidadePlanoConta; - $obErro = $obTContabilidadePlanoConta->recuperaContaAnalitica( $rsContaFixaCredito, $stFiltroContaFixaCredito, '', $boTransacao ); - $stCodEstruturalPagamento = '213110100'; - $stCodPlanoCredito = $rsContaFixaCredito->getCampo('cod_plano'); - - if ($stCodPlanoCredito == '' && Sessao::getExercicio() >= 2014) { - $obTContabilidadeConfiguracaoLancamentoCredito = new TContabilidadeConfiguracaoLancamentoCredito; - $stFiltroContaCreditoConfiguracao = " where clc.exercicio = '".Sessao::getExercicio()."' - and clc.cod_conta_despesa = ".$obRNotaLiquidacao->roREmpenhoEmpenho->obROrcamentoClassificacaoDespesa->getCodConta()." - and clc.estorno = 'f'"; - $obTContabilidadeConfiguracaoLancamentoCredito->recuperaCodigoPlano($rsContaFixaCreditoConfiguracao, $stFiltroContaCreditoConfiguracao, '', $boTransacao); - $stCodPlanoCredito = $rsContaFixaCreditoConfiguracao->getCampo('cod_plano'); + if ($this->stObservacao) { + $obFEmpenhoEmpenhoPagamento->setDado("complemento" ,$obRNotaLiquidacao->roREmpenhoEmpenho->getCodEmpenho().'/'.$obRNotaLiquidacao->roREmpenhoEmpenho->getExercicio() ." - ".$this->stObservacao) ; + $stComplemento = $obRNotaLiquidacao->roREmpenhoEmpenho->getCodEmpenho().'/'.$obRNotaLiquidacao->roREmpenhoEmpenho->getExercicio() ." - ".$this->stObservacao; + } else { + $obFEmpenhoEmpenhoPagamento->setDado("complemento" ,$obRNotaLiquidacao->roREmpenhoEmpenho->getCodEmpenho().'/'.$obRNotaLiquidacao->roREmpenhoEmpenho->getExercicio() ) ; + $stComplemento = $obRNotaLiquidacao->roREmpenhoEmpenho->getCodEmpenho().'/'.$obRNotaLiquidacao->roREmpenhoEmpenho->getExercicio(); } } - if ($stCodPlanoCredito == '') { - $obErro->setDescricao('Configuração dos lançamentos de despesa não configurados para esta despesa.'); - break; - } - $obFEmpenhoEmpenhoPagamento->setDado("tcems" , 'true' ) ; - } else { - $stCodEstruturalPagamento = $obRNotaLiquidacao->roREmpenhoEmpenho->obROrcamentoClassificacaoDespesa->getMascClassificacao(); - } - $obFEmpenhoEmpenhoPagamento->setDado("tipo_lote" ,"P" ) ; - $obFEmpenhoEmpenhoPagamento->setDado("dt_lote" ,$this->stDataPagamento ) ; - $obFEmpenhoEmpenhoPagamento->setDado("cod_nota" ,$obRNotaLiquidacao->getCodNota() ); - $obFEmpenhoEmpenhoPagamento->setDado("conta_pagamento_financ",$this->obRContabilidadePlanoContaAnalitica->getCodEstrutural() ) ; - $obFEmpenhoEmpenhoPagamento->setDado("cod_estrutural" ,$stCodEstruturalPagamento ) ; - $obFEmpenhoEmpenhoPagamento->setDado("num_orgao" ,$obRNotaLiquidacao->roREmpenhoEmpenho->obREmpenhoPermissaoAutorizacao->obROrcamentoUnidade->obROrcamentoOrgaoOrcamentario->getNumeroOrgao() ) ; - if ( SistemaLegado::is_tcems($boTransacao) ) { - $obFEmpenhoEmpenhoPagamento->setDado("cod_plano_debito" , $stCodPlanoCredito ) ; - $obFEmpenhoEmpenhoPagamento->setDado("cod_plano_credito" , $this->obRContabilidadePlanoContaAnalitica->getCodPlano() ) ; - } + if ($this->obRContabilidadeLancamento->obRContabilidadeLote->stNomLote) { + $obFEmpenhoEmpenhoPagamento->setDado("nom_lote" ,$this->obRContabilidadeLancamento->obRContabilidadeLote->stNomLote ); + } else { + $obFEmpenhoEmpenhoPagamento->setDado("nom_lote" ,"Pagamento de Empenho n° ".$obRNotaLiquidacao->roREmpenhoEmpenho->getCodEmpenho().'/'.$obRNotaLiquidacao->roREmpenhoEmpenho->getExercicio() ) ; + } - $obErro = $obFEmpenhoEmpenhoPagamento->executaFuncao( $rsFEmpenhoEmpenhoPagamento, $boTransacao ); + if ( Sessao::getExercicio() > '2012' ) { + $stFiltroContaCredito = " WHERE liquidacao.cod_nota = ".$obRNotaLiquidacao->getCodNota()." + AND liquidacao.exercicio_liquidacao = '".$obRNotaLiquidacao->roREmpenhoEmpenho->getExercicio()."' + AND lancamento.tipo = 'L' + AND lancamento.sequencia = 2 + AND lancamento.cod_entidade = ".$obRNotaLiquidacao->roREmpenhoEmpenho->obROrcamentoEntidade->getCodigoEntidade(); + $obTContabilidadeLancamento = new TContabilidadeLancamento; + $obTContabilidadeLancamento->recuperaLancamentoEmpenhoContaCredito( $rsContaCredito, $stFiltroContaCredito, $boTransacao ); + + if ( stristr($rsContaCredito->getCampo('cod_estrutural_mascara'), '2.1.1.1') ) { + $stCodEstruturalPagamento = $rsContaCredito->getCampo('cod_estrutural'); + $stCodPlanoCredito = $rsContaCredito->getCampo('cod_plano'); + } else { + $stFiltroContaFixaCredito = " AND REPLACE(pc.cod_estrutural, '.', '') like '213110100%' AND pc.exercicio = '".Sessao::getExercicio()."'"; + $obTContabilidadePlanoConta = new TContabilidadePlanoConta; + $obErro = $obTContabilidadePlanoConta->recuperaContaAnalitica( $rsContaFixaCredito, $stFiltroContaFixaCredito, '', $boTransacao ); + $stCodEstruturalPagamento = '213110100'; + $stCodPlanoCredito = $rsContaFixaCredito->getCampo('cod_plano'); + + if ($stCodPlanoCredito == '' && Sessao::getExercicio() >= 2014) { + $obTContabilidadeConfiguracaoLancamentoCredito = new TContabilidadeConfiguracaoLancamentoCredito; + $stFiltroContaCreditoConfiguracao = " where clc.exercicio = '".Sessao::getExercicio()."' + and clc.cod_conta_despesa = ".$obRNotaLiquidacao->roREmpenhoEmpenho->obROrcamentoClassificacaoDespesa->getCodConta()." + and clc.estorno = 'f'"; + $obTContabilidadeConfiguracaoLancamentoCredito->recuperaCodigoPlano($rsContaFixaCreditoConfiguracao, $stFiltroContaCreditoConfiguracao, '', $boTransacao); + $stCodPlanoCredito = $rsContaFixaCreditoConfiguracao->getCampo('cod_plano'); + } + } - $inCodLote = $obFEmpenhoEmpenhoPagamento->getDado("cod_lote"); - if (Sessao::getExercicio() > '2008') { - if ( !$obErro->ocorreu() && $inCodPlanoUm != '' && $inCodPlanoDois != '') { - include_once CAM_GF_CONT_MAPEAMENTO."TContabilidadeValorLancamento.class.php"; + if ($stCodPlanoCredito == '') { + $obErro->setDescricao('Configuração dos lançamentos de despesa não configurados para esta despesa.'); + break; + } - $obTContabilidadeValorLancamento = new TContabilidadeValorLancamento; - $obTContabilidadeValorLancamento->setDado("cod_lote", $inCodLote); - $obTContabilidadeValorLancamento->setDado("tipo", 'P'); - $obTContabilidadeValorLancamento->setDado("exercicio" , Sessao::getExercicio());//$obRNotaLiquidacao->getExercicio()); - $obTContabilidadeValorLancamento->setDado("cod_entidade", $obRNotaLiquidacao->roREmpenhoEmpenho->obROrcamentoEntidade->getCodigoEntidade() ); - $obTContabilidadeValorLancamento->setDado("cod_plano_deb", $inCodPlanoDois); - $obTContabilidadeValorLancamento->setDado("cod_plano_cred", $inCodPlanoUm); - $obTContabilidadeValorLancamento->setDado("cod_historico", 903); - $obTContabilidadeValorLancamento->setDado("complemento", $stComplemento); - $obTContabilidadeValorLancamento->setDado("vl_lancamento", $obRNotaLiquidacao->getValorPago()); + $obFEmpenhoEmpenhoPagamento->setDado("tcems" , 'true' ) ; - $obErro = $obTContabilidadeValorLancamento->inclusaoPorPl($rsRecordSet, $boTransacao); - $inSequenciaLancamento = $rsRecordSet->getCampo('sequencia'); } else { - if (!$obErro->getDescricao()) { - $obErro->setDescricao('Contas do compensado não estão cadastradas.'); - break; + $stCodEstruturalPagamento = $obRNotaLiquidacao->roREmpenhoEmpenho->obROrcamentoClassificacaoDespesa->getMascClassificacao(); + } + + $obFEmpenhoEmpenhoPagamento->setDado("tipo_lote" ,"P" ) ; + $obFEmpenhoEmpenhoPagamento->setDado("dt_lote" ,$this->stDataPagamento ) ; + $obFEmpenhoEmpenhoPagamento->setDado("cod_nota" ,$obRNotaLiquidacao->getCodNota() ); + $obFEmpenhoEmpenhoPagamento->setDado("conta_pagamento_financ",$this->obRContabilidadePlanoContaAnalitica->getCodEstrutural() ) ; + $obFEmpenhoEmpenhoPagamento->setDado("cod_estrutural" ,$stCodEstruturalPagamento ) ; + $obFEmpenhoEmpenhoPagamento->setDado("num_orgao" ,$obRNotaLiquidacao->roREmpenhoEmpenho->obREmpenhoPermissaoAutorizacao->obROrcamentoUnidade->obROrcamentoOrgaoOrcamentario->getNumeroOrgao() ) ; + + if ( Sessao::getExercicio() > '2012' ) { + $obFEmpenhoEmpenhoPagamento->setDado("cod_plano_debito" , $stCodPlanoCredito ) ; + $obFEmpenhoEmpenhoPagamento->setDado("cod_plano_credito" , $this->obRContabilidadePlanoContaAnalitica->getCodPlano() ) ; + } + + $obErro = $obFEmpenhoEmpenhoPagamento->executaFuncao( $rsFEmpenhoEmpenhoPagamento, $boTransacao ); + + $inCodLote = $obFEmpenhoEmpenhoPagamento->getDado("cod_lote"); + + if (Sessao::getExercicio() > '2008') { + if ( !$obErro->ocorreu() && $inCodPlanoUm != '' && $inCodPlanoDois != '') { + include_once CAM_GF_CONT_MAPEAMENTO."TContabilidadeValorLancamento.class.php"; + + $obTContabilidadeValorLancamento = new TContabilidadeValorLancamento; + $obTContabilidadeValorLancamento->setDado("cod_lote", $inCodLote); + $obTContabilidadeValorLancamento->setDado("tipo", 'P'); + $obTContabilidadeValorLancamento->setDado("exercicio" , Sessao::getExercicio());//$obRNotaLiquidacao->getExercicio()); + $obTContabilidadeValorLancamento->setDado("cod_entidade", $obRNotaLiquidacao->roREmpenhoEmpenho->obROrcamentoEntidade->getCodigoEntidade() ); + $obTContabilidadeValorLancamento->setDado("cod_plano_deb", $inCodPlanoDois); + $obTContabilidadeValorLancamento->setDado("cod_plano_cred", $inCodPlanoUm); + $obTContabilidadeValorLancamento->setDado("cod_historico", 903); + $obTContabilidadeValorLancamento->setDado("complemento", $stComplemento); + $obTContabilidadeValorLancamento->setDado("vl_lancamento", $obRNotaLiquidacao->getValorPago()); + + $obErro = $obTContabilidadeValorLancamento->inclusaoPorPl($rsRecordSet, $boTransacao); + $inSequenciaLancamento = $rsRecordSet->getCampo('sequencia'); + } else { + if (!$obErro->getDescricao()) { + $obErro->setDescricao('Contas do compensado não estão cadastradas.'); + break; + } } } - } - $inCodHistoricoAdiantamento = 903; - } else { - $obFEmpenhoEmpenhoPagamentoRestosAPagar->setDado("exercicio" ,substr($this->stTimestamp,0,4) ); - $obFEmpenhoEmpenhoPagamentoRestosAPagar->setDado("exercicio_liquidacao" ,$obRNotaLiquidacao->getExercicio() ); - $obFEmpenhoEmpenhoPagamentoRestosAPagar->setDado("cod_entidade" ,$obRNotaLiquidacao->roREmpenhoEmpenho->obROrcamentoEntidade->getCodigoEntidade() ); - $obFEmpenhoEmpenhoPagamentoRestosAPagar->setDado("valor" ,$obRNotaLiquidacao->getValorPago() ); - - if ($this->obRContabilidadeLancamento->stComplemento) { - $obFEmpenhoEmpenhoPagamentoRestosAPagar->setDado("complemento" ,$this->obRContabilidadeLancamento->stComplemento ) ; - $stComplemento = $this->obRContabilidadeLancamento->stComplemento; + $inCodHistoricoAdiantamento = 903; } else { - $obFEmpenhoEmpenhoPagamentoRestosAPagar->setDado("complemento" ,$obRNotaLiquidacao->roREmpenhoEmpenho->getCodEmpenho().'/'.$obRNotaLiquidacao->roREmpenhoEmpenho->getExercicio() ) ; - $stComplemento = $obRNotaLiquidacao->roREmpenhoEmpenho->getCodEmpenho().'/'.$obRNotaLiquidacao->roREmpenhoEmpenho->getExercicio(); - } + $obFEmpenhoEmpenhoPagamentoRestosAPagar->setDado("exercicio" ,substr($this->stTimestamp,0,4) ); + $obFEmpenhoEmpenhoPagamentoRestosAPagar->setDado("exercicio_liquidacao" ,$obRNotaLiquidacao->getExercicio() ); + $obFEmpenhoEmpenhoPagamentoRestosAPagar->setDado("cod_entidade" ,$obRNotaLiquidacao->roREmpenhoEmpenho->obROrcamentoEntidade->getCodigoEntidade() ); + $obFEmpenhoEmpenhoPagamentoRestosAPagar->setDado("valor" ,$obRNotaLiquidacao->getValorPago() ); + + if ($this->obRContabilidadeLancamento->stComplemento) { + $obFEmpenhoEmpenhoPagamentoRestosAPagar->setDado("complemento" ,$this->obRContabilidadeLancamento->stComplemento ) ; + $stComplemento = $this->obRContabilidadeLancamento->stComplemento; + } else { + $obFEmpenhoEmpenhoPagamentoRestosAPagar->setDado("complemento" ,$obRNotaLiquidacao->roREmpenhoEmpenho->getCodEmpenho().'/'.$obRNotaLiquidacao->roREmpenhoEmpenho->getExercicio() ) ; + $stComplemento = $obRNotaLiquidacao->roREmpenhoEmpenho->getCodEmpenho().'/'.$obRNotaLiquidacao->roREmpenhoEmpenho->getExercicio(); + } - if ($this->obRContabilidadeLancamento->obRContabilidadeLote->stNomLote) { - $obFEmpenhoEmpenhoPagamentoRestosAPagar->setDado("nom_lote" ,$this->obRContabilidadeLancamento->obRContabilidadeLote->stNomLote ) ; - } else { - $obFEmpenhoEmpenhoPagamentoRestosAPagar->setDado("nom_lote" ,"Pagamento de RP n° ".$obRNotaLiquidacao->roREmpenhoEmpenho->getCodEmpenho().'/'.$obRNotaLiquidacao->roREmpenhoEmpenho->getExercicio() ) ; - } + if ($this->obRContabilidadeLancamento->obRContabilidadeLote->stNomLote) { + $obFEmpenhoEmpenhoPagamentoRestosAPagar->setDado("nom_lote" ,$this->obRContabilidadeLancamento->obRContabilidadeLote->stNomLote ) ; + } else { + $obFEmpenhoEmpenhoPagamentoRestosAPagar->setDado("nom_lote" ,"Pagamento de RP n° ".$obRNotaLiquidacao->roREmpenhoEmpenho->getCodEmpenho().'/'.$obRNotaLiquidacao->roREmpenhoEmpenho->getExercicio() ) ; + } - $obFEmpenhoEmpenhoPagamentoRestosAPagar->setDado("tipo_lote" ,"P" ) ; - $obFEmpenhoEmpenhoPagamentoRestosAPagar->setDado("dt_lote" ,$this->stDataPagamento ) ; - $obFEmpenhoEmpenhoPagamentoRestosAPagar->setDado("cod_nota" ,$obRNotaLiquidacao->getCodNota() ); - $obFEmpenhoEmpenhoPagamentoRestosAPagar->setDado("conta_pg" ,$this->obRContabilidadePlanoContaAnalitica->getCodEstrutural() ) ; - $obFEmpenhoEmpenhoPagamentoRestosAPagar->setDado("exerc_rp" ,$obRNotaLiquidacao->roREmpenhoEmpenho->getExercicio() ) ; - - $obFEmpenhoEmpenhoPagamentoRestosAPagar->setDado("exercicio_atual" ,Sessao::getExercicio() ); - $obErro = $obFEmpenhoEmpenhoPagamentoRestosAPagar->recuperaTipoRestosPagar( $rsTipoRestosPagar, '','',$boTransacao); - if ( !$obErro->ocorreu() ) { - $stRestos = $rsTipoRestosPagar->getCampo("tipo_restos"); - $obFEmpenhoEmpenhoPagamentoRestosAPagar->setDado("restos" , $stRestos ); - $obErro = $obFEmpenhoEmpenhoPagamentoRestosAPagar->executaFuncao( $rsFEmpenhoEmpenhoPagamento,'','', $boTransacao ); - if ($obErro->ocorreu()) { - if (strstr($obErro->getDescricao(),"Não foi informado o tipo de Restos")) { - $obErro->setDescricao("Impossível realizar os lançamentos. Verificar o atributo de Restos."); + $obFEmpenhoEmpenhoPagamentoRestosAPagar->setDado("tipo_lote" ,"P" ) ; + $obFEmpenhoEmpenhoPagamentoRestosAPagar->setDado("dt_lote" ,$this->stDataPagamento ) ; + $obFEmpenhoEmpenhoPagamentoRestosAPagar->setDado("cod_nota" ,$obRNotaLiquidacao->getCodNota() ); + $obFEmpenhoEmpenhoPagamentoRestosAPagar->setDado("conta_pg" ,$this->obRContabilidadePlanoContaAnalitica->getCodEstrutural() ) ; + $obFEmpenhoEmpenhoPagamentoRestosAPagar->setDado("exerc_rp" ,$obRNotaLiquidacao->roREmpenhoEmpenho->getExercicio() ) ; + + $obFEmpenhoEmpenhoPagamentoRestosAPagar->setDado("exercicio_atual" ,Sessao::getExercicio() ); + $obErro = $obFEmpenhoEmpenhoPagamentoRestosAPagar->recuperaTipoRestosPagar( $rsTipoRestosPagar, '','',$boTransacao); + + if ( !$obErro->ocorreu() ) { + $stRestos = $rsTipoRestosPagar->getCampo("tipo_restos"); + $obFEmpenhoEmpenhoPagamentoRestosAPagar->setDado("restos" , $stRestos ); + $obErro = $obFEmpenhoEmpenhoPagamentoRestosAPagar->executaFuncao( $rsFEmpenhoEmpenhoPagamento,'','', $boTransacao ); + if ($obErro->ocorreu()) { + if (strstr($obErro->getDescricao(),"Não foi informado o tipo de Restos")) { + $obErro->setDescricao("Impossível realizar os lançamentos. Verificar o atributo de Restos."); + } } + $inCodLote = $obFEmpenhoEmpenhoPagamentoRestosAPagar->getDado("cod_lote"); } - $inCodLote = $obFEmpenhoEmpenhoPagamentoRestosAPagar->getDado("cod_lote"); - } - if (Sessao::getExercicio() > '2008') { - if ( !$obErro->ocorreu() && $inCodPlanoUm != '' && $inCodPlanoDois != '') { - include_once CAM_GF_CONT_MAPEAMENTO."TContabilidadeValorLancamento.class.php"; - $obTContabilidadeValorLancamento = new TContabilidadeValorLancamento; - $obTContabilidadeValorLancamento->setDado("cod_lote", $inCodLote); - $obTContabilidadeValorLancamento->setDado("tipo", 'P'); - $obTContabilidadeValorLancamento->setDado("exercicio", Sessao::getExercicio()); - $obTContabilidadeValorLancamento->setDado("cod_entidade", $obRNotaLiquidacao->roREmpenhoEmpenho->obROrcamentoEntidade->getCodigoEntidade() ); - $obTContabilidadeValorLancamento->setDado("cod_plano_deb",$inCodPlanoDois); - $obTContabilidadeValorLancamento->setDado("cod_plano_cred",$inCodPlanoUm); - $obTContabilidadeValorLancamento->setDado("cod_historico", 917); - $obTContabilidadeValorLancamento->setDado("complemento", $stComplemento); - $obTContabilidadeValorLancamento->setDado("vl_lancamento", $obRNotaLiquidacao->getValorPago()); - - $obErro = $obTContabilidadeValorLancamento->inclusaoPorPl($rsRecordSet, $boTransacao); - $inSequenciaLancamento = $rsRecordSet->getCampo('sequencia'); - } else { - if (!$obErro->getDescricao()) { - $obErro->setDescricao('Contas do compensado não estão cadastradas.'); + if (Sessao::getExercicio() > '2008') { + if ( !$obErro->ocorreu() && $inCodPlanoUm != '' && $inCodPlanoDois != '') { + include_once CAM_GF_CONT_MAPEAMENTO."TContabilidadeValorLancamento.class.php"; + + $obTContabilidadeValorLancamento = new TContabilidadeValorLancamento; + $obTContabilidadeValorLancamento->setDado("cod_lote", $inCodLote); + $obTContabilidadeValorLancamento->setDado("tipo", 'P'); + $obTContabilidadeValorLancamento->setDado("exercicio", Sessao::getExercicio()); + $obTContabilidadeValorLancamento->setDado("cod_entidade", $obRNotaLiquidacao->roREmpenhoEmpenho->obROrcamentoEntidade->getCodigoEntidade() ); + $obTContabilidadeValorLancamento->setDado("cod_plano_deb",$inCodPlanoDois); + $obTContabilidadeValorLancamento->setDado("cod_plano_cred",$inCodPlanoUm); + $obTContabilidadeValorLancamento->setDado("cod_historico", 917); + $obTContabilidadeValorLancamento->setDado("complemento", $stComplemento); + $obTContabilidadeValorLancamento->setDado("vl_lancamento", $obRNotaLiquidacao->getValorPago()); + + $obErro = $obTContabilidadeValorLancamento->inclusaoPorPl($rsRecordSet, $boTransacao); + $inSequenciaLancamento = $rsRecordSet->getCampo('sequencia'); + } else { + if (!$obErro->getDescricao()) { + $obErro->setDescricao('Contas do compensado não estão cadastradas.'); + } } } + $inCodHistoricoAdiantamento = 917; } - $inCodHistoricoAdiantamento = 917; - } - if ( !$obErro->ocorreu() ) { - - $this->arLotes[] = Array( 'cod_lote' => $inCodLote, 'cod_nota' => $obRNotaLiquidacao->getCodNota(), 'timestamp' => $obRNotaLiquidacao->stTimestamp ); - - $obFEmpenhoEmpenhoPagamento->setDado("cod_lote" , "" ); - $obFEmpenhoEmpenhoPagamentoRestosAPagar->setDado( "cod_lote", "" ); - $obTContabilidadeLancamentoEmpenho->setDado("cod_lote" ,$inCodLote ); - $obTContabilidadeLancamentoEmpenho->setDado("tipo" ,"P" ); - $inSequencia = $rsFEmpenhoEmpenhoPagamento->getCampo("sequencia") ; - $obTContabilidadeLancamentoEmpenho->setDado("sequencia" , $inSequencia ); - $obTContabilidadeLancamentoEmpenho->setDado("exercicio" ,substr($this->stTimestamp,0,4) ); - $obTContabilidadeLancamentoEmpenho->setDado("cod_entidade",$obRNotaLiquidacao->roREmpenhoEmpenho->obROrcamentoEntidade->getCodigoEntidade() ); - $obTContabilidadeLancamentoEmpenho->setDado("estorno" ,"false" ) ; - $obErro = $obTContabilidadeLancamentoEmpenho->inclusao( $boTransacao ); - if ( !$obErro->ocorreu() ) { - $obTContabilidadePagamento->setDado("exercicio" ,substr($this->stTimestamp,0,4)); - $obTContabilidadePagamento->setDado("exercicio_liquidacao" ,$obRNotaLiquidacao->getExercicio() ); - $obTContabilidadePagamento->setDado("sequencia" ,$inSequencia ); - $obTContabilidadePagamento->setDado("tipo" ,"P" ); - $obTContabilidadePagamento->setDado("cod_lote" ,$inCodLote ); - $obTContabilidadePagamento->setDado("cod_entidade",$obRNotaLiquidacao->roREmpenhoEmpenho->obROrcamentoEntidade->getCodigoEntidade() ); - $obTContabilidadePagamento->setDado("cod_nota" ,$obRNotaLiquidacao->getCodNota() ); - $obTContabilidadePagamento->setDado("timestamp" ,$this->stTimestamp ) ; - $obErro = $obTContabilidadePagamento->inclusao( $boTransacao ); - } - } - - /* PAGAMENTO ADIANTAMENTOS & SUBVENCOES */ - $codCategoria = $obRNotaLiquidacao->roREmpenhoEmpenho->getCodCategoria(); - if ($codCategoria == 2 || $codCategoria == 3) { - include_once ( CAM_GF_CONT_MAPEAMENTO."TContabilidadeValorLancamento.class.php" ); - include_once( TEMP."TEmpenhoResponsavelAdiantamento.class.php"); - $obTEmpenhoResponsavelAdiantamento = new TEmpenhoResponsavelAdiantamento(); - $stFiltro = " WHERE exercicio = '".Sessao::getExercicio()."' AND numcgm = ".$obRNotaLiquidacao->roREmpenhoEmpenho->obRCGM->getNumCGM(); - $obErro = $obTEmpenhoResponsavelAdiantamento->recuperaTodos($rsContas,$stFiltro,'',$boTransacao); - if (!$obErro->ocorreu()) { - - $stContaContrapartida = $rsContas->getCampo('conta_contrapartida'); - $stContaLancamento = $rsContas->getCampo('conta_lancamento'); - - $obTContabilidadeValorLancamento = new TContabilidadeValorLancamento; - $obTContabilidadeValorLancamento->setDado( "cod_lote" , $inCodLote ); - $obTContabilidadeValorLancamento->setDado( "tipo" , 'P' ); - $obTContabilidadeValorLancamento->setDado( "exercicio" , Sessao::getExercicio());//$obRNotaLiquidacao->getExercicio() ); - $obTContabilidadeValorLancamento->setDado( "cod_entidade" , $obRNotaLiquidacao->roREmpenhoEmpenho->obROrcamentoEntidade->getCodigoEntidade() ); - $obTContabilidadeValorLancamento->setDado( "cod_plano_deb" , $stContaLancamento ); - $obTContabilidadeValorLancamento->setDado( "cod_plano_cred", $stContaContrapartida ); - $obTContabilidadeValorLancamento->setDado( "cod_historico" , $inCodHistoricoAdiantamento ); - $obTContabilidadeValorLancamento->setDado( "complemento" , $obRNotaLiquidacao->roREmpenhoEmpenho->getCodEmpenho()."/$arDataPagamento[2]" ); - $obTContabilidadeValorLancamento->setDado( "vl_lancamento" , $obRNotaLiquidacao->getValorPago() ); + if ( !$obErro->ocorreu() ) { + + $this->arLotes[] = Array( 'cod_lote' => $inCodLote, 'cod_nota' => $obRNotaLiquidacao->getCodNota(), 'timestamp' => $obRNotaLiquidacao->stTimestamp ); + + $obFEmpenhoEmpenhoPagamento->setDado("cod_lote" , "" ); + $obFEmpenhoEmpenhoPagamentoRestosAPagar->setDado( "cod_lote", "" ); + $obTContabilidadeLancamentoEmpenho->setDado("cod_lote" ,$inCodLote ); + $obTContabilidadeLancamentoEmpenho->setDado("tipo" ,"P" ); + $inSequencia = $rsFEmpenhoEmpenhoPagamento->getCampo("sequencia") ; + $obTContabilidadeLancamentoEmpenho->setDado("sequencia" , $inSequencia ); + $obTContabilidadeLancamentoEmpenho->setDado("exercicio" ,substr($this->stTimestamp,0,4) ); + $obTContabilidadeLancamentoEmpenho->setDado("cod_entidade",$obRNotaLiquidacao->roREmpenhoEmpenho->obROrcamentoEntidade->getCodigoEntidade() ); + $obTContabilidadeLancamentoEmpenho->setDado("estorno" ,"false" ) ; + $obErro = $obTContabilidadeLancamentoEmpenho->inclusao( $boTransacao ); + if ( !$obErro->ocorreu() ) { + $obTContabilidadePagamento->setDado("exercicio" ,substr($this->stTimestamp,0,4)); + $obTContabilidadePagamento->setDado("exercicio_liquidacao" ,$obRNotaLiquidacao->getExercicio() ); + $obTContabilidadePagamento->setDado("sequencia" ,$inSequencia ); + $obTContabilidadePagamento->setDado("tipo" ,"P" ); + $obTContabilidadePagamento->setDado("cod_lote" ,$inCodLote ); + $obTContabilidadePagamento->setDado("cod_entidade",$obRNotaLiquidacao->roREmpenhoEmpenho->obROrcamentoEntidade->getCodigoEntidade() ); + $obTContabilidadePagamento->setDado("cod_nota" ,$obRNotaLiquidacao->getCodNota() ); + $obTContabilidadePagamento->setDado("timestamp" ,$this->stTimestamp ) ; + $obErro = $obTContabilidadePagamento->inclusao( $boTransacao ); + } + } - $obErro = $obTContabilidadeValorLancamento->inclusaoPorPl( $rsRecordSet, $boTransacao ); + /* PAGAMENTO ADIANTAMENTOS & SUBVENCOES */ + $codCategoria = $obRNotaLiquidacao->roREmpenhoEmpenho->getCodCategoria(); + + if ($codCategoria == 2 || $codCategoria == 3) { + include_once ( CAM_GF_CONT_MAPEAMENTO."TContabilidadeValorLancamento.class.php" ); + include_once( TEMP."TEmpenhoResponsavelAdiantamento.class.php"); + $obTEmpenhoResponsavelAdiantamento = new TEmpenhoResponsavelAdiantamento(); + $stFiltro = " WHERE exercicio = '".Sessao::getExercicio()."' AND numcgm = ".$obRNotaLiquidacao->roREmpenhoEmpenho->obRCGM->getNumCGM(); + $obErro = $obTEmpenhoResponsavelAdiantamento->recuperaTodos($rsContas,$stFiltro,'',$boTransacao); + + if (!$obErro->ocorreu()) { + + $stContaContrapartida = $rsContas->getCampo('conta_contrapartida'); + $stContaLancamento = $rsContas->getCampo('conta_lancamento'); + + $obTContabilidadeValorLancamento = new TContabilidadeValorLancamento; + $obTContabilidadeValorLancamento->setDado( "cod_lote" , $inCodLote ); + $obTContabilidadeValorLancamento->setDado( "tipo" , 'P' ); + $obTContabilidadeValorLancamento->setDado( "exercicio" , Sessao::getExercicio());//$obRNotaLiquidacao->getExercicio() ); + $obTContabilidadeValorLancamento->setDado( "cod_entidade" , $obRNotaLiquidacao->roREmpenhoEmpenho->obROrcamentoEntidade->getCodigoEntidade() ); + $obTContabilidadeValorLancamento->setDado( "cod_plano_deb" , $stContaLancamento ); + $obTContabilidadeValorLancamento->setDado( "cod_plano_cred", $stContaContrapartida ); + $obTContabilidadeValorLancamento->setDado( "cod_historico" , $inCodHistoricoAdiantamento ); + $obTContabilidadeValorLancamento->setDado( "complemento" , $obRNotaLiquidacao->roREmpenhoEmpenho->getCodEmpenho()."/$arDataPagamento[2]" ); + $obTContabilidadeValorLancamento->setDado( "vl_lancamento" , $obRNotaLiquidacao->getValorPago() ); + + $obErro = $obTContabilidadeValorLancamento->inclusaoPorPl( $rsRecordSet, $boTransacao ); + } } - } + /* RETENÇÕES */ + if (!$obErro->ocorreu() && $this->obREmpenhoOrdemPagamento->getRetencao() && !$this->obREmpenhoOrdemPagamento->boRetencaoExecutada) { + include_once ( CAM_GF_EMP_MAPEAMENTO."TEmpenhoOrdemPagamentoRetencao.class.php" ); + include_once ( CAM_GF_CONT_MAPEAMENTO."TContabilidadeValorLancamento.class.php" ); + include_once ( CAM_GF_CONT_MAPEAMENTO."TContabilidadeLancamentoRetencao.class.php" ); + include_once ( CAM_GA_ADM_MAPEAMENTO.'TAdministracaoConfiguracaoEntidade.class.php'); + include_once ( CAM_GF_EMP_MAPEAMENTO. "TEmpenhoNotaLiquidacaoPaga.class.php" ); + include_once ( CAM_GF_EMP_MAPEAMENTO. "TEmpenhoNotaLiquidacaoContaPagadora.class.php" ); + include_once ( CAM_GF_EMP_MAPEAMENTO. "TEmpenhoPagamentoLiquidacaoNotaLiquidacaoPaga.class.php" ); + + $obTContabilidadeLancamentoRetencao = new TContabilidadeLancamentoRetencao; + $obTContabilidadeValorLancamento = new TContabilidadeValorLancamento; + $obTAdministracaoConfiguracaoEntidade = new TAdministracaoConfiguracaoEntidade; + $obTEmpenhoNotaLiquidacaoPagaRet = new TEmpenhoNotaLiquidacaoPaga; + $obTEmpenhoNotaLiquidacaoContaPagadoraRet = new TEmpenhoNotaLiquidacaoContaPagadora; + $obTEmpenhoPagamentoLiquidacaoNotaLiquidacaoPagaRet = new TEmpenhoPagamentoLiquidacaoNotaLiquidacaoPaga; + + $inCodEntidade = $obRNotaLiquidacao->roREmpenhoEmpenho->obROrcamentoEntidade->getCodigoEntidade(); + $stFiltroConta = " WHERE parametro = 'conta_caixa' AND cod_entidade = ".$inCodEntidade." AND exercicio = '".substr($this->stTimestamp,0,4)."' "; + $obErro = $obTAdministracaoConfiguracaoEntidade->recuperaTodos($rsContas, $stFiltroConta, '', $boTransacao); + + if (!$obErro->ocorreu() && !$rsContas->EOF() && $rsContas->getNumLinhas() == 1) { + include_once ( CAM_GF_CONT_NEGOCIO."RContabilidadePlanoContaAnalitica.class.php" ); + $obContaAnalitica = new RContabilidadePlanoContaAnalitica; + $obContaAnalitica->setCodPlano( $rsContas->getCampo('valor') ); + $obContaAnalitica->setExercicio( substr($this->stTimestamp,0,4) ); + $obErro = $obContaAnalitica->consultar( $boTransacao ); + $stCodEstruturalCaixa = $obContaAnalitica->getCodEstrutural(); + $inCodPlanoCaixa = $obContaAnalitica->getCodPlano(); + } - /* RETENÇÕES */ - if (!$obErro->ocorreu() && $this->obREmpenhoOrdemPagamento->getRetencao() && !$this->obREmpenhoOrdemPagamento->boRetencaoExecutada) { - include_once ( CAM_GF_EMP_MAPEAMENTO."TEmpenhoOrdemPagamentoRetencao.class.php" ); - include_once ( CAM_GF_CONT_MAPEAMENTO."TContabilidadeValorLancamento.class.php" ); - include_once ( CAM_GF_CONT_MAPEAMENTO."TContabilidadeLancamentoRetencao.class.php" ); - include_once ( CAM_GA_ADM_MAPEAMENTO.'TAdministracaoConfiguracaoEntidade.class.php'); - include_once ( CAM_GF_EMP_MAPEAMENTO. "TEmpenhoNotaLiquidacaoPaga.class.php" ); - include_once ( CAM_GF_EMP_MAPEAMENTO. "TEmpenhoNotaLiquidacaoContaPagadora.class.php" ); - include_once ( CAM_GF_EMP_MAPEAMENTO. "TEmpenhoPagamentoLiquidacaoNotaLiquidacaoPaga.class.php" ); - - $obTContabilidadeLancamentoRetencao = new TContabilidadeLancamentoRetencao; - $obTContabilidadeValorLancamento = new TContabilidadeValorLancamento; - $obTAdministracaoConfiguracaoEntidade = new TAdministracaoConfiguracaoEntidade; - $obTEmpenhoNotaLiquidacaoPagaRet = new TEmpenhoNotaLiquidacaoPaga; - $obTEmpenhoNotaLiquidacaoContaPagadoraRet = new TEmpenhoNotaLiquidacaoContaPagadora; - $obTEmpenhoPagamentoLiquidacaoNotaLiquidacaoPagaRet = new TEmpenhoPagamentoLiquidacaoNotaLiquidacaoPaga; - - $inCodEntidade = $obRNotaLiquidacao->roREmpenhoEmpenho->obROrcamentoEntidade->getCodigoEntidade(); - $stFiltroConta = " WHERE parametro = 'conta_caixa' AND cod_entidade = ".$inCodEntidade." AND exercicio = '".substr($this->stTimestamp,0,4)."' "; - $obErro = $obTAdministracaoConfiguracaoEntidade->recuperaTodos($rsContas, $stFiltroConta, '', $boTransacao); - if (!$obErro->ocorreu() && !$rsContas->EOF() && $rsContas->getNumLinhas() == 1) { - include_once ( CAM_GF_CONT_NEGOCIO."RContabilidadePlanoContaAnalitica.class.php" ); - $obContaAnalitica = new RContabilidadePlanoContaAnalitica; - $obContaAnalitica->setCodPlano( $rsContas->getCampo('valor') ); - $obContaAnalitica->setExercicio( substr($this->stTimestamp,0,4) ); - $obErro = $obContaAnalitica->consultar( $boTransacao ); - $stCodEstruturalCaixa = $obContaAnalitica->getCodEstrutural(); - $inCodPlanoCaixa = $obContaAnalitica->getCodPlano(); - } - $inCountTime = 0; - $inCountPagamentoRetencao = 0; - if ($stCodEstruturalCaixa && $inCodPlanoCaixa && !$obErro->ocorreu() ) { - // Efetua o lançamento das arrecadações (quando não for pela tesouraria) e pgtos ref. Retenções - foreach ( $this->obREmpenhoOrdemPagamento->getRetencoes() as $arRetencao ) { - // Timestamp diferente para cada pgto de retenção com a conta caixa. - $arTmp = explode(' ',$this->stTimestamp); - $arData = explode('-',$arTmp[0]); - $arHora = explode(':',$arTmp[1]); - - // Adiciona 0.010 no milissegundo - $inCountTime = $inCountTime + 0.010; - $arHora[2] = bcadd($arHora[2], $inCountTime, 4); - $arHoraTmp = explode('.', $arHora[2]); - $arHoraTmp[0] = str_pad($arHoraTmp[0], 2, 0, STR_PAD_LEFT); - - $stTimestampPagamentoCtaCaixa = $arData[0]."-".$arData[1]."-".$arData[2]." ".$arHora[0].":".$arHora[1].":".$arHoraTmp[0].".".$arHoraTmp[1]; - - $this->arPagamentosRetencao[$inCountPagamentoRetencao]['cod_nota'] = $obRNotaLiquidacao->getCodNota(); - $this->arPagamentosRetencao[$inCountPagamentoRetencao]['timestamp'] = $stTimestampPagamentoCtaCaixa; - $this->arPagamentosRetencao[$inCountPagamentoRetencao]['exercicio'] = $obRNotaLiquidacao->getExercicio(); - $this->arPagamentosRetencao[$inCountPagamentoRetencao]['cod_entidade'] = $inCodEntidade; - $this->arPagamentosRetencao[$inCountPagamentoRetencao]['cod_plano'] = $inCodPlanoCaixa; - $inCountPagamentoRetencao++; - - // PAGAMENTOS USANDO A CONTA CAIXA - if (!$stRestos) { // Empenho do exercicio - $obFEmpenhoEmpenhoPagamento->setDado("cod_lote" , "" ); - $obFEmpenhoEmpenhoPagamento->setDado("conta_pagamento_financ", $stCodEstruturalCaixa ); - if (SistemaLegado::is_tcems($boTransacao)) { - $obFEmpenhoEmpenhoPagamento->setDado("cod_plano_credito", $inCodPlanoCaixa ); + $inCountTime = 0; + $inCountPagamentoRetencao = 0; + + if ($stCodEstruturalCaixa && $inCodPlanoCaixa && !$obErro->ocorreu() ) { + // Efetua o lançamento das arrecadações (quando não for pela tesouraria) e pgtos ref. Retenções + foreach ( $this->obREmpenhoOrdemPagamento->getRetencoes() as $arRetencao ) { + // Timestamp diferente para cada pgto de retenção com a conta caixa. + $arTmp = explode(' ',$this->stTimestamp); + $arData = explode('-',$arTmp[0]); + $arHora = explode(':',$arTmp[1]); + + // Adiciona 0.010 no milissegundo + $inCountTime = $inCountTime + 0.010; + $arHora[2] = bcadd($arHora[2], $inCountTime, 4); + $arHoraTmp = explode('.', $arHora[2]); + $arHoraTmp[0] = str_pad($arHoraTmp[0], 2, 0, STR_PAD_LEFT); + + $stTimestampPagamentoCtaCaixa = $arData[0]."-".$arData[1]."-".$arData[2]." ".$arHora[0].":".$arHora[1].":".$arHoraTmp[0].".".$arHoraTmp[1]; + + $this->arPagamentosRetencao[$inCountPagamentoRetencao]['cod_nota'] = $obRNotaLiquidacao->getCodNota(); + $this->arPagamentosRetencao[$inCountPagamentoRetencao]['timestamp'] = $stTimestampPagamentoCtaCaixa; + $this->arPagamentosRetencao[$inCountPagamentoRetencao]['exercicio'] = $obRNotaLiquidacao->getExercicio(); + $this->arPagamentosRetencao[$inCountPagamentoRetencao]['cod_entidade'] = $inCodEntidade; + $this->arPagamentosRetencao[$inCountPagamentoRetencao]['cod_plano'] = $inCodPlanoCaixa; + $inCountPagamentoRetencao++; + + // PAGAMENTOS USANDO A CONTA CAIXA + if (!$stRestos) { // Empenho do exercicio + $obFEmpenhoEmpenhoPagamento->setDado("cod_lote" , "" ); + $obFEmpenhoEmpenhoPagamento->setDado("conta_pagamento_financ", $stCodEstruturalCaixa ); + if (Sessao::getExercicio() > '2012') { + $obFEmpenhoEmpenhoPagamento->setDado("cod_plano_credito", $inCodPlanoCaixa ); + } + $obFEmpenhoEmpenhoPagamento->setDado("valor", $arRetencao['vl_retencao']); + $obErro = $obFEmpenhoEmpenhoPagamento->executaFuncao( $rsFEmpenhoEmpenhoPagamento, $boTransacao ); + $inCodLotePgto = $obFEmpenhoEmpenhoPagamento->getDado('cod_lote'); + $inSequenciaPgto = $obFEmpenhoEmpenhoPagamento->getDado('sequencia'); + $inCodHistorico = 903; + } else { // Empenho do exercicio anterior + $obFEmpenhoEmpenhoPagamentoRestosAPagar->setDado("cod_lote", "" ); + $obFEmpenhoEmpenhoPagamentoRestosAPagar->setDado("conta_pg", $stCodEstruturalCaixa ); + $obFEmpenhoEmpenhoPagamentoRestosAPagar->setDado("valor" , $arRetencao['vl_retencao']); + $obErro = $obFEmpenhoEmpenhoPagamentoRestosAPagar->executaFuncao( $rsFEmpenhoEmpenhoPagamento,'','', $boTransacao ); + $inCodLotePgto = $obFEmpenhoEmpenhoPagamentoRestosAPagar->getDado('cod_lote'); + $inSequenciaPgto = $obFEmpenhoEmpenhoPagamentoRestosAPagar->getDado('sequencia'); + $inCodHistorico = 917; } - $obFEmpenhoEmpenhoPagamento->setDado("valor", $arRetencao['vl_retencao']); - $obErro = $obFEmpenhoEmpenhoPagamento->executaFuncao( $rsFEmpenhoEmpenhoPagamento, $boTransacao ); - $inCodLotePgto = $obFEmpenhoEmpenhoPagamento->getDado('cod_lote'); - $inSequenciaPgto = $obFEmpenhoEmpenhoPagamento->getDado('sequencia'); - $inCodHistorico = 903; - } else { // Empenho do exercicio anterior - $obFEmpenhoEmpenhoPagamentoRestosAPagar->setDado("cod_lote", "" ); - $obFEmpenhoEmpenhoPagamentoRestosAPagar->setDado("conta_pg", $stCodEstruturalCaixa ); - $obFEmpenhoEmpenhoPagamentoRestosAPagar->setDado("valor" , $arRetencao['vl_retencao']); - $obErro = $obFEmpenhoEmpenhoPagamentoRestosAPagar->executaFuncao( $rsFEmpenhoEmpenhoPagamento,'','', $boTransacao ); - $inCodLotePgto = $obFEmpenhoEmpenhoPagamentoRestosAPagar->getDado('cod_lote'); - $inSequenciaPgto = $obFEmpenhoEmpenhoPagamentoRestosAPagar->getDado('sequencia'); - $inCodHistorico = 917; - } - if (Sessao::getExercicio() > '2008') { - if ( !$obErro->ocorreu() && $inCodPlanoUm != '' && $inCodPlanoDois != '') { - include_once CAM_GF_CONT_MAPEAMENTO."TContabilidadeValorLancamento.class.php"; - - $obTContabilidadeValorLancamento = new TContabilidadeValorLancamento; - $obTContabilidadeValorLancamento->setDado("cod_lote", $inCodLotePgto); - $obTContabilidadeValorLancamento->setDado("tipo", 'P'); - $obTContabilidadeValorLancamento->setDado("exercicio", Sessao::getExercicio());//$obRNotaLiquidacao->getExercicio()); - $obTContabilidadeValorLancamento->setDado("cod_entidade", $inCodEntidade); - $obTContabilidadeValorLancamento->setDado("cod_plano_deb", $inCodPlanoDois); - $obTContabilidadeValorLancamento->setDado("cod_plano_cred", $inCodPlanoUm); - $obTContabilidadeValorLancamento->setDado("cod_historico", $inCodHistorico); - $obTContabilidadeValorLancamento->setDado("complemento", $stComplemento); - $obTContabilidadeValorLancamento->setDado("vl_lancamento", $arRetencao['vl_retencao']); - - $obErro = $obTContabilidadeValorLancamento->inclusaoPorPl($rsRecordSet, $boTransacao); - $inSequenciaLancamento = $rsRecordSet->getCampo('sequencia'); - } else { - if (!$obErro->getDescricao()) { - $obErro->setDescricao('Contas do compensado não estão cadastradas.'); + if (Sessao::getExercicio() > '2008') { + if ( !$obErro->ocorreu() && $inCodPlanoUm != '' && $inCodPlanoDois != '') { + include_once CAM_GF_CONT_MAPEAMENTO."TContabilidadeValorLancamento.class.php"; + + $obTContabilidadeValorLancamento = new TContabilidadeValorLancamento; + $obTContabilidadeValorLancamento->setDado("cod_lote", $inCodLotePgto); + $obTContabilidadeValorLancamento->setDado("tipo", 'P'); + $obTContabilidadeValorLancamento->setDado("exercicio", Sessao::getExercicio());//$obRNotaLiquidacao->getExercicio()); + $obTContabilidadeValorLancamento->setDado("cod_entidade", $inCodEntidade); + $obTContabilidadeValorLancamento->setDado("cod_plano_deb", $inCodPlanoDois); + $obTContabilidadeValorLancamento->setDado("cod_plano_cred", $inCodPlanoUm); + $obTContabilidadeValorLancamento->setDado("cod_historico", $inCodHistorico); + $obTContabilidadeValorLancamento->setDado("complemento", $stComplemento); + $obTContabilidadeValorLancamento->setDado("vl_lancamento", $arRetencao['vl_retencao']); + + $obErro = $obTContabilidadeValorLancamento->inclusaoPorPl($rsRecordSet, $boTransacao); + $inSequenciaLancamento = $rsRecordSet->getCampo('sequencia'); + } else { + if (!$obErro->getDescricao()) { + $obErro->setDescricao('Contas do compensado não estão cadastradas.'); + } } } - } - if ($inCodLotePgto && !$obErro->ocorreu()) { - $obTContabilidadeLancamentoEmpenho->setDado("cod_lote" ,$inCodLotePgto ); - $obTContabilidadeLancamentoEmpenho->setDado("tipo" ,"P" ); - $obTContabilidadeLancamentoEmpenho->setDado("sequencia" , $inSequenciaPgto ); - $obTContabilidadeLancamentoEmpenho->setDado("exercicio" ,substr($this->stTimestamp,0,4) ); - $obTContabilidadeLancamentoEmpenho->setDado("cod_entidade", $inCodEntidade ); - $obTContabilidadeLancamentoEmpenho->setDado("estorno" ,"false" ) ; - $obErro = $obTContabilidadeLancamentoEmpenho->inclusao( $boTransacao ); - if ( !$obErro->ocorreu() ) { - $obTEmpenhoNotaLiquidacaoPagaRet->setDado( 'cod_entidade', $inCodEntidade ); - $obTEmpenhoNotaLiquidacaoPagaRet->setDado( 'cod_nota' , $obRNotaLiquidacao->getCodNota() ); - $obTEmpenhoNotaLiquidacaoPagaRet->setDado( 'exercicio' , $obRNotaLiquidacao->getExercicio() ); - $obTEmpenhoNotaLiquidacaoPagaRet->setDado( 'timestamp' , $stTimestampPagamentoCtaCaixa ); - $obTEmpenhoNotaLiquidacaoPagaRet->setDado( 'vl_pago' , $arRetencao['vl_retencao'] ); - $obTEmpenhoNotaLiquidacaoPagaRet->setDado( 'observacao' , $this->stObservacao -); - $obErro = $obTEmpenhoNotaLiquidacaoPagaRet->inclusao( $boTransacao ); - - if (!$obErro->ocorreu()) { - $obTContabilidadePagamento->setDado("exercicio" ,substr($this->stTimestamp,0,4)); - $obTContabilidadePagamento->setDado("exercicio_liquidacao" ,$obRNotaLiquidacao->getExercicio() ); - $obTContabilidadePagamento->setDado("sequencia" ,$inSequenciaPgto ); - $obTContabilidadePagamento->setDado("tipo" ,"P" ); - $obTContabilidadePagamento->setDado("cod_lote" ,$inCodLotePgto ); - $obTContabilidadePagamento->setDado("cod_entidade", $inCodEntidade ); - $obTContabilidadePagamento->setDado("cod_nota" ,$obRNotaLiquidacao->getCodNota() ); - $obTContabilidadePagamento->setDado("timestamp" ,$stTimestampPagamentoCtaCaixa ) ; - $obErro = $obTContabilidadePagamento->inclusao( $boTransacao ); - if (!$obErro->ocorreu()) { - $obTContabilidadeLancamentoRetencao->setDado('cod_lote' , $inCodLotePgto ); - $obTContabilidadeLancamentoRetencao->setDado( "tipo" , 'P' ); - $obTContabilidadeLancamentoRetencao->setDado('cod_entidade', $inCodEntidade); - $obTContabilidadeLancamentoRetencao->setDado('exercicio', $arDataPagamento[2] ); - $obTContabilidadeLancamentoRetencao->setDado('sequencia', $inSequenciaPgto ); - $obTContabilidadeLancamentoRetencao->setDado('cod_ordem', $this->obREmpenhoOrdemPagamento->getCodigoOrdem() ); - $obTContabilidadeLancamentoRetencao->setDado('cod_plano', $arRetencao['cod_plano'] ); - $obTContabilidadeLancamentoRetencao->setDado('exercicio_retencao', $arRetencao['exercicio'] ); - $obTContabilidadeLancamentoRetencao->setDado('sequencial', $arRetencao['sequencial']); - - $obErro = $obTContabilidadeLancamentoRetencao->inclusao( $boTransacao ); - - if (!$obErro->ocorreu()) { - $obTEmpenhoNotaLiquidacaoContaPagadoraRet->setDado("cod_nota" ,$obRNotaLiquidacao->getCodNota() ); - $obTEmpenhoNotaLiquidacaoContaPagadoraRet->setDado("cod_entidade" ,$obRNotaLiquidacao->roREmpenhoEmpenho->obROrcamentoEntidade->getCodigoEntidade() ); - $obTEmpenhoNotaLiquidacaoContaPagadoraRet->setDado("exercicio_liquidacao" ,$obRNotaLiquidacao->getExercicio() ); - $obTEmpenhoNotaLiquidacaoContaPagadoraRet->setDado("timestamp" ,$stTimestampPagamentoCtaCaixa ); - $obTEmpenhoNotaLiquidacaoContaPagadoraRet->setDado("exercicio" -,$this->obRContabilidadePlanoContaAnalitica->getExercicio() ); - $obTEmpenhoNotaLiquidacaoContaPagadoraRet->setDado("cod_plano" ,$inCodPlanoCaixa ); - $obErro = $obTEmpenhoNotaLiquidacaoContaPagadoraRet->inclusao($boTransacao); - - if (!$obErro->ocorreu()) { - $obTEmpenhoPagamentoLiquidacaoNotaLiquidacaoPagaRet->setDado( 'cod_entidade', $obRNotaLiquidacao->roREmpenhoEmpenho->obROrcamentoEntidade->getCodigoEntidade() ); - $obTEmpenhoPagamentoLiquidacaoNotaLiquidacaoPagaRet->setDado( 'cod_nota' , $obRNotaLiquidacao->getCodNota() ); - $obTEmpenhoPagamentoLiquidacaoNotaLiquidacaoPagaRet->setDado( 'exercicio' -, $this->obREmpenhoOrdemPagamento->getExercicio() ); - $obTEmpenhoPagamentoLiquidacaoNotaLiquidacaoPagaRet->setDado( 'timestamp' , $stTimestampPagamentoCtaCaixa ); - $obTEmpenhoPagamentoLiquidacaoNotaLiquidacaoPagaRet->setDado( -'exercicio_liquidacao' , $obRNotaLiquidacao->getExercicio() ); - $obTEmpenhoPagamentoLiquidacaoNotaLiquidacaoPagaRet->setDado( 'cod_ordem' , $this->obREmpenhoOrdemPagamento->getCodigoOrdem() ); - $obErro = $obTEmpenhoPagamentoLiquidacaoNotaLiquidacaoPagaRet->inclusao( $boTransacao ); - } + if ($inCodLotePgto && !$obErro->ocorreu()) { + $obTContabilidadeLancamentoEmpenho->setDado("cod_lote" ,$inCodLotePgto ); + $obTContabilidadeLancamentoEmpenho->setDado("tipo" ,"P" ); + $obTContabilidadeLancamentoEmpenho->setDado("sequencia" , $inSequenciaPgto ); + $obTContabilidadeLancamentoEmpenho->setDado("exercicio" ,substr($this->stTimestamp,0,4) ); + $obTContabilidadeLancamentoEmpenho->setDado("cod_entidade", $inCodEntidade ); + $obTContabilidadeLancamentoEmpenho->setDado("estorno" ,"false" ) ; + $obErro = $obTContabilidadeLancamentoEmpenho->inclusao( $boTransacao ); + + if ( !$obErro->ocorreu() ) { + $obTEmpenhoNotaLiquidacaoPagaRet->setDado( 'cod_entidade', $inCodEntidade ); + $obTEmpenhoNotaLiquidacaoPagaRet->setDado( 'cod_nota' , $obRNotaLiquidacao->getCodNota() ); + $obTEmpenhoNotaLiquidacaoPagaRet->setDado( 'exercicio' , $obRNotaLiquidacao->getExercicio() ); + $obTEmpenhoNotaLiquidacaoPagaRet->setDado( 'timestamp' , $stTimestampPagamentoCtaCaixa ); + $obTEmpenhoNotaLiquidacaoPagaRet->setDado( 'vl_pago' , $arRetencao['vl_retencao'] ); + $obTEmpenhoNotaLiquidacaoPagaRet->setDado( 'observacao' , $this->stObservacao ); + $obErro = $obTEmpenhoNotaLiquidacaoPagaRet->inclusao( $boTransacao ); + + if (!$obErro->ocorreu()) { + $obTContabilidadePagamento->setDado("exercicio" ,substr($this->stTimestamp,0,4)); + $obTContabilidadePagamento->setDado("exercicio_liquidacao" ,$obRNotaLiquidacao->getExercicio() ); + $obTContabilidadePagamento->setDado("sequencia" ,$inSequenciaPgto ); + $obTContabilidadePagamento->setDado("tipo" ,"P" ); + $obTContabilidadePagamento->setDado("cod_lote" ,$inCodLotePgto ); + $obTContabilidadePagamento->setDado("cod_entidade", $inCodEntidade ); + $obTContabilidadePagamento->setDado("cod_nota" ,$obRNotaLiquidacao->getCodNota() ); + $obTContabilidadePagamento->setDado("timestamp" ,$stTimestampPagamentoCtaCaixa ) ; + $obErro = $obTContabilidadePagamento->inclusao( $boTransacao ); + + if (!$obErro->ocorreu()) { + $obTContabilidadeLancamentoRetencao->setDado('cod_lote' , $inCodLotePgto ); + $obTContabilidadeLancamentoRetencao->setDado( "tipo" , 'P' ); + $obTContabilidadeLancamentoRetencao->setDado('cod_entidade', $inCodEntidade); + $obTContabilidadeLancamentoRetencao->setDado('exercicio', $arDataPagamento[2] ); + $obTContabilidadeLancamentoRetencao->setDado('sequencia', $inSequenciaPgto ); + $obTContabilidadeLancamentoRetencao->setDado('cod_ordem', $this->obREmpenhoOrdemPagamento->getCodigoOrdem() ); + $obTContabilidadeLancamentoRetencao->setDado('cod_plano', $arRetencao['cod_plano'] ); + $obTContabilidadeLancamentoRetencao->setDado('exercicio_retencao', $arRetencao['exercicio'] ); + $obTContabilidadeLancamentoRetencao->setDado('sequencial', $arRetencao['sequencial']); + $obErro = $obTContabilidadeLancamentoRetencao->inclusao( $boTransacao ); + + if (!$obErro->ocorreu()) { + $obTEmpenhoNotaLiquidacaoContaPagadoraRet->setDado("cod_nota" ,$obRNotaLiquidacao->getCodNota() ); + $obTEmpenhoNotaLiquidacaoContaPagadoraRet->setDado("cod_entidade" ,$obRNotaLiquidacao->roREmpenhoEmpenho->obROrcamentoEntidade->getCodigoEntidade() ); + $obTEmpenhoNotaLiquidacaoContaPagadoraRet->setDado("exercicio_liquidacao" ,$obRNotaLiquidacao->getExercicio() ); + $obTEmpenhoNotaLiquidacaoContaPagadoraRet->setDado("timestamp" ,$stTimestampPagamentoCtaCaixa ); + $obTEmpenhoNotaLiquidacaoContaPagadoraRet->setDado("exercicio" ,$this->obRContabilidadePlanoContaAnalitica->getExercicio() ); + $obTEmpenhoNotaLiquidacaoContaPagadoraRet->setDado("cod_plano" ,$inCodPlanoCaixa ); + $obErro = $obTEmpenhoNotaLiquidacaoContaPagadoraRet->inclusao($boTransacao); + + if (!$obErro->ocorreu()) { + $obTEmpenhoPagamentoLiquidacaoNotaLiquidacaoPagaRet->setDado( 'cod_entidade' , $obRNotaLiquidacao->roREmpenhoEmpenho->obROrcamentoEntidade->getCodigoEntidade() ); + $obTEmpenhoPagamentoLiquidacaoNotaLiquidacaoPagaRet->setDado( 'cod_nota' , $obRNotaLiquidacao->getCodNota() ); + $obTEmpenhoPagamentoLiquidacaoNotaLiquidacaoPagaRet->setDado( 'exercicio' , $this->obREmpenhoOrdemPagamento->getExercicio() ); + $obTEmpenhoPagamentoLiquidacaoNotaLiquidacaoPagaRet->setDado( 'timestamp' , $stTimestampPagamentoCtaCaixa ); + $obTEmpenhoPagamentoLiquidacaoNotaLiquidacaoPagaRet->setDado( 'exercicio_liquidacao' , $obRNotaLiquidacao->getExercicio() ); + $obTEmpenhoPagamentoLiquidacaoNotaLiquidacaoPagaRet->setDado( 'cod_ordem' , $this->obREmpenhoOrdemPagamento->getCodigoOrdem() ); + $obErro = $obTEmpenhoPagamentoLiquidacaoNotaLiquidacaoPagaRet->inclusao( $boTransacao ); + } + } } } } } - } - /* Arrecadações das Retenções */ - if (!$this->getTesouraria() && !$obErro->ocorreu()) { // Se não for via Tesouraria - $obTContabilidadeLancamentoRetencao->setDado( "cod_lote" , ''); - $obTContabilidadeLancamentoRetencao->setDado( "tipo" , $arRetencao['tipo'] == 'O' ? 'A' : 'T' ); - $obTContabilidadeLancamentoRetencao->setDado( "nom_lote" , $arRetencao['tipo'] == 'O' ? "Arrecadação por Retenção Orçamentária - OP ".$this->obREmpenhoOrdemPagamento->getCodigoOrdem()."/$arDataPagamento[2]" : "Transferência - CD:".$inCodPlanoCaixa." | CC:".$arRetencao['cod_plano'] ); - $obTContabilidadeLancamentoRetencao->setDado( "dt_lote" , $this->stDataPagamento ); - $obTContabilidadeLancamentoRetencao->setDado( "exercicio" , Sessao::getExercicio());//$arDataPagamento[2] ); - $obTContabilidadeLancamentoRetencao->setDado( "cod_entidade" , $inCodEntidade ); - $obTContabilidadeLancamentoRetencao->setDado( "sequencial" , $arRetencao['sequencial'] ); - $obErro = $obTContabilidadeLancamentoRetencao->insereLote( $inCodLoteArrecadacao, $boTransacao ); - if ($arRetencao['tipo'] == 'O') { // Retenção Receita Orçamentária - if (!$obErro->ocorreu()) { - include_once( CAM_GF_CONT_NEGOCIO."RContabilidadeLancamentoReceita.class.php" ); - $obRContabilidadeLancamentoReceita = new RContabilidadeLancamentoReceita; - $obRContabilidadeLancamentoReceita->obRContabilidadeLancamento->obRContabilidadeLote->obROrcamentoEntidade->setCodigoEntidade( $inCodEntidade ); - $obRContabilidadeLancamentoReceita->obRContabilidadeLancamento->obRContabilidadeLote->setCodLote( $inCodLoteArrecadacao ); - $obRContabilidadeLancamentoReceita->obRContabilidadeLancamento->obRContabilidadeLote->setNomLote( "Arrecadação por Retenção Orçamentária - OP ".$this->obREmpenhoOrdemPagamento->getCodigoOrdem()."/$arDataPagamento[2]" ); - $obRContabilidadeLancamentoReceita->obRContabilidadeLancamento->obRContabilidadeLote->setDtLote( $this->stDataPagamento ); - $obRContabilidadeLancamentoReceita->setContaDebito( $inCodPlanoCaixa ); - $obRContabilidadeLancamentoReceita->obRContabilidadeLancamento->obRContabilidadeHistoricoPadrao->setCodHistorico( 950 ); - $obRContabilidadeLancamentoReceita->obRContabilidadeLancamento->setBoComplemento( true ); - $obRContabilidadeLancamentoReceita->obRContabilidadeLancamento->setComplemento( $this->obREmpenhoOrdemPagamento->getCodigoOrdem()."/".$arDataPagamento[2] ); - $obRContabilidadeLancamentoReceita->obROrcamentoReceita->setCodReceita( $arRetencao['cod_receita'] ); - $obRContabilidadeLancamentoReceita->setValor( $arRetencao['vl_retencao'] ); - $obRContabilidadeLancamentoReceita->obRContabilidadeLancamento->obRContabilidadeLote->setExercicio( $arRetencao['exercicio'] ); - $obErro = $obRContabilidadeLancamentoReceita->incluir( $boTransacao, true ); + /* Arrecadações das Retenções */ + if (!$this->getTesouraria() && !$obErro->ocorreu()) { // Se não for via Tesouraria + $obTContabilidadeLancamentoRetencao->setDado( "cod_lote" , ''); + $obTContabilidadeLancamentoRetencao->setDado( "tipo" , $arRetencao['tipo'] == 'O' ? 'A' : 'T' ); + $obTContabilidadeLancamentoRetencao->setDado( "nom_lote" , $arRetencao['tipo'] == 'O' ? "Arrecadação por Retenção Orçamentária - OP ".$this->obREmpenhoOrdemPagamento->getCodigoOrdem()."/$arDataPagamento[2]" : "Transferência - CD:".$inCodPlanoCaixa." | CC:".$arRetencao['cod_plano'] ); + $obTContabilidadeLancamentoRetencao->setDado( "dt_lote" , $this->stDataPagamento ); + $obTContabilidadeLancamentoRetencao->setDado( "exercicio" , Sessao::getExercicio());//$arDataPagamento[2] ); + $obTContabilidadeLancamentoRetencao->setDado( "cod_entidade" , $inCodEntidade ); + $obTContabilidadeLancamentoRetencao->setDado( "sequencial" , $arRetencao['sequencial'] ); + $obErro = $obTContabilidadeLancamentoRetencao->insereLote( $inCodLoteArrecadacao, $boTransacao ); + if ($arRetencao['tipo'] == 'O') { // Retenção Receita Orçamentária if (!$obErro->ocorreu()) { - $inSequenciaRet = $obRContabilidadeLancamentoReceita->obRContabilidadeLancamento->getSequencia(); - } - } - } elseif ($arRetencao['tipo'] == 'E') { - if (Sessao::getExercicio() > '2008') { - $obRContabilidadePlanoBanco->setCodPlano($arRetencao['cod_plano']); - $obErro = $obRContabilidadePlanoBanco->getRecursoVinculoConta($rsCodRecurso, $boTransacao); - $inCodRecursoRet = $rsCodRecurso->getCampo('cod_recurso'); - - $boDestinacao = false; - $obTOrcamentoConfiguracao = new TOrcamentoConfiguracao; - $obTOrcamentoConfiguracao->setDado("exercicio", Sessao::getExercicio() ); - $obTOrcamentoConfiguracao->setDado("parametro","recurso_destinacao"); - $obTOrcamentoConfiguracao->consultar($boTransacao); - if($obTOrcamentoConfiguracao->getDado("valor") == 'true') - $boDestinacao = true; - - if ($boDestinacao && $inCodRecursoRet != '') { - $obTOrcamentoRecursoDestinacao = new TOrcamentoRecursoDestinacao; - $obTOrcamentoRecursoDestinacao->setDado("exercicio", Sessao::getExercicio()); - - $stFiltro = ' WHERE recurso_destinacao.cod_recurso = '.$inCodRecursoRet; - $stFiltro .= ' AND recurso_destinacao.exercicio = '.Sessao::getExercicio(); - $obErro = $obTOrcamentoRecursoDestinacao->recuperaTodos($rsDestinacao, $stFiltro, '', $boTransacao); - $inCodEspecificacao = $rsDestinacao->getCampo('cod_especificacao'); - - if ($inCodEspecificacao != '') { - // Verifica qual o cod_recurso que possui conta contabil vinculada C - $obTOrcamentoRecursoDestinacao->setDado('exercicio', Sessao::getExercicio()); - $obTOrcamentoRecursoDestinacao->setDado('cod_especificacao', $inCodEspecificacao); - if ( SistemaLegado::is_tcems( $boTransacao ) ) { - $obTOrcamentoRecursoDestinacao->setDado('cod_estrutural', "'8.2.1.1.3.%'"); - } else { - $obTOrcamentoRecursoDestinacao->setDado('cod_estrutural', "'2.9.3.2.0.00.00.%'"); - } - $obTOrcamentoRecursoDestinacao->recuperaRecursoVinculoConta($rsContaRecurso, '', '', $boTransacao); - - $inCodRecursoRet = $rsContaRecurso->getCampo('cod_recurso'); + include_once( CAM_GF_CONT_NEGOCIO."RContabilidadeLancamentoReceita.class.php" ); + $obRContabilidadeLancamentoReceita = new RContabilidadeLancamentoReceita; + $obRContabilidadeLancamentoReceita->obRContabilidadeLancamento->obRContabilidadeLote->obROrcamentoEntidade->setCodigoEntidade( $inCodEntidade ); + $obRContabilidadeLancamentoReceita->obRContabilidadeLancamento->obRContabilidadeLote->setCodLote( $inCodLoteArrecadacao ); + $obRContabilidadeLancamentoReceita->obRContabilidadeLancamento->obRContabilidadeLote->setNomLote( "Arrecadação por Retenção Orçamentária - OP ".$this->obREmpenhoOrdemPagamento->getCodigoOrdem()."/$arDataPagamento[2]" ); + $obRContabilidadeLancamentoReceita->obRContabilidadeLancamento->obRContabilidadeLote->setDtLote( $this->stDataPagamento ); + $obRContabilidadeLancamentoReceita->setContaDebito( $inCodPlanoCaixa ); + $obRContabilidadeLancamentoReceita->obRContabilidadeLancamento->obRContabilidadeHistoricoPadrao->setCodHistorico( 950 ); + $obRContabilidadeLancamentoReceita->obRContabilidadeLancamento->setBoComplemento( true ); + $obRContabilidadeLancamentoReceita->obRContabilidadeLancamento->setComplemento( $this->obREmpenhoOrdemPagamento->getCodigoOrdem()."/".$arDataPagamento[2] ); + $obRContabilidadeLancamentoReceita->obROrcamentoReceita->setCodReceita( $arRetencao['cod_receita'] ); + $obRContabilidadeLancamentoReceita->setValor( $arRetencao['vl_retencao'] ); + $obRContabilidadeLancamentoReceita->obRContabilidadeLancamento->obRContabilidadeLote->setExercicio( $arRetencao['exercicio'] ); + $obErro = $obRContabilidadeLancamentoReceita->incluir( $boTransacao, true ); + if (!$obErro->ocorreu()) { + $inSequenciaRet = $obRContabilidadeLancamentoReceita->obRContabilidadeLancamento->getSequencia(); } } + } elseif ($arRetencao['tipo'] == 'E') { + if (Sessao::getExercicio() > '2008') { + $obRContabilidadePlanoBanco->setCodPlano($arRetencao['cod_plano']); + $obErro = $obRContabilidadePlanoBanco->getRecursoVinculoConta($rsCodRecurso, $boTransacao); + $inCodRecursoRet = $rsCodRecurso->getCampo('cod_recurso'); + + $boDestinacao = false; + $obTOrcamentoConfiguracao = new TOrcamentoConfiguracao; + $obTOrcamentoConfiguracao->setDado("exercicio", Sessao::getExercicio() ); + $obTOrcamentoConfiguracao->setDado("parametro","recurso_destinacao"); + $obTOrcamentoConfiguracao->consultar($boTransacao); + if($obTOrcamentoConfiguracao->getDado("valor") == 'true') + $boDestinacao = true; + + if ($boDestinacao && $inCodRecursoRet != '') { + $obTOrcamentoRecursoDestinacao = new TOrcamentoRecursoDestinacao; + $obTOrcamentoRecursoDestinacao->setDado("exercicio", Sessao::getExercicio()); + + $stFiltro = ' WHERE recurso_destinacao.cod_recurso = '.$inCodRecursoRet; + $stFiltro .= ' AND recurso_destinacao.exercicio = '.Sessao::getExercicio(); + $obErro = $obTOrcamentoRecursoDestinacao->recuperaTodos($rsDestinacao, $stFiltro, '', $boTransacao); + $inCodEspecificacao = $rsDestinacao->getCampo('cod_especificacao'); + + if ($inCodEspecificacao != '') { + // Verifica qual o cod_recurso que possui conta contabil vinculada C + $obTOrcamentoRecursoDestinacao->setDado('exercicio', Sessao::getExercicio()); + $obTOrcamentoRecursoDestinacao->setDado('cod_especificacao', $inCodEspecificacao); + if ( Sessao::getExercicio() > '2012' ) { + $obTOrcamentoRecursoDestinacao->setDado('cod_estrutural', "'8.2.1.1.3.%'"); + } else { + $obTOrcamentoRecursoDestinacao->setDado('cod_estrutural', "'2.9.3.2.0.00.00.%'"); + } + $obTOrcamentoRecursoDestinacao->recuperaRecursoVinculoConta($rsContaRecurso, '', '', $boTransacao); - if (!$obErro->ocorreu() && $inCodRecursoRet != '') { - $obRContabilidadePlanoBanco->obROrcamentoRecurso->setCodRecurso($inCodRecursoRet); - if (SistemaLegado::is_tcems($boTransacao)) { - $obErro = $obRContabilidadePlanoBanco->getContasRecursoPagamentoTCEMS($rsContasRecursoRet, $boTransacao); - } else { - $obErro = $obRContabilidadePlanoBanco->getContasRecurso($rsContasRecursoRet, $boTransacao); - } - $inCodPlanoRetUm = $rsContasRecursoRet->getCampo('cod_plano_um'); - $inCodPlanoRetDois = $rsContasRecursoRet->getCampo('cod_plano_dois'); - - if ($inCodPlanoRetUm != '' && $inCodPlanoRetDois != '') { - include_once CAM_GF_CONT_MAPEAMENTO."TContabilidadeValorLancamento.class.php"; - - $obTContabilidadeValorLancamento = new TContabilidadeValorLancamento; - $obTContabilidadeValorLancamento->setDado("cod_lote", $inCodLoteArrecadacao); - $obTContabilidadeValorLancamento->setDado("tipo", 'T'); - $obTContabilidadeValorLancamento->setDado("exercicio", Sessao::getExercicio());//$arDataPagamento[2]); - $obTContabilidadeValorLancamento->setDado("cod_entidade", $inCodEntidade); - $obTContabilidadeValorLancamento->setDado("cod_plano_deb", $inCodPlanoRetDois); - $obTContabilidadeValorLancamento->setDado("cod_plano_cred", $inCodPlanoRetUm); - $obTContabilidadeValorLancamento->setDado("cod_historico", 952); - $obTContabilidadeValorLancamento->setDado("complemento", $this->obREmpenhoOrdemPagamento->getCodigoOrdem()."/".$arDataPagamento[2]); - $obTContabilidadeValorLancamento->setDado("vl_lancamento", $arRetencao['vl_retencao']); - - $obErro = $obTContabilidadeValorLancamento->inclusaoPorPl($rsRecordSet, $boTransacao); - $inSequenciaRet = $rsRecordSet->getCampo('sequencia'); - } else { - if (!$obErro->getDescricao()) { - $obErro->setDescricao('Contas do compensado não estão cadastradas.'); + $inCodRecursoRet = $rsContaRecurso->getCampo('cod_recurso'); } } + if (!$obErro->ocorreu() && $inCodRecursoRet != '') { + $obRContabilidadePlanoBanco->obROrcamentoRecurso->setCodRecurso($inCodRecursoRet); + if (Sessao::getExercicio() > '2012') { + $obErro = $obRContabilidadePlanoBanco->getContasRecursoPagamentoTCEMS($rsContasRecursoRet, $boTransacao); + } else { + $obErro = $obRContabilidadePlanoBanco->getContasRecurso($rsContasRecursoRet, $boTransacao); + } + $inCodPlanoRetUm = $rsContasRecursoRet->getCampo('cod_plano_um'); + $inCodPlanoRetDois = $rsContasRecursoRet->getCampo('cod_plano_dois'); + + if ($inCodPlanoRetUm != '' && $inCodPlanoRetDois != '') { + include_once CAM_GF_CONT_MAPEAMENTO."TContabilidadeValorLancamento.class.php"; + + $obTContabilidadeValorLancamento = new TContabilidadeValorLancamento; + $obTContabilidadeValorLancamento->setDado("cod_lote", $inCodLoteArrecadacao); + $obTContabilidadeValorLancamento->setDado("tipo", 'T'); + $obTContabilidadeValorLancamento->setDado("exercicio", Sessao::getExercicio());//$arDataPagamento[2]); + $obTContabilidadeValorLancamento->setDado("cod_entidade", $inCodEntidade); + $obTContabilidadeValorLancamento->setDado("cod_plano_deb", $inCodPlanoRetDois); + $obTContabilidadeValorLancamento->setDado("cod_plano_cred", $inCodPlanoRetUm); + $obTContabilidadeValorLancamento->setDado("cod_historico", 952); + $obTContabilidadeValorLancamento->setDado("complemento", $this->obREmpenhoOrdemPagamento->getCodigoOrdem()."/".$arDataPagamento[2]); + $obTContabilidadeValorLancamento->setDado("vl_lancamento", $arRetencao['vl_retencao']); + + $obErro = $obTContabilidadeValorLancamento->inclusaoPorPl($rsRecordSet, $boTransacao); + $inSequenciaRet = $rsRecordSet->getCampo('sequencia'); + } else { + if (!$obErro->getDescricao()) { + $obErro->setDescricao('Contas do compensado não estão cadastradas.'); + } + } + } } } - } - if (!$obErro->ocorreu()) { - $obTContabilidadeLancamentoRetencao->setDado('tipo' , $arRetencao['tipo'] == 'O' ? 'A' : 'T' ); - $obTContabilidadeLancamentoRetencao->setDado('cod_lote' , $inCodLoteArrecadacao ); - $obTContabilidadeLancamentoRetencao->setDado('cod_entidade' , $inCodEntidade ); - $obTContabilidadeLancamentoRetencao->setDado('exercicio', $arDataPagamento[2] ); - $obTContabilidadeLancamentoRetencao->setDado('sequencia', $inSequenciaRet ); - $obTContabilidadeLancamentoRetencao->setDado('cod_ordem', $this->obREmpenhoOrdemPagamento->getCodigoOrdem() ); - $obTContabilidadeLancamentoRetencao->setDado('cod_plano', $arRetencao['cod_plano'] ); - $obTContabilidadeLancamentoRetencao->setDado('exercicio_retencao', $arRetencao['exercicio'] ); - $obTContabilidadeLancamentoRetencao->setDado('sequencial', $arRetencao['sequencial'] ); - $obErro = $obTContabilidadeLancamentoRetencao->inclusao( $boTransacao ); - } - } /* fim se não utiliza Tesouraria. Via tesouraria os lançamentos de + + if (!$obErro->ocorreu()) { + $obTContabilidadeLancamentoRetencao->setDado('tipo' , $arRetencao['tipo'] == 'O' ? 'A' : 'T' ); + $obTContabilidadeLancamentoRetencao->setDado('cod_lote' , $inCodLoteArrecadacao ); + $obTContabilidadeLancamentoRetencao->setDado('cod_entidade' , $inCodEntidade ); + $obTContabilidadeLancamentoRetencao->setDado('exercicio', $arDataPagamento[2] ); + $obTContabilidadeLancamentoRetencao->setDado('sequencia', $inSequenciaRet ); + $obTContabilidadeLancamentoRetencao->setDado('cod_ordem', $this->obREmpenhoOrdemPagamento->getCodigoOrdem() ); + $obTContabilidadeLancamentoRetencao->setDado('cod_plano', $arRetencao['cod_plano'] ); + $obTContabilidadeLancamentoRetencao->setDado('exercicio_retencao', $arRetencao['exercicio'] ); + $obTContabilidadeLancamentoRetencao->setDado('sequencial', $arRetencao['sequencial'] ); + $obErro = $obTContabilidadeLancamentoRetencao->inclusao( $boTransacao ); + } + } /* fim se não utiliza Tesouraria. Via tesouraria os lançamentos de arrecadações orçamentárias e extra das retenções serão feitos pelas classes da tesouraria */ - } // Fim foreach nas retenções da OP - } else { - $obErro->setDescricao('Uma conta de Caixa deve ser configurada para esta Entidade.'); - }// fim verificação da configuração da conta de caixa para a entidade da nota. - } /* FIM RETENÇÕES */ - } // Fim se o valor a pagar da nota for maior que zero + } // Fim foreach nas retenções da OP + } else { + $obErro->setDescricao('Uma conta de Caixa deve ser configurada para esta Entidade.'); + }// fim verificação da configuração da conta de caixa para a entidade da nota. + } /* FIM RETENÇÕES */ + } // Fim se o valor a pagar da nota for maior que zero + } } // Fim foreach nas notas da OP } } @@ -1710,7 +1745,7 @@ function estornarOP($boTransacao = "") // Verifica qual o cod_recurso que possui conta contabil vinculada $obTOrcamentoRecursoDestinacao->setDado('exercicio', Sessao::getExercicio()); $obTOrcamentoRecursoDestinacao->setDado('cod_especificacao', $inCodEspecificacao); - if ( SistemaLegado::is_tcems( $boTransacao ) ) { + if ( Sessao::getExercicio() > '2012' ) { $obTOrcamentoRecursoDestinacao->setDado('cod_estrutural', "'8.2.1.1.3.%'"); } else { $obTOrcamentoRecursoDestinacao->setDado('cod_estrutural', "'2.9.3.2.0.00.00.%'"); @@ -1722,7 +1757,7 @@ function estornarOP($boTransacao = "") $obRContabilidadePlanoBanco->obROrcamentoRecurso->setCodRecurso($inCodRecurso); - if ( SistemaLegado::is_tcems( $boTransacao ) ) { + if ( Sessao::getExercicio() > '2012' ) { $obErro = $obRContabilidadePlanoBanco->getContasRecursoPagamentoTCEMS($rsContasRecurso, $boTransacao); } else { $obErro = $obRContabilidadePlanoBanco->getContasRecurso($rsContasRecurso, $boTransacao); @@ -1787,7 +1822,7 @@ function estornarOP($boTransacao = "") $stComplemento = $obRNotaLiquidacao->roREmpenhoEmpenho->getCodEmpenho().'/'.$obRNotaLiquidacao->roREmpenhoEmpenho->getExercicio(); } - if ( SistemaLegado::is_tcems( $boTransacao ) ) { + if ( Sessao::getExercicio() > '2012' ) { $stFiltroContaCredito = " WHERE liquidacao.cod_nota = ".$obRNotaLiquidacao->getCodNota()." AND liquidacao.exercicio_liquidacao = '".$obRNotaLiquidacao->roREmpenhoEmpenho->getExercicio()."' AND lancamento.tipo = 'E' @@ -1831,7 +1866,7 @@ function estornarOP($boTransacao = "") $obFEmpenhoEmpenhoPagamentoAnulacao->setDado("conta_pagamento_financ", $this->obRContabilidadePlanoContaAnalitica->getCodEstrutural() ) ; $obFEmpenhoEmpenhoPagamentoAnulacao->setDado("cod_estrutural", $stCodEstruturalPagamento ) ; $obFEmpenhoEmpenhoPagamentoAnulacao->setDado("num_orgao" ,$obRNotaLiquidacao->roREmpenhoEmpenho->obREmpenhoPermissaoAutorizacao->obROrcamentoUnidade->obROrcamentoOrgaoOrcamentario->getNumeroOrgao() ) ; - if ( SistemaLegado::is_tcems($boTransacao) ) { + if ( Sessao::getExercicio() > '2012' ) { $obFEmpenhoEmpenhoPagamentoAnulacao->setDado("cod_plano_debito" , $this->obRContabilidadePlanoContaAnalitica->getCodPlano() ) ; $obFEmpenhoEmpenhoPagamentoAnulacao->setDado("cod_plano_credito" , $stCodPlanoCredito ) ; } @@ -2092,7 +2127,7 @@ function estornarOP($boTransacao = "") // Verifica qual o cod_recurso que possui conta contabil vinculada $obTOrcamentoRecursoDestinacao->setDado('exercicio', Sessao::getExercicio()); $obTOrcamentoRecursoDestinacao->setDado('cod_especificacao', $inCodEspecificacao); - if ( SistemaLegado::is_tcems( $boTransacao ) ) { + if ( Sessao::getExercicio() > '2012' ) { $obTOrcamentoRecursoDestinacao->setDado('cod_estrutural', "'8.2.1.1.3.%'"); } else { $obTOrcamentoRecursoDestinacao->setDado('cod_estrutural', "'2.9.3.2.0.00.00.%'"); diff --git a/gestaoFinanceira/fontes/PHP/empenho/classes/negocio/REmpenhoPreEmpenho.class.php b/gestaoFinanceira/fontes/PHP/empenho/classes/negocio/REmpenhoPreEmpenho.class.php index 8234f07..ba9e8a4 100755 --- a/gestaoFinanceira/fontes/PHP/empenho/classes/negocio/REmpenhoPreEmpenho.class.php +++ b/gestaoFinanceira/fontes/PHP/empenho/classes/negocio/REmpenhoPreEmpenho.class.php @@ -33,7 +33,7 @@ * @package URBEM * @subpackage Regra - $Id: REmpenhoPreEmpenho.class.php 63657 2015-09-24 21:19:41Z michel $ + $Id: REmpenhoPreEmpenho.class.php 64136 2015-12-08 12:00:33Z arthur $ *Casos de uso: uc-02.01.23 uc-02.03.15 @@ -54,6 +54,8 @@ include_once CAM_GF_ORC_NEGOCIO."ROrcamentoDespesa.class.php"; include_once CAM_GF_ORC_NEGOCIO."ROrcamentoClassificacaoDespesa.class.php"; include_once CAM_GA_ADM_NEGOCIO."RUnidadeMedida.class.php"; include_once CAM_GF_EMP_NEGOCIO."REmpenhoPermissaoAutorizacao.class.php"; +include_once CAM_GF_EMP_MAPEAMENTO.'TEmpenhoPreEmpenho.class.php'; +include_once CAM_GF_EMP_MAPEAMENTO.'TEmpenhoPreEmpenhoDespesa.class.php'; //INCLUDE DAS CLASSES PARA O TRATAMENTO DOS ATRIBUTOS DINAMICOS include_once CAM_GF_EMP_MAPEAMENTO."TEmpenhoAtributoEmpenhoValor.class.php"; include_once CAM_GA_ADM_NEGOCIO."RCadastroDinamico.class.php"; @@ -167,9 +169,23 @@ class REmpenhoPreEmpenho * @var Integer **/ public $inCodDespesaFixa; - + /** + * @access Public; + * @var String + **/ + public $stDataEmpenho; + /** + * @access Public; + * @var Integer + **/ public $inCodEntidade; /** + * @access Public; + * @var String + **/ + public $stTipoEmissao; + + /** * @access Public * @param Object $Valor **/ @@ -259,7 +275,22 @@ class REmpenhoPreEmpenho * @param Integer $Valor **/ public function setCodDespesaFixa($valor) { $this->inCodDespesaFixa = $valor; } - + /** + * @access Public + * @param Integer $Valor + **/ + public function setDataEmpenho($valor) { $this->stDataEmpenho = $valor; } + /** + * @access Public + * @param String $Valor + * $valor = 'E': Comportamento padrão. Leva em consideração a data de empenho setada para a função. + * $valor = 'R': Comprtamento para as consultas de reserva de saldo, que não levam em consideração a data de empenho setada, mas do exercicio todo. + **/ + public function setTipoEmissao($valor) { $this->stTipoEmissao = $valor; } + /** + * @access Public + * @param Integer $Valor + **/ function setCodEntidade($valor) { $this->inCodEntidade = $valor; } /** @@ -347,7 +378,20 @@ class REmpenhoPreEmpenho * @return Integer **/ public function getCodDespesaFixa() { return $this->inCodDespesaFixa; } - + /** + * @access Public + * @return String + **/ + public function getDataEmpenho() { return $this->stDataEmpenho; } + /** + * @access Public + * @return String + **/ + public function getTipoEmissao() { return $this->stTipoEmissao; } + /** + * @access Public + * @return Integer + **/ public function getCodEntidade() { return $this->inCodEntidade; } /** @@ -381,15 +425,14 @@ class REmpenhoPreEmpenho } /** - * Método para consultar saldo anterior de uma determinada Despesa + * Método para consultar saldo anterior de uma determinada Despesa durante o ano * @access Public * @param Object $boTransacao * @return Object $obErro **/ public function consultaSaldoAnterior(&$nuSaldoAnterior, $stOrder = "" , $boTransacao = "") { - include_once ( CAM_GF_EMP_MAPEAMENTO."TEmpenhoPreEmpenho.class.php" ); - $obTEmpenhoPreEmpenho = new TEmpenhoPreEmpenho; + $obTEmpenhoPreEmpenho = new TEmpenhoPreEmpenho; $obTEmpenhoPreEmpenho->setDado( "exercicio", $this->stExercicio ); $obTEmpenhoPreEmpenho->setDado( "cod_despesa", $this->obROrcamentoDespesa->getCodDespesa() ); @@ -405,7 +448,41 @@ class REmpenhoPreEmpenho return $obErro; } + + /** + * Método para consultar saldo anterior de uma determinada Despesa tendo seu valor sendo até a data setada + * @access Public + * @param Object $boTransacao + * @return Object $obErro + **/ + public function consultaSaldoAnteriorDataEmpenho(&$nuSaldoAnterior, $stOrder = "" , $boTransacao = "") + { + $obTEmpenhoPreEmpenho = new TEmpenhoPreEmpenho; + + $obTEmpenhoPreEmpenho->setDado( "exercicio" , $this->stExercicio ); + $obTEmpenhoPreEmpenho->setDado( "cod_despesa", $this->obROrcamentoDespesa->getCodDespesa() ); + $obTEmpenhoPreEmpenho->setDado( "entidade" , $this->inCodEntidade ); + $obTEmpenhoPreEmpenho->setDado( "dt_empenho" , $this->stDataEmpenho ); + + if ( empty($this->stTipoEmissao) ){ + $this->stTipoEmissao = 'E'; + } + + $obTEmpenhoPreEmpenho->setDado( "tipo_emissao" , $this->stTipoEmissao ); + + if (date('Y') > Sessao::getExercicio() && Sessao::read('data_reserva_saldo_GF')) { + $obErro = $obTEmpenhoPreEmpenho->recuperaSaldoAnteriorDataAtualEmpenho( $rsRecordSet, $stOrder, $boTransacao ); + } else { + $obErro = $obTEmpenhoPreEmpenho->recuperaSaldoAnteriorDataEmpenho( $rsRecordSet, $stOrder, $boTransacao ); + } + if ( !$obErro->ocorreu() ) { + $nuSaldoAnterior = $rsRecordSet->getCampo( "saldo_anterior" ); + } + + return $obErro; + } + /** * Método para checar Forma de Exercucao do Orcamento * @access public @@ -474,7 +551,6 @@ class REmpenhoPreEmpenho **/ function consultarExistenciaDespesa($boTransacao = "") { - include_once ( CAM_GF_EMP_MAPEAMENTO."TEmpenhoPreEmpenhoDespesa.class.php" ); $obTEmpenhoPreEmpenhoDespesa = new TEmpenhoPreEmpenhoDespesa; $obTEmpenhoPreEmpenhoDespesa->setDado( "exercicio", $this->stExercicio ); @@ -506,17 +582,22 @@ class REmpenhoPreEmpenho if ( !$obErro->ocorreu() ) { while ( !$rsItemPreEmpenho->eof() ) { $this->addItemPreEmpenho(); - $this->roUltimoItemPreEmpenho->setCodItemPreEmp( $rsItemPreEmpenho->getCampo( "cod_item" ) ); - $this->roUltimoItemPreEmpenho->setNumItem ( $rsItemPreEmpenho->getCampo( "num_item" ) ); - $this->roUltimoItemPreEmpenho->obRUnidadeMedida->setCodUnidade( $rsItemPreEmpenho->getCampo( "cod_unidade" ) ); - $this->roUltimoItemPreEmpenho->obRUnidadeMedida->obRGrandeza->setCodGrandeza( $rsItemPreEmpenho->getCampo( "cod_grandeza") ); - $this->roUltimoItemPreEmpenho->setNomUnidade ( $rsItemPreEmpenho->getCampo( "nom_unidade" ) ); - $this->roUltimoItemPreEmpenho->setSiglaUnidade ( $rsItemPreEmpenho->getCampo( "sigla_unidade" ) ); - $this->roUltimoItemPreEmpenho->setNomItem ( $rsItemPreEmpenho->getCampo( "nom_item" ) ); - $this->roUltimoItemPreEmpenho->setQuantidade ( $rsItemPreEmpenho->getCampo( "quantidade" ) ); - $this->roUltimoItemPreEmpenho->setValorTotal ( $rsItemPreEmpenho->getCampo( "vl_total" ) ); - $this->roUltimoItemPreEmpenho->setComplemento( $rsItemPreEmpenho->getCampo( "complemento" ) ); + $this->roUltimoItemPreEmpenho->setCodItemPreEmp ( $rsItemPreEmpenho->getCampo( "cod_item" ) ); + $this->roUltimoItemPreEmpenho->setNumItem ( $rsItemPreEmpenho->getCampo( "num_item" ) ); + $this->roUltimoItemPreEmpenho->obRUnidadeMedida->setCodUnidade( $rsItemPreEmpenho->getCampo( "cod_unidade" ) ); + $this->roUltimoItemPreEmpenho->obRUnidadeMedida->obRGrandeza->setCodGrandeza( $rsItemPreEmpenho->getCampo( "cod_grandeza") ); + $this->roUltimoItemPreEmpenho->setNomUnidade ( $rsItemPreEmpenho->getCampo( "nom_unidade" ) ); + $this->roUltimoItemPreEmpenho->setSiglaUnidade ( $rsItemPreEmpenho->getCampo( "sigla_unidade" ) ); + $this->roUltimoItemPreEmpenho->setNomItem ( $rsItemPreEmpenho->getCampo( "nom_item" ) ); + $this->roUltimoItemPreEmpenho->setQuantidade ( $rsItemPreEmpenho->getCampo( "quantidade" ) ); + $this->roUltimoItemPreEmpenho->setValorTotal ( $rsItemPreEmpenho->getCampo( "vl_total" ) ); + $this->roUltimoItemPreEmpenho->setComplemento ( $rsItemPreEmpenho->getCampo( "complemento" ) ); + $this->roUltimoItemPreEmpenho->setCodCentroCusto( $rsItemPreEmpenho->getCampo( "cod_centro" ) ); $this->roUltimoItemPreEmpenho->consultaCodMaterial( $boTransacao ); + + if( $rsItemPreEmpenho->getCampo( "cod_centro" ) == '') + $this->roUltimoItemPreEmpenho->consultaCodCentroCusto( $boTransacao ); + $rsItemPreEmpenho->proximo(); } } @@ -533,8 +614,6 @@ class REmpenhoPreEmpenho **/ public function consultar($boTransacao = "") { - include_once CAM_GF_EMP_MAPEAMENTO."TEmpenhoPreEmpenho.class.php"; - include_once CAM_GF_EMP_MAPEAMENTO."TEmpenhoPreEmpenhoDespesa.class.php"; $obTEmpenhoPreEmpenhoDespesa = new TEmpenhoPreEmpenhoDespesa; $obTEmpenhoPreEmpenho = new TEmpenhoPreEmpenho; @@ -662,25 +741,24 @@ class REmpenhoPreEmpenho **/ public function listar(&$rsRecordSet, $stOrder = "" , $boTransacao = "") { - include_once ( CAM_GF_EMP_MAPEAMENTO."TEmpenhoPreEmpenho.class.php" ); - $obTEmpenhoPreEmpenho = new TEmpenhoPreEmpenho; + $obTEmpenhoPreEmpenho = new TEmpenhoPreEmpenho; if( $this->inCodPreEmpenho ) - $stFiltro = " cod_pre_empenho = ".$this->inCodPreEmpenho." AND "; + $stFiltro = " cod_pre_empenho = ".$this->inCodPreEmpenho." AND "; if( $this->obREmpenhoTipoEmpenho->getCodTipo() ) - $stFiltro = " cod_tipo = ".$this->obREmpenhoTipoEmpenho->getCodTipo()." AND "; + $stFiltro = " cod_tipo = ".$this->obREmpenhoTipoEmpenho->getCodTipo()." AND "; if( $this->obREmpenhoHistorico->getCodHistorico() ) - $stFiltro = " cod_historico = ".$this->obREmpenhoHistorico->getCodHistorico()." AND "; + $stFiltro = " cod_historico = ".$this->obREmpenhoHistorico->getCodHistorico()." AND "; if( $this->obRCGM->getNumCGM() ) - $stFiltro = " cgm_beneficiado = ".$this->obRCGM->getNumCGM()." AND "; + $stFiltro = " cgm_beneficiado = ".$this->obRCGM->getNumCGM()." AND "; if( $this->obRUsuario->obRCGM->getNumCGM() ) - $stFiltro = " cgm_usuario = ".$this->obRUsuario->obRCGM->getNumCGM()." AND "; + $stFiltro = " cgm_usuario = ".$this->obRUsuario->obRCGM->getNumCGM()." AND "; if( $this->obROrcamentoDespesa->getCodDespesa() ) - $stFiltro = " cod_despesa = ".$this->obROrcamentoDespesa->getCodDespesa()." AND "; + $stFiltro = " cod_despesa = ".$this->obROrcamentoDespesa->getCodDespesa()." AND "; if($this->stExercicio) - $stFiltro .= " exercicio = '".$this->stExercicio."' AND "; + $stFiltro .= " exercicio = '".$this->stExercicio."' AND "; if( $this->stDescricao ) - $stFiltro .= " lower(descricao) like lower('%" . $this->stDescricao."%') AND "; + $stFiltro .= " lower(descricao) like lower('%" . $this->stDescricao."%') AND "; $stFiltro = ($stFiltro) ? " WHERE " . substr($stFiltro, 0, strlen($stFiltro)-4) : ""; $stOrder = ($stOrder) ? $stOrder : "cod_pre_empenho"; $obErro = $obTEmpenhoPreEmpenho->recuperaTodos( $rsRecordSet, $stFiltro, $stOrder, $boTransacao ); @@ -696,8 +774,7 @@ class REmpenhoPreEmpenho **/ public function salvarDespesa($boTransacao = "") { - include_once ( CAM_GF_EMP_MAPEAMENTO."TEmpenhoPreEmpenhoDespesa.class.php" ); - $obTEmpenhoPreEmpenhoDespesa = new TEmpenhoPreEmpenhoDespesa; + $obTEmpenhoPreEmpenhoDespesa = new TEmpenhoPreEmpenhoDespesa; $obTEmpenhoPreEmpenhoDespesa->setDado( "cod_pre_empenho", $this->inCodPreEmpenho ); $obTEmpenhoPreEmpenhoDespesa->setDado( "exercicio" , $this->stExercicio ); @@ -756,8 +833,7 @@ class REmpenhoPreEmpenho **/ public function incluir($boTransacao = "") { - include_once ( CAM_GF_EMP_MAPEAMENTO."TEmpenhoPreEmpenho.class.php" ); - $obTEmpenhoPreEmpenho = new TEmpenhoPreEmpenho; + $obTEmpenhoPreEmpenho = new TEmpenhoPreEmpenho; $boFlagTransacao = false; $obErro = $this->obTransacao->abreTransacao( $boFlagTransacao, $boTransacao ); @@ -792,11 +868,11 @@ class REmpenhoPreEmpenho } if ( $this->obROrcamentoDespesa->getCodDespesa() and !$obErro->ocorreu() ) { $this->consultaSaldoAnterior( $nuSaldoAnterior,'', $boTransacao ); - $nuVlTotal = number_format((float) $nuVlTotal,2,'.',''); // usando number_format pois no if abaixo dava diferença. Foi identificado que, embora as variáveis - $nuSaldoAnterior = number_format((float) $nuSaldoAnterior,2,'.',''); // fossem demonstradas no var_dump como iguais, ficava oculto no ponto flutuante uma diferença - if ($nuVlTotal > $nuSaldoAnterior) { - $obErro->setDescricao( "Não há saldo disponível para esta dotação(".$this->obROrcamentoDespesa->getCodDespesa().")!" ); - } + $nuVlTotal = number_format((float) $nuVlTotal,2,'.',''); // usando number_format pois no if abaixo dava diferença. Foi identificado que, embora as variáveis + $nuSaldoAnterior = number_format((float) $nuSaldoAnterior,2,'.',''); // fossem demonstradas no var_dump como iguais, ficava oculto no ponto flutuante uma diferença + if ($nuVlTotal > $nuSaldoAnterior) { + $obErro->setDescricao( "Não há saldo disponível para esta dotação(".$this->obROrcamentoDespesa->getCodDespesa().")!" ); + } } } else { $obErro->setDescricao( "É necessário cadastrar pelo menos um Item" ); @@ -829,8 +905,7 @@ class REmpenhoPreEmpenho **/ public function alterar($boTransacao = "") { - include_once ( CAM_GF_EMP_MAPEAMENTO."TEmpenhoPreEmpenho.class.php" ); - $obTEmpenhoPreEmpenho = new TEmpenhoPreEmpenho; + $obTEmpenhoPreEmpenho = new TEmpenhoPreEmpenho; $boFlagTransacao = false; $obErro = $this->obTransacao->abreTransacao( $boFlagTransacao, $boTransacao ); @@ -851,7 +926,6 @@ class REmpenhoPreEmpenho if ( $this->obROrcamentoDespesa->getCodDespesa() ) { $obErro = $this->salvarDespesa( $boTransacao ); } else { - include_once ( CAM_GF_EMP_MAPEAMENTO."TEmpenhoPreEmpenhoDespesa.class.php" ); $obTEmpenhoPreEmpenhoDespesa = new TEmpenhoPreEmpenhoDespesa; $obTEmpenhoPreEmpenhoDespesa->setDado( "cod_pre_empenho", $this->inCodPreEmpenho ); $obTEmpenhoPreEmpenhoDespesa->setDado( "exercicio" , $this->stExercicio ); @@ -921,7 +995,6 @@ class REmpenhoPreEmpenho **/ public function incluirItemEmpenhoDespesaFixa($boTransacao = "") { - include_once ( CAM_GF_EMP_MAPEAMENTO."TEmpenhoPreEmpenho.class.php" ); include_once( CAM_GF_EMP_MAPEAMENTO."TEmpenhoItemEmpenhoDespesasFixas.class.php"); $obTEmpenhoPreEmpenho = new TEmpenhoPreEmpenho; $obTEmpenhoItemEmpenhoDespesasFixas = new TEmpenhoItemEmpenhoDespesasFixas; diff --git a/gestaoFinanceira/fontes/PHP/empenho/classes/negocio/REmpenhoRelatorioNotaLiquidacaoEmpenhoAnulado.class.php b/gestaoFinanceira/fontes/PHP/empenho/classes/negocio/REmpenhoRelatorioNotaLiquidacaoEmpenhoAnulado.class.php index 6d4d8ad..5f2c964 100755 --- a/gestaoFinanceira/fontes/PHP/empenho/classes/negocio/REmpenhoRelatorioNotaLiquidacaoEmpenhoAnulado.class.php +++ b/gestaoFinanceira/fontes/PHP/empenho/classes/negocio/REmpenhoRelatorioNotaLiquidacaoEmpenhoAnulado.class.php @@ -361,8 +361,6 @@ function geraRecordSet(&$arRecordSet , $stOrder = "") $rsNewRecord = new RecordSet; $rsNewRecord->preenche($arLinha9); $arRecordSet[9] = $rsNewRecord; - -// mostraVar($arRecordSet); } } diff --git a/gestaoFinanceira/fontes/PHP/empenho/classes/negocio/REmpenhoRelatorioOrdemPagamentoAnulado.class.php b/gestaoFinanceira/fontes/PHP/empenho/classes/negocio/REmpenhoRelatorioOrdemPagamentoAnulado.class.php index 07d59e4..1e570c6 100755 --- a/gestaoFinanceira/fontes/PHP/empenho/classes/negocio/REmpenhoRelatorioOrdemPagamentoAnulado.class.php +++ b/gestaoFinanceira/fontes/PHP/empenho/classes/negocio/REmpenhoRelatorioOrdemPagamentoAnulado.class.php @@ -306,8 +306,5 @@ function geraRecordSet(&$arRecordSet , $stOrder = "") $rsNewRecord = new RecordSet; $rsNewRecord->preenche($arBloco7); $arRecordSet[4] = $rsNewRecord; - - //SistemaLegado::mostravar( $arRecordSet ); - //die(); } } diff --git a/gestaoFinanceira/fontes/PHP/empenho/classes/negocio/REmpenhoRelatorioSituacaoAutorizacaoEmpenho.class.php b/gestaoFinanceira/fontes/PHP/empenho/classes/negocio/REmpenhoRelatorioSituacaoAutorizacaoEmpenho.class.php index fe9bb27..5beb718 100644 --- a/gestaoFinanceira/fontes/PHP/empenho/classes/negocio/REmpenhoRelatorioSituacaoAutorizacaoEmpenho.class.php +++ b/gestaoFinanceira/fontes/PHP/empenho/classes/negocio/REmpenhoRelatorioSituacaoAutorizacaoEmpenho.class.php @@ -458,7 +458,6 @@ function geraRecordSet(&$rsRecordSet , $stOrder = "") $rsRecordSet = new RecordSet; $rsRecordSet->preenche( $arRecord ); - //sistemaLegado::mostravar($rsRecordSet); return $obErro; } diff --git a/gestaoFinanceira/fontes/PHP/empenho/instancias/autorizacao/FMManterAutorizacao.php b/gestaoFinanceira/fontes/PHP/empenho/instancias/autorizacao/FMManterAutorizacao.php index 4d08243..52247f0 100755 --- a/gestaoFinanceira/fontes/PHP/empenho/instancias/autorizacao/FMManterAutorizacao.php +++ b/gestaoFinanceira/fontes/PHP/empenho/instancias/autorizacao/FMManterAutorizacao.php @@ -33,10 +33,7 @@ * @ignore - $Revision: 32125 $ - $Name$ - $Author: tonismar $ - $Date: 2008-01-30 15:54:45 -0200 (Qua, 30 Jan 2008) $ + $Id: FMManterAutorizacao.php 64051 2015-11-24 17:55:39Z franver $ * Casos de uso: uc-02.03.02 uc-02.01.08 @@ -48,6 +45,7 @@ include_once CAM_GF_EMP_NEGOCIO.'REmpenhoAutorizacaoEmpenho.class.php'; include_once CAM_FW_HTML.'MontaAtributos.class.php'; include_once CAM_GA_ADM_COMPONENTES.'IMontaAssinaturas.class.php'; include_once TEMP.'TEmpenhoCategoriaEmpenho.class.php'; +include_once CAM_GP_ALM_COMPONENTES.'IPopUpCentroCustoUsuario.class.php'; //Define o nome dos arquivos PHP $stPrograma = 'ManterAutorizacao'; @@ -202,6 +200,7 @@ if ($rsUltimoMesEncerrado->getCampo('mes') >= $mesAtual AND $boUtilizarEncerrame $booCodItem = false; } $arItens[$inCount]['nom_item'] = $obItemPreEmpenho->getNomItem(); + $arItens[$inCount]['cod_centro'] = $obItemPreEmpenho->getCodCentroCusto(); $arItens[$inCount]['complemento'] = $obItemPreEmpenho->getComplemento(); $arItens[$inCount]['quantidade'] = $obItemPreEmpenho->getQuantidade(); $arItens[$inCount]['vl_unitario'] = $nuVlUnitario; @@ -231,15 +230,14 @@ if ($rsUltimoMesEncerrado->getCampo('mes') >= $mesAtual AND $boUtilizarEncerrame } $rsAtributos->setPrimeiroElemento(); } - - if($booCodItem){ - $stJs .= "bloqueiaTipoItem('Catalogo');"; - } - else{ - $stJs .= "bloqueiaTipoItem('Descricao');"; - } $jsOnLoad = "montaParametrosGET('alterar','');"; + + if($booCodItem){ + $jsOnLoad .= "bloqueiaTipoItem('Catalogo');"; + }else{ + $jsOnLoad .= "bloqueiaTipoItem('Descricao');"; + } } else { $obREmpenhoAutorizacaoEmpenho->obRCadastroDinamico->recuperaAtributosSelecionados($rsAtributos); } @@ -401,6 +399,7 @@ if ($rsUltimoMesEncerrado->getCampo('mes') >= $mesAtual AND $boUtilizarEncerrame $obDtAutorizacao->setRotulo('Data da Autorização'); $obDtAutorizacao->setTitle ('Informe a data da autorização.'); $obDtAutorizacao->setNull (false); + $obDtAutorizacao->obEvento->setOnChange("buscaDado('buscaDespesa');"); // Define Objeto BuscaInner para Despesa $obBscDespesa = new BuscaInner; @@ -580,8 +579,9 @@ if ($rsUltimoMesEncerrado->getCampo('mes') >= $mesAtual AND $boUtilizarEncerrame $obTxtQuantidade->setTitle ('Informe a quantidade.'); $obTxtQuantidade->setDecimais (4); $obTxtQuantidade->setNegativo (false); - $obTxtQuantidade->setSize (23); - $obTxtQuantidade->setMaxLength(23); + $obTxtQuantidade->setDefinicao('NUMERIC'); + $obTxtQuantidade->setSize (14); + $obTxtQuantidade->setMaxLength(13); $obTxtQuantidade->obEvento->setOnChange('gerarValorTotal();'); // Define Objeto Select para Unidade @@ -598,20 +598,21 @@ if ($rsUltimoMesEncerrado->getCampo('mes') >= $mesAtual AND $boUtilizarEncerrame $obCmbUnidade->setNull (true); // Define Objeto Moeda para Valor Unitário - $obTxtVlUnitario = new Moeda; + $obTxtVlUnitario = new Numerico; $obTxtVlUnitario->setName ('nuVlUnitario'); $obTxtVlUnitario->setId ('nuVlUnitario'); $obTxtVlUnitario->setValue ($nuVlUnitario); $obTxtVlUnitario->setRotulo ('*Valor Unitário'); $obTxtVlUnitario->setTitle ('Informe o valor unitário.'); $obTxtVlUnitario->setNull (true); - $obTxtVlUnitario->setDecimais (4); + $obTxtVlUnitario->setDefinicao('NUMERIC'); + $obTxtVlUnitario->setDecimais (2); $obTxtVlUnitario->setSize (21); $obTxtVlUnitario->setMaxLength(21); $obTxtVlUnitario->obEvento->setOnChange('gerarValorTotal();'); // Define Objeto Moeda para Valor Unitário - $obTxtVlTotal = new Moeda; + $obTxtVlTotal = new Numerico; $obTxtVlTotal->setName ('nuVlTotal'); $obTxtVlTotal->setId ('nuVlTotal'); $obTxtVlTotal->setValue ($nuVlTotal); @@ -619,6 +620,8 @@ if ($rsUltimoMesEncerrado->getCampo('mes') >= $mesAtual AND $boUtilizarEncerrame $obTxtVlTotal->setTitle ('Informe o valor total.'); $obTxtVlTotal->setNull (true); $obTxtVlTotal->setReadOnly (true); + $obTxtVlTotal->setDefinicao('NUMERIC'); + $obTxtVlTotal->setDecimais (2); $obTxtVlTotal->setSize (21); $obTxtVlTotal->setMaxLength(21); $obTxtVlTotal->obEvento->setOnChange('gerarValorTotal();'); @@ -763,6 +766,12 @@ if ($rsUltimoMesEncerrado->getCampo('mes') >= $mesAtual AND $boUtilizarEncerrame $obFormulario->addComponente($obDtAutorizacao); $obMontaAssinaturas->setOpcaoAssinaturas(false); } + + $obCentroCustoUsuario = new IPopUpCentroCustoUsuario($obForm); + $obCentroCustoUsuario->setNull (true); + $obCentroCustoUsuario->setRotulo('Centro de Custo'); + $obCentroCustoUsuario->obCampoCod->setId ('inCodCentroCusto'); + $obFormulario->addHidden ($obHdnVlTotalAutorizacao); $obFormulario->addHidden ($obHdnBoModuloEmpenho); $obFormulario->addComponente($obBscDespesa); @@ -788,6 +797,7 @@ if ($rsUltimoMesEncerrado->getCampo('mes') >= $mesAtual AND $boUtilizarEncerrame $obMontaItemUnidade->geraFormulario($obFormulario); $obFormulario->addComponente($obTxtNomItem); $obFormulario->addComponente($obTxtComplemento); + $obFormulario->addComponente($obCentroCustoUsuario); $obFormulario->addComponente($obTxtQuantidade); $obFormulario->addComponente($obCmbUnidade); $obFormulario->addComponente($obTxtVlUnitario); diff --git a/gestaoFinanceira/fontes/PHP/empenho/instancias/autorizacao/JSManterAutorizacao.js b/gestaoFinanceira/fontes/PHP/empenho/instancias/autorizacao/JSManterAutorizacao.js index 02daf44..9408b82 100755 --- a/gestaoFinanceira/fontes/PHP/empenho/instancias/autorizacao/JSManterAutorizacao.js +++ b/gestaoFinanceira/fontes/PHP/empenho/instancias/autorizacao/JSManterAutorizacao.js @@ -27,17 +27,13 @@ * Arquivo JS utilizado na Duplicação de Autorização * Data de Criação : 01/12/2004 - * @author Analista Jorge B. Ribarr * @author Desenvolvedor Anderson R. M. Buzo * @ignore - $Revision: 30668 $ - $Name$ - $Autor: $ - $Date: 2007-02-23 13:15:05 -0200 (Sex, 23 Fev 2007) $ - + $Id: JSManterAutorizacao.js 64051 2015-11-24 17:55:39Z franver $ + * Casos de uso: uc-02.03.02 uc-02.01.08 */ @@ -92,14 +88,14 @@ function incluirItem() { nuQuantidade = nuQuantidade.replace( "," ,'.'); if( nuQuantidade <= 0 ) mensagem += "@Campo Quantidade com valor inválido!( o valor deve ser maior que 0 (zero) )"; - if(!document.frm.inCodUnidade.value) mensagem += '@Campo Unidade inválido!()'; + if(!document.frm.nuVlUnitario.value) mensagem += '@Campo Valor Unitário inválido!()'; - nuUnitario = nuUnitario.replace( new RegExp("[.]","g") ,''); + nuUnitario = nuUnitario.replace( new RegExp("[.]","g") ,''); nuUnitario = nuUnitario.replace( "," ,'.'); if( nuUnitario <= 0 ) mensagem += "@Campo Valor Unitário com valor inválido!(o valor deve ser maior que 0 (zero) )"; @@ -117,7 +113,6 @@ function incluirItem() { return false; } else { return true; - limparItem(); } } @@ -167,25 +162,16 @@ function alterarItem() if( mensagem ) { alertaAviso(mensagem,'form','erro',''); + return false; } else { document.frm.Ok.disabled = true; - document.frm.action = '?'; - document.frm.stCtrl.value = 'alteradoItemPreEmpenho'; - document.frm.submit(); - document.frm.action = '?'; - document.frm.btnIncluir.value='Incluir'; - document.frm.stCtrl.value = 'incluiItemPreEmpenho'; - limparItem(); + return true; } } function excluirItem(stControle, inNumItem ){ - document.frm.stCtrl.value = stControle; - document.frm.action = '?&inNumItem=' + inNumItem; - document.frm.submit(); - document.frm.action = '?'; - limparItem(); + ajaxJavaScript('&inNumItem='+inNumItem,stControle); } function limparItem() { @@ -197,15 +183,23 @@ function limparItem() { document.frm.stNomItem.value = ''; document.frm.stNomItem.readOnly = false; document.frm.stComplemento.value = ''; + document.frm.inCodCentroCusto.value = ''; document.frm.nuQuantidade.value = ''; document.frm.inCodUnidade.value = document.frm.inCodUnidadePadrao.value; document.frm.nuVlUnitario.value = ''; document.frm.nuVlTotal.value = ''; - document.frm.inCodUnidadeMedida.value = ''; - document.frm.stNomUnidade.value = ''; + if (document.frm.inCodUnidadeMedida) + document.frm.inCodUnidadeMedida.value = ''; + if (document.frm.stNomUnidade) + document.frm.stNomUnidade.value = ''; document.frm.inCodItem.value = ''; + if (document.frm.stNomItemCatalogo) + document.frm.stNomItemCatalogo.value = ''; document.getElementById('stNomItemCatalogo').innerHTML = ''; document.getElementById('stUnidadeMedida').innerHTML = ' '; + document.getElementById('stNomCentroCusto').innerHTML = ' '; + jQuery("#btnIncluir").val('Incluir'); + jQuery("#btnIncluir").attr('onclick',"if(incluirItem()){montaParametrosGET('incluiItemPreEmpenho');}"); } function gerarValorTotal() { @@ -219,7 +213,7 @@ function gerarValorTotal() { nuQuantidade = nuQuantidade.replace( "," ,'.'); nuVlTotal = nuVlUnidade * nuQuantidade; nuVlTotal = Math.round(nuVlTotal*Math.pow(10,2))/Math.pow(10,2); - nuVlTotal = new String(nuVlTotal); + nuVlTotal = new String(nuVlTotal.toFixed(2)); arVlTotal = nuVlTotal.split(".") ; if( !arVlTotal[1] ) arVlTotal[1] = '00'; @@ -249,17 +243,11 @@ function limparCampos() { } function limparItens() { - BloqueiaFrames(true,false); - document.frm.stCtrl.value = 'limpar'; - document.frm.action = '?'; - document.frm.submit(); - document.frm.action = '?'; - LiberaFrames( true, false ); + ajaxJavaScript('','limpar'); } function limparTodos() { limparCampos(); - limparItens(); document.getElementById('stTipoItemRadio1').disabled = false; document.getElementById('stTipoItemRadio2').disabled = false; var d = document; @@ -281,6 +269,7 @@ function limparTodos() { d.frm.inCodOrgao.options[0] = new Option('Selecione','', 'selected'); } document.frm.inCodEntidade.focus(); + limparItens(); } function proximoFoco(valor) { @@ -308,7 +297,7 @@ function unidadeItem(ent){ } function habilitaCampos(ent) { var f = document.frm; - + //habilita campos para Catalogo if( ent == 'Catalogo' ){ jQuery("#stTipoItem").val(ent); @@ -341,21 +330,22 @@ function bloqueiaTipoItem(ent){ var ent2=document.getElementById('stTipoItem').value; }else{ var ent2=ent; + document.frm.stTipoItem.value=ent; } habilitaCampos(ent2); - + jq('#stTipoItemRadio1').attr('disabled',true); jq('#stTipoItemRadio2').attr('disabled',true); - + if (ent=='Catalogo') { jq('#stTipoItemRadio1').attr('checked',true); jq('#stTipoItemRadio2').attr('checked',false); } - + if (ent=='Descricao') { jq('#stTipoItemRadio1').attr('checked',false); jq('#stTipoItemRadio2').attr('checked',true); } } - + diff --git a/gestaoFinanceira/fontes/PHP/empenho/instancias/autorizacao/LSDuplicarAutorizacao.php b/gestaoFinanceira/fontes/PHP/empenho/instancias/autorizacao/LSDuplicarAutorizacao.php index 3002d79..d7109fa 100755 --- a/gestaoFinanceira/fontes/PHP/empenho/instancias/autorizacao/LSDuplicarAutorizacao.php +++ b/gestaoFinanceira/fontes/PHP/empenho/instancias/autorizacao/LSDuplicarAutorizacao.php @@ -75,7 +75,7 @@ $pgOcul = "OC".$stPrograma.".php"; $stCaminho = CAM_GF_EMP_INSTANCIAS."empenho/autorizacao/"; $obRegra = new REmpenhoEmpenhoAutorizacao; -//SistemaLegado :: mostraVar(sessao); + if ( !Sessao::read('paginando') ) { foreach ($_POST as $stCampo => $stValor) { $arFiltro[$stCampo] = $stValor; diff --git a/gestaoFinanceira/fontes/PHP/empenho/instancias/autorizacao/OCGeraRelatorioAutorizacao.php b/gestaoFinanceira/fontes/PHP/empenho/instancias/autorizacao/OCGeraRelatorioAutorizacao.php index 36f2496..847610c 100755 --- a/gestaoFinanceira/fontes/PHP/empenho/instancias/autorizacao/OCGeraRelatorioAutorizacao.php +++ b/gestaoFinanceira/fontes/PHP/empenho/instancias/autorizacao/OCGeraRelatorioAutorizacao.php @@ -30,7 +30,7 @@ * @author Analista: Tonismar Régis Bernardo * @author Desenvolvedor: Henrique Boaventura - $Id: OCGeraRelatorioAutorizacao.php 59612 2014-09-02 12:00:51Z gelson $ + $Id: OCGeraRelatorioAutorizacao.php 63841 2015-10-22 19:14:30Z michel $ */ @@ -174,7 +174,10 @@ if (!is_array($arAutorizacao)) { if (Sessao::read('modulo') == 35 && Sessao::read('acao') == 1730) { $stLinkRetorno = CAM_GP_COM_INSTANCIAS."compraDireta/LSManterAutorizacao.php"; } elseif (Sessao::read('modulo') == 37 && Sessao::read('acao') == 1741) { - // Link de origem = Licitação + // Link de origem = Licitação -> Emitir Autorização de Empenho + $stLinkRetorno = CAM_GP_LIC_INSTANCIAS."autorizacao/FLManterAutorizacao.php"; + } elseif (Sessao::read('modulo') == 37 && Sessao::read('acao') == 3086) { + // Link de origem = Licitação -> Emitir Autorização de Empenho Parcial $stLinkRetorno = CAM_GP_LIC_INSTANCIAS."autorizacao/FLManterAutorizacao.php"; } diff --git a/gestaoFinanceira/fontes/PHP/empenho/instancias/autorizacao/OCManterAutorizacao.php b/gestaoFinanceira/fontes/PHP/empenho/instancias/autorizacao/OCManterAutorizacao.php index 4302dd1..612e450 100755 --- a/gestaoFinanceira/fontes/PHP/empenho/instancias/autorizacao/OCManterAutorizacao.php +++ b/gestaoFinanceira/fontes/PHP/empenho/instancias/autorizacao/OCManterAutorizacao.php @@ -33,7 +33,7 @@ * @ignore - $Id: OCManterAutorizacao.php 63630 2015-09-22 14:41:40Z jean $ + $Id: OCManterAutorizacao.php 64132 2015-12-07 13:18:15Z arthur $ * Casos de uso: uc-02.03.02 uc-02.01.08 @@ -69,6 +69,7 @@ function montaLista($arRecordSet, $boExecuta = true) $rsLista = new RecordSet; $rsLista->preenche( $arRecordSet ); $rsLista->addFormatacao('vl_total', 'NUMERIC_BR'); + $rsLista->addFormatacao('quantidade','NUMERIC_BR_4'); if (!$rsLista->eof()) { $obLista = new Lista; @@ -137,7 +138,7 @@ function montaLista($arRecordSet, $boExecuta = true) $obLista->ultimaAcao->setLink ("JavaScript:alterarEmpenho('alterarItemPreEmpenho');"); $obLista->ultimaAcao->addCampo ('1', 'num_item'); if ($codItem) { - $obLista->ultimaAcao->addCampo('2', 'cod_item'); + $obLista->ultimaAcao->addCampo('2', 'cod_item'); } $obLista->commitAcao(); @@ -159,13 +160,14 @@ function montaLista($arRecordSet, $boExecuta = true) } $nuVlTotalAutorizacao = $nuVlTotal; $nuVlTotal = number_format($nuVlTotal, 2, ',', '.'); - + $nuVlReserva = $nuVlTotal ? $nuVlTotal : 0; - + $js .= "jq('#spnLista').html('".$stHTML."'); \n"; $js .= "jq('#Ok').attr('disabled',false); \n"; if ($codItem) { $js .= "jq('#inCodItem').val(''); \n"; + $js .= "jq('input[name=stNomItemCatalogo]').val(''); \n"; $js .= "jq('#stNomItemCatalogo').html(' '); \n"; $js .= "jq('#stUnidadeMedida').html(' '); \n"; }else{ @@ -175,7 +177,6 @@ function montaLista($arRecordSet, $boExecuta = true) $js .= "jq('#nuVlTotalAutorizacao').val('".$nuVlTotalAutorizacao."'); \n"; $js .= "jq('#nuVlReserva').html('".$nuVlReserva."'); \n"; $js .= "jq('#hdnVlReserva').val('".$nuVlReserva."'); \n"; - } else { $js .= "jq('#spnLista').html(' '); \n"; $js .= "jq('#Ok').attr('disabled',false); \n"; @@ -192,7 +193,8 @@ function montaLista($arRecordSet, $boExecuta = true) function montaCombo($stNomDespesa) { global $obREmpenhoAutorizacaoEmpenho; - if ($_REQUEST['inCodDespesa'] != '' and $stNomDespesa) { + + if ($_REQUEST['inCodDespesa'] != '') { $obREmpenhoAutorizacaoEmpenho->obROrcamentoDespesa->setCodDespesa($_REQUEST['inCodDespesa']); $obREmpenhoAutorizacaoEmpenho->obROrcamentoDespesa->setExercicio(Sessao::getExercicio()); $obREmpenhoAutorizacaoEmpenho->obROrcamentoDespesa->listarRelacionamentoContaDespesa($rsConta); @@ -200,13 +202,14 @@ function montaCombo($stNomDespesa) if (Sessao::read('inCodClassificacao') != ''){ $obREmpenhoAutorizacaoEmpenho->obROrcamentoDespesa->obROrcamentoClassificacaoDespesa->setClassificacao(Sessao::read('inCodClassificacao')); } else { + $stCodClassificacao = $rsConta->getCampo('cod_estrutural'); $obREmpenhoAutorizacaoEmpenho->obROrcamentoDespesa->obROrcamentoClassificacaoDespesa->setMascClassificacao($stCodClassificacao); } - + $obREmpenhoAutorizacaoEmpenho->obROrcamentoDespesa->setExercicio(Sessao::getExercicio()); $obREmpenhoAutorizacaoEmpenho->obROrcamentoDespesa->setCodDespesa(''); $obREmpenhoAutorizacaoEmpenho->obROrcamentoDespesa->listarCodEstruturalDespesa($rsClassificacao); - + if (Sessao::read('inCodClassificacao') != ''){ $js .= "jq('#stCodClassificacao_label').html('".$rsClassificacao->getCampo('cod_estrutural')." - ".$rsClassificacao->getCampo('descricao')."');\n"; } else if ($rsClassificacao->getNumLinhas() > -1) { @@ -386,7 +389,7 @@ function montaOrgaoUnidade($entCodOrgao = '', $entCodUnidade = '', $entCodDespes $js .= "jq('#inCodOrgao').val('0');\n"; $js .= "jq('#inCodUnidadeOrcamento').val('0');\n"; } - + while (!$rsOrgao->eof()){ $inCodOrgao = $rsOrgao->getCampo('num_orgao'); $stNomOrgao = $rsOrgao->getCampo('num_orgao').' - '.$rsOrgao->getCampo('nom_orgao'); @@ -396,14 +399,14 @@ function montaOrgaoUnidade($entCodOrgao = '', $entCodUnidade = '', $entCodDespes if ($codOrgao == $inCodOrgao) { $obREmpenhoAutorizacaoEmpenho->obREmpenhoPermissaoAutorizacao->obROrcamentoUnidade->obROrcamentoOrgaoOrcamentario->setNumeroOrgao($codOrgao); $obREmpenhoAutorizacaoEmpenho->obREmpenhoPermissaoAutorizacao->listarUnidadeDespesaEntidadeUsuario($rsUnidade); - + $js .= "jq('#hdnCodOrgao').val('".$inCodOrgao."');\n"; - + while (!$rsUnidade->eof()){ - + $inCodUnidade = $rsUnidade->getCampo('num_unidade'); $stNomUnidade = $rsUnidade->getCampo('num_unidade').' - '.$rsUnidade->getCampo('nom_unidade'); - + if($entCodDespesa == ''){ $js .= " jq('#inCodUnidadeOrcamento').append(new Option('".$stNomUnidade."','".$inCodUnidade."')); \n"; } else { @@ -415,7 +418,7 @@ function montaOrgaoUnidade($entCodOrgao = '', $entCodUnidade = '', $entCodDespes if($codUnidade == $inCodUnidade){ $js .= "jq('#hdnCodUnidade').val('".$inCodUnidade."');\n"; } - + $rsUnidade->proximo(); } } @@ -439,12 +442,12 @@ switch ($stCtrl) { $obREmpenhoAutorizacaoEmpenho->obREmpenhoPermissaoAutorizacao->obROrcamentoUnidade->obROrcamentoOrgaoOrcamentario->setNumeroOrgao($_REQUEST['inCodOrgao']); $obREmpenhoAutorizacaoEmpenho->obREmpenhoPermissaoAutorizacao->obROrcamentoDespesa->obROrcamentoEntidade->setCodigoEntidade($_REQUEST['inCodEntidade']); $obREmpenhoAutorizacaoEmpenho->obREmpenhoPermissaoAutorizacao->listarUnidadeDespesaEntidadeUsuario($rsUnidade, 'ou.num_orgao, ou.num_unidade'); - + if ($rsUnidade->getNumLinhas() > -1) { while (!$rsUnidade->eof()) { $inCodUnidade = $rsUnidade->getCampo('num_unidade'); $stNomUnidade = $rsUnidade->getCampo('num_unidade').' - '.$rsUnidade->getCampo('nom_unidade'); - + $js .= "jq('#inCodUnidadeOrcamento').append(new Option('".$stNomUnidade."','".$inCodUnidade."'));\n"; $rsUnidade->proximo(); } @@ -461,7 +464,10 @@ switch ($stCtrl) { if ($request->get('inCodDespesa') != '') { $obREmpenhoAutorizacaoEmpenho->obROrcamentoDespesa->setCodDespesa($request->get('inCodDespesa')); $obREmpenhoAutorizacaoEmpenho->setExercicio(Sessao::getExercicio()); - $obREmpenhoAutorizacaoEmpenho->consultaSaldoAnterior($nuSaldoDotacao); + $obREmpenhoAutorizacaoEmpenho->setdataEmpenho($request->get('stDtInclusao')); + $obREmpenhoAutorizacaoEmpenho->setCodEntidade($request->get('inCodEntidade')); + $obREmpenhoAutorizacaoEmpenho->setTipoEmissao('R'); + $obREmpenhoAutorizacaoEmpenho->consultaSaldoAnteriorDataEmpenho($nuSaldoDotacao); $nuSaldoDotacao = bcadd($nuSaldoDotacao, $request->get('nuVlItemExcluidos'), 4); $js .= montaLabel($nuSaldoDotacao); } @@ -471,6 +477,7 @@ switch ($stCtrl) { break; case 'buscaDespesa': + if ($request->get('inCodDespesa') != '' AND $request->get('inCodEntidade') != '') { $obREmpenhoAutorizacaoEmpenho->obROrcamentoDespesa->setCodDespesa($request->get('inCodDespesa')); $obREmpenhoAutorizacaoEmpenho->obROrcamentoDespesa->obROrcamentoEntidade->setCodigoEntidade($request->get('inCodEntidade')); @@ -503,8 +510,11 @@ switch ($stCtrl) { if ($request->get("inCodDespesa") != '' AND $stNomDespesa) { $obREmpenhoAutorizacaoEmpenho->obROrcamentoDespesa->setCodDespesa($request->get('inCodDespesa')); $obREmpenhoAutorizacaoEmpenho->setExercicio(Sessao::getExercicio()); - $obREmpenhoAutorizacaoEmpenho->consultaSaldoAnterior($nuSaldoDotacao); - + $obREmpenhoAutorizacaoEmpenho->setdataEmpenho($request->get('stDtAutorizacao')); + $obREmpenhoAutorizacaoEmpenho->setCodEntidade($request->get('inCodEntidade')); + $obREmpenhoAutorizacaoEmpenho->setTipoEmissao('R'); + $obREmpenhoAutorizacaoEmpenho->consultaSaldoAnteriorDataEmpenho($nuSaldoDotacao); + if ($request->get('inCodDespesa') == $request->get('inCodDespesaAux') and $request->get('stAcao') == 'alterar') { $nuSaldoDotacao = bcadd($nuSaldoDotacao, $request->get('nuVlItemExcluidos'), 4); } @@ -603,6 +613,7 @@ switch ($stCtrl) { }else{ $arItens[$inCount]['nom_item'] = $request->get('stNomItem'); } + $arItens[$inCount]['cod_centro'] = $request->get('inCodCentroCusto'); $arItens[$inCount]['complemento'] = trim($request->get('stComplemento')); $arItens[$inCount]['quantidade'] = trim($request->get('nuQuantidade')); $arItens[$inCount]['vl_unitario'] = $request->get('nuVlUnitario'); @@ -615,7 +626,9 @@ switch ($stCtrl) { $js = "alertaAviso('Item(".$request->get('inCodItem').") Já Incluso na Lista.','frm','erro','".Sessao::getId()."'); \n"; $js .= "jq('#Ok').prop('disabled',false);\n"; }else{ - $js = montaLista( $arItens, false); + $js = "limparItem();"; + $js .= montaLista( $arItens, false); + $js .= "bloqueiaTipoItem('".$request->get('stTipoItem')."');"; Sessao::write('arItens', $arItens); } break; @@ -627,26 +640,33 @@ switch ($stCtrl) { foreach ($arItens as $valor) { if ($valor['num_item'] == $request->get('num_item')) { $stUnidade = $valor['cod_unidade'].'-'.$valor['cod_grandeza'].'-'.$valor['nom_unidade']; - $js .= "jq('#hdnNumItem').val('".$request->get('num_item')."');"; + $js .= "jq('#hdnNumItem').val(\"".$request->get('num_item')."\"); \n"; if ($request->get('cod_item')) { - $js .= "jq('#inCodItem').val('".$valor['cod_item']."');\n"; - $js .= "jq('#HdninCodItem').val('".$valor['cod_item']."');\n"; - $js .= "jq('#stNomItemCatalogo').val('".$valor["nom_item"]."');\n"; - $js .= "jq('#stNomItemCatalogo').html('".$valor["nom_item"]."');\n"; - $js .= "jq('#inCodUnidadeMedida').val('".$valor["cod_unidade"]."-". $valor["cod_grandeza"]."');\n"; - $js .= "jq('#stNomUnidade').val('".$valor["nom_unidade"]."');\n"; + $js .= "jq('#inCodItem').val(\"".$valor['cod_item']."\"); \n"; + $js .= "jq('#HdninCodItem').val(\"".$valor['cod_item']."\"); \n"; + $js .= "jq('input[name=stNomItemCatalogo]').val(\"".$valor["nom_item"]."\"); \n"; + $js .= "jq('#stNomItemCatalogo').html(\"".$valor["nom_item"]."\"); \n"; + $js .= "jq('#inCodUnidadeMedida').val(\"".$valor["cod_unidade"]."-". $valor["cod_grandeza"]."\"); \n"; + $js .= "jq('#stNomUnidade').val(\"".$valor["nom_unidade"]."\"); \n"; } else { - $js .= "jq('#stNomItem').val('".htmlentities($valor["nom_item"], ENT_QUOTES)."');"; + $js .= "jq('#stNomItem').val(\"".htmlentities($valor["nom_item"], ENT_QUOTES)."\"); \n"; } - $js .= "jq('#stComplemento').val('".htmlentities($valor["complemento"], ENT_QUOTES)."');"; - $js .= "jq('#nuQuantidade').val('".number_format($valor['quantidade'],2,',','.')."');"; - $js .= "jq('#inCodUnidade').val('".$stUnidade."');"; - $js .= "jq('#nuVlUnitario').val('".$valor['vl_unitario']."');"; - $js .= "jq('#nuVlTotal').val('".number_format($valor['vl_total'],2,',','.')."');"; - $js .= "jq('#btnIncluir').val('Alterar');"; - $js .= "jq('#btnIncluir').attr('onclick','return alterarItem()');\n"; - $js .= "jq('#stNomItem').val(f.stNomItem.value.unescapeHTML());"; - $js .= "jq('#stComplemento').val(f.stComplemento.value.unescapeHTML());"; + $js .= "jq('#inCodCentroCusto').val(\"".$valor["cod_centro"]."\"); \n"; + + $nomCentro = ''; + if($valor["cod_centro"]!='') + $nomCentro = SistemaLegado::pegaDado("descricao","almoxarifado.centro_custo","where cod_centro = ".$valor["cod_centro"]); + $js .= "jq('#stNomCentroCusto').html(\"".$nomCentro."\"); \n"; + + $js .= "jq('#stComplemento').val(\"".htmlentities($valor["complemento"], ENT_QUOTES)."\"); \n"; + $js .= "jq('#nuQuantidade').val(\"".number_format($valor['quantidade'],2,',','.')."\"); \n"; + $js .= "jq('#inCodUnidade').val(\"".$stUnidade."\"); \n"; + $js .= "jq('#nuVlUnitario').val(\"".$valor['vl_unitario']."\"); \n"; + $js .= "jq('#nuVlTotal').val(\"".number_format($valor['vl_total'],2,',','.')."\"); \n"; + $js .= "jq('#btnIncluir').val('Alterar'); \n"; + $js .= "jq('#btnIncluir').attr('onclick',\"if(alterarItem()){montaParametrosGET('alteradoItemPreEmpenho');}\"); \n"; + $js .= "jq('#stNomItem').val(f.stNomItem.value.unescapeHTML()); \n"; + $js .= "jq('#stComplemento').val(f.stComplemento.value.unescapeHTML()); \n"; } } break; @@ -658,51 +678,51 @@ switch ($stCtrl) { if ($valor['num_item'] == $request->get('hdnNumItem')) { for($i=0;$iget('stTipoItem')=='Catalogo'&&($arItens[$i]['cod_item'] == $request->get('inCodItem'))&&($arItens[$i]['num_item'] != $request->get('hdnNumItem'))){ - $erro=true; + $erro=true; } } - + if(!$erro){ if($request->get('stTipoItem')=='Catalogo'){ list($inCodUnidade, $inCodGrandeza) = explode("-",$request->get('inCodUnidadeMedida')); $stNomUnidade = $request->get('stNomUnidade'); - $arItens[$key]['cod_item'] = $_POST['inCodItem']; + $arItens[$key]['cod_item'] = $request->get('inCodItem'); $arItens[$key]['nom_item'] = stripslashes($request->get('stNomItemCatalogo')); }else{ list($inCodUnidade, $inCodGrandeza, $stNomUnidade) = explode("-",$request->get('inCodUnidade')); $arItens[$key]['nom_item' ] = stripslashes($request->get('stNomItem')); } + $arItens[$key]['cod_centro'] = $request->get('inCodCentroCusto'); $arItens[$key]['complemento'] = stripslashes($request->get('stComplemento')); $arItens[$key]['quantidade' ] = $request->get('nuQuantidade'); $arItens[$key]['cod_unidade'] = $inCodUnidade; $arItens[$key]['cod_grandeza'] = $inCodGrandeza; $arItens[$key]['nom_unidade'] = $stNomUnidade; $arItens[$key]['vl_unitario'] = $request->get('nuVlUnitario'); - + $nuVlTotal = str_replace('.','',$request->get('nuVlTotal')); $nuVlTotal = str_replace(',','.',$nuVlTotal); - + $arItens[$key]['vl_total'] = $nuVlTotal; break; } } else{ if($request->get('stTipoItem')=='Catalogo'&&($valor['cod_item'] == $request->get('inCodItem'))){ - $erro = true; + $erro = true; } } } - + if($erro){ $js .= "alertaAviso('Item(".$request->get('inCodItem').") Já Incluso na Lista.','frm','erro','".Sessao::getId()."'); \n"; $js .= "jq('#Ok').prop('disabled',false);\n"; - $js .= "jq('#btnIncluir').attr('onclick','return incluirItem()');\n"; + $js .= "jq('#btnIncluir').attr('onclick',\"if(incluirItem()){montaParametrosGET('incluiItemPreEmpenho');}\");\n"; } else { Sessao::write('arItens', $arItens); - $js .= "jq('#btnIncluir').attr('onclick','return incluirItem()');\n"; - $js .= "montaLista(".Sessao::read('arItens').")\n"; + $js = "limparItem();"; + $js .= montaLista(Sessao::read('arItens')); } - break; case 'excluirItemPreEmpenho': @@ -713,11 +733,12 @@ switch ($stCtrl) { for($i=0;$iget('inNumItem')){ $arTEMP[$inCount]['num_item'] = $inCount+1; - + if($request->get('stTipoItem')=='Catalogo'){ $arTEMP[$inCount]['cod_item'] = $arItens[$i]['cod_item']; } $arTEMP[$inCount]['nom_item'] = $arItens[$i]['nom_item']; + $arTEMP[$inCount]['cod_centro'] = $arItens[$i]['cod_centro']; $arTEMP[$inCount]['complemento'] = $arItens[$i]['complemento']; $arTEMP[$inCount]['quantidade'] = $arItens[$i]['quantidade']; $arTEMP[$inCount]['cod_unidade'] = $arItens[$i]['cod_unidade']; @@ -729,7 +750,7 @@ switch ($stCtrl) { $inCount++; } } - + $arItens = $arTEMP; $js .= montaLista($arItens, false); Sessao::write('arItens', $arItens); @@ -749,7 +770,7 @@ switch ($stCtrl) { $js = montaLista(Sessao::read('arItens'), false); break; - case 'limpar' : + case 'limpar': Sessao::remove('arItens'); $js .= montaLista(Sessao::read('arItens'), false); break; @@ -759,9 +780,9 @@ switch ($stCtrl) { $obREmpenhoAutorizacaoEmpenho->obREmpenhoPermissaoAutorizacao->obRUsuario->obRCGM->setNumCGM(Sessao::read('numCgm')); $obREmpenhoAutorizacaoEmpenho->obREmpenhoPermissaoAutorizacao->setExercicio(Sessao::getExercicio()); $obREmpenhoAutorizacaoEmpenho->obREmpenhoPermissaoAutorizacao->listarOrgaoDespesaEntidadeUsuario($rsOrgao, $stOrder); - + $js .= "jq('#inCodOrgao').empty().append(new Option('Selecione','')); \n"; - + $js .= "jq('#inCodUnidadeOrcamento').empty();\n"; while (!$rsOrgao->eof()) { @@ -875,25 +896,25 @@ switch ($stCtrl) { break; case "unidadeItem": - if( $request->get("codItem") ){ - $stFiltro=" WHERE cod_item=".$request->get("codItem"); - + if( $request->get("inCodItem") ){ + $stFiltro=" WHERE cod_item=".$request->get("inCodItem"); + include_once ( CAM_GP_ALM_MAPEAMENTO."TAlmoxarifadoCatalogoItem.class.php" ); $obTAlmoxarifadoCatalogoItem = new TAlmoxarifadoCatalogoItem; - $obTAlmoxarifadoCatalogoItem->setDado('cod_item' , $request->get("codItem")); + $obTAlmoxarifadoCatalogoItem->setDado('cod_item' , $request->get("inCodItem")); $obTAlmoxarifadoCatalogoItem->recuperaTodos($rsItem, $stFiltro); - + if($rsItem->inNumLinhas==1){ $value = $rsItem->getCampo('cod_unidade')."-".$rsItem->getCampo('cod_grandeza'); - + include_once ( CAM_GA_ADM_MAPEAMENTO."TUnidadeMedida.class.php" ); $obTUnidadeMedida = new TUnidadeMedida; - + $stFiltro=" WHERE cod_unidade=".$rsItem->getCampo('cod_unidade')." AND cod_grandeza=".$rsItem->getCampo('cod_grandeza'); $obTUnidadeMedida->recuperaTodos($rsUnidade, $stFiltro); if($rsUnidade->inNumLinhas==1){ $value=$value."-".$rsUnidade->getCampo('nom_unidade'); - + $js .= "for (var i = 0; i < f.inCodUnidade.options.length; i++) { if (f.inCodUnidade.options[i].value == '".$value."') @@ -903,9 +924,8 @@ switch ($stCtrl) { } }\n"; } - } - } + } break; case "montaOrgaoUnidade": diff --git a/gestaoFinanceira/fontes/PHP/empenho/instancias/autorizacao/PRManterAutorizacao.php b/gestaoFinanceira/fontes/PHP/empenho/instancias/autorizacao/PRManterAutorizacao.php index c05686d..470a8a2 100755 --- a/gestaoFinanceira/fontes/PHP/empenho/instancias/autorizacao/PRManterAutorizacao.php +++ b/gestaoFinanceira/fontes/PHP/empenho/instancias/autorizacao/PRManterAutorizacao.php @@ -32,10 +32,7 @@ * @ignore - $Revision: 32545 $ - $Name$ - $Autor:$ - $Date: 2008-01-02 08:44:54 -0200 (Qua, 02 Jan 2008) $ + $Id: PRManterAutorizacao.php 64132 2015-12-07 13:18:15Z arthur $ * Casos de uso: uc-02.03.02 uc-02.01.08 @@ -43,7 +40,9 @@ include '../../../../../../gestaoAdministrativa/fontes/PHP/pacotes/FrameworkHTML.inc.php'; include_once '../../../../../../gestaoAdministrativa/fontes/PHP/framework/include/cabecalho.inc.php'; -include( CAM_GF_EMP_NEGOCIO."REmpenhoAutorizacaoEmpenho.class.php" ); +include CAM_GF_EMP_NEGOCIO.'REmpenhoAutorizacaoEmpenho.class.php'; +include_once CAM_GF_CONT_MAPEAMENTO.'TContabilidadeEncerramentoMes.class.php'; +include_once CAM_GF_EMP_MAPEAMENTO.'TEmpenhoAutorizacaoEmpenhoAssinatura.class.php'; //Define o nome dos arquivos PHP $stPrograma = "ManterAutorizacao"; @@ -65,187 +64,176 @@ $obREmpenhoAutorizacaoEmpenho = new REmpenhoAutorizacaoEmpenho; foreach ($arChave as $key=>$value) { $arChaves = preg_split( "/[^a-zA-Z0-9]/", $key ); $inCodAtributo = $arChaves[0]; - if ( is_array($value) ) { + if ( is_array($value) ) $value = implode(",",$value); - } + $obREmpenhoAutorizacaoEmpenho->obRCadastroDinamico->addAtributosDinamicos( $inCodAtributo , $value ); } -$stAcao = $_POST["stAcao"] ? $_POST["stAcao"] : $_GET["stAcao"]; +$stAcao = $request->get('stAcao'); $obErro = new Erro; switch ($stAcao) { case "material": case "incluir": //valida a utilização da rotina de encerramento do mês contábil - $arDtAutorizacao = explode('/', $_POST['stDtAutorizacao']); + $arDtAutorizacao = explode('/', $request->get('stDtAutorizacao')); $boUtilizarEncerramentoMes = SistemaLegado::pegaConfiguracao('utilizar_encerramento_mes', 9); - include_once CAM_GF_CONT_MAPEAMENTO."TContabilidadeEncerramentoMes.class.php"; $obTContabilidadeEncerramentoMes = new TContabilidadeEncerramentoMes; $obTContabilidadeEncerramentoMes->setDado('exercicio', Sessao::getExercicio()); $obTContabilidadeEncerramentoMes->setDado('situacao', 'F'); $obTContabilidadeEncerramentoMes->recuperaEncerramentoMes($rsUltimoMesEncerrado, '', ' ORDER BY mes DESC LIMIT 1 '); - + if ($boUtilizarEncerramentoMes == 'true' AND $rsUltimoMesEncerrado->getCampo('mes') >= $arDtAutorizacao[1]) { SistemaLegado::executaFrameOculto(" window.parent.frames['telaPrincipal'].document.getElementById('Ok').disabled = false; "); SistemaLegado::exibeAviso(urlencode("Mês da Autorização encerrado!"),"n_incluir","erro"); exit; } - - if (( $_REQUEST['inCodCategoria'] == 2 || $_REQUEST['inCodCategoria'] == 3) && (!$_POST['inCodContrapartida']) ) { + + if (( $request->get('inCodCategoria') == 2 || $request->get('inCodCategoria') == 3) && ($request->get('inCodDespesa', '') == '') ) $obErro->setDescricao("Campo Contrapartida inválido!"); - } - + $obREmpenhoAutorizacaoEmpenho->checarFormaExecucaoOrcamento( $stFormaExecucao ); - if ($_POST['inCodDespesa']) { - if ($stFormaExecucao==1 and (!$_REQUEST['stCodClassificacao'])) { + if ($request->get('inCodDespesa', '') != '') { + if ($stFormaExecucao==1 and ($request->get('stCodClassificacao', '') == '')) $obErro->setDescricao("Desdobramento não informado!"); - } if ( !$obErro->ocorreu() ) { - $obREmpenhoAutorizacaoEmpenho->obROrcamentoDespesa->setCodDespesa( $_REQUEST["inCodDespesa"] ); - $obREmpenhoAutorizacaoEmpenho->setExercicio( Sessao::getExercicio() ); - $obREmpenhoAutorizacaoEmpenho->consultaSaldoAnterior( $nuSaldoDotacao ); - if ($_REQUEST['nuVlTotalAutorizacao'] > $nuSaldoDotacao) { + $obREmpenhoAutorizacaoEmpenho->obROrcamentoDespesa->setCodDespesa( $request->get('inCodDespesa') ); + $obREmpenhoAutorizacaoEmpenho->setExercicio( Sessao::getExercicio() ); + $obREmpenhoAutorizacaoEmpenho->setdataEmpenho($request->get('stDtAutorizacao')); + $obREmpenhoAutorizacaoEmpenho->setCodEntidade($request->get('inCodEntidade')); + $obREmpenhoAutorizacaoEmpenho->setTipoEmissao('R'); + $obREmpenhoAutorizacaoEmpenho->consultaSaldoAnteriorDataEmpenho($nuSaldoDotacao); + + if ($request->get('nuVlTotalAutorizacao') > $nuSaldoDotacao) $obErro->setDescricao("O Saldo da Dotação é menor que o Valor Total da Autorização!"); - } } } if ( !$obErro->ocorreu() ) { $obREmpenhoAutorizacaoEmpenho->setExercicio( Sessao::getExercicio() ); - $obREmpenhoAutorizacaoEmpenho->obROrcamentoEntidade->setCodigoEntidade( $_POST['inCodEntidade'] ); + $obREmpenhoAutorizacaoEmpenho->obROrcamentoEntidade->setCodigoEntidade( $request->get('inCodEntidade') ); $obREmpenhoAutorizacaoEmpenho->obREmpenhoTipoEmpenho->setCodTipo( 1 ); - $obREmpenhoAutorizacaoEmpenho->obROrcamentoDespesa->setCodDespesa( $_POST['inCodDespesa'] ); - $obREmpenhoAutorizacaoEmpenho->obROrcamentoClassificacaoDespesa->setMascClassificacao( $_REQUEST['stCodClassificacao'] ); - $obREmpenhoAutorizacaoEmpenho->obRCGM->setNumCGM( $_POST['inCodFornecedor'] ); + $obREmpenhoAutorizacaoEmpenho->obROrcamentoDespesa->setCodDespesa( $request->get('inCodDespesa') ); + $obREmpenhoAutorizacaoEmpenho->obROrcamentoClassificacaoDespesa->setMascClassificacao( $request->get('stCodClassificacao') ); + $obREmpenhoAutorizacaoEmpenho->obRCGM->setNumCGM( $request->get('inCodFornecedor') ); $obREmpenhoAutorizacaoEmpenho->obRUsuario->obRCGM->setNumCGM( Sessao::read('numCgm') ); - $obREmpenhoAutorizacaoEmpenho->obREmpenhoHistorico->setCodHistorico( $_POST['inCodHistorico'] ); - $obREmpenhoAutorizacaoEmpenho->obROrcamentoReserva->setDtValidadeInicial( $_POST['stDtAutorizacao'] ); - $obREmpenhoAutorizacaoEmpenho->obROrcamentoReserva->setDtValidadeFinal( $_POST['stDtValidadeFinal'] ); - $obREmpenhoAutorizacaoEmpenho->obROrcamentoReserva->setDtInclusao( $_POST['stDtAutorizacao'] ); - $obREmpenhoAutorizacaoEmpenho->setDescricao( $_POST['stDescricao'] ); - $obREmpenhoAutorizacaoEmpenho->setDtAutorizacao( $_POST['stDtAutorizacao'] ); - $nuVlReserva = str_replace('.','',$_POST['nuVlReserva'] ); + $obREmpenhoAutorizacaoEmpenho->obREmpenhoHistorico->setCodHistorico( $request->get('inCodHistorico') ); + $obREmpenhoAutorizacaoEmpenho->obROrcamentoReserva->setDtValidadeInicial( $request->get('stDtAutorizacao') ); + $obREmpenhoAutorizacaoEmpenho->obROrcamentoReserva->setDtValidadeFinal( $request->get('stDtValidadeFinal') ); + $obREmpenhoAutorizacaoEmpenho->obROrcamentoReserva->setDtInclusao( $request->get('stDtAutorizacao') ); + $obREmpenhoAutorizacaoEmpenho->setDescricao( $request->get('stDescricao') ); + $obREmpenhoAutorizacaoEmpenho->setDtAutorizacao( $request->get('stDtAutorizacao') ); + $nuVlReserva = str_replace('.','',$request->get('hdnVlReserva') ); $nuVlReserva = str_replace(',','.',$nuVlReserva ); $obREmpenhoAutorizacaoEmpenho->obROrcamentoReserva->setVlReserva( $nuVlReserva ); - $obREmpenhoAutorizacaoEmpenho->obROrcamentoDespesa->obROrcamentoUnidadeOrcamentaria->obROrcamentoOrgaoOrcamentario->setNumeroOrgao( $_POST['inCodOrgao']); - $obREmpenhoAutorizacaoEmpenho->obROrcamentoDespesa->obROrcamentoUnidadeOrcamentaria->setNumeroUnidade($_POST['inCodUnidadeOrcamento']); - $obREmpenhoAutorizacaoEmpenho->setCodCategoria($_REQUEST['inCodCategoria']); - - if ($_REQUEST['inCodCategoria'] == 2 || $_REQUEST['inCodCategoria'] == 3) { - $obREmpenhoAutorizacaoEmpenho->obTEmpenhoContrapartidaAutorizacao->setDado('conta_contrapartida',$_REQUEST['inCodContrapartida']); - } - + $obREmpenhoAutorizacaoEmpenho->obROrcamentoDespesa->obROrcamentoUnidadeOrcamentaria->obROrcamentoOrgaoOrcamentario->setNumeroOrgao( $request->get('inCodOrgao') ); + $obREmpenhoAutorizacaoEmpenho->obROrcamentoDespesa->obROrcamentoUnidadeOrcamentaria->setNumeroUnidade($request->get('inCodUnidadeOrcamento')); + $obREmpenhoAutorizacaoEmpenho->setCodCategoria($request->get('inCodCategoria')); + + if ($request->get('inCodCategoria') == 2 || $request->get('inCodCategoria') == 3) + $obREmpenhoAutorizacaoEmpenho->obTEmpenhoContrapartidaAutorizacao->setDado('conta_contrapartida',$request->get('inCodContrapartida')); + $arItens = Sessao::read('arItens'); if ( sizeof( $arItens ) ) { foreach ($arItens as $arItemPreEmpenho) { $obREmpenhoAutorizacaoEmpenho->addItemPreEmpenho(); - $obREmpenhoAutorizacaoEmpenho->roUltimoItemPreEmpenho->setNumItem ( $arItemPreEmpenho["num_item" ] ); - $obREmpenhoAutorizacaoEmpenho->roUltimoItemPreEmpenho->setQuantidade ( $arItemPreEmpenho['quantidade' ] ); - $obREmpenhoAutorizacaoEmpenho->roUltimoItemPreEmpenho->setNomUnidade ( $arItemPreEmpenho["nom_unidade" ] ); - $obREmpenhoAutorizacaoEmpenho->roUltimoItemPreEmpenho->setValorTotal ( $arItemPreEmpenho["vl_total" ] ); - $obREmpenhoAutorizacaoEmpenho->roUltimoItemPreEmpenho->setNomItem ( $arItemPreEmpenho["nom_item" ] ); - $obREmpenhoAutorizacaoEmpenho->roUltimoItemPreEmpenho->setComplemento( $arItemPreEmpenho["complemento" ] ); - $obREmpenhoAutorizacaoEmpenho->roUltimoItemPreEmpenho->setCodMaterial( $arItemPreEmpenho["cod_material" ] ); - $obREmpenhoAutorizacaoEmpenho->roUltimoItemPreEmpenho->obRUnidadeMedida->setCodUnidade( $arItemPreEmpenho['cod_unidade'] ); - $obREmpenhoAutorizacaoEmpenho->roUltimoItemPreEmpenho->obRUnidadeMedida->obRGrandeza->setCodGrandeza( $arItemPreEmpenho["cod_grandeza"] ); + $obREmpenhoAutorizacaoEmpenho->roUltimoItemPreEmpenho->setNumItem ( $arItemPreEmpenho[ 'num_item' ] ); + $obREmpenhoAutorizacaoEmpenho->roUltimoItemPreEmpenho->setQuantidade ( $arItemPreEmpenho[ 'quantidade' ] ); + $obREmpenhoAutorizacaoEmpenho->roUltimoItemPreEmpenho->setNomUnidade ( $arItemPreEmpenho[ 'nom_unidad' ] ); + $obREmpenhoAutorizacaoEmpenho->roUltimoItemPreEmpenho->setValorTotal ( $arItemPreEmpenho[ 'vl_total' ] ); + $obREmpenhoAutorizacaoEmpenho->roUltimoItemPreEmpenho->setNomItem ( $arItemPreEmpenho[ 'nom_item' ] ); + $obREmpenhoAutorizacaoEmpenho->roUltimoItemPreEmpenho->setComplemento( $arItemPreEmpenho[ 'complemento' ] ); + $obREmpenhoAutorizacaoEmpenho->roUltimoItemPreEmpenho->setCodMaterial( $arItemPreEmpenho[ 'cod_material' ] ); + $obREmpenhoAutorizacaoEmpenho->roUltimoItemPreEmpenho->obRUnidadeMedida->setCodUnidade( $arItemPreEmpenho[ 'cod_unidade' ] ); + $obREmpenhoAutorizacaoEmpenho->roUltimoItemPreEmpenho->obRUnidadeMedida->obRGrandeza->setCodGrandeza( $arItemPreEmpenho[ 'cod_grandeza' ] ); $obREmpenhoAutorizacaoEmpenho->roUltimoItemPreEmpenho->obRUnidadeMedida->consultar($rsUnidade); - $obREmpenhoAutorizacaoEmpenho->roUltimoItemPreEmpenho->setSiglaUnidade( $rsUnidade->getCampo('simbolo') ); - if($_REQUEST['stTipoItem']=='Catalogo'){ - $obREmpenhoAutorizacaoEmpenho->roUltimoItemPreEmpenho->setCodItemPreEmp( $arItemPreEmpenho["cod_item" ] ); - } + $obREmpenhoAutorizacaoEmpenho->roUltimoItemPreEmpenho->setSiglaUnidade( $rsUnidade->getCampo('simbolo') ); + if($request->get('stTipoItem')=='Catalogo') + $obREmpenhoAutorizacaoEmpenho->roUltimoItemPreEmpenho->setCodItemPreEmp ( $arItemPreEmpenho[ 'cod_item' ] ); + $obREmpenhoAutorizacaoEmpenho->roUltimoItemPreEmpenho->setCodCentroCusto ( $arItemPreEmpenho[ 'cod_centro' ] ); } - } else { + } else $obErro->setDescricao( "É necessário cadastrar pelo menos um Item" ); - } - if ( !$obErro->ocorreu() ) { + if ( !$obErro->ocorreu() ) $obErro = $obREmpenhoAutorizacaoEmpenho->incluir($boTransacao); - } if ( !$obErro->ocorreu() ) { - SistemaLegado::alertaAviso($pgForm.'?&stAcao='.$stAcao, $obREmpenhoAutorizacaoEmpenho->getCodAutorizacao()."/".Sessao::getExercicio(), 'incluir', "aviso", Sessao::getId(), "../"); /* Salvar assinaturas configuráveis se houverem */ $arAssinaturas = Sessao::read('assinaturas'); - if (isset($arAssinaturas) && count($arAssinaturas['selecionadas']) > 0) { - include_once ( CAM_GF_EMP_MAPEAMENTO."TEmpenhoAutorizacaoEmpenhoAssinatura.class.php" ); - $arAssinatura = $arAssinaturas['selecionadas']; - - $obTEmpenhoAutorizacaoEmpenhoAssinatura = new TEmpenhoAutorizacaoEmpenhoAssinatura; - $obTEmpenhoAutorizacaoEmpenhoAssinatura->setDado( 'exercicio', $obREmpenhoAutorizacaoEmpenho->stExercicio ); - $obTEmpenhoAutorizacaoEmpenhoAssinatura->setDado( 'cod_entidade', $obREmpenhoAutorizacaoEmpenho->obROrcamentoEntidade->getCodigoEntidade() ); - $obTEmpenhoAutorizacaoEmpenhoAssinatura->setDado( 'cod_autorizacao', $obREmpenhoAutorizacaoEmpenho->getCodAutorizacao() ); - $arPapel = $obTEmpenhoAutorizacaoEmpenhoAssinatura->arrayPapel(); - - foreach ($arAssinatura as $arAssina) { + if (isset($arAssinaturas) && count($arAssinaturas['selecionadas']) > 0) { + $arAssinatura = $arAssinaturas['selecionadas']; + + $obTEmpenhoAutorizacaoEmpenhoAssinatura = new TEmpenhoAutorizacaoEmpenhoAssinatura; + $obTEmpenhoAutorizacaoEmpenhoAssinatura->setDado( 'exercicio', $obREmpenhoAutorizacaoEmpenho->stExercicio ); + $obTEmpenhoAutorizacaoEmpenhoAssinatura->setDado( 'cod_entidade', $obREmpenhoAutorizacaoEmpenho->obROrcamentoEntidade->getCodigoEntidade() ); + $obTEmpenhoAutorizacaoEmpenhoAssinatura->setDado( 'cod_autorizacao', $obREmpenhoAutorizacaoEmpenho->getCodAutorizacao() ); + $arPapel = $obTEmpenhoAutorizacaoEmpenhoAssinatura->arrayPapel(); + + foreach ($arAssinatura as $arAssina) { // As assinaturas quando carregam os dados trazem no papel o num_assina, porém quando tu seleciona qualquer um deles // no papel fica a descrição dele, e não o numero, por isso da verificação com o is_string() - $inNumAssina = 1; - if (isset($arAssina['papel'])) { - if (is_string($arAssina['papel'])) { - $inNumAssina = $arPapel[$stPapel]; - } else { - $inNumAssina = $arAssina['papel']; - } + $inNumAssina = 1; + if (isset($arAssina['papel'])) { + if (is_string($arAssina['papel'])) + $inNumAssina = $arPapel[$stPapel]; + else + $inNumAssina = $arAssina['papel']; } - $obTEmpenhoAutorizacaoEmpenhoAssinatura->setDado('num_assinatura', $inNumAssina); - $obTEmpenhoAutorizacaoEmpenhoAssinatura->setDado('numcgm', $arAssina['inCGM']); - $obTEmpenhoAutorizacaoEmpenhoAssinatura->setDado('cargo', $arAssina['stCargo']); - $obErro = $obTEmpenhoAutorizacaoEmpenhoAssinatura->inclusao( $boTransacao ); - } - unset($obTEmpenhoAutorizacaoEmpenhoAssinatura); - // Limpa Sessao->assinaturas - $arAssinaturas = array( 'disponiveis' => array(), 'papeis' => array(), 'selecionadas' => array() ); - Sessao::write('assinaturas', $arAssinaturas); - } - - $stCampos = $stCaminho."?inCodAutorizacao=".$obREmpenhoAutorizacaoEmpenho->getCodAutorizacao(). - "&inCodPreEmpenho=" .$obREmpenhoAutorizacaoEmpenho->getCodPreEmpenho()."&inCodEntidade=".$_POST['inCodEntidade']."&stExercicio=".Sessao::getExercicio(). - "&inCodDespesa=".$_POST['inCodDespesa']."&stDtAutorizacao=".$obREmpenhoAutorizacaoEmpenho->getDtAutorizacao() . "&stAcao=autorizacao"; + $obTEmpenhoAutorizacaoEmpenhoAssinatura->setDado('num_assinatura', $inNumAssina); + $obTEmpenhoAutorizacaoEmpenhoAssinatura->setDado('numcgm', $arAssina['inCGM']); + $obTEmpenhoAutorizacaoEmpenhoAssinatura->setDado('cargo', $arAssina['stCargo']); + $obErro = $obTEmpenhoAutorizacaoEmpenhoAssinatura->inclusao( $boTransacao ); + } + + unset($obTEmpenhoAutorizacaoEmpenhoAssinatura); + // Limpa Sessao->assinaturas + $arAssinaturas = array( 'disponiveis' => array(), 'papeis' => array(), 'selecionadas' => array() ); + Sessao::write('assinaturas', $arAssinaturas); + } + + $stCampos = $stCaminho."?inCodAutorizacao=".$obREmpenhoAutorizacaoEmpenho->getCodAutorizacao()."&inCodPreEmpenho=".$obREmpenhoAutorizacaoEmpenho->getCodPreEmpenho(); + $stCampos .= "&inCodEntidade=".$request->get('inCodEntidade')."&stExercicio=".Sessao::getExercicio()."&inCodDespesa=".$request->get('inCodDespesa'); + $stCampos .= "&stDtAutorizacao=".$obREmpenhoAutorizacaoEmpenho->getDtAutorizacao()."&stAcao=autorizacao"; echo ""; - } else - SistemaLegado::exibeAviso(urlencode($obErro->getDescricao()),"n_incluir","erro"); + SistemaLegado::exibeAviso(urlencode($obErro->getDescricao()),"n_incluir","erro"); } else SistemaLegado::exibeAviso(urlencode($obErro->getDescricao()),"n_incluir","erro"); - break; case "alterar": //valida a utilização da rotina de encerramento do mês contábil - $arDtAutorizacao = explode('/', $_REQUEST['stDtInclusao']); + $arDtAutorizacao = explode('/', $request->get('stDtInclusao')); $boUtilizarEncerramentoMes = SistemaLegado::pegaConfiguracao('utilizar_encerramento_mes', 9); - include_once CAM_GF_CONT_MAPEAMENTO."TContabilidadeEncerramentoMes.class.php"; $obTContabilidadeEncerramentoMes = new TContabilidadeEncerramentoMes; $obTContabilidadeEncerramentoMes->setDado('exercicio', Sessao::getExercicio()); $obTContabilidadeEncerramentoMes->setDado('situacao', 'F'); $obTContabilidadeEncerramentoMes->recuperaEncerramentoMes($rsUltimoMesEncerrado, '', ' ORDER BY mes DESC LIMIT 1 '); - - if ($_REQUEST['stCodClassificacao'] == '' && $_REQUEST['stCodEstrutural'] != ''){ - $stCodClassificacao = $_REQUEST['stCodEstrutural']; - } else { - $stCodClassificacao = $_REQUEST['stCodClassificacao']; - } - + + if ($request->get('stCodClassificacao') == '' && $request->get('stCodEstrutural') != '') + $stCodClassificacao = $request->get('stCodEstrutural'); + else + $stCodClassificacao = $request->get('stCodClassificacao'); + if ($boUtilizarEncerramentoMes == 'true' AND $rsUltimoMesEncerrado->getCampo('mes') >= $arDtAutorizacao[1]) { SistemaLegado::executaFrameOculto(" window.parent.frames['telaPrincipal'].document.getElementById('Ok').disabled = false; "); SistemaLegado::exibeAviso(urlencode("Mês da Autorização encerrado!"),"n_incluir","erro"); exit; } - - if (( $_REQUEST['inCodCategoria'] == 2 || $_REQUEST['inCodCategoria'] == 3) && (!$_REQUEST['inCodContrapartida']) ) { + + if (( $request->get('inCodCategoria') == 2 || $request->get('inCodCategoria') == 3) && ($request->get('inCodContrapartida', '')=='') ) $obErro->setDescricao( "Contrapartida não informada!" ); - } - + $obREmpenhoAutorizacaoEmpenho->checarFormaExecucaoOrcamento( $stFormaExecucao ); - if ($_REQUEST['inCodDespesa']) { - if ($stFormaExecucao==1 and (!$stCodClassificacao)) { + if ($request->get('inCodDespesa', '') != '') { + if ($stFormaExecucao==1 and (!$stCodClassificacao)) $obErro->setDescricao("Desdobramento não informado!"); - } + if ( !$obErro->ocorreu() ) { - if ($_REQUEST['nuVlTotalAutorizacao'] > $_REQUEST['flVlSaldoDotacao']) { - $obErro->setDescricao("O Saldo da Dotação é menor que o Valor Total da Autorização!"); - } + if ($request->get('nuVlTotalAutorizacao') > $request->get('flVlSaldoDotacao')) + $obErro->setDescricao("O Saldo da Dotação é menor que o Valor Total da Autorização!"); } } @@ -261,72 +249,64 @@ switch ($stAcao) { if ( !$obErro->ocorreu() ) { $obREmpenhoAutorizacaoEmpenho->setExercicio( Sessao::getExercicio() ); - $obREmpenhoAutorizacaoEmpenho->obROrcamentoEntidade->setCodigoEntidade( $_REQUEST['inCodEntidade'] ); + $obREmpenhoAutorizacaoEmpenho->obROrcamentoEntidade->setCodigoEntidade( $request->get('inCodEntidade') ); $obREmpenhoAutorizacaoEmpenho->obREmpenhoTipoEmpenho->setCodTipo( 0 ); - $obREmpenhoAutorizacaoEmpenho->obROrcamentoDespesa->setCodDespesa( $_REQUEST['inCodDespesa'] ); + $obREmpenhoAutorizacaoEmpenho->obROrcamentoDespesa->setCodDespesa( $request->get('inCodDespesa') ); $obREmpenhoAutorizacaoEmpenho->obROrcamentoClassificacaoDespesa->setMascClassificacao( $stCodClassificacao ); - $obREmpenhoAutorizacaoEmpenho->obRCGM->setNumCGM( $_REQUEST['inCodFornecedor'] ); + $obREmpenhoAutorizacaoEmpenho->obRCGM->setNumCGM( $request->get('inCodFornecedor') ); $obREmpenhoAutorizacaoEmpenho->obRUsuario->obRCGM->setNumCGM( Sessao::read('numCgm') ); - $obREmpenhoAutorizacaoEmpenho->obREmpenhoHistorico->setCodHistorico( $_REQUEST['inCodHistorico'] ); - $obREmpenhoAutorizacaoEmpenho->obROrcamentoReserva->setDtValidadeInicial( $_REQUEST['stDtValidadeInicial'] ); - $obREmpenhoAutorizacaoEmpenho->obROrcamentoReserva->setDtValidadeFinal( $_REQUEST['stDtValidadeFinal'] ); - $obREmpenhoAutorizacaoEmpenho->obROrcamentoReserva->setDtInclusao( $_REQUEST['stDtInclusao'] ); - $obREmpenhoAutorizacaoEmpenho->setDescricao( $_REQUEST['stDescricao'] ); - $obREmpenhoAutorizacaoEmpenho->obROrcamentoReserva->setVlReserva( $_REQUEST['nuVlReserva'] ); - - if ($request->get('inCodOrgao') == '' && $request->get('hdnCodOrgao') != ''){ + $obREmpenhoAutorizacaoEmpenho->obREmpenhoHistorico->setCodHistorico( $request->get('inCodHistorico') ); + $obREmpenhoAutorizacaoEmpenho->obROrcamentoReserva->setDtValidadeInicial( $request->get('stDtValidadeInicial') ); + $obREmpenhoAutorizacaoEmpenho->obROrcamentoReserva->setDtValidadeFinal( $request->get('stDtValidadeFinal') ); + $obREmpenhoAutorizacaoEmpenho->obROrcamentoReserva->setDtInclusao( $request->get('stDtInclusao') ); + $obREmpenhoAutorizacaoEmpenho->setDescricao( $request->get('stDescricao') ); + $obREmpenhoAutorizacaoEmpenho->obROrcamentoReserva->setVlReserva( $request->get('nuVlReserva') ); + + if ($request->get('inCodOrgao') == '' && $request->get('hdnCodOrgao') != '') $obREmpenhoAutorizacaoEmpenho->obROrcamentoDespesa->obROrcamentoUnidadeOrcamentaria->obROrcamentoOrgaoOrcamentario->setNumeroOrgao($request->get('hdnCodOrgao')); - } else { - $obREmpenhoAutorizacaoEmpenho->obROrcamentoDespesa->obROrcamentoUnidadeOrcamentaria->obROrcamentoOrgaoOrcamentario->setNumeroOrgao($_REQUEST['inCodOrgao']); - } + else + $obREmpenhoAutorizacaoEmpenho->obROrcamentoDespesa->obROrcamentoUnidadeOrcamentaria->obROrcamentoOrgaoOrcamentario->setNumeroOrgao($request->get('inCodOrgao')); - if ($request->get('inCodUnidadeOrcamento') == '' && $request->get('hdnCodUnidade') != ''){ + if ($request->get('inCodUnidadeOrcamento') == '' && $request->get('hdnCodUnidade') != '') $obREmpenhoAutorizacaoEmpenho->obROrcamentoDespesa->obROrcamentoUnidadeOrcamentaria->setNumeroUnidade($request->get('hdnCodUnidade')); - } else { - $obREmpenhoAutorizacaoEmpenho->obROrcamentoDespesa->obROrcamentoUnidadeOrcamentaria->setNumeroUnidade($_REQUEST['inCodUnidadeOrcamento']); - } - - $obREmpenhoAutorizacaoEmpenho->setCodAutorizacao( $_REQUEST['inCodAutorizacao'] ); - $obREmpenhoAutorizacaoEmpenho->setCodPreEmpenho( $_REQUEST['inCodPreEmpenho'] ); - $obREmpenhoAutorizacaoEmpenho->obROrcamentoReserva->setCodReserva( $_REQUEST['inCodReserva'] ); - $obREmpenhoAutorizacaoEmpenho->setCodCategoria($_REQUEST['inCodCategoria']); - - if ($_REQUEST['inCodCategoria'] == 2 || $_REQUEST['inCodCategoria'] == 3) { - $obREmpenhoAutorizacaoEmpenho->obTEmpenhoContrapartidaAutorizacao->setDado('conta_contrapartida',$_REQUEST['inCodContrapartida']); - } - + else + $obREmpenhoAutorizacaoEmpenho->obROrcamentoDespesa->obROrcamentoUnidadeOrcamentaria->setNumeroUnidade($request->get('inCodUnidadeOrcamento')); + + $obREmpenhoAutorizacaoEmpenho->setCodAutorizacao( $request->get('inCodAutorizacao') ); + $obREmpenhoAutorizacaoEmpenho->setCodPreEmpenho( $request->get('inCodPreEmpenho') ); + $obREmpenhoAutorizacaoEmpenho->obROrcamentoReserva->setCodReserva( $request->get('inCodReserva') ); + $obREmpenhoAutorizacaoEmpenho->setCodCategoria($request->get('inCodCategoria')); + + if ($request->get('inCodCategoria') == 2 || $request->get('inCodCategoria') == 3) + $obREmpenhoAutorizacaoEmpenho->obTEmpenhoContrapartidaAutorizacao->setDado('conta_contrapartida',$request->get('inCodContrapartida')); + $arItens = Sessao::read('arItens'); if ( sizeof( $arItens ) ) { foreach ($arItens as $arItemPreEmpenho) { $obREmpenhoAutorizacaoEmpenho->addItemPreEmpenho( $this ); - $obREmpenhoAutorizacaoEmpenho->roUltimoItemPreEmpenho->setNumItem ( $arItemPreEmpenho["num_item" ] ); - $obREmpenhoAutorizacaoEmpenho->roUltimoItemPreEmpenho->setQuantidade ( $arItemPreEmpenho["quantidade" ] ); - $obREmpenhoAutorizacaoEmpenho->roUltimoItemPreEmpenho->setNomUnidade ( $arItemPreEmpenho["nom_unidade" ] ); - $obREmpenhoAutorizacaoEmpenho->roUltimoItemPreEmpenho->setValorTotal ( $arItemPreEmpenho["vl_total" ] ); - $obREmpenhoAutorizacaoEmpenho->roUltimoItemPreEmpenho->setNomItem ( $arItemPreEmpenho["nom_item" ] ); - $obREmpenhoAutorizacaoEmpenho->roUltimoItemPreEmpenho->setComplemento( $arItemPreEmpenho["complemento" ] ); - $obREmpenhoAutorizacaoEmpenho->roUltimoItemPreEmpenho->setCodMaterial( $arItemPreEmpenho["cod_material"] ); - $obREmpenhoAutorizacaoEmpenho->roUltimoItemPreEmpenho->obRUnidadeMedida->setCodUnidade( $arItemPreEmpenho['cod_unidade'] ); - $obREmpenhoAutorizacaoEmpenho->roUltimoItemPreEmpenho->obRUnidadeMedida->obRGrandeza->setCodGrandeza( $arItemPreEmpenho["cod_grandeza"] ); + $obREmpenhoAutorizacaoEmpenho->roUltimoItemPreEmpenho->setNumItem ( $arItemPreEmpenho[ 'num_item' ] ); + $obREmpenhoAutorizacaoEmpenho->roUltimoItemPreEmpenho->setQuantidade ( $arItemPreEmpenho[ 'quantidade' ] ); + $obREmpenhoAutorizacaoEmpenho->roUltimoItemPreEmpenho->setNomUnidade ( $arItemPreEmpenho[ 'nom_unidade' ] ); + $obREmpenhoAutorizacaoEmpenho->roUltimoItemPreEmpenho->setValorTotal ( $arItemPreEmpenho[ 'vl_total' ] ); + $obREmpenhoAutorizacaoEmpenho->roUltimoItemPreEmpenho->setNomItem ( $arItemPreEmpenho[ 'nom_item' ] ); + $obREmpenhoAutorizacaoEmpenho->roUltimoItemPreEmpenho->setComplemento( $arItemPreEmpenho[ 'complemento' ] ); + $obREmpenhoAutorizacaoEmpenho->roUltimoItemPreEmpenho->setCodMaterial( $arItemPreEmpenho[ 'cod_material' ] ); + $obREmpenhoAutorizacaoEmpenho->roUltimoItemPreEmpenho->obRUnidadeMedida->setCodUnidade( $arItemPreEmpenho[ 'cod_unidade' ] ); + $obREmpenhoAutorizacaoEmpenho->roUltimoItemPreEmpenho->obRUnidadeMedida->obRGrandeza->setCodGrandeza( $arItemPreEmpenho[ 'cod_grandeza' ] ); $obREmpenhoAutorizacaoEmpenho->roUltimoItemPreEmpenho->obRUnidadeMedida->consultar($rsUnidade); - $obREmpenhoAutorizacaoEmpenho->roUltimoItemPreEmpenho->setSiglaUnidade( $rsUnidade->getCampo('simbolo') ); - - if ($_REQUEST['stTipoItem']=='Catalogo'){ - $obREmpenhoAutorizacaoEmpenho->roUltimoItemPreEmpenho->setCodItemPreEmp( $arItemPreEmpenho["cod_item"] ); - } + $obREmpenhoAutorizacaoEmpenho->roUltimoItemPreEmpenho->setSiglaUnidade( $rsUnidade->getCampo('simbolo') ); + if ($request->get('stTipoItem')=='Catalogo') + $obREmpenhoAutorizacaoEmpenho->roUltimoItemPreEmpenho->setCodItemPreEmp ( $arItemPreEmpenho[ 'cod_item' ] ); + $obREmpenhoAutorizacaoEmpenho->roUltimoItemPreEmpenho->setCodCentroCusto ( $arItemPreEmpenho[ 'cod_centro' ] ); } - - } else { + } else $obErro->setDescricao( "É necessário cadastrar pelo menos um Item" ); - } - if ( !$obErro->ocorreu() ) { + if ( !$obErro->ocorreu() ) $obErro = $obREmpenhoAutorizacaoEmpenho->alterar(); - } - + /* Excluir Assinaturas vinculadas ao documento */ if ( !$obErro->ocorreu() ) { - include_once ( CAM_GF_EMP_MAPEAMENTO."TEmpenhoAutorizacaoEmpenhoAssinatura.class.php" ); /* Montar um RecordSet com todas as assinaturas vinculadas ao documento na tabela correspondente */ $obTAutorizacaoAssinatura = new TEmpenhoAutorizacaoEmpenhoAssinatura; $obTAutorizacaoAssinatura->setDado( 'exercicio', $obREmpenhoAutorizacaoEmpenho->stExercicio ); @@ -346,10 +326,9 @@ switch ($stAcao) { $obErro = $obTEAutorizacaoEmpAssinatura->exclusao(); } } - + /* Salvar assinaturas configuráveis se houverem */ if ( !$obErro->ocorreu() ) { - include_once ( CAM_GF_EMP_MAPEAMENTO."TEmpenhoAutorizacaoEmpenhoAssinatura.class.php" ); $arAssinaturas = Sessao::read('assinaturas'); if ( isset($arAssinaturas) && count($arAssinaturas['selecionadas']) > 0 ) { $arAssinatura = $arAssinaturas['selecionadas']; @@ -374,31 +353,30 @@ switch ($stAcao) { $arAssinaturas = array( 'disponiveis'=>array(), 'papeis'=>array(), 'selecionadas'=>array() ); Sessao::write('assinaturas', $arAssinaturas); } - + if ( !$obErro->ocorreu() ) { $stFiltro = ""; $arFiltro = Sessao::read('filtro'); foreach ($arFiltro as $stCampo => $stValor) { $stFiltro .= $stCampo."=".@urlencode( $stValor )."&"; } - + $stFiltro .= "pg=".Sessao::read('pg')."&"; $stFiltro .= "pos=".Sessao::read('pos')."&"; - $stFiltro .= "stAcao=".$_REQUEST['stAcao']; - + $stFiltro .= "stAcao=".$request->get('stAcao'); + if ( !$obErro->ocorreu() ) { - SistemaLegado::alertaAviso($pgList."?".$stFiltro, $_POST['inCodAutorizacao']."/".Sessao::getExercicio(), "alterar", "aviso", Sessao::getId(), "../"); - - $stCampos = $stCaminho."?inCodAutorizacao=".$obREmpenhoAutorizacaoEmpenho->getCodAutorizacao(). - "&inCodPreEmpenho=" .$obREmpenhoAutorizacaoEmpenho->getCodPreEmpenho()."&inCodEntidade=".$_POST['inCodEntidade']."&inCodDespesa=".$_POST['inCodDespesa']."&stAcao=autorizacao&stExercicio=".Sessao::getExercicio(); - + SistemaLegado::alertaAviso($pgList."?".$stFiltro, $request->get('inCodAutorizacao')."/".Sessao::getExercicio(), "alterar", "aviso", Sessao::getId(), "../"); + + $stCampos = $stCaminho."?inCodAutorizacao=".$obREmpenhoAutorizacaoEmpenho->getCodAutorizacao(); + $stCampos .= "&inCodPreEmpenho=".$obREmpenhoAutorizacaoEmpenho->getCodPreEmpenho()."&inCodEntidade=".$request->get('inCodEntidade'); + $stCampos .= "&inCodDespesa=".$request->get('inCodDespesa')."&stAcao=autorizacao&stExercicio=".Sessao::getExercicio(); + echo ""; - } else { + } else SistemaLegado::exibeAviso(urlencode($obErro->getDescricao()),"n_alterar","erro"); - } - } else { + } else SistemaLegado::exibeAviso(urlencode($obErro->getDescricao()),"n_alterar","erro"); - } } else SistemaLegado::exibeAviso(urlencode($obErro->getDescricao()),"n_incluir","erro"); break; @@ -406,7 +384,6 @@ switch ($stAcao) { //valida a utilização da rotina de encerramento do mês contábil $arDtAutorizacao = explode('/', date('d/m/').Sessao::getExercicio()); $boUtilizarEncerramentoMes = SistemaLegado::pegaConfiguracao('utilizar_encerramento_mes', 9); - include_once CAM_GF_CONT_MAPEAMENTO."TContabilidadeEncerramentoMes.class.php"; $obTContabilidadeEncerramentoMes = new TContabilidadeEncerramentoMes; $obTContabilidadeEncerramentoMes->setDado('exercicio', Sessao::getExercicio()); $obTContabilidadeEncerramentoMes->setDado('situacao', 'F'); @@ -418,39 +395,39 @@ switch ($stAcao) { exit; } - $obREmpenhoAutorizacaoEmpenho->setCodAutorizacao( $_POST['inCodAutorizacao'] ); - $obREmpenhoAutorizacaoEmpenho->setCodPreEmpenho( $_POST['inCodPreEmpenho'] ); - $obREmpenhoAutorizacaoEmpenho->obROrcamentoEntidade->setCodigoEntidade( $_POST['inCodEntidade'] ); - $obREmpenhoAutorizacaoEmpenho->obROrcamentoReserva->setCodReserva( $_POST['inCodReserva'] ); - $obREmpenhoAutorizacaoEmpenho->obROrcamentoReserva->setCodDespesa( $_POST['inCodDespesa'] ); - $obREmpenhoAutorizacaoEmpenho->obROrcamentoDespesa->setCodDespesa( $_POST['inCodDespesa'] ); - $obREmpenhoAutorizacaoEmpenho->setExercicio( $_POST['stExercicio'] ); - $obREmpenhoAutorizacaoEmpenho->setMotivoAnulacao( $_REQUEST['stMotivo']." - Autorização de Empenho: ".$_POST['inCodAutorizacao']."/".Sessao::getExercicio() ); + $obREmpenhoAutorizacaoEmpenho->setCodAutorizacao( $request->get('inCodAutorizacao') ); + $obREmpenhoAutorizacaoEmpenho->setCodPreEmpenho( $request->get('inCodPreEmpenho') ); + $obREmpenhoAutorizacaoEmpenho->obROrcamentoEntidade->setCodigoEntidade( $request->get('inCodEntidade') ); + $obREmpenhoAutorizacaoEmpenho->obROrcamentoReserva->setCodReserva( $request->get('inCodReserva') ); + $obREmpenhoAutorizacaoEmpenho->obROrcamentoReserva->setCodDespesa( $request->get('inCodDespesa') ); + $obREmpenhoAutorizacaoEmpenho->obROrcamentoDespesa->setCodDespesa( $request->get('inCodDespesa') ); + $obREmpenhoAutorizacaoEmpenho->setExercicio( $request->get('stExercicio') ); + $obREmpenhoAutorizacaoEmpenho->setMotivoAnulacao( $request->get('stMotivo')." - Autorização de Empenho: ".$request->get('inCodAutorizacao')."/".Sessao::getExercicio() ); $obREmpenhoAutorizacaoEmpenho->setDtAnulacao( date('d/m/').Sessao::getExercicio() ); $obErro = $obREmpenhoAutorizacaoEmpenho->anular(); - $stFiltro = ""; - $arFiltro = Sessao::read('filtro'); - foreach ($arFiltro as $stCampo => $stValor) { + $stFiltro = ""; + $arFiltro = Sessao::read('filtro'); + foreach ($arFiltro as $stCampo => $stValor) { $stFiltro .= $stCampo."=".@urlencode( $stValor )."&"; - } - $stFiltro .= "pg=".Sessao::read('pg')."&"; - $stFiltro .= "pos=".Sessao::read('pos')."&"; - $stFiltro .= "stAcao=".$_REQUEST['stAcao']; - - if ( !$obErro->ocorreu() ) { - SistemaLegado::alertaAviso( $pgList."?stAcao=anular&".$stFiltro, $_REQUEST['inCodAutorizacao'] .'/'.$_POST['stExercicio'],"excluir","aviso",Sessao::getId(),"../"); + } + $stFiltro .= "pg=".Sessao::read('pg')."&"; + $stFiltro .= "pos=".Sessao::read('pos')."&"; + $stFiltro .= "stAcao=".$request->get('stAcao'); - $stCampos = $stCaminho."?inCodAutorizacao=".$obREmpenhoAutorizacaoEmpenho->getCodAutorizacao(). - "&inCodPreEmpenho=" .$obREmpenhoAutorizacaoEmpenho->getCodPreEmpenho()."&inCodEntidade=".$_POST['inCodEntidade']."&inCodDespesa=".$_POST['inCodDespesa']."&stExercicio=".$_POST['stExercicio']."&stAcao=anulacao"; + if ( !$obErro->ocorreu() ) { + SistemaLegado::alertaAviso( $pgList."?stAcao=anular&".$stFiltro, $request->get('inCodAutorizacao').'/'.$request->get('stExercicio'),"excluir","aviso",Sessao::getId(),"../"); - echo ""; + $stCampos = $stCaminho."?inCodAutorizacao=".$obREmpenhoAutorizacaoEmpenho->getCodAutorizacao(); + $stCampos .= "&inCodPreEmpenho=".$obREmpenhoAutorizacaoEmpenho->getCodPreEmpenho()."&inCodEntidade=".$request->get('inCodEntidade'); + $stCampos .= "&inCodDespesa=".$request->get('inCodDespesa')."&stExercicio=".$request->get('stExercicio')."&stAcao=anulacao"; - } else { - SistemaLegado::alertaAviso( $pgList."?stAcao=anular&".$stFiltro, urlencode($obErro->getDescricao()), "n_excluir","erro",Sessao::getId(),"../" ); - } + echo ""; + } else + SistemaLegado::alertaAviso( $pgList."?stAcao=anular&".$stFiltro, urlencode($obErro->getDescricao()), "n_excluir","erro",Sessao::getId(),"../" ); break; } -if ($obErro->ocorreu()) SistemaLegado::executaFrameOculto(" window.parent.frames['telaPrincipal'].document.getElementById('Ok').disabled = false; "); +if ($obErro->ocorreu()) + SistemaLegado::executaFrameOculto(" window.parent.frames['telaPrincipal'].document.getElementById('Ok').disabled = false; "); ?> diff --git a/gestaoFinanceira/fontes/PHP/empenho/instancias/configuracao/LSManterDespesasMensaisFixas.php b/gestaoFinanceira/fontes/PHP/empenho/instancias/configuracao/LSManterDespesasMensaisFixas.php index d767ae4..dd2b142 100644 --- a/gestaoFinanceira/fontes/PHP/empenho/instancias/configuracao/LSManterDespesasMensaisFixas.php +++ b/gestaoFinanceira/fontes/PHP/empenho/instancias/configuracao/LSManterDespesasMensaisFixas.php @@ -61,8 +61,6 @@ include_once '../../../../../../gestaoAdministrativa/fontes/PHP/pacotes/Framewor include_once '../../../../../../gestaoAdministrativa/fontes/PHP/framework/include/cabecalho.inc.php'; include_once( TEMP."TEmpenhoDespesasFixas.class.php" ); -//sistemaLegado::mostraVar($_REQUEST); die; - //Define o nome dos arquivos PHP $stPrograma = "ManterDespesasMensaisFixas"; $pgFilt = "FL".$stPrograma.".php"; diff --git a/gestaoFinanceira/fontes/PHP/empenho/instancias/empenho/FLManterVinculoEmpenhoContrato.php b/gestaoFinanceira/fontes/PHP/empenho/instancias/empenho/FLManterVinculoEmpenhoContrato.php index 5e9f855..8a26d96 100644 --- a/gestaoFinanceira/fontes/PHP/empenho/instancias/empenho/FLManterVinculoEmpenhoContrato.php +++ b/gestaoFinanceira/fontes/PHP/empenho/instancias/empenho/FLManterVinculoEmpenhoContrato.php @@ -31,7 +31,7 @@ * Casos de uso: uc-02.03.37 - $Id: FLManterVinculoEmpenhoContrato.php 59612 2014-09-02 12:00:51Z gelson $ + $Id: FLManterVinculoEmpenhoContrato.php 64087 2015-12-01 16:10:15Z jean $ */ @@ -112,29 +112,39 @@ if ($rsUltimoMesEncerrado->getCampo('mes') >= $mesAtual AND $boUtilizarEncerrame $obCmbExercicio->setNull ( false ); $obCmbEntidades = new SelectMultiplo(); - $obCmbEntidades->setName ('inCodEntidade'); - $obCmbEntidades->setRotulo ( "Entidades" ); + $obCmbEntidades->setName ('inCodEntidade' ); + $obCmbEntidades->setRotulo ( "Entidades" ); $obCmbEntidades->setTitle ( "Selecione as entidades." ); - $obCmbEntidades->setNull ( false ); + $obCmbEntidades->setNull ( false ); - $obCmbEntidades->SetNomeLista1 ('inCodEntidadeDisponivel'); - $obCmbEntidades->setCampoId1 ( 'cod_entidade' ); - $obCmbEntidades->setCampoDesc1 ( 'nom_cgm' ); - $obCmbEntidades->SetRecord1 ( $rsEntidades ); + $obCmbEntidades->SetNomeLista1 ( 'inCodEntidadeDisponivel'); + $obCmbEntidades->setCampoId1 ( 'cod_entidade' ); + $obCmbEntidades->setCampoDesc1 ( 'nom_cgm' ); + $obCmbEntidades->SetRecord1 ( $rsEntidades ); - $obCmbEntidades->SetNomeLista2 ('inCodEntidade'); - $obCmbEntidades->setCampoId2 ('cod_entidade'); - $obCmbEntidades->setCampoDesc2 ('nom_cgm'); - $obCmbEntidades->SetRecord2 ( $rsRecordset ); + $obCmbEntidades->SetNomeLista2 ( 'inCodEntidade' ); + $obCmbEntidades->setCampoId2 ( 'cod_entidade' ); + $obCmbEntidades->setCampoDesc2 ( 'nom_cgm' ); + $obCmbEntidades->SetRecord2 ( $rsRecordset ); $obTxtContrato = new TextBox; - $obTxtContrato->setName ( "inNumContrato" ); - $obTxtContrato->setId ( "inNumContrato" ); - $obTxtContrato->setValue ( $inNumContrato ); - $obTxtContrato->setRotulo ( "Contrato" ); + $obTxtContrato->setName ( "inNumeroContrato" ); + $obTxtContrato->setId ( "inNumeroContrato" ); + $obTxtContrato->setValue ( $inNumeroContrato ); + $obTxtContrato->setRotulo ( "Contrato" ); $obTxtContrato->setTitle ( "Informe o contrato." ); $obTxtContrato->setInteiro( true ); + $obCmbTipoBusca = new Select; + $obCmbTipoBusca->setName ( "stTipoBusca" ); + $obCmbTipoBusca->setId ( "stTipoBusca" ); + $obCmbTipoBusca->setRotulo ( "Tipo de Busca" ); + $obCmbTipoBusca->addOPtion ( "inicio", "Início", true ); + $obCmbTipoBusca->addOPtion ( "final", "Final", false ); + $obCmbTipoBusca->addOPtion ( "contem", "Contém", false ); + $obCmbTipoBusca->addOPtion ( "exata", "Exata", false ); + + $obHdnAcao = new Hidden; $obHdnAcao->setName( "stAcao" ); $obHdnAcao->setValue( $stAcao ); @@ -142,11 +152,11 @@ if ($rsUltimoMesEncerrado->getCampo('mes') >= $mesAtual AND $boUtilizarEncerrame //Monta o formulario $obFormulario = new Formulario; $obFormulario->addForm( $obForm ); - $obFormulario->addTitulo( "Dados para Filtro" ); - $obFormulario->addHidden( $obHdnAcao ); - $obFormulario->addComponente( $obCmbExercicio ); - $obFormulario->addComponente( $obCmbEntidades ); - $obFormulario->addComponente( $obTxtContrato ); + $obFormulario->addTitulo( "Dados para Filtro" ); + $obFormulario->addHidden( $obHdnAcao ); + $obFormulario->addComponente( $obCmbExercicio ); + $obFormulario->addComponente( $obCmbEntidades ); + $obFormulario->agrupaComponentes( array($obTxtContrato, $obCmbTipoBusca) ); $obFormulario->OK(); $obFormulario->show(); diff --git a/gestaoFinanceira/fontes/PHP/empenho/instancias/empenho/FMConsultarEmpenho.php b/gestaoFinanceira/fontes/PHP/empenho/instancias/empenho/FMConsultarEmpenho.php index dfac5de..2e5e3ab 100755 --- a/gestaoFinanceira/fontes/PHP/empenho/instancias/empenho/FMConsultarEmpenho.php +++ b/gestaoFinanceira/fontes/PHP/empenho/instancias/empenho/FMConsultarEmpenho.php @@ -32,16 +32,17 @@ * @ignore - $Id: FMConsultarEmpenho.php 61753 2015-03-02 13:55:48Z jean $ + $Id: FMConsultarEmpenho.php 64081 2015-11-30 15:36:50Z michel $ */ include_once '../../../../../../gestaoAdministrativa/fontes/PHP/pacotes/FrameworkHTML.inc.php'; include_once '../../../../../../gestaoAdministrativa/fontes/PHP/framework/include/cabecalho.inc.php'; -include_once ( CAM_GF_EMP_NEGOCIO."REmpenhoEmpenho.class.php" ); -include_once ( CAM_GF_EMP_NEGOCIO."REmpenhoEmpenhoAutorizacao.class.php" ); -include_once ( CAM_GF_EMP_NEGOCIO."REmpenhoPagamentoLiquidacao.class.php" ); -include_once ( CAM_FW_HTML."MontaAtributos.class.php" ); -include_once ( CAM_GF_PPA_MAPEAMENTO."TPPAAcao.class.php" ); +include_once CAM_GF_EMP_NEGOCIO."REmpenhoEmpenho.class.php"; +include_once CAM_GF_EMP_NEGOCIO."REmpenhoEmpenhoAutorizacao.class.php"; +include_once CAM_GF_EMP_NEGOCIO."REmpenhoPagamentoLiquidacao.class.php"; +include_once CAM_FW_HTML."MontaAtributos.class.php"; +include_once CAM_GF_PPA_MAPEAMENTO."TPPAAcao.class.php"; +include_once CAM_GF_EMP_MAPEAMENTO.'TEmpenhoEmpenhoContrato.class.php'; //Define o nome dos arquivos PHP $stPrograma = "ConsultarEmpenho"; @@ -55,10 +56,7 @@ $pgJS = "JS".$stPrograma.".js"; include_once($pgJS); //Define a função do arquivo, ex: incluir, excluir, alterar, consultar, etc -$stAcao = $_GET['stAcao'] ? $_GET['stAcao'] : $_POST['stAcao']; -if ( empty( $stAcao ) ) { - $stAcao = "incluir"; -} +$stAcao = $request->get('stAcao', 'incluir'); $obREmpenhoEmpenhoAutorizacao = new REmpenhoEmpenhoAutorizacao; @@ -74,13 +72,19 @@ $stMascaraRubrica = $obREmpenhoEmpenhoAutorizacao->obREmpenhoEmpenho->obROrcamen Sessao::remove('arItens'); -$obREmpenhoEmpenhoAutorizacao->obREmpenhoEmpenho->setCodEmpenho( $_REQUEST['inCodEmpenho'] ); -$obREmpenhoEmpenhoAutorizacao->obREmpenhoEmpenho->setExercicio( $_REQUEST['stExercicioEmpenho'] ); -$obREmpenhoEmpenhoAutorizacao->obREmpenhoAutorizacaoEmpenho->setCodAutorizacao( $_REQUEST['inCodAutorizacao'] ); -$obREmpenhoEmpenhoAutorizacao->obREmpenhoEmpenho->setCodPreEmpenho( $_REQUEST['inCodPreEmpenho'] ); -$obREmpenhoEmpenhoAutorizacao->obREmpenhoEmpenho->obROrcamentoEntidade->setCodigoEntidade( $_REQUEST['inCodEntidade'] ); +$obTEmpenhoEmpenhoContrato = new TEmpenhoEmpenhoContrato; +$stFiltro = " AND e.exercicio = '".$request->get('stExercicioEmpenho')."'"; +$stFiltro .= " AND e.cod_entidade = ".$request->get('inCodEntidade'); +$stFiltro .= " AND e.cod_empenho = ".$request->get('inCodEmpenho'); +$obTEmpenhoEmpenhoContrato->recuperaRelacionamentoEmpenhoContrato($rsEmpenhoContrato, $stFiltro, ""); + +$obREmpenhoEmpenhoAutorizacao->obREmpenhoEmpenho->setCodEmpenho( $request->get('inCodEmpenho') ); +$obREmpenhoEmpenhoAutorizacao->obREmpenhoEmpenho->setExercicio( $request->get('stExercicioEmpenho') ); +$obREmpenhoEmpenhoAutorizacao->obREmpenhoAutorizacaoEmpenho->setCodAutorizacao( $request->get('inCodAutorizacao') ); +$obREmpenhoEmpenhoAutorizacao->obREmpenhoEmpenho->setCodPreEmpenho( $request->get('inCodPreEmpenho') ); +$obREmpenhoEmpenhoAutorizacao->obREmpenhoEmpenho->obROrcamentoEntidade->setCodigoEntidade( $request->get('inCodEntidade') ); -if (( $_REQUEST['boImplantado'] =='t' ) || ( Sessao::getExercicio() !== $obREmpenhoEmpenhoAutorizacao->obREmpenhoEmpenho->getExercicio() ) ) { +if (( $request->get('boImplantado') =='t' ) || ( Sessao::getExercicio() !== $obREmpenhoEmpenhoAutorizacao->obREmpenhoEmpenho->getExercicio() ) ) { $obREmpenhoEmpenhoAutorizacao->obREmpenhoEmpenho->consultarRestosAPagar(); $obREmpenhoEmpenhoAutorizacao->obREmpenhoEmpenho->listarRestosAPagar( $rsSaldos ); } else { @@ -96,8 +100,8 @@ $obREmpenhoEmpenhoAutorizacao->obREmpenhoEmpenho->consultarValorItem(); $nuValorSaldoAnterior = $obREmpenhoEmpenhoAutorizacao->obREmpenhoEmpenho->getVlSaldoAnterior(); $obREmpenhoOrdemPagamento = new REmpenhoOrdemPagamento; -$obREmpenhoOrdemPagamento->setExercicio( $_REQUEST['stExercicioEmpenho'] ); -$obREmpenhoOrdemPagamento->obREmpenhoEmpenho->setCodEmpenho( $_REQUEST['inCodEmpenho'] ); +$obREmpenhoOrdemPagamento->setExercicio( $request->get('stExercicioEmpenho') ); +$obREmpenhoOrdemPagamento->obREmpenhoEmpenho->setCodEmpenho( $request->get('inCodEmpenho') ); $obREmpenhoOrdemPagamento->listarValorPago( $rsValorPago ); $inNumUnidade = $obREmpenhoEmpenhoAutorizacao->obREmpenhoEmpenho->obREmpenhoPermissaoAutorizacao->obROrcamentoUnidade->getNumeroUnidade(); @@ -106,9 +110,11 @@ $inNumOrgao = $obREmpenhoEmpenhoAutorizacao->obREmpenhoEmpenho->obREmpenhoPerm $stNomOrgao = $obREmpenhoEmpenhoAutorizacao->obREmpenhoEmpenho->obREmpenhoPermissaoAutorizacao->obROrcamentoUnidade->obROrcamentoOrgaoOrcamentario->getNomeOrgao(); $obREmpenhoEmpenhoAutorizacao->obREmpenhoEmpenho->obROrcamentoDespesa->setCodDespesa( $rsSaldos->getCampo( "cod_despesa" ) ); -if ($_REQUEST['boImplantado'] != 't') { +if ($request->get('boImplantado') != 't') { + $stFiltro = ""; + $obErro = $obREmpenhoEmpenhoAutorizacao->obREmpenhoEmpenho->obROrcamentoDespesa->consultar( $rsDespesa ); - + if ( !$obErro->ocorreu() ) { $obErro = $obREmpenhoEmpenhoAutorizacao->obREmpenhoEmpenho->obROrcamentoDespesa->listarDespesaDotacao( $rsDotacao ); if ( !$obErro->ocorreu() ) { @@ -120,7 +126,7 @@ if ($_REQUEST['boImplantado'] != 't') { $nuValorOriginal = $rsDespesa->getCampo( 'vl_original' ); } - include_once( CAM_GF_ORC_MAPEAMENTO ."TOrcamentoRecurso.class.php" ); + include_once CAM_GF_ORC_MAPEAMENTO."TOrcamentoRecurso.class.php"; $obTOrcamentoRecurso = new TOrcamentoRecurso; $inCodRecursoTemp = $rsDespesa->getCampo( "cod_recurso" ); @@ -146,7 +152,6 @@ if ($_REQUEST['boImplantado'] != 't') { $flValorPago = number_format( $rsValorPago->getCampo( "valor_pago" ), 2,',','.'); $flSaldoAnterior = number_format($nuValorOriginal, 2,',','.'); -//$flSaldoAnterior = number_format( $rsSaldos->getCampo( "vl_saldo_anterior" ), 2,',','.'); //Recuperação de valores!!! $flEmpenhado = $rsSaldos->getCampo( "vl_empenhado" ) - $rsSaldos->getCampo( "vl_empenhado_anulado" ); $flEmpenhado = number_format( $flEmpenhado ,2,',','.'); @@ -188,7 +193,7 @@ $stCodPrograma = $obREmpenhoEmpenhoAutorizacao->obREmpenhoEmpenho->obROrcam $stNomPrograma = $obREmpenhoEmpenhoAutorizacao->obREmpenhoEmpenho->obROrcamentoDespesa->obROrcamentoPrograma->getDescricao(); if($stDescricaoRecurso == ""){ - $obREmpenhoEmpenhoAutorizacao->obREmpenhoEmpenho->obROrcamentoDespesa->obROrcamentoRecurso->setExercicio($_REQUEST['stExercicio']); + $obREmpenhoEmpenhoAutorizacao->obREmpenhoEmpenho->obROrcamentoDespesa->obROrcamentoRecurso->setExercicio($request->get('stExercicio')); $obREmpenhoEmpenhoAutorizacao->obREmpenhoEmpenho->obROrcamentoDespesa->obROrcamentoRecurso->listar($rsLista); $stDescricaoRecurso = $rsLista->getCampo('nom_recurso'); } @@ -197,7 +202,7 @@ $obREmpenhoEmpenhoAutorizacao->obREmpenhoEmpenho->obROrcamentoDespesa->obROrcame if ($rsNumprograma->getNumLinhas() > 0) { foreach ($rsNumprograma->getElementos() as $indice => $valor) { - if ($valor['exercicio'] == $_REQUEST['stExercicio']) { + if ($valor['exercicio'] == $request->get('stExercicio')) { $inNumPrograma = intval($valor['num_programa']); $stNomPrograma = $valor['descricao']; break; @@ -214,8 +219,8 @@ if (!isset($inNumPrograma)) { $inCodPao = $obREmpenhoEmpenhoAutorizacao->obREmpenhoEmpenho->obROrcamentoDespesa->obROrcamentoProjetoAtividade->getNumeroProjeto(); $stNomPao = $obREmpenhoEmpenhoAutorizacao->obREmpenhoEmpenho->obROrcamentoDespesa->obROrcamentoProjetoAtividade->getNome(); -if($_REQUEST['inCodAutorizacao']) - $stAutorizacao = $_REQUEST['inCodAutorizacao'] . " / " . $_REQUEST['stExercicioEmpenho']; +if($request->get('inCodAutorizacao')) + $stAutorizacao = $request->get('inCodAutorizacao')." / ".$request->get('stExercicioEmpenho'); if ($inCodDespesa) { $obREmpenhoEmpenhoAutorizacao->obREmpenhoEmpenho->obROrcamentoDespesa->consultarSaldoDotacao(); @@ -256,7 +261,7 @@ $flEmpenhadoAnulado = number_format( $flEmpenhadoAnulado ,2,',','.'); SistemaLegado::executaFramePrincipal("buscaDado('montaListaItemPreEmpenho');"); $arChaveAtributo = array( "cod_pre_empenho" => $obREmpenhoEmpenhoAutorizacao->obREmpenhoEmpenho->getCodPreEmpenho(), - "exercicio" => $_REQUEST['stExercicioEmpenho'] ); + "exercicio" => $request->get('stExercicioEmpenho') ); $obREmpenhoEmpenhoAutorizacao->obREmpenhoAutorizacaoEmpenho->obRCadastroDinamico->setChavePersistenteValores( $arChaveAtributo ); $obREmpenhoEmpenhoAutorizacao->obREmpenhoAutorizacaoEmpenho->obRCadastroDinamico->recuperaAtributosSelecionadosValores( $rsAtributos ); @@ -281,7 +286,7 @@ if ( Sessao::read('filtro') ) { $stFiltro .= '&pg='.Sessao::read('pg').'&pos='.Sessao::read('pos').'&paginando'.Sessao::read('paginando'); } -if ($_REQUEST['boImplantado'] != 't') { +if ($request->get('boImplantado') != 't') { $obREmpenhoEmpenhoAutorizacao->obREmpenhoEmpenho->consultaSaldoAnterior( $nuSaldoDisponivel ); $stDespesa = $inCodDespesa.' - '.$stNomDespesa; } @@ -299,14 +304,14 @@ $nuSaldoAnterior = number_format($nuSaldoAnterior,2,',','.');; $nuSaldoDisponivel = number_format($nuSaldoDisponivel,2,',','.'); if (SistemaLegado::pegaConfiguracao('cod_uf', 2, Sessao::getExercicio()) == 20 && !$boEmpenhoComplementar) { - include_once( CAM_GPC_TCERN_MAPEAMENTO . "TTCERNFundeb.class.php" ); - $stFiltroTCERN = " WHERE cod_empenho = ".$_REQUEST['inCodEmpenho']." - AND cod_entidade = ".$_REQUEST['inCodEntidade']." - AND exercicio = '".$_REQUEST['stExercicioEmpenho']."' "; + include_once CAM_GPC_TCERN_MAPEAMENTO."TTCERNFundeb.class.php"; + $stFiltroTCERN = " WHERE cod_empenho = ".$request->get('inCodEmpenho')." + AND cod_entidade = ".$request->get('inCodEntidade')." + AND exercicio = '".$request->get('stExercicioEmpenho')."' "; $obTTCERNFundeb = new TTCERNFundeb; $obTTCERNFundeb->recuperaRelacionamento($rsFundeb, $stFiltroTCERN); - include_once( CAM_GPC_TCERN_MAPEAMENTO . "TTCERNRoyalties.class.php" ); + include_once CAM_GPC_TCERN_MAPEAMENTO."TTCERNRoyalties.class.php"; $obTTCERNRoyalties = new TTCERNRoyalties; $obTTCERNRoyalties->recuperaRelacionamento($rsRoyalties, $stFiltroTCERN); } @@ -317,11 +322,11 @@ if (SistemaLegado::pegaConfiguracao('cod_uf', 2, Sessao::getExercicio()) == 20 & $boEmpenhoComplementar = false; -include_once( CAM_GF_EMP_MAPEAMENTO . "TEmpenhoEmpenhoComplementar.class.php" ); +include_once CAM_GF_EMP_MAPEAMENTO."TEmpenhoEmpenhoComplementar.class.php"; $obTEmpenhoEmpenhoComplementar = new TEmpenhoEmpenhoComplementar(); -$obTEmpenhoEmpenhoComplementar->setDado( 'cod_empenho' , $_REQUEST['inCodEmpenho']); -$obTEmpenhoEmpenhoComplementar->setDado( 'cod_entidade', $_REQUEST['inCodEntidade']); -$obTEmpenhoEmpenhoComplementar->setDado( 'exercicio' , $_REQUEST['stExercicioEmpenho'] ); +$obTEmpenhoEmpenhoComplementar->setDado( 'cod_empenho' , $request->get('inCodEmpenho') ); +$obTEmpenhoEmpenhoComplementar->setDado( 'cod_entidade', $request->get('inCodEntidade') ); +$obTEmpenhoEmpenhoComplementar->setDado( 'exercicio' , $request->get('stExercicioEmpenho') ); $obErro = $obTEmpenhoEmpenhoComplementar->recuperaPorChave( $rsEmpenhoComplementar, '' ); if ($rsEmpenhoComplementar->inNumLinhas > 0) { @@ -387,13 +392,13 @@ $obHdnCodHistorico = new Hidden; $obHdnCodHistorico->setName ( "inCodHistorico" ); $obHdnCodHistorico->setValue ( $inCodHistorico ); -$inCodEmpenho = $_REQUEST['inCodEmpenho']; -$inCodEntidade = $_REQUEST['inCodEntidade']; +$inCodEmpenho = $request->get('inCodEmpenho'); +$inCodEntidade = $request->get('inCodEntidade'); // Define objeto Label para Empenho $obLblEmpenho = new Label; $obLblEmpenho->setRotulo( "N° Empenho" ); -$obLblEmpenho->setValue ( $inCodEmpenho .' / '.$_REQUEST['stExercicioEmpenho']); +$obLblEmpenho->setValue ( $inCodEmpenho.' / '.$request->get('stExercicioEmpenho')); // Define objeto Label para Tipo de Empenho $obLblTipoEmpenho = new Label; @@ -472,7 +477,7 @@ $obLblDescricao->setRotulo( "Descrição do Empenho" ); $obLblDescricao->setId ( "stNomEmpenho" ); $obLblDescricao->setValue ( $stNomEmpenho ); -$flValorEmpenhado = $rsSaldos->getCampo( "vl_empenhado" ) - $rsSaldos->getCampo( "vl_empenhado_anulado" ); +$flValorEmpenhado = $rsSaldos->getCampo( "vl_empenhado" ) - $rsSaldos->getCampo( "vl_empenhado_anulado" ); $obLblSaldoDotacao = new Label; $obLblSaldoDotacao->setRotulo( "Saldo Dotação" ); @@ -490,16 +495,16 @@ $obLblHistorico->setId ( "stNomHistorico" ); $obLblHistorico->setValue ( $inCodHistorico." - ".$stNomHistorico ); $obREmpenhoEmpenho = new REmpenhoEmpenho; -$obREmpenhoEmpenho->setCodEmpenho ( $_REQUEST['inCodEmpenho'] ); -$obREmpenhoEmpenho->setCodEntidade ( $_REQUEST['inCodEntidade'] ); -$obREmpenhoEmpenho->setExercicio ( $_REQUEST['stExercicio'] ); +$obREmpenhoEmpenho->setCodEmpenho ( $request->get('inCodEmpenho') ); +$obREmpenhoEmpenho->setCodEntidade ( $request->get('inCodEntidade') ); +$obREmpenhoEmpenho->setExercicio ( $request->get('stExercicio') ); $obREmpenhoEmpenho->setBoEmpenhoCompraLicitacao( true ); -$obREmpenhoEmpenho->setCodModalidadeCompra ( $_REQUEST['inCodModalidadeCompra'] ); -$obREmpenhoEmpenho->setCompraInicial ( $_REQUEST['inCompraInicial'] ); -$obREmpenhoEmpenho->setCompraFinal ( $_REQUEST['inCompraFinal'] ); -$obREmpenhoEmpenho->setCodModalidadeLicitacao ( $_REQUEST['inCodModalidadeLicitacao'] ); -$obREmpenhoEmpenho->setLicitacaoInicial ( $_REQUEST['inLicitacaoInicial'] ); -$obREmpenhoEmpenho->setLicitacaoFinal ( $_REQUEST['inLicitacaoFinal'] ); +$obREmpenhoEmpenho->setCodModalidadeCompra ( $request->get('inCodModalidadeCompra') ); +$obREmpenhoEmpenho->setCompraInicial ( $request->get('inCompraInicial') ); +$obREmpenhoEmpenho->setCompraFinal ( $request->get('inCompraFinal') ); +$obREmpenhoEmpenho->setCodModalidadeLicitacao ( $request->get('inCodModalidadeLicitacao') ); +$obREmpenhoEmpenho->setLicitacaoInicial ( $request->get('inLicitacaoInicial') ); +$obREmpenhoEmpenho->setLicitacaoFinal ( $request->get('inLicitacaoFinal') ); $obREmpenhoEmpenho->listarConsultaEmpenho( $rsListaModalidade ); $obLblCodCompraDireta = new Label; @@ -522,7 +527,6 @@ $obLblModalidadeLicitacao->setRotulo( "Modalidade da Licitação" ); $obLblModalidadeLicitacao->setId ( "inModalidadeLicitacao" ); $obLblModalidadeLicitacao->setValue ( $rsListaModalidade->getCampo('licitacao_cod_modalidade').' - '.$rsListaModalidade->getCampo('licitacao_modalidade') ); - if (SistemaLegado::pegaConfiguracao('cod_uf', 2, Sessao::getExercicio()) == 20 && !$boEmpenhoComplementar) { $obLblFundeb = new Label; $obLblFundeb->setRotulo( "Fundeb" ); @@ -536,7 +540,6 @@ if (SistemaLegado::pegaConfiguracao('cod_uf', 2, Sessao::getExercicio()) == 20 & } if ($boEmpenhoComplementar) { - $obLblFlagComplementar = new Label; $obLblFlagComplementar->setRotulo( "Empenho Complementar" ); $obLblFlagComplementar->setId ( "stEmpenhoComplementar" ); @@ -546,7 +549,6 @@ if ($boEmpenhoComplementar) { $obLblNroEmpenhoComplementar->setRotulo( "Empenho Original" ); $obLblNroEmpenhoComplementar->setId ( "inCodEmpenhoOriginal" ); $obLblNroEmpenhoComplementar->setValue ( $inCodEmpenhoOriginal ); - } // Atributos Dinamicos @@ -556,6 +558,13 @@ $obMontaAtributos->setName ( "Atributo_" ); $obMontaAtributos->setRecordSet ( $rsAtributos ); $obMontaAtributos->setLabel ( true ); +if ($rsEmpenhoContrato->getNumLinhas() > 0) { + $obLblContrato = new Label; + $obLblContrato->setRotulo( "Número do Contrato" ); + $obLblContrato->setId ( "inCodContrato" ); + $obLblContrato->setValue ( $rsEmpenhoContrato->getCampo('num_contrato').'/'.$rsEmpenhoContrato->getCampo('exercicio') ); +} + // Saldos $obLblDotacaoInicial = new Label; $obLblDotacaoInicial->setRotulo( "Valor Orçado" ); @@ -585,7 +594,7 @@ $obLblEmpenhadoAnulado->setValue ( $flEmpenhadoAnulado ); $obLblEmpenhadoAnulado->obCampoCod->setName ( "flEmpenhoAnulado" ); $obLblEmpenhadoAnulado->obCampoCod->setMinLength( 0 ); $obLblEmpenhadoAnulado->obCampoCod->setMaxLength( 0 ); -$obLblEmpenhadoAnulado->setFuncaoBusca("abrePopUp('".CAM_GF_EMP_POPUPS."empenho/LSConsultaEmpenhoAnulado.php','frm','','','consultaEmpenho&inCodEntidade=".$inCodEntidade."&inCodEmpenho=".$inCodEmpenho."&stExercicio=".$_REQUEST['stExercicioEmpenho']."','".Sessao::getId()."','800','450');"); +$obLblEmpenhadoAnulado->setFuncaoBusca("abrePopUp('".CAM_GF_EMP_POPUPS."empenho/LSConsultaEmpenhoAnulado.php','frm','','','consultaEmpenho&inCodEntidade=".$inCodEntidade."&inCodEmpenho=".$inCodEmpenho."&stExercicio=".$request->get('stExercicioEmpenho')."','".Sessao::getId()."','800','450');"); // Define Objeto BuscaInner para Liquidações $obLblVlLiquidado = new BuscaInner; @@ -595,7 +604,7 @@ $obLblVlLiquidado->setValue ( $flLiquidado ); $obLblVlLiquidado->obCampoCod->setName ( "nuVLiquidado" ); $obLblVlLiquidado->obCampoCod->setMinLength( 0 ); $obLblVlLiquidado->obCampoCod->setMaxLength( 0 ); -$obLblVlLiquidado->setFuncaoBusca("abrePopUp('".CAM_GF_EMP_POPUPS."empenho/LSConsultaEmpenhoLiquidado.php','frm','','','consultaEmpenho&inCodEntidade=".$inCodEntidade."&inCodEmpenho=".$inCodEmpenho."&stExercicio=".$_REQUEST['stExercicioEmpenho']."','".Sessao::getId()."','800','450');"); +$obLblVlLiquidado->setFuncaoBusca("abrePopUp('".CAM_GF_EMP_POPUPS."empenho/LSConsultaEmpenhoLiquidado.php','frm','','','consultaEmpenho&inCodEntidade=".$inCodEntidade."&inCodEmpenho=".$inCodEmpenho."&stExercicio=".$request->get('stExercicioEmpenho')."','".Sessao::getId()."','800','450');"); // Define Objeto BuscaInner para Pagamentos $obLblPago = new BuscaInner; @@ -605,9 +614,9 @@ $obLblPago->setValue ( $nuVlTotalPago ); $obLblPago->obCampoCod->setName ( "flPago" ); $obLblPago->obCampoCod->setMinLength( 0 ); $obLblPago->obCampoCod->setMaxLength( 0 ); -$obLblPago->setFuncaoBusca("abrePopUp('".CAM_GF_EMP_POPUPS."empenho/LSConsultaEmpenhoPago.php','frm','','','consultaEmpenho&inCodEntidade=".$inCodEntidade."&inCodEmpenho=".$inCodEmpenho."&stExercicio=".$_REQUEST['stExercicioEmpenho']."','".Sessao::getId()."','800','450');"); +$obLblPago->setFuncaoBusca("abrePopUp('".CAM_GF_EMP_POPUPS."empenho/LSConsultaEmpenhoPago.php','frm','','','consultaEmpenho&inCodEntidade=".$inCodEntidade."&inCodEmpenho=".$inCodEmpenho."&stExercicio=".$request->get('stExercicioEmpenho')."','".Sessao::getId()."','800','450');"); -include_once(CAM_GF_ORC_COMPONENTES."IMontaRecursoDestinacao.class.php"); +include_once CAM_GF_ORC_COMPONENTES."IMontaRecursoDestinacao.class.php"; $obIMontaRecursoDestinacao = new IMontaRecursoDestinacao; $obIMontaRecursoDestinacao->setCodRecurso ( $inCodRecurso ); $obIMontaRecursoDestinacao->setDescricaoRecurso ( $stDescricaoRecurso ); @@ -615,7 +624,7 @@ $obIMontaRecursoDestinacao->setLabel ( true ); $pgProx = CAM_FW_POPUPS."relatorio/OCRelatorio.php"; $stLink .= "&stCaminho=".CAM_GF_EMP_INSTANCIAS."empenho/OCRelatorioRazaoEmpenho.php"; -$stLink .= "&inCodEmpenho=".$inCodEmpenho."&stExercicio=".$_REQUEST['stExercicioEmpenho']."&inCodEntidade=".$_REQUEST['inCodEntidade']; +$stLink .= "&inCodEmpenho=".$inCodEmpenho."&stExercicio=".$request->get('stExercicioEmpenho')."&inCodEntidade=".$request->get('inCodEntidade'); $obLnknRazao = new Link; $obLnknRazao->setRotulo ("Razão do Empenho" ); @@ -694,6 +703,11 @@ if ($boEmpenhoComplementar) { $obMontaAtributos->geraFormulario( $obFormulario ); +if ($rsEmpenhoContrato->getNumLinhas() > 0) { + $obFormulario->addTitulo( "Contrato" ); + $obFormulario->addComponente( $obLblContrato ); +} + $obFormulario->addTitulo( "Saldos" ); $obFormulario->addComponente( $obLblDotacaoInicial ); $obFormulario->addComponente( $obLblSaldoAnterior ); @@ -709,11 +723,11 @@ $obFormulario->addSpan ( $obSpnLista ); $obFormulario->addComponente( $obLblDataFinal ); -include_once( CAM_GA_ADM_COMPONENTES."IMontaAssinaturas.class.php"); +include_once CAM_GA_ADM_COMPONENTES."IMontaAssinaturas.class.php"; $obMontaAssinaturas = new IMontaAssinaturas; -$obMontaAssinaturas->setCodDocumento( $_REQUEST['inCodEmpenho'] ); -$obMontaAssinaturas->setCodEntidade( $_REQUEST['inCodEntidade'] ); -$obMontaAssinaturas->setExercicio( $_REQUEST['stExercicioEmpenho'] ); +$obMontaAssinaturas->setCodDocumento( $request->get('inCodEmpenho') ); +$obMontaAssinaturas->setCodEntidade( $request->get('inCodEntidade') ); +$obMontaAssinaturas->setExercicio( $request->get('stExercicioEmpenho') ); $obMontaAssinaturas->geraListaLeituraFormulario( $obFormulario, 'nota_empenho' ); $obFormulario->defineBarra( array( $obButtonVoltar ), "left", "" ); diff --git a/gestaoFinanceira/fontes/PHP/empenho/instancias/empenho/FMManterEmpenho.php b/gestaoFinanceira/fontes/PHP/empenho/instancias/empenho/FMManterEmpenho.php index 1f7fc34..696ce04 100755 --- a/gestaoFinanceira/fontes/PHP/empenho/instancias/empenho/FMManterEmpenho.php +++ b/gestaoFinanceira/fontes/PHP/empenho/instancias/empenho/FMManterEmpenho.php @@ -32,12 +32,7 @@ * @ignore - $Id: FMManterEmpenho.php 59612 2014-09-02 12:00:51Z gelson $ - - $Revision: 32188 $ - $Name$ - $Autor:$ - $Date: 2008-01-31 08:45:15 -0200 (Qui, 31 Jan 2008) $ + $Id: FMManterEmpenho.php 64114 2015-12-03 18:49:51Z michel $ * Casos de uso: uc-02.01.08 uc-02.03.03 @@ -46,13 +41,14 @@ include_once '../../../../../../gestaoAdministrativa/fontes/PHP/pacotes/FrameworkHTML.inc.php'; include_once '../../../../../../gestaoAdministrativa/fontes/PHP/framework/include/cabecalho.inc.php'; -include_once ( CAM_GF_EMP_NEGOCIO."REmpenhoEmpenhoAutorizacao.class.php" ); -include_once ( CAM_GF_EMP_NEGOCIO."REmpenhoEmpenho.class.php" ); -include_once ( CAM_GF_EMP_NEGOCIO."REmpenhoConfiguracao.class.php" ); +include_once CAM_GF_EMP_NEGOCIO."REmpenhoEmpenhoAutorizacao.class.php"; +include_once CAM_GF_EMP_NEGOCIO."REmpenhoEmpenho.class.php"; +include_once CAM_GF_EMP_NEGOCIO."REmpenhoConfiguracao.class.php"; include_once CAM_GPC_TCERN_MAPEAMENTO.'TTCERNFundeb.class.php'; include_once CAM_GPC_TCERN_MAPEAMENTO.'TTCERNRoyalties.class.php'; -include_once ( CAM_FW_HTML."MontaAtributos.class.php" ); -include_once ( CAM_GF_EMP_MAPEAMENTO."TEmpenhoContrapartidaAutorizacao.class.php" ); +include_once CAM_FW_HTML."MontaAtributos.class.php"; +include_once CAM_GF_EMP_MAPEAMENTO."TEmpenhoContrapartidaAutorizacao.class.php"; +include_once CAM_GP_LIC_COMPONENTES.'IPopUpContrato.class.php'; //Define o nome dos arquivos PHP $stPrograma = "ManterEmpenho"; @@ -66,23 +62,24 @@ $pgJS = "JS".$stPrograma.".js"; include_once ($pgJS); //Define a função do arquivo, ex: incluir, excluir, alterar, consultar, etc -$stAcao = $_GET['stAcao'] ? $_GET['stAcao'] : $_POST['stAcao']; -if ( empty( $stAcao ) ) { - $stAcao = "incluir"; -} +$stAcao = $request->get('stAcao', 'incluir'); + +Sessao::remove('arBuscaContrato'); -if (SistemaLegado::pegaConfiguracao('cod_uf', 2, Sessao::getExercicio()) == 20) { - $obTTCERNRoyalties = new TTCERNRoyalties; - $obTTCERNFundeb = new TTCERNFundeb; +$inCodUf = SistemaLegado::pegaConfiguracao('cod_uf', 2, Sessao::getExercicio()); + +if ($inCodUf == 20) { + $obTTCERNRoyalties = new TTCERNRoyalties; + $obTTCERNFundeb = new TTCERNFundeb; $obTTCERNRoyalties->recuperaTodos($rsRoyalties, '', 'codigo'); $obTTCERNFundeb->recuperaTodos($rsFundeb, '', 'codigo'); } -$obREmpenhoConfiguracao = new REmpenhoConfiguracao; +$obREmpenhoConfiguracao = new REmpenhoConfiguracao; $obREmpenhoConfiguracao->consultar(); -$boLiquidacaoAutomatica = $obREmpenhoConfiguracao->getLiquidacaoAutomatica(); +$boLiquidacaoAutomatica = $obREmpenhoConfiguracao->getLiquidacaoAutomatica(); $rsClassificacao = new RecordSet; $obREmpenhoEmpenhoAutorizacao = new REmpenhoEmpenhoAutorizacao; @@ -93,21 +90,20 @@ $obREmpenhoEmpenhoAutorizacao->obREmpenhoAutorizacaoEmpenho->obROrcamentoEntidad $obREmpenhoEmpenhoAutorizacao->obREmpenhoAutorizacaoEmpenho->obREmpenhoTipoEmpenho->listar( $rsTipo, "cod_tipo <> 0" ); $obREmpenhoEmpenhoAutorizacao->obREmpenhoAutorizacaoEmpenho->obREmpenhoHistorico->listar( $rsHistorico ); $obREmpenhoEmpenhoAutorizacao->obREmpenhoAutorizacaoEmpenho->listarUnidadeMedida( $rsUnidade ); - $obREmpenhoEmpenhoAutorizacao->obREmpenhoAutorizacaoEmpenho->obROrcamentoClassificacaoDespesa->setExercicio( Sessao::getExercicio() ); $stMascaraRubrica = $obREmpenhoEmpenhoAutorizacao->obREmpenhoAutorizacaoEmpenho->obROrcamentoClassificacaoDespesa->recuperaMascara(); Sessao::remove('arItens'); Sessao::remove('link'); -$inCodEntidade = $_REQUEST['inCodEntidade']; -$inCodPreEmpenho = $_REQUEST['inCodPreEmpenho']; -$inCodAutorizacao = $_REQUEST['inCodAutorizacao']; -$obREmpenhoEmpenhoAutorizacao->obREmpenhoAutorizacaoEmpenho->setCodAutorizacao( $_REQUEST['inCodAutorizacao'] ); -$obREmpenhoEmpenhoAutorizacao->obREmpenhoAutorizacaoEmpenho->setCodPreEmpenho( $_REQUEST['inCodPreEmpenho'] ); -$obREmpenhoEmpenhoAutorizacao->obREmpenhoAutorizacaoEmpenho->obROrcamentoEntidade->setCodigoEntidade( $_REQUEST['inCodEntidade'] ); +$inCodEntidade = $request->get('inCodEntidade'); +$inCodPreEmpenho = $request->get('inCodPreEmpenho'); +$inCodAutorizacao = $request->get('inCodAutorizacao'); -$obREmpenhoEmpenhoAutorizacao->obREmpenhoAutorizacaoEmpenho->obROrcamentoReservaSaldos->setCodReserva( $_REQUEST['inCodReserva'] ); +$obREmpenhoEmpenhoAutorizacao->obREmpenhoAutorizacaoEmpenho->setCodAutorizacao( $request->get('inCodAutorizacao') ); +$obREmpenhoEmpenhoAutorizacao->obREmpenhoAutorizacaoEmpenho->setCodPreEmpenho( $request->get('inCodPreEmpenho') ); +$obREmpenhoEmpenhoAutorizacao->obREmpenhoAutorizacaoEmpenho->obROrcamentoEntidade->setCodigoEntidade( $request->get('inCodEntidade') ); +$obREmpenhoEmpenhoAutorizacao->obREmpenhoAutorizacaoEmpenho->obROrcamentoReservaSaldos->setCodReserva( $request->get('inCodReserva') ); $obREmpenhoEmpenhoAutorizacao->obREmpenhoAutorizacaoEmpenho->consultar(); $obREmpenhoEmpenhoAutorizacao->obREmpenhoAutorizacaoEmpenho->checarFormaExecucaoOrcamento( $stFormaExecucao ); @@ -137,8 +133,8 @@ $stNomCategoria = $obREmpenhoEmpenhoAutorizacao->obREmpenhoAutorizacaoEmpenh if ($inCodCategoria == 2 || $inCodCategoria == 3) { $obTEmpenhoContrapartidaAutorizacao = new TEmpenhoContrapartidaAutorizacao; - $obTEmpenhoContrapartidaAutorizacao->setDado( 'cod_autorizacao', $_REQUEST['inCodAutorizacao'] ); - $obTEmpenhoContrapartidaAutorizacao->setDado( 'cod_entidade' , $_REQUEST['inCodEntidade'] ); + $obTEmpenhoContrapartidaAutorizacao->setDado( 'cod_autorizacao', $request->get('inCodAutorizacao') ); + $obTEmpenhoContrapartidaAutorizacao->setDado( 'cod_entidade' , $request->get('inCodEntidade') ); $obTEmpenhoContrapartidaAutorizacao->setDado( 'exercicio' , Sessao::getExercicio() ); $obTEmpenhoContrapartidaAutorizacao->recuperaContrapartidaLancamento( $rsContrapartida ); @@ -159,19 +155,19 @@ foreach ($arItemPreEmpenho as $inCount => $obItemPreEmpenho) { $arItens[$inCount]['cod_grandeza'] = $obItemPreEmpenho->obRUnidadeMedida->obRGrandeza->getCodGrandeza(); $arItens[$inCount]['nom_unidade'] = $obItemPreEmpenho->getNomUnidade(); $arItens[$inCount]['vl_total'] = $obItemPreEmpenho->getValorTotal(); - $arItens[$inCount]['vl_unitario'] = $nuVlUnitario ; + $arItens[$inCount]['vl_unitario'] = $nuVlUnitario; if($obItemPreEmpenho->getCodItemPreEmp()!='') $arItens[$inCount]['cod_item'] = $obItemPreEmpenho->getCodItemPreEmp(); Sessao::write('arItens', $arItens); } -$arChaveAtributo = array( "cod_pre_empenho" => $_REQUEST["inCodPreEmpenho"], +$arChaveAtributo = array( "cod_pre_empenho" => $request->get('inCodPreEmpenho'), "exercicio" => Sessao::getExercicio() ); $obREmpenhoEmpenhoAutorizacao->obREmpenhoAutorizacaoEmpenho->obRCadastroDinamico->setChavePersistenteValores( $arChaveAtributo ); $obREmpenhoEmpenhoAutorizacao->obREmpenhoAutorizacaoEmpenho->obRCadastroDinamico->recuperaAtributosSelecionadosValores( $rsAtributos ); -if ($inCodDespesa) { +if ($inCodDespesa) $obREmpenhoEmpenhoAutorizacao->obREmpenhoAutorizacaoEmpenho->consultaSaldoAnterior( $nuSaldoAnterior ); -} + $nuSaldoAnterior = number_format( $nuSaldoAnterior, 2, ',', '.'); if ( Sessao::read('filtro') ) { @@ -185,7 +181,7 @@ if ( Sessao::read('filtro') ) { $obHdnUltimaDataEmpenho = new Hidden; $obHdnUltimaDataEmpenho->setName ( "dtUltimaDataEmpenho" ); -$obHdnUltimaDataEmpenho->setValue( ''); +$obHdnUltimaDataEmpenho->setValue( '' ); //*****************************************************// // Define COMPONENTES DO FORMULARIO @@ -229,7 +225,7 @@ $obHdnCodEntidade->setValue( $inCodEntidade ); // Define objeto Hidden para Codigo da Reserva $obHdnCodReserva = new Hidden; $obHdnCodReserva->setName ( "inCodReserva" ); -$obHdnCodReserva->setValue ( $_REQUEST['inCodReserva'] ); +$obHdnCodReserva->setValue ( $request->get('inCodReserva') ); // Define objeto Hidden para Codigo da Classificacao $obHdnCodClassificacao = new Hidden; @@ -291,6 +287,12 @@ $obHdnBoAutorizacao->setName ( "obHdnBoAutorizacao" ); $obHdnBoAutorizacao->setId ( "obHdnBoAutorizacao" ); $obHdnBoAutorizacao->setValue( 'false' ); +//Define o nome da ação para controle no oculto para o mostrar o calcúlo do saldo anterior na label +$obHdnEmitirEmpenhoAutorizacao = new Hidden; +$obHdnEmitirEmpenhoAutorizacao->setName ( "hdnNomeAcao" ); +$obHdnEmitirEmpenhoAutorizacao->setId ( "hdnNomeAcao" ); +$obHdnEmitirEmpenhoAutorizacao->setValue( "stEmitirEmpenhoAutorizacao" ); + //Define o objeto TextArea para Descrição do Empenho $obTxtNomEmpenho = new TextArea; $obTxtNomEmpenho->setName ( "stNomEmpenho" ); @@ -332,7 +334,7 @@ $obDtEmpenho->setRotulo ( "Data de Empenho" ); $obDtEmpenho->setTitle ( 'Informe a data do empenho' ); $obDtEmpenho->setNull ( false ); $obDtEmpenho->obEvento->setOnBlur( "validaDataEmpenho('autorizacao');" ); -$obDtEmpenho->obEvento->setOnChange( "montaParametrosGET('verificaFornecedor');" ); +$obDtEmpenho->obEvento->setOnChange( "montaParametrosGET('verificaFornecedor'); buscaDado('montaLabelSaldoAnterior');" ); // Define objeto Data para Data de Vencimento $obDtVencimento = new Data; @@ -346,6 +348,7 @@ $obDtVencimento->obEvento->setOnChange( "validaVencimento();" ); // Define objeto Label para saldo anterior $obLblSaldoAnterior = new Label; $obLblSaldoAnterior->setId ( "nuSaldoAnterior" ); +$obLblSaldoAnterior->setName ( "nuSaldoAnterior" ); $obLblSaldoAnterior->setValue ( $nuSaldoAnterior ); $obLblSaldoAnterior->setRotulo( "Saldo Anterior" ); @@ -360,7 +363,6 @@ if ($inCodDespesa) { $obLblDespesa->setRotulo ( "Dotação Orcamentária" ); $obLblDespesa->setId ( "stNomDespesa" ); $obLblDespesa->setValue ( $inCodDespesa.' - '.$stNomDespesa ); - } else { // Define Objeto BuscaInner para Despesa $obBscDespesa = new BuscaInner; @@ -380,15 +382,12 @@ if ($inCodDespesa) { } if ($stCodClassificacao != null) { - // Define Objeto Label para Classificacao da Despesa $obLblClassificacao = new Label; $obLblClassificacao->setRotulo ( "Rubrica de Despesa" ); $obLblClassificacao->setId ( "stNomClassificacao" ); $obLblClassificacao->setValue ( $stCodClassificacao.' - '.$stNomClassificacao ); - } else { - // Define Objeto Select para Classificacao da Despesa $obCmbClassificacao = new Select; $obCmbClassificacao->setRotulo ( "Desdobramento" ); @@ -408,7 +407,6 @@ if ($stCodClassificacao != null) { $obCmbClassificacao->setCampoId ( "cod_estrutural" ); $obCmbClassificacao->setCampoDesc ( "cod_estrutural" ); $obCmbClassificacao->preencheCombo ( $rsClassificacao); - } // Define Objeto Label para Orgao @@ -444,7 +442,7 @@ $obLblHistorico->setRotulo ( "Histórico" ); $obLblHistorico->setId ( "stNomHistorico" ); $obLblHistorico->setValue ( $inCodHistorico.' - '.$stNomHistorico ); -if (SistemaLegado::pegaConfiguracao('cod_uf', 2, Sessao::getExercicio()) == 20) { +if ($inCodUf == 20) { $obCmbFundeb = new Select; $obCmbFundeb->setName ('inCodFundeb'); $obCmbFundeb->setRotulo ('Fundeb'); @@ -466,7 +464,7 @@ if (SistemaLegado::pegaConfiguracao('cod_uf', 2, Sessao::getExercicio()) == 20) $obCmbRoyalties->setNull (false); } -if (SistemaLegado::pegaConfiguracao('cod_uf', 2, Sessao::getExercicio()) == 9 && Sessao::getExercicio() >= 2012) { +if ($inCodUf == 9 && Sessao::getExercicio() >= 2012) { $obTxtProcessoLicitacao = new TextBox; $obTxtProcessoLicitacao->setName ('stProcessoLicitacao'); $obTxtProcessoLicitacao->setId ('stProcessoLicitacao'); @@ -501,15 +499,14 @@ while (!$rsAtributos->EOF()) { include_once CAM_GF_EMP_MAPEAMENTO.'TEmpenhoItemPreEmpenhoJulgamento.class.php'; $obTEmpenhoItemPreEmpenhoJulgamento = new TEmpenhoItemPreEmpenhoJulgamento; - $stFiltro = " WHERE cod_pre_empenho = ".$_REQUEST['inCodPreEmpenho']; + $stFiltro = " WHERE cod_pre_empenho = ".$request->get('inCodPreEmpenho'); $stFiltro .= " AND exercicio = '".Sessao::getExercicio()."'"; $obTEmpenhoItemPreEmpenhoJulgamento->recuperaTodos($rsPreEmpenhoItemJulgamento, $stFiltro, '', $boTransacao); - if ($rsAtributos->getCampo('nom_atributo') == 'Característica Peculiar' || $rsAtributos->getCampo('nom_atributo') == 'Número da Licitação') { + if ($rsAtributos->getCampo('nom_atributo') == 'Característica Peculiar' || $rsAtributos->getCampo('nom_atributo') == 'Número da Licitação') $rsAtributos->setCampo('label', false); - } else { + else $rsAtributos->setCampo('label', true); - } $rsAtributos->proximo(); } @@ -542,14 +539,12 @@ $obSimNaoEmitirLiquidacao->setName ( 'boEmitirLiquidacao' ); $obSimNaoEmitirLiquidacao->setNull ( true ); $obSimNaoEmitirLiquidacao->setChecked( $stLiquidacaoAutomatica ); -include_once( CAM_GA_ADM_COMPONENTES."IMontaAssinaturas.class.php"); +include_once CAM_GA_ADM_COMPONENTES."IMontaAssinaturas.class.php"; $obMontaAssinaturas = new IMontaAssinaturas(null, 'nota_empenho_autorizacao'); $obMontaAssinaturas->definePapeisDisponiveis('nota_empenho_autorizacao'); $obMontaAssinaturas->setOpcaoAssinaturas( false ); -$inCodUF = SistemaLegado::pegaConfiguracao('cod_uf', 2, Sessao::getExercicio()); -if ($inCodUF == 9 && Sessao::getExercicio() >= 2012) { - +if ($inCodUf == 9 && Sessao::getExercicio() >= 2012) { include_once CAM_GPC_TGO_MAPEAMENTO.'TTCMGOModalidade.php'; /* Monta combo com modalidades de licitação */ @@ -573,6 +568,18 @@ if ($inCodUF == 9 && Sessao::getExercicio() >= 2012) { $obSpanFundamentacaoLegal->setId('spnFundamentacaoLegal'); } +//Define o objeto para validacao da data do contrato +$obHdnDtContrato = new Hidden; +$obHdnDtContrato->setName ('dtContrato'); +$obHdnDtContrato->setId ('dtContrato'); +$obHdnDtContrato->setValue(''); + +$obContrato = new IPopUpContrato( $obForm ); +$obContrato->obHdnBoFornecedor->setValue(TRUE); +$obContrato->obBuscaInner->obCampoCod->obEvento->setOnBlur("montaParametrosGET('validaContrato', 'inNumContrato,inCodEntidade,inCodFornecedor');"); +$obContrato->obBuscaInner->setValoresBusca('', '', ''); +$obContrato->obBuscaInner->setFuncaoBusca("montaParametrosGET('montaBuscaContrato', 'inCodEntidade,inCodFornecedor');".$obContrato->obBuscaInner->getFuncaoBusca()); + //****************************************// // Monta FORMULARIO //****************************************// @@ -583,7 +590,7 @@ $obFormulario->addTitulo( "Dados do empenho" ); $obFormulario->addHidden( $obHdnCtrl ); $obFormulario->addHidden( $obHdnAcao ); $obFormulario->addHidden( $obHdnCodAutorizacao ); -$obFormulario->addHidden( $obHdnDtAutorizacao ); +$obFormulario->addHidden( $obHdnDtAutorizacao ); $obFormulario->addHidden( $obHdnCodPreEmpenho ); $obFormulario->addHidden( $obHdnCodEntidade ); $obFormulario->addHidden( $obHdnCodReserva ); @@ -596,12 +603,13 @@ $obFormulario->addHidden( $obHdnCodHistorico ); $obFormulario->addHidden( $obHdnVlReserva ); $obFormulario->addHidden( $obHdnTrava, true ); $obFormulario->addHidden( $obHdnUltimaDataEmpenho ); -$obFormulario->addHidden( $obHdnValidaFornecedor ); +$obFormulario->addHidden( $obHdnValidaFornecedor ); $obFormulario->addHidden( $obHdnBoAutorizacao ); +$obFormulario->addHidden( $obHdnEmitirEmpenhoAutorizacao ); $obFormulario->addComponente( $obLblEntidade ); if ($inCodDespesa) { - $obFormulario->addHidden( $obHdnCodDespesa ); + $obFormulario->addHidden( $obHdnCodDespesa ); $obFormulario->addHidden( $obHdnCodClassificacao ); $obFormulario->addComponente( $obLblDespesa ); $obFormulario->addComponente( $obLblClassificacao ); @@ -615,9 +623,8 @@ $obFormulario->addComponente( $obLblUnidade ); $obFormulario->addComponente( $obLblFornecedor ); $obFormulario->addComponente( $obLblCategoriaEmpenho ); -if ($inCodCategoria == 2 || $inCodCategoria == 3) { +if ($inCodCategoria == 2 || $inCodCategoria == 3) $obFormulario->addComponente( $obLblContrapartida ); -} $obFormulario->addComponente( $obTxtNomEmpenho ); $obFormulario->addComponente( $obDtEmpenho ); @@ -625,7 +632,7 @@ $obFormulario->addComponente( $obDtVencimento ); $obFormulario->addComponenteComposto( $obTxtCodTipo, $obCmbNomTipo ); $obFormulario->addComponente( $obLblHistorico ); -if (SistemaLegado::pegaConfiguracao('cod_uf', 2, Sessao::getExercicio()) == 20) { +if ($inCodUf == 20) { $obFormulario->addComponente($obCmbFundeb); $obFormulario->addComponente($obCmbRoyalties); } @@ -642,7 +649,11 @@ if ($inCodUF == 9 && Sessao::getExercicio() >= 2012) { } $obMontaAtributos->geraFormulario ( $obFormulario ); - +/* +$obFormulario->addTitulo('Contrato'); +$obFormulario->addHidden( $obHdnDtContrato ); +$obContrato->geraFormulario($obFormulario); +*/ $obFormulario->addTitulo( "Itens do empenho" ); $obFormulario->addSpan( $obSpan ); $obFormulario->addComponente( $obLblVlTotal ); diff --git a/gestaoFinanceira/fontes/PHP/empenho/instancias/empenho/FMManterEmpenhoComplementar.php b/gestaoFinanceira/fontes/PHP/empenho/instancias/empenho/FMManterEmpenhoComplementar.php index 53fdb37..81da268 100644 --- a/gestaoFinanceira/fontes/PHP/empenho/instancias/empenho/FMManterEmpenhoComplementar.php +++ b/gestaoFinanceira/fontes/PHP/empenho/instancias/empenho/FMManterEmpenhoComplementar.php @@ -32,24 +32,20 @@ * @ignore - * Casos de uso: uc-02.03.36 -*/ - -/* -$Log$ -Revision 1.1 2007/10/02 20:03:14 rodrigo_sr -Empenho Complementar + $Id: FMManterEmpenhoComplementar.php 64081 2015-11-30 15:36:50Z michel $ + * Casos de uso: uc-02.03.36 */ include_once '../../../../../../gestaoAdministrativa/fontes/PHP/pacotes/FrameworkHTML.inc.php'; -include_once ( CAM_GF_INCLUDE."validaGF.inc.php" ); +include_once CAM_GF_INCLUDE."validaGF.inc.php"; include_once '../../../../../../gestaoAdministrativa/fontes/PHP/framework/include/cabecalho.inc.php'; -include_once ( CAM_GF_EMP_NEGOCIO."REmpenhoAutorizacaoEmpenho.class.php" ); -include_once ( CAM_GF_EMP_NEGOCIO."REmpenhoConfiguracao.class.php" ); -include_once ( CAM_GF_EMP_NEGOCIO."REmpenhoEmpenho.class.php" ); -include_once ( CAM_FW_HTML."MontaAtributos.class.php" ); -include_once ( CAM_GF_ORC_COMPONENTES.'ITextBoxSelectEntidadeUsuario.class.php' ); +include_once CAM_GF_EMP_NEGOCIO."REmpenhoAutorizacaoEmpenho.class.php"; +include_once CAM_GF_EMP_NEGOCIO."REmpenhoConfiguracao.class.php"; +include_once CAM_GF_EMP_NEGOCIO."REmpenhoEmpenho.class.php"; +include_once CAM_FW_HTML."MontaAtributos.class.php"; +include_once CAM_GF_ORC_COMPONENTES.'ITextBoxSelectEntidadeUsuario.class.php'; +include_once CAM_GP_LIC_COMPONENTES.'IPopUpContrato.class.php'; //Define o nome dos arquivos PHP $stPrograma = "ManterEmpenho"; @@ -61,19 +57,19 @@ $pgJS = "JS".$stPrograma.".js"; $stOrder = ""; //Define a função do arquivo, ex: incluir, excluir, alterar, consultar, etc -$stAcao = $_GET['stAcao'] ? $_GET['stAcao'] : $_POST['stAcao']; -if ( empty( $stAcao ) ) { - $stAcao = "incluir"; -} - $hdnNumItem = ""; - $stNomFornecedor = ""; - $stDtEmpenho = ""; - $stNomItem = ""; - $stComplemento = ""; - $nuQuantidade = ""; - $nuVlUnitario = ""; - $nuVlTotal = ""; - include_once ($pgJS); +$stAcao = $request->get('stAcao', 'incluir'); + +$hdnNumItem = ""; +$stNomFornecedor = ""; +$stDtEmpenho = ""; +$stNomItem = ""; +$stComplemento = ""; +$nuQuantidade = ""; +$nuVlUnitario = ""; +$nuVlTotal = ""; +include_once ($pgJS); + +Sessao::remove('arBuscaContrato'); //valida a utilização da rotina de encerramento do mês contábil $mesAtual = date('m'); @@ -182,6 +178,12 @@ if ($rsUltimoMesEncerrado->getCampo('mes') >= $mesAtual AND $boUtilizarEncerrame $obHdnValidaFornecedor->setName ( "boMsgValidadeFornecedor" ); $obHdnValidaFornecedor->setId ( "boMsgValidadeFornecedor" ); $obHdnValidaFornecedor->setValue( 'false' ); + + //Define o nome da ação para controle no oculto para o mostrar o calcúlo do saldo anterior na label + $obHdnEmitirEmpenhoComplementar = new Hidden; + $obHdnEmitirEmpenhoComplementar->setName ( "hdnNomeAcao" ); + $obHdnEmitirEmpenhoComplementar->setId ( "hdnNomeAcao" ); + $obHdnEmitirEmpenhoComplementar->setValue( "stEmitirEmpenhoComplementar" ); // Define Objeto TextBox para Codigo da Entidade $obEntidadeUsuario = new ITextBoxSelectEntidadeUsuario; @@ -209,25 +211,6 @@ if ($rsUltimoMesEncerrado->getCampo('mes') >= $mesAtual AND $boUtilizarEncerrame $obSpanEmpenho = new Span; $obSpanEmpenho->setId( "spnEmpenho" ); - // Define objeto Data para validade final - $obDtEmpenho = new Data; - $obDtEmpenho->setName ( "stDtEmpenho" ); - $obDtEmpenho->setValue ( $stDtEmpenho ); - $obDtEmpenho->setRotulo ( "Data de Empenho"); - $obDtEmpenho->setTitle ( 'Informe a data do empenho.' ); - $obDtEmpenho->setNull ( false ); - $obDtEmpenho->obEvento->setOnBlur( "validaDataEmpenho();" ); - $obDtEmpenho->obEvento->setOnChange( "montaParametrosGET('verificaFornecedor');" ); - - // Define objeto Data para validade final - $obDtValidadeFinal = new Data; - $obDtValidadeFinal->setName ( "stDtVencimento" ); - $obDtValidadeFinal->setValue ( $stDtVencimento ); - $obDtValidadeFinal->setRotulo ( "Data de Vencimento" ); - $obDtValidadeFinal->setTitle ( '' ); - $obDtValidadeFinal->setNull ( false ); - $obDtValidadeFinal->obEvento->setOnChange( "validaVencimento();" ); - // Define Objeto TextArea para Descricao do Item $obTxtNomItem = new TextArea; $obTxtNomItem->setName ( "stNomItem" ); @@ -374,7 +357,7 @@ if ($rsUltimoMesEncerrado->getCampo('mes') >= $mesAtual AND $boUtilizarEncerrame $obMontaAssinaturas = new IMontaAssinaturas(null, 'nota_empenho'); $obMontaAssinaturas->definePapeisDisponiveis('nota_empenho'); $obMontaAssinaturas->setOpcaoAssinaturas( false ); - + //Radio para definicao de tipo Item $obRdTipoItemC = new Radio; $obRdTipoItemC->setTitle ( "Selecione o tipo de Item" ); @@ -394,13 +377,13 @@ if ($rsUltimoMesEncerrado->getCampo('mes') >= $mesAtual AND $boUtilizarEncerrame $obRdTipoItemD->setLabel ( "Não" ); $obRdTipoItemD->obEvento->setOnClick( "habilitaCampos('Descricao');" ); $obRdTipoItemD->setChecked( true ); - + $obHdnTipoItem = new Hidden; $obHdnTipoItem->setName ('stTipoItem'); $obHdnTipoItem->setValue('Catalogo'); - + $arRadios = array( $obRdTipoItemC, $obRdTipoItemD ); - + include_once CAM_GP_ALM_COMPONENTES."IMontaItemUnidade.class.php"; $obMontaItemUnidade = new IMontaItemUnidade($obForm); $obMontaItemUnidade->obIPopUpCatalogoItem->setRotulo("*Item"); @@ -411,6 +394,18 @@ if ($rsUltimoMesEncerrado->getCampo('mes') >= $mesAtual AND $boUtilizarEncerrame $obMontaItemUnidade->obIPopUpCatalogoItem->setName( 'stNomItemCatalogo' ); $obMontaItemUnidade->obSpnInformacoesItem->setStyle('visibility:hidden; display:none'); + //Define o objeto para validacao da data do contrato + $obHdnDtContrato = new Hidden; + $obHdnDtContrato->setName ('dtContrato'); + $obHdnDtContrato->setId ('dtContrato'); + $obHdnDtContrato->setValue(''); + + $obContrato = new IPopUpContrato( $obForm ); + $obContrato->obHdnBoFornecedor->setValue(TRUE); + $obContrato->obBuscaInner->obCampoCod->obEvento->setOnBlur("montaParametrosGET('validaContrato', 'inNumContrato,inCodEntidade,inCodFornecedor');"); + $obContrato->obBuscaInner->setValoresBusca('', '', ''); + $obContrato->obBuscaInner->setFuncaoBusca("montaParametrosGET('montaBuscaContrato', 'inCodEntidade,inCodFornecedor');".$obContrato->obBuscaInner->getFuncaoBusca()); + //****************************************// // Monta FORMULARIO //****************************************// @@ -425,7 +420,8 @@ if ($rsUltimoMesEncerrado->getCampo('mes') >= $mesAtual AND $boUtilizarEncerrame $obFormulario->addHidden( $obHdnAcao ); $obFormulario->addHidden( $obHdnUnidadePadrao ); $obFormulario->addHidden( $obHdnValidaFornecedor ); - + $obFormulario->addHidden( $obHdnEmitirEmpenhoComplementar ); + $obFormulario->addComponente( $obEntidadeUsuario ); $obFormulario->addComponente( $obBscEmpenho ); $obFormulario->addSpan( $obSpanEmpenho ); @@ -436,6 +432,10 @@ if ($rsUltimoMesEncerrado->getCampo('mes') >= $mesAtual AND $boUtilizarEncerrame $obFormulario->addSpan($obSpanFundamentacaoLegal); } + $obFormulario->addTitulo('Contrato'); + $obFormulario->addHidden( $obHdnDtContrato ); + $obContrato->geraFormulario($obFormulario); + $obFormulario->addTitulo( "Insira os Ítens do Empenho Complementar" ); $obFormulario->addHidden($obHdnTipoItem); $obFormulario->agrupaComponentes($arRadios); diff --git a/gestaoFinanceira/fontes/PHP/empenho/instancias/empenho/FMManterEmpenhoDiversos.php b/gestaoFinanceira/fontes/PHP/empenho/instancias/empenho/FMManterEmpenhoDiversos.php index b3ebd83..e796699 100755 --- a/gestaoFinanceira/fontes/PHP/empenho/instancias/empenho/FMManterEmpenhoDiversos.php +++ b/gestaoFinanceira/fontes/PHP/empenho/instancias/empenho/FMManterEmpenhoDiversos.php @@ -34,11 +34,7 @@ * @ignore - $Revision: 31583 $ - $Name$ - $Autor:$ - $Date: 2008-04-09 11:58:21 -0300 (Qua, 09 Abr 2008) $ - $Id: FMManterEmpenhoDiversos.php 60392 2014-10-17 12:13:56Z lisiane $ + $Id: FMManterEmpenhoDiversos.php 64081 2015-11-30 15:36:50Z michel $ * Casos de uso: uc-02.03.03 uc-02.03.04 @@ -54,6 +50,7 @@ include_once CAM_GPC_TCERN_MAPEAMENTO.'TTCERNFundeb.class.php'; include_once CAM_GPC_TCERN_MAPEAMENTO.'TTCERNRoyalties.class.php'; include_once CAM_FW_HTML.'MontaAtributos.class.php'; include_once CAM_GF_ORC_COMPONENTES.'IPopUpDotacaoFiltroClassificacao.class.php'; +include_once CAM_GP_LIC_COMPONENTES.'IPopUpContrato.class.php'; //Define o nome dos arquivos PHP $stPrograma = 'ManterEmpenho'; @@ -69,7 +66,7 @@ $pgJS = 'JS'.$stPrograma.'.js'; SistemaLegado::liberaFrames(); //Define a função do arquivo, ex: incluir, excluir, alterar, consultar, etc -$stAcao = $_GET['stAcao'] ? $_GET['stAcao'] : $_POST['stAcao']; +$stAcao = $request->get('stAcao'); if (empty($stAcao)) { $stAcao = "incluir"; } @@ -77,6 +74,7 @@ if (empty($stAcao)) { include_once ($pgJS); Sessao::remove('arItens'); +Sessao::remove('arBuscaContrato'); Sessao::write('stTituloPagina', 'Gestão Financeira | Empenho | Empenho | Emitir Empenho Diversos'); //valida a utilização da rotina de encerramento do mês contábil @@ -228,6 +226,12 @@ if ($rsUltimoMesEncerrado->getCampo('mes') >= $mesAtual AND $boUtilizarEncerrame $obHdnValidaFornecedor->setId ('boMsgValidadeFornecedor'); $obHdnValidaFornecedor->setValue('false'); + //Define o objeto para validacao da data do contrato + $obHdnDtContrato = new Hidden; + $obHdnDtContrato->setName ('dtContrato'); + $obHdnDtContrato->setId ('dtContrato'); + $obHdnDtContrato->setValue(''); + // Define Objeto TextBox para Codigo da Entidade $obTxtCodEntidade = new TextBox; $obTxtCodEntidade->setName('inCodEntidade'); @@ -314,7 +318,8 @@ if ($rsUltimoMesEncerrado->getCampo('mes') >= $mesAtual AND $boUtilizarEncerrame $obBscFornecedor->obCampoCod->obEvento->setOnChange("montaParametrosGET('buscaFornecedorDiverso', 'inCodFornecedor'); montaParametrosGET('buscaContrapartida', 'inCodFornecedor, inCodCategoria'); montaParametrosGET('verificaFornecedor', 'inCodFornecedor, inCodCategoria, inCodContraPartida, stDtEmpenho');"); - $obBscFornecedor->setFuncaoBusca("abrePopUp('".CAM_GA_CGM_POPUPS."cgm/FLProcurarCgm.php','frm','inCodFornecedor','stNomFornecedor','','".Sessao::getId()."','800','550');"); + $obBscFornecedor->setFuncaoBusca("window.parent.frames['telaPrincipal'].document.frm.inCodFornecedor.focus(); abrePopUp('".CAM_GA_CGM_POPUPS."cgm/FLProcurarCgm.php','frm','inCodFornecedor','stNomFornecedor','','".Sessao::getId()."','800','550');"); + $obBscFornecedor->obCampoCod->obEvento->setOnBlur("montaParametrosGET('validaContrato', 'inNumContrato,inCodEntidade,inCodFornecedor');"); // Define Objeto Select para Categoria do Empenho include_once TEMP.'TEmpenhoCategoriaEmpenho.class.php'; @@ -551,7 +556,7 @@ if ($rsUltimoMesEncerrado->getCampo('mes') >= $mesAtual AND $boUtilizarEncerrame $obDtEmpenho->setTitle ('Informe a data do empenho.'); $obDtEmpenho->setNull (false); // $obDtEmpenho->obEvento->setOnBlur ('validaDataEmpenho();'); - $obDtEmpenho->obEvento->setOnChange("montaParametrosGET('verificaFornecedor', 'inCodFornecedor, inCodCategoria, inCodContraPartida');"); + $obDtEmpenho->obEvento->setOnChange("montaParametrosGET('verificaFornecedor', 'inCodFornecedor, inCodCategoria, inCodContraPartida'); buscaDado('buscaDespesaDiverso')"); // Define objeto Data para validade final $obDtValidadeFinal = new Data; @@ -661,6 +666,12 @@ if ($rsUltimoMesEncerrado->getCampo('mes') >= $mesAtual AND $boUtilizarEncerrame $obMontaAssinaturas->definePapeisDisponiveis('nota_empenho'); $obMontaAssinaturas->setOpcaoAssinaturas( false ); + $obContrato = new IPopUpContrato( $obForm ); + $obContrato->obHdnBoFornecedor->setValue(TRUE); + $obContrato->obBuscaInner->obCampoCod->obEvento->setOnBlur("montaParametrosGET('validaContrato', 'inNumContrato,inCodEntidade,inCodFornecedor');"); + $obContrato->obBuscaInner->setValoresBusca('', '', ''); + $obContrato->obBuscaInner->setFuncaoBusca("montaParametrosGET('montaBuscaContrato', 'inCodEntidade,inCodFornecedor');".$obContrato->obBuscaInner->getFuncaoBusca()); + //****************************************// // Monta FORMULARIO //****************************************// @@ -680,9 +691,10 @@ if ($rsUltimoMesEncerrado->getCampo('mes') >= $mesAtual AND $boUtilizarEncerrame $obFormulario->addHidden($obHdnNumItem); $obFormulario->addHidden($obHdnValidaFornecedor); $obFormulario->addHidden($obHdnAtributos ); + $obFormulario->addHidden($obHdnDtContrato); $obFormulario->addComponenteComposto($obTxtCodEntidade, $obCmbNomEntidade); - + $obFormulario->addComponente($obDtEmpenho); $obFormulario->addComponente($obIPopUpDotacao); $obFormulario->addComponente($obCmbClassificacao); $obFormulario->addSpan($obSpanSaldo); @@ -695,7 +707,7 @@ if ($rsUltimoMesEncerrado->getCampo('mes') >= $mesAtual AND $boUtilizarEncerrame $obFormulario->addSpan($obSpanContrapartida); $obFormulario->addComponente($obTxtDescricao); $obFormulario->addComponenteComposto($obTxtCodTipo, $obCmbNomTipo); - $obFormulario->addComponente($obDtEmpenho); + $obFormulario->addComponente($obDtValidadeFinal); $obFormulario->addComponente($obCmbHistorico); @@ -717,6 +729,9 @@ if ($rsUltimoMesEncerrado->getCampo('mes') >= $mesAtual AND $boUtilizarEncerrame $obMontaAtributos->geraFormulario($obFormulario); + $obFormulario->addTitulo('Contrato'); + $obContrato->geraFormulario($obFormulario); + $obFormulario->addTitulo('Insira os Ítens do Empenho'); $obFormulario->addHidden($obHdnTipoItem); $obFormulario->agrupaComponentes($arRadios); @@ -745,4 +760,5 @@ if ($rsUltimoMesEncerrado->getCampo('mes') >= $mesAtual AND $boUtilizarEncerrame } echo (""); include_once '../../../../../../gestaoAdministrativa/fontes/PHP/framework/include/rodape.inc.php'; -?> + +?> \ No newline at end of file diff --git a/gestaoFinanceira/fontes/PHP/empenho/instancias/empenho/FMManterVinculoEmpenhoContrato.php b/gestaoFinanceira/fontes/PHP/empenho/instancias/empenho/FMManterVinculoEmpenhoContrato.php index 4cd5e26..88edde1 100644 --- a/gestaoFinanceira/fontes/PHP/empenho/instancias/empenho/FMManterVinculoEmpenhoContrato.php +++ b/gestaoFinanceira/fontes/PHP/empenho/instancias/empenho/FMManterVinculoEmpenhoContrato.php @@ -31,7 +31,7 @@ * Casos de uso: uc-02.03.37 - $Id: FMManterVinculoEmpenhoContrato.php 59612 2014-09-02 12:00:51Z gelson $ + $Id: FMManterVinculoEmpenhoContrato.php 64087 2015-12-01 16:10:15Z jean $ */ @@ -47,80 +47,97 @@ $pgProc = "PR".$stPrograma.".php"; $pgOcul = "OC".$stPrograma.".php"; $pgJS = "JS".$stPrograma.".js"; -$jsOnload = "executaFuncaoAjax('consultaContratoEmpenho');"; +$jsOnload = "montaParametrosGET('consultaContratoEmpenho', 'inExercicio,inNumContrato,inCodEntidade');"; -Sessao::write('dtContrato', $_REQUEST['dtAssinatura']); -Sessao::write('inCodEntidade', $_REQUEST['inCodEntidade']); -Sessao::write('inExercicio', $_REQUEST['inExercicio']); -Sessao::write('inNumContrato', $_REQUEST['inNumContrato']); -Sessao::write('elementos', ''); +Sessao::write('dtContrato' , $request->get('dtAssinatura') ); +Sessao::write('inCodEntidade' , $request->get('inCodEntidade') ); +Sessao::write('inExercicio' , $request->get('inExercicio') ); +Sessao::write('inNumeroContrato' , $request->get('inNumeroContrato') ); +Sessao::write('inNumContrato' , $request->get('inNumContrato') ); +Sessao::write('elementos' , '' ); $stAcao = "incluir"; $stLocation = $pgFilt.'?'.Sessao::getId(); $obHdnAcao = new Hidden; -$obHdnAcao->setName( "stAcao" ); +$obHdnAcao->setName ( "stAcao" ); $obHdnAcao->setValue( $stAcao ); $obHdnCtrl = new Hidden; -$obHdnCtrl->setName( "stCtrl" ); +$obHdnCtrl->setName ( "stCtrl" ); $obHdnCtrl->setValue( "" ); +$obHdnExercicio = new Hidden; +$obHdnExercicio->setName ( "inExercicio" ); +$obHdnExercicio->setValue( $request->get('inExercicio') ); + +$obHdnNumContrato = new Hidden; +$obHdnNumContrato->setName ( "inNumContrato" ); +$obHdnNumContrato->setValue( $request->get('inNumContrato') ); + +$obHdnNumeroContrato = new Hidden; +$obHdnNumeroContrato->setName ( "inNumeroContrato" ); +$obHdnNumeroContrato->setValue( $request->get('inNumeroContrato') ); + +$obHdnCodEntidade = new Hidden; +$obHdnCodEntidade->setName ( "inCodEntidade" ); +$obHdnCodEntidade->setValue( $request->get('inCodEntidade') ); + $obHdnCgmCredor = new Hidden; -$obHdnCgmCredor->setName("cgm_credor"); -$obHdnCgmCredor->setValue( $_REQUEST['cgm_contratado'] ); +$obHdnCgmCredor->setName ( "cgm_credor" ); +$obHdnCgmCredor->setValue( $request->get('cgm_contratado') ); $obLblExercicio = new Label; $obLblExercicio->setRotulo( "Exercício" ); -$obLblExercicio->setValue ( $_REQUEST['inExercicio'] ); +$obLblExercicio->setValue ( $request->get('inExercicio') ); $obLblEntidade = new Label; $obLblEntidade->setRotulo( "Entidade" ); -$obLblEntidade->setValue ( $_REQUEST['stNomEntidade'] ); +$obLblEntidade->setValue ( $request->get('stNomEntidade') ); $obLblContrato = new Label; $obLblContrato->setRotulo( "Contrato" ); -$obLblContrato->setValue ( $_REQUEST['inNumContrato']."/".$_REQUEST['inExercicio'] ); +$obLblContrato->setValue ( $request->get('inNumeroContrato')."/".$request->get('inExercicio') ); $obLblDataContrato = new Label; $obLblDataContrato->setRotulo( "Data do Contrato" ); -$obLblDataContrato->setValue ( $_REQUEST['dtAssinatura'] ); +$obLblDataContrato->setValue ( $request->get('dtAssinatura') ); $obLblCredor = new Label; $obLblCredor->setRotulo( "Credor" ); -$obLblCredor->setValue ( $_REQUEST['stNomCredor'] ); +$obLblCredor->setValue ( $request->get('stNomCredor') ); $obLblEmpenho = new BuscaInner; -$obLblEmpenho->setRotulo ( "Empenho" ); -$obLblEmpenho->setId ( "stEmpenho" ); -$obLblEmpenho->setValue ( $stEmpenho ); -$obLblEmpenho->obCampoCod->setInteiro ( false ); -$obLblEmpenho->setMostrarDescricao ( false ); -$obLblEmpenho->obCampoCod->setName ( "numEmpenho" ); -$obLblEmpenho->obCampoCod->setValue ( $numEmpenho ); -$obLblEmpenho->setFuncaoBusca("abrePopUp('".CAM_GF_EMP_POPUPS."empenho/FLProcurarEmpenho.php','frm','numEmpenho','stEmpenho','&stNomEntidade=".$_REQUEST['stNomEntidade']."&inCodigoEntidade=".$_REQUEST['inCodEntidade']."&cgmCredor=".$_REQUEST['cgm_contratado']."','".Sessao::getId()."','800','450');"); +$obLblEmpenho->setRotulo ( "Empenho" ); +$obLblEmpenho->setId ( "stEmpenho" ); +$obLblEmpenho->setValue ( $stEmpenho ); +$obLblEmpenho->obCampoCod->setInteiro ( false ); +$obLblEmpenho->setMostrarDescricao ( false ); +$obLblEmpenho->obCampoCod->setName ( "numEmpenho" ); +$obLblEmpenho->obCampoCod->setValue ( $numEmpenho ); +$obLblEmpenho->setFuncaoBusca("abrePopUp('".CAM_GF_EMP_POPUPS."empenho/FLProcurarEmpenho.php','frm','numEmpenho','stEmpenho','&stNomEntidade=".$request->get('stNomEntidade')."&inCodigoEntidade=".$request->get('inCodEntidade')."&cgmCredor=".$request->get('cgm_contratado')."','".Sessao::getId()."','800','450');"); $obBtnIncluir = new Button; -$obBtnIncluir->setValue ( "Incluir" ); -$obBtnIncluir->setName ( "btnIncluir" ); -$obBtnIncluir->setId ( "btnIncluir" ); +$obBtnIncluir->setValue ( "Incluir" ); +$obBtnIncluir->setName ( "btnIncluir" ); +$obBtnIncluir->setId ( "btnIncluir" ); $obBtnIncluir->obEvento->setOnClick ( "montaParametrosGET('incluirEmpenho','numEmpenho,cgm_credor');" ); $obBtnLimpar = new Button; -$obBtnLimpar->setId ( "limpar" ); -$obBtnLimpar->setValue ( "Limpar" ); -$obBtnLimpar->obEvento->setOnClick ( "montaParametrosGET('limpar');" ); +$obBtnLimpar->setId ( "limpar" ); +$obBtnLimpar->setValue ( "Limpar" ); +$obBtnLimpar->obEvento->setOnClick ( "montaParametrosGET('limpar');" ); $obSpnListaEmpenhos = new Span; $obSpnListaEmpenhos->setID ( "spnListaEmpenhos" ); $obBtnCancelar = new Button; -$obBtnCancelar->setName ( "btnClean" ); -$obBtnCancelar->setValue ( "Cancelar" ); -$obBtnCancelar->setTipo ( "button" ); -$obBtnCancelar->setDisabled ( false ); -$obBtnCancelar->obEvento->setOnClick ( "Cancelar('".$stLocation."');"); +$obBtnCancelar->setName ( "btnClean" ); +$obBtnCancelar->setValue ( "Cancelar" ); +$obBtnCancelar->setTipo ( "button" ); +$obBtnCancelar->setDisabled ( false ); +$obBtnCancelar->obEvento->setOnClick( "Cancelar('".$stLocation."');" ); $obBtnOK = new Ok; @@ -133,21 +150,26 @@ $obForm->setTarget( "oculto" ); //Monta o formulario $obFormulario = new Formulario; -$obFormulario->addForm ( $obForm ); -$obFormulario->addHidden ( $obHdnAcao ); -$obFormulario->addHidden ( $obHdnCtrl ); -$obFormulario->addHidden ( $obHdnCgmCredor ); -$obFormulario->addTitulo( "Dados para Vinculação de Empenhos a um Contrato" ); -$obFormulario->addComponente ( $obLblExercicio ); -$obFormulario->addComponente ( $obLblEntidade ); -$obFormulario->addComponente ( $obLblContrato ); -$obFormulario->addComponente ( $obLblDataContrato ); -$obFormulario->addComponente ( $obLblCredor ); -$obFormulario->addTitulo( "Empenho" ); -$obFormulario->addComponente ( $obLblEmpenho ); +$obFormulario->addForm( $obForm ); +$obFormulario->addHidden( $obHdnAcao ); +$obFormulario->addHidden( $obHdnCtrl ); +$obFormulario->addHidden( $obHdnCgmCredor ); +$obFormulario->addHidden( $obHdnExercicio ); +$obFormulario->addHidden( $obHdnNumContrato ); +$obFormulario->addHidden( $obHdnNumeroContrato ); +$obFormulario->addHidden( $obHdnCodEntidade ); + +$obFormulario->addTitulo( "Dados para Vinculação de Empenhos a um Contrato" ); +$obFormulario->addComponente( $obLblExercicio ); +$obFormulario->addComponente( $obLblEntidade ); +$obFormulario->addComponente( $obLblContrato ); +$obFormulario->addComponente( $obLblDataContrato ); +$obFormulario->addComponente( $obLblCredor ); +$obFormulario->addTitulo( "Empenho" ); +$obFormulario->addComponente( $obLblEmpenho ); $obFormulario->agrupaComponentes( array( $obBtnIncluir, $obBtnLimpar ),"","" ); -$obFormulario->addSpan ( $obSpnListaEmpenhos ); -$obFormulario->defineBarra ( $botoesForm ); +$obFormulario->addSpan ( $obSpnListaEmpenhos ); +$obFormulario->defineBarra ( $botoesForm ); $obFormulario->show(); include_once '../../../../../../gestaoAdministrativa/fontes/PHP/framework/include/rodape.inc.php'; diff --git a/gestaoFinanceira/fontes/PHP/empenho/instancias/empenho/LSManterVinculoEmpenhoContrato.php b/gestaoFinanceira/fontes/PHP/empenho/instancias/empenho/LSManterVinculoEmpenhoContrato.php index 0649edb..1a68e46 100644 --- a/gestaoFinanceira/fontes/PHP/empenho/instancias/empenho/LSManterVinculoEmpenhoContrato.php +++ b/gestaoFinanceira/fontes/PHP/empenho/instancias/empenho/LSManterVinculoEmpenhoContrato.php @@ -31,7 +31,7 @@ * Casos de uso: uc-02.03.37 - $Id: LSManterVinculoEmpenhoContrato.php 59612 2014-09-02 12:00:51Z gelson $ + $Id: LSManterVinculoEmpenhoContrato.php 64100 2015-12-02 17:15:03Z jean $ */ @@ -50,34 +50,53 @@ $pgOcul = "OC".$stPrograma.".php"; $stAcao = $request->get('stAcao'); //Prepara o filtro para pesquisa -$stFiltro .= " AND contrato.exercicio = '".$_REQUEST['inExercicio']."'\n"; +$stFiltro .= " AND contrato.exercicio = '".$request->get('inExercicio')."'\n"; $stFiltro .= " AND contrato.cod_entidade IN ("; if(is_array($_REQUEST['inCodEntidade'])){ foreach ($_REQUEST['inCodEntidade'] as $value) { $stEntidades .= $value.", "; } }else{ - $inCodEntidade = explode(",", $_REQUEST['inCodEntidade']); + $inCodEntidade = explode(",", $request->get('inCodEntidade')); for($i=0;$iget('inNumeroContrato') != "") { + switch ($request->get('stTipoBusca')) { + case 'inicio': + $stTipoBusca = "'".$request->get('inNumeroContrato')."%'"; + break; + + case 'final': + $stTipoBusca = "'%".$request->get('inNumeroContrato')."'"; + break; + + case 'contem': + $stTipoBusca = "'%".$request->get('inNumeroContrato')."%'"; + break; + + case 'exata': + $stTipoBusca = "'".$request->get('inNumeroContrato')."'"; + break; + } + $stFiltro .= " AND contrato.numero_contrato::VARCHAR ILIKE ".$stTipoBusca." \n"; } -$stOrdem = "ORDER BY nom_credor"; + +$stOrdem = " ORDER BY nom_credor"; //Efetua pesquisa para a lista $obTLicitacaoContrato = new TLicitacaoContrato; $obTLicitacaoContrato->recuperaDadosContrato($rsRecordset, $stFiltro, $stOrdem); + //********************************************************************// //Define a paginacao if ( !Sessao::read('paginando') ) { $arFiltro = array(); - foreach ($_REQUEST as $stCampo => $stValor) { + foreach ($request->getAll() as $stCampo => $stValor) { $arFiltro[$stCampo] = $stValor; } Sessao::write('filtro', $arFiltro); @@ -127,7 +146,7 @@ $obLista->ultimoDado->setCampo( "nom_entidade" ); $obLista->ultimoDado->setAlinhamento( 'ESQUERDA' ); $obLista->commitDado(); $obLista->addDado(); -$obLista->ultimoDado->setCampo( "[num_contrato]/[exercicio]" ); +$obLista->ultimoDado->setCampo( "[numero_contrato]/[exercicio]" ); $obLista->ultimoDado->setAlinhamento( 'CENTRO' ); $obLista->commitDado(); $obLista->addDado(); @@ -137,13 +156,14 @@ $obLista->commitDado(); $obLista->addAcao(); $obLista->ultimaAcao->setAcao( $stAcao ); -$obLista->ultimaAcao->addCampo( "&inNumContrato" , "num_contrato" ); -$obLista->ultimaAcao->addCampo( "&inCodEntidade" , "cod_entidade" ); -$obLista->ultimaAcao->addCampo( "&inExercicio" , "exercicio" ); -$obLista->ultimaAcao->addCampo( "&stNomEntidade" , "nom_entidade" ); -$obLista->ultimaAcao->addCampo( "&stNomCredor" , "nom_credor" ); -$obLista->ultimaAcao->addCampo( "&dtAssinatura" , "dt_assinatura" ); -$obLista->ultimaAcao->addCampo( "&cgm_contratado", "cgm_contratado"); +$obLista->ultimaAcao->addCampo( "&inNumeroContrato" , "numero_contrato" ); +$obLista->ultimaAcao->addCampo( "&inNumContrato" , "num_contrato" ); +$obLista->ultimaAcao->addCampo( "&inCodEntidade" , "cod_entidade" ); +$obLista->ultimaAcao->addCampo( "&inExercicio" , "exercicio" ); +$obLista->ultimaAcao->addCampo( "&stNomEntidade" , "nom_entidade" ); +$obLista->ultimaAcao->addCampo( "&stNomCredor" , "nom_credor" ); +$obLista->ultimaAcao->addCampo( "&dtAssinatura" , "dt_assinatura" ); +$obLista->ultimaAcao->addCampo( "&cgm_contratado" , "cgm_contratado" ); if ($stAcao == "selecionar") { $pgProx = CAM_GF_EMP_INSTANCIAS."empenho/FMManterVinculoEmpenhoContrato.php"; diff --git a/gestaoFinanceira/fontes/PHP/empenho/instancias/empenho/OCGeraRelatorioEmpenhoOrcamentario.php b/gestaoFinanceira/fontes/PHP/empenho/instancias/empenho/OCGeraRelatorioEmpenhoOrcamentario.php index 1e2e2fd..d3ec67b 100755 --- a/gestaoFinanceira/fontes/PHP/empenho/instancias/empenho/OCGeraRelatorioEmpenhoOrcamentario.php +++ b/gestaoFinanceira/fontes/PHP/empenho/instancias/empenho/OCGeraRelatorioEmpenhoOrcamentario.php @@ -32,7 +32,7 @@ * @ignore - * $Id: OCGeraRelatorioEmpenhoOrcamentario.php 59612 2014-09-02 12:00:51Z gelson $ + * $Id: OCGeraRelatorioEmpenhoOrcamentario.php 64072 2015-11-27 12:54:23Z evandro $ * Casos de uso: uc-02.03.03 uc-02.03.17 @@ -300,7 +300,6 @@ if (isset($arFiltroRelatorio['stCtrl']) && $arFiltroRelatorio['stCtrl']=='imprim $dadosImpressao[0]['cod_empenho'] = $arFiltroRelatorio['inCodEmpenho']; $dadosImpressao[0]['cod_entidade'] = $arFiltroRelatorio['inCodEntidade']; } - $boTransacao = ""; foreach ($arRecordSetTodos as $inChave => $arRecordSet) { $arFiltroRelatorio = $dadosImpressao[$inChave]; @@ -315,8 +314,17 @@ foreach ($arRecordSetTodos as $inChave => $arRecordSet) { // cabeçalho e descricao = 2 $inNumComplementar = 2; } - - $flTotal = ($inNumHistorico+$inNumDescEmpenho+$inNumItens+$inNumComplementar)/8; + foreach ($arRecordSet[9]->getElementos() as $key => $value) { + $arMax[] = $value['Item']; + } + + //caso existir somento 1 item mostrar apenas 1 pagina final + $maxItens = max($arMax); + if($maxItens != 1) + $flTotal = ($inNumHistorico+$inNumDescEmpenho+$inNumItens+$inNumComplementar)/$maxItens; + else + $flTotal = 1; + if (is_integer($flTotal)) { $obPDF->setPaginaFinal($flTotal); } else { diff --git a/gestaoFinanceira/fontes/PHP/empenho/instancias/empenho/OCManterDespesasMensaisFixas.php b/gestaoFinanceira/fontes/PHP/empenho/instancias/empenho/OCManterDespesasMensaisFixas.php index 04333b1..8be9fe0 100644 --- a/gestaoFinanceira/fontes/PHP/empenho/instancias/empenho/OCManterDespesasMensaisFixas.php +++ b/gestaoFinanceira/fontes/PHP/empenho/instancias/empenho/OCManterDespesasMensaisFixas.php @@ -434,8 +434,6 @@ switch ($_REQUEST['stCtrl']) { $stJs .= "d.getElementById('stDtVencimento').innerHTML = '".$stDtVencimento."';\n"; $stJs .= "f.dtVencimento.value = '".$stDtVencimento."';\n"; } -// $obTEmpenhoDespesasFixas->debug(); -// sistemaLegado::mostraVar($rsDespesasFixas); } else { $stJs = limparTudo(); } @@ -448,7 +446,6 @@ switch ($_REQUEST['stCtrl']) { case "incluirListaItens": $inCount = sizeof(Sessao::read('arItens')); - // sistemaLegado::mostravar($_REQUEST); $inConsumo = number_format(str_replace(',','.',str_replace('.','',$_REQUEST['stConsumo'])),2,'.',''); $inValor = number_format(str_replace(',','.',str_replace('.','',$_REQUEST['flValor' ])),2,'.',''); $inValorTotal = $inConsumo * $inValor; diff --git a/gestaoFinanceira/fontes/PHP/empenho/instancias/empenho/OCManterEmpenho.php b/gestaoFinanceira/fontes/PHP/empenho/instancias/empenho/OCManterEmpenho.php index 113f180..3b9ad88 100755 --- a/gestaoFinanceira/fontes/PHP/empenho/instancias/empenho/OCManterEmpenho.php +++ b/gestaoFinanceira/fontes/PHP/empenho/instancias/empenho/OCManterEmpenho.php @@ -32,17 +32,11 @@ * @ignore - $Id: OCManterEmpenho.php 63531 2015-09-09 14:16:34Z carlos.silva $ - - $Revision: 31087 $ - $Name$ - $Author: grasiele $ - $Date: 2008-03-27 11:23:31 -0300 (Qui, 27 Mar 2008) $ + $Id: OCManterEmpenho.php 64102 2015-12-02 18:29:32Z michel $ * Casos de uso: uc-02.03.03 uc-02.03.04 uc-02.01.08 - */ header ("Content-Type: text/html; charset=utf-8"); @@ -64,7 +58,8 @@ $pgProc = 'PR'.$stPrograma.'.php'; $pgOcul = 'OC'.$stPrograma.'.php'; $pgPror = 'PO'.$stPrograma.'.php'; -$stCtrl = $_GET['stCtrl'] ? $_GET['stCtrl'] : $_POST['stCtrl']; +$stCtrl = $request->get('stCtrl'); + $obREmpenhoAutorizacaoEmpenho = new REmpenhoPreEmpenho; $obREmpenhoAutorizacaoEmpenho->setExercicio(Sessao::getExercicio()); @@ -152,11 +147,11 @@ function montaLista($arRecordSet, $boExecuta = true) } } -function montaCombo() +function montaCombo(Request $request) { global $obREmpenhoAutorizacaoEmpenho; - if ($_REQUEST['inCodDespesa'] != "") { - $obREmpenhoAutorizacaoEmpenho->obROrcamentoDespesa->setCodDespesa($_REQUEST['inCodDespesa']); + if ($request->get('inCodDespesa', '') != "") { + $obREmpenhoAutorizacaoEmpenho->obROrcamentoDespesa->setCodDespesa($request->get('inCodDespesa')); $obREmpenhoAutorizacaoEmpenho->obROrcamentoDespesa->setExercicio(Sessao::getExercicio()); $obREmpenhoAutorizacaoEmpenho->obROrcamentoDespesa->listarRelacionamentoContaDespesa($rsConta); $stCodClassificacao = $rsConta->getCampo('cod_estrutural'); @@ -174,11 +169,11 @@ function montaCombo() if ($stMascaraReduzidaOld) { if ($stMascaraReduzidaOld != substr($stMascaraReduzida,0,strlen($stMascaraReduzidaOld))) { $selected = ""; - if ($stCodEstruturalOld == $_REQUEST["stCodEstrutural"]) { + if ($stCodEstruturalOld == $request->get("stCodEstrutural")) { $selected = "selected"; } $stOption = "'".$stCodEstruturalOld.' - '.$stDescricaoOld."','".$stCodEstruturalOld."','".$selected."'"; - $js .= "f.stCodClassificacao.options[$inContador] = new Option( $stOption ); \n"; + $js .= "f.stCodClassificacao.options[".$inContador."] = new Option( ".$stOption." ); \n"; $inContador++; } } @@ -190,11 +185,11 @@ function montaCombo() $rsClassificacao->proximo(); } if ($stMascaraReduzidaOld) { - if ($stCodEstruturalOld == $_REQUEST['stCodEstrutural']) { + if ($stCodEstruturalOld == $request->get('stCodEstrutural')) { $selected = "selected"; } $stOption = "'".$stCodEstruturalOld.' - '.$stDescricaoOld."','".$stCodEstruturalOld."','".$selected."'"; - $js .= "f.stCodClassificacao.options[$inContador] = new Option( $stOption ); \n"; + $js .= "f.stCodClassificacao.options[".$inContador."] = new Option( ".$stOption." ); \n"; } } else { $js .= "limpaSelect(f.stCodClassificacao,0); \n"; @@ -220,7 +215,7 @@ function montaLabel($flSaldoDotacao) return $js1; } -function montaListaDiverso($arRecordSet, $boExecuta = true) +function montaListaDiverso(Request $request, $arRecordSet, $boExecuta = true) { $codUf = SistemaLegado::pegaConfiguracao('cod_uf', 2, Sessao::getExercicio()); $rsLista = new RecordSet; @@ -234,7 +229,7 @@ function montaListaDiverso($arRecordSet, $boExecuta = true) $obLista->ultimoCabecalho->addConteudo(' '); $obLista->ultimoCabecalho->setWidth(5); $obLista->commitCabecalho(); - if ($_REQUEST['stTipoItem']=='Catalogo') { + if ($request->get('stTipoItem')=='Catalogo') { $obLista->addCabecalho(); $obLista->ultimoCabecalho->addConteudo('Código '); $obLista->ultimoCabecalho->setWidth(10); @@ -257,13 +252,13 @@ function montaListaDiverso($arRecordSet, $boExecuta = true) $obLista->ultimoCabecalho->setWidth(15); $obLista->commitCabecalho(); - if ($_REQUEST['stAcao'] != 'anular') { + if ($request->get('stAcao') != 'anular') { $obLista->addCabecalho(); $obLista->ultimoCabecalho->addConteudo(' '); $obLista->ultimoCabecalho->setWidth( 5 ); $obLista->commitCabecalho(); } - if ($_REQUEST['stTipoItem']=='Catalogo') { + if ($request->get('stTipoItem')=='Catalogo') { $obLista->addDado(); $obLista->ultimoDado->setCampo('cod_item'); $obLista->ultimoDado->setAlinhamento('ESQUERDA'); @@ -285,14 +280,14 @@ function montaListaDiverso($arRecordSet, $boExecuta = true) $obLista->ultimoDado->setCampo('vl_total'); $obLista->ultimoDado->setAlinhamento('DIREITA'); $obLista->commitDado(); - if ($_REQUEST['stAcao'] != 'anular') { + if ($request->get('stAcao') != 'anular') { $obLista->addAcao(); $obLista->ultimaAcao->setAcao('ALTERAR'); $obLista->ultimaAcao->setFuncaoAjax(true); $obLista->ultimaAcao->setLink("JavaScript:alterarEmpenho('alterarItemPreEmpenhoDiverso');"); $obLista->ultimaAcao->addCampo('1', 'num_item'); - if ($_REQUEST['stTipoItem']=='Catalogo') { - $obLista->ultimaAcao->addCampo('2', 'cod_item'); + if ($request->get('stTipoItem')=='Catalogo') { + $obLista->ultimaAcao->addCampo('2', 'cod_item'); } $obLista->commitAcao(); @@ -321,7 +316,7 @@ function montaListaDiverso($arRecordSet, $boExecuta = true) $stLista = "d.getElementById('spnLista').innerHTML = '".$stHTML."'; "; $stLista .= "f.Ok.disabled = false; "; - if ($_REQUEST['stTipoItem']=='Catalogo') { + if ($request->get('stTipoItem')=='Catalogo') { $stLista .= "d.getElementById('inCodItem').value = ''; "; $stLista .= "d.getElementById('stNomItemCatalogo').innerHTML = ' '; "; $stLista .= "d.getElementById('stUnidadeMedida').innerHTML = ' '; "; @@ -345,11 +340,11 @@ function montaListaDiverso($arRecordSet, $boExecuta = true) } } -function montaComboDiverso() +function montaComboDiverso(Request $request) { global $obREmpenhoAutorizacaoEmpenho; - if ($_REQUEST['inCodDespesa'] != "") { - $obREmpenhoAutorizacaoEmpenho->obROrcamentoDespesa->setCodDespesa($_REQUEST['inCodDespesa']); + if ($request->get('inCodDespesa', '') != "") { + $obREmpenhoAutorizacaoEmpenho->obROrcamentoDespesa->setCodDespesa($request->get('inCodDespesa')); $obREmpenhoAutorizacaoEmpenho->obROrcamentoDespesa->setExercicio(Sessao::getExercicio()); $obREmpenhoAutorizacaoEmpenho->obROrcamentoDespesa->listarRelacionamentoContaDespesa($rsConta); $stCodClassificacao = $rsConta->getCampo('cod_estrutural'); @@ -369,7 +364,7 @@ function montaComboDiverso() if ($stMascaraReduzidaOld != substr($stMascaraReduzida,0,strlen($stMascaraReduzidaOld))) { $selected = ""; - if ($stCodEstruturalOld == $_REQUEST["stCodEstrutural"]) { + if ($stCodEstruturalOld == $request->get("stCodEstrutural")) { $selected = "selected"; } @@ -387,7 +382,7 @@ function montaComboDiverso() $rsClassificacao->proximo(); } if ($stMascaraReduzidaOld) { - if ($stCodEstruturalOld == $_REQUEST['stCodEstrutural']) { + if ($stCodEstruturalOld == $request->get('stCodEstrutural')) { $selected = "selected"; } $arOptions[]['reduzido'] = $stMascaraReduzidaOld; @@ -474,26 +469,110 @@ function validaDataFornecedor($inCodFornecedor) } } -$inCodEntidade = $_REQUEST["inCodEntidade"]; +function validaContrato($inCodEntidade=null, $inCodFornecedor=null, $inNumContrato=null){ + $stHTML=''; + $stObjeto=' '; + $codContrato=''; + $dtContrato=''; + $stJs=''; + + if( $inNumContrato ){ + if($inCodEntidade&&$inCodFornecedor){ + include_once CAM_GP_LIC_MAPEAMENTO.'TLicitacaoContrato.class.php'; + $obTLicitacaoContrato = new TLicitacaoContrato; + $rsContrato = new RecordSet; + $stFiltro = " AND contrato.num_contrato = ".$inNumContrato; + $stFiltro .= " AND contrato.cgm_contratado = ".$inCodFornecedor; + $stFiltro .= " AND contrato.cod_entidade = ".$inCodEntidade; + $stFiltro .= " AND contrato.exercicio = '".Sessao::getExercicio()."'"; + $obTLicitacaoContrato->recuperaContrato($rsContrato, $stFiltro); + + $stObjeto = $rsContrato->getCampo('descricao'); + $stObjeto = str_replace("\n", ' ', $stObjeto); + $stObjeto = str_replace("\r", ' ', $stObjeto); + $stObjeto = str_replace(' ', ' ', $stObjeto); + + $obTLicitacaoContrato->recuperaDadosContrato($rsContrato, $stFiltro); + + if (!$stObjeto){ + $stObjeto = ' '; + $stJs .= "alertaAviso('@Código do Contrato(".$inNumContrato.") não encontrado.', 'form','erro','".Sessao::getId()."'); \n"; + }else{ + $obLblEntidade = new Label; + $obLblEntidade->setRotulo('Entidade'); + $obLblEntidade->setValue($rsContrato->getCampo('nom_entidade')); + + $obLblData = new Label; + $obLblData->setRotulo('Data do Contrato'); + $obLblData->setValue($rsContrato->getCampo('dt_assinatura')); + + $dtContrato = $rsContrato->getCampo('dt_assinatura'); + + $obLblCredor = new Label; + $obLblCredor->setRotulo('Credor'); + $obLblCredor->setValue($rsContrato->getCampo('nom_credor')); + + $obLblValor = new Label; + $obLblValor->setRotulo('Valor'); + $obLblValor->setValue(number_format($rsContrato->getCampo('valor_contratado'),2,',','.')); + + $obForm = new Form; + $obForm->setName("frm2"); + + $obFormulario = new Formulario; + $obFormulario->addForm ($obForm); + $obFormulario->addComponente($obLblEntidade); + $obFormulario->addComponente($obLblData); + $obFormulario->addComponente($obLblCredor); + $obFormulario->addComponente($obLblValor); + $obFormulario->montaInnerHTML(); + + if($rsContrato->getNumLinhas()==1){ + $stHTML = $obFormulario->getHTML(); + $stHTML = str_replace( "\n" , "" , $stHTML ); + $stHTML = str_replace( chr(13) , "
    ", $stHTML ); + $stHTML = str_replace( " " , "" , $stHTML ); + $stHTML = str_replace( "'" , "\\'" , $stHTML ); + $stHTML = str_replace( "\\\'" , "\\'" , $stHTML ); + } + $codContrato=$inNumContrato; + } + }else{ + if(!$inCodEntidade) + $stJs .= "alertaAviso('@Selecione a Entidade do Empenho.', 'form','erro','".Sessao::getId()."'); \n"; + else + $stJs .= "alertaAviso('@Selecione o Fornecedor do Empenho.', 'form','erro','".Sessao::getId()."'); \n"; + } + } + $stJs .= "d.getElementById('inNumContrato').value = '".$codContrato."'; \n"; + $stJs .= "d.getElementById('txtContrato').innerHTML = \"".$stObjeto."\"; \n"; + $stJs .= "d.getElementById('dtContrato').value = '".$dtContrato."'; \n"; + $stJs .= "d.getElementById('spnInfoAdicional').innerHTML = '".$stHTML."'; \n"; + + return $stJs; +} + +$inCodEntidade = $request->get('inCodEntidade'); + switch ($stCtrl) { case 'montaListaItemPreEmpenho': montaLista(Sessao::read('arItens')); break; case 'verificaFornecedor': - if ($_REQUEST['inCodFornecedor'] != "") { - validaDataFornecedor($_REQUEST['inCodFornecedor']); - if ($_REQUEST['inCodFornecedor'] && $_REQUEST['inCodContrapartida'] && ( $_REQUEST['inCodCategoria'] == 2 || $_REQUEST['inCodCategoria'] == 3)) { + if ($request->get('inCodFornecedor', '') != "") { + validaDataFornecedor($request->get('inCodFornecedor')); + if ($request->get('inCodFornecedor') && $request->get('inCodContrapartida') && ( $request->get('inCodCategoria') == 2 || $request->get('inCodCategoria') == 3)) { $boPendente = false; - include_once( TEMP."TEmpenhoResponsavelAdiantamento.class.php"); + include_once TEMP."TEmpenhoResponsavelAdiantamento.class.php"; $obTEmpenhoResponsavelAdiantamento = new TEmpenhoResponsavelAdiantamento(); $obTEmpenhoResponsavelAdiantamento->setDado('exercicio',Sessao::getExercicio()); - $obTEmpenhoResponsavelAdiantamento->setDado('numcgm',$_REQUEST['inCodFornecedor']); - $obTEmpenhoResponsavelAdiantamento->setDado('conta_contrapartida',$_REQUEST['inCodContrapartida']); + $obTEmpenhoResponsavelAdiantamento->setDado('numcgm',$request->get('inCodFornecedor')); + $obTEmpenhoResponsavelAdiantamento->setDado('conta_contrapartida',$request->get('inCodContrapartida')); $obTEmpenhoResponsavelAdiantamento->consultaEmpenhosFornecedor($rsVerificaEmpenho); if ($rsVerificaEmpenho->getNumLinhas() > 0) { while (!$rsVerificaEmpenho->eof()) { - if (SistemaLegado::comparaDatas($_REQUEST['stDtEmpenho'],$rsVerificaEmpenho->getCampo('dt_prazo_prestacao'))) { + if (SistemaLegado::comparaDatas($request->get('stDtEmpenho'),$rsVerificaEmpenho->getCampo('dt_prazo_prestacao'))) { $boPendente = true; } $rsVerificaEmpenho->Proximo(); @@ -507,14 +586,25 @@ switch ($stCtrl) { } } + if($request->get('stDtEmpenho')){ + $js = "if(d.getElementById('inNumContrato')){ \n"; + $js .= " d.getElementById('inNumContrato').value=''; \n"; + $js .= " d.getElementById('txtContrato').innerHTML = ' '; \n"; + $js .= " d.getElementById('dtContrato').value = ''; \n"; + $js .= " d.getElementById('spnInfoAdicional').innerHTML = ''; \n"; + $js .= "} \n"; + + echo $js; + } + break; case 'buscaContrapartida': - if ($_REQUEST['inCodFornecedor'] && ( $_REQUEST['inCodCategoria'] == 2 || $_REQUEST['inCodCategoria'] == 3)) { + if ($request->get('inCodFornecedor') && ( $request->get('inCodCategoria') == 2 || $request->get('inCodCategoria') == 3)) { include_once TEMP.'TEmpenhoResponsavelAdiantamento.class.php'; $obTEmpenhoResponsavelAdiantamento = new TEmpenhoResponsavelAdiantamento(); $obTEmpenhoResponsavelAdiantamento->setDado("exercicio", Sessao::getExercicio()); - $obTEmpenhoResponsavelAdiantamento->setDado("numcgm" , $_REQUEST['inCodFornecedor']); + $obTEmpenhoResponsavelAdiantamento->setDado("numcgm" , $request->get('inCodFornecedor')); $obTEmpenhoResponsavelAdiantamento->recuperaContrapartidaLancamento($rsContrapartida); if ($rsContrapartida->getNumLinhas() > 0) { @@ -551,9 +641,9 @@ switch ($stCtrl) { break; case 'buscaDespesa': - if ($_POST["inCodDespesa"] != "" and $inCodEntidade != "") { - $obREmpenhoAutorizacaoEmpenho->obROrcamentoDespesa->setCodDespesa($_POST["inCodDespesa"]); - $obREmpenhoAutorizacaoEmpenho->obROrcamentoDespesa->obROrcamentoEntidade->setCodigoEntidade($_POST["inCodEntidade"]); + if ($request->get("inCodDespesa", "") != "" and $inCodEntidade != "") { + $obREmpenhoAutorizacaoEmpenho->obROrcamentoDespesa->setCodDespesa($request->get("inCodDespesa")); + $obREmpenhoAutorizacaoEmpenho->obROrcamentoDespesa->obROrcamentoEntidade->setCodigoEntidade($request->get("inCodEntidade")); $obREmpenhoAutorizacaoEmpenho->obROrcamentoDespesa->setExercicio(Sessao::getExercicio()); $obREmpenhoAutorizacaoEmpenho->obROrcamentoDespesa->consultarDotacao($rsDespesa); $obREmpenhoAutorizacaoEmpenho->setExercicio(Sessao::getExercicio()); @@ -564,7 +654,7 @@ switch ($stCtrl) { $js .= 'f.inCodDespesa.value = "";'; $js .= 'window.parent.frames["telaPrincipal"].document.frm.inCodDespesa.focus();'; $js .= 'd.getElementById("stNomDespesa").innerHTML = " ";'; - $js .= "alertaAviso('@Valor inválido. (".$_POST["inCodDespesa"].")','form','erro','".Sessao::getId()."');"; + $js .= "alertaAviso('@Valor inválido. (".$request->get("inCodDespesa").")','form','erro','".Sessao::getId()."');"; } else { $js .= 'd.getElementById("stNomDespesa").innerHTML = "'.$stNomDespesa.'";'; $js .= 'd.getElementById("inCodOrgao").innerHTML = "'.$rsDespesa->getCampo("num_orgao") .' - '.trim($rsDespesa->getCampo("nom_orgao") ).'";'; @@ -574,12 +664,12 @@ switch ($stCtrl) { $js .= 'd.getElementById("stNomDespesa").innerHTML = " ";'; } $js .= montaLabel($nuSaldoDotacao); - $js .= montaCombo(); + $js .= montaCombo($request); SistemaLegado::executaFrameOculto($js); break; case 'verificaDataEmpenho': - if ($_POST["stDtEmpenho"] != "" and $inCodEntidade != "") { + if ($request->get("stDtEmpenho", "") != "" and $inCodEntidade != "") { $obREmpenhoEmpenho->obROrcamentoEntidade->setCodigoEntidade($inCodEntidade); $obREmpenhoEmpenho->setExercicio(Sessao::getExercicio()); $obREmpenhoEmpenho->listarMaiorData($rsMaiorData); @@ -587,8 +677,8 @@ switch ($stCtrl) { $stMaiorData = $rsMaiorData->getCampo('dataempenho'); $stDataAtual = date("d") . "/" . date("m") . "/" . date("Y"); - if (SistemaLegado::comparaDatas($rsMaiorData->getCampo( "dataempenho" ),$_POST["stDtEmpenho"])) { - $js .= "f.stDtEmpenho.value='" . $rsMaiorData->getCampo( "dataempenho" ) . "';"; + if (SistemaLegado::comparaDatas($rsMaiorData->getCampo( "dataempenho" ),$request->get("stDtEmpenho"))) { + $js .= "f.stDtEmpenho.value='".$rsMaiorData->getCampo( "dataempenho" )."';"; $js .= 'window.parent.frames["telaPrincipal"].document.frm.stDtEmpenho.focus();'; $js .= "alertaAviso('@Data de Empenho deve ser maior ou igual a ".$rsMaiorData->getCampo('dataempenho')." !','form','erro','".Sessao::getId()."');"; } @@ -597,15 +687,15 @@ switch ($stCtrl) { break; case 'verificaDataEmpenhoAutorizacao': - if ($_POST["stDtEmpenho"] != "" and $inCodEntidade != "") { + if ($request->get("stDtEmpenho", "") != "" and $inCodEntidade != "") { $obREmpenhoEmpenho->obROrcamentoEntidade->setCodigoEntidade($inCodEntidade); $obREmpenhoEmpenho->setExercicio(Sessao::getExercicio()); - $obREmpenhoEmpenho->listarMaiorData($rsMaiorData ,'',$boTransacao, $_REQUEST['stDtAutorizacao']); + $obREmpenhoEmpenho->listarMaiorData($rsMaiorData ,'',$boTransacao, $request->get('stDtAutorizacao')); $stMaiorData = $rsMaiorData->getCampo('dataempenho'); $stDataAtual = date("d") . "/" . date("m") . "/" . date("Y"); - if (SistemaLegado::comparaDatas($rsMaiorData->getCampo( "dataempenho" ),$_POST["stDtEmpenho"])) { + if (SistemaLegado::comparaDatas($rsMaiorData->getCampo( "dataempenho" ),$request->get("stDtEmpenho"))) { $js .= "f.stDtEmpenho.value='" . $rsMaiorData->getCampo( "dataempenho" ) . "';"; $js .= 'window.parent.frames["telaPrincipal"].document.frm.stDtEmpenho.focus();'; $js .= "alertaAviso('@Data de Empenho deve ser maior ou igual a ".$rsMaiorData->getCampo('dataempenho')." !','form','erro','".Sessao::getId()."');"; @@ -623,7 +713,7 @@ switch ($stCtrl) { $obREmpenhoEmpenho->setExercicio(Sessao::getExercicio()); if ($obREmpenhoConfiguracao->getNumeracao() == 'P') { - if ($_REQUEST['inCodEntidade'] != "") { + if ($request->get('inCodEntidade', '') != "") { if ($inCodEntidade) { $obREmpenhoEmpenho->obROrcamentoEntidade->setCodigoEntidade($inCodEntidade); $obErro = $obREmpenhoEmpenho->recuperaUltimoEmpenho($rsUltimoEmpenho); @@ -674,12 +764,19 @@ switch ($stCtrl) { } } + $js .= "if(d.getElementById('inNumContrato')){ \n"; + $js .= " d.getElementById('inNumContrato').value=''; \n"; + $js .= " d.getElementById('txtContrato').innerHTML = ' '; \n"; + $js .= " d.getElementById('dtContrato').value = ''; \n"; + $js .= " d.getElementById('spnInfoAdicional').innerHTML = ''; \n"; + $js .= "} \n"; + echo $js; break; case "buscaOrgaoUnidadeDiverso": - if ($_REQUEST['inCodOrgao'] != "") { - $obREmpenhoAutorizacaoEmpenho->obREmpenhoPermissaoAutorizacao->obROrcamentoUnidade->obROrcamentoOrgaoOrcamentario->setNumeroOrgao( $_REQUEST['inCodOrgao']); + if ($request->get('inCodOrgao', '') != "") { + $obREmpenhoAutorizacaoEmpenho->obREmpenhoPermissaoAutorizacao->obROrcamentoUnidade->obROrcamentoOrgaoOrcamentario->setNumeroOrgao( $request->get('inCodOrgao') ); $obREmpenhoAutorizacaoEmpenho->obREmpenhoPermissaoAutorizacao->listarUnidadeDespesaEntidadeUsuario( $rsUnidade, "ou.num_orgao, ou.num_unidade"); if ($rsUnidade->getNumLinhas() > -1) { $inContador = 1; @@ -690,8 +787,7 @@ switch ($stCtrl) { $stNomUnidade = $rsUnidade->getCampo("num_unidade")." - ".$rsUnidade->getCampo("nom_unidade"); $selected = ''; - $js .= "f.inCodUnidadeOrcamento.options[$inContador] = new - Option('".$stNomUnidade."','".$inCodUnidade."','".$selected."'); \n"; + $js .= "f.inCodUnidadeOrcamento.options[".$inContador."] = new Option('".$stNomUnidade."','".$inCodUnidade."','".$selected."'); \n"; $inContador++; $rsUnidade->proximo(); @@ -708,9 +804,9 @@ switch ($stCtrl) { break; case 'buscaDespesaDiverso': - if ($_REQUEST["inCodDespesa"] != "" and $inCodEntidade != "") { - $obREmpenhoAutorizacaoEmpenho->obROrcamentoDespesa->setCodDespesa( $_REQUEST["inCodDespesa"] ); - $obREmpenhoAutorizacaoEmpenho->obROrcamentoDespesa->obROrcamentoEntidade->setCodigoEntidade( $_REQUEST["inCodEntidade"] ); + if ($request->get("inCodDespesa", "") != "" and $inCodEntidade != "") { + $obREmpenhoAutorizacaoEmpenho->obROrcamentoDespesa->setCodDespesa( $request->get("inCodDespesa") ); + $obREmpenhoAutorizacaoEmpenho->obROrcamentoDespesa->obROrcamentoEntidade->setCodigoEntidade( $request->get("inCodEntidade") ); $obREmpenhoAutorizacaoEmpenho->obROrcamentoDespesa->setExercicio( Sessao::getExercicio() ); $obREmpenhoAutorizacaoEmpenho->obROrcamentoDespesa->listarDespesaUsuario( $rsDespesa ); @@ -724,12 +820,12 @@ switch ($stCtrl) { $js .= "f.inCodDespesa.value='';"; $js .= "f.inCodDespesa.focus();"; $js .= "d.getElementById('stNomDespesa').innerHTML='';"; - $js .= "alertaAviso('@Valor inválido. (" . $_REQUEST['inCodDespesa'] . ")','form','erro','" . Sessao::getId() . "');"; + $js .= "alertaAviso('@Valor inválido. (".$request->get('inCodDespesa').")','form','erro','".Sessao::getId()."');"; } else { $js .= "f.inCodDespesa.value='';"; $js .= "f.inCodDespesa.focus();"; $js .= "d.getElementById('stNomDespesa').innerHTML=' ';"; - $js .= "alertaAviso('@Você não possui permissão para esta dotação. (" . $_REQUEST['inCodDespesa'] . ")', 'form', 'erro', '" . Sessao::getId() . "');"; + $js .= "alertaAviso('@Você não possui permissão para esta dotação. (".$request->get('inCodDespesa').")', 'form', 'erro', '".Sessao::getId()."');"; } $js .= "d.getElementById('stOrgaoOrcamento').innerHTML='';"; $js .= "f.hdnOrgaoOrcamento.value='';"; @@ -737,20 +833,23 @@ switch ($stCtrl) { $js .= "f.hdnUnidadeOrcamento.value='';"; } else { $stNomDespesa = $rsDespesa->getCampo( "descricao" ); - $js .= "d.getElementById('stNomDespesa').innerHTML='" . $stNomDespesa . "';"; - $js .= montaComboDiverso(); + $js .= "d.getElementById('stNomDespesa').innerHTML='".$stNomDespesa."';"; + $js .= montaComboDiverso($request); } - } else $js .= "d.getElementById('stNomDespesa').innerHTML=' ';"; + } else + $js .= "d.getElementById('stNomDespesa').innerHTML=' ';"; - if ($_REQUEST["inCodDespesa"] != '' and $stNomDespesa) { - $obREmpenhoAutorizacaoEmpenho->obROrcamentoDespesa->setCodDespesa($_REQUEST["inCodDespesa"]); + if ($request->get('inCodDespesa') != '' and $stNomDespesa) { + $obREmpenhoAutorizacaoEmpenho->obROrcamentoDespesa->setCodDespesa($request->get('inCodDespesa')); $obREmpenhoAutorizacaoEmpenho->setExercicio(Sessao::getExercicio()); - $obREmpenhoAutorizacaoEmpenho->consultaSaldoAnterior($nuSaldoDotacao); + $obREmpenhoAutorizacaoEmpenho->setdataEmpenho($request->get('stDtEmpenho')); + $obREmpenhoAutorizacaoEmpenho->setCodEntidade($request->get('inCodEntidade')); + $obREmpenhoAutorizacaoEmpenho->consultaSaldoAnteriorDataEmpenho($nuSaldoDotacao); $js .= montaLabelDiverso($nuSaldoDotacao); - $obREmpenhoAutorizacaoEmpenho->obROrcamentoDespesa->setCodDespesa($_REQUEST["inCodDespesa"]); - $obREmpenhoAutorizacaoEmpenho->obROrcamentoDespesa->obROrcamentoEntidade->setCodigoEntidade($_REQUEST["inCodEntidade"]); + $obREmpenhoAutorizacaoEmpenho->obROrcamentoDespesa->setCodDespesa($request->get('inCodDespesa')); + $obREmpenhoAutorizacaoEmpenho->obROrcamentoDespesa->obROrcamentoEntidade->setCodigoEntidade($request->get('inCodEntidade')); $obREmpenhoAutorizacaoEmpenho->obROrcamentoDespesa->setExercicio(Sessao::getExercicio()); $obREmpenhoAutorizacaoEmpenho->obROrcamentoDespesa->listarDespesaUsuario($rsDespesa); @@ -767,22 +866,22 @@ switch ($stCtrl) { $inCodUnidade = $rsUnidade->getCampo('num_unidade'); $stNomUnidade = $rsUnidade->getCampo('nom_unidade'); - $js .= "d.getElementById('stOrgaoOrcamento').innerHTML='" . $inCodOrgao . " - " .trim($stNomOrgao)."';"; - $js .= "f.hdnOrgaoOrcamento.value='" . $inCodOrgao . "';"; - $js .= "d.getElementById('stUnidadeOrcamento').innerHTML='" . $inCodUnidade . " - ".trim($stNomUnidade)."';"; - $js .= "f.hdnUnidadeOrcamento.value='" . $inCodUnidade . "';"; + $js .= "d.getElementById('stOrgaoOrcamento').innerHTML='".$inCodOrgao. " - ".trim($stNomOrgao)."';"; + $js .= "f.hdnOrgaoOrcamento.value='".$inCodOrgao."';"; + $js .= "d.getElementById('stUnidadeOrcamento').innerHTML='".$inCodUnidade." - ".trim($stNomUnidade)."';"; + $js .= "f.hdnUnidadeOrcamento.value='".$inCodUnidade."';"; } else { $js .= "d.getElementById('spnSaldoDotacao').innerHTML='';"; } - $js .= montaComboDiverso(); + $js .= montaComboDiverso($request); $js .= "LiberaFrames(true,false);"; SistemaLegado::executaFrameOculto($js); break; case 'buscaClassificacaoDiverso': - if ($_POST["stCodClassificacao"] != "") { - $obREmpenhoAutorizacaoEmpenho->obROrcamentoDespesa->obROrcamentoClassificacaoDespesa->setMascClassificacao( $_POST["stCodClassificacao"] ); + if ($request->get("stCodClassificacao", "") != "") { + $obREmpenhoAutorizacaoEmpenho->obROrcamentoDespesa->obROrcamentoClassificacaoDespesa->setMascClassificacao( $request->get("stCodClassificacao") ); $obREmpenhoAutorizacaoEmpenho->obROrcamentoDespesa->setExercicio( Sessao::getExercicio() ); $obREmpenhoAutorizacaoEmpenho->obROrcamentoDespesa->listarRelacionamentoContaDespesa( $rsClassificacao ); $stNomClassificacao = $rsClassificacao->getCampo( "descricao" ); @@ -790,9 +889,9 @@ switch ($stCtrl) { $js .= "f.stCodClassificacao.value='';"; $js .= "f.stCodClassificacao.focus();"; $js .= "d.getElementById('stNomClassificacao').innerHTML=' '"; - $js .= "alertaAviso('@Valor inválido. (" . $_POST["stCodClassificacao"] . ")', 'form', 'erro', '" . Sessao::getId() . "');"; + $js .= "alertaAviso('@Valor inválido. (".$request->get("stCodClassificacao").")', 'form', 'erro', '" . Sessao::getId() . "');"; } else { - $js .= "d.getElementById('stNomClassificacao').innerHTML='" . $stNomClassificacao . "';"; + $js .= "d.getElementById('stNomClassificacao').innerHTML='".$stNomClassificacao."';"; } } else { $js .= "d.getElementById('stNomClassificacao').innerHTML=' ';"; @@ -801,59 +900,61 @@ switch ($stCtrl) { break; case 'buscaFornecedorDiverso': - if ($_REQUEST["inCodFornecedor"] != "") { - $obREmpenhoAutorizacaoEmpenho->obRCGM->setNumCGM($_REQUEST["inCodFornecedor"]); + if ($request->get("inCodFornecedor", "") != "") { + $obREmpenhoAutorizacaoEmpenho->obRCGM->setNumCGM($request->get("inCodFornecedor")); $obREmpenhoAutorizacaoEmpenho->obRCGM->listar($rsCGM); $stNomFornecedor = trim($rsCGM->getCampo('nom_cgm')); if (!$stNomFornecedor) { $js .= 'f.inCodFornecedor.value = "";'; $js .= 'f.inCodFornecedor.focus();'; $js .= 'd.getElementById("stNomFornecedor").innerHTML = " ";'; - $js .= "alertaAviso('@Valor inválido. (".$_REQUEST["inCodFornecedor"].")','form','erro','".Sessao::getId()."');"; + $js .= "alertaAviso('@Valor inválido. (".$request->get("inCodFornecedor").")','form','erro','".Sessao::getId()."');"; } else { $js .= 'd.getElementById("stNomFornecedor").innerHTML = "'.$stNomFornecedor.'";'; } - } else {$js .= 'd.getElementById("stNomFornecedor").innerHTML = " ";';} + } else { + $js .= 'd.getElementById("stNomFornecedor").innerHTML = " ";'; + } echo $js; break; case 'incluiItemPreEmpenhoDiverso': $inCount = sizeof(Sessao::read('arItens')); - $nuVlTotal = str_replace('.','',$_POST['nuVlTotal']); + $nuVlTotal = str_replace('.','',$request->get('nuVlTotal')); $nuVlTotal = str_replace(',','.',$nuVlTotal); - if($_REQUEST['stTipoItem']=='Catalogo'){ - list($inCodUnidade, $inCodGrandeza) = explode("-",$_POST['inCodUnidadeMedida']); - $stNomUnidade = $_POST['stNomUnidade']; + if($request->get('stTipoItem')=='Catalogo'){ + list($inCodUnidade, $inCodGrandeza) = explode("-",$request->get('inCodUnidadeMedida')); + $stNomUnidade = $request->get('stNomUnidade'); }else{ - list($inCodUnidade, $inCodGrandeza, $stNomUnidade) = explode("-",$_POST['inCodUnidade']); + list($inCodUnidade, $inCodGrandeza, $stNomUnidade) = explode("-",$request->get('inCodUnidade')); } $arItens = Sessao::read('arItens'); $arItens[$inCount]['num_item'] = $inCount+1; - if ($_REQUEST['stTipoItem']=='Catalogo') { + if ($request->get('stTipoItem')=='Catalogo') { foreach ($arItens as $key => $valor) { - if ($valor['cod_item'] == $_POST['inCodItem']) { + if ($valor['cod_item'] == $request->get('inCodItem')) { $erro=true; } } - $arItens[$inCount]['cod_item'] = $_POST['inCodItem']; - $arItens[$inCount]['nom_item'] = $_POST['stNomItemCatalogo']; + $arItens[$inCount]['cod_item'] = $request->get('inCodItem'); + $arItens[$inCount]['nom_item'] = $request->get('stNomItemCatalogo'); }else{ - $arItens[$inCount]['nom_item'] = $_POST['stNomItem']; + $arItens[$inCount]['nom_item'] = $request->get('stNomItem'); } - $arItens[$inCount]['complemento'] = $_POST['stComplemento']; - $arItens[$inCount]['quantidade'] = $_POST['nuQuantidade']; - $arItens[$inCount]['vl_unitario'] = $_POST['nuVlUnitario']; + $arItens[$inCount]['complemento'] = $request->get('stComplemento'); + $arItens[$inCount]['quantidade'] = $request->get('nuQuantidade'); + $arItens[$inCount]['vl_unitario'] = $request->get('nuVlUnitario'); $arItens[$inCount]['cod_unidade'] = $inCodUnidade; $arItens[$inCount]['cod_grandeza'] = $inCodGrandeza; $arItens[$inCount]['nom_unidade'] = $stNomUnidade; $arItens[$inCount]['vl_total'] = $nuVlTotal; - + if($erro){ - $js = "alertaAviso('Item(".$_POST['inCodItem'].") Já Incluso na Lista.','frm','erro','".Sessao::getId()."'); \n"; + $js = "alertaAviso('Item(".$request->get('inCodItem').") Já Incluso na Lista.','frm','erro','".Sessao::getId()."'); \n"; SistemaLegado::executaFrameOculto($js); }else{ Sessao::write('arItens', $arItens); - $stHTML = montaListaDiverso( Sessao::read('arItens') ); + $stHTML = montaListaDiverso( $request, Sessao::read('arItens') ); } break; @@ -864,11 +965,11 @@ switch ($stCtrl) { $arItens = Sessao::read('arItens'); for($i=0;$iget('inNumItem')){ $arTEMP[$inCount]['num_item'] = $inCount+1; - - if($_REQUEST['stTipoItem']=='Catalogo'){ - $arTEMP[$inCount]['cod_item'] = $arItens[$i]['cod_item']; + + if($request->get('stTipoItem')=='Catalogo'){ + $arTEMP[$inCount]['cod_item'] = $arItens[$i]['cod_item']; } $arTEMP[$inCount]['nom_item'] = $arItens[$i]['nom_item']; $arTEMP[$inCount]['complemento'] = $arItens[$i]['complemento']; @@ -882,7 +983,7 @@ switch ($stCtrl) { } } Sessao::write('arItens', $arTEMP); - montaListaDiverso(Sessao::read('arItens')); + montaListaDiverso($request, Sessao::read('arItens')); if(count($arTEMP)==0){ $js .= "d.getElementById('stTipoItemRadio1').disabled = false;"; $js .= "d.getElementById('stTipoItemRadio2').disabled = false;"; @@ -891,14 +992,14 @@ switch ($stCtrl) { break; case 'montaListaItemPreEmpenhoDiverso': - $js = montaListaDiverso(Sessao::read('arItens'), false); - $js .= montaCombo(); + $js = montaListaDiverso($request, Sessao::read('arItens'), false); + $js .= montaCombo($request); SistemaLegado::executaFrameOculto($js); break; case 'alterarDiverso': $js = montaLista(Sessao::read('arItens'), false); - $js .= montaCombo(); + $js .= montaCombo($request); break; case "alterarItemPreEmpenhoDiverso": @@ -906,9 +1007,9 @@ switch ($stCtrl) { $arItens = Sessao::read('arItens'); foreach ($arItens as $valor) { - if ($valor['num_item'] == $_REQUEST['num_item']) { - $stJs .= "f.hdnNumItem.value='".$_REQUEST['num_item']."';"; - if ($_REQUEST['cod_item']) { + if ($valor['num_item'] == $request->get('num_item')) { + $stJs .= "f.hdnNumItem.value='".$request->get('num_item')."';"; + if ($request->get('cod_item')) { $stJs .= "f.inCodItem.value= '".$valor['cod_item']."';"; $stJs .= "f.HdninCodItem.value= '".$valor['cod_item']."';"; $stJs .= "f.stNomItemCatalogo.value ='".$valor["nom_item"]."';"; @@ -926,7 +1027,7 @@ switch ($stCtrl) { $stJs .= "f.btnIncluir.setAttribute('onclick','return alterarItem()');"; $stJs .= "f.stNomItem.value = f.stNomItem.value.unescapeHTML();"; $stJs .= "f.stComplemento.value = f.stComplemento.value.unescapeHTML();\n"; - + $value = $valor["cod_unidade"]."-". $valor["cod_grandeza"]."-". $valor["nom_unidade"]; $stJs .= "f.inCodUnidade.value='".$value."';"; $stJs .= 'window.parent.frames["telaPrincipal"].document.frm.inCodItem.focus();'; @@ -940,72 +1041,72 @@ switch ($stCtrl) { $arItens = Sessao::read('arItens'); foreach ($arItens as $key => $valor) { - if ($valor['num_item'] == $_REQUEST['hdnNumItem']) { - for($i=0;$iget('hdnNumItem')) { + for($i=0;$iget('stTipoItem')=='Catalogo'&&($arItens[$i]['cod_item'] == $request->get('inCodItem'))&&($arItens[$i]['num_item'] != $request->get('hdnNumItem'))){ + $erro=true; + } + } + + if(!$erro){ + if($request->get('stTipoItem')=='Catalogo'){ + list($inCodUnidade, $inCodGrandeza) = explode("-",$request->get('inCodUnidadeMedida')); + $stNomUnidade = $request->get('stNomUnidade'); + $arItens[$key]['cod_item'] = $request->get('inCodItem'); + $arItens[$key]['nom_item'] = stripslashes($request->get('stNomItemCatalogo')); + }else{ + list($inCodUnidade, $inCodGrandeza, $stNomUnidade) = explode("-",$request->get('inCodUnidade')); + $arItens[$key]['nom_item' ] = stripslashes($request->get("stNomItem")); + } + + $arItens[$key]['complemento'] = stripslashes($request->get("stComplemento")); + $arItens[$key]['quantidade' ] = $request->get("nuQuantidade"); + $arItens[$key]['cod_unidade'] = $inCodUnidade; + $arItens[$key]['vl_unitario'] = $request->get("nuVlUnitario"); + $arItens[$key]['nom_unidade'] = $stNomUnidade; + $arItens[$key]['cod_grandeza'] = $inCodGrandeza; + + $nuVlTotal = str_replace('.','',$request->get("nuVlTotal")); + $nuVlTotal = str_replace(',','.',$nuVlTotal); + + $arItens[$key]['vl_total'] = $nuVlTotal; + break; + } }else{ - if($_REQUEST['stTipoItem']=='Catalogo'&&($valor['cod_item'] == $_POST['inCodItem'])){ - $erro=true; + if($request->get('stTipoItem')=='Catalogo'&&($valor['cod_item'] == $request->get('inCodItem'))){ + $erro=true; } } } - + if($erro){ - $js = "alertaAviso('Item(".$_POST['inCodItem'].") Já Incluso na Lista.','frm','erro','".Sessao::getId()."'); \n"; + $js = "alertaAviso('Item(".$request->get('inCodItem').") Já Incluso na Lista.','frm','erro','".Sessao::getId()."'); \n"; SistemaLegado::executaFrameOculto($js); }else{ Sessao::write('arItens', $arItens); $stJs.= "f.btnIncluir.setAttribute('onclick','return incluirItem()');"; - - echo montaListaDiverso(Sessao::read('arItens')); + + echo montaListaDiverso($request, Sessao::read('arItens')); SistemaLegado::executaFrameOculto($stJs); } break; case 'buscaEmpenho': - if ($_REQUEST["inCodigoEmpenho"] && $_REQUEST["inCodEntidade"]) { + if ($request->get("inCodigoEmpenho") && $request->get("inCodEntidade")) { Sessao::remove('arItens'); $obREmpenhoEmpenho = new REmpenhoEmpenho; - $obREmpenhoEmpenho->obROrcamentoEntidade->setCodigoEntidade($_REQUEST["inCodEntidade"]); + $obREmpenhoEmpenho->obROrcamentoEntidade->setCodigoEntidade($request->get("inCodEntidade")); $obREmpenhoEmpenho->setExercicio(Sessao::getExercicio()); - $obREmpenhoEmpenho->setCodEmpenhoInicial($_REQUEST["inCodigoEmpenho"]); - $obREmpenhoEmpenho->setCodEmpenhoFinal($_REQUEST["inCodigoEmpenho"]); + $obREmpenhoEmpenho->setCodEmpenhoInicial($request->get("inCodigoEmpenho")); + $obREmpenhoEmpenho->setCodEmpenhoFinal($request->get("inCodigoEmpenho")); $obREmpenhoEmpenho->setSituacao(5); $obREmpenhoEmpenho->listar($rsLista); if ($rsLista->getNumLinhas() > 0) { - $obREmpenhoEmpenho->setCodEmpenho($_REQUEST["inCodigoEmpenho"]); + $obREmpenhoEmpenho->setCodEmpenho($request->get("inCodigoEmpenho")); $obREmpenhoEmpenho->consultar(); $stNomFornecedor = ($rsLista->getCampo('nom_fornecedor')) ? str_replace( "'","\'",$rsLista->getCampo("nom_fornecedor")):' '; $js .= "d.getElementById('stNomFornecedor').innerHTML='".$stNomFornecedor."';"; @@ -1208,7 +1309,7 @@ switch ($stCtrl) { $obDtEmpenho->setRotulo ('Data de Empenho'); $obDtEmpenho->setTitle ('Informe a data do empenho.'); $obDtEmpenho->setNull (false); - $obDtEmpenho->obEvento->setOnBlur ('validaDataEmpenho();'); + $obDtEmpenho->obEvento->setOnBlur ("validaDataEmpenho(); buscaDado('montaLabelSaldoAnterior');"); $obDtEmpenho->obEvento->setOnChange("montaParametrosGET('verificaFornecedor');"); // Define objeto Data para validade final @@ -1359,45 +1460,79 @@ switch ($stCtrl) { case "unidadeItem": $js = ""; $stJs = ""; - if( $_REQUEST["codItem"] ){ - $stFiltro=" WHERE cod_item=".$_REQUEST["codItem"]; - - include_once ( CAM_GP_ALM_MAPEAMENTO."TAlmoxarifadoCatalogoItem.class.php" ); + if( $request->get("codItem") ){ + $stFiltro=" WHERE cod_item=".$request->get("codItem"); + + include_once CAM_GP_ALM_MAPEAMENTO."TAlmoxarifadoCatalogoItem.class.php"; $obTAlmoxarifadoCatalogoItem = new TAlmoxarifadoCatalogoItem; - $obTAlmoxarifadoCatalogoItem->setDado('cod_item' , $_REQUEST["codItem"]); + $obTAlmoxarifadoCatalogoItem->setDado('cod_item' , $request->get("codItem")); $obTAlmoxarifadoCatalogoItem->recuperaTodos($rsItem, $stFiltro); - + if($rsItem->inNumLinhas==1){ $value = $rsItem->getCampo('cod_unidade')."-".$rsItem->getCampo('cod_grandeza'); - include_once ( CAM_GA_ADM_MAPEAMENTO."TUnidadeMedida.class.php" ); + include_once CAM_GA_ADM_MAPEAMENTO."TUnidadeMedida.class.php"; $obTUnidadeMedida = new TUnidadeMedida; - + $stFiltro=" WHERE cod_unidade=".$rsItem->getCampo('cod_unidade')." AND cod_grandeza=".$rsItem->getCampo('cod_grandeza'); $obTUnidadeMedida->recuperaTodos($rsUnidade, $stFiltro); if($rsUnidade->inNumLinhas==1){ $value=$value."-".$rsUnidade->getCampo('nom_unidade'); - + $js .= "for (var i = 0; i < f.inCodUnidade.options.length; i++) - { - if (f.inCodUnidade.options[i].value == '".$value."') { + if (f.inCodUnidade.options[i].value == '".$value."') + { f.inCodUnidade.options[i].selected = 'true'; break; - } - }\n"; + } + }\n"; } - } } - + SistemaLegado::executaFrameOculto($js); echo $stJs; break; - + + case 'montaLabelSaldoAnterior': + $obREmpenhoAutorizacaoEmpenho->obROrcamentoDespesa->setCodDespesa($request->get('inCodDespesa')); + $obREmpenhoAutorizacaoEmpenho->setExercicio(Sessao::getExercicio()); + $obREmpenhoAutorizacaoEmpenho->setdataEmpenho($request->get('stDtEmpenho')); + $obREmpenhoAutorizacaoEmpenho->setCodEntidade($request->get('inCodEntidade')); + $obREmpenhoAutorizacaoEmpenho->consultaSaldoAnteriorDataEmpenho($nuSaldoDotacao); + + if ($nuSaldoDotacao == "0.00") { + $nuSaldoDotacao = ' '; + } else { + $nuSaldoDotacao = number_format($nuSaldoDotacao ,2 ,',' ,'.'); + } + + $stLabel = $request->get('hdnNomeAcao') == "stEmitirEmpenhoAutorizacao" ? "nuSaldoAnterior" : "flSaldoDotacao"; + + $js.= "d.getElementById('".$stLabel."').innerHTML = '".$nuSaldoDotacao."';"; + + SistemaLegado::executaFrameOculto($js); + break; + case "limparOrdem": - Sessao::remove('arItens'); + Sessao::remove('arItens'); + break; + + case "validaContrato": + echo (validaContrato($request->get('inCodEntidade'), $request->get('inCodFornecedor'), $request->get('inNumContrato'))); + break; + + case "montaBuscaContrato": + $arFiltroBuscaContrato = array('inCodEntidade'=>$request->get('inCodEntidade'), 'inCodFornecedor'=>$request->get('inCodFornecedor')); + + Sessao::write('arFiltroBuscaContrato', $arFiltroBuscaContrato); + + if($request->get('inCodEntidade', '') == '' || $request->get('inCodFornecedor', '') == ''){ + $js = "alertaAviso('Informe os campos Entidade e Fornecedor, para buscar Contrato!','unica','erro', '".Sessao::getId()."');"; + echo ($js); + } break; } -?> +?> \ No newline at end of file diff --git a/gestaoFinanceira/fontes/PHP/empenho/instancias/empenho/OCManterVinculoEmpenhoContrato.php b/gestaoFinanceira/fontes/PHP/empenho/instancias/empenho/OCManterVinculoEmpenhoContrato.php index 1a3cdc5..744de80 100644 --- a/gestaoFinanceira/fontes/PHP/empenho/instancias/empenho/OCManterVinculoEmpenhoContrato.php +++ b/gestaoFinanceira/fontes/PHP/empenho/instancias/empenho/OCManterVinculoEmpenhoContrato.php @@ -31,7 +31,7 @@ * Casos de uso: uc-02.03.37 - $Id: OCManterVinculoEmpenhoContrato.php 59612 2014-09-02 12:00:51Z gelson $ + $Id: OCManterVinculoEmpenhoContrato.php 64081 2015-11-30 15:36:50Z michel $ */ @@ -47,7 +47,7 @@ $pgProc = "PR".$stPrograma.".php"; $pgOcul = "OC".$stPrograma.".php"; $pgJS = "JS".$stPrograma.".js"; -$stCtrl = $_GET['stCtrl'] ? $_GET['stCtrl'] : $_POST['stCtrl']; +$stCtrl = $request->get('stCtrl'); switch ($stCtrl) { @@ -61,13 +61,13 @@ switch ($stCtrl) { $inCount = count($arElementos); $boExecuta = false; - $arEmpenho = explode('/', $_REQUEST['numEmpenho']); + $arEmpenho = explode('/', $request->get('numEmpenho')); if ($arEmpenho[0] && strlen($arEmpenho[1]) == 4) { - include_once( CAM_GF_EMP_MAPEAMENTO."TEmpenhoEmpenho.class.php" ); + include_once CAM_GF_EMP_MAPEAMENTO."TEmpenhoEmpenho.class.php"; $obTEmpenhoEmpenho = new TEmpenhoEmpenho; $stFiltro .= " AND e.cod_empenho = ".$arEmpenho[0]; $stFiltro .= " AND e.exercicio = '".$arEmpenho[1]."'"; - $stFiltro .= " AND pe.cgm_beneficiario = ".$_REQUEST['cgm_credor']; + $stFiltro .= " AND pe.cgm_beneficiario = ".$request->get('cgm_credor'); $obTEmpenhoEmpenho->recuperaEmpenhoPreEmpenho($rsRecordSet, $stFiltro); if ($rsRecordSet->getNumLinhas() > 0) { @@ -120,7 +120,7 @@ switch ($stCtrl) { $arElementosSessao = Sessao::read('elementos'); $arExcluidosSessao = Sessao::read('elementos_excluidos'); - $id = $_REQUEST['inId']; + $id = $request->get('inId'); $inCount = 0; $inCountExcluidos = count(Sessao::read('elementos_excluidos')); @@ -158,9 +158,9 @@ switch ($stCtrl) { include_once CAM_GF_EMP_MAPEAMENTO.'TEmpenhoEmpenhoContrato.class.php'; $obTEmpenhoEmpenhoContrato = new TEmpenhoEmpenhoContrato; - $stFiltro .= " AND ec.exercicio = '".Sessao::getExercicio()."'"; - $stFiltro .= " AND ec.cod_entidade = ".Sessao::read('inCodEntidade'); - $stFiltro .= " AND ec.num_contrato = ".Sessao::read('inNumContrato'); + $stFiltro .= " AND ec.exercicio = '".$request->get('inExercicio')."'"; + $stFiltro .= " AND ec.cod_entidade = ".$request->get('inCodEntidade'); + $stFiltro .= " AND ec.num_contrato = ".$request->get('inNumContrato'); $obTEmpenhoEmpenhoContrato->recuperaRelacionamentoEmpenhoContrato($rsEmpenhos, $stFiltro, ""); if ($rsEmpenhos->getNumLinhas() > 0) { diff --git a/gestaoFinanceira/fontes/PHP/empenho/instancias/empenho/PRManterEmpenho.php b/gestaoFinanceira/fontes/PHP/empenho/instancias/empenho/PRManterEmpenho.php index af4d37b..fd00607 100755 --- a/gestaoFinanceira/fontes/PHP/empenho/instancias/empenho/PRManterEmpenho.php +++ b/gestaoFinanceira/fontes/PHP/empenho/instancias/empenho/PRManterEmpenho.php @@ -32,12 +32,7 @@ * @ignore - $Id: PRManterEmpenho.php 63332 2015-08-18 19:54:17Z franver $ - - $Revision: 32828 $ - $Name$ - $Autor:$ - $Date: 2008-01-02 08:44:54 -0200 (Qua, 02 Jan 2008) $ + $Id: PRManterEmpenho.php 64081 2015-11-30 15:36:50Z michel $ * Casos de uso: uc-02.01.08 uc-02.03.03 @@ -47,7 +42,7 @@ include '../../../../../../gestaoAdministrativa/fontes/PHP/pacotes/FrameworkHTML.inc.php'; include_once '../../../../../../gestaoAdministrativa/fontes/PHP/framework/include/cabecalho.inc.php'; -include( CAM_GF_EMP_NEGOCIO."REmpenhoEmpenhoAutorizacao.class.php" ); +include CAM_GF_EMP_NEGOCIO."REmpenhoEmpenhoAutorizacao.class.php"; include CAM_GP_LIC_MAPEAMENTO.'TLicitacaoParticipanteDocumentos.class.php'; //Define o nome dos arquivos PHP @@ -65,7 +60,7 @@ $obTransacao->abreTransacao($boFlagTransacao, $boTransacao); $obREmpenhoEmpenhoAutorizacao = new REmpenhoEmpenhoAutorizacao; -$stAcao = $_POST["stAcao"] ? $_POST["stAcao"] : $_GET["stAcao"]; +$stAcao = $request->get('stAcao'); //Trecho de código do filtro $stFiltro = ''; if ( Sessao::read('filtro') ) { @@ -78,7 +73,7 @@ if ( Sessao::read('filtro') ) { } //valida a utilização da rotina de encerramento do mês contábil -$arDtAutorizacao = explode('/', $_POST['stDtEmpenho']); +$arDtAutorizacao = explode('/', $request->get('stDtEmpenho')); $boUtilizarEncerramentoMes = SistemaLegado::pegaConfiguracao('utilizar_encerramento_mes', 9, "", $boTransacao); include_once CAM_GF_CONT_MAPEAMENTO."TContabilidadeEncerramentoMes.class.php"; $obTContabilidadeEncerramentoMes = new TContabilidadeEncerramentoMes; @@ -97,27 +92,27 @@ switch ($stAcao) { $inCodUF = SistemaLegado::pegaConfiguracao('cod_uf', 2, Sessao::getExercicio(), $boTransacao); if ($inCodUF == 9 && Sessao::getExercicio() >= 2012) { - if (!$_REQUEST["inModalidadeLicitacao"] || $_REQUEST["inModalidadeLicitacao"] == '') { + if (!$request->get('inModalidadeLicitacao') || $request->get('inModalidadeLicitacao') == '') { SistemaLegado::exibeAviso("Modalidade TCMGO não informada!","n_incluir","erro"); SistemaLegado::LiberaFrames(true,False); break; } - if ($_REQUEST['inModalidadeLicitacao'] == '10' || $_REQUEST['inModalidadeLicitacao'] == '11') { + if ($request->get('inModalidadeLicitacao') == '10' || $request->get('inModalidadeLicitacao') == '11') { - if (!$_REQUEST["inFundamentacaoLegal"] || $_REQUEST["inFundamentacaoLegal"] == '') { + if (!$request->get('inFundamentacaoLegal') || $request->get('inFundamentacaoLegal') == '') { SistemaLegado::exibeAviso("Fundamentação legal não informada!","n_incluir","erro"); SistemaLegado::LiberaFrames(true,False); break; } - if (!$_REQUEST["stJustificativa"] || $_REQUEST["stJustificativa"] == '') { + if (!$request->get('stJustificativa') || $request->get('stJustificativa') == '') { SistemaLegado::exibeAviso("Justificativa não informada!","n_incluir","erro"); SistemaLegado::LiberaFrames(true,False); break; } - if (!$_REQUEST["stRazao"] || $_REQUEST["stRazao"] == '') { + if (!$request->get('stRazao') || $request->get('stRazao') == '') { SistemaLegado::exibeAviso("Razão da escolha não informada!","n_incluir","erro"); SistemaLegado::LiberaFrames(true,False); break; @@ -125,6 +120,14 @@ switch ($stAcao) { } } + if($request->get('inNumContrato')){ + if (sistemaLegado::comparaDatas($request->get('dtContrato'), $request->get('stDtEmpenho'), true)) { + SistemaLegado::exibeAviso("Data do empenho deve ser maior ou igual a data do Contrato!","n_incluir","erro"); + SistemaLegado::LiberaFrames(true,false); + break; + } + } + $obAtributos = new MontaAtributos; $obAtributos->setName ( "Atributo_" ); $obAtributos->recuperaVetor( $arChave ); @@ -139,26 +142,28 @@ switch ($stAcao) { $obREmpenhoEmpenhoAutorizacao->obREmpenhoEmpenho->obRCadastroDinamico->addAtributosDinamicos( $inCodAtributo , $value ); } - $obREmpenhoEmpenhoAutorizacao->obREmpenhoAutorizacaoEmpenho->setCodAutorizacao( $_POST['inCodAutorizacao'] ); - $obREmpenhoEmpenhoAutorizacao->obREmpenhoAutorizacaoEmpenho->obROrcamentoReservaSaldos->setCodReserva( $_POST['inCodReserva'] ); - $obREmpenhoEmpenhoAutorizacao->obREmpenhoAutorizacaoEmpenho->obREmpenhoTipoEmpenho->setCodTipo( $_POST['inCodTipo'] ); - $obREmpenhoEmpenhoAutorizacao->obREmpenhoAutorizacaoEmpenho->obROrcamentoReservaSaldos->setVlReserva( $_POST['nuVlReserva'] ); - $obREmpenhoEmpenhoAutorizacao->obREmpenhoEmpenho->obROrcamentoReservaSaldos->setVlReserva( $_POST['nuVlReserva'] ); - $obREmpenhoEmpenhoAutorizacao->obREmpenhoEmpenho->obROrcamentoClassificacaoDespesa->setMascClassificacao( $_POST['stCodClassificacao'] ); - $obREmpenhoEmpenhoAutorizacao->obREmpenhoEmpenho->setDescricao( $_POST['stNomEmpenho'] ); - $obREmpenhoEmpenhoAutorizacao->obREmpenhoEmpenho->obREmpenhoHistorico->setCodHistorico( $_POST['inCodHistorico'] ); - $obREmpenhoEmpenhoAutorizacao->obREmpenhoEmpenho->obROrcamentoDespesa->setCodDespesa( $_POST['inCodDespesa'] ); - $obREmpenhoEmpenhoAutorizacao->obREmpenhoAutorizacaoEmpenho->obROrcamentoReservaSaldos->obROrcamentoDespesa->setCodDespesa( $_POST['inCodDespesa'] ); - $obREmpenhoEmpenhoAutorizacao->obREmpenhoEmpenho->obRCGM->setNumCGM( $_POST['inCodFornecedor'] ); - $obREmpenhoEmpenhoAutorizacao->obREmpenhoEmpenho->obREmpenhoTipoEmpenho->setCodTipo( $_POST['inCodTipo'] ); - $obREmpenhoEmpenhoAutorizacao->obREmpenhoEmpenho->setCodPreEmpenho( $_POST['inCodPreEmpenho'] ); - $obREmpenhoEmpenhoAutorizacao->obREmpenhoEmpenho->setCodCategoria( $_REQUEST['inCodCategoria'] ); - $obREmpenhoEmpenhoAutorizacao->obREmpenhoEmpenho->obROrcamentoEntidade->setCodigoEntidade( $_POST['inCodEntidade'] ); - $obREmpenhoEmpenhoAutorizacao->obREmpenhoEmpenho->setDtEmpenho( $_POST['stDtEmpenho'] ); - $obREmpenhoEmpenhoAutorizacao->obREmpenhoEmpenho->setDtVencimento( $_POST['stDtVencimento'] ); + $obREmpenhoEmpenhoAutorizacao->obREmpenhoAutorizacaoEmpenho->setCodAutorizacao( $request->get('inCodAutorizacao') ); + $obREmpenhoEmpenhoAutorizacao->obREmpenhoAutorizacaoEmpenho->obROrcamentoReservaSaldos->setCodReserva( $request->get('inCodReserva') ); + $obREmpenhoEmpenhoAutorizacao->obREmpenhoAutorizacaoEmpenho->obREmpenhoTipoEmpenho->setCodTipo( $request->get('inCodTipo') ); + $obREmpenhoEmpenhoAutorizacao->obREmpenhoAutorizacaoEmpenho->obROrcamentoReservaSaldos->setVlReserva( $request->get('nuVlReserva') ); + $obREmpenhoEmpenhoAutorizacao->obREmpenhoEmpenho->obROrcamentoReservaSaldos->setVlReserva( $request->get('nuVlReserva') ); + $obREmpenhoEmpenhoAutorizacao->obREmpenhoEmpenho->obROrcamentoClassificacaoDespesa->setMascClassificacao( $request->get('stCodClassificacao') ); + $obREmpenhoEmpenhoAutorizacao->obREmpenhoEmpenho->setDescricao( $request->get('stNomEmpenho') ); + $obREmpenhoEmpenhoAutorizacao->obREmpenhoEmpenho->obREmpenhoHistorico->setCodHistorico( $request->get('inCodHistorico') ); + $obREmpenhoEmpenhoAutorizacao->obREmpenhoEmpenho->obROrcamentoDespesa->setCodDespesa( $request->get('inCodDespesa') ); + $obREmpenhoEmpenhoAutorizacao->obREmpenhoAutorizacaoEmpenho->obROrcamentoReservaSaldos->obROrcamentoDespesa->setCodDespesa( $request->get('inCodDespesa') ); + $obREmpenhoEmpenhoAutorizacao->obREmpenhoEmpenho->obRCGM->setNumCGM( $request->get('inCodFornecedor') ); + $obREmpenhoEmpenhoAutorizacao->obREmpenhoEmpenho->obREmpenhoTipoEmpenho->setCodTipo( $request->get('inCodTipo') ); + $obREmpenhoEmpenhoAutorizacao->obREmpenhoEmpenho->setCodPreEmpenho( $request->get('inCodPreEmpenho') ); + $obREmpenhoEmpenhoAutorizacao->obREmpenhoEmpenho->setCodCategoria( $request->get('inCodCategoria') ); + $obREmpenhoEmpenhoAutorizacao->obREmpenhoEmpenho->obROrcamentoEntidade->setCodigoEntidade( $request->get('inCodEntidade') ); + $obREmpenhoEmpenhoAutorizacao->obREmpenhoEmpenho->setDtEmpenho( $request->get('stDtEmpenho') ); + $obREmpenhoEmpenhoAutorizacao->obREmpenhoEmpenho->setDtVencimento( $request->get('stDtVencimento') ); $obREmpenhoEmpenhoAutorizacao->obREmpenhoEmpenho->setExercicio( Sessao::getExercicio() ); - $obREmpenhoEmpenhoAutorizacao->obREmpenhoEmpenho->setCodCategoria( $_REQUEST['inCodCategoria']); - + $obREmpenhoEmpenhoAutorizacao->obREmpenhoEmpenho->setCodCategoria( $request->get('inCodCategoria')); + $obREmpenhoEmpenhoAutorizacao->obREmpenhoEmpenho->setdataEmpenho($request->get('stDtEmpenho')); + $obREmpenhoEmpenhoAutorizacao->obREmpenhoEmpenho->setCodEntidade($request->get('inCodEntidade') ); + $obErro = $obREmpenhoEmpenhoAutorizacao->autorizarEmpenho($boTransacao); $inCodUF = SistemaLegado::pegaConfiguracao('cod_uf', 2, Sessao::getExercicio(), $boTransacao); @@ -167,43 +172,43 @@ switch ($stAcao) { include_once CAM_GPC_TGO_MAPEAMENTO.'TTCMGOEmpenhoModalidade.class.php'; $obTEmpenhoModalidade = new TTCMGOEmpenhoModalidade(); - if ($_REQUEST['inModalidadeLicitacao'] == '10' || $_REQUEST['inModalidadeLicitacao'] == '11') { + if ($request->get('inModalidadeLicitacao') == '10' || $request->get('inModalidadeLicitacao') == '11') { - $obTEmpenhoModalidade->setDado( 'cod_entidade' , $_REQUEST['inCodEntidade']); + $obTEmpenhoModalidade->setDado( 'cod_entidade' , $request->get('inCodEntidade')); $obTEmpenhoModalidade->setDado( 'cod_empenho' , $obREmpenhoEmpenhoAutorizacao->obREmpenhoEmpenho->getCodEmpenho()); $obTEmpenhoModalidade->setDado( 'exercicio' , Sessao::getExercicio()); - $obTEmpenhoModalidade->setDado( 'cod_modalidade' , $_REQUEST['inModalidadeLicitacao']); - $obTEmpenhoModalidade->setDado( 'cod_fundamentacao' , $_REQUEST['inFundamentacaoLegal']); - $obTEmpenhoModalidade->setDado( 'justificativa' , $_REQUEST['stJustificativa']); - $obTEmpenhoModalidade->setDado( 'razao_escolha' , $_REQUEST['stRazao']); + $obTEmpenhoModalidade->setDado( 'cod_modalidade' , $request->get('inModalidadeLicitacao')); + $obTEmpenhoModalidade->setDado( 'cod_fundamentacao' , $request->get('inFundamentacaoLegal')); + $obTEmpenhoModalidade->setDado( 'justificativa' , $request->get('stJustificativa')); + $obTEmpenhoModalidade->setDado( 'razao_escolha' , $request->get('stRazao')); $obErro = $obTEmpenhoModalidade->inclusao($boTransacao); } else { - $obTEmpenhoModalidade->setDado( 'cod_entidade' , $_REQUEST['inCodEntidade']); + $obTEmpenhoModalidade->setDado( 'cod_entidade' , $request->get('inCodEntidade')); $obTEmpenhoModalidade->setDado( 'cod_empenho' , $obREmpenhoEmpenhoAutorizacao->obREmpenhoEmpenho->getCodEmpenho()); $obTEmpenhoModalidade->setDado( 'exercicio' , Sessao::getExercicio()); - $obTEmpenhoModalidade->setDado( 'cod_modalidade' , $_REQUEST['inModalidadeLicitacao']); + $obTEmpenhoModalidade->setDado( 'cod_modalidade' , $request->get('inModalidadeLicitacao')); $obErro = $obTEmpenhoModalidade->inclusao($boTransacao); } //Informações sobre a licitação - if ($_REQUEST['stProcessoLicitacao'] || $_REQUEST['stExercicioLicitacao'] || $_REQUEST['stProcessoAdministrativo']) { + if ($request->get('stProcessoLicitacao') || $request->get('stExercicioLicitacao') || $request->get('stProcessoAdministrativo')) { include_once CAM_GPC_TGO_MAPEAMENTO.'TTCMGOProcessos.class.php'; $obTTCMGOProcessos = new TTCMGOProcessos(); $obTTCMGOProcessos->setDado( 'cod_empenho', $obREmpenhoEmpenhoAutorizacao->obREmpenhoEmpenho->getCodEmpenho() ); $obTTCMGOProcessos->setDado( 'cod_entidade', $obREmpenhoEmpenhoAutorizacao->obREmpenhoEmpenho->obROrcamentoEntidade->getCodigoEntidade() ); $obTTCMGOProcessos->setDado( 'exercicio', $obREmpenhoEmpenhoAutorizacao->obREmpenhoEmpenho->getExercicio() ); - $obTTCMGOProcessos->setDado( 'numero_processo', $_REQUEST['stProcessoLicitacao'] ); - $obTTCMGOProcessos->setDado( 'exercicio_processo', $_REQUEST['stExercicioLicitacao'] ); - $obTTCMGOProcessos->setDado( 'processo_administrativo', $_REQUEST['stProcessoAdministrativo'] ); + $obTTCMGOProcessos->setDado( 'numero_processo', $request->get('stProcessoLicitacao') ); + $obTTCMGOProcessos->setDado( 'exercicio_processo', $request->get('stExercicioLicitacao') ); + $obTTCMGOProcessos->setDado( 'processo_administrativo', $request->get('stProcessoAdministrativo') ); $obErro = $obTTCMGOProcessos->inclusao($boTransacao); } } if ( !$obErro->ocorreu() ) { // Adiantamentos: Faz inclusao em empenho.contrapartida_empenho - if ($_REQUEST['inCodCategoria'] == 2 || $_REQUEST['inCodCategoria'] == 3) { + if ($request->get('inCodCategoria') == 2 || $request->get('inCodCategoria') == 3) { include_once( TEMP."TEmpenhoContrapartidaEmpenho.class.php" ); $obTEmpenhoContrapartidaEmpenho = new TEmpenhoContrapartidaEmpenho(); $obTEmpenhoContrapartidaEmpenho->setDado( 'cod_empenho' , $obREmpenhoEmpenhoAutorizacao->obREmpenhoEmpenho->getCodEmpenho() ); @@ -222,7 +227,7 @@ switch ($stAcao) { $obTTCERNFundebEmpenho->setDado( 'cod_empenho' , $obREmpenhoEmpenhoAutorizacao->obREmpenhoEmpenho->getCodEmpenho() ); $obTTCERNFundebEmpenho->setDado( 'cod_entidade' , $_POST['inCodEntidade'] ); $obTTCERNFundebEmpenho->setDado( 'exercicio' , Sessao::getExercicio() ); - $obTTCERNFundebEmpenho->setDado( 'cod_fundeb' , $_REQUEST['inCodFundeb'] ); + $obTTCERNFundebEmpenho->setDado( 'cod_fundeb' , $request->get('inCodFundeb') ); $obErro = $obTTCERNFundebEmpenho->inclusao($boTransacao); // Relaciona o empenho com o royalties @@ -231,12 +236,25 @@ switch ($stAcao) { $obTTCERNRoyaltiesEmpenho->setDado( 'cod_empenho' , $obREmpenhoEmpenhoAutorizacao->obREmpenhoEmpenho->getCodEmpenho() ); $obTTCERNRoyaltiesEmpenho->setDado( 'cod_entidade' , $_POST['inCodEntidade'] ); $obTTCERNRoyaltiesEmpenho->setDado( 'exercicio' , Sessao::getExercicio() ); - $obTTCERNRoyaltiesEmpenho->setDado( 'cod_royalties' , $_REQUEST['inCodRoyalties'] ); + $obTTCERNRoyaltiesEmpenho->setDado( 'cod_royalties' , $request->get('inCodRoyalties') ); $obErro = $obTTCERNRoyaltiesEmpenho->inclusao($boTransacao); } } if ( !$obErro->ocorreu() ) { + // Relaciona o empenho a contrato + if($request->get('inNumContrato')){ + include_once CAM_GF_EMP_MAPEAMENTO.'TEmpenhoEmpenhoContrato.class.php'; + $obTEmpenhoEmpenhoContrato = new TEmpenhoEmpenhoContrato(); + $obTEmpenhoEmpenhoContrato->setDado( "exercicio" , Sessao::getExercicio()); + $obTEmpenhoEmpenhoContrato->setDado( "cod_entidade" , $request->get('inCodEntidade')); + $obTEmpenhoEmpenhoContrato->setDado( "cod_empenho" , $obREmpenhoEmpenhoAutorizacao->obREmpenhoEmpenho->getCodEmpenho()); + $obTEmpenhoEmpenhoContrato->setDado( "num_contrato" , $request->get('inNumContrato')); + $obErro = $obTEmpenhoEmpenhoContrato->inclusao($boTransacao); + } + } + + if ( !$obErro->ocorreu() ) { /* Salvar assinaturas configuráveis se houverem */ $arAssinaturas = Sessao::read('assinaturas'); if (array_key_exists('selecionadas', $arAssinaturas)) { @@ -298,7 +316,7 @@ switch ($stAcao) { } $obTransacao->fechaTransacao($boFlagTransacao,$boTransacao,$obErro,$obREmpenhoEmpenhoAutorizacao->obTEmpenhoEmpenhoAutorizacao); if ( !$obErro->ocorreu() ) { - if ($_REQUEST['boEmitirLiquidacao'] == "S") { + if ($request->get('boEmitirLiquidacao') == "S") { $pgProx = CAM_GF_EMP_INSTANCIAS."liquidacao/FMManterLiquidacao.php"; $stFiltroLiquidacao = "&inCodEmpenho=".$obREmpenhoEmpenhoAutorizacao->obREmpenhoEmpenho->getCodEmpenho(); $stFiltroLiquidacao .= "&inCodPreEmpenho=".$_POST['inCodPreEmpenho']; @@ -327,4 +345,4 @@ switch ($stAcao) { break; } -?> +?> \ No newline at end of file diff --git a/gestaoFinanceira/fontes/PHP/empenho/instancias/empenho/PRManterEmpenhoDiversos.php b/gestaoFinanceira/fontes/PHP/empenho/instancias/empenho/PRManterEmpenhoDiversos.php index 73109d1..d284869 100755 --- a/gestaoFinanceira/fontes/PHP/empenho/instancias/empenho/PRManterEmpenhoDiversos.php +++ b/gestaoFinanceira/fontes/PHP/empenho/instancias/empenho/PRManterEmpenhoDiversos.php @@ -33,10 +33,7 @@ * @ignore - $Revision: 32677 $ - $Name$ - $Autor:$ - $Date: 2008-02-20 15:20:02 -0300 (Qua, 20 Fev 2008) $ + $Id: PRManterEmpenhoDiversos.php 64081 2015-11-30 15:36:50Z michel $ * Casos de uso: uc-02.01.08 uc-02.03.03 @@ -45,12 +42,12 @@ include '../../../../../../gestaoAdministrativa/fontes/PHP/pacotes/FrameworkHTML.inc.php'; include_once '../../../../../../gestaoAdministrativa/fontes/PHP/framework/include/cabecalho.inc.php'; -include( CAM_GF_EMP_NEGOCIO."REmpenhoEmpenho.class.php" ); -include( CAM_GP_LIC_MAPEAMENTO."TLicitacaoParticipanteDocumentos.class.php"); +include CAM_GF_EMP_NEGOCIO."REmpenhoEmpenho.class.php"; +include CAM_GP_LIC_MAPEAMENTO."TLicitacaoParticipanteDocumentos.class.php"; //Define o nome dos arquivos PHP $stPrograma = "ManterEmpenho"; -if ($_REQUEST['obHdnBoComplementar'] == 1) { +if ($request->get('obHdnBoComplementar') == 1) { $pgFormDiverso = "FMManterEmpenhoComplementar.php"; } else { $pgFormDiverso = "FMManterEmpenhoDiversos.php"; @@ -88,10 +85,10 @@ foreach ($arChave as $key=>$value) { $obREmpenhoEmpenho->obRCadastroDinamico->addAtributosDinamicos( $inCodAtributo , $value ); } //<-------- -$stAcao = $_POST["stAcao"] ? $_POST["stAcao"] : $_GET["stAcao"]; +$stAcao = $request->get('stAcao'); //valida a utilização da rotina de encerramento do mês contábil -$arDtAutorizacao = explode('/', $_POST['stDtEmpenho']); +$arDtAutorizacao = explode('/', $request->get('stDtEmpenho')); $boUtilizarEncerramentoMes = SistemaLegado::pegaConfiguracao('utilizar_encerramento_mes', 9,"", $boTransacao); include_once CAM_GF_CONT_MAPEAMENTO."TContabilidadeEncerramentoMes.class.php"; $obTContabilidadeEncerramentoMes = new TContabilidadeEncerramentoMes; @@ -106,12 +103,12 @@ if ($boUtilizarEncerramentoMes == 'true' AND $rsUltimoMesEncerrado->getCampo('me switch ($stAcao) { case "incluir": - if (( $_REQUEST['inCodCategoria'] == 2 || $_REQUEST['inCodCategoria'] == 3) && (!$_POST['inCodContrapartida']) ) { + if (( $request->get('inCodCategoria') == 2 || $request->get('inCodCategoria') == 3) && (!$request->get('inCodContrapartida')) ) { SistemaLegado::exibeAviso("Campo Contrapartida inválido!","n_incluir","erro"); SistemaLegado::LiberaFrames(true,false); break; } - if (!$_REQUEST["inCodFornecedor"]) { + if (!$request->get('inCodFornecedor')) { SistemaLegado::exibeAviso("Fornecedor não informado!","n_incluir","erro"); SistemaLegado::LiberaFrames(true,false); break; @@ -119,27 +116,27 @@ switch ($stAcao) { $inCodUF = SistemaLegado::pegaConfiguracao('cod_uf', 2, Sessao::getExercicio(),$boTransacao); if ($inCodUF == 9 && Sessao::getExercicio() >= 2012) { - if (!$_REQUEST["inModalidadeLicitacao"] || $_REQUEST["inModalidadeLicitacao"] == '') { + if (!$request->get('inModalidadeLicitacao') || $request->get('inModalidadeLicitacao') == '') { SistemaLegado::exibeAviso("Modalidade TCMGO não informada!","n_incluir","erro"); SistemaLegado::LiberaFrames(true,false); break; } - if ($_REQUEST['inModalidadeLicitacao'] == '10' || $_REQUEST['inModalidadeLicitacao'] == '11') { + if ($request->get('inModalidadeLicitacao') == '10' || $request->get('inModalidadeLicitacao') == '11') { - if (!$_REQUEST["inFundamentacaoLegal"] || $_REQUEST["inFundamentacaoLegal"] == '') { + if (!$request->get('inFundamentacaoLegal') || $request->get('inFundamentacaoLegal') == '') { SistemaLegado::exibeAviso("Fundamentação legal não informada!","n_incluir","erro"); SistemaLegado::LiberaFrames(true,false); break; } - if (!$_REQUEST["stJustificativa"] || $_REQUEST["stJustificativa"] == '') { + if (!$request->get('stJustificativa') || $request->get('stJustificativa') == '') { SistemaLegado::exibeAviso("Justificativa não informada!","n_incluir","erro"); SistemaLegado::LiberaFrames(true,false); break; } - if (!$_REQUEST["stRazao"] || $_REQUEST["stRazao"] == '') { + if (!$request->get('stRazao') || $request->get('stRazao') == '') { SistemaLegado::exibeAviso("Razão da escolha não informada!","n_incluir","erro"); SistemaLegado::LiberaFrames(true,false); break; @@ -147,7 +144,7 @@ switch ($stAcao) { } } - $arAtributos = explode('#', $_REQUEST['HdnAtributos']); + $arAtributos = explode('#', $request->get('HdnAtributos')); foreach ($arAtributos as $arAtr) { if ($arAtr) { @@ -167,24 +164,32 @@ switch ($stAcao) { SistemaLegado::exibeAviso("Campo ".$arAtr[2].' Não Informado!',"n_incluir","erro"); SistemaLegado::LiberaFrames(true,false); break; - } + } + + if($request->get('inNumContrato')){ + if (sistemaLegado::comparaDatas($request->get('dtContrato'), $request->get('stDtEmpenho'), true)) { + SistemaLegado::exibeAviso("Data do empenho deve ser maior ou igual a data do Contrato!","n_incluir","erro"); + SistemaLegado::LiberaFrames(true,false); + break; + } + } $obREmpenhoEmpenho->setExercicio( Sessao::getExercicio() ); - $obREmpenhoEmpenho->obROrcamentoEntidade->setCodigoEntidade( $_POST['inCodEntidade'] ); + $obREmpenhoEmpenho->obROrcamentoEntidade->setCodigoEntidade( $request->get('inCodEntidade') ); $obREmpenhoEmpenho->obREmpenhoTipoEmpenho->setCodTipo( 0 ); - $obREmpenhoEmpenho->obROrcamentoDespesa->setCodDespesa( $_POST['inCodDespesa'] ); - $obREmpenhoEmpenho->obROrcamentoClassificacaoDespesa->setMascClassificacao( $_POST['stCodClassificacao'] ); + $obREmpenhoEmpenho->obROrcamentoDespesa->setCodDespesa( $request->get('inCodDespesa') ); + $obREmpenhoEmpenho->obROrcamentoClassificacaoDespesa->setMascClassificacao( $request->get('stCodClassificacao') ); $obREmpenhoEmpenho->obRUsuario->obRCGM->setNumCGM( Sessao::read('numCgm') ); - $obREmpenhoEmpenho->obRCGM->setNumCGM($_POST["inCodFornecedor"]); - $obREmpenhoEmpenho->obREmpenhoHistorico->setCodHistorico( $_POST['inCodHistorico'] ); - $obREmpenhoEmpenho->setDescricao( str_replace(chr(13),'',$_REQUEST['stDescricao']) ); - $obREmpenhoEmpenho->obREmpenhoTipoEmpenho->setCodTipo( $_POST['inCodTipo'] ); - $obREmpenhoEmpenho->setDtEmpenho( $_POST['stDtEmpenho'] ); - $obREmpenhoEmpenho->setDtVencimento( $_POST['stDtVencimento'] ); - $obREmpenhoEmpenho->setCodCategoria( $_REQUEST['inCodCategoria'] ); - $obREmpenhoEmpenho->obROrcamentoReservaSaldos->setVlReserva( $_POST['nuVlReserva'] ); - $obREmpenhoEmpenho->obROrcamentoDespesa->obROrcamentoUnidadeOrcamentaria->obROrcamentoOrgaoOrcamentario->setNumeroOrgao( $_POST['hdnOrgaoOrcamento']); - $obREmpenhoEmpenho->obROrcamentoDespesa->obROrcamentoUnidadeOrcamentaria->setNumeroUnidade($_POST['hdnUnidadeOrcamento']); + $obREmpenhoEmpenho->obRCGM->setNumCGM($request->get('inCodFornecedor')); + $obREmpenhoEmpenho->obREmpenhoHistorico->setCodHistorico( $request->get('inCodHistorico') ); + $obREmpenhoEmpenho->setDescricao( str_replace(chr(13),'',$request->get('stDescricao')) ); + $obREmpenhoEmpenho->obREmpenhoTipoEmpenho->setCodTipo( $request->get('inCodTipo') ); + $obREmpenhoEmpenho->setDtEmpenho( $request->get('stDtEmpenho') ); + $obREmpenhoEmpenho->setDtVencimento( $request->get('stDtVencimento') ); + $obREmpenhoEmpenho->setCodCategoria( $request->get('inCodCategoria') ); + $obREmpenhoEmpenho->obROrcamentoReservaSaldos->setVlReserva( $request->get('nuVlReserva') ); + $obREmpenhoEmpenho->obROrcamentoDespesa->obROrcamentoUnidadeOrcamentaria->obROrcamentoOrgaoOrcamentario->setNumeroOrgao( $request->get('hdnOrgaoOrcamento')); + $obREmpenhoEmpenho->obROrcamentoDespesa->obROrcamentoUnidadeOrcamentaria->setNumeroUnidade($request->get('hdnUnidadeOrcamento')); if ( Sessao::read('arItens') ) { $arItensSessao = array(); @@ -201,15 +206,15 @@ switch ($stAcao) { $obREmpenhoEmpenho->roUltimoItemPreEmpenho->obRUnidadeMedida->obRGrandeza->setCodGrandeza( $arItemPreEmpenho["cod_grandeza"] ); $obREmpenhoEmpenho->roUltimoItemPreEmpenho->obRUnidadeMedida->consultar($rsUnidade, $boTransacao); $obREmpenhoEmpenho->roUltimoItemPreEmpenho->setSiglaUnidade( $rsUnidade->getCampo('simbolo') ); - if($_REQUEST['stTipoItem']=='Catalogo'){ + if($request->get('stTipoItem')=='Catalogo'){ $obREmpenhoEmpenho->roUltimoItemPreEmpenho->setCodItemPreEmp ( $arItemPreEmpenho["cod_item" ] ); } } } - $nuVlSaldo = str_replace(".", "" , $_POST['flVlSaldo'] ); - $nuVlSaldo = str_replace(",", ".", $nuVlSaldo ); - $nuVlReserva = str_replace(".", "" , $_POST['nuVlReserva'] ); - $nuVlReserva = str_replace(",", ".", $nuVlReserva ); + $nuVlSaldo = str_replace(".", "" , $request->get('flVlSaldo') ); + $nuVlSaldo = str_replace(",", ".", $nuVlSaldo ); + $nuVlReserva = str_replace(".", "" , $request->get('nuVlReserva') ); + $nuVlReserva = str_replace(",", ".", $nuVlReserva ); $obErro = $obREmpenhoEmpenho->emitirEmpenhoDiverso( $boTransacao ); @@ -219,97 +224,110 @@ switch ($stAcao) { include_once CAM_GPC_TGO_MAPEAMENTO.'TTCMGOEmpenhoModalidade.class.php'; $obTEmpenhoModalidade = new TTCMGOEmpenhoModalidade(); - if ($_REQUEST['inModalidadeLicitacao'] == '10' || $_REQUEST['inModalidadeLicitacao'] == '11') { + if ($request->get('inModalidadeLicitacao') == '10' || $request->get('inModalidadeLicitacao') == '11') { - $obTEmpenhoModalidade->setDado( 'cod_entidade' , $_REQUEST['inCodEntidade']); + $obTEmpenhoModalidade->setDado( 'cod_entidade' , $request->get('inCodEntidade')); $obTEmpenhoModalidade->setDado( 'cod_empenho' , $obREmpenhoEmpenho->getCodEmpenho()); $obTEmpenhoModalidade->setDado( 'exercicio' , Sessao::getExercicio()); - $obTEmpenhoModalidade->setDado( 'cod_modalidade' , $_REQUEST['inModalidadeLicitacao']); - $obTEmpenhoModalidade->setDado( 'cod_fundamentacao' , $_REQUEST['inFundamentacaoLegal']); - $obTEmpenhoModalidade->setDado( 'justificativa' , $_REQUEST['stJustificativa']); - $obTEmpenhoModalidade->setDado( 'razao_escolha' , $_REQUEST['stRazao']); + $obTEmpenhoModalidade->setDado( 'cod_modalidade' , $request->get('inModalidadeLicitacao')); + $obTEmpenhoModalidade->setDado( 'cod_fundamentacao' , $request->get('inFundamentacaoLegal')); + $obTEmpenhoModalidade->setDado( 'justificativa' , $request->get('stJustificativa')); + $obTEmpenhoModalidade->setDado( 'razao_escolha' , $request->get('stRazao')); $obErro = $obTEmpenhoModalidade->inclusao($boTransacao); } else { - $obTEmpenhoModalidade->setDado( 'cod_entidade' , $_REQUEST['inCodEntidade']); + $obTEmpenhoModalidade->setDado( 'cod_entidade' , $request->get('inCodEntidade')); $obTEmpenhoModalidade->setDado( 'cod_empenho' , $obREmpenhoEmpenho->getCodEmpenho()); $obTEmpenhoModalidade->setDado( 'exercicio' , Sessao::getExercicio()); - $obTEmpenhoModalidade->setDado( 'cod_modalidade' , $_REQUEST['inModalidadeLicitacao']); + $obTEmpenhoModalidade->setDado( 'cod_modalidade' , $request->get('inModalidadeLicitacao')); $obErro = $obTEmpenhoModalidade->inclusao($boTransacao); } //Informações sobre a licitação - if ($_REQUEST['stProcessoLicitacao'] || $_REQUEST['stExercicioLicitacao'] || $_REQUEST['stProcessoAdministrativo']) { + if ($request->get('stProcessoLicitacao') || $request->get('stExercicioLicitacao') || $request->get('stProcessoAdministrativo')) { include_once CAM_GPC_TGO_MAPEAMENTO.'TTCMGOProcessos.class.php'; $obTTCMGOProcessos = new TTCMGOProcessos(); $obTTCMGOProcessos->setDado( 'cod_empenho', $obREmpenhoEmpenho->getCodEmpenho() ); $obTTCMGOProcessos->setDado( 'cod_entidade', $obREmpenhoEmpenho->obROrcamentoEntidade->getCodigoEntidade() ); $obTTCMGOProcessos->setDado( 'exercicio', $obREmpenhoEmpenho->getExercicio() ); - $obTTCMGOProcessos->setDado( 'numero_processo', $_REQUEST['stProcessoLicitacao'] ); - $obTTCMGOProcessos->setDado( 'exercicio_processo', $_REQUEST['stExercicioLicitacao'] ); - $obTTCMGOProcessos->setDado( 'processo_administrativo', $_REQUEST['stProcessoAdministrativo'] ); + $obTTCMGOProcessos->setDado( 'numero_processo', $request->get('stProcessoLicitacao') ); + $obTTCMGOProcessos->setDado( 'exercicio_processo', $request->get('stExercicioLicitacao') ); + $obTTCMGOProcessos->setDado( 'processo_administrativo', $request->get('stProcessoAdministrativo') ); $obErro = $obTTCMGOProcessos->inclusao($boTransacao); } } if ( !$obErro->ocorreu() ) { // Adiantamentos: Faz inclusao em empenho.contrapartida_empenho - if ($_REQUEST['inCodCategoria'] == 2 || $_REQUEST['inCodCategoria'] == 3) { - include_once( TEMP."TEmpenhoContrapartidaEmpenho.class.php" ); + if ($request->get('inCodCategoria') == 2 || $request->get('inCodCategoria') == 3) { + include_once TEMP."TEmpenhoContrapartidaEmpenho.class.php"; $obTEmpenhoContrapartidaEmpenho = new TEmpenhoContrapartidaEmpenho(); $obTEmpenhoContrapartidaEmpenho->setDado( 'cod_empenho' , $obREmpenhoEmpenho->getCodEmpenho() ); - $obTEmpenhoContrapartidaEmpenho->setDado( 'cod_entidade' , $_POST['inCodEntidade'] ); - $obTEmpenhoContrapartidaEmpenho->setDado( 'exercicio' , Sessao::getExercicio() ); - $obTEmpenhoContrapartidaEmpenho->setDado( 'conta_contrapartida' , $_POST['inCodContrapartida'] ); + $obTEmpenhoContrapartidaEmpenho->setDado( 'cod_entidade' , $request->get('inCodEntidade') ); + $obTEmpenhoContrapartidaEmpenho->setDado( 'exercicio' , Sessao::getExercicio() ); + $obTEmpenhoContrapartidaEmpenho->setDado( 'conta_contrapartida' , $request->get('inCodContrapartida') ); $obErro = $obTEmpenhoContrapartidaEmpenho->inclusao($boTransacao); } } if ( !$obErro->ocorreu() ) { // Empenho Complemetar: Faz inclusao em empenho.empenho_complementar - if ($_REQUEST['obHdnBoComplementar'] == 1) { - include_once( TEMP."TEmpenhoEmpenhoComplementar.class.php" ); + if ($request->get('obHdnBoComplementar') == 1) { + include_once TEMP."TEmpenhoEmpenhoComplementar.class.php"; $obTEmpenhoEmpenhoComplementar = new TEmpenhoEmpenhoComplementar(); $obTEmpenhoEmpenhoComplementar->setDado( 'cod_empenho' , $obREmpenhoEmpenho->getCodEmpenho() ); - $obTEmpenhoEmpenhoComplementar->setDado( 'cod_entidade' , $_POST['inCodEntidade'] ); - $obTEmpenhoEmpenhoComplementar->setDado( 'exercicio' , Sessao::getExercicio() ); - $obTEmpenhoEmpenhoComplementar->setDado( 'cod_empenho_original' , $_REQUEST['inCodigoEmpenho'] ); + $obTEmpenhoEmpenhoComplementar->setDado( 'cod_entidade' , $request->get('inCodEntidade') ); + $obTEmpenhoEmpenhoComplementar->setDado( 'exercicio' , Sessao::getExercicio() ); + $obTEmpenhoEmpenhoComplementar->setDado( 'cod_empenho_original' , $request->get('inCodigoEmpenho') ); $obErro = $obTEmpenhoEmpenhoComplementar->inclusao($boTransacao); } } if (SistemaLegado::pegaConfiguracao('cod_uf', 2, Sessao::getExercicio(), $boTransacao) == 20) { - if ( !$obErro->ocorreu() && $_REQUEST['obHdnBoComplementar'] != 1 ) { + if ( !$obErro->ocorreu() && $request->get('obHdnBoComplementar') != 1 ) { // Relaciona o empenho com o fundeb - include_once( CAM_GPC_TCERN_MAPEAMENTO."TTCERNFundebEmpenho.class.php" ); + include_once CAM_GPC_TCERN_MAPEAMENTO."TTCERNFundebEmpenho.class.php"; $obTTCERNFundebEmpenho = new TTCERNFundebEmpenho(); $obTTCERNFundebEmpenho->setDado( 'cod_empenho' , $obREmpenhoEmpenho->getCodEmpenho() ); - $obTTCERNFundebEmpenho->setDado( 'cod_entidade' , $_POST['inCodEntidade'] ); - $obTTCERNFundebEmpenho->setDado( 'exercicio' , Sessao::getExercicio() ); - $obTTCERNFundebEmpenho->setDado( 'cod_fundeb' , $_REQUEST['inCodFundeb'] ); + $obTTCERNFundebEmpenho->setDado( 'cod_entidade' , $request->get('inCodEntidade') ); + $obTTCERNFundebEmpenho->setDado( 'exercicio' , Sessao::getExercicio() ); + $obTTCERNFundebEmpenho->setDado( 'cod_fundeb' , $request->get('inCodFundeb') ); $obErro = $obTTCERNFundebEmpenho->inclusao($boTransacao); // Relaciona o empenho com o royalties - include_once( CAM_GPC_TCERN_MAPEAMENTO."TTCERNRoyaltiesEmpenho.class.php" ); + include_once CAM_GPC_TCERN_MAPEAMENTO."TTCERNRoyaltiesEmpenho.class.php"; $obTTCERNRoyaltiesEmpenho = new TTCERNRoyaltiesEmpenho(); $obTTCERNRoyaltiesEmpenho->setDado( 'cod_empenho' , $obREmpenhoEmpenho->getCodEmpenho() ); - $obTTCERNRoyaltiesEmpenho->setDado( 'cod_entidade' , $_POST['inCodEntidade'] ); - $obTTCERNRoyaltiesEmpenho->setDado( 'exercicio' , Sessao::getExercicio() ); - $obTTCERNRoyaltiesEmpenho->setDado( 'cod_royalties' , $_REQUEST['inCodRoyalties'] ); + $obTTCERNRoyaltiesEmpenho->setDado( 'cod_entidade' , $request->get('inCodEntidade') ); + $obTTCERNRoyaltiesEmpenho->setDado( 'exercicio' , Sessao::getExercicio() ); + $obTTCERNRoyaltiesEmpenho->setDado( 'cod_royalties' , $request->get('inCodRoyalties') ); $obErro = $obTTCERNRoyaltiesEmpenho->inclusao($boTransacao); } } if ( !$obErro->ocorreu() ) { - /* Salvar assinaturas configuráveis se houverem */ + // Relaciona o empenho a contrato + if($request->get('inNumContrato')){ + include_once CAM_GF_EMP_MAPEAMENTO.'TEmpenhoEmpenhoContrato.class.php'; + $obTEmpenhoEmpenhoContrato = new TEmpenhoEmpenhoContrato(); + $obTEmpenhoEmpenhoContrato->setDado( "exercicio" , Sessao::getExercicio()); + $obTEmpenhoEmpenhoContrato->setDado( "cod_entidade" , $request->get('inCodEntidade')); + $obTEmpenhoEmpenhoContrato->setDado( "cod_empenho" , $obREmpenhoEmpenho->getCodEmpenho()); + $obTEmpenhoEmpenhoContrato->setDado( "num_contrato" , $request->get('inNumContrato')); + $obErro = $obTEmpenhoEmpenhoContrato->inclusao($boTransacao); + } + } + + if ( !$obErro->ocorreu() ) { + /* Salvar assinaturas configuráveis se houverem */ $arAssinaturas = Sessao::read('assinaturas'); if ( isset($arAssinaturas) && count($arAssinaturas['selecionadas']) > 0 ) { - include_once ( CAM_GF_EMP_MAPEAMENTO."TEmpenhoEmpenhoAssinatura.class.php" ); + include_once CAM_GF_EMP_MAPEAMENTO."TEmpenhoEmpenhoAssinatura.class.php"; $arAssinatura = $arAssinaturas['selecionadas']; $obTEmpenhoEmpenhoAssinatura = new TEmpenhoEmpenhoAssinatura; $obTEmpenhoEmpenhoAssinatura->setDado( 'exercicio', Sessao::getExercicio() ); - $obTEmpenhoEmpenhoAssinatura->setDado( 'cod_entidade', $_POST['inCodEntidade'] ); + $obTEmpenhoEmpenhoAssinatura->setDado( 'cod_entidade', $request->get('inCodEntidade') ); $obTEmpenhoEmpenhoAssinatura->setDado( 'cod_empenho', $obREmpenhoEmpenho->getCodEmpenho() ); $arPapel = $obTEmpenhoEmpenhoAssinatura->arrayPapel(); @@ -362,17 +380,17 @@ switch ($stAcao) { if ( !$obErro->ocorreu() ) { SistemaLegado::LiberaFrames(true,false); - if ($_REQUEST['boEmitirLiquidacao'] == "S") { + if ($request->get('boEmitirLiquidacao') == "S") { $pgProx = CAM_GF_EMP_INSTANCIAS."liquidacao/FMManterLiquidacao.php"; $stFiltroLiquidacao = "&inCodEmpenho=".$obREmpenhoEmpenho->getCodEmpenho(); $stFiltroLiquidacao .= "&inCodPreEmpenho=".$obREmpenhoEmpenho->getCodPreEmpenho(); - $stFiltroLiquidacao .= "&inCodEntidade=".$_POST['inCodEntidade']; + $stFiltroLiquidacao .= "&inCodEntidade=".$request->get('inCodEntidade'); $stFiltroLiquidacao .= "&dtExercicioEmpenho=".Sessao::getExercicio(); $stFiltroLiquidacao .= "&stEmitirEmpenho=S"; $stFiltroLiquidacao .= "&stAcaoEmpenho=".$stAcao; $stFiltroLiquidacao .= "&pgProxEmpenho=".$pgFormDiverso; $stFiltroLiquidacao .= "&acao=812&modulo=10&funcionalidade=202&nivel=1&cod_gestao_pass=2&stNomeGestao=Financeira&modulos=Empenho"; - if ($_REQUEST['obHdnBoComplementar'] == 1) { + if ($request->get('obHdnBoComplementar') == 1) { $stFiltroLiquidacao .= "&acaoEmpenho=1856&moduloEmpenho=10&funcionalidadeEmpenho=82"; } else { $stFiltroLiquidacao .= "&acaoEmpenho=822&moduloEmpenho=10&funcionalidadeEmpenho=82"; @@ -386,13 +404,13 @@ switch ($stAcao) { SistemaLegado::alertaAviso($pgFormDiverso.'?'.Sessao::getId().$stFiltro, $obREmpenhoEmpenho->getCodEmpenho()."/".Sessao::getExercicio(), "incluir", "aviso", Sessao::getId(), "../"); } - if ($_REQUEST['obHdnBoComplementar'] == 1) { + if ($request->get('obHdnBoComplementar') == 1) { Sessao::write('acao', 1856); } else { Sessao::write('acao', 822); } $stCaminho = CAM_GF_EMP_INSTANCIAS."empenho/OCRelatorioEmpenhoOrcamentario.php"; - $stCampos = "?".Sessao::getId()."&stAcao=imprimir&stCaminho=".$stCaminho."&inCodEmpenho=".$obREmpenhoEmpenho->getCodEmpenho(). "&inCodEntidade=" .$_POST['inCodEntidade']."&acao=822"; + $stCampos = "?".Sessao::getId()."&stAcao=imprimir&stCaminho=".$stCaminho."&inCodEmpenho=".$obREmpenhoEmpenho->getCodEmpenho(). "&inCodEntidade=".$request->get('inCodEntidade')."&acao=822"; SistemaLegado::executaFrameOculto( "var x = window.open('".CAM_FW_POPUPS."relatorio/OCRelatorio.php".$stCampos."','oculto');" ); } else { $stMensagem = $obErro->getDescricao(); @@ -406,4 +424,4 @@ switch ($stAcao) { break; } -?> +?> \ No newline at end of file diff --git a/gestaoFinanceira/fontes/PHP/empenho/instancias/empenho/PRManterVinculoEmpenhoContrato.php b/gestaoFinanceira/fontes/PHP/empenho/instancias/empenho/PRManterVinculoEmpenhoContrato.php index fedcce0..0b1d18a 100644 --- a/gestaoFinanceira/fontes/PHP/empenho/instancias/empenho/PRManterVinculoEmpenhoContrato.php +++ b/gestaoFinanceira/fontes/PHP/empenho/instancias/empenho/PRManterVinculoEmpenhoContrato.php @@ -31,7 +31,7 @@ * Casos de uso: uc-02.03.37 - $Id: PRManterVinculoEmpenhoContrato.php 59612 2014-09-02 12:00:51Z gelson $ + $Id: PRManterVinculoEmpenhoContrato.php 64087 2015-12-01 16:10:15Z jean $ */ @@ -105,7 +105,7 @@ switch ($stAcao) { $obErro->setDescricao( "Efetue a inclusão e/ou exclusão de empenho referente ao contrato relacionado!" ); } if (!$obErro->ocorreu()) { - sistemaLegado::alertaAviso($pgFilt,"Contrato: ".Sessao::read('inNumContrato'),"incluir","aviso", Sessao::getId(), "../"); + sistemaLegado::alertaAviso($pgFilt,"Contrato: ".Sessao::read('inNumeroContrato'),"incluir","aviso", Sessao::getId(), "../"); } else { sistemaLegado::exibeAviso(urlencode($obErro->getDescricao()),"n_incluir","erro"); } diff --git a/gestaoFinanceira/fontes/PHP/empenho/instancias/liquidacao/FMAnularLiquidacao.php b/gestaoFinanceira/fontes/PHP/empenho/instancias/liquidacao/FMAnularLiquidacao.php index 146aef4..3c24b1f 100755 --- a/gestaoFinanceira/fontes/PHP/empenho/instancias/liquidacao/FMAnularLiquidacao.php +++ b/gestaoFinanceira/fontes/PHP/empenho/instancias/liquidacao/FMAnularLiquidacao.php @@ -528,7 +528,7 @@ $obFormulario->addComponente( $obLblHistorico ); $obMontaAtributos->geraFormulario ( $obFormulario ); -if ( strlen($obREmpenhoNotaLiquidacao->obRContabilidadePlanoContaAnaliticaDebito->getCodPlano()) > 0 && SistemaLegado::is_tcems()) { +if ( strlen($obREmpenhoNotaLiquidacao->obRContabilidadePlanoContaAnaliticaDebito->getCodPlano()) > 0 && Sessao::getExercicio() > '2012') { $obFormulario->addTitulo( "Dados dos lançamentos contábeis" ); $obFormulario->addTitulo( "Incorporação Patrimonial/Amortização" ); $obFormulario->addComponente( $obILabelContaAnaliticaDeb ); diff --git a/gestaoFinanceira/fontes/PHP/empenho/instancias/liquidacao/FMManterLiquidacao.php b/gestaoFinanceira/fontes/PHP/empenho/instancias/liquidacao/FMManterLiquidacao.php index c33340d..47ace4b 100755 --- a/gestaoFinanceira/fontes/PHP/empenho/instancias/liquidacao/FMManterLiquidacao.php +++ b/gestaoFinanceira/fontes/PHP/empenho/instancias/liquidacao/FMManterLiquidacao.php @@ -32,7 +32,7 @@ * @ignore - $Id: FMManterLiquidacao.php 63351 2015-08-20 13:42:42Z evandro $ + $Id: FMManterLiquidacao.php 64153 2015-12-09 19:16:02Z evandro $ $Revision: 32093 $ $Name: $ @@ -135,7 +135,7 @@ $arItemPreEmpenho = $obREmpenhoEmpenhoAutorizacao->obREmpenhoEmpenho->getItemPre $stConfiguracaoUf = SistemaLegado::pegaConfiguracao('cod_uf', 2, Sessao::getExercicio()); $stCodClassIncorporacao = substr(str_replace(".", "", $stCodClassificacao), 0, 6); // XXXXXX -if (!SistemaLegado::is_tcems()) { +if (!Sessao::getExercicio() > '2012') { $arIncorpPatrimonial = array("449051", "449052", "449061", "449092", "459061", "459161"); $arAmortizacao = array("4690"); } else { diff --git a/gestaoFinanceira/fontes/PHP/empenho/instancias/liquidacao/PRManterLiquidacao.php b/gestaoFinanceira/fontes/PHP/empenho/instancias/liquidacao/PRManterLiquidacao.php index 2d178b6..6f846b9 100755 --- a/gestaoFinanceira/fontes/PHP/empenho/instancias/liquidacao/PRManterLiquidacao.php +++ b/gestaoFinanceira/fontes/PHP/empenho/instancias/liquidacao/PRManterLiquidacao.php @@ -32,7 +32,7 @@ * @ignore - $Id: PRManterLiquidacao.php 63657 2015-09-24 21:19:41Z michel $ + $Id: PRManterLiquidacao.php 63864 2015-10-27 13:26:11Z michel $ $Revision: 32142 $ $Name$ @@ -549,93 +549,114 @@ switch ($stAcao) { if ($_REQUEST['inCodTipoDocumento'] != "") { include_once CAM_GPC_TCEAM_MAPEAMENTO.'TTCEAMDocumento.class.php'; $obTTCEAMDocumento = new TTCEAMDocumento; - $obTTCEAMDocumento->proximoCod($inCodDocumento); - $obTTCEAMDocumento->setDado('cod_documento' , $inCodDocumento); - $obTTCEAMDocumento->setDado('cod_tipo' , $_REQUEST['inCodTipoDocumento']); - $obTTCEAMDocumento->setDado('exercicio' , Sessao::getExercicio()); - $obTTCEAMDocumento->setDado('cod_entidade' , $_REQUEST['inCodEntidade']); - $obTTCEAMDocumento->setDado('cod_nota' , $obREmpenhoNotaLiquidacao->getCodNota()); - $obTTCEAMDocumento->setDado('vl_comprometido', $_REQUEST['nuValorComprometido']); - $obTTCEAMDocumento->setDado('vl_total' , $_REQUEST['nuValorTotal']); - $obErro = $obTTCEAMDocumento->inclusao( $boTransacao ); + $obErro = $obTTCEAMDocumento->proximoCod($inCodDocumento, $boTransacao); + + if (!$obErro->ocorreu()) { + $obTTCEAMDocumento->setDado('cod_documento' , $inCodDocumento); + $obTTCEAMDocumento->setDado('cod_tipo' , $_REQUEST['inCodTipoDocumento']); + $obTTCEAMDocumento->setDado('exercicio' , Sessao::getExercicio()); + $obTTCEAMDocumento->setDado('cod_entidade' , $_REQUEST['inCodEntidade']); + $obTTCEAMDocumento->setDado('cod_nota' , $obREmpenhoNotaLiquidacao->getCodNota()); + $obTTCEAMDocumento->setDado('vl_comprometido', $_REQUEST['nuValorComprometido']); + $obTTCEAMDocumento->setDado('vl_total' , $_REQUEST['nuValorTotal']); + $obErro = $obTTCEAMDocumento->inclusao( $boTransacao ); + } if ( $_REQUEST['inCodTipoDocumento'] == 1 && !$obErro->ocorreu() ) { include_once CAM_GPC_TCEAM_MAPEAMENTO.'TTCEAMTipoDocumentoBilhete.class.php'; $obTTCEAMTipoDocumentoBilhete = new TTCEAMTipoDocumentoBilhete; - $obTTCEAMTipoDocumentoBilhete->proximoCod($inCodTipoDocumentoBilhete); - $obTTCEAMTipoDocumentoBilhete->setDado('cod_tipo_documento_bilhete', $inCodTipoDocumentoBilhete); - $obTTCEAMTipoDocumentoBilhete->setDado('cod_documento' , $inCodDocumento); - $obTTCEAMTipoDocumentoBilhete->setDado('numero' , $_REQUEST['stNumero']); - $obTTCEAMTipoDocumentoBilhete->setDado('dt_emissao' , $_REQUEST['dtEmissao']); - $obTTCEAMTipoDocumentoBilhete->setDado('dt_saida' , $_REQUEST['dtSaida']); - $obTTCEAMTipoDocumentoBilhete->setDado('hora_saida' , $_REQUEST['hrSaida']); - $obTTCEAMTipoDocumentoBilhete->setDado('destino' , $_REQUEST['stDestino']); - $obTTCEAMTipoDocumentoBilhete->setDado('dt_chegada' , $_REQUEST['dtChegada']); - $obTTCEAMTipoDocumentoBilhete->setDado('hora_chegada' , $_REQUEST['hrChegada']); - $obTTCEAMTipoDocumentoBilhete->setDado('motivo' , $_REQUEST['stMotivo']); - $obErro = $obTTCEAMTipoDocumentoBilhete->inclusao( $boTransacao ); + $obErro = $obTTCEAMTipoDocumentoBilhete->proximoCod($inCodTipoDocumentoBilhete, $boTransacao); + + if (!$obErro->ocorreu()) { + $obTTCEAMTipoDocumentoBilhete->setDado('cod_tipo_documento_bilhete', $inCodTipoDocumentoBilhete); + $obTTCEAMTipoDocumentoBilhete->setDado('cod_documento' , $inCodDocumento); + $obTTCEAMTipoDocumentoBilhete->setDado('numero' , $_REQUEST['stNumero']); + $obTTCEAMTipoDocumentoBilhete->setDado('dt_emissao' , $_REQUEST['dtEmissao']); + $obTTCEAMTipoDocumentoBilhete->setDado('dt_saida' , $_REQUEST['dtSaida']); + $obTTCEAMTipoDocumentoBilhete->setDado('hora_saida' , $_REQUEST['hrSaida']); + $obTTCEAMTipoDocumentoBilhete->setDado('destino' , $_REQUEST['stDestino']); + $obTTCEAMTipoDocumentoBilhete->setDado('dt_chegada' , $_REQUEST['dtChegada']); + $obTTCEAMTipoDocumentoBilhete->setDado('hora_chegada' , $_REQUEST['hrChegada']); + $obTTCEAMTipoDocumentoBilhete->setDado('motivo' , $_REQUEST['stMotivo']); + $obErro = $obTTCEAMTipoDocumentoBilhete->inclusao( $boTransacao ); + } } elseif ( $_REQUEST['inCodTipoDocumento'] == 2 && !$obErro->ocorreu() ) { include_once CAM_GPC_TCEAM_MAPEAMENTO.'TTCEAMTipoDocumentoDiaria.class.php'; $obTTCEAMTipoDocumentoDiaria = new TTCEAMTipoDocumentoDiaria; - $obTTCEAMTipoDocumentoDiaria->proximoCod($inCodTipoDocumentoDiaria); - $obTTCEAMTipoDocumentoDiaria->setDado('cod_tipo_documento_diaria', $inCodTipoDocumentoDiaria); - $obTTCEAMTipoDocumentoDiaria->setDado('cod_documento' , $inCodDocumento); - $obTTCEAMTipoDocumentoDiaria->setDado('funcionario' , $_REQUEST['stFuncionario']); - $obTTCEAMTipoDocumentoDiaria->setDado('matricula' , $_REQUEST['stMatricula']); - $obTTCEAMTipoDocumentoDiaria->setDado('dt_saida' , $_REQUEST['dtSaida']); - $obTTCEAMTipoDocumentoDiaria->setDado('hora_saida' , $_REQUEST['hrSaida']); - $obTTCEAMTipoDocumentoDiaria->setDado('destino' , $_REQUEST['stDestino']); - $obTTCEAMTipoDocumentoDiaria->setDado('dt_retorno' , $_REQUEST['dtRetorno']); - $obTTCEAMTipoDocumentoDiaria->setDado('hora_retorno' , $_REQUEST['hrRetorno']); - $obTTCEAMTipoDocumentoDiaria->setDado('motivo' , $_REQUEST['stMotivo']); - $obErro = $obTTCEAMTipoDocumentoDiaria->inclusao( $boTransacao ); + $obErro = $obTTCEAMTipoDocumentoDiaria->proximoCod($inCodTipoDocumentoDiaria, $boTransacao); + + if (!$obErro->ocorreu()) { + $obTTCEAMTipoDocumentoDiaria->setDado('cod_tipo_documento_diaria', $inCodTipoDocumentoDiaria); + $obTTCEAMTipoDocumentoDiaria->setDado('cod_documento' , $inCodDocumento); + $obTTCEAMTipoDocumentoDiaria->setDado('funcionario' , $_REQUEST['stFuncionario']); + $obTTCEAMTipoDocumentoDiaria->setDado('matricula' , $_REQUEST['stMatricula']); + $obTTCEAMTipoDocumentoDiaria->setDado('dt_saida' , $_REQUEST['dtSaida']); + $obTTCEAMTipoDocumentoDiaria->setDado('hora_saida' , $_REQUEST['hrSaida']); + $obTTCEAMTipoDocumentoDiaria->setDado('destino' , $_REQUEST['stDestino']); + $obTTCEAMTipoDocumentoDiaria->setDado('dt_retorno' , $_REQUEST['dtRetorno']); + $obTTCEAMTipoDocumentoDiaria->setDado('hora_retorno' , $_REQUEST['hrRetorno']); + $obTTCEAMTipoDocumentoDiaria->setDado('motivo' , $_REQUEST['stMotivo']); + $obErro = $obTTCEAMTipoDocumentoDiaria->inclusao( $boTransacao ); + } } elseif ( $_REQUEST['inCodTipoDocumento'] == 3 && !$obErro->ocorreu() ) { include_once CAM_GPC_TCEAM_MAPEAMENTO.'TTCEAMTipoDocumentoDiverso.class.php'; $obTTCEAMTipoDocumentoDiverso = new TTCEAMTipoDocumentoDiverso; - $obTTCEAMTipoDocumentoDiverso->proximoCod($inCodTipoDocumentoDiverso); - $obTTCEAMTipoDocumentoDiverso->setDado('cod_tipo_documento_diverso', $inCodTipoDocumentoDiverso); - $obTTCEAMTipoDocumentoDiverso->setDado('cod_documento' , $inCodDocumento); - $obTTCEAMTipoDocumentoDiverso->setDado('numero' , $_REQUEST['stNumero']); - $obTTCEAMTipoDocumentoDiverso->setDado('data' , $_REQUEST['dtDiverso']); - $obTTCEAMTipoDocumentoDiverso->setDado('descricao' , $_REQUEST['stDescricao']); - $obTTCEAMTipoDocumentoDiverso->setDado('nome_documento' , $_REQUEST['stNomeDocumento']); - $obErro = $obTTCEAMTipoDocumentoDiverso->inclusao( $boTransacao ); + $obErro = $obTTCEAMTipoDocumentoDiverso->proximoCod($inCodTipoDocumentoDiverso, $boTransacao); + + if (!$obErro->ocorreu()) { + $obTTCEAMTipoDocumentoDiverso->setDado('cod_tipo_documento_diverso', $inCodTipoDocumentoDiverso); + $obTTCEAMTipoDocumentoDiverso->setDado('cod_documento' , $inCodDocumento); + $obTTCEAMTipoDocumentoDiverso->setDado('numero' , $_REQUEST['stNumero']); + $obTTCEAMTipoDocumentoDiverso->setDado('data' , $_REQUEST['dtDiverso']); + $obTTCEAMTipoDocumentoDiverso->setDado('descricao' , $_REQUEST['stDescricao']); + $obTTCEAMTipoDocumentoDiverso->setDado('nome_documento' , $_REQUEST['stNomeDocumento']); + $obErro = $obTTCEAMTipoDocumentoDiverso->inclusao( $boTransacao ); + } } elseif ( $_REQUEST['inCodTipoDocumento'] == 4 && !$obErro->ocorreu() ) { include_once CAM_GPC_TCEAM_MAPEAMENTO.'TTCEAMTipoDocumentoFolha.class.php'; $obTTCEAMTipoDocumentoFolha = new TTCEAMTipoDocumentoFolha; - $obTTCEAMTipoDocumentoFolha->proximoCod($inCodTipoDocumentoFolha); - $obTTCEAMTipoDocumentoFolha->setDado('cod_tipo_documento_folha', $inCodTipoDocumentoFolha); - $obTTCEAMTipoDocumentoFolha->setDado('cod_documento' , $inCodDocumento); - $obTTCEAMTipoDocumentoFolha->setDado('mes' , $_REQUEST['inMes']); - $obTTCEAMTipoDocumentoFolha->setDado('exercicio' , $_REQUEST['stExercicio']); - $obErro = $obTTCEAMTipoDocumentoFolha->inclusao( $boTransacao ); + $obErro = $obTTCEAMTipoDocumentoFolha->proximoCod($inCodTipoDocumentoFolha, $boTransacao); + + if (!$obErro->ocorreu()) { + $obTTCEAMTipoDocumentoFolha->setDado('cod_tipo_documento_folha', $inCodTipoDocumentoFolha); + $obTTCEAMTipoDocumentoFolha->setDado('cod_documento' , $inCodDocumento); + $obTTCEAMTipoDocumentoFolha->setDado('mes' , $_REQUEST['inMes']); + $obTTCEAMTipoDocumentoFolha->setDado('exercicio' , $_REQUEST['stExercicio']); + $obErro = $obTTCEAMTipoDocumentoFolha->inclusao( $boTransacao ); + } } elseif ( $_REQUEST['inCodTipoDocumento'] == 5 && !$obErro->ocorreu() ) { include_once CAM_GPC_TCEAM_MAPEAMENTO.'TTCEAMTipoDocumentoNota.class.php'; $obTTCEAMTipoDocumentoNota = new TTCEAMTipoDocumentoNota; - $obTTCEAMTipoDocumentoNota->proximoCod($inCodTipoDocumentoNota); - $obTTCEAMTipoDocumentoNota->setDado('cod_tipo_documento_nota', $inCodTipoDocumentoNota); - $obTTCEAMTipoDocumentoNota->setDado('cod_documento' , $inCodDocumento); - $obTTCEAMTipoDocumentoNota->setDado('numero_nota_fiscal' , $_REQUEST['stNumeroNotaFiscal']); - $obTTCEAMTipoDocumentoNota->setDado('numero_serie' , $_REQUEST['stNumeroSerie']); - $obTTCEAMTipoDocumentoNota->setDado('numero_subserie' , $_REQUEST['stNumeroSubserie']); - $obTTCEAMTipoDocumentoNota->setDado('data' , $_REQUEST['dtNota']); - $obErro = $obTTCEAMTipoDocumentoNota->inclusao( $boTransacao ); + $obErro = $obTTCEAMTipoDocumentoNota->proximoCod($inCodTipoDocumentoNota, $boTransacao); + + if (!$obErro->ocorreu()) { + $obTTCEAMTipoDocumentoNota->setDado('cod_tipo_documento_nota', $inCodTipoDocumentoNota); + $obTTCEAMTipoDocumentoNota->setDado('cod_documento' , $inCodDocumento); + $obTTCEAMTipoDocumentoNota->setDado('numero_nota_fiscal' , $_REQUEST['stNumeroNotaFiscal']); + $obTTCEAMTipoDocumentoNota->setDado('numero_serie' , $_REQUEST['stNumeroSerie']); + $obTTCEAMTipoDocumentoNota->setDado('numero_subserie' , $_REQUEST['stNumeroSubserie']); + $obTTCEAMTipoDocumentoNota->setDado('data' , $_REQUEST['dtNota']); + $obErro = $obTTCEAMTipoDocumentoNota->inclusao( $boTransacao ); + } } elseif ( $_REQUEST['inCodTipoDocumento'] == 6 && !$obErro->ocorreu() ) { include_once CAM_GPC_TCEAM_MAPEAMENTO.'TTCEAMTipoDocumentoRecibo.class.php'; $obTTCEAMTipoDocumentoRecibo = new TTCEAMTipoDocumentoRecibo; - $obTTCEAMTipoDocumentoRecibo->proximoCod($inCodTipoDocumentoRecibo); - $obTTCEAMTipoDocumentoRecibo->setDado('cod_tipo_documento_recibo', $inCodTipoDocumentoRecibo); - $obTTCEAMTipoDocumentoRecibo->setDado('cod_documento' , $inCodDocumento); - $obTTCEAMTipoDocumentoRecibo->setDado('cod_tipo_recibo' , $_REQUEST['inCodTipoRecibo']); - $obTTCEAMTipoDocumentoRecibo->setDado('numero' , $_REQUEST['stNumero']); - $obTTCEAMTipoDocumentoRecibo->setDado('valor' , $_REQUEST['nuValor']); - $obTTCEAMTipoDocumentoRecibo->setDado('data' , $_REQUEST['dtRecibo']); - $obErro = $obTTCEAMTipoDocumentoRecibo->inclusao( $boTransacao ); + $obErro = $obTTCEAMTipoDocumentoRecibo->proximoCod($inCodTipoDocumentoRecibo, $boTransacao); + + if (!$obErro->ocorreu()) { + $obTTCEAMTipoDocumentoRecibo->setDado('cod_tipo_documento_recibo', $inCodTipoDocumentoRecibo); + $obTTCEAMTipoDocumentoRecibo->setDado('cod_documento' , $inCodDocumento); + $obTTCEAMTipoDocumentoRecibo->setDado('cod_tipo_recibo' , $_REQUEST['inCodTipoRecibo']); + $obTTCEAMTipoDocumentoRecibo->setDado('numero' , $_REQUEST['stNumero']); + $obTTCEAMTipoDocumentoRecibo->setDado('valor' , $_REQUEST['nuValor']); + $obTTCEAMTipoDocumentoRecibo->setDado('data' , $_REQUEST['dtRecibo']); + $obErro = $obTTCEAMTipoDocumentoRecibo->inclusao( $boTransacao ); + } } } @@ -675,61 +696,63 @@ switch ($stAcao) { include_once CAM_GPC_TCEMG_MAPEAMENTO."TTCEMGNotaFiscalEmpenhoLiquidacao.class.php"; $obTTCEMGNotaFiscal = new TTCEMGNotaFiscal; - $obTTCEMGNotaFiscal->setDado( 'exercicio' , $_REQUEST['stExercicioNF'] ); - $obTTCEMGNotaFiscal->proximoCod($inCodNota); - - $obTTCEMGNotaFiscal->setDado( 'cod_nota' , $inCodNota ); - $obTTCEMGNotaFiscal->setDado( 'cod_entidade' , $_REQUEST['inCodEntidade'] ); - $obTTCEMGNotaFiscal->setDado( 'data_emissao' , $_REQUEST['dtEmissaoNF'] ); - $obTTCEMGNotaFiscal->setDado( 'cod_tipo' , $_REQUEST['inCodTipoNota'] ); - if ($_REQUEST['inNumeroNF'] != '') { - $obTTCEMGNotaFiscal->setDado('nro_nota' , $_REQUEST['inNumeroNF'] ); - } - if ($_REQUEST['inNumSerie'] != '') { - $obTTCEMGNotaFiscal->setDado('nro_serie' , $_REQUEST['inNumSerie'] ); - } - if ($_REQUEST['stAIFD'] != '') { - $obTTCEMGNotaFiscal->setDado('aidf' , $_REQUEST['stAIFD'] ); - } - if ($_REQUEST['inNumInscricaoMunicipal'] != '') { - $obTTCEMGNotaFiscal->setDado('inscricao_municipal' , $_REQUEST['inNumInscricaoMunicipal'] ); - } - if ($_REQUEST['inNumInscricaoEstadual'] != '') { - $obTTCEMGNotaFiscal->setDado('inscricao_estadual' , $_REQUEST['inNumInscricaoEstadual'] ); - } - if ($_REQUEST['inChave']) { - $obTTCEMGNotaFiscal->setDado ( 'chave_acesso' , $_REQUEST['inChave'] ); - } - if ($_REQUEST['inChaveMunicipal']) { - $obTTCEMGNotaFiscal->setDado ( 'chave_acesso_municipal' , $_REQUEST['inChaveMunicipal'] ); - } + $obTTCEMGNotaFiscal->setDado( 'exercicio' , $_REQUEST['stExercicioNF'] ); + $obErro = $obTTCEMGNotaFiscal->proximoCod($inCodNota, $boTransacao); - $nuVlTotalDoctoFiscal = str_replace('.', '' , $_REQUEST['nuTotalNf']); - $nuVlTotalDoctoFiscal = str_replace(',', '.', $nuVlTotalDoctoFiscal); + if (!$obErro->ocorreu()) { + $obTTCEMGNotaFiscal->setDado( 'cod_nota' , $inCodNota ); + $obTTCEMGNotaFiscal->setDado( 'cod_entidade' , $_REQUEST['inCodEntidade'] ); + $obTTCEMGNotaFiscal->setDado( 'data_emissao' , $_REQUEST['dtEmissaoNF'] ); + $obTTCEMGNotaFiscal->setDado( 'cod_tipo' , $_REQUEST['inCodTipoNota'] ); + if ($_REQUEST['inNumeroNF'] != '') { + $obTTCEMGNotaFiscal->setDado('nro_nota' , $_REQUEST['inNumeroNF'] ); + } + if ($_REQUEST['inNumSerie'] != '') { + $obTTCEMGNotaFiscal->setDado('nro_serie' , $_REQUEST['inNumSerie'] ); + } + if ($_REQUEST['stAIFD'] != '') { + $obTTCEMGNotaFiscal->setDado('aidf' , $_REQUEST['stAIFD'] ); + } + if ($_REQUEST['inNumInscricaoMunicipal'] != '') { + $obTTCEMGNotaFiscal->setDado('inscricao_municipal' , $_REQUEST['inNumInscricaoMunicipal'] ); + } + if ($_REQUEST['inNumInscricaoEstadual'] != '') { + $obTTCEMGNotaFiscal->setDado('inscricao_estadual' , $_REQUEST['inNumInscricaoEstadual'] ); + } + if ($_REQUEST['inChave']) { + $obTTCEMGNotaFiscal->setDado ( 'chave_acesso' , $_REQUEST['inChave'] ); + } + if ($_REQUEST['inChaveMunicipal']) { + $obTTCEMGNotaFiscal->setDado ( 'chave_acesso_municipal' , $_REQUEST['inChaveMunicipal'] ); + } + + $nuVlTotalDoctoFiscal = str_replace('.', '' , $_REQUEST['nuTotalNf']); + $nuVlTotalDoctoFiscal = str_replace(',', '.', $nuVlTotalDoctoFiscal); - $nuVlDescontoDoctoFiscal = str_replace('.', '' , $_REQUEST['nuVlDesconto']); - $nuVlDescontoDoctoFiscal = str_replace(',', '.', $nuVlDescontoDoctoFiscal); + $nuVlDescontoDoctoFiscal = str_replace('.', '' , $_REQUEST['nuVlDesconto']); + $nuVlDescontoDoctoFiscal = str_replace(',', '.', $nuVlDescontoDoctoFiscal); - $obTTCEMGNotaFiscal->setDado( 'vl_total' , (float)$nuVlTotalDoctoFiscal); - $obTTCEMGNotaFiscal->setDado( 'vl_desconto' , (float)$nuVlDescontoDoctoFiscal); - $obTTCEMGNotaFiscal->setDado( 'vl_total_liquido', (float)$nuVlTotalDoctoFiscal - (float)$nuVlDescontoDoctoFiscal ); + $obTTCEMGNotaFiscal->setDado( 'vl_total' , (float)$nuVlTotalDoctoFiscal); + $obTTCEMGNotaFiscal->setDado( 'vl_desconto' , (float)$nuVlDescontoDoctoFiscal); + $obTTCEMGNotaFiscal->setDado( 'vl_total_liquido', (float)$nuVlTotalDoctoFiscal - (float)$nuVlDescontoDoctoFiscal ); - $obErro = $obTTCEMGNotaFiscal->inclusao( $boTransacao ); + $obErro = $obTTCEMGNotaFiscal->inclusao( $boTransacao ); - if (!$obErro->ocorreu()) { - $obTTCEMGNotaFiscalEmpenho = new TTCEMGNotaFiscalEmpenhoLiquidacao; - - $obTTCEMGNotaFiscalEmpenho->setDado( 'cod_nota' , $inCodNota ); - $obTTCEMGNotaFiscalEmpenho->setDado( 'exercicio' , $_REQUEST['stExercicioNF'] ); - $obTTCEMGNotaFiscalEmpenho->setDado( 'cod_entidade' , $_REQUEST['inCodEntidade'] ); - $obTTCEMGNotaFiscalEmpenho->setDado( 'cod_empenho' , $_REQUEST['inCodEmpenho'] ); - $obTTCEMGNotaFiscalEmpenho->setDado( 'exercicio_empenho' , $_REQUEST['dtExercicioEmpenho'] ); - $obTTCEMGNotaFiscalEmpenho->setDado( 'cod_nota_liquidacao' , $obREmpenhoNotaLiquidacao->getCodNota() ); - $obTTCEMGNotaFiscalEmpenho->setDado( 'exercicio_liquidacao' , Sessao::getExercicio() ); - $obTTCEMGNotaFiscalEmpenho->setDado( 'vl_associado' , $nuVlTotalDoctoFiscal ); - $obTTCEMGNotaFiscalEmpenho->setDado( 'vl_liquidacao' , $nuVlTotalDoctoFiscal ); - - $obErro = $obTTCEMGNotaFiscalEmpenho->inclusao($boTransacao); + if (!$obErro->ocorreu()) { + $obTTCEMGNotaFiscalEmpenho = new TTCEMGNotaFiscalEmpenhoLiquidacao; + + $obTTCEMGNotaFiscalEmpenho->setDado( 'cod_nota' , $inCodNota ); + $obTTCEMGNotaFiscalEmpenho->setDado( 'exercicio' , $_REQUEST['stExercicioNF'] ); + $obTTCEMGNotaFiscalEmpenho->setDado( 'cod_entidade' , $_REQUEST['inCodEntidade'] ); + $obTTCEMGNotaFiscalEmpenho->setDado( 'cod_empenho' , $_REQUEST['inCodEmpenho'] ); + $obTTCEMGNotaFiscalEmpenho->setDado( 'exercicio_empenho' , $_REQUEST['dtExercicioEmpenho'] ); + $obTTCEMGNotaFiscalEmpenho->setDado( 'cod_nota_liquidacao' , $obREmpenhoNotaLiquidacao->getCodNota() ); + $obTTCEMGNotaFiscalEmpenho->setDado( 'exercicio_liquidacao' , Sessao::getExercicio() ); + $obTTCEMGNotaFiscalEmpenho->setDado( 'vl_associado' , $nuVlTotalDoctoFiscal ); + $obTTCEMGNotaFiscalEmpenho->setDado( 'vl_liquidacao' , $nuVlTotalDoctoFiscal ); + + $obErro = $obTTCEMGNotaFiscalEmpenho->inclusao($boTransacao); + } } } } @@ -765,7 +788,7 @@ switch ($stAcao) { $obTTCMBANotaFiscalLiquidacao->setDado('descricao', $request->get('stObjetoNF') ); } if ( $request->get('stUFUnidadeFederacao') ) { - $inCodUF = SistemaLegado::pegaDado("cod_uf","sw_uf"," WHERE sigla_uf = '".$request->get('stUFUnidadeFederacao')."'"); + $inCodUF = SistemaLegado::pegaDado("cod_uf","sw_uf"," WHERE sigla_uf = '".$request->get('stUFUnidadeFederacao')."'", $boTransacao); $obTTCMBANotaFiscalLiquidacao->setDado('cod_uf', $inCodUF ); } diff --git a/gestaoFinanceira/fontes/PHP/empenho/instancias/manutencao/OCManutencaoDatas.php b/gestaoFinanceira/fontes/PHP/empenho/instancias/manutencao/OCManutencaoDatas.php index dc77ef5..77cffcc 100755 --- a/gestaoFinanceira/fontes/PHP/empenho/instancias/manutencao/OCManutencaoDatas.php +++ b/gestaoFinanceira/fontes/PHP/empenho/instancias/manutencao/OCManutencaoDatas.php @@ -62,7 +62,7 @@ $pgPror = "PO".$stPrograma.".php"; $pgJs = "JS".$stPrograma.".js"; $stCtrl = $_GET['stCtrl'] ? $_GET['stCtrl'] : $_POST['stCtrl']; -//mostraVar(//sessao); + $obREmpenhoManutencaoDatas = new REmpenhoManutencaoDatas; $obREmpenhoManutencaoDatas->setCodEntidade ( Sessao::read('inCodEntidade') ); $obREmpenhoManutencaoDatas->setCodEmpenho ( Sessao::read('inCodEmpenho') ); diff --git a/gestaoFinanceira/fontes/PHP/empenho/instancias/ordemPagamento/FMManterEstornoPagamentoOrdem.php b/gestaoFinanceira/fontes/PHP/empenho/instancias/ordemPagamento/FMManterEstornoPagamentoOrdem.php index ef1d4a6..a78d2c7 100755 --- a/gestaoFinanceira/fontes/PHP/empenho/instancias/ordemPagamento/FMManterEstornoPagamentoOrdem.php +++ b/gestaoFinanceira/fontes/PHP/empenho/instancias/ordemPagamento/FMManterEstornoPagamentoOrdem.php @@ -129,23 +129,6 @@ $boAdiantamento = false; if ($obREmpenhoPagamentoLiquidacao->obREmpenhoOrdemPagamento->getAdiantamento()) { $boAdiantamento = true; } -/* -$obREmpenhoPagamentoLiquidacao->obREmpenhoNotaLiquidacao->setCodNota( $rsLiquidacaoPaga->getCampo("cod_nota") ); -$obREmpenhoPagamentoLiquidacao->setTimestamp( $rsLiquidacaoPaga->getCampo("timestamp") ); -$obREmpenhoPagamentoLiquidacao->setExercicio( $rsLiquidacaoPaga->getCampo("exercicio") ); -$obREmpenhoPagamentoLiquidacao->recuperaDadosBancoPagamento( $rsDadosBanco ); - -SistemaLegado::mostraVar($rsDadosBanco); - -$stContaBanco = $rsDadosBanco->getCampo("cod_plano"); -$stNomConta = $rsDadosBanco->getCampo("nom_conta"); -*/ -//$rsLiquidacaoPaga->debug(); die; - -/*$stDtPagamento = $rsLiquidacaoPaga->getCampo("timestamp"); -$stDtPagamento = explode("-",substr($stDtPagamento,0,10)); -$stDtPagamento = $stDtPagamento[2] . "/" . $stDtPagamento[1] . "/" . $stDtPagamento[0]; -*/ // OBJETOS HIDDEN $obHdnCtrl = new Hidden; diff --git a/gestaoFinanceira/fontes/PHP/empenho/instancias/relatorio/OCEmpenhoRPAnuLiqEstLiq.php b/gestaoFinanceira/fontes/PHP/empenho/instancias/relatorio/OCEmpenhoRPAnuLiqEstLiq.php index 01ae2af..fd353e6 100755 --- a/gestaoFinanceira/fontes/PHP/empenho/instancias/relatorio/OCEmpenhoRPAnuLiqEstLiq.php +++ b/gestaoFinanceira/fontes/PHP/empenho/instancias/relatorio/OCEmpenhoRPAnuLiqEstLiq.php @@ -283,7 +283,6 @@ switch ($_REQUEST['stCtrl']) { $obREmpenhoRPAnuLiqEstLiq->geraRecordSet( $rsEmpenhoRPAnuLiqEstLiq ); Sessao::write('rsRecordSet', $rsEmpenhoRPAnuLiqEstLiq); - //mostravar($rsEmpenhoRPAnuLiqEstLiq); $obRRelatorio->executaFrameOculto( "OCGeraRelatorioEmpenhoRPAnuLiqEstLiq.php" ); break; diff --git a/gestaoFinanceira/fontes/PHP/empenho/instancias/relatorio/OCGeraRelatorioEmpenhoEmpenhoPagarBirt.php b/gestaoFinanceira/fontes/PHP/empenho/instancias/relatorio/OCGeraRelatorioEmpenhoEmpenhoPagarBirt.php index d6dc8dd..d69ca05 100644 --- a/gestaoFinanceira/fontes/PHP/empenho/instancias/relatorio/OCGeraRelatorioEmpenhoEmpenhoPagarBirt.php +++ b/gestaoFinanceira/fontes/PHP/empenho/instancias/relatorio/OCGeraRelatorioEmpenhoEmpenhoPagarBirt.php @@ -142,7 +142,6 @@ if ($_REQUEST['stMostrarDescricaoRecurso'] == 'S') { } $preview->addAssinaturas(Sessao::read('assinaturas')); -//SistemaLegado::mostravar($preview->arParametros); $preview->preview(); ?> diff --git a/gestaoFinanceira/fontes/PHP/empenho/instancias/relatorio/OCGeraRelatorioRestosPagarAnuladoPagamentoEstorno.php b/gestaoFinanceira/fontes/PHP/empenho/instancias/relatorio/OCGeraRelatorioRestosPagarAnuladoPagamentoEstorno.php index b78bbd7..42e8af3 100644 --- a/gestaoFinanceira/fontes/PHP/empenho/instancias/relatorio/OCGeraRelatorioRestosPagarAnuladoPagamentoEstorno.php +++ b/gestaoFinanceira/fontes/PHP/empenho/instancias/relatorio/OCGeraRelatorioRestosPagarAnuladoPagamentoEstorno.php @@ -35,7 +35,7 @@ * @ignore - * $Id: OCGeraRelatorioRestosPagarAnuladoPagamentoEstorno.php 61605 2015-02-12 16:04:02Z diogo.zarpelon $ + * $Id: OCGeraRelatorioRestosPagarAnuladoPagamentoEstorno.php 64153 2015-12-09 19:16:02Z evandro $ * Casos de uso : uc-02.03.08 */ @@ -213,7 +213,7 @@ if ($_REQUEST['inCodDetalhamento'] != "") { $preview->addParametro('cod_detalhamento', ''); } -if (SistemaLegado::is_tcems($boTransacao)) { +if (Sessao::getExercicio() > '2012') { $preview->addParametro('boTCEMS', 'true'); } else { $preview->addParametro('boTCEMS', 'false'); diff --git a/gestaoFinanceira/fontes/PHP/empenho/popups/empenho/LSConsultaEmpenhoPago.php b/gestaoFinanceira/fontes/PHP/empenho/popups/empenho/LSConsultaEmpenhoPago.php index c4cc869..8e25300 100755 --- a/gestaoFinanceira/fontes/PHP/empenho/popups/empenho/LSConsultaEmpenhoPago.php +++ b/gestaoFinanceira/fontes/PHP/empenho/popups/empenho/LSConsultaEmpenhoPago.php @@ -39,17 +39,6 @@ * Casos de uso: uc-02.03.03 */ - -/* -$Log$ -Revision 1.7 2006/10/09 09:24:13 cleisson -Ajustes - -Revision 1.6 2006/07/05 20:49:29 cleisson -Adicionada tag Log aos arquivos - -*/ - include_once '../../../../../../gestaoAdministrativa/fontes/PHP/pacotes/FrameworkHTML.inc.php'; include_once '../../../../../../gestaoAdministrativa/fontes/PHP/framework/include/cabecalho.inc.php'; include_once( CAM_GF_EMP_NEGOCIO."REmpenhoEmpenho.class.php" ); diff --git a/gestaoFinanceira/fontes/PHP/exportacao/instancias/tceRJ/FMManterAjustesEmpenho.php b/gestaoFinanceira/fontes/PHP/exportacao/instancias/tceRJ/FMManterAjustesEmpenho.php index 7f153d9..134d903 100755 --- a/gestaoFinanceira/fontes/PHP/exportacao/instancias/tceRJ/FMManterAjustesEmpenho.php +++ b/gestaoFinanceira/fontes/PHP/exportacao/instancias/tceRJ/FMManterAjustesEmpenho.php @@ -59,9 +59,6 @@ $pgProc = "PR".$stPrograma.".php"; $pgOcul = "OC".$stPrograma.".php"; $pgJS = "JS".$stPrograma.".js"; -//SistemaLegado::mostraVar($_POST); -//die(); - foreach ($_POST as $stCampo => $stValor) { $sessao->transf4[$stCampo] = $stValor; } diff --git a/gestaoFinanceira/fontes/PHP/exportacao/instancias/tceSC/PRGeraArquivosEsfingeConcursos.php b/gestaoFinanceira/fontes/PHP/exportacao/instancias/tceSC/PRGeraArquivosEsfingeConcursos.php index e940fc1..9cc8102 100644 --- a/gestaoFinanceira/fontes/PHP/exportacao/instancias/tceSC/PRGeraArquivosEsfingeConcursos.php +++ b/gestaoFinanceira/fontes/PHP/exportacao/instancias/tceSC/PRGeraArquivosEsfingeConcursos.php @@ -58,7 +58,6 @@ function geraArquivosConcursos(&$obExportador , $stDataInicial, $stDataFinal) $obTConcursoConcurso->setDado( 'dt_inicial' , $stDataInicial ); $obTConcursoConcurso->setDado( 'dt_final' , $stDataFinal ); $obTConcursoConcurso->recuperaConcursoEsfinge( $rsConcurso ); -// sistemaLegado::mostravar( $rsConcurso ); $obExportador->addArquivo("concurso.txt"); $obExportador->roUltimoArquivo->addBloco($rsConcurso); @@ -94,7 +93,6 @@ function geraArquivosConcursos(&$obExportador , $stDataInicial, $stDataFinal) $obTConcursoConcurso->setDado( 'dt_inicial' , $stDataInicial ); $obTConcursoConcurso->setDado( 'dt_final' , $stDataFinal ); $obTConcursoConcurso->recuperaResultadoConcursoEsfinge( $rsResultadoConcurso ); - sistemaLegado::mostravar( $rsResultadoConcurso ); $obExportador->addArquivo("resultadoconcurso.txt"); $obExportador->roUltimoArquivo->addBloco($rsResultadoConcurso); diff --git a/gestaoFinanceira/fontes/PHP/exportacao/instancias/tceSC/PRGeraArquivosEsfingeContratos.php b/gestaoFinanceira/fontes/PHP/exportacao/instancias/tceSC/PRGeraArquivosEsfingeContratos.php index eb0a5f7..07635aa 100644 --- a/gestaoFinanceira/fontes/PHP/exportacao/instancias/tceSC/PRGeraArquivosEsfingeContratos.php +++ b/gestaoFinanceira/fontes/PHP/exportacao/instancias/tceSC/PRGeraArquivosEsfingeContratos.php @@ -60,7 +60,6 @@ function geraArquivosContratos(&$obExportador , $stDataInicial, $stDataFinal) $obTLicitacaoContrato->setDado( 'dt_inicial', $stDataInicial ); $obTLicitacaoContrato->setDado( 'dt_final', $stDataFinal ); $obTLicitacaoContrato->recuperaContratoEsfinge( $rsContrato ); - sistemaLegado::mostravar( $rsContrato ); $obExportador->addArquivo("contrato.txt"); $obExportador->roUltimoArquivo->addBloco($rsContrato); @@ -130,7 +129,6 @@ function geraArquivosContratos(&$obExportador , $stDataInicial, $stDataFinal) $obTContratoDocumento->setDado( 'dt_inicial' , $stDataInicial ); $obTContratoDocumento->setDado( 'dt_final' , $stDataFinal ); $obTContratoDocumento->recuperaCertidaoContratadoEsfinge($rsCertidaoContratado); - sistemaLegado::mostravar( $rsCertidaoContratado ); $obExportador->addArquivo("ceritdaocontratado.txt"); $obExportador->roUltimoArquivo->addBloco($rsCertidaoContratado); diff --git a/gestaoFinanceira/fontes/PHP/exportacao/instancias/tceSC/PRGeraArquivosEsfingeConvenios.php b/gestaoFinanceira/fontes/PHP/exportacao/instancias/tceSC/PRGeraArquivosEsfingeConvenios.php index aed3b4c..4aa3119 100644 --- a/gestaoFinanceira/fontes/PHP/exportacao/instancias/tceSC/PRGeraArquivosEsfingeConvenios.php +++ b/gestaoFinanceira/fontes/PHP/exportacao/instancias/tceSC/PRGeraArquivosEsfingeConvenios.php @@ -59,7 +59,6 @@ function geraArquivosConvenios(&$obExportador , $stDataInicial, $stDataFinal) $obTLicitacaoConvenio->setDado( 'dt_inicial' , $stDataInicial ); $obTLicitacaoConvenio->setDado( 'dt_final' , $stDataFinal ); $obTLicitacaoConvenio->recuperaConvenioEsfinge( $rsConvenio); - sistemaLegado::mostravar( $rsConvenio); $obExportador->addArquivo("convenio.txt"); $obExportador->roUltimoArquivo->addBloco($rsConvenio); @@ -104,7 +103,6 @@ function geraArquivosConvenios(&$obExportador , $stDataInicial, $stDataFinal) $obTParticipanteConvenio->setDado( 'dt_inicial' , $stDataInicial ); $obTParticipanteConvenio->setDado( 'dt_final' , $stDataFinal ); $obTParticipanteConvenio->recuperaParticipanteConvenioEsfinge( $rsParticipanteConvenio ); -// sistemaLegado::mostravar( $rsParticipanteConvenio ); $obExportador->addArquivo("participanteconvenio.txt"); $obExportador->roUltimoArquivo->addBloco($rsParticipanteConvenio ); @@ -139,7 +137,6 @@ function geraArquivosConvenios(&$obExportador , $stDataInicial, $stDataFinal) $obTParticipanteConvenio->setDado( 'dt_inicial' , $stDataInicial ); $obTParticipanteConvenio->setDado( 'dt_final' , $stDataFinal ); $obTParticipanteConvenio->recuperaCertidaoConveniadoEsfinge( $rsCertidaoConveniado ); -// sistemaLegado::mostravar( $rsCertidaoConveniado ); $obExportador->addArquivo("certidaoconvenianado.txt"); $obExportador->roUltimoArquivo->addBloco($rsCertidaoConveniado); diff --git a/gestaoFinanceira/fontes/PHP/exportacao/instancias/tceSC/PRGeraArquivosEsfingePlanoCargos.php b/gestaoFinanceira/fontes/PHP/exportacao/instancias/tceSC/PRGeraArquivosEsfingePlanoCargos.php index 225d74b..46d5976 100644 --- a/gestaoFinanceira/fontes/PHP/exportacao/instancias/tceSC/PRGeraArquivosEsfingePlanoCargos.php +++ b/gestaoFinanceira/fontes/PHP/exportacao/instancias/tceSC/PRGeraArquivosEsfingePlanoCargos.php @@ -75,7 +75,6 @@ function geraArquivosPlanoCargos(&$obExportador , $stDataInicial, $stDataFinal) $rsAtualizacaoCargo->arElementos[$i]['reducao_vagas_ocupadas'] = -$rsAtualizacaoCargo->arElementos[$i]['diff_vagas_ocupadas']; } } - sistemaLegado::mostravar( $rsAtualizacaoCargo ); $obExportador->addArquivo("atualizacaocargo.txt"); $obExportador->roUltimoArquivo->addBloco($rsAtualizacaoCargo); @@ -156,7 +155,6 @@ function geraArquivosPlanoCargos(&$obExportador , $stDataInicial, $stDataFinal) $obTFlolhaPagamentoPadrao->setDado( 'dt_inicial' , $stDataInicial ); $obTFlolhaPagamentoPadrao->setDado( 'dt_final' , $stDataFinal ); $obTFlolhaPagamentoPadrao->recuperaAtualizacaoNivelEsfinge( $rsAtualizacaoNivel ); -// sistemaLegado::mostravar( $rsAtualizacaoNivel ); $obExportador->addArquivo("atualizacaocargogruporeferencianivel.txt"); $obExportador->roUltimoArquivo->addBloco($rsAtualizacaoNivel); diff --git a/gestaoFinanceira/fontes/PHP/exportacao/instancias/tceSC/PRGeraArquivosEsfingeRegContabeis.php b/gestaoFinanceira/fontes/PHP/exportacao/instancias/tceSC/PRGeraArquivosEsfingeRegContabeis.php index cb7f12c..b391985 100644 --- a/gestaoFinanceira/fontes/PHP/exportacao/instancias/tceSC/PRGeraArquivosEsfingeRegContabeis.php +++ b/gestaoFinanceira/fontes/PHP/exportacao/instancias/tceSC/PRGeraArquivosEsfingeRegContabeis.php @@ -54,110 +54,12 @@ function geraArquivosRegContabeis(&$obExportador , $stDataInicial, $stDataFinal) include_once( CAM_GF_CONT_MAPEAMENTO."TContabilidadePlanoAnalitica.class.php" ); include_once( CAM_GF_ORC_MAPEAMENTO."TOrcamentoReceita.class.php" ); -// $obTContabilidadePlanoConta = new TContabilidadePlanoConta; -// $obTContabilidadePlanoConta->setDado( 'exercicio' , $sessao->filtro['stExercicio'] ); -// $obTContabilidadePlanoConta->setDado( 'cod_entidade', implode(",", $sessao->filtro['inCodEntidade'] ) ); -// $obTContabilidadePlanoConta->recuperaContaContabilEsfinge( $rsContaContabil ); -// sistemaLegado::mostravar( $rsContaContabil ); -// -// $obExportador->addArquivo("contacontabil.txt"); -// $obExportador->roUltimoArquivo->addBloco($rsContaContabil); -// -// $obExportador->roUltimoArquivo->roUltimoBloco->addColuna("exercicio"); -// $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("NUMERICO_ZEROS_ESQ"); -// $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(4); -// -// $obExportador->roUltimoArquivo->roUltimoBloco->addColuna("cod_estrutural"); -// $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("CARACTER_ESPACOS_DIR"); -// $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(50); -// -// $obExportador->roUltimoArquivo->roUltimoBloco->addColuna("tipo_conta"); -// $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("NUMERICO_ZEROS_ESQ"); -// $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(2); -// -// $obExportador->roUltimoArquivo->roUltimoBloco->addColuna("nom_conta"); -// $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("CARACTER_ESPACOS_DIR"); -// $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(100); -// -// $obExportador->roUltimoArquivo->roUltimoBloco->addColuna(""); -// $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setCampoObrigatorio( false ); -// $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("CARACTER_ESPACOS_DIR"); -// $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(255); -// -// $obExportador->roUltimoArquivo->roUltimoBloco->addColuna("analitica"); -// $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("NUMERICO_ZEROS_ESQ"); -// $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(1); -// -// $obExportador->roUltimoArquivo->roUltimoBloco->addColuna("nivel_conta"); -// $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("NUMERICO_ZEROS_ESQ"); -// $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(2); -// -// $obExportador->roUltimoArquivo->roUltimoBloco->addColuna("tipo_natureza_saldo"); -// $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("NUMERICO_ZEROS_ESQ"); -// $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(2); -// -// $obExportador->roUltimoArquivo->roUltimoBloco->addColuna("cod_conta"); -// $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("NUMERICO_ZEROS_ESQ"); -// $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(4); -// -// $obExportador->roUltimoArquivo->roUltimoBloco->addColuna("cod_estrutural_superior"); -// $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("CARACTER_ESPACOS_DIR"); -// $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(50); -// -// $obExportador->roUltimoArquivo->roUltimoBloco->addColuna("cod_banco"); -// $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("NUMERICO_ZEROS_ESQ"); -// $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(4); -// -// $obExportador->roUltimoArquivo->roUltimoBloco->addColuna("cod_agencia"); -// $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("NUMERICO_ZEROS_ESQ"); -// $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(6); -// -// $obExportador->roUltimoArquivo->roUltimoBloco->addColuna("conta_corrente"); -// $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("NUMERICO_ZEROS_ESQ"); -// $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(10); - -// $obTContabilidadePlanoAnalitica = new TContabilidadePlanoAnalitica; -// $obTContabilidadePlanoAnalitica->setDado( 'exercicio' , $sessao->filtro['stExercicio'] ); -// $obTContabilidadePlanoAnalitica->setDado( 'cod_entidade', implode(",", $sessao->filtro['inCodEntidade'] ) ); -// $obTContabilidadePlanoAnalitica->setDado( 'dt_inicial' , $stDataInicial ); -// $obTContabilidadePlanoAnalitica->setDado( 'dt_final' , $stDataFinal ); -// $obTContabilidadePlanoAnalitica->recuperaMovimentoContabilEsfinge($rsMovimentoContabil); -// sistemaLegado::mostravar( $rsMovimentoContabil); -// -// $obExportador->addArquivo("movimentocontabil.txt"); -// $obExportador->roUltimoArquivo->addBloco($rsMovimentoContabil); -// -// $obExportador->roUltimoArquivo->roUltimoBloco->addColuna("exercicio"); -// $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("NUMERICO_ZEROS_ESQ"); -// $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(4); -// -// $obExportador->roUltimoArquivo->roUltimoBloco->addColuna("cod_conta"); -// $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("NUMERICO_ZEROS_ESQ"); -// $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(16); -// -// $obExportador->roUltimoArquivo->roUltimoBloco->addColuna("cod_tipo_movimento"); -// $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("NUMERICO_ZEROS_ESQ"); -// $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(2); -// -// $obExportador->roUltimoArquivo->roUltimoBloco->addColuna("dt_lote"); -// $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("DATA_YYYYMMDD"); -// $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(8); -// -// $obExportador->roUltimoArquivo->roUltimoBloco->addColuna("vl_lancamento_debito"); -// $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("NUMERICO_ZEROS_ESQ"); -// $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(16); -// -// $obExportador->roUltimoArquivo->roUltimoBloco->addColuna("vl_lancamento_credito"); -// $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("NUMERICO_ZEROS_ESQ"); -// $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(16); - $obTOrcamentoReceita = new TOrcamentoReceita; $obTOrcamentoReceita->setDado( 'exercicio' , $sessao->filtro['stExercicio'] ); $obTOrcamentoReceita->setDado( 'cod_entidade', implode(",", $sessao->filtro['inCodEntidade'] ) ); $obTOrcamentoReceita->setDado( 'dt_inicial' , $stDataInicial ); $obTOrcamentoReceita->setDado( 'dt_final' , $stDataFinal ); $obTOrcamentoReceita->recuperaReceitaArrecadada( $rsReceitaArrecadada); - sistemaLegado::mostravar( $rsReceitaArrecadada ); $obExportador->addArquivo("receitaarrecadada.txt"); $obExportador->roUltimoArquivo->addBloco($rsReceitaArrecadada); @@ -193,179 +95,6 @@ function geraArquivosRegContabeis(&$obExportador , $stDataInicial, $stDataFinal) $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("NUMERICO_ZEROS_ESQ"); $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(16); -// $obTEmpenhoNotaLiquidacaoItemAnulado = new TEmpenhoNotaLiquidacaoItemAnulado; -// $obTEmpenhoNotaLiquidacaoItemAnulado->setDado( 'exercicio' , $sessao->filtro['stExercicio'] ); -// $obTEmpenhoNotaLiquidacaoItemAnulado->setDado( 'cod_entidade', implode(",", $sessao->filtro['inCodEntidade'] ) ); -// $obTEmpenhoNotaLiquidacaoItemAnulado->setDado( 'dt_inicial' , $stDataInicial ); -// $obTEmpenhoNotaLiquidacaoItemAnulado->setDado( 'dt_final' , $stDataFinal ); -// $obTEmpenhoNotaLiquidacaoItemAnulado->recuperaEstornoLiquidacaoEsfinge( $rsEstornoLiquidacao ); -//// sistemaLegado::mostravar( $rsEstornoLiquidacao ); -// -// $obExportador->addArquivo("estornoliquidacao.txt"); -// $obExportador->roUltimoArquivo->addBloco($rsEstornoLiquidacao ); -// -// $obExportador->roUltimoArquivo->roUltimoBloco->addColuna("cod_entidade"); -// $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("NUMERICO_ZEROS_ESQ"); -// $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(4); -// -// $obExportador->roUltimoArquivo->roUltimoBloco->addColuna("cod_empenho"); -// $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("NUMERICO_ZEROS_ESQ"); -// $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(16); -// -// $obExportador->roUltimoArquivo->roUltimoBloco->addColuna(""); -// $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setCampoObrigatorio( false ); -// $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("NUMERICO_ZEROS_ESQ"); -// $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(16); -// -// $obExportador->roUltimoArquivo->roUltimoBloco->addColuna("dt_liquidacao"); -// $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("DATA_YYYYMMDD"); -// $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(8); -// -// $obExportador->roUltimoArquivo->roUltimoBloco->addColuna("timestamp"); -// $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("DATA_YYYYMMDD"); -// $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(8); -// -// $obExportador->roUltimoArquivo->roUltimoBloco->addColuna(""); -// $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setCampoObrigatorio( false ); -// $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("CARACTER_ESPACOS_DIR"); -// $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(255); -// -// $obExportador->roUltimoArquivo->roUltimoBloco->addColuna("vl_anulado"); -// $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("NUMERICO_ZEROS_ESQ"); -// $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(16); -// -// $obTEmpenhoNotaLiquidacaoPaga = new TEmpenhoNotaLiquidacaoPaga; -// $obTEmpenhoNotaLiquidacaoPaga->setDado( 'exercicio' , $sessao->filtro['stExercicio'] ); -// $obTEmpenhoNotaLiquidacaoPaga->setDado( 'cod_entidade', implode(",", $sessao->filtro['inCodEntidade'] ) ); -// $obTEmpenhoNotaLiquidacaoPaga->setDado( 'dt_inicial' , $stDataInicial ); -// $obTEmpenhoNotaLiquidacaoPaga->setDado( 'dt_final' , $stDataFinal ); -// $obTEmpenhoNotaLiquidacaoPaga->recuperaPagamentoEmpenhoEsfinge( $rsPagamentoEmpenho ); -//// sistemaLegado::mostravar( $rsPagamentoEmpenho ); -// -// $obExportador->addArquivo("pagamentoempenho.txt"); -// $obExportador->roUltimoArquivo->addBloco($rsPagamentoEmpenho); -// -// $obExportador->roUltimoArquivo->roUltimoBloco->addColuna("cod_entidade"); -// $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("NUMERICO_ZEROS_ESQ"); -// $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(4); -// -// $obExportador->roUltimoArquivo->roUltimoBloco->addColuna("cod_empenho"); -// $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("NUMERICO_ZEROS_ESQ"); -// $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(16); -// -// $obExportador->roUltimoArquivo->roUltimoBloco->addColuna("timestamp"); -// $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("DATA_YYYYMMDD"); -// $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(8); -// -// $obExportador->roUltimoArquivo->roUltimoBloco->addColuna(""); -// $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setCampoObrigatorio( false ); -// $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("NUMERICO_ZEROS_ESQ"); -// $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(16); -// -// $obExportador->roUltimoArquivo->roUltimoBloco->addColuna(""); -// $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setCampoObrigatorio( false ); -// $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("NUMERICO_ZEROS_ESQ"); -// $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(2); -// -// $obExportador->roUltimoArquivo->roUltimoBloco->addColuna(""); -// $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setCampoObrigatorio( false ); -// $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("NUMERICO_ZEROS_ESQ"); -// $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(5); -// -// $obExportador->roUltimoArquivo->roUltimoBloco->addColuna("vl_pago"); -// $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("NUMERICO_ZEROS_ESQ"); -// $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(16); -// -// $obExportador->roUltimoArquivo->roUltimoBloco->addColuna("dt_vencimento"); -// $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("DATA_YYYYMMDD"); -// $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(8); -// -// $obExportador->roUltimoArquivo->roUltimoBloco->addColuna(""); -// $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setCampoObrigatorio( false ); -// $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("DATA_YYYYMMDD"); -// $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(8); -// -// $obExportador->roUltimoArquivo->roUltimoBloco->addColuna(""); -// $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setCampoObrigatorio( false ); -// $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("DATA_YYYYMMDD"); -// $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(8); -// -// $obTEmpenhoNotaLiquidacaoContaPagadora = new TEmpenhoNotaLiquidacaoContaPagadora; -// $obTEmpenhoNotaLiquidacaoContaPagadora->setDado( 'exercicio' , $sessao->filtro['stExercicio'] ); -// $obTEmpenhoNotaLiquidacaoContaPagadora->setDado( 'cod_entidade', implode(",", $sessao->filtro['inCodEntidade'] ) ); -// $obTEmpenhoNotaLiquidacaoContaPagadora->setDado( 'dt_inicial' , $stDataInicial ); -// $obTEmpenhoNotaLiquidacaoContaPagadora->setDado( 'dt_final' , $stDataFinal ); -// $obTEmpenhoNotaLiquidacaoContaPagadora->recuperaDesembolsoEsfinge( $rsDesembolso ); -//// sistemaLegado::mostravar( $rsDesembolso ); -// -// $obExportador->addArquivo("desembolso.txt"); -// $obExportador->roUltimoArquivo->addBloco($rsDesembolso); -// -// $obExportador->roUltimoArquivo->roUltimoBloco->addColuna("cod_entidade"); -// $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("NUMERICO_ZEROS_ESQ"); -// $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(4); -// -// $obExportador->roUltimoArquivo->roUltimoBloco->addColuna("cod_empenho"); -// $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("NUMERICO_ZEROS_ESQ"); -// $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(16); -// -// $obExportador->roUltimoArquivo->roUltimoBloco->addColuna(""); -// $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setCampoObrigatorio( false ); -// $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("NUMERICO_ZEROS_ESQ"); -// $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(16); -// -// $obExportador->roUltimoArquivo->roUltimoBloco->addColuna("timestamp"); -// $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("DATA_YYYYMMDD"); -// $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(8); -// -// $obExportador->roUltimoArquivo->roUltimoBloco->addColuna("exercicio"); -// $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("NUMERICO_ZEROS_ESQ"); -// $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(4); -// -// $obExportador->roUltimoArquivo->roUltimoBloco->addColuna("cod_estrutural"); -// $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("CARACTER_ESPACOS_DIR"); -// $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(50); -// -// $obExportador->roUltimoArquivo->roUltimoBloco->addColuna("vl_pago"); -// $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("NUMERICO_ZEROS_ESQ"); -// $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(16); -// -// $obTEmpenhoNotaLiquidacaoPagaAnulada = new TEmpenhoNotaLiquidacaoPagaAnulada; -// $obTEmpenhoNotaLiquidacaoPagaAnulada->setDado( 'exercicio' , $sessao->filtro['stExercicio'] ); -// $obTEmpenhoNotaLiquidacaoPagaAnulada->setDado( 'cod_entidade', implode(",", $sessao->filtro['inCodEntidade'] ) ); -// $obTEmpenhoNotaLiquidacaoPagaAnulada->setDado( 'dt_inicial' , $stDataInicial ); -// $obTEmpenhoNotaLiquidacaoPagaAnulada->setDado( 'dt_final' , $stDataFinal ); -// $obTEmpenhoNotaLiquidacaoPagaAnulada->recuperaEstornoPagamentoEsfinge( $rsEstornoPagamento ); -//// sistemaLegado::mostravar( $rsEstornoPagamento ); -// -// $obExportador->addArquivo("estornopagamento.txt"); -// $obExportador->roUltimoArquivo->addBloco($rsEstornoPagamento ); -// -// $obExportador->roUltimoArquivo->roUltimoBloco->addColuna("cod_entidade"); -// $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("NUMERICO_ZEROS_ESQ"); -// $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(4); -// -// $obExportador->roUltimoArquivo->roUltimoBloco->addColuna("cod_empenho"); -// $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("NUMERICO_ZEROS_ESQ"); -// $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(16); -// -// $obExportador->roUltimoArquivo->roUltimoBloco->addColuna("timestamp"); -// $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("DATA_YYYYMMDD"); -// $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(8); -// -// $obExportador->roUltimoArquivo->roUltimoBloco->addColuna("timestamp_anulada"); -// $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("DATA_YYYYMMDD"); -// $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(8); -// -// $obExportador->roUltimoArquivo->roUltimoBloco->addColuna(""); -// $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setCampoObrigatorio( false ); -// $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("NUMERICO_ZEROS_ESQ"); -// $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(16); -// -// $obExportador->roUltimoArquivo->roUltimoBloco->addColuna("vl_anulado"); -// $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("NUMERICO_ZEROS_ESQ"); -// $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(16); - } include_once '../../../../../../gestaoAdministrativa/fontes/PHP/framework/include/rodape.inc.php'; diff --git a/gestaoFinanceira/fontes/PHP/ldo/classes/visao/VLDODespesaReceita.class.php b/gestaoFinanceira/fontes/PHP/ldo/classes/visao/VLDODespesaReceita.class.php index 53bf703..5151c26 100644 --- a/gestaoFinanceira/fontes/PHP/ldo/classes/visao/VLDODespesaReceita.class.php +++ b/gestaoFinanceira/fontes/PHP/ldo/classes/visao/VLDODespesaReceita.class.php @@ -378,7 +378,7 @@ class VLDODespesaReceita $obValorAno1->setLabel (true); $obValorAno1->setClass ('valor'); $obValorAno1->setValue ('[valor_1]'); - $obValorAno1->setMaxLength (11); + $obValorAno1->setMaxLength (12); $obValorAno1->setSize (10); $obValorAno1->setNegativo (false); $obValorAno1->obEvento->setOnBlur('recalcularValores(1,this.name);'); @@ -389,7 +389,7 @@ class VLDODespesaReceita $obValorAno2->setLabel (true); $obValorAno2->setClass ('valor'); $obValorAno2->setValue ('[valor_2]'); - $obValorAno2->setMaxLength (11); + $obValorAno2->setMaxLength (12); $obValorAno2->setSize (10); $obValorAno2->setNegativo (false); $obValorAno2->obEvento->setOnBlur('recalcularValores(2,this.name);'); @@ -400,7 +400,7 @@ class VLDODespesaReceita $obValorAno3->setLabel (true); $obValorAno3->setClass ('valor'); $obValorAno3->setValue ('[valor_3]'); - $obValorAno3->setMaxLength (11); + $obValorAno3->setMaxLength (12); $obValorAno3->setSize (10); $obValorAno3->setNegativo (false); $obValorAno3->obEvento->setOnBlur('recalcularValores(3,this.name);'); @@ -411,7 +411,7 @@ class VLDODespesaReceita $obValorAno4->setLabel (true); $obValorAno4->setClass ('valor'); $obValorAno4->setValue ('[valor_4]'); - $obValorAno4->setMaxLength (11); + $obValorAno4->setMaxLength (12); $obValorAno4->setSize (10); $obValorAno4->setNegativo (false); $obValorAno4->obEvento->setOnBlur('recalcularValores(4,this.name);'); diff --git a/gestaoFinanceira/fontes/PHP/orcamento/classes/componentes/ILabelEntidade.class.php b/gestaoFinanceira/fontes/PHP/orcamento/classes/componentes/ILabelEntidade.class.php index 0086d2a..6de19d4 100644 --- a/gestaoFinanceira/fontes/PHP/orcamento/classes/componentes/ILabelEntidade.class.php +++ b/gestaoFinanceira/fontes/PHP/orcamento/classes/componentes/ILabelEntidade.class.php @@ -70,6 +70,7 @@ class ILabelEntidade extends Label $this->obForm = $obForm; $this->obHdnCodEntidade = new Hidden; $this->obHdnCodEntidade->setName ( 'inCodEntidade' ); + $this->obHdnCodEntidade->setId ( 'inCodEntidade' ); $this->setRotulo ("Entidade" ); $this->setName ("stEntidade" ); $this->setId ("stEntidade" ); diff --git a/gestaoFinanceira/fontes/PHP/orcamento/classes/mapeamento/FOrcamentoBalanceteDespesa.class.php b/gestaoFinanceira/fontes/PHP/orcamento/classes/mapeamento/FOrcamentoBalanceteDespesa.class.php index 68c2e9a..685cb79 100755 --- a/gestaoFinanceira/fontes/PHP/orcamento/classes/mapeamento/FOrcamentoBalanceteDespesa.class.php +++ b/gestaoFinanceira/fontes/PHP/orcamento/classes/mapeamento/FOrcamentoBalanceteDespesa.class.php @@ -275,7 +275,7 @@ function consultaValorConta(&$rsRecordSet, $stFiltro = "", $stOrdem = "", $boTra $rsRecordSet = new RecordSet; $stSql = $this->montaConsultaValorConta().$stFiltro.$stGroup.$stOrdem; $obErro = $obConexao->executaSQL( $rsRecordSet, $stSql, $boTransacao ); - //echo $stSql; + return $obErro; } @@ -287,8 +287,6 @@ function montaConsultaValorConta() $stSql .= " WHERE ".$stQuebra; $stSql .= " cod_despesa IS NOT NULL ".$stQuebra; - //mostravar( $stSql ); - //die(0); return $stSql; } diff --git a/gestaoFinanceira/fontes/PHP/orcamento/classes/mapeamento/TOrcamentoRecurso.class.php b/gestaoFinanceira/fontes/PHP/orcamento/classes/mapeamento/TOrcamentoRecurso.class.php index 9fcca81..c56c765 100755 --- a/gestaoFinanceira/fontes/PHP/orcamento/classes/mapeamento/TOrcamentoRecurso.class.php +++ b/gestaoFinanceira/fontes/PHP/orcamento/classes/mapeamento/TOrcamentoRecurso.class.php @@ -298,4 +298,43 @@ function montaRecuperaRecursoExercicio() return $stSql; } +public function verificaContaRecurso(&$rsRecordSet, $boTransacao = "") +{ + $obErro = new Erro; + $obConexao = new Conexao; + $rsRecordSet = new RecordSet; + + $stSql = $this->montaVerificaContaRecurso(); + $this->setDebug( $stSql ); + $obErro = $obConexao->executaSQL( $rsRecordSet, $stSql, $boTransacao ); + + return $obErro; +} + +public function montaVerificaContaRecurso() +{ + $stSql="SELECT plano_conta.* + ,plano_recurso.* + FROM contabilidade.plano_analitica + + INNER JOIN contabilidade.plano_recurso + ON plano_recurso.cod_plano = plano_analitica.cod_plano + AND plano_recurso.exercicio = plano_analitica.exercicio + + INNER JOIN contabilidade.plano_conta + ON plano_conta.cod_conta = plano_analitica.cod_conta + AND plano_conta.exercicio = plano_analitica.exercicio + + WHERE plano_analitica.exercicio = '".$this->getDado('exercicio')."' + AND plano_conta.escrituracao = 'analitica' + AND plano_conta.cod_estrutural SIMILAR TO ('7.2.1.1.1%|7.2.1.1.2%|8.2.1.1.1%|8.2.1.1.2%|8.2.1.1.3%|8.2.1.1.4%') + AND plano_conta.cod_estrutural LIKE (SELECT fn_conta_mae('".$this->getDado('cod_estrutural')."'))||'%' + AND plano_recurso.cod_recurso = '".$this->getDado('cod_recurso')."' + ORDER BY cod_estrutural + "; + return $stSql; +} + + + } diff --git a/gestaoFinanceira/fontes/PHP/orcamento/classes/mapeamento/TOrcamentoRecursoDestinacao.class.php b/gestaoFinanceira/fontes/PHP/orcamento/classes/mapeamento/TOrcamentoRecursoDestinacao.class.php index 873ec06..14f5cc7 100755 --- a/gestaoFinanceira/fontes/PHP/orcamento/classes/mapeamento/TOrcamentoRecursoDestinacao.class.php +++ b/gestaoFinanceira/fontes/PHP/orcamento/classes/mapeamento/TOrcamentoRecursoDestinacao.class.php @@ -30,7 +30,7 @@ * @author Analista: Anderson cAko Konze * @author Desenvolvedor: Anderson cAko Konze - $Id: TOrcamentoRecursoDestinacao.class.php 59612 2014-09-02 12:00:51Z gelson $ + $Id: TOrcamentoRecursoDestinacao.class.php 64153 2015-12-09 19:16:02Z evandro $ * Casos de uso: uc-02.01.38 */ @@ -83,7 +83,7 @@ function montaRecuperaRecursoVinculoConta($boTransacao = "") $stSql .= ' JOIN contabilidade.plano_recurso '; $stSql .= ' ON plano_recurso.exercicio = recurso_destinacao.exercicio '; $stSql .= ' AND plano_recurso.cod_recurso = recurso_destinacao.cod_recurso '; - if ( !SistemaLegado::is_tcems($boTransacao) ) { + if ( !Sessao::getExercicio() > '2012' ) { $stSql .= ' JOIN contabilidade.plano_analitica '; $stSql .= ' ON plano_analitica.cod_plano = plano_recurso.cod_plano '; $stSql .= ' AND plano_analitica.exercicio = plano_recurso.exercicio '; diff --git a/gestaoFinanceira/fontes/PHP/orcamento/classes/mapeamento/TOrcamentoSuplementacao.class.php b/gestaoFinanceira/fontes/PHP/orcamento/classes/mapeamento/TOrcamentoSuplementacao.class.php index 917f72c..76ef047 100755 --- a/gestaoFinanceira/fontes/PHP/orcamento/classes/mapeamento/TOrcamentoSuplementacao.class.php +++ b/gestaoFinanceira/fontes/PHP/orcamento/classes/mapeamento/TOrcamentoSuplementacao.class.php @@ -196,15 +196,14 @@ function recuperaRelacionamentoRecurso(&$rsRecordSet, $stCondicao = "", $stOrdem * @return String $stSql */ function montaRecuperaRelacionamentoRecurso($boTransacao = "") -{ - $boIsTCEMS = SistemaLegado::is_tcems($boTransacao); +{ $stSql .= "SELECT OS.exercicio \n"; $stSql .= " ,OS.cod_suplementacao \n"; $stSql .= " ,OS.cod_tipo \n"; $stSql .= " ,CTT.nom_tipo \n"; $stSql .= " ,OS.cod_norma \n"; $stSql .= " ,OS.motivo \n"; - if ($boIsTCEMS) { + if (Sessao::getExercicio() > '2012') { $stSql .= " ,CASE WHEN OSS.cod_entidade IS NOT NULL THEN \n"; $stSql .= " OSS.cod_entidade \n"; $stSql .= " ELSE \n"; @@ -222,7 +221,7 @@ function montaRecuperaRelacionamentoRecurso($boTransacao = "") $stSql .= " ,MAX( OSS.cod_despesa ) as cod_despesa \n"; $stSql .= " ,MAX( RECURSO.cod_recurso ) as cod_recurso \n"; $stSql .= " ,sum( OSS.valor ) as valor \n"; - if ($boIsTCEMS) { + if (Sessao::getExercicio() > '2012') { $stSql .= " ,OD.cod_entidade \n"; } $stSql .= " FROM orcamento.suplementacao_suplementada AS OSS \n"; @@ -240,7 +239,7 @@ function montaRecuperaRelacionamentoRecurso($boTransacao = "") $stSql .= " GROUP BY OSS.exercicio \n"; $stSql .= " ,OSS.cod_suplementacao \n"; $stSql .= " ,RECURSO.cod_recurso \n"; - if ($boIsTCEMS) { + if (Sessao::getExercicio() > '2012') { $stSql .= " ,OD.cod_entidade \n"; } $stSql .= " ORDER BY OSS.exercicio \n"; @@ -252,18 +251,18 @@ function montaRecuperaRelacionamentoRecurso($boTransacao = "") $stSql .= " ,OSR.cod_suplementacao \n"; $stSql .= " ,MAX( OSR.cod_despesa ) as cod_despesa \n"; $stSql .= " ,sum( OSR.valor ) AS valor \n"; - if ($boIsTCEMS) { + if (Sessao::getExercicio() > '2012') { $stSql .= " ,OD.cod_entidade \n"; } $stSql .= " FROM orcamento.suplementacao_reducao AS OSR \n"; - if ($boIsTCEMS) { + if (Sessao::getExercicio() > '2012') { $stSql .= " INNER JOIN orcamento.despesa AS OD \n"; $stSql .= " ON OSR.cod_despesa = OD.cod_despesa \n"; $stSql .= " AND OSR.exercicio = OD.exercicio \n"; } $stSql .= " GROUP BY OSR.exercicio \n"; $stSql .= " ,OSR.cod_suplementacao \n"; - if ($boIsTCEMS) { + if (Sessao::getExercicio() > '2012') { $stSql .= " ,OD.cod_entidade \n"; } $stSql .= " ORDER BY OSR.exercicio \n"; @@ -273,7 +272,7 @@ function montaRecuperaRelacionamentoRecurso($boTransacao = "") $stSql .= "LEFT JOIN orcamento.suplementacao_anulada AS OSA \n"; $stSql .= "ON( OS.cod_suplementacao = OSA.cod_suplementacao_anulacao \n"; $stSql .= "AND OS.exercicio = OSA.exercicio ) \n"; - if ($boIsTCEMS) { + if (Sessao::getExercicio() > '2012') { $stSql .= " LEFT JOIN contabilidade.tipo_transferencia AS CTT \n"; $stSql .= " ON OS.cod_tipo = CTT.cod_tipo \n"; $stSql .= " AND OS.exercicio = CTT.exercicio \n"; @@ -302,7 +301,7 @@ function montaRecuperaRelacionamentoRecurso($boTransacao = "") $stSql .= " ,OS.cod_norma \n"; $stSql .= " ,OS.motivo \n"; $stSql .= " ,OS.dt_suplementacao \n"; - if ($boIsTCEMS) { + if (Sessao::getExercicio() > '2012') { $stSql .= " ,OSR.cod_entidade \n"; $stSql .= " ,OSS.cod_entidade \n"; } else { diff --git a/gestaoFinanceira/fontes/PHP/orcamento/classes/mapeamento/TOrcamentoSuplementacaoSuplementada.class.php b/gestaoFinanceira/fontes/PHP/orcamento/classes/mapeamento/TOrcamentoSuplementacaoSuplementada.class.php index c42b7ff..f7622e4 100755 --- a/gestaoFinanceira/fontes/PHP/orcamento/classes/mapeamento/TOrcamentoSuplementacaoSuplementada.class.php +++ b/gestaoFinanceira/fontes/PHP/orcamento/classes/mapeamento/TOrcamentoSuplementacaoSuplementada.class.php @@ -42,31 +42,16 @@ uc-02.01.07 */ -/* -$Log$ -Revision 1.6 2006/07/05 20:42:02 cleisson -Adicionada tag Log aos arquivos - -*/ - include_once '../../../../../../gestaoAdministrativa/fontes/PHP/framework/include/valida.inc.php'; include_once ( CLA_PERSISTENTE ); -/** - * Efetua conexão com a tabela ORCAMENTO.SUPLEMENTACAO_SUPLEMENTADA - * Data de Criação: 10/02/2005 - - * @author Analista: Jorge B. Ribarr - * @author Desenvolvedor: Eduardo Martins - -*/ class TOrcamentoSuplementacaoSuplementada extends Persistente { /** * Método Construtor * @access Private */ -function TOrcamentoSuplementacaoSuplementada() +function __construct() { parent::Persistente(); $this->setTabela('orcamento.suplementacao_suplementada'); @@ -82,3 +67,5 @@ function TOrcamentoSuplementacaoSuplementada() } } + +?> \ No newline at end of file diff --git a/gestaoFinanceira/fontes/PHP/orcamento/classes/negocio/ROrcamentoClassificacaoReceita.class.php b/gestaoFinanceira/fontes/PHP/orcamento/classes/negocio/ROrcamentoClassificacaoReceita.class.php index 604cf74..1057f62 100755 --- a/gestaoFinanceira/fontes/PHP/orcamento/classes/negocio/ROrcamentoClassificacaoReceita.class.php +++ b/gestaoFinanceira/fontes/PHP/orcamento/classes/negocio/ROrcamentoClassificacaoReceita.class.php @@ -30,7 +30,7 @@ * @author Analista: Jorge B. Ribarr * @author Desenvolvedor: Marcelo Boezzio Paulino - $Id: ROrcamentoClassificacaoReceita.class.php 63193 2015-08-03 20:34:35Z arthur $ + $Id: ROrcamentoClassificacaoReceita.class.php 64153 2015-12-09 19:16:02Z evandro $ * Casos de uso: uc-02.01.04, uc-02.01.06 */ @@ -427,9 +427,7 @@ function listar(&$rsLista, $stOrder = "", $obTransacao = "") $stFiltro .= " WHERE \n"; $stFiltro .= " pc.cod_conta = pa.cod_conta \n"; $stFiltro .= " AND pc.exercicio = pa.exercicio \n"; - if ( !SistemaLegado::is_tcems($boTransacao) || Sessao::getExercicio() < 2012 ) { - $stFiltro .= " AND pc.cod_estrutural = '4.'||conta_receita.cod_estrutural \n"; - } + $stFiltro .= " AND pc.cod_estrutural = '4.'||conta_receita.cod_estrutural \n"; $stFiltro .= " AND pc.exercicio = conta_receita.exercicio \n"; $stFiltro .= " AND pa.exercicio = '".$this->getExercicio()."' \n"; $stFiltro .= " ) \n"; @@ -460,7 +458,7 @@ function consultar(&$rsLista, $boTransacao = "") $stFiltro .= " AND cod_estrutural = '".$this->getMascClassificacao()."'"; } if ( $this->getListarAnaliticas() ) { - if (!SistemaLegado::is_tcems($boTransacao)) { + if (!Sessao::getExercicio() > '2012') { if ($this->getDedutora()) { $stFiltro .= " AND cod_estrutural||exercicio in ( \n"; $stFiltro .= " SELECT pc.cod_estrutural||pc.exercicio \n"; diff --git a/gestaoFinanceira/fontes/PHP/orcamento/classes/negocio/ROrcamentoReceita.class.php b/gestaoFinanceira/fontes/PHP/orcamento/classes/negocio/ROrcamentoReceita.class.php index 946a57f..5767969 100755 --- a/gestaoFinanceira/fontes/PHP/orcamento/classes/negocio/ROrcamentoReceita.class.php +++ b/gestaoFinanceira/fontes/PHP/orcamento/classes/negocio/ROrcamentoReceita.class.php @@ -30,7 +30,7 @@ * @author Analista: Jorge B. Ribarr * @author Desenvolvedor: Marcelo Boezzio Paulino - $Id: ROrcamentoReceita.class.php 63294 2015-08-13 18:28:40Z evandro $ + $Id: ROrcamentoReceita.class.php 64153 2015-12-09 19:16:02Z evandro $ * Casos de uso: uc-02.01.06, uc-02.02.01, uc-02.04.04 */ @@ -451,7 +451,7 @@ function listarReceitaAnalitica(&$rsLista, $stFiltro = "", $boTransacao = "") WHERE receita.cod_receita = dr.cod_receita_secundaria AND receita.exercicio = dr.exercicio ) "; - if ( SistemaLegado::is_tcems() ) { + if ( Sessao::getExercicio() > '2012' ) { $stFiltro .= "AND CLR.estorno = 'f'"; $obErro = $obTOrcamentoReceita->recuperaReceitaAnaliticaTCE( $rsLista, $stFiltro, $stOrder, $boTransacao ); } else { @@ -476,7 +476,7 @@ function listarReceitaAnalitica(&$rsLista, $stFiltro = "", $boTransacao = "") $stFiltro .= " AND CLASSIFICACAO.mascara_classificacao like publico.fn_mascarareduzida('".$this->obROrcamentoClassificacaoReceita->getMascClassificacao()."')||'%' "; } - if ( SistemaLegado::is_tcems() ) { + if ( Sessao::getExercicio() > '2012' ) { $stFiltro .= "AND CLR.estorno = 'f'"; $obErro = $obTOrcamentoReceita->recuperaReceitaAnaliticaTCE( $rsLista, $stFiltro, $stOrder, $boTransacao ); } else { diff --git a/gestaoFinanceira/fontes/PHP/orcamento/classes/negocio/ROrcamentoRelatorioAnexo9.class.php b/gestaoFinanceira/fontes/PHP/orcamento/classes/negocio/ROrcamentoRelatorioAnexo9.class.php index b25c1db..e2ab9bb 100755 --- a/gestaoFinanceira/fontes/PHP/orcamento/classes/negocio/ROrcamentoRelatorioAnexo9.class.php +++ b/gestaoFinanceira/fontes/PHP/orcamento/classes/negocio/ROrcamentoRelatorioAnexo9.class.php @@ -158,9 +158,6 @@ function geraRecordSet(&$rsRecordSet, $stOrder = "") $arCampos[$inCount] = "TOTAL"; $arCampoRecordSet[$inCount] = "vl_total"; -// echo "Valores do arCampos"; mostravar ($arCampos); -// echo "Valores do arCampoRecordSet"; mostravar ($arCampoRecordSet); - // Monta relatorio completo conforme impressao $inCount = 0; while ( !$rsRecordSet->eof() ) { diff --git a/gestaoFinanceira/fontes/PHP/orcamento/classes/negocio/ROrcamentoSuplementacao.class.php b/gestaoFinanceira/fontes/PHP/orcamento/classes/negocio/ROrcamentoSuplementacao.class.php index b3cdaee..b4a3156 100755 --- a/gestaoFinanceira/fontes/PHP/orcamento/classes/negocio/ROrcamentoSuplementacao.class.php +++ b/gestaoFinanceira/fontes/PHP/orcamento/classes/negocio/ROrcamentoSuplementacao.class.php @@ -42,24 +42,6 @@ uc-02.01.07 */ -/* -$Log$ -Revision 1.15 2007/06/06 13:21:38 vitor -#8624# - -Revision 1.14 2006/07/17 16:29:31 cleisson -Bug #6556# - -Revision 1.13 2006/07/14 17:58:17 andre.almeida -Bug #6556# - -Alterado scripts de NOT IN para NOT EXISTS. - -Revision 1.12 2006/07/05 20:42:11 cleisson -Adicionada tag Log aos arquivos - -*/ - include_once '../../../../../../gestaoAdministrativa/fontes/PHP/framework/include/valida.inc.php'; include_once ( CAM_GF_ORC_NEGOCIO ."ROrcamentoDespesa.class.php" ); include_once ( CAM_GA_NORMAS_NEGOCIO."RNorma.class.php" ); @@ -792,7 +774,7 @@ function fazerLancamento($boTransacao = "") $this->stDecreto = $this->obRNorma->obRTipoNorma->getNomeTipoNorma().' '.$this->obRNorma->getNumNorma().'/'.$this->obRNorma->getExercicio(); $this->stDecreto .= ' - '.$this->obRNorma->getNomeNorma(); //Desabilitado, para a funcionalidade Alteração Orçamentária pois ainda não temos os lançamentos oficiais de suplementação para a nova contabilidade. Somente para cliente do tcems - if (Sessao::getExercicio() > 2012 || !SistemaLegado::is_tcems($boTransacao)) { + if (Sessao::getExercicio() > '2012') { if ( in_array( $this->inCodTipo, array( 1,2,3,4,5 ) ) ) { $obErro = $this->fazerLancamentoSuplementar( $boTransacao ); } elseif ( in_array( $this->inCodTipo, array( 6,7,8,9,10 ) ) ) { @@ -1243,7 +1225,7 @@ function listarSuplementacao(&$rsLista, $stOrder = "", $boTransacao = "") if ( $this->obRContabilidadeTransferenciaDespesa->obRContabilidadeLancamentoTransferencia->obRContabilidadeLancamento->obRContabilidadeLote->obROrcamentoEntidade->getCodigoEntidade() ) { $inCodEntidade = $this->obRContabilidadeTransferenciaDespesa->obRContabilidadeLancamentoTransferencia->obRContabilidadeLancamento->obRContabilidadeLote->obROrcamentoEntidade->getCodigoEntidade(); - if (SistemaLegado::is_tcems($boTransacao)) { + if (Sessao::getExercicio() > '2012') { $stFiltro .= " ( OSS.cod_entidade IN ( ".$inCodEntidade. " ) OR OSR.cod_entidade IN ( ".$inCodEntidade. " ) ) AND "; } else { $stFiltro .= " CTD.cod_entidade IN ( ".$inCodEntidade. " ) AND "; @@ -1464,3 +1446,5 @@ function consultarHistoricoLancamento($boTransacao = "") } } + +?> \ No newline at end of file diff --git a/gestaoFinanceira/fontes/PHP/orcamento/instancias/alteracaoOrcamento/FMManterExcesso.php b/gestaoFinanceira/fontes/PHP/orcamento/instancias/alteracaoOrcamento/FMManterExcesso.php index 07e1189..fb2c9c2 100755 --- a/gestaoFinanceira/fontes/PHP/orcamento/instancias/alteracaoOrcamento/FMManterExcesso.php +++ b/gestaoFinanceira/fontes/PHP/orcamento/instancias/alteracaoOrcamento/FMManterExcesso.php @@ -62,7 +62,7 @@ $obTContabilidadeEncerramentoMes->setDado('exercicio', Sessao::getExercicio()); $obTContabilidadeEncerramentoMes->setDado('situacao', 'F'); $obTContabilidadeEncerramentoMes->recuperaEncerramentoMes($rsUltimoMesEncerrado, '', ' ORDER BY mes DESC LIMIT 1 '); -if ($rsUltimoMesEncerrado->getCampo('mes') >= $mesAtual AND $boUtilizarEncerramentoMes == 'true') { +if ($rsUltimoMesEncerrado->getCampo('mes') >= $mesAtual && $boUtilizarEncerramentoMes == 'true') { $obSpan = new Span; $obSpan->setValue('Não é possível utilizar esta rotina pois o mês atual está encerrado!'); $obSpan->setStyle('align: center;'); @@ -80,9 +80,9 @@ if ($rsUltimoMesEncerrado->getCampo('mes') >= $mesAtual AND $boUtilizarEncerrame $obRegra->obRNorma->setExercicio( Sessao::getExercicio() ); $obRegra->obRNorma->listarDecreto( $rsNorma ); - $stAcao = $_POST["stAcao"] ? $_POST["stAcao"] : $_GET["stAcao"]; + $stAcao = $request->get("stAcao"); + Sessao::remove('arDespesaSuplementar'); - //sessao->transf3 = array(); if ($stAcao == 'Especial') { $inCodTipo = 9; @@ -140,7 +140,6 @@ if ($rsUltimoMesEncerrado->getCampo('mes') >= $mesAtual AND $boUtilizarEncerrame $obTxtDtLancamento->setId ( "stData" ); $obTxtDtLancamento->setName ( "stData" ); $obTxtDtLancamento->setValue ( '' ); - //$obTxtDtLancamento->setValue ( date('d/m/Y') ); $obTxtDtLancamento->setNull ( false ); // Define Objeto TextArea para Motivo @@ -229,6 +228,7 @@ if ($rsUltimoMesEncerrado->getCampo('mes') >= $mesAtual AND $boUtilizarEncerrame } else { $obFormulario->addTitulo ( "Dados para Crédito Especial por Excesso de Arrecadação" ); } + $obFormulario->addComponente ( $obCmbCodEntidade ); $obFormulario->addComponente ( $obBscNorma ); $obFormulario->addComponente ( $obTxtDtLancamento ); diff --git a/gestaoFinanceira/fontes/PHP/orcamento/instancias/alteracaoOrcamento/PRManterExcesso.php b/gestaoFinanceira/fontes/PHP/orcamento/instancias/alteracaoOrcamento/PRManterExcesso.php index 6d2accd..6e8c998 100755 --- a/gestaoFinanceira/fontes/PHP/orcamento/instancias/alteracaoOrcamento/PRManterExcesso.php +++ b/gestaoFinanceira/fontes/PHP/orcamento/instancias/alteracaoOrcamento/PRManterExcesso.php @@ -58,19 +58,20 @@ $stAcao = $request->get('stAcao'); //valida a utilização da rotina de encerramento do mês contábil $boUtilizarEncerramentoMes = SistemaLegado::pegaConfiguracao('utilizar_encerramento_mes', 9); + include_once CAM_GF_CONT_MAPEAMENTO."TContabilidadeEncerramentoMes.class.php"; + $obTContabilidadeEncerramentoMes = new TContabilidadeEncerramentoMes; $obTContabilidadeEncerramentoMes->setDado('exercicio', Sessao::getExercicio()); $obTContabilidadeEncerramentoMes->setDado('situacao', 'F'); $obTContabilidadeEncerramentoMes->recuperaEncerramentoMes($rsUltimoMesEncerrado, '', ' ORDER BY mes DESC LIMIT 1 '); $arDtAutorizacao = explode('/', $request->get('stData')); -if ($boUtilizarEncerramentoMes == 'true' AND $rsUltimoMesEncerrado->getCampo('mes') >= $arDtAutorizacao[1]) { +if ($boUtilizarEncerramentoMes == 'true' && $rsUltimoMesEncerrado->getCampo('mes') >= $arDtAutorizacao[1]) { SistemaLegado::exibeAviso(urlencode("Mês do Crédito encerrado!"),"n_incluir","erro"); exit; } -//echo $stAcao; switch ($stAcao) { case "Suplementa": case "Especial": @@ -82,7 +83,7 @@ switch ($stAcao) { $obROrcamentoSuplementacao->obRNorma->setCodNorma( $request->get('inCodNorma') ); $obROrcamentoSuplementacao->setVlTotal( $nuVlNorma ); $obROrcamentoSuplementacao->setDecreto( $stDecreto ); - $obROrcamentoSuplementacao->obRContabilidadeTransferenciaDespesa->obRContabilidadeLancamentoTransferencia->obRContabilidadeLancamento->obRContabilidadeLote->obROrcamentoEntidade->setCodigoEntidade( $_POST['inCodEntidade'] ); + $obROrcamentoSuplementacao->obRContabilidadeTransferenciaDespesa->obRContabilidadeLancamentoTransferencia->obRContabilidadeLancamento->obRContabilidadeLote->obROrcamentoEntidade->setCodigoEntidade( $request->get('inCodEntidade') ); $obROrcamentoSuplementacao->setCredSuplementar( 'Excesso' ); $obROrcamentoSuplementacao->setMotivo( $request->get('stMotivo') ); $obROrcamentoSuplementacao->setDtLancamento( $request->get('stData') ); diff --git a/gestaoFinanceira/fontes/PHP/orcamento/instancias/processamento/OCReceita.php b/gestaoFinanceira/fontes/PHP/orcamento/instancias/processamento/OCReceita.php index ff58b66..b6053f4 100755 --- a/gestaoFinanceira/fontes/PHP/orcamento/instancias/processamento/OCReceita.php +++ b/gestaoFinanceira/fontes/PHP/orcamento/instancias/processamento/OCReceita.php @@ -30,7 +30,7 @@ * @author Analista: Diego Barbosa Victoria * @author Desenvolvedor: Diego Barbosa Victoria - $Id: OCReceita.php 61612 2015-02-13 16:47:23Z lisiane $ + $Id: OCReceita.php 64153 2015-12-09 19:16:02Z evandro $ Casos de uso: uc-02.01.06 */ @@ -121,7 +121,7 @@ function buscaReceita($stTipoBusca, $stEntidades = "") FROM contabilidade.desdobramento_receita as dr WHERE receita.cod_receita = dr.cod_receita_secundaria AND receita.exercicio = dr.exercicio ) "; - if ( SistemaLegado::is_tcems() ) { + if ( Sessao::getExercicio() > '2012' ) { $obMapeamento->recuperaReceitaAnaliticaTCE($rsRecordSet, $stFiltro); } else { $obMapeamento->recuperaReceitaAnalitica($rsRecordSet, $stFiltro); @@ -138,7 +138,7 @@ function buscaReceita($stTipoBusca, $stEntidades = "") FROM contabilidade.desdobramento_receita as dr WHERE receita.cod_receita = dr.cod_receita_secundaria AND receita.exercicio = dr.exercicio ) "; - if ( SistemaLegado::is_tcems() ) { + if ( Sessao::getExercicio() > '2012' ) { $stFiltro .= " AND CLR.estorno = 'false' "; $obMapeamento->recuperaReceitaAnaliticaTCE($rsRecordSet, $stFiltro); } else { diff --git a/gestaoFinanceira/fontes/PHP/orcamento/instancias/recurso/PRRecurso.php b/gestaoFinanceira/fontes/PHP/orcamento/instancias/recurso/PRRecurso.php index a40fa0a..5cee44e 100755 --- a/gestaoFinanceira/fontes/PHP/orcamento/instancias/recurso/PRRecurso.php +++ b/gestaoFinanceira/fontes/PHP/orcamento/instancias/recurso/PRRecurso.php @@ -29,7 +29,7 @@ * @author Desenvolvedor: Marcelo Boezzio Paulino - * $Id: PRRecurso.php 60248 2014-10-08 17:43:58Z arthur $ + * $Id: PRRecurso.php 64153 2015-12-09 19:16:02Z evandro $ * Casos de uso: uc-02.01.05 */ @@ -109,7 +109,7 @@ switch ($stAcao) { if (Sessao::getExercicio() > '2008' && Sessao::getExercicio() <= '2013') { if (!$obErro->ocorreu()) { - if ( SistemaLegado::is_tcems($boTransacao) ) { + if ( Sessao::getExercicio() > '2012' ) { $obRContabilidadePlanoBanco->setCodEstrutural('7.2.1.1.1.'); } else { $obRContabilidadePlanoBanco->setCodEstrutural('1.9.3.2.0.00.00.'); @@ -122,7 +122,7 @@ switch ($stAcao) { $obRContabilidadePlanoBanco->obRContabilidadeClassificacaoContabil->setCodClassificacao(1); $inProximoCodEstruturalD++; $inProximoCodEstruturalD = str_pad($inProximoCodEstruturalD, 2, "0", STR_PAD_LEFT); - if ( SistemaLegado::is_tcems($boTransacao) ) { + if ( Sessao::getExercicio() > '2012' ) { $stCodEstruturalD = '7.2.1.1.1.'.$inProximoCodEstruturalD.'.00'; } else { $stCodEstruturalD = '1.9.3.2.0.00.00.'.$inProximoCodEstruturalD.'.00.00'; @@ -145,7 +145,7 @@ switch ($stAcao) { if (!$obErro->ocorreu()) { $obRContabilidadePlanoBanco = new RContabilidadePlanoBanco; - if ( SistemaLegado::is_tcems($boTransacao) ) { + if ( Sessao::getExercicio() > '2012' ) { $obRContabilidadePlanoBanco->setCodEstrutural('8.2.1.1.1.'); } else { $obRContabilidadePlanoBanco->setCodEstrutural('2.9.3.2.0.00.00.'); @@ -158,7 +158,7 @@ switch ($stAcao) { $obRContabilidadePlanoBanco->obRContabilidadeClassificacaoContabil->setCodClassificacao(1); $inProximoCodEstruturalC++; $inProximoCodEstruturalC = str_pad($inProximoCodEstruturalC, 2, "0", STR_PAD_LEFT); - if ( SistemaLegado::is_tcems($boTransacao) ) { + if ( Sessao::getExercicio() > '2012' ) { $stCodEstruturalC = '8.2.1.1.1.'.$inProximoCodEstruturalC.'.00'; } else { $stCodEstruturalC = '2.9.3.2.0.00.00.'.$inProximoCodEstruturalC.'.00.00'; @@ -173,7 +173,7 @@ switch ($stAcao) { $obErro = $obRContabilidadePlanoBanco->salvar($boTransacao); - if (!$obErro->ocorreu() && SistemaLegado::is_tcems($boTransacao)) { + if (!$obErro->ocorreu() && Sessao::getExercicio() > '2012') { $obRContabilidadePlanoBanco->setCodEstrutural('8.2.1.1.2.'); $obRContabilidadePlanoBanco->getProximoEstruturalRecurso($rsProxCod); diff --git a/gestaoFinanceira/fontes/PHP/orcamento/instancias/relatorio/OCGeraRelatorioReservaSaldos.php b/gestaoFinanceira/fontes/PHP/orcamento/instancias/relatorio/OCGeraRelatorioReservaSaldos.php index d909c5c..9fbafc2 100755 --- a/gestaoFinanceira/fontes/PHP/orcamento/instancias/relatorio/OCGeraRelatorioReservaSaldos.php +++ b/gestaoFinanceira/fontes/PHP/orcamento/instancias/relatorio/OCGeraRelatorioReservaSaldos.php @@ -91,7 +91,6 @@ $obPDF->addFiltro( 'Periodicidade', $stPeriodicidade ); $obPDF->addFiltro( 'Órgão', $arFiltro['inNumOrgao'].$arNomFiltro['orgao'][$arFiltro['inNumOrgao']] ); $obPDF->addFiltro( 'Unidade', $arFiltro['inNumUnidade'].$arNomFiltro['unidade'][$arFiltro['inNumUnidade']] ); -//sistemaLegado::mostravar(//sessao->filtro) ; if (!$arFiltro['stDtInicial']) { $stSubTitulo = "Periodicidade: Não informada"; } else { diff --git a/gestaoFinanceira/fontes/PHP/orcamento/instancias/relatorio/OCReservaSaldos.php b/gestaoFinanceira/fontes/PHP/orcamento/instancias/relatorio/OCReservaSaldos.php index bd87fca..f7e4948 100755 --- a/gestaoFinanceira/fontes/PHP/orcamento/instancias/relatorio/OCReservaSaldos.php +++ b/gestaoFinanceira/fontes/PHP/orcamento/instancias/relatorio/OCReservaSaldos.php @@ -115,7 +115,7 @@ switch ($stCtrl) { $obRRelatorio = new RRelatorio; $obROrcamentoReservaSaldos = new ROrcamentoRelatorioReservaSaldos; $arFiltro = Sessao::read('filtroRelatorio'); -// sistemaLegado::mostravar//sessao->filtro) ;exit(); + if ( is_array($arFiltro['inCodEntidade']) ) { foreach ($arFiltro['inCodEntidade'] as $inCodEntidadeForm) { $stCodigoEntidade .= $inCodEntidadeForm.','; diff --git a/gestaoFinanceira/fontes/PHP/orcamento/instancias/reservaSaldos/FMManterReservaSaldos.php b/gestaoFinanceira/fontes/PHP/orcamento/instancias/reservaSaldos/FMManterReservaSaldos.php index f8fea06..38cd503 100755 --- a/gestaoFinanceira/fontes/PHP/orcamento/instancias/reservaSaldos/FMManterReservaSaldos.php +++ b/gestaoFinanceira/fontes/PHP/orcamento/instancias/reservaSaldos/FMManterReservaSaldos.php @@ -138,11 +138,12 @@ $obCmbNomeEntidade->setNull ( false ); $obDtDataReserva = new Data; $obDtDataReserva->setName ( "dtDataReserva" ); $obDtDataReserva->setRotulo ( "Data da Reserva" ); -$obDtDataReserva->setTitle ( "Informe a data da reserva." ); +$obDtDataReserva->setTitle ( "Informe a data da reserva." ); $obDtDataReserva->setValue ( $dtDataReserva ); $obDtDataReserva->setMaxLength ( 20 ); $obDtDataReserva->setSize ( 10 ); $obDtDataReserva->setNull ( false ); +$obDtDataReserva->obEvento->setOnChange("buscaDado('buscaDespesa');"); // Define Objeto BuscaInner para Despesa $obBscDespesa = new BuscaInner; diff --git a/gestaoFinanceira/fontes/PHP/orcamento/instancias/reservaSaldos/OCManterReservaSaldos.php b/gestaoFinanceira/fontes/PHP/orcamento/instancias/reservaSaldos/OCManterReservaSaldos.php index e0d1cfa..ed2c919 100755 --- a/gestaoFinanceira/fontes/PHP/orcamento/instancias/reservaSaldos/OCManterReservaSaldos.php +++ b/gestaoFinanceira/fontes/PHP/orcamento/instancias/reservaSaldos/OCManterReservaSaldos.php @@ -40,13 +40,6 @@ * Casos de uso: uc-02.01.08 */ -/* -$Log$ -Revision 1.5 2006/07/05 20:43:33 cleisson -Adicionada tag Log aos arquivos - -*/ - include_once '../../../../../../gestaoAdministrativa/fontes/PHP/pacotes/FrameworkHTML.inc.php'; include_once '../../../../../../gestaoAdministrativa/fontes/PHP/framework/include/valida.inc.php'; include_once( CAM_GF_EMP_NEGOCIO."REmpenhoAutorizacaoEmpenho.class.php" ); @@ -60,7 +53,7 @@ $pgProc = "PR".$stPrograma.".php"; $pgOcul = "OC".$stPrograma.".php"; $pgPror = "PO".$stPrograma.".php"; -$stCtrl = $_GET['stCtrl'] ? $_GET['stCtrl'] : $_POST['stCtrl']; +$stCtrl = $request->get('stCtrl'); $obREmpenhoAutorizacaoEmpenho = new REmpenhoPreEmpenho; function montaLabel($flSaldoDotacao) @@ -88,22 +81,25 @@ function montaLabel($flSaldoDotacao) switch ($stCtrl) { case 'buscaDespesa': - if ($_POST["inCodDespesa"] != "" and $_POST["inCodigoEntidade"] != "") { + if ($request->get('inCodDespesa') != "" and $request->get('inCodigoEntidade') != "") { - $obREmpenhoAutorizacaoEmpenho->obROrcamentoDespesa->setCodDespesa( $_POST["inCodDespesa"] ); - $obREmpenhoAutorizacaoEmpenho->obROrcamentoDespesa->obROrcamentoEntidade->setCodigoEntidade( $_POST["inCodigoEntidade"] ); + $obREmpenhoAutorizacaoEmpenho->obROrcamentoDespesa->setCodDespesa( $request->get('inCodDespesa') ); + $obREmpenhoAutorizacaoEmpenho->obROrcamentoDespesa->obROrcamentoEntidade->setCodigoEntidade( $request->get('inCodigoEntidade') ); $obREmpenhoAutorizacaoEmpenho->obROrcamentoDespesa->setExercicio( Sessao::getExercicio() ); $obREmpenhoAutorizacaoEmpenho->obROrcamentoDespesa->listarDespesaUsuario( $rsDespesa ); $obREmpenhoAutorizacaoEmpenho->setExercicio( Sessao::getExercicio() ); - $obREmpenhoAutorizacaoEmpenho->consultaSaldoAnterior( $nuSaldoDotacao ); + $obREmpenhoAutorizacaoEmpenho->setdataEmpenho($request->get('dtDataReserva')); + $obREmpenhoAutorizacaoEmpenho->setCodEntidade($request->get('inCodigoEntidade')); + $obREmpenhoAutorizacaoEmpenho->setTipoEmissao('R'); + $obREmpenhoAutorizacaoEmpenho->consultaSaldoAnteriorDataEmpenho($nuSaldoDotacao); $stNomDespesa = $rsDespesa->getCampo( "descricao" ); if (!$stNomDespesa) { $js .= 'f.inCodDespesa.value = "";'; $js .= 'window.parent.frames["telaPrincipal"].document.frm.inCodDespesa.focus();'; $js .= 'd.getElementById("stNomDespesa").innerHTML = " ";'; - $js .= "alertaAviso('@Valor inválido. (".$_POST["inCodDespesa"].")','form','erro','".Sessao::getId()."');"; + $js .= "alertaAviso('@Valor inválido. (".$request->get('inCodDespesa').")','form','erro','".Sessao::getId()."');"; $js .= "d.getElementById('spnSaldoDotacao').innerHTML = '';"; } else { $js .= 'd.getElementById("stNomDespesa").innerHTML = "'.$stNomDespesa.'";'; diff --git a/gestaoFinanceira/fontes/PHP/orcamento/popups/receita/LSReceita.php b/gestaoFinanceira/fontes/PHP/orcamento/popups/receita/LSReceita.php index dd7a8ce..a9b5463 100755 --- a/gestaoFinanceira/fontes/PHP/orcamento/popups/receita/LSReceita.php +++ b/gestaoFinanceira/fontes/PHP/orcamento/popups/receita/LSReceita.php @@ -29,7 +29,7 @@ * @author Desenvolvedor: Marcelo Boezzio Paulino - $Id: LSReceita.php 59612 2014-09-02 12:00:51Z gelson $ + $Id: LSReceita.php 64153 2015-12-09 19:16:02Z evandro $ * Casos de uso: uc-02.01.06 */ @@ -134,7 +134,7 @@ switch ($_REQUEST['tipoBusca']) { FROM contabilidade.desdobramento_receita as dr WHERE receita.cod_receita = dr.cod_receita_secundaria AND receita.exercicio = dr.exercicio ) "; - if ( SistemaLegado::is_tcems() ) { + if ( Sessao::getExercicio() > '2012' ) { $stFiltro .= " AND CLR.estorno = 'false' "; $obMapeamento->recuperaReceitaAnaliticaTCE($rsLista, $stFiltro, " ORDER BY mascara_classificacao"); } else { diff --git a/gestaoFinanceira/fontes/PHP/tesouraria/classes/mapeamento/FTesourariaEmitirBoletim.class.php b/gestaoFinanceira/fontes/PHP/tesouraria/classes/mapeamento/FTesourariaEmitirBoletim.class.php index 4b010e5..2d0eec2 100755 --- a/gestaoFinanceira/fontes/PHP/tesouraria/classes/mapeamento/FTesourariaEmitirBoletim.class.php +++ b/gestaoFinanceira/fontes/PHP/tesouraria/classes/mapeamento/FTesourariaEmitirBoletim.class.php @@ -145,6 +145,7 @@ function recuperaMovimentoBanco(&$rsRecordSet, $stCondicao = "", $boTransacao = function montaRecuperaMovimentoBanco($obTransacao = "") { + $boNovoPlanoConta = (Sessao::getExercicio() > '2012')?true:false; $stSql = "SELECT '".$this->getDado("stExercicio")."' as exercicio, * \n"; $stSql .= "FROM tesouraria.fn_recupera_movimento_banco('".$this->getDado("stFiltroTransferenciaBanco")."', \n"; $stSql .= " '".$this->getDado("stFiltroTransferenciaEstornadaBanco")."',\n"; @@ -155,7 +156,7 @@ function montaRecuperaMovimentoBanco($obTransacao = "") $stSql .= " '".$this->getDado("stEntidade") ."', \n"; $stSql .= " '".$this->getDado("stExercicio") ."', \n"; $stSql .= " '".$this->getDado("stDtBoletim") ."', \n"; - $stSql .= " '".SistemaLegado::is_tcems($obTransacao)."' \n"; + $stSql .= " '".$boNovoPlanoConta."' \n"; $stSql .= ") as retorno( cod_estrutural VARCHAR \n"; $stSql .= " ,cod_plano INTEGER \n"; $stSql .= " ,nom_conta VARCHAR \n"; @@ -600,7 +601,7 @@ function recuperaArrecadacao(&$rsRecordSet, $stCondicao = "", $stOrder = "", $b function montaRecuperaArrecadacao($boTransacao = "") { $stSql .= "SELECT * \n"; - if (SistemaLegado::is_tcems($boTransacao)) { + if (Sessao::getExercicio() > '2012') { $stSql .= "FROM tesouraria.fn_listar_arrecadacao_tce('".$this->getDado("stFiltroArrecadacao")."', '".$this->getDado("stFiltroArrecadacao")."') ; \n"; } else { $stSql .= "FROM tesouraria.fn_listar_arrecadacao_tce('".$this->getDado("stFiltroArrecadacao")."', '".$this->getDado("stFiltroArrecadacao")."') ; \n"; diff --git a/gestaoFinanceira/fontes/PHP/tesouraria/classes/mapeamento/FTesourariaEstornoRealizacaoReceitaFixa.class.php b/gestaoFinanceira/fontes/PHP/tesouraria/classes/mapeamento/FTesourariaEstornoRealizacaoReceitaFixa.class.php index 61941ea..a0ec055 100755 --- a/gestaoFinanceira/fontes/PHP/tesouraria/classes/mapeamento/FTesourariaEstornoRealizacaoReceitaFixa.class.php +++ b/gestaoFinanceira/fontes/PHP/tesouraria/classes/mapeamento/FTesourariaEstornoRealizacaoReceitaFixa.class.php @@ -100,10 +100,10 @@ function montaExecutaFuncao($boTransacao = "") $stSql .= " ".$this->getDado("cod_lote") ." , \n"; $stSql .= " '".$this->getDado("tipo_lote") ."', \n"; $stSql .= " ".$this->getDado("cod_entidade") ." , \n"; - if ( !SistemaLegado::is_tcems($boTransacao) ) { + if ( !Sessao::getExercicio() > '2012' ) { $stSql .= " ".$this->getDado('valor_despesa') ." , \n"; } - if ( !SistemaLegado::is_tcems($boTransacao) ) { + if ( !Sessao::getExercicio() > '2012' ) { $stSql .= " ".$this->getDado('valor_disponibilidades') ." , \n"; } if($this->getDado('cod_historico')) diff --git a/gestaoFinanceira/fontes/PHP/tesouraria/classes/mapeamento/FTesourariaEstornoRealizacaoReceitaVariavel.class.php b/gestaoFinanceira/fontes/PHP/tesouraria/classes/mapeamento/FTesourariaEstornoRealizacaoReceitaVariavel.class.php index a37c7ee..292a6d9 100755 --- a/gestaoFinanceira/fontes/PHP/tesouraria/classes/mapeamento/FTesourariaEstornoRealizacaoReceitaVariavel.class.php +++ b/gestaoFinanceira/fontes/PHP/tesouraria/classes/mapeamento/FTesourariaEstornoRealizacaoReceitaVariavel.class.php @@ -156,7 +156,7 @@ function executaFuncao(&$rsRecordSet, $boTransacao = "") } } if ( !$obErro->ocorreu() ) { - if ( SistemaLegado::is_tcems($boTransacao) ) { + if ( Sessao::getExercicio() > '2012' ) { $stSql = $this->montaExecutaFuncaoTCEMS(); } else { $stSql = $this->montaExecutaFuncao(); diff --git a/gestaoFinanceira/fontes/PHP/tesouraria/classes/mapeamento/FTesourariaExtratoBancario.class.php b/gestaoFinanceira/fontes/PHP/tesouraria/classes/mapeamento/FTesourariaExtratoBancario.class.php index dce17ab..9364a26 100755 --- a/gestaoFinanceira/fontes/PHP/tesouraria/classes/mapeamento/FTesourariaExtratoBancario.class.php +++ b/gestaoFinanceira/fontes/PHP/tesouraria/classes/mapeamento/FTesourariaExtratoBancario.class.php @@ -99,8 +99,6 @@ function montaRecuperaTodos() $stSql .= " ,situacao varchar \n"; $stSql .= " ,cod_situacao varchar \n"; $stSql .= " ) "; - #sistemaLegado::mostravar($stSql); - #die('Fim'); return $stSql; diff --git a/gestaoFinanceira/fontes/PHP/tesouraria/classes/mapeamento/FTesourariaRealizacaoReceitaFixa.class.php b/gestaoFinanceira/fontes/PHP/tesouraria/classes/mapeamento/FTesourariaRealizacaoReceitaFixa.class.php index 5c705cb..527c24b 100755 --- a/gestaoFinanceira/fontes/PHP/tesouraria/classes/mapeamento/FTesourariaRealizacaoReceitaFixa.class.php +++ b/gestaoFinanceira/fontes/PHP/tesouraria/classes/mapeamento/FTesourariaRealizacaoReceitaFixa.class.php @@ -63,7 +63,7 @@ class FTesourariaRealizacaoReceitaFixa extends Persistente function FTesourariaRealizacaoReceitaFixa($boTransacao = "") { parent::Persistente(); - if ( sistemaLegado::is_tcems($boTransacao) ) { + if ( Sessao::getExercicio() > '2012' ) { $this->setTabela('RealizacaoReceitaFixaTribunal'); } else { $this->setTabela('RealizacaoReceitaFixa'); @@ -105,12 +105,12 @@ function montaExecutaFuncao($boTransacao = "") $stSql .= " '".$this->getDado("tipo_lote") ."', \n"; $stSql .= " ".$this->getDado("cod_entidade") ." , \n"; //if ( $this->getDado('valor_despesa') ) { - if ( !sistemaLegado::is_tcems($boTransacao) ) { + if ( !Sessao::getExercicio() > '2012' ) { $stSql .= " ".$this->getDado('valor_despesa') ." , \n"; } //} //if ( $this->getDado('valor_disponibilidades') ) { - if ( !sistemaLegado::is_tcems($boTransacao) ) { + if ( !Sessao::getExercicio() > '2012' ) { $stSql .= " ".$this->getDado('valor_disponibilidades') ." , \n"; } //} diff --git a/gestaoFinanceira/fontes/PHP/tesouraria/classes/mapeamento/FTesourariaRealizacaoReceitaVariavel.class.php b/gestaoFinanceira/fontes/PHP/tesouraria/classes/mapeamento/FTesourariaRealizacaoReceitaVariavel.class.php index f1006ea..24901bd 100755 --- a/gestaoFinanceira/fontes/PHP/tesouraria/classes/mapeamento/FTesourariaRealizacaoReceitaVariavel.class.php +++ b/gestaoFinanceira/fontes/PHP/tesouraria/classes/mapeamento/FTesourariaRealizacaoReceitaVariavel.class.php @@ -159,7 +159,7 @@ function executaFuncao(&$rsRecordSet, $boTransacao = "") } } if ( !$obErro->ocorreu() ) { - if (SistemaLegado::is_tcems($boTransacao)) { + if (Sessao::getExercicio() > '2012') { $stSql = $this->montaExecutaFuncaoTCEMS(); } else { $stSql = $this->montaExecutaFuncao(); diff --git a/gestaoFinanceira/fontes/PHP/tesouraria/classes/negocio/RTesourariaArrecadacao.class.php b/gestaoFinanceira/fontes/PHP/tesouraria/classes/negocio/RTesourariaArrecadacao.class.php index 0095731..7fdfd83 100755 --- a/gestaoFinanceira/fontes/PHP/tesouraria/classes/negocio/RTesourariaArrecadacao.class.php +++ b/gestaoFinanceira/fontes/PHP/tesouraria/classes/negocio/RTesourariaArrecadacao.class.php @@ -33,7 +33,7 @@ * @package URBEM * @subpackage Regra - $Id: RTesourariaArrecadacao.class.php 59612 2014-09-02 12:00:51Z gelson $ + $Id: RTesourariaArrecadacao.class.php 64153 2015-12-09 19:16:02Z evandro $ $Revision: 31732 $ $Name$ @@ -659,7 +659,7 @@ function listarArrecadacaoNaoEstornada(&$rsRecordSet, $stFiltro = "", $stOrder = function listarArrecadacaoValorConta(&$rsRecordSet, $stOrder = "", $boTransacao = "", $boRetencao = "") { $stFiltro=""; - if (SistemaLegado::is_tcems($boTransacao)) { + if (Sessao::getExercicio() > '2012') { include_once( CAM_GF_TES_MAPEAMENTO ."FTesourariaListarArrecadacaoTCEMS.class.php" ); $obFTesourariaListarArrecadacao = new FTesourariaListarArrecadacaoTCEMS(); } else { diff --git a/gestaoFinanceira/fontes/PHP/tesouraria/classes/negocio/RTesourariaBoletim.class.php b/gestaoFinanceira/fontes/PHP/tesouraria/classes/negocio/RTesourariaBoletim.class.php index 47c12ee..21332e7 100755 --- a/gestaoFinanceira/fontes/PHP/tesouraria/classes/negocio/RTesourariaBoletim.class.php +++ b/gestaoFinanceira/fontes/PHP/tesouraria/classes/negocio/RTesourariaBoletim.class.php @@ -33,7 +33,7 @@ * @package URBEM * @subpackage Regra - $Id: RTesourariaBoletim.class.php 59612 2014-09-02 12:00:51Z gelson $ + $Id: RTesourariaBoletim.class.php 64153 2015-12-09 19:16:02Z evandro $ $Revision: 32021 $ $Name$ @@ -449,7 +449,7 @@ function lancarArrecadacao(&$arCodLote, $rsArrecadacao, $boRetencao = "", $boTra // Verifica qual o cod_recurso que possui conta contabil vinculada $obTOrcamentoRecursoDestinacao->setDado('exercicio', Sessao::getExercicio()); $obTOrcamentoRecursoDestinacao->setDado('cod_especificacao', $inCodEspecificacao); - if ( SistemaLegado::is_tcems($boTransacao) ) { + if ( Sessao::getExercicio() > '2012' ) { $obTOrcamentoRecursoDestinacao->setDado('cod_estrutural', "'8.2.1.1.1.%'"); } else { $obTOrcamentoRecursoDestinacao->setDado('cod_estrutural', "'2.9.3.2.0.00.00.%'"); @@ -464,7 +464,7 @@ function lancarArrecadacao(&$arCodLote, $rsArrecadacao, $boRetencao = "", $boTra $obTContabilidadePlanoBanco = new TContabilidadePlanoBanco; $obTContabilidadePlanoBanco->setDado('cod_recurso',$inCodRecurso); $obTContabilidadePlanoBanco->setDado('exercicio',Sessao::getExercicio()); - if ( SistemaLegado::is_tcems($boTransacao) ) { + if ( Sessao::getExercicio() > '2012' ) { $obTContabilidadePlanoBanco->setDado('cod_estrutural', "7.2.1.1.1.%"); } else { $obTContabilidadePlanoBanco->setDado('cod_estrutural', "1.9.3.2.0.00.00.%"); @@ -481,7 +481,7 @@ function lancarArrecadacao(&$arCodLote, $rsArrecadacao, $boRetencao = "", $boTra } if ( !$obErro->ocorreu() ) { - if ( SistemaLegado::is_tcems($boTransacao) ) { + if ( Sessao::getExercicio() > '2012' ) { $obTContabilidadePlanoBanco->setDado('cod_estrutural', "8.2.1.1.1.%"); } else { $obTContabilidadePlanoBanco->setDado('cod_estrutural', "2.9.3.2.0.00.00.%"); @@ -540,7 +540,7 @@ function lancarArrecadacao(&$arCodLote, $rsArrecadacao, $boRetencao = "", $boTra $nuSomatorioReceita = bcadd( $nuSomatorioReceita , $nuValorParcela, 4 ); $nuVlReceitaPrincipal = bcsub( $nuVlReceitaPrincipal, $nuValorParcela, 4 ); - if ( SistemaLegado::is_tcems($boTransacao) ) { + if ( Sessao::getExercicio() > '2012' ) { if ($boCreditoTributario == "t") { $stCodPlanoEstruturalDebito = $rsArrecadacao->getCampo('conta_debito'); //código da conta de banco/caixa da arrecadação @@ -576,7 +576,7 @@ function lancarArrecadacao(&$arCodLote, $rsArrecadacao, $boRetencao = "", $boTra } if ( !$obErro->ocorreu() ) { - if ( SistemaLegado::is_tcems( $boTransacao ) ) { + if ( Sessao::getExercicio() > '2012' ) { if ($boCreditoTributario != "t") { $stClasReceita = str_replace( ".", "", $rsLista->getCampo( "cod_estrutural" )); $stCodPlanoClasReceita = $rsLista->getCampo("cod_plano"); @@ -610,7 +610,7 @@ function lancarArrecadacao(&$arCodLote, $rsArrecadacao, $boRetencao = "", $boTra $obFTesourariaRealizacaoReceitaVariavel->setDado( "cod_historico" , null ); $inCodHistoricoDesdobramento = 907; } - if (SistemaLegado::is_tcems($boTransacao)) { + if (Sessao::getExercicio() > '2012') { $obFTesourariaRealizacaoReceitaVariavel->setDado( "cod_plano_conta_recebimento", $stCodPlanoEstruturalDebito ); $obFTesourariaRealizacaoReceitaVariavel->setDado( "cod_plano_clas_receita" , $stCodPlanoClasReceita ); } @@ -649,7 +649,7 @@ function lancarArrecadacao(&$arCodLote, $rsArrecadacao, $boRetencao = "", $boTra // Verifica qual o cod_recurso que possui conta contabil vinculada $obTOrcamentoRecursoDestinacao->setDado('exercicio', Sessao::getExercicio()); $obTOrcamentoRecursoDestinacao->setDado('cod_especificacao', $inCodEspecificacao); - if ( SistemaLegado::is_tcems($boTransacao) ) { + if ( Sessao::getExercicio() > '2012' ) { $obTOrcamentoRecursoDestinacao->setDado('cod_estrutural', "'2.9.3.2.0.00.00.%'"); } else { $obTOrcamentoRecursoDestinacao->setDado('cod_estrutural', "'8.2.1.1.1.%'"); @@ -712,7 +712,7 @@ function lancarArrecadacao(&$arCodLote, $rsArrecadacao, $boRetencao = "", $boTra $obFTesourariaRealizacaoReceitaFixa->setDado( "tipo_lote" , "A" ); $obFTesourariaRealizacaoReceitaFixa->setDado( "dt_lote" , $this->stDataBoletim ); $obFTesourariaRealizacaoReceitaFixa->setDado( "cod_entidade" , $rsArrecadacao->getCampo( "cod_entidade" ) ); - if ( SistemaLegado::is_tcems( $boTransacao ) ) { + if ( Sessao::getExercicio() > '2012' ) { $obFTesourariaRealizacaoReceitaFixa->setDado( "valor_despesa" , '' ); $obFTesourariaRealizacaoReceitaFixa->setDado( "valor_disponibilidades" , '' ); } else { @@ -732,7 +732,7 @@ function lancarArrecadacao(&$arCodLote, $rsArrecadacao, $boRetencao = "", $boTra $stEstruturalCredito = str_replace( '.', '', $rsArrecadacao->getCampo( "cod_estrutural_credito" ) ); - if ( SistemaLegado::is_tcems($boTransacao) ) { + if ( Sessao::getExercicio() > '2012' ) { if ($boCreditoTributario == "t") { $stCodPlanoEstruturalDebito = $rsArrecadacao->getCampo('conta_debito'); //código da conta de banco/caixa da arrecadação @@ -793,7 +793,7 @@ function lancarArrecadacao(&$arCodLote, $rsArrecadacao, $boRetencao = "", $boTra $obFTesourariaRealizacaoReceitaVariavel->setDado( "cod_historico" , null ); $inCodHistorico = 907; } - if (SistemaLegado::is_tcems($boTransacao)) { + if (Sessao::getExercicio() > '2012') { $obFTesourariaRealizacaoReceitaVariavel->setDado( "cod_plano_conta_recebimento", $stCodPlanoEstruturalDebito ); $obFTesourariaRealizacaoReceitaVariavel->setDado( "cod_plano_clas_receita" , $stCodPlanoEstruturalCredito ); } @@ -862,7 +862,7 @@ function lancarArrecadacao(&$arCodLote, $rsArrecadacao, $boRetencao = "", $boTra $obFTesourariaRealizacaoReceitaFixa->setDado( "tipo_lote" , "A" ); $obFTesourariaRealizacaoReceitaFixa->setDado( "dt_lote" , $this->stDataBoletim ); $obFTesourariaRealizacaoReceitaFixa->setDado( "cod_entidade" , $rsArrecadacao->getCampo( "cod_entidade" ) ); - if ( SistemaLegado::is_tcems( $boTransacao ) ) { + if ( Sessao::getExercicio() > '2012' ) { $obFTesourariaRealizacaoReceitaFixa->setDado( "valor_despesa" , '' ); $obFTesourariaRealizacaoReceitaFixa->setDado( "valor_disponibilidades" , '' ); } else { @@ -902,7 +902,7 @@ function lancarArrecadacao(&$arCodLote, $rsArrecadacao, $boRetencao = "", $boTra $obFTesourariaRealizacaoReceitaFixa->setDado( "tipo_lote" , "A" ); $obFTesourariaRealizacaoReceitaFixa->setDado( "dt_lote" , $this->stDataBoletim ); $obFTesourariaRealizacaoReceitaFixa->setDado( "cod_entidade" , $rsArrecadacao->getCampo( "cod_entidade" ) ); - if ( SistemaLegado::is_tcems( $boTransacao ) ) { + if ( Sessao::getExercicio() > '2012' ) { $obFTesourariaRealizacaoReceitaFixa->setDado( "valor_despesa" , '' ); $obFTesourariaRealizacaoReceitaFixa->setDado( "valor_disponibilidades" , '' ); } else { @@ -997,7 +997,7 @@ function lancarEstornoArrecadacao(&$arCodLote, $rsArrecadacao, $boRetencao = "", // Verifica qual o cod_recurso que possui conta contabil vinculada $obTOrcamentoRecursoDestinacao->setDado('exercicio', Sessao::getExercicio()); $obTOrcamentoRecursoDestinacao->setDado('cod_especificacao', $inCodEspecificacao); - if ( SistemaLegado::is_tcems($boTransacao) ) { + if ( Sessao::getExercicio() > '2012' ) { $obTOrcamentoRecursoDestinacao->setDado('cod_estrutural', "'2.9.3.2.0.00.00.%'"); } else { $obTOrcamentoRecursoDestinacao->setDado('cod_estrutural', "'8.2.1.1.1.%'"); @@ -1045,7 +1045,7 @@ function lancarEstornoArrecadacao(&$arCodLote, $rsArrecadacao, $boRetencao = "", $nuSomatorioReceita = bcadd( $nuSomatorioReceita , $nuValorParcela, 4 ); $nuVlReceitaPrincipal = bcsub( $nuVlReceitaPrincipal, $nuValorParcela, 4 ); - if ( SistemaLegado::is_tcems($boTransacao) ) { + if ( Sessao::getExercicio() > '2012' ) { if ($boCreditoTributario == "t") { $stCodPlanoClasReceita = $rsArrecadacao->getCampo('conta_credito'); //código da conta de banco/caixa da arrecadação @@ -1084,7 +1084,7 @@ function lancarEstornoArrecadacao(&$arCodLote, $rsArrecadacao, $boRetencao = "", } if ( !$obErro->ocorreu() ) { - if ( SistemaLegado::is_tcems($boTransacao) ) { + if ( Sessao::getExercicio() > '2012' ) { if ($boCreditoTributario != "t") { $stClasReceita = str_replace( ".", "", $rsLista->getCampo( "cod_estrutural" )); $stCodPlanoClasReceita = $rsArrecadacao->getCampo('conta_credito'); @@ -1125,7 +1125,7 @@ function lancarEstornoArrecadacao(&$arCodLote, $rsArrecadacao, $boRetencao = "", $obFTesourariaEstornoRealizacaoReceitaVariavel->setDado( "cod_historico" , null ); $inCodHistoricoDesdobramento = 914; } - if (SistemaLegado::is_tcems($boTransacao)) { + if (Sessao::getExercicio() > '2012') { $obFTesourariaEstornoRealizacaoReceitaVariavel->setDado( "cod_plano_conta_recebimento", $stCodPlanoEstruturalCredito ); $obFTesourariaEstornoRealizacaoReceitaVariavel->setDado( "cod_plano_clas_receita" , $stCodPlanoClasReceita ); } @@ -1166,7 +1166,7 @@ function lancarEstornoArrecadacao(&$arCodLote, $rsArrecadacao, $boRetencao = "", // Verifica qual o cod_recurso que possui conta contabil vinculada $obTOrcamentoRecursoDestinacao->setDado('exercicio', Sessao::getExercicio()); $obTOrcamentoRecursoDestinacao->setDado('cod_especificacao', $inCodEspecificacao); - if ( SistemaLegado::is_tcems($boTransacao) ) { + if ( Sessao::getExercicio() > '2012' ) { $obTOrcamentoRecursoDestinacao->setDado('cod_estrutural', "'2.9.3.2.0.00.00.%'"); } else { $obTOrcamentoRecursoDestinacao->setDado('cod_estrutural', "'8.2.1.1.1.%'"); @@ -1227,7 +1227,7 @@ function lancarEstornoArrecadacao(&$arCodLote, $rsArrecadacao, $boRetencao = "", $obFTesourariaEstornoRealizacaoReceitaFixa->setDado( "tipo_lote" , "A" ); $obFTesourariaEstornoRealizacaoReceitaFixa->setDado( "dt_lote" , $this->stDataBoletim ); $obFTesourariaEstornoRealizacaoReceitaFixa->setDado( "cod_entidade" , $rsArrecadacao->getCampo( "cod_entidade" ) ); - if ( SistemaLegado::is_tcems( $boTransacao ) ) { + if ( Sessao::getExercicio() > '2012' ) { $obFTesourariaEstornoRealizacaoReceitaFixa->setDado( "valor_despesa" , '' ); $obFTesourariaEstornoRealizacaoReceitaFixa->setDado( "valor_disponibilidades" , '' ); } else { @@ -1249,7 +1249,7 @@ function lancarEstornoArrecadacao(&$arCodLote, $rsArrecadacao, $boRetencao = "", $stCodPlanoEstruturalCredito = str_replace( '.', '', $rsArrecadacao->getCampo( "conta_credito" ) ); $stEstruturalDebito = str_replace( '.', '', $rsArrecadacao->getCampo( "cod_estrutural_debito" ) ); - if ( SistemaLegado::is_tcems($boTransacao) ) { + if ( Sessao::getExercicio() > '2012' ) { if ($boCreditoTributario == "t") { $stCodPlanoEstruturalCredito = $rsArrecadacao->getCampo('conta_credito'); //código da conta de banco/caixa da arrecadação @@ -1312,7 +1312,7 @@ function lancarEstornoArrecadacao(&$arCodLote, $rsArrecadacao, $boRetencao = "", $inCodHistorico = 914; } - if (SistemaLegado::is_tcems($boTransacao)) { + if (Sessao::getExercicio() > '2012') { $obFTesourariaEstornoRealizacaoReceitaVariavel->setDado( "cod_plano_conta_recebimento" , $stCodPlanoEstruturalDebito ); $obFTesourariaEstornoRealizacaoReceitaVariavel->setDado( "cod_plano_clas_receita" , $stCodPlanoEstruturalCredito ); } @@ -1387,7 +1387,7 @@ function lancarEstornoArrecadacao(&$arCodLote, $rsArrecadacao, $boRetencao = "", $obFTesourariaEstornoRealizacaoReceitaFixa->setDado( "tipo_lote" , "A" ); $obFTesourariaEstornoRealizacaoReceitaFixa->setDado( "dt_lote" , $this->stDataBoletim ); $obFTesourariaEstornoRealizacaoReceitaFixa->setDado( "cod_entidade" , $rsArrecadacao->getCampo( "cod_entidade" ) ); - if ( SistemaLegado::is_tcems( $boTransacao ) ) { + if ( Sessao::getExercicio() > '2012' ) { $obFTesourariaEstornoRealizacaoReceitaFixa->setDado( "valor_despesa" , '' ); $obFTesourariaEstornoRealizacaoReceitaFixa->setDado( "valor_disponibilidades" , '' ); } else { @@ -1427,7 +1427,7 @@ function lancarEstornoArrecadacao(&$arCodLote, $rsArrecadacao, $boRetencao = "", $obFTesourariaEstornoRealizacaoReceitaFixa->setDado( "tipo_lote" , "A" ); $obFTesourariaEstornoRealizacaoReceitaFixa->setDado( "dt_lote" , $this->stDataBoletim ); $obFTesourariaEstornoRealizacaoReceitaFixa->setDado( "cod_entidade" , $rsArrecadacao->getCampo( "cod_entidade" ) ); - if ( SistemaLegado::is_tcems( $boTransacao ) ) { + if ( Sessao::getExercicio() > '2012' ) { $obFTesourariaEstornoRealizacaoReceitaFixa->setDado( "valor_despesa" , '' ); $obFTesourariaEstornoRealizacaoReceitaFixa->setDado( "valor_disponibilidades" , '' ); } else { diff --git a/gestaoFinanceira/fontes/PHP/tesouraria/classes/negocio/RTesourariaRelatorioDemonstrativoSaldos.class.php b/gestaoFinanceira/fontes/PHP/tesouraria/classes/negocio/RTesourariaRelatorioDemonstrativoSaldos.class.php index 5bae7c4..dd89458 100644 --- a/gestaoFinanceira/fontes/PHP/tesouraria/classes/negocio/RTesourariaRelatorioDemonstrativoSaldos.class.php +++ b/gestaoFinanceira/fontes/PHP/tesouraria/classes/negocio/RTesourariaRelatorioDemonstrativoSaldos.class.php @@ -183,8 +183,7 @@ class RTesourariaRelatorioDemonstrativoSaldos extends PersistenteRelatorio public function geraRecordSetBanco(&$arRelatorio) { - $boTCEMS = SistemaLegado::is_tcems(); - + $this->obFTesourariaDemonstrativoSaldos->setDado('inCodEntidade', $this->getCodEntidade()); $this->obFTesourariaDemonstrativoSaldos->setDado('stExercicio', $this->getExercicio()); $this->obFTesourariaDemonstrativoSaldos->setDado('dtDataInicio',$this->getInicioPeriodo()); @@ -219,7 +218,7 @@ class RTesourariaRelatorioDemonstrativoSaldos extends PersistenteRelatorio $this->obFTesourariaDemonstrativoSaldos->setDado('inCodDetalhamento', $this->inCodDetalhamento ); $this->obFTesourariaDemonstrativoSaldos->setDado('boUtilizaEstruturalTCE', 'false' ); - if ($boTCEMS) { + if (Sessao::getExercicio() > '2012') { $this->obFTesourariaDemonstrativoSaldos->setDado('boUtilizaEstruturalTCE', 'true' ); } @@ -378,8 +377,7 @@ class RTesourariaRelatorioDemonstrativoSaldos extends PersistenteRelatorio //Relatorio quando for agrupado por conta corrente public function geraRecordSetBancoContaCorrente(&$arRelatorio) { - $boTCEMS = SistemaLegado::is_tcems(); - + $this->obFTesourariaDemonstrativoSaldos->setDado('inCodEntidade', $this->getCodEntidade()); $this->obFTesourariaDemonstrativoSaldos->setDado('stExercicio', $this->getExercicio()); $this->obFTesourariaDemonstrativoSaldos->setDado('dtDataInicio',$this->getInicioPeriodo()); @@ -414,7 +412,7 @@ class RTesourariaRelatorioDemonstrativoSaldos extends PersistenteRelatorio $this->obFTesourariaDemonstrativoSaldos->setDado('inCodDetalhamento', $this->inCodDetalhamento ); $this->obFTesourariaDemonstrativoSaldos->setDado('boUtilizaEstruturalTCE', 'false' ); - if ($boTCEMS) { + if (Sessao::getExercicio() > '2012') { $this->obFTesourariaDemonstrativoSaldos->setDado('boUtilizaEstruturalTCE', 'true' ); } diff --git a/gestaoFinanceira/fontes/PHP/tesouraria/classes/negocio/RTesourariaRelatorioEmitirBoletim.class.php b/gestaoFinanceira/fontes/PHP/tesouraria/classes/negocio/RTesourariaRelatorioEmitirBoletim.class.php index 8509d78..1405c56 100755 --- a/gestaoFinanceira/fontes/PHP/tesouraria/classes/negocio/RTesourariaRelatorioEmitirBoletim.class.php +++ b/gestaoFinanceira/fontes/PHP/tesouraria/classes/negocio/RTesourariaRelatorioEmitirBoletim.class.php @@ -595,7 +595,7 @@ function geraRecordSetBoletim(&$arRecordSet) $nuVlMBSaldoAtualSubTotal = '0.00'; while ( !$rsMovimentoBanco->eof() ) { if ( $rsMovimentoBanco->getCampo("saldo_anterior") != '0.00' OR $rsMovimentoBanco->getCampo("vl_debito") != '0.00' OR $rsMovimentoBanco->getCampo("vl_credito") != '0.00' OR $this->boSemMovimentacao == 'S') { - if ( sistemaLegado::is_tcems() ) { + if ( Sessao::getExercicio() > '2012' ) { $arMovimentoBanco[$inCount]["cod_estrutural"] = sistemaLegado::doMask($rsMovimentoBanco->getCampo("cod_estrutural")); } else { $arMovimentoBanco[$inCount]["cod_estrutural"] = $rsMovimentoBanco->getCampo( "cod_estrutural" ); diff --git a/gestaoFinanceira/fontes/PHP/tesouraria/classes/negocio/RTesourariaRelatorioExtratoBancario.class.php b/gestaoFinanceira/fontes/PHP/tesouraria/classes/negocio/RTesourariaRelatorioExtratoBancario.class.php index 1078f75..57fba15 100755 --- a/gestaoFinanceira/fontes/PHP/tesouraria/classes/negocio/RTesourariaRelatorioExtratoBancario.class.php +++ b/gestaoFinanceira/fontes/PHP/tesouraria/classes/negocio/RTesourariaRelatorioExtratoBancario.class.php @@ -187,9 +187,7 @@ function geraRecordSet(&$rsRecordSet , $stOrder = "") { include_once( CAM_GF_TES_MAPEAMENTO."FTesourariaExtratoBancario.class.php"); $obFTesourariaExtratoBancario = new FTesourariaExtratoBancario; - - $boTCEMS = SistemaLegado::is_tcems(); - + $codPlano = $this->getCodPlano() ; $obFTesourariaExtratoBancario->setDado("inCodPlanoInicial" ,$codPlano[0] ); @@ -200,10 +198,6 @@ function geraRecordSet(&$rsRecordSet , $stOrder = "") $obFTesourariaExtratoBancario->setDado("stDataInicial" ,$this->getDataInicial()); $obFTesourariaExtratoBancario->setDado("stDataFinal" ,$this->getDataFinal()); - // if ($boTCEMS) { - // $stFiltroExtratoBancario = ' AND PC.cod_estrutural like \'1.1.1.%\' '; - // } - $obErro = $obFTesourariaExtratoBancario->recuperaDadosBancarios( $rsDadosBancarios, $stFiltroExtratoBancario, $stOrder ); $arDadosBancarios = array(); @@ -236,7 +230,7 @@ function geraRecordSet(&$rsRecordSet , $stOrder = "") $obFTesourariaExtratoBancario->setDado( "boMovimentacao", "false" ); } $obFTesourariaExtratoBancario->setDado( "botcems", "false" ); - if (SistemaLegado::is_tcems()) { + if (Sessao::getExercicio() > '2012') { $obFTesourariaExtratoBancario->setDado( "botcems", "true" ); } $obFTesourariaExtratoBancario->setDado( "stDtFinal", $dtAnterior ); diff --git a/gestaoFinanceira/fontes/PHP/tesouraria/classes/negocio/RTesourariaRelatorioExtratoContaCorrente.class.php b/gestaoFinanceira/fontes/PHP/tesouraria/classes/negocio/RTesourariaRelatorioExtratoContaCorrente.class.php index 87bca78..38cad49 100755 --- a/gestaoFinanceira/fontes/PHP/tesouraria/classes/negocio/RTesourariaRelatorioExtratoContaCorrente.class.php +++ b/gestaoFinanceira/fontes/PHP/tesouraria/classes/negocio/RTesourariaRelatorioExtratoContaCorrente.class.php @@ -224,8 +224,6 @@ function geraRecordSet(&$rsRecordSet , $stOrder = "") include_once( CAM_GF_TES_MAPEAMENTO."FTesourariaExtratoContaCorrente.class.php"); $obFTesourariaExtratoContaCorrente = new FTesourariaExtratoContaCorrente; - $boTCEMS = SistemaLegado::is_tcems(); - $codPlano = $this->getCodPlano() ; $obFTesourariaExtratoContaCorrente->setDado("inCodPlanoInicial" , $codPlano[0] ); @@ -264,7 +262,7 @@ function geraRecordSet(&$rsRecordSet , $stOrder = "") $obFTesourariaExtratoContaCorrente->setDado( "botcems", "false" ); - if (SistemaLegado::is_tcems()) { + if (Sessao::getExercicio() > '2012') { $obFTesourariaExtratoContaCorrente->setDado( "botcems", "true" ); } if($this->boDemonstrarCredor){ diff --git a/gestaoFinanceira/fontes/PHP/tesouraria/classes/negocio/RTesourariaRelatorioResumoDespesa.class.php b/gestaoFinanceira/fontes/PHP/tesouraria/classes/negocio/RTesourariaRelatorioResumoDespesa.class.php index ccb566b..29f5117 100755 --- a/gestaoFinanceira/fontes/PHP/tesouraria/classes/negocio/RTesourariaRelatorioResumoDespesa.class.php +++ b/gestaoFinanceira/fontes/PHP/tesouraria/classes/negocio/RTesourariaRelatorioResumoDespesa.class.php @@ -260,8 +260,6 @@ function geraRecordSet(&$rsRecordSet , $stOrder = "") include_once( CAM_GF_TES_MAPEAMENTO."FTesourariaResumoDespesa.class.php"); $obFTesourariaResumoDespesa = new FTesourariaResumoDespesa; - $boTCEMS = SistemaLegado::is_tcems(); - $obFTesourariaResumoDespesa->setDado("stEntidade" ,$this->getEntidade()); $obFTesourariaResumoDespesa->setDado("stExercicio" ,$this->getExercicio()); $obFTesourariaResumoDespesa->setDado("stDataInicial" ,$this->getDataInicial()); @@ -277,7 +275,7 @@ function geraRecordSet(&$rsRecordSet , $stOrder = "") $obFTesourariaResumoDespesa->setDado("inNumCgm" ,$this->obRTesourariaBoletim->roUltimaArrecadacao->obROrcamentoEntidade->obRCGM->getNumCGM()); $obFTesourariaResumoDespesa->setDado("boUtilizaEstruturalTCE", 'false' ); - if ($boTCEMS) { + if (Sessao::getExercicio() > '2012') { $obFTesourariaResumoDespesa->setDado("boUtilizaEstruturalTCE", 'true' ); } diff --git a/gestaoFinanceira/fontes/PHP/tesouraria/classes/negocio/RTesourariaRelatorioResumoReceita.class.php b/gestaoFinanceira/fontes/PHP/tesouraria/classes/negocio/RTesourariaRelatorioResumoReceita.class.php index afcde94..8d63421 100755 --- a/gestaoFinanceira/fontes/PHP/tesouraria/classes/negocio/RTesourariaRelatorioResumoReceita.class.php +++ b/gestaoFinanceira/fontes/PHP/tesouraria/classes/negocio/RTesourariaRelatorioResumoReceita.class.php @@ -265,8 +265,6 @@ function geraRecordSet(&$rsRecordSet , $stOrder = "") include_once( CAM_GF_TES_MAPEAMENTO."FTesourariaResumoReceita.class.php"); $obFTesourariaResumoReceita = new FTesourariaResumoReceita; - $boTCEMS = SistemaLegado::is_tcems(); - $obFTesourariaResumoReceita->setDado("stEntidade" ,$this->getEntidade()); $obFTesourariaResumoReceita->setDado("stExercicio" ,$this->getExercicio()); $obFTesourariaResumoReceita->setDado("stDataInicial" ,$this->getDataInicial()); @@ -283,7 +281,7 @@ function geraRecordSet(&$rsRecordSet , $stOrder = "") $obFTesourariaResumoReceita->setDado("inCodDetalhamento" ,$this->inCodDetalhamento ); $obFTesourariaResumoReceita->setDado("boUtilizaEstruturalTCE", 'false' ); - if ($boTCEMS and $this->getTipoReceita() != 'extra') { + if (Sessao::getExercicio() > '2012' and $this->getTipoReceita() != 'extra') { $obFTesourariaResumoReceita->setDado("boUtilizaEstruturalTCE" , 'true' ); } diff --git a/gestaoFinanceira/fontes/PHP/tesouraria/classes/negocio/RTesourariaRelatorioTransferenciasBancarias.class.php b/gestaoFinanceira/fontes/PHP/tesouraria/classes/negocio/RTesourariaRelatorioTransferenciasBancarias.class.php index 61e1691..bf73f26 100755 --- a/gestaoFinanceira/fontes/PHP/tesouraria/classes/negocio/RTesourariaRelatorioTransferenciasBancarias.class.php +++ b/gestaoFinanceira/fontes/PHP/tesouraria/classes/negocio/RTesourariaRelatorioTransferenciasBancarias.class.php @@ -38,7 +38,7 @@ $Autor: $ $Date: 2006-07-05 17:51:50 -0300 (Qua, 05 Jul 2006) $ - $Id: RTesourariaRelatorioTransferenciasBancarias.class.php 60879 2014-11-20 13:53:10Z michel $ + $Id: RTesourariaRelatorioTransferenciasBancarias.class.php 64153 2015-12-09 19:16:02Z evandro $ * Casos de uso: uc-02.04.16 */ @@ -205,9 +205,7 @@ function geraRecordSet(&$rsRecordSet, $stOrder = '') { include_once CAM_GF_TES_MAPEAMENTO.'FTesourariaTransferenciasBancarias.class.php'; $obFTesourariaTransferenciasBancarias = new FTesourariaTransferenciasBancarias; - - $boTCEMS = SistemaLegado::is_tcems(); - + $obFTesourariaTransferenciasBancarias->setDado('stExercicio' , $this->getExercicio()); $obFTesourariaTransferenciasBancarias->setDado('stEntidade' , $this->getEntidade()); $obFTesourariaTransferenciasBancarias->setDado('stDataInicial' , $this->getDataInicial()); @@ -217,7 +215,7 @@ function geraRecordSet(&$rsRecordSet, $stOrder = '') $obFTesourariaTransferenciasBancarias->setDado('inCodTipoTransferencia', $this->getCodTipoTransferencia()); $obFTesourariaTransferenciasBancarias->setDado('boUtilizaEstruturalTCE', 'false'); - if ($boTCEMS) { + if (Sessao::getExercicio() > '2012') { $obFTesourariaTransferenciasBancarias->setDado("boUtilizaEstruturalTCE", 'true' ); } diff --git a/gestaoFinanceira/fontes/PHP/tesouraria/classes/negocio/RTesourariaTransferencia.class.php b/gestaoFinanceira/fontes/PHP/tesouraria/classes/negocio/RTesourariaTransferencia.class.php index 2a25f60..26e54aa 100755 --- a/gestaoFinanceira/fontes/PHP/tesouraria/classes/negocio/RTesourariaTransferencia.class.php +++ b/gestaoFinanceira/fontes/PHP/tesouraria/classes/negocio/RTesourariaTransferencia.class.php @@ -33,7 +33,7 @@ * @package URBEM * @subpackage Regra - $Id: RTesourariaTransferencia.class.php 60831 2014-11-18 13:21:44Z carlos.silva $ + $Id: RTesourariaTransferencia.class.php 64153 2015-12-09 19:16:02Z evandro $ $Revision: 30668 $ $Name: $ @@ -534,7 +534,7 @@ function transferir($boTransacao = "") // Verifica qual o cod_recurso que possui conta contabil vinculada $obTOrcamentoRecursoDestinacao->setDado('exercicio', Sessao::getExercicio()); $obTOrcamentoRecursoDestinacao->setDado('cod_especificacao', $inCodEspecificacao); - if ( SistemaLegado::is_tcems($boTransacao) ) { + if ( Sessao::getExercicio() > '2012' ) { $obTOrcamentoRecursoDestinacao->setDado('cod_estrutural', "'8.2.1.1.1.%'"); } else { $obTOrcamentoRecursoDestinacao->setDado('cod_estrutural', "'2.9.3.2.0.00.00.%'"); @@ -672,7 +672,7 @@ function estornar($boTransacao = "") // Verifica qual o cod_recurso que possui conta contabil vinculada $obTOrcamentoRecursoDestinacao->setDado('exercicio', Sessao::getExercicio()); $obTOrcamentoRecursoDestinacao->setDado('cod_especificacao', $inCodEspecificacao); - if ( SistemaLegado::is_tcems( $boTransacao ) ) { + if ( Sessao::getExercicio() > '2012' ) { $obTOrcamentoRecursoDestinacao->setDado('cod_estrutural', "'8.2.1.1.1.%'"); } else { $obTOrcamentoRecursoDestinacao->setDado('cod_estrutural', "'2.9.3.2.0.00.00.%'"); diff --git a/gestaoFinanceira/fontes/PHP/tesouraria/instancias/arrecadacao/OCManterArrecadacaoReceita.php b/gestaoFinanceira/fontes/PHP/tesouraria/instancias/arrecadacao/OCManterArrecadacaoReceita.php index 1d06671..357e26c 100755 --- a/gestaoFinanceira/fontes/PHP/tesouraria/instancias/arrecadacao/OCManterArrecadacaoReceita.php +++ b/gestaoFinanceira/fontes/PHP/tesouraria/instancias/arrecadacao/OCManterArrecadacaoReceita.php @@ -287,7 +287,7 @@ switch ($stCtrl) { WHERE receita.cod_receita = dr.cod_receita_secundaria AND receita.exercicio = dr.exercicio ) "; - if ( SistemaLegado::is_tcems() ) { + if ( Sessao::getExercicio() > '2012' ) { $stFiltro .= "AND CLR.estorno = 'f'"; $obTOrcamentoReceita->recuperaReceitaAnaliticaTCE($rsReceita, $stFiltro); } else { @@ -461,8 +461,6 @@ switch ($stCtrl) { $rsConsultaCredito->setPrimeiroElemento(); - //sistemaLegado::mostraVar($rsConsultaCredito); - //Salva na sessao os creditos do carne para poder acessar no PR Sessao::write('arCarne',$arCarne); diff --git a/gestaoFinanceira/fontes/PHP/tesouraria/instancias/conciliacao/FLManterConciliacao.php b/gestaoFinanceira/fontes/PHP/tesouraria/instancias/conciliacao/FLManterConciliacao.php index 79f1835..cde970a 100755 --- a/gestaoFinanceira/fontes/PHP/tesouraria/instancias/conciliacao/FLManterConciliacao.php +++ b/gestaoFinanceira/fontes/PHP/tesouraria/instancias/conciliacao/FLManterConciliacao.php @@ -32,7 +32,7 @@ * @ignore - * $Id: FLManterConciliacao.php 60529 2014-10-27 16:35:50Z jean $ + * $Id: FLManterConciliacao.php 63831 2015-10-22 12:51:00Z franver $ * Casos de uso: uc-02.04.19 */ @@ -56,21 +56,7 @@ Sessao::remove('pos'); Sessao::remove('paginando'); Sessao::remove('filtro'); Sessao::remove('filtroAux'); -//Sessao::remove('boAgrupar'); -//Sessao::remove('stDtInicial'); -//Sessao::remove('stDtFinal'); -//Sessao::remove('arMovimentacao'); -//Sessao::remove('filtroAux'); -//Sessao::remove('arMovimentacaoAux'); -//Sessao::remove('arMovimentacaoPendencia'); -//Sessao::remove('arMovimentacaoPendenciaAux'); -//Sessao::remove('arMovimentacaoManual'); -//Sessao::remove('arMovimentacaoPendenciaListagem'); -//Sessao::remove('arPendenciasMarcadas'); -//Sessao::remove('TableContext_Table'); -//Sessao::remove('filtroRelatorio'); -//Sessao::remove('arDados'); -//SistemaLegado::mostravar($_SESSION); + $rsEntidadesDisponiveis = new recordSet; $rsEntidadesSelecionadas = new recordSet; diff --git a/gestaoFinanceira/fontes/PHP/tesouraria/instancias/pagamentos/FMManterPagamento.php b/gestaoFinanceira/fontes/PHP/tesouraria/instancias/pagamentos/FMManterPagamento.php index 1b5d2d4..d7c524b 100755 --- a/gestaoFinanceira/fontes/PHP/tesouraria/instancias/pagamentos/FMManterPagamento.php +++ b/gestaoFinanceira/fontes/PHP/tesouraria/instancias/pagamentos/FMManterPagamento.php @@ -32,7 +32,7 @@ * @ignore - * $Id: FMManterPagamento.php 63464 2015-08-31 17:30:39Z michel $ + * $Id: FMManterPagamento.php 63957 2015-11-11 16:13:50Z lisiane $ * Casos de uso: uc-02.04.05,uc-02.03.28 @@ -985,12 +985,12 @@ if ($stAcao == 'incluir') { $obFormulario->addComponente ( $obCboOrigemRecurso ); } - if ($stSiglaUf != "AL") { + if ($stSiglaUf != "BA" && $stSiglaUf != "AL") { if (($boMostrarComboTipoDocTcmgo == 'true') || ($boMostrarComboTipoDocTcemg == 'true')) { $obFormulario->addComponente( $obCboDocTipo ); $obFormulario->addSpan( $obSpnDocumento ); } - }else{ + }elseif($stSiglaUf == "AL"){ if( !Sessao::read('arCheque') ) { $obFormulario->addComponente( $obCboDocTipoAL ); $obFormulario->addComponente( $obTxtValorDoc ); diff --git a/gestaoFinanceira/fontes/PHP/tesouraria/instancias/pagamentos/PRManterPagamento.php b/gestaoFinanceira/fontes/PHP/tesouraria/instancias/pagamentos/PRManterPagamento.php index 8aaf22f..058ea70 100755 --- a/gestaoFinanceira/fontes/PHP/tesouraria/instancias/pagamentos/PRManterPagamento.php +++ b/gestaoFinanceira/fontes/PHP/tesouraria/instancias/pagamentos/PRManterPagamento.php @@ -32,7 +32,7 @@ * @ignore - * $Id: PRManterPagamento.php 63464 2015-08-31 17:30:39Z michel $ + * $Id: PRManterPagamento.php 64023 2015-11-19 19:40:11Z carlos.silva $ * Casos de uso: uc-02.04.05 */ @@ -109,15 +109,17 @@ switch ($stAcao) { $stSiglaUf = SistemaLegado::pegaDado("sigla_uf","sw_uf","where cod_uf = ".$inCodUf."", $boTransacao); $obErro = new Erro; - if ($request->get('inDocTipo')) { - switch ($request->get('inDocTipo')) { - case 1 : - case 2 : - case 3 : - case 99: - if ( !$request->get('nuDoc') ) { - $obErro->setDescricao("O número do documento é obrigatório"); - } + if( $stSiglaUf != "BA" ){ + if ($request->get('inDocTipo')) { + switch ($request->get('inDocTipo')) { + case 1 : + case 2 : + case 3 : + case 99: + if ( !$request->get('nuDoc') ) { + $obErro->setDescricao("O número do documento é obrigatório"); + } + } } } if ($request->get('inCodOrdem')) { @@ -369,18 +371,26 @@ switch ($stAcao) { if ($stSiglaUf == "BA" && $inCodUf==5 && !$obErro->ocorreu() ) { include_once CAM_GPC_TCMBA_MAPEAMENTO.'TTCMBAPagamentoTipoPagamento.class.php'; - $obTTCMBAPagamentoTipoPagamento = new TTCMBAPagamentoTipoPagamento; - $obTTCMBAPagamentoTipoPagamento->setDado('cod_entidade' , $arrNota['cod_entidade'] ); - $obTTCMBAPagamentoTipoPagamento->setDado('exercicio' , $stExercicioLiquidacao ); - $obTTCMBAPagamentoTipoPagamento->setDado('cod_nota' , $inCodNota ); - $obTTCMBAPagamentoTipoPagamento->setDado('timestamp' , $stTimestamp ); - $obTTCMBAPagamentoTipoPagamento->setDado('cod_tipo' , $request->get('inCodTipoPagamento') ); - $obTTCMBAPagamentoTipoPagamento->setDado('num_documento' , $request->get('numDocPagamento') ); - $obErro = $obTTCMBAPagamentoTipoPagamento->inclusao($boTransacao); - - if ($obErro->ocorreu()) { - SistemaLegado::exibeAviso(urlencode("Erro ao executar Pagamento de Origem de Recursos Interna (".$obErro->getDescricao().")"),"","erro"); - SistemaLegado::LiberaFrames(); + $obTTesourariaPagamento = new TTesourariaPagamento; + $stFiltro = " WHERE cod_nota = ".$inCodNota." AND exercicio = '".$stExercicioLiquidacao."' AND cod_entidade = ".$arrNota['cod_entidade']; + $obTTesourariaPagamento->recuperaTodos($rsTesourariaPagamento, $stFiltro, '', $boTransacao); + + while (!$rsTesourariaPagamento->eof()) { + $obTTCMBAPagamentoTipoPagamento = new TTCMBAPagamentoTipoPagamento; + $obTTCMBAPagamentoTipoPagamento->setDado('cod_entidade' , $rsTesourariaPagamento->getCampo('cod_entidade')); + $obTTCMBAPagamentoTipoPagamento->setDado('exercicio' , $stExercicioLiquidacao); + $obTTCMBAPagamentoTipoPagamento->setDado('cod_nota' , $rsTesourariaPagamento->getCampo('cod_nota')); + $obTTCMBAPagamentoTipoPagamento->setDado('timestamp' , $rsTesourariaPagamento->getCampo('timestamp')); + $obTTCMBAPagamentoTipoPagamento->setDado('cod_tipo' , $request->get('inCodTipoPagamento')); + $obTTCMBAPagamentoTipoPagamento->setDado('num_documento' , $request->get('numDocPagamento')); + $obErro = $obTTCMBAPagamentoTipoPagamento->inclusao($boTransacao); + + if ($obErro->ocorreu()) { + SistemaLegado::exibeAviso(urlencode("Erro ao executar Pagamento de Origem de Recursos Interna (".$obErro->getDescricao().")"),"","erro"); + SistemaLegado::LiberaFrames(); + } + + $rsTesourariaPagamento->proximo(); } } } diff --git a/gestaoFinanceira/fontes/PHP/tesouraria/instancias/relatorio/OCEmitirBoletim.php b/gestaoFinanceira/fontes/PHP/tesouraria/instancias/relatorio/OCEmitirBoletim.php index 0d92c47..6f374de 100755 --- a/gestaoFinanceira/fontes/PHP/tesouraria/instancias/relatorio/OCEmitirBoletim.php +++ b/gestaoFinanceira/fontes/PHP/tesouraria/instancias/relatorio/OCEmitirBoletim.php @@ -132,7 +132,7 @@ switch ($stCtrl) { $obRTesourariaRelatorioEmitirBoletim->setCgmUsuario ( $arFiltro['inNumCgm'] ); $obRTesourariaRelatorioEmitirBoletim->setExercicio ( Sessao::getExercicio() ); $obRTesourariaRelatorioEmitirBoletim->obFTesourariaEmitirBoletim->setDado('botcems', 'false' ); - if (SistemaLegado::is_tcems()) { + if (Sessao::getExercicio() > '2012') { $obRTesourariaRelatorioEmitirBoletim->obFTesourariaEmitirBoletim->setDado('botcems', 'true' ); } diff --git a/gestaoFinanceira/fontes/PHP/tesouraria/instancias/relatorio/OCGeraRelacaoDespesaExtra.php b/gestaoFinanceira/fontes/PHP/tesouraria/instancias/relatorio/OCGeraRelacaoDespesaExtra.php index 0612566..3382562 100755 --- a/gestaoFinanceira/fontes/PHP/tesouraria/instancias/relatorio/OCGeraRelacaoDespesaExtra.php +++ b/gestaoFinanceira/fontes/PHP/tesouraria/instancias/relatorio/OCGeraRelacaoDespesaExtra.php @@ -49,8 +49,6 @@ include_once '../../../../../../gestaoAdministrativa/fontes/PHP/framework/includ include_once '../../../../../../gestaoAdministrativa/fontes/PHP/pacotes/FrameworkBirt.inc.php'; include_once (CAM_GRH_ENT_MAPEAMENTO."TEntidade.class.php"); -$boTCEMS = SistemaLegado::is_tcems(); - $preview = new PreviewBirt(2,30,4); $preview->setTitulo('Relatório do Birt'); $preview->setVersaoBirt('2.5.0'); @@ -107,7 +105,7 @@ if ($_REQUEST['stTipoRelatorio'] != '') { $preview->addParametro( 'tipo_relatorio', '' ); } -if ($boTCEMS) { +if (Sessao::getExercicio() > '2012') { $filtroExtras = " AND ( ( cpcd.cod_estrutural like '1.1.2.%' AND cpc.cod_estrutural like '1.1.2.%' ) OR ( cpcd.cod_estrutural like '1.1.3.%' AND cpc.cod_estrutural like '1.1.3.%' ) OR diff --git a/gestaoFinanceira/fontes/PLPGSQL/contabilidade/balancoFinanceiro.plsql b/gestaoFinanceira/fontes/PLPGSQL/contabilidade/balancoFinanceiro.plsql index f0ccd77..76c048c 100644 --- a/gestaoFinanceira/fontes/PLPGSQL/contabilidade/balancoFinanceiro.plsql +++ b/gestaoFinanceira/fontes/PLPGSQL/contabilidade/balancoFinanceiro.plsql @@ -23,7 +23,7 @@ /* Script de função PLPGSQL * URBEM Soluções de Gestão Pública Ltda * www.urbem.cnm.org.br -$Id: balancoFinanceiro.plsql 62743 2015-06-15 18:15:02Z michel $ +$Id: balancoFinanceiro.plsql 63822 2015-10-20 18:24:23Z lisiane $ */ @@ -496,6 +496,7 @@ EXECUTE stSql; ,0.00 AS vl_saldo_creditos_anterior ,0.00 AS vl_saldo_atual_anterior ,0.00 AS vl_saldo_inicial_anterior + ,cod_estrutural FROM contabilidade.fn_rl_balancete_verificacao('|| quote_literal(stExercicio) ||' ,''cod_entidade IN ('|| stCodEntidade ||') '' ,'|| quote_literal(dtInicial) ||' @@ -513,6 +514,7 @@ EXECUTE stSql; ,vl_saldo_atual numeric ) GROUP BY descricao + , cod_estrutural UNION ALL @@ -568,6 +570,7 @@ EXECUTE stSql; ,(sum(vl_saldo_creditos)) AS vl_saldo_creditos_anterior ,(sum(vl_saldo_atual)) AS vl_saldo_atual_anterior ,(sum(vl_saldo_anterior)) AS vl_saldo_inicial_anterior + ,cod_estrutural FROM contabilidade.fn_rl_balancete_verificacao('|| quote_literal(stExercicioAnterior) ||' ,''cod_entidade IN ('|| stCodEntidade ||') '' ,'|| quote_literal(dtInicialAnterior) ||' @@ -584,12 +587,16 @@ EXECUTE stSql; ,vl_saldo_creditos numeric ,vl_saldo_atual numeric ) - GROUP BY descricao + GROUP BY descricao + , cod_estrutural ) AS fluxo_caixa_saldo + JOIN contabilidade.plano_conta + on plano_conta.exercicio = '|| quote_literal(stExercicio) ||' + and plano_conta.cod_estrutural = fluxo_caixa_saldo.cod_estrutural + and escrituracao ilike ''anali%'' WHERE descricao IS NOT NULL GROUP BY descricao '; - EXECUTE stSql; --SELECT para armazenar saldos referente ao cod_estrutural relativos às Transferências, pois não podem possuir histórico = 8 diff --git a/gestaoFinanceira/fontes/PLPGSQL/contabilidade/balancoPatrimonialAtivo.plsql b/gestaoFinanceira/fontes/PLPGSQL/contabilidade/balancoPatrimonialAtivo.plsql index ac0f933..461ca6e 100755 --- a/gestaoFinanceira/fontes/PLPGSQL/contabilidade/balancoPatrimonialAtivo.plsql +++ b/gestaoFinanceira/fontes/PLPGSQL/contabilidade/balancoPatrimonialAtivo.plsql @@ -46,14 +46,6 @@ DECLARE arRetorno NUMERIC[]; BEGIN - CREATE TEMPORARY TABLE tmp_ativo_financeiro ( - cod_estrutural varchar - , valores numeric[] - ); - CREATE TEMPORARY TABLE tmp_ativo_permanente ( - cod_estrutural varchar - , valores numeric[] - ); stSql := 'CREATE TEMPORARY TABLE tmp_debito AS SELECT * @@ -190,57 +182,6 @@ BEGIN EXECUTE stSql; CREATE UNIQUE INDEX unq_totaliza ON tmp_totaliza (cod_estrutural varchar_pattern_ops, oid_temp); - - --ATIVO FINANCEIRO - stSql := ' Select * - from contabilidade.plano_conta - where exercicio = ' || quote_literal(stExercicio) || ' - and cod_estrutural like ''1%'' - and escrituracao = ''analitica'' - and indicador_superavit = ''financeiro'' - '; - FOR reRegistro IN EXECUTE stSql - LOOP - INSERT INTO tmp_ativo_financeiro VALUES ( reRegistro.cod_estrutural - , contabilidade.totaliza_balanco_patrimonial( publico.fn_mascarareduzida(reRegistro.cod_estrutural) ) - ); - - END LOOP; - - --ATIVO PERMANENTE - stSql := ' Select * - from contabilidade.plano_conta - where exercicio = ' || quote_literal(stExercicio) || ' - and cod_estrutural like ''1%'' - and escrituracao = ''analitica'' - and indicador_superavit = ''permanente'' - '; - FOR reRegistro IN EXECUTE stSql - LOOP - INSERT INTO tmp_ativo_permanente VALUES ( reRegistro.cod_estrutural - , contabilidade.totaliza_balanco_patrimonial( publico.fn_mascarareduzida(reRegistro.cod_estrutural) ) - ); - - END LOOP; - - stSql := 'CREATE TEMPORARY TABLE tmp_soma_ativo_financeiro AS - SELECT SUM(valores[1]) as vl_saldo_anterior - , SUM(valores[2]) as vl_saldo_debitos - , SUM(valores[3]) as vl_saldo_creditos - , SUM(valores[4]) as vl_saldo_atual - FROM tmp_ativo_financeiro - '; - EXECUTE stSql; - - stSql := 'CREATE TEMPORARY TABLE tmp_soma_ativo_permanente AS - SELECT SUM(valores[1]) as vl_saldo_anterior - , SUM(valores[2]) as vl_saldo_debitos - , SUM(valores[3]) as vl_saldo_creditos - , SUM(valores[4]) as vl_saldo_atual - FROM tmp_ativo_permanente - '; - EXECUTE stSql; - stSql := ' CREATE TEMPORARY TABLE tmp_balanco_patrimonial_ativo AS SELECT CAST(cod_estrutural AS VARCHAR) as cod_estrutural @@ -250,6 +191,7 @@ BEGIN , SUM(valores[2] * multiplicador) as vl_saldo_debitos , SUM(valores[3] * multiplicador) as vl_saldo_creditos , SUM(valores[4] * multiplicador) as vl_saldo_atual + , tipo_conta::VARCHAR AS tipo_conta FROM ( --CONTA ATIVO CIRCULANTE SELECT '||quote_literal('1.1.0.0.0.00.00')||' as cod_estrutural @@ -257,6 +199,14 @@ BEGIN , publico.fn_nivel('||quote_literal('1.1.0.0.0.00.00')||') as nivel , ''ATIVO CIRCULANTE'' as nom_conta , 1 as multiplicador + , (SELECT nom_sistema + FROM contabilidade.sistema_contabil + INNER JOIN contabilidade.plano_conta + ON plano_conta.exercicio = sistema_contabil.exercicio + AND plano_conta.cod_sistema = sistema_contabil.cod_sistema + WHERE plano_conta.cod_estrutural LIKE '||quote_literal('1.1.0.0.0.00.00%')||' + AND plano_conta.exercicio = '||quote_literal(stExercicio)||' + ) AS tipo_conta UNION ALL @@ -266,6 +216,14 @@ BEGIN , publico.fn_nivel('||quote_literal('1.1.0.0.0.00.00')||') as nivel , ''ATIVO CIRCULANTE'' as nom_conta , -1 as multiplicador + , (SELECT nom_sistema + FROM contabilidade.sistema_contabil + INNER JOIN contabilidade.plano_conta + ON plano_conta.exercicio = sistema_contabil.exercicio + AND plano_conta.cod_sistema = sistema_contabil.cod_sistema + WHERE plano_conta.cod_estrutural LIKE '||quote_literal('1.1.1.1.2.00.00%')||' + AND plano_conta.exercicio = '||quote_literal(stExercicio)||' + ) AS tipo_conta UNION ALL @@ -275,6 +233,14 @@ BEGIN , publico.fn_nivel('||quote_literal('1.1.0.0.0.00.00')||') as nivel , ''ATIVO CIRCULANTE'' as nom_conta , -1 as multiplicador + , (SELECT nom_sistema + FROM contabilidade.sistema_contabil + INNER JOIN contabilidade.plano_conta + ON plano_conta.exercicio = sistema_contabil.exercicio + AND plano_conta.cod_sistema = sistema_contabil.cod_sistema + WHERE plano_conta.cod_estrutural LIKE '||quote_literal('1.1.2.1.2.00.00%')||' + AND plano_conta.exercicio = '||quote_literal(stExercicio)||' + ) AS tipo_conta UNION ALL @@ -284,6 +250,14 @@ BEGIN , publico.fn_nivel('||quote_literal('1.1.0.0.0.00.00')||') as nivel , ''ATIVO CIRCULANTE'' as nom_conta , -1 as multiplicador + , (SELECT nom_sistema + FROM contabilidade.sistema_contabil + INNER JOIN contabilidade.plano_conta + ON plano_conta.exercicio = sistema_contabil.exercicio + AND plano_conta.cod_sistema = sistema_contabil.cod_sistema + WHERE plano_conta.cod_estrutural LIKE '||quote_literal('1.1.2.5.2.00.00%')||' + AND plano_conta.exercicio = '||quote_literal(stExercicio)||' + ) AS tipo_conta UNION ALL @@ -293,6 +267,14 @@ BEGIN , publico.fn_nivel('||quote_literal('1.1.0.0.0.00.00')||') as nivel , ''ATIVO CIRCULANTE'' as nom_conta , -1 as multiplicador + , (SELECT nom_sistema + FROM contabilidade.sistema_contabil + INNER JOIN contabilidade.plano_conta + ON plano_conta.exercicio = sistema_contabil.exercicio + AND plano_conta.cod_sistema = sistema_contabil.cod_sistema + WHERE plano_conta.cod_estrutural LIKE '||quote_literal('1.1.2.9.2.00.00%')||' + AND plano_conta.exercicio = '||quote_literal(stExercicio)||' + ) AS tipo_conta UNION ALL @@ -303,6 +285,14 @@ BEGIN , publico.fn_nivel('||quote_literal('1.1.0.0.0.00.00')||') as nivel , ''ATIVO CIRCULANTE'' as nom_conta , -1 as multiplicador + , (SELECT nom_sistema + FROM contabilidade.sistema_contabil + INNER JOIN contabilidade.plano_conta + ON plano_conta.exercicio = sistema_contabil.exercicio + AND plano_conta.cod_sistema = sistema_contabil.cod_sistema + WHERE plano_conta.cod_estrutural LIKE '||quote_literal('1.1.2.9.2.00.00%')||' + AND plano_conta.exercicio = '||quote_literal(stExercicio)||' + ) AS tipo_conta UNION ALL @@ -312,6 +302,14 @@ BEGIN , publico.fn_nivel('||quote_literal('1.1.1.0.0.00.00')||') as nivel , ''Caixa e Equivalentes de Caixa'' as nom_conta , 1 as multiplicador + , (SELECT nom_sistema + FROM contabilidade.sistema_contabil + INNER JOIN contabilidade.plano_conta + ON plano_conta.exercicio = sistema_contabil.exercicio + AND plano_conta.cod_sistema = sistema_contabil.cod_sistema + WHERE plano_conta.cod_estrutural LIKE '||quote_literal('1.1.1.0.0.00.00%')||' + AND plano_conta.exercicio = '||quote_literal(stExercicio)||' + ) AS tipo_conta UNION ALL @@ -321,6 +319,14 @@ BEGIN , publico.fn_nivel('||quote_literal('1.1.1.0.0.00.00')||') as nivel , ''Caixa e Equivalentes de Caixa'' as nom_conta , -1 as multiplicador + , (SELECT nom_sistema + FROM contabilidade.sistema_contabil + INNER JOIN contabilidade.plano_conta + ON plano_conta.exercicio = sistema_contabil.exercicio + AND plano_conta.cod_sistema = sistema_contabil.cod_sistema + WHERE plano_conta.cod_estrutural LIKE '||quote_literal('1.1.1.1.2.00.00%')||' + AND plano_conta.exercicio = '||quote_literal(stExercicio)||' + ) AS tipo_conta UNION ALL @@ -330,6 +336,14 @@ BEGIN , publico.fn_nivel('||quote_literal('1.1.2.0.0.00.00')||') as nivel , ''Créditos a Curto Prazo'' as nom_conta , 1 as multiplicador + , (SELECT nom_sistema + FROM contabilidade.sistema_contabil + INNER JOIN contabilidade.plano_conta + ON plano_conta.exercicio = sistema_contabil.exercicio + AND plano_conta.cod_sistema = sistema_contabil.cod_sistema + WHERE plano_conta.cod_estrutural LIKE '||quote_literal('1.1.2.0.0.00.00%')||' + AND plano_conta.exercicio = '||quote_literal(stExercicio)||' + ) AS tipo_conta UNION ALL @@ -339,6 +353,14 @@ BEGIN , publico.fn_nivel('||quote_literal('1.1.2.0.0.00.00')||') as nivel , ''Créditos a Curto Prazo'' as nom_conta , -1 as multiplicador + , (SELECT nom_sistema + FROM contabilidade.sistema_contabil + INNER JOIN contabilidade.plano_conta + ON plano_conta.exercicio = sistema_contabil.exercicio + AND plano_conta.cod_sistema = sistema_contabil.cod_sistema + WHERE plano_conta.cod_estrutural LIKE '||quote_literal('1.1.2.1.2.00.00%')||' + AND plano_conta.exercicio = '||quote_literal(stExercicio)||' + ) AS tipo_conta UNION ALL @@ -348,6 +370,14 @@ BEGIN , publico.fn_nivel('||quote_literal('1.1.2.0.0.00.00')||') as nivel , ''Créditos a Curto Prazo'' as nom_conta , -1 as multiplicador + , (SELECT nom_sistema + FROM contabilidade.sistema_contabil + INNER JOIN contabilidade.plano_conta + ON plano_conta.exercicio = sistema_contabil.exercicio + AND plano_conta.cod_sistema = sistema_contabil.cod_sistema + WHERE plano_conta.cod_estrutural LIKE '||quote_literal('1.1.2.5.2.00.00%')||' + AND plano_conta.exercicio = '||quote_literal(stExercicio)||' + ) AS tipo_conta UNION ALL @@ -357,6 +387,14 @@ BEGIN , publico.fn_nivel('||quote_literal('1.1.2.0.0.00.00')||') as nivel , ''Créditos a Curto Prazo'' as nom_conta , -1 as multiplicador + , (SELECT nom_sistema + FROM contabilidade.sistema_contabil + INNER JOIN contabilidade.plano_conta + ON plano_conta.exercicio = sistema_contabil.exercicio + AND plano_conta.cod_sistema = sistema_contabil.cod_sistema + WHERE plano_conta.cod_estrutural LIKE '||quote_literal('1.1.2.9.2.00.00%')||' + AND plano_conta.exercicio = '||quote_literal(stExercicio)||' + ) AS tipo_conta UNION ALL @@ -366,6 +404,14 @@ BEGIN , publico.fn_nivel('||quote_literal('1.1.2.1.0.00.00')||') as nivel , ''Créditos Tributários a Receber'' as nom_conta , 1 as multiplicador + , (SELECT nom_sistema + FROM contabilidade.sistema_contabil + INNER JOIN contabilidade.plano_conta + ON plano_conta.exercicio = sistema_contabil.exercicio + AND plano_conta.cod_sistema = sistema_contabil.cod_sistema + WHERE plano_conta.cod_estrutural LIKE '||quote_literal('1.1.2.1.0.00.00%')||' + AND plano_conta.exercicio = '||quote_literal(stExercicio)||' + ) AS tipo_conta UNION ALL @@ -375,6 +421,14 @@ BEGIN , publico.fn_nivel('||quote_literal('1.1.2.1.0.00.00')||') as nivel , ''Créditos Tributários a Receber'' as nom_conta , -1 as multiplicador + , (SELECT nom_sistema + FROM contabilidade.sistema_contabil + INNER JOIN contabilidade.plano_conta + ON plano_conta.exercicio = sistema_contabil.exercicio + AND plano_conta.cod_sistema = sistema_contabil.cod_sistema + WHERE plano_conta.cod_estrutural LIKE '||quote_literal('1.1.2.1.2.00.00%')||' + AND plano_conta.exercicio = '||quote_literal(stExercicio)||' + ) AS tipo_conta UNION ALL @@ -384,6 +438,14 @@ BEGIN , publico.fn_nivel('||quote_literal('1.1.2.2.0.00.00')||') as nivel , ''Clientes'' as nom_conta , 1 as multiplicador + , (SELECT nom_sistema + FROM contabilidade.sistema_contabil + INNER JOIN contabilidade.plano_conta + ON plano_conta.exercicio = sistema_contabil.exercicio + AND plano_conta.cod_sistema = sistema_contabil.cod_sistema + WHERE plano_conta.cod_estrutural LIKE '||quote_literal('1.1.2.2.0.00.00%')||' + AND plano_conta.exercicio = '||quote_literal(stExercicio)||' + ) AS tipo_conta UNION ALL @@ -393,6 +455,14 @@ BEGIN , publico.fn_nivel('||quote_literal('1.1.2.3.0.00.00')||') as nivel , ''Créditos de Transferências a Receber'' as nom_conta , 1 as multiplicador + , (SELECT nom_sistema + FROM contabilidade.sistema_contabil + INNER JOIN contabilidade.plano_conta + ON plano_conta.exercicio = sistema_contabil.exercicio + AND plano_conta.cod_sistema = sistema_contabil.cod_sistema + WHERE plano_conta.cod_estrutural LIKE '||quote_literal('1.1.2.3.0.00.00%')||' + AND plano_conta.exercicio = '||quote_literal(stExercicio)||' + ) AS tipo_conta UNION ALL @@ -402,6 +472,14 @@ BEGIN , publico.fn_nivel('||quote_literal('1.1.2.4.0.00.00')||') as nivel , ''Empréstimos e Financiamentos Concedidos'' as nom_conta , 1 as multiplicador + , (SELECT nom_sistema + FROM contabilidade.sistema_contabil + INNER JOIN contabilidade.plano_conta + ON plano_conta.exercicio = sistema_contabil.exercicio + AND plano_conta.cod_sistema = sistema_contabil.cod_sistema + WHERE plano_conta.cod_estrutural LIKE '||quote_literal('1.1.2.4.0.00.00%')||' + AND plano_conta.exercicio = '||quote_literal(stExercicio)||' + ) AS tipo_conta UNION ALL @@ -411,6 +489,14 @@ BEGIN , publico.fn_nivel('||quote_literal('1.1.2.5.0.00.00')||') as nivel , ''Dívida Ativa Tributária'' as nom_conta , 1 as multiplicador + , (SELECT nom_sistema + FROM contabilidade.sistema_contabil + INNER JOIN contabilidade.plano_conta + ON plano_conta.exercicio = sistema_contabil.exercicio + AND plano_conta.cod_sistema = sistema_contabil.cod_sistema + WHERE plano_conta.cod_estrutural LIKE '||quote_literal('1.1.2.5.0.00.00%')||' + AND plano_conta.exercicio = '||quote_literal(stExercicio)||' + ) AS tipo_conta UNION ALL @@ -420,6 +506,14 @@ BEGIN , publico.fn_nivel('||quote_literal('1.1.2.5.0.00.00')||') as nivel , ''Dívida Ativa Tributária'' as nom_conta , -1 as multiplicador + , (SELECT nom_sistema + FROM contabilidade.sistema_contabil + INNER JOIN contabilidade.plano_conta + ON plano_conta.exercicio = sistema_contabil.exercicio + AND plano_conta.cod_sistema = sistema_contabil.cod_sistema + WHERE plano_conta.cod_estrutural LIKE '||quote_literal('1.1.2.5.2.00.00%')||' + AND plano_conta.exercicio = '||quote_literal(stExercicio)||' + ) AS tipo_conta UNION ALL @@ -429,6 +523,14 @@ BEGIN , publico.fn_nivel('||quote_literal('1.1.2.6.0.00.00')||') as nivel , ''Dívida Ativa não Tributária'' as nom_conta , 1 as multiplicador + , (SELECT nom_sistema + FROM contabilidade.sistema_contabil + INNER JOIN contabilidade.plano_conta + ON plano_conta.exercicio = sistema_contabil.exercicio + AND plano_conta.cod_sistema = sistema_contabil.cod_sistema + WHERE plano_conta.cod_estrutural LIKE '||quote_literal('1.1.2.6.0.00.00%')||' + AND plano_conta.exercicio = '||quote_literal(stExercicio)||' + ) AS tipo_conta UNION ALL @@ -438,6 +540,14 @@ BEGIN , publico.fn_nivel('||quote_literal('1.1.2.9.0.00.00')||') as nivel , ''(-) Ajuste de Perdas de Créditos a Curto Prazo'' as nom_conta , 1 as multiplicador + , (SELECT nom_sistema + FROM contabilidade.sistema_contabil + INNER JOIN contabilidade.plano_conta + ON plano_conta.exercicio = sistema_contabil.exercicio + AND plano_conta.cod_sistema = sistema_contabil.cod_sistema + WHERE plano_conta.cod_estrutural LIKE '||quote_literal('1.1.2.9.0.00.00%')||' + AND plano_conta.exercicio = '||quote_literal(stExercicio)||' + ) AS tipo_conta UNION ALL @@ -447,6 +557,14 @@ BEGIN , publico.fn_nivel('||quote_literal('1.1.2.9.0.00.00')||') as nivel , ''(-) Ajuste de Perdas de Créditos a Curto Prazo'' as nom_conta , -1 as multiplicador + , (SELECT nom_sistema + FROM contabilidade.sistema_contabil + INNER JOIN contabilidade.plano_conta + ON plano_conta.exercicio = sistema_contabil.exercicio + AND plano_conta.cod_sistema = sistema_contabil.cod_sistema + WHERE plano_conta.cod_estrutural LIKE '||quote_literal('1.1.2.9.2.00.00%')||' + AND plano_conta.exercicio = '||quote_literal(stExercicio)||' + ) AS tipo_conta UNION ALL @@ -456,6 +574,14 @@ BEGIN , publico.fn_nivel('||quote_literal('1.1.3.0.0.00.00')||') as nivel , ''Demais Créditos e Valores a Curto Prazo'' as nom_conta , 1 as multiplicador + , (SELECT nom_sistema + FROM contabilidade.sistema_contabil + INNER JOIN contabilidade.plano_conta + ON plano_conta.exercicio = sistema_contabil.exercicio + AND plano_conta.cod_sistema = sistema_contabil.cod_sistema + WHERE plano_conta.cod_estrutural LIKE '||quote_literal('1.1.3.0.0.00.00%')||' + AND plano_conta.exercicio = '||quote_literal(stExercicio)||' + ) AS tipo_conta UNION ALL @@ -465,6 +591,14 @@ BEGIN , publico.fn_nivel('||quote_literal('1.1.4.0.0.00.00')||') as nivel , ''Investimentos e Aplicações Temporárias a Curto Prazo'' as nom_conta , 1 as multiplicador + , (SELECT nom_sistema + FROM contabilidade.sistema_contabil + INNER JOIN contabilidade.plano_conta + ON plano_conta.exercicio = sistema_contabil.exercicio + AND plano_conta.cod_sistema = sistema_contabil.cod_sistema + WHERE plano_conta.cod_estrutural LIKE '||quote_literal('1.1.4.0.0.00.00%')||' + AND plano_conta.exercicio = '||quote_literal(stExercicio)||' + ) AS tipo_conta UNION ALL @@ -474,6 +608,14 @@ BEGIN , publico.fn_nivel('||quote_literal('1.1.5.0.0.00.00')||') as nivel , ''Estoques'' as nom_conta , 1 as multiplicador + , (SELECT nom_sistema + FROM contabilidade.sistema_contabil + INNER JOIN contabilidade.plano_conta + ON plano_conta.exercicio = sistema_contabil.exercicio + AND plano_conta.cod_sistema = sistema_contabil.cod_sistema + WHERE plano_conta.cod_estrutural LIKE '||quote_literal('1.1.5.0.0.00.00%')||' + AND plano_conta.exercicio = '||quote_literal(stExercicio)||' + ) AS tipo_conta UNION ALL @@ -483,6 +625,14 @@ BEGIN , publico.fn_nivel('||quote_literal('1.1.9.0.0.00.00')||') as nivel , ''VPD Pagas Antecipadamente'' as nom_conta , 1 as multiplicador + , (SELECT nom_sistema + FROM contabilidade.sistema_contabil + INNER JOIN contabilidade.plano_conta + ON plano_conta.exercicio = sistema_contabil.exercicio + AND plano_conta.cod_sistema = sistema_contabil.cod_sistema + WHERE plano_conta.cod_estrutural LIKE '||quote_literal('1.1.9.0.0.00.00%')||' + AND plano_conta.exercicio = '||quote_literal(stExercicio)||' + ) AS tipo_conta UNION ALL @@ -492,6 +642,14 @@ BEGIN , publico.fn_nivel('||quote_literal('1.2.0.0.0.00.00')||') as nivel , ''ATIVO NÃO-CIRCULANTE'' as nom_conta , 1 as multiplicador + , (SELECT nom_sistema + FROM contabilidade.sistema_contabil + INNER JOIN contabilidade.plano_conta + ON plano_conta.exercicio = sistema_contabil.exercicio + AND plano_conta.cod_sistema = sistema_contabil.cod_sistema + WHERE plano_conta.cod_estrutural LIKE '||quote_literal('1.2.0.0.0.00.00%')||' + AND plano_conta.exercicio = '||quote_literal(stExercicio)||' + ) AS tipo_conta UNION ALL @@ -501,6 +659,14 @@ BEGIN , publico.fn_nivel('||quote_literal('1.2.0.0.0.00.00')||') as nivel , ''ATIVO NÃO-CIRCULANTE'' as nom_conta , -1 as multiplicador + , (SELECT nom_sistema + FROM contabilidade.sistema_contabil + INNER JOIN contabilidade.plano_conta + ON plano_conta.exercicio = sistema_contabil.exercicio + AND plano_conta.cod_sistema = sistema_contabil.cod_sistema + WHERE plano_conta.cod_estrutural LIKE '||quote_literal('1.2.1.1.2.00.00%')||' + AND plano_conta.exercicio = '||quote_literal(stExercicio)||' + ) AS tipo_conta UNION ALL @@ -510,6 +676,14 @@ BEGIN , publico.fn_nivel('||quote_literal('1.2.0.0.0.00.00')||') as nivel , ''ATIVO NÃO-CIRCULANTE'' as nom_conta , -1 as multiplicador + , (SELECT nom_sistema + FROM contabilidade.sistema_contabil + INNER JOIN contabilidade.plano_conta + ON plano_conta.exercicio = sistema_contabil.exercicio + AND plano_conta.cod_sistema = sistema_contabil.cod_sistema + WHERE plano_conta.cod_estrutural LIKE '||quote_literal('1.2.2.1.2.00.00%')||' + AND plano_conta.exercicio = '||quote_literal(stExercicio)||' + ) AS tipo_conta UNION ALL @@ -519,6 +693,14 @@ BEGIN , publico.fn_nivel('||quote_literal('1.2.0.0.0.00.00')||') as nivel , ''ATIVO NÃO-CIRCULANTE'' as nom_conta , -1 as multiplicador + , (SELECT nom_sistema + FROM contabilidade.sistema_contabil + INNER JOIN contabilidade.plano_conta + ON plano_conta.exercicio = sistema_contabil.exercicio + AND plano_conta.cod_sistema = sistema_contabil.cod_sistema + WHERE plano_conta.cod_estrutural LIKE '||quote_literal('1.2.2.9.2.00.00%')||' + AND plano_conta.exercicio = '||quote_literal(stExercicio)||' + ) AS tipo_conta UNION ALL @@ -528,6 +710,14 @@ BEGIN , publico.fn_nivel('||quote_literal('1.2.1.0.0.00.00')||') as nivel , ''Ativo Realizável a Longo Prazo'' as nom_conta , 1 as multiplicador + , (SELECT nom_sistema + FROM contabilidade.sistema_contabil + INNER JOIN contabilidade.plano_conta + ON plano_conta.exercicio = sistema_contabil.exercicio + AND plano_conta.cod_sistema = sistema_contabil.cod_sistema + WHERE plano_conta.cod_estrutural LIKE '||quote_literal('1.2.1.0.0.00.00%')||' + AND plano_conta.exercicio = '||quote_literal(stExercicio)||' + ) AS tipo_conta UNION ALL @@ -537,6 +727,14 @@ BEGIN , publico.fn_nivel('||quote_literal('1.2.1.0.0.00.00')||') as nivel , ''Ativo Realizável a Longo Prazo'' as nom_conta , -1 as multiplicador + , (SELECT nom_sistema + FROM contabilidade.sistema_contabil + INNER JOIN contabilidade.plano_conta + ON plano_conta.exercicio = sistema_contabil.exercicio + AND plano_conta.cod_sistema = sistema_contabil.cod_sistema + WHERE plano_conta.cod_estrutural LIKE '||quote_literal('1.2.1.1.2.00.00%')||' + AND plano_conta.exercicio = '||quote_literal(stExercicio)||' + ) AS tipo_conta UNION ALL @@ -546,6 +744,14 @@ BEGIN , publico.fn_nivel('||quote_literal('1.2.1.1.0.00.00')||') as nivel , ''Créditos a Longo Prazo'' as nom_conta , 1 as multiplicador + , (SELECT nom_sistema + FROM contabilidade.sistema_contabil + INNER JOIN contabilidade.plano_conta + ON plano_conta.exercicio = sistema_contabil.exercicio + AND plano_conta.cod_sistema = sistema_contabil.cod_sistema + WHERE plano_conta.cod_estrutural LIKE '||quote_literal('1.2.1.1.0.00.00%')||' + AND plano_conta.exercicio = '||quote_literal(stExercicio)||' + ) AS tipo_conta UNION ALL @@ -555,6 +761,14 @@ BEGIN , publico.fn_nivel('||quote_literal('1.2.1.1.0.00.00')||') as nivel , ''Créditos a Longo Prazo'' as nom_conta , -1 as multiplicador + , (SELECT nom_sistema + FROM contabilidade.sistema_contabil + INNER JOIN contabilidade.plano_conta + ON plano_conta.exercicio = sistema_contabil.exercicio + AND plano_conta.cod_sistema = sistema_contabil.cod_sistema + WHERE plano_conta.cod_estrutural LIKE '||quote_literal('1.2.1.1.2.00.00%')||' + AND plano_conta.exercicio = '||quote_literal(stExercicio)||' + ) AS tipo_conta UNION ALL @@ -564,6 +778,14 @@ BEGIN , publico.fn_nivel('||quote_literal('1.2.1.1.0.01.00')||') as nivel , ''Créditos Tributários a Receber'' as nom_conta , 1 as multiplicador + , (SELECT nom_sistema + FROM contabilidade.sistema_contabil + INNER JOIN contabilidade.plano_conta + ON plano_conta.exercicio = sistema_contabil.exercicio + AND plano_conta.cod_sistema = sistema_contabil.cod_sistema + WHERE plano_conta.cod_estrutural LIKE '||quote_literal('1.2.1.1.1.01.00%')||' + AND plano_conta.exercicio = '||quote_literal(stExercicio)||' + ) AS tipo_conta UNION ALL @@ -573,6 +795,14 @@ BEGIN , publico.fn_nivel('||quote_literal('1.2.1.1.0.01.00')||') as nivel , ''Créditos Tributários a Receber'' as nom_conta , 1 as multiplicador + , (SELECT nom_sistema + FROM contabilidade.sistema_contabil + INNER JOIN contabilidade.plano_conta + ON plano_conta.exercicio = sistema_contabil.exercicio + AND plano_conta.cod_sistema = sistema_contabil.cod_sistema + WHERE plano_conta.cod_estrutural LIKE '||quote_literal('1.2.1.1.3.01.00%')||' + AND plano_conta.exercicio = '||quote_literal(stExercicio)||' + ) AS tipo_conta UNION ALL @@ -582,6 +812,14 @@ BEGIN , publico.fn_nivel('||quote_literal('1.2.1.1.0.01.00')||') as nivel , ''Créditos Tributários a Receber'' as nom_conta , 1 as multiplicador + , (SELECT nom_sistema + FROM contabilidade.sistema_contabil + INNER JOIN contabilidade.plano_conta + ON plano_conta.exercicio = sistema_contabil.exercicio + AND plano_conta.cod_sistema = sistema_contabil.cod_sistema + WHERE plano_conta.cod_estrutural LIKE '||quote_literal('1.2.1.1.4.01.00%')||' + AND plano_conta.exercicio = '||quote_literal(stExercicio)||' + ) AS tipo_conta UNION ALL @@ -591,6 +829,14 @@ BEGIN , publico.fn_nivel('||quote_literal('1.2.1.1.0.01.00')||') as nivel , ''Créditos Tributários a Receber'' as nom_conta , 1 as multiplicador + , (SELECT nom_sistema + FROM contabilidade.sistema_contabil + INNER JOIN contabilidade.plano_conta + ON plano_conta.exercicio = sistema_contabil.exercicio + AND plano_conta.cod_sistema = sistema_contabil.cod_sistema + WHERE plano_conta.cod_estrutural LIKE '||quote_literal('1.2.1.1.5.01.00%')||' + AND plano_conta.exercicio = '||quote_literal(stExercicio)||' + ) AS tipo_conta UNION ALL @@ -600,6 +846,14 @@ BEGIN , publico.fn_nivel('||quote_literal('1.2.1.1.0.02.00')||') as nivel , ''Clientes'' as nom_conta , 1 as multiplicador + , (SELECT nom_sistema + FROM contabilidade.sistema_contabil + INNER JOIN contabilidade.plano_conta + ON plano_conta.exercicio = sistema_contabil.exercicio + AND plano_conta.cod_sistema = sistema_contabil.cod_sistema + WHERE plano_conta.cod_estrutural LIKE '||quote_literal('1.2.1.1.1.02.00%')||' + AND plano_conta.exercicio = '||quote_literal(stExercicio)||' + ) AS tipo_conta UNION ALL @@ -609,6 +863,14 @@ BEGIN , publico.fn_nivel('||quote_literal('1.2.1.1.0.02.00')||') as nivel , ''Clientes'' as nom_conta , 1 as multiplicador + , (SELECT nom_sistema + FROM contabilidade.sistema_contabil + INNER JOIN contabilidade.plano_conta + ON plano_conta.exercicio = sistema_contabil.exercicio + AND plano_conta.cod_sistema = sistema_contabil.cod_sistema + WHERE plano_conta.cod_estrutural LIKE '||quote_literal('1.2.1.1.3.02.00%')||' + AND plano_conta.exercicio = '||quote_literal(stExercicio)||' + ) AS tipo_conta UNION ALL @@ -618,6 +880,14 @@ BEGIN , publico.fn_nivel('||quote_literal('1.2.1.1.0.02.00')||') as nivel , ''Clientes'' as nom_conta , 1 as multiplicador + , (SELECT nom_sistema + FROM contabilidade.sistema_contabil + INNER JOIN contabilidade.plano_conta + ON plano_conta.exercicio = sistema_contabil.exercicio + AND plano_conta.cod_sistema = sistema_contabil.cod_sistema + WHERE plano_conta.cod_estrutural LIKE '||quote_literal('1.2.1.1.4.02.00%')||' + AND plano_conta.exercicio = '||quote_literal(stExercicio)||' + ) AS tipo_conta UNION ALL @@ -627,6 +897,14 @@ BEGIN , publico.fn_nivel('||quote_literal('1.2.1.1.0.02.00')||') as nivel , ''Clientes'' as nom_conta , 1 as multiplicador + , (SELECT nom_sistema + FROM contabilidade.sistema_contabil + INNER JOIN contabilidade.plano_conta + ON plano_conta.exercicio = sistema_contabil.exercicio + AND plano_conta.cod_sistema = sistema_contabil.cod_sistema + WHERE plano_conta.cod_estrutural LIKE '||quote_literal('1.2.1.1.5.02.00%')||' + AND plano_conta.exercicio = '||quote_literal(stExercicio)||' + ) AS tipo_conta UNION ALL @@ -636,6 +914,14 @@ BEGIN , publico.fn_nivel('||quote_literal('1.2.1.1.0.03.00')||') as nivel , ''Empréstimos e Financiamentos Concedidos'' as nom_conta , 1 as multiplicador + , (SELECT nom_sistema + FROM contabilidade.sistema_contabil + INNER JOIN contabilidade.plano_conta + ON plano_conta.exercicio = sistema_contabil.exercicio + AND plano_conta.cod_sistema = sistema_contabil.cod_sistema + WHERE plano_conta.cod_estrutural LIKE '||quote_literal('1.2.1.1.1.03.00%')||' + AND plano_conta.exercicio = '||quote_literal(stExercicio)||' + ) AS tipo_conta UNION ALL @@ -645,6 +931,14 @@ BEGIN , publico.fn_nivel('||quote_literal('1.2.1.1.0.03.00')||') as nivel , ''Empréstimos e Financiamentos Concedidos'' as nom_conta , 1 as multiplicador + , (SELECT nom_sistema + FROM contabilidade.sistema_contabil + INNER JOIN contabilidade.plano_conta + ON plano_conta.exercicio = sistema_contabil.exercicio + AND plano_conta.cod_sistema = sistema_contabil.cod_sistema + WHERE plano_conta.cod_estrutural LIKE '||quote_literal('1.2.1.1.3.03.00%')||' + AND plano_conta.exercicio = '||quote_literal(stExercicio)||' + ) AS tipo_conta UNION ALL @@ -654,6 +948,14 @@ BEGIN , publico.fn_nivel('||quote_literal('1.2.1.1.0.03.00')||') as nivel , ''Empréstimos e Financiamentos Concedidos'' as nom_conta , 1 as multiplicador + , (SELECT nom_sistema + FROM contabilidade.sistema_contabil + INNER JOIN contabilidade.plano_conta + ON plano_conta.exercicio = sistema_contabil.exercicio + AND plano_conta.cod_sistema = sistema_contabil.cod_sistema + WHERE plano_conta.cod_estrutural LIKE '||quote_literal('1.2.1.1.4.03.00%')||' + AND plano_conta.exercicio = '||quote_literal(stExercicio)||' + ) AS tipo_conta UNION ALL @@ -663,6 +965,14 @@ BEGIN , publico.fn_nivel('||quote_literal('1.2.1.1.0.03.00')||') as nivel , ''Empréstimos e Financiamentos Concedidos'' as nom_conta , 1 as multiplicador + , (SELECT nom_sistema + FROM contabilidade.sistema_contabil + INNER JOIN contabilidade.plano_conta + ON plano_conta.exercicio = sistema_contabil.exercicio + AND plano_conta.cod_sistema = sistema_contabil.cod_sistema + WHERE plano_conta.cod_estrutural LIKE '||quote_literal('1.2.1.1.5.03.00%')||' + AND plano_conta.exercicio = '||quote_literal(stExercicio)||' + ) AS tipo_conta UNION ALL @@ -672,6 +982,14 @@ BEGIN , publico.fn_nivel('||quote_literal('1.2.1.1.0.04.00')||') as nivel , ''Dívida Ativa Tributária'' as nom_conta , 1 as multiplicador + , (SELECT nom_sistema + FROM contabilidade.sistema_contabil + INNER JOIN contabilidade.plano_conta + ON plano_conta.exercicio = sistema_contabil.exercicio + AND plano_conta.cod_sistema = sistema_contabil.cod_sistema + WHERE plano_conta.cod_estrutural LIKE '||quote_literal('1.2.1.1.1.04.00%')||' + AND plano_conta.exercicio = '||quote_literal(stExercicio)||' + ) AS tipo_conta UNION ALL @@ -681,6 +999,14 @@ BEGIN , publico.fn_nivel('||quote_literal('1.2.1.1.0.04.00')||') as nivel , ''Dívida Ativa Tributária'' as nom_conta , 1 as multiplicador + , (SELECT nom_sistema + FROM contabilidade.sistema_contabil + INNER JOIN contabilidade.plano_conta + ON plano_conta.exercicio = sistema_contabil.exercicio + AND plano_conta.cod_sistema = sistema_contabil.cod_sistema + WHERE plano_conta.cod_estrutural LIKE '||quote_literal('1.2.1.1.3.04.00%')||' + AND plano_conta.exercicio = '||quote_literal(stExercicio)||' + ) AS tipo_conta UNION ALL @@ -690,6 +1016,14 @@ BEGIN , publico.fn_nivel('||quote_literal('1.2.1.1.0.04.00')||') as nivel , ''Dívida Ativa Tributária'' as nom_conta , 1 as multiplicador + , (SELECT nom_sistema + FROM contabilidade.sistema_contabil + INNER JOIN contabilidade.plano_conta + ON plano_conta.exercicio = sistema_contabil.exercicio + AND plano_conta.cod_sistema = sistema_contabil.cod_sistema + WHERE plano_conta.cod_estrutural LIKE '||quote_literal('1.2.1.1.4.04.00%')||' + AND plano_conta.exercicio = '||quote_literal(stExercicio)||' + ) AS tipo_conta UNION ALL @@ -699,6 +1033,14 @@ BEGIN , publico.fn_nivel('||quote_literal('1.2.1.1.0.04.00')||') as nivel , ''Dívida Ativa Tributária'' as nom_conta , 1 as multiplicador + , (SELECT nom_sistema + FROM contabilidade.sistema_contabil + INNER JOIN contabilidade.plano_conta + ON plano_conta.exercicio = sistema_contabil.exercicio + AND plano_conta.cod_sistema = sistema_contabil.cod_sistema + WHERE plano_conta.cod_estrutural LIKE '||quote_literal('1.2.1.1.5.04.00%')||' + AND plano_conta.exercicio = '||quote_literal(stExercicio)||' + ) AS tipo_conta UNION ALL @@ -708,6 +1050,14 @@ BEGIN , publico.fn_nivel('||quote_literal('1.2.1.1.0.05.00')||') as nivel , ''Dívida Ativa não Tributária'' as nom_conta , 1 as multiplicador + , (SELECT nom_sistema + FROM contabilidade.sistema_contabil + INNER JOIN contabilidade.plano_conta + ON plano_conta.exercicio = sistema_contabil.exercicio + AND plano_conta.cod_sistema = sistema_contabil.cod_sistema + WHERE plano_conta.cod_estrutural LIKE '||quote_literal('1.2.1.1.1.05.00%')||' + AND plano_conta.exercicio = '||quote_literal(stExercicio)||' + ) AS tipo_conta UNION ALL @@ -717,6 +1067,14 @@ BEGIN , publico.fn_nivel('||quote_literal('1.2.1.1.0.05.00')||') as nivel , ''Dívida Ativa não Tributária'' as nom_conta , 1 as multiplicador + , (SELECT nom_sistema + FROM contabilidade.sistema_contabil + INNER JOIN contabilidade.plano_conta + ON plano_conta.exercicio = sistema_contabil.exercicio + AND plano_conta.cod_sistema = sistema_contabil.cod_sistema + WHERE plano_conta.cod_estrutural LIKE '||quote_literal('1.2.1.1.3.05.00%')||' + AND plano_conta.exercicio = '||quote_literal(stExercicio)||' + ) AS tipo_conta UNION ALL @@ -726,6 +1084,14 @@ BEGIN , publico.fn_nivel('||quote_literal('1.2.1.1.0.05.00')||') as nivel , ''Dívida Ativa não Tributária'' as nom_conta , 1 as multiplicador + , (SELECT nom_sistema + FROM contabilidade.sistema_contabil + INNER JOIN contabilidade.plano_conta + ON plano_conta.exercicio = sistema_contabil.exercicio + AND plano_conta.cod_sistema = sistema_contabil.cod_sistema + WHERE plano_conta.cod_estrutural LIKE '||quote_literal('1.2.1.1.4.05.00%')||' + AND plano_conta.exercicio = '||quote_literal(stExercicio)||' + ) AS tipo_conta UNION ALL @@ -735,6 +1101,14 @@ BEGIN , publico.fn_nivel('||quote_literal('1.2.1.1.0.05.00')||') as nivel , ''Dívida Ativa não Tributária'' as nom_conta , 1 as multiplicador + , (SELECT nom_sistema + FROM contabilidade.sistema_contabil + INNER JOIN contabilidade.plano_conta + ON plano_conta.exercicio = sistema_contabil.exercicio + AND plano_conta.cod_sistema = sistema_contabil.cod_sistema + WHERE plano_conta.cod_estrutural LIKE '||quote_literal('1.2.1.1.5.05.00%')||' + AND plano_conta.exercicio = '||quote_literal(stExercicio)||' + ) AS tipo_conta UNION ALL @@ -744,6 +1118,14 @@ BEGIN , publico.fn_nivel('||quote_literal('1.2.1.1.0.99.00')||') as nivel , ''Ajuste de Perdas de Créditos a Longo Prazo'' as nom_conta , 1 as multiplicador + , (SELECT nom_sistema + FROM contabilidade.sistema_contabil + INNER JOIN contabilidade.plano_conta + ON plano_conta.exercicio = sistema_contabil.exercicio + AND plano_conta.cod_sistema = sistema_contabil.cod_sistema + WHERE plano_conta.cod_estrutural LIKE '||quote_literal('1.2.1.1.1.99.00%')||' + AND plano_conta.exercicio = '||quote_literal(stExercicio)||' + ) AS tipo_conta UNION ALL @@ -753,6 +1135,14 @@ BEGIN , publico.fn_nivel('||quote_literal('1.2.1.1.0.99.00')||') as nivel , ''Ajuste de Perdas de Créditos a Longo Prazo'' as nom_conta , 1 as multiplicador + , (SELECT nom_sistema + FROM contabilidade.sistema_contabil + INNER JOIN contabilidade.plano_conta + ON plano_conta.exercicio = sistema_contabil.exercicio + AND plano_conta.cod_sistema = sistema_contabil.cod_sistema + WHERE plano_conta.cod_estrutural LIKE '||quote_literal('1.2.1.1.3.99.00%')||' + AND plano_conta.exercicio = '||quote_literal(stExercicio)||' + ) AS tipo_conta UNION ALL @@ -762,6 +1152,14 @@ BEGIN , publico.fn_nivel('||quote_literal('1.2.1.1.0.99.00')||') as nivel , ''Ajuste de Perdas de Créditos a Longo Prazo'' as nom_conta , 1 as multiplicador + , (SELECT nom_sistema + FROM contabilidade.sistema_contabil + INNER JOIN contabilidade.plano_conta + ON plano_conta.exercicio = sistema_contabil.exercicio + AND plano_conta.cod_sistema = sistema_contabil.cod_sistema + WHERE plano_conta.cod_estrutural LIKE '||quote_literal('1.2.1.1.4.99.00%')||' + AND plano_conta.exercicio = '||quote_literal(stExercicio)||' + ) AS tipo_conta UNION ALL @@ -771,6 +1169,14 @@ BEGIN , publico.fn_nivel('||quote_literal('1.2.1.1.0.99.00')||') as nivel , ''Ajuste de Perdas de Créditos a Longo Prazo'' as nom_conta , 1 as multiplicador + , (SELECT nom_sistema + FROM contabilidade.sistema_contabil + INNER JOIN contabilidade.plano_conta + ON plano_conta.exercicio = sistema_contabil.exercicio + AND plano_conta.cod_sistema = sistema_contabil.cod_sistema + WHERE plano_conta.cod_estrutural LIKE '||quote_literal('1.2.1.1.5.99.00%')||' + AND plano_conta.exercicio = '||quote_literal(stExercicio)||' + ) AS tipo_conta UNION ALL @@ -780,6 +1186,14 @@ BEGIN , publico.fn_nivel('||quote_literal('1.2.1.2.0.00.00')||') as nivel , ''Demais Créditos e Valores a Longo Prazo'' as nom_conta , 1 as multiplicador + , (SELECT nom_sistema + FROM contabilidade.sistema_contabil + INNER JOIN contabilidade.plano_conta + ON plano_conta.exercicio = sistema_contabil.exercicio + AND plano_conta.cod_sistema = sistema_contabil.cod_sistema + WHERE plano_conta.cod_estrutural LIKE '||quote_literal('1.2.1.2.0.00.00%')||' + AND plano_conta.exercicio = '||quote_literal(stExercicio)||' + ) AS tipo_conta UNION ALL @@ -789,6 +1203,14 @@ BEGIN , publico.fn_nivel('||quote_literal('1.2.1.3.0.00.00')||') as nivel , ''Investimentos e Aplicações Temporárias a Longo Prazo'' as nom_conta , 1 as multiplicador + , (SELECT nom_sistema + FROM contabilidade.sistema_contabil + INNER JOIN contabilidade.plano_conta + ON plano_conta.exercicio = sistema_contabil.exercicio + AND plano_conta.cod_sistema = sistema_contabil.cod_sistema + WHERE plano_conta.cod_estrutural LIKE '||quote_literal('1.2.1.3.0.00.00%')||' + AND plano_conta.exercicio = '||quote_literal(stExercicio)||' + ) AS tipo_conta UNION ALL @@ -798,6 +1220,14 @@ BEGIN , publico.fn_nivel('||quote_literal('1.2.1.4.0.00.00')||') as nivel , ''Estoques'' as nom_conta , 1 as multiplicador + , (SELECT nom_sistema + FROM contabilidade.sistema_contabil + INNER JOIN contabilidade.plano_conta + ON plano_conta.exercicio = sistema_contabil.exercicio + AND plano_conta.cod_sistema = sistema_contabil.cod_sistema + WHERE plano_conta.cod_estrutural LIKE '||quote_literal('1.2.1.4.0.00.00%')||' + AND plano_conta.exercicio = '||quote_literal(stExercicio)||' + ) AS tipo_conta UNION ALL @@ -807,6 +1237,14 @@ BEGIN , publico.fn_nivel('||quote_literal('1.2.1.9.0.00.00')||') as nivel , ''VDP Pagas Antecipadamente'' as nom_conta , 1 as multiplicador + , (SELECT nom_sistema + FROM contabilidade.sistema_contabil + INNER JOIN contabilidade.plano_conta + ON plano_conta.exercicio = sistema_contabil.exercicio + AND plano_conta.cod_sistema = sistema_contabil.cod_sistema + WHERE plano_conta.cod_estrutural LIKE '||quote_literal('1.2.1.9.0.00.00%')||' + AND plano_conta.exercicio = '||quote_literal(stExercicio)||' + ) AS tipo_conta UNION ALL @@ -816,6 +1254,14 @@ BEGIN , publico.fn_nivel('||quote_literal('1.2.2.0.0.00.00')||') as nivel , ''Investimentos'' as nom_conta , 1 as multiplicador + , (SELECT nom_sistema + FROM contabilidade.sistema_contabil + INNER JOIN contabilidade.plano_conta + ON plano_conta.exercicio = sistema_contabil.exercicio + AND plano_conta.cod_sistema = sistema_contabil.cod_sistema + WHERE plano_conta.cod_estrutural LIKE '||quote_literal('1.2.2.0.0.00.00%')||' + AND plano_conta.exercicio = '||quote_literal(stExercicio)||' + ) AS tipo_conta UNION ALL @@ -825,6 +1271,14 @@ BEGIN , publico.fn_nivel('||quote_literal('1.2.2.0.0.00.00')||') as nivel , ''Investimentos'' as nom_conta , -1 as multiplicador + , (SELECT nom_sistema + FROM contabilidade.sistema_contabil + INNER JOIN contabilidade.plano_conta + ON plano_conta.exercicio = sistema_contabil.exercicio + AND plano_conta.cod_sistema = sistema_contabil.cod_sistema + WHERE plano_conta.cod_estrutural LIKE '||quote_literal('1.2.2.1.2.00.00%')||' + AND plano_conta.exercicio = '||quote_literal(stExercicio)||' + ) AS tipo_conta UNION ALL @@ -834,6 +1288,14 @@ BEGIN , publico.fn_nivel('||quote_literal('1.2.2.0.0.00.00')||') as nivel , ''Investimentos'' as nom_conta , -1 as multiplicador + , (SELECT nom_sistema + FROM contabilidade.sistema_contabil + INNER JOIN contabilidade.plano_conta + ON plano_conta.exercicio = sistema_contabil.exercicio + AND plano_conta.cod_sistema = sistema_contabil.cod_sistema + WHERE plano_conta.cod_estrutural LIKE '||quote_literal('1.2.2.9.2.00.00%')||' + AND plano_conta.exercicio = '||quote_literal(stExercicio)||' + ) AS tipo_conta UNION ALL @@ -843,6 +1305,14 @@ BEGIN , publico.fn_nivel('||quote_literal('1.2.2.1.0.00.00')||') as nivel , ''Participações Permanentes'' as nom_conta , 1 as multiplicador + , (SELECT nom_sistema + FROM contabilidade.sistema_contabil + INNER JOIN contabilidade.plano_conta + ON plano_conta.exercicio = sistema_contabil.exercicio + AND plano_conta.cod_sistema = sistema_contabil.cod_sistema + WHERE plano_conta.cod_estrutural LIKE '||quote_literal('1.2.2.1.0.00.00%')||' + AND plano_conta.exercicio = '||quote_literal(stExercicio)||' + ) AS tipo_conta UNION ALL @@ -852,6 +1322,14 @@ BEGIN , publico.fn_nivel('||quote_literal('1.2.2.1.0.00.00')||') as nivel , ''Participações Permanentes'' as nom_conta , -1 as multiplicador + , (SELECT nom_sistema + FROM contabilidade.sistema_contabil + INNER JOIN contabilidade.plano_conta + ON plano_conta.exercicio = sistema_contabil.exercicio + AND plano_conta.cod_sistema = sistema_contabil.cod_sistema + WHERE plano_conta.cod_estrutural LIKE '||quote_literal('1.2.2.1.2.00.00%')||' + AND plano_conta.exercicio = '||quote_literal(stExercicio)||' + ) AS tipo_conta UNION ALL @@ -861,6 +1339,14 @@ BEGIN , publico.fn_nivel('||quote_literal('1.2.2.1.0.01.00')||') as nivel , ''Participações Avaliadas pelo Método de Equivalência Patrimonial'' as nom_conta , 1 as multiplicador + , (SELECT nom_sistema + FROM contabilidade.sistema_contabil + INNER JOIN contabilidade.plano_conta + ON plano_conta.exercicio = sistema_contabil.exercicio + AND plano_conta.cod_sistema = sistema_contabil.cod_sistema + WHERE plano_conta.cod_estrutural LIKE '||quote_literal('1.2.2.1.1.01.00%')||' + AND plano_conta.exercicio = '||quote_literal(stExercicio)||' + ) AS tipo_conta UNION ALL @@ -870,6 +1356,14 @@ BEGIN , publico.fn_nivel('||quote_literal('1.2.2.1.0.01.00')||') as nivel , ''Participações Avaliadas pelo Método de Equivalência Patrimonial'' as nom_conta , 1 as multiplicador + , (SELECT nom_sistema + FROM contabilidade.sistema_contabil + INNER JOIN contabilidade.plano_conta + ON plano_conta.exercicio = sistema_contabil.exercicio + AND plano_conta.cod_sistema = sistema_contabil.cod_sistema + WHERE plano_conta.cod_estrutural LIKE '||quote_literal('1.2.2.1.3.01.00%')||' + AND plano_conta.exercicio = '||quote_literal(stExercicio)||' + ) AS tipo_conta UNION ALL @@ -879,6 +1373,14 @@ BEGIN , publico.fn_nivel('||quote_literal('1.2.2.1.0.01.00')||') as nivel , ''Participações Avaliadas pelo Método de Equivalência Patrimonial'' as nom_conta , 1 as multiplicador + , (SELECT nom_sistema + FROM contabilidade.sistema_contabil + INNER JOIN contabilidade.plano_conta + ON plano_conta.exercicio = sistema_contabil.exercicio + AND plano_conta.cod_sistema = sistema_contabil.cod_sistema + WHERE plano_conta.cod_estrutural LIKE '||quote_literal('1.2.2.1.4.01.00%')||' + AND plano_conta.exercicio = '||quote_literal(stExercicio)||' + ) AS tipo_conta UNION ALL @@ -888,6 +1390,14 @@ BEGIN , publico.fn_nivel('||quote_literal('1.2.2.1.0.01.00')||') as nivel , ''Participações Avaliadas pelo Método de Equivalência Patrimonial'' as nom_conta , 1 as multiplicador + , (SELECT nom_sistema + FROM contabilidade.sistema_contabil + INNER JOIN contabilidade.plano_conta + ON plano_conta.exercicio = sistema_contabil.exercicio + AND plano_conta.cod_sistema = sistema_contabil.cod_sistema + WHERE plano_conta.cod_estrutural LIKE '||quote_literal('1.2.2.1.5.01.00%')||' + AND plano_conta.exercicio = '||quote_literal(stExercicio)||' + ) AS tipo_conta UNION ALL @@ -897,6 +1407,14 @@ BEGIN , publico.fn_nivel('||quote_literal('1.2.2.1.0.02.00')||') as nivel , ''Padrões Avaliadas pelo Método de Custo'' as nom_conta , 1 as multiplicador + , (SELECT nom_sistema + FROM contabilidade.sistema_contabil + INNER JOIN contabilidade.plano_conta + ON plano_conta.exercicio = sistema_contabil.exercicio + AND plano_conta.cod_sistema = sistema_contabil.cod_sistema + WHERE plano_conta.cod_estrutural LIKE '||quote_literal('1.2.2.1.1.02.00%')||' + AND plano_conta.exercicio = '||quote_literal(stExercicio)||' + ) AS tipo_conta UNION ALL @@ -906,6 +1424,14 @@ BEGIN , publico.fn_nivel('||quote_literal('1.2.2.1.0.02.00')||') as nivel , ''Padrões Avaliadas pelo Método de Custo'' as nom_conta , 1 as multiplicador + , (SELECT nom_sistema + FROM contabilidade.sistema_contabil + INNER JOIN contabilidade.plano_conta + ON plano_conta.exercicio = sistema_contabil.exercicio + AND plano_conta.cod_sistema = sistema_contabil.cod_sistema + WHERE plano_conta.cod_estrutural LIKE '||quote_literal('1.2.2.1.3.02.00%')||' + AND plano_conta.exercicio = '||quote_literal(stExercicio)||' + ) AS tipo_conta UNION ALL @@ -915,6 +1441,14 @@ BEGIN , publico.fn_nivel('||quote_literal('1.2.2.1.0.02.00')||') as nivel , ''Padrões Avaliadas pelo Método de Custo'' as nom_conta , 1 as multiplicador + , (SELECT nom_sistema + FROM contabilidade.sistema_contabil + INNER JOIN contabilidade.plano_conta + ON plano_conta.exercicio = sistema_contabil.exercicio + AND plano_conta.cod_sistema = sistema_contabil.cod_sistema + WHERE plano_conta.cod_estrutural LIKE '||quote_literal('1.2.2.1.4.02.00%')||' + AND plano_conta.exercicio = '||quote_literal(stExercicio)||' + ) AS tipo_conta UNION ALL @@ -924,6 +1458,14 @@ BEGIN , publico.fn_nivel('||quote_literal('1.2.2.1.0.02.00')||') as nivel , ''Padrões Avaliadas pelo Método de Custo'' as nom_conta , 1 as multiplicador + , (SELECT nom_sistema + FROM contabilidade.sistema_contabil + INNER JOIN contabilidade.plano_conta + ON plano_conta.exercicio = sistema_contabil.exercicio + AND plano_conta.cod_sistema = sistema_contabil.cod_sistema + WHERE plano_conta.cod_estrutural LIKE '||quote_literal('1.2.2.1.5.02.00%')||' + AND plano_conta.exercicio = '||quote_literal(stExercicio)||' + ) AS tipo_conta UNION ALL @@ -933,6 +1475,14 @@ BEGIN , publico.fn_nivel('||quote_literal('1.2.2.9.0.01.00')||') as nivel , ''(-) Redução ao Valor Recuperável de Participações Permanentes'' as nom_conta , 1 as multiplicador + , (SELECT nom_sistema + FROM contabilidade.sistema_contabil + INNER JOIN contabilidade.plano_conta + ON plano_conta.exercicio = sistema_contabil.exercicio + AND plano_conta.cod_sistema = sistema_contabil.cod_sistema + WHERE plano_conta.cod_estrutural LIKE '||quote_literal('1.2.2.9.1.01.00%')||' + AND plano_conta.exercicio = '||quote_literal(stExercicio)||' + ) AS tipo_conta UNION ALL @@ -942,6 +1492,14 @@ BEGIN , publico.fn_nivel('||quote_literal('1.2.2.9.0.01.00')||') as nivel , ''(-) Redução ao Valor Recuperável de Participações Permanentes'' as nom_conta , 1 as multiplicador + , (SELECT nom_sistema + FROM contabilidade.sistema_contabil + INNER JOIN contabilidade.plano_conta + ON plano_conta.exercicio = sistema_contabil.exercicio + AND plano_conta.cod_sistema = sistema_contabil.cod_sistema + WHERE plano_conta.cod_estrutural LIKE '||quote_literal('1.2.2.9.3.01.00%')||' + AND plano_conta.exercicio = '||quote_literal(stExercicio)||' + ) AS tipo_conta UNION ALL @@ -951,6 +1509,14 @@ BEGIN , publico.fn_nivel('||quote_literal('1.2.2.9.0.01.00')||') as nivel , ''(-) Redução ao Valor Recuperável de Participações Permanentes'' as nom_conta , 1 as multiplicador + , (SELECT nom_sistema + FROM contabilidade.sistema_contabil + INNER JOIN contabilidade.plano_conta + ON plano_conta.exercicio = sistema_contabil.exercicio + AND plano_conta.cod_sistema = sistema_contabil.cod_sistema + WHERE plano_conta.cod_estrutural LIKE '||quote_literal('1.2.2.9.4.01.00%')||' + AND plano_conta.exercicio = '||quote_literal(stExercicio)||' + ) AS tipo_conta UNION ALL @@ -960,6 +1526,14 @@ BEGIN , publico.fn_nivel('||quote_literal('1.2.2.9.0.01.00')||') as nivel , ''(-) Redução ao Valor Recuperável de Participações Permanentes'' as nom_conta , 1 as multiplicador + , (SELECT nom_sistema + FROM contabilidade.sistema_contabil + INNER JOIN contabilidade.plano_conta + ON plano_conta.exercicio = sistema_contabil.exercicio + AND plano_conta.cod_sistema = sistema_contabil.cod_sistema + WHERE plano_conta.cod_estrutural LIKE '||quote_literal('1.2.2.9.5.01.00%')||' + AND plano_conta.exercicio = '||quote_literal(stExercicio)||' + ) AS tipo_conta UNION ALL @@ -969,6 +1543,14 @@ BEGIN , publico.fn_nivel('||quote_literal('1.2.2.2.0.00.00')||') as nivel , ''Propriedades para Investimentos'' as nom_conta , 1 as multiplicador + , (SELECT nom_sistema + FROM contabilidade.sistema_contabil + INNER JOIN contabilidade.plano_conta + ON plano_conta.exercicio = sistema_contabil.exercicio + AND plano_conta.cod_sistema = sistema_contabil.cod_sistema + WHERE plano_conta.cod_estrutural LIKE '||quote_literal('1.2.2.2.0.00.00%')||' + AND plano_conta.exercicio = '||quote_literal(stExercicio)||' + ) AS tipo_conta UNION ALL @@ -978,6 +1560,14 @@ BEGIN , publico.fn_nivel('||quote_literal('1.2.2.8.1.01.00')||') as nivel , ''Depreciação Acumulada de Propriedades para Investimentos'' as nom_conta , 1 as multiplicador + , (SELECT nom_sistema + FROM contabilidade.sistema_contabil + INNER JOIN contabilidade.plano_conta + ON plano_conta.exercicio = sistema_contabil.exercicio + AND plano_conta.cod_sistema = sistema_contabil.cod_sistema + WHERE plano_conta.cod_estrutural LIKE '||quote_literal('1.2.2.8.1.01.00%')||' + AND plano_conta.exercicio = '||quote_literal(stExercicio)||' + ) AS tipo_conta UNION ALL @@ -987,6 +1577,14 @@ BEGIN , publico.fn_nivel('||quote_literal('1.2.2.9.1.02.00')||') as nivel , ''Redução ao Valor Recuperável de Propriedades de Investimentos'' as nom_conta , 1 as multiplicador + , (SELECT nom_sistema + FROM contabilidade.sistema_contabil + INNER JOIN contabilidade.plano_conta + ON plano_conta.exercicio = sistema_contabil.exercicio + AND plano_conta.cod_sistema = sistema_contabil.cod_sistema + WHERE plano_conta.cod_estrutural LIKE '||quote_literal('1.2.2.9.1.02.00%')||' + AND plano_conta.exercicio = '||quote_literal(stExercicio)||' + ) AS tipo_conta UNION ALL @@ -996,6 +1594,14 @@ BEGIN , publico.fn_nivel('||quote_literal('1.2.2.3.0.00.00')||') as nivel , ''Investimentos do RPPS de Longo Prazo'' as nom_conta , 1 as multiplicador + , (SELECT nom_sistema + FROM contabilidade.sistema_contabil + INNER JOIN contabilidade.plano_conta + ON plano_conta.exercicio = sistema_contabil.exercicio + AND plano_conta.cod_sistema = sistema_contabil.cod_sistema + WHERE plano_conta.cod_estrutural LIKE '||quote_literal('1.2.2.3.0.00.00%')||' + AND plano_conta.exercicio = '||quote_literal(stExercicio)||' + ) AS tipo_conta UNION ALL @@ -1005,6 +1611,14 @@ BEGIN , publico.fn_nivel('||quote_literal('1.2.2.9.1.03.00')||') as nivel , ''(-) Redução ao Valor Recuperável de Investimentos do RPPS'' as nom_conta , 1 as multiplicador + , (SELECT nom_sistema + FROM contabilidade.sistema_contabil + INNER JOIN contabilidade.plano_conta + ON plano_conta.exercicio = sistema_contabil.exercicio + AND plano_conta.cod_sistema = sistema_contabil.cod_sistema + WHERE plano_conta.cod_estrutural LIKE '||quote_literal('1.2.2.9.1.03.00%')||' + AND plano_conta.exercicio = '||quote_literal(stExercicio)||' + ) AS tipo_conta UNION ALL @@ -1014,6 +1628,14 @@ BEGIN , publico.fn_nivel('||quote_literal('1.2.2.7.0.00.00')||') as nivel , ''Demais Investimentos Permanentes'' as nom_conta , 1 as multiplicador + , (SELECT nom_sistema + FROM contabilidade.sistema_contabil + INNER JOIN contabilidade.plano_conta + ON plano_conta.exercicio = sistema_contabil.exercicio + AND plano_conta.cod_sistema = sistema_contabil.cod_sistema + WHERE plano_conta.cod_estrutural LIKE '||quote_literal('1.2.2.7.0.00.00%')||' + AND plano_conta.exercicio = '||quote_literal(stExercicio)||' + ) AS tipo_conta UNION ALL @@ -1023,6 +1645,14 @@ BEGIN , publico.fn_nivel('||quote_literal('1.2.2.9.0.04.00')||') as nivel , ''(-) Redução ao Valor Recuperável de Demais Investimentos Permanentes'' as nom_conta , 1 as multiplicador + , (SELECT nom_sistema + FROM contabilidade.sistema_contabil + INNER JOIN contabilidade.plano_conta + ON plano_conta.exercicio = sistema_contabil.exercicio + AND plano_conta.cod_sistema = sistema_contabil.cod_sistema + WHERE plano_conta.cod_estrutural LIKE '||quote_literal('1.2.2.9.1.04.00%')||' + AND plano_conta.exercicio = '||quote_literal(stExercicio)||' + ) AS tipo_conta UNION ALL @@ -1032,6 +1662,14 @@ BEGIN , publico.fn_nivel('||quote_literal('1.2.2.9.0.04.00')||') as nivel , ''(-) Redução ao Valor Recuperável de Demais Investimentos Permanentes'' as nom_conta , 1 as multiplicador + , (SELECT nom_sistema + FROM contabilidade.sistema_contabil + INNER JOIN contabilidade.plano_conta + ON plano_conta.exercicio = sistema_contabil.exercicio + AND plano_conta.cod_sistema = sistema_contabil.cod_sistema + WHERE plano_conta.cod_estrutural LIKE '||quote_literal('1.2.2.9.3.04.00%')||' + AND plano_conta.exercicio = '||quote_literal(stExercicio)||' + ) AS tipo_conta UNION ALL @@ -1041,6 +1679,14 @@ BEGIN , publico.fn_nivel('||quote_literal('1.2.2.9.0.04.00')||') as nivel , ''(-) Redução ao Valor Recuperável de Demais Investimentos Permanentes'' as nom_conta , 1 as multiplicador + , (SELECT nom_sistema + FROM contabilidade.sistema_contabil + INNER JOIN contabilidade.plano_conta + ON plano_conta.exercicio = sistema_contabil.exercicio + AND plano_conta.cod_sistema = sistema_contabil.cod_sistema + WHERE plano_conta.cod_estrutural LIKE '||quote_literal('1.2.2.9.4.04.00%')||' + AND plano_conta.exercicio = '||quote_literal(stExercicio)||' + ) AS tipo_conta UNION ALL @@ -1050,6 +1696,14 @@ BEGIN , publico.fn_nivel('||quote_literal('1.2.2.9.0.04.00')||') as nivel , ''(-) Redução ao Valor Recuperável de Demais Investimentos Permanentes'' as nom_conta , 1 as multiplicador + , (SELECT nom_sistema + FROM contabilidade.sistema_contabil + INNER JOIN contabilidade.plano_conta + ON plano_conta.exercicio = sistema_contabil.exercicio + AND plano_conta.cod_sistema = sistema_contabil.cod_sistema + WHERE plano_conta.cod_estrutural LIKE '||quote_literal('1.2.2.9.5.04.00%')||' + AND plano_conta.exercicio = '||quote_literal(stExercicio)||' + ) AS tipo_conta UNION ALL @@ -1059,6 +1713,14 @@ BEGIN , publico.fn_nivel('||quote_literal('1.2.3.0.0.00.00')||') as nivel , ''Imobilizado'' as nom_conta , 1 as multiplicador + , (SELECT nom_sistema + FROM contabilidade.sistema_contabil + INNER JOIN contabilidade.plano_conta + ON plano_conta.exercicio = sistema_contabil.exercicio + AND plano_conta.cod_sistema = sistema_contabil.cod_sistema + WHERE plano_conta.cod_estrutural LIKE '||quote_literal('1.2.3.0.0.00.00%')||' + AND plano_conta.exercicio = '||quote_literal(stExercicio)||' + ) AS tipo_conta UNION ALL @@ -1068,6 +1730,14 @@ BEGIN , publico.fn_nivel('||quote_literal('1.2.3.1.0.00.00')||') as nivel , ''Bens Móveis'' as nom_conta , 1 as multiplicador + , (SELECT nom_sistema + FROM contabilidade.sistema_contabil + INNER JOIN contabilidade.plano_conta + ON plano_conta.exercicio = sistema_contabil.exercicio + AND plano_conta.cod_sistema = sistema_contabil.cod_sistema + WHERE plano_conta.cod_estrutural LIKE '||quote_literal('1.2.3.1.0.00.00%')||' + AND plano_conta.exercicio = '||quote_literal(stExercicio)||' + ) AS tipo_conta UNION ALL @@ -1077,6 +1747,14 @@ BEGIN , publico.fn_nivel('||quote_literal('1.2.3.8.1.01.00')||') as nivel , ''(-) Depreciação/Amortização/Exaustão Acumulada de Bens Móveis'' as nom_conta , 1 as multiplicador + , (SELECT nom_sistema + FROM contabilidade.sistema_contabil + INNER JOIN contabilidade.plano_conta + ON plano_conta.exercicio = sistema_contabil.exercicio + AND plano_conta.cod_sistema = sistema_contabil.cod_sistema + WHERE plano_conta.cod_estrutural LIKE '||quote_literal('1.2.3.8.1.01.00%')||' + AND plano_conta.exercicio = '||quote_literal(stExercicio)||' + ) AS tipo_conta UNION ALL @@ -1086,6 +1764,14 @@ BEGIN , publico.fn_nivel('||quote_literal('1.2.3.8.1.01.00')||') as nivel , ''(-) Depreciação/Amortização/Exaustão Acumulada de Bens Móveis'' as nom_conta , 1 as multiplicador + , (SELECT nom_sistema + FROM contabilidade.sistema_contabil + INNER JOIN contabilidade.plano_conta + ON plano_conta.exercicio = sistema_contabil.exercicio + AND plano_conta.cod_sistema = sistema_contabil.cod_sistema + WHERE plano_conta.cod_estrutural LIKE '||quote_literal('1.2.3.8.1.03.00%')||' + AND plano_conta.exercicio = '||quote_literal(stExercicio)||' + ) AS tipo_conta UNION ALL @@ -1095,6 +1781,14 @@ BEGIN , publico.fn_nivel('||quote_literal('1.2.3.8.1.01.00')||') as nivel , ''(-) Depreciação/Amortização/Exaustão Acumulada de Bens Móveis'' as nom_conta , 1 as multiplicador + , (SELECT nom_sistema + FROM contabilidade.sistema_contabil + INNER JOIN contabilidade.plano_conta + ON plano_conta.exercicio = sistema_contabil.exercicio + AND plano_conta.cod_sistema = sistema_contabil.cod_sistema + WHERE plano_conta.cod_estrutural LIKE '||quote_literal('1.2.3.8.1.05.00%')||' + AND plano_conta.exercicio = '||quote_literal(stExercicio)||' + ) AS tipo_conta UNION ALL @@ -1104,6 +1798,14 @@ BEGIN , publico.fn_nivel('||quote_literal('1.2.3.9.1.01.00')||') as nivel , ''Redução ao Valor Recuperável de Bens Móveis'' as nom_conta , 1 as multiplicador + , (SELECT nom_sistema + FROM contabilidade.sistema_contabil + INNER JOIN contabilidade.plano_conta + ON plano_conta.exercicio = sistema_contabil.exercicio + AND plano_conta.cod_sistema = sistema_contabil.cod_sistema + WHERE plano_conta.cod_estrutural LIKE '||quote_literal('1.2.3.9.1.01.00%')||' + AND plano_conta.exercicio = '||quote_literal(stExercicio)||' + ) AS tipo_conta UNION ALL @@ -1113,6 +1815,14 @@ BEGIN , publico.fn_nivel('||quote_literal('1.2.3.2.0.00.00')||') as nivel , ''Bens Imóveis'' as nom_conta , 1 as multiplicador + , (SELECT nom_sistema + FROM contabilidade.sistema_contabil + INNER JOIN contabilidade.plano_conta + ON plano_conta.exercicio = sistema_contabil.exercicio + AND plano_conta.cod_sistema = sistema_contabil.cod_sistema + WHERE plano_conta.cod_estrutural LIKE '||quote_literal('1.2.3.2.0.00.00%')||' + AND plano_conta.exercicio = '||quote_literal(stExercicio)||' + ) AS tipo_conta UNION ALL @@ -1122,6 +1832,14 @@ BEGIN , publico.fn_nivel('||quote_literal('1.2.3.8.1.02.00')||') as nivel , ''(-) Depreciação/Amortização/Exaustão Acumulada de Bens Imóveis'' as nom_conta , 1 as multiplicador + , (SELECT nom_sistema + FROM contabilidade.sistema_contabil + INNER JOIN contabilidade.plano_conta + ON plano_conta.exercicio = sistema_contabil.exercicio + AND plano_conta.cod_sistema = sistema_contabil.cod_sistema + WHERE plano_conta.cod_estrutural LIKE '||quote_literal('1.2.3.8.1.02.00%')||' + AND plano_conta.exercicio = '||quote_literal(stExercicio)||' + ) AS tipo_conta UNION ALL @@ -1131,6 +1849,14 @@ BEGIN , publico.fn_nivel('||quote_literal('1.2.3.8.1.02.00')||') as nivel , ''(-) Depreciação/Amortização/Exaustão Acumulada de Bens Imóveis'' as nom_conta , 1 as multiplicador + , (SELECT nom_sistema + FROM contabilidade.sistema_contabil + INNER JOIN contabilidade.plano_conta + ON plano_conta.exercicio = sistema_contabil.exercicio + AND plano_conta.cod_sistema = sistema_contabil.cod_sistema + WHERE plano_conta.cod_estrutural LIKE '||quote_literal('1.2.3.8.1.04.00%')||' + AND plano_conta.exercicio = '||quote_literal(stExercicio)||' + ) AS tipo_conta UNION ALL @@ -1140,6 +1866,14 @@ BEGIN , publico.fn_nivel('||quote_literal('1.2.3.8.1.02.00')||') as nivel , ''(-) Depreciação/Amortização/Exaustão Acumulada de Bens Imóveis'' as nom_conta , 1 as multiplicador + , (SELECT nom_sistema + FROM contabilidade.sistema_contabil + INNER JOIN contabilidade.plano_conta + ON plano_conta.exercicio = sistema_contabil.exercicio + AND plano_conta.cod_sistema = sistema_contabil.cod_sistema + WHERE plano_conta.cod_estrutural LIKE '||quote_literal('1.2.3.8.1.06.00%')||' + AND plano_conta.exercicio = '||quote_literal(stExercicio)||' + ) AS tipo_conta UNION ALL @@ -1149,6 +1883,14 @@ BEGIN , publico.fn_nivel('||quote_literal('1.2.3.9.1.02.00')||') as nivel , ''Redução ao Valor Recuperável de Bens Imóveis'' as nom_conta , 1 as multiplicador + , (SELECT nom_sistema + FROM contabilidade.sistema_contabil + INNER JOIN contabilidade.plano_conta + ON plano_conta.exercicio = sistema_contabil.exercicio + AND plano_conta.cod_sistema = sistema_contabil.cod_sistema + WHERE plano_conta.cod_estrutural LIKE '||quote_literal('1.2.3.9.1.02.00%')||' + AND plano_conta.exercicio = '||quote_literal(stExercicio)||' + ) AS tipo_conta UNION ALL @@ -1158,6 +1900,14 @@ BEGIN , publico.fn_nivel('||quote_literal('1.2.4.0.0.00.00')||') as nivel , ''Intangível'' as nom_conta , 1 as multiplicador + , (SELECT nom_sistema + FROM contabilidade.sistema_contabil + INNER JOIN contabilidade.plano_conta + ON plano_conta.exercicio = sistema_contabil.exercicio + AND plano_conta.cod_sistema = sistema_contabil.cod_sistema + WHERE plano_conta.cod_estrutural LIKE '||quote_literal('1.2.4.0.0.00.00%')||' + AND plano_conta.exercicio = '||quote_literal(stExercicio)||' + ) AS tipo_conta UNION ALL @@ -1167,6 +1917,14 @@ BEGIN , publico.fn_nivel('||quote_literal('1.2.4.1.0.00.00')||') as nivel , ''Softwares'' as nom_conta , 1 as multiplicador + , (SELECT nom_sistema + FROM contabilidade.sistema_contabil + INNER JOIN contabilidade.plano_conta + ON plano_conta.exercicio = sistema_contabil.exercicio + AND plano_conta.cod_sistema = sistema_contabil.cod_sistema + WHERE plano_conta.cod_estrutural LIKE '||quote_literal('1.2.4.1.0.00.00%')||' + AND plano_conta.exercicio = '||quote_literal(stExercicio)||' + ) AS tipo_conta UNION ALL @@ -1176,6 +1934,14 @@ BEGIN , publico.fn_nivel('||quote_literal('1.2.4.8.1.01.00')||') as nivel , ''(-) Amortização Acumulada de Softwares'' as nom_conta , 1 as multiplicador + , (SELECT nom_sistema + FROM contabilidade.sistema_contabil + INNER JOIN contabilidade.plano_conta + ON plano_conta.exercicio = sistema_contabil.exercicio + AND plano_conta.cod_sistema = sistema_contabil.cod_sistema + WHERE plano_conta.cod_estrutural LIKE '||quote_literal('1.2.4.8.1.01.00%')||' + AND plano_conta.exercicio = '||quote_literal(stExercicio)||' + ) AS tipo_conta UNION ALL @@ -1185,6 +1951,14 @@ BEGIN , publico.fn_nivel('||quote_literal('1.2.4.9.1.01.00')||') as nivel , ''(-) Redução ao Valor Recuperável de Softwares'' as nom_conta , 1 as multiplicador + , (SELECT nom_sistema + FROM contabilidade.sistema_contabil + INNER JOIN contabilidade.plano_conta + ON plano_conta.exercicio = sistema_contabil.exercicio + AND plano_conta.cod_sistema = sistema_contabil.cod_sistema + WHERE plano_conta.cod_estrutural LIKE '||quote_literal('1.2.4.9.1.01.00%')||' + AND plano_conta.exercicio = '||quote_literal(stExercicio)||' + ) AS tipo_conta UNION ALL @@ -1194,6 +1968,14 @@ BEGIN , publico.fn_nivel('||quote_literal('1.2.4.2.0.00.00')||') as nivel , ''Marcas, Direitos e Patentes Industriais'' as nom_conta , 1 as multiplicador + , (SELECT nom_sistema + FROM contabilidade.sistema_contabil + INNER JOIN contabilidade.plano_conta + ON plano_conta.exercicio = sistema_contabil.exercicio + AND plano_conta.cod_sistema = sistema_contabil.cod_sistema + WHERE plano_conta.cod_estrutural LIKE '||quote_literal('1.2.4.2.0.00.00%')||' + AND plano_conta.exercicio = '||quote_literal(stExercicio)||' + ) AS tipo_conta UNION ALL @@ -1203,6 +1985,14 @@ BEGIN , publico.fn_nivel('||quote_literal('1.2.4.8.1.02.00')||') as nivel , ''(-) Amortização Acumulada de Marcas, Direitos e Patentes Industriais'' as nom_conta , 1 as multiplicador + , (SELECT nom_sistema + FROM contabilidade.sistema_contabil + INNER JOIN contabilidade.plano_conta + ON plano_conta.exercicio = sistema_contabil.exercicio + AND plano_conta.cod_sistema = sistema_contabil.cod_sistema + WHERE plano_conta.cod_estrutural LIKE '||quote_literal('1.2.4.8.1.02.00%')||' + AND plano_conta.exercicio = '||quote_literal(stExercicio)||' + ) AS tipo_conta UNION ALL @@ -1212,6 +2002,14 @@ BEGIN , publico.fn_nivel('||quote_literal('1.2.4.9.1.02.00')||') as nivel , ''(-) Redução ao Valor Recuperável de Marcas, Direitos e Patentes Industriais'' as nom_conta , 1 as multiplicador + , (SELECT nom_sistema + FROM contabilidade.sistema_contabil + INNER JOIN contabilidade.plano_conta + ON plano_conta.exercicio = sistema_contabil.exercicio + AND plano_conta.cod_sistema = sistema_contabil.cod_sistema + WHERE plano_conta.cod_estrutural LIKE '||quote_literal('1.2.4.9.1.02.00%')||' + AND plano_conta.exercicio = '||quote_literal(stExercicio)||' + ) AS tipo_conta UNION ALL @@ -1221,6 +2019,14 @@ BEGIN , publico.fn_nivel('||quote_literal('1.2.4.3.0.00.00')||') as nivel , ''Direito de Uso de Imóveis'' as nom_conta , 1 as multiplicador + , (SELECT nom_sistema + FROM contabilidade.sistema_contabil + INNER JOIN contabilidade.plano_conta + ON plano_conta.exercicio = sistema_contabil.exercicio + AND plano_conta.cod_sistema = sistema_contabil.cod_sistema + WHERE plano_conta.cod_estrutural LIKE '||quote_literal('1.2.4.3.0.00.00%')||' + AND plano_conta.exercicio = '||quote_literal(stExercicio)||' + ) AS tipo_conta UNION ALL @@ -1230,6 +2036,14 @@ BEGIN , publico.fn_nivel('||quote_literal('1.2.4.8.1.03.00')||') as nivel , ''(-) Amortização Acumulada de Direitos de Uso de Imóveis'' as nom_conta , 1 as multiplicador + , (SELECT nom_sistema + FROM contabilidade.sistema_contabil + INNER JOIN contabilidade.plano_conta + ON plano_conta.exercicio = sistema_contabil.exercicio + AND plano_conta.cod_sistema = sistema_contabil.cod_sistema + WHERE plano_conta.cod_estrutural LIKE '||quote_literal('1.2.4.8.1.03.00%')||' + AND plano_conta.exercicio = '||quote_literal(stExercicio)||' + ) AS tipo_conta UNION ALL @@ -1239,31 +2053,22 @@ BEGIN , publico.fn_nivel('||quote_literal('1.2.4.9.1.03.00')||') as nivel , ''(-) Redução ao Valor Recuperável de Direitos de Uso de Imóveis'' as nom_conta , 1 as multiplicador + , (SELECT nom_sistema + FROM contabilidade.sistema_contabil + INNER JOIN contabilidade.plano_conta + ON plano_conta.exercicio = sistema_contabil.exercicio + AND plano_conta.cod_sistema = sistema_contabil.cod_sistema + WHERE plano_conta.cod_estrutural LIKE '||quote_literal('1.2.4.9.1.03.00%')||' + AND plano_conta.exercicio = '||quote_literal(stExercicio)||' + ) AS tipo_conta ) as tabela GROUP BY cod_estrutural , nivel , nom_conta + , tipo_conta '; EXECUTE stSql; - - INSERT INTO tmp_balanco_patrimonial_ativo SELECT '1.0.0.0.0.00.00' - , 2 - , 'Ativo Financeiro' - , vl_saldo_anterior - , vl_saldo_debitos - , vl_saldo_creditos - , vl_saldo_atual - FROM tmp_soma_ativo_financeiro ; - - INSERT INTO tmp_balanco_patrimonial_ativo SELECT '1.0.0.0.0.00.01' - , 2 - , 'Ativo Permanente' - , vl_saldo_anterior - , vl_saldo_debitos - , vl_saldo_creditos - , vl_saldo_atual - FROM tmp_soma_ativo_permanente ; - + stSql := ' SELECT * FROM tmp_balanco_patrimonial_ativo '; FOR reRegistro IN EXECUTE stSql @@ -1282,10 +2087,6 @@ BEGIN DROP TABLE tmp_credito; DROP TABLE tmp_totaliza_debito; DROP TABLE tmp_totaliza_credito; - DROP TABLE tmp_ativo_financeiro; - DROP TABLE tmp_ativo_permanente; - DROP TABLE tmp_soma_ativo_financeiro; - DROP TABLE tmp_soma_ativo_permanente; DROP TABLE tmp_balanco_patrimonial_ativo; diff --git a/gestaoFinanceira/fontes/PLPGSQL/contabilidade/balancoPatrimonialPassivo.plsql b/gestaoFinanceira/fontes/PLPGSQL/contabilidade/balancoPatrimonialPassivo.plsql index 42d2324..63e7fb8 100644 --- a/gestaoFinanceira/fontes/PLPGSQL/contabilidade/balancoPatrimonialPassivo.plsql +++ b/gestaoFinanceira/fontes/PLPGSQL/contabilidade/balancoPatrimonialPassivo.plsql @@ -42,18 +42,17 @@ DECLARE stCodEntidades ALIAS FOR $4; stSql VARCHAR := ''; stSqlComplemento VARCHAR := ''; + stCodUF VARCHAR := ''; reRegistro RECORD; arRetorno NUMERIC[]; BEGIN - CREATE TEMPORARY TABLE tmp_passivo_financeiro ( - cod_estrutural varchar - , valores numeric[] - ); - CREATE TEMPORARY TABLE tmp_passivo_permanente ( - cod_estrutural varchar - , valores numeric[] - ); + + SELECT valor INTO stCodUF + FROM administracao.configuracao + WHERE exercicio = stExercicio + AND cod_modulo = 2 + AND parametro = 'cod_uf'; stSql := 'CREATE TEMPORARY TABLE tmp_debito AS SELECT * @@ -189,56 +188,10 @@ BEGIN '; EXECUTE stSql; + + CREATE UNIQUE INDEX unq_totaliza ON tmp_totaliza (cod_estrutural varchar_pattern_ops, oid_temp); - - --ATIVO FINANCEIRO - stSql := ' Select * - from contabilidade.plano_conta - where exercicio = ' || quote_literal(stExercicio) || ' - and cod_estrutural like ''2%'' - and escrituracao = ''analitica'' - and indicador_superavit = ''financeiro'' - '; - FOR reRegistro IN EXECUTE stSql - LOOP - INSERT INTO tmp_passivo_financeiro VALUES ( reRegistro.cod_estrutural - , contabilidade.totaliza_balanco_patrimonial( publico.fn_mascarareduzida(reRegistro.cod_estrutural) ) - ); - END LOOP; - - --ATIVO PERMANENTE - stSql := ' Select * - from contabilidade.plano_conta - where exercicio = ' || quote_literal(stExercicio) || ' - and cod_estrutural like ''2%'' - and escrituracao = ''analitica'' - and indicador_superavit = ''permanente'' - '; - FOR reRegistro IN EXECUTE stSql - LOOP - INSERT INTO tmp_passivo_permanente VALUES ( reRegistro.cod_estrutural - , contabilidade.totaliza_balanco_patrimonial( publico.fn_mascarareduzida(reRegistro.cod_estrutural) ) - ); - END LOOP; - - stSql := 'CREATE TEMPORARY TABLE tmp_soma_passivo_financeiro AS - SELECT SUM(valores[1]) as vl_saldo_anterior - , SUM(valores[2]) as vl_saldo_debitos - , SUM(valores[3]) as vl_saldo_creditos - , SUM(valores[4]) as vl_saldo_atual - FROM tmp_passivo_financeiro - '; - EXECUTE stSql; - - stSql := 'CREATE TEMPORARY TABLE tmp_soma_passivo_permanente AS - SELECT SUM(valores[1]) as vl_saldo_anterior - , SUM(valores[2]) as vl_saldo_debitos - , SUM(valores[3]) as vl_saldo_creditos - , SUM(valores[4]) as vl_saldo_atual - FROM tmp_passivo_permanente - '; - EXECUTE stSql; stSql := ' CREATE TEMPORARY TABLE tmp_balanco_patrimonial_passivo AS SELECT CAST(cod_estrutural AS VARCHAR) as cod_estrutural @@ -255,7 +208,7 @@ BEGIN , publico.fn_nivel('||quote_literal('2.1.0.0.0.00.00')||') as nivel , ''PASSIVO CIRCULANTE'' as nom_conta , -1 as multiplicador - + UNION ALL --CONTA PASSIVO CIRCULANTE @@ -264,7 +217,7 @@ BEGIN , publico.fn_nivel('||quote_literal('2.1.0.0.0.00.00')||') as nivel , ''PASSIVO CIRCULANTE'' as nom_conta , 1 as multiplicador - + UNION ALL --CONTA PASSIVO CIRCULANTE @@ -273,7 +226,7 @@ BEGIN , publico.fn_nivel('||quote_literal('2.1.0.0.0.00.00')||') as nivel , ''PASSIVO CIRCULANTE'' as nom_conta , 1 as multiplicador - + UNION ALL --CONTA PASSIVO CIRCULANTE @@ -282,7 +235,7 @@ BEGIN , publico.fn_nivel('||quote_literal('2.1.0.0.0.00.00')||') as nivel , ''PASSIVO CIRCULANTE'' as nom_conta , 1 as multiplicador - + UNION ALL --CONTA OBRIGAÇÕES TRABALHISTAS, PROVIDENCIÁRIAS E ASSISTENCIAIS A PAGAR A CURTO PRAZO @@ -291,7 +244,7 @@ BEGIN , publico.fn_nivel('||quote_literal('2.1.1.0.0.00.00')||') as nivel , ''Obrigações Trabalhistas, Previdenciárias e Assistenciais a Pagar a Curto Prazo'' as nom_conta , -1 as multiplicador - + UNION ALL --CONTA OBRIGAÇÕES TRABALHISTAS, PROVIDENCIÁRIAS E ASSISTENCIAIS A PAGAR A CURTO PRAZO @@ -309,7 +262,7 @@ BEGIN , publico.fn_nivel('||quote_literal('2.1.1.0.0.00.00')||') as nivel , ''Obrigações Trabalhistas, Previdenciárias e Assistenciais a Pagar a Curto Prazo'' as nom_conta , 1 as multiplicador - + UNION ALL --CONTA EMPRÉSTIMOS E FINANCIAMENTOS A CURTO PRAZO @@ -318,7 +271,7 @@ BEGIN , publico.fn_nivel('||quote_literal('2.1.2.0.0.00.00')||') as nivel , ''Empréstimos e Financiamentos a Curto Prazo'' as nom_conta , -1 as multiplicador - + UNION ALL --CONTA FORNECEDORES E CONTAS A PAGAR A CURTO PRAZO @@ -327,7 +280,7 @@ BEGIN , publico.fn_nivel('||quote_literal('2.1.3.0.0.00.00')||') as nivel , ''Fornecedores e Contas a Pagar a Curto Prazo'' as nom_conta , -1 as multiplicador - + UNION ALL --CONTA OBRIGAÇÕES FISCAIS A CURTO PRAZO @@ -336,7 +289,7 @@ BEGIN , publico.fn_nivel('||quote_literal('2.1.4.0.0.00.00')||') as nivel , ''Obrigações Fiscais a Curto Prazo'' as nom_conta , -1 as multiplicador - + UNION ALL --CONTA OBRIGAÇÕES DE REPARTIÇÃO A OUTROS ENTES @@ -345,7 +298,7 @@ BEGIN , publico.fn_nivel('||quote_literal('2.1.5.0.0.00.00')||') as nivel , ''Obrigações de Repartição a Outros Entes'' as nom_conta , -1 as multiplicador - + UNION ALL --CONTA PROVISÕES A CURTO PRAZO @@ -354,7 +307,7 @@ BEGIN , publico.fn_nivel('||quote_literal('2.1.7.0.0.00.00')||') as nivel , ''Provisões a Curto Prazo'' as nom_conta , -1 as multiplicador - + UNION ALL --CONTA DEMAIS OBRIGAÇÕES A CURTO PRAZO @@ -363,7 +316,7 @@ BEGIN , publico.fn_nivel('||quote_literal('2.1.8.0.0.00.00')||') as nivel , ''Demais Obrigações a Curto Prazo'' as nom_conta , -1 as multiplicador - + UNION ALL --CONTA DEMAIS OBRIGAÇÕES A CURTO PRAZO @@ -372,7 +325,7 @@ BEGIN , publico.fn_nivel('||quote_literal('2.1.8.0.0.00.00')||') as nivel , ''Demais Obrigações a Curto Prazo'' as nom_conta , 1 as multiplicador - + UNION ALL --LINHA PARA COMPENSAR TAMANHO DE TABELAS @@ -381,7 +334,7 @@ BEGIN , publico.fn_nivel('||quote_literal('2.1.9')||') as nivel , '''' as nom_conta , -1 as multiplicador - + UNION ALL --LINHA PARA COMPENSAR TAMANHO DE TABELAS @@ -390,7 +343,7 @@ BEGIN , publico.fn_nivel('||quote_literal('2.1.99')||') as nivel , '''' as nom_conta , -1 as multiplicador - + UNION ALL --LINHA PARA COMPENSAR TAMANHO DE TABELAS @@ -399,7 +352,7 @@ BEGIN , publico.fn_nivel('||quote_literal('2.1.999')||') as nivel , '''' as nom_conta , -1 as multiplicador - + UNION ALL --LINHA PARA COMPENSAR TAMANHO DE TABELAS @@ -408,7 +361,7 @@ BEGIN , publico.fn_nivel('||quote_literal('2.1.9999')||') as nivel , '''' as nom_conta , -1 as multiplicador - + UNION ALL --LINHA PARA COMPENSAR TAMANHO DE TABELAS @@ -417,7 +370,7 @@ BEGIN , publico.fn_nivel('||quote_literal('2.1.99999')||') as nivel , '''' as nom_conta , -1 as multiplicador - + UNION ALL --CONTA PASSIVO NÃO-CIRCULANTE @@ -426,7 +379,7 @@ BEGIN , publico.fn_nivel('||quote_literal('2.2.0.0.0.00.00')||') as nivel , ''PASSIVO NÃO-CIRCULANTE'' as nom_conta , -1 as multiplicador - + UNION ALL --CONTA PASSIVO NÃO-CIRCULANTE @@ -434,9 +387,19 @@ BEGIN , contabilidade.totaliza_balanco_patrimonial( publico.fn_mascarareduzida('||quote_literal('2.2.1.4.2.00.00')||') ) as valores , publico.fn_nivel('||quote_literal('2.2.0.0.0.00.00')||') as nivel , ''PASSIVO NÃO-CIRCULANTE'' as nom_conta - , 1 as multiplicador - - UNION ALL + , 1 as multiplicador '; + + IF (stCodUF = '11' AND stExercicio = '2014') THEN + stSql := stSql ||'UNION ALL + --CONTA PASSIVO NÃO-CIRCULANTE + SELECT '||quote_literal('2.2.0.0.0.00.00')||' as cod_estrutural + , contabilidade.totaliza_balanco_patrimonial( publico.fn_mascarareduzida('||quote_literal('2.2.1.4.2.01.00')||') ) as valores + , publico.fn_nivel('||quote_literal('2.2.0.0.0.00.00')||') as nivel + , ''PASSIVO NÃO-CIRCULANTE'' as nom_conta + , -1 as multiplicador'; + END IF; + + stSql := stSql ||' UNION ALL --CONTA PASSIVO NÃO-CIRCULANTE SELECT '||quote_literal('2.2.0.0.0.00.00')||' as cod_estrutural @@ -444,7 +407,7 @@ BEGIN , publico.fn_nivel('||quote_literal('2.2.0.0.0.00.00')||') as nivel , ''PASSIVO NÃO-CIRCULANTE'' as nom_conta , 1 as multiplicador - + UNION ALL --CONTA PASSIVO NÃO-CIRCULANTE @@ -453,7 +416,7 @@ BEGIN , publico.fn_nivel('||quote_literal('2.2.0.0.0.00.00')||') as nivel , ''PASSIVO NÃO-CIRCULANTE'' as nom_conta , 1 as multiplicador - + UNION ALL --CONTA PASSIVO NÃO-CIRCULANTE @@ -462,7 +425,7 @@ BEGIN , publico.fn_nivel('||quote_literal('2.2.0.0.0.00.00')||') as nivel , ''PASSIVO NÃO-CIRCULANTE'' as nom_conta , 1 as multiplicador - + UNION ALL --CONTA OBRIGAÇÕES TRABALHISTAS, PREVIDENCIÁRIAS E ASSISTENCIAIS A PAGAR A LONGO PRAZO @@ -471,7 +434,7 @@ BEGIN , publico.fn_nivel('||quote_literal('2.2.1.0.0.00.00')||') as nivel , ''Obrigações Trabalhistas, Previdenciárias e Assistenciais a Pagar a Longo Prazo'' as nom_conta , -1 as multiplicador - + UNION ALL --CONTA OBRIGAÇÕES TRABALHISTAS, PREVIDENCIÁRIAS E ASSISTENCIAIS A PAGAR A LONGO PRAZO @@ -479,17 +442,28 @@ BEGIN , contabilidade.totaliza_balanco_patrimonial( publico.fn_mascarareduzida('||quote_literal('2.2.1.4.2.00.00')||') ) as valores , publico.fn_nivel('||quote_literal('2.2.1.0.0.00.00')||') as nivel , ''Obrigações Trabalhistas, Previdenciárias e Assistenciais a Pagar a Longo Prazo'' as nom_conta - , 1 as multiplicador - - UNION ALL - + , 1 as multiplicador'; + + IF (stCodUF = '11' AND stExercicio = '2014') THEN + stSql := stSql ||' + UNION ALL + --CONTA OBRIGAÇÕES TRABALHISTAS, PREVIDENCIÁRIAS E ASSISTENCIAIS A PAGAR A LONGO PRAZO + SELECT '||quote_literal('2.2.1.0.0.00.00')||' as cod_estrutural + , contabilidade.totaliza_balanco_patrimonial( publico.fn_mascarareduzida('||quote_literal('2.2.1.4.2.01.00')||') ) as valores + , publico.fn_nivel('||quote_literal('2.2.1.0.0.00.00')||') as nivel + , ''Obrigações Trabalhistas, Previdenciárias e Assistenciais a Pagar a Longo Prazo'' as nom_conta + , -1 as multiplicador'; + END IF; + + stSql := stSql ||' + UNION ALL --CONTA EMPRÉSTIMOS E FINANCIAMENTOS A LONGO PRAZO SELECT '||quote_literal('2.2.2.0.0.00.00')||' as cod_estrutural , contabilidade.totaliza_balanco_patrimonial( publico.fn_mascarareduzida('||quote_literal('2.2.2.0.0.00.00')||') ) as valores , publico.fn_nivel('||quote_literal('2.2.2.0.0.00.00')||') as nivel , ''Empréstimos e Financiamentos a Longo Prazo'' as nom_conta , -1 as multiplicador - + UNION ALL --CONTA FORNECEDORES A LONGO PRAZO @@ -498,7 +472,7 @@ BEGIN , publico.fn_nivel('||quote_literal('2.2.3.0.0.00.00')||') as nivel , ''Fornecedores a Longo Prazo'' as nom_conta , -1 as multiplicador - + UNION ALL --CONTA OBRIGAÇÕES FISCAIS A LONGO PRAZO @@ -507,7 +481,7 @@ BEGIN , publico.fn_nivel('||quote_literal('2.2.4.0.0.00.00')||') as nivel , ''Obrigações Fiscais a Longo Prazo'' as nom_conta , -1 as multiplicador - + UNION ALL --CONTA OBRIGAÇÕES FISCAIS A LONGO PRAZO @@ -516,7 +490,7 @@ BEGIN , publico.fn_nivel('||quote_literal('2.2.4.0.0.00.00')||') as nivel , ''Obrigações Fiscais a Longo Prazo'' as nom_conta , 1 as multiplicador - + UNION ALL --CONTA OBRIGAÇÕES FISCAIS A LONGO PRAZO @@ -524,8 +498,8 @@ BEGIN , contabilidade.totaliza_balanco_patrimonial( publico.fn_mascarareduzida('||quote_literal('2.2.4.2.2.00.00')||') ) as valores , publico.fn_nivel('||quote_literal('2.2.4.0.0.00.00')||') as nivel , ''Obrigações Fiscais a Longo Prazo'' as nom_conta - , 1 as multiplicador - + , -1 as multiplicador + UNION ALL --CONTA OBRIGAÇÕES FISCAIS A LONGO PRAZO @@ -534,7 +508,7 @@ BEGIN , publico.fn_nivel('||quote_literal('2.2.4.0.0.00.00')||') as nivel , ''Obrigações Fiscais a Longo Prazo'' as nom_conta , 1 as multiplicador - + UNION ALL --CONTA PROVISÕES A LONGO PRAZO @@ -543,7 +517,7 @@ BEGIN , publico.fn_nivel('||quote_literal('2.2.7.0.0.00.00')||') as nivel , ''Provisões a Longo Prazo'' as nom_conta , -1 as multiplicador - + UNION ALL --CONTA DEMAIS OBRIGAÇÕES A LONGO PRAZO @@ -552,7 +526,7 @@ BEGIN , publico.fn_nivel('||quote_literal('2.2.8.0.0.00.00')||') as nivel , ''Demais Obrigações a Longo Prazo'' as nom_conta , -1 as multiplicador - + UNION ALL --CONTA RESULTADO DEFERIDO @@ -561,31 +535,14 @@ BEGIN , publico.fn_nivel('||quote_literal('2.2.9.0.0.00.00')||') as nivel , ''Resultado Deferido'' as nom_conta , -1 as multiplicador + ) as tabela GROUP BY cod_estrutural , nivel , nom_conta '; EXECUTE stSql; - - INSERT INTO tmp_balanco_patrimonial_passivo SELECT '2.0.0.0.0.00.00' - , 2 - , 'Permanente Financeiro' - , vl_saldo_anterior *-1 - , vl_saldo_debitos *-1 - , vl_saldo_creditos *-1 - , vl_saldo_atual *-1 - FROM tmp_soma_passivo_financeiro ; - - INSERT INTO tmp_balanco_patrimonial_passivo SELECT '2.0.0.0.0.00.01' - , 2 - , 'Permanente Permanente' - , vl_saldo_anterior *-1 - , vl_saldo_debitos *-1 - , vl_saldo_creditos *-1 - , vl_saldo_atual *-1 - FROM tmp_soma_passivo_permanente ; - + stSql := ' SELECT * FROM tmp_balanco_patrimonial_passivo '; FOR reRegistro IN EXECUTE stSql LOOP @@ -604,10 +561,6 @@ BEGIN DROP TABLE tmp_credito; DROP TABLE tmp_totaliza_debito; DROP TABLE tmp_totaliza_credito; - DROP TABLE tmp_passivo_financeiro; - DROP TABLE tmp_passivo_permanente; - DROP TABLE tmp_soma_passivo_financeiro; - DROP TABLE tmp_soma_passivo_permanente; DROP TABLE tmp_balanco_patrimonial_passivo; RETURN; diff --git a/gestaoFinanceira/fontes/PLPGSQL/contabilidade/balancoPatrimonialPatrimonioLiquido.plsql b/gestaoFinanceira/fontes/PLPGSQL/contabilidade/balancoPatrimonialPatrimonioLiquido.plsql index e28d427..95a8a5f 100644 --- a/gestaoFinanceira/fontes/PLPGSQL/contabilidade/balancoPatrimonialPatrimonioLiquido.plsql +++ b/gestaoFinanceira/fontes/PLPGSQL/contabilidade/balancoPatrimonialPatrimonioLiquido.plsql @@ -26,7 +26,7 @@ * URBEM Soluções de Gestão Pública Ltda * www.urbem.cnm.org.br * - $Id: balancoPatrimonialPatrimonioLiquido.plsql 63434 2015-08-27 19:45:12Z lisiane $ + $Id: balancoPatrimonialPatrimonioLiquido.plsql 64099 2015-12-02 17:14:05Z lisiane $ * * Casos de uso: uc-02.02.11 */ @@ -190,6 +190,7 @@ BEGIN , SUM(valores[2] * multiplicador * -1) as vl_saldo_debitos , SUM(valores[3] * multiplicador * -1) as vl_saldo_creditos , SUM(valores[4] * multiplicador) AS vl_saldo_atual + , ''''::VARCHAR AS tipo_conta FROM ( @@ -198,7 +199,7 @@ BEGIN , contabilidade.totaliza_balanco_patrimonial( publico.fn_mascarareduzida('||quote_literal('2.3.0.0.0.00.00')||') ) as valores , publico.fn_nivel('||quote_literal('2.3.0.0.0.00.00')||') as nivel , ''Patrimônio Liquido'' as nom_conta - , 1 as multiplicador + , -1 as multiplicador UNION ALL @@ -244,7 +245,7 @@ BEGIN , publico.fn_nivel('||quote_literal('2.3.3.0.0.00.00')||') as nivel , ''Adiantamento para Futuro Aumento de Capital'' as nom_conta , 1 as multiplicador - + UNION ALL --DEDUZ DA CONTA RESERVAS DE CAPITAL @@ -253,7 +254,7 @@ BEGIN , publico.fn_nivel('||quote_literal('2.3.3.0.0.00.00')||') as nivel , ''Adiantamento para Futuro Aumento de Capital'' as nom_conta , -1 as multiplicador - + UNION ALL --DEDUZ DA CONTA RESERVAS DE CAPITAL @@ -262,7 +263,7 @@ BEGIN , publico.fn_nivel('||quote_literal('2.3.3.0.0.00.00')||') as nivel , ''Adiantamento para Futuro Aumento de Capital'' as nom_conta , -1 as multiplicador - + UNION ALL --DEDUZ DA CONTA RESERVAS DE CAPITAL @@ -271,7 +272,7 @@ BEGIN , publico.fn_nivel('||quote_literal('2.3.3.0.0.00.00')||') as nivel , ''Adiantamento para Futuro Aumento de Capital'' as nom_conta , -1 as multiplicador - + UNION ALL --DEDUZ DA CONTA RESERVAS DE CAPITAL @@ -280,7 +281,7 @@ BEGIN , publico.fn_nivel('||quote_literal('2.3.3.0.0.00.00')||') as nivel , ''Adiantamento para Futuro Aumento de Capital'' as nom_conta , -1 as multiplicador - + UNION ALL --DEDUZ DA CONTA RESERVAS DE CAPITAL @@ -289,7 +290,7 @@ BEGIN , publico.fn_nivel('||quote_literal('2.3.3.0.0.00.00')||') as nivel , ''Adiantamento para Futuro Aumento de Capital'' as nom_conta , -1 as multiplicador - + UNION ALL --CONTA AJUSTES DE AVALIAÇÃO PATRIMONIAL @@ -298,7 +299,7 @@ BEGIN , publico.fn_nivel('||quote_literal('2.3.4.0.0.00.00')||') as nivel , ''Ajustes de Avaliação Patrimonial'' as nom_conta , 1 as multiplicador - + UNION ALL --CONTA RESERVA DE LUCROS @@ -307,7 +308,7 @@ BEGIN , publico.fn_nivel('||quote_literal('2.3.5.0.0.00.00')||') as nivel , ''Reserva de Lucros'' as nom_conta , 1 as multiplicador - + UNION ALL --DEDUZ DA CONTA RESERVA DE LUCROS @@ -316,7 +317,7 @@ BEGIN , publico.fn_nivel('||quote_literal('2.3.5.0.0.00.00')||') as nivel , ''Reserva de Lucros'' as nom_conta , -1 as multiplicador - + UNION ALL --DEDUZ DA CONTA RESERVA DE LUCROS @@ -325,7 +326,7 @@ BEGIN , publico.fn_nivel('||quote_literal('2.3.5.0.0.00.00')||') as nivel , ''Reserva de Lucros'' as nom_conta , -1 as multiplicador - + UNION ALL --DEDUZ DA CONTA RESERVA DE LUCROS @@ -334,7 +335,7 @@ BEGIN , publico.fn_nivel('||quote_literal('2.3.5.0.0.00.00')||') as nivel , ''Reserva de Lucros'' as nom_conta , -1 as multiplicador - + UNION ALL --DEDUZ DA CONTA RESERVA DE LUCROS @@ -343,7 +344,7 @@ BEGIN , publico.fn_nivel('||quote_literal('2.3.5.0.0.00.00')||') as nivel , ''Reserva de Lucros'' as nom_conta , -1 as multiplicador - + UNION ALL --DEDUZ DA CONTA RESERVA DE LUCROS @@ -352,7 +353,7 @@ BEGIN , publico.fn_nivel('||quote_literal('2.3.5.0.0.00.00')||') as nivel , ''Reserva de Lucros'' as nom_conta , -1 as multiplicador - + UNION ALL --DEDUZ DA CONTA RESERVA DE LUCROS @@ -361,7 +362,7 @@ BEGIN , publico.fn_nivel('||quote_literal('2.3.5.0.0.00.00')||') as nivel , ''Reserva de Lucros'' as nom_conta , -1 as multiplicador - + UNION ALL --DEDUZ DA CONTA RESERVA DE LUCROS @@ -379,7 +380,7 @@ BEGIN , publico.fn_nivel('||quote_literal('2.3.6.0.0.00.00')||') as nivel , ''Demais Reservas'' as nom_conta , 1 as multiplicador - + UNION ALL --DEDUZ DA CONTA DEMAIS RESERVAS @@ -388,7 +389,7 @@ BEGIN , publico.fn_nivel('||quote_literal('2.3.6.0.0.00.00')||') as nivel , ''Demais Reservas'' as nom_conta , -1 as multiplicador - + UNION ALL --DEDUZ DA CONTA DEMAIS RESERVAS @@ -397,6 +398,7 @@ BEGIN , publico.fn_nivel('||quote_literal('2.3.6.0.0.00.00')||') as nivel , ''Demais Reservas'' as nom_conta , -1 as multiplicador + '; IF ( (stDtInicial = '01/01/'||stExercicio ) AND (stDtFinal = '31/12/'||stExercicio) ) THEN @@ -409,7 +411,7 @@ IF ( (stDtInicial = '01/01/'||stExercicio ) AND (stDtFinal = '31/12/'||stExercic , contabilidade.totaliza_balanco_patrimonial( publico.fn_mascarareduzida('||quote_literal('2.3.7.0.0.00.00')||') ) as valores , publico.fn_nivel('||quote_literal('2.3.7.0.0.00.00')||') as nivel , ''Resultados Acumulados'' as nom_conta - , 1 as multiplicador + , -1 as multiplicador UNION ALL @@ -419,7 +421,7 @@ IF ( (stDtInicial = '01/01/'||stExercicio ) AND (stDtFinal = '31/12/'||stExercic , publico.fn_nivel('||quote_literal('2.3.7.0.0.00.00')||') as nivel , ''Resultados Acumulados'' as nom_conta , -1 as multiplicador - + UNION ALL --DEDUZ DA CONTA RESULTADOS ACUMULADOS @@ -428,7 +430,7 @@ IF ( (stDtInicial = '01/01/'||stExercicio ) AND (stDtFinal = '31/12/'||stExercic , publico.fn_nivel('||quote_literal('2.3.7.0.0.00.00')||') as nivel , ''Resultados Acumulados'' as nom_conta , -1 as multiplicador - + UNION ALL --CONTA RESULTADO DO EXERCICIO @@ -436,8 +438,8 @@ IF ( (stDtInicial = '01/01/'||stExercicio ) AND (stDtFinal = '31/12/'||stExercic , contabilidade.totaliza_balanco_patrimonial( publico.fn_mascarareduzida('||quote_literal('2.3.7.1.1.01.00')||') ) as valores , publico.fn_nivel('||quote_literal('2.3.7.0.0.01.00')||') as nivel , ''Resultado do Exercício'' as nom_conta - , 1 as multiplicador - + , -1 as multiplicador + UNION ALL --CONTA RESULTADO DO EXERCICIO @@ -445,8 +447,8 @@ IF ( (stDtInicial = '01/01/'||stExercicio ) AND (stDtFinal = '31/12/'||stExercic , contabilidade.totaliza_balanco_patrimonial( publico.fn_mascarareduzida('||quote_literal('2.3.7.1.3.01.00')||') ) as valores , publico.fn_nivel('||quote_literal('2.3.7.0.0.01.00')||') as nivel , ''Resultado do Exercício'' as nom_conta - , 1 as multiplicador - + , -1 as multiplicador + UNION ALL --CONTA RESULTADO DO EXERCICIO @@ -454,8 +456,8 @@ IF ( (stDtInicial = '01/01/'||stExercicio ) AND (stDtFinal = '31/12/'||stExercic , contabilidade.totaliza_balanco_patrimonial( publico.fn_mascarareduzida('||quote_literal('2.3.7.1.4.01.00')||') ) as valores , publico.fn_nivel('||quote_literal('2.3.7.0.0.01.00')||') as nivel , ''Resultado do Exercício'' as nom_conta - , 1 as multiplicador - + , -1 as multiplicador + UNION ALL --CONTA RESULTADO DO EXERCICIO @@ -463,8 +465,8 @@ IF ( (stDtInicial = '01/01/'||stExercicio ) AND (stDtFinal = '31/12/'||stExercic , contabilidade.totaliza_balanco_patrimonial( publico.fn_mascarareduzida('||quote_literal('2.3.7.1.5.01.00')||') ) as valores , publico.fn_nivel('||quote_literal('2.3.7.0.0.01.00')||') as nivel , ''Resultado do Exercício'' as nom_conta - , 1 as multiplicador - + , -1 as multiplicador + UNION ALL --CONTA RESULTADO DO EXERCICIO @@ -472,8 +474,8 @@ IF ( (stDtInicial = '01/01/'||stExercicio ) AND (stDtFinal = '31/12/'||stExercic , contabilidade.totaliza_balanco_patrimonial( publico.fn_mascarareduzida('||quote_literal('2.3.7.2.1.01.00')||') ) as valores , publico.fn_nivel('||quote_literal('2.3.7.0.0.01.00')||') as nivel , ''Resultado do Exercício'' as nom_conta - , 1 as multiplicador - + , -1 as multiplicador + UNION ALL --CONTA RESULTADO DO EXERCICIO @@ -481,7 +483,7 @@ IF ( (stDtInicial = '01/01/'||stExercicio ) AND (stDtFinal = '31/12/'||stExercic , contabilidade.totaliza_balanco_patrimonial( publico.fn_mascarareduzida('||quote_literal('2.3.7.2.3.01.00')||') ) as valores , publico.fn_nivel('||quote_literal('2.3.7.0.0.01.00')||') as nivel , ''Resultado do Exercício'' as nom_conta - , 1 as multiplicador + , -1 as multiplicador UNION ALL @@ -490,8 +492,8 @@ IF ( (stDtInicial = '01/01/'||stExercicio ) AND (stDtFinal = '31/12/'||stExercic , contabilidade.totaliza_balanco_patrimonial( publico.fn_mascarareduzida('||quote_literal('2.3.7.2.4.01.00')||') ) as valores , publico.fn_nivel('||quote_literal('2.3.7.0.0.01.00')||') as nivel , ''Resultado do Exercício'' as nom_conta - , 1 as multiplicador - + , -1 as multiplicador + UNION ALL --CONTA RESULTADO DO EXERCICIO @@ -499,7 +501,8 @@ IF ( (stDtInicial = '01/01/'||stExercicio ) AND (stDtFinal = '31/12/'||stExercic , contabilidade.totaliza_balanco_patrimonial( publico.fn_mascarareduzida('||quote_literal('2.3.7.2.5.01.00')||') ) as valores , publico.fn_nivel('||quote_literal('2.3.7.0.0.01.00')||') as nivel , ''Resultado do Exercício'' as nom_conta - , 1 as multiplicador + , -1 as multiplicador + '; ELSE --regra do relatorio para quando o relatorio for emitido durante o exercicio @@ -514,7 +517,7 @@ ELSE , publico.fn_nivel('||quote_literal('2.3.7.0.0.01.00')||') as nivel , ''Resultado do Exercício'' as nom_conta , -1 as multiplicador - + UNION ALL --CONTA RESULTADO DO EXERCICIO @@ -532,7 +535,7 @@ ELSE , publico.fn_nivel('||quote_literal('2.3.7.0.0.01.00')||') as nivel , ''Resultado do Exercício'' as nom_conta , -1 as multiplicador - + UNION ALL --CONTA RESULTADO DO EXERCICIO @@ -550,7 +553,7 @@ ELSE , publico.fn_nivel('||quote_literal('2.3.7.0.0.00.00')||') as nivel , ''Resultados Acumulados'' as nom_conta , 1 as multiplicador - + '; END IF; @@ -563,7 +566,7 @@ END IF; , publico.fn_nivel('||quote_literal('2.3.7.0.0.02.00')||') as nivel , ''Resultado de Exercícios Anteriores'' as nom_conta , -1 as multiplicador - + UNION ALL --CONTA RESULTADO DE EXERCÍCIOS ANTERIORES @@ -572,7 +575,7 @@ END IF; , publico.fn_nivel('||quote_literal('2.3.7.0.0.02.00')||') as nivel , ''Resultado de Exercícios Anteriores'' as nom_conta , -1 as multiplicador - + UNION ALL --CONTA RESULTADO DE EXERCÍCIOS ANTERIORES @@ -581,7 +584,7 @@ END IF; , publico.fn_nivel('||quote_literal('2.3.7.0.0.02.00')||') as nivel , ''Resultado de Exercícios Anteriores'' as nom_conta , -1 as multiplicador - + UNION ALL --CONTA RESULTADO DE EXERCÍCIOS ANTERIORES @@ -590,7 +593,7 @@ END IF; , publico.fn_nivel('||quote_literal('2.3.7.0.0.02.00')||') as nivel , ''Resultado de Exercícios Anteriores'' as nom_conta , -1 as multiplicador - + UNION ALL --CONTA RESULTADO DE EXERCÍCIOS ANTERIORES @@ -599,7 +602,7 @@ END IF; , publico.fn_nivel('||quote_literal('2.3.7.0.0.02.00')||') as nivel , ''Resultado de Exercícios Anteriores'' as nom_conta , -1 as multiplicador - + UNION ALL --CONTA RESULTADO DE EXERCÍCIOS ANTERIORES @@ -608,7 +611,7 @@ END IF; , publico.fn_nivel('||quote_literal('2.3.7.0.0.02.00')||') as nivel , ''Resultado de Exercícios Anteriores'' as nom_conta , -1 as multiplicador - + UNION ALL --CONTA RESULTADO DE EXERCÍCIOS ANTERIORES @@ -626,7 +629,7 @@ END IF; , publico.fn_nivel('||quote_literal('2.3.7.0.0.03.00')||') as nivel , ''Ajustes Exercícios Anteriores'' as nom_conta , -1 as multiplicador - + UNION ALL --CONTA AJUSTES DE EXERCÍCIOS ANTERIORES @@ -635,7 +638,7 @@ END IF; , publico.fn_nivel('||quote_literal('2.3.7.0.0.03.00')||') as nivel , ''Ajustes Exercícios Anteriores'' as nom_conta , -1 as multiplicador - + UNION ALL --CONTA AJUSTES DE EXERCÍCIOS ANTERIORES @@ -644,7 +647,7 @@ END IF; , publico.fn_nivel('||quote_literal('2.3.7.0.0.03.00')||') as nivel , ''Ajustes Exercícios Anteriores'' as nom_conta , -1 as multiplicador - + UNION ALL --CONTA AJUSTES DE EXERCÍCIOS ANTERIORES @@ -671,7 +674,7 @@ END IF; , publico.fn_nivel('||quote_literal('2.3.7.0.0.03.00')||') as nivel , ''Ajustes Exercícios Anteriores'' as nom_conta , -1 as multiplicador - + UNION ALL --CONTA AJUSTES DE EXERCÍCIOS ANTERIORES @@ -680,7 +683,7 @@ END IF; , publico.fn_nivel('||quote_literal('2.3.7.0.0.03.00')||') as nivel , ''Ajustes Exercícios Anteriores'' as nom_conta , -1 as multiplicador - + UNION ALL --CONTA AJUSTES DE EXERCÍCIOS ANTERIORES @@ -689,7 +692,7 @@ END IF; , publico.fn_nivel('||quote_literal('2.3.7.0.0.03.00')||') as nivel , ''Ajustes Exercícios Anteriores'' as nom_conta , -1 as multiplicador - + UNION ALL --CONTA OUTROS RESULTADOS @@ -698,7 +701,7 @@ END IF; , publico.fn_nivel('||quote_literal('2.3.7.0.0.04.00')||') as nivel , ''Outros Resultados'' as nom_conta , -1 as multiplicador - + UNION ALL --CONTA OUTROS RESULTADOS @@ -707,7 +710,7 @@ END IF; , publico.fn_nivel('||quote_literal('2.3.7.0.0.04.00')||') as nivel , ''Outros Resultados'' as nom_conta , -1 as multiplicador - + UNION ALL --CONTA OUTROS RESULTADOS @@ -716,7 +719,7 @@ END IF; , publico.fn_nivel('||quote_literal('2.3.7.0.0.04.00')||') as nivel , ''Outros Resultados'' as nom_conta , -1 as multiplicador - + UNION ALL --CONTA OUTROS RESULTADOS @@ -725,7 +728,7 @@ END IF; , publico.fn_nivel('||quote_literal('2.3.7.0.0.04.00')||') as nivel , ''Outros Resultados'' as nom_conta , -1 as multiplicador - + UNION ALL --CONTA OUTROS RESULTADOS @@ -734,7 +737,7 @@ END IF; , publico.fn_nivel('||quote_literal('2.3.7.0.0.04.00')||') as nivel , ''Outros Resultados'' as nom_conta , -1 as multiplicador - + UNION ALL --CONTA OUTROS RESULTADOS @@ -752,7 +755,7 @@ END IF; , publico.fn_nivel('||quote_literal('2.3.7.0.0.04.00')||') as nivel , ''Outros Resultados'' as nom_conta , -1 as multiplicador - + UNION ALL --CONTA OUTROS RESULTADOS @@ -761,7 +764,7 @@ END IF; , publico.fn_nivel('||quote_literal('2.3.7.0.0.04.00')||') as nivel , ''Outros Resultados'' as nom_conta , -1 as multiplicador - + UNION ALL --CONTA OUTROS RESULTADOS @@ -770,7 +773,7 @@ END IF; , publico.fn_nivel('||quote_literal('2.3.7.0.0.04.00')||') as nivel , ''Outros Resultados'' as nom_conta , -1 as multiplicador - + UNION ALL --CONTA OUTROS RESULTADOS @@ -779,7 +782,7 @@ END IF; , publico.fn_nivel('||quote_literal('2.3.7.0.0.04.00')||') as nivel , ''Outros Resultados'' as nom_conta , -1 as multiplicador - + UNION ALL --CONTA OUTROS RESULTADOS @@ -797,7 +800,7 @@ END IF; , publico.fn_nivel('||quote_literal('2.3.7.0.0.04.00')||') as nivel , ''Outros Resultados'' as nom_conta , -1 as multiplicador - + UNION ALL --CONTA OUTROS RESULTADOS @@ -806,7 +809,7 @@ END IF; , publico.fn_nivel('||quote_literal('2.3.7.0.0.04.00')||') as nivel , ''Outros Resultados'' as nom_conta , -1 as multiplicador - + UNION ALL --CONTA OUTROS RESULTADOS @@ -815,7 +818,7 @@ END IF; , publico.fn_nivel('||quote_literal('2.3.7.0.0.04.00')||') as nivel , ''Outros Resultados'' as nom_conta , -1 as multiplicador - + UNION ALL --CONTA OUTROS RESULTADOS @@ -824,7 +827,7 @@ END IF; , publico.fn_nivel('||quote_literal('2.3.7.0.0.04.00')||') as nivel , ''Outros Resultados'' as nom_conta , -1 as multiplicador - + UNION ALL --CONTA OUTROS RESULTADOS @@ -842,7 +845,7 @@ END IF; , publico.fn_nivel('||quote_literal('2.3.9.0.0.00.00')||') as nivel , ''Ações/Cotas em Tesouraria'' as nom_conta , 1 as multiplicador - + UNION ALL --DEDUZ DA CONTA AÇÕES/COTAS EM TESOURARIA @@ -861,7 +864,6 @@ END IF; , ''Ações/Cotas em Tesouraria'' as nom_conta , -1 as multiplicador - --ADICIONADO LINHAS PARA ALINHAR O RELATÓRIO UNION ALL @@ -1053,11 +1055,30 @@ END IF; , '''' as nom_conta , 1 as multiplicador + UNION ALL + + --LINHA PARA COMPENSAR TAMANHO DE TABELAS + SELECT '||quote_literal('2.9999999999999999999999')||' as cod_estrutural + , ARRAY[0.00,0.00,0.00,0.00] as valores + , publico.fn_nivel('||quote_literal('2.9999999999999999999999')||') as nivel + , '''' as nom_conta + , 1 as multiplicador + + UNION ALL + + --LINHA PARA COMPENSAR TAMANHO DE TABELAS + SELECT '||quote_literal('2.99999999999999999999999')||' as cod_estrutural + , ARRAY[0.00,0.00,0.00,0.00] as valores + , publico.fn_nivel('||quote_literal('2.99999999999999999999999')||') as nivel + , '''' as nom_conta + , 1 as multiplicador + ) as tabela GROUP BY cod_estrutural , nivel , nom_conta '; + EXECUTE stSql; IF (boUpdateRelatorio = true) THEN diff --git a/gestaoFinanceira/fontes/PLPGSQL/contabilidade/calculaAtivoBalancoPatrimonial.plsql b/gestaoFinanceira/fontes/PLPGSQL/contabilidade/calculaAtivoBalancoPatrimonial.plsql new file mode 100644 index 0000000..763cf2c --- /dev/null +++ b/gestaoFinanceira/fontes/PLPGSQL/contabilidade/calculaAtivoBalancoPatrimonial.plsql @@ -0,0 +1,243 @@ +/* + ********************************************************************************** + * * + * @package URBEM CNM - Soluções em Gestão Pública * + * @copyright (c) 2013 Confederação Nacional de Municípos * + * @author Confederação Nacional de Municípios * + * * + * O URBEM CNM é um software livre; você pode redistribuí-lo e/ou modificá-lo sob * + * os termos da Licença Pública Geral GNU conforme publicada pela Fundação do * + * Software Livre (FSF - Free Software Foundation); na versão 2 da Licença. * + * * + * Este programa é distribuído na expectativa de que seja útil, porém, * + * SEM NENHUMA GARANTIA; nem mesmo a garantia implícita de COMERCIABILIDADE OU * + * ADEQUAÇÃO A UMA FINALIDADE ESPECÍFICA. Consulte a Licença Pública Geral do GNU * + * para mais detalhes. * + * * + * Você deve ter recebido uma cópia da Licença Pública Geral do GNU "LICENCA.txt" * + * com este programa; se não, escreva para a Free Software Foundation Inc., * + * no endereço 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA. * + * * + ********************************************************************************** +*/ +/* + * Script de função PLPGSQL + * + * URBEM Soluções de Gestão Pública Ltda + * www.urbem.cnm.org.br + * + * Casos de uso: uc-02.02.11 + */ + +/* + +*/ + +CREATE OR REPLACE FUNCTION contabilidade.calculo_ativo_patrimonial (varchar, varchar, varchar, varchar) RETURNS SETOF RECORD AS $$ + +DECLARE + stExercicio ALIAS FOR $1; + stDtInicial ALIAS FOR $2; + stDtFinal ALIAS FOR $3; + stCodEntidades ALIAS FOR $4; + stSql VARCHAR := ''; + stSqlComplemento VARCHAR := ''; + reRegistro RECORD; + arRetorno NUMERIC[]; + +BEGIN + + stSql := 'CREATE TEMPORARY TABLE tmp_debito AS + SELECT * + FROM ( + SELECT + pc.cod_estrutural + ,pa.cod_plano + ,vl.tipo_valor + ,vl.vl_lancamento + ,vl.cod_entidade + ,lo.cod_lote + ,lo.dt_lote + ,lo.exercicio + ,lo.tipo + ,vl.sequencia + ,vl.oid as oid_temp + ,pc.indicador_superavit + FROM + contabilidade.plano_conta as pc + ,contabilidade.plano_analitica as pa + ,contabilidade.conta_debito as cd + ,contabilidade.valor_lancamento as vl + ,contabilidade.lancamento as la + ,contabilidade.lote as lo + WHERE pc.cod_conta = pa.cod_conta + AND pc.exercicio = pa.exercicio + AND pa.cod_plano = cd.cod_plano + AND pa.exercicio = cd.exercicio + AND cd.cod_lote = vl.cod_lote + AND cd.tipo = vl.tipo + AND cd.sequencia = vl.sequencia + AND cd.exercicio = vl.exercicio + AND cd.tipo_valor = vl.tipo_valor + AND cd.cod_entidade = vl.cod_entidade + AND vl.cod_lote = la.cod_lote + AND vl.tipo = la.tipo + AND vl.sequencia = la.sequencia + AND vl.exercicio = la.exercicio + AND vl.cod_entidade = la.cod_entidade + AND vl.tipo_valor = ''D'' + AND la.cod_lote = lo.cod_lote + AND la.exercicio = lo.exercicio + AND la.tipo = lo.tipo + AND la.cod_entidade = lo.cod_entidade + AND pc.indicador_superavit IN (''permanente'', ''financeiro'') + AND lo.dt_lote BETWEEN to_date('''||stDtInicial||''', ''dd/mm/yyyy'') AND to_date('''||stDtFinal||''', ''dd/mm/yyyy'') + AND lo.cod_entidade IN (' || stCodEntidades || ') + AND pa.exercicio = ' || quote_literal(stExercicio) || ' + ORDER BY pc.cod_estrutural + ) as tabela + '; + EXECUTE stSql; + + stSql := 'CREATE TEMPORARY TABLE tmp_credito AS + SELECT * + FROM ( + SELECT + pc.cod_estrutural + ,pa.cod_plano + ,vl.tipo_valor + ,vl.vl_lancamento + ,vl.cod_entidade + ,lo.cod_lote + ,lo.dt_lote + ,lo.exercicio + ,lo.tipo + ,vl.sequencia + ,vl.oid as oid_temp + ,pc.indicador_superavit + FROM + contabilidade.plano_conta as pc + ,contabilidade.plano_analitica as pa + ,contabilidade.conta_credito as cc + ,contabilidade.valor_lancamento as vl + ,contabilidade.lancamento as la + ,contabilidade.lote as lo + WHERE pc.cod_conta = pa.cod_conta + AND pc.exercicio = pa.exercicio + AND pa.cod_plano = cc.cod_plano + AND pa.exercicio = cc.exercicio + AND cc.cod_lote = vl.cod_lote + AND cc.tipo = vl.tipo + AND cc.sequencia = vl.sequencia + AND cc.exercicio = vl.exercicio + AND cc.tipo_valor = vl.tipo_valor + AND cc.cod_entidade = vl.cod_entidade + AND vl.cod_lote = la.cod_lote + AND vl.tipo = la.tipo + AND vl.sequencia = la.sequencia + AND vl.exercicio = la.exercicio + AND vl.cod_entidade = la.cod_entidade + AND vl.tipo_valor = ''C'' + AND la.cod_lote = lo.cod_lote + AND la.exercicio = lo.exercicio + AND la.tipo = lo.tipo + AND la.cod_entidade = lo.cod_entidade + AND pc.indicador_superavit IN (''permanente'', ''financeiro'') + AND lo.dt_lote BETWEEN to_date('''||stDtInicial||''', ''dd/mm/yyyy'') AND to_date('''||stDtFinal||''', ''dd/mm/yyyy'') + AND lo.cod_entidade IN (' || stCodEntidades || ') + AND pa.exercicio = ' || quote_literal(stExercicio) || ' + ORDER BY pc.cod_estrutural + ) as tabela + '; + EXECUTE stSql; + + CREATE UNIQUE INDEX unq_debito ON tmp_debito (cod_estrutural varchar_pattern_ops, oid_temp); + CREATE UNIQUE INDEX unq_credito ON tmp_credito (cod_estrutural varchar_pattern_ops, oid_temp); + + CREATE TEMPORARY TABLE tmp_totaliza_debito AS + SELECT * + FROM tmp_debito + WHERE dt_lote BETWEEN to_date( stDtInicial , 'dd/mm/yyyy' ) AND to_date( stDtFinal , 'dd/mm/yyyy' ) + AND tipo <> 'I'; + + CREATE TEMPORARY TABLE tmp_totaliza_credito AS + SELECT * + FROM tmp_credito + WHERE dt_lote BETWEEN to_date( stDtInicial , 'dd/mm/yyyy' ) AND to_date( stDtFinal , 'dd/mm/yyyy' ) + AND tipo <> 'I'; + + CREATE UNIQUE INDEX unq_totaliza_credito ON tmp_totaliza_credito (cod_estrutural varchar_pattern_ops, oid_temp); + CREATE UNIQUE INDEX unq_totaliza_debito ON tmp_totaliza_debito (cod_estrutural varchar_pattern_ops, oid_temp); + + IF substr(stDtInicial,1,5) = '01/01' THEN + stSqlComplemento := ' dt_lote = to_date( ' || quote_literal(stDtInicial) || ',' || quote_literal('dd/mm/yyyy') || ') '; + stSqlComplemento := stSqlComplemento || ' AND tipo = '||quote_literal('I')||' '; + ELSE + stSqlComplemento := ' dt_lote <= to_date( ' || quote_literal(stDtInicial) || ',' || quote_literal('dd/mm/yyyy') || ')-1 '; + END IF; + + stSql := 'CREATE TEMPORARY TABLE tmp_totaliza AS + SELECT * FROM tmp_debito + WHERE + ' || stSqlComplemento || ' + UNION + SELECT * FROM tmp_credito + WHERE + ' || stSqlComplemento || ' + '; + EXECUTE stSql; + + CREATE UNIQUE INDEX unq_totaliza ON tmp_totaliza (cod_estrutural varchar_pattern_ops, oid_temp); + + stSql := ' + CREATE TEMPORARY TABLE tmp_balanco_patrimonial_ativo AS + SELECT SUM(valores[1]) AS vl_saldo_anterior + , SUM(valores[2]) AS vl_saldo_debitos + , SUM(valores[3]) AS vl_saldo_creditos + , SUM(valores[4]) AS vl_saldo_atual + , indicador_superavit::VARCHAR AS tipo_conta + FROM ( + SELECT + cod_estrutural + , indicador_superavit + , contabilidade.totaliza_balanco_patrimonial( publico.fn_mascarareduzida(cod_estrutural) ) AS valores + + FROM ( SELECT * FROM tmp_totaliza + UNION + SELECT * FROM tmp_totaliza_debito + UNION + SELECT * FROM tmp_totaliza_credito) as t + + WHERE cod_estrutural ILIKE ''1.%'' + AND indicador_superavit IN (''permanente'', ''financeiro'') + GROUP BY indicador_superavit, cod_estrutural + + ) as tabela + GROUP BY tipo_conta '; + + EXECUTE stSql; + + stSql := ' SELECT * FROM tmp_balanco_patrimonial_ativo '; + + FOR reRegistro IN EXECUTE stSql + LOOP + RETURN NEXT reRegistro; + END LOOP; + + DROP INDEX unq_totaliza; + DROP INDEX unq_totaliza_debito; + DROP INDEX unq_totaliza_credito; + DROP INDEX unq_debito; + DROP INDEX unq_credito; + + DROP TABLE tmp_totaliza; + DROP TABLE tmp_debito; + DROP TABLE tmp_credito; + DROP TABLE tmp_totaliza_debito; + DROP TABLE tmp_totaliza_credito; + DROP TABLE tmp_balanco_patrimonial_ativo; + + + RETURN; +END; +$$ LANGUAGE 'plpgsql'; \ No newline at end of file diff --git a/gestaoFinanceira/fontes/PLPGSQL/contabilidade/calculaPassivoBalancoPatrimonial.plsql b/gestaoFinanceira/fontes/PLPGSQL/contabilidade/calculaPassivoBalancoPatrimonial.plsql new file mode 100644 index 0000000..d7c218f --- /dev/null +++ b/gestaoFinanceira/fontes/PLPGSQL/contabilidade/calculaPassivoBalancoPatrimonial.plsql @@ -0,0 +1,245 @@ +/* + ********************************************************************************** + * * + * @package URBEM CNM - Soluções em Gestão Pública * + * @copyright (c) 2013 Confederação Nacional de Municípos * + * @author Confederação Nacional de Municípios * + * * + * O URBEM CNM é um software livre; você pode redistribuí-lo e/ou modificá-lo sob * + * os termos da Licença Pública Geral GNU conforme publicada pela Fundação do * + * Software Livre (FSF - Free Software Foundation); na versão 2 da Licença. * + * * + * Este programa é distribuído na expectativa de que seja útil, porém, * + * SEM NENHUMA GARANTIA; nem mesmo a garantia implícita de COMERCIABILIDADE OU * + * ADEQUAÇÃO A UMA FINALIDADE ESPECÍFICA. Consulte a Licença Pública Geral do GNU * + * para mais detalhes. * + * * + * Você deve ter recebido uma cópia da Licença Pública Geral do GNU "LICENCA.txt" * + * com este programa; se não, escreva para a Free Software Foundation Inc., * + * no endereço 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA. * + * * + ********************************************************************************** +*/ +/* + * Script de função PLPGSQL + * + * URBEM Soluções de Gestão Pública Ltda + * www.urbem.cnm.org.br + * + * Casos de uso: uc-02.02.11 + */ + +/* + +*/ + +CREATE OR REPLACE FUNCTION contabilidade.calculo_passivo_patrimonial (varchar, varchar, varchar, varchar) RETURNS SETOF RECORD AS $$ + +DECLARE + stExercicio ALIAS FOR $1; + stDtInicial ALIAS FOR $2; + stDtFinal ALIAS FOR $3; + stCodEntidades ALIAS FOR $4; + stSql VARCHAR := ''; + stSqlComplemento VARCHAR := ''; + reRegistro RECORD; + arRetorno NUMERIC[]; + +BEGIN + + stSql := 'CREATE TEMPORARY TABLE tmp_debito AS + SELECT * + FROM ( + SELECT + pc.cod_estrutural + ,pa.cod_plano + ,vl.tipo_valor + ,vl.vl_lancamento + ,vl.cod_entidade + ,lo.cod_lote + ,lo.dt_lote + ,lo.exercicio + ,lo.tipo + ,vl.sequencia + ,vl.oid as oid_temp + ,pc.indicador_superavit + FROM + contabilidade.plano_conta as pc + ,contabilidade.plano_analitica as pa + ,contabilidade.conta_debito as cd + ,contabilidade.valor_lancamento as vl + ,contabilidade.lancamento as la + ,contabilidade.lote as lo + WHERE pc.cod_conta = pa.cod_conta + AND pc.exercicio = pa.exercicio + AND pa.cod_plano = cd.cod_plano + AND pa.exercicio = cd.exercicio + AND cd.cod_lote = vl.cod_lote + AND cd.tipo = vl.tipo + AND cd.sequencia = vl.sequencia + AND cd.exercicio = vl.exercicio + AND cd.tipo_valor = vl.tipo_valor + AND cd.cod_entidade = vl.cod_entidade + AND vl.cod_lote = la.cod_lote + AND vl.tipo = la.tipo + AND vl.sequencia = la.sequencia + AND vl.exercicio = la.exercicio + AND vl.cod_entidade = la.cod_entidade + AND vl.tipo_valor = ''D'' + AND la.cod_lote = lo.cod_lote + AND la.exercicio = lo.exercicio + AND la.tipo = lo.tipo + AND la.cod_entidade = lo.cod_entidade + AND pc.indicador_superavit IN (''permanente'', ''financeiro'') + AND lo.dt_lote BETWEEN to_date('''||stDtInicial||''', ''dd/mm/yyyy'') AND to_date('''||stDtFinal||''', ''dd/mm/yyyy'') + AND lo.cod_entidade IN (' || stCodEntidades || ') + AND pa.exercicio = ' || quote_literal(stExercicio) || ' + ORDER BY pc.cod_estrutural + ) as tabela + '; + EXECUTE stSql; + + stSql := 'CREATE TEMPORARY TABLE tmp_credito AS + SELECT * + FROM ( + SELECT + pc.cod_estrutural + ,pa.cod_plano + ,vl.tipo_valor + ,vl.vl_lancamento + ,vl.cod_entidade + ,lo.cod_lote + ,lo.dt_lote + ,lo.exercicio + ,lo.tipo + ,vl.sequencia + ,vl.oid as oid_temp + ,pc.indicador_superavit + FROM + contabilidade.plano_conta as pc + ,contabilidade.plano_analitica as pa + ,contabilidade.conta_credito as cc + ,contabilidade.valor_lancamento as vl + ,contabilidade.lancamento as la + ,contabilidade.lote as lo + WHERE pc.cod_conta = pa.cod_conta + AND pc.exercicio = pa.exercicio + AND pa.cod_plano = cc.cod_plano + AND pa.exercicio = cc.exercicio + AND cc.cod_lote = vl.cod_lote + AND cc.tipo = vl.tipo + AND cc.sequencia = vl.sequencia + AND cc.exercicio = vl.exercicio + AND cc.tipo_valor = vl.tipo_valor + AND cc.cod_entidade = vl.cod_entidade + AND vl.cod_lote = la.cod_lote + AND vl.tipo = la.tipo + AND vl.sequencia = la.sequencia + AND vl.exercicio = la.exercicio + AND vl.cod_entidade = la.cod_entidade + AND vl.tipo_valor = ''C'' + AND la.cod_lote = lo.cod_lote + AND la.exercicio = lo.exercicio + AND la.tipo = lo.tipo + AND la.cod_entidade = lo.cod_entidade + AND pc.indicador_superavit IN (''permanente'', ''financeiro'') + AND lo.dt_lote BETWEEN to_date('''||stDtInicial||''', ''dd/mm/yyyy'') AND to_date('''||stDtFinal||''', ''dd/mm/yyyy'') + AND lo.cod_entidade IN (' || stCodEntidades || ') + AND pa.exercicio = ' || quote_literal(stExercicio) || ' + ORDER BY pc.cod_estrutural + ) as tabela + '; + EXECUTE stSql; + + CREATE UNIQUE INDEX unq_debito ON tmp_debito (cod_estrutural varchar_pattern_ops, oid_temp); + CREATE UNIQUE INDEX unq_credito ON tmp_credito (cod_estrutural varchar_pattern_ops, oid_temp); + + CREATE TEMPORARY TABLE tmp_totaliza_debito AS + SELECT * + FROM tmp_debito + WHERE dt_lote BETWEEN to_date( stDtInicial , 'dd/mm/yyyy' ) AND to_date( stDtFinal , 'dd/mm/yyyy' ) + AND tipo <> 'I'; + + CREATE TEMPORARY TABLE tmp_totaliza_credito AS + SELECT * + FROM tmp_credito + --em tese se utilizar condicional na consulta principal, não precisa desta parte + WHERE dt_lote BETWEEN to_date( stDtInicial , 'dd/mm/yyyy' ) AND to_date( stDtFinal , 'dd/mm/yyyy' ) + AND tipo <> 'I'; + + CREATE UNIQUE INDEX unq_totaliza_credito ON tmp_totaliza_credito (cod_estrutural varchar_pattern_ops, oid_temp); + CREATE UNIQUE INDEX unq_totaliza_debito ON tmp_totaliza_debito (cod_estrutural varchar_pattern_ops, oid_temp); + + IF substr(stDtInicial,1,5) = '01/01' THEN + stSqlComplemento := ' dt_lote = to_date( ' || quote_literal(stDtInicial) || ',' || quote_literal('dd/mm/yyyy') || ') '; + stSqlComplemento := stSqlComplemento || ' AND tipo = '||quote_literal('I')||' '; + ELSE + stSqlComplemento := ' dt_lote <= to_date( ' || quote_literal(stDtInicial) || ',' || quote_literal('dd/mm/yyyy') || ')-1 '; + END IF; + + stSql := 'CREATE TEMPORARY TABLE tmp_totaliza AS + SELECT * FROM tmp_debito + WHERE + ' || stSqlComplemento || ' + UNION + SELECT * FROM tmp_credito + WHERE + ' || stSqlComplemento || ' + '; + EXECUTE stSql; + + CREATE UNIQUE INDEX unq_totaliza ON tmp_totaliza (cod_estrutural varchar_pattern_ops, oid_temp); + + stSql := ' + CREATE TEMPORARY TABLE tmp_balanco_patrimonial_passivo AS + SELECT SUM(valores[1]*-1) AS vl_saldo_anterior + , SUM(valores[2]) AS vl_saldo_debitos + , SUM(valores[3]*-1) AS vl_saldo_creditos + , SUM(valores[4]*-1) AS vl_saldo_atual + , indicador_superavit::VARCHAR AS tipo_conta + FROM ( + SELECT + cod_estrutural + , indicador_superavit + , contabilidade.totaliza_balanco_patrimonial( publico.fn_mascarareduzida(cod_estrutural) ) AS valores + + FROM ( SELECT * FROM tmp_totaliza + UNION + SELECT * FROM tmp_totaliza_debito + UNION + SELECT * FROM tmp_totaliza_credito) as t + + WHERE cod_estrutural ILIKE ''2.1%'' + OR cod_estrutural ILIKE ''2.2%'' + AND indicador_superavit IN (''permanente'', ''financeiro'') + GROUP BY indicador_superavit, cod_estrutural + + ) as tabela + GROUP BY tipo_conta '; + + EXECUTE stSql; + + stSql := ' SELECT * FROM tmp_balanco_patrimonial_passivo '; + + FOR reRegistro IN EXECUTE stSql + LOOP + RETURN NEXT reRegistro; + END LOOP; + + DROP INDEX unq_totaliza; + DROP INDEX unq_totaliza_debito; + DROP INDEX unq_totaliza_credito; + DROP INDEX unq_debito; + DROP INDEX unq_credito; + + DROP TABLE tmp_totaliza; + DROP TABLE tmp_debito; + DROP TABLE tmp_credito; + DROP TABLE tmp_totaliza_debito; + DROP TABLE tmp_totaliza_credito; + DROP TABLE tmp_balanco_patrimonial_passivo; + + + RETURN; +END; +$$ LANGUAGE 'plpgsql'; \ No newline at end of file diff --git a/gestaoFinanceira/fontes/PLPGSQL/empenho/empenhoAnulacaoPagamentoRPLiquidadoTCEMS.plsql b/gestaoFinanceira/fontes/PLPGSQL/empenho/empenhoAnulacaoPagamentoRPLiquidadoTCEMS.plsql index 1334a3b..71f368c 100644 --- a/gestaoFinanceira/fontes/PLPGSQL/empenho/empenhoAnulacaoPagamentoRPLiquidadoTCEMS.plsql +++ b/gestaoFinanceira/fontes/PLPGSQL/empenho/empenhoAnulacaoPagamentoRPLiquidadoTCEMS.plsql @@ -210,6 +210,8 @@ BEGIN AND configuracao_lancamento_credito.tipo = ''liquidacao'' AND nota_liquidacao.cod_nota = ' || CODNOTA || ' AND nota_liquidacao.exercicio = '''||EXERCICIOLIQUIDACAO||''' + AND nota_liquidacao.cod_empenho::TEXT = split_part(''' || COMPLEMENTO || ''',''/'', 1) + AND nota_liquidacao.exercicio_empenho::TEXT = split_part(''' || COMPLEMENTO || ''',''/'', 2); '; ELSE SqlContaPg := ' diff --git a/gestaoFinanceira/fontes/PLPGSQL/empenho/empenhoEmpenhadoPagoLiquidado.plsql b/gestaoFinanceira/fontes/PLPGSQL/empenho/empenhoEmpenhadoPagoLiquidado.plsql index 168b8f5..7baff3d 100755 --- a/gestaoFinanceira/fontes/PLPGSQL/empenho/empenhoEmpenhadoPagoLiquidado.plsql +++ b/gestaoFinanceira/fontes/PLPGSQL/empenho/empenhoEmpenhadoPagoLiquidado.plsql @@ -657,7 +657,7 @@ BEGIN end if; if (stCodElementoDispensa is not null and stCodElementoDispensa<>'') then - stSql := stSql || ' AND ped_d_cd.cod_estrutural like publico.fn_mascarareduzida(''' || stCodElementoDispensaMasc || ''')|| ''%'' '; + stSql := stSql || ' AND ped_d_cd.cod_estrutural like publico.fn_mascarareduzida( '''||stCodElementoDispensaMasc||''' ) || ''%'' '; end if; IF stFiltro != '' THEN diff --git a/gestaoFinanceira/fontes/PLPGSQL/empenho/empenhoPagamentoRPLiquidadoTCEMS.plsql b/gestaoFinanceira/fontes/PLPGSQL/empenho/empenhoPagamentoRPLiquidadoTCEMS.plsql index cd93196..2673730 100644 --- a/gestaoFinanceira/fontes/PLPGSQL/empenho/empenhoPagamentoRPLiquidadoTCEMS.plsql +++ b/gestaoFinanceira/fontes/PLPGSQL/empenho/empenhoPagamentoRPLiquidadoTCEMS.plsql @@ -144,11 +144,10 @@ BEGIN ON debito.exercicio = credito.exercicio WHERE debito.exercicio = '''||EXERCICIO||''' '; - - FOR ReContaLiq IN EXECUTE SqlContaLiq - LOOP - Sequencia := FazerLancamento( ReContaLiq.estrutural_debito , ReContaLiq.estrutural_credito , 917 , Exercicio , Valor , Complemento , CodLote , TipoLote , CodEntidade, ReContaLiq.plano_debito, ReContaLiq.plano_credito ); - END LOOP; + FOR ReContaLiq IN EXECUTE SqlContaLiq + LOOP + Sequencia := FazerLancamento( ReContaLiq.estrutural_debito , ReContaLiq.estrutural_credito , 917 , Exercicio , Valor , Complemento , CodLote , TipoLote , CodEntidade, ReContaLiq.plano_debito, ReContaLiq.plano_credito ); + END LOOP; IF boImplantado = FALSE THEN SqlContaPg := ' @@ -210,6 +209,8 @@ BEGIN AND configuracao_lancamento_credito.tipo = ''liquidacao'' AND nota_liquidacao.cod_nota = ' || CodNota || ' AND nota_liquidacao.exercicio = '''||ExercLiquidacao||''' + AND nota_liquidacao.cod_empenho::TEXT = split_part(''' || Complemento || ''',''/'', 1) + AND nota_liquidacao.exercicio_empenho::TEXT = split_part(''' || Complemento || ''',''/'', 2); '; ELSE SqlContaPg := ' diff --git a/gestaoFinanceira/fontes/PLPGSQL/empenho/relatorioPagamentoOrdemNotaEmpenho.plsql b/gestaoFinanceira/fontes/PLPGSQL/empenho/relatorioPagamentoOrdemNotaEmpenho.plsql new file mode 100644 index 0000000..e80eb8b --- /dev/null +++ b/gestaoFinanceira/fontes/PLPGSQL/empenho/relatorioPagamentoOrdemNotaEmpenho.plsql @@ -0,0 +1,299 @@ +/* + ********************************************************************************** + * * + * @package URBEM CNM - Soluções em Gestão Pública * + * @copyright (c) 2013 Confederação Nacional de Municípos * + * @author Confederação Nacional de Municípios * + * * + * O URBEM CNM é um software livre; você pode redistribuí-lo e/ou modificá-lo sob * + * os termos da Licença Pública Geral GNU conforme publicada pela Fundação do * + * Software Livre (FSF - Free Software Foundation); na versão 2 da Licença. * + * * + * Este programa é distribuído na expectativa de que seja útil, porém, * + * SEM NENHUMA GARANTIA; nem mesmo a garantia implícita de COMERCIABILIDADE OU * + * ADEQUAÇÃO A UMA FINALIDADE ESPECÍFICA. Consulte a Licença Pública Geral do GNU * + * para mais detalhes. * + * * + * Você deve ter recebido uma cópia da Licença Pública Geral do GNU "LICENCA.txt" * + * com este programa; se não, escreva para a Free Software Foundation Inc., * + * no endereço 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA. * + * * + ********************************************************************************** +*/ +/* +* Script de função PLPGSQL +* fn_relatorio_pagamento_ordem_nota_empenho +* Data de Criação : 03/11/2015 +* @author Analista : Dagiane Vieira +* @author Desenvolvedor : Michel Teixeira +* $Id: relatorioPagamentoOrdemNotaEmpenho.plsql 63896 2015-11-03 19:03:23Z michel $ +*/ + +CREATE OR REPLACE FUNCTION empenho.fn_relatorio_pagamento_ordem_nota_empenho(VARCHAR,VARCHAR,VARCHAR,INTEGER,VARCHAR,INTEGER,VARCHAR,INTEGER,BOOLEAN,BOOLEAN) RETURNS SETOF colunasRelatorioPagamentoOrdemNotaEmpenho AS $$ +DECLARE + stExercicio ALIAS FOR $1; + stCodEntidades ALIAS FOR $2; + stExercicioEmpenho ALIAS FOR $3; + inCodEmpenho ALIAS FOR $4; + stExercicioNota ALIAS FOR $5; + inCodNota ALIAS FOR $6; + stExercicioOrdem ALIAS FOR $7; + inCodOrdem ALIAS FOR $8; + boRetiraEstornado ALIAS FOR $9; + boRetencao ALIAS FOR $10; + + stSql VARCHAR := ''; + stFiltro VARCHAR := ''; + stFiltroAuxiliar VARCHAR := ''; + + reRegistro RECORD; + rwRelatorioPagamentoOrdemNotaEmpenho colunasRelatorioPagamentoOrdemNotaEmpenho%ROWTYPE; + +BEGIN + IF stExercicio IS NULL OR TRIM(stExercicio) = '' THEN + stSql := 'SELECT DATE_PART(''YEAR'', CURRENT_TIMESTAMP)::VARCHAR AS stExercicio'; + stExercicio := selectIntoVarchar(stSql); + END IF; + + IF (stCodEntidades IS NOT NULL AND TRIM(stCodEntidades)<>'') THEN + stFiltro := stFiltro || ' AND pagamento.cod_entidade IN (' || stCodEntidades || ') '; + END IF; + IF (stExercicioEmpenho IS NOT NULL AND TRIM(stExercicioEmpenho)<>'') THEN + stFiltro := stFiltro || ' AND empenho.exercicio = ''' || stExercicioEmpenho || ''' '; + END IF; + IF (inCodEmpenho IS NOT NULL AND inCodEmpenho > 0) THEN + stFiltro := stFiltro || ' AND empenho.cod_empenho = ' || inCodEmpenho || ' '; + END IF; + IF (stExercicioNota IS NOT NULL AND TRIM(stExercicioNota)<>'') THEN + stFiltro := stFiltro || ' AND nota_liquidacao.exercicio = ''' || stExercicioNota || ''' '; + END IF; + IF (inCodNota IS NOT NULL AND inCodNota > 0) THEN + stFiltro := stFiltro || ' AND pagamento.cod_nota = ' || inCodNota || ' '; + END IF; + IF (stExercicioOrdem IS NOT NULL AND TRIM(stExercicioOrdem)<>'') THEN + stFiltro := stFiltro || ' AND ordem_pagamento.exercicio = ''' || stExercicioOrdem || ''' '; + END IF; + IF (inCodOrdem IS NOT NULL AND inCodOrdem > 0) THEN + stFiltro := stFiltro || ' AND ordem_pagamento.cod_ordem = ' || inCodOrdem || ' '; + END IF; + + IF boRetiraEstornado IS TRUE THEN + stFiltroAuxiliar := stFiltroAuxiliar || ' AND bo_pagamento_estornado IS FALSE '; + stFiltroAuxiliar := stFiltroAuxiliar || ' AND bo_ordem_estornada IS FALSE '; + END IF; + + IF boRetencao IS TRUE THEN + stFiltroAuxiliar := stFiltroAuxiliar || ' AND vl_pago_retencao > 0 '; + END IF; + + stSql := ' + SELECT * + FROM ( + SELECT empenho.exercicio AS exercicio_empenho + , pagamento.cod_entidade + , empenho.cod_empenho + , empenho.cod_pre_empenho + , empenho.dt_empenho + , pagamento.timestamp AS timestamp_pagamento + , pagamento.exercicio + , pagamento.cod_nota + , nota_liquidacao.exercicio AS exercicio_nota + , nota_liquidacao.dt_liquidacao + , CASE WHEN lancamento_retencao.cod_ordem IS NULL THEN + nota_liquidacao_paga.vl_pago + ELSE + 0.00 + END AS vl_pago + , CASE WHEN nota_liquidacao_paga_anulada.timestamp_anulada IS NOT NULL THEN + TRUE + ELSE + FALSE + END AS bo_pagamento_estornado + , nota_liquidacao_paga_anulada.timestamp_anulada AS timestamp_pagamento_anulada + , CASE WHEN lancamento_retencao.cod_ordem IS NOT NULL THEN + nota_liquidacao_paga.vl_pago + ELSE + 0.00 + END AS vl_pago_retencao + , CASE WHEN lancamento_retencao.cod_ordem IS NOT NULL THEN + CASE WHEN transferencia_ordem_pagamento_retencao.cod_plano IS NOT NULL THEN + ''E''::VARCHAR -- Extra-Orçamentárias + ELSE + ''O''::VARCHAR --Orçamentárias + END + END AS tipo_retencao + , ordem_pagamento.cod_ordem + , ordem_pagamento.exercicio AS exercicio_ordem + , pagamento_liquidacao.vl_pagamento AS vl_ordem + , COALESCE(ordem_pagamento_retencao.vl_retencao, 0.00) AS vl_retencao + , CASE WHEN ordem_pagamento_anulada.timestamp IS NOT NULL THEN + TRUE + ELSE + FALSE + END AS bo_ordem_estornada + , ordem_pagamento_anulada.timestamp AS timestamp_ordem_anulada + , pre_empenho_despesa.cod_conta_dotacao + , pre_empenho_despesa.desdobramento + , pagamento.exercicio_plano AS exercicio_plano_pagamento + , pagamento.cod_plano AS cod_plano_pagamento + , plano_conta.cod_conta AS cod_conta_plano_pagamento + , plano_conta.nom_conta AS nom_conta_plano_pagamento + , plano_conta.cod_estrutural AS cod_estrutural_plano_pagamento + , ordem_pagamento_retencao.exercicio AS exercicio_plano_retencao + , ordem_pagamento_retencao.cod_plano AS cod_plano_retencao + , ordem_pagamento_retencao.cod_receita AS cod_receita_retencao + , CASE WHEN lancamento_retencao.cod_ordem IS NOT NULL THEN + CASE WHEN transferencia_ordem_pagamento_retencao.cod_plano IS NOT NULL THEN + plano_conta_retencao_extra_orcamentaria.nom_conta + ELSE + conta_receita_orcamentaria.descricao + END + END AS nom_conta_retencao + , CASE WHEN lancamento_retencao.cod_ordem IS NOT NULL THEN + CASE WHEN transferencia_ordem_pagamento_retencao.cod_plano IS NOT NULL THEN + plano_conta_retencao_extra_orcamentaria.cod_estrutural + ELSE + conta_receita_orcamentaria.cod_estrutural + END + END AS cod_estrutural_retencao + + FROM tesouraria.pagamento + + INNER JOIN empenho.nota_liquidacao_paga + ON nota_liquidacao_paga.exercicio = pagamento.exercicio + AND nota_liquidacao_paga.cod_nota = pagamento.cod_nota + AND nota_liquidacao_paga.cod_entidade = pagamento.cod_entidade + AND nota_liquidacao_paga.timestamp = pagamento.timestamp + + INNER JOIN contabilidade.pagamento AS pagamento_contabilidade + ON pagamento_contabilidade.exercicio = nota_liquidacao_paga.exercicio + AND pagamento_contabilidade.cod_nota = nota_liquidacao_paga.cod_nota + AND pagamento_contabilidade.cod_entidade = nota_liquidacao_paga.cod_entidade + AND pagamento_contabilidade.timestamp = nota_liquidacao_paga.timestamp + + INNER JOIN contabilidade.lancamento + ON lancamento.exercicio = pagamento_contabilidade.exercicio + AND lancamento.cod_lote = pagamento_contabilidade.cod_lote + AND lancamento.tipo = pagamento_contabilidade.tipo + AND lancamento.sequencia = pagamento_contabilidade.sequencia + AND lancamento.cod_entidade = pagamento_contabilidade.cod_entidade + + LEFT JOIN contabilidade.lancamento_retencao + ON lancamento_retencao.exercicio = lancamento.exercicio + AND lancamento_retencao.cod_lote = lancamento.cod_lote + AND lancamento_retencao.tipo = lancamento.tipo + AND lancamento_retencao.sequencia = lancamento.sequencia + AND lancamento_retencao.cod_entidade = lancamento.cod_entidade + + INNER JOIN empenho.pagamento_liquidacao + ON pagamento_liquidacao.exercicio_liquidacao = nota_liquidacao_paga.exercicio + AND pagamento_liquidacao.cod_entidade = nota_liquidacao_paga.cod_entidade + AND pagamento_liquidacao.cod_nota = nota_liquidacao_paga.cod_nota + + INNER JOIN empenho.ordem_pagamento + ON ordem_pagamento.exercicio = pagamento_liquidacao.exercicio + AND ordem_pagamento.cod_entidade = pagamento_liquidacao.cod_entidade + AND ordem_pagamento.cod_ordem = pagamento_liquidacao.cod_ordem + + LEFT JOIN empenho.ordem_pagamento_retencao + ON ordem_pagamento_retencao.exercicio = ordem_pagamento.exercicio + AND ordem_pagamento_retencao.cod_entidade = ordem_pagamento.cod_entidade + AND ordem_pagamento_retencao.cod_ordem = ordem_pagamento.cod_ordem + AND ordem_pagamento_retencao.cod_ordem = lancamento_retencao.cod_ordem + AND ordem_pagamento_retencao.cod_entidade = lancamento_retencao.cod_entidade + AND ordem_pagamento_retencao.cod_plano = lancamento_retencao.cod_plano + AND ordem_pagamento_retencao.exercicio = lancamento_retencao.exercicio_retencao + AND ordem_pagamento_retencao.sequencial = lancamento_retencao.sequencial + + INNER JOIN empenho.nota_liquidacao + ON nota_liquidacao.exercicio = nota_liquidacao_paga.exercicio + AND nota_liquidacao.cod_entidade = nota_liquidacao_paga.cod_entidade + AND nota_liquidacao.cod_nota = nota_liquidacao_paga.cod_nota + + INNER JOIN empenho.empenho + ON empenho.exercicio = nota_liquidacao.exercicio_empenho + AND empenho.cod_entidade = nota_liquidacao.cod_entidade + AND empenho.cod_empenho = nota_liquidacao.cod_empenho + + LEFT JOIN tesouraria.transferencia_ordem_pagamento_retencao + ON transferencia_ordem_pagamento_retencao.exercicio = ordem_pagamento_retencao.exercicio + AND transferencia_ordem_pagamento_retencao.cod_entidade = ordem_pagamento_retencao.cod_entidade + AND transferencia_ordem_pagamento_retencao.cod_ordem = ordem_pagamento_retencao.cod_ordem + AND transferencia_ordem_pagamento_retencao.cod_plano = ordem_pagamento_retencao.cod_plano + AND transferencia_ordem_pagamento_retencao.sequencial = ordem_pagamento_retencao.sequencial + + INNER JOIN (SELECT pre_empenho_despesa.* + , conta_despesa.cod_conta AS cod_conta_dotacao + , conta_despesa.cod_estrutural AS desdobramento + , conta_despesa.descricao AS descricao_desdobramento + FROM empenho.pre_empenho_despesa + JOIN orcamento.conta_despesa + ON conta_despesa.exercicio = pre_empenho_despesa.exercicio + AND conta_despesa.cod_conta = pre_empenho_despesa.cod_conta + ) AS pre_empenho_despesa + ON pre_empenho_despesa.exercicio = empenho.exercicio + AND pre_empenho_despesa.cod_pre_empenho = empenho.cod_pre_empenho + + INNER JOIN contabilidade.plano_analitica + ON plano_analitica.cod_plano = pagamento.cod_plano + AND plano_analitica.exercicio = pagamento.exercicio_plano + + INNER JOIN contabilidade.plano_conta + ON plano_conta.cod_conta = plano_analitica.cod_conta + AND plano_conta.exercicio = plano_analitica.exercicio + + LEFT JOIN contabilidade.plano_analitica AS plano_analitica_retencao_extra_orcamentaria + ON plano_analitica_retencao_extra_orcamentaria.cod_plano = ordem_pagamento_retencao.cod_plano + AND plano_analitica_retencao_extra_orcamentaria.exercicio = ordem_pagamento_retencao.exercicio + + LEFT JOIN contabilidade.plano_conta AS plano_conta_retencao_extra_orcamentaria + ON plano_conta_retencao_extra_orcamentaria.cod_conta = plano_analitica_retencao_extra_orcamentaria.cod_conta + AND plano_conta_retencao_extra_orcamentaria.exercicio = plano_analitica_retencao_extra_orcamentaria.exercicio + + LEFT JOIN orcamento.receita AS receita_retencao_orcamentaria + ON receita_retencao_orcamentaria.cod_receita = ordem_pagamento_retencao.cod_receita + AND receita_retencao_orcamentaria.exercicio = ordem_pagamento_retencao.exercicio + + LEFT JOIN orcamento.conta_receita AS conta_receita_orcamentaria + ON conta_receita_orcamentaria.cod_conta = receita_retencao_orcamentaria.cod_conta + AND conta_receita_orcamentaria.exercicio = receita_retencao_orcamentaria.exercicio + + LEFT JOIN empenho.nota_liquidacao_paga_anulada + ON nota_liquidacao_paga_anulada.exercicio = nota_liquidacao_paga.exercicio + AND nota_liquidacao_paga_anulada.cod_nota = nota_liquidacao_paga.cod_nota + AND nota_liquidacao_paga_anulada.cod_entidade = nota_liquidacao_paga.cod_entidade + AND nota_liquidacao_paga_anulada.timestamp = nota_liquidacao_paga.timestamp + + LEFT JOIN empenho.ordem_pagamento_anulada + ON ordem_pagamento_anulada.exercicio = ordem_pagamento.exercicio + AND ordem_pagamento_anulada.cod_ordem = ordem_pagamento.cod_ordem + AND ordem_pagamento_anulada.cod_entidade = ordem_pagamento.cod_entidade + + WHERE pagamento.exercicio = ''' || stExercicio || ''' + '|| stFiltro ||' + + GROUP BY 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11 + , 12, 13, 14, 15, 16, 17, 18, 19, 20, 21, 22 + , 23, 24, 25, 26, 27, 28, 29, 30, 31, 32, 33 + + ORDER BY exercicio_empenho + , cod_entidade + , cod_empenho + , exercicio_nota + , cod_nota + , exercicio_ordem + , cod_ordem + ) AS fn_relatorio_pagamento_ordem_nota_empenho + WHERE 1 = 1 + '|| stFiltroAuxiliar ||' '; + + FOR reRegistro IN EXECUTE stSql + LOOP + rwRelatorioPagamentoOrdemNotaEmpenho := reRegistro; + + RETURN NEXT rwRelatorioPagamentoOrdemNotaEmpenho; + END LOOP; + + RETURN; +END; +$$ language 'plpgsql'; diff --git a/gestaoFinanceira/fontes/PLPGSQL/empenho/saldoDotacaoDataAtualEmpenho.plsql b/gestaoFinanceira/fontes/PLPGSQL/empenho/saldoDotacaoDataAtualEmpenho.plsql new file mode 100755 index 0000000..b88b805 --- /dev/null +++ b/gestaoFinanceira/fontes/PLPGSQL/empenho/saldoDotacaoDataAtualEmpenho.plsql @@ -0,0 +1,325 @@ +/* + ********************************************************************************** + * * + * @package URBEM CNM - Soluções em Gestão Pública * + * @copyright (c) 2013 Confederação Nacional de Municípos * + * @author Confederação Nacional de Municípios * + * * + * O URBEM CNM é um software livre; você pode redistribuí-lo e/ou modificá-lo sob * + * os termos da Licença Pública Geral GNU conforme publicada pela Fundação do * + * Software Livre (FSF - Free Software Foundation); na versão 2 da Licença. * + * * + * Este programa é distribuído na expectativa de que seja útil, porém, * + * SEM NENHUMA GARANTIA; nem mesmo a garantia implícita de COMERCIABILIDADE OU * + * ADEQUAÇÃO A UMA FINALIDADE ESPECÍFICA. Consulte a Licença Pública Geral do GNU * + * para mais detalhes. * + * * + * Você deve ter recebido uma cópia da Licença Pública Geral do GNU "LICENCA.txt" * + * com este programa; se não, escreva para a Free Software Foundation Inc., * + * no endereço 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA. * + * * + ********************************************************************************** +*/ +/* + * Script de função PLPGSQL + * Data de Criação : 08/10/2015 + + * @author Analista: Valtair Santos + * @author Desenvolvedor: Arthur Cruz + + * @package URBEM + * @subpackage + + $Id:$ +*/ +CREATE OR REPLACE FUNCTION empenho.fn_saldo_dotacao_data_atual_empenho(VARCHAR,INTEGER,VARCHAR,VARCHAR,INTEGER,VARCHAR) RETURNS NUMERIC AS $$ +DECLARE + stExercicio ALIAS FOR $1; + inCodDespesa ALIAS FOR $2; + stDataAtual ALIAS FOR $3; + stDataEmpenho ALIAS FOR $4; + inEntidade ALIAS FOR $5; + stTipoEmissao ALIAS FOR $6; + + nuTotal NUMERIC := 0.00; + nuValorOriginal NUMERIC := 0.00; + nuTotalItens NUMERIC := 0.00; + nuValorReserva NUMERIC := 0.00; + nuValorReservaManual NUMERIC := 0.00; + nuValorAnulado NUMERIC := 0.00; + nuValorSuplementado NUMERIC := 0.00; + nuValorReduzido NUMERIC := 0.00; + dtEmpenho VARCHAR := ''; + dtInicioExercicio VARCHAR := ''; +BEGIN + + -- stTipoEmissao + -- 'E' = Empenhos + -- 'R' = Reservas + + dtInicioExercicio := '01/01/' || stExercicio; + + -- Recupera a data do empenho e seta a data do empenho + SELECT + CASE WHEN (MAX(dt_empenho) < TO_DATE(dtInicioExercicio,'dd/mm/yyyy')) OR (MAX(dt_empenho) IS NULL) + THEN dtInicioExercicio + ELSE TO_CHAR(MAX(dt_empenho),'dd/mm/yyyy') + END AS dataEmpenho + INTO + dtEmpenho + FROM empenho.empenho AS e + LEFT JOIN ( SELECT COALESCE(sum(vl_total),0.00) - COALESCE(sum(vl_anulado),0.00) AS valor + , ea.cod_empenho + , ea.cod_entidade + , ea.exercicio + FROM empenho.empenho_anulado as ea + INNER JOIN ( SELECT sum(vl_anulado) as vl_anulado + , ipe.vl_total + , eai.cod_empenho + , eai.cod_entidade + , eai.exercicio + FROM empenho.empenho_anulado_item eai + INNER JOIN empenho.item_pre_empenho AS ipe + ON ipe.exercicio = eai.exercicio + AND ipe.cod_pre_empenho = eai.cod_pre_empenho + AND ipe.num_item = eai.num_item + GROUP BY ipe.vl_total, eai.cod_empenho, eai.cod_entidade, eai.exercicio + ) AS itens + ON itens.cod_empenho = ea.cod_empenho + AND itens.exercicio = ea.exercicio + AND itens.cod_entidade = ea.cod_entidade + WHERE ea.exercicio = stExercicio + GROUP BY ea.cod_empenho, ea.cod_entidade, ea.exercicio + ) AS it + ON it.cod_empenho = e.cod_empenho + AND it.exercicio = e.exercicio + AND it.cod_entidade = e.cod_entidade + + WHERE e.cod_empenho IS NOT NULL + AND (it.valor != 0.00 OR it.valor IS NULL) + AND e.cod_entidade IN ( inEntidade ) + AND e.exercicio = stExercicio; + + IF stDataEmpenho <> '' THEN + dtEmpenho := stDataEmpenho; + END IF; + + -- Valor Original + SELECT + COALESCE(vl_original,0.00) + INTO + nuValorOriginal + FROM + orcamento.despesa + WHERE cod_despesa = inCodDespesa + AND exercicio = stExercicio; + + IF stTipoEmissao = 'E' THEN + + -- Valor total dos itens, leva me consideração a data final passada como parametro + SELECT + COALESCE(sum(vl_total),0.00) + INTO + nuTotalItens + FROM + empenho.pre_empenho_despesa AS pd + , empenho.pre_empenho AS pe + , empenho.item_pre_empenho AS it + , empenho.empenho AS em + WHERE pd.cod_pre_empenho = pe.cod_pre_empenho + AND pd.exercicio = pe.exercicio + + AND pe.cod_pre_empenho = it.cod_pre_empenho + AND pe.exercicio = it.exercicio + + AND pe.cod_pre_empenho = em.cod_pre_empenho + AND pe.exercicio = em.exercicio + + AND pd.exercicio = stExercicio + AND pd.cod_despesa = inCodDespesa + + AND em.dt_empenho BETWEEN TO_DATE(dtInicioExercicio,'dd/mm/yyyy') + AND TO_DATE(dtEmpenho,'dd/mm/yyyy'); + + ELSEIF stTipoEmissao = 'R' THEN + + -- Valor total dos itens, não leva em consideração a data final passada pelo parametro, sendo levado em consideração o periodo todo + SELECT + COALESCE(sum(vl_total),0.00) + INTO + nuTotalItens + FROM + empenho.pre_empenho_despesa AS pd + , empenho.pre_empenho AS pe + , empenho.item_pre_empenho AS it + , empenho.empenho AS em + WHERE pd.cod_pre_empenho = pe.cod_pre_empenho + AND pd.exercicio = pe.exercicio + + AND pe.cod_pre_empenho = it.cod_pre_empenho + AND pe.exercicio = it.exercicio + + AND pe.cod_pre_empenho = em.cod_pre_empenho + AND pe.exercicio = em.exercicio + + AND pd.exercicio = stExercicio + AND pd.cod_despesa = inCodDespesa; + + END IF; + + IF stTipoEmissao = 'E' THEN + + -- Valor de reserva + SELECT + COALESCE(sum(vl_reserva),0.00) + INTO + nuValorReserva + FROM + orcamento.reserva_saldos AS re + + LEFT JOIN orcamento.reserva_saldos_anulada AS rsa + ON re.cod_reserva = rsa.cod_reserva + AND re.exercicio = rsa.exercicio + + WHERE re.exercicio = stExercicio + AND re.cod_despesa = inCodDespesa + + AND re.dt_validade_final <= TO_DATE(stDataAtual, 'yyyy-mm-dd') + AND re.dt_inclusao BETWEEN TO_DATE(dtInicioExercicio,'dd/mm/yyyy') + AND TO_DATE(dtEmpenho,'dd/mm/yyyy') + AND rsa.cod_reserva IS NULL; + + ELSEIF stTipoEmissao = 'R' THEN + + -- Valor de reserva levando em consideração todo o período + SELECT + COALESCE(sum(vl_reserva),0.00) + INTO + nuValorReserva + FROM + orcamento.reserva_saldos AS re + + LEFT JOIN orcamento.reserva_saldos_anulada AS rsa + ON re.cod_reserva = rsa.cod_reserva + AND re.exercicio = rsa.exercicio + + WHERE re.exercicio = stExercicio + AND re.cod_despesa = inCodDespesa + + AND re.dt_validade_final <= TO_DATE(stDataAtual, 'yyyy-mm-dd') + AND rsa.cod_reserva IS NULL; + + END IF; + + IF stTipoEmissao = 'E' THEN + -- Valor Anulado, leva me consideração a data final passada como parametro + SELECT + COALESCE(sum(ei.vl_anulado),0.00) + INTO + nuValorAnulado + FROM + orcamento.despesa AS de + , empenho.pre_empenho_despesa AS pd + , empenho.pre_empenho AS pe + , empenho.item_pre_empenho AS it + , empenho.empenho_anulado_item AS ei + , empenho.empenho_anulado AS ea + + WHERE de.cod_despesa = pd.cod_despesa + AND de.exercicio = pd.exercicio + + AND pd.cod_pre_empenho = pe.cod_pre_empenho + AND pd.exercicio = pe.exercicio + + AND pe.cod_pre_empenho = it.cod_pre_empenho + AND pe.exercicio = it.exercicio + + AND it.cod_pre_empenho = ei.cod_pre_empenho + AND it.num_item = ei.num_item + AND it.exercicio = ei.exercicio + + AND ei.cod_empenho = ea.cod_empenho + AND ei.exercicio = ea.exercicio + AND ei.cod_entidade = ea.cod_entidade + AND ei.timestamp = ea.timestamp + + AND de.exercicio = stExercicio + AND de.cod_despesa = inCodDespesa + + AND TO_DATE(to_char(EA.timestamp,'dd/mm/yyyy'),'dd/mm/yyyy') BETWEEN TO_DATE(dtInicioExercicio,'dd/mm/yyyy') + AND TO_DATE(dtEmpenho,'dd/mm/yyyy'); + ELSEIF stTipoEmissao = 'R' THEN + + -- Valor Anulado, não leva em consideração a data final passada pelo parametro, sendo levado em consideração o periodo todo + SELECT + COALESCE(sum(ei.vl_anulado),0.00) + INTO + nuValorAnulado + FROM + orcamento.despesa AS de + , empenho.pre_empenho_despesa AS pd + , empenho.pre_empenho AS pe + , empenho.item_pre_empenho AS it + , empenho.empenho_anulado_item AS ei + , empenho.empenho_anulado AS ea + + WHERE de.cod_despesa = pd.cod_despesa + AND de.exercicio = pd.exercicio + + AND pd.cod_pre_empenho = pe.cod_pre_empenho + AND pd.exercicio = pe.exercicio + + AND pe.cod_pre_empenho = it.cod_pre_empenho + AND pe.exercicio = it.exercicio + + AND it.cod_pre_empenho = ei.cod_pre_empenho + AND it.num_item = ei.num_item + AND it.exercicio = ei.exercicio + + AND ei.cod_empenho = ea.cod_empenho + AND ei.exercicio = ea.exercicio + AND ei.cod_entidade = ea.cod_entidade + AND ei.timestamp = ea.timestamp + + AND de.exercicio = stExercicio + AND de.cod_despesa = inCodDespesa; + + END IF; + + -- Valor suplementado + SELECT + COALESCE( sum(valor), 0.00 ) + INTO + nuValorSuplementado + FROM + orcamento.suplementacao_suplementada + , orcamento.suplementacao AS S + + WHERE suplementacao_suplementada.cod_suplementacao = S.cod_suplementacao + AND suplementacao_suplementada.exercicio = S.exercicio + + AND S.dt_suplementacao BETWEEN to_date(dtInicioExercicio,'dd/mm/yyyy') + AND to_date(dtEmpenho,'dd/mm/yyyy') + AND suplementacao_suplementada.cod_despesa = inCodDespesa + AND suplementacao_suplementada.exercicio = stExercicio; + + -- Valor da Suplementação Reduzida + SELECT + COALESCE( sum(valor), 0.00 ) + INTO + nuValorReduzido + FROM + orcamento.suplementacao_reducao + WHERE + cod_despesa = inCodDespesa AND + exercicio = stExercicio; + + + IF( nuValorReserva IS NULL ) THEN + nuValorReserva := 0.00; + END IF; + + RETURN nuValorOriginal - nuTotalItens - nuValorReserva + nuValorAnulado + nuValorSuplementado - nuValorReduzido; + +END; +$$ LANGUAGE 'plpgsql'; \ No newline at end of file diff --git a/gestaoFinanceira/fontes/PLPGSQL/empenho/saldoDotacaoDataEmpenho.plsql b/gestaoFinanceira/fontes/PLPGSQL/empenho/saldoDotacaoDataEmpenho.plsql new file mode 100755 index 0000000..6fdd45f --- /dev/null +++ b/gestaoFinanceira/fontes/PLPGSQL/empenho/saldoDotacaoDataEmpenho.plsql @@ -0,0 +1,324 @@ +/* + ********************************************************************************** + * * + * @package URBEM CNM - Soluções em Gestão Pública * + * @copyright (c) 2013 Confederação Nacional de Municípos * + * @author Confederação Nacional de Municípios * + * * + * O URBEM CNM é um software livre; você pode redistribuí-lo e/ou modificá-lo sob * + * os termos da Licença Pública Geral GNU conforme publicada pela Fundação do * + * Software Livre (FSF - Free Software Foundation); na versão 2 da Licença. * + * * + * Este programa é distribuído na expectativa de que seja útil, porém, * + * SEM NENHUMA GARANTIA; nem mesmo a garantia implícita de COMERCIABILIDADE OU * + * ADEQUAÇÃO A UMA FINALIDADE ESPECÍFICA. Consulte a Licença Pública Geral do GNU * + * para mais detalhes. * + * * + * Você deve ter recebido uma cópia da Licença Pública Geral do GNU "LICENCA.txt" * + * com este programa; se não, escreva para a Free Software Foundation Inc., * + * no endereço 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA. * + * * + ********************************************************************************** +*/ +/* + * Script de função PLPGSQL + * Data de Criação : 08/10/2015 + + * @author Analista: Valtair Santos + * @author Desenvolvedor: Arthur Cruz + + * @package URBEM + * @subpackage + + $Id:$ +*/ +CREATE OR REPLACE FUNCTION empenho.fn_saldo_dotacao_data_empenho(VARCHAR,INTEGER,VARCHAR,INTEGER,VARCHAR) RETURNS NUMERIC AS $$ +DECLARE + stExercicio ALIAS FOR $1; + inCodDespesa ALIAS FOR $2; + stDataEmpenho ALIAS FOR $3; + inEntidade ALIAS FOR $4; + stTipoEmissao ALIAS FOR $5; + + nuTotal NUMERIC := 0.00; + nuValorOriginal NUMERIC := 0.00; + nuTotalItens NUMERIC := 0.00; + nuValorReserva NUMERIC := 0.00; + nuValorReservaManual NUMERIC := 0.00; + nuValorAnulado NUMERIC := 0.00; + nuValorSuplementado NUMERIC := 0.00; + nuValorReduzido NUMERIC := 0.00; + dtEmpenho VARCHAR := ''; + dtInicioExercicio VARCHAR := ''; +BEGIN + + -- stTipoEmissao + -- 'E' = Empenhos + -- 'R' = Reservas + + dtInicioExercicio := '01/01/' || stExercicio; + + -- Recupera a data do empenho e seta a data + SELECT + CASE WHEN (MAX(dt_empenho) < TO_DATE(dtInicioExercicio,'dd/mm/yyyy')) OR (MAX(dt_empenho) IS NULL) + THEN dtInicioExercicio + ELSE + TO_CHAR(MAX(dt_empenho),'dd/mm/yyyy') + END AS dataEmpenho + INTO + dtEmpenho + FROM + empenho.empenho AS e + LEFT JOIN ( SELECT COALESCE(sum(vl_total),0.00) - COALESCE(sum(vl_anulado),0.00) AS valor + , ea.cod_empenho + , ea.cod_entidade + , ea.exercicio + FROM empenho.empenho_anulado AS ea + INNER JOIN ( SELECT sum(vl_anulado) AS vl_anulado + , ipe.vl_total + , eai.cod_empenho + , eai.cod_entidade + , eai.exercicio + FROM empenho.empenho_anulado_item eai + JOIN empenho.item_pre_empenho as ipe + ON ( ipe.exercicio = eai.exercicio + AND ipe.cod_pre_empenho = eai.cod_pre_empenho + AND ipe.num_item = eai.num_item + ) + GROUP BY ipe.vl_total, eai.cod_empenho, eai.cod_entidade, eai.exercicio + ) AS itens + ON itens.cod_empenho = ea.cod_empenho + AND itens.exercicio = ea.exercicio + AND itens.cod_entidade = ea.cod_entidade + WHERE ea.exercicio = stExercicio + GROUP BY ea.cod_empenho, ea.cod_entidade, ea.exercicio + ) AS it + ON it.cod_empenho = e.cod_empenho + AND it.exercicio = e.exercicio + AND it.cod_entidade = e.cod_entidade + WHERE e.cod_empenho IS NOT NULL + AND (it.valor != 0.00 or it.valor IS NULL) + AND e.cod_entidade IN (inEntidade) + AND e.exercicio = stExercicio; + + IF stDataEmpenho <> '' THEN + dtEmpenho := stDataEmpenho; + END IF; + + -- Valor Original + SELECT + COALESCE(vl_original,0.00) + INTO + nuValorOriginal + FROM + orcamento.despesa + WHERE cod_despesa = inCodDespesa + AND exercicio = stExercicio; + + IF stTipoEmissao = 'E' THEN + + -- Valor total dos itens, leva me consideração a data final passada como parametro + SELECT + COALESCE(sum(vl_total),0.00) + INTO + nuTotalItens + FROM + empenho.pre_empenho_despesa AS pd + , empenho.pre_empenho AS pe + , empenho.item_pre_empenho AS it + , empenho.empenho AS em + WHERE pd.cod_pre_empenho = pe.cod_pre_empenho + AND pd.exercicio = pe.exercicio + + AND pe.cod_pre_empenho = it.cod_pre_empenho + AND pe.exercicio = it.exercicio + + AND pe.cod_pre_empenho = em.cod_pre_empenho + AND pe.exercicio = em.exercicio + + AND pd.exercicio = stExercicio + AND pd.cod_despesa = inCodDespesa + + AND em.dt_empenho BETWEEN TO_DATE(dtInicioExercicio,'dd/mm/yyyy') + AND TO_DATE(dtEmpenho,'dd/mm/yyyy'); + + ELSEIF stTipoEmissao = 'R' THEN + + -- Valor total dos itens, não leva em consideração a data final passada pelo parametro, sendo levado em consideração o periodo todo + SELECT + COALESCE(sum(vl_total),0.00) + INTO + nuTotalItens + FROM + empenho.pre_empenho_despesa AS pd + , empenho.pre_empenho AS pe + , empenho.item_pre_empenho AS it + , empenho.empenho AS em + WHERE pd.cod_pre_empenho = pe.cod_pre_empenho + AND pd.exercicio = pe.exercicio + + AND pe.cod_pre_empenho = it.cod_pre_empenho + AND pe.exercicio = it.exercicio + + AND pe.cod_pre_empenho = em.cod_pre_empenho + AND pe.exercicio = em.exercicio + + AND pd.exercicio = stExercicio + AND pd.cod_despesa = inCodDespesa; + + END IF; + + IF stTipoEmissao = 'E' THEN + + -- Valor de reserva + SELECT COALESCE(sum(vl_reserva),0.00) + INTO + nuValorReserva + FROM + orcamento.reserva_saldos AS re + + LEFT JOIN orcamento.reserva_saldos_anulada AS rsa + ON re.cod_reserva = rsa.cod_reserva + AND re.exercicio = rsa.exercicio + + WHERE re.exercicio = stExercicio + AND re.cod_despesa = inCodDespesa + AND re.dt_validade_final > to_date(now()::text, 'yyyy-mm-dd') + AND re.dt_inclusao BETWEEN TO_DATE(dtInicioExercicio,'dd/mm/yyyy') + AND TO_DATE(dtEmpenho,'dd/mm/yyyy') + AND EXTRACT( YEAR FROM re.dt_inclusao)::varchar = stExercicio + AND rsa.cod_reserva IS NULL; + + ELSEIF stTipoEmissao = 'R' THEN + + -- Valor de reserva levando em consideração todo o período + SELECT COALESCE(sum(vl_reserva),0.00) + INTO + nuValorReserva + FROM + orcamento.reserva_saldos AS re + + LEFT JOIN orcamento.reserva_saldos_anulada AS rsa + ON re.cod_reserva = rsa.cod_reserva + AND re.exercicio = rsa.exercicio + + WHERE re.exercicio = stExercicio + AND re.cod_despesa = inCodDespesa + AND re.dt_validade_final > to_date(now()::text, 'yyyy-mm-dd') + AND EXTRACT( YEAR FROM re.dt_inclusao)::varchar = stExercicio + AND rsa.cod_reserva IS NULL; + + END IF; + + + IF stTipoEmissao = 'E' THEN + -- Valor Anulado, leva me consideração a data final passada como parametro + SELECT + COALESCE(sum(ei.vl_anulado),0.00) + INTO + nuValorAnulado + FROM + orcamento.despesa AS de + , empenho.pre_empenho_despesa AS pd + , empenho.pre_empenho AS pe + , empenho.item_pre_empenho AS it + , empenho.empenho_anulado_item AS ei + , empenho.empenho_anulado AS ea + + WHERE de.cod_despesa = pd.cod_despesa + AND de.exercicio = pd.exercicio + + AND pd.cod_pre_empenho = pe.cod_pre_empenho + AND pd.exercicio = pe.exercicio + + AND pe.cod_pre_empenho = it.cod_pre_empenho + AND pe.exercicio = it.exercicio + + AND it.cod_pre_empenho = ei.cod_pre_empenho + AND it.num_item = ei.num_item + AND it.exercicio = ei.exercicio + + AND ei.cod_empenho = ea.cod_empenho + AND ei.exercicio = ea.exercicio + AND ei.cod_entidade = ea.cod_entidade + AND ei.timestamp = ea.timestamp + + AND de.exercicio = stExercicio + AND de.cod_despesa = inCodDespesa + + AND TO_DATE(to_char(EA.timestamp,'dd/mm/yyyy'),'dd/mm/yyyy') BETWEEN TO_DATE(dtInicioExercicio,'dd/mm/yyyy') + AND TO_DATE(dtEmpenho,'dd/mm/yyyy'); + ELSEIF stTipoEmissao = 'R' THEN + + -- Valor Anulado, não leva em consideração a data final passada pelo parametro, sendo levado em consideração o periodo todo + SELECT + COALESCE(sum(ei.vl_anulado),0.00) + INTO + nuValorAnulado + FROM + orcamento.despesa AS de + , empenho.pre_empenho_despesa AS pd + , empenho.pre_empenho AS pe + , empenho.item_pre_empenho AS it + , empenho.empenho_anulado_item AS ei + , empenho.empenho_anulado AS ea + + WHERE de.cod_despesa = pd.cod_despesa + AND de.exercicio = pd.exercicio + + AND pd.cod_pre_empenho = pe.cod_pre_empenho + AND pd.exercicio = pe.exercicio + + AND pe.cod_pre_empenho = it.cod_pre_empenho + AND pe.exercicio = it.exercicio + + AND it.cod_pre_empenho = ei.cod_pre_empenho + AND it.num_item = ei.num_item + AND it.exercicio = ei.exercicio + + AND ei.cod_empenho = ea.cod_empenho + AND ei.exercicio = ea.exercicio + AND ei.cod_entidade = ea.cod_entidade + AND ei.timestamp = ea.timestamp + + AND de.exercicio = stExercicio + AND de.cod_despesa = inCodDespesa; + + END IF; + + -- Valor suplementado + SELECT + COALESCE( sum(valor), 0.00 ) + INTO + nuValorSuplementado + FROM + orcamento.suplementacao_suplementada + , orcamento.suplementacao AS S + + WHERE suplementacao_suplementada.cod_suplementacao = S.cod_suplementacao + AND suplementacao_suplementada.exercicio = S.exercicio + + AND S.dt_suplementacao BETWEEN TO_DATE(dtInicioExercicio,'dd/mm/yyyy') + AND TO_DATE(dtEmpenho,'dd/mm/yyyy') + AND suplementacao_suplementada.cod_despesa = inCodDespesa + AND suplementacao_suplementada.exercicio = stExercicio; + + -- Valor da Suplementação Reduzida + SELECT + COALESCE( sum(valor), 0.00 ) + INTO + nuValorReduzido + FROM + orcamento.suplementacao_reducao + WHERE + cod_despesa = inCodDespesa AND + exercicio = stExercicio; + + IF( nuValorReserva IS NULL ) THEN + nuValorReserva := 0.00; + END IF; + + RETURN nuValorOriginal - nuTotalItens - nuValorReserva + nuValorAnulado + nuValorSuplementado - nuValorReduzido; + +END; +$$ LANGUAGE 'plpgsql'; \ No newline at end of file diff --git a/gestaoFinanceira/fontes/RPT/contabilidade/report/design/balancoPatrimonial.rptdesign b/gestaoFinanceira/fontes/RPT/contabilidade/report/design/balancoPatrimonial.rptdesign index d1c19c1..e4ead6a 100644 --- a/gestaoFinanceira/fontes/RPT/contabilidade/report/design/balancoPatrimonial.rptdesign +++ b/gestaoFinanceira/fontes/RPT/contabilidade/report/design/balancoPatrimonial.rptdesign @@ -321,11 +321,8 @@ Desenvolvedor: Henrique Boaventura <henrique.boaventura@cnm.org.br> static false - string + float true - - - simple text-box @@ -336,11 +333,8 @@ Desenvolvedor: Henrique Boaventura <henrique.boaventura@cnm.org.br> static false - string + float true - - - simple text-box @@ -351,11 +345,8 @@ Desenvolvedor: Henrique Boaventura <henrique.boaventura@cnm.org.br> static false - string + float true - - - simple text-box @@ -366,11 +357,8 @@ Desenvolvedor: Henrique Boaventura <henrique.boaventura@cnm.org.br> static false - string + float true - - - simple text-box @@ -381,11 +369,8 @@ Desenvolvedor: Henrique Boaventura <henrique.boaventura@cnm.org.br> static false - string + float true - - - simple text-box @@ -396,11 +381,8 @@ Desenvolvedor: Henrique Boaventura <henrique.boaventura@cnm.org.br> static false - string + float true - - - simple text-box @@ -411,11 +393,8 @@ Desenvolvedor: Henrique Boaventura <henrique.boaventura@cnm.org.br> static false - string + float true - - - simple text-box @@ -426,11 +405,8 @@ Desenvolvedor: Henrique Boaventura <henrique.boaventura@cnm.org.br> static false - string + float true - - - simple text-box @@ -449,40 +425,57 @@ Desenvolvedor: Henrique Boaventura <henrique.boaventura@cnm.org.br> exercicio exercicio + string + 0 1 + false true false dt_inicial dt_inicial + string + 0 2 + false true false dt_final dt_final + string + 0 3 + false true false entidades cod_entidades + string + 0 4 1 + false true false postgres - + exercicio exercicio + string + 0 1 + false true false dt_inicial dt_inicial + string + 0 2 + false true false dt_final dt_final + string + 0 3 + false true false entidades cod_entidades + string + 0 4 + false true false postgres + + + + + + exercicio + exercicio + + string + 0 + 1 + false + true + false + + + dt_inicial + dt_inicial + + string + 0 + 2 + false + true + false + + + dt_final + dt_final + + string + 0 + 3 + false + true + false + + + entidades + cod_entidades + + string + 0 + 4 + false + true + false + + + + postgres + + + + + + + + exercicio + exercicio + + string + 0 + 1 + false + true + false + + + dt_inicial + dt_inicial + + string + 0 + 2 + false + true + false + + + dt_final + dt_final + + string + 0 + 3 + false + true + false + + + entidades + cod_entidades + + string + 0 + 4 + false + true + false + + + + postgres + + + exercicio exercicio + string + 0 1 + false true false dt_inicial dt_inicial + string + 0 2 + false true false dt_final dt_final + string + 0 3 + false true false entidades cod_entidades + string + 0 4 + false true false @@ -597,7 +755,8 @@ ORDER BY cod_estrutural; , vl_saldo_anterior NUMERIC , vl_saldo_debitos NUMERIC , vl_saldo_creditos NUMERIC - , vl_saldo_atual NUMERIC ) + , vl_saldo_atual NUMERIC + , tipo_conta VARCHAR ) ORDER BY cod_estrutural;]]> @@ -961,12 +1120,28 @@ ORDER BY cod_estrutural;]]> saldo_atual - dataSetRow['vl_saldo_atual'] + if (dataSetRow["tipo_conta"] == 'Financeiro') { + params["total_atual_ativo_financeiro"].value = dataSetRow["vl_saldo_atual"] + params["total_atual_ativo_financeiro"].value; +} + +if (dataSetRow["tipo_conta"] == 'Patrimonial') { + params["total_atual_ativo_permanente"].value = dataSetRow["vl_saldo_atual"] + params["total_atual_ativo_permanente"].value; +} + +dataSetRow['vl_saldo_atual'] decimal saldo_anterior - dataSetRow['vl_saldo_anterior'] + if (dataSetRow["tipo_conta"] == 'Financeiro') { + params["total_anterior_ativo_financeiro"].value = params["total_anterior_ativo_financeiro"].value + dataSetRow["vl_saldo_anterior"] ; +} + +if (dataSetRow["tipo_conta"] == 'Patrimonial') { + params["total_anterior_ativo_permanente"].value = params["total_anterior_ativo_permanente"].value + dataSetRow["vl_saldo_anterior"]; +} + +dataSetRow['vl_saldo_anterior'] decimal @@ -983,18 +1158,11 @@ ORDER BY cod_estrutural;]]> if (row["cod_estrutural"] == '1.2.0.0.0.00.00') { params["total_atual_ativo_nao_circulante"].value = row["saldo_atual"]; } -if (row["cod_estrutural"] == '1.0.0.0.0.00.00') { - params["total_atual_ativo_financeiro"].value = row["saldo_atual"]; -} -if (row["cod_estrutural"] == '1.0.0.0.0.00.01') { - params["total_atual_ativo_permanente"].value = row["saldo_atual"]; -} row["saldo_atual"] row["nivel"] == 2 - true total_anterior_ativo @@ -1011,18 +1179,10 @@ if (row["cod_estrutural"] == '1.2.0.0.0.00.00') { params["total_anterior_ativo_nao_circulante"].value = row["saldo_anterior"]; } -if (row["cod_estrutural"] == '1.0.0.0.0.00.00') { - params["total_anterior_ativo_financeiro"].value = row["saldo_anterior"]; -} - -if (row["cod_estrutural"] == '1.0.0.0.0.00.01') { - params["total_anterior_ativo_permanente"].value = row["saldo_anterior"]; -} row["saldo_anterior"] row["nivel"] == 2 - true false @@ -1042,6 +1202,7 @@ row["saldo_anterior"] 3 1 + sans-serif #000000 solid thin @@ -1058,6 +1219,7 @@ row["saldo_anterior"] 7pt bold center + auto @@ -1129,6 +1291,7 @@ row["saldo_anterior"] solid thin + padrão_urbem 7.5px left saldo_atual - dataSetRow['vl_saldo_atual'] + dataSetRow['vl_saldo_atual'] decimal + true saldo_anterior - dataSetRow['vl_saldo_anterior'] + dataSetRow['vl_saldo_anterior'] decimal + true total_passivo_atual @@ -1291,21 +1456,12 @@ this.getStyle().marginLeft = (this.getRowData().getColumnValue('nivel')-2)*2 + ' Expression - if (row["cod_estrutural"] == '2.0.0.0.0.00.00') { - params["total_atual_passivo_financeiro"].value = row["saldo_atual"]; -} - -if (row["cod_estrutural"] == '2.0.0.0.0.00.01') { - params["total_atual_passivo_permanente"].value = row["saldo_atual"]; -} - -params["total_passivo_exercicio_atual"].value += row["saldo_atual"]; + params["total_passivo_exercicio_atual"].value += row["saldo_atual"]; row["saldo_atual"] row["nivel"] == 2 - true total_passivo_anterior @@ -1314,21 +1470,12 @@ row["saldo_atual"] Expression - if (row["cod_estrutural"] == '2.0.0.0.0.00.00') { - params["total_anterior_passivo_financeiro"].value = row["saldo_anterior"]; -} - -if (row["cod_estrutural"] == '2.0.0.0.0.00.01') { - params["total_anterior_passivo_permanente"].value = row["saldo_anterior"]; -} - -params["total_passivo_exercicio_anterior"].value += row["saldo_anterior"]; + params["total_passivo_exercicio_anterior"].value += row["saldo_anterior"]; row["saldo_anterior"] row["nivel"] == 2 - true false @@ -1372,7 +1519,6 @@ row["saldo_anterior"] #E5E5E5 middle - 0.3333333333333333in #000000 solid @@ -1670,6 +1816,7 @@ this.getStyle().marginLeft = (this.getRowData().getColumnValue('nivel')-2)*2 + ' #E5E5E5 5px + 0.2604166666666667in 3 1 @@ -1974,42 +2121,45 @@ this.getStyle().marginLeft = (this.getRowData().getColumnValue('nivel')-2)*2 + ' 0pt 0pt center - - 0pt + + 1pt + 1pt + 1pt + 1pt right - 0.6831683168316832in - 7.247524752475248in - - 76px + 7.635416666666667in + + true + 77px - + 76px - + 77px - + 68px - - 68px + + 0.7083333333333334in - - 77px + + 0.8020833333333334in - + 77px - - 77px + + 0.78125in - - 68px + + 0.71875in - - 68px + + 0.713in - + #000000 solid thin @@ -2022,260 +2172,211 @@ this.getStyle().marginLeft = (this.getRowData().getColumnValue('nivel')-2)*2 + ' #000000 solid thin - - 3 + + 5 1 #000000 solid thin + 0pt + 0pt + 0pt + 0pt left - bottom - - 7pt - bold - auto - - - - - #000000 - solid - thin - left - middle - - 7.5px - right + + dsTotalAtivo - total_atual_ativo_circulante - params["total_atual_ativo_financeiro"].value - decimal - true + tipo_conta + tipo_conta + dataSetRow['tipo_conta'] + string - - total_atual_ativo_circulante - - - - #000000 - solid - thin - left - middle - - 7.5px - - Currency - #,##0.00 - - right - - - total_anterior_ativo_circulante - params["total_anterior_ativo_financeiro"].value - decimal - true - - - total_anterior_ativo_circulante - - - - 3 - 1 - #000000 - solid - thin - left - middle - - 7pt - bold - auto - - - - - #000000 - solid - thin - left - middle - - 7.5px - - Currency - #,##0.00 - - right - - total_atual_passivo_circulante - params["total_atual_passivo_financeiro"].value - decimal + vl_saldo_atual + vl_saldo_atual + if (dataSetRow['conta'] == 'financeiro'){ + params['total_atual_ativo_financeiro'].value += dataSetRow['vl_saldo_atual'] +} + +if (dataSetRow['conta'] == 'permanente'){ + params['total_atual_ativo_permanente'].value += dataSetRow['vl_saldo_atual'] +} + + +dataSetRow['vl_saldo_atual'] + float true - - total_atual_passivo_circulante - - - - left - middle - - 7.5px - - Currency - #,##0.00 - - right - - total_anterior_passivo_circulante - params["total_anterior_passivo_financeiro"].value - decimal + vl_saldo_anterior + vl_saldo_anterior + if (dataSetRow['conta'] == 'financeiro'){ + params['total_anterior_ativo_financeiro'].value += dataSetRow['vl_saldo_anterior']; +} + +if (dataSetRow['conta'] == 'permanente'){ + params['total_anterior_ativo_permanente'].value += dataSetRow['vl_saldo_anterior']; +} + + +dataSetRow['vl_saldo_anterior'] + float true - total_anterior_passivo_circulante - + + 2.3541666666666665in + + + 0.7083333333333334in + + + 0.6770833333333334in + + + + + 8pt + #000000 + solid + thin + + 7.5px + tipo_conta + + + + 8pt + #000000 + solid + thin + + 7.5px + + Currency + #,##0.00{RoundingMode=HALF_UP} + + right + vl_saldo_atual + + + + 8pt + + 7.5px + + Currency + #,##0.00{RoundingMode=HALF_UP} + + right + vl_saldo_anterior + + + + +
    -     - - #000000 - solid - thin - #000000 - solid - thin - #000000 - solid - thin - - 3 + + 5 1 #000000 solid thin + 0pt + 0pt + 0pt + 0pt left - - 7pt - bold - auto - - - - - #000000 - solid - thin - left - middle - - 7.5px - - Currency - #,##0.00 - - right + + dsTotalPassivo - total_atual_ativo_nao_circulante - params["total_atual_ativo_permanente"].value - decimal - true + tipo_conta + dataSetRow['tipo_conta'] + string - - total_atual_ativo_nao_circulante - - - - #000000 - solid - thin - left - middle - - 7.5px - - Currency - #,##0.00 - - right - - total_anterior_ativo_nao_circulante - params["total_anterior_ativo_permanente"].value - decimal - true - - - total_anterior_ativo_nao_circulante - - - - 3 - 1 - #000000 - solid - thin - left - middle - - 7pt - bold - auto - - - - - #000000 - solid - thin - left - middle - - 7.5px - - Currency - #,##0.00 - - right - - - total_atual_passivo_nao_circulante - params["total_atual_passivo_permanente"].value - decimal + vl_saldo_atual + if (dataSetRow['conta'] == 'financeiro'){ + params['total_atual_passivo_financeiro'].value = dataSetRow['vl_saldo_atual']; +} + +if (dataSetRow['conta'] == 'permanente'){ + params['total_atual_passivo_permanente'].value = dataSetRow['vl_saldo_atual']; +} + + +dataSetRow['vl_saldo_atual'] + float true - - total_atual_passivo_nao_circulante - - - - left - middle - - 7.5px - - Currency - #,##0.00 - - right - - total_anterior_passivo_nao_circulante - params["total_anterior_passivo_permanente"].value - decimal + vl_saldo_anterior + if (dataSetRow['conta'] == 'financeiro'){ + params['total_anterior_passivo_financeiro'].value += dataSetRow['vl_saldo_anterior']; +} + +if (dataSetRow['conta'] == 'permanente'){ + params['total_anterior_passivo_permanente'].value += dataSetRow['vl_saldo_anterior']; +} + +dataSetRow['vl_saldo_anterior'] + float true - total_anterior_passivo_nao_circulante - + + 2.375in + + + 0.7083333333333334in + + + 0.6770833333333334in + + + + + #000000 + solid + thin + + 7.5px + tipo_conta + + + + #000000 + solid + thin + + 7.5px + + Currency + #,##0.00{RoundingMode=HALF_UP} + + right + vl_saldo_atual + + + + + 7.5px + + Currency + #,##0.00{RoundingMode=HALF_UP} + + right + vl_saldo_anterior + + + + +
    - + #E5E5E5 #000000 solid @@ -2287,7 +2388,7 @@ this.getStyle().marginLeft = (this.getRowData().getColumnValue('nivel')-2)*2 + ' solid thin 0.22772277227722773in - + 8 1 #000000 @@ -2295,14 +2396,14 @@ this.getStyle().marginLeft = (this.getRowData().getColumnValue('nivel')-2)*2 + ' thin left middle - + 7pt bold auto - + #000000 solid thin @@ -2318,16 +2419,17 @@ this.getStyle().marginLeft = (this.getRowData().getColumnValue('nivel')-2)*2 + ' total_atual_patrimonio_liquido - ((params["total_atual_ativo_circulante"]) + (params["total_atual_ativo_nao_circulante"])) + (( params["total_atual_ativo_financeiro"].value) +( params["total_atual_ativo_permanente"].value) ) - -((params["total_atual_passivo_circulante"]) + (params["total_atual_passivo_nao_circulante"])) +((params["total_atual_passivo_financeiro"].value) + (params["total_atual_passivo_permanente"].value)); decimal + true total_atual_patrimonio_liquido - + left middle @@ -2340,8 +2442,11 @@ this.getStyle().marginLeft = (this.getRowData().getColumnValue('nivel')-2)*2 + ' total_anterior_patrimonio_liquido - params["total_anterior_patrimonio_liquido"].value + (( params["total_anterior_ativo_financeiro"].value ) + ( params["total_anterior_ativo_permanente"].value )) +- +(( params["total_anterior_passivo_financeiro"].value ) + ( params["total_anterior_passivo_permanente"].value )); decimal + false total_anterior_patrimonio_liquido diff --git a/gestaoFinanceira/fontes/RPT/empenho/report/design/notaAutorizacaoEmpenho.rptdesign b/gestaoFinanceira/fontes/RPT/empenho/report/design/notaAutorizacaoEmpenho.rptdesign index c00be3c..4b415aa 100644 --- a/gestaoFinanceira/fontes/RPT/empenho/report/design/notaAutorizacaoEmpenho.rptdesign +++ b/gestaoFinanceira/fontes/RPT/empenho/report/design/notaAutorizacaoEmpenho.rptdesign @@ -132,8 +132,7 @@ Desenvolvedor: Henrique Boaventura <henrique.boaventura@cnm.org.br> - + extends="urbem_250.postgres"/> @@ -328,6 +327,7 @@ Desenvolvedor: Henrique Boaventura <henrique.boaventura@cnm.org.br>]]> + cod_entidade @@ -376,6 +376,7 @@ Desenvolvedor: Henrique Boaventura <henrique.boaventura@cnm.org.br> postgres + - 1.0 - - - In - - - - 1 - - 4 - 0 - 0 - Unknown - - - - - params[&quot;cod_entidade&quot;].value - - - - - - In - - - - 2 - - 4 - 0 - 0 - Unknown - - - - - params[&quot;cod_autorizacao&quot;].value - - - - - - In - - - - 3 - - 4 - 0 - 0 - Unknown - - - - - params[&quot;cod_pre_empenho&quot;].value - - - - - - In - - - - 4 - - 1 - 0 - 0 - Unknown - - - - - JS_EXPR - - - - - + 2.0 + + + + In + + + + 1 + + 4 + 0 + 0 + Unknown + + + + + CustomData value: params[&quot;cod_entidade&quot;].value, displayValue: null + + + + + + + + In + + + + 2 + + 4 + 0 + 0 + Unknown + + + + + CustomData value: params[&quot;cod_autorizacao&quot;].value, displayValue: null + + + + + + + + In + + + + 3 + + 4 + 0 + 0 + Unknown + + + + + CustomData value: params[&quot;cod_pre_empenho&quot;].value, displayValue: null + + + + + + + + In + + + + 4 + + 1 + 0 + 0 + Unknown + + + + + CustomData value: params[&quot;exercicio&quot;].value, displayValue: null + + + + + + ]]> diff --git a/gestaoFinanceira/fontes/SQL/GF_2043.sql b/gestaoFinanceira/fontes/SQL/GF_2043.sql index 19d9ea5..b1926be 100644 --- a/gestaoFinanceira/fontes/SQL/GF_2043.sql +++ b/gestaoFinanceira/fontes/SQL/GF_2043.sql @@ -140,6 +140,26 @@ BEGIN AND nota_liquidacao_assinatura.cod_entidade = reRecord.cod_entidade AND nota_liquidacao_assinatura.cod_nota = reRecord.cod_nota ; + + DELETE + FROM tceal.documento + WHERE documento.exercicio = reRecord.exercicio + AND documento.cod_entidade = reRecord.cod_entidade + AND documento.cod_nota = reRecord.cod_nota + ; + DELETE + FROM tcepe.documento + WHERE documento.exercicio = reRecord.exercicio + AND documento.cod_entidade = reRecord.cod_entidade + AND documento.cod_nota = reRecord.cod_nota + ; + DELETE + FROM tceam.documento + WHERE documento.exercicio = reRecord.exercicio + AND documento.cod_entidade = reRecord.cod_entidade + AND documento.cod_nota = reRecord.cod_nota + ; + DELETE FROM empenho.nota_liquidacao WHERE nota_liquidacao.exercicio = reRecord.exercicio diff --git a/gestaoFinanceira/fontes/SQL/GF_2044.sql b/gestaoFinanceira/fontes/SQL/GF_2044.sql new file mode 100644 index 0000000..0c2a4d9 --- /dev/null +++ b/gestaoFinanceira/fontes/SQL/GF_2044.sql @@ -0,0 +1,111 @@ +/* + ********************************************************************************** + * * + * @package URBEM CNM - Soluções em Gestão Pública * + * @copyright (c) 2013 Confederação Nacional de Municípos * + * @author Confederação Nacional de Municípios * + * * + * O URBEM CNM é um software livre; você pode redistribuí-lo e/ou modificá-lo sob * + * os termos da Licença Pública Geral GNU conforme publicada pela Fundação do * + * Software Livre (FSF - Free Software Foundation); na versão 2 da Licença. * + * * + * Este programa é distribuído na expectativa de que seja útil, porém, * + * SEM NENHUMA GARANTIA; nem mesmo a garantia implícita de COMERCIABILIDADE OU * + * ADEQUAÇÃO A UMA FINALIDADE ESPECÍFICA. Consulte a Licença Pública Geral do GNU * + * para mais detalhes. * + * * + * Você deve ter recebido uma cópia da Licença Pública Geral do GNU "LICENCA.txt" * + * com este programa; se não, escreva para a Free Software Foundation Inc., * + * no endereço 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA. * + * * + ********************************************************************************** +*/ +/* +* +* Script de DDL e DML +* +* Versao 2.04.4 +* +* Fabio Bertoldi - 20151026 +* +*/ + +---------------------------------------------------------- +-- CORRIGINDO ESTRUTURA DE empenho.incorporacao_patrimonio +---------------------------------------------------------- + +ALTER TABLE empenho.incorporacao_patrimonio ADD CONSTRAINT fk_incorporacao_patrimonio_3 FOREIGN KEY (exercicio, cod_entidade, cod_nota) + REFERENCES empenho.nota_liquidacao (exercicio, cod_entidade, cod_nota); + + +---------------- +-- Ticket #23179 +---------------- + +CREATE TYPE colunasRelatorioPagamentoOrdemNotaEmpenho AS ( + exercicio_empenho VARCHAR, + cod_entidade INTEGER, + cod_empenho INTEGER, + cod_pre_empenho INTEGER, + dt_empenho DATE, + timestamp_pagamento TIMESTAMP, + exercicio VARCHAR, + cod_nota INTEGER, + exercicio_nota VARCHAR, + dt_liquidacao DATE, + vl_pago NUMERIC, + bo_pagamento_estornado BOOLEAN, + timestamp_pagamento_anulada TIMESTAMP, + vl_pago_retencao NUMERIC, + tipo_retencao VARCHAR, + cod_ordem INTEGER, + exercicio_ordem VARCHAR, + vl_ordem NUMERIC, + vl_retencao NUMERIC, + bo_ordem_estornada BOOLEAN, + timestamp_ordem_anulada TIMESTAMP, + cod_conta_dotacao INTEGER, + desdobramento VARCHAR, + exercicio_plano_pagamento VARCHAR, + cod_plano_pagamento INTEGER, + cod_conta_plano_pagamento INTEGER, + nom_conta_plano_pagamento VARCHAR, + cod_estrutural_plano_pagamento VARCHAR, + exercicio_plano_retencao VARCHAR, + cod_plano_retencao INTEGER, + cod_receita_retencao INTEGER, + nom_conta_retencao VARCHAR, + cod_estrutural_retencao VARCHAR + ); + + +---------------- +-- Ticket # +---------------- + +CREATE TABLE contabilidade.valor_lancamento_recurso ( + cod_lote INTEGER NOT NULL, + tipo VARCHAR(1) NOT NULL, + sequencia INTEGER NOT NULL, + exercicio VARCHAR(4) NOT NULL, + tipo_valor VARCHAR(1) NOT NULL, + cod_entidade INTEGER NOT NULL, + cod_recurso INTEGER NOT NULL, + vl_recurso NUMERIC(14,2) NOT NULL, + CONSTRAINT pk_valor_lancamento_recurso PRIMARY KEY (exercicio, cod_entidade, tipo, cod_lote, sequencia, tipo_valor, cod_recurso), + CONSTRAINT fk_valor_lancamento_recurso_1 FOREIGN KEY (exercicio, cod_entidade, tipo, cod_lote, sequencia, tipo_valor) + REFERENCES contabilidade.valor_lancamento(exercicio, cod_entidade, tipo, cod_lote, sequencia, tipo_valor), + CONSTRAINT fk_valor_lancamento_recurso_2 FOREIGN KEY (exercicio, cod_recurso) + REFERENCES orcamento.recurso(exercicio, cod_recurso) +); +GRANT ALL ON contabilidade.valor_lancamento_recurso TO urbem; + + +---------------- +-- Ticket #23359 +---------------- + +ALTER TABLE empenho.item_pre_empenho ADD COLUMN cod_centro INTEGER; +ALTER TABLE empenho.item_pre_empenho ADD CONSTRAINT fk_item_pre_empenho_4 FOREIGN KEY (cod_centro) + REFERENCES almoxarifado.centro_custo(cod_centro); + diff --git a/gestaoFinanceira/fontes/SQL/GF_2045.sql b/gestaoFinanceira/fontes/SQL/GF_2045.sql new file mode 100644 index 0000000..6f5bd01 --- /dev/null +++ b/gestaoFinanceira/fontes/SQL/GF_2045.sql @@ -0,0 +1,44 @@ +/* + ********************************************************************************** + * * + * @package URBEM CNM - Soluções em Gestão Pública * + * @copyright (c) 2013 Confederação Nacional de Municípos * + * @author Confederação Nacional de Municípios * + * * + * O URBEM CNM é um software livre; você pode redistribuí-lo e/ou modificá-lo sob * + * os termos da Licença Pública Geral GNU conforme publicada pela Fundação do * + * Software Livre (FSF - Free Software Foundation); na versão 2 da Licença. * + * * + * Este programa é distribuído na expectativa de que seja útil, porém, * + * SEM NENHUMA GARANTIA; nem mesmo a garantia implícita de COMERCIABILIDADE OU * + * ADEQUAÇÃO A UMA FINALIDADE ESPECÍFICA. Consulte a Licença Pública Geral do GNU * + * para mais detalhes. * + * * + * Você deve ter recebido uma cópia da Licença Pública Geral do GNU "LICENCA.txt" * + * com este programa; se não, escreva para a Free Software Foundation Inc., * + * no endereço 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA. * + * * + ********************************************************************************** +*/ +/* +* +* Script de DDL e DML +* +* Versao 2.04.5 +* +* Fabio Bertoldi - 20151111 +* +*/ + +---------------- +-- Ticket #23376 +---------------- + +ALTER TABLE empenho.empenho_contrato ADD COLUMN exercicio_contrato CHAR(4); +UPDATE empenho.empenho_contrato SET exercicio_contrato = exercicio; +ALTER TABLE empenho.empenho_contrato ALTER COLUMN exercicio_contrato SET NOT NULL; + +ALTER TABLE empenho.empenho_contrato DROP CONSTRAINT fk_empenho_contrato_2; + +ALTER TABLE empenho.empenho_contrato ADD CONSTRAINT fk_empenho_contrato_2 FOREIGN KEY (exercicio_contrato, cod_entidade, num_contrato) + REFERENCES licitacao.contrato (exercicio , cod_entidade, num_contrato); diff --git a/gestaoFinanceira/fontes/SQL/GF_2046.sql b/gestaoFinanceira/fontes/SQL/GF_2046.sql new file mode 100644 index 0000000..bc40d8b --- /dev/null +++ b/gestaoFinanceira/fontes/SQL/GF_2046.sql @@ -0,0 +1,80 @@ +/* + ********************************************************************************** + * * + * @package URBEM CNM - Soluções em Gestão Pública * + * @copyright (c) 2013 Confederação Nacional de Municípos * + * @author Confederação Nacional de Municípios * + * * + * O URBEM CNM é um software livre; você pode redistribuí-lo e/ou modificá-lo sob * + * os termos da Licença Pública Geral GNU conforme publicada pela Fundação do * + * Software Livre (FSF - Free Software Foundation); na versão 2 da Licença. * + * * + * Este programa é distribuído na expectativa de que seja útil, porém, * + * SEM NENHUMA GARANTIA; nem mesmo a garantia implícita de COMERCIABILIDADE OU * + * ADEQUAÇÃO A UMA FINALIDADE ESPECÍFICA. Consulte a Licença Pública Geral do GNU * + * para mais detalhes. * + * * + * Você deve ter recebido uma cópia da Licença Pública Geral do GNU "LICENCA.txt" * + * com este programa; se não, escreva para a Free Software Foundation Inc., * + * no endereço 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA. * + * * + ********************************************************************************** +*/ +/* +* +* Script de DDL e DML +* +* Versao 2.04.6 +* +* Fabio Bertoldi - 20151105 +* +*/ + +---------------- +-- Ticket #23337 +---------------- + +INSERT + INTO administracao.acao + ( cod_acao + , cod_funcionalidade + , nom_arquivo + , parametro + , ordem + , complemento_acao + , nom_acao + , ativo + ) +VALUES + ( 3092 + , 56 + , 'FMManterReceitaDespesaExtraRecurso.php' + , 'configurar' + , 16 + , 'Configurar Rec./Desp. Extra por Recurso' + , 'Configurar Rec./Desp. Extra por Fonte de Recurso' + , TRUE + ); + +INSERT + INTO administracao.configuracao + ( cod_modulo + , exercicio + , parametro + , valor + ) +VALUES + ( 9 + , '2015' + , 'indicador_contas_extras_recurso' + , 'f' + ); + +CREATE TABLE contabilidade.configuracao_contas_extras ( + exercicio VARCHAR(4) NOT NULL, + cod_conta INTEGER NOT NULL, + CONSTRAINT pk_configuracao_contas_extras PRIMARY KEY (exercicio, cod_conta), + CONSTRAINT fk_configuracao_contas_extras_1 FOREIGN KEY (exercicio, cod_conta) + REFERENCES contabilidade.plano_conta (exercicio, cod_conta) +); +GRANT ALL ON contabilidade.configuracao_contas_extras TO urbem; diff --git a/gestaoPatrimonial/fontes/PHP/almoxarifado/classes/componentes/IMontaItemQuantidade.class.php b/gestaoPatrimonial/fontes/PHP/almoxarifado/classes/componentes/IMontaItemQuantidade.class.php index 09add19..289d6cb 100644 --- a/gestaoPatrimonial/fontes/PHP/almoxarifado/classes/componentes/IMontaItemQuantidade.class.php +++ b/gestaoPatrimonial/fontes/PHP/almoxarifado/classes/componentes/IMontaItemQuantidade.class.php @@ -35,7 +35,7 @@ * Casos de uso: uc-03.03.10 - $Id: IMontaItemQuantidade.class.php 61357 2015-01-09 19:54:12Z diogo.zarpelon $ + $Id: IMontaItemQuantidade.class.php 64051 2015-11-24 17:55:39Z franver $ */ $pgOc = CAM_GP_ALM_PROCESSAMENTO.'OCIMontaItemQuantidade.php?'.Sessao::getId(); @@ -131,10 +131,13 @@ class IMontaItemQuantidade extends Objeto $obTxtQuantidade = new Quantidade; $obTxtQuantidade->setRotulo ( "Quantidade" ); - $obTxtQuantidade->setValue ( $inQuantidade ); + $obTxtQuantidade->setValue ( $inQuantidade ); $obTxtQuantidade->setInteiro ( false ); $obTxtQuantidade->setFloat ( true ); - + $obTxtQuantidade->setSize (14); + $obTxtQuantidade->setMaxLength(13); + $obTxtQuantidade->setDefinicao('NUMERIC'); + $this->obIMontaItemUnidade = & $obIMontaItemUnidade; $this->obCmbMarca = & $obCmbMarca; $this->obCmbCentroCusto = & $obCmbCentroCusto; diff --git a/gestaoPatrimonial/fontes/PHP/almoxarifado/classes/componentes/IMontaItemUnidade.class.php b/gestaoPatrimonial/fontes/PHP/almoxarifado/classes/componentes/IMontaItemUnidade.class.php index 087b654..9369c66 100755 --- a/gestaoPatrimonial/fontes/PHP/almoxarifado/classes/componentes/IMontaItemUnidade.class.php +++ b/gestaoPatrimonial/fontes/PHP/almoxarifado/classes/componentes/IMontaItemUnidade.class.php @@ -33,32 +33,11 @@ * @package URBEM * @subpackage - $Revision: 22489 $ - $Name$ - $Author: rodrigo $ - $Date: 2007-05-11 10:30:15 -0300 (Sex, 11 Mai 2007) $ + $Id: IMontaItemUnidade.class.php 64005 2015-11-17 16:49:06Z michel $ * Casos de uso: uc-03.03.06 */ -/* -$Log$ -Revision 1.7 2007/05/11 13:28:28 rodrigo -Bug #9160# - -Revision 1.6 2006/10/03 10:05:18 andre.almeida -Bug #6910# - -Revision 1.5 2006/07/10 19:39:47 rodrigo -Adicionado nos componentes de itens,marca e centro de custa a função ajax para manipulação dos dados. - -Revision 1.4 2006/07/06 14:04:38 diego -Retirada tag de log com erro. - -Revision 1.3 2006/07/06 12:09:20 diego - -*/ - include_once ( CLA_OBJETO ); class IMontaItemUnidade extends Objeto @@ -115,8 +94,8 @@ class IMontaItemUnidade extends Objeto $obFormularioSpan = new Formulario; $obFormularioSpan->addComponente( $this->obLabelUnidadeMedida ); - #$obFormularioSpan->addHidden ( $this->obHiddenCodUnidadeMedida ); - #$obFormularioSpan->addHidden ( $this->obHiddenNomUnidadeMedida ); + $obFormularioSpan->addHidden ( $this->obHiddenCodUnidadeMedida ); + $obFormularioSpan->addHidden ( $this->obHiddenNomUnidadeMedida ); $obFormularioSpan->montaInnerHTML(); $stHtmlSpan = $obFormularioSpan->getHTML(); diff --git a/gestaoPatrimonial/fontes/PHP/almoxarifado/classes/componentes/IPopUpCentroCustoUsuario.class.php b/gestaoPatrimonial/fontes/PHP/almoxarifado/classes/componentes/IPopUpCentroCustoUsuario.class.php index 8b25fb8..6fed02f 100755 --- a/gestaoPatrimonial/fontes/PHP/almoxarifado/classes/componentes/IPopUpCentroCustoUsuario.class.php +++ b/gestaoPatrimonial/fontes/PHP/almoxarifado/classes/componentes/IPopUpCentroCustoUsuario.class.php @@ -33,12 +33,14 @@ * @package URBEM * @subpackage +$Id: IPopUpCentroCustoUsuario.class.php 64005 2015-11-17 16:49:06Z michel $ + * Casos de uso: uc-03.03.07 uc-03.04.01 */ include_once '../../../../../../gestaoAdministrativa/fontes/PHP/pacotes/GA.inc.php'; -include_once ( CLA_BUSCAINNER ); +include_once CLA_BUSCAINNER; class IPopUpCentroCustoUsuario extends BuscaInner { @@ -49,39 +51,41 @@ class IPopUpCentroCustoUsuario extends BuscaInner public $obForm; + public $boLiberaFrame; + + public function setLiberaFrame($valor){ $this->boLiberaFrame = $valor; } + + public function getLiberaFrame(){ return $this->boLiberaFrame; } + /** * Metodo Construtor * @access Public - */ - public function IPopUpCentroCustoUsuario($obForm) + public function __construct($obForm) { parent::BuscaInner(); $this->obForm = $obForm; - $this->setRotulo ( 'Centro de Custo' ); - $this->setTitle ( 'Informe o centro de custo.' ); - $this->setId ( 'stNomCentroCusto' ); - $this->setNull ( false ); - - $this->obCampoCod->setName ( "inCodCentroCusto" ); - $this->obCampoCod->setSize ( 10 ); - $this->obCampoCod->setMaxLength ( 10 ); - $this->obCampoCod->setAlign ( "left" ); + $this->setRotulo ( 'Centro de Custo' ); + $this->setTitle ( 'Informe o centro de custo.' ); + $this->setId ( 'stNomCentroCusto' ); + $this->setNull ( false ); + $this->obCampoCod->setName ( "inCodCentroCusto" ); + $this->obCampoCod->setSize ( 10 ); + $this->obCampoCod->setMaxLength ( 10 ); + $this->obCampoCod->setAlign ( "left" ); } public function montaHTML() { + $this->setFuncaoBusca("abrePopUp('".CAM_GP_ALM_POPUPS."centroCusto/FLManterCentroCusto.php','".$this->obForm->getName()."', '".$this->obCampoCod->stName."','".$this->stId."','','".Sessao::getId()."&usuario=TRUE','800','550');"); - $this->setFuncaoBusca("abrePopUp('" . CAM_GP_ALM_POPUPS . "centroCusto/FLManterCentroCusto.php','".$this->obForm->getName()."', '". $this->obCampoCod->stName ."','". $this->stId . "','','" . Sessao::getId() . -"&usuario=1','800','550');"); - - $this->obCampoCod->obEvento->setOnChange("ajaxJavaScript( '".CAM_GP_ALM_PROCESSAMENTO.'OCCentroCustoUsuario.php?'.Sessao::getId()."&usuario=1&nomCampoUnidade=".$this->obCampoCod->getName()."&stNomCampoCod=".$this->obCampoCod->getName()."&stIdCampoDesc=".$this->stId."&stNomForm=".$this->obForm->getName()."&inCodigo='+this.value, 'buscaPopup' );"); + $this->obCampoCod->obEvento->setOnChange("ajaxJavaScript( '".CAM_GP_ALM_PROCESSAMENTO.'OCCentroCustoUsuario.php?'.Sessao::getId()."&usuario=TRUE&nomCampoUnidade=".$this->obCampoCod->getName()."&stNomCampoCod=".$this->obCampoCod->getName()."&stIdCampoDesc=".$this->stId."&boLiberaFrame=".$this->getLiberaFrame()."&stNomForm=".$this->obForm->getName()."&inCodigo='+this.value, 'buscaPopup' );"); - parent::montaHTML(); + parent::montaHTML(); } } ?> diff --git a/gestaoPatrimonial/fontes/PHP/almoxarifado/classes/negocio/RAlmoxarifadoPermissaoCentroDeCustos.class.php b/gestaoPatrimonial/fontes/PHP/almoxarifado/classes/negocio/RAlmoxarifadoPermissaoCentroDeCustos.class.php index 5ca0138..88ade2e 100755 --- a/gestaoPatrimonial/fontes/PHP/almoxarifado/classes/negocio/RAlmoxarifadoPermissaoCentroDeCustos.class.php +++ b/gestaoPatrimonial/fontes/PHP/almoxarifado/classes/negocio/RAlmoxarifadoPermissaoCentroDeCustos.class.php @@ -163,7 +163,7 @@ var $obTAlmoxarifadoPermissaoCentroCusto; $obTAlmoxarifadoPermissaoCentroCusto->setDado("cod_centro",$this->roUltimoCentro->getCodigo()); $this->listar($rsRelacionados,'',$boTransacao); -//sistemaLegado::mostraVar($rsRelacionados); + while (!($rsRelacionados->eof())) { $permissao = $rsRelacionados->getCampo("responsavel"); if ($permissao == "t") { diff --git a/gestaoPatrimonial/fontes/PHP/almoxarifado/instancias/centroCusto/OCDefinirPermissao.php b/gestaoPatrimonial/fontes/PHP/almoxarifado/instancias/centroCusto/OCDefinirPermissao.php index f25236e..8a00360 100644 --- a/gestaoPatrimonial/fontes/PHP/almoxarifado/instancias/centroCusto/OCDefinirPermissao.php +++ b/gestaoPatrimonial/fontes/PHP/almoxarifado/instancias/centroCusto/OCDefinirPermissao.php @@ -117,7 +117,7 @@ function montaListaCentroCusto($rsCentroCustoPermissao) return $stJs; } -//sistemaLegado::mostraVar($_REQUEST); + $js = ''; switch ($stCtrl) { case 'buscaUsuario': diff --git a/gestaoPatrimonial/fontes/PHP/almoxarifado/instancias/entrada/OCMovimentacaoTransferencia.php b/gestaoPatrimonial/fontes/PHP/almoxarifado/instancias/entrada/OCMovimentacaoTransferencia.php index 1db0aee..c443e65 100644 --- a/gestaoPatrimonial/fontes/PHP/almoxarifado/instancias/entrada/OCMovimentacaoTransferencia.php +++ b/gestaoPatrimonial/fontes/PHP/almoxarifado/instancias/entrada/OCMovimentacaoTransferencia.php @@ -834,9 +834,6 @@ switch ($stCtrl) { if ($stRet != null) { $stJs = $stRet; } else { - //SistemaLegado::mostravar( $sessao->transf['Valores'] ); - //return 0; - if ($arValoresSessao) { foreach ($arValoresSessao as $campo => $valor) { if ($arValoresSessao[$campo]["inId"] == $id) { diff --git a/gestaoPatrimonial/fontes/PHP/almoxarifado/instancias/processamento/OCCentroCustoUsuario.php b/gestaoPatrimonial/fontes/PHP/almoxarifado/instancias/processamento/OCCentroCustoUsuario.php index 62601a8..121d1b8 100755 --- a/gestaoPatrimonial/fontes/PHP/almoxarifado/instancias/processamento/OCCentroCustoUsuario.php +++ b/gestaoPatrimonial/fontes/PHP/almoxarifado/instancias/processamento/OCCentroCustoUsuario.php @@ -30,75 +30,30 @@ * @author Analista: Diego Barbosa Victoria * @author Desenvolvedor: Diego Barbosa Victoria -$Revision: 20971 $ -$Name$ -$Author: tonismar $ -$Date: 2007-03-13 17:38:31 -0300 (Ter, 13 Mar 2007) $ +$Id: OCCentroCustoUsuario.php 64005 2015-11-17 16:49:06Z michel $ * Casos de uso: uc-03.03.07 uc-03.04.01 */ -/* -$Log$ -Revision 1.9 2007/03/13 20:38:31 tonismar -bug #8699 - -Revision 1.8 2007/02/26 18:12:04 tonismar -bug #8445 - -Revision 1.7 2007/02/01 10:48:02 hboaventura -Bugs #8237# #8236# #8230# #8229# #8144# #8151# #7786# #8225# - -Revision 1.6 2006/12/19 10:46:45 hboaventura -Bug #7629# - -Revision 1.5 2006/12/12 12:44:24 rodrigo -Correção da formatação do valor do saldo - -Revision 1.4 2006/11/29 19:45:52 larocca -Bug #7629# - -Revision 1.3 2006/11/17 10:44:39 rodrigo -Bug 7384 - -Revision 1.2 2006/11/13 20:25:58 rodrigo -*** empty log message *** - -Revision 1.1 2006/09/27 15:39:32 rodrigo -*** empty log message *** - -Revision 1.5 2006/07/10 19:40:16 rodrigo -Adicionado nos componentes de itens,marca e centro de custa a função ajax para manipulação dos dados. - -Revision 1.4 2006/07/06 14:05:39 diego -Retirada tag de log com erro. - -Revision 1.3 2006/07/06 12:10:10 diego - -*/ - include_once '../../../../../../gestaoAdministrativa/fontes/PHP/pacotes/FrameworkHTML.inc.php'; include_once '../../../../../../gestaoAdministrativa/fontes/PHP/framework/include/valida.inc.php'; -include_once(CAM_GP_ALM_NEGOCIO."RAlmoxarifadoPermissaoCentroDeCustos.class.php"); -include_once(CAM_GP_ALM_NEGOCIO."RAlmoxarifadoCentroDeCustos.class.php"); -include_once(CAM_GP_ALM_NEGOCIO."RAlmoxarifadoEstoqueItem.class.php"); +include_once CAM_GP_ALM_NEGOCIO."RAlmoxarifadoPermissaoCentroDeCustos.class.php"; +include_once CAM_GP_ALM_NEGOCIO."RAlmoxarifadoCentroDeCustos.class.php"; +include_once CAM_GP_ALM_NEGOCIO."RAlmoxarifadoEstoqueItem.class.php"; -$stCampoCod = $_GET['stNomCampoCod' ]; -$stCampoDesc = $_GET['stIdCampoDesc' ]; -$inCodigo = $_REQUEST[ 'inCodigo' ]; +$stCampoCod = $request->get('stNomCampoCod'); +$stCampoDesc = $request->get('stIdCampoDesc'); +$inCodigo = $request->get('inCodigo'); $inCodCentroCusto = $request->get("inCodCentroCusto"); -//sistemaLegado::mostraVar($_REQUEST); -switch ($_GET['stCtrl']) { - +switch ($request->get('stCtrl')) { case 'buscaPopup': default: $boErro = true; - $usuario = isset($usuario) ? $usuario : ""; $stJs = isset($stJs) ? $stJs : ""; if ( (trim($inCodigo) != '') AND ($inCodigo != 0) ) { - if ($usuario) { + if ($request->get('usuario')==TRUE) { $obRegra = new RAlmoxarifadoPermissaoCentroDeCustos(); $obRegra->addCentroDeCustos(); $obRegra->roUltimoCentro->setCodigo( $inCodigo ); @@ -111,10 +66,10 @@ switch ($_GET['stCtrl']) { $obRegra->consultar(); $stDescricao = $obRegra->getDescricao(); } - $stJs.="d.getElementById('".$stCampoDesc."').innerHTML='".$stDescricao."';"; - $stJs.="retornaValorBscInner('".$stCampoCod."','".$stCampoDesc."','".$_GET['stNomForm']."','".$stDescricao."');"; + $stJs.="d.getElementById('".$stCampoDesc."').innerHTML='".$stDescricao."'; \n"; + $stJs.="retornaValorBscInner('".$stCampoCod."','".$stCampoDesc."','".$request->get('stNomForm')."','".$stDescricao."'); \n"; if ($stDescricao=="") { - $stJs.="alertaAviso('@Código do Centro de Custo(".$inCodigo.") não encontrado.','form','erro','".Sessao::getId()."');"; + $stJs.="alertaAviso('@Código do Centro de Custo(".$inCodigo.") não encontrado.','form','erro','".Sessao::getId()."'); \n"; $boErro = false; } @@ -123,44 +78,25 @@ switch ($_GET['stCtrl']) { $obRegra->setCodigo( $inCodCentroCusto ); $obRegra->consultar(); $stDescricao = $obRegra->getDescricao(); - $stJs.="d.getElementById('".$stCampoDesc."').innerHTML = '".$stDescricao."';"; - $stJs.="retornaValorBscInner('".$stCampoCod."','".$stCampoDesc."','".$_GET['stNomForm']."','".$stDescricao."');"; + $stJs.="d.getElementById('".$stCampoDesc."').innerHTML = '".$stDescricao."'; \n"; + $stJs.="retornaValorBscInner('".$stCampoCod."','".$stCampoDesc."','".$request->get('stNomForm')."','".$stDescricao."'); \n"; if ($stDescricao=="") { - $stJs.="alertaAviso('@Código do Centro de Custo(".$inCodCentroCusto.") não encontrado.','form','erro','".Sessao::getId()."');"; + $stJs.="alertaAviso('@Código do Centro de Custo(".$inCodCentroCusto.") não encontrado.','form','erro','".Sessao::getId()."'); \n"; $boErro = false; } } else { - $stJs.="alertaAviso('@Código do Centro de Custo(".$inCodCentroCusto.") não encontrado.','form','erro','".Sessao::getId()."');"; - $stJs.="f.".$stCampoCod.".value = '';\n"; - $stJs.="d.getElementById('".$stCampoDesc."').innerHTML = ' ';"; + $stJs.="alertaAviso('@Código do Centro de Custo(".$inCodCentroCusto.") não encontrado.','form','erro','".Sessao::getId()."'); \n"; + $stJs.="f.".$stCampoCod.".value = ''; \n"; + $stJs.="d.getElementById('".$stCampoDesc."').innerHTML = ' '; \n"; $boErro = false; } - /* - if ($boErro) { - $obEstoqueItem = new RAlmoxarifadoEstoqueItem(); - $obEstoqueItem->obRCentroDeCustos->setCodigo($inCodigo); - if (isset($_REQUEST['inCodItem'])) { - $obEstoqueItem->obRCatalogoItem->setCodigo($_REQUEST['inCodItem']); - } - $obEstoqueItem->retornaSaldoEstoque( $inSaldoEstoque ); - ($inSaldoEstoque=="") ? $inSaldoEstoque = '0,00' : $inSaldoEstoque = number_format($inSaldoEstoque,2,',','.'); - //if ($obEstoqueItem->obRCatalogoItem->getCodigo()!="") { - //$stJs.=" if (d.getElementById('lblSaldoEstoque')) { "; - $stJs.=" d.getElementById('lblSaldoEstoque').innerHTML='".number_format($inSaldoEstoque,4,',','.')."'; "; - $stJs.=" var inSaldoEstoque; - inSaldoEstoque = '".$inSaldoEstoque."';"; - $stJs.=" d.getElementById('lblSaldoEstoque').innerHTML=inSaldoEstoque;"; - //$stJs.=" } "; - //} - } else { - $stJs .= "f.inCodCentroCusto.value = ''; "; - $stJs .= "d.getElementById('".$stCampoDesc."').innerHTML = ' ';"; - $stJs.=" d.getElementById('lblSaldoEstoque').innerHTML = ' ';"; - }*/ + + if($request->get('boLiberaFrame')) + $stJs .= "LiberaFrames(true,true); \n"; + echo $stJs; - //SistemaLegado::executaFrameOculto($stJs); - break; + break; } ?> diff --git a/gestaoPatrimonial/fontes/PHP/almoxarifado/instancias/processamento/OCIMontaItemQuantidade.php b/gestaoPatrimonial/fontes/PHP/almoxarifado/instancias/processamento/OCIMontaItemQuantidade.php index bd446c5..d6379b3 100644 --- a/gestaoPatrimonial/fontes/PHP/almoxarifado/instancias/processamento/OCIMontaItemQuantidade.php +++ b/gestaoPatrimonial/fontes/PHP/almoxarifado/instancias/processamento/OCIMontaItemQuantidade.php @@ -187,8 +187,6 @@ function montaListaAtributos() function mostraAtributos($boNaoReseta = true) { -// SistemaLegado::mostraVar($_REQUEST); - global $stNomeItem; global $pgOc; global $obIMontaItemQuantidade; diff --git a/gestaoPatrimonial/fontes/PHP/almoxarifado/instancias/requisicao/PRManterRequisicao.php b/gestaoPatrimonial/fontes/PHP/almoxarifado/instancias/requisicao/PRManterRequisicao.php index 8bd1f21..959b455 100644 --- a/gestaoPatrimonial/fontes/PHP/almoxarifado/instancias/requisicao/PRManterRequisicao.php +++ b/gestaoPatrimonial/fontes/PHP/almoxarifado/instancias/requisicao/PRManterRequisicao.php @@ -32,7 +32,7 @@ * @ignore - $Id: PRManterRequisicao.php 59612 2014-09-02 12:00:51Z gelson $ + $Id: PRManterRequisicao.php 63833 2015-10-22 13:05:17Z franver $ **/ @@ -285,7 +285,7 @@ switch ($stAcao) { AND homologada = true"; $obTAlmoxarifadoRequisicaoHomologada = new TAlmoxarifadoRequisicaoHomologada; $obTAlmoxarifadoRequisicaoHomologada->recuperaTodos($rsRequisicaoHomologada, $stFiltro); - //sistemaLegado::mostraVar($rsRequisicaoHomologada);die; + if ($rsRequisicaoHomologada->getNumLinhas() > 0) { SistemaLegado::alertaAviso($pgList."?".Sessao::getId()."&stAcao=".$stAcao, "Não é possível excluir a requisição, pois está homologada!", "n_excluir", "erro", Sessao::getId(), "../"); } else { diff --git a/gestaoPatrimonial/fontes/PHP/almoxarifado/popups/centroCusto/FLManterCentroCusto.php b/gestaoPatrimonial/fontes/PHP/almoxarifado/popups/centroCusto/FLManterCentroCusto.php index 24cc230..9dec357 100644 --- a/gestaoPatrimonial/fontes/PHP/almoxarifado/popups/centroCusto/FLManterCentroCusto.php +++ b/gestaoPatrimonial/fontes/PHP/almoxarifado/popups/centroCusto/FLManterCentroCusto.php @@ -30,26 +30,16 @@ * @author Analista: * @author Desenvolvedor: Leandro André Zis + $Id: FLManterCentroCusto.php 64005 2015-11-17 16:49:06Z michel $ + * @ignore * Casos de uso: uc-03.03.07 */ -/* -$Log$ -Revision 1.9 2006/07/18 17:50:05 fernando -alteração de hints - -Revision 1.8 2006/07/06 14:05:39 diego -Retirada tag de log com erro. - -Revision 1.7 2006/07/06 12:10:10 diego - -*/ - include_once '../../../../../../gestaoAdministrativa/fontes/PHP/pacotes/FrameworkHTML.inc.php'; include_once '../../../../../../gestaoAdministrativa/fontes/PHP/framework/include/cabecalho.inc.php'; -include_once(CAM_GP_ALM_NEGOCIO . "RAlmoxarifadoCentroDeCustos.class.php"); +include_once CAM_GP_ALM_NEGOCIO.'RAlmoxarifadoCentroDeCustos.class.php'; $stPrograma = "ManterCentroCusto"; $pgFilt = "FL".$stPrograma.".php"; @@ -64,10 +54,7 @@ $obRegra->roUltimaEntidade->setExercicio ( Sessao::getExercicio() ); $obRegra->roUltimaEntidade->listar( $rsEntidade ); //Define a função do arquivo, ex: incluir, excluir, alterar, consultar, etc -$stAcao = $request->get('stAcao'); -if ( empty( $stAcao ) ) { - $stAcao = "alterar"; -} +$stAcao = $request->get('stAcao', 'alterar'); //DEFINICAO DOS COMPONENTES $obHdnAcao = new Hidden; @@ -76,23 +63,23 @@ $obHdnAcao->setValue ( $stAcao ); $obHdnForm = new Hidden; $obHdnForm->setName( "nomForm" ); -$obHdnForm->setValue( $_REQUEST['nomForm'] ); +$obHdnForm->setValue( $request->get('nomForm') ); $obHdnCampoNum = new Hidden; $obHdnCampoNum->setName( "campoNum" ); -$obHdnCampoNum->setValue( $_REQUEST['campoNum'] ); +$obHdnCampoNum->setValue( $request->get('campoNum') ); //Define HIDDEN com o o nome do campo texto $obHdnCampoNom = new Hidden; $obHdnCampoNom->setName( "campoNom" ); -$obHdnCampoNom->setValue( $_REQUEST['campoNom'] ); +$obHdnCampoNom->setValue( $request->get('campoNom') ); $obHdnUsuario = new Hidden; $obHdnUsuario->setName( "usuario" ); -$obHdnUsuario->setValue( $_REQUEST['usuario'] ); +$obHdnUsuario->setValue( $request->get('usuario', FALSE) ); $obForm = new Form; -$obForm->setAction ( $pgList ); +$obForm->setAction( $pgList ); // Define SELECT multiplo para codigo da entidade $obCmbEntidade = new SelectMultiplo(); $obCmbEntidade->setName ( 'inCodEntidade' ); @@ -110,25 +97,25 @@ $obCmbEntidade->setCampoDesc2 ( 'nom_cgm' ); $obCmbEntidade->SetRecord2 ( new Recordset() ); $obTxtDescricao = new TextBox; -$obTxtDescricao->setRotulo ( "Descrição" ); -$obTxtDescricao->setName ( "stDescricao" ); -$obTxtDescricao->setSize ( 50 ); -$obTxtDescricao->setMaxLength ( 160 ); -$obTxtDescricao->setTitle ( "Informe a descrição do nível" ); -$obTxtDescricao->setValue ( isset($stDescricao) ? $stDescricao : null ); +$obTxtDescricao->setRotulo ( "Descrição" ); +$obTxtDescricao->setName ( "stDescricao" ); +$obTxtDescricao->setSize ( 50 ); +$obTxtDescricao->setMaxLength ( 160 ); +$obTxtDescricao->setTitle ( "Informe a descrição do nível" ); +$obTxtDescricao->setValue ( isset($stDescricao) ? $stDescricao : null ); $obCmpTipoBusca = new TipoBusca( $obTxtDescricao ); $obFormulario = new Formulario; -$obFormulario->addTitulo ( "Dados Para o Filtro" ); -$obFormulario->addForm ( $obForm ); -$obFormulario->addHidden ( $obHdnAcao ); -$obFormulario->addHidden ( $obHdnUsuario ); -$obFormulario->addHidden( $obHdnForm ); -$obFormulario->addHidden( $obHdnCampoNum ); -$obFormulario->addHidden( $obHdnCampoNom ); -$obFormulario->addComponente ( $obCmbEntidade ); -$obFormulario->addComponente ( $obCmpTipoBusca ); +$obFormulario->addTitulo( "Dados Para o Filtro" ); +$obFormulario->addForm ( $obForm ); +$obFormulario->addHidden( $obHdnAcao ); +$obFormulario->addHidden( $obHdnUsuario ); +$obFormulario->addHidden( $obHdnForm ); +$obFormulario->addHidden( $obHdnCampoNum ); +$obFormulario->addHidden( $obHdnCampoNom ); +$obFormulario->addComponente( $obCmbEntidade ); +$obFormulario->addComponente( $obCmpTipoBusca ); $obFormulario->OK(); $obFormulario->show(); diff --git a/gestaoPatrimonial/fontes/PHP/almoxarifado/popups/centroCusto/LSManterCentroCusto.php b/gestaoPatrimonial/fontes/PHP/almoxarifado/popups/centroCusto/LSManterCentroCusto.php index 6a947fc..833fd94 100644 --- a/gestaoPatrimonial/fontes/PHP/almoxarifado/popups/centroCusto/LSManterCentroCusto.php +++ b/gestaoPatrimonial/fontes/PHP/almoxarifado/popups/centroCusto/LSManterCentroCusto.php @@ -34,12 +34,12 @@ * Casos de uso: uc-03.03.07 - $Id: LSManterCentroCusto.php 59612 2014-09-02 12:00:51Z gelson $ + $Id: LSManterCentroCusto.php 64005 2015-11-17 16:49:06Z michel $ */ include_once '../../../../../../gestaoAdministrativa/fontes/PHP/pacotes/FrameworkHTML.inc.php'; include_once '../../../../../../gestaoAdministrativa/fontes/PHP/framework/include/cabecalho.inc.php'; -include_once(CAM_GP_ALM_NEGOCIO . "RAlmoxarifadoCentroDeCustos.class.php"); +include_once CAM_GP_ALM_NEGOCIO.'RAlmoxarifadoCentroDeCustos.class.php'; $stPrograma = "ManterCentroCusto"; $pgFilt = "FL".$stPrograma.".php"; @@ -49,35 +49,31 @@ $pgProc = "PR".$stPrograma.".php"; $pgOcul = "OC".$stPrograma.".php"; $pgJs = "JS".$stPrograma.".js"; - $stFncJavaScript = " function insereCentroDeCustos(num,nom) { \n"; - $stFncJavaScript .= " var sNum; \n"; - $stFncJavaScript .= " var sNom; \n"; - $stFncJavaScript .= " sNum = num; \n"; - $stFncJavaScript .= " sNom = nom; \n"; - $stFncJavaScript .= " window.opener.parent.frames['telaPrincipal'].document.getElementById('".$_REQUEST["campoNom"]."').innerHTML = sNom; \n"; - $stFncJavaScript .= " window.opener.parent.frames['telaPrincipal'].document.".$_REQUEST["nomForm"].".".$_REQUEST["campoNom" ].".value = sNom; \n"; - $stFncJavaScript .= " window.opener.parent.frames['telaPrincipal'].document.".$_REQUEST["nomForm"].".".$_REQUEST["campoNum" ].".value = sNum; \n"; - $stFncJavaScript .= " window.opener.parent.frames['telaPrincipal'].document.".$_REQUEST["nomForm"].".".$_REQUEST["campoNum" ].".focus(); \n"; - $stFncJavaScript .= " window.close(); \n"; - $stFncJavaScript .= " } \n"; +$stFncJavaScript = " function insereCentroDeCustos(num,nom) { \n"; +$stFncJavaScript .= " var sNum; \n"; +$stFncJavaScript .= " var sNom; \n"; +$stFncJavaScript .= " sNum = num; \n"; +$stFncJavaScript .= " sNom = nom; \n"; +$stFncJavaScript .= " window.opener.parent.frames['telaPrincipal'].document.getElementById('".$request->get('campoNom')."').innerHTML = sNom; \n"; +$stFncJavaScript .= " window.opener.parent.frames['telaPrincipal'].document.".$request->get('nomForm').".".$request->get('campoNom').".value = sNom; \n"; +$stFncJavaScript .= " window.opener.parent.frames['telaPrincipal'].document.".$request->get('nomForm').".".$request->get('campoNum').".value = sNum; \n"; +$stFncJavaScript .= " window.opener.parent.frames['telaPrincipal'].document.".$request->get('nomForm').".".$request->get('campoNum').".focus(); \n"; +$stFncJavaScript .= " window.close(); \n"; +$stFncJavaScript .= " } \n"; $stCaminho = CAM_GP_ALM_INSTANCIAS."centroCusto/"; -$stAcao = $request->get("stAcao"); - -if (empty( $stAcao )) { - $stAcao = "alterar"; -} +$stAcao = $request->get('stAcao', 'alterar'); if ( $request->get('inCodigo')) { - foreach ($_REQUEST as $key => $value) { + foreach ($request->getAll() as $key => $value) { $filtro[$key] = $value; } Sessao::write('filtro', $filtro); } else { if ( Sessao::read('filtro') ) { foreach ( Sessao::read('filtro') as $key => $value ) { - $_REQUEST[$key] = $value; + $request->set($key, $value); } } Sessao::write('paginando', true); @@ -86,10 +82,10 @@ if ( $request->get('inCodigo')) { $obRegra = new RAlmoxarifadoCentroDeCustos; if ($request->get('stHdnDescricao')) { - $obRegra->setDescricao($_REQUEST['stHdnDescricao']); + $obRegra->setDescricao($request->get('stHdnDescricao')); } if ( $request->get('inCodEntidade') ) { - foreach ($_REQUEST['inCodEntidade'] as $inCodEntidade) { + foreach ($request->get('inCodEntidade') as $inCodEntidade) { $obRegra->addEntidade(); $obRegra->roUltimaEntidade->setCodigoEntidade($inCodEntidade); } @@ -100,13 +96,13 @@ $stLink = ""; $stLink .= '&inCodigo='.$request->get('inCodigo'); $stLink .= "&stAcao=".$stAcao; -$stLink .= "&nomForm=".$_REQUEST["nomForm"]."&campoNom=".$_REQUEST["campoNom"]."&campoNum=".$_REQUEST["campoNum"]; +$stLink .= "&nomForm=".$request->get('nomForm')."&campoNom=".$request->get('campoNom')."&campoNum=".$request->get('campoNum'); $rsLista = new RecordSet; $stOrder = " ORDER BY centro_custo.descricao "; -if (isset($usuario)) +if ($request->get('usuario')==TRUE) $obRegra->listarPermissaoUsuario( $rsLista, $stOrder ); else $obRegra->listar( $rsLista, $stOrder ); diff --git a/gestaoPatrimonial/fontes/PHP/compras/classes/componentes/IMontaDotacaoDesdobramento.class.php b/gestaoPatrimonial/fontes/PHP/compras/classes/componentes/IMontaDotacaoDesdobramento.class.php index 59479f0..ee1029c 100644 --- a/gestaoPatrimonial/fontes/PHP/compras/classes/componentes/IMontaDotacaoDesdobramento.class.php +++ b/gestaoPatrimonial/fontes/PHP/compras/classes/componentes/IMontaDotacaoDesdobramento.class.php @@ -35,11 +35,12 @@ * Casos de uso: uc-03.04.01 - $Id: IMontaDotacaoDesdobramento.class.php 59612 2014-09-02 12:00:51Z gelson $ + $Id: IMontaDotacaoDesdobramento.class.php 63841 2015-10-22 19:14:30Z michel $ */ -include_once ( CLA_OBJETO ); -include_once(CAM_GA_ADM_MAPEAMENTO."TAdministracaoConfiguracao.class.php" ); +include_once CLA_OBJETO; +include_once CAM_GA_ADM_MAPEAMENTO.'TAdministracaoConfiguracao.class.php'; +include_once CAM_GF_EMP_NEGOCIO.'REmpenhoAutorizacaoEmpenho.class.php'; class IMontaDotacaoDesdobramento extends Objeto { @@ -49,9 +50,8 @@ class IMontaDotacaoDesdobramento extends Objeto public function setMostraSintetico($valor) { $this->boMostraSintetico = $valor; } public function getMostraSintetico() { return $this->boMostraSintetico;} - public function IMontaDotacaoDesdobramento() + public function __construct() { - include_once ( CAM_GF_EMP_NEGOCIO."REmpenhoAutorizacaoEmpenho.class.php" ); parent::Objeto(); $obREmpenhoAutorizacaoEmpenho = new REmpenhoAutorizacaoEmpenho; @@ -98,13 +98,11 @@ class IMontaDotacaoDesdobramento extends Objeto $this->obCmbClassificacao->setId ( "stCodClassificacao" ); $this->obCmbClassificacao->setValue ( "" ); $this->obCmbClassificacao->setStyle ( "width: 600" ); - // $this->obCmbClassificacao->setNull ( ($stFormaExecucao) ? false : true ); $this->obCmbClassificacao->setDisabled ( ($stFormaExecucao) ? false : true ); $this->obCmbClassificacao->addOption ( "", "Selecione" ); $this->obCmbClassificacao->setCampoId ( "cod_estrutural" ); $this->obCmbClassificacao->setCampoDesc ( "cod_estrutural" ); $this->obCmbClassificacao->preencheCombo ( $rsClassificacao ); - } // Define objeto Label para saldo anterior @@ -123,7 +121,6 @@ class IMontaDotacaoDesdobramento extends Objeto $this->obSpanSaldo->setId( "spnSaldoDotacao" ); $this->setMostraSintetico( false ); - } public function geraFormulario(&$obFormulario) @@ -132,32 +129,30 @@ class IMontaDotacaoDesdobramento extends Objeto if ( $this->getMostraSintetico() ) { $stParams .= '&boMostraSintetico=true'; } - $js = " if (this.value!=document.frm.inCodDespesaAnterior.value) { "; - $js.= " document.frm.inCodDespesaAnterior.value=this.value; "; - // $js.= " BloqueiaFrames(true,false); "; - $js.= " var stTarget = document.frm.target; "; - $js.= " var stAction = document.frm.action; "; - $js.= " document.frm.stCtrl.value = 'buscaDespesaDiverso'; "; - $js.= " document.getElementById('stNomDespesa').innerHTML = ' '; "; - $js.= " document.frm.target ='oculto'; "; - $js.= " document.frm.action ='../../instancias/processamento/OCIMontaDotacaoDesdobramento.php?".$stParams."';"; - $js.= " document.frm.submit(); "; - $js.= " document.frm.action = '".$pgOcul."?".Sessao::getId()."'; "; - $js.= " document.frm.action = stAction; "; - $js.= " document.frm.target = stTarget; "; - $js.= " } "; + $js = " if (this.value!=document.frm.inCodDespesaAnterior.value) { "; + $js.= " document.frm.inCodDespesaAnterior.value=this.value; "; + $js.= " var stTarget = document.frm.target; "; + $js.= " var stAction = document.frm.action; "; + $js.= " document.frm.stCtrl.value = 'buscaDespesaDiverso'; "; + $js.= " document.getElementById('stNomDespesa').innerHTML = ' '; "; + $js.= " document.frm.target ='oculto'; "; + $js.= " document.frm.action ='".CAM_GP_COM_INSTANCIAS."processamento/OCIMontaDotacaoDesdobramento.php?".$stParams."'; "; + $js.= " document.frm.submit(); "; + $js.= " document.frm.action = '".$pgOcul."?".Sessao::getId()."'; "; + $js.= " document.frm.action = stAction; "; + $js.= " document.frm.target = stTarget; "; + $js.= " } "; $this->obBscDespesa->obCampoCod->obEvento->setOnBlur($js); - $obFormulario->addHidden ( $this->obHdnCodDespesa ); - $obFormulario->addHidden ( $this->obHdnSaldoDotacao ); - $obFormulario->addHidden ( $this->obHdnCodClassificacao ); - $obFormulario->addComponente( $this->obBscDespesa ); - if ($this->boFormaExecucao) { - $obFormulario->addComponente( $this->obCmbClassificacao ); - } - $obFormulario->addComponente( $this->obLblSaldoDotacao ); - $obFormulario->addSpan ( $this->obSpanSaldo ); + $obFormulario->addHidden ( $this->obHdnCodDespesa ); + $obFormulario->addHidden ( $this->obHdnSaldoDotacao ); + $obFormulario->addHidden ( $this->obHdnCodClassificacao ); + $obFormulario->addComponente ( $this->obBscDespesa ); + if ($this->boFormaExecucao) + $obFormulario->addComponente( $this->obCmbClassificacao ); + $obFormulario->addComponente ( $this->obLblSaldoDotacao ); + $obFormulario->addSpan ( $this->obSpanSaldo ); } } ?> diff --git a/gestaoPatrimonial/fontes/PHP/compras/classes/mapeamento/TComprasCotacaoFornecedorItem.class.php b/gestaoPatrimonial/fontes/PHP/compras/classes/mapeamento/TComprasCotacaoFornecedorItem.class.php index afe4072..334882e 100644 --- a/gestaoPatrimonial/fontes/PHP/compras/classes/mapeamento/TComprasCotacaoFornecedorItem.class.php +++ b/gestaoPatrimonial/fontes/PHP/compras/classes/mapeamento/TComprasCotacaoFornecedorItem.class.php @@ -36,269 +36,255 @@ * Casos de uso: uc-03.05.25 uc-03.05.26 - $Id: TComprasCotacaoFornecedorItem.class.php 61266 2014-12-23 12:34:26Z arthur $ + $Id: TComprasCotacaoFornecedorItem.class.php 64118 2015-12-04 12:33:31Z franver $ */ include_once '../../../../../../gestaoAdministrativa/fontes/PHP/framework/include/valida.inc.php'; -include_once ( CLA_PERSISTENTE ); +include_once CLA_PERSISTENTE; -/** - * Efetua conexão com a tabela compras.cotacao_fornecedor_item - * Data de Criação: 30/06/2006 - - * @author Analista: Diego Victoria - * @author Desenvolvedor: Leandro André Zis - - * @package URBEM - * @subpackage Mapeamento -*/ class TComprasCotacaoFornecedorItem extends Persistente { -/** - * Método Construtor - * @access Private -*/ -function TComprasCotacaoFornecedorItem() -{ - parent::Persistente(); - $this->setTabela("compras.cotacao_fornecedor_item"); - - $this->setCampoCod(''); - $this->setComplementoChave('exercicio,cod_cotacao,cod_item,cgm_fornecedor'); - - $this->AddCampo('exercicio','CHAR',true,'4',true,'TComprasCotacaoItem'); - $this->AddCampo('cod_cotacao','INTEGER',true,'',true,'TComprasCotacaoItem'); - $this->AddCampo('cod_item','INTEGER',true,'',true,'TComprasCotacaoItem'); - $this->AddCampo('lote','INTEGER',true,'',true,'TComprasCotacaoItem'); - $this->AddCampo('cgm_fornecedor','INTEGER',true,'',true,'TComprasFornecedor'); - $this->AddCampo('cod_marca','INTEGER',true,'',false,false ); - $this->AddCampo('timestamp','timestamp',false,'',false,false); - $this->AddCampo('dt_validade','DATE',true,'',false,false); - $this->AddCampo('vl_cotacao','NUMERIC',true,'14.2',false,false); -} - -function montaRecuperaRelacionamento() -{ - $stSql = " -select sw_cgm.nom_cgm - , marca.descricao - , fornecedor.tipo - , cotacao_fornecedor_item.lote - , cotacao_fornecedor_item.vl_cotacao as vl_total - , cotacao_fornecedor_item.cgm_fornecedor - , cotacao_fornecedor_item.lote - , cotacao_item.quantidade - , CASE WHEN cotacao_fornecedor_item_desclassificacao.cod_item IS NULL THEN - julgamento_item.justificativa - ELSE - cotacao_fornecedor_item_desclassificacao.justificativa - END as justificativa - , cast ( ( cotacao_fornecedor_item.vl_cotacao / cotacao_item.quantidade ) as numeric(14,2)) as vl_unitario - , catalogo_item.descricao_resumida as item - , CASE WHEN ( exists ( select cotacao_fornecedor_item_desclassificacao.cgm_fornecedor - from compras.cotacao_fornecedor_item_desclassificacao - where cotacao_fornecedor_item.cgm_fornecedor = cotacao_fornecedor_item_desclassificacao.cgm_fornecedor - and cotacao_fornecedor_item.cod_item = cotacao_fornecedor_item_desclassificacao.cod_item - and cotacao_fornecedor_item.cod_cotacao = cotacao_fornecedor_item_desclassificacao.cod_cotacao - and cotacao_fornecedor_item.exercicio = cotacao_fornecedor_item_desclassificacao.exercicio - and cotacao_fornecedor_item.lote = cotacao_fornecedor_item_desclassificacao.lote ) - or - exists ( select 1 - from compras.fornecedor_inativacao - where fornecedor_inativacao.timestamp_fim is null - and fornecedor_inativacao.cgm_fornecedor = cotacao_fornecedor_item.cgm_fornecedor ) - ) - THEN 'desclassificado' - ELSE 'classificado' - END AS status - - , CASE WHEN (julgamento.timestamp IS NOT NULL) THEN - 'true' - ELSE - 'false' - END as julgado - - from compras.cotacao - - join compras.cotacao_item - on ( cotacao.exercicio = cotacao_item.exercicio - and cotacao.cod_cotacao = cotacao_item.cod_cotacao ) - - join almoxarifado.catalogo_item - on ( cotacao_item.cod_item = catalogo_item.cod_item ) - - join compras.cotacao_fornecedor_item - on ( cotacao_item.exercicio = cotacao_fornecedor_item.exercicio - and cotacao_item.cod_cotacao = cotacao_fornecedor_item.cod_cotacao - and cotacao_item.cod_item = cotacao_fornecedor_item.cod_item - and cotacao_item.lote = cotacao_fornecedor_item.lote ) - -LEFT JOIN compras.julgamento - ON cotacao_fornecedor_item.exercicio = julgamento.exercicio - AND cotacao_fornecedor_item.cod_cotacao = julgamento.cod_cotacao - -LEFT join compras.julgamento_item - on ( cotacao_fornecedor_item.exercicio = julgamento_item.exercicio - and cotacao_fornecedor_item.cod_cotacao = julgamento_item.cod_cotacao - and cotacao_fornecedor_item.cod_item = julgamento_item.cod_item - and cotacao_fornecedor_item.lote = julgamento_item.lote - and cotacao_fornecedor_item.cgm_fornecedor = julgamento_item.cgm_fornecedor ) - - left join compras.cotacao_fornecedor_item_desclassificacao - on cotacao_fornecedor_item.cgm_fornecedor = cotacao_fornecedor_item_desclassificacao.cgm_fornecedor - and cotacao_fornecedor_item.cod_item = cotacao_fornecedor_item_desclassificacao.cod_item - and cotacao_fornecedor_item.cod_cotacao = cotacao_fornecedor_item_desclassificacao.cod_cotacao - and cotacao_fornecedor_item.exercicio = cotacao_fornecedor_item_desclassificacao.exercicio - and cotacao_fornecedor_item.lote = cotacao_fornecedor_item_desclassificacao.lote - - join almoxarifado.catalogo_item_marca - on (catalogo_item_marca.cod_item = cotacao_fornecedor_item.cod_item - and catalogo_item_marca.cod_marca = cotacao_fornecedor_item.cod_marca ) - - join almoxarifado.marca - on ( marca.cod_marca = catalogo_item_marca.cod_marca ) - - join compras.fornecedor - on ( cotacao_fornecedor_item.cgm_fornecedor = fornecedor.cgm_fornecedor ) - - join sw_cgm - on ( sw_cgm.numcgm = fornecedor.cgm_fornecedor ) - join compras.mapa_cotacao - on ( mapa_cotacao.exercicio_cotacao = cotacao.exercicio - and mapa_cotacao.cod_cotacao = cotacao.cod_cotacao ) - - "; - - return $stSql; - -} - -function montaRecuperaValorTotalItensLicitacao() -{ - $stSql = " select sum(c.vl_cotacao*ci.quantidade) as valor_total "; - $stSql.= " from compras.cotacao as c "; - $stSql.= " ,compras.cotacao_item as ci "; - $stSql.= " ,compras.cotacao_fornecedor_item as cfi "; - $stSql.= " ,compras.mapa_cotacao as mc "; - $stSql.= " ,compras.licitacao as l "; - $stSql.= " where "; - $stSql.= " c.exercicio = ci.exercicio "; - $stSql.= " and c.cod_cotacacao = ci.cod_cotacao "; - $stSql.= " and ci.exercicio = cfi.exercicio "; - $stSql.= " and ci.cod_cotacao = cfi.cod_cotacao "; - $stSql.= " and ci.cod_item = cfi.cod_item "; - $stSql.= " and l.cod_mapa = mc.cod_mapa "; - $stSql.= " and l.exericicio = mc.exercicio_mapa "; - $stSql.= " and cfi.cgm_fornecedor = ".$this->getDado("cgm_fornecedor")." "; - $stSql.= " and l.cod_licitacao = ".$this->getDado("cod_licitacao")." "; - $stSql.= " and l.exercicio = ".$this->getDado("exercicio")." "; - $stSql.= " and l.cod_entidade = ".$this->getDado("cod_entidade")." "; - $stSql.= " and l.cod_modalidade = ".$this->getDado("cod_modalidade")." "; - - return $stSql; -} - -function recuperaItensFornecedor(&$rsRecordSet, $stFiltro = "", $stOrdem = "", $boTransacao = "") -{ - $obErro = new Erro; - $obConexao = new Conexao; - $rsRecordSet = new RecordSet; - $stSql = $this->montaRecuperaItensFornecedor().$stFiltro.$stOrdem; - $this->stDebug = $stSql; - $obErro = $obConexao->executaSQL( $rsRecordSet, $stSql, $boTransacao ); - - return $obErro; -} - -function montaRecuperaItensFornecedor() -{ - $stSql = " select cotacao_fornecedor_item.* \n"; - $stSql .= " , marca.descricao \n"; - $stSql .= " from compras.cotacao_fornecedor_item \n"; - - $stSql .= " inner join almoxarifado.marca on \n"; - $stSql .= " cotacao_fornecedor_item.cod_marca = marca.cod_marca \n"; - - $stSql .= " where cod_cotacao = " . $this->getDado( 'cod_cotacao' ) . " and exercicio = " . $this->getDado( 'exercicio' ) . " \n"; - $stSql .= " and cod_item = " . $this->getDado( 'cod_item' ) . " and cgm_fornecedor = " . $this->getDado( 'cgm_fornecedor' ) . " \n"; - $stSql .= " and lote = " . $this->getDado( 'lote' ) . " \n"; - - return $stSql; -} + /** + * Método Construtor + * @access Private + */ + function __construct() + { + parent::Persistente(); + $this->setTabela("compras.cotacao_fornecedor_item"); + + $this->setCampoCod(''); + $this->setComplementoChave('exercicio,cod_cotacao,cod_item,cgm_fornecedor'); + + $this->AddCampo('exercicio' ,'CHAR' ,true , '4' ,true ,'TComprasCotacaoItem'); + $this->AddCampo('cod_cotacao' ,'INTEGER' ,true , '' ,true ,'TComprasCotacaoItem'); + $this->AddCampo('cod_item' ,'INTEGER' ,true , '' ,true ,'TComprasCotacaoItem'); + $this->AddCampo('lote' ,'INTEGER' ,true , '' ,true ,'TComprasCotacaoItem'); + $this->AddCampo('cgm_fornecedor','INTEGER' ,true , '' ,true ,'TComprasFornecedor' ); + $this->AddCampo('cod_marca' ,'INTEGER' ,true , '' ,false,false ); + $this->AddCampo('timestamp' ,'timestamp',false, '' ,false,false ); + $this->AddCampo('dt_validade' ,'DATE' ,true , '' ,false,false ); + $this->AddCampo('vl_cotacao' ,'NUMERIC' ,true , '14.2' ,false,false ); + } -function recuperaFornecedoresCotacao(&$rsRecordSet, $stFiltro = "", $stOrdem = "", $boTransacao = "") -{ - $obErro = new Erro; - $obConexao = new Conexao; - $rsRecordSet = new RecordSet; - $stSql = $this->montaRecuperaFornecedoresCotacao().$stFiltro.$stOrdem; - $this->stDebug = $stSql; - $obErro = $obConexao->executaSQL( $rsRecordSet, $stSql, $boTransacao ); - - return $obErro; -} + function montaRecuperaRelacionamento() + { + $stSql = " + select sw_cgm.nom_cgm + , marca.descricao + , fornecedor.tipo + , cotacao_fornecedor_item.lote + , cotacao_fornecedor_item.vl_cotacao as vl_total + , cotacao_fornecedor_item.cgm_fornecedor + , cotacao_fornecedor_item.lote + , cotacao_item.quantidade + , CASE WHEN cotacao_fornecedor_item_desclassificacao.cod_item IS NULL THEN + julgamento_item.justificativa + ELSE + cotacao_fornecedor_item_desclassificacao.justificativa + END as justificativa + , cast ( ( cotacao_fornecedor_item.vl_cotacao / cotacao_item.quantidade ) as numeric(14,2)) as vl_unitario + , catalogo_item.descricao_resumida as item + , CASE WHEN ( exists ( select cotacao_fornecedor_item_desclassificacao.cgm_fornecedor + from compras.cotacao_fornecedor_item_desclassificacao + where cotacao_fornecedor_item.cgm_fornecedor = cotacao_fornecedor_item_desclassificacao.cgm_fornecedor + and cotacao_fornecedor_item.cod_item = cotacao_fornecedor_item_desclassificacao.cod_item + and cotacao_fornecedor_item.cod_cotacao = cotacao_fornecedor_item_desclassificacao.cod_cotacao + and cotacao_fornecedor_item.exercicio = cotacao_fornecedor_item_desclassificacao.exercicio + and cotacao_fornecedor_item.lote = cotacao_fornecedor_item_desclassificacao.lote ) + or + exists ( select 1 + from compras.fornecedor_inativacao + where fornecedor_inativacao.timestamp_fim is null + and fornecedor_inativacao.cgm_fornecedor = cotacao_fornecedor_item.cgm_fornecedor ) + ) + THEN 'desclassificado' + ELSE 'classificado' + END AS status + + , CASE WHEN (julgamento.timestamp IS NOT NULL) THEN + 'true' + ELSE + 'false' + END as julgado + + from compras.cotacao + + join compras.cotacao_item + on ( cotacao.exercicio = cotacao_item.exercicio + and cotacao.cod_cotacao = cotacao_item.cod_cotacao ) + + join almoxarifado.catalogo_item + on ( cotacao_item.cod_item = catalogo_item.cod_item ) + + join compras.cotacao_fornecedor_item + on ( cotacao_item.exercicio = cotacao_fornecedor_item.exercicio + and cotacao_item.cod_cotacao = cotacao_fornecedor_item.cod_cotacao + and cotacao_item.cod_item = cotacao_fornecedor_item.cod_item + and cotacao_item.lote = cotacao_fornecedor_item.lote ) + + LEFT JOIN compras.julgamento + ON cotacao_fornecedor_item.exercicio = julgamento.exercicio + AND cotacao_fornecedor_item.cod_cotacao = julgamento.cod_cotacao + + LEFT join compras.julgamento_item + on ( cotacao_fornecedor_item.exercicio = julgamento_item.exercicio + and cotacao_fornecedor_item.cod_cotacao = julgamento_item.cod_cotacao + and cotacao_fornecedor_item.cod_item = julgamento_item.cod_item + and cotacao_fornecedor_item.lote = julgamento_item.lote + and cotacao_fornecedor_item.cgm_fornecedor = julgamento_item.cgm_fornecedor ) + + left join compras.cotacao_fornecedor_item_desclassificacao + on cotacao_fornecedor_item.cgm_fornecedor = cotacao_fornecedor_item_desclassificacao.cgm_fornecedor + and cotacao_fornecedor_item.cod_item = cotacao_fornecedor_item_desclassificacao.cod_item + and cotacao_fornecedor_item.cod_cotacao = cotacao_fornecedor_item_desclassificacao.cod_cotacao + and cotacao_fornecedor_item.exercicio = cotacao_fornecedor_item_desclassificacao.exercicio + and cotacao_fornecedor_item.lote = cotacao_fornecedor_item_desclassificacao.lote + + join almoxarifado.catalogo_item_marca + on (catalogo_item_marca.cod_item = cotacao_fornecedor_item.cod_item + and catalogo_item_marca.cod_marca = cotacao_fornecedor_item.cod_marca ) + + join almoxarifado.marca + on ( marca.cod_marca = catalogo_item_marca.cod_marca ) + + join compras.fornecedor + on ( cotacao_fornecedor_item.cgm_fornecedor = fornecedor.cgm_fornecedor ) + + join sw_cgm + on ( sw_cgm.numcgm = fornecedor.cgm_fornecedor ) + join compras.mapa_cotacao + on ( mapa_cotacao.exercicio_cotacao = cotacao.exercicio + and mapa_cotacao.cod_cotacao = cotacao.cod_cotacao ) + + "; + + return $stSql; + + } -function montaRecuperaFornecedoresCotacao() -{ - $stSql = " select distinct cotacao_fornecedor_item.cgm_fornecedor \n"; - $stSql .= " , sw_cgm.nom_cgm as fornecedor \n"; - $stSql .= " from compras.cotacao_fornecedor_item \n"; - $stSql .= " join sw_cgm \n"; - $stSql .= " on sw_cgm.numcgm = cotacao_fornecedor_item.cgm_fornecedor \n"; - $stSql .= " where cod_cotacao = " . $this->getDado( 'cod_cotacao' ) . " and exercicio = '" . $this->getDado( 'exercicio_cotacao' ) . "' \n"; - - ### - //SistemaLegado::mostraVar($stSql); - //die("FIM"); - ### + function montaRecuperaValorTotalItensLicitacao() + { + $stSql = " select sum(c.vl_cotacao*ci.quantidade) as valor_total "; + $stSql.= " from compras.cotacao as c "; + $stSql.= " ,compras.cotacao_item as ci "; + $stSql.= " ,compras.cotacao_fornecedor_item as cfi "; + $stSql.= " ,compras.mapa_cotacao as mc "; + $stSql.= " ,compras.licitacao as l "; + $stSql.= " where "; + $stSql.= " c.exercicio = ci.exercicio "; + $stSql.= " and c.cod_cotacacao = ci.cod_cotacao "; + $stSql.= " and ci.exercicio = cfi.exercicio "; + $stSql.= " and ci.cod_cotacao = cfi.cod_cotacao "; + $stSql.= " and ci.cod_item = cfi.cod_item "; + $stSql.= " and l.cod_mapa = mc.cod_mapa "; + $stSql.= " and l.exericicio = mc.exercicio_mapa "; + $stSql.= " and cfi.cgm_fornecedor = ".$this->getDado("cgm_fornecedor")." "; + $stSql.= " and l.cod_licitacao = ".$this->getDado("cod_licitacao")." "; + $stSql.= " and l.exercicio = ".$this->getDado("exercicio")." "; + $stSql.= " and l.cod_entidade = ".$this->getDado("cod_entidade")." "; + $stSql.= " and l.cod_modalidade = ".$this->getDado("cod_modalidade")." "; + + return $stSql; + } - return $stSql; -} + function recuperaItensFornecedor(&$rsRecordSet, $stFiltro = "", $stOrdem = "", $boTransacao = "") + { + $obErro = new Erro; + $obConexao = new Conexao; + $rsRecordSet = new RecordSet; + $stSql = $this->montaRecuperaItensFornecedor().$stFiltro.$stOrdem; + $this->stDebug = $stSql; + $obErro = $obConexao->executaSQL( $rsRecordSet, $stSql, $boTransacao ); + + return $obErro; + } -function recuperaItensFornecedorLote(&$rsRecordSet, $stFiltro = "", $stOrdem = "", $boTransacao = "") -{ - $obErro = new Erro; - $obConexao = new Conexao; - $rsRecordSet = new RecordSet; - $stSql = $this->montaRecuperaItensFornecedorLote ().$stFiltro.$stOrdem; - $this->stDebug = $stSql; - $obErro = $obConexao->executaSQL( $rsRecordSet, $stSql, $boTransacao ); - - return $obErro; -} + function montaRecuperaItensFornecedor() + { + $stSql = " + SELECT cotacao_fornecedor_item.* + , marca.descricao + FROM compras.cotacao_fornecedor_item + INNER JOIN almoxarifado.marca + ON cotacao_fornecedor_item.cod_marca = marca.cod_marca + WHERE cod_cotacao = ".$this->getDado('cod_cotacao')." + AND exercicio = '".$this->getDado('exercicio')."' + AND cod_item = ".$this->getDado('cod_item')." + AND cgm_fornecedor = ".$this->getDado('cgm_fornecedor')." + AND lote = ".$this->getDado('lote')." + "; + return $stSql; + } -function montaRecuperaItensFornecedorLote() -{ - $stSql = " - select cotacao_fornecedor_item.exercicio - , cotacao_fornecedor_item.cod_cotacao - , cotacao_fornecedor_item.cod_item - , cotacao_fornecedor_item.cgm_fornecedor - , cotacao_fornecedor_item.lote - , cotacao_fornecedor_item.cod_marca - , cotacao_fornecedor_item.timestamp - , cotacao_fornecedor_item.dt_validade - , cotacao_fornecedor_item.vl_cotacao - , CASE WHEN exists ( select cotacao_fornecedor_item_desclassificacao.cgm_fornecedor - from compras.cotacao_fornecedor_item_desclassificacao - where cotacao_fornecedor_item.cgm_fornecedor = cotacao_fornecedor_item_desclassificacao.cgm_fornecedor - and cotacao_fornecedor_item.cod_item = cotacao_fornecedor_item_desclassificacao.cod_item - and cotacao_fornecedor_item.cod_cotacao = cotacao_fornecedor_item_desclassificacao.cod_cotacao - and cotacao_fornecedor_item.exercicio = cotacao_fornecedor_item_desclassificacao.exercicio - and cotacao_fornecedor_item.lote = cotacao_fornecedor_item_desclassificacao.lote ) - THEN 'desclassificado' - ELSE 'classificado' - END AS status - from compras.cotacao_fornecedor_item " - . "Where compras.cotacao_fornecedor_item.exercicio = '" . $this->getDado('exercicio' ) . "' \n" - . " and compras.cotacao_fornecedor_item.cod_cotacao = " . $this->getDado('cod_cotacao' ) . " \n" - . " and compras.cotacao_fornecedor_item.cgm_fornecedor = " . $this->getDado('cgm_fornecedor' ) . " \n" - . " and compras.cotacao_fornecedor_item.lote = " . $this->getDado('lote' ) . " \n"; + function recuperaFornecedoresCotacao(&$rsRecordSet, $stFiltro = "", $stOrdem = "", $boTransacao = "") + { + $obErro = new Erro; + $obConexao = new Conexao; + $rsRecordSet = new RecordSet; + $stSql = $this->montaRecuperaFornecedoresCotacao().$stFiltro.$stOrdem; + $this->stDebug = $stSql; + $obErro = $obConexao->executaSQL( $rsRecordSet, $stSql, $boTransacao ); + + return $obErro; + } - return $stSql; + function montaRecuperaFornecedoresCotacao() + { + $stSql = " select distinct cotacao_fornecedor_item.cgm_fornecedor \n"; + $stSql .= " , sw_cgm.nom_cgm as fornecedor \n"; + $stSql .= " from compras.cotacao_fornecedor_item \n"; + $stSql .= " join sw_cgm \n"; + $stSql .= " on sw_cgm.numcgm = cotacao_fornecedor_item.cgm_fornecedor \n"; + $stSql .= " where cod_cotacao = " . $this->getDado( 'cod_cotacao' ) . " and exercicio = '" . $this->getDado( 'exercicio_cotacao' ) . "' \n"; + + return $stSql; + } -} + function recuperaItensFornecedorLote(&$rsRecordSet, $stFiltro = "", $stOrdem = "", $boTransacao = "") + { + $obErro = new Erro; + $obConexao = new Conexao; + $rsRecordSet = new RecordSet; + $stSql = $this->montaRecuperaItensFornecedorLote ().$stFiltro.$stOrdem; + $this->stDebug = $stSql; + $obErro = $obConexao->executaSQL( $rsRecordSet, $stSql, $boTransacao ); + + return $obErro; + } + + function montaRecuperaItensFornecedorLote() + { + $stSql = " + select cotacao_fornecedor_item.exercicio + , cotacao_fornecedor_item.cod_cotacao + , cotacao_fornecedor_item.cod_item + , cotacao_fornecedor_item.cgm_fornecedor + , cotacao_fornecedor_item.lote + , cotacao_fornecedor_item.cod_marca + , cotacao_fornecedor_item.timestamp + , cotacao_fornecedor_item.dt_validade + , cotacao_fornecedor_item.vl_cotacao + , CASE WHEN exists ( select cotacao_fornecedor_item_desclassificacao.cgm_fornecedor + from compras.cotacao_fornecedor_item_desclassificacao + where cotacao_fornecedor_item.cgm_fornecedor = cotacao_fornecedor_item_desclassificacao.cgm_fornecedor + and cotacao_fornecedor_item.cod_item = cotacao_fornecedor_item_desclassificacao.cod_item + and cotacao_fornecedor_item.cod_cotacao = cotacao_fornecedor_item_desclassificacao.cod_cotacao + and cotacao_fornecedor_item.exercicio = cotacao_fornecedor_item_desclassificacao.exercicio + and cotacao_fornecedor_item.lote = cotacao_fornecedor_item_desclassificacao.lote ) + THEN 'desclassificado' + ELSE 'classificado' + END AS status + from compras.cotacao_fornecedor_item " + . "Where compras.cotacao_fornecedor_item.exercicio = '" . $this->getDado('exercicio' ) . "' \n" + . " and compras.cotacao_fornecedor_item.cod_cotacao = " . $this->getDado('cod_cotacao' ) . " \n" + . " and compras.cotacao_fornecedor_item.cgm_fornecedor = " . $this->getDado('cgm_fornecedor' ) . " \n" + . " and compras.cotacao_fornecedor_item.lote = " . $this->getDado('lote' ) . " \n"; + + return $stSql; + + } public function recuperaCotacaoEsfinge(&$rsRecordSet, $stFiltro="", $stOrder="", $boTransacao="") { @@ -385,8 +371,8 @@ function montaRecuperaItensFornecedorLote() } -function recuperaItensCotacaoJulgados(&$rsRecordSet,$stFiltro='',$stOrder='',$boTransacao='') -{ + function recuperaItensCotacaoJulgados(&$rsRecordSet,$stFiltro='',$stOrder='',$boTransacao='') + { $stOrder = " GROUP BY catalogo_item.descricao_resumida , catalogo_item.descricao , cotacao_item.cod_item @@ -400,103 +386,268 @@ function recuperaItensCotacaoJulgados(&$rsRecordSet,$stFiltro='',$stOrder='',$bo ORDER BY cotacao_item.cod_item "; return $this->executaRecupera("montaRecuperaItensCotacaoJulgados",$rsRecordSet,$stFiltro,$stOrder,$boTransacao); -} + } -function montaRecuperaItensCotacaoJulgados() -{ - $stSql = " - SELECT catalogo_item.descricao_resumida - , catalogo_item.descricao as descricao_completa - , cotacao_item.cod_item - , cotacao_item.quantidade - , cotacao_item.lote - , cotacao_item.cod_cotacao - , mapa_cotacao.cod_mapa - , mapa_cotacao.exercicio_mapa as exercicio - , cotacao_fornecedor_item.vl_cotacao + function montaRecuperaItensCotacaoJulgados() + { + $stSql = " + SELECT catalogo_item.descricao_resumida + , catalogo_item.descricao as descricao_completa + , cotacao_item.cod_item + , cotacao_item.quantidade + , cotacao_item.lote + , cotacao_item.cod_cotacao + , mapa_cotacao.cod_mapa + , mapa_cotacao.exercicio_mapa as exercicio + , cotacao_fornecedor_item.vl_cotacao + + FROM compras.cotacao_item + + INNER JOIN ( + SELECT adjudicacao.num_adjudicacao + , adjudicacao.timestamp + , adjudicacao.cod_licitacao + , adjudicacao.cod_modalidade + , adjudicacao.cod_entidade + , adjudicacao.exercicio_licitacao + , adjudicacao.lote + , adjudicacao.cod_cotacao + , adjudicacao.cgm_fornecedor + , adjudicacao.cod_item + , adjudicacao.exercicio_cotacao + , adjudicacao.cod_documento + , adjudicacao.cod_tipo_documento + , adjudicacao.adjudicado + FROM licitacao.adjudicacao + + LEFT JOIN licitacao.adjudicacao_anulada + ON adjudicacao_anulada.num_adjudicacao = adjudicacao.num_adjudicacao + AND adjudicacao_anulada.cod_entidade = adjudicacao.cod_entidade + AND adjudicacao_anulada.cod_modalidade = adjudicacao.cod_modalidade + AND adjudicacao_anulada.cod_licitacao = adjudicacao.cod_licitacao + AND adjudicacao_anulada.exercicio_licitacao = adjudicacao.exercicio_licitacao + AND adjudicacao_anulada.cod_item = adjudicacao.cod_item + AND adjudicacao_anulada.cgm_fornecedor = adjudicacao.cgm_fornecedor + AND adjudicacao_anulada.cod_cotacao = adjudicacao.cod_cotacao + AND adjudicacao_anulada.lote = adjudicacao.lote + AND adjudicacao_anulada.exercicio_cotacao = adjudicacao.exercicio_cotacao + + WHERE adjudicacao_anulada.num_adjudicacao IS NULL + ) AS adjudicacao + ON cotacao_item.exercicio = adjudicacao.exercicio_cotacao + AND cotacao_item.cod_cotacao = adjudicacao.cod_cotacao + AND cotacao_item.lote = adjudicacao.lote + AND cotacao_item.cod_item = adjudicacao.cod_item + + JOIN almoxarifado.catalogo_item + ON cotacao_item.cod_item = catalogo_item.cod_item + + JOIN compras.cotacao_fornecedor_item + ON cotacao_fornecedor_item.exercicio = cotacao_item.exercicio + AND cotacao_fornecedor_item.cod_cotacao = cotacao_item.cod_cotacao + AND cotacao_fornecedor_item.cod_item = cotacao_item.cod_item + AND cotacao_fornecedor_item.lote = cotacao_item.lote + + JOIN compras.mapa_cotacao + ON cotacao_item.cod_cotacao = mapa_cotacao.cod_cotacao + AND cotacao_item.exercicio = mapa_cotacao .exercicio_cotacao + + JOIN compras.julgamento_item + ON cotacao_fornecedor_item.exercicio = julgamento_item.exercicio + AND cotacao_fornecedor_item.cod_cotacao = julgamento_item.cod_cotacao + AND cotacao_fornecedor_item.cod_item = julgamento_item.cod_item + AND cotacao_fornecedor_item.cgm_fornecedor = julgamento_item.cgm_fornecedor + AND cotacao_fornecedor_item.lote = julgamento_item.lote + + JOIN compras.mapa + ON mapa_cotacao.cod_mapa = mapa.cod_mapa + AND mapa_cotacao.exercicio_mapa = mapa.exercicio + + JOIN compras.mapa_item + ON mapa_item.exercicio = mapa.exercicio + AND mapa_item.cod_mapa = mapa.cod_mapa + AND mapa_item.cod_item = cotacao_fornecedor_item.cod_item + AND mapa_item.lote = cotacao_fornecedor_item.lote + + JOIN compras.mapa_solicitacao + ON mapa_solicitacao.exercicio = mapa_item.exercicio + AND mapa_solicitacao.cod_entidade = mapa_item.cod_entidade + AND mapa_solicitacao.cod_solicitacao = mapa_item.cod_solicitacao + AND mapa_solicitacao.cod_mapa = mapa_item.cod_mapa + AND mapa_solicitacao.exercicio_solicitacao = mapa_item.exercicio_solicitacao + "; + + return $stSql; + } - FROM compras.cotacao_item - - INNER JOIN ( - SELECT adjudicacao.num_adjudicacao - , adjudicacao.timestamp - , adjudicacao.cod_licitacao - , adjudicacao.cod_modalidade - , adjudicacao.cod_entidade - , adjudicacao.exercicio_licitacao - , adjudicacao.lote - , adjudicacao.cod_cotacao - , adjudicacao.cgm_fornecedor - , adjudicacao.cod_item - , adjudicacao.exercicio_cotacao - , adjudicacao.cod_documento - , adjudicacao.cod_tipo_documento - , adjudicacao.adjudicado - FROM licitacao.adjudicacao - - LEFT JOIN licitacao.adjudicacao_anulada - ON adjudicacao_anulada.num_adjudicacao = adjudicacao.num_adjudicacao - AND adjudicacao_anulada.cod_entidade = adjudicacao.cod_entidade - AND adjudicacao_anulada.cod_modalidade = adjudicacao.cod_modalidade - AND adjudicacao_anulada.cod_licitacao = adjudicacao.cod_licitacao - AND adjudicacao_anulada.exercicio_licitacao = adjudicacao.exercicio_licitacao - AND adjudicacao_anulada.cod_item = adjudicacao.cod_item - AND adjudicacao_anulada.cgm_fornecedor = adjudicacao.cgm_fornecedor - AND adjudicacao_anulada.cod_cotacao = adjudicacao.cod_cotacao - AND adjudicacao_anulada.lote = adjudicacao.lote - AND adjudicacao_anulada.exercicio_cotacao = adjudicacao.exercicio_cotacao - - WHERE adjudicacao_anulada.num_adjudicacao IS NULL - - ) AS adjudicacao - ON cotacao_item.exercicio = adjudicacao.exercicio_cotacao - AND cotacao_item.cod_cotacao = adjudicacao.cod_cotacao - AND cotacao_item.lote = adjudicacao.lote - AND cotacao_item.cod_item = adjudicacao.cod_item - - JOIN almoxarifado.catalogo_item - ON cotacao_item.cod_item = catalogo_item.cod_item - - JOIN compras.cotacao_fornecedor_item - ON cotacao_fornecedor_item.exercicio = cotacao_item.exercicio - AND cotacao_fornecedor_item.cod_cotacao = cotacao_item.cod_cotacao - AND cotacao_fornecedor_item.cod_item = cotacao_item.cod_item - AND cotacao_fornecedor_item.lote = cotacao_item.lote - - JOIN compras.mapa_cotacao - ON cotacao_item.cod_cotacao = mapa_cotacao.cod_cotacao - AND cotacao_item.exercicio = mapa_cotacao .exercicio_cotacao - - JOIN compras.julgamento_item - ON cotacao_fornecedor_item.exercicio = julgamento_item.exercicio - AND cotacao_fornecedor_item.cod_cotacao = julgamento_item.cod_cotacao - AND cotacao_fornecedor_item.cod_item = julgamento_item.cod_item - AND cotacao_fornecedor_item.cgm_fornecedor = julgamento_item.cgm_fornecedor - AND cotacao_fornecedor_item.lote = julgamento_item.lote - - JOIN compras.mapa - ON mapa_cotacao.cod_mapa = mapa.cod_mapa - AND mapa_cotacao.exercicio_mapa = mapa.exercicio - - JOIN compras.mapa_item - ON mapa_item.exercicio = mapa.exercicio - AND mapa_item.cod_mapa = mapa.cod_mapa - AND mapa_item.cod_item = cotacao_fornecedor_item.cod_item - AND mapa_item.lote = cotacao_fornecedor_item.lote - - JOIN compras.mapa_solicitacao - ON mapa_solicitacao.exercicio = mapa_item.exercicio - AND mapa_solicitacao.cod_entidade = mapa_item.cod_entidade - AND mapa_solicitacao.cod_solicitacao = mapa_item.cod_solicitacao - AND mapa_solicitacao.cod_mapa = mapa_item.cod_mapa - AND mapa_solicitacao.exercicio_solicitacao = mapa_item.exercicio_solicitacao - "; + function recuperaItensCotacaoJulgadosAutorizacaoParcial(&$rsRecordSet,$stFiltro='',$stOrder='',$boTransacao='') + { + $obErro = new Erro; + $obConexao = new Conexao; + $rsRecordSet = new RecordSet; + + $stGroupBy = " GROUP BY catalogo_item.descricao_resumida + , catalogo_item.descricao + , cotacao_item.cod_item + , cotacao_item.quantidade + , cotacao_item.lote + , cotacao_item.cod_cotacao + , mapa_cotacao.cod_mapa + , mapa_cotacao.exercicio_mapa + , cotacao_fornecedor_item.vl_cotacao + , julgamento_item.cgm_fornecedor + , sw_cgm.nom_cgm + , julgamento_item.ordem + HAVING coalesce(cotacao_item.quantidade, 0.00) - sum(coalesce(item_pre_empenho.quantidade, 0.00)) > 0 "; + if($stOrdem=='') + $stOrder = " ORDER BY cotacao_item.cod_item "; + + $stSql = $this->montaRecuperaItensCotacaoJulgadosAutorizacaoParcial().$stFiltro.$stGroupBy.$stOrdem; + $this->stDebug = $stSql; + $obErro = $obConexao->executaSQL( $rsRecordSet, $stSql, $boTransacao ); + + return $obErro; + } - return $stSql; -} + function montaRecuperaItensCotacaoJulgadosAutorizacaoParcial() + { + $stSql = " + SELECT catalogo_item.descricao_resumida + , catalogo_item.descricao as descricao_completa + , cotacao_item.cod_item + , cotacao_item.quantidade + , cotacao_item.lote + , cotacao_item.cod_cotacao + , mapa_cotacao.cod_mapa + , mapa_cotacao.exercicio_mapa as exercicio + , cotacao_fornecedor_item.vl_cotacao + , ((coalesce(cotacao_item.quantidade, 0.00) - sum(coalesce(item_pre_empenho.quantidade, 0.00))) + * + (cotacao_fornecedor_item.vl_cotacao / coalesce(cotacao_item.quantidade, 0.00)))::numeric(14,2) as vl_cotacao_saldo + , coalesce(cotacao_item.quantidade, 0.00) - sum(coalesce(item_pre_empenho.quantidade, 0.00)) as quantidade_saldo + , julgamento_item.cgm_fornecedor + , sw_cgm.nom_cgm AS fornecedor + , julgamento_item.ordem + + FROM compras.cotacao_item + + INNER JOIN ( + SELECT adjudicacao.num_adjudicacao + , adjudicacao.timestamp + , adjudicacao.cod_licitacao + , adjudicacao.cod_modalidade + , adjudicacao.cod_entidade + , adjudicacao.exercicio_licitacao + , adjudicacao.lote + , adjudicacao.cod_cotacao + , adjudicacao.cgm_fornecedor + , adjudicacao.cod_item + , adjudicacao.exercicio_cotacao + , adjudicacao.cod_documento + , adjudicacao.cod_tipo_documento + , adjudicacao.adjudicado + FROM licitacao.adjudicacao + LEFT JOIN licitacao.adjudicacao_anulada + ON adjudicacao_anulada.num_adjudicacao = adjudicacao.num_adjudicacao + AND adjudicacao_anulada.cod_entidade = adjudicacao.cod_entidade + AND adjudicacao_anulada.cod_modalidade = adjudicacao.cod_modalidade + AND adjudicacao_anulada.cod_licitacao = adjudicacao.cod_licitacao + AND adjudicacao_anulada.exercicio_licitacao = adjudicacao.exercicio_licitacao + AND adjudicacao_anulada.cod_item = adjudicacao.cod_item + AND adjudicacao_anulada.cgm_fornecedor = adjudicacao.cgm_fornecedor + AND adjudicacao_anulada.cod_cotacao = adjudicacao.cod_cotacao + AND adjudicacao_anulada.lote = adjudicacao.lote + AND adjudicacao_anulada.exercicio_cotacao = adjudicacao.exercicio_cotacao + INNER JOIN licitacao.homologacao + ON adjudicacao.num_adjudicacao = homologacao.num_adjudicacao + AND adjudicacao.cod_entidade = homologacao.cod_entidade + AND adjudicacao.cod_modalidade = homologacao.cod_modalidade + AND adjudicacao.cod_licitacao = homologacao.cod_licitacao + AND adjudicacao.exercicio_licitacao = homologacao.exercicio_licitacao + AND adjudicacao.cod_item = homologacao.cod_item + AND adjudicacao.cod_cotacao = homologacao.cod_cotacao + AND adjudicacao.lote = homologacao.lote + AND adjudicacao.exercicio_cotacao = homologacao.exercicio_cotacao + AND adjudicacao.cgm_fornecedor = homologacao.cgm_fornecedor + LEFT JOIN licitacao.homologacao_anulada + ON homologacao_anulada.num_homologacao = homologacao.num_homologacao + AND homologacao_anulada.cod_licitacao = homologacao.cod_licitacao + AND homologacao_anulada.cod_modalidade = homologacao.cod_modalidade + AND homologacao_anulada.cod_entidade = homologacao.cod_entidade + AND homologacao_anulada.num_adjudicacao = homologacao.num_adjudicacao + AND homologacao_anulada.exercicio_licitacao = homologacao.exercicio_licitacao + AND homologacao_anulada.lote = homologacao.lote + AND homologacao_anulada.cod_cotacao = homologacao.cod_cotacao + AND homologacao_anulada.cod_item = homologacao.cod_item + AND homologacao_anulada.exercicio_cotacao = homologacao.exercicio_cotacao + AND homologacao_anulada.cgm_fornecedor = homologacao.cgm_fornecedor + WHERE adjudicacao_anulada.num_adjudicacao IS NULL + AND homologacao_anulada.num_homologacao IS NULL + ) AS adjudicacao + ON cotacao_item.exercicio = adjudicacao.exercicio_cotacao + AND cotacao_item.cod_cotacao = adjudicacao.cod_cotacao + AND cotacao_item.lote = adjudicacao.lote + AND cotacao_item.cod_item = adjudicacao.cod_item + + INNER JOIN almoxarifado.catalogo_item + ON cotacao_item.cod_item = catalogo_item.cod_item + + INNER JOIN compras.cotacao_fornecedor_item + ON cotacao_fornecedor_item.exercicio = cotacao_item.exercicio + AND cotacao_fornecedor_item.cod_cotacao = cotacao_item.cod_cotacao + AND cotacao_fornecedor_item.cod_item = cotacao_item.cod_item + AND cotacao_fornecedor_item.lote = cotacao_item.lote + AND cotacao_fornecedor_item.cgm_fornecedor = adjudicacao.cgm_fornecedor + + INNER JOIN compras.mapa_cotacao + ON cotacao_item.cod_cotacao = mapa_cotacao.cod_cotacao + AND cotacao_item.exercicio = mapa_cotacao .exercicio_cotacao + + INNER JOIN compras.julgamento_item + ON cotacao_fornecedor_item.exercicio = julgamento_item.exercicio + AND cotacao_fornecedor_item.cod_cotacao = julgamento_item.cod_cotacao + AND cotacao_fornecedor_item.cod_item = julgamento_item.cod_item + AND cotacao_fornecedor_item.cgm_fornecedor = julgamento_item.cgm_fornecedor + AND cotacao_fornecedor_item.lote = julgamento_item.lote + + INNER JOIN compras.mapa + ON mapa_cotacao.cod_mapa = mapa.cod_mapa + AND mapa_cotacao.exercicio_mapa = mapa.exercicio + + INNER JOIN compras.mapa_item + ON mapa_item.exercicio = mapa.exercicio + AND mapa_item.cod_mapa = mapa.cod_mapa + AND mapa_item.cod_item = cotacao_fornecedor_item.cod_item + AND mapa_item.lote = cotacao_fornecedor_item.lote + + INNER JOIN compras.mapa_solicitacao + ON mapa_solicitacao.exercicio = mapa_item.exercicio + AND mapa_solicitacao.cod_entidade = mapa_item.cod_entidade + AND mapa_solicitacao.cod_solicitacao = mapa_item.cod_solicitacao + AND mapa_solicitacao.cod_mapa = mapa_item.cod_mapa + AND mapa_solicitacao.exercicio_solicitacao = mapa_item.exercicio_solicitacao + + LEFT JOIN empenho.item_pre_empenho_julgamento + ON item_pre_empenho_julgamento.exercicio_julgamento = adjudicacao.exercicio_cotacao + AND item_pre_empenho_julgamento.cod_cotacao = adjudicacao.cod_cotacao + AND item_pre_empenho_julgamento.cod_item = adjudicacao.cod_item + AND item_pre_empenho_julgamento.lote = adjudicacao.lote + AND item_pre_empenho_julgamento.cgm_fornecedor = adjudicacao.cgm_fornecedor + + LEFT JOIN empenho.item_pre_empenho + ON item_pre_empenho.cod_pre_empenho = item_pre_empenho_julgamento.cod_pre_empenho + AND item_pre_empenho.exercicio = item_pre_empenho_julgamento.exercicio + AND item_pre_empenho.num_item = item_pre_empenho_julgamento.num_item + + INNER JOIN sw_cgm + ON sw_cgm.numcgm = julgamento_item.cgm_fornecedor + "; + + return $stSql; + } -function recuperaItensCotacaoJulgadosCompraDireta(&$rsRecordSet,$stFiltro='',$stOrder='',$boTransacao='') -{ + function recuperaItensCotacaoJulgadosCompraDireta(&$rsRecordSet,$stFiltro='',$stOrder='',$boTransacao='') + { $stOrder = " GROUP BY catalogo_item.descricao_resumida , catalogo_item.descricao , cotacao_item.cod_item @@ -510,66 +661,66 @@ function recuperaItensCotacaoJulgadosCompraDireta(&$rsRecordSet,$stFiltro='',$st ORDER BY cotacao_item.cod_item "; return $this->executaRecupera("montaRecuperaItensCotacaoJulgadosCompraDireta",$rsRecordSet,$stFiltro,$stOrder,$boTransacao); -} - -function montaRecuperaItensCotacaoJulgadosCompraDireta() -{ - $stSql = " - SELECT catalogo_item.descricao_resumida - , catalogo_item.descricao as descricao_completa - , cotacao_item.cod_item - , cotacao_item.quantidade - , cotacao_item.lote - , cotacao_item.cod_cotacao - , mapa_cotacao.cod_mapa - , mapa_cotacao.exercicio_mapa as exercicio - , cotacao_fornecedor_item.vl_cotacao - - FROM compras.cotacao_item - - INNER JOIN almoxarifado.catalogo_item - ON cotacao_item.cod_item = catalogo_item.cod_item - - INNER JOIN compras.cotacao_fornecedor_item - ON cotacao_fornecedor_item.exercicio = cotacao_item.exercicio - AND cotacao_fornecedor_item.cod_cotacao = cotacao_item.cod_cotacao - AND cotacao_fornecedor_item.cod_item = cotacao_item.cod_item - AND cotacao_fornecedor_item.lote = cotacao_item.lote - - INNER JOIN compras.mapa_cotacao - ON cotacao_item.cod_cotacao = mapa_cotacao.cod_cotacao - AND cotacao_item.exercicio = mapa_cotacao .exercicio_cotacao - - INNER JOIN compras.julgamento_item - ON cotacao_fornecedor_item.exercicio = julgamento_item.exercicio - AND cotacao_fornecedor_item.cod_cotacao = julgamento_item.cod_cotacao - AND cotacao_fornecedor_item.cod_item = julgamento_item.cod_item - AND cotacao_fornecedor_item.cgm_fornecedor = julgamento_item.cgm_fornecedor - AND cotacao_fornecedor_item.lote = julgamento_item.lote - - INNER JOIN compras.mapa - ON mapa_cotacao.cod_mapa = mapa.cod_mapa - AND mapa_cotacao.exercicio_mapa = mapa.exercicio - - INNER JOIN compras.mapa_item - ON mapa_item.exercicio = mapa.exercicio - AND mapa_item.cod_mapa = mapa.cod_mapa - AND mapa_item.cod_item = cotacao_fornecedor_item.cod_item - AND mapa_item.lote = cotacao_fornecedor_item.lote - - INNER JOIN compras.mapa_solicitacao - ON mapa_solicitacao.exercicio = mapa_item.exercicio - AND mapa_solicitacao.cod_entidade = mapa_item.cod_entidade - AND mapa_solicitacao.cod_solicitacao = mapa_item.cod_solicitacao - AND mapa_solicitacao.cod_mapa = mapa_item.cod_mapa - AND mapa_solicitacao.exercicio_solicitacao = mapa_item.exercicio_solicitacao - "; + } - return $stSql; -} + function montaRecuperaItensCotacaoJulgadosCompraDireta() + { + $stSql = " + SELECT catalogo_item.descricao_resumida + , catalogo_item.descricao as descricao_completa + , cotacao_item.cod_item + , cotacao_item.quantidade + , cotacao_item.lote + , cotacao_item.cod_cotacao + , mapa_cotacao.cod_mapa + , mapa_cotacao.exercicio_mapa as exercicio + , cotacao_fornecedor_item.vl_cotacao + + FROM compras.cotacao_item + + INNER JOIN almoxarifado.catalogo_item + ON cotacao_item.cod_item = catalogo_item.cod_item + + INNER JOIN compras.cotacao_fornecedor_item + ON cotacao_fornecedor_item.exercicio = cotacao_item.exercicio + AND cotacao_fornecedor_item.cod_cotacao = cotacao_item.cod_cotacao + AND cotacao_fornecedor_item.cod_item = cotacao_item.cod_item + AND cotacao_fornecedor_item.lote = cotacao_item.lote + + INNER JOIN compras.mapa_cotacao + ON cotacao_item.cod_cotacao = mapa_cotacao.cod_cotacao + AND cotacao_item.exercicio = mapa_cotacao .exercicio_cotacao + + INNER JOIN compras.julgamento_item + ON cotacao_fornecedor_item.exercicio = julgamento_item.exercicio + AND cotacao_fornecedor_item.cod_cotacao = julgamento_item.cod_cotacao + AND cotacao_fornecedor_item.cod_item = julgamento_item.cod_item + AND cotacao_fornecedor_item.cgm_fornecedor = julgamento_item.cgm_fornecedor + AND cotacao_fornecedor_item.lote = julgamento_item.lote + + INNER JOIN compras.mapa + ON mapa_cotacao.cod_mapa = mapa.cod_mapa + AND mapa_cotacao.exercicio_mapa = mapa.exercicio + + INNER JOIN compras.mapa_item + ON mapa_item.exercicio = mapa.exercicio + AND mapa_item.cod_mapa = mapa.cod_mapa + AND mapa_item.cod_item = cotacao_fornecedor_item.cod_item + AND mapa_item.lote = cotacao_fornecedor_item.lote + + INNER JOIN compras.mapa_solicitacao + ON mapa_solicitacao.exercicio = mapa_item.exercicio + AND mapa_solicitacao.cod_entidade = mapa_item.cod_entidade + AND mapa_solicitacao.cod_solicitacao = mapa_item.cod_solicitacao + AND mapa_solicitacao.cod_mapa = mapa_item.cod_mapa + AND mapa_solicitacao.exercicio_solicitacao = mapa_item.exercicio_solicitacao + "; + + return $stSql; + } -function recuperaTotaisLoteFornecedor(&$rsRecordSet,$stFiltro='',$stOrder='',$boTransacao='') -{ + function recuperaTotaisLoteFornecedor(&$rsRecordSet,$stFiltro='',$stOrder='',$boTransacao='') + { $stOrder = "group by cotacao_fornecedor_item.exercicio , cotacao_fornecedor_item.cod_cotacao , cotacao_fornecedor_item.lote @@ -577,100 +728,95 @@ function recuperaTotaisLoteFornecedor(&$rsRecordSet,$stFiltro='',$stOrder='',$bo order by vl_total"; return $this->executaRecupera( "montaRecuperaTotaisLoteFornecedor",$rsRecordSet,$stFiltro,$stOrder,$boTransacao); + } -} - -function montaRecuperaTotaisLoteFornecedor() -{ - $stSql = "select cotacao_fornecedor_item.exercicio - , cotacao_fornecedor_item.cod_cotacao - , cotacao_fornecedor_item.lote - , cotacao_fornecedor_item.cgm_fornecedor - , sum ( cotacao_fornecedor_item.vl_cotacao ) as vl_total - from compras.cotacao_fornecedor_item "; - - return $stSql; -} - -function recuperaUltimosItens(&$rsRecordSet, $stFiltro = "", $stOrdem = "", $boTransacao = "") -{ - $obErro = new Erro; - $obConexao = new Conexao; - $rsRecordSet = new RecordSet; - $stSql = $this->montaRecuperaUltimosItens().$stFiltro.$stOrdem; - $this->stDebug = $stSql; - $obErro = $obConexao->executaSQL( $rsRecordSet, $stSql, $boTransacao ); - - return $obErro; - -} + function montaRecuperaTotaisLoteFornecedor() + { + $stSql = "select cotacao_fornecedor_item.exercicio + , cotacao_fornecedor_item.cod_cotacao + , cotacao_fornecedor_item.lote + , cotacao_fornecedor_item.cgm_fornecedor + , sum ( cotacao_fornecedor_item.vl_cotacao ) as vl_total + from compras.cotacao_fornecedor_item "; + + return $stSql; + } -function montaRecuperaUltimosItens() -{ - $stSql = "SELECT * FROM compras.cotacao_fornecedor_item - WHERE 1=1"; + function recuperaUltimosItens(&$rsRecordSet, $stFiltro = "", $stOrdem = "", $boTransacao = "") + { + $obErro = new Erro; + $obConexao = new Conexao; + $rsRecordSet = new RecordSet; + $stSql = $this->montaRecuperaUltimosItens().$stFiltro.$stOrdem; + $this->stDebug = $stSql; + $obErro = $obConexao->executaSQL( $rsRecordSet, $stSql, $boTransacao ); + + return $obErro; + } - return $stSql; + function montaRecuperaUltimosItens() + { + $stSql = "SELECT * FROM compras.cotacao_fornecedor_item + WHERE 1=1"; -} + return $stSql; + } -function recuperaCotacaoFornecedorItem(&$rsRecordSet, $stFiltro = "", $stOrdem = "", $boTransacao = "") -{ - $obErro = new Erro; - $obConexao = new Conexao; - $rsRecordSet = new RecordSet; - $stSql = $this->montaRecuperaCotacaoFornecedorItem().$stFiltro.$stOrdem; - $this->stDebug = $stSql; - $obErro = $obConexao->executaSQL( $rsRecordSet, $stSql, $boTransacao ); + function recuperaCotacaoFornecedorItem(&$rsRecordSet, $stFiltro = "", $stOrdem = "", $boTransacao = "") + { + $obErro = new Erro; + $obConexao = new Conexao; + $rsRecordSet = new RecordSet; + $stSql = $this->montaRecuperaCotacaoFornecedorItem().$stFiltro.$stOrdem; + $this->stDebug = $stSql; + $obErro = $obConexao->executaSQL( $rsRecordSet, $stSql, $boTransacao ); + + return $obErro; + } - return $obErro; + function montaRecuperaCotacaoFornecedorItem() + { + $stSql = ' SELECT * + FROM almoxarifado.catalogo_item_marca + INNER JOIN compras.cotacao_fornecedor_item + ON catalogo_item_marca.cod_item = cotacao_fornecedor_item.cod_item + AND catalogo_item_marca.cod_marca = cotacao_fornecedor_item.cod_marca + WHERE catalogo_item_marca.cod_item = '.$this->getDado('cod_item'); + + return $stSql; + } -} + //inclusão para ser usada no OC onde não deve demonstrar debug + function inclusaoNoDebug($boTransacao = '') + { + $obErro = new Erro; + $obConexao = new Transacao;//Conexao; + //$this->setAuditoria( new TAuditoria() ); + + if ( !$obErro->ocorreu() ) { + $stSql = $this->montaInclusao( $boTransacao, $arBlob, $obConexao ); + // $this->setDebug( 'inclusao' ); + if ($arBlob["qtd_blob"]) { + $boTranFalse = false; + if ( !Sessao::getTrataExcecao() && !$boTransacao) { + $boTransacao = true; + $boTranFalse = true; + } -function montaRecuperaCotacaoFornecedorItem() -{ - $stSql = ' SELECT * - FROM almoxarifado.catalogo_item_marca -INNER JOIN compras.cotacao_fornecedor_item - ON catalogo_item_marca.cod_item = cotacao_fornecedor_item.cod_item - AND catalogo_item_marca.cod_marca = cotacao_fornecedor_item.cod_marca - WHERE catalogo_item_marca.cod_item = '.$this->getDado('cod_item'); - - return $stSql; -} + $obErro = $obConexao->__executaDML( $stSql, $boTransacao ); + if ( !$obErro->ocorreu() ) { + for ($inX=0; $inX<$arBlob["qtd_blob"]; $inX++) { + $obConexao->gravaBlob( $arBlob["blob_oid"][$inX], $arBlob["blob"][$inX] ); + } -//inclusão para ser usada no OC onde não deve demonstrar debug -function inclusaoNoDebug($boTransacao = '') -{ - $obErro = new Erro; - $obConexao = new Transacao;//Conexao; - //$this->setAuditoria( new TAuditoria() ); - - if ( !$obErro->ocorreu() ) { - $stSql = $this->montaInclusao( $boTransacao, $arBlob, $obConexao ); - // $this->setDebug( 'inclusao' ); - if ($arBlob["qtd_blob"]) { - $boTranFalse = false; - if ( !Sessao::getTrataExcecao() && !$boTransacao) { - $boTransacao = true; - $boTranFalse = true; - } - - $obErro = $obConexao->__executaDML( $stSql, $boTransacao ); - if ( !$obErro->ocorreu() ) { - for ($inX=0; $inX<$arBlob["qtd_blob"]; $inX++) { - $obConexao->gravaBlob( $arBlob["blob_oid"][$inX], $arBlob["blob"][$inX] ); + if ($boTranFalse) { + $obConexao->fechaTransacao( $boTranFalse, $boTransacao, $obErro ); + } } + }else + $obErro = $obConexao->__executaDML( $stSql, $boTransacao ); + } - if ($boTranFalse) { - $obConexao->fechaTransacao( $boTranFalse, $boTransacao, $obErro ); - } - } - }else - $obErro = $obConexao->__executaDML( $stSql, $boTransacao ); + return $obErro; } - - return $obErro; -} - } diff --git a/gestaoPatrimonial/fontes/PHP/compras/classes/mapeamento/TComprasCotacaoItem.class.php b/gestaoPatrimonial/fontes/PHP/compras/classes/mapeamento/TComprasCotacaoItem.class.php index ba0851b..d4c8679 100644 --- a/gestaoPatrimonial/fontes/PHP/compras/classes/mapeamento/TComprasCotacaoItem.class.php +++ b/gestaoPatrimonial/fontes/PHP/compras/classes/mapeamento/TComprasCotacaoItem.class.php @@ -36,7 +36,7 @@ * Casos de uso: uc-03.05.25 uc-03.05.26 - $Id: TComprasCotacaoItem.class.php 59612 2014-09-02 12:00:51Z gelson $ + $Id: TComprasCotacaoItem.class.php 63865 2015-10-27 13:55:57Z franver $ */ include_once '../../../../../../gestaoAdministrativa/fontes/PHP/framework/include/valida.inc.php'; @@ -66,11 +66,11 @@ function TComprasCotacaoItem() $this->setCampoCod(''); $this->setComplementoChave('exercicio,cod_cotacao,cod_item'); - $this->AddCampo('exercicio','CHAR',true,'4',true,'TComprasCotacao'); - $this->AddCampo('cod_cotacao','INTEGER',true,'',true,'TComprasCotacao'); - $this->AddCampo('lote','INTEGER',true,'',true,false); - $this->AddCampo('cod_item','INTEGER',true,'',true,'TAlmoxarifadoCatalogoItem'); - $this->AddCampo('quantidade','NUMERIC',true,'14.2',false,false); + $this->AddCampo('exercicio' , 'CHAR', true, '4', true, 'TComprasCotacao'); + $this->AddCampo('cod_cotacao','INTEGER', true, '', true, 'TComprasCotacao'); + $this->AddCampo('lote' ,'INTEGER', true, '', true, false); + $this->AddCampo('cod_item' ,'INTEGER', true, '', true, 'TAlmoxarifadoCatalogoItem'); + $this->AddCampo('quantidade' ,'NUMERIC', true,'14,4',false, false); } diff --git a/gestaoPatrimonial/fontes/PHP/compras/classes/mapeamento/TComprasMapaItem.class.php b/gestaoPatrimonial/fontes/PHP/compras/classes/mapeamento/TComprasMapaItem.class.php index 52e12f0..38ef97a 100644 --- a/gestaoPatrimonial/fontes/PHP/compras/classes/mapeamento/TComprasMapaItem.class.php +++ b/gestaoPatrimonial/fontes/PHP/compras/classes/mapeamento/TComprasMapaItem.class.php @@ -36,7 +36,7 @@ * Casos de uso: uc-03.04.05 uc-03.05.26 - $Id: TComprasMapaItem.class.php 63032 2015-07-17 18:04:12Z michel $ + $Id: TComprasMapaItem.class.php 63865 2015-10-27 13:55:57Z franver $ */ @@ -191,8 +191,8 @@ class TComprasMapaItem extends Persistente , '' as data_validade , '' as cod_marca , '' as desc_marca - , translate(to_char(mapa_itens.quantidade - coalesce ( mapa_item_anulacao.quantidade, 0 ),'999,999.9999'),'.,',',.') as quantidade - , mapa_itens.vl_total - coalesce ( mapa_item_anulacao.vl_total , 0 ) as vl_total + , mapa_itens.quantidade - coalesce ( mapa_item_anulacao.quantidade, 0.0000 ) as quantidade + , mapa_itens.vl_total - coalesce ( mapa_item_anulacao.vl_total , 0.00 ) as vl_total from ( select mapa.cod_mapa @@ -201,8 +201,8 @@ class TComprasMapaItem extends Persistente , mapa_item.lote , catalogo_item.descricao_resumida , catalogo_item.descricao - , sum(mapa_item.quantidade) as quantidade - , sum(mapa_item.vl_total) as vl_total + , sum( coalesce( mapa_item.quantidade, 0.0000) ) as quantidade + , sum( coalesce( mapa_item.vl_total, 0.00) )as vl_total from compras.mapa @@ -777,17 +777,12 @@ class TComprasMapaItem extends Persistente , complemento , cod_centro , centro_custo - - , CASE WHEN vl_total IS NOT NULL THEN vl_total ELSE vl_total_item END as vl_total - , valor_unitario , valor_anulado - , COALESCE(valor_unitario, 0.00) * (COALESCE(quantidade_mapa, 0.0000) - COALESCE(quantidade_mapa_anulada, 0.0000)) as valor_total_mapa - , quantidade , quantidade_anulada , quantidade_estoque @@ -798,12 +793,9 @@ class TComprasMapaItem extends Persistente , ((quantidade - quantidade_anulada) - (quantidade_mapa - quantidade_mapa_anulada)) as quantidade_disponivel , (quantidade_mapa - quantidade_mapa_anulada) as quantidade_maxima , (quantidade - quantidade_anulada) as quantidade_solicitada - --, (quantidade_mapa - quantidade_mapa_anulada) as quantidade_atendida --, ((quantidade - quantidade_anulada) - (quantidade_mapa - quantidade_mapa_anulada)) as quantidade_mapa - , vl_total_mapa_item - , dotacao , dotacao_nom_conta , conta_despesa @@ -1119,29 +1111,31 @@ class TComprasMapaItem extends Persistente AND mapa_item.cod_mapa = mapa_solicitacao.cod_mapa AND mapa_item.exercicio_solicitacao = mapa_solicitacao.exercicio_solicitacao - LEFT JOIN compras.mapa_item_dotacao - ON mapa_item_dotacao.exercicio = mapa_item.exercicio - AND mapa_item_dotacao.cod_mapa = mapa_item.cod_mapa - AND mapa_item_dotacao.exercicio_solicitacao = mapa_item.exercicio_solicitacao - AND mapa_item_dotacao.cod_entidade = mapa_item.cod_entidade - AND mapa_item_dotacao.cod_solicitacao = mapa_item.cod_solicitacao - AND mapa_item_dotacao.cod_centro = mapa_item.cod_centro - AND mapa_item_dotacao.cod_item = mapa_item.cod_item - AND mapa_item_dotacao.lote = mapa_item.lote - - INNER JOIN compras.solicitacao_item - ON solicitacao_item.exercicio = mapa_item.exercicio - AND solicitacao_item.cod_entidade = mapa_item.cod_entidade - AND solicitacao_item.cod_solicitacao = mapa_item.cod_solicitacao - AND solicitacao_item.cod_centro = mapa_item.cod_centro - AND solicitacao_item.cod_item = mapa_item.cod_item - - LEFT JOIN compras.solicitacao_item_dotacao - ON solicitacao_item_dotacao.exercicio = solicitacao_item.exercicio - AND solicitacao_item_dotacao.cod_entidade = solicitacao_item.cod_entidade - AND solicitacao_item_dotacao.cod_solicitacao = solicitacao_item.cod_solicitacao - AND solicitacao_item_dotacao.cod_centro = solicitacao_item.cod_centro - AND solicitacao_item_dotacao.cod_item = solicitacao_item.cod_item + LEFT JOIN compras.mapa_item_dotacao + ON mapa_item.exercicio = mapa_item_dotacao.exercicio + AND mapa_item.cod_mapa = mapa_item_dotacao.cod_mapa + AND mapa_item.exercicio_solicitacao = mapa_item_dotacao.exercicio_solicitacao + AND mapa_item.cod_entidade = mapa_item_dotacao.cod_entidade + AND mapa_item.cod_solicitacao = mapa_item_dotacao.cod_solicitacao + AND mapa_item.cod_centro = mapa_item_dotacao.cod_centro + AND mapa_item.cod_item = mapa_item_dotacao.cod_item + AND mapa_item.lote = mapa_item_dotacao.lote + + INNER JOIN compras.solicitacao_item + ON solicitacao_item.exercicio = mapa_item.exercicio + AND solicitacao_item.cod_entidade = mapa_item.cod_entidade + AND solicitacao_item.cod_solicitacao = mapa_item.cod_solicitacao + AND solicitacao_item.cod_centro = mapa_item.cod_centro + AND solicitacao_item.cod_item = mapa_item.cod_item + + LEFT JOIN compras.solicitacao_item_dotacao + ON solicitacao_item.exercicio = solicitacao_item_dotacao.exercicio + AND solicitacao_item.cod_entidade = solicitacao_item_dotacao.cod_entidade + AND solicitacao_item.cod_solicitacao = solicitacao_item_dotacao.cod_solicitacao + AND solicitacao_item.cod_centro = solicitacao_item_dotacao.cod_centro + AND solicitacao_item.cod_item = solicitacao_item_dotacao.cod_item + AND mapa_item_dotacao.cod_conta = solicitacao_item_dotacao.cod_conta + AND mapa_item_dotacao.cod_despesa = solicitacao_item_dotacao.cod_despesa INNER JOIN compras.solicitacao ON solicitacao.exercicio = solicitacao_item.exercicio diff --git a/gestaoPatrimonial/fontes/PHP/compras/classes/mapeamento/TComprasOrdem.class.php b/gestaoPatrimonial/fontes/PHP/compras/classes/mapeamento/TComprasOrdem.class.php index 8057892..e10d3ec 100644 --- a/gestaoPatrimonial/fontes/PHP/compras/classes/mapeamento/TComprasOrdem.class.php +++ b/gestaoPatrimonial/fontes/PHP/compras/classes/mapeamento/TComprasOrdem.class.php @@ -33,7 +33,7 @@ * @package URBEM * @subpackage Mapeamento - $Id: TComprasOrdem.class.php 62703 2015-06-10 13:29:57Z michel $ + $Id: TComprasOrdem.class.php 64005 2015-11-17 16:49:06Z michel $ * */ @@ -46,7 +46,7 @@ class TComprasOrdem extends Persistente * Método Construtor * @access Private */ - public function TComprasOrdem() + public function __construct() { parent::Persistente(); $this->setTabela("compras.ordem"); @@ -229,6 +229,8 @@ class TComprasOrdem extends Persistente , ordem.cod_centro AS cod_centro_ordem , centro_custo.descricao AS nom_centro_ordem , marca.descricao AS nom_marca_ordem + , item_pre_empenho.cod_centro AS cod_centro_empenho + , centro_custo_empenho.descricao AS nom_centro_empenho FROM empenho.empenho @@ -310,6 +312,9 @@ class TComprasOrdem extends Persistente LEFT JOIN almoxarifado.centro_custo ON centro_custo.cod_centro = ordem.cod_centro + LEFT JOIN almoxarifado.centro_custo AS centro_custo_empenho + ON centro_custo_empenho.cod_centro = item_pre_empenho.cod_centro + WHERE empenho.cod_empenho = ".$this->getDado('cod_empenho')." AND empenho.exercicio = '".$this->getDado('exercicio')."' AND empenho.cod_entidade = ".$this->getDado('cod_entidade')." @@ -341,6 +346,8 @@ class TComprasOrdem extends Persistente , ordem.cod_centro , centro_custo.descricao , marca.descricao + , item_pre_empenho.cod_centro + , centro_custo_empenho.descricao "; return $stSql; @@ -382,6 +389,9 @@ class TComprasOrdem extends Persistente , ordem_item.cod_centro AS cod_centro_ordem , centro_custo.descricao AS nom_centro_ordem , marca.descricao AS nom_marca_ordem + , item_pre_empenho.cod_centro AS cod_centro_empenho + , centro_custo_empenho.descricao AS nom_centro_empenho + , julgada.cod_centro AS cod_centro_solicitacao FROM empenho.pre_empenho INNER JOIN empenho.item_pre_empenho ON item_pre_empenho.exercicio = pre_empenho.exercicio @@ -394,6 +404,7 @@ class TComprasOrdem extends Persistente , catalogo_item.descricao , unidade_medida.nom_unidade , grandeza.nom_grandeza + , solicitacao_item.cod_centro FROM empenho.item_pre_empenho_julgamento INNER JOIN almoxarifado.catalogo_item ON catalogo_item.cod_item = item_pre_empenho_julgamento.cod_item @@ -402,6 +413,26 @@ class TComprasOrdem extends Persistente AND unidade_medida.cod_grandeza = catalogo_item.cod_grandeza INNER JOIN administracao.grandeza ON grandeza.cod_grandeza = catalogo_item.cod_grandeza + LEFT JOIN compras.julgamento_item + ON julgamento_item.exercicio = item_pre_empenho_julgamento.exercicio_julgamento + AND julgamento_item.cod_cotacao = item_pre_empenho_julgamento.cod_cotacao + AND julgamento_item.cod_item = item_pre_empenho_julgamento.cod_item + AND julgamento_item.cgm_fornecedor = item_pre_empenho_julgamento.cgm_fornecedor + AND julgamento_item.lote = item_pre_empenho_julgamento.lote + + LEFT JOIN compras.mapa_cotacao + ON mapa_cotacao.exercicio_cotacao = julgamento_item.exercicio + AND mapa_cotacao.cod_cotacao = julgamento_item.cod_cotacao + + LEFT JOIN compras.mapa_solicitacao + ON mapa_solicitacao.exercicio = mapa_cotacao.exercicio_mapa + AND mapa_solicitacao.cod_mapa = mapa_cotacao.cod_mapa + + LEFT JOIN compras.solicitacao_item + ON solicitacao_item.exercicio = mapa_solicitacao.exercicio_solicitacao + AND solicitacao_item.cod_entidade = mapa_solicitacao.cod_entidade + AND solicitacao_item.cod_solicitacao = mapa_solicitacao.cod_solicitacao + AND solicitacao_item.cod_item = julgamento_item.cod_item ) AS julgada ON julgada.exercicio = item_pre_empenho.exercicio AND julgada.cod_pre_empenho = item_pre_empenho.cod_pre_empenho @@ -475,6 +506,9 @@ class TComprasOrdem extends Persistente LEFT JOIN almoxarifado.centro_custo ON centro_custo.cod_centro = ordem_item.cod_centro + LEFT JOIN almoxarifado.centro_custo as centro_custo_empenho + ON centro_custo_empenho.cod_centro = item_pre_empenho.cod_centro + WHERE pre_empenho.exercicio = '".$this->getDado('exercicio')."' AND pre_empenho.cod_pre_empenho = ".$this->getDado('cod_pre_empenho')." AND item_pre_empenho.num_item = ".$this->getDado('num_item')." diff --git a/gestaoPatrimonial/fontes/PHP/compras/classes/mapeamento/TComprasSolicitacaoHomologadaReserva.class.php b/gestaoPatrimonial/fontes/PHP/compras/classes/mapeamento/TComprasSolicitacaoHomologadaReserva.class.php index 39f9576..8b09ae1 100644 --- a/gestaoPatrimonial/fontes/PHP/compras/classes/mapeamento/TComprasSolicitacaoHomologadaReserva.class.php +++ b/gestaoPatrimonial/fontes/PHP/compras/classes/mapeamento/TComprasSolicitacaoHomologadaReserva.class.php @@ -35,7 +35,7 @@ * Casos de uso: uc-03.04.02 - $Id: TComprasSolicitacaoHomologadaReserva.class.php 59612 2014-09-02 12:00:51Z gelson $ + $Id: TComprasSolicitacaoHomologadaReserva.class.php 63833 2015-10-22 13:05:17Z franver $ */ @@ -172,8 +172,7 @@ class TComprasSolicitacaoHomologadaReserva extends Persistente $stFiltro .= " AND solicitacao_homologada_reserva.cod_entidade = ".$this->getDado('cod_entidade')." \n"; $stFiltro .= " AND solicitacao_homologada_reserva.cod_centro = ".$this->getDado('cod_centro')." \n"; $stFiltro .= " AND solicitacao_homologada_reserva.cod_item = ".$this->getDado('cod_item')." \n"; -//sistemaLegado::mostravar($stFiltro); -//die('Fim'); + return $stFiltro; } diff --git a/gestaoPatrimonial/fontes/PHP/compras/classes/mapeamento/TComprasSolicitacaoItem.class.php b/gestaoPatrimonial/fontes/PHP/compras/classes/mapeamento/TComprasSolicitacaoItem.class.php index 3558cd0..1615a24 100644 --- a/gestaoPatrimonial/fontes/PHP/compras/classes/mapeamento/TComprasSolicitacaoItem.class.php +++ b/gestaoPatrimonial/fontes/PHP/compras/classes/mapeamento/TComprasSolicitacaoItem.class.php @@ -35,7 +35,7 @@ * Casos de uso: uc-03.04.01 - $Id: TComprasSolicitacaoItem.class.php 62979 2015-07-14 16:18:54Z michel $ + $Id: TComprasSolicitacaoItem.class.php 63962 2015-11-11 18:32:34Z franver $ */ @@ -1040,10 +1040,10 @@ function montaRecuperaSolicitacaoItemReserva() ON pao.exercicio = despesa.exercicio AND pao.num_pao = despesa.num_pao - JOIN orcamento.pao_ppa_acao + LEFT JOIN orcamento.pao_ppa_acao ON pao_ppa_acao.num_pao = orcamento.pao.num_pao AND pao_ppa_acao.exercicio = orcamento.pao.exercicio - JOIN ppa.acao + LEFT JOIN ppa.acao ON ppa.acao.cod_acao = pao_ppa_acao.cod_acao -- FIM HINTS diff --git a/gestaoPatrimonial/fontes/PHP/compras/classes/mapeamento/TComprasSolicitacaoItemAnulacao.class.php b/gestaoPatrimonial/fontes/PHP/compras/classes/mapeamento/TComprasSolicitacaoItemAnulacao.class.php index 2ca5fb9..e5a4491 100644 --- a/gestaoPatrimonial/fontes/PHP/compras/classes/mapeamento/TComprasSolicitacaoItemAnulacao.class.php +++ b/gestaoPatrimonial/fontes/PHP/compras/classes/mapeamento/TComprasSolicitacaoItemAnulacao.class.php @@ -40,25 +40,6 @@ * Casos de uso: uc-03.04.01 */ - -/* -$Log$ -Revision 1.6 2006/12/07 16:51:33 rodrigo -7393 - -Revision 1.5 2006/11/07 16:41:27 larocca -Inclusão dos Casos de Uso - -Revision 1.4 2006/10/06 17:08:23 rodrigo -*** empty log message *** - -Revision 1.3 2006/07/06 14:05:54 diego -Retirada tag de log com erro. - -Revision 1.2 2006/07/06 12:11:10 diego - -*/ - include_once '../../../../../../gestaoAdministrativa/fontes/PHP/framework/include/valida.inc.php'; include_once ( CLA_PERSISTENTE ); @@ -86,14 +67,14 @@ function TComprasSolicitacaoItemAnulacao() $this->setCampoCod(''); $this->setComplementoChave('exercicio,cod_entidade,cod_solicitacao,timestamp,cod_centro,cod_item'); - $this->AddCampo('exercicio','char',true,'4',true,true); - $this->AddCampo('cod_entidade','integer',true,'',true,true); - $this->AddCampo('cod_solicitacao','integer',true,'',true,true); - $this->AddCampo('timestamp','timestamp',true,'',true,true); - $this->AddCampo('cod_centro','integer',true,'',true,true); - $this->AddCampo('cod_item','integer',true,'',true,true); - $this->AddCampo('quantidade','numeric',true,'14,2',false,false); - $this->AddCampo('vl_total','numeric',true,'14,2',false,false); + $this->AddCampo('exercicio' , 'char', true, '4', true, true); + $this->AddCampo('cod_entidade' , 'integer', true, '', true, true); + $this->AddCampo('cod_solicitacao', 'integer', true, '', true, true); + $this->AddCampo('timestamp' , 'timestamp', true, '', true, true); + $this->AddCampo('cod_centro' , 'integer', true, '', true, true); + $this->AddCampo('cod_item' , 'integer', true, '', true, true); + $this->AddCampo('quantidade' , 'numeric', true, '14,4', false, false); + $this->AddCampo('vl_total' , 'numeric', true, '14,2', false, false); } diff --git a/gestaoPatrimonial/fontes/PHP/compras/instancias/compraDireta/FMManterCompraDireta.php b/gestaoPatrimonial/fontes/PHP/compras/instancias/compraDireta/FMManterCompraDireta.php index b3490e1..1b6963a 100644 --- a/gestaoPatrimonial/fontes/PHP/compras/instancias/compraDireta/FMManterCompraDireta.php +++ b/gestaoPatrimonial/fontes/PHP/compras/instancias/compraDireta/FMManterCompraDireta.php @@ -34,7 +34,7 @@ * Casos de uso : uc-03.04.33 - $Id: FMManterCompraDireta.php 62838 2015-06-26 13:02:49Z diogo.zarpelon $ + $Id: FMManterCompraDireta.php 63859 2015-10-26 17:39:34Z franver $ */ include_once '../../../../../../gestaoAdministrativa/fontes/PHP/pacotes/FrameworkHTML.inc.php'; @@ -371,8 +371,8 @@ if ($stAcao == 'incluir') { $obMapaCompras->obCampoCod->obEvento->setOnBlur( "montaParametrosGET('montaItensAlterar','stMapaCompras,hdnMapaCompras');"); } -$obMapaCompras->obCampoCod->obEvento->setOnBlur($obMapaCompras->obCampoCod->obEvento->getOnBlur()."if (this.value != '') { montaParametrosGET('validaMapa','stDtCompraDireta, inCodEntidade, stMapaCompras'); }"); -$obMapaCompras->setTipoBusca('processoLicitatorio'); +$obMapaCompras->obCampoCod->obEvento->setOnBlur("if (this.value != '') { montaParametrosGET('validaMapa','stDtCompraDireta, inCodEntidade, stMapaCompras'); }".$obMapaCompras->obCampoCod->obEvento->getOnBlur()); +$obMapaCompras->setTipoBusca('verificaMapaComprasDireta'); $obMapaCompras->setExercicio ( Sessao::getExercicio() ); if ($arCompraDireta['cod_mapa'] AND $arCompraDireta['exercicio_mapa']) { diff --git a/gestaoPatrimonial/fontes/PHP/compras/instancias/compraDireta/OCManterCompraDireta.php b/gestaoPatrimonial/fontes/PHP/compras/instancias/compraDireta/OCManterCompraDireta.php index 2e9ba0e..f6fac8e 100644 --- a/gestaoPatrimonial/fontes/PHP/compras/instancias/compraDireta/OCManterCompraDireta.php +++ b/gestaoPatrimonial/fontes/PHP/compras/instancias/compraDireta/OCManterCompraDireta.php @@ -34,7 +34,7 @@ * Casos de uso: uc-03.04.33 - $Id: OCManterCompraDireta.php 59612 2014-09-02 12:00:51Z gelson $ + $Id: OCManterCompraDireta.php 63859 2015-10-26 17:39:34Z franver $ */ @@ -72,8 +72,8 @@ function montaListaItens($rsItens) $table->setSummary('Itens'); //$table->setConditional( true , "#ddd" ); - $table->Head->addCabecalho( 'Item' , 40 ); - $table->Head->addCabecalho( 'Centro de Custo', 25 ); + $table->Head->addCabecalho( 'Item' , 35 ); + $table->Head->addCabecalho( 'Centro de Custo', 20 ); $table->Head->addCabecalho( 'Valor de Referência' , 10 ); $table->Head->addCabecalho( 'Valor da Última Compra' , 10 ); $table->Head->addCabecalho( 'Qtde' , 10 ); @@ -175,8 +175,12 @@ switch ($_REQUEST['stCtrl']) { $obTComprasMapa->recuperaMapaProcessoLicitatorio($rsComprasMapa, $stFiltro); if (($boLicitacao || $boCompraDireta || ($rsComprasMapa->getNumLinhas() <= 0 ))) { - $stJs = "$('spnItens').innerHTML= '';\n"; - $stJs .= "$('stTotalMapa').innerHTML = '';\n"; + $stJs .= "jQuery('#spnItens').html(\"\");\n"; + $stJs .= "jQuery('#stTotalMapa').html(\"\");\n"; + $stJs .= "jQuery('#lblObjeto').html(\"\");\n"; + $stJs .= "jQuery('#hdnObjeto').val(\"\");\n"; + $stJs .= "jQuery('#stMapaCompras').val(\"\");\n"; + $stJs .= "alertaAviso('O Mapa (".$inCodMapa."/".$stExercicioMapa."), não pode ser utilizado numa Compra Direta.','form','aviso','".Sessao::getId()."');\n"; } else { include_once CAM_GP_COM_MAPEAMENTO.'TComprasMapaItem.class.php'; include_once CAM_GP_ALM_MAPEAMENTO.'TAlmoxarifadoCatalogoItem.class.php'; @@ -205,9 +209,9 @@ switch ($_REQUEST['stCtrl']) { $nuTotal = number_format($nuTotal,2,',','.'); $rsMapaItens->setPrimeiroElemento(); - $stJs = "$('stTotalMapa').innerHTML = '" . $nuTotal . "';\n"; - $stJs .= "$('lblObjeto').innerHTML = '".$rsMapaItens->getCampo('cod_objeto')." - ".nl2br(str_replace('\r\n', '\n', preg_replace('/(\r\n|\n|\r)/', ' ', $rsMapaItens->getCampo('objeto_descricao'))))."';\n"; - $stJs .= "$('hdnObjeto').value = '".$rsMapaItens->getCampo('cod_objeto')."';\n"; + $stJs .= "jQuery('#stTotalMapa').html(\"" . $nuTotal . "\");\n"; + $stJs .= "jQuery('#lblObjeto').html(\"".$rsMapaItens->getCampo('cod_objeto')." - ".nl2br(str_replace('\r\n', '\n', preg_replace('/(\r\n|\n|\r)/', ' ', $rsMapaItens->getCampo('objeto_descricao'))))."\");\n"; + $stJs .= "jQuery('#hdnObjeto').val(\"".$rsMapaItens->getCampo('cod_objeto')."\");\n"; $stJs .= montaListaItens( $rsMapaItens ) ; } } @@ -222,8 +226,8 @@ switch ($_REQUEST['stCtrl']) { $boExecuta = true; } else { if ($_REQUEST['stMapaCompras'] != '') { - $boLicitacao = SistemaLegado::pegaDado ( "cod_licitacao","licitacao.licitacao"," where cod_mapa = " . $inCodMapa . " and exercicio_mapa = " . $stExercicioMapa . ""); - $boCompraDireta = SistemaLegado::pegaDado ('cod_compra_direta','compras.compra_direta',' where cod_mapa = '.$inCodMapa.' and exercicio_mapa = '.$stExercicioMapa.' ' ); + $boLicitacao = SistemaLegado::pegaDado ( "cod_licitacao","licitacao.licitacao"," where cod_mapa = " . $inCodMapa . " and exercicio_mapa = '" . $stExercicioMapa . "' "); + $boCompraDireta = SistemaLegado::pegaDado("cod_compra_direta","compras.compra_direta"," where cod_mapa = ".$inCodMapa." and exercicio_mapa = '".$stExercicioMapa."' "); include_once CAM_GP_COM_MAPEAMENTO.'TComprasMapa.class.php'; $obTComprasMapa = new TComprasMapa; @@ -275,8 +279,12 @@ switch ($_REQUEST['stCtrl']) { $stJs .= montaListaItens( $rsMapaItens ) ; } else { - $stJs = "$('spnItens').innerHTML= '';\n"; - $stJs .= "$('stTotalMapa').innerHTML = '';\n"; + $stJs .= "jQuery('#spnItens').html(\"\");\n"; + $stJs .= "jQuery('#stTotalMapa').html(\"\");\n"; + $stJs .= "jQuery('#lblObjeto').html(\"\");\n"; + $stJs .= "jQuery('#hdnObjeto').val(\"\");\n"; + $stJs .= "jQuery('#stMapaCompras').val(\"\");\n"; + $stJs .= "alertaAviso('O Mapa (".$inCodMapa."/".$stExercicioMapa."), não pode ser utilizado numa Compra Direta.','form','aviso','".Sessao::getId()."');\n"; } break; diff --git a/gestaoPatrimonial/fontes/PHP/compras/instancias/compraDireta/OCManterHomologacao.php b/gestaoPatrimonial/fontes/PHP/compras/instancias/compraDireta/OCManterHomologacao.php index f8cd388..667b2a4 100755 --- a/gestaoPatrimonial/fontes/PHP/compras/instancias/compraDireta/OCManterHomologacao.php +++ b/gestaoPatrimonial/fontes/PHP/compras/instancias/compraDireta/OCManterHomologacao.php @@ -270,12 +270,12 @@ function montaSpnItens() $table->setBodyHeight (150); } - $table->Head->addCabecalho ( 'Item' , 35 ); - $table->Head->addCabecalho ( 'Qtde' , 9 ); - $table->Head->addCabecalho ( 'Valor Ref.' , 8 ); - $table->Head->addCabecalho ( 'Valor' , 8 ); - $table->Head->addCabecalho ( 'Fornecedor' , 25 ); - $table->Head->addCabecalho ( 'Status' , 10 ); + $table->Head->addCabecalho ( 'Item' , 30 ); + $table->Head->addCabecalho ( 'Qtde' , 10 ); + $table->Head->addCabecalho ( 'Valor Ref.' , 10 ); + $table->Head->addCabecalho ( 'Valor' , 10 ); + $table->Head->addCabecalho ( 'Fornecedor' , 20 ); + $table->Head->addCabecalho ( 'Status' , 15 ); $boTodosAutorizados = Sessao::read('boTodosAutorizados'); if (!$boTodosAutorizados) { diff --git a/gestaoPatrimonial/fontes/PHP/compras/instancias/compraDireta/PRManterAutorizacao.php b/gestaoPatrimonial/fontes/PHP/compras/instancias/compraDireta/PRManterAutorizacao.php index bba9568..048126c 100644 --- a/gestaoPatrimonial/fontes/PHP/compras/instancias/compraDireta/PRManterAutorizacao.php +++ b/gestaoPatrimonial/fontes/PHP/compras/instancias/compraDireta/PRManterAutorizacao.php @@ -32,7 +32,7 @@ * @ignore - $Id: PRManterAutorizacao.php 63367 2015-08-20 21:27:34Z michel $ + $Id: PRManterAutorizacao.php 64005 2015-11-17 16:49:06Z michel $ * Casos de uso: uc-03.04.32 */ @@ -454,6 +454,7 @@ $stDtCompraDireta = $_REQUEST['stDtCompraDireta']; $obAutorizacaoEmpenho->roUltimoItemPreEmpenho->obRUnidadeMedida->setCodUnidade( $rsItensSolicitacaoAgrupados->getCampo( 'cod_unidade' ) ); $obAutorizacaoEmpenho->roUltimoItemPreEmpenho->obRUnidadeMedida->obRGrandeza->setCodGrandeza( $rsItensSolicitacaoAgrupados->getCampo( 'cod_grandeza') ); $obAutorizacaoEmpenho->roUltimoItemPreEmpenho->setSiglaUnidade( $rsItensSolicitacaoAgrupados->getCampo( 'simbolo') ); + $obAutorizacaoEmpenho->roUltimoItemPreEmpenho->setCodCentroCusto( $rsItensSolicitacaoAgrupados->getCampo('cod_centro') ); $rsItensSolicitacaoAgrupados->proximo(); } diff --git a/gestaoPatrimonial/fontes/PHP/compras/instancias/fornecedor/OCManterFornecedor.php b/gestaoPatrimonial/fontes/PHP/compras/instancias/fornecedor/OCManterFornecedor.php index d59a7c1..9ffcd28 100644 --- a/gestaoPatrimonial/fontes/PHP/compras/instancias/fornecedor/OCManterFornecedor.php +++ b/gestaoPatrimonial/fontes/PHP/compras/instancias/fornecedor/OCManterFornecedor.php @@ -34,7 +34,7 @@ * Casos de uso: uc-03.04.03 - $Id: OCManterFornecedor.php 62068 2015-03-27 19:55:45Z jean $ + $Id: OCManterFornecedor.php 63833 2015-10-22 13:05:17Z franver $ */ include_once '../../../../../../gestaoAdministrativa/fontes/PHP/pacotes/FrameworkHTML.inc.php'; @@ -548,7 +548,6 @@ switch ($stCtrl) { case 'excluirSocio': $inCount=0; $arSocioSessao = Sessao::read('arSocio'); -//SistemaLegado::mostravar($arSocioSessao);die; foreach ( $arSocioSessao as $arSocio ) { if ($arSocio['id'] != $_REQUEST['id']) { $arSocioSessaoAtualizado[$inCount]['id'] = $inCount; diff --git a/gestaoPatrimonial/fontes/PHP/compras/instancias/fornecedor/PRManterFornecedor.php b/gestaoPatrimonial/fontes/PHP/compras/instancias/fornecedor/PRManterFornecedor.php index 30aed65..938449e 100644 --- a/gestaoPatrimonial/fontes/PHP/compras/instancias/fornecedor/PRManterFornecedor.php +++ b/gestaoPatrimonial/fontes/PHP/compras/instancias/fornecedor/PRManterFornecedor.php @@ -34,7 +34,7 @@ * Casos de uso: uc-03.04.03 - $Id: PRManterFornecedor.php 60401 2014-10-17 14:20:45Z carlos.silva $ + $Id: PRManterFornecedor.php 63901 2015-11-04 14:04:10Z jean $ */ include '../../../../../../gestaoAdministrativa/fontes/PHP/pacotes/FrameworkHTML.inc.php'; @@ -50,6 +50,7 @@ include_once(TALM."TAlmoxarifadoCatalogoClassificacao.class.php"); include_once(TMON."TMONAgencia.class.php"); include_once(TMON."TMONBanco.class.php"); include_once ( CAM_GA_CGM_MAPEAMENTO."TCGMPessoaFisica.class.php" ); +include_once ( CAM_GF_EMP_MAPEAMENTO."TEmpenhoPreEmpenho.class.php" ); //Define o nome dos arquivos PHP $stPrograma = "ManterFornecedor"; @@ -176,7 +177,6 @@ switch ($_REQUEST['stAcao']) { case 'excluir': $pgProx = $pgList."?".Sessao::getId().'&stAcao='.$stAcao; - include_once ( CAM_GP_LIC_MAPEAMENTO.'TLicitacaoParticipante.class.php' ) ; $obTLicitacaoParticipante = new TLicitacaoParticipante; @@ -189,10 +189,16 @@ switch ($_REQUEST['stAcao']) { $obTComprasCotacaoFornecedorItem = new TComprasCotacaoFornecedorItem(); $obTComprasCotacaoFornecedorItem->recuperaTodos($rsComprasCotacaoFornecedorItem, $stFiltro ); + $stFiltro = " WHERE cgm_beneficiario = ". $_REQUEST['inCGM']; + + $obTEmpenhoPreEmpenho = new TEmpenhoPreEmpenho(); + $obTEmpenhoPreEmpenho->recuperaTodos($rsEmpenhoPreEmpenho, $stFiltro); + $stErro = ''; if (($rsParticipante->getNumLinhas() > 0 ) || - ($rsComprasCotacaoFornecedorItem->getNumLinhas() > 0)){ + ($rsComprasCotacaoFornecedorItem->getNumLinhas() > 0) || + ($rsEmpenhoPreEmpenho->getNumLinhas() > 0)){ $stErro = "Fornecedor ". $_REQUEST["inCGM"]. " está sendo utilizado pelo sistema."; } diff --git a/gestaoPatrimonial/fontes/PHP/compras/instancias/mapaCompras/FMManterMapaCompras.php b/gestaoPatrimonial/fontes/PHP/compras/instancias/mapaCompras/FMManterMapaCompras.php index 3d3ddbc..cf21d62 100644 --- a/gestaoPatrimonial/fontes/PHP/compras/instancias/mapaCompras/FMManterMapaCompras.php +++ b/gestaoPatrimonial/fontes/PHP/compras/instancias/mapaCompras/FMManterMapaCompras.php @@ -34,7 +34,7 @@ * Casos de uso: uc-03.04.05 - $Id: FMManterMapaCompras.php 63738 2015-10-02 17:54:55Z michel $ + $Id: FMManterMapaCompras.php 64118 2015-12-04 12:33:31Z franver $ */ @@ -188,8 +188,8 @@ $obFormulario->addSpan ( $obSpnSolicitacoes ); //Aba dos Itens $obFormulario->addAba ( "Itens" ); -$obFormulario->addSpan ( $obSpnItens ); $obFormulario->addSpan ( $obSpnItem ); +$obFormulario->addSpan ( $obSpnItens ); //Aba de Totais por item $obFormulario->addAba ( "Totais" ); @@ -222,8 +222,10 @@ if ($stAcao != 'incluir') { $obTComprasObjeto = new TComprasObjeto; $obTComprasObjeto->setDado( 'cod_objeto' , $inCodObjeto ); $obTComprasObjeto->consultar(); - $txtObjeto = $obTComprasObjeto->getDado( 'descricao' ); - $stJs .= "d.getElementById('txtObjeto').innerHTML = '$txtObjeto';"; + $txtObjeto = $obTComprasObjeto->getDado('descricao'); + $txtObjeto = str_replace("\r\n"," ",$txtObjeto); + $txtObjeto = str_replace("\n"," ",$txtObjeto); + $stJs .= "d.getElementById(\"txtObjeto\").innerHTML = \"".$txtObjeto."\";"; $stJs .= "montaParametrosGET('tipoLicitacao','inCodTipoLicitacao' ); "; } elseif ($stAcao == 'anular') { $stJs .= liberaMapaAnulacao( $_REQUEST['cod_mapa'], $_REQUEST['exercicio'] ); diff --git a/gestaoPatrimonial/fontes/PHP/compras/instancias/mapaCompras/FMManterMapaComprasAbaItens.php b/gestaoPatrimonial/fontes/PHP/compras/instancias/mapaCompras/FMManterMapaComprasAbaItens.php index 6dea80d..c595e50 100644 --- a/gestaoPatrimonial/fontes/PHP/compras/instancias/mapaCompras/FMManterMapaComprasAbaItens.php +++ b/gestaoPatrimonial/fontes/PHP/compras/instancias/mapaCompras/FMManterMapaComprasAbaItens.php @@ -39,17 +39,6 @@ * Casos de uso: uc-03.04.05 */ - -/** - -$Log$ -Revision 1.2 2006/09/29 18:02:32 cako -implementação do uc-03.04.05 - -Revision 1.1 2006/09/22 18:03:45 cako -implementação do uc-03.04.05 - -*/ include_once '../../../../../../gestaoAdministrativa/fontes/PHP/pacotes/FrameworkHTML.inc.php'; include_once '../../../../../../gestaoAdministrativa/fontes/PHP/framework/include/cabecalho.inc.php'; diff --git a/gestaoPatrimonial/fontes/PHP/compras/instancias/mapaCompras/OCManterMapaCompras.php b/gestaoPatrimonial/fontes/PHP/compras/instancias/mapaCompras/OCManterMapaCompras.php index 9f2759f..5a54124 100644 --- a/gestaoPatrimonial/fontes/PHP/compras/instancias/mapaCompras/OCManterMapaCompras.php +++ b/gestaoPatrimonial/fontes/PHP/compras/instancias/mapaCompras/OCManterMapaCompras.php @@ -34,7 +34,7 @@ * Casos de uso: uc-03.04.05 - $Id: OCManterMapaCompras.php 63445 2015-08-28 13:44:54Z michel $ + $Id: OCManterMapaCompras.php 64118 2015-12-04 12:33:31Z franver $ */ @@ -1036,30 +1036,30 @@ function montaListaItens($rsRecordSet, $stTipoCotacao, $stAcao = '') $rsRecordSet->addFormatacao('valor_unitario' , 'NUMERIC_BR'); $rsRecordSet->addFormatacao('valor_total_mapa' , 'NUMERIC_BR'); $rsRecordSet->addFormatacao('valorAnular' , 'NUMERIC_BR'); - $rsRecordSet->addFormatacao('quantidade_solicitada' , 'NUMERIC_BR'); - $rsRecordSet->addFormatacao('quantidadeAnular' , 'NUMERIC_BR'); - $rsRecordSet->addFormatacao('quantidade_mapa' , 'NUMERIC_BR'); - $rsRecordSet->addFormatacao('quantidade_anulada' , 'NUMERIC_BR'); + $rsRecordSet->addFormatacao('quantidade_solicitada' , 'NUMERIC_BR_4'); + $rsRecordSet->addFormatacao('quantidadeAnular' , 'NUMERIC_BR_4'); + $rsRecordSet->addFormatacao('quantidade_mapa' , 'NUMERIC_BR_4'); + $rsRecordSet->addFormatacao('quantidade_anulada' , 'NUMERIC_BR_4'); $table = new Table; $table->setRecordset( $rsRecordSet ); $table->setSummary('Itens do Mapa'); - $table->Head->addCabecalho('Solicitação' , 8); - $table->Head->addCabecalho('Item' , 30); - $table->Head->addCabecalho('Quantidade Solicitada' , 8); - $table->Head->addCabecalho('Quantidade no Mapa' , 8); + $table->Head->addCabecalho('Solicitação' , 6); + $table->Head->addCabecalho('Item' , 25); + $table->Head->addCabecalho('Quantidade Solicitada' , 9); + $table->Head->addCabecalho('Quantidade no Mapa' , 9); if ($stAcao == 'consultar') { - $table->Head->addCabecalho('Quantidade Anulada', 8); + $table->Head->addCabecalho('Quantidade Anulada', 9); } - $table->Head->addCabecalho('Valor de Referência' , 8); - $table->Head->addCabecalho('Valor Total' , 8); + $table->Head->addCabecalho('Valor de Referência' , 9); + $table->Head->addCabecalho('Valor Total' , 9); if ($stAcao == 'anular') { - $table->Head->addCabecalho('Valor a Anular' , 8); - $table->Head->addCabecalho('Quantidade a Anular' , 8); + $table->Head->addCabecalho('Valor a Anular' , 9); + $table->Head->addCabecalho('Quantidade a Anular' , 9); } $stTitle = "[stTitle]"; @@ -1150,7 +1150,7 @@ function montaAnulacaoItem($inId) $obLblQuantidadeSolicitada = new Label; $obLblQuantidadeSolicitada->setId ( 'lblQuantidadeSolicitada' ); $obLblQuantidadeSolicitada->setRotulo ( 'Quantidade Solicitada' ); - $obLblQuantidadeSolicitada->setValue ( $arItem['quantidade_solicitada'] ); + $obLblQuantidadeSolicitada->setValue (number_format( $arItem['quantidade_solicitada'], 4,',','.') ); # Valor unitário $obLblValorUnitario = new Label; @@ -1198,6 +1198,9 @@ function montaAnulacaoItem($inId) $obNumQuantidadeAnular->setId ('flQuantidadeAnular'); $obNumQuantidadeAnular->setname ('flQuantidadeAnular'); $obNumQuantidadeAnular->setRotulo ('Quantidade a Anular'); + $obNumQuantidadeAnular->setDefinicao('NUMERIC'); + $obNumQuantidadeAnular->setSize(14); + $obNumQuantidadeAnular->setMaxLength(13); $obNumQuantidadeAnular->setDecimais (4); $obNumQuantidadeAnular->obEvento->setOnChange("montaParametrosGET('calculaTotalAnulacao');"); @@ -1309,6 +1312,7 @@ function anularItem($inId, $flValorAnular, $flQuantidadeAnular, $hdnValorUnitari $rsRecordSet->preenche( $itens ); $stJs .= "jQuery('#spnItem').html(' '); \n"; + $stJs .= "jQuery('#flQuantidadeAnular').focus(); \n "; $stJs .= "jQuery('#Ok').removeAttr('disabled'); \n"; $stJs .= montaListaItens($rsRecordSet, ' ', 'anular'); $stJs .= montaListaSolicitacoes('', 'anular'); @@ -1600,7 +1604,7 @@ function montaListaTotais($rsTotais) $rsTotais->addFormatacao ( 'valor' , 'NUMERIC_BR' ); $rsTotais->addFormatacao ( 'valor_ultima_compra' , 'NUMERIC_BR' ); - $rsTotais->addFormatacao ( 'quantidade' , 'NUMERIC_BR' ); + $rsTotais->addFormatacao ( 'quantidade' , 'NUMERIC_BR_4' ); $table = new TableTree(); @@ -1613,10 +1617,10 @@ function montaListaTotais($rsTotais) $table->setParametros( array( "cod_item") ); $table->setComplementoParametros ( "stCtrl=detalhaItem" ); - $table->Head->addCabecalho( 'Item' , 60 ); - $table->Head->addCabecalho( 'Quantidade Total', 10 ); - $table->Head->addCabecalho( 'Valor da Última Compra', 10 ); - $table->Head->addCabecalho( 'Valor Total' , 10 ); + $table->Head->addCabecalho( 'Item' , 50 ); + $table->Head->addCabecalho( 'Quantidade Total', 12 ); + $table->Head->addCabecalho( 'Valor da Última Compra', 13 ); + $table->Head->addCabecalho( 'Valor Total' , 15 ); $table->Body->addCampo( '[cod_item] - [nom_item]' , 'E' ); $table->Body->addCampo( 'quantidade', 'D' ); @@ -1666,8 +1670,8 @@ function detalhaItem($inCodItem) function montaSpamDetalheItem($rsDados) { - $rsDados->addFormatacao ( 'quantidade_solicitada' ,'NUMERIC_BR' ) ; - $rsDados->addFormatacao ( 'quantidade_mapa' ,'NUMERIC_BR' ) ; + $rsDados->addFormatacao ( 'quantidade_solicitada' ,'NUMERIC_BR_4' ) ; + $rsDados->addFormatacao ( 'quantidade_mapa' ,'NUMERIC_BR_4' ) ; $rsDados->addFormatacao ( 'valor_unitario' ,'NUMERIC_BR' ) ; $rsDados->addFormatacao ( 'valor_total_mapa' ,'NUMERIC_BR' ) ; $rsDados->addFormatacao ( 'vl_reserva' ,'NUMERIC_BR' ) ; @@ -1679,11 +1683,11 @@ function montaSpamDetalheItem($rsDados) $table->setSummary('Itens'); $table->Head->addCabecalho( 'Solicitação' , 5 ); - $table->Head->addCabecalho( 'Quantidade Solicitada' , 5 ); - $table->Head->addCabecalho( 'Quantidade no Mapa' , 5 ); - $table->Head->addCabecalho( 'Valor de Referência' , 5 ); - $table->Head->addCabecalho( 'Valor Total' , 5 ); - $table->Head->addCabecalho( 'Valor Reservado' , 5 ); + $table->Head->addCabecalho( 'Quantidade Solicitada' , 10 ); + $table->Head->addCabecalho( 'Quantidade no Mapa' , 10 ); + $table->Head->addCabecalho( 'Valor de Referência' , 12 ); + $table->Head->addCabecalho( 'Valor Total' , 12 ); + $table->Head->addCabecalho( 'Valor Reservado' , 12 ); $table->Head->addCabecalho( 'Dotação Orçamentária' , 10 ); $table->Body->addCampo( 'cod_solicitacao' , 'C' ); diff --git a/gestaoPatrimonial/fontes/PHP/compras/instancias/ordemCompra/JSManterOrdemCompra.js b/gestaoPatrimonial/fontes/PHP/compras/instancias/ordemCompra/JSManterOrdemCompra.js index 9b76537..41c27b8 100644 --- a/gestaoPatrimonial/fontes/PHP/compras/instancias/ordemCompra/JSManterOrdemCompra.js +++ b/gestaoPatrimonial/fontes/PHP/compras/instancias/ordemCompra/JSManterOrdemCompra.js @@ -30,7 +30,7 @@ * @ignore - $Id: JSManterOrdemCompra.js 62696 2015-06-09 14:19:37Z michel $ + $Id: JSManterOrdemCompra.js 64005 2015-11-17 16:49:06Z michel $ */ @@ -45,12 +45,12 @@ document.frm.action = stAction; document.frm.target = stTarget; } - + function limparFiltro(){ document.frm.reset(); passaItem('document.frm.inCodEntidade','document.frm.inCodEntidadeDisponivel','tudo'); } - + function incluirItem( idItem, linha_table_tree) { var boErro = false; var msg = ''; @@ -76,7 +76,7 @@ alertaAviso(msg,'form','erro','".Sessao::getId()."', '../'); }else{ TableTreeLineControl( linha_table_tree , 'none', '', 'none'); - + var stTarget = document.frm.target; var stAction = document.frm.action; document.frm.target = 'oculto'; @@ -87,17 +87,19 @@ document.frm.target = stTarget; } } - - function limpaItem( idItem, boMarcaCentro ) { - if (boMarcaCentro == 'f') { + + function limpaItem( idItem, boMarcaCentro, boLimparCentroCusto ) { + if (boMarcaCentro == 't') { document.getElementById('inCodItem'+idItem).value = ''; document.getElementById('stNomItem'+idItem).innerHTML = ' '; } - document.getElementById('inCodCentroCusto'+idItem).value = ''; - document.getElementById('stNomCentroCusto'+idItem).innerHTML = ' '; + if (boLimparCentroCusto == 't') { + document.getElementById('inCodCentroCusto'+idItem).value = ''; + document.getElementById('stNomCentroCusto'+idItem).innerHTML = ' '; + } document.getElementById('inMarca'+idItem).value = ''; document.getElementById('stNomMarca'+idItem).innerHTML = ' '; - + var stTarget = document.frm.target; var stAction = document.frm.action; document.frm.target = 'oculto'; diff --git a/gestaoPatrimonial/fontes/PHP/compras/instancias/ordemCompra/LSManterOrdemCompra.php b/gestaoPatrimonial/fontes/PHP/compras/instancias/ordemCompra/LSManterOrdemCompra.php index 47b4313..35cc886 100644 --- a/gestaoPatrimonial/fontes/PHP/compras/instancias/ordemCompra/LSManterOrdemCompra.php +++ b/gestaoPatrimonial/fontes/PHP/compras/instancias/ordemCompra/LSManterOrdemCompra.php @@ -32,7 +32,7 @@ * @ignore - * $Id: LSManterOrdemCompra.php 62696 2015-06-09 14:19:37Z michel $ + * $Id: LSManterOrdemCompra.php 64086 2015-12-01 11:48:08Z diogo.zarpelon $ * Casos de uso: uc-03.04.24 */ @@ -52,7 +52,7 @@ $pgJs = "JS".$stPrograma.".js"; $stCaminho = CAM_GP_COM_INSTANCIAS."ordemCompra/"; -$stAcao = $_POST["stAcao"] ? $_POST["stAcao"] : $_GET["stAcao"]; +$stAcao = $request->get("stAcao"); $stTipoOrdem = ( strpos($stAcao,'OS')===false ) ? 'C' : 'S'; @@ -209,7 +209,7 @@ if ( strpos($stAcao,'incluir') !== false ) { $stFiltro = ""; $stLink = ""; -$stLink .= "&stAcao=".$_REQUEST['stAcao']; +$stLink .= "&stAcao=".$stAcao; $obLista = new Lista; $obLista->obPaginacao->setFiltro("&stLink=".$stLink ); @@ -312,7 +312,6 @@ $obLista->ultimaAcao->addCampo("&stEntidade", "entidade"); $obLista->ultimaAcao->addCampo("&inCodigo", "codigo"); $obLista->ultimaAcao->addCampo("&stExercicio", "exercicio"); $obLista->ultimaAcao->addCampo("&inCodObjeto", "cod_objeto"); -$obLista->ultimaAcao->addCampo("&stObjeto", "descricao_objeto"); $obLista->ultimaAcao->addCampo("&inCodModalidade", "cod_modalidade"); $obLista->ultimaAcao->addCampo("&stModalidade", "descricao_modalidade"); $obLista->ultimaAcao->addCampo("&inCodFornecedor", "cgm_fornecedor"); diff --git a/gestaoPatrimonial/fontes/PHP/compras/instancias/ordemCompra/OCManterOrdemCompra.php b/gestaoPatrimonial/fontes/PHP/compras/instancias/ordemCompra/OCManterOrdemCompra.php index 7cc94f4..f7601da 100644 --- a/gestaoPatrimonial/fontes/PHP/compras/instancias/ordemCompra/OCManterOrdemCompra.php +++ b/gestaoPatrimonial/fontes/PHP/compras/instancias/ordemCompra/OCManterOrdemCompra.php @@ -32,15 +32,15 @@ * @ignore - $Id: OCManterOrdemCompra.php 62696 2015-06-09 14:19:37Z michel $ + $Id: OCManterOrdemCompra.php 64051 2015-11-24 17:55:39Z franver $ */ include_once '../../../../../../gestaoAdministrativa/fontes/PHP/pacotes/FrameworkHTML.inc.php'; include_once '../../../../../../gestaoAdministrativa/fontes/PHP/framework/include/valida.inc.php'; include_once '../../../../../../gestaoAdministrativa/fontes/PHP/framework/componentes/Table/TableTree.class.php'; -include_once( CAM_GF_EMP_NEGOCIO."REmpenhoAutorizacaoEmpenho.class.php" ); -include_once( TCOM."TComprasOrdem.class.php" ); +include_once CAM_GF_EMP_NEGOCIO."REmpenhoAutorizacaoEmpenho.class.php"; +include_once TCOM."TComprasOrdem.class.php"; //Define o nome dos arquivos PHP $stPrograma = "ManterOrdemCompra"; @@ -51,7 +51,7 @@ $pgProc = "PR".$stPrograma.".php"; $pgOcul = "OC".$stPrograma.".php"; $pgPror = "PO".$stPrograma.".php"; -$stCtrl = $_REQUEST['stCtrl']; +$stCtrl = $request->get('stCtrl'); $stAcao = $request->get('stAcao'); $stTipoOrdem = ( strpos($stAcao,'OS')==false ) ? 'C' : 'S'; @@ -91,13 +91,13 @@ function montaListaItens($arRecordSet , $boExecuta = true) $table->setRecordset( $rsListaItens ); $table->setSummary('Itens'); - $table->Head->addCabecalho( 'Item' , 25 ); - $table->Head->addCabecalho( 'Qtde. Emp.' , 8 ); - $table->Head->addCabecalho( 'Qtde. em OC' , 10 ); - $table->Head->addCabecalho( 'Qtde. Disponível' , 10 ); - $table->Head->addCabecalho( 'Valor Unitário' , 10 ); - $table->Head->addCabecalho( 'Qtde. da OC' , 8 ); - $table->Head->addCabecalho( 'Valor Total Item' , 12 ); + $table->Head->addCabecalho('Item' , 25); + $table->Head->addCabecalho('Qtde. Emp.' , 10); + $table->Head->addCabecalho('Qtde. em OC' , 10); + $table->Head->addCabecalho('Qtde. Disponível', 10); + $table->Head->addCabecalho('Valor Unitário' , 10); + $table->Head->addCabecalho('Qtde. da OC' , 10); + $table->Head->addCabecalho('Valor Total Item', 12); $stTitle = ""; $table->Body->addCampo( 'nom_item' , "E", $stTitle ); @@ -107,9 +107,13 @@ function montaListaItens($arRecordSet , $boExecuta = true) $table->Body->addCampo( 'vl_unitario' , "D", $stTitle ); if ( strpos($_REQUEST['stAcao'],'incluir') !== false || strpos($_REQUEST['stAcao'],'alterar') !== false ) { - $obTextQtde = new TextBox(); + $obTextQtde = new Numerico(); $obTextQtde->setName('qtdeOC'); - $obTextQtde->obEvento->setOnKeyUp("mascaraMoeda(this,4,event,false);"); + $obTextQtde->setDecimais(4); + $obTextQtde->setSize (14); + $obTextQtde->setMaxLength(13); + $obTextQtde->setDefinicao('NUMERIC'); + $obTextQtde->obEvento->setOnChange ("floatDecimal(this, '4', event ); executaFuncaoAjax( 'calculaValorTotal', '&inTableId=".$table->getId()."&stId='+this.id+'&inQtde='+this.value );"); $table->Body->addCampo( $obTextQtde, "C"); @@ -126,13 +130,13 @@ function montaListaItens($arRecordSet , $boExecuta = true) if (strpos($_REQUEST['stAcao'],'incluir') !== false || strpos($_REQUEST['stAcao'],'alterar') !== false) { // Só permiti excluir o ítem se a ordem tiver mais de um (modo alterar). - if ((strpos($_REQUEST['stAcao'],'alterar') !== false) || (count($arItens) > 0)) { - if ($inTotalItem > 1) { + if ((strpos($_REQUEST['stAcao'],'alterar') !== false) || (count($arItens) > 0)) { + if ($inTotalItem > 1) { $table->Body->addAcao( 'EXCLUIR' , "executaFuncaoAjax('delItem' , '&inTableId=".$table->getId()."&inNumItem=%s&stAcao=%s$stCampos')" , array( 'num_item', $_REQUEST['stAcao'] ) ); + } + } else { + $table->Body->addAcao( 'EXCLUIR' , "executaFuncaoAjax('delItem' , '&inTableId=".$table->getId()."&inNumItem=%s&stAcao=%s$stCampos')" , array( 'num_item', $_REQUEST['stAcao'] ) ); } - } else { - $table->Body->addAcao( 'EXCLUIR' , "executaFuncaoAjax('delItem' , '&inTableId=".$table->getId()."&inNumItem=%s&stAcao=%s$stCampos')" , array( 'num_item', $_REQUEST['stAcao'] ) ); - } } $table->Foot->addSoma( 'oc_vl_total', 'D'); @@ -243,33 +247,43 @@ function BuscaEmpenhoItens($stEmpenho, $inCodEntidade, $stTipoOrdem, $stAcao) $ocVlTotal = $rsItens->getCampo('vl_unitario') * $rsItens->getCampo('oc_saldo'); $ocVlTotal = number_format($ocVlTotal, 2, ',', '.'); - $arItens[$inCount]['nom_item'] = $rsItens->getCampo('nom_item'); - $arItens[$inCount]['num_item'] = $rsItens->getCampo('num_item'); + $inNumItem = $rsItens->getCampo('num_item'); + $arItens[$inCount]['nom_item'] = $rsItens->getCampo('nom_item'); + $arItens[$inCount]['num_item'] = $inNumItem; if(!is_null($rsItens->getCampo('cod_item_ordem'))) $inCodItem = $rsItens->getCampo('cod_item_ordem'); else $inCodItem = $rsItens->getCampo('cod_item'); - $arItens[$inCount]['cod_item'] = $inCodItem; + $arItens[$inCount]['cod_item'] = $inCodItem; $arItens[$inCount]['exercicio_empenho'] = $rsItens->getCampo('exercicio'); - $arItens[$inCount]['cod_pre_empenho'] = $rsItens->getCampo('cod_pre_empenho'); - $arItens[$inCount]['quantidade'] = $rsItens->getCampo('quantidade'); - $arItens[$inCount]['qtde_oc'] = $rsItens->getCampo('oc_quantidade_atendido'); - $arItens[$inCount]['vl_unitario'] = $rsItens->getCampo('vl_unitario'); - $arItens[$inCount]['oc_vl_total'] = $ocVlTotal; - $arItens[$inCount]['oc_saldo'] = $rsItens->getCampo('oc_saldo'); - $arItens[$inCount]['oc_disponivel'] = '0,0000'; - $arItens[$inCount]['bo_centro_marca'] = $rsItens->getCampo('bo_centro_marca'); + $arItens[$inCount]['cod_pre_empenho'] = $rsItens->getCampo('cod_pre_empenho'); + $arItens[$inCount]['quantidade'] = $rsItens->getCampo('quantidade'); + $arItens[$inCount]['qtde_oc'] = $rsItens->getCampo('oc_quantidade_atendido'); + $arItens[$inCount]['vl_unitario'] = $rsItens->getCampo('vl_unitario'); + $arItens[$inCount]['oc_vl_total'] = $ocVlTotal; + $arItens[$inCount]['oc_saldo'] = $rsItens->getCampo('oc_saldo'); + $arItens[$inCount]['oc_disponivel'] = '0,0000'; + $arItens[$inCount]['bo_centro_marca'] = $rsItens->getCampo('bo_centro_marca'); $inCount++; // Preenche a quantidade da OC com a quantidade do Empenho, para facilitar na operação. $stJsPreenche.= "$('qtdeOC_".$inCount."').value = '".number_format($rsItens->getCampo('oc_saldo'),4,',','.')."'; "; - if(!is_null($rsItens->getCampo('cod_centro_ordem'))&&!is_null($rsItens->getCampo('cod_marca_ordem'))){ - $arItensAlmoxarifado[$rsItens->getCampo('num_item')]['inCodItem'] = $inCodItem; - $arItensAlmoxarifado[$rsItens->getCampo('num_item')]['stNomItem'] = $rsItens->getCampo('nom_item'); - $arItensAlmoxarifado[$rsItens->getCampo('num_item')]['inCodCentroCusto'] = $rsItens->getCampo('cod_centro_ordem'); - $arItensAlmoxarifado[$rsItens->getCampo('num_item')]['stNomCentroCusto'] = $rsItens->getCampo('nom_centro_ordem'); - $arItensAlmoxarifado[$rsItens->getCampo('num_item')]['inMarca'] = $rsItens->getCampo('cod_marca_ordem'); - $arItensAlmoxarifado[$rsItens->getCampo('num_item')]['stNomMarca'] = $rsItens->getCampo('nom_marca_ordem'); + if((!is_null($rsItens->getCampo('cod_centro_ordem'))&&!is_null($rsItens->getCampo('cod_marca_ordem'))) || !is_null($rsItens->getCampo('cod_centro_empenho'))){ + $arItensAlmoxarifado[$inNumItem]['inCodItem'] = $inCodItem; + $arItensAlmoxarifado[$inNumItem]['stNomItem'] = (!is_null($inCodItem)) ? $rsItens->getCampo('nom_item') : ''; + + if(!is_null($rsItens->getCampo('cod_centro_empenho'))){ + $inCodCentro = $rsItens->getCampo('cod_centro_empenho'); + $stNomCentro = $rsItens->getCampo('nom_centro_empenho'); + }else{ + $inCodCentro = $rsItens->getCampo('cod_centro_ordem'); + $stNomCentro = $rsItens->getCampo('nom_centro_ordem'); + } + + $arItensAlmoxarifado[$inNumItem]['inCodCentroCusto'] = $inCodCentro; + $arItensAlmoxarifado[$inNumItem]['stNomCentroCusto'] = $stNomCentro; + $arItensAlmoxarifado[$inNumItem]['inMarca'] = $rsItens->getCampo('cod_marca_ordem'); + $arItensAlmoxarifado[$inNumItem]['stNomMarca'] = $rsItens->getCampo('nom_marca_ordem'); } $rsItens->proximo(); @@ -421,31 +435,32 @@ case 'detalharItem' : include_once CAM_GP_ALM_COMPONENTES."IPopUpItem.class.php"; include_once CAM_GP_ALM_COMPONENTES."IPopUpCentroCustoUsuario.class.php"; require_once CAM_GP_ALM_COMPONENTES."IPopUpMarca.class.php"; - + $stTituloItem = ''; $linha = explode('row_', $_REQUEST['linha_table_tree']); - if(!is_null($linha[1])) + if( !is_null($linha[1]) ) $stTituloItem = ' - Item '.$linha[1]; $stTitulo = 'Vínculo do Almoxarifado'.$stTituloItem; - + $arItensAlmoxarifado = is_array(Sessao::read('arItensAlmoxarifado')) ? Sessao::read('arItensAlmoxarifado') : array(); - + $obForm = new Form; $obForm->setAction( $pgOcul ); $obForm->setTarget( "oculto" ); - - if(!is_null($rsDetalheItem->getCampo('cod_item'))||!is_null($rsDetalheItem->getCampo('cod_item_ordem'))){ - if(!is_null($rsDetalheItem->getCampo('cod_item'))) + + if( !is_null($rsDetalheItem->getCampo('cod_item')) || !is_null($rsDetalheItem->getCampo('cod_item_ordem')) ){ + if( !is_null($rsDetalheItem->getCampo('cod_item')) ) $inCodItem = $rsDetalheItem->getCampo('cod_item'); else $inCodItem = $rsDetalheItem->getCampo('cod_item_ordem'); $stNomItem = $rsDetalheItem->getCampo('descricao'); - } - else{ + $boCentroMarca = 'f'; + }else{ $inCodItem = $arItensAlmoxarifado[$_REQUEST['num_item']]['inCodItem']; $stNomItem = $arItensAlmoxarifado[$_REQUEST['num_item']]['stNomItem']; + $boCentroMarca = $rsDetalheItem->getCampo('bo_centro_marca'); } - + $obIPopUpCatalogoItem = new IPopUpItem($obForm); $obIPopUpCatalogoItem->setRotulo ( '*Código do Item' ); $obIPopUpCatalogoItem->setNull ( true ); @@ -457,26 +472,40 @@ case 'detalharItem' : $obIPopUpCatalogoItem->obCampoCod->setValue ( $inCodItem ); $obIPopUpCatalogoItem->setValue ( $stNomItem ); - if(!is_null($rsDetalheItem->getCampo('cod_item'))||!is_null($rsDetalheItem->getCampo('cod_item_ordem'))){ + if( !is_null($rsDetalheItem->getCampo('cod_item')) || !is_null($rsDetalheItem->getCampo('cod_item_ordem')) ){ $js .= "jQuery('#inCodItem".$_REQUEST['num_item']."').attr('readonly' , 'readonly');"; $js .= "jQuery('#imgBuscar".$_REQUEST['num_item']."').css('visibility' , 'hidden' );"; } - - $inCodCentroCusto = ( !is_null($arItensAlmoxarifado[$_REQUEST['num_item']]['inCodCentroCusto']) ) ? $arItensAlmoxarifado[$_REQUEST['num_item']]['inCodCentroCusto'] : $rsDetalheItem->getCampo('cod_centro_ordem'); - $stNomCentroCusto = ( !is_null($arItensAlmoxarifado[$_REQUEST['num_item']]['stNomCentroCusto']) ) ? $arItensAlmoxarifado[$_REQUEST['num_item']]['stNomCentroCusto'] : $rsDetalheItem->getCampo('nom_centro_ordem'); - + + $boLimparCentroCusto = 't'; + if( !is_null($arItensAlmoxarifado[$_REQUEST['num_item']]['inCodCentroCusto']) ){ + $inCodCentroCusto = $arItensAlmoxarifado[$_REQUEST['num_item']]['inCodCentroCusto']; + $stNomCentroCusto = $arItensAlmoxarifado[$_REQUEST['num_item']]['stNomCentroCusto']; + }else{ + if( !is_null($rsDetalheItem->getCampo('cod_centro_empenho')) ){ + if( !is_null($rsDetalheItem->getCampo('cod_item_ordem')) || !is_null($rsDetalheItem->getCampo('cod_centro_solicitacao')) ){ + $js .= "jQuery('#inCodCentroCusto".$_REQUEST['num_item']."').attr('readonly' , 'readonly');"; + $js .= "jQuery('#imgBuscarCentroCusto".$_REQUEST['num_item']."').css('visibility' , 'hidden' );"; + $boLimparCentroCusto = 'f'; + } + } + $inCodCentroCusto = $rsDetalheItem->getCampo('cod_centro_empenho'); + $stNomCentroCusto = $rsDetalheItem->getCampo('nom_centro_empenho'); + } + $obCentroCustoUsuario = new IPopUpCentroCustoUsuario($obForm); - $obCentroCustoUsuario->setNull ( true ); - $obCentroCustoUsuario->setRotulo ( '*Centro de Custo' ); - $obCentroCustoUsuario->obCampoCod->setId ( 'inCodCentroCusto'.$_REQUEST['num_item'] ); - $obCentroCustoUsuario->obCampoCod->setName ( 'inCodCentroCusto'.$_REQUEST['num_item'] ); - $obCentroCustoUsuario->setId ( 'stNomCentroCusto'.$_REQUEST['num_item'] ); - $obCentroCustoUsuario->obCampoCod->setValue ( $inCodCentroCusto ); - $obCentroCustoUsuario->setValue ( $stNomCentroCusto ); - + $obCentroCustoUsuario->setNull ( true ); + $obCentroCustoUsuario->setRotulo ( '*Centro de Custo' ); + $obCentroCustoUsuario->obCampoCod->setId ( 'inCodCentroCusto'.$_REQUEST['num_item'] ); + $obCentroCustoUsuario->obCampoCod->setName ( 'inCodCentroCusto'.$_REQUEST['num_item'] ); + $obCentroCustoUsuario->setId ( 'stNomCentroCusto'.$_REQUEST['num_item'] ); + $obCentroCustoUsuario->obImagem->setId ( 'imgBuscarCentroCusto'.$_REQUEST['num_item'] ); + $obCentroCustoUsuario->obCampoCod->setValue ( $inCodCentroCusto ); + $obCentroCustoUsuario->setValue ( $stNomCentroCusto ); + $inMarca = ( !is_null($arItensAlmoxarifado[$_REQUEST['num_item']]['inMarca']) ) ? $arItensAlmoxarifado[$_REQUEST['num_item']]['inMarca'] : $rsDetalheItem->getCampo('cod_marca_ordem'); $stNomMarca = ( !is_null($arItensAlmoxarifado[$_REQUEST['num_item']]['stNomMarca']) ) ? $arItensAlmoxarifado[$_REQUEST['num_item']]['stNomMarca'] : $rsDetalheItem->getCampo('nom_marca_ordem'); - + $obMarca = new IPopUpMarca( new Form); $obMarca->setNull ( true ); $obMarca->setRotulo ( '*Marca' ); @@ -485,19 +514,19 @@ case 'detalharItem' : $obMarca->obCampoCod->setId ( 'inMarca'.$_REQUEST['num_item'] ); $obMarca->obCampoCod->setValue ( $inMarca ); $obMarca->setValue ( $stNomMarca ); - + $obBtnIncluir = new Button; $obBtnIncluir->setName ( "btnIncluir".$_REQUEST['num_item'] ); $obBtnIncluir->setValue ( "Incluir" ); $obBtnIncluir->setTipo ( "button" ); $obBtnIncluir->setDisabled ( false ); - $obBtnIncluir->obEvento->setOnClick ( "incluirItem(".$_REQUEST['num_item'].", '".$_REQUEST['linha_table_tree']."');" ); - + $obBtnIncluir->obEvento->setOnClick ( "incluirItem(".$_REQUEST['num_item'].", '".$_REQUEST['linha_table_tree']."');" ); + $obBtnLimpar = new Button; $obBtnLimpar->setName ( "btnLimpar".$_REQUEST['num_item'] ); $obBtnLimpar->setValue ( "Limpar" ); $obBtnLimpar->setTipo ( "button" ); - $obBtnLimpar->obEvento->setOnClick ( "limpaItem(".$_REQUEST['num_item'].", '".$rsDetalheItem->getCampo('bo_centro_marca')."');" ); + $obBtnLimpar->obEvento->setOnClick ( "limpaItem(".$_REQUEST['num_item'].", '".$boCentroMarca."', '".$boLimparCentroCusto."');" ); } $obLblItem = new Label(); @@ -516,7 +545,7 @@ case 'detalharItem' : $obFormulario->addForm( $obForm ); $obFormulario->addTitulo( $stTitulo ); - if ( ($rsDetalheItem->getCampo('bo_centro_marca')=='f')||$_REQUEST['stAcao'] == 'consultar'||$_REQUEST['stAcao'] == 'anular' ) { + if ( ($rsDetalheItem->getCampo('bo_centro_marca')=='f')||$_REQUEST['stAcao'] == 'consultar'||$_REQUEST['stAcao'] == 'anular' ) { $obFormulario->addComponente( $obLblCodItem ); }else{ $obFormulario->addComponente( $obIPopUpCatalogoItem ); @@ -527,8 +556,8 @@ case 'detalharItem' : $obFormulario->addComponente( $obLblItem ); $obFormulario->addComponente( $obLblGrandeza ); $obFormulario->addComponente( $obLblUnidade ); - - if ( ($rsDetalheItem->getCampo('bo_centro_marca')=='t')&&$_REQUEST['stAcao'] != 'consultar'&&$_REQUEST['stAcao'] != 'anular' ) + + if ( ($rsDetalheItem->getCampo('bo_centro_marca')=='t') && $_REQUEST['stAcao'] != 'consultar' && $_REQUEST['stAcao'] != 'anular' ) $obFormulario->defineBarra ( array( $obBtnIncluir , $obBtnLimpar ) ); $obFormulario->show(); @@ -536,7 +565,7 @@ case 'detalharItem' : break; case 'delItem': - $stJs = delItem( $_GET['inNumItem'] ); + $stJs = delItem( $_REQUEST['inNumItem'] ); break; case 'BuscaOrdemCompraItens': @@ -544,7 +573,7 @@ case 'detalharItem' : break; case 'BuscaEmpenhoItens': - $stJs = BuscaEmpenhoItens( $_REQUEST['inCodEmpenho'],$_REQUEST['inCodEntidade'],$stTipoOrdem, $stAcao); + $stJs = BuscaEmpenhoItens( $_REQUEST['inCodEmpenho'],$_REQUEST['inCodEntidade'],$stTipoOrdem, $stAcao); break; case 'incluirItem': @@ -560,15 +589,15 @@ case 'detalharItem' : $arItensAlmoxarifado = is_array(Sessao::read('arItensAlmoxarifado')) ? Sessao::read('arItensAlmoxarifado') : array(); - $arItensAlmoxarifado[$idItem]['inCodItem'] = $_REQUEST['inCodItem'.$idItem]; - $arItensAlmoxarifado[$idItem]['stNomItem'] = $_REQUEST['stNomItem'.$idItem]; - $arItensAlmoxarifado[$idItem]['inCodCentroCusto'] = $_REQUEST['inCodCentroCusto'.$idItem]; - $arItensAlmoxarifado[$idItem]['stNomCentroCusto'] = $_REQUEST['stNomCentroCusto'.$idItem]; - $arItensAlmoxarifado[$idItem]['inMarca'] = $_REQUEST['inMarca'.$idItem]; - $arItensAlmoxarifado[$idItem]['stNomMarca'] = $_REQUEST['stNomMarca'.$idItem]; - + $arItensAlmoxarifado[$idItem]['inCodItem'] = $_REQUEST['inCodItem'.$idItem]; + $arItensAlmoxarifado[$idItem]['stNomItem'] = $_REQUEST['stNomItem'.$idItem]; + $arItensAlmoxarifado[$idItem]['inCodCentroCusto'] = $_REQUEST['inCodCentroCusto'.$idItem]; + $arItensAlmoxarifado[$idItem]['stNomCentroCusto'] = $_REQUEST['stNomCentroCusto'.$idItem]; + $arItensAlmoxarifado[$idItem]['inMarca'] = $_REQUEST['inMarca'.$idItem]; + $arItensAlmoxarifado[$idItem]['stNomMarca'] = $_REQUEST['stNomMarca'.$idItem]; + Sessao::write('arItensAlmoxarifado', $arItensAlmoxarifado); - + $js = "alertaAviso('Código do Item (".$_REQUEST['inCodItem'.$idItem].") vinculado ao Item - ".$stNomItem." ','form','erro','".Sessao::getId()."', '../');"; } break; @@ -579,7 +608,7 @@ case 'detalharItem' : $arItensTemp = array(); $arItens = Sessao::read('arItens'); - + foreach ($arItens as $key => $value) { if($value['num_item']==$idItem) $stNomItem = $value['nom_item']; diff --git a/gestaoPatrimonial/fontes/PHP/compras/instancias/ordemCompra/PRManterOrdemCompra.php b/gestaoPatrimonial/fontes/PHP/compras/instancias/ordemCompra/PRManterOrdemCompra.php index 3e7fe58..f2f14a3 100644 --- a/gestaoPatrimonial/fontes/PHP/compras/instancias/ordemCompra/PRManterOrdemCompra.php +++ b/gestaoPatrimonial/fontes/PHP/compras/instancias/ordemCompra/PRManterOrdemCompra.php @@ -32,17 +32,17 @@ * @ignore - $Id: PRManterOrdemCompra.php 62696 2015-06-09 14:19:37Z michel $ + $Id: PRManterOrdemCompra.php 64005 2015-11-17 16:49:06Z michel $ */ require_once '../../../../../../gestaoAdministrativa/fontes/PHP/pacotes/FrameworkHTML.inc.php'; require_once '../../../../../../gestaoAdministrativa/fontes/PHP/framework/include/cabecalho.inc.php'; -require_once(TCOM."TComprasOrdem.class.php"); -require_once(TCOM."TComprasOrdemItem.class.php"); -require_once(TCOM."TComprasOrdemAnulacao.class.php"); -require_once(TCOM."TComprasOrdemItemAnulacao.class.php"); -include_once(CAM_GF_EMP_MAPEAMENTO."TEmpenhoItemPreEmpenho.class.php"); -include_once(TALM."TAlmoxarifadoCatalogoItemMarca.class.php"); +require_once TCOM."TComprasOrdem.class.php"; +require_once TCOM."TComprasOrdemItem.class.php"; +require_once TCOM."TComprasOrdemAnulacao.class.php"; +require_once TCOM."TComprasOrdemItemAnulacao.class.php"; +include_once CAM_GF_EMP_MAPEAMENTO."TEmpenhoItemPreEmpenho.class.php"; +include_once TALM."TAlmoxarifadoCatalogoItemMarca.class.php"; //Define o nome dos arquivos PHP $stPrograma = "ManterOrdemCompra"; @@ -126,16 +126,16 @@ if ($obErro == true) { $stExercicioOrdemCompra = Sessao::getExercicio(); $obTOrdemCompra = new TComprasOrdem(); - $obTOrdemCompra->setDado('exercicio_empenho',$_REQUEST["stExercicioEmpenho"]); - $obTOrdemCompra->setDado('cod_entidade',$_REQUEST['inCodEntidade']); - $obTOrdemCompra->setDado('exercicio',Sessao::getExercicio()); - $obTOrdemCompra->setDado('tipo', $stTipoOrdem); + $obTOrdemCompra->setDado('exercicio_empenho' , $_REQUEST["stExercicioEmpenho"] ); + $obTOrdemCompra->setDado('cod_entidade' , $_REQUEST['inCodEntidade'] ); + $obTOrdemCompra->setDado('exercicio' , Sessao::getExercicio() ); + $obTOrdemCompra->setDado('tipo' , $stTipoOrdem ); $obTOrdemCompra->proximoCod($inCodOrdem); - $obTOrdemCompra->setDado('cod_ordem', $inCodOrdem); - $obTOrdemCompra->setDado('cod_empenho', $_REQUEST["inCodEmpenho"]); - $obTOrdemCompra->setDado('observacao', $_REQUEST["stObservacao"]); + $obTOrdemCompra->setDado('cod_ordem' , $inCodOrdem); + $obTOrdemCompra->setDado('cod_empenho' , $_REQUEST["inCodEmpenho"] ); + $obTOrdemCompra->setDado('observacao' , $_REQUEST["stObservacao"] ); if($_REQUEST['inEntrega']) - $obTOrdemCompra->setDado('numcgm_entrega', $_REQUEST['inEntrega']); + $obTOrdemCompra->setDado('numcgm_entrega' , $_REQUEST['inEntrega'] ); $obTOrdemCompra->inclusao(); $inCount = 1; @@ -155,7 +155,7 @@ if ($obErro == true) { $obTOrdemCompraItem->setDado('tipo' , $stTipoOrdem ); $obTOrdemCompraItem->setDado('vl_total' , ($value['vl_unitario'] * $inQuantidade) ); $obTOrdemCompraItem->inclusao(); - + if(is_array($arItensAlmoxarifado[$value['num_item']])){ $obTEmpenhoItemPreEmpenho = new TEmpenhoItemPreEmpenho; $obTAlmoxarifadoCatalogoItemMarca = new TAlmoxarifadoCatalogoItemMarca; @@ -163,40 +163,41 @@ if ($obErro == true) { $obTEmpenhoItemPreEmpenho->setDado( "exercicio" , $_REQUEST['stExercicioEmpenho'] ); $obTEmpenhoItemPreEmpenho->setDado( "cod_pre_empenho" , $value['cod_pre_empenho'] ); $obTEmpenhoItemPreEmpenho->setDado( "num_item" , $value['num_item'] ); - + $obTEmpenhoItemPreEmpenho->recuperaPorChave($rsItemPreEmpenho); while (!$rsItemPreEmpenho->eof()) { - $obTEmpenhoItemPreEmpenho->setDado( "cod_unidade" , $rsItemPreEmpenho->getCampo("cod_unidade") ); - $obTEmpenhoItemPreEmpenho->setDado( "cod_grandeza" , $rsItemPreEmpenho->getCampo("cod_grandeza") ); - $obTEmpenhoItemPreEmpenho->setDado( "quantidade" , $rsItemPreEmpenho->getCampo("quantidade") ); - $obTEmpenhoItemPreEmpenho->setDado( "nom_unidade" , $rsItemPreEmpenho->getCampo("nom_unidade") ); - $obTEmpenhoItemPreEmpenho->setDado( "sigla_unidade" , $rsItemPreEmpenho->getCampo("sigla_unidade") ); - $obTEmpenhoItemPreEmpenho->setDado( "vl_total" , $rsItemPreEmpenho->getCampo("vl_total") ); - $obTEmpenhoItemPreEmpenho->setDado( "nom_item" , $rsItemPreEmpenho->getCampo("nom_item") ); - $obTEmpenhoItemPreEmpenho->setDado( "complemento" , $rsItemPreEmpenho->getCampo("complemento") ); - $obTEmpenhoItemPreEmpenho->setDado( "cod_item" , $value['cod_item'] ); - + $obTEmpenhoItemPreEmpenho->setDado( "cod_unidade" , $rsItemPreEmpenho->getCampo("cod_unidade") ); + $obTEmpenhoItemPreEmpenho->setDado( "cod_grandeza" , $rsItemPreEmpenho->getCampo("cod_grandeza") ); + $obTEmpenhoItemPreEmpenho->setDado( "quantidade" , $rsItemPreEmpenho->getCampo("quantidade") ); + $obTEmpenhoItemPreEmpenho->setDado( "nom_unidade" , $rsItemPreEmpenho->getCampo("nom_unidade") ); + $obTEmpenhoItemPreEmpenho->setDado( "sigla_unidade" , $rsItemPreEmpenho->getCampo("sigla_unidade") ); + $obTEmpenhoItemPreEmpenho->setDado( "vl_total" , $rsItemPreEmpenho->getCampo("vl_total") ); + $obTEmpenhoItemPreEmpenho->setDado( "nom_item" , $rsItemPreEmpenho->getCampo("nom_item") ); + $obTEmpenhoItemPreEmpenho->setDado( "complemento" , $rsItemPreEmpenho->getCampo("complemento") ); + $obTEmpenhoItemPreEmpenho->setDado( "cod_centro" , $arItensAlmoxarifado[$value['num_item']]['inCodCentroCusto'] ); + /* *Ticket #22576, NÃO está efetuando o update na tabela empenho.item_pre_empenho->cod_item, pois foi definido *com o Gelson, que se o empenho não possui codigo de item, a melhor situação é incluir na tabela compras.ordem_item *E a verificação de cod_item, passa inicialmente a ser feita na tabela compras.ordem_item NÃO anulada. *Se a tabela empenho.item_pre_empenho já possui cod_item, a tabela compras.ordem_item utilizara o mesmo cod_item. */ - //$obTEmpenhoItemPreEmpenho->alteracao(); + //$obTEmpenhoItemPreEmpenho->setDado( "cod_item" , $value['cod_item'] ); + $obTEmpenhoItemPreEmpenho->alteracao(); $rsItemPreEmpenho->proximo(); } - + $stFiltro = " AND acim.cod_marca = ".$arItensAlmoxarifado[$value['num_item']]['inMarca']." AND acim.cod_item = ".$value['cod_item']; $obTAlmoxarifadoCatalogoItemMarca->recuperaItemMarca($rsItemMarca, $stFiltro); - + if ($rsItemMarca->getNumLinhas() < 1) { - $obTAlmoxarifadoCatalogoItemMarca->setDado('cod_item',$value['cod_item']); - $obTAlmoxarifadoCatalogoItemMarca->setDado('cod_marca',$arItensAlmoxarifado[$value['num_item']]['inMarca']); + $obTAlmoxarifadoCatalogoItemMarca->setDado('cod_item' , $value['cod_item'] ); + $obTAlmoxarifadoCatalogoItemMarca->setDado('cod_marca' , $arItensAlmoxarifado[$value['num_item']]['inMarca'] ); $obTAlmoxarifadoCatalogoItemMarca->inclusao(); } - + $obTOrdemCompraItem->setDado('exercicio' , Sessao::getExercicio() ); $obTOrdemCompraItem->setDado('exercicio_pre_empenho', $_REQUEST['stExercicioEmpenho'] ); $obTOrdemCompraItem->setDado('cod_entidade' , $_REQUEST['inCodEntidade'] ); @@ -209,7 +210,7 @@ if ($obErro == true) { $obTOrdemCompraItem->setDado('cod_marca' , $arItensAlmoxarifado[$value['num_item']]['inMarca'] ); $obTOrdemCompraItem->setDado('cod_item' , $value['cod_item'] ); $obTOrdemCompraItem->setDado('cod_centro' , $arItensAlmoxarifado[$value['num_item']]['inCodCentroCusto'] ); - + $obTOrdemCompraItem->alteracao(); } } @@ -244,23 +245,23 @@ if ($obErro == true) { $obTOrdemCompraItem->setDado('cod_ordem' , $_REQUEST['inCodOrdemCompra'] ); $obTOrdemCompraItem->setDado('exercicio_pre_empenho', $_REQUEST['stExercicioEmpenho'] ); $obTOrdemCompraItem->setDado('tipo' , $stTipoOrdem ); - + $obTOrdemCompraItem->recuperaPorChave($rsOrdemCompraItem); - + $obTOrdemCompraItem->exclusao(); - + while (!$rsOrdemCompraItem->eof()) { if(!is_null($rsOrdemCompraItem->getCampo("cod_item"))&&!is_null($rsOrdemCompraItem->getCampo("cod_marca"))){ $obTOrdemCompraItem = new TComprasOrdemItem(); $stFiltro = ' WHERE cod_marca='.$rsOrdemCompraItem->getCampo("cod_marca"); $stFiltro .= ' AND cod_item='.$rsOrdemCompraItem->getCampo("cod_item"); $obTOrdemCompraItem->recuperaTodos($rsCatalogoItemMarca, $stFiltro); - + if($rsCatalogoItemMarca->getNumLinhas() < 1){ $obTAlmoxarifadoCatalogoItemMarca = new TAlmoxarifadoCatalogoItemMarca; $obTAlmoxarifadoCatalogoItemMarca->setDado('cod_item' , $rsOrdemCompraItem->getCampo("cod_item") ); $obTAlmoxarifadoCatalogoItemMarca->setDado('cod_marca' , $rsOrdemCompraItem->getCampo("cod_marca") ); - + $obTAlmoxarifadoCatalogoItemMarca->exclusao(); } } @@ -274,7 +275,7 @@ if ($obErro == true) { $inQuantidade = str_replace(',','.',str_replace('.','',$_REQUEST['qtdeOC_'.$inCount])); if ($inQuantidade > 0) { $obTOrdemCompraItem->setDado('exercicio' , $_REQUEST['stExercicioOrdemCompra'] ); - $obTOrdemCompraItem->setDado('exercicio_pre_empenho',$_REQUEST['stExercicioEmpenho'] ); + $obTOrdemCompraItem->setDado('exercicio_pre_empenho', $_REQUEST['stExercicioEmpenho'] ); $obTOrdemCompraItem->setDado('cod_entidade' , $_REQUEST['inCodEntidade'] ); $obTOrdemCompraItem->setDado('cod_ordem' , $_REQUEST['inCodOrdemCompra'] ); $obTOrdemCompraItem->setDado('num_item' , $stValor['num_item'] ); @@ -283,7 +284,7 @@ if ($obErro == true) { $obTOrdemCompraItem->setDado('vl_total' , $inQuantidade * $stValor['vl_unitario'] ); $obTOrdemCompraItem->setDado('tipo' , $stTipoOrdem ); $obTOrdemCompraItem->inclusao(); - + if(is_array($arItensAlmoxarifado[$stValor['num_item']])){ $obTEmpenhoItemPreEmpenho = new TEmpenhoItemPreEmpenho; $obTAlmoxarifadoCatalogoItemMarca = new TAlmoxarifadoCatalogoItemMarca; @@ -291,31 +292,32 @@ if ($obErro == true) { $obTEmpenhoItemPreEmpenho->setDado( "exercicio" , $_REQUEST['stExercicioEmpenho'] ); $obTEmpenhoItemPreEmpenho->setDado( "cod_pre_empenho" , $stValor['cod_pre_empenho'] ); $obTEmpenhoItemPreEmpenho->setDado( "num_item" , $stValor['num_item'] ); - + $obTEmpenhoItemPreEmpenho->recuperaPorChave($rsItemPreEmpenho); while (!$rsItemPreEmpenho->eof()) { - $obTEmpenhoItemPreEmpenho->setDado( "cod_unidade" , $rsItemPreEmpenho->getCampo("cod_unidade") ); - $obTEmpenhoItemPreEmpenho->setDado( "cod_grandeza" , $rsItemPreEmpenho->getCampo("cod_grandeza") ); - $obTEmpenhoItemPreEmpenho->setDado( "quantidade" , $rsItemPreEmpenho->getCampo("quantidade") ); - $obTEmpenhoItemPreEmpenho->setDado( "nom_unidade" , $rsItemPreEmpenho->getCampo("nom_unidade") ); - $obTEmpenhoItemPreEmpenho->setDado( "sigla_unidade" , $rsItemPreEmpenho->getCampo("sigla_unidade") ); - $obTEmpenhoItemPreEmpenho->setDado( "vl_total" , $rsItemPreEmpenho->getCampo("vl_total") ); - $obTEmpenhoItemPreEmpenho->setDado( "nom_item" , $rsItemPreEmpenho->getCampo("nom_item") ); - $obTEmpenhoItemPreEmpenho->setDado( "complemento" , $rsItemPreEmpenho->getCampo("complemento") ); - $obTEmpenhoItemPreEmpenho->setDado( "cod_item" , $stValor['cod_item'] ); - + $obTEmpenhoItemPreEmpenho->setDado( "cod_unidade" , $rsItemPreEmpenho->getCampo("cod_unidade") ); + $obTEmpenhoItemPreEmpenho->setDado( "cod_grandeza" , $rsItemPreEmpenho->getCampo("cod_grandeza") ); + $obTEmpenhoItemPreEmpenho->setDado( "quantidade" , $rsItemPreEmpenho->getCampo("quantidade") ); + $obTEmpenhoItemPreEmpenho->setDado( "nom_unidade" , $rsItemPreEmpenho->getCampo("nom_unidade") ); + $obTEmpenhoItemPreEmpenho->setDado( "sigla_unidade" , $rsItemPreEmpenho->getCampo("sigla_unidade") ); + $obTEmpenhoItemPreEmpenho->setDado( "vl_total" , $rsItemPreEmpenho->getCampo("vl_total") ); + $obTEmpenhoItemPreEmpenho->setDado( "nom_item" , $rsItemPreEmpenho->getCampo("nom_item") ); + $obTEmpenhoItemPreEmpenho->setDado( "complemento" , $rsItemPreEmpenho->getCampo("complemento") ); + $obTEmpenhoItemPreEmpenho->setDado( "cod_centro" , $arItensAlmoxarifado[$stValor['num_item']]['inCodCentroCusto'] ); + /* *Ticket #22576, NÃO está efetuando o update na tabela empenho.item_pre_empenho->cod_item, pois foi definido *com o Gelson, que se o empenho não possui codigo de item, a melhor situação é incluir na tabela compras.ordem_item *E a verificação de cod_item, passa inicialmente a ser feita na tabela compras.ordem_item NÃO anulada. *Se a tabela empenho.item_pre_empenho já possui cod_item, a tabela compras.ordem_item utilizara o mesmo cod_item. */ - //$obTEmpenhoItemPreEmpenho->alteracao(); + //$obTEmpenhoItemPreEmpenho->setDado( "cod_item" , $stValor['cod_item'] ); + $obTEmpenhoItemPreEmpenho->alteracao(); $rsItemPreEmpenho->proximo(); } - + $stFiltro = " AND acim.cod_marca = ".$arItensAlmoxarifado[$stValor['num_item']]['inMarca']." AND acim.cod_item = ".$stValor['cod_item']; $obTAlmoxarifadoCatalogoItemMarca->recuperaItemMarca($rsItemMarca, $stFiltro); @@ -324,7 +326,7 @@ if ($obErro == true) { $obTAlmoxarifadoCatalogoItemMarca->setDado('cod_marca' , $arItensAlmoxarifado[$stValor['num_item']]['inMarca'] ); $obTAlmoxarifadoCatalogoItemMarca->inclusao(); } - + $obTOrdemCompraItem->setDado('exercicio' , Sessao::getExercicio()); $obTOrdemCompraItem->setDado('exercicio_pre_empenho', $_REQUEST['stExercicioEmpenho'] ); $obTOrdemCompraItem->setDado('cod_entidade' , $_REQUEST['inCodEntidade'] ); @@ -337,7 +339,7 @@ if ($obErro == true) { $obTOrdemCompraItem->setDado('cod_marca' , $arItensAlmoxarifado[$stValor['num_item']]['inMarca'] ); $obTOrdemCompraItem->setDado('cod_item' , $stValor['cod_item'] ); $obTOrdemCompraItem->setDado('cod_centro' , $arItensAlmoxarifado[$stValor['num_item']]['inCodCentroCusto'] ); - + $obTOrdemCompraItem->alteracao(); } } @@ -347,13 +349,12 @@ if ($obErro == true) { case "anular": case "anularOS": - $obTOrdemCompraAnulacao = new TComprasOrdemAnulacao(); - $obTOrdemCompraAnulacao->setDado('exercicio', $_REQUEST['stExercicioOrdemCompra']); - $obTOrdemCompraAnulacao->setDado('cod_entidade', $_REQUEST['inCodEntidade']); - $obTOrdemCompraAnulacao->setDado('cod_ordem', $_REQUEST['inCodOrdemCompra']); - $obTOrdemCompraAnulacao->setDado('motivo', $_REQUEST['stMotivo']); - $obTOrdemCompraAnulacao->setDado('tipo', $stTipoOrdem); + $obTOrdemCompraAnulacao->setDado('exercicio' , $_REQUEST['stExercicioOrdemCompra'] ); + $obTOrdemCompraAnulacao->setDado('cod_entidade' , $_REQUEST['inCodEntidade'] ); + $obTOrdemCompraAnulacao->setDado('cod_ordem' , $_REQUEST['inCodOrdemCompra'] ); + $obTOrdemCompraAnulacao->setDado('motivo' , $_REQUEST['stMotivo'] ); + $obTOrdemCompraAnulacao->setDado('tipo' , $stTipoOrdem ); $obTOrdemCompraAnulacao->inclusao(); $obTOrdemCompraAnulacao->recuperaDados( $rsOrdemCompraAnulacao ); @@ -364,16 +365,16 @@ if ($obErro == true) { $flQuantidade = str_replace(",", ".", str_replace(".", "", $stValor["quantidade_original"])); if ($flQuantidade > 0) { $obTOrdemCompraItemAnulacao = new TComprasOrdemItemAnulacao(); - $obTOrdemCompraItemAnulacao->setDado('exercicio', $rsOrdemCompraAnulacao->getCampo("exercicio")); - $obTOrdemCompraItemAnulacao->setDado('cod_entidade', $rsOrdemCompraAnulacao->getCampo("cod_entidade")); - $obTOrdemCompraItemAnulacao->setDado('cod_ordem', $rsOrdemCompraAnulacao->getCampo("cod_ordem")); - $obTOrdemCompraItemAnulacao->setDado('cod_pre_empenho', $stValor["cod_pre_empenho"]); - $obTOrdemCompraItemAnulacao->setDado('num_item', $stValor["num_item"]); - $obTOrdemCompraItemAnulacao->setDado('timestamp', $rsOrdemCompraAnulacao->getCampo("timestamp")); - $obTOrdemCompraItemAnulacao->setDado('quantidade', $flQuantidade); - $obTOrdemCompraItemAnulacao->setDado('vl_total', $flQuantidade * $stValor['vl_unitario']); - $obTOrdemCompraItemAnulacao->setDado('tipo', $stTipoOrdem); - $obTOrdemCompraItemAnulacao->setDado('exercicio_pre_empenho',$_REQUEST['stExercicioEmpenho']); + $obTOrdemCompraItemAnulacao->setDado('exercicio' , $rsOrdemCompraAnulacao->getCampo("exercicio") ); + $obTOrdemCompraItemAnulacao->setDado('cod_entidade' , $rsOrdemCompraAnulacao->getCampo("cod_entidade") ); + $obTOrdemCompraItemAnulacao->setDado('cod_ordem' , $rsOrdemCompraAnulacao->getCampo("cod_ordem") ); + $obTOrdemCompraItemAnulacao->setDado('cod_pre_empenho' , $stValor["cod_pre_empenho"] ); + $obTOrdemCompraItemAnulacao->setDado('num_item' , $stValor["num_item"] ); + $obTOrdemCompraItemAnulacao->setDado('timestamp' , $rsOrdemCompraAnulacao->getCampo("timestamp") ); + $obTOrdemCompraItemAnulacao->setDado('quantidade' , $flQuantidade ); + $obTOrdemCompraItemAnulacao->setDado('vl_total' , $flQuantidade * $stValor['vl_unitario'] ); + $obTOrdemCompraItemAnulacao->setDado('tipo' , $stTipoOrdem ); + $obTOrdemCompraItemAnulacao->setDado('exercicio_pre_empenho', $_REQUEST['stExercicioEmpenho'] ); $obTOrdemCompraItemAnulacao->inclusao(); } } diff --git a/gestaoPatrimonial/fontes/PHP/compras/instancias/solicitacaoCompra/OCManterAnulacaoSolicitacaoCompra.php b/gestaoPatrimonial/fontes/PHP/compras/instancias/solicitacaoCompra/OCManterAnulacaoSolicitacaoCompra.php index f5d3bf1..91bf593 100644 --- a/gestaoPatrimonial/fontes/PHP/compras/instancias/solicitacaoCompra/OCManterAnulacaoSolicitacaoCompra.php +++ b/gestaoPatrimonial/fontes/PHP/compras/instancias/solicitacaoCompra/OCManterAnulacaoSolicitacaoCompra.php @@ -55,29 +55,31 @@ function montaListaDotacoesAnular($arRecordSetItem) $table->setRecordset( $rsDotacoesItem ); $table->setSummary('Itens da Solicitação'); - //$table->setConditional( true , "#efefef" ); - - $table->Head->addCabecalho('Item' , 35); - $table->Head->addCabecalho('Unidade' , 15); - $table->Head->addCabecalho('Centro de Custo' , 25); + $table->Head->addCabecalho('Item' , 25); + $table->Head->addCabecalho('Unidade' , 8); + $table->Head->addCabecalho('Centro de Custo' , 20); $table->Head->addCabecalho('Quantidade Pendente' , 10); - $table->Head->addCabecalho('Quantidade Anular' , 15); + $table->Head->addCabecalho('Quantidade Anular' , 10); $table->Head->addCabecalho('Valor Pendente' , 10); - $table->Head->addCabecalho('Valor Anular' , 15); + $table->Head->addCabecalho('Valor Anular' , 10); - $obQuantidadeTotalAnulada = new TextBox; + $obQuantidadeTotalAnulada = new Numerico(); $obQuantidadeTotalAnulada->setName ( "nuQtTotalAnulada"); $obQuantidadeTotalAnulada->setNull ( false ); - $obQuantidadeTotalAnulada->setSize ( 10 ); - $obQuantidadeTotalAnulada->obEvento->setOnKeyUp("mascaraMoeda(this,2,event,false);"); - $obQuantidadeTotalAnulada->obEvento->setOnBlur ("floatDecimal(this, '2', event ); ajaxJavaScript('".$pgOcul."?".Sessao::getId()."&id='+this.id+'&nuQtTotalAnulada='+this.value, 'validaQntTotalAnulada' );"); + $obQuantidadeTotalAnulada->setDefinicao("NUMERIC"); + $obQuantidadeTotalAnulada->setSize ( 14 ); + $obQuantidadeTotalAnulada->setMaxLength( 13 ); + $obQuantidadeTotalAnulada->setDecimais( 4 ); + $obQuantidadeTotalAnulada->obEvento->setOnBlur ("floatDecimal(this, '4', event ); ajaxJavaScript('".$pgOcul."?".Sessao::getId()."&id='+this.id+'&nuQtTotalAnulada='+this.value, 'validaQntTotalAnulada' );"); $obValorTotalAnulada = new TextBox; $obValorTotalAnulada->setName ( "nuVlTotalAnulado" ); $obValorTotalAnulada->setNull ( false ); - $obValorTotalAnulada->setSize ( 10 ); $obValorTotalAnulada->setDisabled( true ); - + $obValorTotalAnulada->setDecimais ( 2 ); + $obValorTotalAnulada->setSize ( 23 ); + $obValorTotalAnulada->setMaxLength( 21 ); + $table->Body->addCampo("[cod_item] - [descricao_resumida]" , "E", "Item"); $table->Body->addCampo('nom_unidade' , "E", "Unidade"); $table->Body->addCampo('descricao' , "E", "Centro de Custo"); @@ -166,6 +168,7 @@ function validaQntTotalAnulada($id, $nuQtTotalAnulada) $nuVlUnitario = $vl_pendente / $qnt_pendente; $nuVlAnular = $nuVlUnitario * $nuQtTotalAnulada; $nuVlAnular = number_format( $nuVlAnular , 2, ",","."); + $nuQtTotalAnulada = number_format( $nuQtTotalAnulada, 4, ",", "." ); $stJs .= atualizaValorQuantidadeAnular($id, $nuVlAnular, $nuQtTotalAnulada); $stJs .= "jq('#nuVlTotalAnulado_".$id."').val('".$nuVlAnular."');"; diff --git a/gestaoPatrimonial/fontes/PHP/compras/instancias/solicitacaoCompra/OCManterHomologacaoSolicitacaoCompra.php b/gestaoPatrimonial/fontes/PHP/compras/instancias/solicitacaoCompra/OCManterHomologacaoSolicitacaoCompra.php index db4e5e2..6dbd7ff 100644 --- a/gestaoPatrimonial/fontes/PHP/compras/instancias/solicitacaoCompra/OCManterHomologacaoSolicitacaoCompra.php +++ b/gestaoPatrimonial/fontes/PHP/compras/instancias/solicitacaoCompra/OCManterHomologacaoSolicitacaoCompra.php @@ -30,7 +30,7 @@ * @author Analista : Cleisson * @author Desenvolvedor: Bruce Cruz de Sena - $Id: OCManterHomologacaoSolicitacaoCompra.php 63367 2015-08-20 21:27:34Z michel $ + $Id: OCManterHomologacaoSolicitacaoCompra.php 63865 2015-10-27 13:55:57Z franver $ * Casos de uso: uc-03.04.02 */ @@ -79,13 +79,13 @@ function montaSpanItens($exercicio, $cod_entidade, $cod_solicitacao, $registro_p $obLista->addCabecalho(); $obLista->ultimoCabecalho->addConteudo(" "); - $obLista->ultimoCabecalho->setWidth(5 ); + $obLista->ultimoCabecalho->setWidth( 3 ); $obLista->ultimoCabecalho->setRowSpan( 2 ); $obLista->commitCabecalho(); $obLista->addCabecalho(); $obLista->ultimoCabecalho->addConteudo('Item'); - $obLista->ultimoCabecalho->setWidth( 17 ); + $obLista->ultimoCabecalho->setWidth( 24 ); $obLista->ultimoCabecalho->setRowSpan( 2 ); $obLista->commitCabecalho(); @@ -97,20 +97,20 @@ function montaSpanItens($exercicio, $cod_entidade, $cod_solicitacao, $registro_p $obLista->addCabecalho(); $obLista->ultimoCabecalho->addConteudo('Centro de Custo'); - $obLista->ultimoCabecalho->setWidth( 5 ); + $obLista->ultimoCabecalho->setWidth( 13 ); $obLista->ultimoCabecalho->setRowSpan( 2 ); $obLista->commitCabecalho(); $obLista->addCabecalho(); $obLista->ultimoCabecalho->addConteudo("Saldo da Solicitação"); - $obLista->ultimoCabecalho->setWidth( 32 ); + $obLista->ultimoCabecalho->setWidth( 28 ); $obLista->ultimoCabecalho->setColSpan( 3 ); $obLista->commitCabecalho(); if($registro_precos=='f' && $stReserva=='reserva_rigida'){ $obLista->addCabecalho(); $obLista->ultimoCabecalho->addConteudo("Reserva Saldos"); - $obLista->ultimoCabecalho->setWidth( 27 ); + $obLista->ultimoCabecalho->setWidth( 26 ); $obLista->ultimoCabecalho->setColSpan( 4 ); $obLista->commitCabecalho(); } @@ -133,12 +133,12 @@ function montaSpanItens($exercicio, $cod_entidade, $cod_solicitacao, $registro_p if($registro_precos=='f' && $stReserva=='reserva_rigida'){ $obLista->addCabecalho( ); $obLista->ultimoCabecalho->addConteudo("Dotação"); - $obLista->ultimoCabecalho->setWidth( 6 ); + $obLista->ultimoCabecalho->setWidth( 5 ); $obLista->commitCabecalho(); $obLista->addCabecalho( ); $obLista->ultimoCabecalho->addConteudo("Desdobramento"); - $obLista->ultimoCabecalho->setWidth( 12 ); + $obLista->ultimoCabecalho->setWidth( 10 ); $obLista->commitCabecalho(); $obLista->addCabecalho( ); diff --git a/gestaoPatrimonial/fontes/PHP/compras/instancias/solicitacaoCompra/OCManterSolicitacaoCompra.php b/gestaoPatrimonial/fontes/PHP/compras/instancias/solicitacaoCompra/OCManterSolicitacaoCompra.php index 9f7afe1..29c6c03 100644 --- a/gestaoPatrimonial/fontes/PHP/compras/instancias/solicitacaoCompra/OCManterSolicitacaoCompra.php +++ b/gestaoPatrimonial/fontes/PHP/compras/instancias/solicitacaoCompra/OCManterSolicitacaoCompra.php @@ -32,7 +32,7 @@ * Casos de uso: uc-03.04.01 - $Id: OCManterSolicitacaoCompra.php 62979 2015-07-14 16:18:54Z michel $ + $Id: OCManterSolicitacaoCompra.php 64051 2015-11-24 17:55:39Z franver $ */ @@ -91,27 +91,29 @@ function montaListaDotacoesAnular($arRecordSetItem , $boExecuta = true) $table->setRecordset( $rsDotacoesItem ); $table->setSummary('Itens da Solicitação'); - $table->Head->addCabecalho('Item' , 35); - $table->Head->addCabecalho('Unidade' , 15); - $table->Head->addCabecalho('Centro de Custo' , 25); + $table->Head->addCabecalho('Item' , 25); + $table->Head->addCabecalho('Unidade' , 8); + $table->Head->addCabecalho('Centro de Custo' , 20); $table->Head->addCabecalho('Quantidade Pendente' , 10); - $table->Head->addCabecalho('Quantidade Anular' , 15); + $table->Head->addCabecalho('Quantidade Anular' , 10); $table->Head->addCabecalho('Valor Pendente' , 10); - $table->Head->addCabecalho('Valor Anular' , 15); + $table->Head->addCabecalho('Valor Anular' , 10); - $obQuantidadeTotalAnulada = new TextBox; + $obQuantidadeTotalAnulada = new Numerico(); $obQuantidadeTotalAnulada->setName ( "nuQtTotalAnulada"); - $obQuantidadeTotalAnulada->setNull ( false ); - $obQuantidadeTotalAnulada->setSize ( 10 ); $obQuantidadeTotalAnulada->setId ( "" ); - $obQuantidadeTotalAnulada->obEvento->setOnKeyUp("mascaraMoeda(this,4,event,false);"); + $obQuantidadeTotalAnulada->setNull ( false ); + $obQuantidadeTotalAnulada->setDefinicao("NUMERIC"); + $obQuantidadeTotalAnulada->setSize ( 14 ); + $obQuantidadeTotalAnulada->setMaxLength( 13 ); + $obQuantidadeTotalAnulada->setDecimais( 4 ); $obQuantidadeTotalAnulada->obEvento->setOnBlur ("floatDecimal(this, '4', event ); ajaxJavaScript('".$pgOcul."?".Sessao::getId()."&id='+this.id+'&valorAnular='+this.value, 'calculaValorAnular' );"); $obValorTotalAnulada = new TextBox; $obValorTotalAnulada->setName ( "nuVlTotalAnulada" ); + $obValorTotalAnulada->setId ( "" ); $obValorTotalAnulada->setNull ( false ); $obValorTotalAnulada->setSize ( 10 ); - $obValorTotalAnulada->setId ( "" ); $obValorTotalAnulada->obEvento->setOnKeyUp ("mascaraMoeda(this, 2, event, false);"); $obValorTotalAnulada->obEvento->setOnBlur ("floatDecimal(this, '2', event);"); @@ -204,15 +206,15 @@ function montaListaDotacoesConsulta($arRecordSetItem , $boExecuta = true) $table->setRecordset( $rsDotacoesItem ); $table->setSummary('Itens da Solicitação'); - $table->Head->addCabecalho('Item' , 18); - $table->Head->addCabecalho('Unidade' , 10); - $table->Head->addCabecalho('Centro de Custo' , 10); - $table->Head->addCabecalho('Qtde. Solicitada' , 10); - $table->Head->addCabecalho('Qtde. Anulada' , 10); - $table->Head->addCabecalho('Qtde. Mapa' , 8); - $table->Head->addCabecalho('Valor Solicitado' , 8); - $table->Head->addCabecalho('Valor Anulado' , 8); - $table->Head->addCabecalho('Valor Mapa' , 8); + $table->Head->addCabecalho('Item' , 20); + $table->Head->addCabecalho('Unidade' , 8); + $table->Head->addCabecalho('Centro de Custo' , 12); + $table->Head->addCabecalho('Qtde. Solicitada' , 9); + $table->Head->addCabecalho('Qtde. Anulada' , 9); + $table->Head->addCabecalho('Qtde. Mapa' , 9); + $table->Head->addCabecalho('Valor Solicitado' , 10); + $table->Head->addCabecalho('Valor Anulado' , 10); + $table->Head->addCabecalho('Valor Mapa' , 10); $stTitle = "[stTitle]"; diff --git a/gestaoPatrimonial/fontes/PHP/compras/instancias/solicitacaoCompra/PRManterSolicitacaoCompra.php b/gestaoPatrimonial/fontes/PHP/compras/instancias/solicitacaoCompra/PRManterSolicitacaoCompra.php index d28148e..3895c3b 100644 --- a/gestaoPatrimonial/fontes/PHP/compras/instancias/solicitacaoCompra/PRManterSolicitacaoCompra.php +++ b/gestaoPatrimonial/fontes/PHP/compras/instancias/solicitacaoCompra/PRManterSolicitacaoCompra.php @@ -27,7 +27,7 @@ * Página de Processamento Manter Solicitação de Compra * Data de Criação : 21/09/2006 - $Id: PRManterSolicitacaoCompra.php 63367 2015-08-20 21:27:34Z michel $ + $Id: PRManterSolicitacaoCompra.php 63962 2015-11-11 18:32:34Z franver $ * @ignore @@ -369,14 +369,14 @@ switch ($stAcao) { # AGRUPA ITENS IGUAIS PARA LANÇAMENTO EM TABELAS $arItemAgrupado = array(); - foreach ($arValores as $value) { $nuVlAnular = str_replace(",",".",str_replace(".","",$value['vl_anular'])); - $nuVlTotal = $arItemAgrupado[$value['cod_item']."_".$value['cod_centro']]['vl_total'] + $nuVlAnular; - $nuVlTotal = number_format($nuVlTotal, 2, ".",","); - - $nuQntTotal = $arItemAgrupado[$value['cod_item']."_".$value['cod_centro']]['qnt_total'] + $value['qnt_anular']; - $nuQntTotal = number_format($nuQntTotal, 4, ".",","); + $nuVlTotal = number_format($arItemAgrupado[$value['cod_item']."_".$value['cod_centro']]['vl_total'], 2, ".", ",") + $nuVlAnular; + $nuVlTotal = number_format($nuVlTotal, 2, ",", "."); + + $nuQntAnular = str_replace(",",".",str_replace(".","",$value['qnt_anular'])); + $nuQntTotal = number_format($arItemAgrupado[$value['cod_item']."_".$value['cod_centro']]['qnt_total'], 4, ".", ",") + $nuQntAnular; + $nuQntTotal = number_format($nuQntTotal, 4, ",", "."); $arItemAgrupado[$value['cod_item']."_".$value['cod_centro']]['vl_total'] = $nuVlTotal; $arItemAgrupado[$value['cod_item']."_".$value['cod_centro']]['qnt_total'] = $nuQntTotal; @@ -384,7 +384,6 @@ switch ($stAcao) { $arItemAgrupado[$value['cod_item']."_".$value['cod_centro']]['cod_item'] = $value['cod_item']; $arItemAgrupado[$value['cod_item']."_".$value['cod_centro']]['cod_conta'] = $value['cod_conta']; $arItemAgrupado[$value['cod_item']."_".$value['cod_centro']]['cod_despesa'] = $value['cod_despesa']; - } ### FIM AGRUPAMENTO diff --git a/gestaoPatrimonial/fontes/PHP/compras/popups/mapaCompras/LSBuscaMapaCompras.php b/gestaoPatrimonial/fontes/PHP/compras/popups/mapaCompras/LSBuscaMapaCompras.php index d8ed1db..fd0f74d 100644 --- a/gestaoPatrimonial/fontes/PHP/compras/popups/mapaCompras/LSBuscaMapaCompras.php +++ b/gestaoPatrimonial/fontes/PHP/compras/popups/mapaCompras/LSBuscaMapaCompras.php @@ -32,7 +32,7 @@ * @ignore - $Id: LSBuscaMapaCompras.php 63094 2015-07-24 16:57:15Z franver $ + $Id: LSBuscaMapaCompras.php 63859 2015-10-26 17:39:34Z franver $ * Casos de uso: uc-03.04.05 */ @@ -191,60 +191,63 @@ $obTComprasMapa = new TComprasMapa; switch ($_REQUEST['stTipoBusca']) { -case 'processoLicitatorio': - if ( $stFiltro ) $stFiltro = " and $stFiltro "; + case 'verificaMapaComprasDireta': + if ( $stFiltro ) $stFiltro = " and $stFiltro "; + $obTComprasMapa->recuperaMapaProcessoLicitatorio( $rsMapas, $stFiltro, $stOrdem ); + break; - $obTComprasMapa->recuperaMapaSemReservaProcessoLicitatorio( $rsMapas, $stFiltro, $stOrdem ); + case 'processoLicitatorio': + if ( $stFiltro ) $stFiltro = " and $stFiltro "; + $obTComprasMapa->recuperaMapaSemReservaProcessoLicitatorio( $rsMapas, $stFiltro, $stOrdem ); + break; - break; - -case "manterContrato": - - $stFiltroContrato .= " - EXISTS (SELECT 1 - FROM licitacao.licitacao - - INNER JOIN licitacao.contrato_licitacao - ON contrato_licitacao.cod_licitacao = licitacao.cod_licitacao - AND contrato_licitacao.cod_modalidade = licitacao.cod_modalidade - AND contrato_licitacao.cod_entidade = licitacao.cod_entidade - AND contrato_licitacao.exercicio = licitacao.exercicio - - INNER JOIN licitacao.contrato - ON contrato_licitacao.num_contrato = contrato.num_contrato - AND contrato_licitacao.cod_entidade = contrato.cod_entidade - AND contrato_licitacao.exercicio = contrato.exercicio - - WHERE licitacao.cod_mapa = mapa.cod_mapa - AND licitacao.exercicio_mapa = mapa.exercicio) - - AND NOT EXISTS ( - SELECT 1 - FROM licitacao.licitacao - - INNER JOIN licitacao.contrato_licitacao - ON contrato_licitacao.cod_licitacao = licitacao.cod_licitacao - AND contrato_licitacao.cod_modalidade = licitacao.cod_modalidade - AND contrato_licitacao.cod_entidade = licitacao.cod_entidade - AND contrato_licitacao.exercicio = licitacao.exercicio - - INNER JOIN licitacao.contrato - ON contrato_licitacao.num_contrato = contrato.num_contrato - AND contrato_licitacao.cod_entidade = contrato.cod_entidade - AND contrato_licitacao.exercicio = contrato.exercicio - - INNER JOIN licitacao.rescisao_contrato - ON contrato.exercicio = rescisao_contrato.exercicio_contrato - AND contrato.cod_entidade = rescisao_contrato.cod_entidade - AND contrato.num_contrato = rescisao_contrato.num_contrato - - WHERE licitacao.cod_mapa = mapa.cod_mapa - AND licitacao.exercicio_mapa = mapa.exercicio - - ) + case "manterContrato": + + $stFiltroContrato .= " + EXISTS (SELECT 1 + FROM licitacao.licitacao + + INNER JOIN licitacao.contrato_licitacao + ON contrato_licitacao.cod_licitacao = licitacao.cod_licitacao + AND contrato_licitacao.cod_modalidade = licitacao.cod_modalidade + AND contrato_licitacao.cod_entidade = licitacao.cod_entidade + AND contrato_licitacao.exercicio = licitacao.exercicio + + INNER JOIN licitacao.contrato + ON contrato_licitacao.num_contrato = contrato.num_contrato + AND contrato_licitacao.cod_entidade = contrato.cod_entidade + AND contrato_licitacao.exercicio = contrato.exercicio + + WHERE licitacao.cod_mapa = mapa.cod_mapa + AND licitacao.exercicio_mapa = mapa.exercicio) + + AND NOT EXISTS ( + SELECT 1 + FROM licitacao.licitacao + + INNER JOIN licitacao.contrato_licitacao + ON contrato_licitacao.cod_licitacao = licitacao.cod_licitacao + AND contrato_licitacao.cod_modalidade = licitacao.cod_modalidade + AND contrato_licitacao.cod_entidade = licitacao.cod_entidade + AND contrato_licitacao.exercicio = licitacao.exercicio + + INNER JOIN licitacao.contrato + ON contrato_licitacao.num_contrato = contrato.num_contrato + AND contrato_licitacao.cod_entidade = contrato.cod_entidade + AND contrato_licitacao.exercicio = contrato.exercicio + + INNER JOIN licitacao.rescisao_contrato + ON contrato.exercicio = rescisao_contrato.exercicio_contrato + AND contrato.cod_entidade = rescisao_contrato.cod_entidade + AND contrato.num_contrato = rescisao_contrato.num_contrato + + WHERE licitacao.cod_mapa = mapa.cod_mapa + AND licitacao.exercicio_mapa = mapa.exercicio + + ) "; - $stFiltro = $stFiltro != "" ? "where".$stFiltro."\nAND ".$stFiltroContrato : "where".$stFiltroContrato; - $obTComprasMapa->recuperaTodos ( $rsMapas, $stFiltro, $stOrdem ); + $stFiltro = $stFiltro != "" ? "where".$stFiltro."\nAND ".$stFiltroContrato : "where".$stFiltroContrato; + $obTComprasMapa->recuperaTodos ( $rsMapas, $stFiltro, $stOrdem ); break; case 'manterContratoCompraDireta': diff --git a/gestaoPatrimonial/fontes/PHP/frota/instancias/posto/LSManterPosto.php b/gestaoPatrimonial/fontes/PHP/frota/instancias/posto/LSManterPosto.php index d2f89e8..9111463 100755 --- a/gestaoPatrimonial/fontes/PHP/frota/instancias/posto/LSManterPosto.php +++ b/gestaoPatrimonial/fontes/PHP/frota/instancias/posto/LSManterPosto.php @@ -52,8 +52,6 @@ $stAcao = $_POST["stAcao"] ? $_POST["stAcao"] : $_GET["stAcao"]; //seta o caminho para a popup de exclusao $stCaminho = CAM_GP_FRO_INSTANCIAS."posto/"; -//SistemaLegado::mostravar( $_REQUEST ); - //seta o filtro na sessao e vice-versa if ( !Sessao::read('paginando') ) { foreach ($_POST as $stCampo => $stValor) { diff --git a/gestaoPatrimonial/fontes/PHP/frota/instancias/veiculo/FMManterConsultarVeiculo.php b/gestaoPatrimonial/fontes/PHP/frota/instancias/veiculo/FMManterConsultarVeiculo.php index 60677cf..36f955d 100755 --- a/gestaoPatrimonial/fontes/PHP/frota/instancias/veiculo/FMManterConsultarVeiculo.php +++ b/gestaoPatrimonial/fontes/PHP/frota/instancias/veiculo/FMManterConsultarVeiculo.php @@ -29,7 +29,7 @@ * @author Analista: Gelson W. Gonçalves * @author Desenvolvedor: Henrique Boaventura - $Id: FMManterConsultarVeiculo.php 59612 2014-09-02 12:00:51Z gelson $ + $Id: FMManterConsultarVeiculo.php 63833 2015-10-22 13:05:17Z franver $ * Casos de uso: uc-03.02.06 */ @@ -229,8 +229,6 @@ if ( $rsVeiculo->getCampo( 'num_proprietario' ) != '' ) { $obLblBem->setValue( $rsVeiculo->getCampo( 'cod_bem' ).' - '.$rsVeiculo->getCampo( 'nom_bem' ) ); } -//sistemaLegado::mostraVar($rsVeiculo);exit; - /*** * Dados financeiros do veiculo ***/ diff --git a/gestaoPatrimonial/fontes/PHP/frota/instancias/veiculo/PRManterVeiculo.php b/gestaoPatrimonial/fontes/PHP/frota/instancias/veiculo/PRManterVeiculo.php index 1f486ae..83cc64e 100755 --- a/gestaoPatrimonial/fontes/PHP/frota/instancias/veiculo/PRManterVeiculo.php +++ b/gestaoPatrimonial/fontes/PHP/frota/instancias/veiculo/PRManterVeiculo.php @@ -29,7 +29,7 @@ * @author Analista: Gelson W. Gonçalves * @author Desenvolvedor: Henrique Boaventura - * $Id: PRManterVeiculo.php 62535 2015-05-18 19:36:53Z jean $ + * $Id: PRManterVeiculo.php 64139 2015-12-08 15:47:35Z diogo.zarpelon $ * Casos de uso: uc-03.02.06 */ @@ -808,8 +808,11 @@ switch ($stAcao) { $obTFrotaVeiculo->setDado('cod_veiculo', $_REQUEST['inCodVeiculo'] ); $obTFrotaVeiculo->exclusao(); - $obTTCERNVeiculoCategoriaVinculo->setDado('cod_veiculo', $_REQUEST['inCodVeiculo']); - $obTTCERNVeiculoCategoriaVinculo->exclusao(); + # Caso o município faça parte do estado do RN. + if (SistemaLegado::pegaConfiguracao('cod_uf', 2, Sessao::getExercicio()) == '20') { + $obTTCERNVeiculoCategoriaVinculo->setDado('cod_veiculo', $_REQUEST['inCodVeiculo']); + $obTTCERNVeiculoCategoriaVinculo->exclusao(); + } $obTFrotaVeiculoLocacao->recuperaTodos($rsVeiculoLocacao, " WHERE cod_veiculo = ".$_REQUEST['inCodVeiculo'] ); if ($rsVeiculoLocacao->getNumLinhas() > 0) { diff --git a/gestaoPatrimonial/fontes/PHP/licitacao/classes/componentes/IPopUpContrato.class.php b/gestaoPatrimonial/fontes/PHP/licitacao/classes/componentes/IPopUpContrato.class.php index 616b035..eb0a995 100644 --- a/gestaoPatrimonial/fontes/PHP/licitacao/classes/componentes/IPopUpContrato.class.php +++ b/gestaoPatrimonial/fontes/PHP/licitacao/classes/componentes/IPopUpContrato.class.php @@ -33,53 +33,29 @@ * @package URBEM * @subpackage - $Revision: 26504 $ - $Name$ - $Author: bruce $ - $Date: 2007-10-30 10:54:47 -0200 (Ter, 30 Out 2007) $ + $Id: IPopUpContrato.class.php 64081 2015-11-30 15:36:50Z michel $ * Casos de uso: uc-03.05.23 */ -/* -$Log$ -Revision 1.2 2007/09/19 14:55:15 bruce -Ticket#10105# - -Revision 1.1 2006/10/11 17:19:26 domluc -p/ Diegon: - O componente de Contrato gera no formulario que o chama um buscainner e um span, -o buscainner somente aceita preenchimento via PopUp, ou seja, não é possivel digitar diretamente o numero do contrato. - Chamando a popup do buscainner, ele devera poder filtrar por ( em ordem) -1) Número do Contrato ( inteiro) -2) Exercicio ( ref a Contrato) ( componente exercicio) -3) Modalidade ( combo) -4) Codigo da Licitação ( inteiro ) -5) Entidade ( componente) - -entao o usuario clica em Ok, e o sistema exibe uma lista correspondente ao filtro informado. -o usuario seleciona um dos contratos na listageme o sistema fecha a popup, retornando ao formulario, onde o sistema preenche o numero do convenio e no -span criado pelo componente , exibe as informações recorrentes, que sao: -- exercicio -- modalidade -- licitação -- entidade -- cgm contratado - -era isso - -*/ - -require_once ( CAM_GF_ORC_COMPONENTES . "ITextBoxSelectEntidadeGeral.class.php" ); +require_once CAM_GF_ORC_COMPONENTES . "ITextBoxSelectEntidadeGeral.class.php"; class IPopUpContrato extends Objeto { public $obBuscaInner; + public $obHdnBoFornecedor; public $obSpanInfoAdicional; public function IPopUpContrato(&$obForm) { parent::Objeto(); + + // Define Objeto Label para Fornecedor + $this->obHdnBoFornecedor = new Hidden; + $this->obHdnBoFornecedor->setName ( "boFornecedor" ); + $this->obHdnBoFornecedor->setId ( "boFornecedor" ); + $this->obHdnBoFornecedor->setValue ( FALSE ); + $this->obBuscaInner = new BuscaInner; $this->obBuscaInner->obForm = &$obForm; @@ -91,8 +67,7 @@ class IPopUpContrato extends Objeto $this->obBuscaInner->setId ( 'txtContrato' ); $this->obBuscaInner->setNull ( true ); $this->obBuscaInner->stTipoBusca = 'popup'; - $this->obBuscaInner->setFuncaoBusca("abrePopUp('".CAM_GP_LIC_POPUPS."contrato/FLProcurarContrato.php','".$this->obBuscaInner->obForm->getName()."','".$this->obBuscaInner->obCampoCod->getName()."','".$this->obBuscaInner->getId()."','".$this->obBuscaInner->stTipoBusca."','".Sessao::getId()."','800','550');"); - + $this->obBuscaInner->setFuncaoBusca("abrePopUp('".CAM_GP_LIC_POPUPS."contrato/FLProcurarContrato.php','".$this->obBuscaInner->obForm->getName()."','".$this->obBuscaInner->obCampoCod->getName()."','".$this->obBuscaInner->getId()."','".$this->obBuscaInner->stTipoBusca."','".Sessao::getId()."&boFornecedor='+jQuery('#boFornecedor').val(),'800','550');"); $this->obBuscaInner->setValoresBusca( CAM_GP_LIC_POPUPS.'contrato/OCProcuraContrato.php?' .Sessao::getId(), $this->obBuscaInner->obForm->getName() ); $this->obSpanInfoAdicional = new Span; @@ -102,6 +77,7 @@ class IPopUpContrato extends Objeto public function geraFormulario($obFormulario) { + $obFormulario->addHidden ( $this->obHdnBoFornecedor ); $obFormulario->addComponente ( $this->obBuscaInner ); $obFormulario->addSpan ( $this->obSpanInfoAdicional ); } diff --git a/gestaoPatrimonial/fontes/PHP/licitacao/classes/mapeamento/TLicitacaoContrato.class.php b/gestaoPatrimonial/fontes/PHP/licitacao/classes/mapeamento/TLicitacaoContrato.class.php index 54e4b5f..9fc457a 100755 --- a/gestaoPatrimonial/fontes/PHP/licitacao/classes/mapeamento/TLicitacaoContrato.class.php +++ b/gestaoPatrimonial/fontes/PHP/licitacao/classes/mapeamento/TLicitacaoContrato.class.php @@ -30,22 +30,12 @@ * @package URBEM * @subpackage Mapeamento - $Id: TLicitacaoContrato.class.php 63565 2015-09-11 11:25:25Z carlos.silva $ + $Id: TLicitacaoContrato.class.php 64081 2015-11-30 15:36:50Z michel $ */ include_once '../../../../../../gestaoAdministrativa/fontes/PHP/framework/include/valida.inc.php'; -include_once ( CLA_PERSISTENTE ); +include_once CLA_PERSISTENTE; -/** - * Efetua conexão com a tabela licitacao.contrato - * Data de Criação: 15/09/2006 - - * @author Analista: Gelson W. Gonçalves - * @author Desenvolvedor: Nome do Programador - - * @package URBEM - * @subpackage Mapeamento -*/ class TLicitacaoContrato extends Persistente { /** @@ -53,7 +43,7 @@ class TLicitacaoContrato extends Persistente * @access Private */ -function TLicitacaoContrato() +function __construct() { parent::Persistente(); $this->setTabela("licitacao.contrato"); @@ -61,35 +51,35 @@ function TLicitacaoContrato() $this->setCampoCod('num_contrato'); $this->setComplementoChave('exercicio,cod_entidade'); - $this->AddCampo('num_contrato','sequence',true,'' ,true,false); - $this->AddCampo('exercicio','char',true,'4' ,true,'TLicitacaoLicitacao'); - $this->AddCampo('cod_entidade','integer',true,'',true,'TLicitacaoLicitacao'); - $this->AddCampo('cod_tipo_documento','integer',false,'',false,'TAdministracaoModeloDocumento'); - $this->AddCampo('cod_tipo_contrato','integer',false,'',false,'TLicitacaoTipoContrato'); - $this->AddCampo('cod_documento','integer',false,'',false,'TAdministracaoModeloDocumento'); - $this->AddCampo('cgm_responsavel_juridico','integer',true,'',false,'TCGM'); - $this->AddCampo('cgm_contratado','integer',true,'',false,'TComprasFornecedor'); - $this->AddCampo('dt_assinatura','date',true,'',false,false); - $this->AddCampo('vencimento','date',true,'',false,false); - $this->AddCampo('valor_contratado','numeric',true,'14,2',false,false); - $this->AddCampo('valor_garantia','numeric',true,'14,2',false,false); - $this->AddCampo('inicio_execucao', 'date',true,'',false,false ); - $this->AddCampo('fim_execucao', 'date',true,'',false,false ); - - $this->AddCampo('num_orgao','integer',true,'', true,'TOrcamentoOrgao'); - $this->AddCampo('num_unidade','integer',true,'', true,'TOrcamentoUnidade'); - $this->AddCampo('numero_contrato','integer',true,'', true, false); - $this->AddCampo('tipo_objeto','integer',true,'', true,'TComprasTipoObjeto'); - $this->AddCampo('objeto','char',true,'' ,true, false); - $this->AddCampo('forma_fornecimento','char',true,'50', true, false); - $this->AddCampo('forma_pagamento','char',true,'100', true, false); - $this->AddCampo('cgm_signatario','integer',true,'', true,'TCGM'); - $this->AddCampo('prazo_execucao','char',true,'100', true, false); - $this->AddCampo('multa_rescisoria','char',true,'250', true, false); - $this->AddCampo('justificativa','char',true,'250',true, false); - $this->AddCampo('razao','char',true,'250', true, false); - $this->AddCampo('fundamentacao_legal','char',true,'250' ,true, false); -} + $this->AddCampo('num_contrato' ,'sequence',true ,'' ,true ,false ); + $this->AddCampo('exercicio' ,'char' ,true ,'4' ,true ,'TLicitacaoLicitacao' ); + $this->AddCampo('cod_entidade' ,'integer' ,true ,'' ,true ,'TLicitacaoLicitacao' ); + $this->AddCampo('cod_tipo_documento' ,'integer' ,false,'' ,false,'TAdministracaoModeloDocumento' ); + $this->AddCampo('cod_tipo_contrato' ,'integer' ,false,'' ,false,'TLicitacaoTipoContrato' ); + $this->AddCampo('cod_documento' ,'integer' ,false,'' ,false,'TAdministracaoModeloDocumento' ); + $this->AddCampo('cgm_responsavel_juridico' ,'integer' ,true ,'' ,false,'TCGM' ); + $this->AddCampo('cgm_contratado' ,'integer' ,true ,'' ,false,'TComprasFornecedor' ); + $this->AddCampo('dt_assinatura' ,'date' ,true ,'' ,false,false ); + $this->AddCampo('vencimento' ,'date' ,true ,'' ,false,false ); + $this->AddCampo('valor_contratado' ,'numeric' ,true ,'14,2',false,false ); + $this->AddCampo('valor_garantia' ,'numeric' ,true ,'14,2',false,false ); + $this->AddCampo('inicio_execucao' , 'date' ,true ,'' ,false,false ); + $this->AddCampo('fim_execucao' , 'date' ,true ,'' ,false,false ); + + $this->AddCampo('num_orgao' ,'integer' ,true ,'' ,true ,'TOrcamentoOrgao' ); + $this->AddCampo('num_unidade' ,'integer' ,true ,'' ,true ,'TOrcamentoUnidade' ); + $this->AddCampo('numero_contrato' ,'integer' ,true ,'' ,true ,false ); + $this->AddCampo('tipo_objeto' ,'integer' ,true ,'' ,true ,'TComprasTipoObjeto' ); + $this->AddCampo('objeto' ,'char' ,true ,'' ,true ,false ); + $this->AddCampo('forma_fornecimento' ,'char' ,true ,'50' ,true ,false ); + $this->AddCampo('forma_pagamento' ,'char' ,true ,'100' ,true ,false ); + $this->AddCampo('cgm_signatario' ,'integer' ,true ,'' ,true ,'TCGM' ); + $this->AddCampo('prazo_execucao' ,'char' ,true ,'100' ,true ,false ); + $this->AddCampo('multa_rescisoria' ,'char' ,true ,'250' ,true ,false ); + $this->AddCampo('justificativa' ,'char' ,true ,'250' ,true ,false ); + $this->AddCampo('razao' ,'char' ,true ,'250' ,true ,false ); + $this->AddCampo('fundamentacao_legal' ,'char' ,true ,'250' ,true ,false ); +} function recuperaDadosContrato(&$rsRecordSet, $stFiltro = "", $stOrdem = "", $boTransacao = "") { @@ -854,4 +844,54 @@ function montaRecuperaDadosAditivosCompraDireta() return $stSql; } +function recuperaContratoEmpenho(&$rsRecordSet, $stFiltro = "",$boTransacao = "") +{ + $obErro = new Erro; + $obConexao = new Conexao; + $rsRecordSet = new RecordSet; + $stSql = $this->montaRecuperaContratoEmpenho().$stFiltro; + $this->stDebug = $stSql; + $obErro = $obConexao->executaSQL( $rsRecordSet, $stSql, $boTransacao ); + + return $obErro; +} + +function montaRecuperaContratoEmpenho() +{ + $stSql = " SELECT contrato.num_contrato + , objeto.descricao + , to_char(contrato.dt_assinatura, 'dd/mm/yyyy') as dt_assinatura + FROM licitacao.contrato + LEFT JOIN licitacao.contrato_licitacao + ON (contrato.num_contrato = contrato_licitacao.num_contrato + AND contrato.exercicio = contrato_licitacao.exercicio + AND contrato.cod_entidade = contrato_licitacao.cod_entidade) + + LEFT JOIN licitacao.contrato_compra_direta + ON (contrato.num_contrato = contrato_compra_direta.num_contrato + AND contrato.exercicio = contrato_compra_direta.exercicio + AND contrato.cod_entidade = contrato_compra_direta.cod_entidade) + + LEFT JOIN licitacao.licitacao + ON (licitacao.cod_licitacao = contrato_licitacao.cod_licitacao + AND licitacao.cod_modalidade = contrato_licitacao.cod_modalidade + AND licitacao.exercicio = contrato_licitacao.exercicio_licitacao + AND licitacao.cod_entidade = contrato_licitacao.cod_entidade) + + LEFT JOIN compras.compra_direta + ON (compra_direta.cod_compra_direta = contrato_compra_direta.cod_compra_direta + AND compra_direta.cod_modalidade = contrato_compra_direta.cod_modalidade + AND compra_direta.exercicio_entidade = contrato_compra_direta.exercicio + AND compra_direta.cod_entidade = contrato_compra_direta.cod_entidade) + + LEFT JOIN compras.objeto + ON ( licitacao.cod_objeto = objeto.cod_objeto + OR compra_direta.cod_objeto = objeto.cod_objeto + ) + + WHERE objeto.cod_objeto IS NOT NULL "; + + return $stSql; +} + } diff --git a/gestaoPatrimonial/fontes/PHP/licitacao/classes/mapeamento/TLicitacaoHomologacao.class.php b/gestaoPatrimonial/fontes/PHP/licitacao/classes/mapeamento/TLicitacaoHomologacao.class.php index c76951d..90acc9a 100755 --- a/gestaoPatrimonial/fontes/PHP/licitacao/classes/mapeamento/TLicitacaoHomologacao.class.php +++ b/gestaoPatrimonial/fontes/PHP/licitacao/classes/mapeamento/TLicitacaoHomologacao.class.php @@ -35,7 +35,7 @@ * Casos de uso: uc-03.05.21 - $Id: TLicitacaoHomologacao.class.php 63367 2015-08-20 21:27:34Z michel $ + $Id: TLicitacaoHomologacao.class.php 64005 2015-11-17 16:49:06Z michel $ */ include_once '../../../../../../gestaoAdministrativa/fontes/PHP/framework/include/valida.inc.php'; @@ -46,7 +46,7 @@ class TLicitacaoHomologacao extends Persistente /** * Método Construtor * @access Private -*/ + **/ public function __construct() { parent::Persistente(); @@ -411,6 +411,91 @@ class TLicitacaoHomologacao extends Persistente } + public function recuperaItensAutorizacaoParcial(&$rsRecordSet, $stFiltro = "", $stOrdem ="", $boTransacao = "") + { + $obErro = new Erro; + $obConexao = new Conexao; + $rsRecordSet = new RecordSet; + + $stGroupBy = " GROUP BY catalogo_item.cod_item + , catalogo_item.descricao_resumida + , cotacao_fornecedor_item.vl_cotacao + , sw_cgm.nom_cgm + , to_char(homologacao.timestamp,'dd/mm/yyyy') + , cotacao_item.quantidade + HAVING coalesce(cotacao_item.quantidade, 0.00) - sum(coalesce(item_pre_empenho.quantidade, 0.00)) > 0 "; + + $stSql = $this->montaRecuperaItensAutorizacaoParcial().$stFiltro.$stGroupBy.$stOrdem; + $this->stDebug = $stSql; + $obErro = $obConexao->executaSQL( $rsRecordSet, $stSql, $boTransacao ); + + return $obErro; + } + public function montaRecuperaItensAutorizacaoParcial() + { + $stSql = " + SELECT catalogo_item.cod_item + , catalogo_item.descricao_resumida AS item + , cotacao_fornecedor_item.vl_cotacao + , sw_cgm.nom_cgm AS fornecedor + , to_char(homologacao.timestamp,'dd/mm/yyyy') AS dt_homologacao + , cotacao_item.quantidade + , SUM(COALESCE(item_pre_empenho.quantidade, 0.00)) AS quantidade_empenho + , COALESCE(cotacao_item.quantidade, 0.00) - SUM(COALESCE(item_pre_empenho.quantidade, 0.00)) AS quantidade_saldo + FROM licitacao.homologacao + INNER JOIN licitacao.adjudicacao + ON adjudicacao.num_adjudicacao = homologacao.num_adjudicacao + AND adjudicacao.cod_entidade = homologacao.cod_entidade + AND adjudicacao.cod_modalidade = homologacao.cod_modalidade + AND adjudicacao.cod_licitacao = homologacao.cod_licitacao + AND adjudicacao.exercicio_licitacao = homologacao.exercicio_licitacao + AND adjudicacao.cod_item = homologacao.cod_item + AND adjudicacao.cod_cotacao = homologacao.cod_cotacao + AND adjudicacao.lote = homologacao.lote + AND adjudicacao.exercicio_cotacao = homologacao.exercicio_cotacao + AND adjudicacao.cgm_fornecedor = homologacao.cgm_fornecedor + INNER JOIN compras.cotacao_fornecedor_item + ON adjudicacao.cod_cotacao = cotacao_fornecedor_item.cod_cotacao + AND adjudicacao.exercicio_cotacao = cotacao_fornecedor_item.exercicio + AND adjudicacao.cod_item = cotacao_fornecedor_item.cod_item + AND adjudicacao.lote = cotacao_fornecedor_item.lote + AND adjudicacao.cgm_fornecedor = cotacao_fornecedor_item.cgm_fornecedor + INNER JOIN compras.cotacao_item + ON cotacao_item.exercicio = cotacao_fornecedor_item.exercicio + AND cotacao_item.cod_cotacao = cotacao_fornecedor_item.cod_cotacao + AND cotacao_item.cod_item = cotacao_fornecedor_item.cod_item + AND cotacao_item.lote = cotacao_fornecedor_item.lote + INNER JOIN almoxarifado.catalogo_item + ON catalogo_item.cod_item = cotacao_item.cod_item + INNER JOIN sw_cgm + ON sw_cgm.numcgm = cotacao_fornecedor_item.cgm_fornecedor + LEFT JOIN empenho.item_pre_empenho_julgamento + ON item_pre_empenho_julgamento.exercicio_julgamento = homologacao.exercicio_cotacao + AND item_pre_empenho_julgamento.cod_cotacao = homologacao.cod_cotacao + AND item_pre_empenho_julgamento.cod_item = homologacao.cod_item + AND item_pre_empenho_julgamento.lote = homologacao.lote + AND item_pre_empenho_julgamento.cgm_fornecedor = homologacao.cgm_fornecedor + LEFT JOIN empenho.item_pre_empenho + ON item_pre_empenho.cod_pre_empenho = item_pre_empenho_julgamento.cod_pre_empenho + AND item_pre_empenho.exercicio = item_pre_empenho_julgamento.exercicio + AND item_pre_empenho.num_item = item_pre_empenho_julgamento.num_item + LEFT JOIN licitacao.homologacao_anulada + ON homologacao_anulada.num_homologacao = homologacao.num_homologacao + AND homologacao_anulada.cod_licitacao = homologacao.cod_licitacao + AND homologacao_anulada.cod_modalidade = homologacao.cod_modalidade + AND homologacao_anulada.cod_entidade = homologacao.cod_entidade + AND homologacao_anulada.num_adjudicacao = homologacao.num_adjudicacao + AND homologacao_anulada.exercicio_licitacao = homologacao.exercicio_licitacao + AND homologacao_anulada.lote = homologacao.lote + AND homologacao_anulada.cod_cotacao = homologacao.cod_cotacao + AND homologacao_anulada.cod_item = homologacao.cod_item + AND homologacao_anulada.exercicio_cotacao = homologacao.exercicio_cotacao + AND homologacao_anulada.cgm_fornecedor = homologacao.cgm_fornecedor + "; + + return $stSql; + } + public function recuperaItensRelatorio(&$rsRecordSet, $stFiltro = "", $stOrdem ="", $boTransacao = "") { $obErro = new Erro; @@ -627,7 +712,217 @@ from ( "; return $stSql; + } + public function recuperaCotacoesParaEmpenhoParcial(&$rsRecordSet, $stFiltro = "", $stOrdem ="", $boTransacao = "") + { + $obErro = new Erro; + $obConexao = new Conexao; + $rsRecordSet = new RecordSet; + + $stSql = $this->montaRecuperaCotacoesParaEmpenhoParcial().$stFiltro.$stOrdem; + $this->stDebug = $stSql; + $obErro = $obConexao->executaSQL( $rsRecordSet, $stSql, $boTransacao ); + + return $obErro; + } + + public function montaRecuperaCotacoesParaEmpenhoParcial() + { + $stSql = " + SELECT licitacao.cod_licitacao + , licitacao.exercicio + , licitacao.cod_mapa + , TO_CHAR( licitacao.timestamp,'dd/mm/yyyy') AS data + , modalidade.cod_modalidade + , modalidade.descricao AS modalidade + , sw_cgm.nom_cgm AS entidade + , entidade.cod_entidade + , mapa_cotacao.cod_mapa + , mapa_cotacao.exercicio_mapa + , mapa_cotacao.cod_cotacao + , mapa_cotacao.exercicio_cotacao + FROM licitacao.licitacao + LEFT JOIN licitacao.licitacao_anulada + ON licitacao_anulada.cod_licitacao = licitacao.cod_licitacao + AND licitacao_anulada.cod_modalidade = licitacao.cod_modalidade + AND licitacao_anulada.cod_entidade = licitacao.cod_entidade + AND licitacao_anulada.exercicio = licitacao.exercicio + INNER JOIN compras.mapa_cotacao + ON licitacao.cod_mapa = mapa_cotacao.cod_mapa + AND licitacao.exercicio_mapa= mapa_cotacao.exercicio_mapa + INNER JOIN compras.modalidade + ON licitacao.cod_modalidade= modalidade.cod_modalidade + INNER JOIN orcamento.entidade + ON licitacao.cod_entidade = entidade.cod_entidade + AND licitacao.exercicio = entidade.exercicio + INNER JOIN sw_cgm + ON entidade.numcgm = sw_cgm.numcgm + INNER JOIN ( select homologacao.cod_licitacao + , homologacao.cod_modalidade + , homologacao.cod_entidade + , homologacao.exercicio_licitacao + , homologacao.cod_cotacao + , homologacao.exercicio_cotacao + from licitacao.adjudicacao + left join licitacao.adjudicacao_anulada + on adjudicacao_anulada.num_adjudicacao = adjudicacao.num_adjudicacao + and adjudicacao_anulada.cod_entidade = adjudicacao.cod_entidade + and adjudicacao_anulada.cod_modalidade = adjudicacao.cod_modalidade + and adjudicacao_anulada.cod_licitacao = adjudicacao.cod_licitacao + and adjudicacao_anulada.exercicio_licitacao = adjudicacao.exercicio_licitacao + and adjudicacao_anulada.cod_item = adjudicacao.cod_item + and adjudicacao_anulada.cod_cotacao = adjudicacao.cod_cotacao + and adjudicacao_anulada.lote = adjudicacao.lote + and adjudicacao_anulada.exercicio_cotacao = adjudicacao.exercicio_cotacao + and adjudicacao_anulada.cgm_fornecedor = adjudicacao.cgm_fornecedor + inner join licitacao.homologacao + on homologacao.num_adjudicacao = adjudicacao.num_adjudicacao + and homologacao.cod_entidade = adjudicacao.cod_entidade + and homologacao.cod_modalidade = adjudicacao.cod_modalidade + and homologacao.cod_licitacao = adjudicacao.cod_licitacao + and homologacao.exercicio_licitacao = adjudicacao.exercicio_licitacao + and homologacao.cod_item = adjudicacao.cod_item + and homologacao.cod_cotacao = adjudicacao.cod_cotacao + and homologacao.lote = adjudicacao.lote + and homologacao.exercicio_cotacao = adjudicacao.exercicio_cotacao + and homologacao.cgm_fornecedor = adjudicacao.cgm_fornecedor + and homologacao.num_homologacao = ( select max(h.num_homologacao) + from licitacao.homologacao as h + where h.num_adjudicacao = adjudicacao.num_adjudicacao + and h.cod_entidade = adjudicacao.cod_entidade + and h.cod_modalidade = adjudicacao.cod_modalidade + and h.cod_licitacao = adjudicacao.cod_licitacao + and h.exercicio_licitacao = adjudicacao.exercicio_licitacao + and h.cod_item = adjudicacao.cod_item + and h.cod_cotacao = adjudicacao.cod_cotacao + and h.lote = adjudicacao.lote + and h.exercicio_cotacao = adjudicacao.exercicio_cotacao + and h.cgm_fornecedor = adjudicacao.cgm_fornecedor ) + left join licitacao.homologacao_anulada + on homologacao_anulada.num_homologacao = homologacao.num_homologacao + and homologacao_anulada.cod_licitacao = homologacao.cod_licitacao + and homologacao_anulada.cod_modalidade = homologacao.cod_modalidade + and homologacao_anulada.cod_entidade = homologacao.cod_entidade + and homologacao_anulada.num_adjudicacao = homologacao.num_adjudicacao + and homologacao_anulada.exercicio_licitacao = homologacao.exercicio_licitacao + and homologacao_anulada.lote = homologacao.lote + and homologacao_anulada.cod_cotacao = homologacao.cod_cotacao + and homologacao_anulada.cod_item = homologacao.cod_item + and homologacao_anulada.exercicio_cotacao = homologacao.exercicio_cotacao + and homologacao_anulada.cgm_fornecedor = homologacao.cgm_fornecedor + inner join licitacao.cotacao_licitacao + on cotacao_licitacao.cod_licitacao = adjudicacao.cod_licitacao + and cotacao_licitacao.cod_modalidade = adjudicacao.cod_modalidade + and cotacao_licitacao.cod_entidade = adjudicacao.cod_entidade + and cotacao_licitacao.exercicio_licitacao = adjudicacao.exercicio_licitacao + and cotacao_licitacao.lote = adjudicacao.lote + and cotacao_licitacao.cod_cotacao = adjudicacao.cod_cotacao + and cotacao_licitacao.cod_item = adjudicacao.cod_item + and cotacao_licitacao.exercicio_cotacao = adjudicacao.exercicio_cotacao + and cotacao_licitacao.cgm_fornecedor = adjudicacao.cgm_fornecedor + inner join compras.cotacao_fornecedor_item + on cotacao_fornecedor_item.cod_item = cotacao_licitacao.cod_item + and cotacao_fornecedor_item.cgm_fornecedor = cotacao_licitacao.cgm_fornecedor + and cotacao_fornecedor_item.cod_cotacao = cotacao_licitacao.cod_cotacao + and cotacao_fornecedor_item.exercicio = cotacao_licitacao.exercicio_cotacao + and cotacao_fornecedor_item.lote = cotacao_licitacao.lote + inner join compras.cotacao_item + on cotacao_item.exercicio = cotacao_fornecedor_item.exercicio + and cotacao_item.cod_cotacao = cotacao_fornecedor_item.cod_cotacao + and cotacao_item.cod_item = cotacao_fornecedor_item.cod_item + and cotacao_item.lote = cotacao_fornecedor_item.lote + left join compras.cotacao_anulada + on cotacao_anulada.cod_cotacao = cotacao_licitacao.cod_cotacao + and cotacao_anulada.exercicio = cotacao_licitacao.exercicio_cotacao + left join ( select item_pre_empenho_julgamento.exercicio_julgamento + , item_pre_empenho_julgamento.cod_cotacao + , item_pre_empenho_julgamento.cod_item + , item_pre_empenho_julgamento.lote + , item_pre_empenho_julgamento.cgm_fornecedor + , sum(coalesce(item_pre_empenho.quantidade, 0.00)) as quantidade + from empenho.item_pre_empenho_julgamento + inner join empenho.item_pre_empenho + on item_pre_empenho.cod_pre_empenho = item_pre_empenho_julgamento.cod_pre_empenho + and item_pre_empenho.exercicio = item_pre_empenho_julgamento.exercicio + and item_pre_empenho.num_item = item_pre_empenho_julgamento.num_item + group by item_pre_empenho_julgamento.exercicio_julgamento + , item_pre_empenho_julgamento.cod_cotacao + , item_pre_empenho_julgamento.cod_item + , item_pre_empenho_julgamento.lote + , item_pre_empenho_julgamento.cgm_fornecedor + ) as item_pre_empenho_julgamento + on item_pre_empenho_julgamento.exercicio_julgamento = homologacao.exercicio_cotacao + and item_pre_empenho_julgamento.cod_cotacao = homologacao.cod_cotacao + and item_pre_empenho_julgamento.cod_item = homologacao.cod_item + and item_pre_empenho_julgamento.lote = homologacao.lote + and item_pre_empenho_julgamento.cgm_fornecedor = homologacao.cgm_fornecedor + where homologacao.homologado + and homologacao_anulada.cod_item is null + and adjudicacao.adjudicado + and adjudicacao_anulada.cod_item is null + and coalesce(cotacao_item.quantidade, 0.00) - coalesce(item_pre_empenho_julgamento.quantidade, 0.00) > 0 + and cotacao_anulada.cod_cotacao is null + group by homologacao.cod_licitacao + , homologacao.cod_modalidade + , homologacao.cod_entidade + , homologacao.exercicio_licitacao + , homologacao.cod_cotacao + , homologacao.exercicio_cotacao + order by homologacao.exercicio_licitacao + , homologacao.cod_licitacao + ) AS homologacao + ON homologacao.cod_licitacao = licitacao.cod_licitacao + AND homologacao.cod_modalidade = licitacao.cod_modalidade + AND homologacao.cod_entidade = licitacao.cod_entidade + AND homologacao.exercicio_licitacao = licitacao.exercicio + AND homologacao.cod_cotacao = mapa_cotacao.cod_cotacao + AND homologacao.exercicio_cotacao = mapa_cotacao.exercicio_cotacao + LEFT JOIN licitacao.edital + ON licitacao.cod_licitacao = edital.cod_licitacao + AND licitacao.cod_modalidade = edital.cod_modalidade + AND licitacao.cod_entidade = edital.cod_entidade + AND licitacao.exercicio = edital.exercicio + LEFT JOIN licitacao.edital_suspenso + ON edital_suspenso.num_edital = edital.num_edital + AND edital_suspenso.exercicio = edital.exercicio + WHERE licitacao_anulada.cod_licitacao IS NULL + AND edital_suspenso.num_edital IS NULL + -- Para as modalidades 1,2,3,4,5,6,7,10,11 é obrigatório exister um edital + AND CASE WHEN licitacao.cod_modalidade in (1,2,3,4,5,6,7,10,11) + THEN edital.num_edital IS NOT NULL + -- Para as modalidades 8,9 é facultativo possuir um edital + WHEN licitacao.cod_modalidade in (8,9) + THEN ( edital.num_edital IS NOT NULL OR edital.num_edital IS NULL ) + END + AND EXISTS ( SELECT mp.exercicio + , mp.cod_mapa + , mp.cod_objeto + , mp.timestamp + , mp.cod_tipo_licitacao + , solicitacao.registro_precos + FROM compras.mapa AS mp + INNER JOIN compras.mapa_solicitacao + ON mapa_solicitacao.exercicio = mp.exercicio + AND mapa_solicitacao.cod_mapa = mp.cod_mapa + INNER JOIN compras.solicitacao_homologada + ON solicitacao_homologada.exercicio = mapa_solicitacao.exercicio_solicitacao + AND solicitacao_homologada.cod_entidade = mapa_solicitacao.cod_entidade + AND solicitacao_homologada.cod_solicitacao = mapa_solicitacao.cod_solicitacao + INNER JOIN compras.solicitacao + ON solicitacao.exercicio = solicitacao_homologada.exercicio + AND solicitacao.cod_entidade = solicitacao_homologada.cod_entidade + AND solicitacao.cod_solicitacao = solicitacao_homologada.cod_solicitacao + WHERE mp.cod_mapa = mapa_cotacao.cod_mapa + AND mp.exercicio = mapa_cotacao.exercicio_mapa + GROUP BY mp.exercicio + , mp.cod_mapa + , mp.cod_objeto + , mp.timestamp + , mp.cod_tipo_licitacao + , solicitacao.registro_precos ) \n"; + + return $stSql; } public function recuperaItensAgrupadosSolicitacaoLicitacao(&$rsRecordSet, $stFiltro = "", $stOrdem = "", $boTransacao = "") @@ -1079,7 +1374,8 @@ from ( , solicitacao_item.cod_solicitacao , solicitacao_item.cod_entidade , solicitacao_item.cod_item - , solicitacao_item.complemento"; + , solicitacao_item.complemento + , solicitacao_item.cod_centro"; $stSql = $this->montaRecuperaItensAgrupadosSolicitacaoLicitacaoImp().$stFiltro.$stGroupBy.$stOrdem; $this->stDebug = $stSql; $obErro = $obConexao->executaSQL( $rsRecordSet, $stSql, $boTransacao ); @@ -1115,6 +1411,7 @@ from ( , mapa.cod_mapa , mapa.exercicio as exercicio_mapa , solicitacao_item.complemento + , solicitacao_item.cod_centro from licitacao.homologacao left join licitacao.homologacao_anulada @@ -1544,6 +1841,7 @@ from ( , historico , cod_tipo , implantado + , count(cod_item) as qtd_itens_homologados FROM ( select cotacao_fornecedor_item.cgm_fornecedor as fornecedor , solicitacao_item_dotacao.cod_item diff --git a/gestaoPatrimonial/fontes/PHP/licitacao/classes/mapeamento/TLicitacaoLicitacao.class.php b/gestaoPatrimonial/fontes/PHP/licitacao/classes/mapeamento/TLicitacaoLicitacao.class.php index 275793d..63baa50 100755 --- a/gestaoPatrimonial/fontes/PHP/licitacao/classes/mapeamento/TLicitacaoLicitacao.class.php +++ b/gestaoPatrimonial/fontes/PHP/licitacao/classes/mapeamento/TLicitacaoLicitacao.class.php @@ -32,7 +32,7 @@ * Casos de uso: uc-03.05.15 - $Id: TLicitacaoLicitacao.class.php 63367 2015-08-20 21:27:34Z michel $ + $Id: TLicitacaoLicitacao.class.php 63841 2015-10-22 19:14:30Z michel $ */ @@ -897,6 +897,229 @@ function montaRecuperaLicitacaoNaoHomologada() return $stSql; } + public function recuperaItensDetalhesAutorizacaoEmpenhoParcialLicitacao(&$rsRecordSet, $stFiltro = "", $stOrdem = "", $boTransacao = "") + { + $obErro = new Erro; + $obConexao = new Conexao; + $rsRecordSet = new RecordSet; + $stGroupBy = " GROUP BY mapa_item.cod_solicitacao + , mapa_item.cod_item + , mapa_item.cod_centro + , centro_custo.descricao + , mapa_item.lote + , mapa_item_dotacao.quantidade + , mapa_item_anulacao.quantidade + , cotacao_fornecedor_item.vl_cotacao + , cotacao_item.quantidade + , desdobramento.cod_conta + , desdobramento.cod_estrutural + , desdobramento.descricao + , julgamento_item.cgm_fornecedor + , mapa_item_dotacao.cod_despesa + , mapa_item_dotacao.exercicio + , conta_despesa.cod_estrutural + , conta_despesa.descricao + , despesa_atual.cod_despesa + , conta_despesa_atual.descricao + , conta_despesa_atual.cod_estrutural + , despesa_atual.exercicio + , homologacao.cod_cotacao + , homologacao.exercicio_cotacao + HAVING coalesce(cotacao_item.quantidade, 0.00) - sum(coalesce(item_pre_empenho.quantidade, 0.00)) > 0 "; + $stSql = $this->montaRecuperaItensDetalhesAutorizacaoEmpenhoParcialLicitacao().$stFiltro.$stGroupBy.$stOrdem; + $this->stDebug = $stSql; + $obErro = $obConexao->executaSQL( $rsRecordSet, $stSql, $boTransacao ); + + return $obErro; + } + + public function montaRecuperaItensDetalhesAutorizacaoEmpenhoParcialLicitacao() + { + $stSql = " + SELECT mapa_item.cod_solicitacao + , mapa_item.cod_item + , mapa_item.cod_centro + , centro_custo.descricao AS nom_centro + , CASE + WHEN mapa_item.lote = 0 THEN + 'Unico'::varchar + ELSE + mapa_item.lote::varchar + END AS lote + , cotacao_item.quantidade + , cotacao_fornecedor_item.vl_cotacao::numeric(14,2) AS vl_total + , ( cotacao_fornecedor_item.vl_cotacao / cotacao_item.quantidade )::numeric(14,2) AS vl_unitario + , sum(coalesce(item_pre_empenho.quantidade, 0.00)) as quantidade_autorizacoes + , desdobramento.cod_conta as cod_desdobramento + , desdobramento.cod_estrutural as desdobramento + , desdobramento.descricao as nom_desdobramento + , mapa_item_dotacao.cod_despesa + , conta_despesa.descricao as nom_despesa + , conta_despesa.cod_estrutural as estrutural_despesa + , mapa_item_dotacao.exercicio as exercicio_despesa + , empenho.fn_saldo_dotacao(mapa_item_dotacao.exercicio,mapa_item_dotacao.cod_despesa) as saldo_despesa + , despesa_atual.cod_despesa as cod_despesa_atual + , conta_despesa_atual.descricao as nom_despesa_atual + , conta_despesa_atual.cod_estrutural as estrutural_despesa_atual + , despesa_atual.exercicio as exercicio_despesa_atual + , empenho.fn_saldo_dotacao(despesa_atual.exercicio,despesa_atual.cod_despesa) as saldo_despesa_atual + , julgamento_item.cgm_fornecedor + , ( SELECT nom_cgm FROM sw_cgm WHERE numcgm = julgamento_item.cgm_fornecedor ) AS fornecedor + , ((coalesce(cotacao_item.quantidade, 0.00) - sum(coalesce(item_pre_empenho.quantidade, 0.00))) + * + (cotacao_fornecedor_item.vl_cotacao / coalesce(cotacao_item.quantidade, 0.00)))::numeric(14,2) as vl_cotacao_saldo + , coalesce(cotacao_item.quantidade, 0.00) - sum(coalesce(item_pre_empenho.quantidade, 0.00)) as quantidade_saldo + , homologacao.cod_cotacao + , homologacao.exercicio_cotacao + FROM licitacao.licitacao + + JOIN compras.mapa + ON licitacao.cod_mapa = mapa.cod_mapa + AND licitacao.exercicio_mapa = mapa.exercicio + + JOIN compras.mapa_item + ON mapa_item.cod_mapa = mapa.cod_mapa + AND mapa_item.exercicio = mapa.exercicio + + JOIN compras.mapa_item_dotacao + ON mapa_item_dotacao.cod_mapa = mapa_item.cod_mapa + AND mapa_item_dotacao.exercicio = mapa_item.exercicio + AND mapa_item_dotacao.exercicio_solicitacao = mapa_item.exercicio_solicitacao + AND mapa_item_dotacao.cod_entidade = mapa_item.cod_entidade + AND mapa_item_dotacao.cod_solicitacao = mapa_item.cod_solicitacao + AND mapa_item_dotacao.cod_centro = mapa_item.cod_centro + AND mapa_item_dotacao.cod_item = mapa_item.cod_item + AND mapa_item_dotacao.lote = mapa_item.lote + + LEFT JOIN compras.mapa_item_anulacao + ON mapa_item_anulacao.exercicio = mapa_item_dotacao.exercicio + AND mapa_item_anulacao.cod_mapa = mapa_item_dotacao.cod_mapa + AND mapa_item_anulacao.exercicio_solicitacao = mapa_item_dotacao.exercicio_solicitacao + AND mapa_item_anulacao.cod_entidade = mapa_item_dotacao.cod_entidade + AND mapa_item_anulacao.cod_solicitacao = mapa_item_dotacao.cod_solicitacao + AND mapa_item_anulacao.cod_centro = mapa_item_dotacao.cod_centro + AND mapa_item_anulacao.cod_item = mapa_item_dotacao.cod_item + AND mapa_item_anulacao.lote = mapa_item_dotacao.lote + AND mapa_item_anulacao.cod_conta = mapa_item_dotacao.cod_conta + AND mapa_item_anulacao.cod_despesa = mapa_item_dotacao.cod_despesa + + JOIN compras.mapa_cotacao + ON mapa_cotacao.cod_mapa = mapa.cod_mapa + AND mapa_cotacao.exercicio_mapa = mapa.exercicio + + JOIN compras.julgamento_item + ON julgamento_item.cod_cotacao = mapa_cotacao.cod_cotacao + AND julgamento_item.exercicio = mapa_cotacao.exercicio_cotacao + AND julgamento_item.cod_item = mapa_item.cod_item + AND julgamento_item.lote = mapa_item.lote + + JOIN compras.cotacao_fornecedor_item + ON cotacao_fornecedor_item.exercicio = julgamento_item.exercicio + AND cotacao_fornecedor_item.cod_item = julgamento_item.cod_item + AND cotacao_fornecedor_item.lote = julgamento_item.lote + AND cotacao_fornecedor_item.cod_cotacao = julgamento_item.cod_cotacao + AND cotacao_fornecedor_item.cgm_fornecedor = julgamento_item.cgm_fornecedor + + JOIN compras.solicitacao_item + ON solicitacao_item.cod_solicitacao = mapa_item.cod_solicitacao + AND solicitacao_item.exercicio = mapa_item.exercicio_solicitacao + AND solicitacao_item.cod_entidade = mapa_item.cod_entidade + AND solicitacao_item.cod_centro = mapa_item.cod_centro + AND solicitacao_item.cod_item = mapa_item.cod_item + + JOIN compras.solicitacao_item_dotacao + ON solicitacao_item_dotacao.cod_solicitacao = solicitacao_item.cod_solicitacao + AND solicitacao_item_dotacao.exercicio = solicitacao_item.exercicio + AND solicitacao_item_dotacao.cod_entidade = solicitacao_item.cod_entidade + AND solicitacao_item_dotacao.cod_centro = solicitacao_item.cod_centro + AND solicitacao_item_dotacao.cod_item = solicitacao_item.cod_item + AND solicitacao_item_dotacao.cod_despesa = mapa_item_dotacao.cod_despesa + + JOIN compras.cotacao_item + ON cotacao_item.cod_item = cotacao_fornecedor_item.cod_item + AND cotacao_item.exercicio = cotacao_fornecedor_item.exercicio + AND cotacao_item.cod_cotacao = cotacao_fornecedor_item.cod_cotacao + AND cotacao_item.lote = cotacao_fornecedor_item.lote + + JOIN orcamento.conta_despesa as desdobramento + ON desdobramento.cod_conta = solicitacao_item_dotacao.cod_conta + AND desdobramento.exercicio = solicitacao_item_dotacao.exercicio + + JOIN orcamento.despesa + ON despesa.cod_despesa = solicitacao_item_dotacao.cod_despesa + AND despesa.exercicio = solicitacao_item_dotacao.exercicio + + JOIN orcamento.conta_despesa + ON conta_despesa.cod_conta = despesa.cod_conta + AND conta_despesa.exercicio = despesa.exercicio + + LEFT JOIN orcamento.conta_despesa as conta_despesa_atual + ON conta_despesa_atual.cod_estrutural = conta_despesa.cod_estrutural + AND conta_despesa_atual.exercicio = '".Sessao::getExercicio()."' + + LEFT JOIN orcamento.despesa as despesa_atual + ON despesa_atual.cod_conta = conta_despesa_atual.cod_conta + AND despesa_atual.exercicio = conta_despesa_atual.exercicio + AND despesa_atual.cod_recurso = despesa.cod_recurso + AND despesa_atual.cod_programa = despesa.cod_programa + AND despesa_atual.num_pao = despesa.num_pao + AND despesa_atual.cod_funcao = despesa.cod_funcao + + LEFT JOIN empenho.item_pre_empenho_julgamento + ON item_pre_empenho_julgamento.exercicio_julgamento = cotacao_fornecedor_item.exercicio + AND item_pre_empenho_julgamento.cod_cotacao = cotacao_fornecedor_item.cod_cotacao + AND item_pre_empenho_julgamento.cod_item = cotacao_fornecedor_item.cod_item + AND item_pre_empenho_julgamento.lote = cotacao_fornecedor_item.lote + AND item_pre_empenho_julgamento.cgm_fornecedor = cotacao_fornecedor_item.cgm_fornecedor + + LEFT JOIN empenho.item_pre_empenho + ON item_pre_empenho.cod_pre_empenho = item_pre_empenho_julgamento.cod_pre_empenho + AND item_pre_empenho.exercicio = item_pre_empenho_julgamento.exercicio + AND item_pre_empenho.num_item = item_pre_empenho_julgamento.num_item + + JOIN almoxarifado.centro_custo + ON centro_custo.cod_centro = mapa_item.cod_centro + + JOIN licitacao.cotacao_licitacao + ON cotacao_licitacao.cod_licitacao = licitacao.cod_licitacao + AND cotacao_licitacao.cod_modalidade = licitacao.cod_modalidade + AND cotacao_licitacao.cod_entidade = licitacao.cod_entidade + AND cotacao_licitacao.exercicio_licitacao = licitacao.exercicio + AND cotacao_licitacao.cod_item = cotacao_fornecedor_item.cod_item + AND cotacao_licitacao.cgm_fornecedor = cotacao_fornecedor_item.cgm_fornecedor + AND cotacao_licitacao.cod_cotacao = cotacao_fornecedor_item.cod_cotacao + AND cotacao_licitacao.exercicio_cotacao = cotacao_fornecedor_item.exercicio + AND cotacao_licitacao.lote = cotacao_fornecedor_item.lote + + JOIN licitacao.adjudicacao + ON adjudicacao.cod_licitacao = cotacao_licitacao.cod_licitacao + AND adjudicacao.cod_modalidade = cotacao_licitacao.cod_modalidade + AND adjudicacao.cod_entidade = cotacao_licitacao.cod_entidade + AND adjudicacao.exercicio_licitacao = cotacao_licitacao.exercicio_licitacao + AND adjudicacao.lote = cotacao_licitacao.lote + AND adjudicacao.cod_cotacao = cotacao_licitacao.cod_cotacao + AND adjudicacao.cod_item = cotacao_licitacao.cod_item + AND adjudicacao.exercicio_cotacao = cotacao_licitacao.exercicio_cotacao + AND adjudicacao.cgm_fornecedor = cotacao_licitacao.cgm_fornecedor + + JOIN licitacao.homologacao + ON homologacao.num_adjudicacao = adjudicacao.num_adjudicacao + AND homologacao.cod_entidade = adjudicacao.cod_entidade + AND homologacao.cod_modalidade = adjudicacao.cod_modalidade + AND homologacao.cod_licitacao = adjudicacao.cod_licitacao + AND homologacao.exercicio_licitacao = adjudicacao. exercicio_licitacao + AND homologacao.cod_item = adjudicacao.cod_item + AND homologacao.cod_cotacao = adjudicacao.cod_cotacao + AND homologacao.lote = adjudicacao.lote + AND homologacao.exercicio_cotacao = adjudicacao.exercicio_cotacao + AND homologacao.cgm_fornecedor = adjudicacao.cgm_fornecedor + + WHERE julgamento_item.ordem = 1 + "; + + return $stSql; + } + public function recuperaLicitacaoResponsavelTCMGO(&$rsRecordSet, $stFiltro = "", $stOrdem = "", $boTransacao = "") { $obErro = new Erro; diff --git a/gestaoPatrimonial/fontes/PHP/licitacao/classes/mapeamento/TLicitacaoRescisaoContrato.class.php b/gestaoPatrimonial/fontes/PHP/licitacao/classes/mapeamento/TLicitacaoRescisaoContrato.class.php index 932c2ad..2361773 100644 --- a/gestaoPatrimonial/fontes/PHP/licitacao/classes/mapeamento/TLicitacaoRescisaoContrato.class.php +++ b/gestaoPatrimonial/fontes/PHP/licitacao/classes/mapeamento/TLicitacaoRescisaoContrato.class.php @@ -148,6 +148,9 @@ class TLicitacaoRescisaoContrato extends Persistente if ($this->getDado("num_contrato")) { $stSQL .= "licitacao.contrato.num_contrato = ".$this->getDado("num_contrato")." AND "; } + if ($this->getDado("exercicio")) { + $stSQL .= "contrato.exercicio = '".$this->getDado("exercicio")."' AND "; + } $stSQL = substr($stSQL, 0, strlen($stFiltro)-6); diff --git a/gestaoPatrimonial/fontes/PHP/licitacao/classes/mapeamento/TLicitacaoTipoContrato.class.php b/gestaoPatrimonial/fontes/PHP/licitacao/classes/mapeamento/TLicitacaoTipoContrato.class.php index a4424d5..cd896e1 100644 --- a/gestaoPatrimonial/fontes/PHP/licitacao/classes/mapeamento/TLicitacaoTipoContrato.class.php +++ b/gestaoPatrimonial/fontes/PHP/licitacao/classes/mapeamento/TLicitacaoTipoContrato.class.php @@ -39,7 +39,8 @@ function TLicitacaoTipoContrato() $this->AddCampo('cod_tipo' , 'integer' , true ,'' , true , false); $this->AddCampo('sigla' , 'char' , true ,'8' , false , false); $this->AddCampo('descricao' , 'char' , true ,'80' , false , false); - + $this->AddCampo('tipo_tc' , 'integer' , false ,'' , false , false); + $this->AddCampo('ativo' , 'boolean' , false ,'' , false , false); } } diff --git a/gestaoPatrimonial/fontes/PHP/licitacao/instancias/adjudicacao/OCManterAdjudicacao.php b/gestaoPatrimonial/fontes/PHP/licitacao/instancias/adjudicacao/OCManterAdjudicacao.php index f7cf8c7..e3481af 100644 --- a/gestaoPatrimonial/fontes/PHP/licitacao/instancias/adjudicacao/OCManterAdjudicacao.php +++ b/gestaoPatrimonial/fontes/PHP/licitacao/instancias/adjudicacao/OCManterAdjudicacao.php @@ -32,7 +32,7 @@ * @ignore - * $Id: OCManterAdjudicacao.php 62309 2015-04-20 19:43:33Z arthur $ + * $Id: OCManterAdjudicacao.php 63865 2015-10-27 13:55:57Z franver $ * Casos de uso: uc-03.05.20 */ @@ -183,12 +183,12 @@ function montaSpnItens() $table->setSummary ( 'Itens' ); //$table->setConditional ( true , "#E4E4E4" ); - $table->Head->addCabecalho( 'Item' , 50 ); + $table->Head->addCabecalho( 'Item' , 35 ); $table->Head->addCabecalho( 'Lote' , 5 ); $table->Head->addCabecalho( 'Qtde.' , 10 ); $table->Head->addCabecalho( 'Valor Ref.' , 10 ); $table->Head->addCabecalho( 'Valor' , 10 ); - $table->Head->addCabecalho( 'Status' , 10 ); + $table->Head->addCabecalho( 'Status' , 25 ); //$table->Head->addCabecalho( 'Selecione' , 5 ); $table->Body->addCampo( '[codItem] - [descricaoItem]
    [complemento]' ); diff --git a/gestaoPatrimonial/fontes/PHP/licitacao/instancias/adjudicacao/PRManterAdjudicacao.php b/gestaoPatrimonial/fontes/PHP/licitacao/instancias/adjudicacao/PRManterAdjudicacao.php index b9304bf..71deef1 100644 --- a/gestaoPatrimonial/fontes/PHP/licitacao/instancias/adjudicacao/PRManterAdjudicacao.php +++ b/gestaoPatrimonial/fontes/PHP/licitacao/instancias/adjudicacao/PRManterAdjudicacao.php @@ -35,7 +35,7 @@ * Casos de uso: uc-03.05.20 - $Id: PRManterAdjudicacao.php 59612 2014-09-02 12:00:51Z gelson $ + $Id: PRManterAdjudicacao.php 63865 2015-10-27 13:55:57Z franver $ */ @@ -65,7 +65,8 @@ $obTLicitacaoEdital = new TLicitacaoEdital(); $obTLicitacaoEdital->recuperaListaEdital($rsEdital, $stFiltro); $stMensagemErro = ""; -if (SistemaLegado::comparaDatas(SistemaLegado::dataToBr($rsEdital->getCampo('dt_abertura_propostas')), $_REQUEST["stDtAdjudicacao"])) { + +if (SistemaLegado::comparaDatas(SistemaLegado::dataToBr($rsEdital->getCampo('dt_abertura_propostas')), $_REQUEST["stDtAdjudicacao"] )) { $stMensagemErro = "A data da Adjudicação deve ser maior ou igual à data de abertura de propostas."; } diff --git a/gestaoPatrimonial/fontes/PHP/licitacao/instancias/autorizacao/FLManterAutorizacao.php b/gestaoPatrimonial/fontes/PHP/licitacao/instancias/autorizacao/FLManterAutorizacao.php index ca68c60..831b557 100644 --- a/gestaoPatrimonial/fontes/PHP/licitacao/instancias/autorizacao/FLManterAutorizacao.php +++ b/gestaoPatrimonial/fontes/PHP/licitacao/instancias/autorizacao/FLManterAutorizacao.php @@ -34,21 +34,24 @@ * Casos de uso : uc-03.05.21 - $Id: FLManterAutorizacao.php 62550 2015-05-19 18:21:57Z evandro $ + $Id: FLManterAutorizacao.php 63841 2015-10-22 19:14:30Z michel $ */ include_once '../../../../../../gestaoAdministrativa/fontes/PHP/pacotes/FrameworkHTML.inc.php'; include_once '../../../../../../gestaoAdministrativa/fontes/PHP/framework/include/cabecalho.inc.php'; - require_once CAM_GP_COM_COMPONENTES."ISelectModalidade.class.php"; require_once CAM_GP_COM_COMPONENTES."ISelectTipoObjeto.class.php"; require_once CAM_GP_COM_COMPONENTES."IPopUpEditObjeto.class.php"; require_once CAM_GP_COM_COMPONENTES."IPopUpMapaCompras.class.php"; require_once CAM_GF_ORC_COMPONENTES."ITextBoxSelectEntidadeUsuario.class.php"; +include_once CAM_GP_COM_MAPEAMENTO."TComprasModalidade.class.php"; + +$stAcao = $request->get('stAcao'); +$stProgramaParcial = ($stAcao=='parcial') ? 'Parcial' : ''; # Define o nome dos arquivos PHP -$stPrograma = "ManterAutorizacao"; +$stPrograma = "ManterAutorizacao".$stProgramaParcial; $pgFilt = "FL".$stPrograma.".php"; $pgList = "LS".$stPrograma.".php"; $pgForm = "FM".$stPrograma.".php"; @@ -58,19 +61,14 @@ $pgJs = "JS".$stPrograma.".js"; $obForm = new Form; $obForm->setAction( $pgList ); - $obForm->setTarget( "telaPrincipal" ); -$stAcao = $request->get('stAcao'); - -# $stAcao = $stAcao == 'incluir' ? 'autorizar' : $stAcao ; - //Define o Hidden de ação (padrão no framework) $obHdnAcao = new Hidden; $obHdnAcao->setName( "stAcao" ); $obHdnAcao->setValue( $stAcao ); -//Define o Hidde de controle (padrão no framework) +//Define o Hidden de controle (padrão no framework) $obHdnCtrl = new Hidden; $obHdnCtrl->setName( "stCtrl" ); $obHdnCtrl->setValue( "" ); @@ -78,44 +76,41 @@ $obHdnCtrl->setValue( "" ); $obEntidadeUsuario = new ITextBoxSelectEntidadeUsuario(); $obEntidadeUsuario->setNull( true ); -include_once(CAM_GP_COM_MAPEAMENTO."TComprasModalidade.class.php"); $obComprasModalidade = new TComprasModalidade(); $rsRecordSet = new RecordSet; -//$stFiltro = " WHERE cod_modalidade NOT IN(4,5,6,7) "; -$stFiltro = " WHERE cod_modalidade NOT IN(4,5,10,11) "; - +$stFiltro = " WHERE cod_modalidade NOT IN(4,5,10,11) "; $obComprasModalidade->recuperaTodos($rsRecordSet,$stFiltro," ORDER BY cod_modalidade "); $obISelectModalidadeLicitacao = new Select(); -$obISelectModalidadeLicitacao->setRotulo ("Modalidade" ); -$obISelectModalidadeLicitacao->setTitle ("Selecione a modalidade." ); -$obISelectModalidadeLicitacao->setName ("inCodModalidade" ); -$obISelectModalidadeLicitacao->setNull (true ); -$obISelectModalidadeLicitacao->setCampoID ("cod_modalidade" ); -$obISelectModalidadeLicitacao->addOption ("","Selecione" ); -$obISelectModalidadeLicitacao->setCampoDesc ("[cod_modalidade] - [descricao]" ); -$obISelectModalidadeLicitacao->preencheCombo ($rsRecordSet ); +$obISelectModalidadeLicitacao->setRotulo ( "Modalidade" ); +$obISelectModalidadeLicitacao->setTitle ( "Selecione a modalidade." ); +$obISelectModalidadeLicitacao->setName ( "inCodModalidade" ); +$obISelectModalidadeLicitacao->setNull ( true ); +$obISelectModalidadeLicitacao->setCampoID ( "cod_modalidade" ); +$obISelectModalidadeLicitacao->addOption ( "","Selecione" ); +$obISelectModalidadeLicitacao->setCampoDesc ( "[cod_modalidade] - [descricao]" ); +$obISelectModalidadeLicitacao->preencheCombo( $rsRecordSet ); $obTxtLicitacao = new TextBox(); -$obTxtLicitacao->setName ( "inCodigoLicitacao" ); -$obTxtLicitacao->setId ( "inCodigoLicitacao" ); -$obTxtLicitacao->setRotulo ( "Código Licitação" ); -$obTxtLicitacao->setTitle ( "Informe o código da licitação." ); -$obTxtLicitacao->setInteiro ( true ); +$obTxtLicitacao->setName ( "inCodigoLicitacao" ); +$obTxtLicitacao->setId ( "inCodigoLicitacao" ); +$obTxtLicitacao->setRotulo ( "Código Licitação" ); +$obTxtLicitacao->setTitle ( "Informe o código da licitação." ); +$obTxtLicitacao->setInteiro ( true ); $obPeriodicidade = new Periodicidade(); $obPeriodicidade->setExercicio ( Sessao::getExercicio()); -$obPeriodicidade->setValue ( 4 ); -$obPeriodicidade->setValidaExercicio( true ); -$obPeriodicidade->obDataInicial->setName ( "stDtInicial" ); -$obPeriodicidade->obDataFinal->setName ( "stDtFinal" ); +$obPeriodicidade->setValue ( 4 ); +$obPeriodicidade->setValidaExercicio( true ); +$obPeriodicidade->obDataInicial->setName( "stDtInicial" ); +$obPeriodicidade->obDataFinal->setName ( "stDtFinal" ); $obMapa = new TextBox(); -$obMapa->setRotulo ( 'Mapa' ); -$obMapa->setTitle ( 'Código do mapa de compras.' ); +$obMapa->setRotulo ( 'Mapa' ); +$obMapa->setTitle ( 'Código do mapa de compras.' ); $obMapa->setId ( 'inCodMapa' ); $obMapa->setName ( 'inCodMapa' ); -$obMapa->setInteiro( true ); +$obMapa->setInteiro( true ); $obFormulario = new Formulario; $obFormulario->addForm ( $obForm ); diff --git a/gestaoPatrimonial/fontes/PHP/licitacao/instancias/autorizacao/FMManterAutorizacao.php b/gestaoPatrimonial/fontes/PHP/licitacao/instancias/autorizacao/FMManterAutorizacao.php index af4ef99..8e2c27f 100644 --- a/gestaoPatrimonial/fontes/PHP/licitacao/instancias/autorizacao/FMManterAutorizacao.php +++ b/gestaoPatrimonial/fontes/PHP/licitacao/instancias/autorizacao/FMManterAutorizacao.php @@ -34,7 +34,7 @@ * Casos de uso: uc-03.05.21 - $Id: FMManterAutorizacao.php 63584 2015-09-14 13:11:00Z michel $ + $Id: FMManterAutorizacao.php 64021 2015-11-19 18:39:44Z michel $ */ @@ -44,6 +44,7 @@ include_once CAM_GA_ADM_COMPONENTES.'IMontaAssinaturas.class.php'; include_once CAM_GA_ADM_COMPONENTES.'ITextBoxSelectDocumento.class.php'; include_once CAM_GP_LIC_COMPONENTES.'IMontaNumeroLicitacao.class.php'; include_once CAM_GP_LIC_MAPEAMENTO.'TLicitacaoLicitacao.class.php'; +include_once CAM_GP_LIC_MAPEAMENTO.'TLicitacaoHomologacao.class.php'; include_once CAM_GF_EMP_NEGOCIO.'REmpenhoAutorizacaoEmpenho.class.php'; include_once CAM_GP_COM_COMPONENTES.'ILabelEditObjeto.class.php'; require_once TCOM.'TComprasMapaItem.class.php'; @@ -103,6 +104,27 @@ $obForm = new Form; $obForm->setAction( $pgProc ); $obForm->setTarget( "oculto" ); +$obTLicitacaoHomolgacao = new TLicitacaoHomologacao; + +$stFiltro = "where homologacao.homologado \n". + " and homologacao.cod_cotacao = ".$request->get('inCodCotacao')." \n". + " and homologacao.exercicio_cotacao = '".Sessao::getExercicio()."' \n"; +$obTLicitacaoHomolgacao->recuperaItensAutorizacaoParcial ( $rsItens, $stFiltro ); + +$boParcial = false; +while ( !$rsItens->eof() ) { + if($rsItens->getCampo('quantidade_empenho') > 0) + $boParcial = true; + + $rsItens->proximo(); +} + +if($boParcial){ + $stMsg = "Licitação ".$request->get('inCodLicitacao')."/".Sessao::getExercicio()." possui autorização de empenho parcial."; + $stMsg .= " Para autorizar está licitação, utilize a ação: Gestão Patrimonial :: Licitação :: Autorização de Empenho :: Emitir Autorização de Empenho Parcial"; + SistemaLegado::alertaAviso($pgList.'?'.Sessao::getId(), $stMsg , "unica", "erro", Sessao::getId(), "../"); +} + $stUltimaDataContabil = recuperaUltimaDataContabil(); $obTLicitacaoLicitacao = new TLicitacaoLicitacao; @@ -299,7 +321,7 @@ $stJs .= " \n"; echo $stJs; if($boRegistroPreco) - SistemaLegado::exibeAviso("Autorizações de Empenho de Registros de Preços devem ser feitas na ação: Gestão Financeira :: Empenho :: Autorização :: Incluir Autorização Diversos.","aviso","aviso"); + SistemaLegado::exibeAviso("Autorizações de Empenho de Registros de Preços devem ser feitas na ação: Gestão Patrimonial :: Licitação :: Autorização de Empenho :: Emitir Autorização de Empenho Parcial.","aviso","aviso"); include_once '../../../../../../gestaoAdministrativa/fontes/PHP/framework/include/rodape.inc.php'; diff --git a/gestaoPatrimonial/fontes/PHP/licitacao/instancias/autorizacao/FMManterAutorizacaoParcial.php b/gestaoPatrimonial/fontes/PHP/licitacao/instancias/autorizacao/FMManterAutorizacaoParcial.php new file mode 100644 index 0000000..1c6dea7 --- /dev/null +++ b/gestaoPatrimonial/fontes/PHP/licitacao/instancias/autorizacao/FMManterAutorizacaoParcial.php @@ -0,0 +1,308 @@ + +recuperaUltimaDataEmpenho( $rsRecordSet,$stFiltro,$stOrdem ); + + if ($dataUltimoEmpenho != "") { + $dataUltimoEmpenho = SistemaLegado::dataToBr($rsRecordSet->getCampo('dt_empenho')); + } + + /* + Rotina que serve para preencher a data da compra direta com + a última data do lançamento contábil. + */ + $obREmpenhoAutorizacaoEmpenho = new REmpenhoAutorizacaoEmpenho; + + $obREmpenhoAutorizacaoEmpenho->obROrcamentoEntidade->setCodigoEntidade( $_REQUEST['inCodEntidade'] ); + $obREmpenhoAutorizacaoEmpenho->setExercicio( Sessao::getExercicio() ); + $obErro = $obREmpenhoAutorizacaoEmpenho->listarMaiorData( $rsMaiorData ); + + if (($rsMaiorData->getCampo( "data_autorizacao" ) !="") ) { + $stDtAutorizacao = $rsMaiorData->getCampo( "data_autorizacao" ); + } elseif ( ( $dataUltimoEmpenho !="") ) { + $stDtAutorizacao = $dataUltimoEmpenho; + } else { + $stDtAutorizacao = "01/01/".Sessao::getExercicio(); + } + + return $stDtAutorizacao; +} + +$stAcao = $request->get('stAcao'); +$stCtrl = $request->get('stCtrl'); + +$obForm = new Form; +$obForm->setAction( $pgProc ); +$obForm->setTarget( "oculto" ); + +$stUltimaDataContabil = recuperaUltimaDataContabil(); + +$obTLicitacaoLicitacao = new TLicitacaoLicitacao; +$obTLicitacaoLicitacao->setDado( 'cod_licitacao' , $request->get('inCodLicitacao') ); +$obTLicitacaoLicitacao->setDado( 'exercicio' , Sessao::getExercicio() ); +$obTLicitacaoLicitacao->setDado( 'cod_entidade' , $request->get('inCodEntidade') ); +$obTLicitacaoLicitacao->setDado( 'cod_modalidade', $request->get('inCodModalidade') ); +$obTLicitacaoLicitacao->recuperaLicitacaoCompleta( $rsLicitacao ); + +list($inCodMapa, $stExercicioMapa) = explode('/', $rsLicitacao->getCampo('mapa_compra')); + +$obTComprasMapa = new TComprasMapa; +$obTComprasMapa->setDado( 'cod_mapa' , $inCodMapa ); +$obTComprasMapa->setDado( 'exercicio' , $stExercicioMapa ); +$obTComprasMapa->recuperaTipoMapa($rsMapa); + +$boRegistroPreco = ($rsMapa->getCampo('registro_precos') == 't') ? TRUE : FALSE; + +$obHdnCtrl = new Hidden; +$obHdnCtrl->setName ( "stCtrl" ); +$obHdnCtrl->setValue ( $stCtrl ); + +$obHdnAcao = new Hidden; +$obHdnAcao->setName ( "stAcao" ); +$obHdnAcao->setValue ( $stAcao ); + +$obHdnLicitacao = new Hidden; +$obHdnLicitacao->setName ( 'inCodLicitacao' ); +$obHdnLicitacao->setValue ( $request->get('inCodLicitacao') ); + +$obHdnEntidade = new Hidden; +$obHdnEntidade->setId ( 'inCodEntidade' ); +$obHdnEntidade->setName ( 'inCodEntidade' ); +$obHdnEntidade->setValue ( $request->get('inCodEntidade') ); + +$obHdnStUltimaDataContabil = new Hidden; +$obHdnStUltimaDataContabil->setName ( 'stUltimaDataContabil' ); +$obHdnStUltimaDataContabil->setValue( $stUltimaDataContabil ); + +$obHdnModalidade = new Hidden; +$obHdnModalidade->setName ( 'inCodModalidade' ); +$obHdnModalidade->setValue ( $request->get('inCodModalidade') ); + +$obHdnDtLicitacao = new Hidden; +$obHdnDtLicitacao->setName ( 'inDataLicitacao' ); +$obHdnDtLicitacao->setValue ( $rsLicitacao->getCampo('dt_licitacao') ); + +$obLblExercicio = new Label; +$obLblExercicio->setValue ( Sessao::getExercicio() ); +$obLblExercicio->setRotulo ( 'Exercício' ); + +$obLblEntidade = new Label; +$obLblEntidade->setValue ( $rsLicitacao->getCampo('entidade') ); +$obLblEntidade->setRotulo ( 'Entidade' ); + +$obLblLicitacao = new Label; +$obLblLicitacao->setRotulo ( 'Código Licitação' ); +$obLblLicitacao->setValue ( $rsLicitacao->getCampo('cod_licitacao')."/".$rsLicitacao->getCampo('exercicio') ); + +$obLblDtLicitacao = new Label; +$obLblDtLicitacao->setRotulo( 'Data Licitação' ); +$obLblDtLicitacao->setValue ( $rsLicitacao->getCampo('dt_licitacao') ); + +$obLblTipoObjetoLicitacao = new Label; +$obLblTipoObjetoLicitacao->setRotulo( 'Tipo Objeto' ); +$obLblTipoObjetoLicitacao->setValue ( $rsLicitacao->getCampo('cod_tipo_objeto').' - '.SistemaLegado::pegaDado('descricao','compras.tipo_objeto','where cod_tipo_objeto ='.$rsLicitacao->getCampo('cod_tipo_objeto')) ); + +$obLblObjetoLicitacao = new Label; +$obLblObjetoLicitacao->setRotulo( 'Objeto' ); +$obLblObjetoLicitacao->setValue ( $rsLicitacao->getCampo('cod_objeto').' - '.SistemaLegado::pegaDado('descricao','compras.objeto','where cod_objeto ='.$rsLicitacao->getCampo('cod_objeto')) ); + +$obLblDtEntregaLicitacao = new Label; +$obLblDtEntregaLicitacao->setRotulo ( 'Data Entrega Proposta' ); +$obLblDtEntregaLicitacao->setValue ( $rsLicitacao->getCampo('dt_entrega_proposta') ); + +$obLblValidadeLicitacao = new Label; +$obLblValidadeLicitacao->setRotulo ( 'Data Validade Proposta' ); +$obLblValidadeLicitacao->setValue ( $rsLicitacao->getCampo('dt_validade_proposta') ); + +$obLblCondicoesPagamentoLicitacao = new Label; +$obLblCondicoesPagamentoLicitacao->setRotulo( 'Condições de Pagamento' ); +$obLblCondicoesPagamentoLicitacao->setValue ( $rsLicitacao->getCampo('condicoes_pagamento') ); + +$obDtAprovacaoJuridicoLicitacao = new Data; +$obDtAprovacaoJuridicoLicitacao->setName ( "stDtAutorizacao" ); +$obDtAprovacaoJuridicoLicitacao->setValue ( $stUltimaDataContabil ); +$obDtAprovacaoJuridicoLicitacao->setRotulo ( "Data Autorização"); +$obDtAprovacaoJuridicoLicitacao->setTitle ( 'Informe a data da autorização.' ); +$obDtAprovacaoJuridicoLicitacao->setNull ( false ); + +$oblblModalidade = new Label; +$oblblModalidade->setValue ( $rsLicitacao->getCampo( 'modalidade' ) ); +$oblblModalidade->setRotulo ( 'Modalidade' ); + +$obLblCotacao = new Label; +$obLblCotacao->setValue ( $request->get('inCodCotacao')."/".Sessao::getExercicio() ); +$obLblCotacao->setRotulo ( 'Cotação' ); + +$obLblMapaLicitacao = new Label; +$obLblMapaLicitacao->setValue ( $rsLicitacao->getCampo('mapa_compra')); +$obLblMapaLicitacao->setRotulo ( 'Mapa' ); + +if($boRegistroPreco){ + $obLblRegistroPreco = new Label; + $obLblRegistroPreco->setValue ( 'Sim' ); + $obLblRegistroPreco->setRotulo ( 'Registro de Preço' ); +} + +$obSpnAutorizacoes = new Span; +$obSpnAutorizacoes->setId ( 'spnAutorizacoes' ); + +$obSpnSpace = new Span; +$obSpnSpace->setId ( 'spnLabels' ); + +$obSpnAlteraItem = new Span; +$obSpnAlteraItem->setId ( 'spnAlteraItem' ); + +$obSpnItens = new Span; +$obSpnItens->setId ( 'spnItens' ); + +$obLblTotalMapa = new Label(); +$obLblTotalMapa->setRotulo ( 'Total do Mapa' ); +$obLblTotalMapa->setId ( 'stTotalMapa' ); +$obLblTotalMapa->setName ( 'stTotalMapa' ); + +# Componente que monta as Assinaturas. +$obMontaAssinaturas = new IMontaAssinaturas(null, 'autorizacao_empenho'); +$obMontaAssinaturas->definePapeisDisponiveis('autorizacao_empenho'); +$obMontaAssinaturas->setOpcaoAssinaturas( false ); + +$obFormulario = new Formulario(); +$obFormulario->addForm( $obForm ); +$obFormulario->addHidden ( $obHdnLicitacao ); +$obFormulario->addHidden ( $obHdnEntidade ); +$obFormulario->addHidden ( $obHdnModalidade ); +$obFormulario->addHidden ( $obHdnAcao ); +$obFormulario->addHidden ( $obHdnCtrl ); +$obFormulario->addHidden ( $obHdnDtLicitacao ); +$obFormulario->addHidden ( $obHdnStUltimaDataContabil ); + +if($boRegistroPreco) + $obFormulario->addComponente( $obLblRegistroPreco ); + +$obFormulario->addComponente ( $obLblExercicio ); +$obFormulario->addComponente ( $obLblEntidade ); +$obFormulario->addComponente ( $obLblLicitacao ); + +$obFormulario->addComponente ( $obLblDtLicitacao ); +$obFormulario->addComponente ( $obLblTipoObjetoLicitacao ); +$obFormulario->addComponente ( $obLblObjetoLicitacao ); +$obFormulario->addComponente ( $obLblDtEntregaLicitacao ); +$obFormulario->addComponente ( $obLblValidadeLicitacao ); +$obFormulario->addComponente ( $obLblCondicoesPagamentoLicitacao ); + +$obFormulario->addComponente ( $oblblModalidade ); +$obFormulario->addComponente ( $obLblCotacao ); + +$obFormulario->addComponente ( $obLblMapaLicitacao ); +$obFormulario->addComponente ( $obLblTotalMapa ); + +# Monta o componente de Assinaturas. +$obMontaAssinaturas->geraFormulario( $obFormulario ); + +$obFormulario->addSpan ( $obSpnSpace ); +$obFormulario->addTitulo ( $rsLicitacao->getCampo('entidade') ); +$obFormulario->addComponente ( $obDtAprovacaoJuridicoLicitacao ); +$obFormulario->addSpan ( $obSpnItens ); + +$obOk = new Ok(true); + +$obCancelar = new Cancelar(); +$obCancelar->obEvento->setOnClick("Cancelar('".$pgList."','telaPrincipal');"); + +$obFormulario->defineBarra( array( $obOk, $obCancelar ) ); + +$obFormulario->Show(); + +if ($obMontaAssinaturas->getOpcaoAssinaturas()) { + echo $obMontaAssinaturas->disparaLista(); +} + +# Parâmetros necessários para requisitar as informações da Licitação. +$stParams = "&inCodCotacao=".$request->get( 'inCodCotacao' ); +$stParams .= "&inCodLicitacao=".$rsLicitacao->getCampo( 'cod_licitacao' ); +$stParams .= "&inCodEntidade=".$rsLicitacao->getCampo( 'cod_entidade' ); +$stParams .= "&inCodModalidade=".$rsLicitacao->getCampo( 'cod_modalidade' ); +$stParams .= "&inCodMapa=".$rsLicitacao->getCampo( 'mapa_compra' ); +$stParams .= "&stExercicioMapa=".$rsLicitacao->getCampo( 'exercicio' ); + +# Carrega as informações básicas da Licitação. +$stJs = " \n"; + +echo $stJs; + +include_once '../../../../../../gestaoAdministrativa/fontes/PHP/framework/include/rodape.inc.php'; + +?> diff --git a/gestaoPatrimonial/fontes/PHP/licitacao/instancias/autorizacao/JSManterAutorizacaoParcial.js b/gestaoPatrimonial/fontes/PHP/licitacao/instancias/autorizacao/JSManterAutorizacaoParcial.js new file mode 100644 index 0000000..0115075 --- /dev/null +++ b/gestaoPatrimonial/fontes/PHP/licitacao/instancias/autorizacao/JSManterAutorizacaoParcial.js @@ -0,0 +1,52 @@ + + + + diff --git a/gestaoPatrimonial/fontes/PHP/licitacao/instancias/autorizacao/LSManterAutorizacaoParcial.php b/gestaoPatrimonial/fontes/PHP/licitacao/instancias/autorizacao/LSManterAutorizacaoParcial.php new file mode 100644 index 0000000..2d587ee --- /dev/null +++ b/gestaoPatrimonial/fontes/PHP/licitacao/instancias/autorizacao/LSManterAutorizacaoParcial.php @@ -0,0 +1,180 @@ + +get('stAcao'); + +//filtros +$arFiltro = Sessao::read('filtro'); + +$pg = $request->get('pg', 0); +$pos = $request->get('pos', 0); + +//seta o filtro na sessao e vice-versa +if ( !Sessao::read('paginando') ) { + foreach ($_REQUEST as $stCampo => $stValor) { + $arFiltro[$stCampo] = $stValor; + } + Sessao::write('pg', $pg); + Sessao::write('pos', $pos); + Sessao::write('paginando',true); +} else { + Sessao::write('pg',$pg); + Sessao::write('pos',$pos); +} + +if ($arFiltro) { + foreach ($arFiltro as $key => $value) { + $_REQUEST[$key] = $value; + } +} + +$request = new Request($_REQUEST); + +Sessao::write('paginando',true); +Sessao::write('filtro',$arFiltro); + +///////// montando filtros + +$stFiltros .= " AND licitacao.exercicio = '".Sessao::getExercicio()."' \n"; + +if($request->get('inCodEntidade')) + $stFiltros .= " AND entidade.cod_entidade = ".$request->get('inCodEntidade')." \n"; + +if($request->get('inCodModalidade')) + $stFiltros .= " AND licitacao.cod_modalidade = ".$request->get('inCodModalidade')." \n"; + +if($request->get('inCodigoLicitacao')) + $stFiltros .= " AND licitacao.cod_licitacao = ".$request->get('inCodigoLicitacao')." \n"; + +if($request->get('stDtInicial')) + $stFiltros .= " AND to_date( licitacao.timestamp::VARCHAR, 'yyyy/mm/dd' ) >= to_date ( '".$request->get('stDtInicial')."' , 'dd/mm/yyyy' ) \n"; + +if($request->get('stDtFinal')) + $stFiltros .= " AND to_date( licitacao.timestamp::VARCHAR, 'yyyy/mm/dd' ) <= to_date ( '".$request->get('stDtFinal')."', 'dd/mm/yyyy' ) \n"; + +if($request->get('inCodMapa')) + $stFiltros .= " AND mapa_cotacao.cod_mapa = ".$request->get('inCodMapa')." \n"; + +$obTLicitacaoHomolocacao = new TLicitacaoHomologacao; +$obTLicitacaoHomolocacao->recuperaCotacoesParaEmpenhoParcial( $rsCotacoes, $stFiltros ); + +$obLista = new Lista(); + +$obLista->setRecordSet( $rsCotacoes ); + +$obLista->addCabecalho(); +$obLista->ultimoCabecalho->addConteudo(' '); +$obLista->ultimoCabecalho->setWidth( 5 ); +$obLista->commitCabecalho(); + +$obLista->addCabecalho(); +$obLista->ultimoCabecalho->addConteudo('Entidade'); +$obLista->commitCabecalho(); + +$obLista->addCabecalho(); +$obLista->ultimoCabecalho->addConteudo('Modalidade'); +$obLista->ultimoCabecalho->setWidth(25); +$obLista->commitCabecalho(); + +$obLista->addCabecalho(); +$obLista->ultimoCabecalho->addConteudo('Cod. Licitação'); +$obLista->ultimoCabecalho->setWidth(10); +$obLista->commitCabecalho(); + +$obLista->addCabecalho(); +$obLista->ultimoCabecalho->addConteudo('Data Licitação'); +$obLista->ultimoCabecalho->setWidth(10); +$obLista->commitCabecalho(); + +$obLista->addCabecalho(); +$obLista->ultimoCabecalho->addConteudo('Mapa'); +$obLista->commitCabecalho(); + +$obLista->addCabecalho(); +$obLista->ultimoCabecalho->addConteudo('Ação'); +$obLista->ultimoCabecalho->setWidth(10); +$obLista->commitCabecalho(); + +$obLista->addDado(); +$obLista->ultimoDado->setAlinhamento("ESQUERDA"); +$obLista->ultimoDado->setCampo( "[cod_entidade] - [entidade]" ); +$obLista->commitDado(); + +$obLista->addDado(); +$obLista->ultimoDado->setAlinhamento("ESQUERDA"); +$obLista->ultimoDado->setCampo( "[cod_modalidade] - [modalidade]" ); +$obLista->commitDado(); + +$obLista->addDado(); +$obLista->ultimoDado->setAlinhamento("DIREITA"); +$obLista->ultimoDado->setCampo( "[cod_licitacao]" ); +$obLista->commitDado(); + +$obLista->addDado(); +$obLista->ultimoDado->setAlinhamento("CENTRO"); +$obLista->ultimoDado->setCampo( "[data]" ); +$obLista->commitDado(); + +$obLista->addDado(); +$obLista->ultimoDado->setAlinhamento("CENTRO"); +$obLista->ultimoDado->setCampo( "[cod_mapa]/[exercicio_mapa]" ); +$obLista->commitDado(); + +$obLista->addAcao(); +$obLista->ultimaAcao->setAcao( 'selecionar' ); +$obLista->ultimaAcao->addCampo( "&inCodCotacao" , "cod_cotacao" ); +$obLista->ultimaAcao->addCampo( "&inCodEntidade" , "cod_entidade" ); +$obLista->ultimaAcao->addCampo( "&inCodLicitacao" , "cod_licitacao" ); +$obLista->ultimaAcao->addCampo( "&inCodModalidade" , "cod_modalidade" ); +$obLista->ultimaAcao->setLink( $pgForm."?stAcao=".$stAcao."&".Sessao::getId().$stLink ); +$obLista->commitAcao(); + +$obLista->show(); diff --git a/gestaoPatrimonial/fontes/PHP/licitacao/instancias/autorizacao/OCManterAutorizacaoParcial.php b/gestaoPatrimonial/fontes/PHP/licitacao/instancias/autorizacao/OCManterAutorizacaoParcial.php new file mode 100644 index 0000000..0fb4f10 --- /dev/null +++ b/gestaoPatrimonial/fontes/PHP/licitacao/instancias/autorizacao/OCManterAutorizacaoParcial.php @@ -0,0 +1,953 @@ + + $arItem) { + if ( $arItem["cod_item"] == $inCodItem && $arItem["cod_cotacao"] == $inCodCotacao ) { + foreach( $arLicitacao as $arLicitacaoTemp) { + $stFiltro = " and licitacao.cod_licitacao = ".$arLicitacaoTemp['inCodLicitacao']; + $stFiltro .= " and licitacao.cod_modalidade = ".$arLicitacaoTemp['inCodModalidade']; + $stFiltro .= " and licitacao.cod_entidade = ".$arLicitacaoTemp['inCodEntidade']; + $stFiltro .= " and mapa_item.cod_item = ".$arItem["cod_item"]; + + $obTLicitacao = new TLicitacaoLicitacao(); + $obTLicitacao->recuperaItensDetalhesAutorizacaoEmpenhoParcialLicitacao( $rsDetalheItens , $stFiltro); + + $obTComprasCotacaoFornecedorItem = new TComprasCotacaoFornecedorItem (); + $stFiltro = " WHERE mapa_cotacao.exercicio_mapa = '".$arItem["exercicio"]."' + AND mapa_cotacao.cod_mapa = ".$arItem["cod_mapa"]." + AND cotacao_item.cod_item = ".$arItem["cod_item"]." \n"; + $stOrder = " ORDER BY cotacao_item.cod_item, sw_cgm.nom_cgm"; + $obTComprasCotacaoFornecedorItem->recuperaItensCotacaoJulgadosAutorizacaoParcial ( $rsCotacaoItens, $stFiltro ); + + $arItens[$chaveItem]['arCotacaoItem'] = $rsCotacaoItens->getElementos(); + Sessao::write('arItens', $arItens); + + $obROrcamentoDespesa = new ROrcamentoDespesa; + $obROrcamentoDespesa->obROrcamentoClassificacaoDespesa->setMascClassificacao( $rsDetalheItens->getCampo('desdobramento') ); + $obROrcamentoDespesa->listarContaDespesa($rsDotacao); + } + + $qtdItem = str_replace(",",".",str_replace(".","",$arItem['nuQtdeItem'])); + $inCgmFornecedor = $arItem['inCgmFornecedor']; + $inCodDespesa = $arItem['inCodDespesa']; + $stCodClassificacao = $arItem['stCodClassificacao']; + + foreach ($rsCotacaoItens->getElementos() as $key => $cotacaoItem) { + if($cotacaoItem['cgm_fornecedor'] == $inCgmFornecedor){ + $nuVlUnitario = $cotacaoItem['vl_cotacao'] / $cotacaoItem['quantidade']; + break; + } + } + + $obForm = new Form; + $obForm->setAction( $pgProc ); + $obForm->setTarget( "oculto" ); + + $obIntCodItem = new Inteiro(); + $obIntCodItem->setRotulo( 'Código' ); + $obIntCodItem->setName ( 'inCodItem' ); + $obIntCodItem->setId ( 'inCodItem' ); + $obIntCodItem->setValue ( $arItem['cod_item'] ); + $obIntCodItem->setLabel ( true ); + + $obLblNomItem = new Label(); + $obLblNomItem->setRotulo( 'Descrição' ); + $obLblNomItem->setId ( 'stNomItem' ); + $obLblNomItem->setName ( 'stNomItem' ); + $obLblNomItem->setValue ( $arItem['descricao_completa'] ); + + $obLblQtdTotalItem = new Label(); + $obLblQtdTotalItem->setRotulo( 'Quantidade Total' ); + $obLblQtdTotalItem->setValue ( number_format($rsDetalheItens->getCampo('quantidade'), 4, ",", ".") ); + + $obLblQtdAutorizadaItem = new Label(); + $obLblQtdAutorizadaItem->setRotulo( 'Quantidade Autorizada' ); + $obLblQtdAutorizadaItem->setValue ( number_format($rsDetalheItens->getCampo('quantidade_autorizacoes'), 4, ",", ".") ); + + $obLblSaldoAutorizarItem = new Label(); + $obLblSaldoAutorizarItem->setRotulo( 'Saldo a Autorizar' ); + $obLblSaldoAutorizarItem->setValue ( number_format($rsDetalheItens->getCampo('quantidade_saldo'), 4, ",", ".") ); + + $obIntQtdeItem = new Quantidade(); + $obIntQtdeItem->setRotulo ( 'Quantidade para Esta Autorização' ); + $obIntQtdeItem->setId ( 'nuQtdeItem' ); + $obIntQtdeItem->setName ( 'nuQtdeItem' ); + $obIntQtdeItem->setValue ( number_format($qtdItem, 4, ",", ".") ); + $obIntQtdeItem->setMaxLength( 16 ); + $obIntQtdeItem->setSize ( 23 ); + $obIntQtdeItem->obEvento->setOnChange( "montaParametrosGET('verificaQuantidadeItem', 'inCodItem,inCodCotacao,nuQtdeItem,hdnNuQtdeItem,inCgmFornecedor');" ); + + $obVlrPrecoUnitario = new Moeda(); + $obVlrPrecoUnitario->setRotulo ( 'Valor Unitário' ); + $obVlrPrecoUnitario->setId ( 'nuVlUnitario' ); + $obVlrPrecoUnitario->setName ( 'nuVlUnitario' ); + $obVlrPrecoUnitario->setValue ( number_format($nuVlUnitario, 2, ",", ".") ); + $obVlrPrecoUnitario->setDecimais( 4 ); + $obVlrPrecoUnitario->setNull ( true ); + $obVlrPrecoUnitario->setSize ( 23 ); + $obVlrPrecoUnitario->setLabel ( true ); + + $obLblVlrTotalItem = new Label(); + $obLblVlrTotalItem->setRotulo ( 'Valor Total' ); + $obLblVlrTotalItem->setId ( 'nuVlTotal' ); + $obLblVlrTotalItem->setName ( 'nuVlTotal' ); + $obLblVlrTotalItem->setValue ( number_format($qtdItem * $nuVlUnitario, 2, ",", ".") ); + + $obISelectFornecedor = new Select(); + $obISelectFornecedor->setName ( 'inCgmFornecedor' ); + $obISelectFornecedor->setId ( 'inCgmFornecedor' ); + $obISelectFornecedor->setRotulo ( '**Fornecedor' ); + $obISelectFornecedor->setTitle ( 'Selecione o Fornecedor.' ); + $obISelectFornecedor->setCampoID ( 'cgm_fornecedor' ); + $obISelectFornecedor->setValue ( $inCgmFornecedor ); + $obISelectFornecedor->setCampoDesc ( 'fornecedor' ); + $obISelectFornecedor->addOption ( '', 'Selecione' ); + $obISelectFornecedor->setNull ( true ); + $obISelectFornecedor->preencheCombo ( $rsCotacaoItens ); + $obISelectFornecedor->obEvento->setOnChange( "montaParametrosGET('montaFornecedor', 'inCgmFornecedor,hdnInCGMFornecedor,inCodCotacao,inCodItem,nuQtdeItem');" ); + + $obSpnAlteraFornecedorItem = new Span; + $obSpnAlteraFornecedorItem->setId ( 'spnAlteraFornecedorItem' ); + + $obLblCentroCusto = new Label(); + $obLblCentroCusto->setRotulo( 'Centro de Custo' ); + $obLblCentroCusto->setId ( 'stNomCentroCusto_label' ); + $obLblCentroCusto->setValue ( $rsDetalheItens->getCampo('cod_centro').' - '.$rsDetalheItens->getCampo('nom_centro') ); + + $obHdnIdCentroCusto = new Hidden; + $obHdnIdCentroCusto->setName ( 'inCodCentroCusto' ); + $obHdnIdCentroCusto->setId ( 'inCodCentroCusto' ); + $obHdnIdCentroCusto->setValue ( $rsDetalheItens->getCampo('cod_centro') ); + + $obHdnNomCentroCusto = new Hidden; + $obHdnNomCentroCusto->setName ( 'stNomCentroCusto' ); + $obHdnNomCentroCusto->setId ( 'stNomCentroCusto' ); + $obHdnNomCentroCusto->setValue ( $rsDetalheItens->getCampo('nom_centro') ); + + $boMontaDesdobramento = true; + + if($rsDetalheItens->getCampo('cod_despesa_atual')!='' && $rsDetalheItens->getCampo('desdobramento')!='' && $rsDetalheItens->getCampo('saldo_despesa')!=''){ + $obInCodDespesa = new Hidden; + $obInCodDespesa->setName ( 'inCodDespesa' ); + $obInCodDespesa->setId ( 'inCodDespesa' ); + $obInCodDespesa->setValue ( $rsDetalheItens->getCampo('cod_despesa_atual') ); + + $obStCodClassificacao = new Hidden; + $obStCodClassificacao->setName ( 'stCodClassificacao' ); + $obStCodClassificacao->setId ( 'stCodClassificacao' ); + $obStCodClassificacao->setValue ( $rsDetalheItens->getCampo('cod_desdobramento') ); + + $obLblDotacao = new Label(); + $obLblDotacao->setRotulo( 'Dotação Orçamentária' ); + $obLblDotacao->setId ( 'stDotacao' ); + $obLblDotacao->setName ( 'stDotacao' ); + $obLblDotacao->setValue ( $rsDetalheItens->getCampo('cod_despesa_atual').' - '.$rsDetalheItens->getCampo('nom_despesa_atual') ); + + $obLblDesdobramento = new Label(); + $obLblDesdobramento->setRotulo ( 'Desdobramento' ); + $obLblDesdobramento->setId ( 'stDesdobramento' ); + $obLblDesdobramento->setName ( 'stDesdobramento' ); + $obLblDesdobramento->setValue ( $rsDetalheItens->getCampo('desdobramento').' - '.$rsDetalheItens->getCampo('nom_desdobramento') ); + + $obLblSaldoDotacao = new Label(); + $obLblSaldoDotacao->setRotulo ( 'Saldo da Dotação'); + $obLblSaldoDotacao->setId ( 'vlSaldoDotacao' ); + $obLblSaldoDotacao->setName ( 'vlSaldoDotacao' ); + $obLblSaldoDotacao->setValue ( number_format($rsDetalheItens->getCampo('saldo_despesa_atual'), 2, ",", ".") ); + + $boMontaDesdobramento = false; + }else{ + $obMontaDotacao = new IMontaDotacaoDesdobramento(); + $obMontaDotacao->obBscDespesa->setRotulo ( "**Dotação Orçamentária" ); + $obMontaDotacao->obBscDespesa->obCampoCod->setValue ( $inCodDespesa ); + $obMontaDotacao->obCmbClassificacao->setNull( true ); + $obMontaDotacao->setMostraSintetico ( false ); + $obMontaDotacao->obCmbClassificacao->setRotulo( "**Desdobramento" ); + + $obInCodClassificacao = new Hidden; + $obInCodClassificacao->setName ( 'codClassificacao' ); + $obInCodClassificacao->setId ( 'codClassificacao' ); + $obInCodClassificacao->setValue ( $stCodClassificacao ); + } + + $obHdnIdCodCotacao = new Hidden; + $obHdnIdCodCotacao->setName ( 'inCodCotacao' ); + $obHdnIdCodCotacao->setId ( 'inCodCotacao' ); + $obHdnIdCodCotacao->setValue( $arItem['cod_cotacao'] ); + + $obHdnNuQtdeItem = new Hidden; + $obHdnNuQtdeItem->setName ( 'hdnNuQtdeItem' ); + $obHdnNuQtdeItem->setId ( 'hdnNuQtdeItem' ); + $obHdnNuQtdeItem->setValue ( $arItem['quantidade_saldo'] ); + + $obHdnCGMCentroCusto = new Hidden; + $obHdnCGMCentroCusto->setName ( 'hdnInCodCentroCusto' ); + $obHdnCGMCentroCusto->setId ( 'hdnInCodCentroCusto' ); + $obHdnCGMCentroCusto->setValue ( $rsDetalheItens->getCampo('cod_centro') ); + + $obHdnCGMFornecedor = new Hidden; + $obHdnCGMFornecedor->setName ( 'hdnInCGMFornecedor' ); + $obHdnCGMFornecedor->setId ( 'hdnInCGMFornecedor' ); + $obHdnCGMFornecedor->setValue ( $rsDetalheItens->getCampo('cgm_fornecedor') ); + + $obHdnExercicioMapa = new Hidden; + $obHdnExercicioMapa->setName ( 'hdnStExercicioMapa' ); + $obHdnExercicioMapa->setId ( 'hdnStExercicioMapa' ); + $obHdnExercicioMapa->setValue ( $arItem["exercicio"] ); + + $obHdnCodMapa = new Hidden; + $obHdnCodMapa->setName ( 'hdnInCodMapa' ); + $obHdnCodMapa->setId ( 'hdnInCodMapa' ); + $obHdnCodMapa->setValue ( $arItem["cod_mapa"] ); + + $obBtnAlterarItem = new Button; + $obBtnAlterarItem->setName ("btnAlterarItem"); + $obBtnAlterarItem->setId ("btnAlterarItem"); + $obBtnAlterarItem->setValue ("Alterar Item"); + $obBtnAlterarItem->setTipo ("button"); + $obBtnAlterarItem->obEvento->setOnClick("montaParametrosGET('alterarListaItem');"); + + $obFormularioItem = new Formulario(); + $obFormularioItem->setId('sw_table_parcial'); + $obFormularioItem->addTitulo ('Alterar Item'); + $obFormularioItem->addHidden( $obHdnIdCodCotacao ); + $obFormularioItem->addHidden( $obHdnNuQtdeItem ); + $obFormularioItem->addHidden( $obHdnCGMFornecedor ); + $obFormularioItem->addHidden( $obHdnCGMCentroCusto ); + $obFormularioItem->addHidden( $obHdnExercicioMapa ); + $obFormularioItem->addHidden( $obHdnCodMapa ); + $obFormularioItem->addComponente( $obIntCodItem ); + $obFormularioItem->addComponente( $obLblNomItem ); + + if($boMontaDesdobramento){ + $obFormularioItem->addHidden( $obInCodClassificacao ); + $obMontaDotacao->geraFormulario ( $obFormularioItem ); + }else{ + $obFormularioItem->addHidden( $obInCodDespesa ); + $obFormularioItem->addHidden( $obStCodClassificacao ); + $obFormularioItem->addComponente( $obLblDotacao ); + $obFormularioItem->addComponente( $obLblDesdobramento ); + $obFormularioItem->addComponente( $obLblSaldoDotacao ); + } + + $obFormularioItem->addComponente( $obLblQtdTotalItem ); + $obFormularioItem->addComponente( $obLblQtdAutorizadaItem ); + $obFormularioItem->addComponente( $obLblSaldoAutorizarItem ); + $obFormularioItem->addComponente( $obIntQtdeItem ); + $obFormularioItem->addComponente( $obVlrPrecoUnitario ); + $obFormularioItem->addComponente( $obLblVlrTotalItem ); + $obFormularioItem->addComponente( $obISelectFornecedor ); + $obFormularioItem->addSpan ( $obSpnAlteraFornecedorItem ); + $obFormularioItem->addComponente( $obLblCentroCusto ); + $obFormularioItem->addHidden( $obHdnIdCentroCusto ); + $obFormularioItem->addHidden( $obHdnNomCentroCusto ); + + $obFormularioItem->addComponente( $obBtnAlterarItem ); + + $obFormularioItem->montaInnerHTML(); + $stHtml = $obFormularioItem->getHTML(); + + $arMontaFornecedor[0]['inCgmFornecedor'] = $inCgmFornecedor; + $arMontaFornecedor[0]['hdnInCGMFornecedor'] = $rsDetalheItens->getCampo('cgm_fornecedor'); + $arMontaFornecedor[0]['inCodCotacao'] = $arItem['cod_cotacao']; + $arMontaFornecedor[0]['inCodItem'] = $arItem['cod_item']; + $arMontaFornecedor[0]['nuQtdeItem'] = number_format($qtdItem, 4, ",", "."); + + Sessao::write('arMontaFornecedor', $arMontaFornecedor); + + break; + } + } + } + + return $stHtml; +} + +function montaSpanItens($rsRecordSet) +{ + $stJs = ""; + + $rsRecordSet->addFormatacao ( 'vl_cotacao', 'NUMERIC_BR' ); + $rsRecordSet->addFormatacao ( 'quantidade', 'NUMERIC_BR' ); + + $obLista = new Lista; + $obLista->setTitulo( "Itens" ); + $obLista->setMostraPaginacao( false ); + + if ( $rsRecordSet->getNumLinhas() >= 5 ) { + $obLista->setMostraScroll( 150 ); + } + + $obLista->setRecordSet( $rsRecordSet ); + + $obLista->addCabecalho(); + $obLista->ultimoCabecalho->addConteudo( "Seq" ); + $obLista->ultimoCabecalho->setWidth( 5 ); + $obLista->commitCabecalho(); + + $obLista->addCabecalho(); + $obLista->ultimoCabecalho->addConteudo( "Item" ); + $obLista->ultimoCabecalho->setWidth( 27 ); + $obLista->commitCabecalho(); + + $obLista->addCabecalho(); + $obLista->ultimoCabecalho->addConteudo( "Qtde." ); + $obLista->ultimoCabecalho->setWidth( 10 ); + $obLista->commitCabecalho(); + + $obLista->addCabecalho(); + $obLista->ultimoCabecalho->addConteudo( "Valor" ); + $obLista->ultimoCabecalho->setWidth( 13 ); + $obLista->commitCabecalho(); + + $obLista->addCabecalho(); + $obLista->ultimoCabecalho->addConteudo( "Fornecedor" ); + $obLista->ultimoCabecalho->setWidth( 20 ); + $obLista->commitCabecalho(); + + $obLista->addCabecalho(); + $obLista->ultimoCabecalho->addConteudo(" "); + $obLista->ultimoCabecalho->setWidth( 1 ); + $obLista->commitCabecalho(); + + $obLista->addDado(); + $obLista->ultimoDado->setCampo( "[cod_item] - [item]" ); + $obLista->ultimoDado->setAlinhamento( "ESQUERDA" ); + $obLista->commitDado(); + + $obLista->addDado(); + $obLista->ultimoDado->setCampo( "quantidade" ); + $obLista->ultimoDado->setAlinhamento( "DIREITA" ); + $obLista->commitDado(); + + $obLista->addDado(); + $obLista->ultimoDado->setCampo( "vl_cotacao" ); + $obLista->ultimoDado->setAlinhamento( "DIREITA" ); + $obLista->commitDado(); + + $obLista->addDado(); + $obLista->ultimoDado->setCampo( "fornecedor" ); + $obLista->ultimoDado->setAlinhamento( "ESQUERDA" ); + $obLista->commitDado(); + + $obLista->montaHTML(); + $stHtml = $obLista->getHTML(); + $stHtml = str_replace( "\n", "", $stHtml); + $stHtml = str_replace( " ", "", $stHtml); + $stHtml = str_replace( "'" , "\\'", $stHtml); + + $stJs = "jQuery('#spnItens').html('".$stHtml."'); \n"; + + return $stJs; +} + +function montaListaItensDetalhe($inCodItem, $inCodCotacao) +{ + $arItensDetalhes = Sessao::read('arItensDetalhes'); + $arItensDetalhes = (is_array($arItensDetalhes)) ? $arItensDetalhes : array(); + + $arItens = Sessao::read('arItens'); + $arItens = (is_array($arItens)) ? $arItens : array(); + + foreach ($arItensDetalhes as $chaveItemDetalhe => $valorItemDetalhe) { + foreach( $arItens as $chaveItem => $arItem) { + if ( $arItem["cod_item"] == $valorItemDetalhe['cod_item'] && $arItem["cod_cotacao"] == $valorItemDetalhe['cod_cotacao'] ) { + $vlUnitarioItem = $arItensDetalhes[$chaveItemDetalhe]['vl_unitario']; + + $arCotacaoItem = (is_array($arItem['arCotacaoItem'])) ? $arItem['arCotacaoItem'] : array(); + foreach ($arCotacaoItem as $chaveCotacao => $cotacaoItem) { + if($cotacaoItem['cgm_fornecedor'] == $arItem['inCgmFornecedor']){ + $vlUnitarioItem = $cotacaoItem['vl_cotacao'] / $cotacaoItem['quantidade']; + break; + } + } + + $arItensDetalhes[$chaveItemDetalhe]['vl_unitario'] = $vlUnitarioItem; + $arItensDetalhes[$chaveItemDetalhe]['quantidade_saldo'] = str_replace(",",".",str_replace(".","",$arItem['nuQtdeItem'])); + if($arItem['nuQtdeItem']==0) + $arItensDetalhes[$chaveItemDetalhe]['vl_cotacao_saldo'] = '0,00'; + else + $arItensDetalhes[$chaveItemDetalhe]['vl_cotacao_saldo'] = $vlUnitarioItem*$arItensDetalhes[$chaveItemDetalhe]['quantidade_saldo']; + $arItensDetalhes[$chaveItemDetalhe]['cgm_fornecedor'] = $arItem['inCgmFornecedor']; + $arItensDetalhes[$chaveItemDetalhe]['fornecedor'] = sistemalegado::pegaDado("nom_cgm", "sw_cgm", "WHERE numcgm = '".$arItem['inCgmFornecedor']."' "); + break; + } + } + } + + $rsRegistros = new RecordSet(); + $rsRegistros->preenche($arItensDetalhes); + + $rsRegistros->addFormatacao ( 'vl_unitario' , 'NUMERIC_BR' ); + $rsRegistros->addFormatacao ( 'quantidade_saldo' , 'NUMERIC_BR_4'); + $rsRegistros->addFormatacao ( 'vl_cotacao_saldo' , 'NUMERIC_BR' ); + + $table = new Table(); + + $table->setRecordset( $rsRegistros ); + $table->setSummary('Itens'); + + $table->Head->addCabecalho( 'Fornecedor' , 30 ); + $table->Head->addCabecalho( 'Solicitação' , 8 ); + $table->Head->addCabecalho( 'Lote' , 5 ); + $table->Head->addCabecalho( 'Centro de Custo' , 10 ); + $table->Head->addCabecalho( 'Dotação Orçamentária' , 14 ); + $table->Head->addCabecalho( 'Valor Unitário' , 10 ); + $table->Head->addCabecalho( 'Quantidade' , 10 ); + $table->Head->addCabecalho( 'Valor Total' , 14 ); + + $table->Body->addCampo( '[cgm_fornecedor] - [fornecedor]' , 'C'); + $table->Body->addCampo( 'cod_solicitacao' , 'C'); + $table->Body->addCampo( 'lote' , 'C'); + $table->Body->addCampo( 'cod_centro' , 'C'); + $table->Body->addCampo( 'desdobramento' , 'C'); + $table->Body->addCampo( 'vl_unitario' , 'D'); + $table->Body->addCampo( 'quantidade_saldo' , 'D'); + $table->Body->addCampo( 'vl_cotacao_saldo' , 'D'); + + $table->montaHTML(); + $stHTMLDetalhe = $table->getHtml(); + $stHTMLDetalhe = str_replace("\n","",$stHTMLDetalhe); + $stHTMLDetalhe = str_replace(" ","",$stHTMLDetalhe); + $stHTMLDetalhe = str_replace('"','\\"',$stHTMLDetalhe); + $stHTMLDetalhe = str_replace("'","\\'",$stHTMLDetalhe); + + $stHTMLAlteraItem = alterarItem($inCodItem, $inCodCotacao); + $stHTMLAlteraItem = str_replace("\'","\\'",$stHTMLAlteraItem); + $stHTMLAlteraItem = str_replace("\n","",$stHTMLAlteraItem); + $stHTMLAlteraItem = str_replace(" ","",$stHTMLAlteraItem); + $stHTMLAlteraItem = str_replace('"','\\"',$stHTMLAlteraItem); + + $stHTML = $stHTMLDetalhe; + $stHTML .= $stHTMLAlteraItem; + + return $stHTML; +} + +function montaListaItens() +{ + $arItens = Sessao::read('arItens'); + $arItens = (is_array($arItens)) ? $arItens : array(); + + $arLicitacao = Sessao::read('arLicitacao'); + $arLicitacao = (is_array($arLicitacao)) ? $arLicitacao : array(); + + $table = new TableTree(); + $table->setId ( 'sw_tabletree_parcial' ); + $table->setName ( 'sw_tabletree_parcial' ); + + $idTableTree = $table->getId(); + + $inCount = 1; + + $js = "var onClickRow; \n"; + $stJsTableTree = "BloqueiaFrames(true,false); "; + + foreach ($arItens as $chaveItem => $valorItem) { + $idLinhaTableTree = $idTableTree."_row_".$inCount; + + $stParamAdicionais = "&inCodLicitacao=".$arLicitacao[0]['inCodLicitacao']; + $stParamAdicionais .= "&cod_item=".$valorItem['cod_item']; + $stParamAdicionais .= "&stExercicio=".$arLicitacao[0]['stExercicio']; + $stParamAdicionais .= "&inCodEntidade=".$arLicitacao[0]['inCodEntidade']; + $stParamAdicionais .= "&inCodModalidade=".$arLicitacao[0]['inCodModalidade']; + $stParamAdicionais .= "&inCodMapa=".$arLicitacao[0]['inCodMapa']; + $stParamAdicionais .= "&linha_table_tree=".$idLinhaTableTree; + + $stJsTableTreeItem = $stJsTableTree; + $stJsTableTreeItem .= "buscaValor('listarDetalheItem','".$stParamAdicionais."')"; + + $js .= "jQuery('#".$idLinhaTableTree."_mais').attr('onclick', \"".$stJsTableTreeItem."\"); \n"; + + $arItens[$chaveItem]['id'] = $inCount++; + $arItens[$chaveItem]['nuQtdeItem'] = str_replace(",",".",str_replace(".","",$valorItem['nuQtdeItem'])); + } + + $rsItens = new RecordSet(); + $rsItens->preenche($arItens); + $rsItens->addFormatacao ( 'nuQtdeItem' , 'NUMERIC_BR_4' ); + $rsItens->addFormatacao ( 'quantidade_saldo' , 'NUMERIC_BR_4' ); + $rsItens->addFormatacao ( 'vl_cotacao_saldo' , 'NUMERIC_BR' ); + + $table->setRecordset( $rsItens ); + $table->setSummary('Itens'); + + $table->setArquivo( CAM_GP_LIC_INSTANCIAS.'autorizacao/OCManterAutorizacaoParcial.php' ); + // parametros do recordSet + $table->setParametros( array( "cod_item") ); + // parametros adicionais + $stParamAdicionais = "stCtrl=listarDetalheItem&inCodLicitacao=".$arLicitacao[0]['inCodLicitacao']; + $stParamAdicionais .= "&stExercicio=".$arLicitacao[0]['stExercicio']; + $stParamAdicionais .= "&inCodEntidade=".$arLicitacao[0]['inCodEntidade']; + $stParamAdicionais .= "&inCodModalidade=".$arLicitacao[0]['inCodModalidade']; + $stParamAdicionais .= "&inCodMapa=".$arLicitacao[0]['inCodMapa']; + + $table->setComplementoParametros( $stParamAdicionais ); + + $table->Head->addCabecalho( 'Item' , 50 ); + $table->Head->addCabecalho( 'Quantidade Disponível' , 15 ); + $table->Head->addCabecalho( 'Quantidade para Esta Autorização' , 15 ); + $table->Head->addCabecalho( 'Valor Total' , 15 ); + + $table->Body->addCampo( '[cod_item] - [descricao_completa]
    [complemento]', 'E' ); + $table->Body->addCampo( 'quantidade_saldo' , 'C' ); + $table->Body->addCampo( 'nuQtdeItem' , 'C' ); + $table->Body->addCampo( 'vl_cotacao_saldo' , 'D' ); + + $table->Foot->addSoma( 'vl_cotacao_saldo' , 'D' ); + + $table->montaHTML(); + $stHTML = $table->getHtml(); + $stHTML = str_replace("\n","",$stHTML); + $stHTML = str_replace(" ","",$stHTML); + $stHTML = str_replace("'","\\'",$stHTML); + + $stJs = "jQuery('#spnItens').html('".$stHTML."'); \n"; + $stJs.= "jQuery('#Ok').attr('disabled', false); \n"; + $stJs.=$js; + + return $stJs; +} + +function montaVlUnitario($inCgmFornecedor = null, $nuQtdeItem = 0, $inCodItem, $inCodCotacao){ + if($inCgmFornecedor){ + $arItens = Sessao::read('arItens'); + $arItens = (is_array($arItens)) ? $arItens : array(); + + foreach( $arItens as $chaveItem => $arItem) { + if ( $arItem["cod_item"] == $inCodItem && $arItem["cod_cotacao"] == $inCodCotacao ) { + $arCotacaoItem = (is_array($arItem['arCotacaoItem'])) ? $arItem['arCotacaoItem'] : array(); + foreach ($arCotacaoItem as $key => $cotacaoItem) { + if($cotacaoItem['cgm_fornecedor'] == $inCgmFornecedor){ + $nuVlUnitario = $cotacaoItem['vl_cotacao'] / $cotacaoItem['quantidade']; + $stJs = "jQuery('#nuVlUnitario').val('".number_format($nuVlUnitario, 2, ",", ".")."'); \n"; + $stJs .= "jQuery('#nuVlUnitario_label').html('".number_format($nuVlUnitario, 2, ",", ".")."'); \n"; + + $qtdItem = str_replace(",",".",str_replace(".","",$nuQtdeItem)); + $stJs .= "jQuery('#nuVlTotal').val('".number_format($qtdItem * $nuVlUnitario, 2, ",", ".")."'); \n"; + $stJs .= "jQuery('#nuVlTotal').html('".number_format($qtdItem * $nuVlUnitario, 2, ",", ".")."');\n"; + + break; + } + } + } + } + } + return $stJs; +} + +function montaFornecedor(Request $request){ + $arItens = Sessao::read('arItens'); + $arItens = (is_array($arItens)) ? $arItens : array(); + + $inCgmFornecedor = $request->get('inCgmFornecedor'); + $hdnInCGMFornecedor = $request->get('hdnInCGMFornecedor'); + $stHtml = ''; + + if($inCgmFornecedor != $hdnInCGMFornecedor && $inCgmFornecedor!=''){ + $inNumCGMResponsavel = ''; + $inNomCGMResponsavel = ' '; + $inCodNorma = ''; + $stNorma = ' '; + $stJustificativa = ''; + + foreach( $arItens as $chaveItem => $arItem) { + if ( $arItem["cod_item"] == $request->get('inCodItem') && $arItem["cod_cotacao"] == $request->get('inCodCotacao') ) { + $inNumCGMResponsavel = $arItem['inNumCGMResponsavel']; + $inNomCGMResponsavel = ($arItem['inNomCGMResponsavel']!='') ? $arItem['inNomCGMResponsavel'] : $inNomCGMResponsavel; + $inCodNorma = $arItem['inCodNorma']; + $stNorma = ($arItem['stNorma']!='') ? $arItem['stNorma'] : $stNorma; + $stJustificativa = $arItem['stJustificativa']; + break; + } + } + + $obBscCGMResponsavel = new BuscaInner; + $obBscCGMResponsavel->setRotulo ( "**CGM Responsável" ); + $obBscCGMResponsavel->setTitle ( "Informe o código do CGM responsável" ); + $obBscCGMResponsavel->setNull ( true ); + $obBscCGMResponsavel->setId ( "inNomCGMResponsavel" ); + $obBscCGMResponsavel->setValue ( $inNomCGMResponsavel ); + $obBscCGMResponsavel->obCampoCod->setName ( "inNumCGMResponsavel" ); + $obBscCGMResponsavel->obCampoCod->setId ( "inNumCGMResponsavel" ); + $obBscCGMResponsavel->obCampoCod->setValue ( $inNumCGMResponsavel ); + $obBscCGMResponsavel->obCampoCod->obEvento->setOnChange( "montaParametrosGET('buscaResponsavel', 'inNumCGMResponsavel');" ); + $obBscCGMResponsavel->setFuncaoBusca( "abrePopUp('".CAM_GA_CGM_POPUPS."cgm/FLProcurarCgm.php','frm','inNumCGMResponsavel','inNomCGMResponsavel','fisica','".Sessao::getId()."&stCtrl=buscaCGMResponsavel','800','550');" ); + + $obIPopUpNorma = new IPopUpNorma(); + $obIPopUpNorma->obInnerNorma->setRotulo ( "**Fundamentação Legal" ); + $obIPopUpNorma->obInnerNorma->setNull ( true ); + $obIPopUpNorma->obInnerNorma->obCampoCod->setValue( $inCodNorma ); + $obIPopUpNorma->obInnerNorma->setValue ( $stNorma ); + $obIPopUpNorma->obInnerNorma->setTitle ( "Fundamentação legal que regulamenta a aplicação da penalidade." ); + + $obTxtJustificativa = new TextArea; + $obTxtJustificativa->setId ( 'stJustificativa' ); + $obTxtJustificativa->setName ( 'stJustificativa' ); + $obTxtJustificativa->setRotulo ( '**Justificativa' ); + $obTxtJustificativa->setTitle ( 'Informe a justificativa.' ); + $obTxtJustificativa->setNull ( true ); + $obTxtJustificativa->setValue ( $stJustificativa ); + + $obFormularioFornecedor = new Formulario(); + $obFormularioFornecedor->addComponente ( $obBscCGMResponsavel ); + $obIPopUpNorma->geraFormulario ( $obFormularioFornecedor ); + $obFormularioFornecedor->addComponente ( $obTxtJustificativa ); + + $obFormularioFornecedor->montaInnerHTML(); + $stHtml = $obFormularioFornecedor->getHTML(); + } + + $stJs = "jQuery('#spnAlteraFornecedorItem').html('".$stHtml."'); \n"; + $stJs .= montaVlUnitario($inCgmFornecedor, $request->get('nuQtdeItem'), $request->get('inCodItem'), $request->get('inCodCotacao') ); + + return $stJs; +} + +switch ($request->get('stCtrl')) { + case 'buscaInfoLicitacao': + $obTLicitacaoHomolgacao = new TLicitacaoHomologacao; + + $stFiltro = "where homologacao.homologado \n". + " and homologacao.cod_cotacao = ".$request->get('inCodCotacao')." \n". + " and homologacao.exercicio_cotacao = '".Sessao::getExercicio()."' \n"; + $obTLicitacaoHomolgacao->recuperaItensAutorizacaoParcial ( $rsItens, $stFiltro ); + + if ( $rsItens->getNumLinhas() > 0 ) { + list($inCodMapa, $stExercicioMapa) = explode('/',$request->get('inCodMapa')); + + // busca itens do mapa, agrupados + $obTComprasCotacaoFornecedorItem = new TComprasCotacaoFornecedorItem (); + + $stFiltro = " WHERE mapa_cotacao.exercicio_mapa = '".$stExercicioMapa."' + AND mapa_cotacao.cod_mapa = ".$inCodMapa." + AND julgamento_item.ordem = 1 \n"; + $obTComprasCotacaoFornecedorItem->recuperaItensCotacaoJulgadosAutorizacaoParcial ( $rsMapaItens, $stFiltro ); + + // somar total do mapa + $nuTotal = 0.00; + + while ( !$rsMapaItens->eof() ) { + $nuTotal += $rsMapaItens->getCampo('vl_cotacao_saldo'); + $rsMapaItens->proximo(); + } + $nuTotal = number_format($nuTotal,2,',','.'); + + $arItens = array(); + $inCount = 0; + foreach($rsMapaItens->getElementos() as $key => $itemMapa){ + $arItens[$inCount] = $itemMapa; + + $stFiltro = " and licitacao.cod_licitacao = ".$request->get('inCodLicitacao'); + $stFiltro .= " and licitacao.cod_modalidade = ".$request->get('inCodModalidade'); + $stFiltro .= " and licitacao.cod_entidade = ".$request->get('inCodEntidade'); + $stFiltro .= " and mapa_item.cod_item = ".$itemMapa['cod_item']; + + $obTLicitacao = new TLicitacaoLicitacao(); + $obTLicitacao->recuperaItensDetalhesAutorizacaoEmpenhoParcialLicitacao( $rsDetalheItens , $stFiltro); + + while ( !$rsDetalheItens->eof() ) { + $arItens[$inCount]['nuQtdeItem'] = 0; + $arItens[$inCount]['vl_cotacao_saldo'] = '0,00'; + $arItens[$inCount]['inCgmFornecedor'] = $itemMapa['cgm_fornecedor']; + $arItens[$inCount]['inCodCentroCusto'] = $rsDetalheItens->getCampo('cod_centro'); + $arItens[$inCount]['stNomCentroCusto'] = $rsDetalheItens->getCampo('nom_centro'); + $arItens[$inCount]['inCodDespesa'] = $rsDetalheItens->getCampo('cod_despesa_atual'); + $arItens[$inCount]['stCodClassificacao'] = $rsDetalheItens->getCampo('cod_desdobramento'); + $arItens[$inCount]['inNumCGMResponsavel'] = ''; + $arItens[$inCount]['inNomCGMResponsavel'] = ''; + $arItens[$inCount]['inCodNorma'] = ''; + $arItens[$inCount]['stNorma'] = ''; + $arItens[$inCount]['stJustificativa'] = ''; + $arItens[$inCount]['arCotacaoItem'] = array(); + + $rsDetalheItens->proximo(); + } + + $inCount++; + } + + $arLicitacao[0]['inCodLicitacao'] = $request->get('inCodLicitacao'); + $arLicitacao[0]['stExercicio'] = Sessao::getExercicio(); + $arLicitacao[0]['inCodEntidade'] = $request->get('inCodEntidade'); + $arLicitacao[0]['inCodModalidade'] = $request->get('inCodModalidade'); + $arLicitacao[0]['inCodMapa'] = $inCodMapa; + + Sessao::write('arItens', $arItens); + Sessao::write('arLicitacao', $arLicitacao); + + $stJs = montaListaItens(); + + $stJs .= "jQuery('#spnLabels').html('".$stHTML."'); \n"; + $stJs .= "jQuery('#stTotalMapa').html('".$nuTotal."'); \n"; + $stJs .= "LiberaFrames(true,true); \n"; + } + break; + + case 'listarDetalheItem': + $idLinhaTableTree = $request->get("linha_table_tree"); + $arLinhaTableTree = explode('_', $idLinhaTableTree); + + $stFiltro = " and licitacao.cod_licitacao = ".$request->get("inCodLicitacao"); + $stFiltro .= " and licitacao.cod_modalidade = ".$request->get("inCodModalidade"); + $stFiltro .= " and licitacao.cod_entidade = ".$request->get("inCodEntidade"); + $stFiltro .= " and mapa_item.cod_item = ".$request->get("cod_item"); + + $obTLicitacao = new TLicitacaoLicitacao(); + $obTLicitacao->recuperaItensDetalhesAutorizacaoEmpenhoParcialLicitacao( $rsDetalheItens , $stFiltro); + + Sessao::write('arItensDetalhes', $rsDetalheItens->getElementos()); + + $stHtmlDetalhe = montaListaItensDetalhe($request->get("cod_item"), $rsDetalheItens->getCampo('cod_cotacao')); + + $arMontaFornecedor = Sessao::read('arMontaFornecedor'); + $request->set('inCgmFornecedor' , $arMontaFornecedor[0]['inCgmFornecedor'] ); + $request->set('hdnInCGMFornecedor' , $arMontaFornecedor[0]['hdnInCGMFornecedor'] ); + $request->set('inCodCotacao' , $arMontaFornecedor[0]['inCodCotacao'] ); + $request->set('inCodItem' , $arMontaFornecedor[0]['inCodItem'] ); + $request->set('nuQtdeItem' , $arMontaFornecedor[0]['nuQtdeItem'] ); + + $stJs .= ""; + + $arItens = Sessao::read('arItens'); + $arItens = (is_array($arItens)) ? $arItens : array(); + $inCount = 1; + + $js .= "var onClickRow; \n"; + foreach ($arItens as $chaveItem => $valorItem) { + $stLinhaTemp = $arLinhaTableTree[0]; + $stLinhaTemp .= '_'.$arLinhaTableTree[1]; + $stLinhaTemp .= '_'.$arLinhaTableTree[2]; + $stLinhaTemp .= '_'.$arLinhaTableTree[3]; + $stLinhaTemp .= '_'.$inCount; + + $stJsTableTree = "jQuery('#sw_table_parcial').empty(); jQuery('#".$idLinhaTableTree."_sub_cell_2').empty(); TableTreeLineControl( '".$idLinhaTableTree."', 'none', '', 'none');"; + + if($stLinhaTemp!=$idLinhaTableTree){ + $stLinhaTemp .= '_mais'; + + $js .= "var inCountAr2 = 0; \n"; + $js .= "var arOnClick = ''; \n"; + $js .= "arOnClick = []; \n"; + $js .= "var arOnClick2 = ''; \n"; + $js .= "arOnClick2 = []; \n"; + + $js .= "onClickRow = jQuery('#".$stLinhaTemp."').attr('onclick'); \n"; + $js .= "arOnClick = onClickRow.split(';'); \n"; + $js .= "for ( i = (arOnClick.length - 2); i < arOnClick.length; i++ ) { \n"; + $js .= " arOnClick2[inCountAr2] = arOnClick[i]; \n"; + $js .= " inCountAr2++; \n"; + $js .= "} \n"; + + $js .= "onClickRow = arOnClick2.join(';'); \n"; + $js .= "jQuery('#".$stLinhaTemp."').attr('onclick', \"".$stJsTableTree."\"+onClickRow); \n"; + } + $inCount++; + } + + $stJsTableTree = "TableTreeLineControl( '".$idLinhaTableTree."', 'none', '', 'none'); jQuery('#Ok').attr('disabled', false); "; + $js .= "jQuery('#".$idLinhaTableTree."_menos').attr('onclick', \"".$stJsTableTree."\"); \n"; + $js .= "LiberaFrames(true,true); \n"; + $js .= "jQuery('#Ok').attr('disabled', true); \n"; + break; + + case 'alterarItem': + $stJs = alterarItem($request->get("inCodItem"), $request->get("inCodCotacao")); + break; + + case 'alterarListaItem': + $obErro = new Erro; + $arItens = Sessao::read('arItens'); + $arItens = (is_array($arItens)) ? $arItens : array(); + + if( $request->get('inCgmFornecedor')=='' && !$obErro->ocorreu() ) + $obErro->setDescricao( "Informe o campo Fornecedor do item ".$request->get('inCodItem') ); + + if( $request->get('inCgmFornecedor')!=$request->get('hdnInCGMFornecedor') && !$obErro->ocorreu() ){ + if( $request->get('inNumCGMResponsavel')=='' && !$obErro->ocorreu() ) + $obErro->setDescricao( "Informe o campo CGM Responsável do item ".$request->get('inCodItem') ); + + if( $request->get('inCodNorma')=='' && !$obErro->ocorreu() ) + $obErro->setDescricao( "Informe o campo Fundamentação Legal do item ".$request->get('inCodItem') ); + + if( $request->get('stJustificativa')=='' && !$obErro->ocorreu() ) + $obErro->setDescricao( "Informe o campo Justificativa do item ".$request->get('inCodItem') ); + } + + if ( $obErro->ocorreu() ) + $stJs = "alertaAviso('".$obErro->getDescricao()."','form','erro','".Sessao::getId()."'); \n"; + else{ + foreach( $arItens as $chaveItem => $arItem) { + if ( $arItem["cod_item"] == $request->get('inCodItem') && $arItem["cod_cotacao"] == $request->get('inCodCotacao') ) { + $stNorma = $request->get('stNorma'); + if($request->get('inCodNorma')!=''){ + $obTNorma = new TNorma; + $stFiltro = " WHERE cod_norma = ".$request->get('inCodNorma'); + $obTNorma->recuperaNormasDecreto( $rsNorma, $stFiltro ); + + $stNorma = $rsNorma->getCampo('nom_tipo_norma')." ".$rsNorma->getCampo('num_norma_exercicio')." - ".$rsNorma->getCampo('nom_norma'); + } + + $arItens[$chaveItem]['nuQtdeItem'] = $request->get('nuQtdeItem'); + $arItens[$chaveItem]['inCgmFornecedor'] = $request->get('inCgmFornecedor'); + $arItens[$chaveItem]['inCodCentroCusto'] = $request->get('inCodCentroCusto'); + $arItens[$chaveItem]['stNomCentroCusto'] = $request->get('stNomCentroCusto'); + $arItens[$chaveItem]['inCodDespesa'] = $request->get('inCodDespesa'); + $arItens[$chaveItem]['stCodClassificacao'] = $request->get('stCodClassificacao'); + $arItens[$chaveItem]['inNumCGMResponsavel'] = $request->get('inNumCGMResponsavel'); + $arItens[$chaveItem]['inNomCGMResponsavel'] = $request->get('inNomCGMResponsavel'); + $arItens[$chaveItem]['inCodNorma'] = $request->get('inCodNorma'); + $arItens[$chaveItem]['stNorma'] = $stNorma; + $arItens[$chaveItem]['stJustificativa'] = $request->get('stJustificativa'); + + if($request->get('nuQtdeItem')==0) + $arItens[$chaveItem]['vl_cotacao_saldo'] = '0,00'; + else{ + $nuQtdeItem = str_replace(",",".",str_replace(".","",$request->get('nuQtdeItem'))); + $vlUnitarioItem = $arItem['vl_cotacao'] / $nuQtdeItem; + + $arCotacaoItem = (is_array($arItem['arCotacaoItem'])) ? $arItem['arCotacaoItem'] : array(); + foreach ($arCotacaoItem as $chaveCotacao => $cotacaoItem) { + if($cotacaoItem['cgm_fornecedor'] == $request->get('inCgmFornecedor')){ + $vlUnitarioItem = $cotacaoItem['vl_cotacao'] / $cotacaoItem['quantidade']; + break; + } + } + + $arItens[$chaveItem]['vl_cotacao_saldo'] = $vlUnitarioItem * $nuQtdeItem; + } + } + } + + Sessao::write('arItens', $arItens); + + $stJs = montaListaItens(); + } + break; + + case 'verificaQuantidadeItem': + $nuQtdeItem = str_replace(",",".",str_replace(".","",$request->get('nuQtdeItem'))); + $hdnNuQtdeItem = $request->get('hdnNuQtdeItem'); + if($nuQtdeItem > $hdnNuQtdeItem){ + $nuQtdeItem = 0; + $stJs = "jQuery('#nuQtdeItem').val(''); \n"; + $stJs .= "jQuery('#nuQtdeItem').focus(); \n"; + $stJs .= "alertaAviso('Item(".$request->get('inCodItem').") - Quantidade Disponível de ".number_format($hdnNuQtdeItem, 4, ",", ".")."','form','erro','".Sessao::getId()."'); \n"; + } + + $stJs .= montaVlUnitario($request->get('inCgmFornecedor'), number_format($nuQtdeItem, 4, ",", "."), $request->get('inCodItem'), $request->get('inCodCotacao') ); + break; + + case 'montaFornecedor': + $stJs .= montaFornecedor($request); + break; + + case 'buscaResponsavel': + $obRegra = new RCGM; + + if ( $request->get('inNumCGMResponsavel') != "" AND $request->get('inNumCGMResponsavel') != "0" ) { + $obRegra->setNumCGM ($request->get('inNumCGMResponsavel')); + $obRegra->listar ($rsCGM); + + if ( $rsCGM->getNumLinhas() <= 0) { + $stJs .= "jQuery('#inNumCGMResponsavel').val(''); \n"; + $stJs .= "jQuery('#inNumCGMResponsavel').focus(); \n"; + $stJs .= "jQuery('input[name=inNomCGMResponsavel]').val(''); \n"; + $stJs .= "jQuery('#inNomCGMResponsavel').html(' '); \n"; + $stJs .= "alertaAviso('@Valor inválido. (".$request->get('inNumCGMResponsavel').")','form','erro','".Sessao::getId()."'); \n"; + } else{ + $stJs .= "jQuery('input[name=inNomCGMResponsavel]').val('".$rsCGM->getCampo('nom_cgm')."'); \n"; + $stJs .= "jQuery('#inNomCGMResponsavel').html('".$rsCGM->getCampo('nom_cgm')."'); \n"; + } + } else { + $stJs .= "jQuery('#inNumCGMResponsavel').val(''); \n"; + $stJs .= "jQuery('#inNumCGMResponsavel').focus(); \n"; + $stJs .= "jQuery('input[name=inNomCGMResponsavel]').val(''); \n"; + $stJs .= "jQuery('#inNomCGMResponsavel').html(' '); \n"; + $stJs .= "alertaAviso('@Valor inválido. (".$request->get('inNumCGMResponsavel').")','form','erro','".Sessao::getId()."'); \n"; + } + + break; + + case 'montaVlUnitario': + $stJs = montaVlUnitario($request->get('inCgmFornecedor'), $request->get('nuQtdeItem'), $request->get('inCodItem'), $request->get('inCodCotacao')); + break; + + case 'montaListaItens': + $stJs = montaListaItens(); + break; +} + +echo $stJs; + +if(isset($js)) + sistemalegado::executaFrameOculto($js); + +?> diff --git a/gestaoPatrimonial/fontes/PHP/licitacao/instancias/autorizacao/PRManterAutorizacao.php b/gestaoPatrimonial/fontes/PHP/licitacao/instancias/autorizacao/PRManterAutorizacao.php index d3f4245..48d5a96 100644 --- a/gestaoPatrimonial/fontes/PHP/licitacao/instancias/autorizacao/PRManterAutorizacao.php +++ b/gestaoPatrimonial/fontes/PHP/licitacao/instancias/autorizacao/PRManterAutorizacao.php @@ -34,7 +34,7 @@ * Casos de uso: uc-03.05.21 - $Id: PRManterAutorizacao.php 63584 2015-09-14 13:11:00Z michel $ + $Id: PRManterAutorizacao.php 64005 2015-11-17 16:49:06Z michel $ */ @@ -376,6 +376,7 @@ if ($stErro) { $obAutorizacaoEmpenho->roUltimoItemPreEmpenho->obRUnidadeMedida->setCodUnidade( $dadosItens['cod_unidade']); $obAutorizacaoEmpenho->roUltimoItemPreEmpenho->obRUnidadeMedida->obRGrandeza->setCodGrandeza( $dadosItens['cod_grandeza'] ); $obAutorizacaoEmpenho->roUltimoItemPreEmpenho->setSiglaUnidade($dadosItens['simbolo']); + $obAutorizacaoEmpenho->roUltimoItemPreEmpenho->setCodCentroCusto($dadosItens['cod_centro']); } $obErro = $obAutorizacaoEmpenho->incluir(Sessao::getTransacao()); diff --git a/gestaoPatrimonial/fontes/PHP/licitacao/instancias/autorizacao/PRManterAutorizacaoParcial.php b/gestaoPatrimonial/fontes/PHP/licitacao/instancias/autorizacao/PRManterAutorizacaoParcial.php new file mode 100644 index 0000000..32d5547 --- /dev/null +++ b/gestaoPatrimonial/fontes/PHP/licitacao/instancias/autorizacao/PRManterAutorizacaoParcial.php @@ -0,0 +1,614 @@ + + $arItem) { + $nuQtdeItem = str_replace(",",".",str_replace(".","",$arItem['nuQtdeItem'])); + $arItens[$key]['nuQtdeItem'] = $nuQtdeItem; + + if($nuQtdeItem==0) + $arListaExcluidos[] = $arItem['cod_item']; + else{ + $stChaveDespesaFornecedor = $arItem['inCodDespesa'].'.'.$arItem['stCodClassificacao'].'.'.$arItem['inCgmFornecedor']; + if(isset($arListaDespesaFornecedor[$stChaveDespesaFornecedor])) + $arListaDespesaFornecedor[$stChaveDespesaFornecedor] = $arListaDespesaFornecedor[$stChaveDespesaFornecedor].','.$arItem['cod_item']; + else + $arListaDespesaFornecedor[$stChaveDespesaFornecedor] = $arItem['cod_item']; + } +} +$stListaExcluidos = implode(",",$arListaExcluidos); + +if(count($arListaDespesaFornecedor)==0){ + $obErro->setDescricao("Informe no mínimo um(01) item para emitir autorização de empenho."); +}else{ + foreach ($arListaDespesaFornecedor as $chaveDespesaFornecedor => $arItensDespesaFornecedor) { + $obTLicHomologacao = new TLicitacaoHomologacao(); + $obTOrcamentoReservaSaldos = new TOrcamentoReservaSaldos(); + + list($inCodDespesa, $inCodConta, $inCgmFornecedor) = explode('.',$chaveDespesaFornecedor); + + $stFiltroHomologacao = " AND licitacao.cod_licitacao = ".$request->get('inCodLicitacao')." \n"; + $stFiltroHomologacao .= " AND licitacao.exercicio = '".Sessao::getExercicio()."' \n"; + $stFiltroHomologacao .= " AND licitacao.cod_entidade = ".$request->get('inCodEntidade')." \n"; + $stFiltroHomologacao .= " AND licitacao.cod_modalidade = ".$request->get('inCodModalidade')." \n"; + $stFiltroHomologacao .= " AND homologacao.homologado = true \n"; + if(count($arListaExcluidos)>0) + $stFiltroHomologacao .= " AND solicitacao_item_dotacao.cod_item NOT IN (".$stListaExcluidos.") \n"; + + $stFiltroHomologacao .= " AND solicitacao_item_dotacao.cod_despesa = ".$inCodDespesa." \n"; + $stFiltroHomologacao .= " AND solicitacao_item_dotacao.cod_conta = ".$inCodConta." \n"; + $stFiltroHomologacao .= " AND cotacao_fornecedor_item.cgm_fornecedor = ".$inCgmFornecedor." \n"; + $stFiltroHomologacao .= " AND solicitacao_item_dotacao.cod_item IN (".$arItensDespesaFornecedor.") \n"; + + $obTLicHomologacao->recuperaGrupoAutEmpenho( $rsAutEmpenho, $stFiltroHomologacao ); + + // data máxima para a entidade + $data = $request->get('stDtAutorizacao'); + $ano = substr($data, 6, 4); + $mes = substr($data, 3, 2); + $dia = substr($data, 0, 2); + $dataFormatadaEntidade = $ano.$mes.$dia; + + // data licitação + $data1 = $request->get('inDataLicitacao'); + $ano1 = substr($data1, 6, 4); + $mes1 = substr($data1, 3, 2); + $dia1 = substr($data1, 0, 2); + $dataFormatadaLicitacao = $ano1.$mes1.$dia1; + + $arCountItensAderidos = explode(',',$arItensDespesaFornecedor); + + if($rsAutEmpenho->eof()){ + foreach ($arItens as $key => $arItem) { + if($arItem['inCodDespesa'] == $inCodDespesa && $arItem['stCodClassificacao'] == $inCodConta && $arItem['inCgmFornecedor']==$inCgmFornecedor){ + $arCotacaoItem = (is_array($arItem['arCotacaoItem'])) ? $arItem['arCotacaoItem'] : array(); + foreach ($arCotacaoItem as $chaveCotacao => $cotacaoItem) { + if($cotacaoItem['cgm_fornecedor'] == $inCgmFornecedor){ + $stNomFornecedor = $cotacaoItem['fornecedor']; + break; + } + } + break; + } + } + $obErro->setDescricao("Fornecedor ".$inCgmFornecedor." - ".$stNomFornecedor.", Não possui Cotações Homologadas para os itens(".$arItensDespesaFornecedor.")."); + }elseif($rsAutEmpenho->getCampo('qtd_itens_homologados') <> count($arCountItensAderidos)){ + $obErro->setDescricao("Fornecedor ".$inCgmFornecedor." - ".$stNomFornecedor.", Não possui Cotações Homologadas para todos os itens(".$arItensDespesaFornecedor.")."); + } + + if (($dataFormatadaEntidade-$dataFormatadaLicitacao) < 0) { + $obErro->setDescricao("Data do Processo Licitatório superior à última autorização da entidade ".$request->get('inCodEntidade')."."); + } elseif ($dataFormatadaEntidade - (date("Y").date("m").date("d")) > 0) { + $obErro->setDescricao("Data da Autorização deve ser menor ou igual a data atual. "); + } + + if (!$obErro->ocorreu()) { + while (!$rsAutEmpenho->eof() && !$obErro->ocorreu()) { + // itens + $stFiltroHomologacao_item = $stFiltroHomologacao; + $stFiltroHomologacao_item .= " AND NOT EXISTS + ( + SELECT 1 + FROM empenho.item_pre_empenho_julgamento + INNER JOIN empenho.item_pre_empenho + ON item_pre_empenho.cod_pre_empenho = item_pre_empenho_julgamento.cod_pre_empenho + AND item_pre_empenho.exercicio = item_pre_empenho_julgamento.exercicio + AND item_pre_empenho.num_item = item_pre_empenho_julgamento.num_item + INNER JOIN compras.cotacao_item + ON cotacao_item.cod_cotacao = item_pre_empenho_julgamento.cod_cotacao + AND cotacao_item.exercicio = item_pre_empenho_julgamento.exercicio_julgamento + AND cotacao_item.lote = item_pre_empenho_julgamento.lote + AND cotacao_item.cod_item = item_pre_empenho_julgamento.cod_item + WHERE item_pre_empenho_julgamento.exercicio_julgamento = cotacao_fornecedor_item.exercicio + AND item_pre_empenho_julgamento.cod_cotacao = cotacao_fornecedor_item.cod_cotacao + AND item_pre_empenho_julgamento.cod_item = cotacao_fornecedor_item.cod_item + AND item_pre_empenho_julgamento.lote = cotacao_fornecedor_item.lote + AND item_pre_empenho_julgamento.cgm_fornecedor = cotacao_fornecedor_item.cgm_fornecedor + GROUP BY item_pre_empenho_julgamento.exercicio_julgamento + , item_pre_empenho_julgamento.cod_cotacao + , item_pre_empenho_julgamento.cod_item + , item_pre_empenho_julgamento.lote + , item_pre_empenho_julgamento.cgm_fornecedor + , cotacao_item.quantidade + HAVING coalesce(cotacao_item.quantidade, 0.00) - coalesce(sum(item_pre_empenho.quantidade), 0.00) = 0 + ) \n"; + + $stFiltroHomologacao_item .= " AND NOT EXISTS + ( + SELECT 1 + FROM compras.cotacao_anulada + WHERE cotacao_anulada.cod_cotacao = mapa_cotacao.cod_cotacao + AND cotacao_anulada.exercicio = mapa_cotacao.exercicio_cotacao + ) \n"; + + $stOrdem = " ORDER BY catalogo_item.descricao \n"; + $obTLicHomologacao->recuperaItensAgrupadosSolicitacaoLicitacao( $rsItensAutEmpenho, $stFiltroHomologacao_item, $stOrdem ); + + $boReservaRigida = SistemaLegado::pegaConfiguracao('reserva_rigida', '35', Sessao::getExercicio()); + $boReservaRigida = ($boReservaRigida == 'true') ? true : false; + + $boReservaAutorizacao = SistemaLegado::pegaConfiguracao('reserva_autorizacao', '35', Sessao::getExercicio()); + $boReservaAutorizacao = ($boReservaAutorizacao == 'true') ? true : false; + + #Reserva de Saldos por Autorização + if( $rsItensAutEmpenho->eof() ){ + $obTLicHomologacao->recuperaItensAgrupadosSolicitacaoLicitacaoMapa($rsSolicitacaoReserva, $stFiltroHomologacao_item, $stOrdem ); + + while (!$rsSolicitacaoReserva->eof() && !$obErro->ocorreu()) { + $inCodDespesa = $rsSolicitacaoReserva->getCampo('cod_despesa'); + $vlCotacao = $rsSolicitacaoReserva->getCampo('vl_cotacao'); + $inCodConta = $rsSolicitacaoReserva->getCampo('cod_conta'); + + foreach ($arItens as $key => $arItem) { + if ( $arItem['cod_item'] == $rsSolicitacaoReserva->getCampo('cod_item') && $arItem['cod_cotacao'] == $rsSolicitacaoReserva->getCampo('cod_cotacao') ) { + $arCotacaoItem = (is_array($arItem['arCotacaoItem'])) ? $arItem['arCotacaoItem'] : array(); + foreach ($arCotacaoItem as $chaveCotacao => $cotacaoItem) { + if($cotacaoItem['cgm_fornecedor'] == $arItem['inCgmFornecedor']){ + $vlUnitarioItem = $cotacaoItem['vl_cotacao'] / $cotacaoItem['quantidade']; + break; + } + } + + $vlCotacao = $vlUnitarioItem * $arItem['nuQtdeItem']; + break; + } + } + + $obTOrcamentoDespesa = new TOrcamentoDespesa; + $obTOrcamentoDespesa->setDado( "cod_despesa", $inCodDespesa ); + $obTOrcamentoDespesa->setDado( "exercicio" , Sessao::getExercicio() ); + $obTOrcamentoDespesa->recuperaSaldoDotacao( $rsSaldoDotacao ); + + if(!$rsSaldoDotacao->eof()){ + if(!isset($arSaldoDotacao[$inCodDespesa])){ + $arSaldoDotacao[$inCodDespesa]['saldo_inicial'] = $rsSaldoDotacao->getCampo('saldo_dotacao'); + $arSaldoDotacao[$inCodDespesa]['vl_reserva'] = $vlCotacao; + }else + $arSaldoDotacao[$inCodDespesa]['vl_reserva'] += $vlCotacao; + } + + # Mensagem do motivo da criação da Reserva de Saldo. + $stMsgReserva = "Entidade: ".$rsSolicitacaoReserva->getCampo('cod_entidade')." - ".ucwords(strtolower($rsSolicitacaoReserva->getCampo('nom_entidade'))).", "; + $stMsgReserva .= "Mapa de Compras: ".$rsSolicitacaoReserva->getCampo('cod_mapa')."/".$rsSolicitacaoReserva->getCampo('exercicio_mapa').", "; + $stMsgReserva .= "Item: ".$rsSolicitacaoReserva->getCampo('cod_item').", "; + $stMsgReserva .= "Centro de Custo: ".$rsSolicitacaoReserva->getCampo('cod_centro')." "; + $stMsgReserva .= "(Origem da criação: ".SistemaLegado::pegaDado('nom_acao', 'administracao.acao', 'WHERE cod_acao = '.Sessao::read('acao')).")."; + + # Cria uma nova reserva de saldo que será utilizada agora no Mapa de Compras. + $obTOrcamentoReservaSaldos->setDado('exercicio' , $rsSolicitacaoReserva->getCampo('exercicio_mapa')); + $obTOrcamentoReservaSaldos->proximoCod($inCodReserva); + + $obTOrcamentoReservaSaldos->setDado('cod_reserva' , $inCodReserva); + $obTOrcamentoReservaSaldos->setDado('exercicio' , $rsSolicitacaoReserva->getCampo('exercicio_mapa')); + $obTOrcamentoReservaSaldos->setDado('cod_despesa' , $inCodDespesa); + $obTOrcamentoReservaSaldos->setDado('dt_validade_inicial' , date('d/m/Y')); + $obTOrcamentoReservaSaldos->setDado('dt_validade_final' , '31/12/'.Sessao::getExercicio()); + $obTOrcamentoReservaSaldos->setDado('dt_inclusao' , date('d/m/Y')); + $obTOrcamentoReservaSaldos->setDado('vl_reserva' , $vlCotacao); + $obTOrcamentoReservaSaldos->setDado('tipo' , 'A'); + $obTOrcamentoReservaSaldos->setDado('motivo' , $stMsgReserva); + + # Inclui na tabela compras.mapa_item_reserva, caso consiga fazer a reserva de saldos. + if ($obTOrcamentoReservaSaldos->incluiReservaSaldo() == true) { + $obTComprasMapaItemReserva = new TComprasMapaItemReserva; + $obTComprasMapaItemReserva->setDado('exercicio_mapa' , $rsSolicitacaoReserva->getCampo('exercicio_mapa')); + $obTComprasMapaItemReserva->setDado('cod_mapa' , $rsSolicitacaoReserva->getCampo('cod_mapa')); + $obTComprasMapaItemReserva->setDado('exercicio_solicitacao' , $rsSolicitacaoReserva->getCampo('exercicio_solicitacao')); + $obTComprasMapaItemReserva->setDado('cod_entidade' , $rsSolicitacaoReserva->getCampo('cod_entidade')); + $obTComprasMapaItemReserva->setDado('cod_solicitacao' , $rsSolicitacaoReserva->getCampo('cod_solicitacao')); + $obTComprasMapaItemReserva->setDado('cod_centro' , $rsSolicitacaoReserva->getCampo('cod_centro')); + $obTComprasMapaItemReserva->setDado('cod_item' , $rsSolicitacaoReserva->getCampo('cod_item')); + $obTComprasMapaItemReserva->setDado('lote' , $rsSolicitacaoReserva->getCampo('lote')); + $obTComprasMapaItemReserva->setDado('exercicio_reserva' , $rsSolicitacaoReserva->getCampo('exercicio_mapa')); + $obTComprasMapaItemReserva->setDado('cod_reserva' , $inCodReserva); + $obTComprasMapaItemReserva->setDado('cod_conta' , $inCodConta); + $obTComprasMapaItemReserva->setDado('cod_despesa' , $inCodDespesa); + + $obErro = $obTComprasMapaItemReserva->inclusao( Sessao::getTransacao() ); + } else{ + $stSolicitacao = $rsSolicitacaoReserva->getCampo('cod_solicitacao').'/'.$rsSolicitacaoReserva->getCampo('exercicio_solicitacao'); + $obErro->setDescricao('Não foi possível reservar saldo para o item '.$rsSolicitacaoReserva->getCampo('cod_item').' da Solicitação '.$stSolicitacao.". Saldo da Dotação: ".number_format($arSaldoDotacao[$inCodDespesa]['saldo_inicial'],2,',','.')); + break; + } + + $rsSolicitacaoReserva->proximo(); + } + } + + $rsAutEmpenho->proximo(); + } + + $rsAutEmpenho->setPrimeiroElemento(); + while (!$rsAutEmpenho->eof() && !$obErro->ocorreu()) { + // itens + $stFiltroHomologacao_item = $stFiltroHomologacao; + $stFiltroHomologacao_item .= " AND NOT EXISTS + ( + SELECT 1 + FROM empenho.item_pre_empenho_julgamento + INNER JOIN empenho.item_pre_empenho + ON item_pre_empenho.cod_pre_empenho = item_pre_empenho_julgamento.cod_pre_empenho + AND item_pre_empenho.exercicio = item_pre_empenho_julgamento.exercicio + AND item_pre_empenho.num_item = item_pre_empenho_julgamento.num_item + INNER JOIN compras.cotacao_item + ON cotacao_item.cod_cotacao = item_pre_empenho_julgamento.cod_cotacao + AND cotacao_item.exercicio = item_pre_empenho_julgamento.exercicio_julgamento + AND cotacao_item.lote = item_pre_empenho_julgamento.lote + AND cotacao_item.cod_item = item_pre_empenho_julgamento.cod_item + WHERE item_pre_empenho_julgamento.exercicio_julgamento = cotacao_fornecedor_item.exercicio + AND item_pre_empenho_julgamento.cod_cotacao = cotacao_fornecedor_item.cod_cotacao + AND item_pre_empenho_julgamento.cod_item = cotacao_fornecedor_item.cod_item + AND item_pre_empenho_julgamento.lote = cotacao_fornecedor_item.lote + AND item_pre_empenho_julgamento.cgm_fornecedor = cotacao_fornecedor_item.cgm_fornecedor + GROUP BY item_pre_empenho_julgamento.exercicio_julgamento + , item_pre_empenho_julgamento.cod_cotacao + , item_pre_empenho_julgamento.cod_item + , item_pre_empenho_julgamento.lote + , item_pre_empenho_julgamento.cgm_fornecedor + , cotacao_item.quantidade + HAVING coalesce(cotacao_item.quantidade, 0.00) - coalesce(sum(item_pre_empenho.quantidade), 0.00) = 0 + ) \n"; + + $stFiltroHomologacao_item .= " AND NOT EXISTS + ( + SELECT 1 + FROM compras.cotacao_anulada + WHERE cotacao_anulada.cod_cotacao = mapa_cotacao.cod_cotacao + AND cotacao_anulada.exercicio = mapa_cotacao.exercicio_cotacao + ) \n"; + + $stOrdem = " ORDER BY catalogo_item.descricao \n"; + $obTLicHomologacao->recuperaItensAgrupadosSolicitacaoLicitacao( $rsItensAutEmpenho, $stFiltroHomologacao_item, $stOrdem ); + + $arItensAutorizacao = array(); + $arItensAutorizacao[] = $rsItensAutEmpenho->arElementos; + + $obTLicHomologacao = new TLicitacaoHomologacao(); + $obTLicHomologacao->recuperaItensAgrupadosSolicitacaoLicitacaoImp( $rsItensAutEmpenhoImp, $stFiltroHomologacao_item, $stOrdem ); + + $arItensAutorizacaoImp = array(); + $arItensAutorizacaoImp[] = $rsItensAutEmpenhoImp->arElementos; + + unset($stFiltroHomologacao_item ); + + while ( !$rsItensAutEmpenho->eof() && !$obErro->ocorreu() ) { + $obTOrcamentoReservaSaldosAnulada = new TOrcamentoReservaSaldosAnulada; + $obTOrcamentoReservaSaldosAnulada->setDado('cod_reserva' , $rsItensAutEmpenho->getCampo('cod_reserva')); + $obTOrcamentoReservaSaldosAnulada->setDado('exercicio' , $rsItensAutEmpenho->getCampo('exercicio_solicitacao')); + $obTOrcamentoReservaSaldosAnulada->setDado('dt_anulacao' , date('d/m/Y')); + $obErro = $obTOrcamentoReservaSaldosAnulada->consultar(); + + $obExcecao = Sessao::getExcecao(); + if (Sessao::getExcecao()->getDescricao() == "Nenhum registro encontrado!") { + Sessao::getExcecao()->setDescricao(""); + } + + if ( !$obTOrcamentoReservaSaldosAnulada->getDado ( 'motivo_anulacao' ) ) { + $obTOrcamentoReservaSaldosAnulada->setDado( 'motivo_anulacao' , 'Anulação Automática. Entidade: '.$rsAutEmpenho->getCampo( 'cod_entidade' ).' - '.$rsAutEmpenho->getCampo( 'nom_entidade' ).', Mapa de compras: '. $rsItensAutEmpenho->getCampo( 'cod_mapa' ) . '/'. $rsItensAutEmpenho->getCampo( 'exercicio_mapa' ) . '' ); + $obErro = $obTOrcamentoReservaSaldosAnulada->inclusao( Sessao::getTransacao()); + } + $rsItensAutEmpenho->proximo(); + } + + $rsAutEmpenho->proximo(); + } + + if (!$obErro->ocorreu()) { + $stFiltroSolicitacaoLicitacao = $stFiltroHomologacao; + $stFiltroSolicitacaoLicitacao.= " + AND NOT EXISTS + ( + SELECT 1 + FROM compras.cotacao_anulada + WHERE cotacao_anulada.cod_cotacao = cotacao.cod_cotacao + AND cotacao_anulada.exercicio = cotacao.exercicio + ) + + AND NOT EXISTS + ( + SELECT 1 + FROM compras.solicitacao_anulacao + WHERE solicitacao_anulacao.cod_solicitacao = solicitacao.cod_solicitacao + AND solicitacao_anulacao.exercicio = solicitacao.exercicio + AND solicitacao_anulacao.cod_entidade = solicitacao.cod_entidade + ) + + GROUP BY solicitacao.cod_solicitacao + , solicitacao.observacao + , solicitacao.exercicio + , solicitacao.cod_almoxarifado + , solicitacao.cod_entidade + , solicitacao.cgm_solicitante + , solicitacao.cgm_requisitante + , solicitacao.cod_objeto + , solicitacao.prazo_entrega + , solicitacao.timestamp"; + + $obTLicHomologacao->recuperaSolicitacaoLicitacaoNaoAnulada( $rsSolicitacaoLicitacaoAtiva, $stFiltroSolicitacaoLicitacao ); + + while (!$rsSolicitacaoLicitacaoAtiva->eof()) { + $observacaoSolicitacaoLicitacao .= $rsSolicitacaoLicitacaoAtiva->getCampo('observacao').'§§'; + $rsSolicitacaoLicitacaoAtiva->proximo(); + } + + Sessao::write('observacaoSolicitacao',$observacaoSolicitacaoLicitacao); + + $inCountAutorizacao=0; + $arVlReservaDespesa = array(); + foreach ($arItensAutorizacaoImp[$inCountAutorizacao] as $chave =>$dadosItens) { + $vlCotacao = $dadosItens['vl_cotacao']; + $qtdCotacao = $dadosItens['qtd_cotacao']; + foreach ($arItens as $key => $arItem) { + if ( $arItem['cod_item'] == $dadosItens['cod_item'] && $arItem['cod_cotacao'] == $dadosItens['cod_cotacao'] ) { + $arCotacaoItem = (is_array($arItem['arCotacaoItem'])) ? $arItem['arCotacaoItem'] : array(); + foreach ($arCotacaoItem as $chaveCotacao => $cotacaoItem) { + if($cotacaoItem['cgm_fornecedor'] == $arItem['inCgmFornecedor']){ + $vlUnitarioItem = $cotacaoItem['vl_cotacao'] / $cotacaoItem['quantidade']; + break; + } + } + + $qtdCotacao = $arItem['nuQtdeItem']; + $vlCotacao = $vlUnitarioItem * $qtdCotacao; + + break; + } + } + + if(isset($arVlReservaDespesa[$dadosItens['cod_despesa']][$dadosItens['cod_conta']])){ + $arVlReservaDespesa[$dadosItens['cod_despesa']][$dadosItens['cod_conta']] += $vlCotacao; + }else{ + $arVlReservaDespesa[$dadosItens['cod_despesa']][$dadosItens['cod_conta']] = $vlCotacao; + } + + $inCountAutorizacao++; + } + + $inCountAutorizacao = 0; + $rsAutEmpenho->setPrimeiroElemento(); + + while (!$rsAutEmpenho->eof() && !$obErro->ocorreu()) { + $obAutorizacaoEmpenho = new REmpenhoAutorizacaoEmpenho; + $obAutorizacaoEmpenho->boAutViaHomologacao = TRUE; + $obAutorizacaoEmpenho->setExercicio( Sessao::getExercicio() ); + $obAutorizacaoEmpenho->obROrcamentoEntidade->setCodigoEntidade( $rsAutEmpenho->getCampo('cod_entidade') ); + $obAutorizacaoEmpenho->obREmpenhoTipoEmpenho->setCodTipo( 0 ); + $obAutorizacaoEmpenho->obROrcamentoDespesa->setCodDespesa( $rsAutEmpenho->getCampo("cod_despesa") ); + $obAutorizacaoEmpenho->obROrcamentoClassificacaoDespesa->setMascClassificacao( $rsAutEmpenho->getCampo("mascara_classificacao") ); + $obAutorizacaoEmpenho->obRCGM->setNumCGM( $rsAutEmpenho->getCampo("fornecedor") ); + $obAutorizacaoEmpenho->obRUsuario->obRCGM->setNumCGM( Sessao::read('numCgm') ); + $obAutorizacaoEmpenho->obREmpenhoHistorico->setCodHistorico( 0 ); + $obAutorizacaoEmpenho->obROrcamentoReserva->setDtValidadeInicial( $request->get('stDtAutorizacao') ); + $obAutorizacaoEmpenho->obROrcamentoReserva->setDtValidadeFinal( '31/12/'.date('Y') ); + $obAutorizacaoEmpenho->obROrcamentoReserva->setDtInclusao( $request->get('stDtAutorizacao') ); + $obAutorizacaoEmpenho->setDescricao( $rsAutEmpenho->getCampo("cod_objeto")." - ".$rsAutEmpenho->getCampo("desc_objeto") ); + $obAutorizacaoEmpenho->setDtAutorizacao( $request->get('stDtAutorizacao') ); + + $vlReserva = $arVlReservaDespesa[$rsAutEmpenho->getCampo("cod_despesa")][$rsAutEmpenho->getCampo("cod_conta")]; + $obAutorizacaoEmpenho->obROrcamentoReserva->setVlReserva( $vlReserva ); + $obAutorizacaoEmpenho->obROrcamentoDespesa->obROrcamentoUnidadeOrcamentaria->obROrcamentoOrgaoOrcamentario->setNumeroOrgao( $rsAutEmpenho->getCampo("num_orgao") ); + $obAutorizacaoEmpenho->obROrcamentoDespesa->obROrcamentoUnidadeOrcamentaria->setNumeroUnidade( $rsAutEmpenho->getCampo("num_unidade") ); + $obAutorizacaoEmpenho->setCodCategoria ( 1 ); + + // atributo modalidade + // array para relação entre modalidade licitacao e atributo modalidade do empenho + $arModalidade = array(1 => 2, 2 => 3, 3 => 4, 4 => 0, 5 => 1, 6 => 11, 7 => 12,8 => 5,9 => 6, 10 => 13, 11 => 14); + $inAtribModalidade = $arModalidade[$rsAutEmpenho->getCampo("cod_modalidade")]; + $obAutorizacaoEmpenho->obRCadastroDinamico->addAtributosDinamicos( '101' , $inAtribModalidade ); + + // atributo tipo credor + $obAutorizacaoEmpenho->obRCadastroDinamico->addAtributosDinamicos( '103' , 1 ); + + // atributo complementar + $obAutorizacaoEmpenho->obRCadastroDinamico->addAtributosDinamicos( '100' , 2 ); + + $inNumItemCont = 1; + foreach ($arItensAutorizacaoImp[$inCountAutorizacao] as $chave =>$dadosItens) { + $vlCotacao = $dadosItens['vl_cotacao']; + $qtdCotacao = $dadosItens['qtd_cotacao']; + $inFornecedor = $dadosItens['fornecedor']; + foreach ($arItens as $key => $arItem) { + if ( $arItem['cod_item'] == $dadosItens['cod_item'] && $arItem['cod_cotacao'] == $dadosItens['cod_cotacao'] ) { + $arCotacaoItem = (is_array($arItem['arCotacaoItem'])) ? $arItem['arCotacaoItem'] : array(); + foreach ($arCotacaoItem as $chaveCotacao => $cotacaoItem) { + if($cotacaoItem['cgm_fornecedor'] == $arItem['inCgmFornecedor']){ + $vlUnitarioItem = $cotacaoItem['vl_cotacao'] / $cotacaoItem['quantidade']; + break; + } + } + + $qtdCotacao = $arItem['nuQtdeItem']; + $vlCotacao = $vlUnitarioItem * $qtdCotacao; + $inFornecedor = $arItem['inCgmFornecedor']; + + break; + } + } + + // gerar autorização + $obAutorizacaoEmpenho->addItemPreEmpenho(); + $obAutorizacaoEmpenho->roUltimoItemPreEmpenho->setCompra ( true ); + $obAutorizacaoEmpenho->roUltimoItemPreEmpenho->setNumItem ( $inNumItemCont++ ); + $obAutorizacaoEmpenho->roUltimoItemPreEmpenho->setExercicioMapa( $dadosItens['exercicio_mapa'] ); + $obAutorizacaoEmpenho->roUltimoItemPreEmpenho->setQuantidade( $qtdCotacao ); + $obAutorizacaoEmpenho->roUltimoItemPreEmpenho->setNomUnidade( $dadosItens['nom_unidade'] ); + $obAutorizacaoEmpenho->roUltimoItemPreEmpenho->setValorTotal( $vlCotacao ); + $obAutorizacaoEmpenho->roUltimoItemPreEmpenho->setNomItem ( $dadosItens['descricao_completa'] ); + //descricao_completa do item do catalogo concatenada com complemento do item na solicitacao + $complemento = ""; + if (trim($dadosItens['descricao_completa'])) { + $complemento .= trim($dadosItens['descricao_completa'])." "; + } + if (trim($dadosItens['complemento'])) { + $complemento .= trim($dadosItens['complemento']); + } + $obAutorizacaoEmpenho->roUltimoItemPreEmpenho->setComplemento ( $complemento ); + $obAutorizacaoEmpenho->roUltimoItemPreEmpenho->setCgmFornecedor ( $inFornecedor ); + $obAutorizacaoEmpenho->roUltimoItemPreEmpenho->setExercicioJulgamento( $dadosItens['exercicio'] ); + $obAutorizacaoEmpenho->roUltimoItemPreEmpenho->setLoteCompras ( $dadosItens['lote'] ); + $obAutorizacaoEmpenho->roUltimoItemPreEmpenho->setCodCotacao ( $dadosItens['cod_cotacao'] ); + $obAutorizacaoEmpenho->roUltimoItemPreEmpenho->setCodItem ( $dadosItens['cod_item'] ); + $obAutorizacaoEmpenho->roUltimoItemPreEmpenho->setCodItemPreEmp ( $dadosItens['cod_item'] ); + $obAutorizacaoEmpenho->roUltimoItemPreEmpenho->obRUnidadeMedida->setCodUnidade( $dadosItens['cod_unidade'] ); + $obAutorizacaoEmpenho->roUltimoItemPreEmpenho->obRUnidadeMedida->obRGrandeza->setCodGrandeza( $dadosItens['cod_grandeza'] ); + $obAutorizacaoEmpenho->roUltimoItemPreEmpenho->setSiglaUnidade ( $dadosItens['simbolo'] ); + } + + $obErro = $obAutorizacaoEmpenho->incluir(Sessao::getTransacao()); + + if ($obErro->ocorreu()) { + $arErros[] = $dadosItens['cod_item'].': '.$obErro->getDescricao(); + break; + } else { + # Salvar Assinaturas configuráveis se houverem + $arAssinaturas = Sessao::read('assinaturas'); + + if (is_array($arAssinaturas) && count($arAssinaturas['selecionadas']) > 0) { + $arAssinatura = $arAssinaturas['selecionadas']; + + $obTEmpenhoAutorizacaoEmpenhoAssinatura = new TEmpenhoAutorizacaoEmpenhoAssinatura; + $obTEmpenhoAutorizacaoEmpenhoAssinatura->setDado('exercicio' , $obAutorizacaoEmpenho->getExercicio()); + $obTEmpenhoAutorizacaoEmpenhoAssinatura->setDado('cod_entidade' , $obAutorizacaoEmpenho->obROrcamentoEntidade->getCodigoEntidade()); + $obTEmpenhoAutorizacaoEmpenhoAssinatura->setDado('cod_autorizacao' , $obAutorizacaoEmpenho->getCodAutorizacao()); + $arPapel = $obTEmpenhoAutorizacaoEmpenhoAssinatura->arrayPapel(); + + foreach ($arAssinatura as $arAssina) { + if (isset($arAssina['papel'])) { + if (is_numeric($arAssina['papel'])) { + $inNumAssina = $arAssina['papel']; + } else { + $inNumAssina = $arPapel[$arAssina['papel']]; + } + } + + $obTEmpenhoAutorizacaoEmpenhoAssinatura->setDado('num_assinatura', $inNumAssina); + $obTEmpenhoAutorizacaoEmpenhoAssinatura->setDado('numcgm' , $arAssina['inCGM']); + $obTEmpenhoAutorizacaoEmpenhoAssinatura->setDado('cargo' , $arAssina['stCargo']); + $obErro = $obTEmpenhoAutorizacaoEmpenhoAssinatura->inclusao(Sessao::getTransacao()); + } + + unset($obTEmpenhoAutorizacaoEmpenhoAssinatura); + } + + # Armazena os dados da autorização em array para depois ser usado na impressão. + $arAutorizacao[$inCont++] = array( + "inCodAutorizacao" => $obAutorizacaoEmpenho->getCodAutorizacao(), + "inCodPreEmpenho" => $obAutorizacaoEmpenho->getCodPreEmpenho(), + "inCodEntidade" => $obAutorizacaoEmpenho->obROrcamentoEntidade->getCodigoEntidade(), + "stDtAutorizacao" => $obAutorizacaoEmpenho->getDtAutorizacao(), + "inCodDespesa" => $obAutorizacaoEmpenho->obROrcamentoDespesa->getCodDespesa(), + "stExercicio" => $obAutorizacaoEmpenho->getExercicio()); + } + $inCountAutorizacao++; + $rsAutEmpenho->proximo(); + } + } + } + + if ($obErro->ocorreu()) + break; + } +} + +if (!$obErro->ocorreu()) { + if (count($arAutorizacao) > 0) { + if (count($arAutorizacao) == 1) { + $stMsg = $arAutorizacao[0]['inCodAutorizacao']. "/".Sessao::getExercicio() ; + } else { + $inCont = count($arAutorizacao)-1; + $stMsg = "Autorizações de ".$arAutorizacao[0]['inCodAutorizacao']."/".Sessao::getExercicio()." até ".$arAutorizacao[$inCont]['inCodAutorizacao']. "/".Sessao::getExercicio(); + } + + if (count($arErros) > 0) { + $obErro->setDescricao("Nem todas as autorizações foram realizadas."); + } + + if (!$obErro->ocorreu()) { + # Grava no array as autorizações geradas. + Sessao::write('arAutorizacao', $arAutorizacao); + + # Exibe a mensagem e redireciona para a tela de download. + SistemaLegado::alertaAviso($pgGera.'?'.Sessao::getId(), $stMsg , "incluir", "aviso", Sessao::getId(), "../"); + } + } else { + $obErro->setDescricao($arErros[0]); + } +} + +if ($obErro->ocorreu()) { + SistemaLegado::exibeAviso(urlencode($obErro->getDescricao()),'n_incluir',"erro"); +} + +echo ""; +Sessao::encerraExcecao(); +?> diff --git a/gestaoPatrimonial/fontes/PHP/licitacao/instancias/contrato/FLManterTipoContrato.php b/gestaoPatrimonial/fontes/PHP/licitacao/instancias/contrato/FLManterTipoContrato.php new file mode 100644 index 0000000..ee67d48 --- /dev/null +++ b/gestaoPatrimonial/fontes/PHP/licitacao/instancias/contrato/FLManterTipoContrato.php @@ -0,0 +1,113 @@ + +get('stAcao'); +$stCtrl = $request->get('stCtrl'); + +$obForm = new Form; +$obForm->setAction( $pgList ); + +$obHdnAcao = new Hidden; +$obHdnAcao->setName( "stAcao" ); +$obHdnAcao->setValue( $stAcao ); + +$obHdnCtrl = new Hidden; +$obHdnCtrl->setName( "stCtrl" ); +$obHdnCtrl->setValue( "" ); + +$obTxtCodigo = new TextBox; +$obTxtCodigo->setName ( "inCodigo" ); +$obTxtCodigo->setId ( "inCodigo" ); +$obTxtCodigo->setRotulo ( "Código" ); +$obTxtCodigo->setTitle ( "Informe o Código do Tipo de Contrato." ); +$obTxtCodigo->setSize ( 3 ); +$obTxtCodigo->setInteiro ( true ); +$obTxtCodigo->setMaxLength ( 3 ); + +$obTxtSigla = new TextBox; +$obTxtSigla->setName ( "stSigla" ); +$obTxtSigla->setId ( "stSigla" ); +$obTxtSigla->setRotulo ( "Sigla" ); +$obTxtSigla->setTitle ( "Informe a Sigla do tipo de Contrato." ); +$obTxtSigla->setSize ( 8 ); +$obTxtSigla->setMaxLength ( 8 ); + +$obTxtDescricao = new TextBox; +$obTxtDescricao->setName ( "stDescricao" ); +$obTxtDescricao->setId ( "stDescricao" ); +$obTxtDescricao->setRotulo ( "Descrição" ); +$obTxtDescricao->setTitle ( "Informe a Descrição do Tipo de Contrato." ); +$obTxtDescricao->setSize ( 80 ); +$obTxtDescricao->setMaxLength ( 80 ); + +$obTxtCodigoTribunal = new TextBox; +$obTxtCodigoTribunal->setName ( "inCodigoTribunal" ); +$obTxtCodigoTribunal->setId ( "inCodigoTribunal" ); +$obTxtCodigoTribunal->setRotulo ( "Código Tribunal" ); +$obTxtCodigoTribunal->setTitle ( "Informe o Código do Tipo de Contrato Conforme Orientação do Tribunal de Contas." ); +$obTxtCodigoTribunal->setSize ( 3 ); +$obTxtCodigoTribunal->setInteiro ( true ); +$obTxtCodigoTribunal->setMaxLength ( 3 ); + +//define o formulário +$obFormulario = new Formulario; +$obFormulario->addForm ( $obForm ); +$obFormulario->setAjuda ("UC-03.05.22" ); +$obFormulario->addHidden ( $obHdnCtrl ); +$obFormulario->addHidden ( $obHdnAcao ); +$obFormulario->addTitulo ( "Dados para Filtro" ); +$obFormulario->addComponente ( $obTxtCodigo ); +$obFormulario->addComponente ( $obTxtSigla ); +$obFormulario->addComponente ( $obTxtDescricao ); +$obFormulario->addComponente ( $obTxtCodigoTribunal ); + +$obFormulario->OK(); +$obFormulario->show(); + +include_once '../../../../../../gestaoAdministrativa/fontes/PHP/framework/include/rodape.inc.php'; diff --git a/gestaoPatrimonial/fontes/PHP/licitacao/instancias/contrato/FMConsultarContrato.php b/gestaoPatrimonial/fontes/PHP/licitacao/instancias/contrato/FMConsultarContrato.php new file mode 100644 index 0000000..9fd8cde --- /dev/null +++ b/gestaoPatrimonial/fontes/PHP/licitacao/instancias/contrato/FMConsultarContrato.php @@ -0,0 +1,747 @@ + +get('stAcao'); +$inNumContrato = $request->get('inNumContrato'); +$inCodEntidade = $request->get('inCodEntidade'); +$stExercicio = $request->get('stExercicio'); + +$stURL .= "&pos=".Sessao::read('pos'); +$stURL .= "&pg=".Sessao::read('pg'); +$stURL .= "&paginando=".Sessao::read('paginando'); + + +$obTLicitacaoTipoContrato = new TLicitacaoTipoContrato(); +$obTLicitacaoTipoContrato->recuperaTodos( $rsTipoContrato, ' WHERE cod_tipo IN (43,38,19,46,20,35,27,23,42,10,12,14,6,1,39,28,16,4,18,26,30,24,45,8,34,31,32,33,3,22) ', ' ORDER BY descricao ' ); + +if ($inNumContrato) { + $obTContrato = new TLicitacaoContrato(); + $obTContrato->setDado('num_contrato', $inNumContrato); + $obTContrato->setDado('cod_entidade', $inCodEntidade); + $obTContrato->setDado('exercicio', $stExercicio); + $obTContrato->recuperaRelacionamento($rsContrato); + + $inCodLicitacao = $rsContrato->getCampo('cod_licitacao'); + $inCodModalidade = $rsContrato->getCampo('cod_modalidade'); + $stDescObjeto = $rsContrato->getCampo('descricao'); + $inCGMResponsavelJuridico = $rsContrato->getCampo('cgm_responsavel_juridico'); + $stLabelAssinatura = $rsContrato->getCampo('dt_assinatura'); + $stLabelVencimento = $rsContrato->getCampo('vencimento'); + $dtFimExecucao = $rsContrato->getCampo('fim_execucao'); + $dtInicioExecucao = $rsContrato->getCampo('inicio_execucao'); + $inCGMContratado = $rsContrato->getCampo('cgm_contratado'); + $stNomContratado = $rsContrato->getCampo('nom_contratado'); + $stNomCGM = $rsContrato->getCampo('nom_cgm'); + $inCodDocumento = $rsContrato->getCampo('cod_documento'); + $inCodTipoDocumento = $rsContrato->getCampo('cod_tipo_documento'); + $nmValorGarantiaExecucao = number_format($rsContrato->getCampo('valor_garantia'),2,',','.'); + $vlContrato = number_format($rsContrato->getCampo('valor_contratado'),2,',','.'); + $stTipoContrato = $rsContrato->getCampo('tipo_descricao'); + $stExercicioContrato = $rsContrato->getCampo('exercicio'); + $stExercicioLicitacao = $rsContrato->getCampo('exercicio_licitacao'); + + $stNomEntidade = $rsContrato->getCampo('nom_entidade'); + $inNumOrgao = $rsContrato->getCampo('num_orgao'); + $stNomOrgao = $rsContrato->getCampo('nom_orgao'); + $inNumUnidade = $rsContrato->getCampo('num_unidade'); + $stNomUnidade = $rsContrato->getCampo('nom_unidade'); + $inNumeroContrato = $rsContrato->getCampo('numero_contrato'); + $stObjeto = $rsContrato->getCampo('objeto'); + $inCodTipoObjeto = $rsContrato->getCampo('cod_tipo_objeto'); + $stTipoObjeto = $rsContrato->getCampo('tipo_objeto'); + $stObjeto = $rsContrato->getCampo('objeto'); + $stFormaFornecimento = $rsContrato->getCampo('forma_fornecimento'); + $stFormaPagamento = $rsContrato->getCampo('forma_pagamento'); + $inCGMSignatario = $rsContrato->getCampo('cgm_signatario'); + $stCGMSignatario = $rsContrato->getCampo('nom_signatario'); + $stPrazoExecucao = $rsContrato->getCampo('prazo_execucao'); + $stMultaRescisoria = $rsContrato->getCampo('multa_rescisoria'); + $stJustificativa = $rsContrato->getCampo('justificativa'); + $stRazao = $rsContrato->getCampo('razao'); + $stFundamentacaoLegal = $rsContrato->getCampo('fundamentacao_legal'); + + $obTContratoDocumento = new TLicitacaoContratoDocumento; + $obTContratoDocumento->setDado('num_contrato', $inNumContrato); + $obTContratoDocumento->setDado('cod_entidade', $inCodEntidade); + $obTContratoDocumento->setDado('exercicio', $stExercicio); + $obTContratoDocumento->recuperaDocumentos($rsDocumentos); + $arDocumentos = array(); + $inCount = 0; + + while (!$rsDocumentos->eof()) { + $arDados = array(); + $arDados['boNovo'] = false; + $arDados['id' ] = $inCount + 1; + $arDados['inCodDocumento'] = $rsDocumentos->getCampo('cod_documento'); + $arDados['dtValidade'] = $rsDocumentos->getCampo('dt_validade'); + $arDados['dtEmissao'] = $rsDocumentos->getCampo('dt_emissao'); + $arDados['stNumDocumento'] = $rsDocumentos->getCampo('num_documento'); + $arDados['stNomDocumento'] = $rsDocumentos->getCampo('nom_documento'); + $arDocumentos[] = $arDados; + $rsDocumentos->proximo(); + $inCount++; + } + Sessao::write('arDocumentos', $arDocumentos); + + //recupera os veiculos de publicacao, coloca na sessao e manda para o oculto + $obTLicitacaoPublicacaoContrato = new TLicitacaoPublicacaoContrato(); + $obTLicitacaoPublicacaoContrato->setDado('num_contrato', $inNumContrato); + $obTLicitacaoPublicacaoContrato->setDado('exercicio', $stExercicio); + $obTLicitacaoPublicacaoContrato->setDado('cod_entidade', $inCodEntidade); + $obTLicitacaoPublicacaoContrato->recuperaVeiculosPublicacao( $rsVeiculosPublicacao ); + $inCount = 0; + $arValores = array(); + while ( !$rsVeiculosPublicacao->eof() ) { + $arValores[$inCount]['id' ] = $inCount + 1; + $arValores[$inCount]['inVeiculo' ] = $rsVeiculosPublicacao->getCampo( 'num_veiculo' ); + $arValores[$inCount]['stVeiculo' ] = $rsVeiculosPublicacao->getCampo( 'nom_veiculo'); + $arValores[$inCount]['dtLabelPublicacao'] = $rsVeiculosPublicacao->getCampo( 'dt_publicacao'); + $arValores[$inCount]['inNumPublicacao'] = $rsVeiculosPublicacao->getCampo( 'num_publicacao'); + $arValores[$inCount]['stObservacao' ] = $rsVeiculosPublicacao->getCampo( 'observacao'); + $arValores[$inCount]['inCodLicitacao'] = $rsVeiculosPublicacao->getCampo( 'cod_licitacao'); + $inCount++; + $rsVeiculosPublicacao->proximo(); + } + Sessao::write('arValores', $arValores); + + //recupera os arquivos digitais + $stFiltro = " WHERE num_contrato = ".$inNumContrato." and cod_entidade = ".$inCodEntidade." and exercicio = '".$stExercicioContrato."' "; + $obTLicitacaoContratoArquivo = new TLicitacaoContratoArquivo; + $obTLicitacaoContratoArquivo->recuperaTodos($rsContratoArquivo, $stFiltro); + $inCount = 0; + $arArquivos = array(); + while ( !$rsContratoArquivo->eof() ) { + $arArquivos[$inCount]['id' ] = $inCount + 1; + $arArquivos[$inCount]['arquivo'] = $rsContratoArquivo->getCampo( 'arquivo' ); + $arArquivos[$inCount]['nom_arquivo'] = $rsContratoArquivo->getCampo( 'nom_arquivo' ); + $arArquivos[$inCount]['num_contrato'] = $rsContratoArquivo->getCampo( 'num_contrato' ); + $arArquivos[$inCount]['cod_entidade'] = $rsContratoArquivo->getCampo( 'cod_entidade' ); + $arArquivos[$inCount]['exercicio'] = $rsContratoArquivo->getCampo( 'exercicio' ); + $inCount++; + $rsContratoArquivo->proximo(); + } + Sessao::write('arArquivos', $arArquivos); +} else { + $inCodLicitacao = ""; + $inCodModalidade = ""; + $stDescObjeto = ""; + $inCGMResponsavelJuridico = ""; + $stLabelAssinatura = ""; + $stLabelVencimento = ""; + $dtFimExecucao = ""; + $dtInicioExecucao = ""; + $inCGMContratado = ""; + $stNomContratado = ""; + $stNomCGM = ""; + $inCodDocumento = ""; + $inCodTipoDocumento = ""; + $nmValorGarantiaExecucao = ""; + $vlContrato = ""; + $stTipoContrato = ""; + $stExercicioContrato = ""; + $stExercicioLicitacao = ""; +} + +$obForm = new Form; +$obForm->setAction ( $pgProc ); +$obForm->setTarget ( "oculto" ); +$obForm->setEncType ( "multipart/form-Label" ); + +$obHdnAcao = new Hidden; +$obHdnAcao->setName( "stAcao" ); +$obHdnAcao->setValue( $stAcao ); + +$obHdnCtrl = new Hidden; +$obHdnCtrl->setName( "stCtrl" ); +$obHdnCtrl->setValue( "" ); + +//Carrega Orgãos +$obTOrcamentoOrgao = new TOrcamentoOrgao; +$obTOrcamentoOrgao->recuperaRelacionamento( $rsOrgao, " AND OO.exercicio = '".Sessao::getExercicio()."' "); + +$obLabelOrgao = new Label; +$obLabelOrgao->setRotulo( "Órgão" ); +$obLabelOrgao->setTitle( "Selecione o orgão orçamentário." ); +$obLabelOrgao->setName( "inNumOrgaoLabel" ); +$obLabelOrgao->setId( "inNumOrgaoLabel" ); +$obLabelOrgao->setValue( $inNumOrgao.'-'.$stNomOrgao ); + +$obLabelUnidade = new Label; +$obLabelUnidade->setRotulo( "Unidade" ); +$obLabelUnidade->setTitle( "Selecione a unidade orçamentária." ); +$obLabelUnidade->setName( "inNumUnidadeLabel" ); +$obLabelUnidade->setId( "inNumUnidadeLabel" ); +$obLabelUnidade->setValue( $inNumUnidade.'-'.$stNomUnidade ); + +$obLabelTipoObjeto = new Label(); +$obLabelTipoObjeto->setName ( 'inCodTipoObjeto' ); +$obLabelTipoObjeto->setRotulo ( 'Tipo de Objeto' ); +$obLabelTipoObjeto->setTitle ( 'Selecione o Tipo de Objeto.' ); +$obLabelTipoObjeto->setValue ( $inCodTipoObjeto.'-'.$stTipoObjeto ); + +$obLabelNumeroContrato = new Label; +$obLabelNumeroContrato->setName ( "inNumeroContrato" ); +$obLabelNumeroContrato->setId ( "inNumeroContrato" ); +$obLabelNumeroContrato->setRotulo( "Número do Contrato" ); +$obLabelNumeroContrato->setTitle ( "Informe o número do contrato." ); +$obLabelNumeroContrato->setValue( $inNumeroContrato); + +$obLblNumeroLicitacao= new Label; +$obLblNumeroLicitacao->setRotulo ( "Número da Licitação" ); +$obLblNumeroLicitacao->setValue ( $inCodLicitacao); + +$obCmbTipoContrato = new Select(); +$obCmbTipoContrato->setRotulo( 'Tipo de contrato' ); +$obCmbTipoContrato->setTitle( 'Selecione o tipo de contrato' ); +$obCmbTipoContrato->setName( 'inTipoContrato' ); +$obCmbTipoContrato->setId( 'inTipoContrato' ); +$obCmbTipoContrato->addOption( '', 'Selecione' ); +$obCmbTipoContrato->setCampoId( 'cod_tipo' ); +$obCmbTipoContrato->setCampoDesc( 'descricao' ); +$obCmbTipoContrato->setStyle('width: 300'); +$obCmbTipoContrato->setNull(false); +$obCmbTipoContrato->preencheCombo( $rsTipoContrato ); + +$obLblDescObjeto = new Label; +$obLblDescObjeto->setRotulo ( "Objeto" ); +$obLblDescObjeto->setId ( 'stDescObjeto'); +$obLblDescObjeto->setValue ( $stDescObjeto ); + +$obLblTipoContrato = new Label; +$obLblTipoContrato->setRotulo ( "Tipo de Contrato"); +$obLblTipoContrato->setValue ( $stTipoContrato ); + +$obLblExercicioContrato = new Label; +$obLblExercicioContrato->setRotulo ( "Exercício do Contrato"); +$obLblExercicioContrato->setValue ( $stExercicioContrato ); + +$obLblExercicioLicitacao = new Label; +$obLblExercicioLicitacao->setRotulo ( "Exercício da Licitação"); +$obLblExercicioLicitacao->setValue ( $stExercicioLicitacao ); + +$obLblEntidade = new Label; +$obLblEntidade->setRotulo ( "Entidade"); +$obLblEntidade->setValue ( $inCodEntidade.' - '.$stNomEntidade ); + +# Campo Chave +$obLblResponsavelJuridico = new Label; +$obLblResponsavelJuridico->setRotulo('Responsável Jurídico'); +$obLblResponsavelJuridico->setValue($inCGMResponsavelJuridico.'-'.$stNomCGM); + +$obLblContratado = new Label; +$obLblContratado->setRotulo('Contratado'); +$obLblContratado->setValue($inCGMContratado.'-'.$stNomContratado); + +$obLabelObjeto = new Label; +$obLabelObjeto->setId ( "stObjeto" ); +$obLabelObjeto->setName ( "stObjeto" ); +$obLabelObjeto->setRotulo ( "Objeto do Contrato" ); +$obLabelObjeto->setTitle ( "Informe todos detalhes do contrato."); +$obLabelObjeto->setValue( $stObjeto ); + +$obLabelFormaFornecimento = new Label; +$obLabelFormaFornecimento->setId ( "stFormaFornecimento" ); +$obLabelFormaFornecimento->setName ( "stFormaFornecimento" ); +$obLabelFormaFornecimento->setRotulo ( "Forma de Fornecimento" ); +$obLabelFormaFornecimento->setTitle ( "Descrição da forma de fornecimento ou regime de execução, conforme previsão do art. 55, II, da Lei Federal n. 8.666/93."); +$obLabelFormaFornecimento->setValue( $stFormaFornecimento ); + +$obLabelFormaPagamento = new Label; +$obLabelFormaPagamento->setId ( "stFormaPagamento" ); +$obLabelFormaPagamento->setName ( "stFormaPagamento" ); +$obLabelFormaPagamento->setRotulo ( "Forma de Pagamento" ); +$obLabelFormaPagamento->setTitle ( "Descrever o preço e as condições de pagamento, os critérios, Label-base e periodicidade do reajustamento de preços, os critérios de atualização monetária entre a Label do adimplemento das obrigações e a do efetivo pagamento, conforme previsão do art. 55, III, da Lei Federal n. 8.666/93" ); +$obLabelFormaPagamento->setValue( $stFormaPagamento ); + +$obCGMSignatario = new Label; +$obCGMSignatario->setName ( 'stCGMSignatario'); +$obCGMSignatario->setId ( 'stCGMSignatario'); +$obCGMSignatario->setRotulo ( 'CGM Signatário' ); +$obCGMSignatario->setValue ( $inCGMSignatario.'-'.$stCGMSignatario ); + +$obLabelPrazoExecucao = new Label; +$obLabelPrazoExecucao->setId ( "stPrazoExecucao" ); +$obLabelPrazoExecucao->setName ( "stPrazoExecucao" ); +$obLabelPrazoExecucao->setRotulo ( "Prazo de Execução" ); +$obLabelPrazoExecucao->setTitle ( "Os prazos de início de etapas de execução, de conclusão, de entrega, de observação e de recebimento definitivo, conforme o caso, de acordo com a previsão do art. 55, IV, da Lei Federal n. 8.666/93." ); +$obLabelPrazoExecucao->setValue ( $stPrazoExecucao ); + +$obLabelMultaRescisoria = new Label; +$obLabelMultaRescisoria->setId ( "stMultaRescisoria" ); +$obLabelMultaRescisoria->setName ( "stMultaRescisoria" ); +$obLabelMultaRescisoria->setRotulo ( "Multa Rescisória" ); +$obLabelMultaRescisoria->setTitle ( "Descrição da previsão de multa rescisória, conforme previsão do art. 55, VII, da Lei Federal n. 8.666/93." ); +$obLabelMultaRescisoria->setValue ( $stMultaRescisoria ); + +$obLabelExercicioContrato = new Label; +$obLabelExercicioContrato->setName ( "stExercicioContrato" ); +$obLabelExercicioContrato->setId ( "stExercicioContrato" ); +$obLabelExercicioContrato->setRotulo( "Exercício do Contrato" ); +$obLabelExercicioContrato->setValue( Sessao::getExercicio()); + +$obLabelLabelAssinatura = new Label; +$obLabelLabelAssinatura->setName('dtAssinatura'); +$obLabelLabelAssinatura->setValue($stLabelAssinatura); +$obLabelLabelAssinatura->setRotulo('Data da Assinatura'); +$obLabelLabelAssinatura->setTitle('Informe a Data da assinatura.'); + +$obLabelVencimento = new Label; +$obLabelVencimento->setName('dtVencimento'); +$obLabelVencimento->setValue($stLabelVencimento); +$obLabelVencimento->setRotulo('Vencimento'); +$obLabelVencimento->setTitle('Informe o vencimento do contrato.'); + +$obLabelLabelInicioExecucao = new Label; +$obLabelLabelInicioExecucao->setName ( 'dtInicioExecucao' ); +$obLabelLabelInicioExecucao->setId ( 'dtInicioExecucao' ); +$obLabelLabelInicioExecucao->setValue ( $dtInicioExecucao ); +$obLabelLabelInicioExecucao->setRotulo ( 'Data de Início de Execução' ); +$obLabelLabelInicioExecucao->setTitle ( 'Informe a Data de início de execução.'); + +$obLabelLabelFimExecucao = new Label; +$obLabelLabelFimExecucao->setName ( 'dtFimExecucao' ); +$obLabelLabelFimExecucao->setId ( 'dtFimExecucao' ); +$obLabelLabelFimExecucao->setValue ( $dtFimExecucao ); +$obLabelLabelFimExecucao->setRotulo ( 'Data de Fim de Execução' ); +$obLabelLabelFimExecucao->setTitle ( 'Informe a Data de fim de execução.'); + +$obLabelValorContrato = new Label; +$obLabelValorContrato->setName ( "vlContrato" ); +$obLabelValorContrato->setId ( "vlContrato" ); +$obLabelValorContrato->setRotulo( "Valor do Contrato" ); +$obLabelValorContrato->setNull( false ); +if ($vlContrato == '') { + $vlContrato = '0,00'; +} +$obLabelValorContrato->setValue( $vlContrato ); + +$obLabelValorGarantiaExecucao = new Label(); +$obLabelValorGarantiaExecucao->setNull(false); +if ($nmValorGarantiaExecucao == '') { + $nmValorGarantiaExecucao = '0,00'; +} +$obLabelValorGarantiaExecucao->setValue($nmValorGarantiaExecucao); +$obLabelValorGarantiaExecucao->setName('nmValorGarantiaExecucao'); +$obLabelValorGarantiaExecucao->setRotulo('Valor da Garantia de Execução'); +$obLabelValorGarantiaExecucao->setTitle('Informe o valor da garantia de execução.'); + +$obLabelJustificativa = new Label; +$obLabelJustificativa->setId ( "stJustificativa" ); +$obLabelJustificativa->setName ( "stJustificativa" ); +$obLabelJustificativa->setRotulo ( "Justificativa" ); +$obLabelJustificativa->setTitle ( "Informe a Justificativa." ); +$obLabelJustificativa->setValue ( $stJustificativa ); + +$obLabelRazao = new Label; +$obLabelRazao->setId ( "stRazao" ); +$obLabelRazao->setName ( "stRazao" ); +$obLabelRazao->setRotulo ( "Razão" ); +$obLabelRazao->setTitle ( "Informe a razão." ); +$obLabelRazao->setValue ( $stRazao ); + +$obLabelFundamentacaoLegal = new Label; +$obLabelFundamentacaoLegal->setId ( "stFundamentacaoLegal" ); +$obLabelFundamentacaoLegal->setName ( "stFundamentacaoLegal" ); +$obLabelFundamentacaoLegal->setRotulo ( "Fundamentação Legal" ); +$obLabelFundamentacaoLegal->setTitle ( "Informe a Fundamentação Legal." ); +$obLabelFundamentacaoLegal->setValue ( $stFundamentacaoLegal ); + +$obChkImprimirContrato = new CheckBox; +$obChkImprimirContrato->setRotulo('Imprimir Contrato'); +$obChkImprimirContrato->setName('boImprimirContrato'); +$obChkImprimirContrato->setTitle('Deseja Imprimir o contrato?'); + +$obLabelEmissao = new Label(); +$obLabelEmissao->setName('stLabelEmissao'); +$obLabelEmissao->setId('stLabelEmissao'); +$obLabelEmissao->setRotulo('Data de Emissão'); +$obLabelEmissao->setValue($request->get('stLabelEmissao')); + +$obLabelValidade = new Label(); +$obLabelValidade->setName ( "stLabelValidade" ); +$obLabelValidade->setId ( "stLabelValidade" ); +$obLabelValidade->setValue( $request->get('stLabelValidade') ); +$obLabelValidade->setRotulo( "Data de Validade" ); +$obLabelValidade->setTitle( "Informe a Data de Validade do Documento." ); + +$obLabelNumDiasVcto = new Label; +$obLabelNumDiasVcto->setName ( "inNumDiasValido" ); +$obLabelNumDiasVcto->setId ( "inNumDiasValido" ); +$obLabelNumDiasVcto->setRotulo( "Dias para Vencimento" ); +$obLabelNumDiasVcto->setTitle ( "Informe o número de dias para o vencimento do documento." ); +$obLabelNumDiasVcto->setValue ( $request->get('inNumDiasValido') ); + +$obLabelNumDocumento = new Label; +$obLabelNumDocumento->setName ( "stNumDocumento" ); +$obLabelNumDocumento->setId ( "stNumDocumento" ); +$obLabelNumDocumento->setRotulo( "Número do Documento" ); +$obLabelNumDocumento->setTitle ( "Informe o número do documento." ); + +$obSpnAtributosDocumento = new Span; +$obSpnAtributosDocumento->setId('spnAtributosDocumento'); + +$obSpnListaDocumentos = new Span; +$obSpnListaDocumentos->setId('spnListaDocumentos'); + +//Span da Listagem de veículos de Publicação Utilizados +$obSpnListaVeiculo = new Span; +$obSpnListaVeiculo->setID("spnListaVeiculos"); + +/****************************************************************************************************************************/ +//Span da Listagem de veículos de Publicação Utilizados +$obSpnListaArquivo = new Span; +$obSpnListaArquivo->setID("spnListaArquivos"); +/****************************************************************************************************************************/ + +$jsOnLoad = ""; +$jsOnLoad.= "ajaxJavaScript('".$pgOcul."?".Sessao::getId()."','carregaListaDocumentos&consultar=1'); \n"; +$jsOnLoad.= "ajaxJavaScript('".$pgOcul."?".Sessao::getId()."','carregaListaVeiculos&consultar=1'); \n"; +$jsOnLoad.= "ajaxJavaScript('".$pgOcul."?".Sessao::getId()."','carregaListaArquivos&num_contrato=".$inNumContrato."&exercicio=".$stExercicioLicitacao."&cod_entidade=".$inCodEntidade."&consultar=1'); \n "; + +if($inNumUnidade != '') { +//$jsOnLoad.= "ajaxJavaScript('".$pgOcul."?".Sessao::getId()."&inNumOrgao=".$inNumOrgao."&inNumUnidade=".$inNumUnidade."', 'MontaUnidade'); \n"; +} + + +//define o formulário +$obFormulario = new FormularioAbas; +$obFormulario->addForm ( $obForm ); +$obFormulario->setAjuda ("UC-03.05.22"); +$obFormulario->addHidden ( $obHdnCtrl ); +$obFormulario->addHidden ( $obHdnAcao ); + +//Aba contrato +$obFormulario->addAba("Contrato"); +$obFormulario->addTitulo ( "Dados do Contrato" ); + +$obFormulario->addComponente ( $obLblTipoContrato ); +$obFormulario->addComponente ( $obLblExercicioContrato ); +$obFormulario->addComponente ( $obLblExercicioLicitacao ); +$obFormulario->addComponente ( $obLblEntidade ); + +$obFormulario->addComponente ( $obLabelOrgao ); +$obFormulario->addComponente ( $obLabelUnidade ); + +$obFormulario->addComponente ( $obLblNumeroLicitacao ); +$obFormulario->addComponente ( $obLabelTipoObjeto ); + +$obFormulario->addComponente ( $obLabelNumeroContrato ); +$obFormulario->addComponente ( $obLblDescObjeto ); +$obFormulario->addComponente ( $obLblResponsavelJuridico ); +$obFormulario->addComponente ( $obLblContratado ); + +$obFormulario->addComponente ( $obLabelObjeto ); +$obFormulario->addComponente ( $obLabelFormaFornecimento ); +$obFormulario->addComponente ( $obLabelFormaPagamento ); +$obFormulario->addComponente ( $obCGMSignatario ); +$obFormulario->addComponente ( $obLabelPrazoExecucao ); +$obFormulario->addComponente ( $obLabelMultaRescisoria ); + +$obFormulario->addComponente ( $obLabelLabelAssinatura ); +$obFormulario->addComponente ( $obLabelVencimento ); +$obFormulario->addComponente ( $obLabelLabelInicioExecucao ); +$obFormulario->addComponente ( $obLabelLabelFimExecucao ); +$obFormulario->addComponente ( $obLabelValorContrato ); +$obFormulario->addComponente ( $obLabelValorGarantiaExecucao ); + +$obFormulario->addComponente ( $obLabelJustificativa ); +$obFormulario->addComponente ( $obLabelRazao ); +$obFormulario->addComponente ( $obLabelFundamentacaoLegal ); + +$obFormulario->addSpan ( $obSpnAtributosDocumento ); +$obFormulario->addSpan ( $obSpnListaDocumentos ); +$obFormulario->addSpan ( $obSpnListaVeiculo ); +$obFormulario->addSpan ( $obSpnListaArquivo ); + + +//////////ADITIVOS +$obFormulario->addAba ("Aditivos"); +$obFormulario->addTitulo ( "Lista de Aditivos" ); + +$obLicitacaoContratoAditivos = new TLicitacaoContratoAditivos; +$obLicitacaoContratoAditivos->setDado("num_contrato", $request->get('inNumContrato')); +$obLicitacaoContratoAditivos->setDado("exercicio_contrato", $request->get('stExercicioContrato')); +$obLicitacaoContratoAditivos->setDado("cod_entidade", $request->get('inCodEntidade')); +$obLicitacaoContratoAditivos->recuperaContratosAditivosLicitacao($rsLicitacaoContratoAditivo); + +foreach($rsLicitacaoContratoAditivo->getElementos() as $aditivo) { + $obFormulario->addTitulo ( "Aditivo" ); + + $inCodRespJuridico = $aditivo["responsavel_juridico"]; + $stRespJuridico = $aditivo["cgm_responsavel_juridico"]; + $inCodTipoTermo = $aditivo["tipo_termo_aditivo"]; + $stTermoAditivo = $aditivo["descricao_termo_aditivo"]; + $inCodTipoAlteracaoValor = $aditivo["tipo_valor"]; + $stAlteracaoValor = $aditivo["descricao_tipo_alteracao_valor"]; + $dtAssinatura = $aditivo["dt_assinatura"]; + $dtInicioExcucao = $aditivo["inicio_execucao"]; + $dtFimExecucao = $aditivo["fim_execucao"]; + $dtFinalVigencia = $aditivo["dt_vencimento"]; + $stObjeto = $aditivo["objeto"]; + $stJustificativa = $aditivo["justificativa"]; + $stFundamentacaoLegal = $aditivo["fundamentacao"]; + $vlValorContratado = number_format($aditivo["valor_contratado"],2,',','.'); + + $obResponsavelJuridico = new Label; + $obResponsavelJuridico->setRotulo( 'Responsável Jurídico' ); + $obResponsavelJuridico->setName( 'stResponsavelJuridico'); + $obResponsavelJuridico->setId( 'stResponsavelJuridico'); + $obResponsavelJuridico->setValue( $inCodRespJuridico.' - '.$stRespJuridico ); + + $obTLicitacaoTipoTermoAditivo = new TLicitacaoTipoTermoAditivo(); + $obTLicitacaoTipoTermoAditivo->recuperaTodos( $rsTipoTermoAditivo, ' ORDER BY cod_tipo ' ); + + $obTipoTermoAditivo = new Label; + $obTipoTermoAditivo->setRotulo ( 'Tipo de Termo do Aditivo' ); + $obTipoTermoAditivo->setName ( 'inCodTipoTermoAditivo' ); + $obTipoTermoAditivo->setId ( 'inCodTipoTermoAditivo' ); + $obTipoTermoAditivo->setValue( $inCodTipoTermo.' - '.$stTermoAditivo); + + $obTLicitacaoTipoAlteracaoValor = new TLicitacaoTipoAlteracaoValor(); + $obTLicitacaoTipoAlteracaoValor->recuperaTodos( $rsTipoAlteracaoValor, ' ORDER BY cod_tipo ' ); + + $obTipoAlteracaoValor = new Label; + $obTipoAlteracaoValor->setRotulo ( 'Tipo de Alteração do Valor' ); + $obTipoAlteracaoValor->setName ( 'inCodTipoAlteracaoValor' ); + $obTipoAlteracaoValor->setId ( 'inCodTipoAlteracaoValor' ); + $obTipoAlteracaoValor->setValue( $inCodTipoAlteracaoValor.' - '.$stAlteracaoValor ); + + $obDtAssinatura = new Label; + $obDtAssinatura->setRotulo('Data da Assinatura'); + $obDtAssinatura->setName('dtAssinatura'); + $obDtAssinatura->setId('dtAssinatura'); + $obDtAssinatura->setValue($dtAssinatura); + + $obDtInicioExecucao = new Label; + $obDtInicioExecucao->setRotulo('Data de Início de Execução'); + $obDtInicioExecucao->setName('dtInicioExcucao'); + $obDtInicioExecucao->setId('dtInicioExcucao'); + $obDtInicioExecucao->setValue($dtInicioExcucao); + + $obDtFimExecucao = new Label; + $obDtFimExecucao->setRotulo('Data de Término da Execução'); + $obDtFimExecucao->setName('dtFimExecucao'); + $obDtFimExecucao->setId('dtFimExecucao'); + $obDtFimExecucao->setValue($dtFimExecucao); + + $obDtFinalVigencia = new Label; + $obDtFinalVigencia->setRotulo('Data Final de Vigência'); + $obDtFinalVigencia->setName('dtFinalVigencia'); + $obDtFinalVigencia->setId('dtFinalVigencia'); + $obDtFinalVigencia->setValue($dtFinalVigencia); + + $obTxtObjeto = new Label; + $obTxtObjeto->setName('stObjeto'); + $obTxtObjeto->setId('stObjeto'); + $obTxtObjeto->setRotulo('Objeto'); + $obTxtObjeto->setValue($stObjeto); + + $obTxtJustificativa = new Label; + $obTxtJustificativa->setRotulo('Justificativa'); + $obTxtJustificativa->setName('stJustificativa'); + $obTxtJustificativa->setId('stJustificativa'); + $obTxtJustificativa->setValue($stJustificativa); + + $obTxtFundLegal = new Label; + $obTxtFundLegal->setRotulo('Fundamentação Legal'); + $obTxtFundLegal->setName('stFundamentacaoLegal'); + $obTxtFundLegal->setId('vlValorContratado'); + $obTxtFundLegal->setValue($stFundamentacaoLegal); + + $obVlValorContratado = new Label; + $obVlValorContratado->setRotulo('Valor do Aditivo'); + $obVlValorContratado->setName('vlValorContratado'); + $obVlValorContratado->setId('vlValorContratado'); + $obVlValorContratado->setValue($vlValorContratado); + + $obFormulario->addComponente( $obResponsavelJuridico ); + $obFormulario->addComponente( $obTipoTermoAditivo ); + $obFormulario->addComponente( $obTipoAlteracaoValor ); + $obFormulario->addComponente( $obDtAssinatura ); + $obFormulario->addComponente( $obDtInicioExecucao ); + $obFormulario->addComponente( $obDtFimExecucao ); + $obFormulario->addComponente( $obDtFinalVigencia ); + $obFormulario->addComponente( $obTxtObjeto ); + $obFormulario->addComponente( $obTxtJustificativa ); + $obFormulario->addComponente( $obTxtFundLegal ); + $obFormulario->addComponente( $obVlValorContratado ); + +////////ANULAÇÕES + $obTLicitacaoContratoAditivosAnulacao = new TLicitacaoContratoAditivosAnulacao; + $obTLicitacaoContratoAditivosAnulacao->setDado('num_aditivo' , $aditivo['num_aditivo']); + $obTLicitacaoContratoAditivosAnulacao->setDado('cod_entidade' , $aditivo['cod_entidade']); + $obTLicitacaoContratoAditivosAnulacao->setDado('num_contrato' , $aditivo['num_contrato']); + $obTLicitacaoContratoAditivosAnulacao->setDado('exercicio_contrato', $aditivo['exercicio_contrato']); + $obTLicitacaoContratoAditivosAnulacao->setDado('exercicio' , $aditivo['exercicio']); + $obTLicitacaoContratoAditivosAnulacao->recuperaPorChave($rsAnulacao); + + if($rsAnulacao->getNumLinhas() > 0) { + $obFormulario->addTitulo ( "Este aditivo possui a seguinte anulação" ); + + $dtAnulacao = $rsAnulacao->getCampo('dt_anulacao'); + $stMotivo = $rsAnulacao->getCampo('motivo'); + $vlAnulacao = number_format($rsAnulacao->getCampo('valor_anulacao'),2,',','.');; + + $obDtAnulacao = new Label; + $obDtAnulacao->setRotulo('Data da Anulação'); + $obDtAnulacao->setName('dtAnulacao'); + $obDtAnulacao->setId('dtAnulacao'); + $obDtAnulacao->setValue($dtAnulacao); + + $obTxtMotivo = new Label; + $obTxtMotivo->setRotulo('Justificativa'); + $obTxtMotivo->setName('stJustificativa'); + $obTxtMotivo->setId('stJustificativa'); + $obTxtMotivo->setValue($stMotivo); + + $obVlValorAnulado = new Label; + $obVlValorAnulado->setRotulo('Valor Anulado'); + $obVlValorAnulado->setName('vlValorAnulado'); + $obVlValorAnulado->setId('vlValorAnulado'); + $obVlValorAnulado->setValue($vlAnulacao); + + $obFormulario->addComponente( $obDtAnulacao ); + $obFormulario->addComponente( $obTxtMotivo ); + $obFormulario->addComponente( $obVlValorAnulado ); + } +} + +//Aba empenho +$obFormulario->addAba("Empenhos"); +$obFormulario->addTitulo ( "Dados dos Empenhos" ); + +$obTEmpenhoEmpenhoContrato = new TEmpenhoEmpenhoContrato; +$obTEmpenhoEmpenhoContrato->setDado('cod_entidade', $request->get('inCodEntidade')); +$obTEmpenhoEmpenhoContrato->setDado('num_contrato', $request->get('inNumContrato')); +$obTEmpenhoEmpenhoContrato->setDado('exercicio', $request->get('stExercicio')); +$obTEmpenhoEmpenhoContrato->recuperaEmpenhoPorContrato($rsEmpenho); + +if($rsEmpenho->getNumLinhas() > 0) { + + $rsEmpenho->addFormatacao('valor_empenho', 'NUMERIC_BR'); + $rsEmpenho->addFormatacao('valor_anulado', 'NUMERIC_BR'); + $rsEmpenho->addFormatacao('valor_total', 'NUMERIC_BR'); + + $obTable = new Table; + $obTable->setRecordset($rsEmpenho); + $obTable->addLineNumber(true); + + $obTable->Head->addCabecalho('Empenho', 5); + $obTable->Head->addCabecalho('Fornecedor', 20); + $obTable->Head->addCabecalho('Data do Empenho', 5); + $obTable->Head->addCabecalho('Valor Empenhado', 5); + $obTable->Head->addCabecalho('Valor Anulado', 5); + $obTable->Head->addCabecalho('Valor Total', 5); + + $obTable->Body->addCampo('[cod_empenho]', 'C'); + $obTable->Body->addCampo('[numcgm] - [nom_cgm]', 'E'); + $obTable->Body->addCampo('[dt_empenho]', 'C'); + $obTable->Body->addCampo('[valor_empenho]', 'D'); + $obTable->Body->addCampo('[valor_anulado]', 'D'); + $obTable->Body->addCampo('[valor_total]', 'D'); + + $obTable->montaHTML(true, false); + $stHTML = $obTable->getHtml(); + + $obSpnListaEmpenho = new Span; + $obSpnListaEmpenho->setID("spnListaEmpenho"); + $obSpnListaEmpenho->setValue($stHTML); + + $obFormulario->addSpan($obSpnListaEmpenho); +} + +$obSpnObservacao = new Span; +$obSpnObservacao->setID("spnObservacao"); +$obSpnObservacao->setClass("observacao"); +$obSpnObservacao->setValue("Caso o empenho não tenha sido vinculado na hora do cadastro, para que o mesmo seja listado aqui será necessário utilizar a ação: Gestão Financeira :: Empenho :: Empenho :: Vincular Empenho a um Contrato"); + +$obFormulario->addSpan($obSpnObservacao); + + +foreach ($_REQUEST as $chave =>$valor) { + $param.= "&".$chave."=".$valor; +} + +$obBtnCancelar = new Button; +$obBtnCancelar->setName ( 'cancelar' ); +$obBtnCancelar->setValue ( 'Cancelar' ); +$obBtnCancelar->obEvento->setOnClick ( "Cancelar('". $pgList."?".Sessao::getId()."&stAcao=".$stAcao.$stURL."');" ); + +$obFormulario->defineBarra(array($obBtnCancelar)); +$obFormulario->show(); + +include_once '../../../../../../gestaoAdministrativa/fontes/PHP/framework/include/rodape.inc.php'; diff --git a/gestaoPatrimonial/fontes/PHP/licitacao/instancias/contrato/FMManterContrato.php b/gestaoPatrimonial/fontes/PHP/licitacao/instancias/contrato/FMManterContrato.php index 43b06bb..c94c6af 100644 --- a/gestaoPatrimonial/fontes/PHP/licitacao/instancias/contrato/FMManterContrato.php +++ b/gestaoPatrimonial/fontes/PHP/licitacao/instancias/contrato/FMManterContrato.php @@ -29,7 +29,7 @@ * @author Leandro André Zis - * $Id: FMManterContrato.php 63574 2015-09-11 15:53:11Z carlos.silva $ + * $Id: FMManterContrato.php 64112 2015-12-03 16:56:16Z michel $ * Casos de uso : uc-03.05.22 */ @@ -72,7 +72,7 @@ $inCodEntidade = $request->get('inCodEntidade'); $stExercicio = $request->get('stExercicio'); $obTLicitacaoTipoContrato = new TLicitacaoTipoContrato(); -$obTLicitacaoTipoContrato->recuperaTodos( $rsTipoContrato, ' WHERE cod_tipo IN (43,38,19,46,20,35,27,23,42,10,12,14,6,1,39,28,16,4,18,26,30,24,45,8,34,31,32,33,3,22) ', ' ORDER BY descricao ' ); +$obTLicitacaoTipoContrato->recuperaTodos( $rsTipoContrato, ' WHERE ativo IS TRUE ', ' ORDER BY descricao ' ); if ($inNumContrato) { $obTContrato = new TLicitacaoContrato(); @@ -288,6 +288,7 @@ $obCmbTipoObjeto->setCampoDesc( 'descricao' ); $obCmbTipoObjeto->addOption ( '','Selecione' ); $obCmbTipoObjeto->preencheCombo( $rsTipoObjeto ); $obCmbTipoObjeto->setValue ( $inCodTipoObjeto ); +$obCmbTipoObjeto->setNull ( false ); $obTxtNumeroContrato = new TextBox; $obTxtNumeroContrato->setName ( "inNumeroContrato" ); diff --git a/gestaoPatrimonial/fontes/PHP/licitacao/instancias/contrato/FMManterRescindirContrato.php b/gestaoPatrimonial/fontes/PHP/licitacao/instancias/contrato/FMManterRescindirContrato.php index caf7035..fbfdb9e 100644 --- a/gestaoPatrimonial/fontes/PHP/licitacao/instancias/contrato/FMManterRescindirContrato.php +++ b/gestaoPatrimonial/fontes/PHP/licitacao/instancias/contrato/FMManterRescindirContrato.php @@ -119,6 +119,7 @@ if ($inNumContrato) { $obTLicitacaoRescisaoContrato = new TLicitacaoRescisaoContrato; $obTLicitacaoRescisaoContrato->setDado('num_contrato', $_REQUEST["inNumContrato"]); $obTLicitacaoRescisaoContrato->setDado('licitacao', true); +$obTLicitacaoRescisaoContrato->setDado('exercicio', $stExercicio); $obTLicitacaoRescisaoContrato->recuperaContratoRescisao($rsRescisaoContrato); $obLblExercicioContrato = new Label; diff --git a/gestaoPatrimonial/fontes/PHP/licitacao/instancias/contrato/FMManterTipoContrato.php b/gestaoPatrimonial/fontes/PHP/licitacao/instancias/contrato/FMManterTipoContrato.php new file mode 100644 index 0000000..ad8cf52 --- /dev/null +++ b/gestaoPatrimonial/fontes/PHP/licitacao/instancias/contrato/FMManterTipoContrato.php @@ -0,0 +1,165 @@ + +get('stAcao'); + +$obForm = new Form; +$obForm->setAction ( $pgProc ); +$obForm->setTarget ( "oculto" ); + +$obHdnAcao = new Hidden; +$obHdnAcao->setName( "stAcao" ); +$obHdnAcao->setValue( $stAcao ); + +$obHdnCtrl = new Hidden; +$obHdnCtrl->setName( "stCtrl" ); +$obHdnCtrl->setValue( "" ); + +$rsTipoContrato = new RecordSet(); +if ($stAcao == "alterar") { + $inCodigo = $request->get("inCodigo"); + $obTLicitacaoTipoContrato = new TLicitacaoTipoContrato(); + $obTLicitacaoTipoContrato->recuperaTodos( $rsTipoContrato, " WHERE cod_tipo = ".$inCodigo ); +} + +$obTxtCodigo = new TextBox; +$obTxtCodigo->setName ( "inCodigo" ); +$obTxtCodigo->setId ( "inCodigo" ); +$obTxtCodigo->setRotulo ( "Código" ); +$obTxtCodigo->setTitle ( "Informe o Código do Tipo de Contrato." ); +$obTxtCodigo->setSize ( 3 ); +$obTxtCodigo->setInteiro ( true ); +$obTxtCodigo->setMaxLength ( 3 ); +$obTxtCodigo->setNull ( false ); +if ($stAcao == "alterar") { + $obTxtCodigo->setLabel ( true ); + $obTxtCodigo->setValue ( $rsTipoContrato->getCampo('cod_tipo') ); +} + +$obTxtSigla = new TextBox; +$obTxtSigla->setName ( "stSigla" ); +$obTxtSigla->setId ( "stSigla" ); +$obTxtSigla->setRotulo ( "Sigla" ); +$obTxtSigla->setTitle ( "Informe a Sigla do tipo de Contrato." ); +$obTxtSigla->setSize ( 8 ); +$obTxtSigla->setMaxLength ( 8 ); +$obTxtSigla->setNull ( false ); +if ($stAcao == "alterar") { + $obTxtSigla->setValue ( $rsTipoContrato->getCampo('sigla') ); +} + +$obTxtDescricao = new TextBox; +$obTxtDescricao->setName ( "stDescricao" ); +$obTxtDescricao->setId ( "stDescricao" ); +$obTxtDescricao->setRotulo ( "Descrição" ); +$obTxtDescricao->setTitle ( "Informe a Descrição do Tipo de Contrato." ); +$obTxtDescricao->setSize ( 80 ); +$obTxtDescricao->setMaxLength ( 80 ); +$obTxtDescricao->setNull ( false ); +if ($stAcao == "alterar") { + $obTxtDescricao->setValue ( $rsTipoContrato->getCampo('descricao') ); +} +$obTxtCodigoTribunal = new TextBox; +$obTxtCodigoTribunal->setName ( "inCodigoTribunal" ); +$obTxtCodigoTribunal->setId ( "inCodigoTribunal" ); +$obTxtCodigoTribunal->setRotulo ( "Código Tribunal" ); +$obTxtCodigoTribunal->setTitle ( "Informe o Código do Tipo de Contrato Conforme Orientação do Tribunal de Contas." ); +$obTxtCodigoTribunal->setSize ( 3 ); +$obTxtCodigoTribunal->setInteiro ( true ); +$obTxtCodigoTribunal->setMaxLength ( 3 ); +$obTxtCodigoTribunal->setNull ( true ); +if ($stAcao == "alterar") { + $obTxtCodigoTribunal->setValue ( $rsTipoContrato->getCampo('tipo_tc') ); +} + +//Radios de Quebrar Página por Conta +$obRdAtivoS = new Radio; +$obRdAtivoS->setRotulo ( "Ativo" ); +$obRdAtivoS->setName ( "boAtivo" ); +$obRdAtivoS->setValue ( "true" ); +$obRdAtivoS->setLabel ( "Sim" ); +$obRdAtivoS->setNull ( false ); + +if (($stAcao == "alterar" && $rsTipoContrato->getCampo('ativo') == 't') || ($rsTipoContrato->getCampo('ativo') == NULL) || ($stAcao == "incluir")) { + $obRdAtivoS->setChecked ( true ); +} + +$obRdAtivoN = new Radio; +$obRdAtivoN->setName ( "boAtivo" ); +$obRdAtivoN->setValue ( "false" ); +$obRdAtivoN->setLabel ( "Não" ); +$obRdAtivoN->setNull ( false ); +if ($stAcao == "alterar" && $rsTipoContrato->getCampo('ativo') == 'f') { + $obRdAtivoN->setChecked ( true ); +} + +//define o formulário +$obFormulario = new Formulario; +$obFormulario->addForm ( $obForm ); +$obFormulario->setAjuda ( "UC-03.05.22" ); +$obFormulario->addHidden ( $obHdnCtrl ); +$obFormulario->addHidden ( $obHdnAcao ); +$obFormulario->addTitulo ( "Dados para Configuração" ); +$obFormulario->addComponente ( $obTxtCodigo ); +$obFormulario->addComponente ( $obTxtSigla ); +$obFormulario->addComponente ( $obTxtDescricao ); +$obFormulario->addComponente ( $obTxtCodigoTribunal ); +$obFormulario->agrupaComponentes ( array($obRdAtivoS, $obRdAtivoN) ); + +$obBtnOk = new Ok; + +$obBtnLimpar = new Button; +$obBtnLimpar->setName( "Limpar" ); +$obBtnLimpar->setValue( "Limpar" ); +$obBtnLimpar->setTipo( "Reset" ); +$obBtnLimpar->obEvento->setOnClick( "executaFuncaoAjax('limparTela')" ); + +$obFormulario->defineBarra( array ( $obBtnOk , $obBtnLimpar ),"","" ); + +$obFormulario->show(); + +?> diff --git a/gestaoPatrimonial/fontes/PHP/licitacao/instancias/contrato/LSManterContrato.php b/gestaoPatrimonial/fontes/PHP/licitacao/instancias/contrato/LSManterContrato.php index be8cd64..7021000 100644 --- a/gestaoPatrimonial/fontes/PHP/licitacao/instancias/contrato/LSManterContrato.php +++ b/gestaoPatrimonial/fontes/PHP/licitacao/instancias/contrato/LSManterContrato.php @@ -32,7 +32,7 @@ * @ignore -* $Id: LSManterContrato.php 63565 2015-09-11 11:25:25Z carlos.silva $ +* $Id: LSManterContrato.php 63995 2015-11-16 18:35:10Z jean $ * Casos de uso: uc-03.05.22 */ @@ -59,6 +59,7 @@ if ( empty( $stAcao ) ) { } switch ($stAcao) { + case 'consultar': $pgProx = 'FMConsultarContrato.php'; break; case 'alterar': $pgProx = $pgForm; break; case 'anular': $pgProx = $pgAnular; break; case 'rescindir': $pgProx = 'FMManterRescindirContrato.php'; break; @@ -79,7 +80,11 @@ if ($_REQUEST['inCodLicitacao'] || $_REQUEST['stDataInicial'] || $_REQUEST['inCo } Sessao::write('paginando', true); } + Sessao::write('filtro', $filtro); +Sessao::write('pos', $request->get('pos')); +Sessao::write('pg', $request->get('pg')); +Sessao::write('paginando', $request->get('paginando')); $obTLicitacaoContrato = new TLicitacaoContrato; $rsLista = new RecordSet; @@ -98,7 +103,7 @@ if ($_REQUEST['stMapaCompras']) { $stFiltro .= " licitacao.exercicio_mapa = ".$exercicio." \nand "; } if ($_REQUEST['inNumContrato']) { - $stFiltro .= " contrato.num_contrato = ". $_REQUEST['inNumContrato']." \nand "; + $stFiltro .= " contrato.numero_contrato = ". $_REQUEST['inNumContrato']." \nand "; } if ($_REQUEST['stDataInicial']) { $stFiltro .= " contrato.dt_assinatura between to_date('". $_REQUEST['stDataInicial']."','dd/mm/yyyy') and to_date('". $_REQUEST['stDataFinal']."', 'dd/mm/yyyy') \nand "; @@ -185,4 +190,3 @@ $obLista->ultimaAcao->setLink( $stCaminho.$pgProx."?".Sessao::getId().$stLink ); $obLista->commitAcao(); $obLista->show(); -?> diff --git a/gestaoPatrimonial/fontes/PHP/licitacao/instancias/contrato/LSManterTipoContrato.php b/gestaoPatrimonial/fontes/PHP/licitacao/instancias/contrato/LSManterTipoContrato.php new file mode 100644 index 0000000..06adc82 --- /dev/null +++ b/gestaoPatrimonial/fontes/PHP/licitacao/instancias/contrato/LSManterTipoContrato.php @@ -0,0 +1,158 @@ + +get('stAcao', 'excluir'); + +switch ($stAcao) { + case 'alterar': $pgProx = $pgForm; break; + case 'excluir': $pgProx = $pgProc; break; +} + +$stLink = "&stAcao=".$stAcao; + +$filtro = Sessao::read('filtro'); + +Sessao::write('filtro', $filtro); +Sessao::write('pos', $request->get('pos')); +Sessao::write('pg', $request->get('pg')); +Sessao::write('paginando', $request->get('paginando')); + +$stFiltro = " "; + +$obTLicitacaoTipoContrato = new TLicitacaoTipoContrato(); +if ($request->get("inCodigo") != "") { + $stFiltro .= "tipo_contrato.cod_tipo = ".$request->get("inCodigo")." AND \n"; +} + +if ($request->get("stSigla") != "") { + $stFiltro .= "tipo_contrato.sigla = '".$request->get("stSigla")."' AND \n"; +} + +if ($request->get("stDescricao") != "") { + $stFiltro .= "tipo_contrato.descricao = '".$request->get("stDescricao")."' AND \n"; +} + +if ($request->get("inCodigoTribunal") != "") { + $stFiltro .= "tipo_contrato.tipo_tc = ".$request->get("inCodigoTribunal")." AND \n"; +} + +if ($stFiltro != " ") { + $stFiltro = "\nWHERE ".substr($stFiltro, 1, -5); +} + +$stOrdem = " ORDER BY cod_tipo"; + +$obTLicitacaoTipoContrato->recuperaTodos ($rsLista, $stFiltro, $stOrdem); + +$obLista = new Lista; +$obLista->obPaginacao->setFiltro("&stLink=".$stLink ); + +$obLista->setRecordSet( $rsLista ); +$obLista->setTitulo("Tipos de Contrato cadastrados"); + +$obLista->addCabecalho(); +$obLista->ultimoCabecalho->addConteudo(" "); +$obLista->ultimoCabecalho->setWidth( 2 ); +$obLista->commitCabecalho(); + +$obLista->addCabecalho(); +$obLista->ultimoCabecalho->addConteudo( "Código" ); +$obLista->ultimoCabecalho->setWidth( 5 ); +$obLista->commitCabecalho(); + +$obLista->addCabecalho(); +$obLista->ultimoCabecalho->addConteudo( "Código do Tribunal" ); +$obLista->ultimoCabecalho->setWidth( 5 ); +$obLista->commitCabecalho(); + +$obLista->addCabecalho(); +$obLista->ultimoCabecalho->addConteudo( "Sigla" ); +$obLista->ultimoCabecalho->setWidth( 10 ); +$obLista->commitCabecalho(); + +$obLista->addCabecalho(); +$obLista->ultimoCabecalho->addConteudo( "Descricao" ); +$obLista->ultimoCabecalho->setWidth( 80 ); +$obLista->commitCabecalho(); + +$obLista->addCabecalho(); +$obLista->ultimoCabecalho->addConteudo(" "); +$obLista->ultimoCabecalho->setWidth( 2 ); +$obLista->commitCabecalho(); + +$obLista->addDado(); +$obLista->ultimoDado->setAlinhamento("CENTRO"); +$obLista->ultimoDado->setCampo( "cod_tipo" ); +$obLista->commitDado(); + +$obLista->addDado(); +$obLista->ultimoDado->setAlinhamento("CENTRO"); +$obLista->ultimoDado->setCampo( "tipo_tc" ); +$obLista->commitDado(); + +$obLista->addDado(); +$obLista->ultimoDado->setAlinhamento("CENTRO"); +$obLista->ultimoDado->setCampo( "sigla" ); +$obLista->commitDado(); + +$obLista->addDado(); +$obLista->ultimoDado->setAlinhamento("ESQUERDA"); +$obLista->ultimoDado->setCampo( "descricao" ); +$obLista->commitDado(); + +$obLista->addAcao(); + +$obLista->ultimaAcao->setAcao ( $stAcao ); +$obLista->ultimaAcao->addCampo( "&inCodigo", "cod_tipo" ); +$obLista->ultimaAcao->addCampo( "inCodigoTribunal", "tipo_tc" ); +$obLista->ultimaAcao->setLink( $stCaminho.$pgProx."?".Sessao::getId().$stLink ); + +$obLista->commitAcao(); + +$obLista->show(); diff --git a/gestaoPatrimonial/fontes/PHP/licitacao/instancias/contrato/OCManterContrato.php b/gestaoPatrimonial/fontes/PHP/licitacao/instancias/contrato/OCManterContrato.php index c3a6f77..ee79f10 100644 --- a/gestaoPatrimonial/fontes/PHP/licitacao/instancias/contrato/OCManterContrato.php +++ b/gestaoPatrimonial/fontes/PHP/licitacao/instancias/contrato/OCManterContrato.php @@ -29,7 +29,7 @@ * @author Desenvolvedor: Leandro André Zis - * $Id: OCManterContrato.php 63675 2015-09-28 21:31:00Z jean $ + * $Id: OCManterContrato.php 64112 2015-12-03 16:56:16Z michel $ * Casos de uso : uc-03.05.22 */ @@ -39,11 +39,11 @@ include_once '../../../../../../gestaoAdministrativa/fontes/PHP/pacotes/Framewor //include padrão do framework include_once '../../../../../../gestaoAdministrativa/fontes/PHP/framework/include/valida.inc.php'; //include padrão do framework -include_once(CAM_GP_LIC_MAPEAMENTO."TLicitacaoContrato.class.php" ); -include_once(CAM_GP_LIC_MAPEAMENTO."TLicitacaoContratoArquivo.class.php" ); -include_once(CAM_GP_LIC_MAPEAMENTO."TLicitacaoDocumentosAtributos.class.php" ); -include_once( CAM_FW_HTML."MontaAtributos.class.php" ); -include_once( CAM_GA_ADM_NEGOCIO."RCadastroDinamico.class.php" ); +include_once CAM_GP_LIC_MAPEAMENTO."TLicitacaoContrato.class.php"; +include_once CAM_GP_LIC_MAPEAMENTO."TLicitacaoContratoArquivo.class.php"; +include_once CAM_GP_LIC_MAPEAMENTO."TLicitacaoDocumentosAtributos.class.php"; +include_once CAM_FW_HTML."MontaAtributos.class.php"; +include_once CAM_GA_ADM_NEGOCIO."RCadastroDinamico.class.php"; require_once '../../../../../../gestaoAdministrativa/fontes/PHP/framework/componentes/Table/TableTree.class.php'; $stPrograma = "ManterContrato"; @@ -164,8 +164,8 @@ switch ($_REQUEST['stCtrl']) { break; case 'carregaValorDocumentosContrato': - preencheValorContrato(); - buscaDocumentoAssinado(); + preencheValorContrato($request); + buscaDocumentoAssinado($request); break; case "sincronizaDataValida": @@ -203,24 +203,24 @@ switch ($_REQUEST['stCtrl']) { $obTLicitacacaoLicitacao->recuperaLicitacaoFornecedores( $rsFornecedores, $stFiltro ); if ( $rsFornecedores->getNumLinhas() == 1 ) { - $obTLicitacacaoContrato = new TLicitacaoContrato; - $obTLicitacacaoContrato->setDado('cod_licitacao', $_REQUEST['inCodLicitacao']); - $obTLicitacacaoContrato->setDado('cod_modalidade', $_REQUEST['inCodModalidade']); - $obTLicitacacaoContrato->setDado('cgm_fornecedor', $rsFornecedores->getCampo('cgm_fornecedor')); - $obTLicitacacaoContrato->setDado('exercicio', Sessao::getExercicio()); - $obTLicitacacaoContrato->setDado('cod_entidade', $_REQUEST['inCodEntidade']); - $obTLicitacacaoContrato->recuperaValorContrato($rsValorContrato); - - $vlContrato = $rsValorContrato->getCampo('valor_contrato'); - $vlContrato = number_format($vlContrato, 2, ',', '.'); - $stJs.= " d.getElementById('vlContrato').value = '".$vlContrato."';"; - $stJs.= " d.getElementById('hdnValorContrato').value = '".$vlContrato."';"; - $selected = 'selected'; - } + $obTLicitacacaoContrato = new TLicitacaoContrato; + $obTLicitacacaoContrato->setDado('cod_licitacao', $_REQUEST['inCodLicitacao']); + $obTLicitacacaoContrato->setDado('cod_modalidade', $_REQUEST['inCodModalidade']); + $obTLicitacacaoContrato->setDado('cgm_fornecedor', $rsFornecedores->getCampo('cgm_fornecedor')); + $obTLicitacacaoContrato->setDado('exercicio', Sessao::getExercicio()); + $obTLicitacacaoContrato->setDado('cod_entidade', $_REQUEST['inCodEntidade']); + $obTLicitacacaoContrato->recuperaValorContrato($rsValorContrato); + + $vlContrato = $rsValorContrato->getCampo('valor_contrato'); + $vlContrato = number_format($vlContrato, 2, ',', '.'); + $stJs.= " d.getElementById('vlContrato').value = '".$vlContrato."';"; + $stJs.= " d.getElementById('hdnValorContrato').value = '".$vlContrato."';"; + $selected = 'selected'; + } $selected = isset($selected) ? $selected : ""; while ( !$rsFornecedores->eof() ) { - $stJs .= "f.inCGMContratado[".$rsFornecedores->getCorrente()."] = new Option('".$rsFornecedores->getCampo('nom_cgm')."','".$rsFornecedores->getCampo('cgm_fornecedor')."','".$selected."');\n"; - $rsFornecedores->proximo(); + $stJs .= "f.inCGMContratado[".$rsFornecedores->getCorrente()."] = new Option('".addslashes($rsFornecedores->getCampo('nom_cgm'))."','".$rsFornecedores->getCampo('cgm_fornecedor')."','".$selected."');\n"; + $rsFornecedores->proximo(); } } else { $stJs = "d.getElementById('stDescObjeto').innerHTML = ' ';\n"; @@ -237,7 +237,7 @@ switch ($_REQUEST['stCtrl']) { //Carrega itens vazios na listagem de documentos de publicacao utilizados no carregamento do Form. case 'carregaListaDocumentos' : $arDocumentos = Sessao::read('arDocumentos'); - echo montaListaDocumentos($arDocumentos); + echo montaListaDocumentos($arDocumentos, true, $request->get('consultar')); break; //Inclui itens na listagem de documentos de publicacao utilizados @@ -275,7 +275,7 @@ switch ($_REQUEST['stCtrl']) { echo 'limpaFormularioDocumentos();'; echo 'document.getElementById("inNumDiasValido").value = "";'; Sessao::write('arDocumentos', $arDocumentos); - echo montaListaDocumentos( $arDocumentos); + echo montaListaDocumentos($arDocumentos, true, $request->get('consultar')); break; //Carrega itens da listagem de documentos de publicacao utilizados em seus determinados campos no Form. @@ -341,7 +341,7 @@ switch ($_REQUEST['stCtrl']) { Sessao::write('arDocumentos', $arDocumentos); echo 'limpaFormularioDocumentos();'; echo 'document.getElementById("inNumDiasValido").value = "";'; - $js.= montaListaDocumentos($arDocumentos); + $js.= montaListaDocumentos($arDocumentos, true, $request->get('consultar')); $js.= "f.btIncluirDocumentos.disabled = false;"; $js.= "f.btAlterarDocumentos.disabled = true;"; $js.= "f.stDataValidade.disabled = 'disabled';"; @@ -371,7 +371,7 @@ switch ($_REQUEST['stCtrl']) { } } Sessao::write('arDocumentos', $arTEMP); - echo montaListaDocumentos($arTEMP); + echo montaListaDocumentos($arTEMP, true, $request->get('consultar')); break; //Carrega itens vazios na listagem de aditivos de publicacao utilizados no carregamento do Form. @@ -423,7 +423,7 @@ switch ($_REQUEST['stCtrl']) { case 'limparTela': Sessao::remove('arDocumentos'); - $stJs = montaListaDocumentos( array() ); + $stJs = montaListaDocumentos( array(), true, $request->get('consultar')); $stJs .= "frm.inCodLicitacao.options[0].selected = true; \n"; $stJs .= "frm.inCGMContratado.options[0].selected = true; \n"; @@ -433,7 +433,7 @@ switch ($_REQUEST['stCtrl']) { //Carrega itens vazios na listagem de veiculos de publicacao utilizados no carregamento do Form. case 'carregaListaVeiculos' : $arValores = Sessao::read('arValores'); - echo montaListaVeiculos($arValores); + echo montaListaVeiculos($arValores, true, $request->get('consultar')); break; //Inclui itens na listagem de Aditivos de publicacao utilizados @@ -494,7 +494,7 @@ switch ($_REQUEST['stCtrl']) { Sessao::write('arValores', $arValores); - echo montaListaVeiculos( $arValores); + echo montaListaVeiculos( $arValores, true, $request->get('consultar')); $js.="$('HdnCodVeiculo').value ='';"; $js.="$('inVeiculo').value ='';"; $js.="$('dtDataPublicacao').value ='".date('d/m/Y')."';"; @@ -556,7 +556,7 @@ switch ($_REQUEST['stCtrl']) { $inCount++; } Sessao::write('arValores', $arValores); - $js.=montaListaVeiculos($arValores); + $js.=montaListaVeiculos($arValores, true, $request->get('consultar')); $js.="$('HdnCodVeiculo').value ='';"; $js.="$('inVeiculo').value ='';"; $js.="$('dtDataPublicacao').value ='".date('d/m/Y')."';"; @@ -592,7 +592,7 @@ switch ($_REQUEST['stCtrl']) { } Sessao::write('arValores', $arTEMP); - echo montaListaVeiculos($arTEMP); + echo montaListaVeiculos($arTEMP, true, $request->get('consultar')); break; case 'limparVeiculo' : @@ -662,11 +662,11 @@ switch ($_REQUEST['stCtrl']) { //Carrega itens vazios na listagem de veiculos de publicacao utilizados no carregamento do Form. case 'carregaListaArquivos' : $arArquivos = Sessao::read('arArquivos'); - echo montaListaArquivos($arArquivos); + echo montaListaArquivos($arArquivos, true, $request->get('consultar')); break; case 'consultarListaArquivo' : - consultarListaArquivo(); + consultarListaArquivo($request); break; case "addArquivo": @@ -711,7 +711,7 @@ switch ($_REQUEST['stCtrl']) { } Sessao::write('arArquivos', $arTEMP); - echo montaListaArquivos($arTEMP); + echo montaListaArquivos($arTEMP, true, $request->get('consultar')); break; } @@ -793,103 +793,107 @@ function sincronizaDiasValidosDocumento($inDataValidade, $inDataEmissao) echo $stJs; } -function montaListaDocumentos($arRecordSet , $boExecuta = true) +function montaListaDocumentos($arRecordSet , $boExecuta = true, $stConsultar = null) { if (is_array($arRecordSet) ) { $rsDocumentos = new RecordSet; $rsDocumentos->preenche( $arRecordSet ); - $obLista = new Lista; - - $obLista->setTitulo('Documentos Exigidos'); - $obLista->setMostraPaginacao( false ); - $obLista->setRecordSet( $rsDocumentos ); - - $obLista->addCabecalho(); - $obLista->ultimoCabecalho->addConteudo(" "); - $obLista->ultimoCabecalho->setWidth( 5 ); - $obLista->commitCabecalho(); - - $obLista->addCabecalho(); - $obLista->ultimoCabecalho->addConteudo("Documento"); - $obLista->ultimoCabecalho->setWidth( 35 ); - $obLista->commitCabecalho(); - - $obLista->addCabecalho(); - $obLista->ultimoCabecalho->addConteudo("Número"); - $obLista->ultimoCabecalho->setWidth( 15 ); - $obLista->commitCabecalho(); - - $obLista->addCabecalho(); - $obLista->ultimoCabecalho->addConteudo("Validade"); - $obLista->ultimoCabecalho->setWidth( 25 ); - $obLista->commitCabecalho(); - - $obLista->addCabecalho(); - $obLista->ultimoCabecalho->addConteudo("Ação"); - $obLista->ultimoCabecalho->setWidth( 5 ); - $obLista->commitCabecalho(); - - $obLista->addDado(); - $obLista->ultimoDado->setCampo( "stNomDocumento" ); - $obLista->ultimoDado->setAlinhamento( 'ESQUERDA' ); - $obLista->commitDado(); - - $obLista->addDado(); - $obLista->ultimoDado->setCampo( "stNumDocumento" ); - $obLista->ultimoDado->setAlinhamento( 'DIREITA' ); - $obLista->commitDado(); - - $obLista->addDado(); - $obLista->ultimoDado->setCampo( "dtValidade" ); - $obLista->ultimoDado->setAlinhamento( 'CENTRO' ); - $obLista->commitDado(); - - $obLista->addAcao(); - $obLista->ultimaAcao->setAcao( "ALTERAR" ); - $obLista->ultimaAcao->setFuncao( true ); - $obLista->ultimaAcao->setLink( "JavaScript:alteraDocumentos();" ); - $obLista->ultimaAcao->addCampo("1","id"); - $obLista->commitAcao(); - - $obLista->addAcao(); - $obLista->ultimaAcao->setAcao( "EXCLUIR" ); - $obLista->ultimaAcao->setFuncao( true ); - $obLista->ultimaAcao->setLink( "JavaScript:excluirDocumentos();" ); - $obLista->ultimaAcao->addCampo("1","id"); - $obLista->commitAcao(); + $obLista = new Lista; + + $obLista->setTitulo('Documentos Exigidos'); + $obLista->setMostraPaginacao( false ); + $obLista->setRecordSet( $rsDocumentos ); + + $obLista->addCabecalho(); + $obLista->ultimoCabecalho->addConteudo(" "); + $obLista->ultimoCabecalho->setWidth( 5 ); + $obLista->commitCabecalho(); + + $obLista->addCabecalho(); + $obLista->ultimoCabecalho->addConteudo("Documento"); + $obLista->ultimoCabecalho->setWidth( 35 ); + $obLista->commitCabecalho(); + + $obLista->addCabecalho(); + $obLista->ultimoCabecalho->addConteudo("Número"); + $obLista->ultimoCabecalho->setWidth( 15 ); + $obLista->commitCabecalho(); + + $obLista->addCabecalho(); + $obLista->ultimoCabecalho->addConteudo("Validade"); + $obLista->ultimoCabecalho->setWidth( 25 ); + $obLista->commitCabecalho(); + + if(!$stConsultar) { + $obLista->addCabecalho(); + $obLista->ultimoCabecalho->addConteudo("Ação"); + $obLista->ultimoCabecalho->setWidth( 5 ); + $obLista->commitCabecalho(); + } - $obLista->montaHTML(); - $stHTML = $obLista->getHTML(); - $stHTML = str_replace( "\n" ,"" ,$stHTML ); - $stHTML = str_replace( " " ,"" ,$stHTML ); - $stHTML = str_replace( "'","\\'",$stHTML ); + $obLista->addDado(); + $obLista->ultimoDado->setCampo( "stNomDocumento" ); + $obLista->ultimoDado->setAlinhamento( 'ESQUERDA' ); + $obLista->commitDado(); + + $obLista->addDado(); + $obLista->ultimoDado->setCampo( "stNumDocumento" ); + $obLista->ultimoDado->setAlinhamento( 'DIREITA' ); + $obLista->commitDado(); + + $obLista->addDado(); + $obLista->ultimoDado->setCampo( "dtValidade" ); + $obLista->ultimoDado->setAlinhamento( 'CENTRO' ); + $obLista->commitDado(); + + if(!$stConsultar) { + $obLista->addAcao(); + $obLista->ultimaAcao->setAcao( "ALTERAR" ); + $obLista->ultimaAcao->setFuncao( true ); + $obLista->ultimaAcao->setLink( "JavaScript:alteraDocumentos();" ); + $obLista->ultimaAcao->addCampo("1","id"); + $obLista->commitAcao(); + + $obLista->addAcao(); + $obLista->ultimaAcao->setAcao( "EXCLUIR" ); + $obLista->ultimaAcao->setFuncao( true ); + $obLista->ultimaAcao->setLink( "JavaScript:excluirDocumentos();" ); + $obLista->ultimaAcao->addCampo("1","id"); + $obLista->commitAcao(); + } - if ($boExecuta) { - return "d.getElementById('spnListaDocumentos').innerHTML = '".$stHTML."';"; - } else { - return $stHTML; - } + $obLista->montaHTML(); + $stHTML = $obLista->getHTML(); + $stHTML = str_replace( "\n" ,"" ,$stHTML ); + $stHTML = str_replace( " " ,"" ,$stHTML ); + $stHTML = str_replace( "'","\\'",$stHTML ); + if ($boExecuta) { + return "d.getElementById('spnListaDocumentos').innerHTML = '".$stHTML."';"; + } else { + return $stHTML; + } } else { - return "d.getElementById('spnListaDocumentos').innerHTML = ' ';"; + return "d.getElementById('spnListaDocumentos').innerHTML = ' ';"; } } -function buscaDocumentoAssinado() +function buscaDocumentoAssinado(Request $request) { $stNumDoc = ''; $stDtValidade = ''; $stDtEmissao = ''; $inCount = 0; - if ( trim($_REQUEST['inCGMFornecedor']) !="") { - include_once ( CAM_GP_LIC_MAPEAMENTO."TLicitacaoLicitacaoDocumentos.class.php"); + $inCGMFornecedor = $request->get('inCodLicitacao', ''); + if ( trim($inCGMFornecedor) !="" ) { + include_once CAM_GP_LIC_MAPEAMENTO."TLicitacaoLicitacaoDocumentos.class.php"; $obTLicitacaoDocumentos = new TLicitacaoLicitacaoDocumentos; - $obTLicitacaoDocumentos->setDado('cod_licitacao', $_REQUEST["inCodLicitacao"]); - $obTLicitacaoDocumentos->setDado('cod_entidade', $_REQUEST["inCodEntidade"]); - $obTLicitacaoDocumentos->setDado('exercicio', $_REQUEST["exercicio"]); - $obTLicitacaoDocumentos->setDado('cod_modalidade', $_REQUEST["inCodModalidade"]); + $obTLicitacaoDocumentos->setDado('cod_licitacao' , $request->get('inCodLicitacao')); + $obTLicitacaoDocumentos->setDado('cod_entidade' , $request->get('inCodEntidade')); + $obTLicitacaoDocumentos->setDado('exercicio' , $request->get('exercicio')); + $obTLicitacaoDocumentos->setDado('cod_modalidade' , $request->get('inCodModalidade')); - $stFiltro = " AND cgm_fornecedor=".$_REQUEST['inCGMFornecedor']."\n"; + $stFiltro = " AND cgm_fornecedor=".$inCGMFornecedor."\n"; $obTLicitacaoDocumentos->recuperaDocumentosLicitacaoFornecedor( $rsDocumentos, $stFiltro, "order by ld.cod_documento desc" ); } @@ -898,43 +902,43 @@ function buscaDocumentoAssinado() $arDocumentos = Sessao::read('arDocumentos'); if (is_array($arRsDocumentos) ) { - foreach ($arRsDocumentos as $chave => $dados) { - if (isset($arDocumentos[$chave]['inCodDocumento']) && ($dados['cod_documento'] != $arDocumentos[$chave]['inCodDocumento'])) { - $stNomDocumento = $dados['nom_documento']; - $inCodDocumento = $dados['cod_documento']; - $stDtEmissao = $dados['dt_emissao']; - $stDtValidade = $dados['dt_validade']; - $inNumDocumento = $dados['num_documento']; - - $inCount = sizeof($arDocumentos); - $arDocumentos[$inCount]['id' ] = $inCount + 1; - $arDocumentos[$inCount]['boNovo' ] = true; - $arDocumentos[$inCount]['inCodDocumento' ] = $inCodDocumento; - $arDocumentos[$inCount]['stNumDocumento' ] = $inNumDocumento; - $arDocumentos[$inCount]['stNomDocumento' ] = $stNomDocumento; - $arDocumentos[$inCount]['dtValidade' ] = $stDtValidade; - $arDocumentos[$inCount]['dtEmissao' ] = $stDtEmissao; - $inCount++; + foreach ($arRsDocumentos as $chave => $dados) { + if (isset($arDocumentos[$chave]['inCodDocumento']) && ($dados['cod_documento'] != $arDocumentos[$chave]['inCodDocumento'])) { + $stNomDocumento = $dados['nom_documento']; + $inCodDocumento = $dados['cod_documento']; + $stDtEmissao = $dados['dt_emissao']; + $stDtValidade = $dados['dt_validade']; + $inNumDocumento = $dados['num_documento']; + + $inCount = sizeof($arDocumentos); + $arDocumentos[$inCount]['id' ] = $inCount + 1; + $arDocumentos[$inCount]['boNovo' ] = true; + $arDocumentos[$inCount]['inCodDocumento' ] = $inCodDocumento; + $arDocumentos[$inCount]['stNumDocumento' ] = $inNumDocumento; + $arDocumentos[$inCount]['stNomDocumento' ] = $stNomDocumento; + $arDocumentos[$inCount]['dtValidade' ] = $stDtValidade; + $arDocumentos[$inCount]['dtEmissao' ] = $stDtEmissao; + $inCount++; + } } - } } Sessao::write('arDocumentos', $arDocumentos); $arrayDocumentos = $arDocumentos; echo 'limpaFormularioDocumentos();'; - echo montaListaDocumentos( $arrayDocumentos); + echo montaListaDocumentos($arrayDocumentos, true, $request->get('consultar')); } -function preencheValorContrato() +function preencheValorContrato(Request $request) { - $stJs = buscaDocumentoFornecedor ( $_REQUEST['inCGMFornecedor'] , $_REQUEST['inCodDocumento'] ); - if ($_REQUEST['inCodLicitacao'] && $_REQUEST['inCGMFornecedor']) { + $stJs = buscaDocumentoFornecedor ( $request->get('inCGMFornecedor') , $request->get('inCodDocumento') ); + if ($request->get('inCodLicitacao') && $request->get('inCGMFornecedor')) { $obTLicitacacaoContrato = new TLicitacaoContrato; - $obTLicitacacaoContrato->setDado('cod_licitacao', $_REQUEST['inCodLicitacao']); - $obTLicitacacaoContrato->setDado('cod_modalidade', $_REQUEST['inCodModalidade']); - $obTLicitacacaoContrato->setDado('cgm_fornecedor', $_REQUEST['inCGMFornecedor']); - $obTLicitacacaoContrato->setDado('exercicio', $_REQUEST['exercicio']); - $obTLicitacacaoContrato->setDado('cod_entidade', $_REQUEST['inCodEntidade']); + $obTLicitacacaoContrato->setDado('cod_licitacao' , $request->get('inCodLicitacao')); + $obTLicitacacaoContrato->setDado('cod_modalidade' , $request->get('inCodModalidade')); + $obTLicitacacaoContrato->setDado('cgm_fornecedor' , $request->get('inCGMFornecedor')); + $obTLicitacacaoContrato->setDado('exercicio' , $request->get('exercicio')); + $obTLicitacacaoContrato->setDado('cod_entidade' , $request->get('inCodEntidade')); $obTLicitacacaoContrato->recuperaValorContrato($rsValorContrato); $vlContrato = $rsValorContrato->getCampo('valor_contrato'); @@ -997,7 +1001,7 @@ function montaListaAditivos($arRecordSet , $boExecuta = true) $obLista->ultimaAcao->setLink( "JavaScript:excluirAditivos();" ); $obLista->ultimaAcao->addCampo("1","id"); $obLista->commitAcao(); - + $obLista->montaHTML(); $stHTML = $obLista->getHTML(); $stHTML = str_replace( "\n" ,"" ,$stHTML ); @@ -1011,7 +1015,7 @@ function montaListaAditivos($arRecordSet , $boExecuta = true) } } -function montaListaVeiculos($arRecordSet , $boExecuta = true) +function montaListaVeiculos($arRecordSet , $boExecuta = true, $stConsultar=null) { if (is_array($arRecordSet)) { $rsRecordSet = new RecordSet; @@ -1028,12 +1032,14 @@ function montaListaVeiculos($arRecordSet , $boExecuta = true) $table->Body->addCampo( '[inVeiculo]-[stVeiculo] ' , 'E'); $table->Body->addCampo( 'dtDataPublicacao', 'C' ); - $table->Body->addCampo( 'inNumPublicacao' ); + $table->Body->addCampo( 'inNumPublicacao' ); $table->Body->addCampo( 'stObservacao' ); - $table->Body->addAcao( 'alterar' , 'JavaScript:executaFuncaoAjax(\'%s\' , \'&id=%s\' )' , array( 'alterarListaVeiculos', 'id' ) ); - $table->Body->addAcao( 'excluir' , 'JavaScript:executaFuncaoAjax(\'%s\' , \'&id=%s\' )' , array( 'excluirListaVeiculos', 'id' ) ); - + if(!$stConsultar) { + $table->Body->addAcao( 'alterar' , 'JavaScript:executaFuncaoAjax(\'%s\' , \'&id=%s\' )' , array( 'alterarListaVeiculos', 'id' ) ); + $table->Body->addAcao( 'excluir' , 'JavaScript:executaFuncaoAjax(\'%s\' , \'&id=%s\' )' , array( 'excluirListaVeiculos', 'id' ) ); + } + $table->montaHTML( true ); if ($boExecuta) { @@ -1044,67 +1050,71 @@ function montaListaVeiculos($arRecordSet , $boExecuta = true) } } -function montaListaArquivos($arRecordSet, $boExecuta = true) +function montaListaArquivos($arRecordSet, $boExecuta = true, $stConsultar = null) { if (is_array($arRecordSet)) { $rsRecordSet = new RecordSet; $rsRecordSet->preenche( $arRecordSet ); - $obLista = new Lista(); - $obLista->setRecordset( $rsRecordSet ); - $obLista->setTitulo('Arquivos Digitais'); - $obLista->setMostraPaginacao( false ); - - $obLista->addCabecalho(); - $obLista->ultimoCabecalho->addConteudo(" "); - $obLista->ultimoCabecalho->setWidth( 5 ); - $obLista->commitCabecalho(); - - $obLista->addCabecalho(); - $obLista->ultimoCabecalho->addConteudo("Arquivo"); - $obLista->ultimoCabecalho->setWidth( 50 ); - $obLista->commitCabecalho(); - - $obLista->addCabecalho(); - $obLista->ultimoCabecalho->addConteudo("Ações"); - $obLista->ultimoCabecalho->setWidth( 5 ); - $obLista->commitCabecalho(); - - $obLista->addDado(); - $obLista->ultimoDado->setCampo( "nom_arquivo" ); - $obLista->ultimoDado->setAlinhamento( 'ESQUERDA' ); - $obLista->commitDado(); - - $obLista->addAcao(); - $obLista->ultimaAcao->setAcao( "CONSULTAR" ); - $obLista->ultimaAcao->setFuncao( true ); - $obLista->ultimaAcao->setLink( "JavaScript:consultarListaArquivo();" ); - $obLista->ultimaAcao->addCampo("1","arquivo"); - $obLista->commitAcao(); - - $obLista->addAcao(); - $obLista->ultimaAcao->setAcao( "EXCLUIR" ); - $obLista->ultimaAcao->setFuncao( true ); - $obLista->ultimaAcao->setLink( "JavaScript:excluirListaArquivo();" ); - $obLista->ultimaAcao->addCampo("1","id"); - $obLista->commitAcao(); - - $obLista->montaHTML(); - $stHTML = $obLista->getHTML(); - $stHTML = str_replace( "\n" ,"" ,$stHTML ); - $stHTML = str_replace( " " ,"" ,$stHTML ); - $stHTML = str_replace( "'","\\'",$stHTML ); - - if ($boExecuta) { - return "d.getElementById('spnListaArquivos').innerHTML = '".$stHTML."';"; - } else { - return $stHTML; - } + $obLista = new Lista(); + $obLista->setRecordset( $rsRecordSet ); + $obLista->setTitulo('Arquivos Digitais'); + $obLista->setMostraPaginacao( false ); + + $obLista->addCabecalho(); + $obLista->ultimoCabecalho->addConteudo(" "); + $obLista->ultimoCabecalho->setWidth( 5 ); + $obLista->commitCabecalho(); + + $obLista->addCabecalho(); + $obLista->ultimoCabecalho->addConteudo("Arquivo"); + $obLista->ultimoCabecalho->setWidth( 50 ); + $obLista->commitCabecalho(); + + if(!$stConsultar) { + $obLista->addCabecalho(); + $obLista->ultimoCabecalho->addConteudo("Ação"); + $obLista->ultimoCabecalho->setWidth( 5 ); + $obLista->commitCabecalho(); + } + + $obLista->addDado(); + $obLista->ultimoDado->setCampo( "nom_arquivo" ); + $obLista->ultimoDado->setAlinhamento( 'ESQUERDA' ); + $obLista->commitDado(); + + if(!$stConsultar) { + $obLista->addAcao(); + $obLista->ultimaAcao->setAcao( "CONSULTAR" ); + $obLista->ultimaAcao->setFuncao( true ); + $obLista->ultimaAcao->setLink( "JavaScript:consultarListaArquivo();" ); + $obLista->ultimaAcao->addCampo("1","arquivo"); + $obLista->commitAcao(); + + $obLista->addAcao(); + $obLista->ultimaAcao->setAcao( "EXCLUIR" ); + $obLista->ultimaAcao->setFuncao( true ); + $obLista->ultimaAcao->setLink( "JavaScript:excluirListaArquivo();" ); + $obLista->ultimaAcao->addCampo("1","id"); + $obLista->commitAcao(); + } + + $obLista->montaHTML(); + $stHTML = $obLista->getHTML(); + $stHTML = str_replace( "\n" ,"" ,$stHTML ); + $stHTML = str_replace( " " ,"" ,$stHTML ); + $stHTML = str_replace( "'","\\'",$stHTML ); + + if ($boExecuta) { + return "d.getElementById('spnListaArquivos').innerHTML = '".$stHTML."';"; + } else { + return $stHTML; + } } } -function consultarListaArquivo() +function consultarListaArquivo(Request $request) { - $pathToSave = CAM_GP_LIC_ANEXOS.'contrato/'.$_REQUEST['arquivo']; + $pathToSave = CAM_GP_LIC_ANEXOS.'contrato/'.$request->get('arquivo'); echo " window.location = '".$pathToSave."'; "; } diff --git a/gestaoPatrimonial/fontes/PHP/licitacao/instancias/contrato/OCManterRescindirContrato.php b/gestaoPatrimonial/fontes/PHP/licitacao/instancias/contrato/OCManterRescindirContrato.php index be6b8cb..56a1cb1 100644 --- a/gestaoPatrimonial/fontes/PHP/licitacao/instancias/contrato/OCManterRescindirContrato.php +++ b/gestaoPatrimonial/fontes/PHP/licitacao/instancias/contrato/OCManterRescindirContrato.php @@ -48,7 +48,7 @@ $pgOcul = "OC".$stPrograma.".php"; $pgJs = "JS".$stPrograma.".js"; -switch ($_REQUEST['stCtrl']) { +switch ( $request->get('stCtrl')) { //Carrega itens vazios na listagem de veiculos de publicacao utilizados no carregamento do Form. case 'carregaListaVeiculos' : @@ -60,18 +60,18 @@ switch ($_REQUEST['stCtrl']) { case 'incluirListaVeiculos': $arValores = Sessao::read('arValores'); - if ($_REQUEST['inVeiculo'] == '') { + if ( $request->get('inVeiculo') == '') { $stMensagem = 'Preencha o campo Veículo de Publicação!'; } - if ($_REQUEST['dtDataPublicacao'] == '') { + if ( $request->get('dtDataPublicacao') == '') { $stMensagem = 'Preencha o campo Data de Publicação!'; } $boPublicacaoRepetida = false; if ( is_array( $arValores ) ) { foreach ($arValores as $arTEMP) { - if ($arTEMP['inVeiculo'] == $_REQUEST["inVeiculo"] & $arTEMP['dtDataPublicacao'] == $_REQUEST['dtDataPublicacao']) { + if ($arTEMP['inVeiculo'] == $request->get("inVeiculo") & $arTEMP['dtDataPublicacao'] == $request->get('dtDataPublicacao')) { $boPublicacaoRepetida = true ; $stMensagem = "Este veículos de publicação já está na lista."; } @@ -80,12 +80,12 @@ switch ($_REQUEST['stCtrl']) { if (!$boPublicacaoRepetida AND !$stMensagem) { $inCount = sizeof($arValores); - $arValores[$inCount]['id' ] = $inCount + 1; - $arValores[$inCount]['inVeiculo' ] = $_REQUEST[ "inVeiculo" ]; - $arValores[$inCount]['stVeiculo' ] = $_REQUEST[ "stNomCgmVeiculoPublicadade" ]; - $arValores[$inCount]['dtDataPublicacao' ] = $_REQUEST[ "dtDataPublicacao" ]; - $arValores[$inCount]['inNumPublicacao'] = $_REQUEST[ "inNumPublicacao" ]; - $arValores[$inCount]['stObservacao' ] = $_REQUEST[ "stObservacao" ]; + $arValores[$inCount]['id' ] = $inCount + 1; + $arValores[$inCount]['inVeiculo' ] = $request->get( "inVeiculo" ); + $arValores[$inCount]['stVeiculo' ] = $request->get( "stNomCgmVeiculoPublicadade" ); + $arValores[$inCount]['dtDataPublicacao' ] = $request->get( "dtDataPublicacao" ); + $arValores[$inCount]['inNumPublicacao' ] = $request->get( "inNumPublicacao" ); + $arValores[$inCount]['stObservacao' ] = $request->get( "stObservacao" ); } else { echo "alertaAviso('".$stMensagem."','form','erro','".Sessao::getId()."');"; } @@ -111,8 +111,8 @@ switch ($_REQUEST['stCtrl']) { $arValores = Sessao::read('arValores'); if ( is_array($arValores)) { foreach ($arValores as $key => $value) { - if (($key+1) == $_REQUEST['id']) { - $js ="$('HdnCodVeiculo').value ='".$_REQUEST['id']."'; "; + if (($key+1) == $request->get('id')) { + $js ="$('HdnCodVeiculo').value ='". $request->get('id')."'; "; $js.="$('inVeiculo').value ='".$arValores[$i]['inVeiculo']."'; "; $js.="$('dtDataPublicacao').value ='".$arValores[$i]['dtDataPublicacao']."'; "; $js.="$('inNumPublicacao').value ='".$arValores[$i]['inNumPublicacao']."'; "; @@ -134,7 +134,7 @@ switch ($_REQUEST['stCtrl']) { $boDotacaoRepetida = false; $arValores = Sessao::read('arValores'); foreach ($arValores as $key=>$value) { - if ($value['inVeiculo'] == $_REQUEST["inVeiculo"] & $value['dtDataPublicacao'] == $_REQUEST['dtDataPublicacao'] AND ( $key+1 != $_REQUEST['HdnCodVeiculo'] ) ) { + if ($value['inVeiculo'] == $request->get("inVeiculo") & $value['dtDataPublicacao'] == $request->get('dtDataPublicacao') AND ( $key+1 != $request->get('HdnCodVeiculo') ) ) { $boDotacaoRepetida = true ; break; } @@ -142,13 +142,13 @@ switch ($_REQUEST['stCtrl']) { if (!$boDotacaoRepetida) { foreach ($arValores as $key=>$value) { - if (($key+1) == $_REQUEST['HdnCodVeiculo']) { - $arValores[$inCount]['id' ] = $inCount + 1; - $arValores[$inCount]['inVeiculo' ] = $_REQUEST[ "inVeiculo" ]; - $arValores[$inCount]['stVeiculo' ] = sistemaLegado::pegaDado('nom_cgm','sw_cgm',' WHERE numcgm = '.$_REQUEST['inVeiculo'].' '); - $arValores[$inCount]['dtDataPublicacao'] = $_REQUEST[ "dtDataPublicacao" ]; - $arValores[$inCount]['inNumPublicacao'] = $_REQUEST[ "inNumPublicacao" ]; - $arValores[$inCount]['stObservacao' ] = $_REQUEST[ "stObservacao" ]; + if (($key+1) == $request->get('HdnCodVeiculo')) { + $arValores[$inCount]['id' ] = $inCount + 1; + $arValores[$inCount]['inVeiculo' ] = $request->get( "inVeiculo" ); + $arValores[$inCount]['stVeiculo' ] = sistemaLegado::pegaDado('nom_cgm','sw_cgm',' WHERE numcgm = '. $request->get('inVeiculo').' '); + $arValores[$inCount]['dtDataPublicacao'] = $request->get( "dtDataPublicacao" ); + $arValores[$inCount]['inNumPublicacao' ] = $request->get( "inNumPublicacao" ); + $arValores[$inCount]['stObservacao' ] = $request->get( "stObservacao" ); } $inCount++; @@ -177,7 +177,7 @@ switch ($_REQUEST['stCtrl']) { $inCount = 0; $arValores = Sessao::read('arValores'); foreach ($arValores as $key => $value) { - if (($key+1) != $_REQUEST['id']) { + if (($key+1) != $request->get('id')) { $arTEMP[$inCount]['id' ] = $inCount + 1; $arTEMP[$inCount]['inVeiculo' ] = $value[ "inVeiculo" ]; $arTEMP[$inCount]['stVeiculo' ] = $value[ "stVeiculo" ]; diff --git a/gestaoPatrimonial/fontes/PHP/licitacao/instancias/contrato/PRManterRescindirContrato.php b/gestaoPatrimonial/fontes/PHP/licitacao/instancias/contrato/PRManterRescindirContrato.php index 7955e00..3f6e20d 100644 --- a/gestaoPatrimonial/fontes/PHP/licitacao/instancias/contrato/PRManterRescindirContrato.php +++ b/gestaoPatrimonial/fontes/PHP/licitacao/instancias/contrato/PRManterRescindirContrato.php @@ -58,7 +58,7 @@ include_once( TLIC."TLicitacaoRescisaoContratoResponsavelJuridico.class.php" ); include_once( TLIC."TLicitacaoPublicacaoRescisaoContrato.class.php"); Sessao::getExercicio(); -$stAcao = $_POST["stAcao"] ? $_POST["stAcao"] : $_GET["stAcao"]; +$stAcao = $request->get("stAcao"); $stPrograma = "ManterContrato"; $pgFilt = "FL".$stPrograma.".php"; @@ -75,37 +75,37 @@ switch ($stAcao) { case "rescindir": $obTLicitacaoContrato = new TLicitacaoContrato(); - $obTLicitacaoContrato->setDado('exercicio_contrato', $_REQUEST['stExercicio']); - $obTLicitacaoContrato->setDado('num_contrato', $_REQUEST['inNumContrato']); - $obTLicitacaoContrato->setDado('cod_entidade', $_REQUEST['inCodEntidade']); + $obTLicitacaoContrato->setDado('exercicio_contrato', $request->get('stExercicio')); + $obTLicitacaoContrato->setDado('num_contrato', $request->get('inNumContrato')); + $obTLicitacaoContrato->setDado('cod_entidade', $request->get('inCodEntidade')); $obTLicitacaoContrato->recuperaPorChave( $rsLicitacaoContrato ); - if ( implode(array_reverse(explode('/',$_REQUEST['dtRescisao']))) < implode(array_reverse(explode('/',$_REQUEST['dtAssinatura']))) ) { + if ( implode(array_reverse(explode('/',$request->get('dtRescisao')))) < implode(array_reverse(explode('/',$request->get('dtAssinatura')))) ) { SistemaLegado::exibeAviso(urlencode("A data de rescisão não pode ser anterior que a data de assinatura do contrato"), "n_incluir", "erro" ); } else { $obTLicitacaoRescisaoContrato = new TLicitacaoRescisaoContrato(); $obTLicitacaoRescisaoContrato->recuperaProximoNumRescisao($rsLicitacaoRescisaoContrato); - $obTLicitacaoRescisaoContrato->setDado('exercicio_contrato', $_REQUEST['stExercicio']); - $obTLicitacaoRescisaoContrato->setDado('num_contrato', $_REQUEST['inNumContrato']); - $obTLicitacaoRescisaoContrato->setDado('cod_entidade', $_REQUEST['inCodEntidade']); + $obTLicitacaoRescisaoContrato->setDado('exercicio_contrato', $request->get('stExercicio')); + $obTLicitacaoRescisaoContrato->setDado('num_contrato', $request->get('inNumContrato')); + $obTLicitacaoRescisaoContrato->setDado('cod_entidade', $request->get('inCodEntidade')); $obTLicitacaoRescisaoContrato->setDado('exercicio', Sessao::getExercicio()); $obTLicitacaoRescisaoContrato->setDado('num_rescisao', $rsLicitacaoRescisaoContrato->getCampo("maximo")); - $obTLicitacaoRescisaoContrato->setDado('dt_rescisao', $_REQUEST['dtRescisao']); - $vlMulta = number_format(str_replace(".", "", $_REQUEST['vlMulta']), 2, ".", ""); + $obTLicitacaoRescisaoContrato->setDado('dt_rescisao', $request->get('dtRescisao')); + $vlMulta = number_format(str_replace(".", "", $request->get('vlMulta')), 2, ".", ""); $obTLicitacaoRescisaoContrato->setDado('vlr_multa', $vlMulta); - $vlIndenizacao = number_format(str_replace(".", "", $_REQUEST['vlIndenizacao']), 2, ".", ""); + $vlIndenizacao = number_format(str_replace(".", "", $request->get('vlIndenizacao')), 2, ".", ""); $obTLicitacaoRescisaoContrato->setDado('vlr_indenizacao', $vlIndenizacao); - $obTLicitacaoRescisaoContrato->setDado('motivo', $_REQUEST['stMotivo']); + $obTLicitacaoRescisaoContrato->setDado('motivo', $request->get('stMotivo')); $obTLicitacaoRescisaoContrato->inclusao(); - if ($_REQUEST['inCodResponsavelJuridico']) { + if ($request->get('inCodResponsavelJuridico')) { $obTLicitacaoRescisContrRespJuridico = new TLicitacaoRescisaoContratoResponsavelJuridico(); - $obTLicitacaoRescisContrRespJuridico->setDado('exercicio_contrato', $_REQUEST['stExercicio']); - $obTLicitacaoRescisContrRespJuridico->setDado('num_contrato', $_REQUEST['inNumContrato']); - $obTLicitacaoRescisContrRespJuridico->setDado('cod_entidade', $_REQUEST['inCodEntidade']); - $obTLicitacaoRescisContrRespJuridico->setDado('numcgm', $_REQUEST['inCodResponsavelJuridico']); + $obTLicitacaoRescisContrRespJuridico->setDado('exercicio_contrato', $request->get('stExercicio')); + $obTLicitacaoRescisContrRespJuridico->setDado('num_contrato', $request->get('inNumContrato')); + $obTLicitacaoRescisContrRespJuridico->setDado('cod_entidade', $request->get('inCodEntidade')); + $obTLicitacaoRescisContrRespJuridico->setDado('numcgm', $request->get('inCodResponsavelJuridico')); $obTLicitacaoRescisContrRespJuridico->inclusao(); } @@ -123,7 +123,7 @@ case "rescindir": $obTPublicacaoRescisaoContrato->inclusao(); } - SistemaLegado::alertaAviso($pgList.'?'.Sessao::getId()."&stAcao=$stAcao","Contrato: ".$_REQUEST['inNumContrato']."/".$_REQUEST['stExercicio'],"incluir", "aviso", Sessao::getId(),""); + SistemaLegado::alertaAviso($pgList.'?'.Sessao::getId()."&stAcao=$stAcao","Contrato: ".$request->get('inNumContrato')."/".$request->get('stExercicio'),"incluir", "aviso", Sessao::getId(),""); } break; diff --git a/gestaoPatrimonial/fontes/PHP/licitacao/instancias/contrato/PRManterTipoContrato.php b/gestaoPatrimonial/fontes/PHP/licitacao/instancias/contrato/PRManterTipoContrato.php new file mode 100644 index 0000000..07e8036 --- /dev/null +++ b/gestaoPatrimonial/fontes/PHP/licitacao/instancias/contrato/PRManterTipoContrato.php @@ -0,0 +1,143 @@ + +get('stAcao'); + +$stPrograma = "ManterTipoContrato"; +$pgFilt = "FL".$stPrograma.".php"; +$pgList = "LS".$stPrograma.".php"; +$pgForm = "FM".$stPrograma.".php"; +$pgProc = "PR".$stPrograma.".php"; +$pgOcul = "OC".$stPrograma.".php"; + +$obTLicitacaoTipoContrato = new TLicitacaoTipoContrato(); +$obTransacao = new Transacao(); +$obTransacao->abreTransacao( $boFlagTransacao, $boTransacao ); +$obErro = new Erro; + +$nomAcao = SistemaLegado::pegaDado("nom_acao","administracao.acao"," where cod_acao = ".Sessao::read('acao'), $boTransacao); + +switch ($stAcao) { + case "incluir": + $stLink = $pgForm; + + $stFiltro = " WHERE cod_tipo = ".$request->get("inCodigo"); + $obErro = $obTLicitacaoTipoContrato->recuperaTodos($rsTipoContrato, $stFiltro, " ORDER BY tipo_tc", $boTransacao); + + if (!$obErro->ocorreu()) { + if ($rsTipoContrato->getNumLinhas() <= 0) { + $obTLicitacaoTipoContrato->setDado("cod_tipo" , $request->get("inCodigo") ); + $obTLicitacaoTipoContrato->setDado("sigla" , $request->get("stSigla") ); + $obTLicitacaoTipoContrato->setDado("descricao", $request->get("stDescricao") ); + $obTLicitacaoTipoContrato->setDado("tipo_tc" , $request->get("inCodigoTribunal")); + $obTLicitacaoTipoContrato->setDado("ativo" , $request->get("boAtivo") ); + + if ($request->get("inCodigoTribunal") != "") { + $stFiltro = " WHERE tipo_tc = ".$request->get("inCodigoTribunal").""; + $obErro = $obTLicitacaoTipoContrato->recuperaTodos($rsResultado, $stFiltro, " ORDER BY tipo_tc", $boTransacao); + } else { + $rsResultado = new RecordSet; + } + + if (!$obErro->ocorreu()) { + if ($rsResultado->getNumLinhas() > 0) { + $obErro->setDescricao("Este código de tribunal já existe, escolha outro código!"); + } else { + $obErro = $obTLicitacaoTipoContrato->inclusao($boTransacao); + } + } + }else{ + $obErro->setDescricao("O Código de Tipo de Contrato ".$request->get("inCodigo").", já está cadastrado!"); + } + } + break; + + case "alterar": + $stLink = $pgFilt; + + $obTLicitacaoTipoContrato->setDado("cod_tipo" , $request->get("inCodigo") ); + $obTLicitacaoTipoContrato->setDado("sigla" , $request->get("stSigla") ); + $obTLicitacaoTipoContrato->setDado("descricao", $request->get("stDescricao")); + $obTLicitacaoTipoContrato->setDado("ativo" , $request->get("boAtivo") ); + $obErro = $obTLicitacaoTipoContrato->recuperaPorChave($rsResultado, $boTransacao); + + if (!$obErro->ocorreu()) { + if ($rsResultado->getNumLinhas() > 0) { + if ($request->get("inCodigoTribunal") != "") { + $stFiltro = " WHERE tipo_tc = ".$request->get("inCodigoTribunal").""; + $obErro = $obTLicitacaoTipoContrato->recuperaTodos($rsResultado, $stFiltro, " ORDER BY tipo_tc", $boTransacao); + } else { + $rsResultado = new RecordSet; + } + + if (!$obErro->ocorreu()) { + if ($rsResultado->getNumLinhas() > 0) { + $obErro->setDescricao("Este código de tribunal já existe, escolha outro código!"); + } else { + $obTLicitacaoTipoContrato->setDado("ativo" , $request->get("boAtivo") ); + $obTLicitacaoTipoContrato->setDado("tipo_tc", $request->get("inCodigoTribunal")); + $obErro = $obTLicitacaoTipoContrato->alteracao($boTransacao); + } + } + } + } + + break; + + case "excluir": + $stLink = $pgFilt; + $obTLicitacaoTipoContrato->setDado("cod_tipo",$request->get("inCodigo")); + $obErro = $obTLicitacaoTipoContrato->recuperaPorChave($rsResultado, $boTransacao); + + if (!$obErro->ocorreu()) { + $obErro = $obTLicitacaoTipoContrato->exclusao($boTransacao); + } + break; +} + +$obTransacao->fechaTransacao($boFlagTransacao, $boTransacao, $obErro, $obTLicitacaoTipoContrato); + +if (!$obErro->ocorreu()) { + SistemaLegado::alertaAviso($stLink."?".Sessao::getId()."&stAcao=".$stAcao."", "Ação ".$nomAcao." concluída com sucesso! (Tipo de Contrato: ".$request->get("inCodigo").")","","aviso", Sessao::getId(), "../"); +} else { + SistemaLegado::exibeAviso(urlencode("Erro ao executar ação: ".$nomAcao." (".$obErro->getDescricao().")"),"","erro"); +} \ No newline at end of file diff --git a/gestaoPatrimonial/fontes/PHP/licitacao/instancias/convenios/FMManterAditivoConvenio.php b/gestaoPatrimonial/fontes/PHP/licitacao/instancias/convenios/FMManterAditivoConvenio.php index 7f29373..749409e 100644 --- a/gestaoPatrimonial/fontes/PHP/licitacao/instancias/convenios/FMManterAditivoConvenio.php +++ b/gestaoPatrimonial/fontes/PHP/licitacao/instancias/convenios/FMManterAditivoConvenio.php @@ -125,8 +125,6 @@ $obSpanLista = new Span; $obSpanLista->setId("obSpanLista"); $obSpanLista->setValue($table->getHtml()); -//SistemaLegado::mostraVar($_REQUEST); - // monta informações dos dados dos aditivos if ($stAcao != "incluir") { $obNumeroAditivo = new Label; diff --git a/gestaoPatrimonial/fontes/PHP/licitacao/instancias/homologacao/OCManterHomologacao.php b/gestaoPatrimonial/fontes/PHP/licitacao/instancias/homologacao/OCManterHomologacao.php index 02db47d..25433e4 100644 --- a/gestaoPatrimonial/fontes/PHP/licitacao/instancias/homologacao/OCManterHomologacao.php +++ b/gestaoPatrimonial/fontes/PHP/licitacao/instancias/homologacao/OCManterHomologacao.php @@ -34,7 +34,7 @@ * Casos de uso: uc-03.05.21 - $Id: OCManterHomologacao.php 63178 2015-07-31 20:11:32Z carlos.silva $ + $Id: OCManterHomologacao.php 63865 2015-10-27 13:55:57Z franver $ */ @@ -235,10 +235,10 @@ function montaSpnItens() $table->setBodyHeight (150); } - $table->Head->addCabecalho ( 'Item' , 35 ); - $table->Head->addCabecalho ( 'Qtde' , 9 ); - $table->Head->addCabecalho ( 'Valor Ref.' , 8 ); - $table->Head->addCabecalho ( 'Valor' , 8 ); + $table->Head->addCabecalho ( 'Item' , 30 ); + $table->Head->addCabecalho ( 'Qtde' , 10 ); + $table->Head->addCabecalho ( 'Valor Ref.' , 10 ); + $table->Head->addCabecalho ( 'Valor' , 10 ); $table->Head->addCabecalho ( 'Fornecedor' , 25 ); $table->Head->addCabecalho ( 'Status' , 10 ); diff --git a/gestaoPatrimonial/fontes/PHP/licitacao/instancias/processoLicitatorio/OCGeraManterJulgamentoProposta.php b/gestaoPatrimonial/fontes/PHP/licitacao/instancias/processoLicitatorio/OCGeraManterJulgamentoProposta.php index 0076859..64e47c7 100755 --- a/gestaoPatrimonial/fontes/PHP/licitacao/instancias/processoLicitatorio/OCGeraManterJulgamentoProposta.php +++ b/gestaoPatrimonial/fontes/PHP/licitacao/instancias/processoLicitatorio/OCGeraManterJulgamentoProposta.php @@ -32,7 +32,7 @@ * @ignore - $Id:$ + $Id: OCGeraManterJulgamentoProposta.php 63841 2015-10-22 19:14:30Z michel $ */ require_once '../../../../../../gestaoAdministrativa/fontes/PHP/framework/include/valida.inc.php'; @@ -53,7 +53,7 @@ $stAcao = $_REQUEST['stAcao']; $preview = new PreviewBirt(3,37,2); $preview->setVersaoBirt( '2.5.0' ); $preview->setNomeArquivo('julgamentoPropostas'); -$preview->setTitulo('Relatório de Julgamento de Prospostas'); +$preview->setTitulo('Relatório de Julgamento de Propostas'); # Para Compra Direta. if ($stAcao == "dispensaLicitacao" || !empty($inCodCompraDireta)) { diff --git a/gestaoPatrimonial/fontes/PHP/licitacao/instancias/processoLicitatorio/OCGeraManterManutencaoProposta.php b/gestaoPatrimonial/fontes/PHP/licitacao/instancias/processoLicitatorio/OCGeraManterManutencaoProposta.php index dcf9546..be9dc3e 100755 --- a/gestaoPatrimonial/fontes/PHP/licitacao/instancias/processoLicitatorio/OCGeraManterManutencaoProposta.php +++ b/gestaoPatrimonial/fontes/PHP/licitacao/instancias/processoLicitatorio/OCGeraManterManutencaoProposta.php @@ -32,7 +32,7 @@ * @ignore - $Id:$ + $Id: OCGeraManterManutencaoProposta.php 63841 2015-10-22 19:14:30Z michel $ **/ @@ -128,7 +128,7 @@ $preview = new PreviewBirt(3,37,3); $preview->setVersaoBirt('2.5.0'); $preview->setNomeArquivo('mapaComparativoProposta'); -$preview->setTitulo('Mapa Comparativo de Prospostas'); +$preview->setTitulo('Mapa Comparativo de Propostas'); if ($rsEntidade->getNumLinhas() == 1) { $preview->addParametro( 'codigo_e_entidade', $inCodEntidade." - ".$stNomEntidade ); diff --git a/gestaoPatrimonial/fontes/PHP/licitacao/instancias/processoLicitatorio/OCManterJulgamentoProposta.php b/gestaoPatrimonial/fontes/PHP/licitacao/instancias/processoLicitatorio/OCManterJulgamentoProposta.php index a770dee..fa66694 100644 --- a/gestaoPatrimonial/fontes/PHP/licitacao/instancias/processoLicitatorio/OCManterJulgamentoProposta.php +++ b/gestaoPatrimonial/fontes/PHP/licitacao/instancias/processoLicitatorio/OCManterJulgamentoProposta.php @@ -32,7 +32,7 @@ * @ignore - * $Id: OCManterJulgamentoProposta.php 59612 2014-09-02 12:00:51Z gelson $ + * $Id: OCManterJulgamentoProposta.php 63865 2015-10-27 13:55:57Z franver $ * Casos de uso: uc-03.05.26 @@ -334,6 +334,11 @@ function montaSpanItens($rsRecordSet = false, $inTipoLicitacao = 1) /// isto serve para montar a listagem vazia if (!$rsRecordSet) { $rsRecordSet = new Recordset; } + + $rsRecordSet->addFormatacao('quantidade' , 'NUMERIC_BR_4'); + $rsRecordSet->addFormatacao('valor_referencia' , 'NUMERIC_BR'); + $rsRecordSet->addFormatacao('valor_ultima_compra', 'NUMERIC_BR'); + // Montagem Lista $obLstItens = new Lista; $obLstItens->setTitulo ( 'Itens' ); @@ -687,8 +692,6 @@ function montaDetalheItemFornecedor($inOrdem, $inCodItem) $arRegistro = $arFornecedores[$inCodItem][$inPos]; - //SistemaLegado::mostraVar($arFornecedores[$inCodItem]); - $arRegistro['vl_total' ] = number_format($arRegistro['vl_total'] , 2, ',', '.' ); $arRegistro['vl_unitario'] = number_format($arRegistro['vl_unitario'], 2, ',', '.' ); $arRegistro['quantidade' ] = number_format($arRegistro['quantidade'] , 4, ',', '.' ); @@ -1081,10 +1084,6 @@ function montaDetalheLoteFornecedor($inLote, $inCgm) $rsRecordSet->proximo(); } - //SistemaLegado::mostraVar($arFornecedores[$inLote]); - - //$rsRecordSet->addFormatacao ( 'vl_total', 'NUMERIC_BR' ); - if ($rsRecordSet->getCampo( 'tipo' ) == 'N') { $tipoEmpresa = "Empresa Padrão"; } elseif ($rsRecordSet->getCampo( 'tipo' ) == 'M') { diff --git a/gestaoPatrimonial/fontes/PHP/licitacao/instancias/processoLicitatorio/OCManterManutencaoProposta.php b/gestaoPatrimonial/fontes/PHP/licitacao/instancias/processoLicitatorio/OCManterManutencaoProposta.php index 09fbfe6..a94e653 100644 --- a/gestaoPatrimonial/fontes/PHP/licitacao/instancias/processoLicitatorio/OCManterManutencaoProposta.php +++ b/gestaoPatrimonial/fontes/PHP/licitacao/instancias/processoLicitatorio/OCManterManutencaoProposta.php @@ -35,7 +35,7 @@ * Casos de uso: uc-03.05.25 - $Id: OCManterManutencaoProposta.php 62270 2015-04-15 20:13:46Z arthur $ + $Id: OCManterManutencaoProposta.php 64149 2015-12-09 16:55:40Z michel $ */ @@ -45,6 +45,7 @@ include_once '../../../../../../gestaoAdministrativa/fontes/PHP/framework/reques include_once CAM_FW_COMPONENTES."Table/TableTree.class.php"; include_once CAM_GA_CGM_COMPONENTES."IPopUpCGMVinculado.class.php"; include_once TCOM."TComprasConfiguracao.class.php"; + //Define o nome dos arquivos PHP $stPrograma = "ManterManutencaoProposta"; $pgFilt = "FL".$stPrograma.".php"; @@ -154,12 +155,12 @@ function montaFormDadosItem($arDadosItem) $obLblQtd = new Label; $obLblQtd->setRotulo( 'Quantidade' ); - $obLblQtd->setValue( $arDadosItem[ 'quantidade' ] ); + $obLblQtd->setValue( number_format($arDadosItem[ 'quantidade' ], 4, ",", ".") ); $obHdnQtd = new Hidden; $obHdnQtd->setId ( 'qtd' ); $obHdnQtd->setName ( 'qtd' ); - $obHdnQtd->setValue( $arDadosItem[ 'quantidade' ] ); + $obHdnQtd->setValue( number_format($arDadosItem[ 'quantidade' ], 4, ",", ".") ); $obLblVUR = new Label; $obLblVUR->setRotulo( 'Valor Referência' ); @@ -318,12 +319,15 @@ function atualizaItens() $obTComprasMapaItem->setDado( 'cod_mapa', $inCodMapa ); /* verificar tipo do mapa */ - $inTIpo = SistemaLegado::pegaDado( "cod_tipo_licitacao", "compras.mapa" , " where cod_mapa = " . $inCodMapa . " and exercicio = " . $stExercicioMapa . "::VARCHAR" ); + $inTIpo = SistemaLegado::pegaDado( "cod_tipo_licitacao", "compras.mapa" , " where cod_mapa = " . $inCodMapa . " and exercicio = '" . $stExercicioMapa . "' " ); $obTComprasMapaItem->recuperaItensPropostaAgrupado( $rsMapaItens ); - while ( !$rsMapaItens->eof() ) { + $rsMapaItens->addFormatacao('valor_unitario' ,'NUMERIC_BR'); + $rsMapaItens->addFormatacao('valor_total' ,'NUMERIC_BR'); + $rsMapaItens->addFormatacao('valor_referencia' ,'NUMERIC_BR'); + while ( !$rsMapaItens->eof() ) { $itemComplemento = ""; $obTComprasMapaItem->setDado('cod_mapa' , $rsMapaItens->getCampo('cod_mapa')); $obTComprasMapaItem->setDado('cod_item' , $rsMapaItens->getCampo('cod_item')); @@ -342,7 +346,7 @@ function atualizaItens() $rsMapaItens->setCampo( 'complemento', $itemComplemento); $obTComprasMapaItem->setDado('cod_item' , $rsMapaItens->getCampo('cod_item')); - $obTComprasMapaItem->setDado('exercicio' , $rsMapaItens->getCampo('exercicio')."::VARCHAR"); + $obTComprasMapaItem->setDado('exercicio' , $rsMapaItens->getCampo('exercicio')); $obTComprasMapaItem->recuperaValorReferenciaItem( $rsItemEmpenhado ); $obTAlmoxarifadoCatalogoItem->setDado('cod_item' , $rsMapaItens->getCampo('cod_item')); @@ -386,7 +390,7 @@ function atualizaItens() foreach ($arItensFornecedor as $chave =>$dados) { $obTComprasCotacaoFornecedorItem->setDado('cod_cotacao', $arManterPropostas["cod_cotacao"] ); - $obTComprasCotacaoFornecedorItem->setDado('exercicio', $arManterPropostas["exercicio_cotacao"]."::VARCHAR" ); + $obTComprasCotacaoFornecedorItem->setDado('exercicio', $arManterPropostas["exercicio_cotacao"] ); $obTComprasCotacaoFornecedorItem->setDado('cod_item', $arItensFornecedor[$chave]['cod_item']); @@ -398,11 +402,10 @@ function atualizaItens() if ( $rsItem->getNumLinhas() == 1) { list( $a , $m , $d ) = explode('-', $rsItem->getCampo('dt_validade')); - $quantidadeItemFornecedor = str_replace('.','',$arItensFornecedor[$inCount]['quantidade']); - $quantidadeItemFornecedor = str_replace(',','.',$quantidadeItemFornecedor); + $quantidadeItemFornecedor = $arItensFornecedor[$inCount]['quantidade']; $arItensFornecedor[$inCount]['data_validade'] = $d . '/' . $m . '/' . $a; - $arItensFornecedor[$inCount]['valor_unitario'] = number_format(($rsItem->getCampo('vl_cotacao') / $quantidadeItemFornecedor), 2, ",", "."); + $arItensFornecedor[$inCount]['valor_unitario'] = number_format(($rsItem->getCampo('vl_cotacao') / $quantidadeItemFornecedor), 4, ",", "."); $arItensFornecedor[$inCount]['valor_total'] = number_format($rsItem->getCampo('vl_cotacao'), 2, ",", "."); $arItensFornecedor[$inCount]['cod_marca'] = $rsItem->getCampo('cod_marca'); $arItensFornecedor[$inCount]['desc_marca'] = $rsItem->getCampo('descricao'); @@ -434,42 +437,46 @@ function montaListaItens($rsItens , $stHtm = "") { $arManterPropostas = Sessao::read('arManterPropostas'); $rsItens->setPrimeiroElemento(); + + $rsItens->addFormatacao('quantidade' ,'NUMERIC_BR_4'); + $rsItens->addFormatacao('valor_referencia' ,'NUMERIC_BR'); + $rsItens->addFormatacao('valor_ultima_compra','NUMERIC_BR'); $table = new Table; $table->setRecordset($rsItens); $table->setSummary('Itens'); - $table->Head->addCabecalho('Item' , 35); + $table->Head->addCabecalho('Item' , 30); if ($arManterPropostas["tipo_mapa"] == 2) { - $table->Head->addCabecalho('Lote' , 10); + $table->Head->addCabecalho('Lote' , 5); } $table->Head->addCabecalho('Qtde' , 10); - $table->Head->addCabecalho('Valor Referência' , 15); - $table->Head->addCabecalho('Valor Última Compra', 15); - $table->Head->addCabecalho('Valor Unitário' , 15); - $table->Head->addCabecalho('Valor Total' , 15); - $table->Head->addCabecalho('Selecione' , 7); + $table->Head->addCabecalho('Valor Referência' , 10); + $table->Head->addCabecalho('Valor Última Compra', 10); + $table->Head->addCabecalho('Valor Unitário' , 10); + $table->Head->addCabecalho('Valor Total' , 10); + $table->Head->addCabecalho('Selecione' , 5); $stTitle = "[stTitle]"; $table->Body->addCampo("[cod_item] - [descricao]
    [complemento]","E", $stTitle); if ($arManterPropostas["tipo_mapa"] == 2) { - $table->Body->addCampo("lote" ,"E", $stTitle); + $table->Body->addCampo("lote", "E", $stTitle); } - $table->Body->addCampo('quantidade' ,"D", $stTitle); - $table->Body->addCampo('valor_referencia' ,"D", $stTitle); - $table->Body->addCampo('valor_ultima_compra' ,"D", $stTitle); - $table->Body->addCampo('valor_unitario' ,"D", $stTitle); - $table->Body->addCampo('valor_total' ,"D", $stTitle); + $table->Body->addCampo('quantidade' , "D", $stTitle); + $table->Body->addCampo('valor_referencia' , "D", $stTitle); + $table->Body->addCampo('valor_ultima_compra', "D", $stTitle); + $table->Body->addCampo('valor_unitario' , "D", $stTitle); + $table->Body->addCampo('valor_total' , "D", $stTitle); $obRdSelecione = new Radio; - $obRdSelecione->setName ( "rd_item" ); - $obRdSelecione->setId ( "" ); + $obRdSelecione->setName ( "rd_item" ); + $obRdSelecione->setId ( "" ); $obRdSelecione->obEvento->setOnChange ( "selecionaItem(this)" ); - $obRdSelecione->setValue ( "[lote],[cod_item]" ); + $obRdSelecione->setValue ( "[lote],[cod_item]" ); $table->Body->addComponente($obRdSelecione); - $table->Foot->addSoma('valor_total' , "D"); + $table->Foot->addSoma('valor_total', "D"); $table->montaHTML(); $stHTML = $table->getHtml(); @@ -758,10 +765,9 @@ function incluirParticipante($inCgmParticipante) return $stJs; } -function validaValoresItemRequest() +function validaValoresItemRequest(Request $request) { $stErro = false; - $request = new Request($_REQUEST); $arManterPropostas = Sessao::read('arManterPropostas'); $boProximoItem = Sessao::read('boProximoItem'); //validações @@ -1148,8 +1154,6 @@ function incluirUltimaCotacaoAnulada($cod,$mapa,$exercicio) $rsUltimosItens->proximo(); } - $stJs .= "alert('www')"; - return $stJs; } @@ -1239,7 +1243,7 @@ switch ( $request->get('stCtrl') ) { require_once( TCOM . "TComprasCotacao.class.php" ); $obTComprasCotacao = new TComprasCotacao; - $stFiltro = " WHERE mapa_cotacao.cod_mapa = ".$inCodMapa." AND mapa_cotacao.exercicio_mapa = ".$stExercicioMapa."::VARCHAR"; + $stFiltro = " WHERE mapa_cotacao.cod_mapa = ".$inCodMapa." AND mapa_cotacao.exercicio_mapa = '".$stExercicioMapa."' "; $obTComprasCotacao->recuperaCotacaoNaoAnulada($rsCotacao, $stFiltro); if ($rsCotacao->inNumLinhas <= 0) { @@ -1439,7 +1443,7 @@ switch ( $request->get('stCtrl') ) { require_once (TLIC.'TLicitacaoEditalImpugnado.class.php'); $obTLicitacaoEditalImpugnado = new TLicitacaoEditalImpugnado; $obTLicitacaoEditalImpugnado->setDado( 'num_edital' , $rsMapa->getCampo('num_edital') ); - $obTLicitacaoEditalImpugnado->setDado( 'exercicio' , $rsMapa->getCampo('exercicio_edital')."::VARCHAR" ); + $obTLicitacaoEditalImpugnado->setDado( 'exercicio' , $rsMapa->getCampo('exercicio_edital') ); $obTLicitacaoEditalImpugnado->recuperaProcessos( $rsProcessosEdital ); if ( $rsProcessosEdital->getNumLinhas() > 0 and !$rsProcessosEdital->getCampo('parecer_juridico') ) $stErro = "Mapa de Compras inválido, Edital esta impugnado!"; @@ -1456,7 +1460,7 @@ switch ( $request->get('stCtrl') ) { $arManterPropostas["exercicio_cotacao"] = $rsCotaca->getCampo('exercicio_cotacao'); /* verifica julgamento*/ - $inCodCotacaoJulgada = SistemaLegado::pegaDado('cod_cotacao','compras.julgamento','where cod_cotacao = '. $rsCotaca->getCampo('cod_cotacao') .' and exercicio = ' . $rsCotaca->getCampo('exercicio_cotacao').'::VARCHAR' ); + $inCodCotacaoJulgada = SistemaLegado::pegaDado("cod_cotacao","compras.julgamento","where cod_cotacao = ". $rsCotaca->getCampo('cod_cotacao') ." and exercicio = '" . $rsCotaca->getCampo('exercicio_cotacao')."' " ); if ($inCodCotacaoJulgada) { $stErro = "Proposta do Mapa de Compras ".$inCodMapa."/".$stExercicioMapa." está em Julgamento"; } @@ -1626,7 +1630,7 @@ switch ( $request->get('stCtrl') ) { break; case 'proxItem': - $stJs .= validaValoresItemRequest(); + $stJs .= validaValoresItemRequest($request); break; case 'atualizaProxItem': diff --git a/gestaoPatrimonial/fontes/PHP/licitacao/instancias/processoLicitatorio/OCManterProcessoLicitatorio.php b/gestaoPatrimonial/fontes/PHP/licitacao/instancias/processoLicitatorio/OCManterProcessoLicitatorio.php index 27794e9..8557833 100644 --- a/gestaoPatrimonial/fontes/PHP/licitacao/instancias/processoLicitatorio/OCManterProcessoLicitatorio.php +++ b/gestaoPatrimonial/fontes/PHP/licitacao/instancias/processoLicitatorio/OCManterProcessoLicitatorio.php @@ -31,7 +31,7 @@ * Casos de uso: uc-03.05.15 - $Id: OCManterProcessoLicitatorio.php 63094 2015-07-24 16:57:15Z franver $ + $Id: OCManterProcessoLicitatorio.php 63865 2015-10-27 13:55:57Z franver $ */ @@ -557,6 +557,7 @@ function montaListaItens($rsItens) $rsItens->addFormatacao('valor_unitario' , 'NUMERIC_BR'); $rsItens->addFormatacao('quantidade' , 'NUMERIC_BR_4'); + $rsItens->addFormatacao('quantidade_real' , 'NUMERIC_BR_4'); $rsItens->addFormatacao('valor_total_real' , 'NUMERIC_BR'); $rsItens->addFormatacao('valor_ultima_compra' , 'NUMERIC_BR'); @@ -567,12 +568,12 @@ function montaListaItens($rsItens) $table->setRecordset( $rsItens ); $table->setSummary('Itens'); - $table->Head->addCabecalho( 'Item' , 40 ); - $table->Head->addCabecalho( 'Centro de Custo', 25 ); - $table->Head->addCabecalho( 'Valor de Referência' , 10 ); - $table->Head->addCabecalho( 'Valor da Última Compra' , 10 ); - $table->Head->addCabecalho( 'Qtde' , 10 ); - $table->Head->addCabecalho( 'Valor Total' , 10 ); + $table->Head->addCabecalho( 'Item' , 30); + $table->Head->addCabecalho( 'Centro de Custo' , 25); + $table->Head->addCabecalho( 'Valor de Referência' , 10); + $table->Head->addCabecalho( 'Valor da Última Compra' , 10); + $table->Head->addCabecalho( 'Qtde' , 10); + $table->Head->addCabecalho( 'Valor Total' , 10); $table->Body->addCampo( '[cod_item] - [descricao_completa]. [complemento]' , 'E'); $table->Body->addCampo( '[cod_centro] - [centro_custo_descricao]' , 'E'); diff --git a/gestaoPatrimonial/fontes/PHP/licitacao/instancias/processoLicitatorio/PRManterManutencaoProposta.php b/gestaoPatrimonial/fontes/PHP/licitacao/instancias/processoLicitatorio/PRManterManutencaoProposta.php index ddb1639..a832928 100644 --- a/gestaoPatrimonial/fontes/PHP/licitacao/instancias/processoLicitatorio/PRManterManutencaoProposta.php +++ b/gestaoPatrimonial/fontes/PHP/licitacao/instancias/processoLicitatorio/PRManterManutencaoProposta.php @@ -33,7 +33,7 @@ * Casos de uso: uc-03.05.25 - $Id: PRManterManutencaoProposta.php 63367 2015-08-20 21:27:34Z michel $ + $Id: PRManterManutencaoProposta.php 63865 2015-10-27 13:55:57Z franver $ */ @@ -306,9 +306,8 @@ if ($stAcao == 'reemitir' || $stAcao == 'reemitirCompra') { $obTComprasCotacaoItem->setDado( 'cod_cotacao' , $inCodCotacao ); $obTComprasCotacaoItem->setDado( 'lote' , $rsItens->getCampo( 'lote' ) ); $obTComprasCotacaoItem->setDado( 'cod_item' , $rsItens->getCampo( 'cod_item' ) ); - $obTComprasCotacaoItem->setDado( 'quantidade' , str_replace(",", ".", str_replace(".", "", $rsItens->getCampo( 'quantidade' ))) ); + $obTComprasCotacaoItem->setDado( 'quantidade' , $rsItens->getCampo( 'quantidade' )); $obTComprasCotacaoItem->inclusao(); - $rsItens->proximo(); } } else { diff --git a/gestaoPatrimonial/fontes/PHP/licitacao/popups/contrato/FLProcurarContrato.php b/gestaoPatrimonial/fontes/PHP/licitacao/popups/contrato/FLProcurarContrato.php index 4418d40..3b497c7 100644 --- a/gestaoPatrimonial/fontes/PHP/licitacao/popups/contrato/FLProcurarContrato.php +++ b/gestaoPatrimonial/fontes/PHP/licitacao/popups/contrato/FLProcurarContrato.php @@ -30,35 +30,14 @@ * @author Analista: Lucas Teixeira Stephanou * @author Desenvolvedor: Lucas Teixeira Stephanou + $Id: FLProcurarContrato.php 64081 2015-11-30 15:36:50Z michel $ + * Casos de uso :uc-03.04.07, uc-03.04.05, */ -/* -$Log$ -Revision 1.1 2006/10/11 17:21:12 domluc -p/ Diegon: - O componente de Contrato gera no formulario que o chama um buscainner e um span, o buscainner somente aceita preenchimento via PopUp, ou seja, não é possivel digitar diretamente o numero do contrato. - Chamando a popup do buscainner, ele devera poder filtrar por ( em ordem) -1) Número do Contrato ( inteiro) -2) Exercicio ( ref a Contrato) ( componente exercicio) -3) Modalidade ( combo) -4) Codigo da Licitação ( inteiro ) -5) Entidade ( componente) - -entao o usuario clica em Ok, e o sistema exibe uma lista correspondente ao filtro informado. -o usuario seleciona um dos contratos na listageme o sistema fecha a popup, retornando ao formulario, onde o sistema preenche o numero do convenio e no span criado pelo componente , exibe as informações recorrentes, que sao: -- exercicio -- modalidade -- licitação -- entidade -- cgm contratado - -era isso - -*/ include_once '../../../../../../gestaoAdministrativa/fontes/PHP/pacotes/FrameworkHTML.inc.php'; include_once '../../../../../../gestaoAdministrativa/fontes/PHP/framework/include/cabecalho.inc.php'; -include_once( CAM_GF_ORC_COMPONENTES.'ITextBoxSelectEntidadeGeral.class.php' ); +include_once CAM_GF_ORC_COMPONENTES.'ITextBoxSelectEntidadeGeral.class.php'; //Define o nome dos arquivos PHP $stPrograma = "ProcurarContrato"; @@ -70,12 +49,10 @@ $pgOcul = "OC".$stPrograma.".php"; $pgJS = "JS".$stPrograma.".js"; //Define a função do arquivo, ex: incluir, excluir, alterar, consultar, etc -$stAcao = $request->get('stAcao'); -if ( empty( $stAcao ) ) { - $stAcao = "excluir"; -} +$stAcao = $request->get('stAcao', 'excluir'); Sessao::write('link', ''); +Sessao::remove('filtro'); //DEFINICAO DOS COMPONENTES $obHdnAcao = new Hidden; @@ -84,21 +61,58 @@ $obHdnAcao->setValue ( $stAcao ); $obHdnForm = new Hidden; $obHdnForm->setName( "nomForm" ); -$obHdnForm->setValue( $_REQUEST['nomForm']); +$obHdnForm->setValue( $request->get('nomForm')); $obHdnCampoNum = new Hidden; $obHdnCampoNum->setName( "campoNum" ); -$obHdnCampoNum->setValue( $_REQUEST['campoNum']); +$obHdnCampoNum->setValue( $request->get('campoNum')); //Define HIDDEN com o o nome do campo texto $obHdnCampoNom = new Hidden; $obHdnCampoNom->setName( "campoNom" ); -$obHdnCampoNom->setValue( $_REQUEST['campoNom'] ); +$obHdnCampoNom->setValue( $request->get('campoNom') ); $obITextBoxSelectEntidadeGeral = new ITextBoxSelectEntidadeGeral; $obPeriodicidade = new Periodicidade; $obPeriodicidade->setExercicio ( Sessao::getExercicio()); +$obHdnBoFornecedor = new Hidden; +$obHdnBoFornecedor->setName( "boFornecedor" ); +$obHdnBoFornecedor->setValue( $request->get('boFornecedor') ); + +if($request->get('boFornecedor')){ + $arFiltroBuscaContrato = Sessao::read('arFiltroBuscaContrato'); + $arFiltroBuscaContrato = (is_array($arFiltroBuscaContrato)) ? $arFiltroBuscaContrato : array(); + + $inCodEntidade = $arFiltroBuscaContrato['inCodEntidade']; + $inCodFornecedor = $arFiltroBuscaContrato['inCodFornecedor']; + $stNomFornecedor = ''; + if(!empty($inCodFornecedor)) + $stNomFornecedor = sistemalegado::pegaDado("nom_cgm","sw_cgm","WHERE numcgm = '".$inCodFornecedor."' "); + + if(!empty($stNomFornecedor)) + $stNomFornecedor = $inCodFornecedor.' - '.$stNomFornecedor; + + $obITextBoxSelectEntidadeGeral->setCodEntidade($inCodEntidade); + $obITextBoxSelectEntidadeGeral->setLabel(true); + + $obHdnCodFornecedor = new Hidden; + $obHdnCodFornecedor->setName( "inCodFornecedor" ); + $obHdnCodFornecedor->setValue( $inCodFornecedor ); + + $obLblFornecedor = new Label; + $obLblFornecedor->setId ('inCodFornecedor'); + $obLblFornecedor->setRotulo('Fornecedor'); + $obLblFornecedor->setValue ($stNomFornecedor); + + $obTxtExercicio = new TextBox; + $obTxtExercicio->setName ('stExercicio'); + $obTxtExercicio->setId ('stExercicio'); + $obTxtExercicio->setValue (Sessao::getExercicio()); + $obTxtExercicio->setRotulo ('Exercício'); + $obTxtExercicio->setReadOnly(true); +} + $obHdnTipoBusca = new Hidden; $obHdnTipoBusca->setName( "stTipoBusca" ); @@ -113,10 +127,16 @@ $obFormulario->addHidden ( $obHdnForm ); $obFormulario->addHidden ( $obHdnCampoNum ); $obFormulario->addHidden ( $obHdnCampoNom ); $obFormulario->addHidden ( $obHdnTipoBusca ); +$obFormulario->addHidden ( $obHdnBoFornecedor ); $obFormulario->addTitulo ( "Dados para filtro" ); $obFormulario->addHidden ( $obHdnAcao ); $obFormulario->addComponente ( $obITextBoxSelectEntidadeGeral ); -$obFormulario->addComponente ( $obPeriodicidade ); +if($request->get('boFornecedor')){ + $obFormulario->addHidden ( $obHdnCodFornecedor ); + $obFormulario->addComponente ( $obLblFornecedor ); + $obFormulario->addComponente ( $obTxtExercicio ); +}else + $obFormulario->addComponente ( $obPeriodicidade ); $obFormulario->OK(); $obFormulario->show(); diff --git a/gestaoPatrimonial/fontes/PHP/licitacao/popups/contrato/LSProcurarContrato.php b/gestaoPatrimonial/fontes/PHP/licitacao/popups/contrato/LSProcurarContrato.php index ae05aac..44d696e 100644 --- a/gestaoPatrimonial/fontes/PHP/licitacao/popups/contrato/LSProcurarContrato.php +++ b/gestaoPatrimonial/fontes/PHP/licitacao/popups/contrato/LSProcurarContrato.php @@ -32,45 +32,14 @@ * @ignore -* $Id: LSProcurarContrato.php 59612 2014-09-02 12:00:51Z gelson $ +* $Id: LSProcurarContrato.php 64081 2015-11-30 15:36:50Z michel $ * Casos de uso :uc-03.04.07, uc-03.04.05 */ -/* -$Log$ -Revision 1.1 2006/10/11 17:21:12 domluc -p/ Diegon: - O componente de Contrato gera no formulario que o chama um buscainner e um span, o buscainner somente aceita preenchimento via PopUp, ou seja, não é possivel digitar diretamente o numero do contrato. - Chamando a popup do buscainner, ele devera poder filtrar por ( em ordem) -1) Número do Contrato ( inteiro) -2) Exercicio ( ref a Contrato) ( componente exercicio) -3) Modalidade ( combo) -4) Codigo da Licitação ( inteiro ) -5) Entidade ( componente) - -entao o usuario clica em Ok, e o sistema exibe uma lista correspondente ao filtro informado. -o usuario seleciona um dos contratos na listageme o sistema fecha a popup, retornando ao formulario, onde o sistema preenche o numero do convenio e no span criado pelo componente , exibe as informações recorrentes, que sao: -- exercicio -- modalidade -- licitação -- entidade -- cgm contratado - -era isso - -Revision 1.4 2006/10/04 08:53:22 cleisson -novo componente IPopUpObjeto - -Revision 1.3 2006/07/06 14:05:54 diego -Retirada tag de log com erro. - -Revision 1.2 2006/07/06 12:11:10 diego - -*/ include_once '../../../../../../gestaoAdministrativa/fontes/PHP/pacotes/FrameworkHTML.inc.php'; include_once '../../../../../../gestaoAdministrativa/fontes/PHP/framework/include/cabecalho.inc.php'; -include_once(CAM_GP_LIC_MAPEAMENTO . 'TLicitacaoContrato.class.php' ); +include_once CAM_GP_LIC_MAPEAMENTO.'TLicitacaoContrato.class.php'; //Define o nome dos arquivos PHP $stPrograma = "ProcurarObjeto"; @@ -80,24 +49,21 @@ $pgForm = "FM".$stPrograma.".php"; $pgProc = "PR".$stPrograma.".php"; $pgOcul = "OC".$stPrograma.".php"; - $stFncJavaScript .= " function insereObjeto(num,nom) { \n"; - $stFncJavaScript .= " var sNum; \n"; - $stFncJavaScript .= " var sNom; \n"; - $stFncJavaScript .= " sNum = num; \n"; - $stFncJavaScript .= " sNom = nom; \n"; - $stFncJavaScript .= " window.opener.parent.frames['telaPrincipal'].document.getElementById('".$_REQUEST["campoNom"]."').innerHTML = sNom; \n"; - $stFncJavaScript .= " window.opener.parent.frames['telaPrincipal'].document.".$_REQUEST["nomForm"].".".$_REQUEST["campoNum" ].".value = sNum; \n"; - $stFncJavaScript .= " window.opener.parent.frames['telaPrincipal'].document.".$_REQUEST["nomForm"].".".$_REQUEST["campoNum" ].".focus(); \n"; - $stFncJavaScript .= " window.close(); \n"; - $stFncJavaScript .= " } \n"; +$stFncJavaScript = "function insereObjeto(num,nom){ \n"; +$stFncJavaScript .= " var sNum; \n"; +$stFncJavaScript .= " var sNom; \n"; +$stFncJavaScript .= " sNum = num; \n"; +$stFncJavaScript .= " sNom = nom; \n"; +$stFncJavaScript .= " window.opener.parent.frames['telaPrincipal'].document.getElementById('".$request->get('campoNom')."').innerHTML = sNom; \n"; +$stFncJavaScript .= " window.opener.parent.frames['telaPrincipal'].document.".$request->get('nomForm').".".$request->get('campoNum').".value = sNum; \n"; +$stFncJavaScript .= " window.opener.parent.frames['telaPrincipal'].document.".$request->get('nomForm').".".$request->get('campoNum').".focus(); \n"; +$stFncJavaScript .= " window.close(); \n"; +$stFncJavaScript .= "} \n"; $stCaminho = CAM_GP_COM_INSTANCIAS."objeto/"; //Define a função do arquivo, ex: incluir, excluir, alterar, consultar, etc -$stAcao = $request->get('stAcao'); -if ( empty( $stAcao ) ) { - $stAcao = "excluir"; -} +$stAcao = $request->get('stAcao', 'excluir'); switch ($stAcao) { case 'alterar': $pgProx = $pgForm; break; @@ -108,14 +74,14 @@ switch ($stAcao) { $stLink = "&stAcao=".$stAcao; $filtro = Sessao::read('filtro'); -if ($_REQUEST['stHdnDescricao'] || $_REQUEST['inCodEntidade']) { - foreach ($_REQUEST as $key => $value) { +if ( $request->get('stHdnDescricao') || $request->get('inCodEntidade') || ( $request->get('stDataInicial') && $request->get('stDataFinal') ) || $filtro=='' ){ + foreach ( $request->getAll() as $key => $value ){ $filtro[$key] = $value; } -} else { - if ($filtro) { - foreach ($filtro as $key => $value) { - $_REQUEST[$key] = $value; +}else{ + if( $filtro ){ + foreach ( $filtro as $key => $value ){ + $request->set($key, $value); } } Sessao::write('paginando', true); @@ -124,17 +90,29 @@ Sessao::write('filtro', $filtro); $obTLicitacaoContrato = new TLicitacaoContrato; -if ( ( $_POST['stDataInicial']) ) { - $stFiltro .= " and contrato.dt_assinatura >= to_date( '" . $_POST['stDataInicial'] . "', 'dd/mm/yyyy') "; -} +if ( $request->get('stDataInicial') ) + $stFiltro .= " and contrato.dt_assinatura >= to_date( '".$request->get('stDataInicial')."', 'dd/mm/yyyy') "; -if ($_POST['stDataFinal']) { - $stFiltro .= " and contrato.dt_assinatura <= to_date( '" .$_POST['stDataFinal'] . "' ,'dd/mm/yyyy' )"; -} +if ( $request->get('stDataFinal') ) + $stFiltro .= " and contrato.dt_assinatura <= to_date( '".$request->get('stDataFinal')."' ,'dd/mm/yyyy' )"; + +$obTLicitacaoContrato->setDado ( 'cod_entidade', $request->get('inCodEntidade') ); + +if( $request->get('boFornecedor') ){ + $inCodEntidade = $request->get('inCodEntidade', ''); + $stCodEntidade = ($inCodEntidade!='') ? '= '.$inCodEntidade : 'IS NULL'; + $stFiltro .= " and contrato.cod_entidade ".$stCodEntidade; + + $inCodFornecedor = $request->get('inCodFornecedor', ''); + $stCodFornecedor = ($inCodFornecedor!='') ? '= '.$inCodFornecedor : 'IS NULL'; + $stFiltro .= " and contrato.cgm_contratado ".$stCodFornecedor; + + $stFiltro .= " and contrato.exercicio = '".$request->get('stExercicio')."'"; -$obTLicitacaoContrato->setDado ( 'cod_entidade', $_POST['inCodEntidade'] ); + $obTLicitacaoContrato->recuperaContratoEmpenho ( $rsLista, $stFiltro ); +}else + $obTLicitacaoContrato->recuperaRelacionamento ( $rsLista, $stFiltro ); -$obTLicitacaoContrato->recuperaRelacionamento ( $rsLista, $stFiltro ); $obLista = new Lista; $obLista->obPaginacao->setFiltro("&stLink=".$stLink ); diff --git a/gestaoPatrimonial/fontes/PHP/patrimonio/classes/mapeamento/TPatrimonioAtributoPatrimonio.class.php b/gestaoPatrimonial/fontes/PHP/patrimonio/classes/mapeamento/TPatrimonioAtributoPatrimonio.class.php index a199038..3f825af 100755 --- a/gestaoPatrimonial/fontes/PHP/patrimonio/classes/mapeamento/TPatrimonioAtributoPatrimonio.class.php +++ b/gestaoPatrimonial/fontes/PHP/patrimonio/classes/mapeamento/TPatrimonioAtributoPatrimonio.class.php @@ -161,7 +161,6 @@ function RecuperaRelatorio(&$rsRecordSet, $stFiltro = "", $stOrdem = "", $boTran $stSql = $this->montaRecuperaRelatorio($stFiltro); $this->setDebug($stSql); - //SistemaLegado::mostravar($stSql); exit(); $obErro = $obConexao->executaSQL( $rsRecordSet, $stSql, $boTransacao ); return $obErro; diff --git a/gestaoPatrimonial/fontes/PHP/patrimonio/classes/mapeamento/TPatrimonioBem.class.php b/gestaoPatrimonial/fontes/PHP/patrimonio/classes/mapeamento/TPatrimonioBem.class.php index 5c93dbd..7dc6186 100644 --- a/gestaoPatrimonial/fontes/PHP/patrimonio/classes/mapeamento/TPatrimonioBem.class.php +++ b/gestaoPatrimonial/fontes/PHP/patrimonio/classes/mapeamento/TPatrimonioBem.class.php @@ -27,7 +27,7 @@ * @author Analista: * @author Programador: Fernando Zank Correa Evangelista - $Id: TPatrimonioBem.class.php 61776 2015-03-03 17:41:03Z carlos.silva $ + $Id: TPatrimonioBem.class.php 63945 2015-11-10 18:53:13Z arthur $ Caso de uso: uc-03.01.09 Caso de uso: uc-03.01.21 @@ -820,7 +820,7 @@ class TPatrimonioBem extends Persistente , bem.detalhamento , TO_CHAR(bem.dt_aquisicao,'dd/mm/yyyy') AS dt_aquisicao , TO_CHAR(bem.dt_incorporacao,'dd/mm/yyyy') AS dt_incorporacao - , TO_CHAR(bem.dt_depreciacao,'dd/mm/yyyy') AS dt_depreciacao + , depreciacao.dt_depreciacao , TO_CHAR(bem.dt_garantia,'dd/mm/yyyy') AS dt_garantia , bem.vl_bem , bem.vl_depreciacao @@ -854,11 +854,15 @@ class TPatrimonioBem extends Persistente , apolice.cod_apolice , apolice.numcgm as num_seguradora , bem_comprado_tipo_documento_fiscal.cod_tipo_documento_fiscal + FROM patrimonio.bem + LEFT JOIN patrimonio.bem_comprado ON bem_comprado.cod_bem = bem.cod_bem + LEFT JOIN tceal.bem_comprado_tipo_documento_fiscal ON bem_comprado_tipo_documento_fiscal.cod_bem = bem_comprado.cod_bem + LEFT JOIN ( SELECT historico_bem.cod_bem , historico_bem.cod_local , historico_bem.cod_situacao @@ -875,6 +879,7 @@ class TPatrimonioBem extends Persistente AND historico_bem.timestamp = historico_bem_max.timestamp ) AS historico_bem ON historico_bem.cod_bem = bem.cod_bem + LEFT JOIN ( SELECT apolice_bem.cod_bem , apolice_bem.cod_apolice , apolice_bem.timestamp @@ -888,10 +893,13 @@ class TPatrimonioBem extends Persistente AND apolice_bem_max.timestamp = apolice_bem.timestamp ) AS apolice_bem ON apolice_bem.cod_bem = bem.cod_bem + LEFT JOIN patrimonio.apolice ON apolice.cod_apolice = apolice_bem.cod_apolice - LEFT JOIN patrimonio.situacao_bem + + LEFT JOIN patrimonio.situacao_bem ON situacao_bem.cod_situacao = historico_bem.cod_situacao + LEFT JOIN ( SELECT bem_responsavel.cod_bem , bem_responsavel.numcgm , bem_responsavel.dt_inicio @@ -911,8 +919,10 @@ class TPatrimonioBem extends Persistente ) AS bem_responsavel ON bem_responsavel.cod_bem = bem.cod_bem + LEFT JOIN sw_cgm AS fornecedor ON fornecedor.numcgm = bem.numcgm + LEFT JOIN ( SELECT bem_marca.cod_bem , bem_marca.cod_marca , marca.descricao @@ -921,6 +931,24 @@ class TPatrimonioBem extends Persistente ON bem_marca.cod_marca = marca.cod_marca ) AS bem_marca ON bem.cod_bem = bem_marca.cod_bem + + LEFT JOIN ( SELECT depreciacao.cod_bem + , TO_CHAR(depreciacao.dt_depreciacao, 'DD/MM/YYYY') AS dt_depreciacao + FROM patrimonio.depreciacao + + LEFT JOIN patrimonio.depreciacao_anulada + ON depreciacao.cod_bem = depreciacao_anulada.cod_bem + AND depreciacao.cod_depreciacao = depreciacao_anulada.cod_depreciacao + AND depreciacao.timestamp = depreciacao_anulada.timestamp + + WHERE depreciacao_anulada.cod_depreciacao IS NULL + AND depreciacao.timestamp = ( SELECT max(depreciacao_interna.timestamp) + FROM patrimonio.depreciacao AS depreciacao_interna + WHERE depreciacao_interna.cod_bem = depreciacao.cod_bem + AND SUBSTRING(depreciacao_interna.competencia, 1,4) = '".Sessao::getExercicio()."' ) + ) AS depreciacao + ON depreciacao.cod_bem = bem.cod_bem + WHERE "; if ( $this->getDado('cod_bem') ) { $stSql.= " bem.cod_bem = ".$this->getDado('cod_bem')." AND "; @@ -1283,8 +1311,6 @@ class TPatrimonioBem extends Persistente if ( $this->getDado('cod_bem') ) { $stSql.= " bem.cod_bem = ".$this->getDado('cod_bem')." AND "; } - - //echo substr($stSql,0,-6); return substr($stSql,0,-6); } @@ -1499,5 +1525,51 @@ class TPatrimonioBem extends Persistente return $stSql; } + public function recuperaValorDepreciacao(&$rsRecordSet, $stFiltro = "", $stOrdem = "", $boTransacao = "") + { + $obErro = new Erro; + $obConexao = new Conexao; + $rsRecordSet = new RecordSet; + $stSql = $this->montaRecuperaValorDepreciacao().$stFiltro.$stOrdem; + $this->stDebug = $stSql; + $obErro = $obConexao->executaSQL($rsRecordSet, $stSql, $boTransacao); + + return $obErro; + } + + public function montaRecuperaValorDepreciacao() + { + $stSql = " SELECT retorno.cod_bem + , retorno.vl_acumulado + , retorno.vl_atualizado + , retorno.vl_bem + , TO_CHAR(depreciacao.dt_depreciacao, 'DD/MM/YYYY') AS dt_depreciacao + + FROM patrimonio.fn_depreciacao_acumulada(".$this->getDado('cod_bem').") + AS retorno ( cod_bem INTEGER + , vl_acumulado NUMERIC(14,2) + , vl_atualizado NUMERIC(14,2) + , vl_bem NUMERIC(14,2) + , min_competencia VARCHAR + , max_competencia VARCHAR + ) + + INNER JOIN patrimonio.depreciacao + ON retorno.cod_bem = depreciacao.cod_bem + + LEFT JOIN patrimonio.depreciacao_anulada + ON depreciacao.cod_bem = depreciacao_anulada.cod_bem + AND depreciacao.cod_depreciacao = depreciacao_anulada.cod_depreciacao + AND depreciacao.timestamp = depreciacao_anulada.timestamp + + WHERE depreciacao_anulada.cod_depreciacao IS NULL + AND depreciacao.timestamp = ( SELECT max(depreciacao_interna.timestamp) + FROM patrimonio.depreciacao AS depreciacao_interna + WHERE depreciacao_interna.cod_bem = depreciacao.cod_bem + AND SUBSTRING(depreciacao_interna.competencia, 1,4) = '".Sessao::getExercicio()."' )"; + + return $stSql; + } + } ?> \ No newline at end of file diff --git a/gestaoPatrimonial/fontes/PHP/patrimonio/instancias/bem/FMManterConsultarBem.php b/gestaoPatrimonial/fontes/PHP/patrimonio/instancias/bem/FMManterConsultarBem.php index 87a473f..466ea0a 100644 --- a/gestaoPatrimonial/fontes/PHP/patrimonio/instancias/bem/FMManterConsultarBem.php +++ b/gestaoPatrimonial/fontes/PHP/patrimonio/instancias/bem/FMManterConsultarBem.php @@ -34,7 +34,7 @@ * Casos de uso: uc-03.01.06 - $Id: FMManterConsultarBem.php 61776 2015-03-03 17:41:03Z carlos.silva $ + $Id: FMManterConsultarBem.php 63945 2015-11-10 18:53:13Z arthur $ */ @@ -46,6 +46,7 @@ include_once CAM_GP_PAT_MAPEAMENTO."TPatrimonioBemAtributoEspecie.class.php"; include_once CAM_GA_ADM_NEGOCIO."RCadastroDinamico.class.php"; include_once CAM_FW_HTML."MontaAtributos.class.php"; include_once CAM_GP_PAT_MAPEAMENTO."TPatrimonioBemProcesso.class.php"; +include_once CAM_GP_PAT_MAPEAMENTO."TPatrimonioReavaliacao.class.php"; $stPrograma = "ManterConsultarBem"; $pgFilt = "FL".$stPrograma.".php"; @@ -61,11 +62,16 @@ $stAcao = $request->get('stAcao'); //recupera os dados do bem $obTPatrimonioBem = new TPatrimonioBem(); -$obTPatrimonioBem->setDado( 'cod_bem', $_REQUEST['inCodBem'] ); +$obTPatrimonioBem->setDado( 'cod_bem', $request->get('inCodBem') ); $obTPatrimonioBem->recuperaRelacionamentoAnalitico( $rsBem ); +$obTPatrimonioBem->recuperaValorDepreciacao( $rsDepreciacao ); + +$obTPatrimonioReavaliacao = new TPatrimonioReavaliacao(); +$obTPatrimonioReavaliacao->setDado( 'cod_bem', $request->get('inCodBem') ); +$obTPatrimonioReavaliacao->recuperaUltimaReavaliacao ( $rsUltimaReavaliacao ); $obTPatrimonioBemProcesso = new TPatrimonioBemProcesso(); -$obTPatrimonioBemProcesso->setDado( 'cod_bem', $_REQUEST['inCodBem'] ); +$obTPatrimonioBemProcesso->setDado( 'cod_bem', $request->get('inCodBem') ); $obTPatrimonioBemProcesso->recuperaPorChave( $rsBemProcesso ); //cria um novo formulario @@ -128,15 +134,20 @@ $obLblValorBem = new Label(); $obLblValorBem->setRotulo( 'Valor do Bem' ); $obLblValorBem->setValue( number_format($rsBem->getCampo('vl_bem'),2,',','.') ); -//label para o valor da depreciacao -$obLblValorDepreciacao = new Label(); -$obLblValorDepreciacao->setRotulo( 'Valor da Depreciação' ); -$obLblValorDepreciacao->setValue( number_format($rsBem->getCampo('vl_depreciacao'),2,',','.') ); +//label para o valor da depreciacao Inicial +$obLblValorDepreciacaoInicial = new Label(); +$obLblValorDepreciacaoInicial->setRotulo( 'Valor da Depreciação Inicial' ); +$obLblValorDepreciacaoInicial->setValue( $rsBem->getCampo( 'vl_depreciacao' ) != '' ? number_format($rsBem->getCampo( 'vl_depreciacao' ),2,',','.') : '0,00' ); + +//label para o valor da depreciacao Acumulada +$obLblDepreciacaoAcumuladaExercicio = new Label(); +$obLblDepreciacaoAcumuladaExercicio->setRotulo( 'Depreciação Acumulada' ); +$obLblDepreciacaoAcumuladaExercicio->setValue( $rsDepreciacao->getCampo('vl_acumulado') != '' ? number_format($rsDepreciacao->getCampo('vl_acumulado'),2,',','.') : '0,00'); //label para a data da depreciação $obLblDataDepreciacao = new Label(); $obLblDataDepreciacao->setRotulo( 'Data da Depreciação' ); -$obLblDataDepreciacao->setValue( $rsBem->getCampo('dt_depreciacao') ); +$obLblDataDepreciacao->setValue( $rsDepreciacao->getCampo('dt_depreciacao') ); //label para a data da aquisicao $obLblDataAquisicao = new Label(); @@ -264,6 +275,14 @@ $obLblMotivoBaixa = new Label(); $obLblMotivoBaixa->setRotulo( 'Motivo' ); $obLblMotivoBaixa->setValue( $rsBem->getCampo('motivo') ); +$obLblDataUltimaReavaliacao = new Label(); +$obLblDataUltimaReavaliacao->setRotulo ( 'Data Última Reavaliação' ); +$obLblDataUltimaReavaliacao->setValue ( $rsUltimaReavaliacao->getCampo('dt_reavaliacao') ); + +$obLblValorltimaReavaliacao = new Label(); +$obLblValorltimaReavaliacao->setRotulo ( 'Valor Última Reavaliação' ); +$obLblValorltimaReavaliacao->setValue ( $rsUltimaReavaliacao->getCampo('vl_reavaliacao') != '' ? number_format($rsUltimaReavaliacao->getCampo('vl_reavaliacao'),2,',','.') : '0,00'); + //cria um button para a acao voltar $obBtnVoltar = new Button; $obBtnVoltar->setName ( "btnVoltar" ); @@ -317,8 +336,6 @@ $obFormulario->addComponente( $obProcessoLicitatorio ); $obFormulario->addComponente( $obLblDetalhamentoBem ); $obFormulario->addComponente( $obLblFornecedor ); $obFormulario->addComponente( $obLblValorBem ); -$obFormulario->addComponente( $obLblValorDepreciacao ); -$obFormulario->addComponente( $obLblDataDepreciacao ); $obFormulario->addComponente( $obLblDataAquisicao ); $obFormulario->addComponente( $obLblVencimentoGarantia ); $obFormulario->addComponente( $obLblNumeroPlaca ); @@ -341,6 +358,13 @@ switch (SistemaLegado::pegaConfiguracao('cod_uf', 2, Sessao::getExercicio())) { break; } +$obFormulario->addTitulo ( 'Depreciação Inicial / Última Reavaliação' ); +$obFormulario->addComponente ( $obLblValorDepreciacaoInicial ); +$obFormulario->addComponente ( $obLblDepreciacaoAcumuladaExercicio ); +$obFormulario->addComponente ( $obLblDataDepreciacao ); +$obFormulario->addComponente ( $obLblDataUltimaReavaliacao ); +$obFormulario->addComponente ( $obLblValorltimaReavaliacao ); + $obFormulario->addTitulo ( 'Responsável' ); $obFormulario->addComponente( $obLblResponsavel ); $obFormulario->addComponente( $obLblDtInicioResponsavel ); diff --git a/gestaoPatrimonial/fontes/PHP/patrimonio/instancias/bem/LSManterBem.php b/gestaoPatrimonial/fontes/PHP/patrimonio/instancias/bem/LSManterBem.php index 32e4b9e..61d0e71 100644 --- a/gestaoPatrimonial/fontes/PHP/patrimonio/instancias/bem/LSManterBem.php +++ b/gestaoPatrimonial/fontes/PHP/patrimonio/instancias/bem/LSManterBem.php @@ -40,19 +40,9 @@ * Casos de uso: uc-03.01.06 */ -/* -$Log$ -Revision 1.2 2007/10/17 13:27:03 hboaventura -correção dos arquivos - -Revision 1.1 2007/10/05 12:59:35 hboaventura -inclusão dos arquivos - -*/ - include_once '../../../../../../gestaoAdministrativa/fontes/PHP/pacotes/FrameworkHTML.inc.php'; include_once '../../../../../../gestaoAdministrativa/fontes/PHP/framework/include/cabecalho.inc.php'; -include_once( CAM_GP_PAT_MAPEAMENTO."TPatrimonioBem.class.php"); +include_once CAM_GP_PAT_MAPEAMENTO.'TPatrimonioBem.class.php'; $stPrograma = "ManterBem"; $pgFilt = "FL".$stPrograma.".php"; @@ -63,7 +53,7 @@ $pgProc = "PR".$stPrograma.".php"; $pgOcul = "OC".$stPrograma.".php"; $pgJs = "JS".$stPrograma.".js"; -$stAcao = $_POST["stAcao"] ? $_POST["stAcao"] : $_GET["stAcao"]; +$stAcao = $request->get('stAcao'); //seta o caminho para a popup de exclusao $stCaminho = CAM_GP_PAT_INSTANCIAS."bem/"; @@ -74,12 +64,12 @@ if ( !Sessao::read('paginando') ) { foreach ($_POST as $stCampo => $stValor) { $arFiltro[$stCampo] = $stValor; } - Sessao::write('pg',($_GET['pg'] ? $_GET['pg'] : 0)); - Sessao::write('pos',($_GET['pos']? $_GET['pos'] : 0)); + Sessao::write('pg',($request->get('pg') ? $request->get('pg') : 0)); + Sessao::write('pos',($request->get('pos') ? $request->get('pos') : 0)); Sessao::write('paginando',true); } else { - Sessao::write('pg',$_GET['pg']); - Sessao::write('pos',$_GET['pos']); + Sessao::write('pg',$request->get('pg')); + Sessao::write('pos',$request->get('pos')); } if ($arFiltro) { @@ -142,7 +132,7 @@ if ($_REQUEST['inValorDepreciacao'] != '') { } //data depreciacao if ($_REQUEST['stDataInicialDepreciacao'] != '') { - $stFiltro .= " AND bem.dt_depreciacao BETWEEN TO_DATE('".$_REQUEST['stDataInicialDepreciacao']."','dd/mm/yyyy') AND TO_DATE('".$_REQUEST['stDataFinalDepreciacao']."','dd/mm/yyyy') "; + $stFiltro .= " AND depreciacao.dt_depreciacao BETWEEN TO_DATE('".$_REQUEST['stDataInicialDepreciacao']."','dd/mm/yyyy') AND TO_DATE('".$_REQUEST['stDataFinalDepreciacao']."','dd/mm/yyyy') "; } //data aquisicao if ($_REQUEST['stDataInicialAquisicao'] != '') { diff --git a/gestaoPatrimonial/fontes/PHP/patrimonio/instancias/bem/OCManterBem.php b/gestaoPatrimonial/fontes/PHP/patrimonio/instancias/bem/OCManterBem.php index 5f57f48..32ed48e 100644 --- a/gestaoPatrimonial/fontes/PHP/patrimonio/instancias/bem/OCManterBem.php +++ b/gestaoPatrimonial/fontes/PHP/patrimonio/instancias/bem/OCManterBem.php @@ -29,22 +29,25 @@ * @author Analista: Gelson W. Gonçalves * @author Desenvolvedor: Henrique Boaventura - * $Id: OCManterBem.php 62897 2015-07-06 21:55:07Z jean $ + * $Id: OCManterBem.php 63918 2015-11-06 17:37:51Z michel $ */ include_once '../../../../../../gestaoAdministrativa/fontes/PHP/pacotes/FrameworkHTML.inc.php'; include_once '../../../../../../gestaoAdministrativa/fontes/PHP/framework/include/valida.inc.php'; -include_once( CAM_GA_ADM_NEGOCIO."RCadastroDinamico.class.php" ); -include_once( CAM_FW_HTML."MontaAtributos.class.php" ); -include_once( CAM_GP_PAT_MAPEAMENTO."TPatrimonioEspecieAtributo.class.php"); -include_once( CAM_GP_PAT_MAPEAMENTO."TPatrimonioBemAtributoEspecie.class.php"); -include_once( CAM_GP_PAT_MAPEAMENTO.'TPatrimonioApolice.class.php' ); -include_once( CAM_GP_PAT_MAPEAMENTO.'TPatrimonioBem.class.php' ); -include_once( CAM_GP_PAT_MAPEAMENTO.'TPatrimonioBemPlanoAnalitica.class.php' ); -include_once( CAM_GP_PAT_MAPEAMENTO.'TPatrimonioDepreciacao.class.php'); -include_once( CAM_GP_PAT_MAPEAMENTO.'TPatrimonioReavaliacao.class.php'); -include_once( CAM_GF_ORC_MAPEAMENTO.'TOrcamentoEntidade.class.php' ); +include_once CAM_GA_ADM_NEGOCIO."RCadastroDinamico.class.php"; +include_once CAM_FW_HTML."MontaAtributos.class.php"; +include_once CAM_GP_PAT_MAPEAMENTO."TPatrimonioEspecieAtributo.class.php"; +include_once CAM_GP_PAT_MAPEAMENTO."TPatrimonioBemAtributoEspecie.class.php"; +include_once CAM_GP_PAT_MAPEAMENTO.'TPatrimonioApolice.class.php'; +include_once CAM_GP_PAT_MAPEAMENTO.'TPatrimonioBem.class.php'; +include_once CAM_GP_PAT_MAPEAMENTO.'TPatrimonioBemPlanoAnalitica.class.php'; +include_once CAM_GP_PAT_MAPEAMENTO.'TPatrimonioDepreciacao.class.php'; +include_once CAM_GP_PAT_MAPEAMENTO.'TPatrimonioReavaliacao.class.php'; +include_once CAM_GF_ORC_MAPEAMENTO.'TOrcamentoEntidade.class.php'; +include_once CAM_GA_ADM_MAPEAMENTO."TAdministracaoConfiguracao.class.php"; +require_once CAM_GA_ADM_MAPEAMENTO."TAdministracaoAtributoDinamico.class.php"; +include_once '../../../../../../gestaoAdministrativa/fontes/PHP/framework/componentes/Table/TableTree.class.php'; //Define o nome dos arquivos PHP $stPrograma = "ManterBem"; @@ -58,749 +61,722 @@ $pgJS = "JS".$stPrograma.".js"; $stCtrl = $_REQUEST['stCtrl']; switch ($stCtrl) { - -case 'montaPlacaIdentificacao': - include_once CAM_GA_ADM_MAPEAMENTO."TAdministracaoConfiguracao.class.php"; - - $obTAdministracaoConfiguracao = new TAdministracaoConfiguracao; - $obTAdministracaoConfiguracao->setDado('exercicio' , Sessao::getExercicio()); - $obTAdministracaoConfiguracao->setDado('cod_modulo' , 6); - $obTAdministracaoConfiguracao->pegaConfiguracao($boPlacaAlfa, 'placa_alfanumerica'); - - if ($_REQUEST['stPlacaIdentificacao'] == 'sim') { - $obTxtNumeroPlaca = new TextBox; - $obTxtNumeroPlaca->setId ('stNumeroPlaca'); - $obTxtNumeroPlaca->setName ('stNumeroPlaca'); - $obTxtNumeroPlaca->setTitle ('Informe o número da placa do bem.'); - $obTxtNumeroPlaca->setRotulo ('Número da Placa'); - - if ($_REQUEST['stAcao'] != 'consultar') { - $obTxtNumeroPlaca->setNull( false ); - } else { - $obTxtNumeroPlaca->setNull( true ); - } - - $obTPatrimonioBem = new TPatrimonioBem; - - # Defini se o campo será inteiro ou alfanumérico e recupera o ultimo valor. - if ($boPlacaAlfa == 'false') { - $obTxtNumeroPlaca->setInteiro(true); - $obTPatrimonioBem->recuperaMaxNumPlacaNumerico( $rsNumPlaca ); + case 'montaPlacaIdentificacao': + $obTAdministracaoConfiguracao = new TAdministracaoConfiguracao; + $obTAdministracaoConfiguracao->setDado('exercicio' , Sessao::getExercicio()); + $obTAdministracaoConfiguracao->setDado('cod_modulo' , 6); + $obTAdministracaoConfiguracao->pegaConfiguracao($boPlacaAlfa, 'placa_alfanumerica'); + + if ($_REQUEST['stPlacaIdentificacao'] == 'sim') { + $obTxtNumeroPlaca = new TextBox; + $obTxtNumeroPlaca->setId ('stNumeroPlaca'); + $obTxtNumeroPlaca->setName ('stNumeroPlaca'); + $obTxtNumeroPlaca->setTitle ('Informe o número da placa do bem.'); + $obTxtNumeroPlaca->setRotulo ('Número da Placa'); + + if ($_REQUEST['stAcao'] != 'consultar') { + $obTxtNumeroPlaca->setNull( false ); + } else { + $obTxtNumeroPlaca->setNull( true ); + } + + $obTPatrimonioBem = new TPatrimonioBem; + + # Defini se o campo será inteiro ou alfanumérico e recupera o ultimo valor. + if ($boPlacaAlfa == 'false') { + $obTxtNumeroPlaca->setInteiro(true); + $obTPatrimonioBem->recuperaMaxNumPlacaNumerico( $rsNumPlaca ); + } else { + $obTxtNumeroPlaca->setCaracteresAceitos("[a-zA-Z0-9\-]"); + $obTPatrimonioBem->recuperaMaxNumPlacaAlfanumerico( $rsNumPlaca ); + + # Incrementa o numero da placa e depois atribui ao componente. + } + + $maxNumeroPlaca = $rsNumPlaca->getCampo('num_placa'); + + # Sugere o nro máximo da placa e incrementa. + $obTxtNumeroPlaca->setValue( ++$maxNumeroPlaca ); + $obTxtNumeroPlaca->obEvento->setOnChange("montaParametrosGET('verificaIntervalo','stNumeroPlaca, inQtdeLote');"); + + $obFormulario = new Formulario; + $obFormulario->addComponente( $obTxtNumeroPlaca ); + $obFormulario->montaInnerHTML(); + + $stJs.= "jQuery('#spnNumeroPlaca').html('".$obFormulario->getHTML()."');"; } else { - $obTxtNumeroPlaca->setCaracteresAceitos("[a-zA-Z0-9\-]"); - $obTPatrimonioBem->recuperaMaxNumPlacaAlfanumerico( $rsNumPlaca ); - - # Incrementa o numero da placa e depois atribui ao componente. + $stJs.= "jQuery('#spnNumeroPlaca').html('');"; } - $maxNumeroPlaca = $rsNumPlaca->getCampo('num_placa'); - - # Sugere o nro máximo da placa e incrementa. - $obTxtNumeroPlaca->setValue( ++$maxNumeroPlaca ); - $obTxtNumeroPlaca->obEvento->setOnChange("montaParametrosGET('verificaIntervalo','stNumeroPlaca, inQtdeLote');"); - - # $obTxtNumeroPlaca->setValue($_REQUEST['stNumPlaca']); - - $obFormulario = new Formulario; - $obFormulario->addComponente( $obTxtNumeroPlaca ); - $obFormulario->montaInnerHTML(); - - $stJs.= "jQuery('#spnNumeroPlaca').html('".$obFormulario->getHTML()."');"; - } else { - $stJs.= "jQuery('#spnNumeroPlaca').html('');"; - } - break; -case 'montaPlacaIdentificacaoLote': - - include_once( CAM_GA_ADM_MAPEAMENTO."TAdministracaoConfiguracao.class.php"); - $obTAdministracaoConfiguracao = new TAdministracaoConfiguracao(); - $obTAdministracaoConfiguracao->setDado( 'exercicio', Sessao::getExercicio() ); - $obTAdministracaoConfiguracao->setDado( 'cod_modulo', 6 ); - $obTAdministracaoConfiguracao->pegaConfiguracao( $boPlacaAlfa, 'placa_alfanumerica' ); - - if ($_REQUEST['stPlacaIdentificacao'] == 'sim') { - $obTxtNumeroPlaca = new TextBox(); - $obTxtNumeroPlaca->setRotulo( 'Número da Placa' ); - $obTxtNumeroPlaca->setTitle( 'Informe o número da placa do bem.' ); - $obTxtNumeroPlaca->setName( 'stNumeroPlaca' ); - $obTxtNumeroPlaca->setId( 'stNumeroPlaca' ); - - if ($boPlacaAlfa == 'false') { - $obTxtNumeroPlaca->setInteiro (true); - } else { - $obTxtNumeroPlaca->setCaracteresAceitos( "[a-zA-Z0-9\-]" ); - } - - if ($_REQUEST['stAcao'] == 'consultar') { - $obTxtNumeroPlaca->setNull( true ); - } else { - $obTxtNumeroPlaca->setNull( false ); - } - - $obTxtNumeroPlaca->setValue( $_REQUEST['stNumPlaca'] ); - - if ($_REQUEST['recuperaMax'] == 'true') { - - $obTPatrimonioBem = new TPatrimonioBem(); - - if ($boPlacaAlfa == 'true') { - $obTPatrimonioBem->recuperaMaxNumPlacaAlfanumerico($rsNumPlaca); - $maxNumeroPlaca = $rsNumPlaca->getCampo('num_placa'); + case 'montaPlacaIdentificacaoLote': + $obTAdministracaoConfiguracao = new TAdministracaoConfiguracao(); + $obTAdministracaoConfiguracao->setDado( 'exercicio', Sessao::getExercicio() ); + $obTAdministracaoConfiguracao->setDado( 'cod_modulo', 6 ); + $obTAdministracaoConfiguracao->pegaConfiguracao( $boPlacaAlfa, 'placa_alfanumerica' ); + + if ($_REQUEST['stPlacaIdentificacao'] == 'sim') { + $obTxtNumeroPlaca = new TextBox(); + $obTxtNumeroPlaca->setRotulo( 'Número da Placa' ); + $obTxtNumeroPlaca->setTitle( 'Informe o número da placa do bem.' ); + $obTxtNumeroPlaca->setName( 'stNumeroPlaca' ); + $obTxtNumeroPlaca->setId( 'stNumeroPlaca' ); + + if ($boPlacaAlfa == 'false') { + $obTxtNumeroPlaca->setInteiro (true); } else { - $obTPatrimonioBem->recuperaMaxNumPlacaNumerico($rsNumPlaca); - - if ( $rsNumPlaca->getNumLinhas() <=0 ) { - $inMaiorNumeroPlaca = 0; + $obTxtNumeroPlaca->setCaracteresAceitos( "[a-zA-Z0-9\-]" ); + } + + if ($_REQUEST['stAcao'] == 'consultar') { + $obTxtNumeroPlaca->setNull( true ); + } else { + $obTxtNumeroPlaca->setNull( false ); + } + + $obTxtNumeroPlaca->setValue( $_REQUEST['stNumPlaca'] ); + + if ($_REQUEST['recuperaMax'] == 'true') { + $obTPatrimonioBem = new TPatrimonioBem(); + + if ($boPlacaAlfa == 'true') { + $obTPatrimonioBem->recuperaMaxNumPlacaAlfanumerico($rsNumPlaca); + $maxNumeroPlaca = $rsNumPlaca->getCampo('num_placa'); } else { - $inMaiorNumeroPlaca = $rsNumPlaca->getCampo('num_placa'); + $obTPatrimonioBem->recuperaMaxNumPlacaNumerico($rsNumPlaca); + + if ( $rsNumPlaca->getNumLinhas() <=0 ) { + $inMaiorNumeroPlaca = 0; + } else { + $inMaiorNumeroPlaca = $rsNumPlaca->getCampo('num_placa'); + } + + $maxNumeroPlaca = $inMaiorNumeroPlaca; } - - $maxNumeroPlaca = $inMaiorNumeroPlaca; + + $maxNumeroPlaca++; + + // Incrementa o numero da placa e depois atribui ao componente!! + $obTxtNumeroPlaca->setValue( $maxNumeroPlaca ); } - - $maxNumeroPlaca++; - - // Incrementa o numero da placa e depois atribui ao componente!! - $obTxtNumeroPlaca->setValue( $maxNumeroPlaca ); + + $obTxtNumeroPlaca->obEvento->setOnChange( "montaParametrosGET( 'verificaIntervalo','stNumeroPlaca,inQtdeLote' );" ); + + $obFormulario = new Formulario(); + $obFormulario->addComponente( $obTxtNumeroPlaca ); + $obFormulario->montaInnerHTML(); + + $stJs.= "$('spnNumeroPlaca').innerHTML = '".$obFormulario->getHTML()."';"; + } else { + $stJs.= "$('spnNumeroPlaca').innerHTML = '';"; } - - $obTxtNumeroPlaca->obEvento->setOnChange( "montaParametrosGET( 'verificaIntervalo','stNumeroPlaca,inQtdeLote' );" ); - - $obFormulario = new Formulario(); - $obFormulario->addComponente( $obTxtNumeroPlaca ); - $obFormulario->montaInnerHTML(); - - $stJs.= "$('spnNumeroPlaca').innerHTML = '".$obFormulario->getHTML()."';"; - } else { - $stJs.= "$('spnNumeroPlaca').innerHTML = '';"; - } - break; - -case 'montaPlacaIdentificacaoFiltro': - if ($_REQUEST['stPlacaIdentificacao'] == 'sim') { - $obTxtNumeroPlaca = new TextBox(); - $obTxtNumeroPlaca->setRotulo( 'Número da Placa' ); - $obTxtNumeroPlaca->setTitle( 'Informe o número da placa do bem.' ); - $obTxtNumeroPlaca->setName( 'stNumeroPlaca' ); - $obTxtNumeroPlaca->setNull( true ); - - $obTipoBuscaNumeroPlaca = new TipoBusca( $obTxtNumeroPlaca ); - - $obFormulario = new Formulario(); - $obFormulario->addComponente( $obTipoBuscaNumeroPlaca ); - $obFormulario->montaInnerHTML(); - - $stJs.= "$('spnNumeroPlaca').innerHTML = '".$obFormulario->getHTML()."';"; - } else { - $stJs.= "$('spnNumeroPlaca').innerHTML = '';"; - } break; -case 'montaAtributos' : - - if ($_REQUEST['stCodClassificacao']) { - $arClassificacao = explode( '.',$_REQUEST['stCodClassificacao'] ); - list( $_REQUEST['inCodNatureza'], $_REQUEST['inCodGrupo'], $_REQUEST['inCodEspecie'] ) = $arClassificacao; - } - - if ($_REQUEST['inCodEspecie'] OR $_REQUEST['stCodClassificacao']) { - - $obRCadastroDinamico = new RCadastroDinamico(); - $obRCadastroDinamico->setCodCadastro( 1 ); - $obRCadastroDinamico->obRModulo->setCodModulo( 6 ); - - if ($_REQUEST['inCodBem']) { - $obRCadastroDinamico->setChavePersistenteValores( array( 'cod_bem' => $_REQUEST['inCodBem'], 'cod_especie' => $_REQUEST['inCodEspecie'], 'cod_grupo' => $_REQUEST['inCodGrupo'] ,'cod_natureza' => $_REQUEST['inCodNatureza'] ) ); - $obRCadastroDinamico->setPersistenteAtributos( new TPatrimonioEspecieAtributo ); - $obRCadastroDinamico->setPersistenteValores( new TPatrimonioBemAtributoEspecie ); - $obRCadastroDinamico->recuperaAtributosSelecionadosValores( $rsAtributosAux ); + case 'montaPlacaIdentificacaoFiltro': + if ($_REQUEST['stPlacaIdentificacao'] == 'sim') { + $obTxtNumeroPlaca = new TextBox(); + $obTxtNumeroPlaca->setRotulo( 'Número da Placa' ); + $obTxtNumeroPlaca->setTitle( 'Informe o número da placa do bem.' ); + $obTxtNumeroPlaca->setName( 'stNumeroPlaca' ); + $obTxtNumeroPlaca->setNull( true ); + + $obTipoBuscaNumeroPlaca = new TipoBusca( $obTxtNumeroPlaca ); + + $obFormulario = new Formulario(); + $obFormulario->addComponente( $obTipoBuscaNumeroPlaca ); + $obFormulario->montaInnerHTML(); + + $stJs.= "$('spnNumeroPlaca').innerHTML = '".$obFormulario->getHTML()."';"; } else { - $obRCadastroDinamico->setChavePersistenteValores( array( 'cod_especie' => $_REQUEST['inCodEspecie'], 'cod_grupo' => $_REQUEST['inCodGrupo'] ,'cod_natureza' => $_REQUEST['inCodNatureza'] ) ); - $obRCadastroDinamico->recuperaAtributosSelecionados( $rsAtributosAux ); + $stJs.= "$('spnNumeroPlaca').innerHTML = '';"; } + break; - //recupera os registros da table patrimonio.especie_atributo que estão ativos - $obTPatrimonioEspecieAtributo = new TPatrimonioEspecieAtributo(); - $obTPatrimonioEspecieAtributo->setDado( 'cod_modulo', 6 ); - $obTPatrimonioEspecieAtributo->setDado( 'cod_cadastro', 1 ); - $obTPatrimonioEspecieAtributo->setDado( 'cod_especie', $_REQUEST['inCodEspecie'] ); - $obTPatrimonioEspecieAtributo->setDado( 'cod_grupo', $_REQUEST['inCodGrupo'] ); - $obTPatrimonioEspecieAtributo->setDado( 'cod_natureza', $_REQUEST['inCodNatureza'] ); - $obTPatrimonioEspecieAtributo->setDado( 'ativo', 'true' ); - $obTPatrimonioEspecieAtributo->recuperaEspecieAtributo( $rsAtributosAtivos ); - - $arAtivas = array(); - - while ( !$rsAtributosAtivos->eof() ) { - $arAtivas[] = $rsAtributosAtivos->getCampo('cod_atributo'); - $rsAtributosAtivos->proximo(); + case 'montaAtributos' : + if ($_REQUEST['stCodClassificacao']) { + $arClassificacao = explode( '.',$_REQUEST['stCodClassificacao'] ); + list( $_REQUEST['inCodNatureza'], $_REQUEST['inCodGrupo'], $_REQUEST['inCodEspecie'] ) = $arClassificacao; } - - $rsAtributos = new RecordSet(); - - for ( $i = 0; $i < $rsAtributosAux->getNumLinhas(); $i++ ) { - if ( in_array( $rsAtributosAux->arElementos[$i]['cod_atributo'], $arAtivas ) ) { - $rsAtributos->add( $rsAtributosAux->arElementos[$i] ); + + if ($_REQUEST['inCodEspecie'] OR $_REQUEST['stCodClassificacao']) { + $obRCadastroDinamico = new RCadastroDinamico(); + $obRCadastroDinamico->setCodCadastro( 1 ); + $obRCadastroDinamico->obRModulo->setCodModulo( 6 ); + + if ($_REQUEST['inCodBem']) { + $obRCadastroDinamico->setChavePersistenteValores( array( 'cod_bem' => $_REQUEST['inCodBem'], 'cod_especie' => $_REQUEST['inCodEspecie'], 'cod_grupo' => $_REQUEST['inCodGrupo'] ,'cod_natureza' => $_REQUEST['inCodNatureza'] ) ); + $obRCadastroDinamico->setPersistenteAtributos( new TPatrimonioEspecieAtributo ); + $obRCadastroDinamico->setPersistenteValores( new TPatrimonioBemAtributoEspecie ); + $obRCadastroDinamico->recuperaAtributosSelecionadosValores( $rsAtributosAux ); + } else { + $obRCadastroDinamico->setChavePersistenteValores( array( 'cod_especie' => $_REQUEST['inCodEspecie'], 'cod_grupo' => $_REQUEST['inCodGrupo'] ,'cod_natureza' => $_REQUEST['inCodNatureza'] ) ); + $obRCadastroDinamico->recuperaAtributosSelecionados( $rsAtributosAux ); + } + + //recupera os registros da table patrimonio.especie_atributo que estão ativos + $obTPatrimonioEspecieAtributo = new TPatrimonioEspecieAtributo(); + $obTPatrimonioEspecieAtributo->setDado( 'cod_modulo', 6 ); + $obTPatrimonioEspecieAtributo->setDado( 'cod_cadastro', 1 ); + $obTPatrimonioEspecieAtributo->setDado( 'cod_especie', $_REQUEST['inCodEspecie'] ); + $obTPatrimonioEspecieAtributo->setDado( 'cod_grupo', $_REQUEST['inCodGrupo'] ); + $obTPatrimonioEspecieAtributo->setDado( 'cod_natureza', $_REQUEST['inCodNatureza'] ); + $obTPatrimonioEspecieAtributo->setDado( 'ativo', 'true' ); + $obTPatrimonioEspecieAtributo->recuperaEspecieAtributo( $rsAtributosAtivos ); + + $arAtivas = array(); + + while ( !$rsAtributosAtivos->eof() ) { + $arAtivas[] = $rsAtributosAtivos->getCampo('cod_atributo'); + $rsAtributosAtivos->proximo(); + } + + $rsAtributos = new RecordSet(); + + for ( $i = 0; $i < $rsAtributosAux->getNumLinhas(); $i++ ) { + if ( in_array( $rsAtributosAux->arElementos[$i]['cod_atributo'], $arAtivas ) ) { + $rsAtributos->add( $rsAtributosAux->arElementos[$i] ); + } + } + + //monta os atributos dinamicos + $obMontaAtributos = new MontaAtributos; + $obMontaAtributos->setTitulo ( "Atributos" ); + $obMontaAtributos->setName ( "Atributo_" ); + $obMontaAtributos->setRecordSet ( $rsAtributos ); + $obMontaAtributos->recuperaValores(); + + if ( $rsAtributos->getNumLinhas() > 0 ) { + $obFormulario = new Formulario(); + $obMontaAtributos->geraFormulario( $obFormulario ); + $obFormulario->montaInnerHTML(); + + //passa pela sessão o recordset de atributos para fazer a verificação no PR + Sessao::write('rsAtributosDinamicos',$rsAtributosDinamicos); + + $stJs.= "$('spnAtributos').innerHTML = '".$obFormulario->getHTML()."';"; + } else { + //reseta o transf + Sessao::remove('rsAtributosDinamicos'); + $stJs.= "$('spnAtributos').innerHTML = '';"; } + } else { + $stJs.= "$('spnAtributos').innerHTML = '';"; } + break; - //monta os atributos dinamicos - $obMontaAtributos = new MontaAtributos; - $obMontaAtributos->setTitulo ( "Atributos" ); - $obMontaAtributos->setName ( "Atributo_" ); - $obMontaAtributos->setRecordSet ( $rsAtributos ); - $obMontaAtributos->recuperaValores(); - - if ( $rsAtributos->getNumLinhas() > 0 ) { + case 'montaApolice' : + //monta o span com os dados da apólice + if ($_REQUEST['stApolice'] == 'sim') { + //recupera todas as seguradoras + $obTPatrimonioApolice = new TPatrimonioApolice(); + $obTPatrimonioApolice->recuperaSeguradoras( $rsSeguradoras, 'ORDER BY nom_seguradora' ); + + $obSelectSeguradora = new Select(); + $obSelectSeguradora->setName( 'inCodSeguradora' ); + $obSelectSeguradora->setRotulo( 'Seguradora' ); + $obSelectSeguradora->setTitle( 'Seleciona a seguradora.' ); + $obSelectSeguradora->addOption( '','Selecione' ); + $obSelectSeguradora->setCampoId( 'num_seguradora' ); + $obSelectSeguradora->setCampoDesc( 'nom_seguradora' ); + $obSelectSeguradora->preencheCombo( $rsSeguradoras ); + $obSelectSeguradora->obEvento->setOnChange( "montaParametrosGET( 'preencheApolice', 'inCodSeguradora' );" ); + $obSelectSeguradora->setValue( $_REQUEST['inCodSeguradora'] ); + $obSelectSeguradora->setNull( false ); + + $obSelectApolice = new Select(); + $obSelectApolice->setName( 'inCodApolice' ); + $obSelectApolice->setId( 'inCodApolice' ); + $obSelectApolice->setRotulo( 'Apólice' ); + $obSelectApolice->setTitle( 'Selecione a apólice.' ); + $obSelectApolice->addOption( '','Selecione' ); + $obSelectApolice->setNull( false ); + $obFormulario = new Formulario(); - $obMontaAtributos->geraFormulario( $obFormulario ); + $obFormulario->addComponente( $obSelectSeguradora ); + $obFormulario->addComponente( $obSelectApolice ); $obFormulario->montaInnerHTML(); - - //passa pela sessão o recordset de atributos para fazer a verificação no PR - Sessao::write('rsAtributosDinamicos',$rsAtributosDinamicos); - - $stJs.= "$('spnAtributos').innerHTML = '".$obFormulario->getHTML()."';"; + + $stJs .= "$('spnApolice').innerHTML = '".$obFormulario->getHTML()."';"; } else { - //reseta o transf - Sessao::remove('rsAtributosDinamicos'); - $stJs.= "$('spnAtributos').innerHTML = '';"; + $stJs .= "$('spnApolice').innerHTML = '';"; } - } else { - $stJs.= "$('spnAtributos').innerHTML = '';"; - } break; -case 'montaApolice' : - //monta o span com os dados da apólice - if ($_REQUEST['stApolice'] == 'sim') { - //recupera todas as seguradoras - $obTPatrimonioApolice = new TPatrimonioApolice(); - $obTPatrimonioApolice->recuperaSeguradoras( $rsSeguradoras, 'ORDER BY nom_seguradora' ); - - $obSelectSeguradora = new Select(); - $obSelectSeguradora->setName( 'inCodSeguradora' ); - $obSelectSeguradora->setRotulo( 'Seguradora' ); - $obSelectSeguradora->setTitle( 'Seleciona a seguradora.' ); - $obSelectSeguradora->addOption( '','Selecione' ); - $obSelectSeguradora->setCampoId( 'num_seguradora' ); - $obSelectSeguradora->setCampoDesc( 'nom_seguradora' ); - $obSelectSeguradora->preencheCombo( $rsSeguradoras ); - $obSelectSeguradora->obEvento->setOnChange( "montaParametrosGET( 'preencheApolice', 'inCodSeguradora' );" ); - $obSelectSeguradora->setValue( $_REQUEST['inCodSeguradora'] ); - $obSelectSeguradora->setNull( false ); - - $obSelectApolice = new Select(); - $obSelectApolice->setName( 'inCodApolice' ); - $obSelectApolice->setId( 'inCodApolice' ); - $obSelectApolice->setRotulo( 'Apólice' ); - $obSelectApolice->setTitle( 'Selecione a apólice.' ); - $obSelectApolice->addOption( '','Selecione' ); - $obSelectApolice->setNull( false ); - - $obFormulario = new Formulario(); - $obFormulario->addComponente( $obSelectSeguradora ); - $obFormulario->addComponente( $obSelectApolice ); - $obFormulario->montaInnerHTML(); - - $stJs .= "$('spnApolice').innerHTML = '".$obFormulario->getHTML()."';"; - } else { - $stJs .= "$('spnApolice').innerHTML = '';"; - } - break; - -case 'preencheApolice' : - $stJs.= "limpaSelect($('inCodApolice'),1);"; - if ($_REQUEST['inCodSeguradora'] != '') { - $obTPatrimonioApolice = new TPatrimonioApolice(); - $obTPatrimonioApolice->setDado( 'numcgm', $_REQUEST['inCodSeguradora'] ); - $obTPatrimonioApolice->recuperaApoliceSeguradora( $rsApolices ); - - $inCount = 1; - while ( !$rsApolices->eof() ) { - $stSelected = ( $_REQUEST['inCodApolice'] == $rsApolices->getCampo( 'cod_apolice' ) ) ? 'selected' : ''; - $stJs .= "$('inCodApolice').options[".$inCount."] = new Option( '".$rsApolices->getCampo( 'num_apolice' ).' - '.$rsApolices->getCampo( 'dt_vencimento' )."','".$rsApolices->getCampo( 'cod_apolice' )."', '".$stSelected."' );"; - $inCount++; - $rsApolices->proximo(); + case 'preencheApolice' : + $stJs.= "limpaSelect($('inCodApolice'),1);"; + if ($_REQUEST['inCodSeguradora'] != '') { + $obTPatrimonioApolice = new TPatrimonioApolice(); + $obTPatrimonioApolice->setDado( 'numcgm', $_REQUEST['inCodSeguradora'] ); + $obTPatrimonioApolice->recuperaApoliceSeguradora( $rsApolices ); + + $inCount = 1; + while ( !$rsApolices->eof() ) { + $stSelected = ( $_REQUEST['inCodApolice'] == $rsApolices->getCampo( 'cod_apolice' ) ) ? 'selected' : ''; + $stJs .= "$('inCodApolice').options[".$inCount."] = new Option( '".$rsApolices->getCampo( 'num_apolice' ).' - '.$rsApolices->getCampo( 'dt_vencimento' )."','".$rsApolices->getCampo( 'cod_apolice' )."', '".$stSelected."' );"; + $inCount++; + $rsApolices->proximo(); + } } - } break; -case 'verificaIntervalo': - if ($_REQUEST['stNumeroPlaca'] != '' && $_REQUEST['inQtdeLote'] != '' && $_REQUEST['inQtdeLote'] > 0) { - $obTPatrimonioBem = new TPatrimonioBem(); - $arNumPlaca = array(); - $numeroPlaca = $_REQUEST['stNumeroPlaca']; - // monta um array com os números das placas possíveis de acordo com a - // quantidade informada - // A consulta é feita de forma fragmentada para não estourar o buffer do banco para a clausula IN - $inUltimo = 0; - for ($i=0; $i < $_REQUEST['inQtdeLote']; $i++) { - $arNumPlaca[] = "'".($numeroPlaca++)."'"; - if ( ($i % 1000) == 0 and $i > 0) { + case 'verificaIntervalo': + if ($_REQUEST['stNumeroPlaca'] != '' && $_REQUEST['inQtdeLote'] != '' && $_REQUEST['inQtdeLote'] > 0) { + $obTPatrimonioBem = new TPatrimonioBem(); + $arNumPlaca = array(); + $numeroPlaca = $_REQUEST['stNumeroPlaca']; + // monta um array com os números das placas possíveis de acordo com a + // quantidade informada + // A consulta é feita de forma fragmentada para não estourar o buffer do banco para a clausula IN + $inUltimo = 0; + for ($i=0; $i < $_REQUEST['inQtdeLote']; $i++) { + $arNumPlaca[] = "'".($numeroPlaca++)."'"; + if ( ($i % 1000) == 0 and $i > 0) { + $stFiltro = " WHERE num_placa IN (".implode("," ,$arNumPlaca).")"; + $arNumPlaca = array(); + $obTPatrimonioBem->recuperaTodos( $rsBem, $stFiltro ); + if ( $rsBem->getNumLinhas() > 0 ) { + break; + } + + } + } + if ( count($arNumPlaca) > 0 ) { $stFiltro = " WHERE num_placa IN (".implode("," ,$arNumPlaca).")"; - $arNumPlaca = array(); $obTPatrimonioBem->recuperaTodos( $rsBem, $stFiltro ); - if ( $rsBem->getNumLinhas() > 0 ) { - break; - } - } + + if ( $rsBem->getNumLinhas() >= 0 ) { + $intervalo = ($_REQUEST['inQtdeLote'] - 1) + $_REQUEST['stNumeroPlaca']; + $stJs.= "alertaAviso('Já existem bens com placas no intervalo selecionado (".$_REQUEST['stNumeroPlaca']." - ".$intervalo.")!','form','erro','".Sessao::getId()."');"; + break; + } + } - if ( count($arNumPlaca) > 0 ) { - $stFiltro = " WHERE num_placa IN (".implode("," ,$arNumPlaca).")"; - $obTPatrimonioBem->recuperaTodos( $rsBem, $stFiltro ); - } - - if ( $rsBem->getNumLinhas() >= 0 ) { - $intervalo = ($_REQUEST['inQtdeLote'] - 1) + $_REQUEST['stNumeroPlaca']; - $stJs.= "alertaAviso('Já existem bens com placas no intervalo selecionado (".$_REQUEST['stNumeroPlaca']." - ".$intervalo.")!','form','erro','".Sessao::getId()."');"; - break; - } - - } break; -case 'preencheComboEntidade' : - $stJs.= "limpaSelect($('inCodEntidade'),1);"; - if ($_REQUEST['stExercicio']) { - //cria o filtro - $stFiltro = " AND E.exercicio = '".$_REQUEST['stExercicio']."' "; - //recupera todos as entidades para o exercicio - - $obTOrcamentoEntidade = new TOrcamentoEntidade(); - $obTOrcamentoEntidade->recuperaRelacionamento( $rsEntidades, $stFiltro, ' ORDER BY cod_entidade ' ); - if ( $rsEntidades->getNumLinhas() > 0 ) { - $inCount = 1; - while ( !$rsEntidades->eof() ) { - if(( $_REQUEST['inCodEntidade'] == $rsEntidades->getCampo('cod_entidade') )){ - $stSelected = 'true'; - }else{ - $stSelected = 'false'; + case 'preencheComboEntidade' : + $stJs.= "limpaSelect($('inCodEntidade'),1);"; + if ($_REQUEST['stExercicio']) { + //cria o filtro + $stFiltro = " AND E.exercicio = '".$_REQUEST['stExercicio']."' "; + //recupera todos as entidades para o exercicio + + $obTOrcamentoEntidade = new TOrcamentoEntidade(); + $obTOrcamentoEntidade->recuperaRelacionamento( $rsEntidades, $stFiltro, ' ORDER BY cod_entidade ' ); + if ( $rsEntidades->getNumLinhas() > 0 ) { + $inCount = 1; + while ( !$rsEntidades->eof() ) { + if(( $_REQUEST['inCodEntidade'] == $rsEntidades->getCampo('cod_entidade') )){ + $stSelected = 'true'; + }else{ + $stSelected = 'false'; + } + $stJs .= "jq('#".inCodEntidade."').addOption('".$rsEntidades->getCampo('cod_entidade')."','".$rsEntidades->getCampo('cod_entidade')." - ".$rsEntidades->getCampo('nom_cgm')."',".$stSelected.");"; + $rsEntidades->proximo(); + $inCount++; } - $stJs .= "jq('#".inCodEntidade."').addOption('".$rsEntidades->getCampo('cod_entidade')."','".$rsEntidades->getCampo('cod_entidade')." - ".$rsEntidades->getCampo('nom_cgm')."',".$stSelected.");"; - $rsEntidades->proximo(); - $inCount++; + } else { + $stJs.= "$('stExercicio').value = ''; "; + $stJs.= "alertaAviso('Exercício sem entidades cadastradas.','form','erro','".Sessao::getId()."');"; } - } else { - $stJs.= "$('stExercicio').value = ''; "; - $stJs.= "alertaAviso('Exercício sem entidades cadastradas.','form','erro','".Sessao::getId()."');"; } - } break; -case 'montaListaAtributos': - unset($obAtributo); - //padrao para identificacao do atributo "cod_modulo,cod_cadastro,cod_atributo" - $arAtributo = explode(',', $_REQUEST['stAtributo']); - - $rsAtributo = new RecordSet(); - $stFiltro = " AND ad.cod_modulo = ".$arAtributo[0]." - AND ad.cod_cadastro = ".$arAtributo[1]." - AND ad.cod_atributo = ".$arAtributo[2]." - "; - require_once(CAM_GA_ADM_MAPEAMENTO."TAdministracaoAtributoDinamico.class.php"); - $obTAdministracaoAtributoDinamico = new TAdministracaoAtributoDinamico(); - $obTAdministracaoAtributoDinamico->recuperaRelacionamento($rsAtributo, $stFiltro); - - while (!$rsAtributo->eof()) { - switch ($rsAtributo->getCampo('cod_tipo')) { - case 1: //númerico - $obAtributo = new Inteiro(); - $obAtributo->setRotulo( $rsAtributo->getCampo('nom_atributo') ); - $obAtributo->setTitle( $rsAtributo->getCampo('ajuda') ); - $obAtributo->setName( "atributos[".$rsAtributo->getCampo('cod_modulo').",".$rsAtributo->getCampo('cod_cadastro').",".$rsAtributo->getCampo('cod_atributo')."]" );//pensar em como setar o name e o id - $obAtributo->setNull( true ); - break; - case 2: //texto - $obAtributo = new TextBox(); - $obAtributo->setRotulo( $rsAtributo->getCampo('nom_atributo') ); - $obAtributo->setTitle( $rsAtributo->getCampo('ajuda') ); - $obAtributo->setName( "atributos[".$rsAtributo->getCampo('cod_modulo').",".$rsAtributo->getCampo('cod_cadastro').",".$rsAtributo->getCampo('cod_atributo')."]" ); - $obAtributo->setNull( true ); - $obAtributo->setMaxLength( 100 ); - $obAtributo->setSize( 70 ); - break; - case 3: //Lista - $stFiltro = " WHERE bem_atributo_especie.cod_modulo = ".$arAtributo[0]." - AND bem_atributo_especie.cod_cadastro = ".$arAtributo[1]." - AND bem_atributo_especie.cod_atributo = ".$arAtributo[2]; - require_once(CAM_GP_PAT_MAPEAMENTO."TPatrimonioBemAtributoEspecie.class.php"); - $obTPatrimonioBemAtributoEspecie = new TPatrimonioBemAtributoEspecie(); - $obTPatrimonioBemAtributoEspecie->recuperaAtributosValores($rsAtributosValoresLista, $stFiltro); - - $obAtributo = new Select; - $obAtributo->setRotulo( $rsAtributo->getCampo('nom_atributo') ); - $obAtributo->setTitle( $rsAtributo->getCampo('ajuda') ); - $obAtributo->setName( "atributos[".$rsAtributo->getCampo('cod_modulo').",".$rsAtributo->getCampo('cod_cadastro').",".$rsAtributo->getCampo('cod_atributo')."]" ); - $obAtributo->setValue( "" ); - $obAtributo->setStyle( "width: 200px" ); - $obAtributo->addOption( "", "Selecione" ); - while (!$rsAtributosValoresLista->eof()) { - $obAtributo->addOption( $rsAtributosValoresLista->getCampo('cod_valor'), $rsAtributosValoresLista->getCampo('valor_padrao') ); - $rsAtributosValoresLista->proximo(); - } - $obAtributo->setNull( true ); - break; - case 4: //Lista múltipla - //verificar valores do atributo na tabela -// $obAtributo = new SelectMultiplo; -// $obAtributo->setRotulo( $rsAtributo->getCampo('nom_atributo') ); -// $obAtributo->setTitle( $rsAtributo->getCampo('ajuda') ); -// $obAtributo->setName( "atributos[".$rsAtributo->getCampo('cod_modulo').",".$rsAtributo->getCampo('cod_cadastro').",".$rsAtributo->getCampo('cod_atributo')."]" ); -// $obAtributo->setId( "" ); -// $obAtributo->setNull( true ); -// -// // lista de atributos disponiveis -// $obAtributo->SetNomeLista1 ('inCodAlmoxarifadoDisponivel'); -// $obAtributo->setCampoId1 ( 'codigo' ); -// $obAtributo->setCampoDesc1 ( '[codigo]-[nom_a]' ); -// $obAtributo->SetRecord1 ( $rsAlmoxarifados ); -// $rsRecordset = new RecordSet; -// // lista de atributos selecionados -// $obAtributo->SetNomeLista2 ('inCodAlmoxarifado'); -// $obAtributo->setCampoId2 ('codigo'); -// $obAtributo->setCampoDesc2 ('[codigo]-[nom_a]'); -// $obAtributo->SetRecord2 ( $rsRecordset ); - break; - case 5: //Data - //instancia um componente periodicidade - $obAtributo = new Periodicidade(); - $obAtributo->setRotulo( $rsAtributo->getCampo('nom_atributo') ); - $obAtributo->setTitle( $rsAtributo->getCampo('ajuda') ); - $obAtributo->setIdComponente( "atributos[".$rsAtributo->getCampo('cod_modulo').",".$rsAtributo->getCampo('cod_cadastro').",".$rsAtributo->getCampo('cod_atributo')."]" ); - $obAtributo->setName( '' ); - $obAtributo->setNull( true ); - $obAtributo->setExercicio ( Sessao::getExercicio() ); - break; - case 6: //númerico(*, 2) - $obAtributo = new Moeda(); - $obAtributo->setRotulo( $rsAtributo->getCampo('nom_atributo') ); - $obAtributo->setTitle( $rsAtributo->getCampo('ajuda') ); - $obAtributo->setName( "atributos[".$rsAtributo->getCampo('cod_modulo').",".$rsAtributo->getCampo('cod_cadastro').",".$rsAtributo->getCampo('cod_atributo')."]" ); - $obAtributo->setNull( true ); - break; - case 7: //texto longo - $obAtributo = new TextBox(); - $obAtributo->setRotulo( $rsAtributo->getCampo('nom_atributo') ); - $obAtributo->setTitle( $rsAtributo->getCampo('ajuda') ); - $obAtributo->setName( "atributos[".$rsAtributo->getCampo('cod_modulo').",".$rsAtributo->getCampo('cod_cadastro').",".$rsAtributo->getCampo('cod_atributo')."]" ); - $obAtributo->setNull( true ); - $obAtributo->setMaxLength( '' ); - $obAtributo->setSize( 60 ); - break; + case 'montaListaAtributos': + unset($obAtributo); + //padrao para identificacao do atributo "cod_modulo,cod_cadastro,cod_atributo" + $arAtributo = explode(',', $_REQUEST['stAtributo']); + + $rsAtributo = new RecordSet(); + $stFiltro = " AND ad.cod_modulo = ".$arAtributo[0]." + AND ad.cod_cadastro = ".$arAtributo[1]." + AND ad.cod_atributo = ".$arAtributo[2]." + "; + + $obTAdministracaoAtributoDinamico = new TAdministracaoAtributoDinamico(); + $obTAdministracaoAtributoDinamico->recuperaRelacionamento($rsAtributo, $stFiltro); + + while (!$rsAtributo->eof()) { + switch ($rsAtributo->getCampo('cod_tipo')) { + case 1: //númerico + $obAtributo = new Inteiro(); + $obAtributo->setRotulo( $rsAtributo->getCampo('nom_atributo') ); + $obAtributo->setTitle( $rsAtributo->getCampo('ajuda') ); + $obAtributo->setName( "atributos[".$rsAtributo->getCampo('cod_modulo').",".$rsAtributo->getCampo('cod_cadastro').",".$rsAtributo->getCampo('cod_atributo')."]" );//pensar em como setar o name e o id + $obAtributo->setNull( true ); + break; + case 2: //texto + $obAtributo = new TextBox(); + $obAtributo->setRotulo( $rsAtributo->getCampo('nom_atributo') ); + $obAtributo->setTitle( $rsAtributo->getCampo('ajuda') ); + $obAtributo->setName( "atributos[".$rsAtributo->getCampo('cod_modulo').",".$rsAtributo->getCampo('cod_cadastro').",".$rsAtributo->getCampo('cod_atributo')."]" ); + $obAtributo->setNull( true ); + $obAtributo->setMaxLength( 100 ); + $obAtributo->setSize( 70 ); + break; + case 3: //Lista + $stFiltro = " WHERE bem_atributo_especie.cod_modulo = ".$arAtributo[0]." + AND bem_atributo_especie.cod_cadastro = ".$arAtributo[1]." + AND bem_atributo_especie.cod_atributo = ".$arAtributo[2]; + require_once(CAM_GP_PAT_MAPEAMENTO."TPatrimonioBemAtributoEspecie.class.php"); + $obTPatrimonioBemAtributoEspecie = new TPatrimonioBemAtributoEspecie(); + $obTPatrimonioBemAtributoEspecie->recuperaAtributosValores($rsAtributosValoresLista, $stFiltro); + + $obAtributo = new Select; + $obAtributo->setRotulo( $rsAtributo->getCampo('nom_atributo') ); + $obAtributo->setTitle( $rsAtributo->getCampo('ajuda') ); + $obAtributo->setName( "atributos[".$rsAtributo->getCampo('cod_modulo').",".$rsAtributo->getCampo('cod_cadastro').",".$rsAtributo->getCampo('cod_atributo')."]" ); + $obAtributo->setValue( "" ); + $obAtributo->setStyle( "width: 200px" ); + $obAtributo->addOption( "", "Selecione" ); + while (!$rsAtributosValoresLista->eof()) { + $obAtributo->addOption( $rsAtributosValoresLista->getCampo('cod_valor'), $rsAtributosValoresLista->getCampo('valor_padrao') ); + $rsAtributosValoresLista->proximo(); + } + $obAtributo->setNull( true ); + break; + case 4: //Lista múltipla + break; + case 5: //Data + //instancia um componente periodicidade + $obAtributo = new Periodicidade(); + $obAtributo->setRotulo( $rsAtributo->getCampo('nom_atributo') ); + $obAtributo->setTitle( $rsAtributo->getCampo('ajuda') ); + $obAtributo->setIdComponente( "atributos[".$rsAtributo->getCampo('cod_modulo').",".$rsAtributo->getCampo('cod_cadastro').",".$rsAtributo->getCampo('cod_atributo')."]" ); + $obAtributo->setName( '' ); + $obAtributo->setNull( true ); + $obAtributo->setExercicio ( Sessao::getExercicio() ); + break; + case 6: //númerico(*, 2) + $obAtributo = new Moeda(); + $obAtributo->setRotulo( $rsAtributo->getCampo('nom_atributo') ); + $obAtributo->setTitle( $rsAtributo->getCampo('ajuda') ); + $obAtributo->setName( "atributos[".$rsAtributo->getCampo('cod_modulo').",".$rsAtributo->getCampo('cod_cadastro').",".$rsAtributo->getCampo('cod_atributo')."]" ); + $obAtributo->setNull( true ); + break; + case 7: //texto longo + $obAtributo = new TextBox(); + $obAtributo->setRotulo( $rsAtributo->getCampo('nom_atributo') ); + $obAtributo->setTitle( $rsAtributo->getCampo('ajuda') ); + $obAtributo->setName( "atributos[".$rsAtributo->getCampo('cod_modulo').",".$rsAtributo->getCampo('cod_cadastro').",".$rsAtributo->getCampo('cod_atributo')."]" ); + $obAtributo->setNull( true ); + $obAtributo->setMaxLength( '' ); + $obAtributo->setSize( 60 ); + break; + } + $rsAtributo->proximo(); } - $rsAtributo->proximo(); - } - - $obFormulario = new Formulario(); - $obFormulario->addComponente( $obAtributo ); - $obFormulario->montaInnerHTML(); - - $stJs .= "$('stAtributo').value = '';"; - $stJs .= "var html = $('spnListaAtributos').innerHTML;"; - $stJs .= "$('spnListaAtributos').innerHTML = html + '".$obFormulario->getHTML()."';"; + + $obFormulario = new Formulario(); + $obFormulario->addComponente( $obAtributo ); + $obFormulario->montaInnerHTML(); + + $stJs .= "$('stAtributo').value = '';"; + $stJs .= "var html = $('spnListaAtributos').innerHTML;"; + $stJs .= "$('spnListaAtributos').innerHTML = html + '".$obFormulario->getHTML()."';"; break; -case 'montaDepreciacao': - include_once CAM_GF_CONT_COMPONENTES.'IPopUpContaAnalitica.class.php'; - - if ($_REQUEST['boDepreciavel'] == 'true') { - $obNumQuotaDepreciacaoAnual = new Numerico; - $obNumQuotaDepreciacaoAnual->setName ('flQuotaDepreciacaoAnual'); - $obNumQuotaDepreciacaoAnual->setId ('flQuotaDepreciacaoAnual'); - $obNumQuotaDepreciacaoAnual->setRotulo ('Quota de Depreciação Anual'); - $obNumQuotaDepreciacaoAnual->setTitle ('Valor percentual de depreciação anual do bem.'); - $obNumQuotaDepreciacaoAnual->setMaxValue('100'); - $obNumQuotaDepreciacaoAnual->setDecimais(2); - $obNumQuotaDepreciacaoAnual->setMaxLength(5); - $obNumQuotaDepreciacaoAnual->setValue(str_replace('.',',', $_REQUEST['inVlQuotaDepreciacaoAnual'])); - - $obLblPercent = new Label; - $obLblPercent->setValue('%'); - - $obForm = new Form; - $obForm->setAction ($pgProc); - $obForm->setTarget ("oculto"); - - //cria um busca inner para retornar uma conta contábil - $obBscContaContabil = new BuscaInner; - $obBscContaContabil->setRotulo ( "Conta Contábil" ); - $obBscContaContabil->setTitle ( "Informe a conta do plano de contas."); - $obBscContaContabil->setId ( "stDescricaoConta" ); - $obBscContaContabil->obCampoCod->setName ( "inCodContaAnalitica" ); - $obBscContaContabil->obCampoCod->setSize ( 10 ); - $obBscContaContabil->obCampoCod->setAlign ( "left" ); - $obBscContaContabil->setValoresBusca ( CAM_GF_CONT_POPUPS."planoConta/OCPlanoConta.php?".Sessao::getId(),$obForm->getName(),"contaSinteticaAtivoPermanente"); - $obBscContaContabil->setFuncaoBusca ( "abrePopUp('".CAM_GF_CONT_POPUPS."planoConta/FLPlanoConta.php','frm','inCodContaAnalitica','stDescricaoConta','contaSinteticaAtivoPermanente','".Sessao::getId()."','800','550');" ); - $obBscContaContabil->setNull ( true ); - $obBscContaContabil->setValue ( $_REQUEST['stNomePlanoConta'] ); - $obBscContaContabil->obCampoCod->setValue ( $_REQUEST['inPlanoContaAnalitica'] ); - - $obRdDepreciacaoAceleradaSim = new Radio; - $obRdDepreciacaoAceleradaSim->setName ('boDepreciacaoAcelerada'); - $obRdDepreciacaoAceleradaSim->setId ('boDepreciacaoAcelerada'); - $obRdDepreciacaoAceleradaSim->setRotulo ('Depreciação Acelerada'); - $obRdDepreciacaoAceleradaSim->setLabel ('Sim'); - $obRdDepreciacaoAceleradaSim->setTitle ('Determina se o bem terá depreciação acelerada ou não.'); - $obRdDepreciacaoAceleradaSim->setValue ('true'); - - $obRdDepreciacaoAceleradaNao = new Radio; - $obRdDepreciacaoAceleradaNao->setName ('boDepreciacaoAcelerada'); - $obRdDepreciacaoAceleradaNao->setRotulo ('Depreciação Acelerada'); - $obRdDepreciacaoAceleradaNao->setLabel ('Não'); - $obRdDepreciacaoAceleradaNao->setTitle ('Determina se o bem terá depreciação acelerada ou não.'); - $obRdDepreciacaoAceleradaNao->setValue ('false'); - $obRdDepreciacaoAceleradaNao->obEvento->setOnChange("montaParametrosGET( 'montaDepreciacaoAcelerada', 'boDepreciacaoAcelerada' );"); - - if ($_REQUEST['flDepreciacaoAcelerada'] > 0) { - $obRdDepreciacaoAceleradaSim->setChecked(true); - $obRdDepreciacaoAceleradaSim->obEvento->setOnChange("montaParametrosGET( 'montaDepreciacaoAcelerada', 'boDepreciacaoAcelerada,flDepreciacaoAnualAcelerada' );"); - } else { - $obRdDepreciacaoAceleradaNao->setChecked(true); - $obRdDepreciacaoAceleradaSim->obEvento->setOnChange("montaParametrosGET( 'montaDepreciacaoAcelerada', 'boDepreciacaoAcelerada' );"); - } - - $obSpnDepreciacaoAcelerada = new Span; - $obSpnDepreciacaoAcelerada->setId('stDepreciacaoAcelerada'); + case 'minimoQuotaAnual': + if($_REQUEST['flQuotaDepreciacaoAnual']!=''){ + $flQuotaDepreciacaoAnual = str_replace(',','.',str_replace('.','',$_REQUEST['flQuotaDepreciacaoAnual'])); + $vlMinimo = '4.00'; - $obSpnListaDepreciacao = new Span; - $obSpnListaDepreciacao->setId('stSpnListaDepreciacao'); + if($flQuotaDepreciacaoAnual<$vlMinimo){ + $stMsgErro = 'Percentual mínimo do campo Quota de Depreciação Anual é '.$vlMinimo = number_format($vlMinimo, 2 , ',' , '.' ).'%;'; + $stMsgErro .= ' Conforme base legal: IN SRF nº 162/1998 e IN SRF nº 130/1999.'; - $obSpnListaDepreciacaoTableTree = new Span; - $obSpnListaDepreciacaoTableTree->setId('stSpnListaDepreciacaoTableTree'); - - if ($_REQUEST["boDepreciavel"] == 'true' && $_REQUEST["stAcao"] === 'alterar' && $_REQUEST["inVlBem"] != '') { - $obBtnExcluirDepreciacao = new Button; - $obBtnExcluirDepreciacao->setValue ( "Excluir última depreciação" ); - $obBtnExcluirDepreciacao->setId ( "btnExcluirDepreciacao" ); - $obBtnExcluirDepreciacao->obEvento->setOnClick ( "montaParametrosGET('excluiDepreciacaoLista')"); - } - - $obFormulario = new Formulario; - $obFormulario->addForm ( $obForm ); - $obFormulario->agrupaComponentes(array($obNumQuotaDepreciacaoAnual,$obLblPercent)); - $obFormulario->addComponente ( $obBscContaContabil ); - - $obFormulario->agrupaComponentes(array($obRdDepreciacaoAceleradaSim,$obRdDepreciacaoAceleradaNao)); - $obFormulario->addSpan ($obSpnDepreciacaoAcelerada); - $obFormulario->addSpan ($obSpnListaDepreciacao); - $obFormulario->addSpan ($obSpnListaDepreciacaoTableTree); - - if ($_REQUEST["stAcao"] === 'alterar') { - Sessao::write('arDepreciacao',array()); - - $obTPatrimonioDepreciacao = new TPatrimonioDepreciacao(); - $obTPatrimonioDepreciacao->setDado( 'cod_bem', $_REQUEST['inCodBem'] ); - $obTPatrimonioDepreciacao->recuperaDepreciacao( $rsDepreciacao ); - - if ($rsDepreciacao->getNumLinhas() > 0) { - //$obFormulario->addSpan ($obBtnExcluirDepreciacao); - $stJs .= " montaParametrosGET( 'montaListaDepreciacoes', 'stLimpar, inCodBem');"; + $stJs = "alertaAviso('".$stMsgErro."','form','erro','".Sessao::getId()."');"; + $stJs .= "jQuery('#flQuotaDepreciacaoAnual').val('');"; } } - - $obFormulario->montaInnerHTML (); - $stJs .= "jQuery('#stDepreciacao').html('".$obFormulario->getHTML()."');\n"; - - - } else { - Sessao::write('arDepreciacao',array()); - - $obFormulario = new Formulario; - - $obSpnDepreciacaoAcelerada = new Span; - $obSpnDepreciacaoAcelerada->setId('stDepreciacaoAcelerada'); - - $obSpnListaDepreciacao = new Span; - $obSpnListaDepreciacao->setId('stSpnListaDepreciacao'); - - $obSpnListaDepreciacaoTableTree = new Span; - $obSpnListaDepreciacaoTableTree->setId('stSpnListaDepreciacaoTableTree'); - - $obFormulario->addSpan ($obSpnDepreciacaoAcelerada); - $obFormulario->addSpan ($obSpnListaDepreciacao); - $obFormulario->addSpan ($obSpnListaDepreciacaoTableTree); - $obFormulario->montaInnerHTML (); - - $stJs = "jQuery('#stDepreciacao').html('".$obFormulario->getHTML()."');\n"; - $stJs .= " montaParametrosGET( 'montaListaDepreciacoes', 'stLimpar, inCodBem');"; - } - -break; - -case 'montaDepreciacaoAcelerada': - - $obNumQuotaDepreciacaoAcelerada = new Numerico; - $obNumQuotaDepreciacaoAcelerada->setName ('flQuotaDepreciacaoAcelerada'); - $obNumQuotaDepreciacaoAcelerada->setRotulo ('Quota de Depreciação Acelerada Anual'); - $obNumQuotaDepreciacaoAcelerada->setTitle ('Valor percentual de depreciação acelerada do bem.'); - $obNumQuotaDepreciacaoAcelerada->setMaxValue('100'); - $obNumQuotaDepreciacaoAcelerada->setDecimais(2); - $obNumQuotaDepreciacaoAcelerada->setMaxLength(5); - $obNumQuotaDepreciacaoAcelerada->setObrigatorio(true); - - if ($_REQUEST['flDepreciacaoAcelerada'] != '') { - $obNumQuotaDepreciacaoAcelerada->setValue($_REQUEST['flDepreciacaoAcelerada'] ); - } - - $obLblPercent = new Label; - $obLblPercent->setValue('%'); - - $obFormulario = new Formulario; - $obFormulario->agrupaComponentes(array($obNumQuotaDepreciacaoAcelerada,$obLblPercent)); - $obFormulario->montaInnerHTML(); - - if ($_REQUEST['boDepreciacaoAcelerada'] == 'true' || $_REQUEST['flDepreciacaoAcelerada'] > 0) { - $stJs = "jQuery('#stDepreciacaoAcelerada').html('".$obFormulario->getHTML()."')"; - } else { - $stJs = "jQuery('#stDepreciacaoAcelerada').html('')"; - } - break; -case 'montaListaReavaliacoes': - include_once '../../../../../../gestaoAdministrativa/fontes/PHP/framework/componentes/Table/TableTree.class.php'; - - $obErro = new Erro; - $arReavaliacao = Sessao::read('arReavaliacao'); - - if ($_REQUEST['stIncluirReavaliacao'] == 'Incluir') { - - $dataAtual = date("Y").date("m").date("d"); - - list($ano, $mes, $dia) = explode("/", $_REQUEST['dtAquisicao']); - $dtAquisicao = $dia.$mes.$ano; - - list($ano, $mes, $dia) = explode("/", $_REQUEST['dtIncorporacao']); - $dtIncorporacao = $dia.$mes.$ano; - - list($ano, $mes, $dia) = explode("/", $_REQUEST['dtReavaliacao']); - $dtReavaliacao = $dia.$mes.$ano; - - list($ano, $mes, $dia) = explode("/", Sessao::read('dtUltimaReavaliacao')); - $dtUltimaReavaliacao = $dia.$mes.$ano; - - $dtUltimaDepreciacao = Sessao::read('stDepreciacaoCompetencia'); - - $inCodReavaliacao = 0; - $inCodBem = $_REQUEST['inCodBem']; - $inVidaUtilReavaliacao = $_REQUEST['inVidaUtilReavaliacao']; - $flValorBemReavaliacao = floatval(str_replace(",",".",str_replace(".", "", $_REQUEST['flValorBemReavaliacao']))); - $stMotivoReavaliacao = $_REQUEST['stMotivoReavaliacao']; - - if ($dtReavaliacao === '') { - $obErro->setDescricao('Campo Data da Reavaliação inválido!'); - } elseif (substr($dtReavaliacao,0,6) <= $dtUltimaDepreciacao) { - $obErro->setDescricao('Campo Data da Reavaliação deve ser maior que a competência da última depreciação!'); - } elseif (intval($dtUltimaReavaliacao) > intval($dtReavaliacao)) { - $obErro->setDescricao('Campo Data da Reavaliação deve ser maior que a última Reavaliação informada!'); - } elseif ($dtAquisicao > $dtReavaliacao) { - $obErro->setDescricao('Campo Data da Reavaliação deve ser maior que a Data de Aquisição do Bem!'); - } elseif ($dtIncorporacao > $dtReavaliacao) { - $obErro->setDescricao('Campo Data da Reavaliação deve ser maior que a Data de Incorporação do Bem!'); - } elseif ($inVidaUtilReavaliacao === '') { - $obErro->setDescricao('O campo Vida Útil do Bem deve ter valor maior que zero!'); - } elseif ($flValorBemReavaliacao <= 0.00) { - $obErro->setDescricao('O campo Valor da Reavaliação deve ter valor maior que zero!'); - } elseif ($stMotivoReavaliacao === '') { - $obErro->setDescricao('O campo Motivo deve ser preenchido!'); - } elseif ($dtReavaliacao > $dataAtual) { - $obErro->setDescricao('Campo Data da Reavaliação não pode ser maior que a data atual!'); + case 'montaDepreciacao': + include_once CAM_GF_CONT_COMPONENTES.'IPopUpContaAnalitica.class.php'; + + if ($_REQUEST['boDepreciavel'] == 'true') { + $obNumQuotaDepreciacaoAnual = new Numerico; + $obNumQuotaDepreciacaoAnual->setName ('flQuotaDepreciacaoAnual'); + $obNumQuotaDepreciacaoAnual->setId ('flQuotaDepreciacaoAnual'); + $obNumQuotaDepreciacaoAnual->setRotulo ('Quota de Depreciação Anual'); + $obNumQuotaDepreciacaoAnual->setTitle ('Valor percentual de depreciação anual do bem.'); + $obNumQuotaDepreciacaoAnual->setMaxValue('100'); + $obNumQuotaDepreciacaoAnual->setDecimais(2); + $obNumQuotaDepreciacaoAnual->setMaxLength(5); + $obNumQuotaDepreciacaoAnual->setValue(str_replace('.',',', $_REQUEST['inVlQuotaDepreciacaoAnual'])); + $obNumQuotaDepreciacaoAnual->obEvento->setOnChange("montaParametrosGET( 'minimoQuotaAnual', 'dtAquisicao,flQuotaDepreciacaoAnual' );"); + + $obLblPercent = new Label; + $obLblPercent->setValue('%'); + + $obForm = new Form; + $obForm->setAction ($pgProc); + $obForm->setTarget ("oculto"); + + //cria um busca inner para retornar uma conta contábil + $obBscContaContabil = new BuscaInner; + $obBscContaContabil->setRotulo ( "Conta Contábil" ); + $obBscContaContabil->setTitle ( "Informe a conta do plano de contas."); + $obBscContaContabil->setId ( "stDescricaoConta" ); + $obBscContaContabil->obCampoCod->setName ( "inCodContaAnalitica" ); + $obBscContaContabil->obCampoCod->setSize ( 10 ); + $obBscContaContabil->obCampoCod->setAlign ( "left" ); + $obBscContaContabil->setValoresBusca ( CAM_GF_CONT_POPUPS."planoConta/OCPlanoConta.php?".Sessao::getId(),$obForm->getName(),"contaSinteticaAtivoPermanente"); + $obBscContaContabil->setFuncaoBusca ( "abrePopUp('".CAM_GF_CONT_POPUPS."planoConta/FLPlanoConta.php','frm','inCodContaAnalitica','stDescricaoConta','contaSinteticaAtivoPermanente','".Sessao::getId()."','800','550');" ); + $obBscContaContabil->setNull ( true ); + $obBscContaContabil->setValue ( $_REQUEST['stNomePlanoConta'] ); + $obBscContaContabil->obCampoCod->setValue ( $_REQUEST['inPlanoContaAnalitica'] ); + + $obRdDepreciacaoAceleradaSim = new Radio; + $obRdDepreciacaoAceleradaSim->setName ('boDepreciacaoAcelerada'); + $obRdDepreciacaoAceleradaSim->setId ('boDepreciacaoAcelerada'); + $obRdDepreciacaoAceleradaSim->setRotulo ('Depreciação Acelerada'); + $obRdDepreciacaoAceleradaSim->setLabel ('Sim'); + $obRdDepreciacaoAceleradaSim->setTitle ('Determina se o bem terá depreciação acelerada ou não.'); + $obRdDepreciacaoAceleradaSim->setValue ('true'); + + $obRdDepreciacaoAceleradaNao = new Radio; + $obRdDepreciacaoAceleradaNao->setName ('boDepreciacaoAcelerada'); + $obRdDepreciacaoAceleradaNao->setRotulo ('Depreciação Acelerada'); + $obRdDepreciacaoAceleradaNao->setLabel ('Não'); + $obRdDepreciacaoAceleradaNao->setTitle ('Determina se o bem terá depreciação acelerada ou não.'); + $obRdDepreciacaoAceleradaNao->setValue ('false'); + $obRdDepreciacaoAceleradaNao->obEvento->setOnChange("montaParametrosGET( 'montaDepreciacaoAcelerada', 'boDepreciacaoAcelerada' );"); + + if ($_REQUEST['flDepreciacaoAcelerada'] > 0) { + $obRdDepreciacaoAceleradaSim->setChecked(true); + $obRdDepreciacaoAceleradaSim->obEvento->setOnChange("montaParametrosGET( 'montaDepreciacaoAcelerada', 'boDepreciacaoAcelerada,flDepreciacaoAnualAcelerada' );"); + } else { + $obRdDepreciacaoAceleradaNao->setChecked(true); + $obRdDepreciacaoAceleradaSim->obEvento->setOnChange("montaParametrosGET( 'montaDepreciacaoAcelerada', 'boDepreciacaoAcelerada' );"); + } + + $obSpnDepreciacaoAcelerada = new Span; + $obSpnDepreciacaoAcelerada->setId('stDepreciacaoAcelerada'); + + $obSpnListaDepreciacao = new Span; + $obSpnListaDepreciacao->setId('stSpnListaDepreciacao'); + + $obSpnListaDepreciacaoTableTree = new Span; + $obSpnListaDepreciacaoTableTree->setId('stSpnListaDepreciacaoTableTree'); + + if ($_REQUEST["boDepreciavel"] == 'true' && $_REQUEST["stAcao"] === 'alterar' && $_REQUEST["inVlBem"] != '') { + $obBtnExcluirDepreciacao = new Button; + $obBtnExcluirDepreciacao->setValue ( "Excluir última depreciação" ); + $obBtnExcluirDepreciacao->setId ( "btnExcluirDepreciacao" ); + $obBtnExcluirDepreciacao->obEvento->setOnClick ( "montaParametrosGET('excluiDepreciacaoLista')"); + } + + $obFormulario = new Formulario; + $obFormulario->addForm ( $obForm ); + $obFormulario->agrupaComponentes(array($obNumQuotaDepreciacaoAnual,$obLblPercent)); + $obFormulario->addComponente ( $obBscContaContabil ); + + $obFormulario->agrupaComponentes(array($obRdDepreciacaoAceleradaSim,$obRdDepreciacaoAceleradaNao)); + $obFormulario->addSpan ($obSpnDepreciacaoAcelerada); + $obFormulario->addSpan ($obSpnListaDepreciacao); + $obFormulario->addSpan ($obSpnListaDepreciacaoTableTree); + + if ($_REQUEST["stAcao"] === 'alterar') { + Sessao::write('arDepreciacao',array()); + + $obTPatrimonioDepreciacao = new TPatrimonioDepreciacao(); + $obTPatrimonioDepreciacao->setDado( 'cod_bem', $_REQUEST['inCodBem'] ); + $obTPatrimonioDepreciacao->recuperaDepreciacao( $rsDepreciacao ); + + if ($rsDepreciacao->getNumLinhas() > 0) { + $stJs .= " montaParametrosGET( 'montaListaDepreciacoes', 'stLimpar, inCodBem');"; + } + } + + $obFormulario->montaInnerHTML(); + $stJs .= "jQuery('#stDepreciacao').html('".$obFormulario->getHTML()."');\n"; + } else { + Sessao::write('arDepreciacao',array()); + + $obFormulario = new Formulario; + + $obSpnDepreciacaoAcelerada = new Span; + $obSpnDepreciacaoAcelerada->setId('stDepreciacaoAcelerada'); + + $obSpnListaDepreciacao = new Span; + $obSpnListaDepreciacao->setId('stSpnListaDepreciacao'); + + $obSpnListaDepreciacaoTableTree = new Span; + $obSpnListaDepreciacaoTableTree->setId('stSpnListaDepreciacaoTableTree'); + + $obFormulario->addSpan ($obSpnDepreciacaoAcelerada); + $obFormulario->addSpan ($obSpnListaDepreciacao); + $obFormulario->addSpan ($obSpnListaDepreciacaoTableTree); + $obFormulario->montaInnerHTML (); + + $stJs = "jQuery('#stDepreciacao').html('".$obFormulario->getHTML()."');\n"; + $stJs .= " montaParametrosGET( 'montaListaDepreciacoes', 'stLimpar, inCodBem');"; } + break; - if ($obErro->ocorreu()) { - $stJs = "alertaAviso('".$obErro->getDescricao()."','form','erro','".Sessao::getId()."');"; + case 'montaDepreciacaoAcelerada': + $obNumQuotaDepreciacaoAcelerada = new Numerico; + $obNumQuotaDepreciacaoAcelerada->setName ('flQuotaDepreciacaoAcelerada'); + $obNumQuotaDepreciacaoAcelerada->setRotulo ('Quota de Depreciação Acelerada Anual'); + $obNumQuotaDepreciacaoAcelerada->setTitle ('Valor percentual de depreciação acelerada do bem.'); + $obNumQuotaDepreciacaoAcelerada->setMaxValue('100'); + $obNumQuotaDepreciacaoAcelerada->setDecimais(2); + $obNumQuotaDepreciacaoAcelerada->setMaxLength(5); + $obNumQuotaDepreciacaoAcelerada->setObrigatorio(true); + + if ($_REQUEST['flDepreciacaoAcelerada'] != '') { + $obNumQuotaDepreciacaoAcelerada->setValue($_REQUEST['flDepreciacaoAcelerada'] ); } - - if (!$obErro->ocorreu()) { - $arReavaliacao[] = array( - 'inId' => count($arReavaliacao) + 1, - 'inCodReavaliacao' => $inCodReavaliacao, - 'inCodBem' => $inCodBem, - 'dtReavaliacao' => $_REQUEST['dtReavaliacao'], - 'inVidaUtilReavaliacao' => $inVidaUtilReavaliacao, - 'flValorBemReavaliacao' => $flValorBemReavaliacao, - 'stMotivoReavaliacao' => $stMotivoReavaliacao, - 'inserir' => 'true', - ); - - Sessao::write('dtUltimaReavaliacao',$_REQUEST['dtReavaliacao']); - Sessao::write('arReavaliacao',$arReavaliacao); + + $obLblPercent = new Label; + $obLblPercent->setValue('%'); + + $obFormulario = new Formulario; + $obFormulario->agrupaComponentes(array($obNumQuotaDepreciacaoAcelerada,$obLblPercent)); + $obFormulario->montaInnerHTML(); + + if ($_REQUEST['boDepreciacaoAcelerada'] == 'true' || $_REQUEST['flDepreciacaoAcelerada'] > 0) { + $stJs = "jQuery('#stDepreciacaoAcelerada').html('".$obFormulario->getHTML()."')"; + } else { + $stJs = "jQuery('#stDepreciacaoAcelerada').html('')"; } - } elseif ($_REQUEST['stLimparReavaliacao'] == 'Limpar') { - - } else { - Sessao::remove('dtUltimaReavaliacao'); - Sessao::remove('arReavaliacao'); + break; - if (trim($_REQUEST['inCodBem']) != '') { - $rsReavaliacao = new RecordSet; - $obTPatrimonioReavaliacao = new TPatrimonioReavaliacao(); - $obTPatrimonioReavaliacao->setDado( 'cod_bem', $_REQUEST['inCodBem'] ); - $obTPatrimonioReavaliacao->recuperaRelacionamento( $rsReavaliacao ); - - $arReavaliacao = array(); - - while (!$rsReavaliacao->eof()) { - $inCodReavaliacao = $rsReavaliacao->getCampo('cod_reavaliacao'); - $inCodBem = $rsReavaliacao->getCampo('cod_bem'); - $dtReavaliacao = $rsReavaliacao->getCampo('dt_reavaliacao'); - $inVidaUtilReavaliacao = $rsReavaliacao->getCampo('vida_util'); - $flValorBemReavaliacao = $rsReavaliacao->getCampo('vl_reavaliacao'); - $stMotivoReavaliacao = $rsReavaliacao->getCampo('motivo'); + case 'montaListaReavaliacoes': + $obErro = new Erro; + $arReavaliacao = Sessao::read('arReavaliacao'); + + if ($_REQUEST['stIncluirReavaliacao'] == 'Incluir') { + $dataAtual = date("Y").date("m").date("d"); + + list($ano, $mes, $dia) = explode("/", $_REQUEST['dtAquisicao']); + $dtAquisicao = $dia.$mes.$ano; + + list($ano, $mes, $dia) = explode("/", $_REQUEST['dtIncorporacao']); + $dtIncorporacao = $dia.$mes.$ano; + + list($ano, $mes, $dia) = explode("/", $_REQUEST['dtReavaliacao']); + $dtReavaliacao = $dia.$mes.$ano; + + list($ano, $mes, $dia) = explode("/", Sessao::read('dtUltimaReavaliacao')); + $dtUltimaReavaliacao = $dia.$mes.$ano; + + $dtUltimaDepreciacao = Sessao::read('stDepreciacaoCompetencia'); + + $inCodReavaliacao = 0; + $inCodBem = $_REQUEST['inCodBem']; + $inVidaUtilReavaliacao = $_REQUEST['inVidaUtilReavaliacao']; + $flValorBemReavaliacao = floatval(str_replace(",",".",str_replace(".", "", $_REQUEST['flValorBemReavaliacao']))); + $stMotivoReavaliacao = $_REQUEST['stMotivoReavaliacao']; + + if ($dtReavaliacao === '') { + $obErro->setDescricao('Campo Data da Reavaliação inválido!'); + } elseif (substr($dtReavaliacao,0,6) <= $dtUltimaDepreciacao) { + $obErro->setDescricao('Campo Data da Reavaliação deve ser maior que a competência da última depreciação!'); + } elseif (intval($dtUltimaReavaliacao) > intval($dtReavaliacao)) { + $obErro->setDescricao('Campo Data da Reavaliação deve ser maior que a última Reavaliação informada!'); + } elseif ($dtAquisicao > $dtReavaliacao) { + $obErro->setDescricao('Campo Data da Reavaliação deve ser maior que a Data de Aquisição do Bem!'); + } elseif ($dtIncorporacao > $dtReavaliacao) { + $obErro->setDescricao('Campo Data da Reavaliação deve ser maior que a Data de Incorporação do Bem!'); + } elseif ($inVidaUtilReavaliacao === '') { + $obErro->setDescricao('O campo Vida Útil do Bem deve ter valor maior que zero!'); + } elseif ($flValorBemReavaliacao <= 0.00) { + $obErro->setDescricao('O campo Valor da Reavaliação deve ter valor maior que zero!'); + } elseif ($stMotivoReavaliacao === '') { + $obErro->setDescricao('O campo Motivo deve ser preenchido!'); + } elseif ($dtReavaliacao > $dataAtual) { + $obErro->setDescricao('Campo Data da Reavaliação não pode ser maior que a data atual!'); + } + + if ($obErro->ocorreu()) { + $stJs = "alertaAviso('".$obErro->getDescricao()."','form','erro','".Sessao::getId()."');"; + } + + if (!$obErro->ocorreu()) { $arReavaliacao[] = array( - 'inId' => count($arReavaliacao) + 1, - 'inCodReavaliacao' => $inCodReavaliacao, - 'inCodBem' => $inCodBem, - 'dtReavaliacao' => $dtReavaliacao, - 'inVidaUtilReavaliacao' => $inVidaUtilReavaliacao, - 'flValorBemReavaliacao' => $flValorBemReavaliacao, - 'stMotivoReavaliacao' => $stMotivoReavaliacao, - 'inserir' => 'false', + 'inId' => count($arReavaliacao) + 1, + 'inCodReavaliacao' => $inCodReavaliacao, + 'inCodBem' => $inCodBem, + 'dtReavaliacao' => $_REQUEST['dtReavaliacao'], + 'inVidaUtilReavaliacao' => $inVidaUtilReavaliacao, + 'flValorBemReavaliacao' => $flValorBemReavaliacao, + 'stMotivoReavaliacao' => $stMotivoReavaliacao, + 'inserir' => 'true', ); - + + Sessao::write('dtUltimaReavaliacao',$_REQUEST['dtReavaliacao']); Sessao::write('arReavaliacao',$arReavaliacao); - Sessao::write('dtUltimaReavaliacao',$dtReavaliacao); - $rsReavaliacao->proximo(); - + } + } elseif ($_REQUEST['stLimparReavaliacao'] == 'Limpar') { + + } else { + Sessao::remove('dtUltimaReavaliacao'); + Sessao::remove('arReavaliacao'); + + if (trim($_REQUEST['inCodBem']) != '') { + $rsReavaliacao = new RecordSet; + $obTPatrimonioReavaliacao = new TPatrimonioReavaliacao(); + $obTPatrimonioReavaliacao->setDado( 'cod_bem', $_REQUEST['inCodBem'] ); + $obTPatrimonioReavaliacao->recuperaRelacionamento( $rsReavaliacao ); + + $arReavaliacao = array(); + + while (!$rsReavaliacao->eof()) { + $inCodReavaliacao = $rsReavaliacao->getCampo('cod_reavaliacao'); + $inCodBem = $rsReavaliacao->getCampo('cod_bem'); + $dtReavaliacao = $rsReavaliacao->getCampo('dt_reavaliacao'); + $inVidaUtilReavaliacao = $rsReavaliacao->getCampo('vida_util'); + $flValorBemReavaliacao = $rsReavaliacao->getCampo('vl_reavaliacao'); + $stMotivoReavaliacao = $rsReavaliacao->getCampo('motivo'); + $arReavaliacao[] = array( + 'inId' => count($arReavaliacao) + 1, + 'inCodReavaliacao' => $inCodReavaliacao, + 'inCodBem' => $inCodBem, + 'dtReavaliacao' => $dtReavaliacao, + 'inVidaUtilReavaliacao' => $inVidaUtilReavaliacao, + 'flValorBemReavaliacao' => $flValorBemReavaliacao, + 'stMotivoReavaliacao' => $stMotivoReavaliacao, + 'inserir' => 'false', + ); + + Sessao::write('arReavaliacao',$arReavaliacao); + Sessao::write('dtUltimaReavaliacao',$dtReavaliacao); + $rsReavaliacao->proximo(); + } } } - } - - if (!$obErro->ocorreu()) { - $rsReavaliacao = new RecordSet; - $rsReavaliacao->preenche($arReavaliacao); - $rsReavaliacao->addFormatacao('flValorBemReavaliacao' , 'NUMERIC_BR'); - - $obTable = new Table(); - $obTable->setRecordset( $rsReavaliacao); - $obTable->setSummary( 'Lista de Reavaliações' ); - $obTable->Head->addCabecalho('Data Reavaliação',20); - $obTable->Head->addCabecalho('Vida Útil',10); - $obTable->Head->addCabecalho('Valor da Reavaliação',10); - $obTable->Head->addCabecalho('Motivo',60); - $obTable->Body->addCampo( 'dtReavaliacao', 'E' ); - $obTable->Body->addCampo( 'inVidaUtilReavaliacao', 'C' ); - $obTable->Body->addCampo( 'flValorBemReavaliacao', 'C' ); - $obTable->Body->addCampo( 'stMotivoReavaliacao', 'E' ); - $obTable->Body->addAcao( 'excluir', "executaFuncaoAjax( 'excluiReavaliacaoLista', '&inId=%s&inCodReavaliacao=%s&inCodBem=%s&dtReavaliacao=%s');", array( 'inId','inCodReavaliacao','inCodBem','dtReavaliacao' ) ); - $obTable->montaHTML( true ); - $stHTML = $obTable->getHTML(); - $stJs = "jQuery('#stSpnListaReavaliacao').html('".$stHTML."');"; - $stJs .= "jQuery('#dtReavaliacao').val('');"; - $stJs .= "jQuery('#inVidaUtilReavaliacao').val('');"; - $stJs .= "jQuery('#flValorBemReavaliacao').val('');"; - $stJs .= "jQuery('#stMotivoReavaliacao').val('');"; - - } - + + if (!$obErro->ocorreu()) { + $rsReavaliacao = new RecordSet; + $rsReavaliacao->preenche($arReavaliacao); + $rsReavaliacao->addFormatacao('flValorBemReavaliacao' , 'NUMERIC_BR'); + + $obTable = new Table(); + $obTable->setRecordset( $rsReavaliacao); + $obTable->setSummary( 'Lista de Reavaliações' ); + $obTable->Head->addCabecalho('Data Reavaliação',20); + $obTable->Head->addCabecalho('Vida Útil',10); + $obTable->Head->addCabecalho('Valor da Reavaliação',10); + $obTable->Head->addCabecalho('Motivo',60); + $obTable->Body->addCampo( 'dtReavaliacao', 'E' ); + $obTable->Body->addCampo( 'inVidaUtilReavaliacao', 'C' ); + $obTable->Body->addCampo( 'flValorBemReavaliacao', 'C' ); + $obTable->Body->addCampo( 'stMotivoReavaliacao', 'E' ); + $obTable->Body->addAcao( 'excluir', "executaFuncaoAjax( 'excluiReavaliacaoLista', '&inId=%s&inCodReavaliacao=%s&inCodBem=%s&dtReavaliacao=%s');", array( 'inId','inCodReavaliacao','inCodBem','dtReavaliacao' ) ); + $obTable->montaHTML( true ); + $stHTML = $obTable->getHTML(); + $stJs = "jQuery('#stSpnListaReavaliacao').html('".$stHTML."');"; + $stJs .= "jQuery('#dtReavaliacao').val('');"; + $stJs .= "jQuery('#inVidaUtilReavaliacao').val('');"; + $stJs .= "jQuery('#flValorBemReavaliacao').val('');"; + $stJs .= "jQuery('#stMotivoReavaliacao').val('');"; + } break; -case 'montaListaDepreciacoes': - include_once '../../../../../../gestaoAdministrativa/fontes/PHP/framework/componentes/Table/TableTree.class.php'; - + case 'montaListaDepreciacoes': $arDepreciacao = Sessao::read('arDepreciacao'); if ($_REQUEST['inCodBem'] != '') { @@ -809,18 +785,18 @@ case 'montaListaDepreciacoes': $arCompetencia = array( '01' => 'Janeiro', - '02' => 'Fevereiro', - '03' => 'Março', - '04' => 'Abril', - '05' => 'Maio', - '06' => 'Junho', - '07' => 'Julho', - '08' => 'Agosto', - '09' => 'Setembro', - '10' => 'Outubro', - '11' => 'Novembro', - '12' => 'Dezembro', - ); + '02' => 'Fevereiro', + '03' => 'Março', + '04' => 'Abril', + '05' => 'Maio', + '06' => 'Junho', + '07' => 'Julho', + '08' => 'Agosto', + '09' => 'Setembro', + '10' => 'Outubro', + '11' => 'Novembro', + '12' => 'Dezembro', + ); $rsDepreciacao = new RecordSet; $obTPatrimonioDepreciacao = new TPatrimonioDepreciacao(); @@ -864,7 +840,6 @@ case 'montaListaDepreciacoes': $rsDepreciacao->setPrimeiroElemento(); while (!$rsDepreciacao->eof() ) { - $inCodDepreciacao = $rsDepreciacao->getCampo('cod_depreciacao'); $inCodBem = $rsDepreciacao->getCampo('cod_bem'); $timestamp = $rsDepreciacao->getCampo('timestamp'); @@ -878,7 +853,7 @@ case 'montaListaDepreciacoes': Sessao::write('stDepreciacaoCompetencia',substr($rsDepreciacao->getCampo('competencia'),0,2).substr($rsDepreciacao->getCampo('competencia'),2,5)); $stMotivo = $rsDepreciacao->getCampo('motivo'); - $stDepreciacaoAcelerada = $rsDepreciacao->getCampo('acelerada') == 't' ? 'Sim' : 'Não'; + $stDepreciacaoAcelerada = $rsDepreciacao->getCampo('acelerada') == 't' ? 'Sim' : 'Não'; $inVlAtualizadoDepreciacao = $rsSaldoBem->getCampo('inVlAtualizadoDepreciacao'); $inVlDepreciacaoAcumulada = $rsSaldoBem->getCampo('inVlDepreciacaoAcumulada'); $flIndiceDepreciacaoMes = $rsDepreciacao->getCampo('quota_utilizada'); @@ -911,7 +886,7 @@ case 'montaListaDepreciacoes': 'flIndiceDepreciacaoMes' => $flIndiceDepreciacaoMes, 'flValorDepreciacao' => $flValorDepreciacao, 'inserir' => 'false', - 'tipoCompetencia' => $inTipoCompetencia, + 'tipoCompetencia' => $inTipoCompetencia, ); Sessao::write('arDepreciacao',$arDepreciacao); @@ -920,9 +895,7 @@ case 'montaListaDepreciacoes': } if (count($arDepreciacao) > 0) { - if ($inTipoCompetencia == 2 || $inTipoCompetencia == 3 || $inTipoCompetencia == 4 || $inTipoCompetencia == 6 || - Sessao::read('tipoCompetencia') == "6") { - + if ($inTipoCompetencia == 2 || $inTipoCompetencia == 3 || $inTipoCompetencia == 4 || $inTipoCompetencia == 6 || Sessao::read('tipoCompetencia') == "6") { $inTipoCompetencia = $inTipoCompetencia == ""? Sessao::read('tipoCompetencia') : $inTipoCompetencia; $arCompetencias = montaCompetencia($inTipoCompetencia,$inUltimaCompetencia); $rsCompetencias = new RecordSet; @@ -940,8 +913,8 @@ case 'montaListaDepreciacoes': $obTable->montaHTML(true); $stHTML = $obTable->getHtml(); - $stJs .= "jQuery('#stSpnListaDepreciacaoTableTree').html(' '); \n"; - $stJs .= "jQuery('#stSpnListaDepreciacaoTableTree').html('".$stHTML."'); \n"; + $stJs .= "jQuery('#stSpnListaDepreciacaoTableTree').html(' '); \n"; + $stJs .= "jQuery('#stSpnListaDepreciacaoTableTree').html('".$stHTML."'); \n"; } else { $rsDepreciacao = new RecordSet; $rsDepreciacao->preenche($arDepreciacao); @@ -979,9 +952,8 @@ case 'montaListaDepreciacoes': case 'excluiReavaliacaoLista': $obErro = new Erro; if ($strdtReavaliacao <= $stCompetenciaBase) { - //a função excluiReavaliacaoLista(); não deve ser excutada, tem que aparecer uma mensagem dizendo - //que possui Depreciação com competencia maior ou igual. - + //a função excluiReavaliacaoLista(); não deve ser excutada, tem que aparecer uma mensagem dizendo + //que possui Depreciação com competencia maior ou igual. } $arReavaliacao = Sessao::read('arReavaliacao'); $arReavaliacaoTmpExcluir = Sessao::read('arReavaliacaoExcluir'); @@ -992,53 +964,50 @@ case 'montaListaDepreciacoes': $obTPatrimonioDepreciacao->recuperaDepreciacao( $rsDepreciacao ); if (count($arDepreciacao) == 0) { - - if (!is_array($arReavaliacaoTmpExcluir)) { - $arReavaliacaoTmpExcluir = array(); - } - - $arReavaliacaoTmp = array(); - - foreach ($arReavaliacao AS $arDados) { - if ($arDados['inId'] != $_REQUEST['inId']) { - $arReavaliacaoTmp[] = $arDados; - Sessao::write('dtUltimaReavaliacao',$arDados['dtReavaliacao']); - Sessao::write('stDepreciacaoCompetencia',$arDados['competencia']); - } elseif ($arDados['inserir'] == 'false') { - $strdtReavaliacao = substr($arDados['dtReavaliacao'], 3); - $strdtReavaliacao = str_replace('/', '',$strdtReavaliacao); - - if ($rsDepreciacao->getNumLinhas() < 1) { + if (!is_array($arReavaliacaoTmpExcluir)) { + $arReavaliacaoTmpExcluir = array(); + } + + $arReavaliacaoTmp = array(); + + foreach ($arReavaliacao AS $arDados) { + if ($arDados['inId'] != $_REQUEST['inId']) { + $arReavaliacaoTmp[] = $arDados; + Sessao::write('dtUltimaReavaliacao',$arDados['dtReavaliacao']); + Sessao::write('stDepreciacaoCompetencia',$arDados['competencia']); + } elseif ($arDados['inserir'] == 'false') { + $strdtReavaliacao = substr($arDados['dtReavaliacao'], 3); + $strdtReavaliacao = str_replace('/', '',$strdtReavaliacao); + + if ($rsDepreciacao->getNumLinhas() < 1) { $arReavaliacaoTmpExcluir[] = $arDados; - } else { - foreach ($rsDepreciacao->arElementos AS $arDeprec) { - if ($arDeprec['competencia'] < $strdtReavaliacao) { - $arReavaliacaoTmpExcluir[] = $arDados; - } else { - $arReavaliacaoTmp[] = $arDados; - $obErro->setDescricao('A reavaliação não poderá ser removida, pois existem depreciações com data posterior ou igual.'); + } else { + foreach ($rsDepreciacao->arElementos AS $arDeprec) { + if ($arDeprec['competencia'] < $strdtReavaliacao) { + $arReavaliacaoTmpExcluir[] = $arDados; + } else { + $arReavaliacaoTmp[] = $arDados; + $obErro->setDescricao('A reavaliação não poderá ser removida, pois existem depreciações com data posterior ou igual.'); + } } } } } - } - - if (count($arReavaliacaoTmp) == 0) { - Sessao::remove('dtUltimaReavaliacao'); - } - - Sessao::write('arReavaliacao',$arReavaliacaoTmp); - Sessao::write('arReavaliacaoExcluir',$arReavaliacaoTmpExcluir); - - if ($obErro->ocorreu()) { - - $stJs = "alertaAviso('".$obErro->getDescricao()."','form','erro','".Sessao::getId()."');"; - } else { - $stJs = "montaParametrosGET('montaListaReavaliacoes','stLimparReavaliacao');"; - } - + + if (count($arReavaliacaoTmp) == 0) { + Sessao::remove('dtUltimaReavaliacao'); + } + + Sessao::write('arReavaliacao',$arReavaliacaoTmp); + Sessao::write('arReavaliacaoExcluir',$arReavaliacaoTmpExcluir); + + if ($obErro->ocorreu()) { + $stJs = "alertaAviso('".$obErro->getDescricao()."','form','erro','".Sessao::getId()."');"; + } else { + $stJs = "montaParametrosGET('montaListaReavaliacoes','stLimparReavaliacao');"; + } } else { - echo 'erro'; + echo 'erro'; } break; @@ -1055,7 +1024,6 @@ case 'montaListaDepreciacoes': $arDepreciacaoTmp = array(); foreach ($arDepreciacao AS $arDados) { - if (($arDados['inserir'] === 'false') && ($arDados['inId'] == $inUltimoId)) { $arDepreciacaoTmpExcluir[] = $arDados; } else { @@ -1072,7 +1040,6 @@ case 'montaListaDepreciacoes': break; case 'detalhaDepreciacao': - include_once '../../../../../../gestaoAdministrativa/fontes/PHP/framework/componentes/Table/TableTree.class.php'; $stJs = detalhaDepreciacao($_REQUEST['inId'],$_REQUEST['tipoCompetencia']); break; @@ -1080,7 +1047,6 @@ case 'montaListaDepreciacoes': $stJs .= "limpaSelect(f.inCodUnidade,0); \n"; $stJs .= "jq('#inCodUnidadeTxt').value = ''; \n"; $stJs .= "jq('#inCodUnidade').append( new Option('Selecione','', 'selected')) ;\n"; - if ($_REQUEST["inCodOrgao"]) { include_once CAM_GF_EMP_NEGOCIO."REmpenhoRelatorioRPAnuLiqEstLiq.class.php"; @@ -1099,45 +1065,42 @@ case 'montaListaDepreciacoes': } } if($_REQUEST["inCodUnidadeTxt"] !=""){ - $stJs.= "jQuery('#inCodUnidade').val(".$_REQUEST["inCodUnidadeTxt"].") "; - } - break; case "montaObra": - include_once TTGO.'TTGOObras.class.php'; - include_once TTGO.'TTGOPatrimonioBemObra.class.php'; - - $obTTGOObras = new TTGOObras; - $obTTGOObras->recuperaTodos($rsObra); - - $obCmbObra = new Select; - $obCmbObra->setTitle ( "Selecione a Obra" ); - $obCmbObra->setName ( "inCodObra" ); - $obCmbObra->setId ( "inCodObra" ); - $obCmbObra->setRotulo ( "Bens imóveis / Obra" ); - $obCmbObra->addOption ( '', 'Selecione' ); - $obCmbObra->setCampoId ( "[ano_obra]|[cod_obra]" ); - $obCmbObra->setCampoDesc ( "[ano_obra] - [cod_obra]" ); - $obCmbObra->preencheCombo( $rsObra ); - - if(isset($_REQUEST['inCodBem'])) { - $obTTGOPatrimonioBemObra = new TTGOPatrimonioBemObra; - $obTTGOPatrimonioBemObra->setDado('cod_bem', $_REQUEST['inCodBem']); - $obTTGOPatrimonioBemObra->recuperaPorChave($rsPatrimonioBemObra); - - $obCmbObra->setValue($rsPatrimonioBemObra->getCampo('ano_obra').'|'.$rsPatrimonioBemObra->getCampo('cod_obra')); - } - - $obFormulario = new Formulario; - $obFormulario->addTitulo ( 'Obra' ); - $obFormulario->addComponente( $obCmbObra ); - $obFormulario->montaInnerHTML(); - $stHtml = $obFormulario->getHTML(); - - $stJs .= "document.getElementById('spnListaObra').innerHTML = '".$stHtml."'; \n"; + include_once TTGO.'TTGOObras.class.php'; + include_once TTGO.'TTGOPatrimonioBemObra.class.php'; + + $obTTGOObras = new TTGOObras; + $obTTGOObras->recuperaTodos($rsObra); + + $obCmbObra = new Select; + $obCmbObra->setTitle ( "Selecione a Obra" ); + $obCmbObra->setName ( "inCodObra" ); + $obCmbObra->setId ( "inCodObra" ); + $obCmbObra->setRotulo ( "Bens imóveis / Obra" ); + $obCmbObra->addOption ( '', 'Selecione' ); + $obCmbObra->setCampoId ( "[ano_obra]|[cod_obra]" ); + $obCmbObra->setCampoDesc ( "[ano_obra] - [cod_obra]" ); + $obCmbObra->preencheCombo( $rsObra ); + + if(isset($_REQUEST['inCodBem'])) { + $obTTGOPatrimonioBemObra = new TTGOPatrimonioBemObra; + $obTTGOPatrimonioBemObra->setDado('cod_bem', $_REQUEST['inCodBem']); + $obTTGOPatrimonioBemObra->recuperaPorChave($rsPatrimonioBemObra); + + $obCmbObra->setValue($rsPatrimonioBemObra->getCampo('ano_obra').'|'.$rsPatrimonioBemObra->getCampo('cod_obra')); + } + + $obFormulario = new Formulario; + $obFormulario->addTitulo ( 'Obra' ); + $obFormulario->addComponente( $obCmbObra ); + $obFormulario->montaInnerHTML(); + $stHtml = $obFormulario->getHTML(); + + $stJs .= "document.getElementById('spnListaObra').innerHTML = '".$stHtml."'; \n"; break; } @@ -1154,7 +1117,7 @@ function detalhaDepreciacao($inId,$tipoCompetencia) $inIndiceInicial = ((($inId - 1) * $tipoCompetencia) + 1); $inIndiceFinal = ($inId * $tipoCompetencia); - $rsDepreciacao = new RecordSet; + $rsDepreciacao = new RecordSet; $rsDepreciacao->preenche($arDepreciacao); while (!$rsDepreciacao->eof()) { @@ -1169,17 +1132,18 @@ function detalhaDepreciacao($inId,$tipoCompetencia) $stDepreciacaoAcelerada = $rsDepreciacao->getCampo('stDepreciacaoAcelerada') == 't' ? 'Sim' : 'Não'; $flQuotaDepreciacaoAcelerada = $rsDepreciacao->getCampo('flQuotaDepreciacaoAcelerada'); - $arDepreciacaoN[]=array( 'inId' => count($arDepreciacaoN) + 1, + $arDepreciacaoN[]=array( + 'inId' => count($arDepreciacaoN) + 1, 'stCompetencia' => $stCompetencia, 'inCodDepreciacao' => $inCodDepreciacao, 'stMotivo' => $stMotivo, 'inCodPlano' => $inCodPlano, - 'flValorDepreciacao' => $flValorDepreciacao, - 'flIndiceDepreciacaoMes' => $flIndiceDepreciacaoMes, + 'flValorDepreciacao' => $flValorDepreciacao, + 'flIndiceDepreciacaoMes' => $flIndiceDepreciacaoMes, 'stDepreciacaoAcelerada' => $stDepreciacaoAcelerada, 'flQuotaDepreciacaoAcelerada' => $flQuotaDepreciacaoAcelerada, - 'inserir' => 'false', - 'tipoCompetencia' => $tipoCompetencia, + 'inserir' => 'false', + 'tipoCompetencia' => $tipoCompetencia, ); $inIndiceInicial++; } @@ -1207,7 +1171,7 @@ function montaSpamDetalheDepreciacao($rsDados) function montaHTMLConsulta($rsDados) { $obTable = new Table(); - $obTable->setRecordset( $rsDados ); + $obTable->setRecordset( $rsDados ); $obTable->setSummary( 'Lista de Depreciações' ); $obTable->Head->addCabecalho('Competência',10); $obTable->Head->addCabecalho('Motivo',50); diff --git a/gestaoPatrimonial/fontes/PHP/patrimonio/instancias/bem/PRDepreciacaoAutomatica.php b/gestaoPatrimonial/fontes/PHP/patrimonio/instancias/bem/PRDepreciacaoAutomatica.php index 1669f5a..83bd3ea 100644 --- a/gestaoPatrimonial/fontes/PHP/patrimonio/instancias/bem/PRDepreciacaoAutomatica.php +++ b/gestaoPatrimonial/fontes/PHP/patrimonio/instancias/bem/PRDepreciacaoAutomatica.php @@ -27,11 +27,12 @@ include_once '../../../../../../gestaoAdministrativa/fontes/PHP/pacotes/FrameworkHTML.inc.php'; include_once '../../../../../../gestaoAdministrativa/fontes/PHP/framework/include/cabecalho.inc.php'; include_once '../../../../../../gestaoAdministrativa/fontes/PHP/pacotes/FrameworkBirt.inc.php'; -include_once ( CAM_GP_PAT_MAPEAMENTO."FPatrimonioDepreciacaoAutomatica.class.php" ); -include_once ( CAM_GP_PAT_MAPEAMENTO."FPatrimonioReavaliacaoDepreciacaoAutomatica.class.php" ); -include_once ( CAM_GF_CONT_MAPEAMENTO."TContabilidadeLancamentoDepreciacao.class.php" ); -include_once ( CAM_GP_PAT_MAPEAMENTO."TPatrimonioDepreciacao.class.php" ); -include_once ( CAM_GP_PAT_MAPEAMENTO."TPatrimonioDepreciacaoAnulada.class.php" ); +include_once CAM_GP_PAT_MAPEAMENTO."FPatrimonioDepreciacaoAutomatica.class.php"; +include_once CAM_GP_PAT_MAPEAMENTO."FPatrimonioReavaliacaoDepreciacaoAutomatica.class.php"; +include_once CAM_GF_CONT_MAPEAMENTO."TContabilidadeLancamentoDepreciacao.class.php"; +include_once CAM_GP_PAT_MAPEAMENTO."TPatrimonioDepreciacao.class.php"; +include_once CAM_GP_PAT_MAPEAMENTO."TPatrimonioDepreciacaoAnulada.class.php"; +include_once CAM_GP_PAT_MAPEAMENTO."TPatrimonioBem.class.php"; $stProg = 'DepreciacaoAutomatica'; $pgFilt = 'FL'.$stProg.'.php'; @@ -51,68 +52,90 @@ $inCodEntidade = SistemaLegado::pegaDado("valor","administracao.confi switch ($stAcao) { case 'depreciar': - if ($request->get("boAnulacao") == "true") { - $stFiltroDepreciacao = "\n WHERE competencia = '".$inMesCompetenciaFiltro."'"; $obErro = $obTPatrimonioDepreciacao->recuperaTodos($rsPatrimonioDepreciacao, $stFiltroDepreciacao, " ORDER BY cod_depreciacao DESC "); - + $obErro = $obTPatrimonioDepreciacao->recuperaMaxCompetenciaDepreciada($rsMaxCompetenciaDepreciada); $obErro = $obTPatrimonioDepreciacao->recuperaMaxCodDepreciacao($rsMaxDepreciacao, $stFiltroDepreciacao); $obErro = $obTPatrimonioDepreciacaoAnulada->recuperaMaxCodDepreciacaoAnulada($rsMaxAnulada, $stFiltroDepreciacao); - + $stFiltroContabilidade = " WHERE lancamento_depreciacao.timestamp = ( SELECT MAX(lancamento_depreciacao.timestamp) AS timestamp FROM contabilidade.lancamento_depreciacao WHERE competencia = '".$inMesCompetenciaFiltro."' AND cod_entidade = ".$inCodEntidade." AND exercicio = '".$request->get("inExercicio")."' - ) + ) AND lancamento_depreciacao.exercicio = '".$request->get("inExercicio")."'"; $obErro = $obTContabilidadeLancamentoDepreciacao->verificaDepreciacoesAnteriores($rsLancamentosAnteriores, $stFiltroContabilidade, $stOrdem, $boTransacao); - + if (!$obErro->ocorreu()) { - // Verifica se há bens depreciados na competencia selecionada. if ($rsPatrimonioDepreciacao->getNumLinhas() <= 0) { $obErro->setDescricao("Não existem bens depreciados na competência ".$inMesCompetenciaMensagem); - // Verifica se existe algum lançamento em contabilidade.lancamento_depreciacao, caso exista não pode efetuar a anulação, e deve estornar os bens da competencia primeiro. } elseif ($rsLancamentosAnteriores->getNumLinhas() >= 1 && $rsLancamentosAnteriores->getCampo('estorno') == "f") { $obErro->setDescricao("Competência ".$inMesCompetenciaMensagem." com lançamento contábil. Efetue estorno dos lançamentos antes da anulação!"); - // Caso já tenha anulado, e seja da mesma depreciacao, não permite anular. Necessário depreciar novamente. } elseif ($rsMaxAnulada->getNumLinhas() >= 1 && $rsMaxAnulada->getCampo('max_cod_depreciacao_anulada') == $rsMaxDepreciacao->getCampo('max_cod_depreciacao')) { $obErro->setDescricao("Competência ".$inMesCompetenciaMensagem." já anulada!"); - // Verifica se o usuário quer anular uma depreciação menor do que a atual. Deve anular em sequencia dos mes maior ao menor. } elseif ($rsMaxCompetenciaDepreciada->getCampo('max_competencia') != "" && $inMesCompetenciaFiltro < $rsMaxCompetenciaDepreciada->getCampo('max_competencia')) { $obErro->setDescricao("Deve anular última competência depreciada - ".$rsMaxCompetenciaDepreciada->getCampo('max_competencia_formatada')); - - } else { - //SistemaLegado::BloqueiaFrames(true,true); - $obTPatrimonioDepreciacaoAnulada = new TPatrimonioDepreciacaoAnulada(); + } else { + $obTPatrimonioDepreciacaoAnulada = new TPatrimonioDepreciacaoAnulada(); $stParametros = "'".$inMesCompetenciaFiltro."' ,"; - $stParametros .= '\''.($_REQUEST['stMotivo'] ? $_REQUEST['stMotivo'] : '').'\''; - - $obErro = $obTPatrimonioDepreciacaoAnulada->executaFuncao($stParametros, $boTransacao); - + $stParametros .= '\''.($_REQUEST['stMotivo'] ? $_REQUEST['stMotivo'] : '').'\''; + $obErro = $obTPatrimonioDepreciacaoAnulada->executaFuncao($stParametros, $boTransacao); } - + if (!$obErro->ocorreu()) { - SistemaLegado::alertaAviso($pgFilt."?".Sessao::getId()."&stAcao=".$stAcao,"Bens anulados com sucesso até a competência: ".str_pad($request->get("inCompetencia"),2,'0',STR_PAD_LEFT).'/'.$_REQUEST['inExercicio'],"$stAcao","aviso", Sessao::getId(), "../"); + SistemaLegado::alertaAviso($pgFilt."?".Sessao::getId()."&stAcao=".$stAcao,"Bens anulados com sucesso até a competência: ".str_pad($request->get("inCompetencia"),2,'0',STR_PAD_LEFT).'/'.$_REQUEST['inExercicio'],"$stAcao","aviso", Sessao::getId(), "../"); } else { SistemaLegado::exibeAviso(urlencode($obErro->getDescricao()),"n_incluir","erro"); } - } else { SistemaLegado::exibeAviso(urlencode($obErro->getDescricao()),"n_incluir","erro"); } - }else{ - $obTPatrimonioDepreciacao->recuperaDepreciacao($rsPrimeiraDepreciacao, "\n AND depreciacao.competencia = '".$request->get("inExercicio")."01' "); - + $stFiltroBem = "WHERE TO_CHAR(bem.dt_aquisicao,'YYYYMM')::INTEGER <= ".($request->get("inExercicio").str_pad($request->get("inCompetencia"),2,'0',STR_PAD_LEFT))." \n"; + $stFiltroBem .= "AND bem.depreciavel = true \n"; + $stFiltroBem .= "AND NOT EXISTS ( SELECT 1 + FROM patrimonio.bem_baixado + WHERE bem_baixado.cod_bem = bem.cod_bem + ) \n"; + $obTPatrimonioBem = new TPatrimonioBem(); + $obTPatrimonioBem->recuperaRelacionamento ( $rsBemCompetencia, $stFiltroBem ); + $inCountBensCompetencia = $rsBemCompetencia->getNumLinhas(); + + $boErroMesesAnteriores = false; + $stMsgErroMesesAnteriores = ''; + $arMesesAnteriores = array(); + for($i=1;$i<$request->get("inCompetencia");$i++){ + $stFiltroBemMesesAnteriores = $stFiltroBem; + $stFiltroBemMesesAnteriores .= "AND TO_CHAR(bem.dt_aquisicao,'YYYYMM')::INTEGER <= ".$request->get("inExercicio").str_pad($i,2,'0',STR_PAD_LEFT)." \n"; + $obTPatrimonioBem->recuperaRelacionamento ( $rsBemMesesAnteriores, $stFiltroBemMesesAnteriores ); + $arMesesAnteriores[$i]['bens'] = $rsBemMesesAnteriores->getNumLinhas(); + if($rsBemMesesAnteriores->getNumLinhas()>0){ + $obTPatrimonioDepreciacao->recuperaDepreciacao($rsPrimeiraDepreciacao, "\n AND depreciacao.competencia = '".$request->get("inExercicio").str_pad($i,2,'0',STR_PAD_LEFT)."' "); + $arMesesAnteriores[$i]['depreciacoes'] = $rsPrimeiraDepreciacao->getNumLinhas(); + }else{ + $arMesesAnteriores[$i]['depreciacoes'] = $rsBemMesesAnteriores->getNumLinhas(); + } + } + + if(count($arMesesAnteriores)>0){ + foreach($arMesesAnteriores AS $key => $value){ + if($value['bens']<>$value['depreciacoes']){ + $stMsgErroMesesAnteriores = "A depreciação deve iniciar na competência ".str_pad($key,2,'0',STR_PAD_LEFT)."/".$request->get("inExercicio")."!"; + $boErroMesesAnteriores = true; + break; + } + } + } + $obErro = $obTPatrimonioDepreciacao->recuperaMaxCompetenciaDepreciada($rsMaxCompetenciaDepreciada); - + $stFiltroDepreciacao = "\n WHERE competencia = '".$inMesCompetenciaFiltro."'"; $obErro = $obTPatrimonioDepreciacao->recuperaMaxCodDepreciacao($rsMaxDepreciacao, $stFiltroDepreciacao ); $obErro = $obTPatrimonioDepreciacaoAnulada->recuperaMaxCodDepreciacaoAnulada($rsMaxAnulada, $stFiltroDepreciacao ); @@ -121,78 +144,73 @@ switch ($stAcao) { $obErro = $obTPatrimonioDepreciacao->recuperaMaxCodDepreciacao($rsMaxDepreciacaoAnterior, $stFiltroAnterior); $obErro = $obTPatrimonioDepreciacaoAnulada->recuperaMaxCodDepreciacaoAnulada($rsMaxAnuladaAnterior, $stFiltroAnterior); $obErro = $obTPatrimonioDepreciacaoAnulada->recuperaMaxCompetenciaAnulada($rsMxCompetenciaAnterior, $stFiltroAnterior); - - $stProximaCompetencia = ($rsMaxCompetenciaDepreciada->getCampo('max_competencia') != $request->get("inExercicio")."12") ? substr(($rsMaxCompetenciaDepreciada->getCampo('max_competencia') + 1), 4, 6)."/".substr($rsMaxCompetenciaDepreciada->getCampo('max_competencia'),0,4) : substr($rsMaxCompetenciaDepreciada->getCampo('max_competencia'), 4, 6)."/".substr($rsMaxCompetenciaDepreciada->getCampo('max_competencia'),0,4); - + + $stProximaCompetencia = ($rsMaxCompetenciaDepreciada->getCampo('max_competencia') != $request->get("inExercicio")."12") ? substr(($rsMaxCompetenciaDepreciada->getCampo('max_competencia') + 1), 4, 6)."/".substr($rsMaxCompetenciaDepreciada->getCampo('max_competencia'),0,4) : substr($rsMaxCompetenciaDepreciada->getCampo('max_competencia'), 4, 6)."/".substr($rsMaxCompetenciaDepreciada->getCampo('max_competencia'),0,4); + if (!$obErro->ocorreu()) { - // Verifica se a competência anterior possui anulação, não pode depreciar a atual sem antes depreciar novamente a anterior. if ($rsMaxAnuladaAnterior->getCampo('max_cod_depreciacao_anulada') != "" && $rsMaxDepreciacaoAnterior->getCampo('max_cod_depreciacao') == $rsMaxAnuladaAnterior->getCampo('max_cod_depreciacao_anulada') ) { $obErro->setDescricao("Competência ".$rsMxCompetenciaAnterior->getCampo('max_competencia_formatada')." com anulação. Deprecie antes de continuar! "); - // Caso existam bens já depreciados na competencia, mas não tenham sido anulados, não deixa depreciar novamente até que sejam anulados. } elseif ($rsMaxAnulada->getCampo('max_cod_depreciacao_anulada') != $rsMaxDepreciacao->getCampo('max_cod_depreciacao')) { $obErro->setDescricao("Já existem bens depreciados para a competência ".$inMesCompetenciaMensagem); - // Quando existir ao menos uma depreciação, A competencia selecionada nao pode ser menor que a última depreciada. } elseif ( $rsMaxCompetenciaDepreciada->getCampo('max_competencia') != "" && $inMesCompetenciaFiltro < $rsMaxCompetenciaDepreciada->getCampo('max_competencia') ) { $obErro->setDescricao("A competência selecionada não pode ser menor que ".$stProximaCompetencia); - // Quando existir ao menos uma depreciação, A competencia selecionada nao pode ser maior que a última depreciada. } elseif ( $rsMaxCompetenciaDepreciada->getCampo('max_competencia') != "" && $inMesCompetenciaFiltro > ($rsMaxCompetenciaDepreciada->getCampo('max_competencia') + 1) ) { $obErro->setDescricao("A competência selecionada não pode ser maior que ".$stProximaCompetencia); - // Verifica se não existe nenhuma depreciação na competencia inicial, janeiro, e se está tentando depreciar um mês diferente de janeiro - } elseif ($inMesCompetenciaFiltro != $request->get("inExercicio")."01" && $rsPrimeiraDepreciacao->getNumLinhas() <= 0) { - $obErro->setDescricao("A depreciação deve iniciar na competência de Janeiro!"); - } else { - $obFPAtrimonioDepreciacaoAutomatica = new FPatrimonioDepreciacaoAutomatica; - $obFPAtrimonioReavaliacaoDepreciacaoAutomatica = new FPatrimonioReavaliacaoDepreciacaoAutomatica; - + // Verifica se não existe nenhuma depreciação na competencia inicial, janeiro, e se está tentando depreciar um mês diferente de janeiro + } elseif (($inMesCompetenciaFiltro != $request->get("inExercicio")."01" && $boErroMesesAnteriores)) { + $obErro->setDescricao($stMsgErroMesesAnteriores); + }elseif ($inCountBensCompetencia<=0) { + $obErro->setDescricao("Não há bem a ser depreciado na competência ".$inMesCompetenciaMensagem."!"); + }else { + $obFPAtrimonioDepreciacaoAutomatica = new FPatrimonioDepreciacaoAutomatica; + $obFPAtrimonioReavaliacaoDepreciacaoAutomatica = new FPatrimonioReavaliacaoDepreciacaoAutomatica; + $stParametros = '\''.$request->get("inExercicio").'\','; $stParametros .= '\''.str_pad($request->get("inCompetencia"),2,'0',STR_PAD_LEFT).'\','; $stParametros .= 'null,null,null,'; $stParametros .= '\''.($request->get("stMotivo") ? $request->get("stMotivo") : 'Depreciação Automática').'\''; // Verifica quais bens comprados antes do exercicio corrente, precisam de reavaliação para serem depreciados - $obErro = $obFPAtrimonioReavaliacaoDepreciacaoAutomatica->recuperaReavaliacao($rsReavaliacao, $stParametros, $boTransacao); - - if ($rsReavaliacao->getNumLinhas() > 0 ){ - SistemaLegado::LiberaFrames(true,true); - SistemaLegado::exibeAviso(urlencode("Existem bens a serem reavaliados até a competência ".str_pad($request->get("inCompetencia"),2,'0',STR_PAD_LEFT).'/'.$request->get("inExercicio")),"n_incluir","erro"); - - $preview = new PreviewBirt(3,6,24); - $preview->setVersaoBirt( '2.5.0' ); - - $preview->setTitulo('Log de Reavaliação de Depreciação'); - $preview->setNomeArquivo('log_depreciacao_'.sistemaLegado::mesExtensoBR($request->get("inCompetencia"))."_".$request->get("inExercicio")); - - $preview->addParametro( 'exercicio' , $request->get("inExercicio") ); - $preview->addParametro( 'stExercicio' , $request->get("inExercicio") ); - $preview->addParametro( 'stMes' , str_pad($request->get("inCompetencia"),2,'0',STR_PAD_LEFT) ); - $preview->addParametro( 'stMesExtenso', sistemaLegado::mesExtensoBR($request->get("inCompetencia")) ); - $preview->addParametro( 'stMotivo' , "Reavaliação de Depreciação" ); - $preview->addParametro( 'stCabecalho' , "Log de Depreciação ".sistemaLegado::mesExtensoBR($request->get("inCompetencia"))." de ".$request->get("inExercicio") ); - - $preview->preview(); - - //Parar o processamento e carregar o relatório - die; - } else { - $obErro = $obFPAtrimonioDepreciacaoAutomatica->executaFuncao($rsDepreciacao, $stParametros, $boTransacao); - } + $obErro = $obFPAtrimonioReavaliacaoDepreciacaoAutomatica->recuperaReavaliacao($rsReavaliacao, $stParametros, $boTransacao); + + if ($rsReavaliacao->getNumLinhas() > 0 ){ + SistemaLegado::LiberaFrames(true,true); + SistemaLegado::exibeAviso(urlencode("Existem bens a serem reavaliados até a competência ".str_pad($request->get("inCompetencia"),2,'0',STR_PAD_LEFT).'/'.$request->get("inExercicio")),"n_incluir","erro"); + + $preview = new PreviewBirt(3,6,24); + $preview->setVersaoBirt( '2.5.0' ); + + $preview->setTitulo('Log de Reavaliação de Depreciação'); + $preview->setNomeArquivo('log_depreciacao_'.sistemaLegado::mesExtensoBR($request->get("inCompetencia"))."_".$request->get("inExercicio")); + + $preview->addParametro( 'exercicio' , $request->get("inExercicio") ); + $preview->addParametro( 'stExercicio' , $request->get("inExercicio") ); + $preview->addParametro( 'stMes' , str_pad($request->get("inCompetencia"),2,'0',STR_PAD_LEFT) ); + $preview->addParametro( 'stMesExtenso', sistemaLegado::mesExtensoBR($request->get("inCompetencia")) ); + $preview->addParametro( 'stMotivo' , "Reavaliação de Depreciação" ); + $preview->addParametro( 'stCabecalho' , "Log de Depreciação ".sistemaLegado::mesExtensoBR($request->get("inCompetencia"))." de ".$request->get("inExercicio") ); + + $preview->preview(); + //Parar o processamento e carregar o relatório + die; + } else { + $obErro = $obFPAtrimonioDepreciacaoAutomatica->executaFuncao($rsDepreciacao, $stParametros, $boTransacao); + } } if (!$obErro->ocorreu()) { - SistemaLegado::alertaAviso($pgFilt."?".Sessao::getId()."&stAcao=".$stAcao,"Bens depreciados com sucesso até a competência: ".str_pad($request->get("inCompetencia"),2,'0',STR_PAD_LEFT).'/'.$_REQUEST['inExercicio'],"$stAcao","aviso", Sessao::getId(), "../"); + SistemaLegado::alertaAviso($pgFilt."?".Sessao::getId()."&stAcao=".$stAcao,"Bens depreciados com sucesso até a competência: ".str_pad($request->get("inCompetencia"),2,'0',STR_PAD_LEFT).'/'.$_REQUEST['inExercicio'],"$stAcao","aviso", Sessao::getId(), "../"); } else { SistemaLegado::exibeAviso(urlencode($obErro->getDescricao()),"n_incluir","erro"); } - } else { SistemaLegado::exibeAviso(urlencode($obErro->getDescricao()),"n_incluir","erro"); } - } break; diff --git a/gestaoPatrimonial/fontes/PHP/patrimonio/instancias/relatorio/relatorioPatrimonialResumido.php b/gestaoPatrimonial/fontes/PHP/patrimonio/instancias/relatorio/relatorioPatrimonialResumido.php index 4d47776..0459692 100755 --- a/gestaoPatrimonial/fontes/PHP/patrimonio/instancias/relatorio/relatorioPatrimonialResumido.php +++ b/gestaoPatrimonial/fontes/PHP/patrimonio/instancias/relatorio/relatorioPatrimonialResumido.php @@ -67,7 +67,6 @@ if ( is_array($sessao->transf) ) { //if ( !isset($filtro) ) { $arLocal = preg_split( "/[^a-zA-Z0-9]/", $_POST['codMasSetor'] ); - //sistemaLegado::mostravar($_POST) ; if ($_POST['inCodBemInicial']) { $codBemInicial = $_POST['inCodBemInicial']; } @@ -172,7 +171,6 @@ $ordenar = "B.cod_bem"; //Mostra a opção de imprimir ou salvar o relatório $sqlPDF = $sql." ORDER BY ".$ordenar." ASC "; -//sistemaLegado::mostravar($sqlPDF) ; $sXML = '../../../../../../gestaoPatrimonial/fontes/PHP/patrimonio/patrimonio/relatorios/relatorioPatrimonialResumido.xml'; $botoesPDF = new botoesPdfLegado; $botoesPDF->imprimeBotoes($sXML,$sqlPDF,'',''); diff --git a/gestaoPatrimonial/fontes/PHP/patrimonio/patrimonio/bens/consultaBens.php b/gestaoPatrimonial/fontes/PHP/patrimonio/patrimonio/bens/consultaBens.php index 069d305..0282cb4 100755 --- a/gestaoPatrimonial/fontes/PHP/patrimonio/patrimonio/bens/consultaBens.php +++ b/gestaoPatrimonial/fontes/PHP/patrimonio/patrimonio/bens/consultaBens.php @@ -583,7 +583,6 @@ switch ($ctrl) { administracao.orgao ORDER by nom_orgao"; - //mostravar($sSQL); $dbEmp = new dataBaseLegado; $dbEmp->abreBD(); $dbEmp->abreSelecao($sSQL); @@ -921,8 +920,6 @@ switch ($ctrl) { } } - //mostravar($aVarWhere); - function MontaWhere() { global $aVarWhere; @@ -1126,7 +1123,7 @@ $sSQLs .= $sWhere.$whCgm.$whData.$whEntidade; $sessao->transf3 = ""; $sessao->transf3 = "b.cod_bem"; $sessao->transf5 = ""; - //mostravar($sSQLs); + $botoesPDF = new botoesPdfLegado; $paginacao = new paginacaoLegada; $paginacao->pegaDados( $sSQLs, "10" ); @@ -1135,7 +1132,6 @@ $sSQLs .= $sWhere.$whCgm.$whData.$whEntidade; $paginacao->pegaOrder("b.cod_bem","ASC"); $sSQL = $paginacao->geraSQL(); - //mostraVar($_POST); $dbEmp = new dataBaseLegado; $dbEmp->abreBD(); $dbEmp->abreSelecao($sSQL); diff --git a/gestaoPatrimonial/fontes/PHP/patrimonio/patrimonio/bens/interfaceBens.class.php b/gestaoPatrimonial/fontes/PHP/patrimonio/patrimonio/bens/interfaceBens.class.php index b005880..469c031 100755 --- a/gestaoPatrimonial/fontes/PHP/patrimonio/patrimonio/bens/interfaceBens.class.php +++ b/gestaoPatrimonial/fontes/PHP/patrimonio/patrimonio/bens/interfaceBens.class.php @@ -259,7 +259,6 @@ class interfaceBens //Carrega os campos do vetor como variáveis, cada qual com seu respectivo valor if (is_array($vet)) { - //mostravar($vet) foreach ($vet as $chave=>$valor) { $$chave = $valor; } @@ -1013,7 +1012,6 @@ if ($formAcao != 'incluir_lote') { administracao.orgao ORDER by nom_orgao"; - //mostravar($sSQL); $dbEmp = new dataBaseLegado; $dbEmp->abreBD(); $dbEmp->abreSelecao($sSQL); @@ -1349,7 +1347,6 @@ if ($formAcao != 'incluir_lote') { administracao.orgao ORDER by nom_orgao"; - //mostravar($sSQL); $dbEmp = new dataBaseLegado; $dbEmp->abreBD(); $dbEmp->abreSelecao($sSQL); @@ -1448,7 +1445,6 @@ if ($formAcao != 'incluir_lote') { { //Carrega os campos do vetor como variáveis, cada qual com seu respectivo valor if (is_array($vet)) { - //mostravar($vet) foreach ($vet as $chave=>$valor) { $$chave = $valor; } diff --git a/gestaoPatrimonial/fontes/PHP/patrimonio/patrimonio/bens/transfereBens.php b/gestaoPatrimonial/fontes/PHP/patrimonio/patrimonio/bens/transfereBens.php index e5ff32c..915bd1a 100755 --- a/gestaoPatrimonial/fontes/PHP/patrimonio/patrimonio/bens/transfereBens.php +++ b/gestaoPatrimonial/fontes/PHP/patrimonio/patrimonio/bens/transfereBens.php @@ -250,7 +250,6 @@ switch ($controle) { administracao.orgao ORDER by nom_orgao"; - //mostravar($sSQL); $dbEmp = new dataBaseLegado; $dbEmp->abreBD(); $dbEmp->abreSelecao($sSQL); @@ -518,7 +517,6 @@ exit(); administracao.orgao ORDER by nom_orgao"; - //mostravar($sSQL); $dbEmp = new dataBaseLegado; $dbEmp->abreBD(); $dbEmp->abreSelecao($sSQL); @@ -879,7 +877,6 @@ exit(); administracao.orgao ORDER by nom_orgao"; - //mostravar($sSQL); $dbEmp = new dataBaseLegado; $dbEmp->abreBD(); $dbEmp->abreSelecao($sSQL); diff --git a/gestaoPatrimonial/fontes/PHP/patrimonio/patrimonio/manutencao/agendaManutencao.php b/gestaoPatrimonial/fontes/PHP/patrimonio/patrimonio/manutencao/agendaManutencao.php index c7cdd16..8243619 100755 --- a/gestaoPatrimonial/fontes/PHP/patrimonio/patrimonio/manutencao/agendaManutencao.php +++ b/gestaoPatrimonial/fontes/PHP/patrimonio/patrimonio/manutencao/agendaManutencao.php @@ -39,50 +39,11 @@ * Casos de uso: uc-03.01.07 */ - -/* -$Log$ -Revision 1.33 2007/04/23 20:57:19 rodrigo_sr -Bug #8351# - -Revision 1.32 2007/02/28 18:52:51 bruce -Bug #8350# - -Revision 1.31 2006/12/06 11:41:47 larocca -Bug #6925# - -Revision 1.30 2006/11/21 17:19:16 hboaventura -Bug #6929# - -Revision 1.29 2006/11/06 15:55:58 hboaventura -bug #6880# - -Revision 1.28 2006/10/25 17:33:41 hboaventura -bug #6929# - -Revision 1.27 2006/07/27 12:58:59 fernando -Bug #6660# - -Revision 1.26 2006/07/21 11:36:02 fernando -Inclusão do Ajuda. - -Revision 1.25 2006/07/13 19:14:14 fernando -Alteração de hints - -Revision 1.24 2006/07/06 14:06:58 diego -Retirada tag de log com erro. - -Revision 1.23 2006/07/06 12:11:28 diego - -*/ - include_once '../../../../../../gestaoAdministrativa/fontes/PHP/framework/include/cabecalho.inc.php'; include_once '../bens.class.php'; include_once '../../../../../../gestaoAdministrativa/fontes/PHP/framework/legado/dataBaseLegado.class.php'; include_once '../../../../../../gestaoAdministrativa/fontes/PHP/framework/legado/funcoesLegado.lib.php'; -//SistemaLegado::mostraVar($_REQUEST); - setAjuda("UC-03.01.07"); $agenda = new bens; if ( !isset($_REQUEST["ctrl"] )) { diff --git a/gestaoPatrimonial/fontes/PHP/patrimonio/patrimonio/relatorios/cargaPatrimonial.php b/gestaoPatrimonial/fontes/PHP/patrimonio/patrimonio/relatorios/cargaPatrimonial.php index 5f1c4b2..82cfbb9 100755 --- a/gestaoPatrimonial/fontes/PHP/patrimonio/patrimonio/relatorios/cargaPatrimonial.php +++ b/gestaoPatrimonial/fontes/PHP/patrimonio/patrimonio/relatorios/cargaPatrimonial.php @@ -201,7 +201,7 @@ setAjuda("UC-03.01.13"); administracao.orgao ORDER by nom_orgao"; - //mostravar($sSQL); + $dbEmp = new dataBaseLegado; $dbEmp->abreBD(); $dbEmp->abreSelecao($sSQL); diff --git a/gestaoPatrimonial/fontes/PHP/patrimonio/patrimonio/relatorios/cargaPatrimonialCompleto.php b/gestaoPatrimonial/fontes/PHP/patrimonio/patrimonio/relatorios/cargaPatrimonialCompleto.php index 88ad960..904f49f 100755 --- a/gestaoPatrimonial/fontes/PHP/patrimonio/patrimonio/relatorios/cargaPatrimonialCompleto.php +++ b/gestaoPatrimonial/fontes/PHP/patrimonio/patrimonio/relatorios/cargaPatrimonialCompleto.php @@ -390,7 +390,6 @@ Sql referente a atributo patrimonial que não existe mais $sXML = '../../../../../../gestaoPatrimonial/fontes/PHP/patrimonio/patrimonio/relatorios/cargaPatrimonialCadastral.xml'; $sSubTitulo = "Cadastral"; } -// sistemaLegado::mostravar($sqlPDF) ; $botoesPDF = new botoesPdfLegado; $botoesPDF->imprimeBotoes($sXML,$sqlPDF,'',$sSubTitulo); diff --git a/gestaoPatrimonial/fontes/PHP/patrimonio/patrimonio/relatorios/financeiraNaturezaMostra.php b/gestaoPatrimonial/fontes/PHP/patrimonio/patrimonio/relatorios/financeiraNaturezaMostra.php index 3326306..af7300b 100755 --- a/gestaoPatrimonial/fontes/PHP/patrimonio/patrimonio/relatorios/financeiraNaturezaMostra.php +++ b/gestaoPatrimonial/fontes/PHP/patrimonio/patrimonio/relatorios/financeiraNaturezaMostra.php @@ -173,7 +173,6 @@ FROM $sqlPDF .= " ".$stLigacao." ".montaWhere("bem", $codInicial, $codFinal)."; \n"; -//sistemaLegado::mostravar($sqlPDF) ; $sXML = '../../../../../../gestaoPatrimonial/fontes/PHP/patrimonio/patrimonio/relatorios/financeiraNatureza.xml'; $sSubTitulo = ""; $botoesPDF = new botoesPdfLegado; diff --git a/gestaoPatrimonial/fontes/PHP/patrimonio/patrimonio/relatorios/relatorioPatrimonialResumido.php b/gestaoPatrimonial/fontes/PHP/patrimonio/patrimonio/relatorios/relatorioPatrimonialResumido.php index 0e351ad..25c5606 100755 --- a/gestaoPatrimonial/fontes/PHP/patrimonio/patrimonio/relatorios/relatorioPatrimonialResumido.php +++ b/gestaoPatrimonial/fontes/PHP/patrimonio/patrimonio/relatorios/relatorioPatrimonialResumido.php @@ -68,7 +68,6 @@ if ( is_array($arFiltro) ) { //if ( !isset($filtro) ) { $arLocal = preg_split( "/[^a-zA-Z0-9]/", $_POST['codMasSetor'] ); - //sistemaLegado::mostravar($_POST) ; if ($_POST['inCodBemInicial']) { $codBemInicial = $_POST['inCodBemInicial']; } @@ -173,7 +172,6 @@ $ordenar = "B.cod_bem"; //Mostra a opção de imprimir ou salvar o relatório $sqlPDF = $sql." ORDER BY ".$ordenar." ASC "; -//sistemaLegado::mostravar($sqlPDF) ; $sXML = '../../../../../../gestaoPatrimonial/fontes/PHP/patrimonio/patrimonio/relatorios/relatorioPatrimonialResumido.xml'; $botoesPDF = new botoesPdfLegado; $botoesPDF->imprimeBotoes($sXML,$sqlPDF,'',''); diff --git a/gestaoPatrimonial/fontes/PLPGSQL/patrimonio/fn_depreciacao_automatica.plsql b/gestaoPatrimonial/fontes/PLPGSQL/patrimonio/fn_depreciacao_automatica.plsql index 295743d..be03883 100644 --- a/gestaoPatrimonial/fontes/PLPGSQL/patrimonio/fn_depreciacao_automatica.plsql +++ b/gestaoPatrimonial/fontes/PLPGSQL/patrimonio/fn_depreciacao_automatica.plsql @@ -37,6 +37,8 @@ CREATE TYPE depreciacao_automatica AS ( , dt_reavaliacao DATE , vida_util INTEGER , motivo VARCHAR + , exercicio_aquisicao VARCHAR + , mes_aquisicao INTEGER ); */ @@ -125,6 +127,8 @@ stQuery := ' SELECT bem.cod_bem , reavaliacao.dt_reavaliacao , reavaliacao.vida_util , reavaliacao.motivo + , to_char(bem.dt_aquisicao, ''YYYY'')::VARCHAR AS exercicio_aquisicao + , to_char(bem.dt_aquisicao, ''MM'')::INTEGER AS mes_aquisicao FROM patrimonio.bem @@ -220,7 +224,7 @@ FOR rcBens IN EXECUTE stQuery LOOP IF inCodContaAnalitica IS NULL THEN RAISE EXCEPTION 'Conta Contábil de Depreciação Acumulada % do bem % não é analítica ou não está cadastrada no plano de contas.',rcBens.cod_plano, rcBens.cod_bem; END IF; - + -- Calcula o valor da quota, para a primeira inserção e dos proximos meses -- Caso o bem tenha depreciação acelerada, soma junto ao calculo de depreciação. IF (rcBens.depreciacao_acelerada IS TRUE) THEN @@ -230,7 +234,7 @@ FOR rcBens IN EXECUTE stQuery LOOP vlQuota := TRUNC((rcBens.quota_depreciacao_anual/12),2); vlQuotaPrimeira := vlQuota + (rcBens.quota_depreciacao_anual - (vlQuota * 12)); END IF; - + stQueryDepreciacao := 'SELECT vl_bem , vl_atualizado , vl_acumulado diff --git a/gestaoPatrimonial/fontes/RPT/compras/report/design/ordemCompra.rptdesign b/gestaoPatrimonial/fontes/RPT/compras/report/design/ordemCompra.rptdesign index b11bdf4..45374df 100644 --- a/gestaoPatrimonial/fontes/RPT/compras/report/design/ordemCompra.rptdesign +++ b/gestaoPatrimonial/fontes/RPT/compras/report/design/ordemCompra.rptdesign @@ -277,6 +277,12 @@ params['stQuery'] = this.queryText;]]> , cgm_fornecedor.bairro , cgm_fornecedor.cep , cgm_fornecedor.fone_comercial AS telefone + , cgm_fornecedor.tipo_logradouro + , CASE WHEN TRIM(cgm_fornecedor.complemento) <> '' THEN + ', '||cgm_fornecedor.complemento + ELSE + '' + END AS complemento , sw_uf.sigla_uf AS uf , sw_municipio.nom_municipio , (CASE WHEN licitacao.cod_processo IS NOT NULL THEN licitacao.cod_processo||'/'||licitacao.exercicio_processo @@ -957,8 +963,9 @@ WHERE NOT EXISTS ( logradouro - dataSetRow["logradouro"] + ", " + dataSetRow["numero"] + ". " + dataSetRow["bairro"] + ", " + dataSetRow["cep"] + " " + dataSetRow["nom_municipio"] + "/" + dataSetRow["uf"] + " " + dataSetRow["telefone"] + dataSetRow['tipo_logradouro'] + ' ' + dataSetRow["logradouro"] + ", " + dataSetRow["numero"] + "" + dataSetRow['complemento'] + ", " + dataSetRow["bairro"] + ", " + dataSetRow["nom_municipio"] + "/" + dataSetRow["uf"] string + true logradouro diff --git a/gestaoPatrimonial/fontes/RPT/compras/report/design/relSolicitacaoCompra.rptdesign b/gestaoPatrimonial/fontes/RPT/compras/report/design/relSolicitacaoCompra.rptdesign index 722d2cc..bd4b8c0 100644 --- a/gestaoPatrimonial/fontes/RPT/compras/report/design/relSolicitacaoCompra.rptdesign +++ b/gestaoPatrimonial/fontes/RPT/compras/report/design/relSolicitacaoCompra.rptdesign @@ -1,154 +1,121 @@ - Copyright (c) 2008 cnm Eclipse BIRT Designer Version 4.4.0.v201405191524 Build <4.4.0.v20140606-1451> + Template para o formato A4 paisagem in - - + urbem_250.defaultTheme Template Urbem Paisagem auto layout + ltr + 96 - ../../../../../../gestaoAdministrativa/fontes/RPT/framework/library/urbem.rptlibrary - urbem + ../../../../../../gestaoAdministrativa/fontes/RPT/framework/library/urbem_250.rptlibrary + urbem_250 - - true + static - true string true simple - false - text-box - 1 - - Unformatted - - - - true - static - false - string - - 1580 - text-box Unformatted - - true - Connection URL + static false string - - jdbc:postgresql://172.16.30.4:5432/gp_des_mariana_0701_1920 - - text-box - - Unformatted - - - - static - true - string true simple - false text-box - 1 Unformatted - + static - true + false string true simple - false - text-box - 1 - - Unformatted - - - - static - false - string text-box Unformatted - + static false string + true + simple text-box Unformatted - + static false string + true + simple text-box Unformatted - + static - false string + true + + simple text-box Unformatted - + static - false string + true + + simple text-box Unformatted - + static false string + true + + + + + simple text-box Unformatted - + static false string + true + + + + + simple text-box Unformatted @@ -165,56 +132,37 @@ if (params['numcgm_assinatura'] != "") { Unformatted - + static + false string - true - simple text-box Unformatted - + static false string - true - - - - - simple text-box Unformatted - + static false string - true - - - - - simple text-box Unformatted - + static false string - true - - - - - simple text-box Unformatted @@ -222,33 +170,39 @@ if (params['numcgm_assinatura'] != "") { - + + org.postgresql.Driver + jdbc:postgresql://[ip]:[port]/[data_base] + birt + NmM0Mzk0MmJjY2U0MzA3ZjA4NTc1ZjhlODM4YWUzZWY= + - + + param_1 cod_solicitacao - string - 4 + integer + 0 1 false - false true + false param_2 cod_entidade - string - 4 + integer + 0 2 false - false true + false @@ -256,10 +210,9 @@ if (params['numcgm_assinatura'] != "") { this.queryText=this.queryText+" and solicitacao.exercicio = '"+params["exercicio"]+"' " } else { this.queryText=this.queryText+" and solicitacao.exercicio = '"+params["exercicio_solicitacao"]+"' " -} - -]]> - Postgres +}]]> + postgres + - - - 1.0 - - - In - - - - 1 - - 4 - 0 - 0 - NotNullable - - - - - JS_EXPR - - - - - - In - - - - 2 - - 4 - 0 - 0 - NotNullable - - - - - JS_EXPR - - - - - -]]> + solicitacao.cod_solicitacao = ? AND + solicitacao.cod_entidade = ?]]> - + - param1 + param_1 cod_solicitacao integer 0 1 - 0 false true false - param2 + param_2 cod_entidade integer 0 2 - 0 false true false @@ -449,367 +353,190 @@ WHERE - Postgres + postgres - - - - - - param_1 - exercicio - - string - 1 - 1 - true - false - true - - - - - Postgres - - - - 1.0 - - - In - - - - 1 - - 1 - Unknown - - - - - - JS_EXPR - - true - false - - TextField - - - - - - - - - - - - exercicio - 1 - - 12 - 4 - 0 - NotNullable - - - exercicio - - 4 - - - - - - - cod_entidade - 2 - - 4 - 10 - 0 - NotNullable - - - cod_entidade - - 11 - - - - - - - numcgm - 3 - - 4 - 10 - 0 - NotNullable - - - numcgm - - 11 - - - - - - - cargo - 4 - - 12 - 30 - 0 - NotNullable - - - cargo - - 30 - - - - - - - timestamp - 5 - - 93 - 29 - 6 - NotNullable - - - timestamp - - 29 - - - - - - - nom_cgm - 6 - - 12 - 200 - 0 - NotNullable - - - nom_cgm - - 200 - - - - - - -]]> + + + + + + + a4 @@ -819,135 +546,98 @@ WHERE assinatura.exercicio = ?::varchar]]> 0.21in 0.1in - - 285mm + - - - 158mm - - - 92mm - - - - - - - - - - - - - 6mm - - - 4mm - - - 6mm - - - - - - - - - - - - usuario - - - usuario - 'Usuário: ' + params["term_user"] - string - - - - - - - - - - - - - Emissão: <VALUE-OF> -var obData = new Date(); -var stDia = obData.getDate(); -if( stDia < 10 ){ - stDia = '0'+stDia; -} -var stMes = obData.getMonth()+1; -if( stMes < 10 ){ - stMes = "0"+stMes; -} -stDia+"/"+stMes+"/"+obData.getFullYear(); -</VALUE-OF> - html - - - - Hora: -<VALUE-OF>var obData = new Date(); - var stHora = obData.getHours(); - if(stHora < 10) - { - stHora = "0"+stHora; - } - var stMinutos = obData.getMinutes(); - if(stMinutos < 10) - { - stMinutos = "0"+stMinutos; - } - stHora+":"+stMinutos; -</VALUE-OF> - html - - - - - top - - - - top - - - - right - top - - - 0pt - - - - - - - - - - - - - - - - - - - + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + - + 285mm @@ -960,12 +650,8 @@ stDia+"/"+stMes+"/"+obData.getFullYear(); - - "Verdana" - 10pt - 10pt - 0in - 285mm + + consultaSolicitacao boRegistroPreco @@ -973,15 +659,75 @@ stDia+"/"+stMes+"/"+obData.getFullYear(); string true + + entidade + ': '+dataSetRow["cod_entidade"]+' - '+dataSetRow["entidade_nomcgm"].replace('\\\'','\'') + string + true + + + solicitacao + ': '+dataSetRow["cod_solicitacao"] + '/' +dataSetRow["exercicio"] + string + true + + + data_solicitacao + ': '+dataSetRow["data_solicitacao"] + string + true + + + objeto_descricao + ': '+dataSetRow["objeto_codigo"] + ' - ' + dataSetRow["objeto_descricao"] + string + true + + + requisitante + ': '+dataSetRow["requisitante_numcgm"]+' - '+dataSetRow["requisitante_nomcgm"].replace('\\\'','\'') + string + true + + + solicitante + ': '+dataSetRow["solicitante_numcgm"]+' - '+dataSetRow["solicitante_nomcgm"].replace('\\\'','\'') + string + true + + + almoxarifado + ': '+dataSetRow["almoxarifado_codigo"]+' - '+dataSetRow["almoxarifado_nomcgm"].replace('\\\'','\'') + string + true + + + localizacao + ': '+dataSetRow["localizacao_numcgm"] + ' - ' + dataSetRow["localizacao_nomcgm"].replace('\\\'','\'') + string + true + + + prazo_entrega + ': '+dataSetRow["prazo_entrega"] + ' dias' + string + true + + + observacao + ': '+dataSetRow["observacao"].replace('\\\'','\'') + string + true + - - 2.0520833333in + + 1.7291666666666667in - - 8.9130434783in + + 9.614583333333334in - - + + - - - sans-serif - 8pt + + boRegistroPreco - - + + - - - sans-serif - 8pt - consultaSolicitacao - - - entidade - ': '+dataSetRow["cod_entidade"]+' - '+dataSetRow["entidade_nomcgm"].replace('\\\'','\'') - string - - + + entidade - - + + - - - sans-serif - 8pt - consultaSolicitacao - - - solicitacao - ': '+dataSetRow["cod_solicitacao"] + '/' +dataSetRow["exercicio"] - string - - + + solicitacao - - + + - - - sans-serif - 8pt - consultaSolicitacao - - - data_solicitacao - ': '+dataSetRow["data_solicitacao"] - string - - + + data_solicitacao - - + + - - - sans-serif - 8pt - consultaSolicitacao - - - objeto_codigo - ': '+dataSetRow["objeto_codigo"] + ' - ' + dataSetRow["objeto_descricao"] - string - - - objeto_codigo + + + objeto_descricao - - + + - - - sans-serif - 8pt - consultaSolicitacao - - - requisitante - ': '+dataSetRow["requisitante_numcgm"]+' - '+dataSetRow["requisitante_nomcgm"].replace('\\\'','\'') - string - - + + requisitante - - + + - - - sans-serif - 8pt - consultaSolicitacao - - - solicitante - ': '+dataSetRow["solicitante_numcgm"]+' - '+dataSetRow["solicitante_nomcgm"].replace('\\\'','\'') - string - - + + solicitante - - + + - - - sans-serif - 8pt - consultaSolicitacao - - - almoxarifado - ': '+dataSetRow["almoxarifado_codigo"]+' - '+dataSetRow["almoxarifado_nomcgm"].replace('\\\'','\'') - string - - + + almoxarifado - - + + - - - sans-serif - 8pt - consultaSolicitacao - - - localizacao - ': '+dataSetRow["localizacao_numcgm"] + ' - ' + dataSetRow["localizacao_nomcgm"].replace('\\\'','\'') - string - - + + localizacao - - + + - - - sans-serif - 8pt - consultaSolicitacao - - - prazo_entrega - ': '+dataSetRow["prazo_entrega"] + ' dias' - string - - + + prazo_entrega - - + + - - - sans-serif - 8pt - consultaSolicitacao - - - observacao - ': '+dataSetRow["observacao"].replace('\\\'','\'') - string - - + + observacao - - - - 100% - consultaSolicitacao - - - all - row["num_convenio"] == null - - - - - cod_entidade - dataSetRow["cod_entidade"] - integer - - - entidade_nomcgm - dataSetRow["entidade_nomcgm"] - string - - - cod_solicitacao - dataSetRow["cod_solicitacao"] - integer - - - exercicio - dataSetRow["exercicio"] - string - - - almoxarifado_codigo - dataSetRow["almoxarifado_codigo"] - integer - - - almoxarifado_nomcgm - dataSetRow["almoxarifado_nomcgm"] - string - - - solicitante_numcgm - dataSetRow["solicitante_numcgm"] - integer - - - solicitante_nomcgm - dataSetRow["solicitante_nomcgm"] - string - - - requisitante_numcgm - dataSetRow["requisitante_numcgm"] - integer - - - requisitante_nomcgm - dataSetRow["requisitante_nomcgm"] - string - - - objeto_codigo - dataSetRow["objeto_codigo"] - integer - - - objeto_descricao - dataSetRow["objeto_descricao"] - string - - - observacao - dataSetRow["observacao"] - string - - - prazo_entrega - dataSetRow["prazo_entrega"] - integer - - - localizacao_numcgm - dataSetRow["localizacao_numcgm"] - integer - - - localizacao_nomcgm - dataSetRow["localizacao_nomcgm"] - string - - - exercicio_convenio - dataSetRow["exercicio_convenio"] - string - - - num_convenio - dataSetRow["num_convenio"] - integer - - - fundamentacao - dataSetRow["fundamentacao"] - string - - - vl_total_solicitacao - dataSetRow["vl_total_solicitacao"] - decimal - - - timestamp - dataSetRow["timestamp"] - date-time - - - data_solicitacao - dataSetRow["data_solicitacao"] - string - - - 50 - - - - - - - - -
    + + + + + + + 2 + 1 + - - - 100% - consultaSolicitacao - - - all - row["num_convenio"] == null - - + + + + 2 + 1 +
    + solid + thin + solid + thin + solid + thin + solid + thin + itensSolicitacao - cod_entidade - dataSetRow["cod_entidade"] - integer - - - entidade_nomcgm - dataSetRow["entidade_nomcgm"] - string - - - cod_solicitacao - dataSetRow["cod_solicitacao"] - integer - - - exercicio - dataSetRow["exercicio"] - string - - - almoxarifado_codigo - dataSetRow["almoxarifado_codigo"] - integer - - - almoxarifado_nomcgm - dataSetRow["almoxarifado_nomcgm"] - string - - - solicitante_numcgm - dataSetRow["solicitante_numcgm"] - integer - - - solicitante_nomcgm - dataSetRow["solicitante_nomcgm"] - string - - - requisitante_numcgm - dataSetRow["requisitante_numcgm"] - integer - - - requisitante_nomcgm - dataSetRow["requisitante_nomcgm"] - string - - - objeto_codigo - dataSetRow["objeto_codigo"] + codigo_item + dataSetRow["codigo_item"] integer + true - objeto_descricao - dataSetRow["objeto_descricao"] - string - - - observacao - dataSetRow["observacao"] + descricao_item + dataSetRow["descricao_item"] string + true - prazo_entrega - dataSetRow["prazo_entrega"] - integer - - - localizacao_numcgm - dataSetRow["localizacao_numcgm"] - integer - - - localizacao_nomcgm - dataSetRow["localizacao_nomcgm"] + complemento + dataSetRow["complemento"] string + true - exercicio_convenio - dataSetRow["exercicio_convenio"] + unidade + dataSetRow["unidade"] string + true - num_convenio - dataSetRow["num_convenio"] - integer - - - fundamentacao - dataSetRow["fundamentacao"] + centrocusto + dataSetRow["centrocusto"].replace('\\\'','\'') string + true - vl_total_solicitacao - dataSetRow["vl_total_solicitacao"] + vl_unitario + dataSetRow["vl_unitario"] decimal - - - timestamp - dataSetRow["timestamp"] - date-time - - - data_solicitacao - dataSetRow["data_solicitacao"] - string - - - 50 - - - - - - sans-serif - 8pt - consultaSolicitacao - - - all - row["fundamentacao"]==null - - - - - cod_entidade - dataSetRow["cod_entidade"] - integer - - - entidade_nomcgm - dataSetRow["entidade_nomcgm"] - string - - - cod_solicitacao - dataSetRow["cod_solicitacao"] - integer - - - exercicio - dataSetRow["exercicio"] - string - - - almoxarifado_codigo - dataSetRow["almoxarifado_codigo"] - integer - - - almoxarifado_nomcgm - dataSetRow["almoxarifado_nomcgm"] - string - - - solicitante_numcgm - dataSetRow["solicitante_numcgm"] - integer - - - solicitante_nomcgm - dataSetRow["solicitante_nomcgm"] - string - - - requisitante_numcgm - dataSetRow["requisitante_numcgm"] - integer - - - requisitante_nomcgm - dataSetRow["requisitante_nomcgm"] - string - - - objeto_codigo - dataSetRow["objeto_codigo"] - integer - - - objeto_descricao - dataSetRow["objeto_descricao"] - string - - - observacao - dataSetRow["observacao"] - string - - - prazo_entrega - dataSetRow["prazo_entrega"] - integer - - - localizacao_numcgm - dataSetRow["localizacao_numcgm"] - integer - - - localizacao_nomcgm - dataSetRow["localizacao_nomcgm"] - string - - - exercicio_convenio - dataSetRow["exercicio_convenio"] - string - - - convenio - ": "+dataSetRow["exercicio_convenio"]+" - "+dataSetRow["num_convenio"]+" - "+dataSetRow["fundamentacao"] - string - - - fundamentacao - dataSetRow["fundamentacao"] - string - - - vl_total_solicitacao - dataSetRow["vl_total_solicitacao"] - decimal - - - timestamp - dataSetRow["timestamp"] - date-time - - - data_solicitacao - dataSetRow["data_solicitacao"] - string - - - convenio - - - - -
    -     -     - - 35px - - 2 - 1 - middle - - html - Itens da Solicitação]]> - - - - - - 2 - 1 - - 284mm - itensSolicitacao - - - unidade - dataSetRow["unidade"] - string - - - centro - dataSetRow["centro"] - integer - - - centrocusto - dataSetRow["centrocusto"].replace('\\\'','\'') - string + true quantidade - if( dataSetRow["quantidade_dotacao"]== '' ) + if( dataSetRow["quantidade_dotacao"]== '' ) { dataSetRow["quantidade"] } else{ dataSetRow["quantidade_dotacao"] } - float + decimal + true vl_total - if( dataSetRow["vl_total_dotacao"] == '' ) + if( dataSetRow["vl_total_dotacao"] == '' ) { dataSetRow["vl_total"] } else{ dataSetRow["vl_total_dotacao"] } - float - - - descricao_item - dataSetRow["descricao_item"] - string - - - codigo_item - dataSetRow["codigo_item"] - integer + decimal + true classificacao_completa - this.text = ""; + this.text = ""; -if(dataSetRow["cod_despesa"] != null){ +if(dataSetRow["cod_despesa"] != 0){ this.text = this.text + "Dotação: "+dataSetRow["cod_despesa"]; }else{ this.text = this.text + ""; @@ -1804,83 +1074,76 @@ if(dataSetRow["recurso"] != null){ this.text; string - - - dotacao_classificacao - dataSetRow["cod_programa"]+" - "+dataSetRow["programa"]+" "+"PAO: "+dataSetRow["num_pao"]+" - "+dataSetRow["nom_pao"]+" "+dataSetRow["recurso"]+" - "+dataSetRow["nom_recurso"] - string - - - cod_despesa - dataSetRow["cod_despesa"] - string + true desdobramento - this.text = ""; + this.text = ""; -if(dataSetRow["clasificacao"] != ""){ - this.text = this.text + "Desdobramento: "+dataSetRow["clasificacao"]+" - "+dataSetRow["descricao_desdob"]; +if( dataSetRow["classificacao"] != "" ){ + this.text = this.text + "Desdobramento: "+dataSetRow["classificacao"]+" - "+dataSetRow["descricao_desdob"]; }else{ - this.text = this.text + ""; + this.text = this.text; } string + true - classificacao - dataSetRow["clasificacao"] - string + valor_total + float + SUM + + + Expression + row["vl_total"] + + + true - vl_unitario - dataSetRow["vl_unitario"] - decimal + cod_despesa + dataSetRow["cod_despesa"] + string + true - complemento - dataSetRow["complemento"] + classificacao + dataSetRow["classificacao"] string + true - 50 - - 1in + + 0.8958333333333334in - - 3.347826087in + + 3.4375in - - 1.3586956522in + + 1.40625in - - 1.6195652174in + + 1.6979166666666667in - - 1.0543478261in + + 1.09375in - - 1.0543478261in + + 1.3125in - - 1.2717391304in + + 1.4270833333333333in
    - - bold - center - - 1 - 1 - #000000 + + + bold solid thin - #000000 solid thin - #000000 solid thin - #000000 solid thin - - #000000 + + bold solid thin - #000000 solid thin - #000000 solid thin - #000000 solid thin - - #000000 + + bold solid thin - #000000 solid thin - #000000 solid thin - #000000 solid thin - - #000000 + + bold solid thin - #000000 solid thin - #000000 solid thin - #000000 solid thin - - #000000 + + bold solid thin - #000000 solid thin - #000000 solid thin - #000000 solid thin - - #000000 + + bold solid thin - #000000 solid thin - #000000 solid thin - #000000 solid thin - - #000000 + + bold solid thin - #000000 solid thin - #000000 solid thin - #000000 solid thin
    - + classificacao - none - asc - row["classificacao_completa"] + row["classificacao_completa"] - row["classificacao_completa"] + row["classificacao_completa"] - false false - auto - auto
    - + all - row["cod_despesa"] == null || row["cod_despesa"] == '' + row["cod_despesa"] == 0 - + 7 1 - #000000 - solid - thin - #000000 - solid - thin - - sans-serif + 8pt bold classificacao_completa @@ -2044,53 +1277,29 @@ if(dataSetRow["clasificacao"] != ""){
    - - dotacao - none - asc - row["dotacao_classificacao"] - - row["dotacao_classificacao"] - - false - false - auto - auto - - + desdobramento - none - asc - row["desdobramento"] + row["desdobramento"] - row["desdobramento"] + row["desdobramento"] - true false - auto - auto
    - + all - row["classificacao"] == null || row["classificacao"] == '' + row["classificacao"] == "" - + 7 1 - #000000 - solid - thin - #000000 - solid - thin - - sans-serif + 8pt bold 1cm + 1pt desdobramento @@ -2098,181 +1307,128 @@ if(dataSetRow["clasificacao"] != ""){
    - - 0.25in - - #000000 + + solid thin - #000000 solid thin - #000000 solid thin - #000000 solid thin - 2px - 2px middle - - sans-serif + 8pt - 0pt - 10pt - right + center codigo_item - - #000000 + solid thin - #000000 solid thin - #000000 solid thin - #000000 solid thin - 2px - 2px - - sans-serif + middle + 8pt descricao_item - - sans-serif + 8pt complemento - - #000000 + solid thin - #000000 solid thin - #000000 solid thin - #000000 solid thin - 2px - 2px middle - - sans-serif + 8pt center unidade - - #000000 + solid thin - #000000 solid thin - #000000 solid thin - #000000 solid thin - 2px - 2px middle - - sans-serif + 8pt - left centrocusto - - #000000 + solid thin - #000000 solid thin - #000000 solid thin - #000000 solid thin - 2px - 2px middle - - sans-serif + 8pt Currency - #,##0.00 + R$#,##0.00{RoundingMode=HALF_UP} right vl_unitario - - #000000 + solid thin - #000000 solid thin - #000000 solid thin - #000000 solid thin - 2px - 2px middle - - sans-serif + 8pt Currency - #,##0.0000 + #,##0.0000{RoundingMode=HALF_UP} right quantidade - - #000000 + solid thin - #000000 solid thin - #000000 solid thin - #000000 solid thin - 2px - 2px middle - - sans-serif + 8pt Currency - #,##0.00 + R$#,##0.00{RoundingMode=HALF_UP} right vl_total @@ -2280,251 +1436,77 @@ if(dataSetRow["clasificacao"] != ""){ -
    - - #000000 - solid - thin - #000000 - solid - thin - #000000 - solid - thin - 0in - 284mm - - 9.1956521739in - - - right - 1.5326086957in - - - 0in - - - - - - - Currency - #,##0.00 - - right - consultaSolicitacao - - - vl_total_solicitacao - dataSetRow["vl_total_solicitacao"] - decimal - - - vl_total_solicitacao - - - - -     -     -     - - 50pt - 100pt - 0.5in - 8in - - - - - - - all - params["numero_assinatura"] > 1 || params["numero_assinatura"] == "" || params["numero_assinatura"] == 0 - - - - - - 0pt - 100% - assinaturas - - - all - params["numero_assinatura"] > 1 || params["numero_assinatura"] == "" || params["numero_assinatura"] == 0 - - - - - nom_cgm - dataSetRow["nom_cgm"] - string - - - cargo - dataSetRow["cargo"] - string - - - 50 - - - - - - all - (row.__rownum%2==1) - - - - 40pt - - sans-serif - 7pt - #000000 - solid - thin - center - nom_cgm - - - sans-serif - 7pt - center - cargo - - - - -
    -     - -     - - 0.25in - - - all - params["numero_assinatura"] < 2 || params["numero_assinatura"] == "" || params["numero_assinatura"] == 0 - - - - - 0pt - 100% - assinaturas - - - all - params["numero_assinatura"] < 2 || params["numero_assinatura"] == "" || params["numero_assinatura"] == 0 - - - - - nom_cgm - dataSetRow["nom_cgm"] - string - - - cargo - dataSetRow["cargo"] - string - - - 50 - - - - - - all - (row.__rownum%2==1) - - - - 40pt - - sans-serif - 7pt - #000000 - solid - thin - center - nom_cgm - - - sans-serif - 7pt - center - cargo - +
    + + + + + + + + - - -
    -     - - - - 0pt - 100% - assinaturas - - - all - params["numero_assinatura"] < 2 || params["numero_assinatura"] == "" || params["numero_assinatura"] == 0 - - - - - nom_cgm - dataSetRow["nom_cgm"] - string - - - cargo - dataSetRow["cargo"] - string - - - 50 - - - - - - all - (row.__rownum%2==0) - - - - 40pt - - sans-serif - 7pt - #000000 - solid - thin - center - nom_cgm - - - sans-serif - 7pt - center - cargo + + + 8pt + bold + + Currency + R$#,##0.00{RoundingMode=HALF_UP} + + right + valor_total - +
    + + padrão_urbem + 2cm + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + +     diff --git a/gestaoPatrimonial/fontes/RPT/licitacao/report/design/mapaComparativoProposta.rptdesign b/gestaoPatrimonial/fontes/RPT/licitacao/report/design/mapaComparativoProposta.rptdesign index 972195a..e18ee1c 100644 --- a/gestaoPatrimonial/fontes/RPT/licitacao/report/design/mapaComparativoProposta.rptdesign +++ b/gestaoPatrimonial/fontes/RPT/licitacao/report/design/mapaComparativoProposta.rptdesign @@ -174,8 +174,8 @@ - - + @@ -1549,7 +1549,7 @@ params["data_emissao"].value 8pt Currency - #,##0.00 + #,##0.0000{RoundingMode=HALF_UP} right vl_unitario diff --git a/gestaoPatrimonial/fontes/SQL/GP_2044.sql b/gestaoPatrimonial/fontes/SQL/GP_2044.sql index 0107ae8..de5ceb4 100644 --- a/gestaoPatrimonial/fontes/SQL/GP_2044.sql +++ b/gestaoPatrimonial/fontes/SQL/GP_2044.sql @@ -31,7 +31,7 @@ */ ---------------- --- Ticket #23154 +-- Ticket #23288 ---------------- INSERT @@ -46,21 +46,48 @@ INSERT , ativo ) VALUES - ( 3086 - , 362 - , 'FLManterAutorizacao.php' - , 'parcial' - , 2 + ( 3087 + , 342 + , 'FLManterContrato.php' + , 'consultar' + , 11 , '' - , 'Emitir Autorização de Empenho Parcial' + , 'Consultar Contrato' , TRUE ); ---------------- --- Ticket #23288 +-- Ticket #23340 +---------------- + +DROP TYPE depreciacao_automatica CASCADE; +CREATE TYPE depreciacao_automatica AS ( + cod_bem INTEGER, + descricao VARCHAR, + dt_incorporacao DATE , + dt_aquisicao DATE , + competencia_incorporacao TEXT , + vl_bem NUMERIC, + quota_depreciacao_anual NUMERIC, + quota_depreciacao_anual_acelerada NUMERIC, + depreciacao_acelerada BOOLEAN, + cod_plano INTEGER, + cod_reavaliacao INTEGER, + dt_reavaliacao DATE , + vida_util INTEGER, + motivo VARCHAR, + exercicio_aquisicao VARCHAR, + mes_aquisicao INTEGER +); + + +---------------- +-- Ticket #23374 ---------------- +UPDATE administracao.acao SET ordem = ordem + 4 WHERE cod_funcionalidade = 342; + INSERT INTO administracao.acao ( cod_acao @@ -72,14 +99,79 @@ INSERT , nom_acao , ativo ) -VALUES - ( 3087 + VALUES + ( 3095 , 342 - , 'FLManterContrato.php' - , 'consultar' - , 11 + , 'FMManterTipoContrato.php' + , 'incluir' + , 1 , '' - , 'Consultar Contrato' + , 'Incluir Tipo de Contrato' + , TRUE + ); + +INSERT + INTO administracao.acao + ( cod_acao + , cod_funcionalidade + , nom_arquivo + , parametro + , ordem + , complemento_acao + , nom_acao + , ativo + ) + VALUES + ( 3096 + , 342 + , 'FLManterTipoContrato.php' + , 'alterar' + , 2 + , '' + , 'Alterar Tipo de Contrato' + , TRUE + ); + +INSERT + INTO administracao.acao + ( cod_acao + , cod_funcionalidade + , nom_arquivo + , parametro + , ordem + , complemento_acao + , nom_acao + , ativo + ) + VALUES + ( 3097 + , 342 + , 'FLManterTipoContrato.php' + , 'excluir' + , 3 + , '' + , 'Excluir Tipo de Contrato' , TRUE ); +ALTER TABLE licitacao.tipo_contrato ADD COLUMN tipo_tc INTEGER; +ALTER TABLE licitacao.tipo_contrato ADD COLUMN ativo BOOLEAN NOT NULL DEFAULT TRUE; + +---------------- +-- Ticket #23417 +---------------- + +INSERT + INTO administracao.configuracao + ( cod_modulo + , exercicio + , parametro + , valor + ) + VALUES + ( 45 + , '2015' + , 'tcmba_tipo_periodicidade_patrimonio' + , '' + ); + diff --git a/gestaoPatrimonial/fontes/SQL/GP_2045.sql b/gestaoPatrimonial/fontes/SQL/GP_2045.sql new file mode 100644 index 0000000..52fdb68 --- /dev/null +++ b/gestaoPatrimonial/fontes/SQL/GP_2045.sql @@ -0,0 +1,66 @@ +/* + ********************************************************************************** + * * + * @package URBEM CNM - Soluções em Gestão Pública * + * @copyright (c) 2013 Confederação Nacional de Municípos * + * @author Confederação Nacional de Municípios * + * * + * O URBEM CNM é um software livre; você pode redistribuí-lo e/ou modificá-lo sob * + * os termos da Licença Pública Geral GNU conforme publicada pela Fundação do * + * Software Livre (FSF - Free Software Foundation); na versão 2 da Licença. * + * * + * Este programa é distribuído na expectativa de que seja útil, porém, * + * SEM NENHUMA GARANTIA; nem mesmo a garantia implícita de COMERCIABILIDADE OU * + * ADEQUAÇÃO A UMA FINALIDADE ESPECÍFICA. Consulte a Licença Pública Geral do GNU * + * para mais detalhes. * + * * + * Você deve ter recebido uma cópia da Licença Pública Geral do GNU "LICENCA.txt" * + * com este programa; se não, escreva para a Free Software Foundation Inc., * + * no endereço 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA. * + * * + ********************************************************************************** +*/ +/* +* +* Script de DDL e DML +* +* Versao 2.04.5 +* +* Fabio Bertoldi - 20151117 +* +*/ + +---------------- +-- Ticket #23154 +---------------- + +INSERT + INTO administracao.acao + ( cod_acao + , cod_funcionalidade + , nom_arquivo + , parametro + , ordem + , complemento_acao + , nom_acao + , ativo + ) +VALUES + ( 3086 + , 362 + , 'FLManterAutorizacao.php' + , 'parcial' + , 2 + , '' + , 'Emitir Autorização de Empenho Parcial' + , TRUE + ); + + +---------------- +-- Ticket #23383 +---------------- + +ALTER TABLE licitacao.edital ADD COLUMN dt_final_entrega_propostas DATE; +ALTER TABLE licitacao.edital ADD COLUMN hora_final_entrega_propostas VARCHAR(5); + diff --git a/gestaoPatrimonial/fontes/SQL/GP_2046.sql b/gestaoPatrimonial/fontes/SQL/GP_2046.sql new file mode 100644 index 0000000..d3f29d2 --- /dev/null +++ b/gestaoPatrimonial/fontes/SQL/GP_2046.sql @@ -0,0 +1,34 @@ +/* + ********************************************************************************** + * * + * @package URBEM CNM - Soluções em Gestão Pública * + * @copyright (c) 2013 Confederação Nacional de Municípos * + * @author Confederação Nacional de Municípios * + * * + * O URBEM CNM é um software livre; você pode redistribuí-lo e/ou modificá-lo sob * + * os termos da Licença Pública Geral GNU conforme publicada pela Fundação do * + * Software Livre (FSF - Free Software Foundation); na versão 2 da Licença. * + * * + * Este programa é distribuído na expectativa de que seja útil, porém, * + * SEM NENHUMA GARANTIA; nem mesmo a garantia implícita de COMERCIABILIDADE OU * + * ADEQUAÇÃO A UMA FINALIDADE ESPECÍFICA. Consulte a Licença Pública Geral do GNU * + * para mais detalhes. * + * * + * Você deve ter recebido uma cópia da Licença Pública Geral do GNU "LICENCA.txt" * + * com este programa; se não, escreva para a Free Software Foundation Inc., * + * no endereço 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA. * + * * + ********************************************************************************** +*/ +/* +* +* Script de DDL e DML +* +* Versao 2.04.6 +* +* Fabio Bertoldi - 20151126 +* +*/ + +SELECT now(); + diff --git a/gestaoPatrimonial/fontes/SQL/GP_2047.sql b/gestaoPatrimonial/fontes/SQL/GP_2047.sql new file mode 100644 index 0000000..18e9b92 --- /dev/null +++ b/gestaoPatrimonial/fontes/SQL/GP_2047.sql @@ -0,0 +1,134 @@ +/* + ********************************************************************************** + * * + * @package URBEM CNM - Soluções em Gestão Pública * + * @copyright (c) 2013 Confederação Nacional de Municípos * + * @author Confederação Nacional de Municípios * + * * + * O URBEM CNM é um software livre; você pode redistribuí-lo e/ou modificá-lo sob * + * os termos da Licença Pública Geral GNU conforme publicada pela Fundação do * + * Software Livre (FSF - Free Software Foundation); na versão 2 da Licença. * + * * + * Este programa é distribuído na expectativa de que seja útil, porém, * + * SEM NENHUMA GARANTIA; nem mesmo a garantia implícita de COMERCIABILIDADE OU * + * ADEQUAÇÃO A UMA FINALIDADE ESPECÍFICA. Consulte a Licença Pública Geral do GNU * + * para mais detalhes. * + * * + * Você deve ter recebido uma cópia da Licença Pública Geral do GNU "LICENCA.txt" * + * com este programa; se não, escreva para a Free Software Foundation Inc., * + * no endereço 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA. * + * * + ********************************************************************************** +*/ +/* +* +* Script de DDL e DML +* +* Versao 2.04.7 +* +* Fabio Bertoldi - 20151210 +* +*/ + +---------------- +-- Ticket #20569 +---------------- + +INSERT + INTO contabilidade.historico_contabil + ( cod_historico + , exercicio + , nom_historico + , complemento + , historico_interno + ) +VALUES + ( 963 + , '2015' + , 'Vlr. Ref. Estorno de Depreciação Acumulada mês' + , TRUE + , TRUE + ); + +INSERT + INTO contabilidade.historico_contabil + ( cod_historico + , exercicio + , nom_historico + , complemento + , historico_interno + ) +VALUES + ( 964 + , '2015' + , 'Vlr. Ref. Lançamento Contábil de Depreciação por Baixa de Bem' + , TRUE + , TRUE + ); + +INSERT + INTO contabilidade.historico_contabil + ( cod_historico + , exercicio + , nom_historico + , complemento + , historico_interno + ) +VALUES + ( 965 + , '2015' + , 'Vlr. Ref. Estorno Lançamento Contábil de Depreciação por Baixa de Bem' + , TRUE + , TRUE + ); + +INSERT + INTO contabilidade.historico_contabil + ( cod_historico + , exercicio + , nom_historico + , complemento + , historico_interno + ) +VALUES + ( 966 + , '2015' + , 'Vlr. Ref. Lançamento Contábil de Baixa de Bem' + , TRUE + , TRUE + ); + +INSERT + INTO contabilidade.historico_contabil + ( cod_historico + , exercicio + , nom_historico + , complemento + , historico_interno + ) +VALUES + ( 967 + , '2015' + , 'Vlr. Ref. Estorno de Lançamento Contábil de Baixa de Bem' + , TRUE + , TRUE + ); + +CREATE TABLE contabilidade.lancamento_baixa_patrimonio_depreciacao( + id INTEGER NOT NULL, + timestamp TIMESTAMP NOT NULL DEFAULT ('now'::text)::timestamp(3) with time zone, + exercicio CHAR(4) NOT NULL, + cod_entidade INTEGER NOT NULL, + tipo CHAR(1) NOT NULL, + cod_lote INTEGER NOT NULL, + sequencia INTEGER NOT NULL, + cod_bem INTEGER NOT NULL, + estorno BOOLEAN NOT NULL DEFAULT FALSE, + CONSTRAINT pk_lancamento_baixa_patrimonio_depreciacao PRIMARY KEY (id), + CONSTRAINT fk_lancamento_baixa_patrimonio_depreciacao_1 FOREIGN KEY (exercicio, cod_entidade, tipo, cod_lote, sequencia) + REFERENCES contabilidade.lancamento (exercicio, cod_entidade, tipo, cod_lote, sequencia), + CONSTRAINT fk_lancamento_baixa_patrimonio_depreciacao_2 FOREIGN KEY (cod_bem) + REFERENCES patrimonio.bem (cod_bem) +); +GRANT ALL ON contabilidade.lancamento_baixa_patrimonio_depreciacao TO urbem; + diff --git a/gestaoPatrimonial/fontes/SQL/GP_2050.sql b/gestaoPatrimonial/fontes/SQL/GP_2050.sql new file mode 100644 index 0000000..0e8ce9a --- /dev/null +++ b/gestaoPatrimonial/fontes/SQL/GP_2050.sql @@ -0,0 +1,2193 @@ +/* + ********************************************************************************** + * * + * @package URBEM CNM - Soluções em Gestão Pública * + * @copyright (c) 2013 Confederação Nacional de Municípos * + * @author Confederação Nacional de Municípios * + * * + * O URBEM CNM é um software livre; você pode redistribuí-lo e/ou modificá-lo sob * + * os termos da Licença Pública Geral GNU conforme publicada pela Fundação do * + * Software Livre (FSF - Free Software Foundation); na versão 2 da Licença. * + * * + * Este programa é distribuído na expectativa de que seja útil, porém, * + * SEM NENHUMA GARANTIA; nem mesmo a garantia implícita de COMERCIABILIDADE OU * + * ADEQUAÇÃO A UMA FINALIDADE ESPECÍFICA. Consulte a Licença Pública Geral do GNU * + * para mais detalhes. * + * * + * Você deve ter recebido uma cópia da Licença Pública Geral do GNU "LICENCA.txt" * + * com este programa; se não, escreva para a Free Software Foundation Inc., * + * no endereço 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA. * + * * + ********************************************************************************** +*/ +/* +* +* Script de DDL e DML +* +* Versao 2.05.0 +* +* Fabio Bertoldi - 20151123 +* +*/ + +---------------- +-- Ticket #23413 +---------------- + +CREATE TABLE familia( + estrutural VARCHAR(7), + descricao VARCHAR(100) +); + +INSERT INTO familia(estrutural, descricao) VALUES ('002.000','equipamentos/materiais p/escritorio/escola/artes plasticas'); +INSERT INTO familia(estrutural, descricao) VALUES ('003.000','servicos técnicos: projetos/auditorias/ consultorias/assessorias'); +INSERT INTO familia(estrutural, descricao) VALUES ('007.000','serviços de engenharia/obras: resíduos sólidos'); +INSERT INTO familia(estrutural, descricao) VALUES ('008.000','serviços de engenharia/obras: edificações'); +INSERT INTO familia(estrutural, descricao) VALUES ('009.000','serviços de engenharia/obras: rodovias, ferrovias e aeroportos'); +INSERT INTO familia(estrutural, descricao) VALUES ('010.000','serviços de engenharia/obras: obras-de-arte-especiais'); +INSERT INTO familia(estrutural, descricao) VALUES ('011.000','serviços de engenharia/obras: urbanização'); +INSERT INTO familia(estrutural, descricao) VALUES ('012.000','serviços de engenharia/obras: infraestrutura de energia'); +INSERT INTO familia(estrutural, descricao) VALUES ('013.000','serviços de engenharia/obras: saneamento'); +INSERT INTO familia(estrutural, descricao) VALUES ('014.000','serviços de engenharia/obras: obras portuárias, marítimas e fluviais'); +INSERT INTO familia(estrutural, descricao) VALUES ('015.000','serviços de engenharia/obras: serviços especializados para construção'); +INSERT INTO familia(estrutural, descricao) VALUES ('016.000','serviços de engenharia/obras: inst. elétricas, hidráulicas e outras inst. em construções'); +INSERT INTO familia(estrutural, descricao) VALUES ('017.000','serviços de engenharia/obras: serviços técnicos de engenharia e arquitetura'); +INSERT INTO familia(estrutural, descricao) VALUES ('029.000','serviços: credenciamento de serviços de educação'); +INSERT INTO familia(estrutural, descricao) VALUES ('030.000','serviços: credenciamento de serviços de saúde'); +INSERT INTO familia(estrutural, descricao) VALUES ('031.000','servicos: terceirizacao de mao-de-obra especializada'); +INSERT INTO familia(estrutural, descricao) VALUES ('033.000','materiais p/escritório'); +INSERT INTO familia(estrutural, descricao) VALUES ('034.000','materiais/ suprimentos p/informatica'); +INSERT INTO familia(estrutural, descricao) VALUES ('035.000','equipamentos p/informatica'); +INSERT INTO familia(estrutural, descricao) VALUES ('037.000','servicos: terceirizacao de mao-de-obra'); +INSERT INTO familia(estrutural, descricao) VALUES ('042.000','servicos: transporte de cargas e passageiros'); +INSERT INTO familia(estrutural, descricao) VALUES ('045.000','servicos: graficos/similares'); +INSERT INTO familia(estrutural, descricao) VALUES ('047.000','servicos: som, imagem e programacao visual'); +INSERT INTO familia(estrutural, descricao) VALUES ('052.000','servicos: manutencao de veiculos, equipamentos e aeronaves'); +INSERT INTO familia(estrutural, descricao) VALUES ('057.000','servicos: manut/equip/escrit/eletrodomesticos/refrigeracao'); +INSERT INTO familia(estrutural, descricao) VALUES ('059.000','servicos: serralheria/marcen./carpin./metalurgica/fundicao'); +INSERT INTO familia(estrutural, descricao) VALUES ('062.000','servicos: locacao de veiculos, equipamentos e aeronaves'); +INSERT INTO familia(estrutural, descricao) VALUES ('063.000','serviços: locacao de imoveis'); +INSERT INTO familia(estrutural, descricao) VALUES ('064.000','aquisição de imoveis'); +INSERT INTO familia(estrutural, descricao) VALUES ('070.000','maquinas p/autenticar/registrar/franquear e similares'); +INSERT INTO familia(estrutural, descricao) VALUES ('072.000','servicos: vigilancia/seguranca/transporte de valores'); +INSERT INTO familia(estrutural, descricao) VALUES ('077.000','servicos: alimentacao'); +INSERT INTO familia(estrutural, descricao) VALUES ('082.000','servicos: hotelaria/agencias de viagem e turismo'); +INSERT INTO familia(estrutural, descricao) VALUES ('097.000','servicos: bilheteria / estacionamento'); +INSERT INTO familia(estrutural, descricao) VALUES ('105.000','livros/publicacoes/revistas'); +INSERT INTO familia(estrutural, descricao) VALUES ('107.000','servicos: seguros'); +INSERT INTO familia(estrutural, descricao) VALUES ('112.000','servicos: contratacao parceria/invest./arrend/merchandising'); +INSERT INTO familia(estrutural, descricao) VALUES ('113.000','servicos: contratacao instituicao de ensino superior'); +INSERT INTO familia(estrutural, descricao) VALUES ('117.000','servicos: informatica-software/hardware'); +INSERT INTO familia(estrutural, descricao) VALUES ('120.000','papel/papelao/cartao/cartolina'); +INSERT INTO familia(estrutural, descricao) VALUES ('122.000','servicos: fornecimento de vales/tickets'); +INSERT INTO familia(estrutural, descricao) VALUES ('127.000','servicos: analises clinicas/laborat. e exames medicos/odont.'); +INSERT INTO familia(estrutural, descricao) VALUES ('140.000','equipamentos/materiais p/recreacao/deficientes'); +INSERT INTO familia(estrutural, descricao) VALUES ('150.000','instrumentos musicais/componentes/acessorios'); +INSERT INTO familia(estrutural, descricao) VALUES ('160.000','equipamentos/materiais esportivos'); +INSERT INTO familia(estrutural, descricao) VALUES ('185.000','embalagens em geral/cordas/barbantes/fitas (exceto p/med.)'); +INSERT INTO familia(estrutural, descricao) VALUES ('205.000','bandeiras/flamulas/acessorios'); +INSERT INTO familia(estrutural, descricao) VALUES ('215.000','servicos: insignias/brasoes/escudos/medalhas/trofeus/brindes'); +INSERT INTO familia(estrutural, descricao) VALUES ('245.000','vestuarios/uniformes (exceto vestuario de seguranca)'); +INSERT INTO familia(estrutural, descricao) VALUES ('250.000','calcados/bolsas/malas/mochila (exceto de seguranca)'); +INSERT INTO familia(estrutural, descricao) VALUES ('255.000','materiais de armarinho/aviamentos'); +INSERT INTO familia(estrutural, descricao) VALUES ('260.000','materiais p/cama/mesa/banho'); +INSERT INTO familia(estrutural, descricao) VALUES ('270.000','equipamentos/materiais p/microfilmagem'); +INSERT INTO familia(estrutural, descricao) VALUES ('285.000','eletrodomesticos'); +INSERT INTO familia(estrutural, descricao) VALUES ('290.000','equipamentos/componentes/acessorios p/climatizacao'); +INSERT INTO familia(estrutural, descricao) VALUES ('295.000','equipamentos/materiais/acessorios p/projecao/video/foto/som'); +INSERT INTO familia(estrutural, descricao) VALUES ('320.000','moveis/estofados/componentes em geral'); +INSERT INTO familia(estrutural, descricao) VALUES ('345.000','colchoes/colchonetes/travesseiros/almofadas/revestimentos'); +INSERT INTO familia(estrutural, descricao) VALUES ('350.000','equipamentos/materiais/acessorios p/uso comercial/industrial'); +INSERT INTO familia(estrutural, descricao) VALUES ('360.000','utensilios e materiais descartaveis p/copa/cozinha'); +INSERT INTO familia(estrutural, descricao) VALUES ('380.000','equipamentos/materiais p/limpeza/higiene (uso geral)'); +INSERT INTO familia(estrutural, descricao) VALUES ('390.000','equipamentos/acessorios p/acampamento'); +INSERT INTO familia(estrutural, descricao) VALUES ('395.000','equipamentos/componentes/acessorios p/radiotelecomunicacao'); +INSERT INTO familia(estrutural, descricao) VALUES ('397.000','equipamentos/componentes/acessorios p/radiodifusao'); +INSERT INTO familia(estrutural, descricao) VALUES ('400.000','equipamentos/componentes/acessorios p/telefonia'); +INSERT INTO familia(estrutural, descricao) VALUES ('405.000','equipamentos/componentes/acessorios p/medicao'); +INSERT INTO familia(estrutural, descricao) VALUES ('410.000','equipamentos p/geracao/distribuicao de energia eletrica'); +INSERT INTO familia(estrutural, descricao) VALUES ('420.000','componentes p/equipamentos eletricos/eletronicos'); +INSERT INTO familia(estrutural, descricao) VALUES ('428.000','equipamentos p/controle de pessoal'); +INSERT INTO familia(estrutural, descricao) VALUES ('435.000','equipamentos/componentes/acessorios p/solda (em geral)'); +INSERT INTO familia(estrutural, descricao) VALUES ('440.000','feramentas manuais (uso geral)'); +INSERT INTO familia(estrutural, descricao) VALUES ('445.000','equipamentos eletricos p/oficinas (uso geral)'); +INSERT INTO familia(estrutural, descricao) VALUES ('450.000','ferragens/abrasivos'); +INSERT INTO familia(estrutural, descricao) VALUES ('452.000','arames/telas'); +INSERT INTO familia(estrutural, descricao) VALUES ('460.000','madeiras em geral'); +INSERT INTO familia(estrutural, descricao) VALUES ('461.000','materia-prima plastica/sintetica/borracha/derivados'); +INSERT INTO familia(estrutural, descricao) VALUES ('463.000','materia-prima p/metalurgia'); +INSERT INTO familia(estrutural, descricao) VALUES ('465.000','equipamentos/materiais p/construcao civil'); +INSERT INTO familia(estrutural, descricao) VALUES ('475.000','equipamentos/materiais p/instalacoes eletricas'); +INSERT INTO familia(estrutural, descricao) VALUES ('480.000','equip./materiais p/instalacoes hidrosanitarias e gas natural'); +INSERT INTO familia(estrutural, descricao) VALUES ('495.000','vidros planos/espelhos'); +INSERT INTO familia(estrutural, descricao) VALUES ('505.000','materiais p/decoracao de interiores'); +INSERT INTO familia(estrutural, descricao) VALUES ('510.000','obras de arte/objetos decorativos'); +INSERT INTO familia(estrutural, descricao) VALUES ('515.000','equipamentos/materiais de seguranca e protecao'); +INSERT INTO familia(estrutural, descricao) VALUES ('535.000','bombas/motobombas/compressores/componentes/acessorios'); +INSERT INTO familia(estrutural, descricao) VALUES ('540.000','equipamentos/materiais p/irrigacao'); +INSERT INTO familia(estrutural, descricao) VALUES ('548.000','equipamentos/materiais/suprimentos tratamento de agua/esgoto'); +INSERT INTO familia(estrutural, descricao) VALUES ('550.000','equipamentos/pecas/aces. p/constr./conserv. rodovias/portos'); +INSERT INTO familia(estrutural, descricao) VALUES ('555.000','equipamentos/pecas/acessorios p/mineracao/escavacao'); +INSERT INTO familia(estrutural, descricao) VALUES ('565.000','equipamentos/acessorios p/transporte de mercadorias'); +INSERT INTO familia(estrutural, descricao) VALUES ('580.000','equipamentos/pecas/acessorios p/ajardinamento'); +INSERT INTO familia(estrutural, descricao) VALUES ('593.000','elevadores/pontes rolantes/guindastes/talhas'); +INSERT INTO familia(estrutural, descricao) VALUES ('595.000','veiculos'); +INSERT INTO familia(estrutural, descricao) VALUES ('600.000','equipamentos/pecas/materiais/acessorios p/conserv. veiculos'); +INSERT INTO familia(estrutural, descricao) VALUES ('685.000','equipamentos/pecas/acessorios p/agricultura/pecuaria e pesca'); +INSERT INTO familia(estrutural, descricao) VALUES ('736.000',' alimentacao humana especial/manipuladas/fracionada'); +INSERT INTO familia(estrutural, descricao) VALUES ('745.000','pneus/camaras/protetores/materiais p/consertos'); +INSERT INTO familia(estrutural, descricao) VALUES ('748.000','equipamentos/pecas/acessorios p/navegacao'); +INSERT INTO familia(estrutural, descricao) VALUES ('750.000','materiais/acessorios/pecas fundidas'); +INSERT INTO familia(estrutural, descricao) VALUES ('754.000','equipamentos p/lancamentos/pouso/manobras de aeronaves'); +INSERT INTO familia(estrutural, descricao) VALUES ('757.000','combustiveis/lubrificantes/derivados de petroleo'); +INSERT INTO familia(estrutural, descricao) VALUES ('758.000','botijoes/instalacoes industriais de gas glp'); +INSERT INTO familia(estrutural, descricao) VALUES ('760.000','armamentos/explosivos/municoes'); +INSERT INTO familia(estrutural, descricao) VALUES ('773.000','alimentacao humana - prod.origem animal in natura'); +INSERT INTO familia(estrutural, descricao) VALUES ('775.000','alimentacao humana - prod.especial/manipulados/pre-elaborado'); +INSERT INTO familia(estrutural, descricao) VALUES ('779.000','alimentacao humana-prod.origem animal embutidos'); +INSERT INTO familia(estrutural, descricao) VALUES ('784.000','alimentacao humana - produtos de origem vegetal in natura'); +INSERT INTO familia(estrutural, descricao) VALUES ('788.000','alimentacao humana - laticinios e correlatos'); +INSERT INTO familia(estrutural, descricao) VALUES ('792.000','alimentacao humana - produtos nao pereciveis'); +INSERT INTO familia(estrutural, descricao) VALUES ('796.000','alimentacao humana - produtos de panificacao'); +INSERT INTO familia(estrutural, descricao) VALUES ('802.000','alimentacao humana: enteral/oral'); +INSERT INTO familia(estrutural, descricao) VALUES ('803.000','alimentacao humana: produtos coloniais'); +INSERT INTO familia(estrutural, descricao) VALUES ('805.000','equipamentos e gases uso hopitalar/laboratorial/industrial'); +INSERT INTO familia(estrutural, descricao) VALUES ('820.000','equipamentos/materiais p/industria farmaceutica'); +INSERT INTO familia(estrutural, descricao) VALUES ('830.000','equipamentos/materiais p/laboratorio'); +INSERT INTO familia(estrutural, descricao) VALUES ('855.000','diagnostica'); +INSERT INTO familia(estrutural, descricao) VALUES ('870.000','equipamentos/materiais medico-hospitalares/enfermagem'); +INSERT INTO familia(estrutural, descricao) VALUES ('880.000','medicamentos de uso humano'); +INSERT INTO familia(estrutural, descricao) VALUES ('882.000','medicamentos importados (uso humano)'); +INSERT INTO familia(estrutural, descricao) VALUES ('884.000','medicamentos de uso humano - excepcionais'); +INSERT INTO familia(estrutural, descricao) VALUES ('886.000','medicamentos de uso humano - especiais'); +INSERT INTO familia(estrutural, descricao) VALUES ('888.000','medicamentos de uso humano - genericos'); +INSERT INTO familia(estrutural, descricao) VALUES ('890.000','materiais p/higiene pessoal/profilaxia'); +INSERT INTO familia(estrutural, descricao) VALUES ('905.000','servicos: orteses/proteses'); +INSERT INTO familia(estrutural, descricao) VALUES ('910.000','equipamentos/materiais odontologicos'); +INSERT INTO familia(estrutural, descricao) VALUES ('930.000','equipamentos/materiais/medicamentos veterinarios'); +INSERT INTO familia(estrutural, descricao) VALUES ('950.000','animais'); +INSERT INTO familia(estrutural, descricao) VALUES ('960.000','forragens e outros alimentos p/animais'); +INSERT INTO familia(estrutural, descricao) VALUES ('965.000','adubos/corretivos do solo'); +INSERT INTO familia(estrutural, descricao) VALUES ('970.000','defensivos agricolas/domesticos'); +INSERT INTO familia(estrutural, descricao) VALUES ('980.000','sementes/mudas de plantas'); +INSERT INTO familia(estrutural, descricao) VALUES ('990.000','produtos quimicos de limpeza/higiene'); + + +CREATE TABLE subfamilia( + estrutural VARCHAR(7), + descricao VARCHAR(100) +); + +INSERT INTO subfamilia(estrutural, descricao) VALUES ('002.089','tinta para carimbos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('002.177','equipamentos p/escritorio'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('002.178','equipamentos p/reprografia/grafica/copiadoras'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('002.179','equipamentos didaticos/ensino/treinamento'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('002.221','filmes p/ plastificacao'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('002.500','materiais/suprimentos p/equipamentos de escritorio'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('002.504','materiais permanentes p/escritorio'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('002.508','materiais de consumo p/escritorio'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('002.514','materiais permanentes didaticos/escolares/desenho tecnico'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('002.518','materiais de consumo didaticos/escolares/desenho tecnico'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('002.522','materiais p/encadernacao/envelopamento'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('002.526','materiais p/arquivamento'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('002.528','materiais de consumo graficos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('002.632','pinceis profissional'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('003.001','auditoria'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('003.002','assessoria em geral'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('003.089','consultoria em geral'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('003.133','desenho'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('003.180','estudo / analise de medicamentos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('003.500','maqueteira'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('003.632','projetos em geral'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('007.001','aterro sanitário '); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('007.002','coleta de resíduos sólidos urbanos (rsu)'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('007.003','coleta e transporte de resíduos sólidos de serviços de saúde (rsss)'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('007.004','coleta seletiva'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('007.005','disposição final de resíduos sólidos de serviços de saúde (rsss)'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('007.006','disposição final de resíduos sólidos urbanos (rsu)'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('007.007','estação de transbordo'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('007.008','estação/central de tratamento de resíduos '); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('007.009','recuperação de área degradada'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('007.010','transporte de resíduos sólidos urbanos (rsu)'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('007.011','triagem de resíduos sólidos urbanos (rsu)'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('007.012','unidade de triagem'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('007.099','outro serviço de resíduos sólidos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('008.001','administrativo'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('008.002','albergue/abrigo'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('008.003','auditório/teatro'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('008.004','creas/cras'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('008.005','delegacia'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('008.006','depósito/pavilhão'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('008.007','edifício-garagem'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('008.008','escola/creche'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('008.009','estação/terminal de passageiros'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('008.010','ginásio de esportes/estádio'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('008.011','habitação'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('008.012','hospital'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('008.013','laboratório'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('008.014','museu'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('008.015','posto de saúde/ubs'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('008.016','praça de pedágio/postos de pesagem'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('008.017','presídio/penitenciária'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('008.018','restaurante (popular)'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('008.099','outra obra/serviço de edificações'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('009.001','ferrovias de superfície ou subterrâneas, inclusive para metropolitanos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('009.002','pista aeroportuária'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('009.003','rodovias e vias rurais pavimentadas'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('009.004','sinalização horizontal em rodovias e aeroportos '); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('009.005','sinalização vertical em rodovias e aeroportos '); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('009.006','vias rurais não pavimentadas'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('009.099','outra obra de infraestrutura rodoviária/ferroviária/aeroportuária'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('010.001','passarela'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('010.002','ponte'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('010.003','túnel'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('010.004','viaduto / elevada'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('010.099','outra obra-de-arte-especiais'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('011.001','ciclovia'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('011.002','iluminação pública'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('011.003','infraestrutura urbana (loteamentos)'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('011.004','paisagismo'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('011.005','passeios públicos (calçadas)'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('011.006','pavimentação asfáltica em vias urbanas'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('011.007','pavimentação em bloco de concreto '); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('011.008','pavimentação em concreto de cimento portland em vias urbanas'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('011.009','pavimentação em paralelepípedo'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('011.010','pavimentação em pedra irregular'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('011.011','praças, parques e áreas de lazer'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('011.012','sinalização horizontal de vias urbanas'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('011.013','sinalização semafórica'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('011.014','sinalização vertical de vias urbanas'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('011.015','vias urbanas não pavimentadas'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('011.099','outra obra/serviço em via urbana'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('012.001','barragem e represa para geração de energia'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('012.002','estação e subestação de energia elétrica '); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('012.003','gasoduto'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('012.004','mineroduto'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('012.005','oleoduto'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('012.006','rede de distribuição de energia elétrica'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('012.007','rede de transmissão de energia elétrica'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('012.008','usina hidrelétrica, eólica, nuclear, termelétrica, etc.'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('012.099','outra obra/serviço de infraestrutura de energia'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('013.001','barragem para captação de água'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('013.002','adutora'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('013.003','canal/galeria'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('013.004','coleta e transporte de lodo/esgoto'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('013.005','estação de bombeamento de água'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('013.006','estação de bombeamento de esgoto'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('013.007','estação de captação de água'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('013.008','estação de tratamento de água '); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('013.009','estação de tratamento de esgoto '); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('013.010','fossa séptica/sumidouro'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('013.011','perfuração/construção de poço de água'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('013.012','rede coletora'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('013.013','rede de distribuição'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('013.014','rede de drenagem'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('013.015','reservatório'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('013.099','outra obra/serviço de saneamento'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('014.001','aterro hidráulico'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('014.002','barragem, represa e diques para navegação'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('014.003','dragagem'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('014.004','eclusas e canais de navegação'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('014.005','emissário submarino'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('014.006','enrocamentos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('014.007','hidrovia'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('014.008','instalação de cabos submarinos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('014.009','instalações portuárias'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('014.010','portos e marinas'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('014.099','outra obra portuária, marítima ou fluvial'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('015.001','cercamento'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('015.002','contenção de taludes e encostas/muros de arrimo'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('015.003','cortina atirantada'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('015.004','demolições e implosões'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('015.005','derrocamento (desmonte de rocha)'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('015.006','fundações'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('015.007','montagem e desmontagem de andaimes e plataformas de trabalho'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('015.008','montagem e desmontagem de estruturas temporárias'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('015.009','montagem e desmontagem de fôrmas para concreto'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('015.010','serviços de impermeabilização'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('015.011','serviços de reforço e recuperação estrutural'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('015.012','serviços de terraplenagem '); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('015.013','sondagens e estudos geotécnicos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('015.099','outro serviço especializado para construção'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('016.001','elevadores e escadas rolantes'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('016.002','instalações de alarmes, supervisão e automação predial'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('016.003','instalações de comunicação de dados e televisão a cabo'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('016.004','instalações de controle de acesso e circuito fechado de televisão'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('016.005','instalações de eletricidade e iluminação (cabos e instalações elétricas)'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('016.006','instalações de gás, fluidos e vapor'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('016.007','instalações de prevenção e combate à incêndio (ppci)'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('016.008','instalações de refrigeração, climatização e aquecimento'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('016.009','instalações de telefonia, de comunicações e sonorização ambiente'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('016.010','instalações de ventilação e exaustão'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('016.011','instalações hidráulicas e sanitárias'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('016.012','sistema de proteção contra descargas atmosféricas (spda)'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('016.099','outro serviço de instalações'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('017.001','assessorias ou consultorias técnicas'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('017.002','auditorias de obras e serviços de engenharia'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('017.003','cadastramento imobiliário'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('017.004','elaboração de anteprojeto'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('017.005','elaboração de orçamento'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('017.006','elaboração de projeto básico'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('017.007','elaboração de projeto executivo'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('017.008','ensaios tecnológicos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('017.009','estudos de impacto ambiental-eia/relatório de impacto ambiental-rima'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('017.010','estudos de viabilidade técnica e econômica'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('017.011','estudos técnicos/elaboração de planos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('017.012','fiscalização, supervisão ou gerenciamento de obras ou serviços'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('017.013','georreferenciamento'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('017.014','levantamentos aerofotogramétricos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('017.015','levantamentos topográficos, batimétricos e geodésicos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('017.016','licenciamento ambiental'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('017.017','maquetes'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('017.018','pareceres, perícias e avaliações'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('017.099','outros serviços técnicos de engenharia e arquitetura'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('029.001','aquisição de vagas ensino infantil'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('029.002','aquisição de vagas ensino fundamental'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('029.003','aquisição de vagas ensino médio'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('029.099','outros credenciamentos de serviços de educação'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('030.001','serviços de clinicas médicas/odontológicas/hospitais'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('030.002','serviços de exames laboratoriais/imagem'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('030.099','outros credenciamentos de serviços de saúde'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('031.733','tratamento e manutencao de agua de piscinas'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('031.734','limpeza e higienizacao de reservatorios de agua potavel'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('031.735','servicos de nutricao enteral'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('031.736','servicos de veterinario/laboratorio'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('031.737','servicos tecnico de enfermagem'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('031.738','servicos de creche'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('031.739','servicos de desinsetizacao e desratizacao de predios'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('031.740','servicos de medicina e seguranca do trabalho'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('031.741','servicos de condutor fluvial'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('031.742','servicos de restauracaoes em geral'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('031.743','servicos de operador telecomunicacoes aeronauticas'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('031.744','servicos de taquigrafia'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('031.745','servicos de apoio maritimo/fluvial'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('031.746','servicos de manipulacao/acondic/transp. materiais perigosos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('031.747','servicos de monitoramento revistas/jornais/tv/radio'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('031.748','servicos sist. operac. prisionais/penais/educ. correcionais'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('031.749','servico de revestimento e impermeabilizacao de pisos/paredes'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('031.750','servicos de profissional farmaceutico'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('031.751','servicos de regente (maestro)'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('031.752','servicos de esterilizacao de produtos hospitalares'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('031.753','servico de revest./impermeab. do solo p/ aterro sanitario'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('031.754','servico de revestimento em prfv em diques/tanques'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('031.755','servicos de afinacoes de pianos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('031.756','servicos auxiliares p/ transporte aereo'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('031.757','servicos tecnicos p/ habilitacao de condutores de veiculos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('031.758','servicos de assistencia juridica aos presos e familiares'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('031.759','servico tecnico de oper/manut equipamentos de barragem'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('031.760','arbitragem/ginastica laboral/recreacao/atividades esportivas'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('031.770','medicina preventiva/assistencial/aconselhamento telefonico'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('031.799','servicos de limpeza de esgotos sem remocao de residuos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('033.089','carimbos, almofadas e tintas p/ carimbos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('034.001','acessorios limpeza/ferramentas p/ computadores/impressoras'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('034.002','acessorios/ micros/impressoras/scanners/ copiadora'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('034.089','cartuchos/refis/toners/fitas p/impressoras'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('034.133','discos flexiveis/opticos/cds'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('034.177','etiquetas auto-adesivas'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('034.221','fitas streamers/ lto/ minicassete p/ computadores'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('034.779','transparencias p/impressoras'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('035.090','centrais de trabalho multifuncional'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('035.095','lousa digital'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('035.133','drivers'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('035.134','disco rigido'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('035.177','estabilizadores/no-breaks/short-breaks/fontes alimentacao'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('035.181','eq. p/microcomputadores/impressoras'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('035.182','equipamentos para sistema de backup'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('035.315','hardware/software deficientes fisicos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('035.353','impressoras/ copiadoras'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('035.456','licencas'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('035.501','memorias de expansao'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('035.502','monitores de video'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('035.503','mouse'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('035.504','microcomputadores'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('035.505','monitores de interface'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('035.544','notebooks'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('035.564','tablets'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('035.632','placas'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('035.735','scaners'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('035.736','softwares'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('035.737','servidores'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('035.739','dispositivo para guarda de dados e arquivos (storage)'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('035.779','terminais/quiosques'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('035.780','teclados'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('035.867','sistemas videoconferencia/ sistema acesso a dados'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('037.001','auxiliares de servicos gerais'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('037.735','servicos de portaria/recepcionista'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('037.736','servicos de digitadores'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('037.737','servicos de telefonista/videofonista'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('037.738','servicos de ascensoristas'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('037.739','servicos de motoristas'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('037.740','servicos de continuos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('037.741','servicos de cozinheiros'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('037.742','servicos de eletricistas e mecanicos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('037.743','servico guincho/auto-socorro 24h'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('037.744','servicos de lavagem/lubrificacao/troca de oleo e filtros'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('037.749','servicos de armazenagem/controle/recebimento/expedicao'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('037.751','servicos de limpeza de logradouros e predios'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('037.752','servicos de capina/rocado/ajardinamento'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('037.753','servicos de lavanderia'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('037.754','servicos de tinturaria'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('037.755','servicos recolhimento lixo (remocao/transporte/deposito)'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('037.756','servicos de ligacao/interrupcao de ramais prediais'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('037.757','servicos de escavacao/aterro'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('037.758','servicos de leitura/corte e ligacao de hidrometro/cavaletes'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('037.759','servicos de teleatendimento'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('037.760','servicos de leitura/corte/ligacao medidores urbano/rural'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('037.761','servicos de operador de estacao aeronautica'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('042.735','servicos de transporte de carga por via maritima'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('042.736','servicos de transporte de carga por via terrestre'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('042.737','servicos de transporte de carga por via fluvial e lacruste'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('042.738','servicos de transporte de carga por via aerea'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('042.739','servicos de transporte de carga por via ferroviaria'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('042.740','servicos de transporte de passageiros por via maritima'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('042.741','servicos de transporte de passageiros por via terrestre'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('042.742','servicos de transporte de passag. por via fluvial e lacruste'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('042.743','servicos de transporte de passageiros por via aerea'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('042.744','servicos de transporte de passageiros por via ferroviaria'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('042.745','servicos de transporte/colocacao/remocao placas educativas'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('042.746','servicos de transporte/armazenagem/organizacao de documentos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('045.089','capas/cartoes papelao/fichas/caderno pers./pastas'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('045.090','confeccao de carimbos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('045.177','encadernacao'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('045.178','fitas/ etiquetas auto-adesivas/rotulos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('045.221','formularios continuos brancos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('045.222','formularios continuos zebrados'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('045.223','fotolitagem/editoracao grafica/plotagem'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('045.354','impressos formularios continuos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('045.355','impressos formularios planos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('045.356','bobinas personalizadas'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('045.360','impressos formularios padronizados - pe'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('045.400','envelopes/ bloco anotacao'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('045.632','plastificacao de documentos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('045.691','reprografia'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('045.735','serigrafia'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('047.735','servicos de programacao visual e projecao de imagens'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('047.737','servicos fotograficos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('047.738','servicos de transm. de programas on line, via fm e/ou am'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('047.739','servicos de publicidade e propaganda'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('047.740','servicos de placas e luminosos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('047.741','servicos de microfilmagem'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('047.742','servicos inst./mont./manut. sistemas de sonorizacao'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('047.743','servicos de artefatos de acrilico'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('047.744','servicos de copiagem de fitas vhs e dvd'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('052.735','servicos de manutencao de aeronaves'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('052.736','servicos de manutencao de veiculos leves e pesados'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('052.737','servicos de manutencao de maquinas e implementos agricolas'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('052.738','servicos de manutencao de maquinas e equip. rodoviarios'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('052.739','servicos de manutencao de maquinas e equip. aeroportuarios'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('052.740','servicos de manutencao de maquinas e equip. portuarios'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('052.741','servicos de manutencao de elevadores'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('052.742','servicos de manut/confeccao de sinalizacao nautica'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('052.743','servicos de manutencao/afericao/calibracao de balancas'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('052.744','servicos de manutencao equipamento geral'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('052.745','servicos de manut. prev./corret./recarga de ext'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('052.746','servicos de manut/confec/inst.de isolamento acustico/termico'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('052.747','servicos de manut./calib./certif. de equip. p/ laboratorio'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('052.748','servicos de manut. equip. p/ monit. eletronico'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('052.749','servicos de manut. preventiva/corretiva gases medicinais'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('052.750','servicos de manut./afericao/calib. equipamentos/instrumentos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('052.752','manutencao/recapagem/recauchutagem de pneus'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('052.999','pecas e acessorios p manutencao de veiculos maquinas equipam'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('057.735','servicos de manutencao de centrais telefonica'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('057.736','servicos manut./inst./mont. sist. de climatizacao'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('057.737','servicos de manut./inst./mont. equipamentos de escritorio'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('057.738','servicos manut./inst./mont. de eletrodomesticos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('057.739','servicos de manutencao/instalacao de camaras frias'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('057.740','servico de manutencao estacao trabalho/impressoras/scanner'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('059.735','servicos de montagem de estantes em eventos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('059.736','servicos de confeccao de reservatorios/tanques metalico'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('059.737','servicos de fundicao'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('059.738','servicos de confeccao de portoes/cortinas/portas'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('059.739','servicos de confeccao acessorios/pecas em elastomero.'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('059.740','servico de confeccao de boias de sinalizacao nautica'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('059.741','servicos de confeccao/conserto/instalacao de persianas'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('059.742','servico de confeccao materiais p/ sistema climatizacao'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('059.743','servicos de confeccao de moveis'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('059.744','servicos de confeccao de box em acrilico'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('062.735','servicos de locacao de aeronaves'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('062.736','servicos de locacao de veiculos leves e pesados'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('062.737','servicos de locacao de maquinas agricolas'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('062.738','servicos de locacao de maquinas rodoviarias'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('062.739','servicos de locacao de equipamentos portuarios'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('062.740','servicos de locacao de equipamentos aeroportuarios'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('062.741','servicos de locacao de equipamentos em geral'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('062.742','servicos de locacao/mont./manut./inst. cabines sa'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('062.743','servicos loc/mont/manut/inst. de palco/som/ilum.'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('062.744','servicos de locacao/mont/manut/inst. contrladores eletronico'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('062.745','servicos de locacao de software/hardware'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('062.746','servicos de locacao p/ translado e transporte de cadaveres'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('063.001','locacao de imoveis'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('064.001','aquisição de imoveis'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('070.001','maquinas autenticadoras/cheque'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('070.221','maquinas plastificadoras'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('070.353','maquinas impressoras codificadoras'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('070.500','maquinas registradoras'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('070.501','maquinas contadoras de cedulas e documentos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('070.502','maquinas franqueadoras'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('070.503','maquinas cortadoras (estampadoras)'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('070.535','detector de notas/ documentos falsos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('070.632','maquinas perfuradoras'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('070.675','quiosques auto-atendimento'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('070.779','maquinas terminais de auto atendimento'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('072.735','servico vigil.fis. armada autor.p/dep.de pol.fed do min.just'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('072.736','servico vigilancia por monitoramento eletronico'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('072.737','servicos transporte de valores/contagem numerario'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('077.735','servicos de refeitorio/lanches'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('082.735','servicos: hospedagens/passagens/translados'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('082.736','srevicos: hotelaria p/ convencoes/congressos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('097.735','servicos: bilheteria'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('097.736','servicos: estacionamento'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('097.737','servicos: estacionamento e/ou manobrista'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('105.001','atlas'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('105.089','cartas cartograficas/georeferencias/vetoriais'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('105.133','dicionarios'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('105.456','leis, codigos, estatutos e regulamentos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('105.458','livros tecnicos juridicos, politicos e administrativos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('105.459','livros tecnicos portugues e literatura'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('105.460','livros tecnicos saude e servico social'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('105.461','livros tecnicos desenho, arquitetura e urbanismo'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('105.462','livros tecnicos didatica/ensino/testes/fl. teste'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('105.463','livros tecnicos informatica'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('105.464','livros tecnicos historia e geografia'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('105.465','livros tecnicos ciencias/matematica/fisica/quimica/biologia'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('105.466','livros tecnicos agricultura e veterinaria'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('105.467','livros tecnicos contabilidade'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('105.468','livros religiao'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('105.469','livros tecnicos didaticas/ensino (cont. 462)'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('105.470','livros tecnicos pericia / criminalistica'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('105.471','livros tecnicos didaticos/ensino (cont.469)'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('105.691','revistas'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('105.870','videos / fitas vhs / dvds educativos didaticos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('107.735','servicos de seguros de vida'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('107.736','servicos de seguros de ramos de elementares'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('107.737','servicos de seguros de saude'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('112.632','servicos: permissao de servicos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('112.700','servicos: administracao vale pedagio'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('112.735','servicos: contratacao parceria/investidores/merchandising'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('112.736','servicos: contratacao arrendamento'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('112.737','servicos: concessao'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('112.738','servicos: treinamentos/convencoes/eventos/cursos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('112.739','contratacao: servicos discagem direta gratuita/outros'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('112.740','servicos: franquia/postais telematicos/recolhimento/postagem'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('112.741','servicos: admistracao/distribuicao/emissao bilhetes loterias'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('112.742','servicos: operacao balancas moveis/fixas controle cargas'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('112.743','servicos: contratacao de servico de busca/entrega'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('112.744','servicos: contratacao servicos tele-taxi'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('112.745','servicos: assinaturas e taxacoes de jornais e periodicos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('112.746','servicos: contratacao de segmento espacial/satelite'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('112.747','servicos: contratacao de infraestrutura cursos/trein./evento'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('112.748','servicos: contratacao de telefonia fixa/movel'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('112.749','servicos: conexao dedicada internet'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('112.991','servicos de assistencia a pessoas e veiculos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('113.730','servicos: treinamentos/convencoes/eventos/cursos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('117.735','servicos: inst/mont. sist. de infor soft/hardware'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('117.736','servicos: manut/rep. sist. de infor soft/hardware'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('117.737','servicos de automacao eletronica'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('117.738','servicos acesso internet'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('117.739','servicos de digitalizacao de documentos/ impressao'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('117.740','servicos de manutencao/instalacao de terminais eletronicos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('117.741','servicos de instalacao e operacao de call center'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('117.742','servicos telemetria / telecomando / software de supervisao'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('120.090','cartolinas/cartoes/papeloes'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('120.632','papel almaco'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('120.633','papel de expediente p/escrita/impressao/reprografia'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('120.634','papel capa fantasia e capa sem fantasia'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('120.635','papel p/desenho tecnico'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('120.636','papeis especiais'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('120.637','papel jornal'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('120.639','papel p/ heliogravura'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('120.640','papel westerprint e westerledger'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('120.645','papel p/telex/fac-simile'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('122.735','servicos: fornecimento de vale-alimentacao'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('122.736','servicos: fornecimento vale-combustivel'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('122.737','servicos:fornecimento cartoes p/ manutencao de v'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('127.735','servicos: clinica ginast.laboral/ergo/fisioterapia'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('127.736','servicos: medicos/odontologicos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('127.737','servicos: hemodialese'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('127.738','servicos: analises clinicas/laboratoriais'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('127.739','servicos: planos assistencia saude'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('127.755','servicos: analise de aguas/ alimentos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('140.045','brinquedos/jogos educativos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('140.046','brinquedos/jogos recreativos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('140.047','bicicletas'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('140.048','brinquedos / carrinhos / bonecas'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('140.050','artigos p/ festas'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('140.177','equipamentos recreativos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('140.456','lupas eletronicas mouse'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('140.632','produtos p/ deficientes'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('150.045','bandinhas ritmicas'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('150.089','componentes/acessorios p/instrumentos musicais'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('150.353','instrumentos de cordas'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('150.354','instrumentos de percussao'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('150.355','instrumentos de sopro'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('150.360','instrumentos eletronicos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('160.045','bolas'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('160.177','equipamentos p/ atletismo'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('160.178','equipamentos p/ esportes de quadra'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('160.179','equipamentos p/ ginastica olimpica'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('160.180','equipamentos p/ musculacao e aerobica'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('160.500','mesas ping-pong/fla-flu/tenis de mesa'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('160.501','materiais esportivos em geral'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('160.779','tatame'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('185.045','barbantes/cordas'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('185.046','bombonas'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('185.089','caixas/cestos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('185.090','chapas/bolas poliestireno'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('185.177','embalagens p/ substancias infecciosas'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('185.178','embalagens fepps padrao lafergs'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('185.221','fitas/fitilhos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('185.265','garrafa/ garrafao para envase'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('185.267','tampa/ rolha - para garrafa/ garrafao'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('185.632','papel e papelao'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('185.691','filmes plasticos/polibolhas'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('185.735','sacos/sacolas'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('205.045','bandeiras brasileiras uso externo'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('205.046','bandeiras estados/municipios uso externo'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('205.047','bandeiras paises uso externo'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('205.048','bandeiras especiais uso externo'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('205.049','bandeiras - acessorios uso interno/externo'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('205.050','bandeiras em geral uso interno'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('205.180','estandartes'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('215.045','bottons'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('215.046','bolsas p/ eventos/cursos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('215.047','marca paginas'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('215.089','carteiras funcionais'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('215.090','crachas'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('215.091','cartoes magneticos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('215.092','canetas personalizadas'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('215.177','escudos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('215.225','fitas personalizadas p/ crachas/cartoes ponto'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('215.230','faca p/ churrasco prateada/gravada'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('215.231','conjunto bomba e cuia'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('215.300','guarda sol/guarda chuva personalizados'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('215.400','bones e camisetas personalizadas'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('215.500','medalha/ trofeu'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('215.505','replica em metal'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('215.632','placas p/ identificacao de patrimonio'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('215.635','placa de identificacao de veiculo'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('215.779','trenas personalizadas'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('215.800','artigos para copa cozinha personalizados'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('215.805','balao personalizado'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('245.001','abrigos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('245.002','aventais'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('245.003','aventais cirurgicos descartaveis'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('245.045','bones/ toucas/ chapeus/ luvas'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('245.089','calcas/calcoes/bermudas'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('245.090','camisas'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('245.091','camisetas/blusas/blusoes'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('245.092','casacos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('245.093','cintos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('245.094','coletes'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('245.095','campos/coberturas cirurgicos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('245.103','confeccao de fantasia'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('245.105','conjuntos diversos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('245.265','gravatas/lencos/lencos femininos/_mantas'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('245.397','japonas/jaquetas'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('245.398','jalecos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('245.500','macacoes'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('245.501','meias'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('245.502','mascaras/manguitos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('245.632','pro-pes/perneiras/perineais/triangulos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('245.691','roupas/acessorios p/camaras frigorificas'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('245.692','roupas intimas'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('245.693','roupas de banho'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('245.823','uniformes profissionais'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('245.824','uniformes esportivos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('245.867','vestidos e saias'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('250.045','botas'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('250.046','bolsas/malas/mochilas'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('250.089','calcados tipo tenis'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('250.090','chinelos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('250.265','guarda-chuvas'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('250.735','sapatos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('250.736','sandalias'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('250.779','tamancos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('255.001','alfinetes/agulhas/botoes/porta-alfinetes'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('255.221','fitas/fechos/elasticos/giz costura'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('255.456','linhas/las/fios'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('255.779','tecidos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('260.089','cobertores/colchas/acolchoados'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('260.456','lencois/fronhas'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('260.457','luvas/babeiros atoalhados'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('260.779','toalhas'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('270.001','acessorios/materiais p/microfilmagem'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('270.089','caixas p/microfilmes'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('270.177','equipamentos p/microfilmagem'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('270.456','lampadas p/microfilmadoras/leitoras'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('270.500','microfilmes'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('270.632','papel p/leitoras'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('270.779','toner'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('285.001','aparelhos p/ limpeza e higiene'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('285.002','aparelhos p/preparo de alimentos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('285.003','aparelhos p/aquecimento e purificacao de agua'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('285.045','bebedouros e purificadores de agua'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('285.089','conjuntos compactos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('285.090','cafeteiras eletricas'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('285.177','depuradores/exaustores domesticos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('285.221','ferros eletricos/tabuas passar roupa'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('285.222','fogoes e fornos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('285.500','maquinas de lavar roupa'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('285.501','maquinas de secar roupa'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('285.691','refrigeradores e congeladores'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('290.001','aquecedores de ambiente'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('290.089','condicionadores de ar e sistemas de climatizacao'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('290.090','conjunto manifolds'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('290.177','equipamentos p/climatizacao/condicionadores'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('290.500','material p/aquecedor/condicionador/ventilador/desumificador'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('290.867','ventiladores/circuladores e desumidificadores de ar'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('295.002','aparelhos/equipamentos de som'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('295.089','cameras de video/equipamentos projecao/ binoculo'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('295.095','cameras fotograficas/equipamentos fotograficos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('295.105','equipamento para edicao de audio/video'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('295.500','materiais p/projecao/video/som'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('295.510','materiais fotograficos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('295.589','materiais/ tecidos/ para palco e teatro'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('295.595','equipamentos/mat/acessorios para projecao/video/foto/som'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('295.632','plataformas pantograficas/telescop./guarda corpo'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('295.633','paineis eletronicos para atendimento'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('295.735','sistema monitoramento eletronico'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('295.779','televisores/acessorios'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('295.867','videocassetes/acessorios'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('295.868','video dvd/ home theater/ acessorios'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('320.001','armarios'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('320.002','arquivos/ficharios/mapotecas'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('320.045','beliches/camas/bercos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('320.047','balcoes'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('320.089','cofres'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('320.090','cadeiras/bancos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('320.095','carrinhos bebe/cercados/andadores'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('320.177','estantes/suportes/racks/fruteiras'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('320.178','estacoes de trabalho'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('320.500','mesas'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('320.508','mesa/cadeira (conjunto)'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('320.510','moveis hospitalares'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('320.511','moveis informatica'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('320.512','moveis decoracao/jardim'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('320.513','moveis panificacao'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('320.515','moveis sob medida/ armarios, balcoes, mesas,...'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('320.632','poltronas/sofas'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('320.635','pecas de reposicao'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('320.676','quadros/murais'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('320.999','moveis/estofados/componentes em geral'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('345.089','colchoes/colchonetes/travesseiros/almofadas c/forro'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('345.095','colchoes/colchonetes/travesseiros/espumas s/forro'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('345.691','revestimentos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('350.001','aparelhos para preparo de alimentos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('350.002','armarios/estantes/mesas/estruturas metalic'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('350.045','bebedouros/purificadores de agua'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('350.089','cafeteiras eletricas/fogareiros eletricos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('350.090','caldeiroes p/ cozimento'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('350.091','camaras frias / maquina de fabricar gelo'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('350.092','caldeiras a vapor'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('350.133','digitos de borracha'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('350.171','pecas/materiais/acessorios uso comercial/industrial'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('350.177','eq. p/ exaustao'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('350.178','eq. p/ padaria e confeitaria'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('350.179','equipamentos p/cozinha industrial/comercial'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('350.180','equipamentos lavanderia industrial/limpeza'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('350.181','equipamentos p/barbearia e salao de beleza'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('350.182','equipamentos p/ industria de laticinios'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('350.187','equipamentos/pecas/acessorios p/ industria de reciclagem'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('350.221','fogoes e fornos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('350.300','equipamentos para transporte de agua'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('350.500','maquinas de lavar louca'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('350.501','maquina costura/empacotadora automatica/seladora'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('350.502','materiais/acessorios para caldeiras'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('350.521','maquina para triturar vidro/ plastico/ aluminio'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('350.585','equipamentos controle de maquinas e processos industriais'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('350.632','pallets'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('350.702','pecas e acessorios para reparo de maquinas'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('350.735','serra de fita p/ acougues'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('350.825','utensilios p/ cozinha industrial/comercial'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('350.867','valvulas p/ vapor'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('350.888','pecas e acessorios em aco pressurizado'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('350.999','pecas/mat./acessorios uso comercial/industrial'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('360.001','abridores'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('360.045','bacias'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('360.046','bandejas/ forros'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('360.047','batedores/amassadores/rolos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('360.089','canecas e copos (exceto de plastico)'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('360.090','cremeiras, tijelas e conchas terrinas'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('360.178','escorredores de massa'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('360.179','espremedores de frutas'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('360.180','esterilizador de utensilios'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('360.221','filtros dagua'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('360.222','funil, coador, lava-arroz e peneiras'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('360.265','garrafas termicas/ jarras e copos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('360.350','marmita termica'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('360.505','materiais descartaveis'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('360.632','paliteiros, saleiros, acucareiros e mantegueiras'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('360.633','panelas e formas'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('360.634','porta utensilios'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('360.635','potes'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('360.636','purificadores de agua'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('360.691','raladores'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('360.701','relogio de parede'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('360.705','supla/ lugar americano/ jogo americano'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('360.779','tabuas e tabuleiros'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('360.780','talheres/tesouras p/ cozinha/ acendedor'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('360.781','tarros de leite e tachos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('360.782','travessas/pratos/conjuntos(exceto plast./descart.)'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('360.926','xicaras / conjuntos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('380.045','baldes'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('380.046','bomba manual p/inseticida'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('380.133','desentupidores'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('380.177','esfregoes/esponjas de aco'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('380.178','espanadores'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('380.179','esponjas'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('380.180','estopas/toalhas mecanicas'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('380.181','escadas'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('380.190','equipamentos p/limpeza'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('380.221','flanelas/panos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('380.456','lixeira metalica/plastica'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('380.632','pas plasticas/metalicas e prendedores de roupa'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('380.633','papel higienico'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('380.634','papel toalha'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('380.635','cabide'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('380.867','vassouras/escovas'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('390.045','barracas/ tendas'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('390.089','camisas p/ lampioes e lanternas'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('390.090','cantil'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('390.221','fogareiro'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('390.265','gelo reutilizavel'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('390.456','lampiao'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('390.457','lanternas'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('390.460','lonas'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('390.500','materiais/acessorios p/acampamento'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('390.510','mesas'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('390.691','redes'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('390.692','refrigeradores portateis'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('390.735','sacos de dormir/colchoes inflaveis'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('395.001','acessorios para radios transceptores e estacoes'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('395.002','antenas'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('395.003','antenas p/ estacoes fixas e estacoes moveis veiculares'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('395.004','modulos receptores/transmissores'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('395.045','baterias e carregadores de baterias p/ transceptores'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('395.090','cristal oscilador'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('395.133','duplexadores'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('395.221','fonte de alimentacao'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('395.265','gps'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('395.266','radares'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('395.505','monitores'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('395.691','radios transceptores'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('395.692','radios transmissores'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('395.779','mastros e torres para antenas'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('397.089','grafismo de audio/video'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('397.103','iluminacao cenica'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('397.145','sistema de armazenamento de audio/video'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('397.172','sistema de captacao/comunicacao/edicao/de audio e video'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('397.181','sistema de codificacao/multiplexacao'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('397.198','sistema de exibicao de audio/video'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('397.215','materiais, equipamentos e acessorios para radiodifusao.'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('397.235','sistema irradiante'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('397.269','sistema monitoramento/medidas de sinais de audio/video'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('397.291','sistema de transmissao/recepcao via satelite'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('397.298','sistema de transmissao/recepcao via terrestre'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('400.001','acessorios/componentes/suprimentos p/telefonia'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('400.003','acessorios/componentes/suprimentos p/centrais telefonicas'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('400.089','centrais telefonicas'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('400.133','detectores/bloqueadores de chamadas telefonicas'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('400.177','estabilizadores de tensao'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('400.221','fac-similes'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('400.735','secretarias eletronicas/binas'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('400.779','telefones'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('405.045','balancas'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('405.089','caladores'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('405.133','densimetros'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('405.134','detectores'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('405.177','estacoes meteorologicas/eq. meteorologicos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('405.179','equipamentos p/topografia e cartografia'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('405.181','equipamentos p/laboratorio quimico'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('405.221','frequencimetros'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('405.309','hidrometros'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('405.380','indicador de pesagem / celula de conversao'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('405.500','multimetros'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('405.501','medidores/calibradores/aferidores/controladores'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('405.502','mesas p/ medicao'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('405.505','materiais p/medicao'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('405.588','osciloscopios'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('405.590','odometros'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('405.779','termoigrometros'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('405.911','wattimetros'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('410.089','capacitores potencia'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('410.177','estabilizadores de tensao'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('410.221','filtros redes energia'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('410.265','grupos geradores'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('410.779','transformadores de tensao'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('410.781','turbinas'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('420.001','acessorios p/ condicionadores de ar'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('420.089','capacitores'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('420.090','circuito integrado'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('420.091','conectores e redutores'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('420.092','cabos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('420.093','componentes eletronicos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('420.133','diodos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('420.221','filtros'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('420.501','mantas dissipativa'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('420.632','ponteira e resistencia p/ ferro de soldar'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('420.633','paineis solares'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('420.650','potenciometros'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('420.660','pilhas/baterias'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('420.691','resistores'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('420.693','recarregadores/carregadores/transformadores de bateria'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('420.779','transistores'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('420.780','termostatos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('420.867','valvulas'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('428.001','acionador comutador'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('428.089','catracas biometricas'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('428.500','modulos detectores de veiculo'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('428.501','cartao proximidade regravavel controle de acesso'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('428.555','pedestal organizador de fila (divisor de fluxo)'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('428.632','porta-cartao ponto'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('428.634','cartoes para relogio ponto digital'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('428.645','sistema automarizacao de portas'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('428.691','relogio-ponto e registradores de frequencia'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('428.692','fechaduras eletronicas'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('428.735','software para registrador de frequencia'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('428.736','sorteadores eletronicos microprocessados'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('435.001','acessorios p/ solda'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('435.177','eletrodos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('435.178','equipamentos p/ solda'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('435.500','materiais p/ solda'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('440.001','alicates e torquesas'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('440.002','arcos de puas'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('440.045','bigornas'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('440.046','bombas p/ graxa manual'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('440.089','chaves'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('440.090','cortadores'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('440.091','conjunto de ferramentas'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('440.092','cavaletes/suportes'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('440.133','desempenadeiras/colheres de pedreiro'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('440.177','espatulas/escovas'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('440.221','facas, facoes e canivetes'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('440.222','ferramentas p/ apicultura'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('440.223','ferramentas p/ perfuratriz'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('440.224','formao'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('440.225','foices'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('440.226','fitas p/ medicao'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('440.227','ferramentas diversas'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('440.265','grampeadores p/ madeira, papelao'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('440.266','grampos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('440.456','limas, grosas e travadeiras'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('440.500','machados e machadinhas'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('440.501','martelos e marretas'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('440.502','macaricos de corte'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('440.503','macacos hidraulico'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('440.504','morsas'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('440.632','pas/cavadeiras'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('440.633','pe de cabra'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('440.634','picaretas'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('440.635','puncoes e saca-pinos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('440.636','pincas'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('440.637','pistolas de pintura'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('440.691','rebitadores'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('440.735','serras e serrotes'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('440.736','soquetes'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('440.779','talhadeiras'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('440.780','tesoura p/ chapa de aco'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('440.781','tornos bancada'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('440.782','tarraxas'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('445.089','carregadores de bateria'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('445.090','cortadores'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('445.092','coladeiras de bordo p/ marcenaria'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('445.177','equipamentos p/oficinas'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('445.222','furadeiras/perfuratrizes'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('445.223','facetadores'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('445.224','fornos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('445.225','fresadoras'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('445.456','lixadeiras'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('445.500','moto-esmerilhadeira'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('445.501','moto-politrizes'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('445.502','marteletes'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('445.503','motores eletricos trifasicos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('445.504','maquinas confeccao telas de arame'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('445.632','plainas'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('445.640','politrizes'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('445.656','redutor de velocidade para motor'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('445.691','retificadeiras'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('445.735','serras'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('445.779','tornos/placas autocentrantes'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('445.780','tupias'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('445.867','vibradores'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('450.001','abracadeiras'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('450.002','aneis retencao'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('450.047','brocas'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('450.048','buchas'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('450.049','bancadas marcineiros / bancadas profissionais'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('450.050','bicos encher pneu'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('450.051','bits'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('450.055','caixa para ferramentas/ maleta/ bolsa'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('450.090','colas/adesivos/vedantes'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('450.133','discos de corte/debaste/serra/lamina'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('450.221','fechaduras/trincos/macanetas/dobradicas/molas/chaves'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('450.222','fitas gomadas'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('450.266','gancho de inspecao p/ frigorifico'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('450.458','lixas/fitas antiderrapantes'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('450.501','massas de vedacao'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('450.502','microesfera de vidro'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('450.503','materiais/acessorios pintura'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('450.504','materiais/acessorios p/marcenaria/ carpintaria'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('450.505','massas e texturas em geral (exceto de vedacao)'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('450.632','pedras de esmeril/afiar'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('450.633','pregos/parafusos/rebites/porcas/arruelas'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('450.634','porta-cadeado/cadeados/correntes'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('450.635','produtos p/ polimento'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('450.691','rolos/trinchas/broxas/pinceis'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('450.735','solventes/diluentes/removedores/retardadores'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('450.779','tintas/vernizes/seladores/primers'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('452.133','distanciadores'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('452.221','arame farpado/grampos/ concertina'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('452.222','arame galvanizado'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('452.223','arame p/ emplacamento'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('452.224','arame recozido'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('452.235','arame aco/ aco inox'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('452.779','tela'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('460.001','assoalhos/ lambri'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('460.089','caibro e caibrinho'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('460.090','compensado e aglomerado'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('460.091','caixao funebre'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('460.177','escoras e mouroes'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('460.221','forrinho'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('460.265','guia'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('460.456','laminas de madeira/formica'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('460.457','lenha'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('460.500','mata junta'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('460.505','madeiras macicas'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('460.632','pranchas'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('460.691','ripa'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('460.692','roda-pe'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('460.735','sarrafo'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('460.779','tabuas'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('461.001','acessorios/pecas de borracha/silicone'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('461.002','acessorios/pecas de plastico/teflon/tecnil/espuma'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('461.089','chapas de acrilico'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('461.090','camara de butil p/ bolas'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('461.501','materia-prima p/ confeccao de bolas esportiva'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('463.005','cobre redondo'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('463.009','colarinho para cabo de aco'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('465.001','areia/argamassa/cimento/brita/rejunte/cordao solda'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('465.002','azulejos/ladrilhos/pisos/revestimentos/forros'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('465.003','algeroz/calha'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('465.004','andaimes/arquibancadas moduladas'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('465.005','acessorios p/ gesso acartonado'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('465.006','modulos construtivos moveis'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('465.045','baldes'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('465.046','betoneiras e misturadores mecanico'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('465.089','carros de mao'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('465.090','conjunto vibratorio completos e acessorios'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('465.092','cal'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('465.093','concreto/mouroes/marcos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('465.177','esquadros/regua pedreiros'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('465.178','equipamentos de teste'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('465.179','equipamentos p/ construcao civil'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('465.221','ferro/aco/aluminio/bronze/latao'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('465.270','guaritas'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('465.353','impermeabilizante e aditivo p/alvenaria'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('465.354','materiais p/isolacao'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('465.500','metros e trenas'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('465.501','mesas vibradoras'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('465.502','massas/fitas p/ gesso acartonado'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('465.544','niveis e prumos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('465.633','pedras/gessos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('465.634','perfis metalicos p/ fixacao de gesso acartonado'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('465.635','portas/marcos/guarnicoes'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('465.779','tanques/pias/cubas'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('465.780','telhas'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('465.781','tijolos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('465.785','toldos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('475.001','armacoes secundarias'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('475.089','chaves eletricas'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('475.090','componentes p/ instalacoes eletricas'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('475.091','cabo coaxial'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('475.133','disjuntores/reles'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('475.177','eletrodutos/conexoes/caixas de derivacao'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('475.178','eletrificadores p/ cerca eletrica rural'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('475.221','fios/cabos eletricos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('475.222','fitas isolantes/ emenda termocontratil/ contratil'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('475.223','fusiveis/bases'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('475.353','interruptores/tomadas/celulas fotoeletricas/acessorios'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('475.354','isoladores'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('475.456','lampadas/farois/refletores/sinaleiro'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('475.457','luminarias/postes/calhas/suportes'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('475.691','reatores'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('475.705','vara de manobra telescopica para eletricista'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('480.001','aquecedores de agua'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('480.002','acessorios p/banheiros'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('480.045','braco de chuveiro'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('480.089','caixas de descarga e pecas'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('480.090','caixas/ralos/grelhas'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('480.091','chuveiros/duchas'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('480.092','cola tubos de pvc'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('480.093','conexoes de pvc hidraulicas e sanitarias'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('480.094','conexoes de ferro hidraulicas'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('480.095','calhas e acessorios'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('480.096','contentores flexiveis p/ agua'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('480.097','caixas de protecao para hidrometros'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('480.098','mangueira/ mangote'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('480.221','fitas/vedantes/aneis de borracha'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('480.222','fossa septica'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('480.456','ligacoes flexiveis e bolsas p/ sanitarios'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('480.632','pastas lubrificantes'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('480.691','registros / plug para lavatorios e bide'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('480.692','reservatorios p/ agua'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('480.695','torre metalica p/ reservatorio de agua'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('480.700','redutores e moduladoers de agua'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('480.779','torneiras e reparos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('480.780','tubos pvc agua'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('480.781','tubos pvc esgoto'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('480.782','tubos ferro/galvanizado agua'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('480.783','tubos de concreto'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('480.784','tanques/pias/cubas/banheiras/vasos/tampos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('480.867','valvulas e reparos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('495.177','espelhos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('495.867','vidro padrao caff'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('495.868','vidro plano'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('495.900','molduras para quadros/diplomas'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('505.089','cortinas/persianas/acessorios'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('505.133','divisorias'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('505.265','gabideiros/porta guarda-chuvas'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('505.510','manequins expositor'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('505.570','materiais/ produtos para decoracao'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('505.779','tapetes/capachos/forracoes/ isolamento acustico'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('505.781','tela/fita antiderrapante p/tapete/capacho/forracao'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('505.785','buques/ arranjos/ coroa de flores'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('510.001','obras de arte'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('510.002','objetos decorativos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('515.001','algemas'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('515.045','bastoes'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('515.089','coletes salva-vida'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('515.090','coletes a prova de bala'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('515.091','cilindros p/ ar respiravel'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('515.092','cortinas de protecao'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('515.094','cancelas eletronicas'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('515.095','calcados de seguranca'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('515.133','detectores de metais'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('515.177','eq. p/ prevencao de incendio/seguranca'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('515.178','equipamentos p/ investigacao'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('515.179','equipamentos anti-bombas'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('515.180','equipamentos p/ identificacao e sinalizacao transito'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('515.181','equipamentos de raio-x'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('515.182','equipamentos de contra-espion./interc./audio/video'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('515.183','envelopes de seguranca'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('515.221','filmes de seguranca e controle solar'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('515.285','lanterna de servico'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('515.456','lacres/selos seguranca'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('515.500','materiais de seguranca/protecao individual'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('515.501','materiais p/ prevencao de incendio/seguranca'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('515.505','materiais p/identificacao de veiculos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('515.507','materiais p/ papiloscopia'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('515.510','materiais de seguranca/protecao coletiva'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('515.511','materia prima p/ confeccao de coletes balisticos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('515.515','materiais p/ identificacao e sinalizacao transito'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('515.691','resgate e salvamento - equipamentos/manequim trein'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('515.750','sistemas de protecao ambientais'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('515.868','vestuario de seguranca'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('535.045','bombas/motobombas'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('535.089','compressores de ar'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('535.500','motores p/ compressores'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('535.550','nebulizadores veicular p/ controle de mosquitos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('535.632','pecas/acessorios p/compressores de ar'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('535.633','pecas/acessorios p/bombas e motobombas'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('535.645','pecas/acessorios p/ bomba de racalque'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('540.001','aspersores p/irrigacao'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('540.005','equipamentos/ pecas/ materiais para irrigacao'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('540.735','sistemas de irrigacao'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('548.177','equipamentos p/ tratamento de agua'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('548.178','equipamentos p/ tratamento de esgoto'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('548.345','condensador de umidade atmosferica'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('548.500','materiais/suprimentos p/ tratamento de agua'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('550.630','pecas e acessorios p/ balanca rodoviaria'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('550.632','pecas e acessorios p/dragas'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('550.634','pecas e acessorios p/guindastes'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('555.089','cabos de aco/correntes de aco/sapatilhas'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('555.177','escavadeiras/motoniveladoras/pa carregadeiras/compactadores'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('555.221','ferramentas/materiais p/equipamentos de mineracao/escavacao'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('555.500','martelos rotopercussores'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('555.501','materiais p/ perfuracao de pocos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('555.601','pecas/materiais e acessorios p manutencao de maquinas'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('555.632','perfuratrizes'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('555.635','pecas p/perfuratrizes e martelos rotopercussores'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('555.691','retroescavadeiras/carregadoras compactas/acessorios'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('555.735','sondas p/pocos tubulares'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('555.779','tubos/filtros/revestimentos geomecanicos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('565.001','acessorios p/ carrinhos transporte'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('565.089','carrinhos p/ transporte'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('565.090','carregadores'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('565.177','empilhadeiras'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('580.001','aspirador/soprador/residuos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('580.002','acessorios p/ rocadeiras'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('580.005','placa identificacao de planta'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('580.065','banco de concreto/ madeira parajardim'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('580.221','ferramentas manuais p/ jardim'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('580.225','cabo para feramentas de ajardinamento'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('580.500','maquinas p/grama / podadores p cercas'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('580.691','regadores/mangueiras'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('580.705','vaso para plantas'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('580.779','telas plasticas'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('580.999','equipamentos/pecas/acessorios p/ajardinamento'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('593.177','elevadores'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('593.250','esteira de movimentacao de bagagem'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('593.265','guindastes'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('593.300','escada rolante'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('593.550','niveladoras de doca'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('593.605','pecas e acessorios'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('593.779','talhas'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('595.001','veiculos aeronaves'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('595.002','veiculos automoveis'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('595.003','veiculos navais'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('595.089','veiculos tipo pick-up'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('595.177','veiculos especiais (ambulancia/detentos/carro forte,etc)'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('595.500','veiculos motocicletas'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('595.691','veiculos reboques e semi-reboques'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('595.779','veiculos transporte coletivo/carga (onibus/caminhoes, etc.)'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('595.823','veiculos utilitarios'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('595.824','veiculos utilitarios tipo jipe'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('600.037','alternadores'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('600.045','baterias/acessorios'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('600.046','baus'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('600.089','cambios'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('600.095','carrocerias/tanques'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('600.133','diferencias e semi-arvores'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('600.140','direcoes'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('600.177','embreagens'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('600.183','equipamentos acessorios'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('600.221','ferramentas'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('600.227','freios'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('600.500','motores'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('600.505','motores completos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('600.632','produtos e materiais p/limpeza e manutencao'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('600.634','pecas/materiais/acessorios p/ aeronaves'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('600.645','kit gnv para conversao / acessorios'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('600.691','radios/alto-falantes/tweeteres/amplificadores/modulos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('600.701','simulador veicular/ avaliador dirigibilidade'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('600.735','sistemas eletricos / fusiveis'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('600.740','suspensao e rodas'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('600.779','tapetes'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('600.999','pecas/mat./acessorios de conserv.e manutencao veic'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('685.089','carretas agricola/elevador agricola'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('685.090','colhedeira/colhedora/colheitadeira'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('685.091','cultivadores'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('685.092','classificador cereais/descascador arroz'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('685.133','debulhador/secador de sementes/moinhos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('685.173','equipamentos para cunicultura'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('685.174','equipamentos para suinocultura'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('685.175','equipamentos para piscicultura'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('685.176','equipamentos para avicultura'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('685.177','enxadas rotativas'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('685.178','estufas agricolas/viveiros aclimatador mudas'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('685.179','equipamentos para apicultura'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('685.180','equipamentos p/ vinificacao'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('685.181','esteiras transportadoras'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('685.183','equipamentos para bovinocultura'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('685.265','guincho hidraulico'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('685.500','motosserras'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('685.501','maquinas p/ tratamento de sementes'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('685.502','microssilos/silos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('685.632','pecas/acessorios equipamentos agricolas'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('685.633','pulverizador'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('685.692','rocadeiras/raspadeiras/arados'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('685.693','ordenhadeiras/resfriadores de leite'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('685.701','materiais/ pecas/ acessorios para implementos agricolas'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('685.735','semeadeira/sulcadeira/adubadeira/arrancadeira/plantadeira'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('685.738','equipamento para producao racao'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('685.779','tratores'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('685.780','tanques coleta/transporte'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('685.795','tronco de contencao'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('736.460','laticinios e correlatos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('736.640','produtos de origem animal in natura'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('736.641','produtos de origem vegetal in natura'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('736.642','produtos nao pereciveis'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('736.643','produtos de panificacao'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('745.089','camara p/ pneus'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('745.090','calibrador pneus'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('745.500','materiais p/ conserto de pneus'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('745.502','protetor camera de ar'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('745.632','pneus'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('748.046','baterias'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('748.047','boias'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('748.089','cabos de aco/polipropileno/nylon'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('748.090','chapas de aco navegacao'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('748.133','defensas p/ cais'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('748.456','lanternas e materiais p/ sinalizacao'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('748.500','motores de popa / motores diesel /motores gasolina'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('748.632','pecas/materiais para barcos/botes/lanchas'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('750.001','tampao'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('754.001','acessorios/componentes'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('754.049','birutas'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('754.456','lampadas p/aeroportos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('754.500','materiais/acessorios p/sinalizacao de aeroportos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('754.735','sistema de navegacao por satelite'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('754.736','sistemas balizamento/sinalizacao de aeroportos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('754.779','transformadores/estabilizadores'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('757.001','asfalto/aditivos asfalticos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('757.002','alcool combustivel'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('757.003','aditivos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('757.089','carvao vegetal'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('757.265','gas liquefeito de petroleo'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('757.266','gasolina'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('757.588','oleos e graxas'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('757.632','piche'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('757.676','querosene'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('758.045','botijoes'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('758.089','centrais de gases'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('758.353','instalacoes de gas'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('760.001','armas'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('760.005','acessorios e pecas p/armas'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('760.089','cartuchos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('760.177','espoletas'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('760.178','equipamento p/ recarga de cartuchos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('760.179','equipamentos anti-motim'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('760.180','estojos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('760.265','granadas'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('760.500','material p/ limpeza de armas'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('760.632','polvoras'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('760.635','projeteis'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('773.089','carne bovina/produtos derivados'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('773.090','carne avicola/produtos derivados'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('773.091','carne ovina/produtos derivados'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('773.092','carne suina/produtos derivados'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('773.456','linguica/ fiambres'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('773.632','peixe/frutos do mar/produtos derivados'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('773.633','produtos organicos e agroecologicos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('773.635','pates'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('773.735','salsichas/ salsichoes'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('773.779','tripa'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('775.095','carnes/peixes/frutos do mar/produtos derivados'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('775.225','fiambres/pates/linguicas/salsichas/salsichoes'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('775.226','frutigranjeiros/hortigranjeiros'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('775.460','leites/manteigas/queijos/produtos derivados'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('775.632','produtos organicos agroecologicos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('775.640','produtos nao pereciveis'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('775.641','produtos de panificacao'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('779.456','linguica/fiambres'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('779.632','pates'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('779.735','salsichas/salsichoes'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('779.779','tripa'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('784.221','frutigranjeiros'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('784.309','hortigranjeiros'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('784.632','produtos organicos agroecologicos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('788.133','derivados do leite'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('788.456','leite'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('788.500','manteiga'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('788.676','queijo e similares'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('788.700','cremes vegetais'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('792.001','acucares/complementos energeticos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('792.002','alimentos enlatados/conservas'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('792.003','agua mineral/refrigerantes'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('792.004','adocantes'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('792.005','arroz/feijao/lentilha/ervilha/canjica'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('792.006','aveia'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('792.089','cafe'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('792.090','cevada/cereais'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('792.091','chas/ervas/essencias'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('792.092','complementos e compostos alimentares'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('792.093','condimentos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('792.094','cesta basica'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('792.133','doces em pasta/em calda/geleias'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('792.221','farinhas'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('792.222','fermentos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('792.223','frutas secas'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('792.265','graos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('792.500','massas'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('792.501','mel'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('792.588','oleos/margarinas/maioneses/molhos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('792.632','produtos diversos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('792.633','produtos organicos agroecologicos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('792.735','sal'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('792.737','sucos/chas'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('792.739','substitutivos do leite natural'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('792.867','vinhos/vinagres'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('796.045','bolachas/biscoitos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('796.089','cucas/bolos/panetones'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('796.133','doces/salgados'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('796.632','paes/sanduiches/pizzas'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('802.089','complementos e compostos nutricionais'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('802.133','dietas completas e modulares'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('803.045','bolachas/biscoitos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('803.089','cucas/bolos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('803.133','doces/salgados'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('803.225','fiambre/linguicas/salsichoes'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('803.460','manteiga/queijos/produtos derivados'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('803.632','geleias/conservas'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('805.177','equipamentos p/gases de uso hospitalar/laboratorial/indust.'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('805.265','gases de uso hospitalar/ laboratorial/ industrial'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('805.353','instalacoes/centrais de gas'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('820.177','equipamentos p/ industria farmaceutica'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('820.502','materias-prima para fabricacao de medicamentos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('820.503','materiais p/ acondicionamento e embalagem de medicamentos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('820.633','pecas/acessorios para equipamentos da industria farmaceutica'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('820.635','padroes primarios / substancias quimicas de referencia'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('830.007','aparelhos e equipamentos para analise de solos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('830.008','aparelhos/equipamentos p/analise eletro-eletronica'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('830.010','aparelhos/equipamentos p/lab. metal mecanico/metalurgia'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('830.011','aparelhos/equipamentos p/lab. construcao civil'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('830.102','cromatografos/espectrofotometros/fotometros'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('830.103','congeladores/freezers/containers/maquinas gelo'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('830.180','estufas/fornos/chapas eletricas'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('830.183','equipamentos para laboratorio'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('830.441','kits/utensilios didaticos p/laboratorio'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('830.507','materiais p/laboratorio'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('830.508','microscopios/estereoscopios/lupas'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('830.555','pecas/acessorios para equipamentos de laboratorio'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('830.636','materiais p/tratamento de agua'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('830.637','produtos quimicos p/laboratorio'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('830.638','produtos quimicos p/tratamento de agua'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('830.750','softwares p/ equipamentos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('830.868','vidraria p/laboratorio'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('855.001','aditivos e acessorios para microbiologia'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('855.133','diagnostica'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('855.500','meios de cultura'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('870.001','abaixador de lingua'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('870.002','afastadores'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('870.003','antropometros'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('870.004','anuscopio'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('870.005','aparelhos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('870.006','aspiradores/compressores'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('870.007','audiometros'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('870.008','autoclaves'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('870.009','ambus'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('870.010','aparelhos p/ medicina nuclear'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('870.045','balancas'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('870.046','baldes'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('870.047','banho-maria p/ mamadeiras'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('870.048','bercos aquecidos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('870.049','biombos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('870.050','bisturis'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('870.051','bracadeiras'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('870.052','baracas'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('870.053','bandejas'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('870.054','bombas infusao/ bomba vacuo aspiradora'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('870.055','broncoscopios'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('870.060','baterias'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('870.065','cadeira de rodas/ triciclo eletrico para deficientes'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('870.089','cabines'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('870.090','cabos de instrumentais'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('870.091','cadeiras oftalmologicas'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('870.093','canetas p/ espirografos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('870.094','cardioversores'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('870.095','ceratometros'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('870.096','colonoscopios (fribroscopio)'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('870.097','colposcopios'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('870.098','coluna oftalmologica'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('870.099','comadres'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('870.100','compasso dobra cutanea'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('870.101','conjunto baliu'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('870.102','conjunto instrumental p/ cesariana'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('870.103','cubas'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('870.104','canulas'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('870.105','curetas'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('870.106','compressores'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('870.133','desfribriladores'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('870.134','detectores de batimentos cardiofetais'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('870.135','diapasao de gaudencio'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('870.136','descoladores'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('870.177','eletrocardiografos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('870.178','eletrocauterios'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('870.179','eletroencefalografos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('870.180','escalas'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('870.181','escarradeiras'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('870.182','esfingnomanometros'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('870.183','especulos/alcas'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('870.184','espelhos p/ instrumentais'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('870.185','espirometros'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('870.186','estetoscopios'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('870.187','estiletes'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('870.188','estribo de kirschner'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('870.189','estojos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('870.190','equipamentos medico-hospitalares e de enfermagem'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('870.191','equipamentos radiologicos (exceto odontologicos)'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('870.192','equipamentos fisioterapico'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('870.221','facas p/ necropsia'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('870.222','focos/refletores'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('870.223','forceps'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('870.224','fotoforos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('870.265','goteira de brown'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('870.266','guia ayoa'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('870.267','ganchos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('870.268','goniometros'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('870.269','glicosimetros'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('870.309','hamper'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('870.310','histerometro'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('870.353','incubadoras'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('870.354','instrumentais'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('870.355','incineradores'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('870.441','kits parto/queimados/primeiro socorros'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('870.456','laminas p/ bisturi'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('870.457','laminas p/ laringoscopio'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('870.458','lampadas cirurgica de teto'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('870.459','lamparinas p/desembacamento especular'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('870.460','lanternas p/ exame orofaringe'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('870.461','laringoscopios'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('870.500','maletas'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('870.501','mandris'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('870.503','manometros'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('870.504','martelos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('870.505','monitores'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('870.506','microscopios cirurgicos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('870.507','materiais medico-hospitalares e de enfermagem'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('870.508','materiais radiologicos (exceto odontologicos)'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('870.509','materiais medico-hospitalares e de enfermagem (contin. 507)'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('870.510','materiais fisioterapicos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('870.544','nebulizadores'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('870.588','oftalmoscopios'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('870.589','ordenha de leite materno'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('870.590','osteotomos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('870.591','otoscopios'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('870.592','oxitenda'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('870.593','oximetros'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('870.632','papagaios'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('870.633','pincas'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('870.634','porta-agulhas'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('870.635','punchs'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('870.636','produtos oficinais'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('870.637','pecas p/equipamentos medico-hospitalares e de enfermagem'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('870.638','pneus/camaras/rodas p/equip medico-hospitalares e de enferma'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('870.691','raquimanometros'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('870.692','refratores'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('870.693','regletes'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('870.694','respiradores'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('870.695','retinoscopios'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('870.696','ruginas de farabeuf'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('870.700','seladoras'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('870.702','dispensador eletronico hospitalar'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('870.735','seringas'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('870.736','serras'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('870.737','sindesmotomos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('870.738','sistemas de video'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('870.739','sonares'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('870.740','suportes p/ soro/valvulas'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('870.779','tambores de aco inoxidavel'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('870.781','tesouras'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('870.782','treinadores de fala'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('870.783','tentacanulas'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('870.784','tubos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('870.825','ultra-sonografos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('870.867','valvulas'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('870.868','videolaparoscopios'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('870.869','ventilometros'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('880.001','anti-hemofilicos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('880.002','anti-hipertensivos/diureticos/vasodilatadores coronarianos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('880.003','antipsoriase'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('880.004','anestesicos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('880.005','ansioliticos/tranquilizantes'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('880.006','antagonistas da heparina'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('880.007','antagonistas dos narcoticos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('880.008','antagonistas dos inseticidas organofosforados'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('880.009','anti-helminticos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('880.010','anti-hemorragicos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('880.011','anti-hemorroidarios'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('880.012','anti-septicos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('880.013','antiacidos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('880.014','antiagregantes plaquetarios/antitrombocitos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('880.015','antialcoolicos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('880.016','antialergicos/anti-histaminicos/antipruriginosos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('880.017','antianemicos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('880.018','antiarritmicos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('880.019','antiasmaticos/broncodilatadores'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('880.020','antibacterianos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('880.021','anticoagulantes'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('880.022','anticonvulsivantes/antiepilepticos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('880.023','antidepressivos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('880.024','antidiarreicos/antidisentericos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('880.025','antiemeticos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('880.026','antifiseticos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('880.027','antigotosos/uricosuricos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('880.028','analgesicos/antitermicos/antiinflamatorios/antireumaticos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('880.029','antagonistas dos receptores'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('880.030','antimicoticos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('880.031','antineuriticos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('880.032','antiparkinsonianos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('880.033','antipsicoticos/neurolepticos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('880.034','antitussigenos/expectorantes/mucoliticos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('880.035','antiviroticos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('880.036','antidiabeticos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('880.037','antimalaricos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('880.038','anticoncepcionais'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('880.039','antilipemicos/hipocolesterinemicos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('880.040','antitireoideanos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('880.041','antiescleroticos/imunomodulador'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('880.042','antiprotozoarios'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('880.045','bloqueadores dos receptores h2 de histamina'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('880.046','bloqueadores neuromusculares (curarizantes)'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('880.049','anticalculos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('880.089','cardiotonicos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('880.090','cicatrizantes'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('880.091','complementos dieteticos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('880.092','contrastes radiologicos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('880.093','ceratoliticos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('880.133','descongestionantes'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('880.134','diluentes'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('880.176','dietas'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('880.177','ectoparasiticidas'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('880.178','edulcorantes (adocantes)'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('880.179','expansores do plasma'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('880.180','estimuladores da hematopoese'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('880.181','eupepticos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('880.182','estimulantes do sistema nervoso central'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('880.309','hipertensores arteriais'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('880.310','hipnoticos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('880.311','hidratantes pele'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('880.313','homeopaticos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('880.315','hormonios'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('880.353','imunoglobulinas'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('880.354','imunossupressores'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('880.355','inibidores da lactacao'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('880.356','inibidores da secrecao de prolactina'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('880.357','inibidores da sintese de gonadotrofina'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('880.358','inibidores dos disturbios do metabolismo osseo'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('880.359','inibidores da lipase gastrintestinal'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('880.456','laxativos/purgativos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('880.500','miorrelaxantes'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('880.544','narcoanalgesicos (opioides)'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('880.588','ocitocicos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('880.589','oficinais'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('880.590','oncologicos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('880.632','parassimpaticolicos/antiespasmodicos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('880.633','parassimpaticomimeticos/anticolinesterasicos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('880.634','produtos oftalmicos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('880.635','produtos otologicos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('880.676','quelantes/permutadores de ions'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('880.691','recalcificantes'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('880.692','reguladores'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('880.693','reidratantes/repositores eletroliticos/solucoes/soros'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('880.720','substituto'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('880.734','suplementos de magnesio'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('880.735','simpaticomimeticos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('880.736','surfactantes'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('880.760','tonicos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('880.779','tricomonicidas'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('880.867','vacinas'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('880.868','vasodilatadores cerebrais e perifericos/antivertiginosos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('880.869','vasodilatadores coronarianos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('880.870','anti-histam?nicos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('880.871','antineopl?sicos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('880.872','fator proteã?o solar (fps)'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('880.873','anest?sicos locais'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('880.874','implante sint?tico'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('880.875','leites especiais'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('880.876','suplementos alimentares'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('880.877','dietas pedißtricas'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('880.878','formula infantil'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('880.879','alimentaã?o enteral e oral'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('880.880','cereais_,mucilagem e farinha l?ctea'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('880.881','vasodilatadores'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('880.883','medicamento de aã?o no m?sculo esquel?tico'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('880.884','polivitaminicos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('880.885','vitaminas'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('880.886','estimulantes de apetite'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('880.887','nutriþòo'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('880.888','mëdulo para dieta enteral ou oral'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('880.889','dieta enteral sistema fechado'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('880.890','medicamento antitabagismo'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('880.891','suplementos diet?tico'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('880.900','aã?o no trato urin?rio'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('880.901','insufici?ncia renal'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('882.002','anti-hipertensivos/diureticos/vasodilatadores coronarios'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('882.027','antibioticos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('882.028','analgesicos/antitermicos/antiinflamatorios/antireumaticos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('882.032','antiparkinsonianos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('882.035','antiviroticos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('882.091','complementos dieteticos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('882.178','enzimas para reposicao'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('882.181','eupepticos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('882.353','imunoglobulinas'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('882.501','medicamentos importados especiais'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('882.590','oncologicos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('882.632','parassimpaticolicos/antiespasmodicos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('882.633','parassimpaticomimeticos/anticolinesterasicos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('882.676','quelantes'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('884.001','antipsoriase'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('884.003','anticonvulsivante/antiepilepticos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('884.004','antialergicos/anti-histaminicos/antipruriginosos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('884.005','analgesicos/antitermicos/antiinflamatorios/anti-reumaticos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('884.007','antipsicoticos/neurolepticos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('884.009','antitussigenos/expectorantes/mucoliticos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('884.011','antiviroticos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('884.013','antidiabeticos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('884.014','antilipemicos/hipocolesterinemicos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('884.015','antibacterianos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('884.016','antimalaricos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('884.017','antiparkinsonianos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('884.018','antitireoideanos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('884.019','antiasmaticos/broncodilatadores'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('884.021','antiacidos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('884.041','antiescleroticos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('884.045','bloqueadores neuromusculares (curarizantes)'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('884.136','dietas completas e modulares'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('884.175','medicamento do aparelho digestivo e metab¾lico'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('884.176','enzimas digestivas'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('884.177','estimuladores da hematopoese'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('884.179','eupepticos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('884.200','estimulantes do sistema nervoso central'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('884.309','hormonios'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('884.353','imunoglobulinas'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('884.355','inibidores da sintese de gonadotrofina'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('884.357','inibidores dos disturbios do metabolismo osseo'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('884.359','inibidores da secrecao de prolactina'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('884.361','imunossupressores'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('884.501','medicamentos importados excepcionais'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('884.544','narcoanalgesicos (opioides)'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('884.588','oncologicos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('884.675','quelantes/permutadores de ions'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('884.871','vasodilatadores cerebrais e perifericos/antivertiginosos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('884.872','antimiast?nicos_e descurarizantes'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('886.001','anti-hipertensivos/diureticos/vasodilatadores coronarios'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('886.002','antigotosos/uricosuricos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('886.003','antiagregantes plaquetarios/antitrombocitos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('886.004','antibacterianos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('886.005','antianemicos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('886.006','anticonvulsionantes/antiepilepticos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('886.007','antiasmaticos/broncodilatadores'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('886.008','anti-helminticos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('886.009','antiemeticos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('886.010','anti-coagulantes'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('886.011','antimicoticos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('886.012','antidepressivos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('886.013','antiparkinsonianos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('886.014','antilipemicos/hipocolesterinemicos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('886.015','antipsicoticos/neurolepticos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('886.016','antitireoideanos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('886.017','antiviroticos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('886.018','analgesicos/antitermicos/antiinflamatorios/antireumaticos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('886.019','antiescleroticos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('886.020','antidiabeticos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('886.021','antidiarreicos/antidisentericos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('886.022','ansioliticos/tranquilizantes'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('886.024','anti-hemorroidarios'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('886.025','anti-isquemico metabolico'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('886.026','antiartrosico'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('886.027','antifungico de amplo espectro'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('886.028','antialergicos / anti-histaminico / antipruriginosos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('886.029','antiarritmicos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('886.030','antineoplasico'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('886.031','antiosteoporotico'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('886.035','antimalarico'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('886.045','bloqueadores dos receptores h2 de histamina'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('886.091','complementos dieteticos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('886.095','cardiotonicos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('886.135','descongestionantes'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('886.177','eupepticos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('886.178','estimulantes do sistema nervoso central'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('886.250','hormonios'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('886.309','hipnoticos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('886.310','hipocolesterolemiante'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('886.353','imunoglobulinas'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('886.355','imunossupressores'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('886.357','inibidores da sintese de gonadotrofina'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('886.359','inibidores dos disturbios do metabolismo osseo'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('886.456','laxativos/purgativos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('886.501','medicamentos importados especiais'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('886.588','oncologicos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('886.589','outros agentes antineoplasicos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('886.632','parassimpaticolicos/antiespasmodicos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('886.634','parassimpaticomimeticos/anticolinesterasicos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('886.636','produtos oftalmicos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('886.691','recalcificantes'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('886.692','reidratantes/repositores eletrolitos/solucoes/soros'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('886.735','substitutos do leite natural'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('886.814','fërmula composta'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('886.815','inibidor v?rus sincial respiratërio(vsr)'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('886.867','vasodilatadores cerebrais e perifericos/antivertiginosos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('886.868','dietoter?picos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('886.869','complemento alimentar'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('886.870','dietas'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('886.871','fërmula infantil'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('886.872','suplemento alimentar'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('886.873','complemento nutricional'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('888.020','aparelho digestivo - adsorventes/antifiseticos intestinais'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('888.021','aparelho digestivo - antiacidos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('888.022','aparelho digestivo - antiemeticos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('888.023','aparelho digestivo - antiulcerosos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('888.024','aparelho respiratorio - antiasmaticos/broncodilatadores'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('888.025','aparelho respiratorio - antialergicos/anti-histam.'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('888.026','aparelho respirat. - antitussigenos/expectorantes'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('888.027','aparelho urinario - hiperplasia prostatica benigna'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('888.100','cardiovascular - antiangionosos/vasodilatadores'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('888.101','cardiovascular - antiarritmicos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('888.102','cardiovascular - anti-hipertensivos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('888.103','cardiovascular - agente inotropico'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('888.104','cardiovascular - diureticos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('888.105','cardiovascular - vasoconstritores/hipertensores'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('888.150','dermatologicos - antiacne'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('888.151','dermatologicos - atialopecia'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('888.152','dor/inflamacao/febre - analgesicos e antitermicos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('888.153','dor/inflamacao/febre - antiespasmodicos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('888.154','dor/inflamacao/febre - antiinflamatorios/antireumaticos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('888.155','dor/inflamacao/febre - relaxante muscular'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('888.322','hematologia/repositor eletrolitos - repositor de eletrolitos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('888.330','hematologia/repositor eletrolitos - antiagregantes palquet.'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('888.331','hematologia/repositor eletrolitos - antianemicos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('888.360','infeccao/infestacao - antibioticos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('888.361','infeccao/infestacao - amebicidas/giardicidas/tricomonicidas'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('888.362','infeccao/infestacao - antifugicos/antimicoticos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('888.363','infeccao/infestacao - anti-helminticos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('888.364','infeccao/infestacao - antiretroviral'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('888.365','infeccao/infestacao - antiviral'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('888.370','imunossupressor - agente imunossupressor'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('888.371','imunossupressor - antineoplasicos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('888.520','metabolismo - antidiabeticos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('888.521','metabolismo - antigotoso'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('888.522','metabolismo - antilipemicos/redutores colesterol'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('888.523','metabolismo - glicocorticoides'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('888.580','oftalmicos - solucoes oftalmicas'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('888.755','sistema nervoso central - anestesicos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('888.756','sistema nervoso central - ansioliticos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('888.757','sistema nervoso central - anticonvulsivantes'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('888.758','sistema nervoso central - antidepressivos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('888.759','sistema nervoso central - antiparkinsonianos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('888.760','sistema nervoso central - neurolepticos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('888.761','sistema nervoso central - ativador metabolismo cerebral'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('888.762','sistema nervoso central - hipnoticos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('890.500','materiais p/higiene pessoal'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('890.501','materiais p/profilaxia (prevencao)'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('890.502','aspirador nasal'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('890.505','creme hidratante / locao cremosa/ protetor solar'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('905.001','armacao de zilio'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('905.045','bengalas/muletas'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('905.046','cadeira de rodas e acessorios'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('905.089','calcados ortopedicos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('905.353','implantes'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('905.456','lentes p/ armacao'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('905.588','orteses/materias para fixacao'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('905.632','proteses'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('905.735','stents'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('905.739','orteses/proteses/armacoes/ lentes oculares e contato'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('910.001','alavancas'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('910.002','alicates'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('910.003','alveolotomo'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('910.004','amalgamadores'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('910.005','aparelhos de raio-x'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('910.006','aparelhos p/ remocao de placas bacterianas'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('910.008','armarios clinicos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('910.009','aventais para protecao de raio-x'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('910.010','articuladores (oclusores)'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('910.045','biombos de chumbo'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('910.046','broqueiros'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('910.047','brunidores'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('910.048','bancadas'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('910.089','cabos p/ espelhos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('910.090','cadeiras'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('910.091','calcadores'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('910.092','camaras escura'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('910.093','canetas'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('910.094','compasso de willis'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('910.095','compressores'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('910.096','condensadores'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('910.097','conjuntos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('910.098','contra-angulos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('910.099','curetas'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('910.100','cuspideiras'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('910.101','centrifugas'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('910.102','cinzeis'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('910.133','desgastadores'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('910.134','dosadores'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('910.135','desinfetantes/esterelizantes'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('910.136','dispensadores'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('910.177','equipos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('910.178','escavadores'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('910.179','esculpidores'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('910.180','espatulas'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('910.181','escovas'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('910.182','extratores'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('910.183','estojos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('910.184','escovarios'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('910.185','especimetros'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('910.186','espelhos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('910.221','facas p/ gesso'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('910.222','forceps'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('910.223','fotopolimerizadores'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('910.224','fresas'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('910.225','fornos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('910.226','filmes'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('910.227','fixadores/reveladores'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('910.228','frascos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('910.229','fios ortodonticos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('910.265','gengivotomos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('910.266','grampos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('910.267','graxas/oleos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('910.268','gral'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('910.269','godiva'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('910.353','instrumentais'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('910.397','jatos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('910.445','kits miniplacas/microplacas cirurgicas'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('910.456','lamparinas'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('910.457','limas'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('910.500','mandris'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('910.501','micro-motores'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('910.502','mochos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('910.503','moldeiras'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('910.504','muflos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('910.505','macaricos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('910.506','motores de suspensao'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('910.507','materiais p/ procedimentos e uso geral'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('910.508','matrizes'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('910.509','modelos didaticos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('910.632','pecas de mao'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('910.633','polidora para proteses'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('910.634','porta algodao'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('910.635','porta-amalgamas'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('910.636','porta-mandris'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('910.637','porta-matrizes'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('910.638','porta-residuos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('910.639','prensas'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('910.640','polimerizadores'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('910.641','pedras afiacao/desgaste'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('910.643','equipamentos/ aparelhos para uso em geral'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('910.691','refletores'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('910.692','rotores'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('910.693','resinas'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('910.694','reveladores placas bacterianas/caries'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('910.735','seringa de carpule'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('910.736','seringas triplice'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('910.737','sondas'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('910.738','vibradores'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('910.779','tesouras'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('910.780','turbinas'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('910.781','tornos de polimento'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('910.823','unidade auxiliar movel'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('930.002','armadilhas p/captura de animais'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('930.003','armadilhas p/ captura de insetos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('930.004','agulhas/ seringas uso veterinario'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('930.090','caixas termicas para transporte de peixes'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('930.091','correaria e arreamentos p/montaria e tracao'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('930.177','equipamentos veterinarios'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('930.500','medicamentos veterinarios/diagnosticos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('930.501','materiais veterinarios'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('930.691','redes/materiais p/bioterio'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('930.740','semen'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('950.001','aves'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('950.177','equinos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('950.180','ovinos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('950.200','apicultura/enxame de abelha'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('950.250','peixes'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('950.300','camundongos p/laboratorio'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('960.001','aveia'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('960.002','alfafa'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('960.003','azevem'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('960.089','carnes'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('960.177','ervilhaca'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('960.221','farinha de ostra'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('960.691','racoes'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('960.735','sal mineral'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('960.736','suplementos minerais'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('965.001','adubos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('965.089','corretivos do solo'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('970.133','defensivos p/ uso domestico'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('970.134','defensivos agricolas'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('980.045','bandejas/tubetes'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('980.500','mudas frutiferas'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('980.501','mudas reflorestamento'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('980.502','mudas ornamentais'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('980.735','sementes'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('980.736','substrato'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('990.001','alvejantes/desinfetantes/detergentes'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('990.002','amaciantes'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('990.003','aromatizantes'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('990.004','acidulantes'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('990.005','anti-septicos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('990.006','alcool para limpeza'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('990.089','ceras'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('990.133','desodorantes'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('990.177','esterilizantes'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('990.456','lustra moveis/polidor de metais'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('990.632','produtos alcalificantes para limpeza'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('990.633','produtos p/ conservacao de instrumentais'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('990.735','saboes/sabonetes liquidos'); +INSERT INTO subfamilia(estrutural, descricao) VALUES ('990.736','saponaceos'); + + +CREATE OR REPLACE FUNCTION insere_catalogo() RETURNS VOID AS $$ +DECLARE + inCodCatalogo INTEGER; + inCodClassificacao INTEGER := 1; + + stSQL VARCHAR; + reRecord RECORD; +BEGIN + PERFORM 1 + FROM pg_class + , pg_attribute + , pg_type + WHERE pg_class.relname = 'catalogo_classificacao' + AND pg_attribute.attname = 'importado' + AND pg_attribute.attnum > 0 + AND pg_attribute.attrelid = pg_class.oid + AND pg_attribute.atttypid = pg_type.oid + ; + IF NOT FOUND THEN + ALTER TABLE almoxarifado.catalogo_classificacao ADD COLUMN importado BOOLEAN DEFAULT FALSE NOT NULL; + END IF; + + + PERFORM 1 + FROM administracao.configuracao + WHERE exercicio = '2015' + AND cod_modulo = 2 + AND parametro = 'cod_uf' + AND valor = '23' + ; + IF FOUND THEN + SELECT MAX(cod_catalogo) + 1 + INTO inCodCatalogo + FROM almoxarifado.catalogo + ; + + INSERT + INTO administracao.configuracao + ( exercicio + , cod_modulo + , parametro + , valor + ) + VALUES + ( '2015' + , 29 + , 'catalogo_tce' + , inCodCatalogo + ); + + INSERT + INTO almoxarifado.catalogo + ( cod_catalogo + , descricao + , permite_manutencao + ) + VALUES + ( inCodCatalogo + , 'Catálogo TCE-RS' + , FALSE + ); + + INSERT + INTO almoxarifado.catalogo_niveis + ( nivel + , cod_catalogo + , mascara + , descricao + ) + VALUES + ( 1 + , inCodCatalogo + , '999' + , 'Família' + ); + + INSERT + INTO almoxarifado.catalogo_niveis + ( nivel + , cod_catalogo + , mascara + , descricao + ) + VALUES + ( 2 + , inCodCatalogo + , '999' + , 'Subfamília' + ); + + stSQL := ' + SELECT * FROM familia ORDER BY estrutural; + '; + FOR reRecord IN EXECUTE stSQL LOOP + INSERT + INTO almoxarifado.catalogo_classificacao + ( cod_classificacao -- integer | not null + , cod_catalogo -- integer | not null + , cod_estrutural -- character varying(160) | not null + , descricao -- character varying(400) | not null + , importado -- boolean | not null default false + ) + VALUES + ( inCodClassificacao + , inCodCatalogo + , reRecord.estrutural + , reRecord.descricao + , TRUE + ); + INSERT + INTO almoxarifado.classificacao_nivel + ( cod_catalogo -- integer | not null + , nivel -- integer | not null + , cod_classificacao -- integer | not null + , cod_nivel -- integer | not null + ) + VALUES + ( inCodCatalogo + , 1 + , inCodClassificacao + , split_part(reRecord.estrutural, '.', 1)::INTEGER + ); + INSERT + INTO almoxarifado.classificacao_nivel + ( cod_catalogo -- integer | not null + , nivel -- integer | not null + , cod_classificacao -- integer | not null + , cod_nivel -- integer | not null + ) + VALUES + ( inCodCatalogo + , 2 + , inCodClassificacao + , split_part(reRecord.estrutural, '.', 2)::INTEGER + ); + inCodClassificacao := inCodClassificacao + 1; + END LOOP; + + stSQL := ' + SELECT * FROM subfamilia ORDER BY estrutural; + '; + FOR reRecord IN EXECUTE stSQL LOOP + INSERT + INTO almoxarifado.catalogo_classificacao + ( cod_classificacao -- integer | not null + , cod_catalogo -- integer | not null + , cod_estrutural -- character varying(160) | not null + , descricao -- character varying(400) | not null + , importado -- boolean | not null default false + ) + VALUES + ( inCodClassificacao + , inCodCatalogo + , reRecord.estrutural + , reRecord.descricao + , TRUE + ); + INSERT + INTO almoxarifado.classificacao_nivel + ( cod_catalogo -- integer | not null + , nivel -- integer | not null + , cod_classificacao -- integer | not null + , cod_nivel -- integer | not null + ) + VALUES + ( inCodCatalogo + , 1 + , inCodClassificacao + , split_part(reRecord.estrutural, '.', 1)::INTEGER + ); + INSERT + INTO almoxarifado.classificacao_nivel + ( cod_catalogo -- integer | not null + , nivel -- integer | not null + , cod_classificacao -- integer | not null + , cod_nivel -- integer | not null + ) + VALUES + ( inCodCatalogo + , 2 + , inCodClassificacao + , split_part(reRecord.estrutural, '.', 2)::INTEGER + ); + inCodClassificacao := inCodClassificacao + 1; + END LOOP; + END IF; +END; +$$ LANGUAGE 'plpgsql'; + +SELECT insere_catalogo(); +DROP FUNCTION insere_catalogo(); + +DROP TABLE familia; +DROP TABLE subfamilia; + diff --git a/gestaoPrestacaoContas/fontes/PHP/TCEAL/instancias/configuracao/PRManterConfiguracaoOcorrenciaFuncional.php b/gestaoPrestacaoContas/fontes/PHP/TCEAL/instancias/configuracao/PRManterConfiguracaoOcorrenciaFuncional.php index e99b6e1..db2ba89 100644 --- a/gestaoPrestacaoContas/fontes/PHP/TCEAL/instancias/configuracao/PRManterConfiguracaoOcorrenciaFuncional.php +++ b/gestaoPrestacaoContas/fontes/PHP/TCEAL/instancias/configuracao/PRManterConfiguracaoOcorrenciaFuncional.php @@ -56,13 +56,15 @@ $obTTCEALConfiguracaoOcorrenciaFuncionalAssentamento->exclusao(); $arOcorrenciasSessao = Sessao::read('arOcorrencias'); -foreach ($arOcorrenciasSessao as $arOcorrenciasSessaoTmp) { - foreach ($arOcorrenciasSessaoTmp["assentamentos"] as $arAssentamentoSelecionado) { - $obTTCEALConfiguracaoOcorrenciaFuncionalAssentamento->setDado('exercicio',Sessao::getExercicio()); - $obTTCEALConfiguracaoOcorrenciaFuncionalAssentamento->setDado('cod_entidade', Sessao::read('cod_entidade')); - $obTTCEALConfiguracaoOcorrenciaFuncionalAssentamento->setDado('cod_ocorrencia', $arOcorrenciasSessaoTmp["cod_ocorrencia"]); - $obTTCEALConfiguracaoOcorrenciaFuncionalAssentamento->setDado('cod_assentamento', $arAssentamentoSelecionado["cod_assentamento"]); - $obTTCEALConfiguracaoOcorrenciaFuncionalAssentamento->inclusao(); +if ( is_array($arOcorrenciasSessao) ){ + foreach ($arOcorrenciasSessao as $arOcorrenciasSessaoTmp) { + foreach ($arOcorrenciasSessaoTmp["assentamentos"] as $arAssentamentoSelecionado) { + $obTTCEALConfiguracaoOcorrenciaFuncionalAssentamento->setDado('exercicio',Sessao::getExercicio()); + $obTTCEALConfiguracaoOcorrenciaFuncionalAssentamento->setDado('cod_entidade', Sessao::read('cod_entidade')); + $obTTCEALConfiguracaoOcorrenciaFuncionalAssentamento->setDado('cod_ocorrencia', $arOcorrenciasSessaoTmp["cod_ocorrencia"]); + $obTTCEALConfiguracaoOcorrenciaFuncionalAssentamento->setDado('cod_assentamento', $arAssentamentoSelecionado["cod_assentamento"]); + $obTTCEALConfiguracaoOcorrenciaFuncionalAssentamento->inclusao(); + } } } diff --git a/gestaoPrestacaoContas/fontes/PHP/TCEAM/classes/mapeamento/TTCEAMRecibos.class.php b/gestaoPrestacaoContas/fontes/PHP/TCEAM/classes/mapeamento/TTCEAMRecibos.class.php index bfcb80d..9fa99dc 100644 --- a/gestaoPrestacaoContas/fontes/PHP/TCEAM/classes/mapeamento/TTCEAMRecibos.class.php +++ b/gestaoPrestacaoContas/fontes/PHP/TCEAM/classes/mapeamento/TTCEAMRecibos.class.php @@ -245,8 +245,7 @@ class TTCEAMRecibos extends Persistente , descricao_objeto , tipo_recibo ORDER BY cod_empenho"; - //sistemaLegado::mostravar($stSql); - //die('Fim'); + return $stSql; } } diff --git a/gestaoPrestacaoContas/fontes/PHP/TCEMG/classes/mapeamento/2013/TTCEMGRelatorioRazaoDespesa.class.php b/gestaoPrestacaoContas/fontes/PHP/TCEMG/classes/mapeamento/2013/TTCEMGRelatorioRazaoDespesa.class.php index c23f906..1065fb0 100644 --- a/gestaoPrestacaoContas/fontes/PHP/TCEMG/classes/mapeamento/2013/TTCEMGRelatorioRazaoDespesa.class.php +++ b/gestaoPrestacaoContas/fontes/PHP/TCEMG/classes/mapeamento/2013/TTCEMGRelatorioRazaoDespesa.class.php @@ -33,7 +33,7 @@ * @package URBEM * @subpackage Mapeamento * - * $Id: TTCEMGRelatorioRazaoDespesa.class.php 62269 2015-04-15 18:28:39Z franver $ + * $Id: TTCEMGRelatorioRazaoDespesa.class.php 63835 2015-10-22 13:53:31Z franver $ * * $Name: $ * $Date: $ @@ -416,10 +416,7 @@ class TTCEMGRelatorioRazaoDespesa extends Persistente dt_empenho, dt_pagamento ; "; - - //SistemaLegado::mostravar($stSql); - //die; - + return $stSql; } diff --git a/gestaoPrestacaoContas/fontes/PHP/TCEMG/classes/mapeamento/2014/TTCEMGRelatorioRazaoDespesa.class.php b/gestaoPrestacaoContas/fontes/PHP/TCEMG/classes/mapeamento/2014/TTCEMGRelatorioRazaoDespesa.class.php index c23f906..1065fb0 100644 --- a/gestaoPrestacaoContas/fontes/PHP/TCEMG/classes/mapeamento/2014/TTCEMGRelatorioRazaoDespesa.class.php +++ b/gestaoPrestacaoContas/fontes/PHP/TCEMG/classes/mapeamento/2014/TTCEMGRelatorioRazaoDespesa.class.php @@ -33,7 +33,7 @@ * @package URBEM * @subpackage Mapeamento * - * $Id: TTCEMGRelatorioRazaoDespesa.class.php 62269 2015-04-15 18:28:39Z franver $ + * $Id: TTCEMGRelatorioRazaoDespesa.class.php 63835 2015-10-22 13:53:31Z franver $ * * $Name: $ * $Date: $ @@ -416,10 +416,7 @@ class TTCEMGRelatorioRazaoDespesa extends Persistente dt_empenho, dt_pagamento ; "; - - //SistemaLegado::mostravar($stSql); - //die; - + return $stSql; } diff --git a/gestaoPrestacaoContas/fontes/PHP/TCEMG/classes/mapeamento/2015/FNTCEMGSiaceDespesaTotalPessoal.plsql b/gestaoPrestacaoContas/fontes/PHP/TCEMG/classes/mapeamento/2015/FNTCEMGSiaceDespesaTotalPessoal.plsql deleted file mode 100644 index c47cdb9..0000000 --- a/gestaoPrestacaoContas/fontes/PHP/TCEMG/classes/mapeamento/2015/FNTCEMGSiaceDespesaTotalPessoal.plsql +++ /dev/null @@ -1,188 +0,0 @@ -/* - ********************************************************************************** - * * - * @package URBEM CNM - Soluções em Gestão Pública * - * @copyright (c) 2013 Confederação Nacional de Municípos * - * @author Confederação Nacional de Municípios * - * * - * O URBEM CNM é um software livre; você pode redistribuí-lo e/ou modificá-lo sob * - * os termos da Licença Pública Geral GNU conforme publicada pela Fundação do * - * Software Livre (FSF - Free Software Foundation); na versão 2 da Licença. * - * * - * Este programa é distribuído na expectativa de que seja útil, porém, * - * SEM NENHUMA GARANTIA; nem mesmo a garantia implícita de COMERCIABILIDADE OU * - * ADEQUAÇÃO A UMA FINALIDADE ESPECÍFICA. Consulte a Licença Pública Geral do GNU * - * para mais detalhes. * - * * - * Você deve ter recebido uma cópia da Licença Pública Geral do GNU "LICENCA.txt" * - * com este programa; se não, escreva para a Free Software Foundation Inc., * - * no endereço 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA. * - * * - ********************************************************************************** -*/ - -/* - -CREATE TYPE tcemg.siace_despesa_total_pessoal AS ( - cod_conta VARCHAR, - descricao VARCHAR, - cod_estrutural VARCHAR, - valor NUMERIC -); - -*/ - -CREATE OR REPLACE FUNCTION tcemg.siace_despesa_total_pessoal(varchar, varchar, varchar, varchar, varchar, integer, varchar) RETURNS SETOF tcemg.siace_despesa_total_pessoal AS $$ -DECLARE - dtInicial ALIAS FOR $1; - dtFinal ALIAS FOR $2; - stExercicio ALIAS FOR $3; - stEntidades ALIAS FOR $4; - cod_estrutural ALIAS FOR $5; - inNivel ALIAS FOR $6; - stTipoSituacao ALIAS FOR $7; - - inEntidades integer[]; - stSql VARCHAR :=''; - inAno INTEGER; - inMes INTEGER; - reRegistro RECORD; - -BEGIN - --Pl base RCL - inAno := substr(dtFinal, 7, 4 ) ; - inMes := substr(dtFinal, 4, 2 ) ; - - inEntidades := regexp_split_to_array(stEntidades,','); - - IF ( stTipoSituacao = 'liquidado' ) THEN - - stSql := ' - CREATE TEMPORARY TABLE tmp_despesa_pessoal_mensal AS ( - - SELECT - cast ( conta_despesa.cod_conta as varchar ) as cod_conta, - cast ( coalesce( stn.tituloRCL( publico.fn_mascarareduzida(conta_despesa.cod_estrutural)) , conta_despesa.descricao ) as varchar ) as descricao, - cast ( conta_despesa.cod_estrutural as varchar ) as cod_estrutural - '; - - IF inNivel = 3 AND cod_estrutural = '3.3.1' THEN - IF (SELECT COUNT(*) FROM stn.despesa_pessoal WHERE mes = inMes::INTEGER AND ano = ''||inAno||'' AND cod_entidade IN ( inEntidades[0],inEntidades[1] ) ) >= 1 THEN - stSql := stSql||' ,(SELECT COALESCE(SUM(valor), 0.00) - FROM stn.despesa_pessoal - WHERE mes = '||inMes::INTEGER||' - AND ano = '''||inAno||''' - AND cod_entidade IN ('||stEntidades||')) as mes'; - ELSE - stSql := stSql||' - , COALESCE((select * from tcemg.fn_relatorio_demostrativo_rcl_despesa_liquidada('||quote_literal(dtInicial)||' - ,'||quote_literal(dtFinal)||' - ,'||quote_literal(stEntidades) ||' - ,'||quote_literal('(conta_despesa.cod_estrutural like ''' ||substr( cod_estrutural, 3,16)||'%'' )') || ' - )), 0.00) as valor'; - END IF; - ELSE - stSql := stSql||' - , COALESCE((select * from tcemg.fn_relatorio_demostrativo_rcl_despesa_liquidada('||quote_literal(dtInicial)||' - ,'||quote_literal(dtFinal)||' - ,'||quote_literal(stEntidades) ||' - ,'||quote_literal('(conta_despesa.cod_estrutural like ''' ||substr( cod_estrutural, 3,16)||'%'' )') || ' - )), 0.00) as valor'; - END IF; - - stSql := stSql||' - - FROM orcamento.conta_despesa - WHERE conta_despesa.cod_estrutural LIKE ''' ||substr( cod_estrutural, 3,16)||'%'' - AND publico.fn_nivel(conta_despesa.cod_estrutural) = ''' || inNivel-1 || ''' - AND conta_despesa.exercicio = '''|| stExercicio ||''' - )'; - - EXECUTE stSql; - - END IF; - - IF ( stTipoSituacao = 'empenhado' ) THEN - - stSql := ' - CREATE TEMPORARY TABLE tmp_despesa_pessoal_mensal AS ( - - SELECT - cast ( conta_despesa.cod_conta as varchar ) as cod_conta, - cast ( coalesce( stn.tituloRCL( publico.fn_mascarareduzida(conta_despesa.cod_estrutural)) , conta_despesa.descricao ) as varchar ) as descricao, - cast ( conta_despesa.cod_estrutural as varchar ) as cod_estrutural - '; - - stSql := stSql||' - , COALESCE((select * from tcemg.fn_despesa_total_pessoal_empenhada('||quote_literal(dtInicial)||' - ,'||quote_literal(dtFinal)||' - ,'||quote_literal(stEntidades) ||' - ,'||quote_literal('(conta_despesa.cod_estrutural like ''' ||substr( cod_estrutural, 3,16)||'%'' )') || ' - )), 0.00) as valor'; - - stSql := stSql||' - - FROM orcamento.conta_despesa - WHERE conta_despesa.cod_estrutural LIKE ''' ||substr( cod_estrutural, 3,16)||'%'' - AND publico.fn_nivel(conta_despesa.cod_estrutural) = ''' || inNivel-1 || ''' - AND conta_despesa.exercicio = '''|| stExercicio ||''' - )'; - - EXECUTE stSql; - - END IF; - - IF ( stTipoSituacao = 'pago' ) THEN - - stSql := ' - CREATE TEMPORARY TABLE tmp_despesa_pessoal_mensal AS ( - - SELECT - cast ( conta_despesa.cod_conta as varchar ) as cod_conta, - cast ( coalesce( stn.tituloRCL( publico.fn_mascarareduzida(conta_despesa.cod_estrutural)) , conta_despesa.descricao ) as varchar ) as descricao, - cast ( conta_despesa.cod_estrutural as varchar ) as cod_estrutural - '; - - stSql := stSql||' - , COALESCE((select * from tcemg.fn_despesa_total_pessoal_paga('||quote_literal(dtInicial)||' - , '|| quote_literal(dtFinal)||' - , '|| quote_literal(stEntidades) ||' - , '|| quote_literal(stExercicio) ||' - , '|| quote_literal( substr( cod_estrutural, 3,16))|| ' - , false - )), 0.00) as valor'; - - stSql := stSql||' - - FROM orcamento.conta_despesa - LEFT JOIN orcamento.despesa - ON despesa.exercicio = conta_despesa.exercicio - AND despesa.cod_conta = conta_despesa.cod_conta - WHERE conta_despesa.cod_estrutural LIKE ''' ||substr( cod_estrutural, 3,16)||'%'' - AND publico.fn_nivel(conta_despesa.cod_estrutural) = ''' || inNivel-1 || ''' - AND conta_despesa.exercicio = '''|| stExercicio ||''' - )'; - - EXECUTE stSql; - - END IF; - - - stSql := 'SELECT cod_conta, - descricao, - cod_estrutural, - valor - FROM tmp_despesa_pessoal_mensal'; - - FOR reRegistro IN EXECUTE stSql - LOOP - RETURN next reRegistro; - END LOOP; - - DROP TABLE tmp_despesa_pessoal_mensal ; - - RETURN; - -END; - -$$ language 'plpgsql'; diff --git a/gestaoPrestacaoContas/fontes/PHP/TCEMG/classes/mapeamento/2015/TTCEMGAberturaLicitacao.class.php b/gestaoPrestacaoContas/fontes/PHP/TCEMG/classes/mapeamento/2015/TTCEMGAberturaLicitacao.class.php index 4421d3a..0af64cd 100755 --- a/gestaoPrestacaoContas/fontes/PHP/TCEMG/classes/mapeamento/2015/TTCEMGAberturaLicitacao.class.php +++ b/gestaoPrestacaoContas/fontes/PHP/TCEMG/classes/mapeamento/2015/TTCEMGAberturaLicitacao.class.php @@ -28,30 +28,20 @@ * Data de Criação: 15/09/2006 * @author Analista: Gelson W. Gonçalves - * @author Desenvolvedor: Nome do Programador + * @author Desenvolvedor: Jean da Silva * @package URBEM * @subpackage Mapeamento - $Id: TLicitacaoParticipante.class.php 57380 2014-02-28 17:45:35Z diogo.zarpelon $ + $Id: TTCEMGAberturaLicitacao.class.php 64106 2015-12-02 19:13:45Z michel $ * Casos de uso: uc-03.05.18 uc-03.05.19 */ include_once '../../../../../../gestaoAdministrativa/fontes/PHP/framework/include/valida.inc.php'; -include_once ( CLA_PERSISTENTE ); +include_once CLA_PERSISTENTE; -/** - * Efetua conexão com a tabela licitacao.participante - * Data de Criação: 15/09/2006 - - * @author Analista: Gelson W. Gonçalves - * @author Desenvolvedor: Thiago La Delfa Cabelleira - - * @package URBEM - * @subpackage Mapeamento -*/ class TTCEMGAberturaLicitacao extends Persistente { /** @@ -63,15 +53,15 @@ class TTCEMGAberturaLicitacao extends Persistente { return $this->executaRecupera("montaRecuperaDetalhamento10", $rsRecordSet, $stFiltro, $stOrder, $boTransacao); } - + public function montaRecuperaDetalhamento10() { $stSql = " SELECT 10 AS tipo_registro , LPAD(configuracao_entidade.valor,2,'0') AS cod_orgao_resp , LPAD(LPAD(licitacao.num_orgao::VARCHAR, 2, '0') || LPAD(licitacao.num_unidade::VARCHAR, 2, '0'),5,'0') AS cod_unidade_resp - , config_licitacao.exercicio_licitacao - , config_licitacao.num_licitacao AS num_processo_licitatorio + , licitacao.exercicio_licitacao + , licitacao.num_processo_licitatorio , CASE licitacao.cod_modalidade WHEN 4 THEN 7 WHEN 5 THEN 4 @@ -137,7 +127,7 @@ class TTCEMGAberturaLicitacao extends Persistente AND homologacao.cod_item = homologacao_anulada.cod_item AND homologacao.exercicio_cotacao = homologacao_anulada.exercicio_cotacao AND homologacao.cgm_fornecedor = homologacao_anulada.cgm_fornecedor - + INNER JOIN licitacao.adjudicacao ON adjudicacao.num_adjudicacao = homologacao.num_adjudicacao AND adjudicacao.cod_entidade = homologacao.cod_entidade @@ -161,12 +151,40 @@ class TTCEMGAberturaLicitacao extends Persistente AND cotacao_licitacao.exercicio_cotacao = adjudicacao.exercicio_cotacao AND cotacao_licitacao.cgm_fornecedor = adjudicacao.cgm_fornecedor - INNER JOIN licitacao.licitacao + INNER JOIN (SELECT licitacao.* + , (SELECT exercicio + FROM tcemg.fn_exercicio_numero_licitacao ('".$this->getDado('exercicio')."', '".$this->getDado('entidades')."') + VALUES ( cod_licitacao INTEGER + , cod_modalidade INTEGER + , cod_entidade INTEGER + , exercicio CHAR(4) + , exercicio_licitacao VARCHAR + , num_licitacao TEXT ) + WHERE cod_entidade = licitacao.cod_entidade + AND cod_licitacao = licitacao.cod_licitacao + AND cod_modalidade = licitacao.cod_modalidade + AND exercicio = licitacao.exercicio + ) AS exercicio_licitacao + , (SELECT num_licitacao + FROM tcemg.fn_exercicio_numero_licitacao ('".$this->getDado('exercicio')."', '".$this->getDado('entidades')."') + VALUES ( cod_licitacao INTEGER + , cod_modalidade INTEGER + , cod_entidade INTEGER + , exercicio CHAR(4) + , exercicio_licitacao VARCHAR + , num_licitacao TEXT ) + WHERE cod_entidade = licitacao.cod_entidade + AND cod_licitacao = licitacao.cod_licitacao + AND cod_modalidade = licitacao.cod_modalidade + AND exercicio = licitacao.exercicio + ) AS num_processo_licitatorio + FROM licitacao.licitacao + ) AS licitacao ON licitacao.cod_licitacao = cotacao_licitacao.cod_licitacao AND licitacao.cod_modalidade = cotacao_licitacao.cod_modalidade AND licitacao.cod_entidade = cotacao_licitacao.cod_entidade AND licitacao.exercicio = cotacao_licitacao.exercicio_licitacao - + LEFT JOIN licitacao.licitacao_anulada ON licitacao.cod_licitacao = licitacao_anulada.cod_licitacao AND licitacao.cod_modalidade = licitacao_anulada.cod_modalidade @@ -208,15 +226,15 @@ class TTCEMGAberturaLicitacao extends Persistente INNER JOIN compras.mapa_cotacao ON mapa_cotacao.exercicio_mapa = mapa.exercicio AND mapa_cotacao.cod_mapa = mapa.cod_mapa - + INNER JOIN compras.cotacao ON cotacao.exercicio = mapa_cotacao.exercicio_cotacao AND cotacao.cod_cotacao = mapa_cotacao.cod_cotacao - + INNER JOIN compras.julgamento ON julgamento.exercicio = cotacao.exercicio AND julgamento.cod_cotacao = cotacao.cod_cotacao - + INNER JOIN compras.julgamento_item ON julgamento_item.exercicio = julgamento.exercicio AND julgamento_item.cod_cotacao = julgamento.cod_cotacao @@ -224,7 +242,7 @@ class TTCEMGAberturaLicitacao extends Persistente AND julgamento_item.lote = homologacao.lote AND julgamento_item.cod_item = homologacao.cod_item AND julgamento_item.ordem = 1 - + INNER JOIN compras.cotacao_fornecedor_item ON cotacao_fornecedor_item.exercicio = julgamento_item.exercicio AND cotacao_fornecedor_item.cod_cotacao = julgamento_item.cod_cotacao @@ -285,33 +303,19 @@ class TTCEMGAberturaLicitacao extends Persistente , participante.cod_entidade , participante.exercicio FROM licitacao.participante - GROUP BY cod_licitacao,cod_modalidade,cod_entidade,exercicio + GROUP BY cod_licitacao,cod_modalidade,cod_entidade,exercicio ) as convidados ON convidados.cod_licitacao = licitacao.cod_licitacao AND convidados.cod_modalidade = licitacao.cod_modalidade AND convidados.cod_entidade = licitacao.cod_entidade - AND convidados.exercicio = licitacao.exercicio - - INNER JOIN (SELECT * - FROM tcemg.fn_exercicio_numero_licitacao ('".$this->getDado('exercicio')."', '".$this->getDado('entidades')."') - VALUES ( cod_licitacao INTEGER - , cod_modalidade INTEGER - , cod_entidade INTEGER - , exercicio CHAR(4) - , exercicio_licitacao VARCHAR - , num_licitacao TEXT ) - ) AS config_licitacao - ON config_licitacao.cod_entidade = licitacao.cod_entidade - AND config_licitacao.cod_licitacao = licitacao.cod_licitacao - AND config_licitacao.cod_modalidade = licitacao.cod_modalidade - AND config_licitacao.exercicio = licitacao.exercicio + AND convidados.exercicio = licitacao.exercicio INNER JOIN administracao.configuracao_entidade ON configuracao_entidade.parametro = 'tcemg_codigo_orgao_entidade_sicom' AND configuracao_entidade.cod_modulo = 55 AND configuracao_entidade.exercicio = licitacao.exercicio AND configuracao_entidade.cod_entidade = licitacao.cod_entidade - + WHERE TO_DATE(TO_CHAR(homologacao.timestamp,'dd/mm/yyyy'), 'dd/mm/yyyy') BETWEEN TO_DATE('01/".$this->getDado('mes')."/".$this->getDado('exercicio')."', 'dd/mm/yyyy') AND last_day(TO_DATE('".$this->getDado('exercicio')."'||'-'||'".$this->getDado('mes')."'||'-'||'01', 'yyyy-mm-dd')) AND homologacao_anulada.num_homologacao IS NULL @@ -320,12 +324,12 @@ class TTCEMGAberturaLicitacao extends Persistente AND homologacao.homologado IS TRUE AND licitacao.cod_modalidade NOT IN (8,9) AND licitacao.cod_entidade IN (" . $this->getDado('entidades') . ") - + GROUP BY tipo_registro , cod_orgao_resp , cod_unidade_resp - , config_licitacao.exercicio_licitacao - , num_processo_licitatorio + , licitacao.exercicio_licitacao + , licitacao.num_processo_licitatorio , cod_modalidade_licitacao , num_modalidade , natureza_procedimento @@ -367,149 +371,148 @@ class TTCEMGAberturaLicitacao extends Persistente public function montaRecuperaDetalhamento11() { $stSql = " - SELECT - 11 AS tipo_registro - , LPAD(configuracao_entidade.valor,2,'0') AS cod_orgao_resp - --, LPAD(LPAD(despesa.num_orgao::VARCHAR, 2, '0') || LPAD(despesa.num_unidade::VARCHAR, 2, '0'),5,'0') AS cod_unidade_resp - , LPAD(LPAD(licitacao.num_orgao::VARCHAR, 2, '0') || LPAD(licitacao.num_unidade::VARCHAR, 2, '0'),5,'0') AS cod_unidade_resp - , config_licitacao.exercicio_licitacao - , config_licitacao.num_licitacao AS num_processo_licitatorio - , homologacao.lote AS num_lote - , homologacao.lote AS desc_lote - + SELECT 11 AS tipo_registro + , LPAD(configuracao_entidade.valor,2,'0') AS cod_orgao_resp + , LPAD(LPAD(licitacao.num_orgao::VARCHAR, 2, '0') || LPAD(licitacao.num_unidade::VARCHAR, 2, '0'),5,'0') AS cod_unidade_resp + , config_licitacao.exercicio_licitacao + , config_licitacao.num_licitacao AS num_processo_licitatorio + , homologacao.lote AS num_lote + , homologacao.lote AS desc_lote + FROM licitacao.licitacao - - JOIN sw_processo + + INNER JOIN sw_processo ON sw_processo.cod_processo = licitacao.cod_processo AND sw_processo.ano_exercicio = licitacao.exercicio_processo - - JOIN licitacao.criterio_julgamento + + INNER JOIN licitacao.criterio_julgamento ON criterio_julgamento.cod_criterio = licitacao.cod_criterio - - JOIN licitacao.edital + + INNER JOIN licitacao.edital ON edital.cod_licitacao = licitacao.cod_licitacao AND edital.cod_modalidade = licitacao.cod_modalidade AND edital.cod_entidade = licitacao.cod_entidade AND edital.exercicio_licitacao = licitacao.exercicio - AND ( - SELECT edital_anulado.num_edital FROM licitacao.edital_anulado - WHERE edital_anulado.num_edital=edital.num_edital - AND edital_anulado.exercicio=edital.exercicio - ) IS NULL - - JOIN compras.objeto + + LEFT JOIN licitacao.edital_anulado + ON edital.num_edital=edital_anulado.num_edital + AND edital.exercicio =edital_anulado.exercicio + + INNER JOIN compras.objeto ON objeto.cod_objeto = licitacao.cod_objeto - - JOIN compras.tipo_objeto + + INNER JOIN compras.tipo_objeto ON tipo_objeto.cod_tipo_objeto = licitacao.cod_tipo_objeto - - JOIN compras.modalidade + + INNER JOIN compras.modalidade ON modalidade.cod_modalidade = licitacao.cod_modalidade - - JOIN compras.mapa + + INNER JOIN compras.mapa ON mapa.exercicio = licitacao.exercicio_mapa AND mapa.cod_mapa = licitacao.cod_mapa AND mapa.cod_tipo_licitacao = 2 - - JOIN compras.tipo_licitacao + + INNER JOIN compras.tipo_licitacao ON tipo_licitacao.cod_tipo_licitacao = licitacao.cod_tipo_licitacao - - JOIN compras.mapa_solicitacao + + INNER JOIN compras.mapa_solicitacao ON mapa_solicitacao.exercicio = mapa.exercicio AND mapa_solicitacao.cod_mapa = mapa.cod_mapa - JOIN compras.mapa_cotacao + INNER JOIN compras.mapa_cotacao ON mapa_cotacao.exercicio_mapa = mapa.exercicio AND mapa_cotacao.cod_mapa = mapa.cod_mapa - - JOIN compras.cotacao + + INNER JOIN compras.cotacao ON cotacao.exercicio = mapa_cotacao.exercicio_cotacao AND cotacao.cod_cotacao = mapa_cotacao.cod_cotacao - - JOIN compras.julgamento + + INNER JOIN compras.julgamento ON julgamento.exercicio = cotacao.exercicio AND julgamento.cod_cotacao = cotacao.cod_cotacao - - JOIN compras.julgamento_item + + INNER JOIN compras.julgamento_item ON julgamento_item.exercicio = julgamento.exercicio AND julgamento_item.cod_cotacao = julgamento.cod_cotacao - - JOIN compras.cotacao_fornecedor_item + + INNER JOIN compras.cotacao_fornecedor_item ON cotacao_fornecedor_item.exercicio = julgamento_item.exercicio AND cotacao_fornecedor_item.cod_cotacao = julgamento_item.cod_cotacao AND cotacao_fornecedor_item.cod_item = julgamento_item.cod_item AND cotacao_fornecedor_item.cgm_fornecedor = julgamento_item.cgm_fornecedor AND cotacao_fornecedor_item.lote = julgamento_item.lote - - JOIN compras.fornecedor + + INNER JOIN compras.fornecedor ON fornecedor.cgm_fornecedor = cotacao_fornecedor_item.cgm_fornecedor - JOIN licitacao.homologacao + INNER JOIN licitacao.homologacao ON homologacao.cod_licitacao=licitacao.cod_licitacao AND homologacao.cod_modalidade=licitacao.cod_modalidade AND homologacao.cod_entidade=licitacao.cod_entidade AND homologacao.exercicio_licitacao=licitacao.exercicio AND homologacao.cod_item=julgamento_item.cod_item AND homologacao.lote=julgamento_item.lote - AND ( - SELECT homologacao_anulada.num_homologacao FROM licitacao.homologacao_anulada - WHERE homologacao_anulada.cod_licitacao=licitacao.cod_licitacao - AND homologacao_anulada.cod_modalidade=licitacao.cod_modalidade - AND homologacao_anulada.cod_entidade=licitacao.cod_entidade - AND homologacao_anulada.exercicio_licitacao=licitacao.exercicio - AND homologacao.num_homologacao=homologacao_anulada.num_homologacao - AND homologacao.cod_item=homologacao_anulada.cod_item - AND homologacao.lote=homologacao_anulada.lote - ) IS NULL - - JOIN compras.solicitacao_homologada + + LEFT JOIN licitacao.homologacao_anulada + ON homologacao.num_homologacao = homologacao_anulada.num_homologacao + AND homologacao.cod_licitacao = homologacao_anulada.cod_licitacao + AND homologacao.cod_modalidade = homologacao_anulada.cod_modalidade + AND homologacao.cod_entidade = homologacao_anulada.cod_entidade + AND homologacao.num_adjudicacao = homologacao_anulada.num_adjudicacao + AND homologacao.exercicio_licitacao = homologacao_anulada.exercicio_licitacao + AND homologacao.lote = homologacao_anulada.lote + AND homologacao.cod_cotacao = homologacao_anulada.cod_cotacao + AND homologacao.cod_item = homologacao_anulada.cod_item + AND homologacao.exercicio_cotacao = homologacao_anulada.exercicio_cotacao + AND homologacao.cgm_fornecedor = homologacao_anulada.cgm_fornecedor + + INNER JOIN compras.solicitacao_homologada ON solicitacao_homologada.exercicio=mapa_solicitacao.exercicio_solicitacao AND solicitacao_homologada.cod_entidade=mapa_solicitacao.cod_entidade AND solicitacao_homologada.cod_solicitacao=mapa_solicitacao.cod_solicitacao - JOIN compras.solicitacao_homologada_reserva + INNER JOIN compras.solicitacao_homologada_reserva ON solicitacao_homologada_reserva.exercicio=solicitacao_homologada.exercicio AND solicitacao_homologada_reserva.cod_entidade=solicitacao_homologada.cod_entidade AND solicitacao_homologada_reserva.cod_solicitacao=solicitacao_homologada.cod_solicitacao - JOIN orcamento.despesa + INNER JOIN orcamento.despesa ON despesa.exercicio = solicitacao_homologada_reserva.exercicio AND despesa.cod_despesa = solicitacao_homologada_reserva.cod_despesa - JOIN administracao.configuracao_entidade + INNER JOIN administracao.configuracao_entidade ON configuracao_entidade.parametro = 'tcemg_codigo_orgao_entidade_sicom' AND configuracao_entidade.cod_modulo = 55 AND configuracao_entidade.exercicio = licitacao.exercicio AND configuracao_entidade.cod_entidade = licitacao.cod_entidade - - JOIN sw_cgm AS responsavel + + INNER JOIN sw_cgm AS responsavel ON responsavel.numcgm = edital.responsavel_juridico - - JOIN ( SELECT num_documento, numcgm, tipo_documento - FROM ( + + INNER JOIN ( SELECT num_documento, numcgm, tipo_documento + FROM ( SELECT cpf AS num_documento, numcgm, 1 AS tipo_documento FROM sw_cgm_pessoa_fisica - UNION - SELECT cnpj AS num_documento, numcgm, 2 AS tipo_documento FROM sw_cgm_pessoa_juridica ) AS tabela GROUP BY numcgm, num_documento, tipo_documento ) AS documento_pessoa ON documento_pessoa.numcgm = responsavel.numcgm - LEFT JOIN licitacao.contrato_licitacao - ON contrato_licitacao.cod_licitacao=licitacao.cod_licitacao - AND contrato_licitacao.cod_modalidade=licitacao.cod_modalidade - AND contrato_licitacao.cod_entidade=licitacao.cod_entidade - AND contrato_licitacao.exercicio_licitacao=licitacao.exercicio - - LEFT JOIN licitacao.contrato - ON contrato.num_contrato=contrato_licitacao.num_contrato - AND contrato.cod_entidade=contrato_licitacao.cod_entidade - AND contrato.exercicio=contrato_licitacao.exercicio - - JOIN ( + + LEFT JOIN licitacao.contrato_licitacao + ON contrato_licitacao.cod_licitacao=licitacao.cod_licitacao + AND contrato_licitacao.cod_modalidade=licitacao.cod_modalidade + AND contrato_licitacao.cod_entidade=licitacao.cod_entidade + AND contrato_licitacao.exercicio_licitacao=licitacao.exercicio + + LEFT JOIN licitacao.contrato + ON contrato.num_contrato=contrato_licitacao.num_contrato + AND contrato.cod_entidade=contrato_licitacao.cod_entidade + AND contrato.exercicio=contrato_licitacao.exercicio + + INNER JOIN ( SELECT * FROM tcemg.fn_exercicio_numero_licitacao ('".$this->getDado('exercicio')."', '".$this->getDado('entidades')."') VALUES (cod_licitacao INTEGER ,cod_modalidade INTEGER @@ -521,28 +524,29 @@ class TTCEMGAberturaLicitacao extends Persistente ON config_licitacao.cod_entidade = licitacao.cod_entidade AND config_licitacao.cod_licitacao = licitacao.cod_licitacao AND config_licitacao.cod_modalidade = licitacao.cod_modalidade - AND config_licitacao.exercicio = licitacao.exercicio + AND config_licitacao.exercicio = licitacao.exercicio - WHERE TO_DATE(TO_CHAR(homologacao.timestamp,'dd/mm/yyyy'), 'dd/mm/yyyy') BETWEEN TO_DATE('01/" . $this->getDado('mes') . "/" . $this->getDado('exercicio') . "', 'dd/mm/yyyy') - AND last_day(TO_DATE('" . $this->getDado('exercicio') . "' || '-' || '".$this->getDado('mes') . "' || '-' || '01','yyyy-mm-dd')) - AND licitacao.cod_entidade IN (" . $this->getDado('entidades') . ") - AND licitacao.cod_modalidade NOT IN (8,9) - AND NOT EXISTS( SELECT 1 - FROM licitacao.licitacao_anulada - WHERE licitacao_anulada.cod_licitacao = licitacao.cod_licitacao - AND licitacao_anulada.cod_modalidade = licitacao.cod_modalidade + WHERE TO_DATE(TO_CHAR(homologacao.timestamp,'dd/mm/yyyy'), 'dd/mm/yyyy') BETWEEN TO_DATE('01/" . $this->getDado('mes') . "/" . $this->getDado('exercicio') . "', 'dd/mm/yyyy') + AND last_day(TO_DATE('" . $this->getDado('exercicio') . "' || '-' || '".$this->getDado('mes') . "' || '-' || '01','yyyy-mm-dd')) + AND homologacao_anulada.num_homologacao IS NULL + AND edital_anulado.num_edital IS NULL + AND licitacao.cod_entidade IN (" . $this->getDado('entidades') . ") + AND licitacao.cod_modalidade NOT IN (8,9) + AND NOT EXISTS( SELECT 1 + FROM licitacao.licitacao_anulada + WHERE licitacao_anulada.cod_licitacao = licitacao.cod_licitacao + AND licitacao_anulada.cod_modalidade = licitacao.cod_modalidade AND licitacao_anulada.cod_entidade = licitacao.cod_entidade AND licitacao_anulada.exercicio = licitacao.exercicio ) - - GROUP BY licitacao.cod_licitacao, licitacao.cod_modalidade, tipo_registro, cod_orgao_resp, cod_unidade_resp, licitacao.exercicio, num_processo_licitatorio, num_lote, config_licitacao.exercicio_licitacao, config_licitacao.num_licitacao + GROUP BY licitacao.cod_licitacao, licitacao.cod_modalidade, tipo_registro, cod_orgao_resp, cod_unidade_resp, licitacao.exercicio, num_processo_licitatorio, num_lote, config_licitacao.exercicio_licitacao, config_licitacao.num_licitacao - ORDER BY licitacao.cod_licitacao, licitacao.cod_modalidade, num_processo_licitatorio, cod_unidade_resp + ORDER BY licitacao.cod_licitacao, licitacao.cod_modalidade, num_processo_licitatorio, cod_unidade_resp "; - + return $stSql; } - + public function recuperaDetalhamento12(&$rsRecordSet,$stFiltro="",$stOrder="",$boTransacao="") { return $this->executaRecupera("montaRecuperaDetalhamento12",$rsRecordSet,$stFiltro,$stOrder,$boTransacao); @@ -554,8 +558,8 @@ class TTCEMGAberturaLicitacao extends Persistente SELECT 12 AS tipo_registro , LPAD(configuracao_entidade.valor,2,'0') AS cod_orgao_resp , LPAD(LPAD(licitacao.num_orgao::VARCHAR, 2, '0') || LPAD(licitacao.num_unidade::VARCHAR, 2, '0'),5,'0') AS cod_unidade_resp - , config_licitacao.exercicio_licitacao - , config_licitacao.num_licitacao AS num_processo_licitatorio + , licitacao.exercicio_licitacao + , licitacao.num_processo_licitatorio , homologacao.cod_item AS cod_item FROM licitacao.homologacao @@ -595,12 +599,40 @@ class TTCEMGAberturaLicitacao extends Persistente AND cotacao_licitacao.exercicio_cotacao = adjudicacao.exercicio_cotacao AND cotacao_licitacao.cgm_fornecedor = adjudicacao.cgm_fornecedor - INNER JOIN licitacao.licitacao + INNER JOIN (SELECT licitacao.* + , (SELECT exercicio + FROM tcemg.fn_exercicio_numero_licitacao ('".$this->getDado('exercicio')."', '".$this->getDado('entidades')."') + VALUES ( cod_licitacao INTEGER + , cod_modalidade INTEGER + , cod_entidade INTEGER + , exercicio CHAR(4) + , exercicio_licitacao VARCHAR + , num_licitacao TEXT ) + WHERE cod_entidade = licitacao.cod_entidade + AND cod_licitacao = licitacao.cod_licitacao + AND cod_modalidade = licitacao.cod_modalidade + AND exercicio = licitacao.exercicio + ) AS exercicio_licitacao + , (SELECT num_licitacao + FROM tcemg.fn_exercicio_numero_licitacao ('".$this->getDado('exercicio')."', '".$this->getDado('entidades')."') + VALUES ( cod_licitacao INTEGER + , cod_modalidade INTEGER + , cod_entidade INTEGER + , exercicio CHAR(4) + , exercicio_licitacao VARCHAR + , num_licitacao TEXT ) + WHERE cod_entidade = licitacao.cod_entidade + AND cod_licitacao = licitacao.cod_licitacao + AND cod_modalidade = licitacao.cod_modalidade + AND exercicio = licitacao.exercicio + ) AS num_processo_licitatorio + FROM licitacao.licitacao + ) AS licitacao ON licitacao.cod_licitacao = cotacao_licitacao.cod_licitacao AND licitacao.cod_modalidade = cotacao_licitacao.cod_modalidade AND licitacao.cod_entidade = cotacao_licitacao.cod_entidade AND licitacao.exercicio = cotacao_licitacao.exercicio_licitacao - + LEFT JOIN licitacao.licitacao_anulada ON licitacao.cod_licitacao = licitacao_anulada.cod_licitacao AND licitacao.cod_modalidade = licitacao_anulada.cod_modalidade @@ -627,20 +659,6 @@ class TTCEMGAberturaLicitacao extends Persistente AND configuracao_entidade.exercicio = licitacao.exercicio AND configuracao_entidade.cod_entidade = licitacao.cod_entidade - INNER JOIN (SELECT * - FROM tcemg.fn_exercicio_numero_licitacao ('".$this->getDado('exercicio')."', '".$this->getDado('entidades')."') - VALUES ( cod_licitacao INTEGER - , cod_modalidade INTEGER - , cod_entidade INTEGER - , exercicio CHAR(4) - , exercicio_licitacao VARCHAR - , num_licitacao TEXT ) - ) AS config_licitacao - ON config_licitacao.cod_entidade = licitacao.cod_entidade - AND config_licitacao.cod_licitacao = licitacao.cod_licitacao - AND config_licitacao.cod_modalidade = licitacao.cod_modalidade - AND config_licitacao.exercicio = licitacao.exercicio - WHERE TO_DATE(TO_CHAR(homologacao.timestamp,'dd/mm/yyyy'), 'dd/mm/yyyy') BETWEEN TO_DATE('01/".$this->getDado('mes')."/".$this->getDado('exercicio')."', 'dd/mm/yyyy') AND last_day(TO_DATE('".$this->getDado('exercicio')."'||'-'||'".$this->getDado('mes')."'||'-'||'01', 'yyyy-mm-dd')) AND homologacao_anulada.num_homologacao IS NULL @@ -649,16 +667,17 @@ class TTCEMGAberturaLicitacao extends Persistente AND edital_anulado.num_edital IS NULL AND licitacao.cod_entidade IN (" . $this->getDado('entidades') . ") AND licitacao.cod_modalidade NOT IN (8,9) + GROUP BY tipo_registro , cod_orgao_resp , cod_unidade_resp - , config_licitacao.exercicio_licitacao - , num_processo_licitatorio - , homologacao.cod_item - "; + , licitacao.exercicio_licitacao + , licitacao.num_processo_licitatorio + , homologacao.cod_item "; + return $stSql; } - + public function recuperaDetalhamento13(&$rsRecordSet,$stFiltro="",$stOrder="",$boTransacao="") { return $this->executaRecupera("montaRecuperaDetalhamento13",$rsRecordSet,$stFiltro,$stOrder,$boTransacao); @@ -670,8 +689,8 @@ class TTCEMGAberturaLicitacao extends Persistente SELECT 13 AS tipo_registro , LPAD(configuracao_entidade.valor,2,'0') AS cod_orgao_resp , LPAD(LPAD(licitacao.num_orgao::VARCHAR, 2, '0') || LPAD(licitacao.num_unidade::VARCHAR, 2, '0'),5,'0') AS cod_unidade_resp - , config_licitacao.exercicio_licitacao - , config_licitacao.num_licitacao AS num_processo_licitatorio + , licitacao.exercicio_licitacao + , licitacao.num_processo_licitatorio , homologacao.lote AS num_lote , homologacao.cod_item AS cod_item FROM licitacao.homologacao @@ -712,12 +731,40 @@ class TTCEMGAberturaLicitacao extends Persistente AND cotacao_licitacao.exercicio_cotacao = adjudicacao.exercicio_cotacao AND cotacao_licitacao.cgm_fornecedor = adjudicacao.cgm_fornecedor - INNER JOIN licitacao.licitacao + INNER JOIN (SELECT licitacao.* + , (SELECT exercicio + FROM tcemg.fn_exercicio_numero_licitacao ('".$this->getDado('exercicio')."', '".$this->getDado('entidades')."') + VALUES ( cod_licitacao INTEGER + , cod_modalidade INTEGER + , cod_entidade INTEGER + , exercicio CHAR(4) + , exercicio_licitacao VARCHAR + , num_licitacao TEXT ) + WHERE cod_entidade = licitacao.cod_entidade + AND cod_licitacao = licitacao.cod_licitacao + AND cod_modalidade = licitacao.cod_modalidade + AND exercicio = licitacao.exercicio + ) AS exercicio_licitacao + , (SELECT num_licitacao + FROM tcemg.fn_exercicio_numero_licitacao ('".$this->getDado('exercicio')."', '".$this->getDado('entidades')."') + VALUES ( cod_licitacao INTEGER + , cod_modalidade INTEGER + , cod_entidade INTEGER + , exercicio CHAR(4) + , exercicio_licitacao VARCHAR + , num_licitacao TEXT ) + WHERE cod_entidade = licitacao.cod_entidade + AND cod_licitacao = licitacao.cod_licitacao + AND cod_modalidade = licitacao.cod_modalidade + AND exercicio = licitacao.exercicio + ) AS num_processo_licitatorio + FROM licitacao.licitacao + ) AS licitacao ON licitacao.cod_licitacao = cotacao_licitacao.cod_licitacao AND licitacao.cod_modalidade = cotacao_licitacao.cod_modalidade AND licitacao.cod_entidade = cotacao_licitacao.cod_entidade AND licitacao.exercicio = cotacao_licitacao.exercicio_licitacao - + LEFT JOIN licitacao.licitacao_anulada ON licitacao.cod_licitacao = licitacao_anulada.cod_licitacao AND licitacao.cod_modalidade = licitacao_anulada.cod_modalidade @@ -745,27 +792,12 @@ class TTCEMGAberturaLicitacao extends Persistente AND mapa_item.cod_entidade = homologacao.cod_entidade AND mapa_item.cod_item = homologacao.cod_item - INNER JOIN administracao.configuracao_entidade ON configuracao_entidade.parametro = 'tcemg_codigo_orgao_entidade_sicom' AND configuracao_entidade.cod_modulo = 55 AND configuracao_entidade.exercicio = licitacao.exercicio AND configuracao_entidade.cod_entidade = licitacao.cod_entidade - INNER JOIN (SELECT * - FROM tcemg.fn_exercicio_numero_licitacao ('".$this->getDado('exercicio')."', '".$this->getDado('entidades')."') - VALUES ( cod_licitacao INTEGER - , cod_modalidade INTEGER - , cod_entidade INTEGER - , exercicio CHAR(4) - , exercicio_licitacao VARCHAR - , num_licitacao TEXT ) - ) AS config_licitacao - ON config_licitacao.cod_entidade = licitacao.cod_entidade - AND config_licitacao.cod_licitacao = licitacao.cod_licitacao - AND config_licitacao.cod_modalidade = licitacao.cod_modalidade - AND config_licitacao.exercicio = licitacao.exercicio - WHERE TO_DATE(TO_CHAR(homologacao.timestamp,'dd/mm/yyyy'), 'dd/mm/yyyy') BETWEEN TO_DATE('01/".$this->getDado('mes')."/".$this->getDado('exercicio')."', 'dd/mm/yyyy') AND last_day(TO_DATE('".$this->getDado('exercicio')."'||'-'||'".$this->getDado('mes')."'||'-'||'01', 'yyyy-mm-dd')) AND homologacao_anulada.num_homologacao IS NULL @@ -774,19 +806,18 @@ class TTCEMGAberturaLicitacao extends Persistente AND edital_anulado.num_edital IS NULL AND licitacao.cod_entidade IN (" . $this->getDado('entidades') . ") AND licitacao.cod_modalidade NOT IN (8,9) - + GROUP BY tipo_registro , cod_orgao_resp , cod_unidade_resp - , config_licitacao.exercicio_licitacao - , num_processo_licitatorio + , licitacao.exercicio_licitacao + , licitacao.num_processo_licitatorio , num_lote - , homologacao.cod_item - "; - + , homologacao.cod_item "; + return $stSql; } - + public function recuperaDetalhamento14(&$rsRecordSet,$stFiltro="",$stOrder="",$boTransacao="") { return $this->executaRecupera("montaRecuperaDetalhamento14",$rsRecordSet,$stFiltro,$stOrder,$boTransacao); @@ -798,18 +829,18 @@ class TTCEMGAberturaLicitacao extends Persistente SELECT 14 AS tipo_registro , LPAD(configuracao_entidade.valor,2,'0') AS cod_orgao_resp , LPAD(LPAD(licitacao.num_orgao::VARCHAR, 2, '0') || LPAD(licitacao.num_unidade::VARCHAR, 2, '0'),5,'0') AS cod_unidade_resp - , config_licitacao.exercicio_licitacao - , config_licitacao.num_licitacao AS num_processo_licitatorio + , licitacao.exercicio_licitacao + , licitacao.num_processo_licitatorio , CASE WHEN mapa.cod_tipo_licitacao = 2 THEN homologacao.lote - ELSE NULL - END AS num_lote + ELSE NULL + END AS num_lote , homologacao.cod_item AS cod_item , TO_CHAR(cotacao.timestamp,'ddmmyyyy') AS dt_cotacao , CASE WHEN licitacao.cod_tipo_objeto = 4 THEN ('0,0000') ELSE ((cotacao_fornecedor_item.vl_cotacao/SUM(((mapa_item.quantidade)-COALESCE(mapa_item_anulacao.quantidade, 0.0000))))::NUMERIC(14,4))::VARCHAR - END AS vl_cot_precos_unitario + END AS vl_cot_precos_unitario , SUM((mapa_item.quantidade)-COALESCE(mapa_item_anulacao.quantidade, 0.0000)) AS quantidade , '0,00' AS vl_min_alien_bens FROM licitacao.homologacao @@ -850,12 +881,40 @@ class TTCEMGAberturaLicitacao extends Persistente AND cotacao_licitacao.exercicio_cotacao = adjudicacao.exercicio_cotacao AND cotacao_licitacao.cgm_fornecedor = adjudicacao.cgm_fornecedor - INNER JOIN licitacao.licitacao + INNER JOIN (SELECT licitacao.* + , (SELECT exercicio + FROM tcemg.fn_exercicio_numero_licitacao ('".$this->getDado('exercicio')."', '".$this->getDado('entidades')."') + VALUES ( cod_licitacao INTEGER + , cod_modalidade INTEGER + , cod_entidade INTEGER + , exercicio CHAR(4) + , exercicio_licitacao VARCHAR + , num_licitacao TEXT ) + WHERE cod_entidade = licitacao.cod_entidade + AND cod_licitacao = licitacao.cod_licitacao + AND cod_modalidade = licitacao.cod_modalidade + AND exercicio = licitacao.exercicio + ) AS exercicio_licitacao + , (SELECT num_licitacao + FROM tcemg.fn_exercicio_numero_licitacao ('".$this->getDado('exercicio')."', '".$this->getDado('entidades')."') + VALUES ( cod_licitacao INTEGER + , cod_modalidade INTEGER + , cod_entidade INTEGER + , exercicio CHAR(4) + , exercicio_licitacao VARCHAR + , num_licitacao TEXT ) + WHERE cod_entidade = licitacao.cod_entidade + AND cod_licitacao = licitacao.cod_licitacao + AND cod_modalidade = licitacao.cod_modalidade + AND exercicio = licitacao.exercicio + ) AS num_processo_licitatorio + FROM licitacao.licitacao + ) AS licitacao ON licitacao.cod_licitacao = cotacao_licitacao.cod_licitacao AND licitacao.cod_modalidade = cotacao_licitacao.cod_modalidade AND licitacao.cod_entidade = cotacao_licitacao.cod_entidade AND licitacao.exercicio = cotacao_licitacao.exercicio_licitacao - + LEFT JOIN licitacao.licitacao_anulada ON licitacao.cod_licitacao = licitacao_anulada.cod_licitacao AND licitacao.cod_modalidade = licitacao_anulada.cod_modalidade @@ -871,7 +930,7 @@ class TTCEMGAberturaLicitacao extends Persistente LEFT JOIN licitacao.edital_anulado ON edital.num_edital=edital_anulado.num_edital AND edital.exercicio =edital_anulado.exercicio - + INNER JOIN compras.mapa ON mapa.exercicio = licitacao.exercicio_mapa AND mapa.cod_mapa = licitacao.cod_mapa @@ -900,16 +959,16 @@ class TTCEMGAberturaLicitacao extends Persistente INNER JOIN compras.mapa_cotacao ON mapa_cotacao.exercicio_mapa = mapa.exercicio - AND mapa_cotacao.cod_mapa = mapa.cod_mapa - + AND mapa_cotacao.cod_mapa = mapa.cod_mapa + INNER JOIN compras.cotacao ON cotacao.exercicio = mapa_cotacao.exercicio_cotacao AND cotacao.cod_cotacao = mapa_cotacao.cod_cotacao - + INNER JOIN compras.julgamento ON julgamento.exercicio = cotacao.exercicio AND julgamento.cod_cotacao = cotacao.cod_cotacao - + INNER JOIN compras.julgamento_item ON julgamento_item.exercicio = julgamento.exercicio AND julgamento_item.cod_cotacao = julgamento.cod_cotacao @@ -917,7 +976,7 @@ class TTCEMGAberturaLicitacao extends Persistente AND julgamento_item.lote = homologacao.lote AND julgamento_item.cod_item = homologacao.cod_item AND julgamento_item.ordem = 1 - + INNER JOIN compras.cotacao_fornecedor_item ON cotacao_fornecedor_item.exercicio = julgamento_item.exercicio AND cotacao_fornecedor_item.cod_cotacao = julgamento_item.cod_cotacao @@ -925,43 +984,29 @@ class TTCEMGAberturaLicitacao extends Persistente AND cotacao_fornecedor_item.cgm_fornecedor = julgamento_item.cgm_fornecedor AND cotacao_fornecedor_item.lote = julgamento_item.lote - INNER JOIN (SELECT * - FROM tcemg.fn_exercicio_numero_licitacao ('".$this->getDado('exercicio')."', '".$this->getDado('entidades')."') - VALUES ( cod_licitacao INTEGER - , cod_modalidade INTEGER - , cod_entidade INTEGER - , exercicio CHAR(4) - , exercicio_licitacao VARCHAR - , num_licitacao TEXT ) - ) AS config_licitacao - ON config_licitacao.cod_entidade = licitacao.cod_entidade - AND config_licitacao.cod_licitacao = licitacao.cod_licitacao - AND config_licitacao.cod_modalidade = licitacao.cod_modalidade - AND config_licitacao.exercicio = licitacao.exercicio + WHERE TO_DATE(TO_CHAR(homologacao.timestamp,'dd/mm/yyyy'), 'dd/mm/yyyy') BETWEEN TO_DATE('01/" . $this->getDado('mes') . "/" . $this->getDado('exercicio') . "', 'dd/mm/yyyy') + AND last_day(TO_DATE('" . $this->getDado('exercicio') . "' || '-' || '".$this->getDado('mes') . "' || '-' || '01','yyyy-mm-dd')) + AND licitacao.cod_entidade IN (" . $this->getDado('entidades') . ") + AND licitacao.cod_modalidade NOT IN (8,9) + AND homologacao_anulada.num_homologacao IS NULL + AND licitacao_anulada.cod_licitacao IS NULL + AND homologacao.homologado IS TRUE + AND edital_anulado.num_edital IS NULL + + GROUP BY tipo_registro + , cod_orgao_resp + , cod_unidade_resp + , licitacao.exercicio_licitacao + , licitacao.num_processo_licitatorio + , num_lote + , dt_cotacao + , homologacao.cod_item + , licitacao.cod_tipo_objeto + , cotacao_fornecedor_item.vl_cotacao "; - WHERE TO_DATE(TO_CHAR(homologacao.timestamp,'dd/mm/yyyy'), 'dd/mm/yyyy') BETWEEN TO_DATE('01/" . $this->getDado('mes') . "/" . $this->getDado('exercicio') . "', 'dd/mm/yyyy') - AND last_day(TO_DATE('" . $this->getDado('exercicio') . "' || '-' || '".$this->getDado('mes') . "' || '-' || '01','yyyy-mm-dd')) - AND licitacao.cod_entidade IN (" . $this->getDado('entidades') . ") - AND licitacao.cod_modalidade NOT IN (8,9) - AND homologacao_anulada.num_homologacao IS NULL - AND licitacao_anulada.cod_licitacao IS NULL - AND homologacao.homologado IS TRUE - AND edital_anulado.num_edital IS NULL - - GROUP BY tipo_registro - , cod_orgao_resp - , cod_unidade_resp - , config_licitacao.exercicio_licitacao - , num_processo_licitatorio - , num_lote - , dt_cotacao - , homologacao.cod_item - , licitacao.cod_tipo_objeto - , cotacao_fornecedor_item.vl_cotacao - "; return $stSql; } - + public function recuperaDetalhamento15(&$rsRecordSet,$stFiltro="",$stOrder="",$boTransacao="") { return $this->executaRecupera("montaRecuperaDetalhamento15",$rsRecordSet,$stFiltro,$stOrder,$boTransacao); @@ -1076,197 +1121,194 @@ class TTCEMGAberturaLicitacao extends Persistente public function montaRecuperaDetalhamento16() { $stSql = " - SELECT - 16 AS tipo_registro - , LPAD(configuracao_entidade.valor,2,'0') AS cod_orgao_resp - --, LPAD(LPAD(despesa.num_orgao::VARCHAR, 2, '0') || LPAD(despesa.num_unidade::VARCHAR, 2, '0'),5,'0') AS cod_unidade_resp - , LPAD(LPAD(licitacao.num_orgao::VARCHAR, 2, '0') || LPAD(licitacao.num_unidade::VARCHAR, 2, '0'),5,'0') AS cod_unidade_resp - , config_licitacao.exercicio_licitacao - , config_licitacao.num_licitacao AS num_processo_licitatorio - , LPAD(orgao_despesa.valor::varchar,2,'0') AS cod_orgao - , LPAD(LPAD(despesa.num_orgao::VARCHAR, 2, '0') || LPAD(despesa.num_unidade::VARCHAR, 2, '0'),5,'0') AS cod_unidade - , despesa.cod_funcao AS cod_funcao - , despesa.cod_subfuncao AS cod_subfuncao - , ppa.programa.num_programa AS cod_programa - , ppa.acao.num_acao AS id_acao - , '' AS id_subacao - , (LPAD(''||REPLACE(conta_despesa.cod_estrutural, '.', ''),6, '')) AS natureza_despesa - , COALESCE(recurso.cod_fonte, '100') AS cod_font_recursos - , SUM(mapa_item_dotacao.vl_dotacao) AS vl_recurso - + SELECT 16 AS tipo_registro + , LPAD(configuracao_entidade.valor,2,'0') AS cod_orgao_resp + , LPAD(LPAD(licitacao.num_orgao::VARCHAR, 2, '0') || LPAD(licitacao.num_unidade::VARCHAR, 2, '0'),5,'0') AS cod_unidade_resp + , config_licitacao.exercicio_licitacao + , config_licitacao.num_licitacao AS num_processo_licitatorio + , LPAD(orgao_despesa.valor::varchar,2,'0') AS cod_orgao + , LPAD(LPAD(despesa.num_orgao::VARCHAR, 2, '0') || LPAD(despesa.num_unidade::VARCHAR, 2, '0'),5,'0') AS cod_unidade + , despesa.cod_funcao AS cod_funcao + , despesa.cod_subfuncao AS cod_subfuncao + , ppa.programa.num_programa AS cod_programa + , ppa.acao.num_acao AS id_acao + , '' AS id_subacao + , (LPAD(''||REPLACE(conta_despesa.cod_estrutural, '.', ''),6, '')) AS natureza_despesa + , COALESCE(recurso.cod_fonte, '100') AS cod_font_recursos + , SUM(mapa_item_dotacao.vl_dotacao) AS vl_recurso + FROM licitacao.licitacao - - JOIN sw_processo + + INNER JOIN sw_processo ON sw_processo.cod_processo = licitacao.cod_processo AND sw_processo.ano_exercicio = licitacao.exercicio_processo - - JOIN licitacao.criterio_julgamento + + INNER JOIN licitacao.criterio_julgamento ON criterio_julgamento.cod_criterio = licitacao.cod_criterio - - JOIN licitacao.edital + + INNER JOIN licitacao.edital ON edital.cod_licitacao = licitacao.cod_licitacao AND edital.cod_modalidade = licitacao.cod_modalidade AND edital.cod_entidade = licitacao.cod_entidade AND edital.exercicio_licitacao = licitacao.exercicio - AND ( - SELECT edital_anulado.num_edital FROM licitacao.edital_anulado - WHERE edital_anulado.num_edital=edital.num_edital - AND edital_anulado.exercicio=edital.exercicio - ) IS NULL - - JOIN compras.objeto + + LEFT JOIN licitacao.edital_anulado + ON edital_anulado.num_edital=edital.num_edital + AND edital_anulado.exercicio=edital.exercicio + + INNER JOIN compras.objeto ON objeto.cod_objeto = licitacao.cod_objeto - - JOIN compras.tipo_objeto + + INNER JOIN compras.tipo_objeto ON tipo_objeto.cod_tipo_objeto = licitacao.cod_tipo_objeto - - JOIN compras.modalidade + + INNER JOIN compras.modalidade ON modalidade.cod_modalidade = licitacao.cod_modalidade - - JOIN compras.mapa + + INNER JOIN compras.mapa ON mapa.exercicio = licitacao.exercicio_mapa AND mapa.cod_mapa = licitacao.cod_mapa - - JOIN compras.tipo_licitacao + + INNER JOIN compras.tipo_licitacao ON tipo_licitacao.cod_tipo_licitacao = licitacao.cod_tipo_licitacao - - JOIN compras.mapa_solicitacao + + INNER JOIN compras.mapa_solicitacao ON mapa_solicitacao.exercicio = mapa.exercicio AND mapa_solicitacao.cod_mapa = mapa.cod_mapa - - JOIN compras.mapa_cotacao + + INNER JOIN compras.mapa_cotacao ON mapa_cotacao.exercicio_mapa = mapa.exercicio AND mapa_cotacao.cod_mapa = mapa.cod_mapa - - JOIN compras.cotacao + + INNER JOIN compras.cotacao ON cotacao.exercicio = mapa_cotacao.exercicio_cotacao AND cotacao.cod_cotacao = mapa_cotacao.cod_cotacao - - JOIN compras.julgamento + + INNER JOIN compras.julgamento ON julgamento.exercicio = cotacao.exercicio AND julgamento.cod_cotacao = cotacao.cod_cotacao - - JOIN compras.julgamento_item + + INNER JOIN compras.julgamento_item ON julgamento_item.exercicio = julgamento.exercicio AND julgamento_item.cod_cotacao = julgamento.cod_cotacao - - JOIN compras.cotacao_fornecedor_item + + INNER JOIN compras.cotacao_fornecedor_item ON cotacao_fornecedor_item.exercicio = julgamento_item.exercicio AND cotacao_fornecedor_item.cod_cotacao = julgamento_item.cod_cotacao AND cotacao_fornecedor_item.cod_item = julgamento_item.cod_item AND cotacao_fornecedor_item.cgm_fornecedor = julgamento_item.cgm_fornecedor AND cotacao_fornecedor_item.lote = julgamento_item.lote - - JOIN compras.fornecedor + + INNER JOIN compras.fornecedor ON fornecedor.cgm_fornecedor = cotacao_fornecedor_item.cgm_fornecedor - - JOIN licitacao.homologacao + + INNER JOIN licitacao.homologacao ON homologacao.cod_licitacao=licitacao.cod_licitacao AND homologacao.cod_modalidade=licitacao.cod_modalidade AND homologacao.cod_entidade=licitacao.cod_entidade AND homologacao.exercicio_licitacao=licitacao.exercicio AND homologacao.cod_item=julgamento_item.cod_item - AND ( - SELECT homologacao_anulada.num_homologacao FROM licitacao.homologacao_anulada - WHERE homologacao_anulada.cod_licitacao=licitacao.cod_licitacao - AND homologacao_anulada.cod_modalidade=licitacao.cod_modalidade - AND homologacao_anulada.cod_entidade=licitacao.cod_entidade - AND homologacao_anulada.exercicio_licitacao=licitacao.exercicio - AND homologacao.num_homologacao=homologacao_anulada.num_homologacao - AND homologacao.cod_item=homologacao_anulada.cod_item - ) IS NULL - - JOIN compras.solicitacao_homologada + + LEFT JOIN licitacao.homologacao_anulada + ON homologacao_anulada.cod_licitacao=homologacao.cod_licitacao + AND homologacao_anulada.cod_modalidade=homologacao.cod_modalidade + AND homologacao_anulada.cod_entidade=homologacao.cod_entidade + AND homologacao_anulada.exercicio_licitacao=homologacao.exercicio_licitacao + AND homologacao_anulada.num_homologacao=homologacao.num_homologacao + AND homologacao_anulada.cod_item=homologacao.cod_item + + INNER JOIN compras.solicitacao_homologada ON solicitacao_homologada.exercicio=mapa_solicitacao.exercicio_solicitacao AND solicitacao_homologada.cod_entidade=mapa_solicitacao.cod_entidade AND solicitacao_homologada.cod_solicitacao=mapa_solicitacao.cod_solicitacao - - JOIN compras.solicitacao_homologada_reserva + + INNER JOIN compras.solicitacao_homologada_reserva ON solicitacao_homologada_reserva.exercicio=solicitacao_homologada.exercicio AND solicitacao_homologada_reserva.cod_entidade=solicitacao_homologada.cod_entidade AND solicitacao_homologada_reserva.cod_solicitacao=solicitacao_homologada.cod_solicitacao AND solicitacao_homologada_reserva.cod_item=homologacao.cod_item - - JOIN orcamento.despesa + + INNER JOIN orcamento.despesa ON despesa.exercicio = solicitacao_homologada_reserva.exercicio AND despesa.cod_despesa = solicitacao_homologada_reserva.cod_despesa - - JOIN orcamento.conta_despesa + + INNER JOIN orcamento.conta_despesa ON conta_despesa.exercicio = despesa.exercicio AND conta_despesa.cod_conta = despesa.cod_conta - JOIN compras.mapa_item_dotacao + INNER JOIN compras.mapa_item_dotacao ON mapa_item_dotacao.exercicio=solicitacao_homologada.exercicio AND mapa_item_dotacao.cod_entidade=solicitacao_homologada.cod_entidade AND mapa_item_dotacao.cod_solicitacao=solicitacao_homologada.cod_solicitacao AND mapa_item_dotacao.cod_item=homologacao.cod_item AND mapa_item_dotacao.cod_mapa=mapa.cod_mapa AND mapa_item_dotacao.cod_despesa=despesa.cod_despesa - - JOIN orcamento.programa + + INNER JOIN orcamento.programa ON programa.cod_programa = despesa.cod_programa AND programa.exercicio = despesa.exercicio - - JOIN orcamento.programa_ppa_programa + + INNER JOIN orcamento.programa_ppa_programa ON programa_ppa_programa.cod_programa = programa.cod_programa AND programa_ppa_programa.exercicio = programa.exercicio - - JOIN ppa.programa + + INNER JOIN ppa.programa ON ppa.programa.cod_programa = programa_ppa_programa.cod_programa - JOIN orcamento.pao + + INNER JOIN orcamento.pao ON pao.num_pao = despesa.num_pao AND pao.exercicio = despesa.exercicio - JOIN orcamento.pao_ppa_acao + + INNER JOIN orcamento.pao_ppa_acao ON pao_ppa_acao.num_pao = pao.num_pao AND pao_ppa_acao.exercicio = pao.exercicio - - JOIN ppa.acao + + INNER JOIN ppa.acao ON acao.cod_acao = pao_ppa_acao.cod_acao - + LEFT JOIN orcamento.recurso ON recurso.cod_recurso = despesa.cod_recurso AND recurso.exercicio = despesa.exercicio - - JOIN administracao.configuracao_entidade + + INNER JOIN administracao.configuracao_entidade ON configuracao_entidade.parametro = 'tcemg_codigo_orgao_entidade_sicom' AND configuracao_entidade.cod_modulo = 55 AND configuracao_entidade.exercicio = licitacao.exercicio AND configuracao_entidade.cod_entidade = licitacao.cod_entidade - - JOIN administracao.configuracao_entidade AS orgao_despesa + + INNER JOIN administracao.configuracao_entidade AS orgao_despesa ON orgao_despesa.parametro = 'tcemg_codigo_orgao_entidade_sicom' AND orgao_despesa.cod_modulo = 55 AND orgao_despesa.exercicio = despesa.exercicio AND orgao_despesa.cod_entidade = despesa.cod_entidade - - JOIN sw_cgm AS responsavel + + INNER JOIN sw_cgm AS responsavel ON responsavel.numcgm = edital.responsavel_juridico - - JOIN ( SELECT num_documento, numcgm, tipo_documento + + INNER JOIN ( SELECT num_documento, numcgm, tipo_documento FROM ( SELECT cpf AS num_documento, numcgm, 1 AS tipo_documento FROM sw_cgm_pessoa_fisica - UNION - SELECT cnpj AS num_documento, numcgm, 2 AS tipo_documento FROM sw_cgm_pessoa_juridica ) AS tabela GROUP BY numcgm, num_documento, tipo_documento ) AS documento_pessoa ON documento_pessoa.numcgm = responsavel.numcgm - LEFT JOIN licitacao.contrato_licitacao - ON contrato_licitacao.cod_licitacao=licitacao.cod_licitacao - AND contrato_licitacao.cod_modalidade=licitacao.cod_modalidade - AND contrato_licitacao.cod_entidade=licitacao.cod_entidade - AND contrato_licitacao.exercicio_licitacao=licitacao.exercicio - - LEFT JOIN licitacao.contrato - ON contrato.num_contrato=contrato_licitacao.num_contrato - AND contrato.cod_entidade=contrato_licitacao.cod_entidade - AND contrato.exercicio=contrato_licitacao.exercicio - - JOIN ( + + LEFT JOIN licitacao.contrato_licitacao + ON contrato_licitacao.cod_licitacao=licitacao.cod_licitacao + AND contrato_licitacao.cod_modalidade=licitacao.cod_modalidade + AND contrato_licitacao.cod_entidade=licitacao.cod_entidade + AND contrato_licitacao.exercicio_licitacao=licitacao.exercicio + + LEFT JOIN licitacao.contrato + ON contrato.num_contrato=contrato_licitacao.num_contrato + AND contrato.cod_entidade=contrato_licitacao.cod_entidade + AND contrato.exercicio=contrato_licitacao.exercicio + + INNER JOIN ( SELECT * FROM tcemg.fn_exercicio_numero_licitacao ('".$this->getDado('exercicio')."', '".$this->getDado('entidades')."') VALUES (cod_licitacao INTEGER ,cod_modalidade INTEGER @@ -1278,37 +1320,38 @@ class TTCEMGAberturaLicitacao extends Persistente ON config_licitacao.cod_entidade = licitacao.cod_entidade AND config_licitacao.cod_licitacao = licitacao.cod_licitacao AND config_licitacao.cod_modalidade = licitacao.cod_modalidade - AND config_licitacao.exercicio = licitacao.exercicio - - WHERE TO_DATE(TO_CHAR(homologacao.timestamp,'dd/mm/yyyy'), 'dd/mm/yyyy') BETWEEN TO_DATE('01/" . $this->getDado('mes') . "/" . $this->getDado('exercicio') . "', 'dd/mm/yyyy') - AND last_day(TO_DATE('" . $this->getDado('exercicio') . "' || '-' || '".$this->getDado('mes') . "' || '-' || '01','yyyy-mm-dd')) - AND licitacao.cod_entidade IN (" . $this->getDado('entidades') . ") - AND licitacao.cod_modalidade NOT IN (8,9) - AND NOT EXISTS( SELECT 1 - FROM licitacao.licitacao_anulada - WHERE licitacao_anulada.cod_licitacao = licitacao.cod_licitacao - AND licitacao_anulada.cod_modalidade = licitacao.cod_modalidade + AND config_licitacao.exercicio = licitacao.exercicio + + WHERE TO_DATE(TO_CHAR(homologacao.timestamp,'dd/mm/yyyy'), 'dd/mm/yyyy') BETWEEN TO_DATE('01/" . $this->getDado('mes') . "/" . $this->getDado('exercicio') . "', 'dd/mm/yyyy') + AND last_day(TO_DATE('" . $this->getDado('exercicio') . "' || '-' || '".$this->getDado('mes') . "' || '-' || '01','yyyy-mm-dd')) + AND homologacao_anulada.cod_licitacao IS NULL + AND edital_anulado.num_edital IS NULL + AND licitacao.cod_entidade IN (" . $this->getDado('entidades') . ") + AND licitacao.cod_modalidade NOT IN (8,9) + AND NOT EXISTS( SELECT 1 + FROM licitacao.licitacao_anulada + WHERE licitacao_anulada.cod_licitacao = licitacao.cod_licitacao + AND licitacao_anulada.cod_modalidade = licitacao.cod_modalidade AND licitacao_anulada.cod_entidade = licitacao.cod_entidade AND licitacao_anulada.exercicio = licitacao.exercicio ) - - GROUP BY tipo_registro - , cod_orgao_resp - , cod_unidade_resp - , config_licitacao.exercicio_licitacao - , num_processo_licitatorio - , cod_orgao - , cod_unidade - , cod_funcao - , cod_subfuncao - , ppa.programa.num_programa - , id_acao - , natureza_despesa - , cod_font_recursos - "; + + GROUP BY tipo_registro + , cod_orgao_resp + , cod_unidade_resp + , config_licitacao.exercicio_licitacao + , num_processo_licitatorio + , cod_orgao + , cod_unidade + , cod_funcao + , cod_subfuncao + , ppa.programa.num_programa + , id_acao + , natureza_despesa + , cod_font_recursos "; + return $stSql; } - + public function __destruct(){} - } \ No newline at end of file diff --git a/gestaoPrestacaoContas/fontes/PHP/TCEMG/classes/mapeamento/2015/TTCEMGCAIXA.class.php b/gestaoPrestacaoContas/fontes/PHP/TCEMG/classes/mapeamento/2015/TTCEMGCAIXA.class.php index bf10a8b..cd30450 100644 --- a/gestaoPrestacaoContas/fontes/PHP/TCEMG/classes/mapeamento/2015/TTCEMGCAIXA.class.php +++ b/gestaoPrestacaoContas/fontes/PHP/TCEMG/classes/mapeamento/2015/TTCEMGCAIXA.class.php @@ -27,7 +27,7 @@ * @category Urbem * @package TCE/MG * @author Carolina Schwaab Marcal - * $Id: TTCEMGCAIXA.class.php 63511 2015-09-04 17:49:49Z michel $ + * $Id: TTCEMGCAIXA.class.php 63912 2015-11-05 18:10:02Z lisiane $ */ @@ -316,9 +316,8 @@ class TTCEMGCAIXA extends Persistente public function montaRecuperaCAIXA12() { $stSql = " SELECT tipo_registro - , exercicio||tipo_movimentacao::VARCHAR||tipo_entr_saida as cod_reduzido + , exercicio||tipo_movimentacao::VARCHAR||tipo_entr_saida||cod_ctb_transf as cod_reduzido , cod_fonte_caixa - -- , tabela.tipo , tipo_movimentacao , tipo_entr_saida , descr_movimentacao @@ -352,21 +351,22 @@ class TTCEMGCAIXA extends Persistente , replace(plano_conta.cod_estrutural,'.','') AS cod_estrutural , conta_debito.cod_entidade AS cod_orgao , plano_analitica.exercicio - , CASE WHEN conta_debito.tipo_valor = 'D' AND lote.tipo = 'T' AND transferencia.cod_tipo = 5 THEN - CASE WHEN transferencia.cod_plano_credito::TEXT is null THEN ' ' - ELSE transferencia.cod_plano_credito::TEXT - END - WHEN lote.tipo = 'T' AND transferencia.cod_tipo = 5 AND conta_debito.tipo_valor = 'C' then - CASE WHEN transferencia.cod_plano_debito::TEXT is null THEN ' ' - ELSE transferencia.cod_plano_debito::TEXT - END - ELSE ' ' - END AS cod_ctb_transf - , CASE WHEN (conta_debito.tipo_valor = 'D' AND lote.tipo = 'T' AND transferencia.cod_tipo = 5 ) - OR (lote.tipo = 'T' AND transferencia.cod_tipo = 5 AND conta_debito.tipo_valor = 'C') THEN - plano_recurso.cod_recurso::VARCHAR - ELSE ' ' - END as cod_fonte_ctb_transf + , CASE WHEN (lote.tipo = 'T' AND transferencia.cod_tipo = 5) OR (lote.tipo = 'T' AND transferencia.cod_tipo = 3) OR (lote.tipo = 'T' AND transferencia.cod_tipo = 4) THEN + cod_ctb_transferencia.cod_ctb_anterior::VARCHAR + ELSE ' ' + END AS cod_ctb_transf + , CASE WHEN (lote.tipo = 'T' AND transferencia.cod_tipo = 5) OR (lote.tipo = 'T' AND transferencia.cod_tipo = 3) OR (lote.tipo = 'T' AND transferencia.cod_tipo = 4) THEN + ( SELECT plano_recurso.cod_recurso + FROM contabilidade.plano_conta + INNER JOIN contabilidade.plano_analitica + ON plano_conta.cod_conta = plano_analitica.cod_conta + AND plano_conta.exercicio = plano_analitica.exercicio + INNER JOIN contabilidade.plano_recurso + ON plano_recurso.cod_plano = plano_analitica.cod_plano + AND plano_recurso.exercicio = plano_analitica.exercicio + WHERE plano_analitica.cod_plano = transferencia.cod_plano_credito + AND plano_analitica.exercicio = transferencia.exercicio + ) END::VARCHAR AS cod_fonte_ctb_transf FROM contabilidade.conta_debito INNER JOIN contabilidade.valor_lancamento ON valor_lancamento.cod_lote = conta_debito.cod_lote @@ -426,7 +426,47 @@ class TTCEMGCAIXA extends Persistente AND transferencia_estornada.cod_entidade = lote.cod_entidade AND transferencia_estornada.tipo = lote.tipo AND transferencia_estornada.cod_lote_estorno = lote.cod_lote - + + LEFT JOIN ( SELECT conta_debito.cod_lote + , conta_debito.tipo + , conta_debito.exercicio + , conta_debito.cod_entidade + , CASE WHEN (conta_bancaria.cod_ctb_anterior is null) THEN transferencia.cod_plano_credito + Else conta_bancaria.cod_ctb_anterior + END AS cod_ctb_anterior + , transferencia.cod_plano_credito + , transferencia.cod_plano_debito + , conta_debito.sequencia + FROM contabilidade.conta_debito + INNER JOIN contabilidade.lote AS lo + ON conta_debito.cod_lote = lo.cod_lote + AND conta_debito.tipo = lo.tipo + AND conta_debito.exercicio = lo.exercicio + AND conta_debito.cod_entidade = lo.cod_entidade + INNER JOIN tesouraria.transferencia + ON transferencia.cod_plano_debito = conta_debito.cod_plano + AND lo.cod_lote = transferencia.cod_lote + AND transferencia.cod_entidade = lo.cod_entidade + AND transferencia.tipo = 'T' + AND transferencia.exercicio = conta_debito.exercicio + INNER JOIN contabilidade.plano_analitica + ON plano_analitica.cod_plano = transferencia.cod_plano_credito + AND plano_analitica.natureza_saldo = 'D' + AND plano_analitica.exercicio = conta_debito.exercicio + LEFT JOIN tcemg.conta_bancaria + ON conta_bancaria.cod_conta = plano_analitica.cod_conta + AND conta_bancaria.exercicio = plano_analitica.exercicio + WHERE conta_debito.exercicio = '".$this->getDado('exercicio')."' + AND conta_debito.cod_entidade IN (".$this->getDado('entidades').") + AND lo.dt_lote BETWEEN TO_DATE('".$this->getDado('dtInicio')."','dd/mm/yyyy') AND TO_DATE('".$this->getDado('dtFim')."','dd/mm/yyyy') + AND conta_debito.tipo = 'T' + ) AS cod_ctb_transferencia + ON cod_ctb_transferencia.exercicio = conta_debito.exercicio + AND cod_ctb_transferencia.sequencia = conta_debito.sequencia + AND cod_ctb_transferencia.cod_lote = conta_debito.cod_lote + AND cod_ctb_transferencia.tipo = conta_debito.tipo + AND cod_ctb_transferencia.cod_plano_debito = conta_debito.cod_plano + WHERE conta_debito.exercicio = '".$this->getDado('exercicio')."' AND conta_debito.cod_entidade IN (".$this->getDado('entidades').") AND plano_conta.cod_estrutural like '1.1.1.1.1.01%' @@ -468,21 +508,22 @@ class TTCEMGCAIXA extends Persistente , replace(plano_conta.cod_estrutural,'.','') AS cod_estrutural , conta_credito.cod_entidade AS cod_orgao , plano_analitica.exercicio - , CASE WHEN conta_credito.tipo_valor = 'D' AND lote.tipo = 'T' AND transferencia.cod_tipo = 5 THEN - CASE WHEN transferencia.cod_plano_credito::TEXT is null THEN ' ' - ELSE transferencia.cod_plano_credito::TEXT - END - WHEN lote.tipo = 'T' AND transferencia.cod_tipo = 5 AND conta_credito.tipo_valor = 'C' THEN - CASE WHEN transferencia.cod_plano_debito::TEXT is null THEN ' ' - ELSE transferencia.cod_plano_debito::TEXT - END - ELSE ' ' - END AS cod_ctb_transf - , CASE WHEN (conta_credito.tipo_valor = 'D' AND lote.tipo = 'T' AND transferencia.cod_tipo = 5 ) - OR (lote.tipo = 'T' AND transferencia.cod_tipo = 5 AND conta_credito.tipo_valor = 'C') THEN - plano_recurso.cod_recurso::VARCHAR - ELSE ' ' - END as cod_fonte_ctb_transf + , CASE WHEN (lote.tipo = 'T' AND transferencia.cod_tipo = 5) OR (lote.tipo = 'T' AND transferencia.cod_tipo = 3) OR (lote.tipo = 'T' AND transferencia.cod_tipo = 4) THEN + cod_ctb_transferencia.cod_ctb_anterior::VARCHAR + ELSE ' ' + END AS cod_ctb_transf + , CASE WHEN (lote.tipo = 'T' AND transferencia.cod_tipo = 5) OR (lote.tipo = 'T' AND transferencia.cod_tipo = 3) OR (lote.tipo = 'T' AND transferencia.cod_tipo = 4) THEN + ( SELECT plano_recurso.cod_recurso + FROM contabilidade.plano_conta + INNER JOIN contabilidade.plano_analitica + ON plano_conta.cod_conta = plano_analitica.cod_conta + AND plano_conta.exercicio = plano_analitica.exercicio + INNER JOIN contabilidade.plano_recurso + ON plano_recurso.cod_plano = plano_analitica.cod_plano + AND plano_recurso.exercicio = plano_analitica.exercicio + WHERE plano_analitica.cod_plano = transferencia.cod_plano_credito + AND plano_analitica.exercicio = transferencia.exercicio + ) END::VARCHAR AS cod_fonte_ctb_transf FROM contabilidade.conta_credito INNER JOIN contabilidade.valor_lancamento ON valor_lancamento.cod_lote = conta_credito.cod_lote @@ -541,7 +582,46 @@ class TTCEMGCAIXA extends Persistente AND lancamento_receita.cod_lote = lancamento.cod_lote AND lancamento_receita.tipo = lancamento.tipo AND lancamento_receita.cod_entidade = lancamento.cod_entidade - + LEFT JOIN ( SELECT conta_credito.cod_lote + , conta_credito.tipo + , conta_credito.exercicio + , conta_credito.cod_entidade + , CASE WHEN (conta_bancaria.cod_ctb_anterior is null) THEN transferencia.cod_plano_debito + Else conta_bancaria.cod_ctb_anterior + END AS cod_ctb_anterior + , transferencia.cod_plano_credito + , transferencia.cod_plano_debito + , conta_credito.sequencia + FROM contabilidade.conta_credito + INNER JOIN contabilidade.lote AS lo + ON conta_credito.cod_lote = lo.cod_lote + AND conta_credito.tipo = lo.tipo + AND conta_credito.exercicio = lo.exercicio + AND conta_credito.cod_entidade = lo.cod_entidade + INNER JOIN tesouraria.transferencia + ON transferencia.cod_plano_credito = conta_credito.cod_plano + AND lo.cod_lote = transferencia.cod_lote + AND transferencia.cod_entidade = lo.cod_entidade + AND transferencia.tipo = 'T' + AND transferencia.exercicio = conta_credito.exercicio + INNER JOIN contabilidade.plano_analitica + ON plano_analitica.cod_plano = transferencia.cod_plano_debito + AND plano_analitica.natureza_saldo = 'D' + AND plano_analitica.exercicio = conta_credito.exercicio + LEFT JOIN tcemg.conta_bancaria + ON conta_bancaria.cod_conta = plano_analitica.cod_conta + AND conta_bancaria.exercicio = plano_analitica.exercicio + WHERE conta_credito.exercicio = '".$this->getDado('exercicio')."' + AND conta_credito.cod_entidade IN (".$this->getDado('entidades').") + AND lo.dt_lote BETWEEN TO_DATE('".$this->getDado('dtInicio')."','dd/mm/yyyy') AND TO_DATE('".$this->getDado('dtFim')."','dd/mm/yyyy') + AND conta_credito.tipo = 'T' + ) AS cod_ctb_transferencia + ON cod_ctb_transferencia.exercicio = conta_credito.exercicio + AND cod_ctb_transferencia.sequencia = conta_credito.sequencia + AND cod_ctb_transferencia.cod_lote = conta_credito.cod_lote + AND cod_ctb_transferencia.tipo = conta_credito.tipo + AND cod_ctb_transferencia.cod_plano_credito = conta_credito.cod_plano + WHERE conta_credito.exercicio = '".$this->getDado('exercicio')."' AND conta_credito.cod_entidade IN (".$this->getDado('entidades').") AND plano_conta.cod_estrutural like '1.1.1.1.1.01%' diff --git a/gestaoPrestacaoContas/fontes/PHP/TCEMG/classes/mapeamento/2015/TTCEMGCTB.class.php b/gestaoPrestacaoContas/fontes/PHP/TCEMG/classes/mapeamento/2015/TTCEMGCTB.class.php index 1831b58..0dec6de 100644 --- a/gestaoPrestacaoContas/fontes/PHP/TCEMG/classes/mapeamento/2015/TTCEMGCTB.class.php +++ b/gestaoPrestacaoContas/fontes/PHP/TCEMG/classes/mapeamento/2015/TTCEMGCTB.class.php @@ -27,7 +27,7 @@ * @category Urbem * @package TCE/MG * @author Carolina Schwaab Marcal - * $Id: TTCEMGCTB.class.php 63533 2015-09-09 17:13:20Z lisiane $ + * $Id: TTCEMGCTB.class.php 63927 2015-11-09 16:25:18Z lisiane $ */ @@ -145,7 +145,6 @@ class TTCEMGCTB extends Persistente , c.cod_recurso as cod_fonte_recursos , SUM(c.vl_saldo_inicial_fonte) as vl_saldo_inicial_fonte , SUM(c.vl_saldo_final_fonte) as vl_saldo_final_fonte - -- , c.movimentacao FROM (SELECT '20'::VARCHAR AS tipo_registro , cod_ctb , tipo_conta||regexp_replace((conta), '[-|,|.|x]', '', 'gi') AS cod_ctb_view @@ -183,23 +182,18 @@ class TTCEMGCTB extends Persistente ,cod_recurso INTEGER ,nom_recurso VARCHAR ) - INNER JOIN contabilidade.plano_analitica ON saldo_inicial.cod_plano = plano_analitica.cod_plano AND saldo_inicial.exercicio = plano_analitica.exercicio - INNER JOIN contabilidade.plano_banco ON plano_analitica.cod_plano = plano_banco.cod_plano AND plano_analitica.exercicio = plano_banco.exercicio - LEFT JOIN tcemg.convenio_plano_banco ON convenio_plano_banco.cod_plano = plano_banco.cod_plano AND convenio_plano_banco.exercicio = plano_banco.exercicio - INNER JOIN contabilidade.plano_recurso ON plano_analitica.cod_plano = plano_recurso.cod_plano AND plano_analitica.exercicio = plano_recurso.exercicio - LEFT JOIN (SELECT conta_debito_credito.cod_plano , conta_debito_credito.exercicio , SUM(vl.vl_lancamento) AS vl_lancamento @@ -227,7 +221,6 @@ class TTCEMGCTB extends Persistente WHERE conta_credito.exercicio = '".$this->getDado('exercicio')."' AND conta_credito.cod_entidade IN (".$this->getDado('entidades').") ) AS conta_debito_credito - INNER JOIN contabilidade.valor_lancamento AS vl ON conta_debito_credito.cod_lote = vl.cod_lote AND conta_debito_credito.tipo = vl.tipo @@ -235,36 +228,30 @@ class TTCEMGCTB extends Persistente AND conta_debito_credito.exercicio = vl.exercicio AND conta_debito_credito.tipo_valor = vl.tipo_valor AND conta_debito_credito.cod_entidade = vl.cod_entidade - INNER JOIN contabilidade.lancamento ON lancamento.exercicio = vl.exercicio AND lancamento.cod_entidade = vl.cod_entidade AND lancamento.tipo = vl.tipo AND lancamento.cod_lote = vl.cod_lote AND lancamento.sequencia = vl.sequencia - INNER JOIN contabilidade.lancamento_receita ON lancamento_receita.exercicio = lancamento.exercicio AND lancamento_receita.cod_entidade = lancamento.cod_entidade AND lancamento_receita.tipo = lancamento.tipo AND lancamento_receita.cod_lote = lancamento.cod_lote AND lancamento_receita.sequencia = lancamento.sequencia - INNER JOIN contabilidade.lote AS lo ON vl.cod_lote = lo.cod_lote AND vl.exercicio = lo.exercicio AND vl.cod_entidade = lo.cod_entidade AND vl.tipo = lo.tipo - WHERE lo.dt_lote BETWEEN TO_DATE('".$this->getDado('dtInicio')."','dd/mm/yyyy') AND TO_DATE('".$this->getDado('dtFim')."','dd/mm/yyyy') AND lo.exercicio = '".$this->getDado('exercicio')."' - GROUP BY conta_debito_credito.cod_plano , conta_debito_credito.exercicio ) AS conta_debito_credito ON plano_analitica.cod_plano = conta_debito_credito.cod_plano AND plano_analitica.exercicio = conta_debito_credito.exercicio - INNER JOIN tcemg.contasCTB( '".$this->getDado('exercicio')."' , '".$this->getDado('entidades')."' ) @@ -286,10 +273,8 @@ class TTCEMGCTB extends Persistente ) ON contasCTB.cod_conta = plano_analitica.cod_conta AND contasCTB.exercicio = plano_analitica.exercicio - WHERE plano_banco.exercicio = '".$this->getDado('exercicio')."' AND plano_banco.cod_entidade IN (".$this->getDado('entidades').") - GROUP BY cod_ctb , cod_ctb_view , cod_orgao @@ -343,548 +328,620 @@ class TTCEMGCTB extends Persistente , SUM(a.valor_entr_saida) AS valor_entr_saida FROM ( - - SELECT - '21'::int AS tipo_registro - , SUM(vl.vl_lancamento ) AS valor_entr_saida - , plano_banco.cod_entidade as cod_orgao - , conta_bancaria.cod_ctb - , conta_bancaria.tipo_aplicacao - , conta_bancaria.tipo_conta::VARCHAR - , pa.exercicio - , plano_recurso.cod_recurso AS cod_fonte_recursos - , '1'::VARCHAR AS tipo_movimentacao - , CASE - WHEN lo.tipo = 'A' AND SUBSTR(REPLACE(conta_receita.cod_estrutural, '.', ''), 1, 1) <> '9' AND lancamento_receita.estorno = false - AND SUBSTR(REPLACE(conta_receita.cod_estrutural, '.', ''), 1, 4) <> '1325' THEN '01' - WHEN lo.tipo = 'A' AND SUBSTR(REPLACE(conta_receita.cod_estrutural, '.', ''), 1, 1)= '9' - AND lancamento_receita.estorno = false AND SUBSTR(REPLACE(conta_receita.cod_estrutural, '.', ''), 1, 4) <> '1325' - AND (RDE.vl_estornado IS NULL ) AND ((ARR.vl_arrecadacao IS NULL ) OR (AR.devolucao = true)) THEN '02' - WHEN lo.tipo = 'A' AND lancamento_receita.estorno = true AND SUBSTR(REPLACE(conta_receita.cod_estrutural, '.', ''), 1, 1) <> '9' THEN '03' - WHEN SUBSTR(REPLACE(conta_receita.cod_estrutural, '.', ''), 1, 4) = '1325' THEN '04' - WHEN lo.tipo = 'T' AND transferencia.cod_tipo = 5 THEN '05' - WHEN lo.tipo = 'T' AND transferencia.cod_tipo = 4 THEN '07' - WHEN lo.tipo = 'P' AND lancamento_receita.estorno = false THEN '08' - WHEN lo.tipo = 'T' AND transferencia.cod_tipo = 3 THEN '09' - WHEN lo.tipo = 'P' AND lancamento_receita.estorno = true THEN '10' - WHEN lo.tipo = 'T' AND transferencia.cod_tipo = 2 - AND transferencia_estornada.cod_lote_estorno IS NOT NULL - AND ( SELECT CASE WHEN COUNT(plano_conta.*) > 0 THEN TRUE ELSE FALSE END - FROM contabilidade.plano_conta - INNER JOIN contabilidade.plano_analitica - ON plano_conta.cod_conta = plano_analitica.cod_conta - AND plano_conta.exercicio = plano_analitica.exercicio - WHERE plano_analitica.cod_plano = transferencia.cod_plano_credito - AND plano_analitica.exercicio = transferencia.exercicio - AND ( SUBSTR(REPLACE(plano_conta.cod_estrutural, '.', ''), 1, 9) = '451100000' - OR SUBSTR(REPLACE(plano_conta.cod_estrutural, '.', ''), 1, 9) = '451220101' - OR SUBSTR(REPLACE(plano_conta.cod_estrutural, '.', ''), 1, 9) = '451220102' - OR SUBSTR(REPLACE(plano_conta.cod_estrutural, '.', ''), 1, 9) = '451220103' - OR SUBSTR(REPLACE(plano_conta.cod_estrutural, '.', ''), 1, 9) = '451220104' - OR SUBSTR(REPLACE(plano_conta.cod_estrutural, '.', ''), 1, 9) = '451220199' - OR SUBSTR(REPLACE(plano_conta.cod_estrutural, '.', ''), 1, 9) = '451300000' ) - ) THEN '13' - - WHEN lo.tipo = 'T' AND transferencia.cod_tipo = 2 - AND ( SELECT CASE WHEN COUNT(plano_conta.*) > 0 THEN TRUE ELSE FALSE END - FROM contabilidade.plano_conta - INNER JOIN contabilidade.plano_analitica - ON plano_conta.cod_conta = plano_analitica.cod_conta - AND plano_conta.exercicio = plano_analitica.exercicio - WHERE plano_analitica.cod_plano = transferencia.cod_plano_credito - AND plano_analitica.exercicio = transferencia.exercicio - AND ( SUBSTR(REPLACE(plano_conta.cod_estrutural, '.', ''), 1, 9) = '451100000' - OR SUBSTR(REPLACE(plano_conta.cod_estrutural, '.', ''), 1, 9) = '451220101' - OR SUBSTR(REPLACE(plano_conta.cod_estrutural, '.', ''), 1, 9) = '451220102' - OR SUBSTR(REPLACE(plano_conta.cod_estrutural, '.', ''), 1, 9) = '451220103' - OR SUBSTR(REPLACE(plano_conta.cod_estrutural, '.', ''), 1, 9) = '451220104' - OR SUBSTR(REPLACE(plano_conta.cod_estrutural, '.', ''), 1, 9) = '451220199' - OR SUBSTR(REPLACE(plano_conta.cod_estrutural, '.', ''), 1, 9) = '451300000' ) - ) THEN '12' - - WHEN lo.tipo = 'A' AND SUBSTR(REPLACE(conta_receita.cod_estrutural, '.', ''), 1, 1) = '9' - AND ( (RDE.vl_estornado IS NOT NULL) OR (ARR.vl_arrecadacao IS NOT NULL AND AR.devolucao = false) ) THEN '16' - ELSE '99' - END AS tipo_entr_saida - - , CASE WHEN (lo.tipo = 'T' AND transferencia.cod_tipo = 5) OR (lo.tipo = 'T' AND transferencia.cod_tipo = 3) OR (lo.tipo = 'T' AND transferencia.cod_tipo = 4) THEN - ( cod_ctb_transferencia.cod_ctb_anterior - ) END::VARCHAR AS cod_ctb_transf - - , CASE WHEN (lo.tipo = 'T' AND transferencia.cod_tipo = 5) OR (lo.tipo = 'T' AND transferencia.cod_tipo = 3) OR (lo.tipo = 'T' AND transferencia.cod_tipo = 4) THEN - ( SELECT plano_recurso.cod_recurso - FROM contabilidade.plano_conta - INNER JOIN contabilidade.plano_analitica - ON plano_conta.cod_conta = plano_analitica.cod_conta - AND plano_conta.exercicio = plano_analitica.exercicio - INNER JOIN contabilidade.plano_recurso - ON plano_recurso.cod_plano = plano_analitica.cod_plano - AND plano_recurso.exercicio = plano_analitica.exercicio - WHERE plano_analitica.cod_plano = transferencia.cod_plano_credito - AND plano_analitica.exercicio = transferencia.exercicio - ) END::VARCHAR AS cod_fonte_ctb_transf - - FROM contabilidade.plano_conta AS pc - - INNER JOIN contabilidade.plano_analitica AS pa - ON pc.cod_conta = pa.cod_conta - AND pc.exercicio = pa.exercicio - - INNER JOIN contabilidade.plano_banco - ON plano_banco.cod_plano = pa.cod_plano - AND plano_banco.exercicio = pa.exercicio - - LEFT JOIN tcemg.contasCTB('".$this->getDado('exercicio')."', '".$this->getDado('entidades')."') as conta_bancaria - ( cod_conta INTEGER - , tipo_aplicacao VARCHAR - , cod_ctb INTEGER - , tipo_conta INTEGER - , exercicio CHAR(4) - , conta TEXT - , conta_bancaria TEXT - , conta_corrente TEXT - , cod_orgao INTEGER - , banco VARCHAR - , agencia TEXT - , digito_verificador_agencia TEXT - , digito_verificador_conta_bancaria TEXT - , desc_conta_bancaria VARCHAR - --, cod_plano INTEGER - ) - ON conta_bancaria.cod_conta = pc.cod_conta - AND conta_bancaria.exercicio = pc.exercicio - --AND conta_bancaria.cod_plano = plano_banco.cod_plano - - INNER JOIN contabilidade.conta_debito AS cd - ON pa.cod_plano = cd.cod_plano - AND pa.exercicio = cd.exercicio - - INNER JOIN contabilidade.valor_lancamento AS vl - ON cd.cod_lote = vl.cod_lote - AND cd.tipo = vl.tipo - AND cd.sequencia = vl.sequencia - AND cd.exercicio = vl.exercicio - AND cd.tipo_valor = vl.tipo_valor - AND cd.cod_entidade = vl.cod_entidade - - INNER JOIN contabilidade.lancamento - ON lancamento.exercicio = vl.exercicio - AND lancamento.cod_entidade = vl.cod_entidade - AND lancamento.tipo = vl.tipo - AND lancamento.cod_lote = vl.cod_lote - AND lancamento.sequencia = vl.sequencia - - LEFT JOIN contabilidade.lancamento_receita - ON lancamento_receita.exercicio = lancamento.exercicio - AND lancamento_receita.cod_entidade = lancamento.cod_entidade - AND lancamento_receita.tipo = lancamento.tipo - AND lancamento_receita.cod_lote = lancamento.cod_lote - AND lancamento_receita.sequencia = lancamento.sequencia - - INNER JOIN contabilidade.lote AS lo - ON vl.cod_lote = lo.cod_lote - AND vl.tipo = lo.tipo - AND vl.exercicio = lo.exercicio - AND vl.cod_entidade = lo.cod_entidade - AND lo.dt_lote BETWEEN TO_DATE('".$this->getDado('dtInicio')."','dd/mm/yyyy') AND TO_DATE('".$this->getDado('dtFim')."','dd/mm/yyyy') - AND lo.exercicio = '".$this->getDado('exercicio')."' - - LEFT JOIN orcamento.receita - ON receita.cod_receita = lancamento_receita.cod_receita - AND receita.exercicio = lancamento_receita.exercicio - - LEFT JOIN contabilidade.plano_recurso - ON pa.cod_plano = plano_recurso.cod_plano - AND pa.exercicio = plano_recurso.exercicio - - LEFT JOIN orcamento.recurso - ON recurso.exercicio = plano_recurso.exercicio - AND recurso.cod_recurso = plano_recurso.cod_recurso - - LEFT JOIN contabilidade.lancamento_empenho - ON lancamento_empenho.exercicio = lancamento.exercicio - AND lancamento_empenho.tipo = lancamento.tipo - AND lancamento_empenho.cod_entidade = lancamento.cod_entidade - AND lancamento_empenho.cod_lote = lancamento.cod_lote - AND lancamento_empenho.sequencia = lancamento.sequencia - - LEFT JOIN orcamento.conta_receita - ON conta_receita.exercicio = receita.exercicio - AND conta_receita.cod_conta = receita.cod_conta - - LEFT JOIN tcemg.receita_indentificadores_peculiar_receita - ON receita_indentificadores_peculiar_receita.exercicio = receita.exercicio - AND receita_indentificadores_peculiar_receita.cod_receita = receita.cod_conta - - LEFT JOIN tesouraria.transferencia - ON transferencia.cod_lote = lo.cod_lote - AND transferencia.tipo = lo.tipo - AND transferencia.exercicio = lo.exercicio - AND transferencia.cod_entidade = lo.cod_entidade - - LEFT JOIN tesouraria.transferencia_estornada - ON transferencia_estornada.cod_lote = lo.cod_lote - AND transferencia_estornada.tipo = lo.tipo - AND transferencia_estornada.exercicio = lo.exercicio - AND transferencia_estornada.cod_entidade = lo.cod_entidade - - LEFT JOIN ( + SELECT '21'::int AS tipo_registro + , SUM(vl.vl_lancamento ) AS valor_entr_saida + , plano_banco.cod_entidade as cod_orgao + , conta_bancaria.cod_ctb + , conta_bancaria.tipo_aplicacao + , conta_bancaria.tipo_conta::VARCHAR + , pa.exercicio + , plano_recurso.cod_recurso AS cod_fonte_recursos + , '1'::VARCHAR AS tipo_movimentacao + , CASE + WHEN lo.tipo = 'A' + AND SUBSTR(REPLACE(conta_receita.cod_estrutural, '.', ''), 1, 1) <> '9' + AND lancamento_receita.estorno = false + AND SUBSTR(REPLACE(conta_receita.cod_estrutural, '.', ''), 1, 4) <> '1325' + THEN '01' + WHEN lo.tipo = 'A' + AND SUBSTR(REPLACE(conta_receita.cod_estrutural, '.', ''), 1, 1)= '9' + AND lancamento_receita.estorno = false + AND SUBSTR(REPLACE(conta_receita.cod_estrutural, '.', ''), 1, 4) <> '1325' + AND RDE.vl_estornado IS NULL + AND ( (ARR.vl_arrecadacao IS NULL ) OR (AR.devolucao = true)) + THEN '02' + WHEN lo.tipo = 'A' + AND lancamento_receita.estorno = true + AND SUBSTR(REPLACE(conta_receita.cod_estrutural, '.', ''), 1, 1) <> '9' + THEN '03' + WHEN SUBSTR(REPLACE(conta_receita.cod_estrutural, '.', ''), 1, 4) = '1325' + THEN '04' + WHEN lo.tipo = 'T' + AND transferencia.cod_tipo = 5 + THEN '05' + WHEN lo.tipo = 'T' + AND transferencia.cod_tipo = 4 + THEN '07' + WHEN lo.tipo = 'P' + AND lancamento_receita.estorno = false + THEN '08' + WHEN lo.tipo = 'T' + AND transferencia.cod_tipo = 3 + THEN '09' + WHEN lo.tipo = 'P' + AND lancamento_receita.estorno = true + THEN '10' + WHEN lo.tipo = 'T' + AND transferencia.cod_tipo = 5 + AND SUBSTR(cod_ctb_transferencia.estrutural_ctb_transfer, 1, 7) = '1111101' + THEN '11' + WHEN lo.tipo = 'T' + AND transferencia.cod_tipo = 2 + AND transferencia_estornada.cod_lote_estorno IS NOT NULL + AND ( + SELECT CASE + WHEN COUNT(plano_conta.*) > 0 + THEN TRUE + ELSE FALSE + END + FROM contabilidade.plano_conta + INNER JOIN contabilidade.plano_analitica + ON plano_conta.cod_conta = plano_analitica.cod_conta + AND plano_conta.exercicio = plano_analitica.exercicio + WHERE plano_analitica.cod_plano = transferencia.cod_plano_credito + AND plano_analitica.exercicio = transferencia.exercicio + AND ( + SUBSTR(REPLACE(plano_conta.cod_estrutural, '.', ''), 1, 9) = '451100000' + OR SUBSTR(REPLACE(plano_conta.cod_estrutural, '.', ''), 1, 9) = '451220101' + OR SUBSTR(REPLACE(plano_conta.cod_estrutural, '.', ''), 1, 9) = '451220102' + OR SUBSTR(REPLACE(plano_conta.cod_estrutural, '.', ''), 1, 9) = '451220103' + OR SUBSTR(REPLACE(plano_conta.cod_estrutural, '.', ''), 1, 9) = '451220104' + OR SUBSTR(REPLACE(plano_conta.cod_estrutural, '.', ''), 1, 9) = '451220199' + OR SUBSTR(REPLACE(plano_conta.cod_estrutural, '.', ''), 1, 9) = '451300000' + ) + ) + THEN '13' + WHEN lo.tipo = 'T' + AND transferencia.cod_tipo = 2 + AND ( + SELECT CASE + WHEN COUNT(plano_conta.*) > 0 + THEN TRUE + ELSE FALSE + END + FROM contabilidade.plano_conta + INNER JOIN contabilidade.plano_analitica + ON plano_conta.cod_conta = plano_analitica.cod_conta + AND plano_conta.exercicio = plano_analitica.exercicio + WHERE plano_analitica.cod_plano = transferencia.cod_plano_credito + AND plano_analitica.exercicio = transferencia.exercicio + AND ( + SUBSTR(REPLACE(plano_conta.cod_estrutural, '.', ''), 1, 9) = '451100000' + OR SUBSTR(REPLACE(plano_conta.cod_estrutural, '.', ''), 1, 9) = '451220101' + OR SUBSTR(REPLACE(plano_conta.cod_estrutural, '.', ''), 1, 9) = '451220102' + OR SUBSTR(REPLACE(plano_conta.cod_estrutural, '.', ''), 1, 9) = '451220103' + OR SUBSTR(REPLACE(plano_conta.cod_estrutural, '.', ''), 1, 9) = '451220104' + OR SUBSTR(REPLACE(plano_conta.cod_estrutural, '.', ''), 1, 9) = '451220199' + OR SUBSTR(REPLACE(plano_conta.cod_estrutural, '.', ''), 1, 9) = '451300000' + ) + ) + THEN '12' + WHEN lo.tipo = 'A' + AND SUBSTR(REPLACE(conta_receita.cod_estrutural, '.', ''), 1, 1) = '9' + AND ( (RDE.vl_estornado IS NOT NULL) OR (ARR.vl_arrecadacao IS NOT NULL AND AR.devolucao = false) ) + THEN '16' + ELSE '99' + END AS tipo_entr_saida + , CASE + WHEN ( + ( lo.tipo = 'T' AND transferencia.cod_tipo = 5 ) + OR (lo.tipo = 'T' AND transferencia.cod_tipo = 3) + OR (lo.tipo = 'T' AND transferencia.cod_tipo = 4) + ) + AND SUBSTR(cod_ctb_transferencia.estrutural_ctb_transfer, 1, 7) <> '1111101' + THEN ( cod_ctb_transferencia.cod_ctb_anterior ) + END::VARCHAR AS cod_ctb_transf + , CASE + WHEN ( + ( lo.tipo = 'T' AND transferencia.cod_tipo = 5) + OR (lo.tipo = 'T' AND transferencia.cod_tipo = 3) + OR (lo.tipo = 'T' AND transferencia.cod_tipo = 4) + ) + AND SUBSTR(cod_ctb_transferencia.estrutural_ctb_transfer, 1, 7) <> '1111101' + THEN ( + SELECT plano_recurso.cod_recurso + FROM contabilidade.plano_conta + INNER JOIN contabilidade.plano_analitica + ON plano_conta.cod_conta = plano_analitica.cod_conta + AND plano_conta.exercicio = plano_analitica.exercicio + INNER JOIN contabilidade.plano_recurso + ON plano_recurso.cod_plano = plano_analitica.cod_plano + AND plano_recurso.exercicio = plano_analitica.exercicio + WHERE plano_analitica.cod_plano = transferencia.cod_plano_credito + AND plano_analitica.exercicio = transferencia.exercicio + ) + END::VARCHAR AS cod_fonte_ctb_transf + FROM contabilidade.plano_conta AS pc + INNER JOIN contabilidade.plano_analitica AS pa + ON pc.cod_conta = pa.cod_conta + AND pc.exercicio = pa.exercicio + INNER JOIN contabilidade.plano_banco + ON plano_banco.cod_plano = pa.cod_plano + AND plano_banco.exercicio = pa.exercicio + LEFT JOIN tcemg.contasCTB('".$this->getDado('exercicio')."', '".$this->getDado('entidades')."') as conta_bancaria + ( + cod_conta INTEGER + , tipo_aplicacao VARCHAR + , cod_ctb INTEGER + , tipo_conta INTEGER + , exercicio CHAR(4) + , conta TEXT + , conta_bancaria TEXT + , conta_corrente TEXT + , cod_orgao INTEGER + , banco VARCHAR + , agencia TEXT + , digito_verificador_agencia TEXT + , digito_verificador_conta_bancaria TEXT + , desc_conta_bancaria VARCHAR + ) + ON conta_bancaria.cod_conta = pc.cod_conta + AND conta_bancaria.exercicio = pc.exercicio + INNER JOIN contabilidade.conta_debito AS cd + ON pa.cod_plano = cd.cod_plano + AND pa.exercicio = cd.exercicio + INNER JOIN contabilidade.valor_lancamento AS vl + ON cd.cod_lote = vl.cod_lote + AND cd.tipo = vl.tipo + AND cd.sequencia = vl.sequencia + AND cd.exercicio = vl.exercicio + AND cd.tipo_valor = vl.tipo_valor + AND cd.cod_entidade = vl.cod_entidade + INNER JOIN contabilidade.lancamento + ON lancamento.exercicio = vl.exercicio + AND lancamento.cod_entidade = vl.cod_entidade + AND lancamento.tipo = vl.tipo + AND lancamento.cod_lote = vl.cod_lote + AND lancamento.sequencia = vl.sequencia + LEFT JOIN contabilidade.lancamento_receita + ON lancamento_receita.exercicio = lancamento.exercicio + AND lancamento_receita.cod_entidade = lancamento.cod_entidade + AND lancamento_receita.tipo = lancamento.tipo + AND lancamento_receita.cod_lote = lancamento.cod_lote + AND lancamento_receita.sequencia = lancamento.sequencia + INNER JOIN contabilidade.lote AS lo + ON vl.cod_lote = lo.cod_lote + AND vl.tipo = lo.tipo + AND vl.exercicio = lo.exercicio + AND vl.cod_entidade = lo.cod_entidade + AND lo.dt_lote BETWEEN TO_DATE('".$this->getDado('dtInicio')."','dd/mm/yyyy') AND TO_DATE('".$this->getDado('dtFim')."','dd/mm/yyyy') + AND lo.exercicio = '".$this->getDado('exercicio')."' + LEFT JOIN orcamento.receita + ON receita.cod_receita = lancamento_receita.cod_receita + AND receita.exercicio = lancamento_receita.exercicio + LEFT JOIN contabilidade.plano_recurso + ON pa.cod_plano = plano_recurso.cod_plano + AND pa.exercicio = plano_recurso.exercicio + LEFT JOIN orcamento.recurso + ON recurso.exercicio = plano_recurso.exercicio + AND recurso.cod_recurso = plano_recurso.cod_recurso + LEFT JOIN contabilidade.lancamento_empenho + ON lancamento_empenho.exercicio = lancamento.exercicio + AND lancamento_empenho.tipo = lancamento.tipo + AND lancamento_empenho.cod_entidade = lancamento.cod_entidade + AND lancamento_empenho.cod_lote = lancamento.cod_lote + AND lancamento_empenho.sequencia = lancamento.sequencia + LEFT JOIN orcamento.conta_receita + ON conta_receita.exercicio = receita.exercicio + AND conta_receita.cod_conta = receita.cod_conta + LEFT JOIN tcemg.receita_indentificadores_peculiar_receita + ON receita_indentificadores_peculiar_receita.exercicio = receita.exercicio + AND receita_indentificadores_peculiar_receita.cod_receita = receita.cod_conta + LEFT JOIN tesouraria.transferencia + ON transferencia.cod_lote = lo.cod_lote + AND transferencia.tipo = lo.tipo + AND transferencia.exercicio = lo.exercicio + AND transferencia.cod_entidade = lo.cod_entidade + LEFT JOIN tesouraria.transferencia_estornada + ON transferencia_estornada.cod_lote = lo.cod_lote + AND transferencia_estornada.tipo = lo.tipo + AND transferencia_estornada.exercicio = lo.exercicio + AND transferencia_estornada.cod_entidade = lo.cod_entidade + LEFT JOIN ( SELECT conta_debito.cod_lote - , conta_debito.tipo - , conta_debito.exercicio - , conta_debito.cod_entidade - , CASE WHEN (conta_bancaria.cod_ctb_anterior is null) THEN transferencia.cod_plano_credito - Else conta_bancaria.cod_ctb_anterior - END AS cod_ctb_anterior - , transferencia.cod_plano_credito - , transferencia.cod_plano_debito - , conta_debito.sequencia - FROM contabilidade.conta_debito - INNER JOIN contabilidade.lote AS lo - ON conta_debito.cod_lote = lo.cod_lote - AND conta_debito.tipo = lo.tipo - AND conta_debito.exercicio = lo.exercicio - AND conta_debito.cod_entidade = lo.cod_entidade - INNER JOIN tesouraria.transferencia - ON transferencia.cod_plano_debito = conta_debito.cod_plano - AND lo.cod_lote = transferencia.cod_lote - AND transferencia.cod_entidade = lo.cod_entidade - AND transferencia.tipo = 'T' - AND transferencia.exercicio = conta_debito.exercicio - INNER JOIN contabilidade.plano_analitica - ON plano_analitica.cod_plano = transferencia.cod_plano_credito - AND plano_analitica.natureza_saldo = 'D' - AND plano_analitica.exercicio = conta_debito.exercicio - LEFT JOIN tcemg.conta_bancaria - ON conta_bancaria.cod_conta = plano_analitica.cod_conta - AND conta_bancaria.exercicio = plano_analitica.exercicio - WHERE conta_debito.exercicio = '".$this->getDado('exercicio')."' - AND conta_debito.cod_entidade IN (".$this->getDado('entidades').") - AND lo.dt_lote BETWEEN TO_DATE('".$this->getDado('dtInicio')."','dd/mm/yyyy') AND TO_DATE('".$this->getDado('dtFim')."','dd/mm/yyyy') - AND conta_debito.tipo = 'T' - ) AS cod_ctb_transferencia - ON cod_ctb_transferencia.exercicio = cd.exercicio - AND cod_ctb_transferencia.sequencia = cd.sequencia - AND cod_ctb_transferencia.cod_lote = cd.cod_lote - AND cod_ctb_transferencia.tipo = cd.tipo - AND cod_ctb_transferencia.cod_plano_debito = cd.cod_plano - - LEFT JOIN tesouraria.arrecadacao_receita_dedutora AS RD - ON RD.cod_receita_dedutora = lancamento_receita.cod_receita - AND RD.vl_deducao = vl.vl_lancamento - AND TO_DATE(RD.timestamp_arrecadacao::VARCHAR,'yyyy-mm-dd') = lo.dt_lote - - LEFT JOIN tesouraria.arrecadacao_receita_dedutora_estornada AS RDE - ON RDE.cod_receita_dedutora = RD.cod_receita_dedutora - AND RDE.cod_arrecadacao = RD.cod_arrecadacao - - LEFT JOIN tesouraria.arrecadacao_receita AS ARR - ON ARR.cod_receita = RD.cod_receita_dedutora - AND TO_DATE(ARR.timestamp_arrecadacao::VARCHAR,'yyyy-mm-dd') = lo.dt_lote + , conta_debito.tipo + , conta_debito.exercicio + , conta_debito.cod_entidade + , CASE + WHEN (conta_bancaria.cod_ctb_anterior is null) + THEN transferencia.cod_plano_credito + Else conta_bancaria.cod_ctb_anterior + END AS cod_ctb_anterior + , transferencia.cod_plano_credito + , transferencia.cod_plano_debito + , conta_debito.sequencia + , REPLACE(pc.cod_estrutural,'.', '') AS estrutural_ctb_transfer + FROM contabilidade.conta_debito + INNER JOIN contabilidade.lote AS lo + ON conta_debito.cod_lote = lo.cod_lote + AND conta_debito.tipo = lo.tipo + AND conta_debito.exercicio = lo.exercicio + AND conta_debito.cod_entidade = lo.cod_entidade + INNER JOIN tesouraria.transferencia + ON transferencia.cod_plano_debito = conta_debito.cod_plano + AND lo.cod_lote = transferencia.cod_lote + AND transferencia.cod_entidade = lo.cod_entidade + AND transferencia.tipo = 'T' + AND transferencia.exercicio = conta_debito.exercicio + INNER JOIN contabilidade.plano_analitica + ON plano_analitica.cod_plano = transferencia.cod_plano_credito + AND plano_analitica.natureza_saldo = 'D' + AND plano_analitica.exercicio = conta_debito.exercicio + LEFT JOIN tcemg.conta_bancaria + ON conta_bancaria.cod_conta = plano_analitica.cod_conta + AND conta_bancaria.exercicio = plano_analitica.exercicio + INNER JOIN contabilidade.plano_conta AS pc + ON pc.cod_conta = plano_analitica.cod_conta + AND pc.exercicio = plano_analitica.exercicio + WHERE conta_debito.exercicio = '".$this->getDado('exercicio')."' + AND conta_debito.cod_entidade IN (".$this->getDado('entidades').") + AND lo.dt_lote BETWEEN TO_DATE('".$this->getDado('dtInicio')."','dd/mm/yyyy') AND TO_DATE('".$this->getDado('dtFim')."','dd/mm/yyyy') + AND conta_debito.tipo = 'T' + ) AS cod_ctb_transferencia + ON cod_ctb_transferencia.exercicio = cd.exercicio + AND cod_ctb_transferencia.sequencia = cd.sequencia + AND cod_ctb_transferencia.cod_lote = cd.cod_lote + AND cod_ctb_transferencia.tipo = cd.tipo + AND cod_ctb_transferencia.cod_plano_debito = cd.cod_plano + LEFT JOIN tesouraria.arrecadacao_receita_dedutora AS RD + ON RD.cod_receita_dedutora = lancamento_receita.cod_receita + AND RD.vl_deducao = vl.vl_lancamento + AND TO_DATE(RD.timestamp_arrecadacao::VARCHAR,'yyyy-mm-dd') = lo.dt_lote + LEFT JOIN tesouraria.arrecadacao_receita_dedutora_estornada AS RDE + ON RDE.cod_receita_dedutora = RD.cod_receita_dedutora + AND RDE.cod_arrecadacao = RD.cod_arrecadacao + LEFT JOIN tesouraria.arrecadacao_receita AS ARR + ON ARR.cod_receita = RD.cod_receita_dedutora + AND TO_DATE(ARR.timestamp_arrecadacao::VARCHAR,'yyyy-mm-dd') = lo.dt_lote + LEFT JOIN tesouraria.arrecadacao AS AR + ON AR.cod_arrecadacao = ARR.cod_arrecadacao + AND AR.timestamp_arrecadacao = ARR.timestamp_arrecadacao + WHERE pc.exercicio = '".$this->getDado('exercicio')."' + AND plano_banco.cod_entidade IN (".$this->getDado('entidades').") + AND SUBSTR(REPLACE(pc.cod_estrutural, '.', ''), 1, 7) <> '1111101' + AND vl.tipo <> 'I' + GROUP BY tipo_registro + , cod_ctb + , conta_bancaria.tipo_aplicacao + , tipo_conta + , plano_banco.cod_entidade + , plano_recurso.cod_recurso + , pa.exercicio + , tipo_movimentacao + , tipo_entr_saida + , cod_ctb_transf + , cod_fonte_ctb_transf + , conta_receita.cod_estrutural + ) AS a + GROUP BY 1,2,3,4,5,6,7,8,9,10,11,12,13 - LEFT JOIN tesouraria.arrecadacao AS AR - ON AR.cod_arrecadacao = ARR.cod_arrecadacao - AND AR.timestamp_arrecadacao = ARR.timestamp_arrecadacao - - WHERE pc.exercicio = '".$this->getDado('exercicio')."' - AND plano_banco.cod_entidade IN (".$this->getDado('entidades').") - AND SUBSTR(REPLACE(pc.cod_estrutural, '.', ''), 1, 7) <> '1111101' - AND vl.tipo <> 'I' - GROUP BY tipo_registro - , cod_ctb - , conta_bancaria.tipo_aplicacao - , tipo_conta - , plano_banco.cod_entidade - , plano_recurso.cod_recurso - , pa.exercicio - , tipo_movimentacao - , tipo_entr_saida - , cod_ctb_transf - , cod_fonte_ctb_transf - , conta_receita.cod_estrutural - ) AS a - - GROUP BY 1,2,3,4,5,6,7,8,9,10,11,12,13 UNION - SELECT b.tipo_registro - , '' AS cod_reduzido_mov - , b.cod_orgao - , b.cod_ctb - , LPAD(b.tipo_conta||b.cod_ctb||b.tipo_entr_saida||b.tipo_movimentacao||b.cod_fonte_recursos||LPAD(COALESCE(b.cod_fonte_ctb_transf::VARCHAR,'0'),3,'0'),17,'0') AS cod_ctb_view - - , b.cod_fonte_recursos - , b.exercicio - , b.tipo_movimentacao - , b.tipo_entr_saida - , b.cod_ctb_transf AS cod_ctb_transf - , b.tipo_conta||b.cod_ctb AS cod_ctb_transf_view - , b.cod_fonte_ctb_transf - , b.tipo_conta AS tipo_conta - , SUM(b.valor_entr_saida) AS valor_entr_saida - FROM ( - - SELECT - '21'::int AS tipo_registro - , SUM(vl.vl_lancamento) * -1 as valor_entr_saida - , plano_banco.cod_entidade as cod_orgao - , conta_bancaria.cod_ctb - , conta_bancaria.tipo_aplicacao - , conta_bancaria.tipo_conta::VARCHAR - , pa.exercicio - , plano_recurso.cod_recurso as cod_fonte_recursos - , '2'::VARCHAR AS tipo_movimentacao - , CASE - WHEN lo.tipo = 'A' AND SUBSTR(REPLACE(conta_receita.cod_estrutural, '.', ''), 1, 1) <> '9' AND lancamento_receita.estorno = false AND SUBSTR(REPLACE(conta_receita.cod_estrutural, '.', ''), 1, 4) <> '1325' THEN '01' - WHEN lo.tipo = 'A' AND SUBSTR(REPLACE(conta_receita.cod_estrutural, '.', ''), 1, 1)= '9' - AND lancamento_receita.estorno = false AND SUBSTR(REPLACE(conta_receita.cod_estrutural, '.', ''), 1, 4) <> '1325' - AND (RDE.vl_estornado IS NULL ) AND ((ARR.vl_arrecadacao IS NULL ) OR (AR.devolucao = true)) THEN '02' - WHEN lo.tipo = 'A' AND lancamento_receita.estorno = true AND SUBSTR(REPLACE(conta_receita.cod_estrutural, '.', ''), 1, 1) <> '9' THEN '03' - WHEN SUBSTR(REPLACE(conta_receita.cod_estrutural, '.', ''), 1, 4) = '1325' THEN '04' - WHEN lo.tipo = 'T' AND transferencia.cod_tipo = 5 THEN '06' - WHEN lo.tipo = 'T' AND transferencia.cod_tipo = 4 THEN '07' - WHEN lo.tipo = 'P' AND lancamento_empenho.estorno = false THEN '08' - WHEN lo.tipo = 'T' AND transferencia.cod_tipo = 3 THEN '09' - WHEN lo.tipo = 'P' AND lancamento_empenho.estorno = true THEN '10' - WHEN lo.tipo = 'T' AND transferencia.cod_tipo = 1 - AND transferencia_estornada.cod_lote_estorno IS NOT NULL - AND ( SELECT CASE WHEN COUNT(plano_conta.*) > 0 THEN TRUE - ELSE FALSE - END - FROM contabilidade.plano_conta - INNER JOIN contabilidade.plano_analitica - ON plano_conta.cod_conta = plano_analitica.cod_conta - AND plano_conta.exercicio = plano_analitica.exercicio - WHERE plano_analitica.cod_plano = transferencia.cod_plano_debito - AND plano_analitica.exercicio = transferencia.exercicio - AND ( SUBSTR(REPLACE(plano_conta.cod_estrutural, '.', ''), 1, 9) = '351100000' - OR SUBSTR(REPLACE(plano_conta.cod_estrutural, '.', ''), 1, 9) = '351220101' - OR SUBSTR(REPLACE(plano_conta.cod_estrutural, '.', ''), 1, 9) = '351220102' - OR SUBSTR(REPLACE(plano_conta.cod_estrutural, '.', ''), 1, 9) = '351220103' - OR SUBSTR(REPLACE(plano_conta.cod_estrutural, '.', ''), 1, 9) = '351220104' - OR SUBSTR(REPLACE(plano_conta.cod_estrutural, '.', ''), 1, 9) = '351220199' - OR SUBSTR(REPLACE(plano_conta.cod_estrutural, '.', ''), 1, 9) = '351300000' ) - ) THEN '12' - WHEN lo.tipo = 'T' AND transferencia.cod_tipo = 1 - AND ( SELECT CASE WHEN COUNT(plano_conta.*) > 0 THEN TRUE - ELSE FALSE - END - FROM contabilidade.plano_conta - INNER JOIN contabilidade.plano_analitica - ON plano_conta.cod_conta = plano_analitica.cod_conta - AND plano_conta.exercicio = plano_analitica.exercicio - WHERE plano_analitica.cod_plano = transferencia.cod_plano_debito - AND plano_analitica.exercicio = transferencia.exercicio - AND ( SUBSTR(REPLACE(plano_conta.cod_estrutural, '.', ''), 1, 9) = '351100000' - OR SUBSTR(REPLACE(plano_conta.cod_estrutural, '.', ''), 1, 9) = '351220101' - OR SUBSTR(REPLACE(plano_conta.cod_estrutural, '.', ''), 1, 9) = '351220102' - OR SUBSTR(REPLACE(plano_conta.cod_estrutural, '.', ''), 1, 9) = '351220103' - OR SUBSTR(REPLACE(plano_conta.cod_estrutural, '.', ''), 1, 9) = '351220104' - OR SUBSTR(REPLACE(plano_conta.cod_estrutural, '.', ''), 1, 9) = '351220199' - OR SUBSTR(REPLACE(plano_conta.cod_estrutural, '.', ''), 1, 9) = '351300000' ) - ) THEN '13' - WHEN lo.tipo = 'A' AND SUBSTR(REPLACE(conta_receita.cod_estrutural, '.', ''), 1, 1) = '9' - AND ( (RDE.vl_estornado IS NOT NULL) OR (ARR.vl_arrecadacao IS NOT NULL AND AR.devolucao = false) ) THEN '16' - ELSE '99' - END AS tipo_entr_saida - - , CASE WHEN (lo.tipo = 'T' AND transferencia.cod_tipo = 5) OR (lo.tipo = 'T' AND transferencia.cod_tipo = 4) OR (lo.tipo = 'T' AND transferencia.cod_tipo = 3) THEN - ( cod_ctb_transferencia.cod_ctb_anterior - ) END::VARCHAR AS cod_ctb_transf - - , CASE WHEN (lo.tipo = 'T' AND transferencia.cod_tipo = 5) OR (lo.tipo = 'T' AND transferencia.cod_tipo = 4) OR (lo.tipo = 'T' AND transferencia.cod_tipo = 3) THEN - ( SELECT plano_recurso.cod_recurso - FROM contabilidade.plano_conta - INNER JOIN contabilidade.plano_analitica - ON plano_conta.cod_conta = plano_analitica.cod_conta - AND plano_conta.exercicio = plano_analitica.exercicio - INNER JOIN contabilidade.plano_recurso - ON plano_recurso.cod_plano = plano_analitica.cod_plano - AND plano_recurso.exercicio = plano_analitica.exercicio - WHERE plano_analitica.cod_plano = transferencia.cod_plano_debito - AND plano_analitica.exercicio = transferencia.exercicio - ) END::VARCHAR AS cod_fonte_ctb_transf - - FROM contabilidade.plano_conta AS pc - - INNER JOIN contabilidade.plano_analitica AS pa - ON pc.cod_conta = pa.cod_conta - AND pc.exercicio = pa.exercicio - - INNER JOIN contabilidade.plano_banco - ON plano_banco.cod_plano = pa.cod_plano - AND plano_banco.exercicio = pa.exercicio - - LEFT JOIN tcemg.contasCTB('".$this->getDado('exercicio')."', '".$this->getDado('entidades')."') as conta_bancaria - ( cod_conta INTEGER - , tipo_aplicacao VARCHAR - , cod_ctb INTEGER - , tipo_conta INTEGER - , exercicio CHAR(4) - , conta TEXT - , conta_bancaria TEXT - , conta_corrente TEXT - , cod_orgao INTEGER - , banco VARCHAR - , agencia TEXT - , digito_verificador_agencia TEXT - , digito_verificador_conta_bancaria TEXT - , desc_conta_bancaria VARCHAR - --, cod_plano INTEGER - ) - ON conta_bancaria.cod_conta = pc.cod_conta - AND conta_bancaria.exercicio = pc.exercicio - --AND conta_bancaria.cod_plano = plano_banco.cod_plano - - INNER JOIN contabilidade.conta_credito AS cc - ON pa.cod_plano = cc.cod_plano - AND pa.exercicio = cc.exercicio - - INNER JOIN contabilidade.valor_lancamento AS vl - ON cc.cod_lote = vl.cod_lote - AND cc.tipo = vl.tipo - AND cc.sequencia = vl.sequencia - AND cc.exercicio = vl.exercicio - AND cc.tipo_valor = vl.tipo_valor - AND cc.cod_entidade = vl.cod_entidade - - INNER JOIN contabilidade.lancamento - ON lancamento.exercicio = vl.exercicio - AND lancamento.cod_entidade = vl.cod_entidade - AND lancamento.tipo = vl.tipo - AND lancamento.cod_lote = vl.cod_lote - AND lancamento.sequencia = vl.sequencia - - LEFT JOIN contabilidade.lancamento_receita - ON lancamento_receita.exercicio = lancamento.exercicio - AND lancamento_receita.cod_entidade = lancamento.cod_entidade - AND lancamento_receita.tipo = lancamento.tipo - AND lancamento_receita.cod_lote = lancamento.cod_lote - AND lancamento_receita.sequencia = lancamento.sequencia - - INNER JOIN contabilidade.lote AS lo - ON vl.cod_lote = lo.cod_lote - AND vl.tipo = lo.tipo - AND vl.exercicio = lo.exercicio - AND vl.cod_entidade = lo.cod_entidade - AND lo.dt_lote BETWEEN TO_DATE('".$this->getDado('dtInicio')."','dd/mm/yyyy') AND TO_DATE('".$this->getDado('dtFim')."','dd/mm/yyyy') - AND lo.exercicio = '".$this->getDado('exercicio')."' - - LEFT JOIN orcamento.receita - ON receita.cod_receita = lancamento_receita.cod_receita - AND receita.exercicio = lancamento_receita.exercicio - - LEFT JOIN contabilidade.plano_recurso - ON pa.cod_plano = plano_recurso.cod_plano - AND pa.exercicio = plano_recurso.exercicio - - LEFT JOIN orcamento.recurso - ON recurso.exercicio = plano_recurso.exercicio - AND recurso.cod_recurso = plano_recurso.cod_recurso - - LEFT JOIN contabilidade.lancamento_empenho - ON lancamento_empenho.exercicio = lancamento.exercicio - AND lancamento_empenho.tipo = lancamento.tipo - AND lancamento_empenho.cod_entidade = lancamento.cod_entidade - AND lancamento_empenho.cod_lote = lancamento.cod_lote - AND lancamento_empenho.sequencia = lancamento.sequencia - - LEFT JOIN orcamento.conta_receita - ON conta_receita.exercicio = receita.exercicio - AND conta_receita.cod_conta = receita.cod_conta - - LEFT JOIN tcemg.receita_indentificadores_peculiar_receita - ON receita_indentificadores_peculiar_receita.exercicio = receita.exercicio - AND receita_indentificadores_peculiar_receita.cod_receita = receita.cod_conta - - LEFT JOIN tesouraria.transferencia - ON transferencia.cod_lote = lo.cod_lote - AND transferencia.tipo = lo.tipo - AND transferencia.exercicio = lo.exercicio - AND transferencia.cod_entidade = lo.cod_entidade - - LEFT JOIN tesouraria.transferencia_estornada - ON transferencia_estornada.cod_lote = lo.cod_lote - AND transferencia_estornada.tipo = lo.tipo - AND transferencia_estornada.exercicio = lo.exercicio - AND transferencia_estornada.cod_entidade = lo.cod_entidade + SELECT b.tipo_registro + , '' AS cod_reduzido_mov + , b.cod_orgao + , b.cod_ctb + , LPAD(b.tipo_conta||b.cod_ctb||b.tipo_entr_saida||b.tipo_movimentacao||b.cod_fonte_recursos||LPAD(COALESCE(b.cod_fonte_ctb_transf::VARCHAR,'0'),3,'0'),17,'0') AS cod_ctb_view + , b.cod_fonte_recursos + , b.exercicio + , b.tipo_movimentacao + , b.tipo_entr_saida + , b.cod_ctb_transf AS cod_ctb_transf + , b.tipo_conta||b.cod_ctb AS cod_ctb_transf_view + , b.cod_fonte_ctb_transf + , b.tipo_conta AS tipo_conta + , SUM(b.valor_entr_saida) AS valor_entr_saida + FROM ( + SELECT '21'::int AS tipo_registro + , SUM(vl.vl_lancamento) * -1 as valor_entr_saida + , plano_banco.cod_entidade as cod_orgao + , conta_bancaria.cod_ctb + , conta_bancaria.tipo_aplicacao + , conta_bancaria.tipo_conta::VARCHAR + , pa.exercicio + , plano_recurso.cod_recurso as cod_fonte_recursos + , '2'::VARCHAR AS tipo_movimentacao + , CASE + WHEN lo.tipo = 'A' + AND SUBSTR(REPLACE(conta_receita.cod_estrutural, '.', ''), 1, 1) <> '9' + AND lancamento_receita.estorno = false + AND SUBSTR(REPLACE(conta_receita.cod_estrutural, '.', ''), 1, 4) <> '1325' + THEN '01' + WHEN lo.tipo = 'A' + AND SUBSTR(REPLACE(conta_receita.cod_estrutural, '.', ''), 1, 1) = '9' + AND lancamento_receita.estorno = false + AND SUBSTR(REPLACE(conta_receita.cod_estrutural, '.', ''), 1, 4) <> '1325' + AND RDE.vl_estornado IS NULL + AND ( (ARR.vl_arrecadacao IS NULL) OR (AR.devolucao = true) ) + THEN '02' + WHEN lo.tipo = 'A' + AND lancamento_receita.estorno = true + AND SUBSTR(REPLACE(conta_receita.cod_estrutural, '.', ''), 1, 1) <> '9' + THEN '03' + WHEN SUBSTR(REPLACE(conta_receita.cod_estrutural, '.', ''), 1, 4) = '1325' + THEN '04' + WHEN lo.tipo = 'T' + AND transferencia.cod_tipo = 5 + AND SUBSTR(cod_ctb_transferencia.estrutural_ctb_transfer, 1, 7) <> '1111101' + THEN '06' + WHEN lo.tipo = 'T' + AND transferencia.cod_tipo = 4 + THEN '07' + WHEN lo.tipo = 'P' + AND lancamento_empenho.estorno = false + THEN '08' + WHEN lo.tipo = 'T' + AND transferencia.cod_tipo = 3 + THEN '09' + WHEN lo.tipo = 'P' + AND lancamento_empenho.estorno = true + THEN '10' + WHEN lo.tipo = 'T' + AND transferencia.cod_tipo = 5 + AND SUBSTR(cod_ctb_transferencia.estrutural_ctb_transfer, 1, 7) = '1111101' + THEN '11' + WHEN lo.tipo = 'T' + AND transferencia.cod_tipo = 1 + AND transferencia_estornada.cod_lote_estorno IS NOT NULL + AND ( + SELECT CASE + WHEN COUNT(plano_conta.*) > 0 + THEN TRUE + ELSE FALSE + END + FROM contabilidade.plano_conta + INNER JOIN contabilidade.plano_analitica + ON plano_conta.cod_conta = plano_analitica.cod_conta + AND plano_conta.exercicio = plano_analitica.exercicio + WHERE plano_analitica.cod_plano = transferencia.cod_plano_debito + AND plano_analitica.exercicio = transferencia.exercicio + AND ( + SUBSTR(REPLACE(plano_conta.cod_estrutural, '.', ''), 1, 9) = '351100000' + OR SUBSTR(REPLACE(plano_conta.cod_estrutural, '.', ''), 1, 9) = '351220101' + OR SUBSTR(REPLACE(plano_conta.cod_estrutural, '.', ''), 1, 9) = '351220102' + OR SUBSTR(REPLACE(plano_conta.cod_estrutural, '.', ''), 1, 9) = '351220103' + OR SUBSTR(REPLACE(plano_conta.cod_estrutural, '.', ''), 1, 9) = '351220104' + OR SUBSTR(REPLACE(plano_conta.cod_estrutural, '.', ''), 1, 9) = '351220199' + OR SUBSTR(REPLACE(plano_conta.cod_estrutural, '.', ''), 1, 9) = '351300000' + ) + ) + THEN '12' + WHEN lo.tipo = 'T' + AND transferencia.cod_tipo = 1 + AND ( + SELECT CASE + WHEN COUNT(plano_conta.*) > 0 + THEN TRUE + ELSE FALSE + END + FROM contabilidade.plano_conta + INNER JOIN contabilidade.plano_analitica + ON plano_conta.cod_conta = plano_analitica.cod_conta + AND plano_conta.exercicio = plano_analitica.exercicio + WHERE plano_analitica.cod_plano = transferencia.cod_plano_debito + AND plano_analitica.exercicio = transferencia.exercicio + AND ( + SUBSTR(REPLACE(plano_conta.cod_estrutural, '.', ''), 1, 9) = '351100000' + OR SUBSTR(REPLACE(plano_conta.cod_estrutural, '.', ''), 1, 9) = '351220101' + OR SUBSTR(REPLACE(plano_conta.cod_estrutural, '.', ''), 1, 9) = '351220102' + OR SUBSTR(REPLACE(plano_conta.cod_estrutural, '.', ''), 1, 9) = '351220103' + OR SUBSTR(REPLACE(plano_conta.cod_estrutural, '.', ''), 1, 9) = '351220104' + OR SUBSTR(REPLACE(plano_conta.cod_estrutural, '.', ''), 1, 9) = '351220199' + OR SUBSTR(REPLACE(plano_conta.cod_estrutural, '.', ''), 1, 9) = '351300000' + ) + ) + THEN '13' + WHEN lo.tipo = 'A' + AND SUBSTR(REPLACE(conta_receita.cod_estrutural, '.', ''), 1, 1) = '9' + AND ( + (RDE.vl_estornado IS NOT NULL) + OR ( ARR.vl_arrecadacao IS NOT NULL AND AR.devolucao = false ) + ) + THEN '16' + ELSE '99' + END AS tipo_entr_saida + , CASE + WHEN ( + ( lo.tipo = 'T' AND transferencia.cod_tipo = 5 ) + OR ( lo.tipo = 'T' AND transferencia.cod_tipo = 4 ) + OR ( lo.tipo = 'T' AND transferencia.cod_tipo = 3 ) + ) + AND SUBSTR(cod_ctb_transferencia.estrutural_ctb_transfer, 1, 7) <> '1111101' + THEN (cod_ctb_transferencia.cod_ctb_anterior) + END::VARCHAR AS cod_ctb_transf + , CASE + WHEN ( + ( lo.tipo = 'T' AND transferencia.cod_tipo = 5) + OR (lo.tipo = 'T' AND transferencia.cod_tipo = 3) + OR (lo.tipo = 'T' AND transferencia.cod_tipo = 4) + ) + AND SUBSTR(cod_ctb_transferencia.estrutural_ctb_transfer, 1, 7) <> '1111101' + THEN ( + SELECT plano_recurso.cod_recurso + FROM contabilidade.plano_conta + INNER JOIN contabilidade.plano_analitica + ON plano_conta.cod_conta = plano_analitica.cod_conta + AND plano_conta.exercicio = plano_analitica.exercicio + INNER JOIN contabilidade.plano_recurso + ON plano_recurso.cod_plano = plano_analitica.cod_plano + AND plano_recurso.exercicio = plano_analitica.exercicio + WHERE plano_analitica.cod_plano = transferencia.cod_plano_debito + AND plano_analitica.exercicio = transferencia.exercicio + ) + END::VARCHAR AS cod_fonte_ctb_transf + FROM contabilidade.plano_conta AS pc + INNER JOIN contabilidade.plano_analitica AS pa + ON pc.cod_conta = pa.cod_conta + AND pc.exercicio = pa.exercicio + INNER JOIN contabilidade.plano_banco + ON plano_banco.cod_plano = pa.cod_plano + AND plano_banco.exercicio = pa.exercicio + LEFT JOIN tcemg.contasCTB('".$this->getDado('exercicio')."', '".$this->getDado('entidades')."') as conta_bancaria + ( + cod_conta INTEGER + , tipo_aplicacao VARCHAR + , cod_ctb INTEGER + , tipo_conta INTEGER + , exercicio CHAR(4) + , conta TEXT + , conta_bancaria TEXT + , conta_corrente TEXT + , cod_orgao INTEGER + , banco VARCHAR + , agencia TEXT + , digito_verificador_agencia TEXT + , digito_verificador_conta_bancaria TEXT + , desc_conta_bancaria VARCHAR + ) + ON conta_bancaria.cod_conta = pc.cod_conta + AND conta_bancaria.exercicio = pc.exercicio + INNER JOIN contabilidade.conta_credito AS cc + ON pa.cod_plano = cc.cod_plano + AND pa.exercicio = cc.exercicio + INNER JOIN contabilidade.valor_lancamento AS vl + ON cc.cod_lote = vl.cod_lote + AND cc.tipo = vl.tipo + AND cc.sequencia = vl.sequencia + AND cc.exercicio = vl.exercicio + AND cc.tipo_valor = vl.tipo_valor + AND cc.cod_entidade = vl.cod_entidade + INNER JOIN contabilidade.lancamento + ON lancamento.exercicio = vl.exercicio + AND lancamento.cod_entidade = vl.cod_entidade + AND lancamento.tipo = vl.tipo + AND lancamento.cod_lote = vl.cod_lote + AND lancamento.sequencia = vl.sequencia + LEFT JOIN contabilidade.lancamento_receita + ON lancamento_receita.exercicio = lancamento.exercicio + AND lancamento_receita.cod_entidade = lancamento.cod_entidade + AND lancamento_receita.tipo = lancamento.tipo + AND lancamento_receita.cod_lote = lancamento.cod_lote + AND lancamento_receita.sequencia = lancamento.sequencia + INNER JOIN contabilidade.lote AS lo + ON vl.cod_lote = lo.cod_lote + AND vl.tipo = lo.tipo + AND vl.exercicio = lo.exercicio + AND vl.cod_entidade = lo.cod_entidade + AND lo.dt_lote BETWEEN TO_DATE('".$this->getDado('dtInicio')."','dd/mm/yyyy') AND TO_DATE('".$this->getDado('dtFim')."','dd/mm/yyyy') + AND lo.exercicio = '".$this->getDado('exercicio')."' + LEFT JOIN orcamento.receita + ON receita.cod_receita = lancamento_receita.cod_receita + AND receita.exercicio = lancamento_receita.exercicio + LEFT JOIN contabilidade.plano_recurso + ON pa.cod_plano = plano_recurso.cod_plano + AND pa.exercicio = plano_recurso.exercicio + LEFT JOIN orcamento.recurso + ON recurso.exercicio = plano_recurso.exercicio + AND recurso.cod_recurso = plano_recurso.cod_recurso + LEFT JOIN contabilidade.lancamento_empenho + ON lancamento_empenho.exercicio = lancamento.exercicio + AND lancamento_empenho.tipo = lancamento.tipo + AND lancamento_empenho.cod_entidade = lancamento.cod_entidade + AND lancamento_empenho.cod_lote = lancamento.cod_lote + AND lancamento_empenho.sequencia = lancamento.sequencia + LEFT JOIN orcamento.conta_receita + ON conta_receita.exercicio = receita.exercicio + AND conta_receita.cod_conta = receita.cod_conta + LEFT JOIN tcemg.receita_indentificadores_peculiar_receita + ON receita_indentificadores_peculiar_receita.exercicio = receita.exercicio + AND receita_indentificadores_peculiar_receita.cod_receita = receita.cod_conta + LEFT JOIN tesouraria.transferencia + ON transferencia.cod_lote = lo.cod_lote + AND transferencia.tipo = lo.tipo + AND transferencia.exercicio = lo.exercicio + AND transferencia.cod_entidade = lo.cod_entidade + LEFT JOIN tesouraria.transferencia_estornada + ON transferencia_estornada.cod_lote = lo.cod_lote + AND transferencia_estornada.tipo = lo.tipo + AND transferencia_estornada.exercicio = lo.exercicio + AND transferencia_estornada.cod_entidade = lo.cod_entidade - LEFT JOIN ( - SELECT conta_credito.cod_lote - , conta_credito.tipo - , conta_credito.exercicio - , conta_credito.cod_entidade - , CASE WHEN (conta_bancaria.cod_ctb_anterior is null) THEN transferencia.cod_plano_debito + LEFT JOIN ( + SELECT conta_credito.cod_lote + , conta_credito.tipo + , conta_credito.exercicio + , conta_credito.cod_entidade + , CASE + WHEN (conta_bancaria.cod_ctb_anterior is null) + THEN transferencia.cod_plano_debito Else conta_bancaria.cod_ctb_anterior END AS cod_ctb_anterior - , transferencia.cod_plano_credito - , transferencia.cod_plano_debito - , conta_credito.sequencia - FROM contabilidade.conta_credito - INNER JOIN contabilidade.lote AS lo - ON conta_credito.cod_lote = lo.cod_lote - AND lo.tipo = 'T' - AND conta_credito.exercicio = lo.exercicio - AND conta_credito.cod_entidade = lo.cod_entidade - INNER JOIN tesouraria.transferencia - ON transferencia.cod_plano_credito = conta_credito.cod_plano - AND lo.cod_lote = transferencia.cod_lote - AND transferencia.cod_entidade = lo.cod_entidade - AND transferencia.tipo = 'T' - AND transferencia.exercicio = conta_credito.exercicio - INNER JOIN contabilidade.plano_analitica - ON plano_analitica.cod_plano = transferencia.cod_plano_debito - AND plano_analitica.natureza_saldo = 'D' - AND plano_analitica.exercicio = conta_credito.exercicio - LEFT JOIN tcemg.conta_bancaria - ON conta_bancaria.cod_conta = plano_analitica.cod_conta - AND conta_bancaria.exercicio = plano_analitica.exercicio - WHERE conta_credito.exercicio = '".$this->getDado('exercicio')."' - AND conta_credito.cod_entidade IN (".$this->getDado('entidades').") - AND lo.dt_lote BETWEEN TO_DATE('".$this->getDado('dtInicio')."','dd/mm/yyyy') AND TO_DATE('".$this->getDado('dtFim')."','dd/mm/yyyy') - AND conta_credito.tipo = 'T' - )AS cod_ctb_transferencia - ON cod_ctb_transferencia.exercicio = cc.exercicio - AND cod_ctb_transferencia.sequencia = cc.sequencia - AND cod_ctb_transferencia.cod_lote = cc.cod_lote - AND cod_ctb_transferencia.tipo = cc.tipo - AND cod_ctb_transferencia.cod_plano_credito = cc.cod_plano - - LEFT JOIN tesouraria.arrecadacao_receita_dedutora AS RD - ON RD.cod_receita_dedutora = lancamento_receita.cod_receita - AND RD.vl_deducao = vl.vl_lancamento - AND TO_DATE(RD.timestamp_arrecadacao::VARCHAR,'yyyy-mm-dd') = lo.dt_lote - - LEFT JOIN tesouraria.arrecadacao_receita_dedutora_estornada AS RDE - ON RDE.cod_receita_dedutora = RD.cod_receita_dedutora - AND RDE.cod_arrecadacao = RD.cod_arrecadacao - - LEFT JOIN tesouraria.arrecadacao_receita AS ARR - ON ARR.cod_receita = RD.cod_receita_dedutora - AND TO_DATE(ARR.timestamp_arrecadacao::VARCHAR,'yyyy-mm-dd') = lo.dt_lote - - LEFT JOIN tesouraria.arrecadacao AS AR - ON AR.cod_arrecadacao = ARR.cod_arrecadacao - AND AR.timestamp_arrecadacao = ARR.timestamp_arrecadacao - - WHERE pc.exercicio = '".$this->getDado('exercicio')."' - AND plano_banco.cod_entidade IN (".$this->getDado('entidades').") - AND SUBSTR(REPLACE(pc.cod_estrutural, '.', ''), 1, 7) <> '1111101' - AND vl.tipo <> 'I' - - GROUP BY tipo_registro - , cod_ctb - , conta_bancaria.tipo_aplicacao - , tipo_conta - , plano_banco.cod_entidade - , plano_recurso.cod_recurso - , pa.exercicio - , tipo_entr_saida - , cod_ctb_transf - , cod_fonte_ctb_transf - ) AS b - GROUP BY 1,2,3,4,5,6,7,8,9,10,11,12,13 - ORDER BY cod_ctb,tipo_entr_saida, tipo_movimentacao + , transferencia.cod_plano_credito + , transferencia.cod_plano_debito + , conta_credito.sequencia + , REPLACE(pc.cod_estrutural,'.', '') AS estrutural_ctb_transfer + FROM contabilidade.conta_credito + INNER JOIN contabilidade.lote AS lo + ON conta_credito.cod_lote = lo.cod_lote + AND lo.tipo = 'T' + AND conta_credito.exercicio = lo.exercicio + AND conta_credito.cod_entidade = lo.cod_entidade + INNER JOIN tesouraria.transferencia + ON transferencia.cod_plano_credito = conta_credito.cod_plano + AND lo.cod_lote = transferencia.cod_lote + AND transferencia.cod_entidade = lo.cod_entidade + AND transferencia.tipo = 'T' + AND transferencia.exercicio = conta_credito.exercicio + INNER JOIN contabilidade.plano_analitica + ON plano_analitica.cod_plano = transferencia.cod_plano_debito + AND plano_analitica.natureza_saldo = 'D' + AND plano_analitica.exercicio = conta_credito.exercicio + LEFT JOIN tcemg.conta_bancaria + ON conta_bancaria.cod_conta = plano_analitica.cod_conta + AND conta_bancaria.exercicio = plano_analitica.exercicio + INNER JOIN contabilidade.plano_conta AS pc + ON pc.cod_conta = plano_analitica.cod_conta + AND pc.exercicio = plano_analitica.exercicio + WHERE conta_credito.exercicio = '".$this->getDado('exercicio')."' + AND conta_credito.cod_entidade IN (".$this->getDado('entidades').") + AND lo.dt_lote BETWEEN TO_DATE('".$this->getDado('dtInicio')."','dd/mm/yyyy') AND TO_DATE('".$this->getDado('dtFim')."','dd/mm/yyyy') + AND conta_credito.tipo = 'T' + ) AS cod_ctb_transferencia + ON cod_ctb_transferencia.exercicio = cc.exercicio + AND cod_ctb_transferencia.sequencia = cc.sequencia + AND cod_ctb_transferencia.cod_lote = cc.cod_lote + AND cod_ctb_transferencia.tipo = cc.tipo + AND cod_ctb_transferencia.cod_plano_credito = cc.cod_plano + LEFT JOIN tesouraria.arrecadacao_receita_dedutora AS RD + ON RD.cod_receita_dedutora = lancamento_receita.cod_receita + AND RD.vl_deducao = vl.vl_lancamento + AND TO_DATE(RD.timestamp_arrecadacao::VARCHAR,'yyyy-mm-dd') = lo.dt_lote + LEFT JOIN tesouraria.arrecadacao_receita_dedutora_estornada AS RDE + ON RDE.cod_receita_dedutora = RD.cod_receita_dedutora + AND RDE.cod_arrecadacao = RD.cod_arrecadacao + LEFT JOIN tesouraria.arrecadacao_receita AS ARR + ON ARR.cod_receita = RD.cod_receita_dedutora + AND TO_DATE(ARR.timestamp_arrecadacao::VARCHAR,'yyyy-mm-dd') = lo.dt_lote + LEFT JOIN tesouraria.arrecadacao AS AR + ON AR.cod_arrecadacao = ARR.cod_arrecadacao + AND AR.timestamp_arrecadacao = ARR.timestamp_arrecadacao + WHERE pc.exercicio = '".$this->getDado('exercicio')."' + AND plano_banco.cod_entidade IN (".$this->getDado('entidades').") + AND SUBSTR(REPLACE(pc.cod_estrutural, '.', ''), 1, 7) <> '1111101' + AND vl.tipo <> 'I' + GROUP BY tipo_registro + , cod_ctb + , conta_bancaria.tipo_aplicacao + , tipo_conta + , plano_banco.cod_entidade + , plano_recurso.cod_recurso + , pa.exercicio + , tipo_entr_saida + , cod_ctb_transf + , cod_fonte_ctb_transf + ) AS b + GROUP BY 1,2,3,4,5,6,7,8,9,10,11,12,13 + ORDER BY cod_ctb,tipo_entr_saida, tipo_movimentacao "; return $stSql; } @@ -958,11 +1015,11 @@ class TTCEMGCTB extends Persistente AND plano_banco.exercicio = pa.exercicio LEFT JOIN tcemg.contasCTB('".$this->getDado('exercicio')."', '".$this->getDado('entidades')."') as conta_bancaria ( cod_conta INTEGER - , tipo_aplicacao VARCHAR - , cod_ctb INTEGER - , tipo_conta INTEGER - , exercicio CHAR(4) - , conta TEXT + , tipo_aplicacao VARCHAR + , cod_ctb INTEGER + , tipo_conta INTEGER + , exercicio CHAR(4) + , conta TEXT , conta_bancaria TEXT , conta_corrente TEXT , cod_orgao INTEGER @@ -975,7 +1032,6 @@ class TTCEMGCTB extends Persistente ) ON conta_bancaria.cod_conta = pc.cod_conta AND conta_bancaria.exercicio = pc.exercicio - --AND conta_bancaria.cod_plano = plano_banco.cod_plano INNER JOIN ( SELECT cod_plano , exercicio @@ -1059,7 +1115,6 @@ class TTCEMGCTB extends Persistente LEFT JOIN tesouraria.arrecadacao AS AR ON AR.cod_arrecadacao = ARR.cod_arrecadacao AND AR.timestamp_arrecadacao = ARR.timestamp_arrecadacao - WHERE pc.exercicio = '".$this->getDado('exercicio')."' AND plano_banco.cod_entidade IN (".$this->getDado('entidades').") AND lo.dt_lote BETWEEN TO_DATE('".$this->getDado('dtInicio')."','dd/mm/yyyy') AND TO_DATE('".$this->getDado('dtFim')."','dd/mm/yyyy') @@ -1069,12 +1124,12 @@ class TTCEMGCTB extends Persistente WHERE tipo_entr_saida != '99' GROUP BY c.tipo_registro , c.cod_ctb - , c.tipo_aplicacao - , c.tipo_conta - , c.e_deducao_de_receita - , c.identificador_deducao - , c.natureza_receita - , c.tipo + , c.tipo_aplicacao + , c.tipo_conta + , c.e_deducao_de_receita + , c.identificador_deducao + , c.natureza_receita + , c.tipo , tipo_entr_saida , c.tipo_movimentacao , c.cod_fonte_recursos diff --git a/gestaoPrestacaoContas/fontes/PHP/TCEMG/classes/mapeamento/2015/TTCEMGDispensaInexigibilidade.class.php b/gestaoPrestacaoContas/fontes/PHP/TCEMG/classes/mapeamento/2015/TTCEMGDispensaInexigibilidade.class.php index d8d6ee5..8123384 100755 --- a/gestaoPrestacaoContas/fontes/PHP/TCEMG/classes/mapeamento/2015/TTCEMGDispensaInexigibilidade.class.php +++ b/gestaoPrestacaoContas/fontes/PHP/TCEMG/classes/mapeamento/2015/TTCEMGDispensaInexigibilidade.class.php @@ -28,30 +28,20 @@ * Data de Criação: 15/09/2006 * @author Analista: Gelson W. Gonçalves - * @author Desenvolvedor: Nome do Programador + * @author Desenvolvedor: Jean da Silva * @package URBEM * @subpackage Mapeamento - $Id: TLicitacaoParticipante.class.php 57380 2014-02-28 17:45:35Z diogo.zarpelon $ + $Id: TTCEMGDispensaInexigibilidade.class.php 64106 2015-12-02 19:13:45Z michel $ * Casos de uso: uc-03.05.18 uc-03.05.19 */ include_once '../../../../../../gestaoAdministrativa/fontes/PHP/framework/include/valida.inc.php'; -include_once ( CLA_PERSISTENTE ); +include_once CLA_PERSISTENTE; -/** - * Efetua conexão com a tabela licitacao.participante - * Data de Criação: 15/09/2006 - - * @author Analista: Gelson W. Gonçalves - * @author Desenvolvedor: Thiago La Delfa Cabelleira - - * @package URBEM - * @subpackage Mapeamento -*/ class TTCEMGDispensaInexigibilidade extends Persistente { /** @@ -63,7 +53,7 @@ class TTCEMGDispensaInexigibilidade extends Persistente { return $this->executaRecupera("montaRecuperaExportacao10", $rsRecordSet, $stFiltro, $stOrder, $boTransacao); } - + public function montaRecuperaExportacao10() { $stSql = " @@ -79,111 +69,111 @@ class TTCEMGDispensaInexigibilidade extends Persistente , justificativa_razao.justificativa , justificativa_razao.razao , TO_CHAR(licitacao.timestamp,'ddmmyyyy') AS dt_publicacao_termo_ratificacao - , CASE WHEN tipo_objeto.cod_tipo_objeto = 1 THEN - CASE WHEN (SUM(cotacao_fornecedor_item.vl_cotacao) > 15000) THEN 2 - ELSE 99 - END + , CASE WHEN tipo_objeto.cod_tipo_objeto = 1 THEN + CASE WHEN (SUM(cotacao_fornecedor_item.vl_cotacao) > 15000) THEN 2 + ELSE 99 + END WHEN tipo_objeto.cod_tipo_objeto = 2 THEN - CASE WHEN (SUM(cotacao_fornecedor_item.vl_cotacao) > 8000) THEN 1 - ELSE 99 - END + CASE WHEN (SUM(cotacao_fornecedor_item.vl_cotacao) > 8000) THEN 1 + ELSE 99 + END WHEN tipo_objeto.cod_tipo_objeto = 3 THEN 3 WHEN tipo_objeto.cod_tipo_objeto = 4 THEN 3 END AS natureza_objeto , objeto.descricao AS objeto - , sw_cgm.nom_cgm AS veiculo_publicacao + , sw_cgm.nom_cgm AS veiculo_publicacao , CASE WHEN mapa.cod_tipo_licitacao = 2 THEN 1 WHEN mapa.cod_tipo_licitacao = 1 OR mapa.cod_tipo_licitacao = 3 THEN 2 END AS processo_por_lote - - FROM licitacao.licitacao as licitacao - + + FROM licitacao.licitacao as licitacao + INNER JOIN (SELECT * FROM administracao.configuracao_entidade WHERE configuracao_entidade.cod_modulo = 55 AND configuracao_entidade.parametro = 'tcemg_codigo_orgao_entidade_sicom' + AND configuracao_entidade.exercicio = '".$this->getDado('exercicio')."' ) AS orgao - ON orgao.valor::integer = licitacao.cod_entidade - + ON orgao.cod_entidade = licitacao.cod_entidade + INNER JOIN compras.modalidade ON modalidade.cod_modalidade = licitacao.cod_modalidade - + INNER JOIN compras.objeto ON objeto.cod_objeto = licitacao.cod_objeto - + INNER JOIN compras.tipo_objeto ON tipo_objeto.cod_tipo_objeto = licitacao.cod_tipo_objeto - + INNER JOIN licitacao.edital ON edital.cod_licitacao = licitacao.cod_licitacao AND edital.cod_modalidade = licitacao.cod_modalidade AND edital.cod_entidade = licitacao.cod_entidade AND edital.exercicio_licitacao = licitacao.exercicio - + LEFT JOIN licitacao.publicacao_edital ON publicacao_edital.num_edital = edital.num_edital AND publicacao_edital.exercicio = edital.exercicio - + LEFT JOIN licitacao.veiculos_publicidade ON veiculos_publicidade.numcgm = publicacao_edital.numcgm - + INNER JOIN orcamento.entidade - ON licitacao.cod_entidade = entidade.cod_entidade - AND licitacao.exercicio = entidade.exercicio - - LEFT JOIN sw_cgm + ON licitacao.cod_entidade = entidade.cod_entidade + AND licitacao.exercicio = entidade.exercicio + + LEFT JOIN sw_cgm ON entidade.numcgm = sw_cgm.numcgm - AND sw_cgm.numcgm = veiculos_publicidade.numcgm - + AND sw_cgm.numcgm = veiculos_publicidade.numcgm + INNER JOIN compras.mapa ON mapa.exercicio = licitacao.exercicio_mapa - AND mapa.cod_mapa = licitacao.cod_mapa + AND mapa.cod_mapa = licitacao.cod_mapa INNER JOIN compras.mapa_cotacao - ON mapa.exercicio = mapa_cotacao.exercicio_mapa + ON mapa.exercicio = mapa_cotacao.exercicio_mapa AND mapa.cod_mapa = mapa_cotacao.cod_mapa - + INNER JOIN compras.julgamento - ON julgamento.exercicio = mapa_cotacao.exercicio_cotacao + ON julgamento.exercicio = mapa_cotacao.exercicio_cotacao AND julgamento.cod_cotacao = mapa_cotacao.cod_cotacao - + INNER JOIN compras.julgamento_item - ON julgamento_item.exercicio = julgamento.exercicio + ON julgamento_item.exercicio = julgamento.exercicio AND julgamento_item.cod_cotacao = julgamento.cod_cotacao AND julgamento_item.ordem = 1 - JOIN licitacao.homologacao + INNER JOIN licitacao.homologacao ON homologacao.cod_licitacao=licitacao.cod_licitacao AND homologacao.cod_modalidade=licitacao.cod_modalidade AND homologacao.cod_entidade=licitacao.cod_entidade AND homologacao.exercicio_licitacao=licitacao.exercicio AND homologacao.cod_item=julgamento_item.cod_item AND homologacao.lote=julgamento_item.lote - AND ( - SELECT homologacao_anulada.num_homologacao FROM licitacao.homologacao_anulada - WHERE homologacao_anulada.cod_licitacao=licitacao.cod_licitacao - AND homologacao_anulada.cod_modalidade=licitacao.cod_modalidade - AND homologacao_anulada.cod_entidade=licitacao.cod_entidade - AND homologacao_anulada.exercicio_licitacao=licitacao.exercicio - AND homologacao.num_homologacao=homologacao_anulada.num_homologacao - AND homologacao.cod_item=homologacao_anulada.cod_item - AND homologacao.lote=homologacao_anulada.lote - ) IS NULL - + + LEFT JOIN licitacao.homologacao_anulada + ON homologacao_anulada.cod_licitacao=licitacao.cod_licitacao + AND homologacao_anulada.cod_modalidade=licitacao.cod_modalidade + AND homologacao_anulada.cod_entidade=licitacao.cod_entidade + AND homologacao_anulada.exercicio_licitacao=homologacao.exercicio_licitacao + AND homologacao_anulada.num_homologacao=homologacao.num_homologacao + AND homologacao_anulada.cod_item=homologacao.cod_item + AND homologacao_anulada.lote=homologacao.lote + INNER JOIN compras.cotacao_fornecedor_item ON julgamento_item.exercicio = cotacao_fornecedor_item.exercicio AND julgamento_item.cod_cotacao = cotacao_fornecedor_item.cod_cotacao AND julgamento_item.cod_item = cotacao_fornecedor_item.cod_item AND julgamento_item.cgm_fornecedor = cotacao_fornecedor_item.cgm_fornecedor AND julgamento_item.lote = cotacao_fornecedor_item.lote - - LEFT JOIN licitacao.justificativa_razao - ON justificativa_razao.cod_entidade = licitacao.cod_entidade - AND justificativa_razao.cod_licitacao = licitacao.cod_licitacao - AND justificativa_razao.exercicio = licitacao.exercicio - AND justificativa_razao.cod_modalidade = licitacao.cod_modalidade - - JOIN ( + + LEFT JOIN licitacao.justificativa_razao + ON justificativa_razao.cod_entidade = licitacao.cod_entidade + AND justificativa_razao.cod_licitacao = licitacao.cod_licitacao + AND justificativa_razao.exercicio = licitacao.exercicio + AND justificativa_razao.cod_modalidade = licitacao.cod_modalidade + + INNER JOIN ( SELECT * FROM tcemg.fn_exercicio_numero_licitacao ('".$this->getDado('exercicio')."', '".$this->getDado('entidades')."') VALUES (cod_licitacao INTEGER ,cod_modalidade INTEGER @@ -191,41 +181,42 @@ class TTCEMGDispensaInexigibilidade extends Persistente ,exercicio CHAR(4) ,exercicio_licitacao VARCHAR ,num_licitacao TEXT ) - ) AS config_licitacao - ON config_licitacao.cod_entidade = licitacao.cod_entidade - AND config_licitacao.cod_licitacao = licitacao.cod_licitacao - AND config_licitacao.cod_modalidade = licitacao.cod_modalidade - AND config_licitacao.exercicio = licitacao.exercicio - - WHERE licitacao.cod_entidade in (" . $this->getDado('entidades') . ") - AND TO_DATE(homologacao.timestamp::varchar,'yyyy-mm-dd') BETWEEN TO_DATE('".$this->getDado('dt_inicial')."','dd/mm/yyyy') - AND TO_DATE('".$this->getDado('dt_final')."','dd/mm/yyyy') - AND ( licitacao.cod_modalidade = 8 OR licitacao.cod_modalidade = 9 ) - AND NOT EXISTS( SELECT 1 - FROM licitacao.licitacao_anulada - WHERE licitacao_anulada.cod_licitacao = licitacao.cod_licitacao - AND licitacao_anulada.cod_modalidade = licitacao.cod_modalidade - AND licitacao_anulada.cod_entidade = licitacao.cod_entidade - AND licitacao_anulada.exercicio = licitacao.exercicio - ) - - GROUP BY tipo_registro - , cod_unidade_resp - , cod_orgao_resp - , exercicio_processo - , num_processo - , tipo_processo - , dt_abertura - , dt_publicacao_termo_ratificacao - , objeto,veiculo_publicacao - , processo_por_lote - , justificativa_razao.justificativa - , justificativa_razao.razao - , tipo_objeto.cod_tipo_objeto - , config_licitacao.exercicio_licitacao - , config_licitacao.num_licitacao - - order by num_processo + ) AS config_licitacao + ON config_licitacao.cod_entidade = licitacao.cod_entidade + AND config_licitacao.cod_licitacao = licitacao.cod_licitacao + AND config_licitacao.cod_modalidade = licitacao.cod_modalidade + AND config_licitacao.exercicio = licitacao.exercicio + + WHERE licitacao.cod_entidade in (" . $this->getDado('entidades') . ") + AND homologacao_anulada.cod_licitacao IS NULL + AND TO_DATE(homologacao.timestamp::varchar,'yyyy-mm-dd') BETWEEN TO_DATE('".$this->getDado('dt_inicial')."','dd/mm/yyyy') + AND TO_DATE('".$this->getDado('dt_final')."','dd/mm/yyyy') + AND ( licitacao.cod_modalidade = 8 OR licitacao.cod_modalidade = 9 ) + AND NOT EXISTS( SELECT 1 + FROM licitacao.licitacao_anulada + WHERE licitacao_anulada.cod_licitacao = licitacao.cod_licitacao + AND licitacao_anulada.cod_modalidade = licitacao.cod_modalidade + AND licitacao_anulada.cod_entidade = licitacao.cod_entidade + AND licitacao_anulada.exercicio = licitacao.exercicio + ) + + GROUP BY tipo_registro + , cod_unidade_resp + , cod_orgao_resp + , exercicio_processo + , num_processo + , tipo_processo + , dt_abertura + , dt_publicacao_termo_ratificacao + , objeto,veiculo_publicacao + , processo_por_lote + , justificativa_razao.justificativa + , justificativa_razao.razao + , tipo_objeto.cod_tipo_objeto + , config_licitacao.exercicio_licitacao + , config_licitacao.num_licitacao + + ORDER BY num_processo "; return $stSql; } @@ -245,102 +236,103 @@ class TTCEMGDispensaInexigibilidade extends Persistente , config_licitacao.num_licitacao AS num_processo , CASE WHEN modalidade.cod_modalidade = 8 THEN 1 WHEN modalidade.cod_modalidade = 9 THEN 2 - END AS tipo_processo + END AS tipo_processo , mapa_cotacao.cod_cotacao::INTEGER AS num_lote , 'Lote n.'||mapa_cotacao.cod_cotacao::VARCHAR AS desc_lote FROM licitacao.licitacao - - JOIN (SELECT * - FROM administracao.configuracao_entidade - WHERE configuracao_entidade.cod_modulo = 55 - AND configuracao_entidade.parametro = 'tcemg_codigo_orgao_entidade_sicom' - ) AS orgao - ON orgao.valor::integer = licitacao.cod_entidade - - JOIN compras.objeto + + INNER JOIN (SELECT * + FROM administracao.configuracao_entidade + WHERE configuracao_entidade.cod_modulo = 55 + AND configuracao_entidade.parametro = 'tcemg_codigo_orgao_entidade_sicom' + AND configuracao_entidade.exercicio = '".$this->getDado('exercicio')."' + ) AS orgao + ON orgao.cod_entidade = licitacao.cod_entidade + + INNER JOIN compras.objeto ON objeto.cod_objeto = licitacao.cod_objeto - - JOIN sw_processo + + INNER JOIN sw_processo ON sw_processo.cod_processo = licitacao.cod_processo AND sw_processo.ano_exercicio = licitacao.exercicio_processo - - JOIN compras.modalidade + + INNER JOIN compras.modalidade ON modalidade.cod_modalidade = licitacao.cod_modalidade - - JOIN compras.tipo_objeto + + INNER JOIN compras.tipo_objeto ON tipo_objeto.cod_tipo_objeto = licitacao.cod_tipo_objeto - - JOIN licitacao.edital + + INNER JOIN licitacao.edital ON edital.cod_licitacao = licitacao.cod_licitacao AND edital.cod_modalidade = licitacao.cod_modalidade AND edital.cod_entidade = licitacao.cod_entidade AND edital.exercicio_licitacao = licitacao.exercicio - + LEFT JOIN licitacao.publicacao_edital ON publicacao_edital.num_edital = edital.num_edital AND publicacao_edital.exercicio = edital.exercicio - + LEFT JOIN sw_cgm AS responsavel ON responsavel.numcgm = edital.responsavel_juridico - + LEFT JOIN sw_cgm_pessoa_fisica ON sw_cgm_pessoa_fisica.numcgm = responsavel.numcgm - - JOIN sw_municipio + + INNER JOIN sw_municipio ON sw_municipio.cod_municipio = responsavel.cod_municipio AND sw_municipio.cod_uf = responsavel.cod_uf - - JOIN sw_uf + + INNER JOIN sw_uf ON sw_uf.cod_uf = sw_municipio.cod_uf - - JOIN compras.mapa + + INNER JOIN compras.mapa ON mapa.exercicio = licitacao.exercicio_mapa AND mapa.cod_mapa = licitacao.cod_mapa - - JOIN compras.mapa_cotacao - ON mapa.exercicio = mapa_cotacao.exercicio_mapa + + INNER JOIN compras.mapa_cotacao + ON mapa.exercicio = mapa_cotacao.exercicio_mapa AND mapa.cod_mapa = mapa_cotacao.cod_mapa - - JOIN compras.mapa_solicitacao + + INNER JOIN compras.mapa_solicitacao ON mapa_solicitacao.exercicio = mapa.exercicio AND mapa_solicitacao.cod_mapa = mapa.cod_mapa - - JOIN compras.mapa_item + + INNER JOIN compras.mapa_item ON mapa_item.cod_mapa = mapa_solicitacao.cod_mapa AND mapa_item.exercicio = mapa_solicitacao.exercicio AND mapa_item.cod_entidade = mapa_solicitacao.cod_entidade AND mapa_item.cod_solicitacao = mapa_solicitacao.cod_solicitacao AND mapa_item.exercicio_solicitacao = mapa_solicitacao.exercicio_solicitacao - + INNER JOIN compras.julgamento ON julgamento.exercicio = mapa_cotacao.exercicio_cotacao AND julgamento.cod_cotacao = mapa_cotacao.cod_cotacao - + INNER JOIN compras.julgamento_item - ON julgamento_item.exercicio = julgamento.exercicio + ON julgamento_item.exercicio = julgamento.exercicio AND julgamento_item.cod_cotacao = julgamento.cod_cotacao + AND julgamento_item.cod_item = mapa_item.cod_item AND julgamento_item.ordem = 1 - JOIN licitacao.homologacao + INNER JOIN licitacao.homologacao ON homologacao.cod_licitacao=licitacao.cod_licitacao AND homologacao.cod_modalidade=licitacao.cod_modalidade AND homologacao.cod_entidade=licitacao.cod_entidade AND homologacao.exercicio_licitacao=licitacao.exercicio AND homologacao.cod_item=julgamento_item.cod_item AND homologacao.lote=julgamento_item.lote - AND ( - SELECT homologacao_anulada.num_homologacao FROM licitacao.homologacao_anulada - WHERE homologacao_anulada.cod_licitacao=licitacao.cod_licitacao - AND homologacao_anulada.cod_modalidade=licitacao.cod_modalidade - AND homologacao_anulada.cod_entidade=licitacao.cod_entidade - AND homologacao_anulada.exercicio_licitacao=licitacao.exercicio - AND homologacao.num_homologacao=homologacao_anulada.num_homologacao - AND homologacao.cod_item=homologacao_anulada.cod_item - AND homologacao.lote=homologacao_anulada.lote - ) IS NULL - - JOIN ( + + LEFT JOIN licitacao.homologacao_anulada + ON homologacao_anulada.cod_licitacao=licitacao.cod_licitacao + AND homologacao_anulada.cod_modalidade=licitacao.cod_modalidade + AND homologacao_anulada.cod_entidade=licitacao.cod_entidade + AND homologacao_anulada.exercicio_licitacao=homologacao.exercicio_licitacao + AND homologacao_anulada.num_homologacao=homologacao.num_homologacao + AND homologacao_anulada.cod_item=homologacao.cod_item + AND homologacao_anulada.lote=homologacao.lote + + INNER JOIN ( SELECT * FROM tcemg.fn_exercicio_numero_licitacao ('".$this->getDado('exercicio')."', '".$this->getDado('entidades')."') VALUES (cod_licitacao INTEGER ,cod_modalidade INTEGER @@ -352,20 +344,21 @@ class TTCEMGDispensaInexigibilidade extends Persistente ON config_licitacao.cod_entidade = licitacao.cod_entidade AND config_licitacao.cod_licitacao = licitacao.cod_licitacao AND config_licitacao.cod_modalidade = licitacao.cod_modalidade - AND config_licitacao.exercicio = licitacao.exercicio - + AND config_licitacao.exercicio = licitacao.exercicio + WHERE licitacao.cod_entidade in (" . $this->getDado('entidades') . ") + AND homologacao_anulada.cod_licitacao IS NULL AND TO_DATE(homologacao.timestamp::varchar,'yyyy-mm-dd') BETWEEN TO_DATE('".$this->getDado('dt_inicial')."','dd/mm/yyyy') AND TO_DATE('".$this->getDado('dt_final')."','dd/mm/yyyy') AND ( licitacao.cod_modalidade = 8 OR licitacao.cod_modalidade = 9 ) - AND NOT EXISTS( SELECT 1 - FROM licitacao.licitacao_anulada - WHERE licitacao_anulada.cod_licitacao = licitacao.cod_licitacao - AND licitacao_anulada.cod_modalidade = licitacao.cod_modalidade - AND licitacao_anulada.cod_entidade = licitacao.cod_entidade - AND licitacao_anulada.exercicio = licitacao.exercicio - ) - + AND NOT EXISTS( SELECT 1 + FROM licitacao.licitacao_anulada + WHERE licitacao_anulada.cod_licitacao = licitacao.cod_licitacao + AND licitacao_anulada.cod_modalidade = licitacao.cod_modalidade + AND licitacao_anulada.cod_entidade = licitacao.cod_entidade + AND licitacao_anulada.exercicio = licitacao.exercicio + ) + GROUP BY tipo_registro , cod_orgao_resp , cod_unidade_resp @@ -374,14 +367,14 @@ class TTCEMGDispensaInexigibilidade extends Persistente , tipo_processo , num_lote , desc_lote - , config_licitacao.exercicio_licitacao + , config_licitacao.exercicio_licitacao , config_licitacao.num_licitacao - + ORDER BY num_processo "; return $stSql; } - + public function recuperaExportacao12(&$rsRecordSet,$stFiltro="",$stOrder="",$boTransacao="") { return $this->executaRecupera("montaRecuperaExportacao12",$rsRecordSet,$stFiltro,$stOrder,$boTransacao); @@ -397,90 +390,91 @@ class TTCEMGDispensaInexigibilidade extends Persistente , config_licitacao.num_licitacao AS num_processo , CASE WHEN modalidade.cod_modalidade = 8 THEN 1 WHEN modalidade.cod_modalidade = 9 THEN 2 - END AS tipo_processo + END AS tipo_processo , mapa_item.cod_item AS cod_item , mapa_item.cod_item AS num_item , mapa_cotacao.cod_cotacao::INTEGER AS num_lote - + FROM licitacao.licitacao + + INNER JOIN (SELECT * + FROM administracao.configuracao_entidade + WHERE configuracao_entidade.cod_modulo = 55 + AND configuracao_entidade.parametro = 'tcemg_codigo_orgao_entidade_sicom' + AND configuracao_entidade.exercicio = '".$this->getDado('exercicio')."' + ) AS orgao + ON orgao.cod_entidade = licitacao.cod_entidade - JOIN (SELECT * - FROM administracao.configuracao_entidade - WHERE configuracao_entidade.cod_modulo = 55 - AND configuracao_entidade.parametro = 'tcemg_codigo_orgao_entidade_sicom' - ) AS orgao - ON orgao.valor::integer = licitacao.cod_entidade - - JOIN compras.objeto + INNER JOIN compras.objeto ON objeto.cod_objeto = licitacao.cod_objeto - - JOIN sw_processo + + INNER JOIN sw_processo ON sw_processo.cod_processo = licitacao.cod_processo AND sw_processo.ano_exercicio = licitacao.exercicio_processo - - JOIN compras.modalidade + + INNER JOIN compras.modalidade ON modalidade.cod_modalidade = licitacao.cod_modalidade - - JOIN compras.tipo_objeto + + INNER JOIN compras.tipo_objeto ON tipo_objeto.cod_tipo_objeto = licitacao.cod_tipo_objeto - - JOIN licitacao.edital + + INNER JOIN licitacao.edital ON edital.cod_licitacao = licitacao.cod_licitacao AND edital.cod_modalidade = licitacao.cod_modalidade AND edital.cod_entidade = licitacao.cod_entidade AND edital.exercicio_licitacao = licitacao.exercicio - + LEFT JOIN licitacao.publicacao_edital ON publicacao_edital.num_edital = edital.num_edital AND publicacao_edital.exercicio = edital.exercicio - - JOIN compras.mapa + + INNER JOIN compras.mapa ON mapa.exercicio = licitacao.exercicio_mapa AND mapa.cod_mapa = licitacao.cod_mapa - - JOIN compras.mapa_cotacao - ON mapa.exercicio = mapa_cotacao.exercicio_mapa + + INNER JOIN compras.mapa_cotacao + ON mapa.exercicio = mapa_cotacao.exercicio_mapa AND mapa.cod_mapa = mapa_cotacao.cod_mapa - - JOIN compras.mapa_solicitacao + + INNER JOIN compras.mapa_solicitacao ON mapa_solicitacao.exercicio = mapa.exercicio AND mapa_solicitacao.cod_mapa = mapa.cod_mapa - - JOIN compras.mapa_item + + INNER JOIN compras.mapa_item ON mapa_item.cod_mapa = mapa_solicitacao.cod_mapa AND mapa_item.exercicio = mapa_solicitacao.exercicio AND mapa_item.cod_entidade = mapa_solicitacao.cod_entidade AND mapa_item.cod_solicitacao = mapa_solicitacao.cod_solicitacao AND mapa_item.exercicio_solicitacao = mapa_solicitacao.exercicio_solicitacao - - INNER JOIN compras.julgamento + + INNER JOIN compras.julgamento ON julgamento.exercicio = mapa_cotacao.exercicio_cotacao AND julgamento.cod_cotacao = mapa_cotacao.cod_cotacao - + INNER JOIN compras.julgamento_item - ON julgamento_item.exercicio = julgamento.exercicio + ON julgamento_item.exercicio = julgamento.exercicio AND julgamento_item.cod_cotacao = julgamento.cod_cotacao + AND julgamento_item.cod_item = mapa_item.cod_item AND julgamento_item.ordem = 1 - JOIN licitacao.homologacao + INNER JOIN licitacao.homologacao ON homologacao.cod_licitacao=licitacao.cod_licitacao AND homologacao.cod_modalidade=licitacao.cod_modalidade AND homologacao.cod_entidade=licitacao.cod_entidade AND homologacao.exercicio_licitacao=licitacao.exercicio AND homologacao.cod_item=julgamento_item.cod_item AND homologacao.lote=julgamento_item.lote - AND ( - SELECT homologacao_anulada.num_homologacao FROM licitacao.homologacao_anulada - WHERE homologacao_anulada.cod_licitacao=licitacao.cod_licitacao - AND homologacao_anulada.cod_modalidade=licitacao.cod_modalidade - AND homologacao_anulada.cod_entidade=licitacao.cod_entidade - AND homologacao_anulada.exercicio_licitacao=licitacao.exercicio - AND homologacao.num_homologacao=homologacao_anulada.num_homologacao - AND homologacao.cod_item=homologacao_anulada.cod_item - AND homologacao.lote=homologacao_anulada.lote - ) IS NULL - - JOIN ( + + LEFT JOIN licitacao.homologacao_anulada + ON homologacao_anulada.cod_licitacao=licitacao.cod_licitacao + AND homologacao_anulada.cod_modalidade=licitacao.cod_modalidade + AND homologacao_anulada.cod_entidade=licitacao.cod_entidade + AND homologacao_anulada.exercicio_licitacao=homologacao.exercicio_licitacao + AND homologacao_anulada.num_homologacao=homologacao.num_homologacao + AND homologacao_anulada.cod_item=homologacao.cod_item + AND homologacao_anulada.lote=homologacao.lote + + INNER JOIN ( SELECT * FROM tcemg.fn_exercicio_numero_licitacao ('".$this->getDado('exercicio')."', '".$this->getDado('entidades')."') VALUES (cod_licitacao INTEGER ,cod_modalidade INTEGER @@ -492,19 +486,21 @@ class TTCEMGDispensaInexigibilidade extends Persistente ON config_licitacao.cod_entidade = licitacao.cod_entidade AND config_licitacao.cod_licitacao = licitacao.cod_licitacao AND config_licitacao.cod_modalidade = licitacao.cod_modalidade - AND config_licitacao.exercicio = licitacao.exercicio - + AND config_licitacao.exercicio = licitacao.exercicio + WHERE licitacao.cod_entidade in (" . $this->getDado('entidades') . ") + AND homologacao_anulada.cod_licitacao IS NULL AND TO_DATE(homologacao.timestamp::varchar,'yyyy-mm-dd') BETWEEN TO_DATE('".$this->getDado('dt_inicial')."','dd/mm/yyyy') AND TO_DATE('".$this->getDado('dt_final')."','dd/mm/yyyy') AND ( licitacao.cod_modalidade = 8 OR licitacao.cod_modalidade = 9 ) - AND NOT EXISTS( SELECT 1 - FROM licitacao.licitacao_anulada - WHERE licitacao_anulada.cod_licitacao = licitacao.cod_licitacao - AND licitacao_anulada.cod_modalidade = licitacao.cod_modalidade - AND licitacao_anulada.cod_entidade = licitacao.cod_entidade - AND licitacao_anulada.exercicio = licitacao.exercicio - ) + AND NOT EXISTS( SELECT 1 + FROM licitacao.licitacao_anulada + WHERE licitacao_anulada.cod_licitacao = licitacao.cod_licitacao + AND licitacao_anulada.cod_modalidade = licitacao.cod_modalidade + AND licitacao_anulada.cod_entidade = licitacao.cod_entidade + AND licitacao_anulada.exercicio = licitacao.exercicio + ) + GROUP BY tipo_registro , cod_orgao_resp , cod_unidade_resp @@ -514,9 +510,9 @@ class TTCEMGDispensaInexigibilidade extends Persistente , mapa_item.cod_item , num_item , mapa_cotacao.cod_cotacao - , config_licitacao.exercicio_licitacao + , config_licitacao.exercicio_licitacao , config_licitacao.num_licitacao - + ORDER BY num_processo "; return $stSql; @@ -537,102 +533,103 @@ class TTCEMGDispensaInexigibilidade extends Persistente , config_licitacao.num_licitacao AS num_processo , CASE WHEN modalidade.cod_modalidade = 8 THEN 1 WHEN modalidade.cod_modalidade = 9 THEN 2 - END AS tipo_processo + END AS tipo_processo , mapa_cotacao.cod_cotacao::INTEGER AS num_lote , mapa_item.cod_item AS cod_item - + FROM licitacao.licitacao - - JOIN (SELECT * - FROM administracao.configuracao_entidade - WHERE configuracao_entidade.cod_modulo = 55 - AND configuracao_entidade.parametro = 'tcemg_codigo_orgao_entidade_sicom' - ) AS orgao - ON orgao.valor::integer = licitacao.cod_entidade - - JOIN compras.objeto + + INNER JOIN (SELECT * + FROM administracao.configuracao_entidade + WHERE configuracao_entidade.cod_modulo = 55 + AND configuracao_entidade.parametro = 'tcemg_codigo_orgao_entidade_sicom' + AND configuracao_entidade.exercicio = '".$this->getDado('exercicio')."' + ) AS orgao + ON orgao.cod_entidade = licitacao.cod_entidade + + INNER JOIN compras.objeto ON objeto.cod_objeto = licitacao.cod_objeto - - JOIN sw_processo + + INNER JOIN sw_processo ON sw_processo.cod_processo = licitacao.cod_processo AND sw_processo.ano_exercicio = licitacao.exercicio_processo - - JOIN compras.modalidade + + INNER JOIN compras.modalidade ON modalidade.cod_modalidade = licitacao.cod_modalidade - - JOIN compras.tipo_objeto + + INNER JOIN compras.tipo_objeto ON tipo_objeto.cod_tipo_objeto = licitacao.cod_tipo_objeto - - JOIN licitacao.edital + + INNER JOIN licitacao.edital ON edital.cod_licitacao = licitacao.cod_licitacao AND edital.cod_modalidade = licitacao.cod_modalidade AND edital.cod_entidade = licitacao.cod_entidade AND edital.exercicio_licitacao = licitacao.exercicio - + LEFT JOIN licitacao.publicacao_edital ON publicacao_edital.num_edital = edital.num_edital AND publicacao_edital.exercicio = edital.exercicio - - JOIN sw_cgm AS responsavel + + INNER JOIN sw_cgm AS responsavel ON responsavel.numcgm = edital.responsavel_juridico - - JOIN sw_cgm_pessoa_fisica + + INNER JOIN sw_cgm_pessoa_fisica ON sw_cgm_pessoa_fisica.numcgm = responsavel.numcgm - - JOIN sw_municipio + + INNER JOIN sw_municipio ON sw_municipio.cod_municipio = responsavel.cod_municipio AND sw_municipio.cod_uf = responsavel.cod_uf - - JOIN sw_uf + + INNER JOIN sw_uf ON sw_uf.cod_uf = sw_municipio.cod_uf - - JOIN compras.mapa + + INNER JOIN compras.mapa ON mapa.exercicio = licitacao.exercicio_mapa AND mapa.cod_mapa = licitacao.cod_mapa - - JOIN compras.mapa_cotacao - ON mapa.exercicio = mapa_cotacao.exercicio_mapa + + INNER JOIN compras.mapa_cotacao + ON mapa.exercicio = mapa_cotacao.exercicio_mapa AND mapa.cod_mapa = mapa_cotacao.cod_mapa - - JOIN compras.mapa_solicitacao + + INNER JOIN compras.mapa_solicitacao ON mapa_solicitacao.exercicio = mapa.exercicio AND mapa_solicitacao.cod_mapa = mapa.cod_mapa - - JOIN compras.mapa_item + + INNER JOIN compras.mapa_item ON mapa_item.cod_mapa = mapa_solicitacao.cod_mapa AND mapa_item.exercicio = mapa_solicitacao.exercicio AND mapa_item.cod_entidade = mapa_solicitacao.cod_entidade AND mapa_item.cod_solicitacao = mapa_solicitacao.cod_solicitacao AND mapa_item.exercicio_solicitacao = mapa_solicitacao.exercicio_solicitacao - + INNER JOIN compras.julgamento ON julgamento.exercicio = mapa_cotacao.exercicio_cotacao AND julgamento.cod_cotacao = mapa_cotacao.cod_cotacao - + INNER JOIN compras.julgamento_item - ON julgamento_item.exercicio = julgamento.exercicio + ON julgamento_item.exercicio = julgamento.exercicio AND julgamento_item.cod_cotacao = julgamento.cod_cotacao + AND julgamento_item.cod_item = mapa_item.cod_item AND julgamento_item.ordem = 1 - JOIN licitacao.homologacao + INNER JOIN licitacao.homologacao ON homologacao.cod_licitacao=licitacao.cod_licitacao AND homologacao.cod_modalidade=licitacao.cod_modalidade AND homologacao.cod_entidade=licitacao.cod_entidade AND homologacao.exercicio_licitacao=licitacao.exercicio AND homologacao.cod_item=julgamento_item.cod_item AND homologacao.lote=julgamento_item.lote - AND ( - SELECT homologacao_anulada.num_homologacao FROM licitacao.homologacao_anulada - WHERE homologacao_anulada.cod_licitacao=licitacao.cod_licitacao - AND homologacao_anulada.cod_modalidade=licitacao.cod_modalidade - AND homologacao_anulada.cod_entidade=licitacao.cod_entidade - AND homologacao_anulada.exercicio_licitacao=licitacao.exercicio - AND homologacao.num_homologacao=homologacao_anulada.num_homologacao - AND homologacao.cod_item=homologacao_anulada.cod_item - AND homologacao.lote=homologacao_anulada.lote - ) IS NULL - - JOIN ( + + LEFT JOIN licitacao.homologacao_anulada + ON homologacao_anulada.cod_licitacao=licitacao.cod_licitacao + AND homologacao_anulada.cod_modalidade=licitacao.cod_modalidade + AND homologacao_anulada.cod_entidade=licitacao.cod_entidade + AND homologacao_anulada.exercicio_licitacao=homologacao.exercicio_licitacao + AND homologacao_anulada.num_homologacao=homologacao.num_homologacao + AND homologacao_anulada.cod_item=homologacao.cod_item + AND homologacao_anulada.lote=homologacao.lote + + INNER JOIN ( SELECT * FROM tcemg.fn_exercicio_numero_licitacao ('".$this->getDado('exercicio')."', '".$this->getDado('entidades')."') VALUES (cod_licitacao INTEGER ,cod_modalidade INTEGER @@ -645,19 +642,20 @@ class TTCEMGDispensaInexigibilidade extends Persistente AND config_licitacao.cod_licitacao = licitacao.cod_licitacao AND config_licitacao.cod_modalidade = licitacao.cod_modalidade AND config_licitacao.exercicio = licitacao.exercicio - + WHERE licitacao.cod_entidade in (" . $this->getDado('entidades') . ") + AND homologacao_anulada.cod_licitacao IS NULL AND TO_DATE(homologacao.timestamp::varchar,'yyyy-mm-dd') BETWEEN TO_DATE('".$this->getDado('dt_inicial')."','dd/mm/yyyy') AND TO_DATE('".$this->getDado('dt_final')."','dd/mm/yyyy') AND (licitacao.cod_modalidade = 8 OR licitacao.cod_modalidade = 9) - AND NOT EXISTS( SELECT 1 - FROM licitacao.licitacao_anulada - WHERE licitacao_anulada.cod_licitacao = licitacao.cod_licitacao - AND licitacao_anulada.cod_modalidade = licitacao.cod_modalidade - AND licitacao_anulada.cod_entidade = licitacao.cod_entidade - AND licitacao_anulada.exercicio = licitacao.exercicio + AND NOT EXISTS( SELECT 1 + FROM licitacao.licitacao_anulada + WHERE licitacao_anulada.cod_licitacao = licitacao.cod_licitacao + AND licitacao_anulada.cod_modalidade = licitacao.cod_modalidade + AND licitacao_anulada.cod_entidade = licitacao.cod_entidade + AND licitacao_anulada.exercicio = licitacao.exercicio ) - + GROUP BY tipo_registro , cod_orgao_resp , cod_unidade_resp @@ -666,8 +664,9 @@ class TTCEMGDispensaInexigibilidade extends Persistente , tipo_processo , num_lote , mapa_item.cod_item - , config_licitacao.exercicio_licitacao + , config_licitacao.exercicio_licitacao , config_licitacao.num_licitacao + ORDER BY num_processo "; return $stSql; @@ -686,105 +685,106 @@ class TTCEMGDispensaInexigibilidade extends Persistente , LPAD(LPAD(licitacao.num_orgao::VARCHAR, 2, '0')||LPAD(licitacao.num_unidade::VARCHAR, 2, '0'),5,'0') AS cod_unidade_resp , config_licitacao.exercicio_licitacao AS exercicio_processo , config_licitacao.num_licitacao AS num_processo - , CASE WHEN modalidade.cod_modalidade = 8 THEN 1 + , CASE WHEN modalidade.cod_modalidade = 8 THEN 1 WHEN modalidade.cod_modalidade = 9 THEN 2 - END AS tipo_processo + END AS tipo_processo , 1 AS tipo_resp , sw_cgm_pessoa_fisica.cpf AS num_cpf_resp , mapa_cotacao.cod_cotacao::INTEGER AS num_lote - + FROM licitacao.licitacao - - JOIN (SELECT * - FROM administracao.configuracao_entidade - WHERE configuracao_entidade.cod_modulo = 55 - AND configuracao_entidade.parametro = 'tcemg_codigo_orgao_entidade_sicom' - ) AS orgao - ON orgao.valor::integer = licitacao.cod_entidade - - JOIN compras.objeto + + INNER JOIN (SELECT * + FROM administracao.configuracao_entidade + WHERE configuracao_entidade.cod_modulo = 55 + AND configuracao_entidade.parametro = 'tcemg_codigo_orgao_entidade_sicom' + AND configuracao_entidade.exercicio = '".$this->getDado('exercicio')."' + ) AS orgao + ON orgao.cod_entidade = licitacao.cod_entidade + + INNER JOIN compras.objeto ON objeto.cod_objeto = licitacao.cod_objeto - - JOIN sw_processo + + INNER JOIN sw_processo ON sw_processo.cod_processo = licitacao.cod_processo AND sw_processo.ano_exercicio = licitacao.exercicio_processo - - JOIN compras.modalidade + + INNER JOIN compras.modalidade ON modalidade.cod_modalidade = licitacao.cod_modalidade - - JOIN compras.tipo_objeto + + INNER JOIN compras.tipo_objeto ON tipo_objeto.cod_tipo_objeto = licitacao.cod_tipo_objeto - - JOIN licitacao.edital + + INNER JOIN licitacao.edital ON edital.cod_licitacao = licitacao.cod_licitacao AND edital.cod_modalidade = licitacao.cod_modalidade AND edital.cod_entidade = licitacao.cod_entidade AND edital.exercicio_licitacao = licitacao.exercicio - + LEFT JOIN licitacao.publicacao_edital ON publicacao_edital.num_edital = edital.num_edital AND publicacao_edital.exercicio = edital.exercicio - + LEFT JOIN sw_cgm AS responsavel ON responsavel.numcgm = edital.responsavel_juridico - + LEFT JOIN sw_cgm_pessoa_fisica ON sw_cgm_pessoa_fisica.numcgm = responsavel.numcgm - - JOIN sw_municipio + + INNER JOIN sw_municipio ON sw_municipio.cod_municipio = responsavel.cod_municipio AND sw_municipio.cod_uf = responsavel.cod_uf - - JOIN sw_uf + + INNER JOIN sw_uf ON sw_uf.cod_uf = sw_municipio.cod_uf - - JOIN compras.mapa + + INNER JOIN compras.mapa ON mapa.exercicio = licitacao.exercicio_mapa AND mapa.cod_mapa = licitacao.cod_mapa - - JOIN compras.mapa_solicitacao + + INNER JOIN compras.mapa_solicitacao ON mapa_solicitacao.exercicio = mapa.exercicio AND mapa_solicitacao.cod_mapa = mapa.cod_mapa - - JOIN compras.mapa_cotacao - ON mapa.exercicio = mapa_cotacao.exercicio_mapa + + INNER JOIN compras.mapa_cotacao + ON mapa.exercicio = mapa_cotacao.exercicio_mapa AND mapa.cod_mapa = mapa_cotacao.cod_mapa - - JOIN compras.mapa_item + + INNER JOIN compras.mapa_item ON mapa_item.cod_mapa = mapa_solicitacao.cod_mapa AND mapa_item.exercicio = mapa_solicitacao.exercicio AND mapa_item.cod_entidade = mapa_solicitacao.cod_entidade AND mapa_item.cod_solicitacao = mapa_solicitacao.cod_solicitacao AND mapa_item.exercicio_solicitacao = mapa_solicitacao.exercicio_solicitacao - + INNER JOIN compras.julgamento ON julgamento.exercicio = mapa_cotacao.exercicio_cotacao AND julgamento.cod_cotacao = mapa_cotacao.cod_cotacao - + INNER JOIN compras.julgamento_item - ON julgamento_item.exercicio = julgamento.exercicio + ON julgamento_item.exercicio = julgamento.exercicio AND julgamento_item.cod_cotacao = julgamento.cod_cotacao + AND julgamento_item.cod_item = mapa_item.cod_item AND julgamento_item.ordem = 1 - JOIN licitacao.homologacao + INNER JOIN licitacao.homologacao ON homologacao.cod_licitacao=licitacao.cod_licitacao AND homologacao.cod_modalidade=licitacao.cod_modalidade AND homologacao.cod_entidade=licitacao.cod_entidade AND homologacao.exercicio_licitacao=licitacao.exercicio AND homologacao.cod_item=julgamento_item.cod_item AND homologacao.lote=julgamento_item.lote - AND ( - SELECT homologacao_anulada.num_homologacao FROM licitacao.homologacao_anulada - WHERE homologacao_anulada.cod_licitacao=licitacao.cod_licitacao - AND homologacao_anulada.cod_modalidade=licitacao.cod_modalidade - AND homologacao_anulada.cod_entidade=licitacao.cod_entidade - AND homologacao_anulada.exercicio_licitacao=licitacao.exercicio - AND homologacao.num_homologacao=homologacao_anulada.num_homologacao - AND homologacao.cod_item=homologacao_anulada.cod_item - AND homologacao.lote=homologacao_anulada.lote - ) IS NULL - - JOIN ( + + LEFT JOIN licitacao.homologacao_anulada + ON homologacao_anulada.cod_licitacao=licitacao.cod_licitacao + AND homologacao_anulada.cod_modalidade=licitacao.cod_modalidade + AND homologacao_anulada.cod_entidade=licitacao.cod_entidade + AND homologacao_anulada.exercicio_licitacao=homologacao.exercicio_licitacao + AND homologacao_anulada.num_homologacao=homologacao.num_homologacao + AND homologacao_anulada.cod_item=homologacao.cod_item + AND homologacao_anulada.lote=homologacao.lote + + INNER JOIN ( SELECT * FROM tcemg.fn_exercicio_numero_licitacao ('".$this->getDado('exercicio')."', '".$this->getDado('entidades')."') VALUES (cod_licitacao INTEGER ,cod_modalidade INTEGER @@ -797,18 +797,20 @@ class TTCEMGDispensaInexigibilidade extends Persistente AND config_licitacao.cod_licitacao = licitacao.cod_licitacao AND config_licitacao.cod_modalidade = licitacao.cod_modalidade AND config_licitacao.exercicio = licitacao.exercicio - + WHERE licitacao.cod_entidade in (" . $this->getDado('entidades') . ") + AND homologacao_anulada.cod_licitacao IS NULL AND TO_DATE(homologacao.timestamp::varchar,'yyyy-mm-dd') BETWEEN TO_DATE('".$this->getDado('dt_inicial')."','dd/mm/yyyy') AND TO_DATE('".$this->getDado('dt_final')."','dd/mm/yyyy') AND ( licitacao.cod_modalidade = 8 OR licitacao.cod_modalidade = 9 ) - AND NOT EXISTS( SELECT 1 - FROM licitacao.licitacao_anulada - WHERE licitacao_anulada.cod_licitacao = licitacao.cod_licitacao - AND licitacao_anulada.cod_modalidade = licitacao.cod_modalidade - AND licitacao_anulada.cod_entidade = licitacao.cod_entidade - AND licitacao_anulada.exercicio = licitacao.exercicio - ) + AND NOT EXISTS( SELECT 1 + FROM licitacao.licitacao_anulada + WHERE licitacao_anulada.cod_licitacao = licitacao.cod_licitacao + AND licitacao_anulada.cod_modalidade = licitacao.cod_modalidade + AND licitacao_anulada.cod_entidade = licitacao.cod_entidade + AND licitacao_anulada.exercicio = licitacao.exercicio + ) + GROUP BY tipo_registro , cod_orgao_resp , cod_unidade_resp @@ -818,8 +820,9 @@ class TTCEMGDispensaInexigibilidade extends Persistente , tipo_resp , num_cpf_resp , mapa_cotacao.cod_cotacao - , config_licitacao.exercicio_licitacao + , config_licitacao.exercicio_licitacao , config_licitacao.num_licitacao + ORDER BY num_processo "; return $stSql; @@ -833,113 +836,113 @@ class TTCEMGDispensaInexigibilidade extends Persistente public function montaRecuperaExportacao15() { $stSql = " - SELECT 15 AS tipo_registro - , LPAD(orgao.valor::VARCHAR, 2, '0') AS cod_orgao_resp - , LPAD(LPAD(licitacao.num_orgao::VARCHAR, 2, '0')||LPAD(licitacao.num_unidade::VARCHAR, 2, '0'),5,'0') AS cod_unidade_resp - , config_licitacao.exercicio_licitacao AS exercicio_processo - , config_licitacao.num_licitacao AS num_processo - , CASE WHEN modalidade.cod_modalidade = 8 THEN 1 - WHEN modalidade.cod_modalidade = 9 THEN 2 + SELECT 15 AS tipo_registro + , LPAD(orgao.valor::VARCHAR, 2, '0') AS cod_orgao_resp + , LPAD(LPAD(licitacao.num_orgao::VARCHAR, 2, '0')||LPAD(licitacao.num_unidade::VARCHAR, 2, '0'),5,'0') AS cod_unidade_resp + , config_licitacao.exercicio_licitacao AS exercicio_processo + , config_licitacao.num_licitacao AS num_processo + , CASE WHEN modalidade.cod_modalidade = 8 THEN 1 + WHEN modalidade.cod_modalidade = 9 THEN 2 END AS tipo_processo - , mapa_item.cod_item AS cod_item - , TRUNC((mapa_item.vl_total/mapa_item.quantidade), 2)::NUMERIC(14,4) AS vl_cot_precos_unitario - , mapa_item.quantidade AS quantidade - , CASE WHEN mapa.cod_tipo_licitacao = 2 THEN mapa_cotacao.cod_cotacao::VARCHAR - ELSE ' ' - END AS num_lote - + , mapa_item.cod_item AS cod_item + , TRUNC((mapa_item.vl_total/mapa_item.quantidade), 2)::NUMERIC(14,4) AS vl_cot_precos_unitario + , mapa_item.quantidade AS quantidade + , CASE WHEN mapa.cod_tipo_licitacao = 2 THEN mapa_cotacao.cod_cotacao::VARCHAR + ELSE ' ' + END AS num_lote FROM licitacao.licitacao - - JOIN (SELECT * - FROM administracao.configuracao_entidade - WHERE configuracao_entidade.cod_modulo = 55 - AND configuracao_entidade.parametro = 'tcemg_codigo_orgao_entidade_sicom' - ) AS orgao - ON orgao.valor::integer = licitacao.cod_entidade - - JOIN compras.objeto + + INNER JOIN (SELECT * + FROM administracao.configuracao_entidade + WHERE configuracao_entidade.cod_modulo = 55 + AND configuracao_entidade.parametro = 'tcemg_codigo_orgao_entidade_sicom' + AND configuracao_entidade.exercicio = '".$this->getDado('exercicio')."' + ) AS orgao + ON orgao.cod_entidade = licitacao.cod_entidade + + INNER JOIN compras.objeto ON objeto.cod_objeto = licitacao.cod_objeto - - JOIN sw_processo + + INNER JOIN sw_processo ON sw_processo.cod_processo = licitacao.cod_processo AND sw_processo.ano_exercicio = licitacao.exercicio_processo - - JOIN compras.modalidade + + INNER JOIN compras.modalidade ON modalidade.cod_modalidade = licitacao.cod_modalidade - - JOIN compras.tipo_objeto + + INNER JOIN compras.tipo_objeto ON tipo_objeto.cod_tipo_objeto = licitacao.cod_tipo_objeto - - JOIN licitacao.edital + + INNER JOIN licitacao.edital ON edital.cod_licitacao = licitacao.cod_licitacao AND edital.cod_modalidade = licitacao.cod_modalidade AND edital.cod_entidade = licitacao.cod_entidade AND edital.exercicio_licitacao = licitacao.exercicio - + LEFT JOIN licitacao.publicacao_edital ON publicacao_edital.num_edital = edital.num_edital AND publicacao_edital.exercicio = edital.exercicio - - JOIN sw_cgm AS responsavel + + INNER JOIN sw_cgm AS responsavel ON responsavel.numcgm = edital.responsavel_juridico - - JOIN sw_cgm_pessoa_fisica + + INNER JOIN sw_cgm_pessoa_fisica ON sw_cgm_pessoa_fisica.numcgm = responsavel.numcgm - - JOIN sw_municipio + + INNER JOIN sw_municipio ON sw_municipio.cod_municipio = responsavel.cod_municipio AND sw_municipio.cod_uf = responsavel.cod_uf - - JOIN sw_uf + + INNER JOIN sw_uf ON sw_uf.cod_uf = sw_municipio.cod_uf - - JOIN compras.mapa + + INNER JOIN compras.mapa ON mapa.exercicio = licitacao.exercicio_mapa AND mapa.cod_mapa = licitacao.cod_mapa - - JOIN compras.mapa_cotacao - ON mapa.exercicio = mapa_cotacao.exercicio_mapa + + INNER JOIN compras.mapa_cotacao + ON mapa.exercicio = mapa_cotacao.exercicio_mapa AND mapa.cod_mapa = mapa_cotacao.cod_mapa - - JOIN compras.mapa_solicitacao + + INNER JOIN compras.mapa_solicitacao ON mapa_solicitacao.exercicio = mapa.exercicio AND mapa_solicitacao.cod_mapa = mapa.cod_mapa - - JOIN compras.mapa_item + + INNER JOIN compras.mapa_item ON mapa_item.cod_mapa = mapa_solicitacao.cod_mapa AND mapa_item.exercicio = mapa_solicitacao.exercicio AND mapa_item.cod_entidade = mapa_solicitacao.cod_entidade AND mapa_item.cod_solicitacao = mapa_solicitacao.cod_solicitacao AND mapa_item.exercicio_solicitacao = mapa_solicitacao.exercicio_solicitacao - + INNER JOIN compras.julgamento ON julgamento.exercicio = mapa_cotacao.exercicio_cotacao AND julgamento.cod_cotacao = mapa_cotacao.cod_cotacao - + INNER JOIN compras.julgamento_item - ON julgamento_item.exercicio = julgamento.exercicio + ON julgamento_item.exercicio = julgamento.exercicio AND julgamento_item.cod_cotacao = julgamento.cod_cotacao + AND julgamento_item.cod_item = mapa_item.cod_item AND julgamento_item.ordem = 1 - JOIN licitacao.homologacao + INNER JOIN licitacao.homologacao ON homologacao.cod_licitacao=licitacao.cod_licitacao AND homologacao.cod_modalidade=licitacao.cod_modalidade AND homologacao.cod_entidade=licitacao.cod_entidade AND homologacao.exercicio_licitacao=licitacao.exercicio AND homologacao.cod_item=julgamento_item.cod_item AND homologacao.lote=julgamento_item.lote - AND ( - SELECT homologacao_anulada.num_homologacao FROM licitacao.homologacao_anulada - WHERE homologacao_anulada.cod_licitacao=licitacao.cod_licitacao - AND homologacao_anulada.cod_modalidade=licitacao.cod_modalidade - AND homologacao_anulada.cod_entidade=licitacao.cod_entidade - AND homologacao_anulada.exercicio_licitacao=licitacao.exercicio - AND homologacao.num_homologacao=homologacao_anulada.num_homologacao - AND homologacao.cod_item=homologacao_anulada.cod_item - AND homologacao.lote=homologacao_anulada.lote - ) IS NULL - - JOIN compras.mapa_item_dotacao + + LEFT JOIN licitacao.homologacao_anulada + ON homologacao_anulada.cod_licitacao=licitacao.cod_licitacao + AND homologacao_anulada.cod_modalidade=licitacao.cod_modalidade + AND homologacao_anulada.cod_entidade=licitacao.cod_entidade + AND homologacao_anulada.exercicio_licitacao=homologacao.exercicio_licitacao + AND homologacao_anulada.num_homologacao=homologacao.num_homologacao + AND homologacao_anulada.cod_item=homologacao.cod_item + AND homologacao_anulada.lote=homologacao.lote + + INNER JOIN compras.mapa_item_dotacao ON mapa_item_dotacao.exercicio = mapa_item.exercicio AND mapa_item_dotacao.cod_mapa = mapa_item.cod_mapa AND mapa_item_dotacao.exercicio_solicitacao = mapa_item.exercicio_solicitacao @@ -948,12 +951,12 @@ class TTCEMGDispensaInexigibilidade extends Persistente AND mapa_item_dotacao.cod_centro = mapa_item.cod_centro AND mapa_item_dotacao.cod_item = mapa_item.cod_item AND mapa_item_dotacao.lote = mapa_item.lote - - JOIN orcamento.despesa + + INNER JOIN orcamento.despesa ON despesa.exercicio = mapa_item_dotacao.exercicio AND despesa.cod_despesa = mapa_item_dotacao.cod_despesa - - JOIN ( + + INNER JOIN ( SELECT * FROM tcemg.fn_exercicio_numero_licitacao ('".$this->getDado('exercicio')."', '".$this->getDado('entidades')."') VALUES (cod_licitacao INTEGER ,cod_modalidade INTEGER @@ -965,19 +968,21 @@ class TTCEMGDispensaInexigibilidade extends Persistente ON config_licitacao.cod_entidade = licitacao.cod_entidade AND config_licitacao.cod_licitacao = licitacao.cod_licitacao AND config_licitacao.cod_modalidade = licitacao.cod_modalidade - AND config_licitacao.exercicio = licitacao.exercicio - + AND config_licitacao.exercicio = licitacao.exercicio + WHERE licitacao.cod_entidade in (" . $this->getDado('entidades') . ") + AND homologacao_anulada.cod_licitacao IS NULL AND TO_DATE(homologacao.timestamp::varchar,'yyyy-mm-dd') BETWEEN TO_DATE('".$this->getDado('dt_inicial')."','dd/mm/yyyy') AND TO_DATE('".$this->getDado('dt_final')."','dd/mm/yyyy') AND ( licitacao.cod_modalidade = 8 OR licitacao.cod_modalidade = 9 ) - AND NOT EXISTS( SELECT 1 - FROM licitacao.licitacao_anulada - WHERE licitacao_anulada.cod_licitacao = licitacao.cod_licitacao - AND licitacao_anulada.cod_modalidade = licitacao.cod_modalidade - AND licitacao_anulada.cod_entidade = licitacao.cod_entidade - AND licitacao_anulada.exercicio = licitacao.exercicio - ) + AND NOT EXISTS( SELECT 1 + FROM licitacao.licitacao_anulada + WHERE licitacao_anulada.cod_licitacao = licitacao.cod_licitacao + AND licitacao_anulada.cod_modalidade = licitacao.cod_modalidade + AND licitacao_anulada.cod_entidade = licitacao.cod_entidade + AND licitacao_anulada.exercicio = licitacao.exercicio + ) + GROUP BY tipo_registro , cod_orgao_resp , cod_unidade_resp @@ -989,10 +994,10 @@ class TTCEMGDispensaInexigibilidade extends Persistente , mapa_item.quantidade , mapa_cotacao.cod_cotacao , mapa.cod_tipo_licitacao - , config_licitacao.exercicio_licitacao + , config_licitacao.exercicio_licitacao , config_licitacao.num_licitacao - - ORDER BY num_processo + + ORDER BY num_processo "; return $stSql; } @@ -1005,120 +1010,119 @@ class TTCEMGDispensaInexigibilidade extends Persistente public function montaRecuperaExportacao16() { $stSql = " - SELECT 16 AS tipo_registro - , LPAD(orgao.valor::VARCHAR, 2, '0') AS cod_orgao_resp - , LPAD(LPAD(licitacao.num_orgao::VARCHAR, 2, '0')||LPAD(licitacao.num_unidade::VARCHAR, 2, '0'),5,'0') AS cod_unidade_resp - , config_licitacao.exercicio_licitacao AS exercicio_processo - , config_licitacao.num_licitacao AS num_processo - , CASE WHEN modalidade.cod_modalidade = 8 THEN 1 - WHEN modalidade.cod_modalidade = 9 THEN 2 + SELECT 16 AS tipo_registro + , LPAD(orgao.valor::VARCHAR, 2, '0') AS cod_orgao_resp + , LPAD(LPAD(licitacao.num_orgao::VARCHAR, 2, '0')||LPAD(licitacao.num_unidade::VARCHAR, 2, '0'),5,'0') AS cod_unidade_resp + , config_licitacao.exercicio_licitacao AS exercicio_processo + , config_licitacao.num_licitacao AS num_processo + , CASE WHEN modalidade.cod_modalidade = 8 THEN 1 + WHEN modalidade.cod_modalidade = 9 THEN 2 END AS tipo_processo - , LPAD(orgao.valor::VARCHAR, 2, '0') AS cod_orgao - , LPAD(LPAD(despesa.num_orgao::VARCHAR, 2, '0')||LPAD(despesa.num_unidade::VARCHAR, 2, '0'),5,'0') AS cod_subunidade - , LPAD(despesa.cod_funcao::VARCHAR, 2, '0') AS cod_funcao - , despesa.cod_subfuncao AS cod_subfuncao - , LPAD(ppa_programa.num_programa::VARCHAR, 4, '0') AS cod_programa - - , LPAD((ppa_acao.num_acao::varchar), 4, '0') AS id_acao - - , '0000' AS id_sub_acao - , REPLACE(conta_despesa.cod_estrutural, '.', '') AS natureza_despesa - , despesa.cod_recurso AS cod_font_recurso - , despesa.vl_original vl_recurso - , mapa_cotacao.cod_cotacao::INTEGER AS num_lote - + , LPAD(orgao.valor::VARCHAR, 2, '0') AS cod_orgao + , LPAD(LPAD(despesa.num_orgao::VARCHAR, 2, '0')||LPAD(despesa.num_unidade::VARCHAR, 2, '0'),5,'0') AS cod_subunidade + , LPAD(despesa.cod_funcao::VARCHAR, 2, '0') AS cod_funcao + , despesa.cod_subfuncao AS cod_subfuncao + , LPAD(ppa_programa.num_programa::VARCHAR, 4, '0') AS cod_programa + , LPAD((ppa_acao.num_acao::varchar), 4, '0') AS id_acao + , '0000' AS id_sub_acao + , REPLACE(conta_despesa.cod_estrutural, '.', '') AS natureza_despesa + , despesa.cod_recurso AS cod_font_recurso + , despesa.vl_original vl_recurso + , mapa_cotacao.cod_cotacao::INTEGER AS num_lote + FROM licitacao.licitacao - - JOIN (SELECT * - FROM administracao.configuracao_entidade - WHERE configuracao_entidade.cod_modulo = 55 - AND configuracao_entidade.parametro = 'tcemg_codigo_orgao_entidade_sicom' - ) AS orgao - ON orgao.valor::integer = licitacao.cod_entidade - - JOIN compras.objeto + + INNER JOIN (SELECT * + FROM administracao.configuracao_entidade + WHERE configuracao_entidade.cod_modulo = 55 + AND configuracao_entidade.parametro = 'tcemg_codigo_orgao_entidade_sicom' + AND configuracao_entidade.exercicio = '".$this->getDado('exercicio')."' + ) AS orgao + ON orgao.cod_entidade = licitacao.cod_entidade + + INNER JOIN compras.objeto ON objeto.cod_objeto = licitacao.cod_objeto - - JOIN sw_processo + + INNER JOIN sw_processo ON sw_processo.cod_processo = licitacao.cod_processo AND sw_processo.ano_exercicio = licitacao.exercicio_processo - - JOIN compras.modalidade + + INNER JOIN compras.modalidade ON modalidade.cod_modalidade = licitacao.cod_modalidade - - JOIN compras.tipo_objeto + + INNER JOIN compras.tipo_objeto ON tipo_objeto.cod_tipo_objeto = licitacao.cod_tipo_objeto - - JOIN licitacao.edital + + INNER JOIN licitacao.edital ON edital.cod_licitacao = licitacao.cod_licitacao AND edital.cod_modalidade = licitacao.cod_modalidade AND edital.cod_entidade = licitacao.cod_entidade AND edital.exercicio_licitacao = licitacao.exercicio - + LEFT JOIN licitacao.publicacao_edital ON publicacao_edital.num_edital = edital.num_edital AND publicacao_edital.exercicio = edital.exercicio - + LEFT JOIN sw_cgm AS responsavel ON responsavel.numcgm = edital.responsavel_juridico - + LEFT JOIN sw_cgm_pessoa_fisica ON sw_cgm_pessoa_fisica.numcgm = responsavel.numcgm - - JOIN sw_municipio + + INNER JOIN sw_municipio ON sw_municipio.cod_municipio = responsavel.cod_municipio AND sw_municipio.cod_uf = responsavel.cod_uf - - JOIN sw_uf + + INNER JOIN sw_uf ON sw_uf.cod_uf = sw_municipio.cod_uf - - JOIN compras.mapa + + INNER JOIN compras.mapa ON mapa.exercicio = licitacao.exercicio_mapa AND mapa.cod_mapa = licitacao.cod_mapa - - JOIN compras.mapa_cotacao - ON mapa.exercicio = mapa_cotacao.exercicio_mapa + + INNER JOIN compras.mapa_cotacao + ON mapa.exercicio = mapa_cotacao.exercicio_mapa AND mapa.cod_mapa = mapa_cotacao.cod_mapa - - JOIN compras.mapa_solicitacao + + INNER JOIN compras.mapa_solicitacao ON mapa_solicitacao.exercicio = mapa.exercicio AND mapa_solicitacao.cod_mapa = mapa.cod_mapa - - JOIN compras.mapa_item + + INNER JOIN compras.mapa_item ON mapa_item.cod_mapa = mapa_solicitacao.cod_mapa AND mapa_item.exercicio = mapa_solicitacao.exercicio AND mapa_item.cod_entidade = mapa_solicitacao.cod_entidade AND mapa_item.cod_solicitacao = mapa_solicitacao.cod_solicitacao AND mapa_item.exercicio_solicitacao = mapa_solicitacao.exercicio_solicitacao - + INNER JOIN compras.julgamento ON julgamento.exercicio = mapa_cotacao.exercicio_cotacao AND julgamento.cod_cotacao = mapa_cotacao.cod_cotacao INNER JOIN compras.julgamento_item - ON julgamento_item.exercicio = julgamento.exercicio + ON julgamento_item.exercicio = julgamento.exercicio AND julgamento_item.cod_cotacao = julgamento.cod_cotacao + AND julgamento_item.cod_item = mapa_item.cod_item AND julgamento_item.ordem = 1 - JOIN licitacao.homologacao + INNER JOIN licitacao.homologacao ON homologacao.cod_licitacao=licitacao.cod_licitacao AND homologacao.cod_modalidade=licitacao.cod_modalidade AND homologacao.cod_entidade=licitacao.cod_entidade AND homologacao.exercicio_licitacao=licitacao.exercicio AND homologacao.cod_item=julgamento_item.cod_item AND homologacao.lote=julgamento_item.lote - AND ( - SELECT homologacao_anulada.num_homologacao FROM licitacao.homologacao_anulada - WHERE homologacao_anulada.cod_licitacao=licitacao.cod_licitacao - AND homologacao_anulada.cod_modalidade=licitacao.cod_modalidade - AND homologacao_anulada.cod_entidade=licitacao.cod_entidade - AND homologacao_anulada.exercicio_licitacao=licitacao.exercicio - AND homologacao.num_homologacao=homologacao_anulada.num_homologacao - AND homologacao.cod_item=homologacao_anulada.cod_item - AND homologacao.lote=homologacao_anulada.lote - ) IS NULL - - JOIN compras.mapa_item_dotacao + + LEFT JOIN licitacao.homologacao_anulada + ON homologacao_anulada.cod_licitacao=licitacao.cod_licitacao + AND homologacao_anulada.cod_modalidade=licitacao.cod_modalidade + AND homologacao_anulada.cod_entidade=licitacao.cod_entidade + AND homologacao_anulada.exercicio_licitacao=homologacao.exercicio_licitacao + AND homologacao_anulada.num_homologacao=homologacao.num_homologacao + AND homologacao_anulada.cod_item=homologacao.cod_item + AND homologacao_anulada.lote=homologacao.lote + + INNER JOIN compras.mapa_item_dotacao ON mapa_item_dotacao.exercicio = mapa_item.exercicio AND mapa_item_dotacao.cod_mapa = mapa_item.cod_mapa AND mapa_item_dotacao.exercicio_solicitacao = mapa_item.exercicio_solicitacao @@ -1127,38 +1131,38 @@ class TTCEMGDispensaInexigibilidade extends Persistente AND mapa_item_dotacao.cod_centro = mapa_item.cod_centro AND mapa_item_dotacao.cod_item = mapa_item.cod_item AND mapa_item_dotacao.lote = mapa_item.lote - - JOIN orcamento.despesa + + INNER JOIN orcamento.despesa ON despesa.exercicio = mapa_item_dotacao.exercicio AND despesa.cod_despesa = mapa_item_dotacao.cod_despesa - - JOIN orcamento.programa + + INNER JOIN orcamento.programa ON programa.exercicio = despesa.exercicio AND programa.cod_programa = despesa.cod_programa - - JOIN orcamento.programa_ppa_programa + + INNER JOIN orcamento.programa_ppa_programa ON programa_ppa_programa.exercicio = programa.exercicio AND programa_ppa_programa.cod_programa = programa.cod_programa - JOIN ppa.programa AS ppa_programa + INNER JOIN ppa.programa AS ppa_programa ON ppa_programa.cod_programa = programa_ppa_programa.cod_programa_ppa - - JOIN orcamento.pao + + INNER JOIN orcamento.pao ON despesa.num_pao = pao.num_pao AND despesa.exercicio = pao.exercicio - - JOIN orcamento.pao_ppa_acao + + INNER JOIN orcamento.pao_ppa_acao ON pao_ppa_acao.num_pao = pao.num_pao AND pao_ppa_acao.exercicio = pao.exercicio - - JOIN ppa.acao AS ppa_acao + + INNER JOIN ppa.acao AS ppa_acao ON ppa_acao.cod_acao = pao_ppa_acao.cod_acao - - JOIN orcamento.conta_despesa AS conta_despesa + + INNER JOIN orcamento.conta_despesa AS conta_despesa ON conta_despesa.exercicio = despesa.exercicio AND conta_despesa.cod_conta = despesa.cod_conta - - JOIN ( + + INNER JOIN ( SELECT * FROM tcemg.fn_exercicio_numero_licitacao ('".$this->getDado('exercicio')."', '".$this->getDado('entidades')."') VALUES (cod_licitacao INTEGER ,cod_modalidade INTEGER @@ -1171,19 +1175,20 @@ class TTCEMGDispensaInexigibilidade extends Persistente AND config_licitacao.cod_licitacao = licitacao.cod_licitacao AND config_licitacao.cod_modalidade = licitacao.cod_modalidade AND config_licitacao.exercicio = licitacao.exercicio - + WHERE licitacao.cod_entidade in (" . $this->getDado('entidades') . ") + AND homologacao_anulada.cod_licitacao IS NULL AND TO_DATE(homologacao.timestamp::varchar,'yyyy-mm-dd') BETWEEN TO_DATE('".$this->getDado('dt_inicial')."','dd/mm/yyyy') AND TO_DATE('".$this->getDado('dt_final')."','dd/mm/yyyy') AND ( licitacao.cod_modalidade = 8 OR licitacao.cod_modalidade = 9 ) - AND NOT EXISTS( SELECT 1 - FROM licitacao.licitacao_anulada - WHERE licitacao_anulada.cod_licitacao = licitacao.cod_licitacao - AND licitacao_anulada.cod_modalidade = licitacao.cod_modalidade - AND licitacao_anulada.cod_entidade = licitacao.cod_entidade - AND licitacao_anulada.exercicio = licitacao.exercicio - ) - + AND NOT EXISTS( SELECT 1 + FROM licitacao.licitacao_anulada + WHERE licitacao_anulada.cod_licitacao = licitacao.cod_licitacao + AND licitacao_anulada.cod_modalidade = licitacao.cod_modalidade + AND licitacao_anulada.cod_entidade = licitacao.cod_entidade + AND licitacao_anulada.exercicio = licitacao.exercicio + ) + GROUP BY tipo_registro , cod_orgao_resp , cod_unidade_resp @@ -1201,8 +1206,9 @@ class TTCEMGDispensaInexigibilidade extends Persistente , cod_font_recurso , vl_recurso , mapa_cotacao.cod_cotacao - , config_licitacao.exercicio_licitacao + , config_licitacao.exercicio_licitacao , config_licitacao.num_licitacao + ORDER BY num_processo"; return $stSql; @@ -1221,14 +1227,13 @@ class TTCEMGDispensaInexigibilidade extends Persistente , LPAD(LPAD(licitacao.num_orgao::VARCHAR, 2, '0')||LPAD(licitacao.num_unidade::VARCHAR, 2, '0'),5,'0') AS cod_unidade_resp , config_licitacao.exercicio_licitacao AS exercicio_processo , config_licitacao.num_licitacao AS num_processo - , CASE WHEN modalidade.cod_modalidade = 8 THEN 1 + , CASE WHEN modalidade.cod_modalidade = 8 THEN 1 WHEN modalidade.cod_modalidade = 9 THEN 2 - END AS tipo_processo + END AS tipo_processo , documento_pessoa.tipo_documento AS tipo_documento , documento_pessoa.num_documento AS num_documento , sw_cgm_pessoa_juridica.insc_estadual AS num_inscricao_estadual , sw_uf.sigla_uf AS uf_inscricao_estadual - , CASE WHEN certificacao_documentos.cod_documento = 5 AND documento_pessoa.tipo_documento = 2 THEN certificacao_documentos.num_certificacao::VARCHAR ELSE '' END AS num_certidao_regularidade_inss , CASE WHEN certificacao_documentos.cod_documento = 5 AND documento_pessoa.tipo_documento = 2 THEN TO_CHAR(certificacao_documentos.dt_emissao,'dd/mm/yyyy') ELSE '' END AS dt_emissao_certidao_regularidade_inss , CASE WHEN certificacao_documentos.cod_documento = 5 AND documento_pessoa.tipo_documento = 2 THEN TO_CHAR(certificacao_documentos.dt_validade,'dd/mm/yyyy') ELSE '' END AS dt_validade_certidao_regularidade_inss @@ -1238,131 +1243,132 @@ class TTCEMGDispensaInexigibilidade extends Persistente , CASE WHEN certificacao_documentos.cod_documento = 7 AND documento_pessoa.tipo_documento = 2 THEN certificacao_documentos.num_certificacao::VARCHAR ELSE '' END AS num_cndt , CASE WHEN certificacao_documentos.cod_documento = 7 AND documento_pessoa.tipo_documento = 2 THEN TO_CHAR(certificacao_documentos.dt_emissao,'dd/mm/yyyy') ELSE '' END AS dt_emissao_cndt , CASE WHEN certificacao_documentos.cod_documento = 7 AND documento_pessoa.tipo_documento = 2 THEN TO_CHAR(certificacao_documentos.dt_validade,'dd/mm/yyyy') ELSE '' END AS dt_validade_cndt - , CASE WHEN mapa.cod_tipo_licitacao = 2 THEN mapa_cotacao.cod_cotacao::VARCHAR ELSE ' ' END AS num_lote , mapa_item.cod_item AS cod_item , mapa_item.quantidade AS quantidade , mapa_item.vl_total::NUMERIC(14,4) AS valor_item - + FROM licitacao.licitacao - - JOIN (SELECT * - FROM administracao.configuracao_entidade - WHERE configuracao_entidade.cod_modulo = 55 - AND configuracao_entidade.parametro = 'tcemg_codigo_orgao_entidade_sicom' - ) AS orgao - ON orgao.valor::integer = licitacao.cod_entidade - - JOIN compras.objeto + + INNER JOIN (SELECT * + FROM administracao.configuracao_entidade + WHERE configuracao_entidade.cod_modulo = 55 + AND configuracao_entidade.parametro = 'tcemg_codigo_orgao_entidade_sicom' + AND configuracao_entidade.exercicio = '".$this->getDado('exercicio')."' + ) AS orgao + ON orgao.cod_entidade = licitacao.cod_entidade + + INNER JOIN compras.objeto ON objeto.cod_objeto = licitacao.cod_objeto - - JOIN sw_processo + + INNER JOIN sw_processo ON sw_processo.cod_processo = licitacao.cod_processo AND sw_processo.ano_exercicio = licitacao.exercicio_processo - - JOIN compras.modalidade + + INNER JOIN compras.modalidade ON modalidade.cod_modalidade = licitacao.cod_modalidade - - JOIN compras.tipo_objeto + + INNER JOIN compras.tipo_objeto ON tipo_objeto.cod_tipo_objeto = licitacao.cod_tipo_objeto - - JOIN licitacao.edital + + INNER JOIN licitacao.edital ON edital.cod_licitacao = licitacao.cod_licitacao AND edital.cod_modalidade = licitacao.cod_modalidade AND edital.cod_entidade = licitacao.cod_entidade AND edital.exercicio_licitacao = licitacao.exercicio - + LEFT JOIN licitacao.publicacao_edital ON publicacao_edital.num_edital = edital.num_edital AND publicacao_edital.exercicio = edital.exercicio - - JOIN sw_cgm AS responsavel + + INNER JOIN sw_cgm AS responsavel ON responsavel.numcgm = edital.responsavel_juridico - + LEFT JOIN sw_cgm_pessoa_juridica ON sw_cgm_pessoa_juridica.numcgm = responsavel.numcgm - + LEFT JOIN ( SELECT num_documento, numcgm, tipo_documento FROM ( SELECT cpf AS num_documento, numcgm, 1 AS tipo_documento FROM sw_cgm_pessoa_fisica - UNION - SELECT cnpj AS num_documento, numcgm, 2 AS tipo_documento FROM sw_cgm_pessoa_juridica ) AS tabela GROUP BY numcgm, num_documento, tipo_documento ) AS documento_pessoa ON documento_pessoa.numcgm = responsavel.numcgm - - JOIN sw_municipio + + INNER JOIN sw_municipio ON sw_municipio.cod_municipio = responsavel.cod_municipio AND sw_municipio.cod_uf = responsavel.cod_uf - - JOIN sw_uf + + INNER JOIN sw_uf ON sw_uf.cod_uf = sw_municipio.cod_uf - - JOIN compras.mapa + + INNER JOIN compras.mapa ON mapa.exercicio = licitacao.exercicio_mapa AND mapa.cod_mapa = licitacao.cod_mapa - - JOIN compras.mapa_solicitacao + + INNER JOIN compras.mapa_solicitacao ON mapa_solicitacao.exercicio = mapa.exercicio AND mapa_solicitacao.cod_mapa = mapa.cod_mapa - - JOIN compras.mapa_cotacao - ON mapa.exercicio = mapa_cotacao.exercicio_mapa + + INNER JOIN compras.mapa_cotacao + ON mapa.exercicio = mapa_cotacao.exercicio_mapa AND mapa.cod_mapa = mapa_cotacao.cod_mapa - - JOIN compras.mapa_item + + INNER JOIN compras.mapa_item ON mapa_item.cod_mapa = mapa_solicitacao.cod_mapa AND mapa_item.exercicio = mapa_solicitacao.exercicio AND mapa_item.cod_entidade = mapa_solicitacao.cod_entidade AND mapa_item.cod_solicitacao = mapa_solicitacao.cod_solicitacao AND mapa_item.exercicio_solicitacao = mapa_solicitacao.exercicio_solicitacao - + INNER JOIN compras.julgamento ON julgamento.exercicio = mapa_cotacao.exercicio_cotacao AND julgamento.cod_cotacao = mapa_cotacao.cod_cotacao - + INNER JOIN compras.julgamento_item - ON julgamento_item.exercicio = julgamento.exercicio + ON julgamento_item.exercicio = julgamento.exercicio AND julgamento_item.cod_cotacao = julgamento.cod_cotacao + AND julgamento_item.cod_item = mapa_item.cod_item AND julgamento_item.ordem = 1 - JOIN licitacao.homologacao + INNER JOIN licitacao.homologacao ON homologacao.cod_licitacao=licitacao.cod_licitacao AND homologacao.cod_modalidade=licitacao.cod_modalidade AND homologacao.cod_entidade=licitacao.cod_entidade AND homologacao.exercicio_licitacao=licitacao.exercicio AND homologacao.cod_item=julgamento_item.cod_item AND homologacao.lote=julgamento_item.lote - AND ( - SELECT homologacao_anulada.num_homologacao FROM licitacao.homologacao_anulada - WHERE homologacao_anulada.cod_licitacao=licitacao.cod_licitacao - AND homologacao_anulada.cod_modalidade=licitacao.cod_modalidade - AND homologacao_anulada.cod_entidade=licitacao.cod_entidade - AND homologacao_anulada.exercicio_licitacao=licitacao.exercicio - AND homologacao.num_homologacao=homologacao_anulada.num_homologacao - AND homologacao.cod_item=homologacao_anulada.cod_item - AND homologacao.lote=homologacao_anulada.lote - ) IS NULL - - JOIN licitacao.licitacao_documentos + + LEFT JOIN licitacao.homologacao_anulada + ON homologacao_anulada.cod_licitacao=licitacao.cod_licitacao + AND homologacao_anulada.cod_modalidade=licitacao.cod_modalidade + AND homologacao_anulada.cod_entidade=licitacao.cod_entidade + AND homologacao_anulada.exercicio_licitacao=homologacao.exercicio_licitacao + AND homologacao_anulada.num_homologacao=homologacao.num_homologacao + AND homologacao_anulada.cod_item=homologacao.cod_item + AND homologacao_anulada.lote=homologacao.lote + + INNER JOIN licitacao.licitacao_documentos ON licitacao_documentos.cod_licitacao = licitacao.cod_licitacao AND licitacao_documentos.cod_entidade = licitacao.cod_entidade AND licitacao_documentos.exercicio = licitacao.exercicio - - JOIN licitacao.documento + AND licitacao_documentos.cod_modalidade = licitacao.cod_modalidade + + INNER JOIN licitacao.documento ON documento.cod_documento = licitacao_documentos.cod_documento - + LEFT JOIN licitacao.certificacao_documentos ON certificacao_documentos.cod_documento = documento.cod_documento - - JOIN ( + AND certificacao_documentos.cgm_fornecedor = julgamento_item.cgm_fornecedor + AND certificacao_documentos.exercicio = licitacao_documentos.exercicio + + INNER JOIN ( SELECT * FROM tcemg.fn_exercicio_numero_licitacao ('".$this->getDado('exercicio')."', '".$this->getDado('entidades')."') VALUES (cod_licitacao INTEGER ,cod_modalidade INTEGER @@ -1377,17 +1383,18 @@ class TTCEMGDispensaInexigibilidade extends Persistente AND config_licitacao.exercicio = licitacao.exercicio WHERE licitacao.cod_entidade in (" . $this->getDado('entidades') . ") + AND homologacao_anulada.cod_licitacao IS NULL AND TO_DATE(homologacao.timestamp::varchar,'yyyy-mm-dd') BETWEEN TO_DATE('".$this->getDado('dt_inicial')."','dd/mm/yyyy') AND TO_DATE('".$this->getDado('dt_final')."','dd/mm/yyyy') AND ( licitacao.cod_modalidade = 8 OR licitacao.cod_modalidade = 9 ) - AND NOT EXISTS( SELECT 1 + AND NOT EXISTS( SELECT 1 FROM licitacao.licitacao_anulada - WHERE licitacao_anulada.cod_licitacao = licitacao.cod_licitacao - AND licitacao_anulada.cod_modalidade = licitacao.cod_modalidade - AND licitacao_anulada.cod_entidade = licitacao.cod_entidade - AND licitacao_anulada.exercicio = licitacao.exercicio + WHERE licitacao_anulada.cod_licitacao = licitacao.cod_licitacao + AND licitacao_anulada.cod_modalidade = licitacao.cod_modalidade + AND licitacao_anulada.cod_entidade = licitacao.cod_entidade + AND licitacao_anulada.exercicio = licitacao.exercicio ) - + GROUP BY tipo_registro , cod_orgao_resp , cod_unidade_resp @@ -1413,9 +1420,9 @@ class TTCEMGDispensaInexigibilidade extends Persistente , valor_item , mapa_cotacao.cod_cotacao , mapa.cod_tipo_licitacao - , config_licitacao.exercicio_licitacao + , config_licitacao.exercicio_licitacao , config_licitacao.num_licitacao - + ORDER BY num_processo"; return $stSql; @@ -1434,9 +1441,9 @@ class TTCEMGDispensaInexigibilidade extends Persistente , LPAD(LPAD(licitacao.num_orgao::VARCHAR, 2, '0')||LPAD(licitacao.num_unidade::VARCHAR, 2, '0'),5,'0') AS cod_unidade_resp , config_licitacao.exercicio_licitacao AS exercicio_processo , config_licitacao.num_licitacao AS num_processo - , CASE WHEN modalidade.cod_modalidade = 8 THEN 1 + , CASE WHEN modalidade.cod_modalidade = 8 THEN 1 WHEN modalidade.cod_modalidade = 9 THEN 2 - END AS tipo_processo + END AS tipo_processo , documento_pessoa.tipo_documento AS tipo_documento , documento_pessoa.num_documento AS num_documento , TO_CHAR (participante_certificacao.dt_registro, 'dd/mm/yyyy') AS dt_credenciamento @@ -1455,129 +1462,131 @@ class TTCEMGDispensaInexigibilidade extends Persistente , CASE WHEN certificacao_documentos.cod_documento = 7 THEN certificacao_documentos.num_certificacao ELSE 0 END AS num_cndt , CASE WHEN certificacao_documentos.cod_documento = 7 THEN TO_CHAR(certificacao_documentos.dt_emissao,'dd/mm/yyyy') ELSE '' END AS dt_emissao_cndt , CASE WHEN certificacao_documentos.cod_documento = 7 THEN TO_CHAR(certificacao_documentos.dt_validade,'dd/mm/yyyy') ELSE '' END AS dt_validade_cndt - + FROM licitacao.licitacao - - JOIN (SELECT * - FROM administracao.configuracao_entidade - WHERE configuracao_entidade.cod_modulo = 55 - AND configuracao_entidade.parametro = 'tcemg_codigo_orgao_entidade_sicom' - ) AS orgao - ON orgao.valor::integer = licitacao.cod_entidade - - JOIN compras.objeto + + INNER JOIN (SELECT * + FROM administracao.configuracao_entidade + WHERE configuracao_entidade.cod_modulo = 55 + AND configuracao_entidade.parametro = 'tcemg_codigo_orgao_entidade_sicom' + AND configuracao_entidade.exercicio = '".$this->getDado('exercicio')."' + ) AS orgao + ON orgao.cod_entidade = licitacao.cod_entidade + + INNER JOIN compras.objeto ON objeto.cod_objeto = licitacao.cod_objeto - - JOIN sw_processo + + INNER JOIN sw_processo ON sw_processo.cod_processo = licitacao.cod_processo AND sw_processo.ano_exercicio = licitacao.exercicio_processo - - JOIN compras.modalidade + + INNER JOIN compras.modalidade ON modalidade.cod_modalidade = licitacao.cod_modalidade - - JOIN compras.tipo_objeto + + INNER JOIN compras.tipo_objeto ON tipo_objeto.cod_tipo_objeto = licitacao.cod_tipo_objeto - - JOIN licitacao.edital + + INNER JOIN licitacao.edital ON edital.cod_licitacao = licitacao.cod_licitacao AND edital.cod_modalidade = licitacao.cod_modalidade AND edital.cod_entidade = licitacao.cod_entidade AND edital.exercicio_licitacao = licitacao.exercicio - + LEFT JOIN licitacao.publicacao_edital ON publicacao_edital.num_edital = edital.num_edital AND publicacao_edital.exercicio = edital.exercicio - - JOIN sw_cgm AS responsavel + + INNER JOIN sw_cgm AS responsavel ON responsavel.numcgm = edital.responsavel_juridico - + LEFT JOIN sw_cgm_pessoa_juridica ON sw_cgm_pessoa_juridica.numcgm = responsavel.numcgm - + LEFT JOIN ( SELECT num_documento, numcgm, tipo_documento FROM ( SELECT cpf AS num_documento, numcgm, 1 AS tipo_documento FROM sw_cgm_pessoa_fisica - UNION - SELECT cnpj AS num_documento, numcgm, 2 AS tipo_documento FROM sw_cgm_pessoa_juridica ) AS tabela GROUP BY numcgm, num_documento, tipo_documento ) AS documento_pessoa ON documento_pessoa.numcgm = responsavel.numcgm - - JOIN sw_municipio + + INNER JOIN sw_municipio ON sw_municipio.cod_municipio = responsavel.cod_municipio AND sw_municipio.cod_uf = responsavel.cod_uf - - JOIN sw_uf + + INNER JOIN sw_uf ON sw_uf.cod_uf = sw_municipio.cod_uf - - JOIN compras.mapa + + INNER JOIN compras.mapa ON mapa.exercicio = licitacao.exercicio_mapa AND mapa.cod_mapa = licitacao.cod_mapa - JOIN compras.mapa_cotacao - ON mapa.exercicio = mapa_cotacao.exercicio_mapa + INNER JOIN compras.mapa_cotacao + ON mapa.exercicio = mapa_cotacao.exercicio_mapa AND mapa.cod_mapa = mapa_cotacao.cod_mapa - - JOIN compras.mapa_solicitacao + + INNER JOIN compras.mapa_solicitacao ON mapa_solicitacao.exercicio = mapa.exercicio AND mapa_solicitacao.cod_mapa = mapa.cod_mapa - - JOIN compras.mapa_item + + INNER JOIN compras.mapa_item ON mapa_item.cod_mapa = mapa_solicitacao.cod_mapa AND mapa_item.exercicio = mapa_solicitacao.exercicio AND mapa_item.cod_entidade = mapa_solicitacao.cod_entidade AND mapa_item.cod_solicitacao = mapa_solicitacao.cod_solicitacao AND mapa_item.exercicio_solicitacao = mapa_solicitacao.exercicio_solicitacao - + INNER JOIN compras.julgamento ON julgamento.exercicio = mapa_cotacao.exercicio_cotacao AND julgamento.cod_cotacao = mapa_cotacao.cod_cotacao - + INNER JOIN compras.julgamento_item - ON julgamento_item.exercicio = julgamento.exercicio + ON julgamento_item.exercicio = julgamento.exercicio AND julgamento_item.cod_cotacao = julgamento.cod_cotacao + AND julgamento_item.cod_item = mapa_item.cod_item AND julgamento_item.ordem = 1 - JOIN licitacao.homologacao + INNER JOIN licitacao.homologacao ON homologacao.cod_licitacao=licitacao.cod_licitacao AND homologacao.cod_modalidade=licitacao.cod_modalidade AND homologacao.cod_entidade=licitacao.cod_entidade AND homologacao.exercicio_licitacao=licitacao.exercicio AND homologacao.cod_item=julgamento_item.cod_item AND homologacao.lote=julgamento_item.lote - AND ( - SELECT homologacao_anulada.num_homologacao FROM licitacao.homologacao_anulada - WHERE homologacao_anulada.cod_licitacao=licitacao.cod_licitacao - AND homologacao_anulada.cod_modalidade=licitacao.cod_modalidade - AND homologacao_anulada.cod_entidade=licitacao.cod_entidade - AND homologacao_anulada.exercicio_licitacao=licitacao.exercicio - AND homologacao.num_homologacao=homologacao_anulada.num_homologacao - AND homologacao.cod_item=homologacao_anulada.cod_item - AND homologacao.lote=homologacao_anulada.lote - ) IS NULL - - JOIN licitacao.licitacao_documentos + + LEFT JOIN licitacao.homologacao_anulada + ON homologacao_anulada.cod_licitacao=licitacao.cod_licitacao + AND homologacao_anulada.cod_modalidade=licitacao.cod_modalidade + AND homologacao_anulada.cod_entidade=licitacao.cod_entidade + AND homologacao_anulada.exercicio_licitacao=homologacao.exercicio_licitacao + AND homologacao_anulada.num_homologacao=homologacao.num_homologacao + AND homologacao_anulada.cod_item=homologacao.cod_item + AND homologacao_anulada.lote=homologacao.lote + + INNER JOIN licitacao.licitacao_documentos ON licitacao_documentos.cod_licitacao = licitacao.cod_licitacao AND licitacao_documentos.cod_entidade = licitacao.cod_entidade AND licitacao_documentos.exercicio = licitacao.exercicio - - JOIN licitacao.documento + AND licitacao_documentos.cod_modalidade = licitacao.cod_modalidade + + INNER JOIN licitacao.documento ON documento.cod_documento = licitacao_documentos.cod_documento - + LEFT JOIN licitacao.certificacao_documentos ON certificacao_documentos.cod_documento = documento.cod_documento - + AND certificacao_documentos.cgm_fornecedor = julgamento_item.cgm_fornecedor + AND certificacao_documentos.exercicio = licitacao_documentos.exercicio + LEFT JOIN licitacao.participante_certificacao ON participante_certificacao.num_certificacao = certificacao_documentos.num_certificacao AND participante_certificacao.exercicio = certificacao_documentos.exercicio AND participante_certificacao.cgm_fornecedor = certificacao_documentos.cgm_fornecedor - - JOIN ( + + INNER JOIN ( SELECT * FROM tcemg.fn_exercicio_numero_licitacao ('".$this->getDado('exercicio')."', '".$this->getDado('entidades')."') VALUES (cod_licitacao INTEGER ,cod_modalidade INTEGER @@ -1590,19 +1599,20 @@ class TTCEMGDispensaInexigibilidade extends Persistente AND config_licitacao.cod_licitacao = licitacao.cod_licitacao AND config_licitacao.cod_modalidade = licitacao.cod_modalidade AND config_licitacao.exercicio = licitacao.exercicio - + WHERE licitacao.cod_entidade in (" . $this->getDado('entidades') . ") + AND homologacao_anulada.cod_licitacao IS NULL AND TO_DATE(homologacao.timestamp::varchar,'yyyy-mm-dd') BETWEEN TO_DATE('".$this->getDado('dt_inicial')."','dd/mm/yyyy') AND TO_DATE('".$this->getDado('dt_final')."','dd/mm/yyyy') AND ( licitacao.cod_modalidade = 8 OR licitacao.cod_modalidade = 9 ) - AND NOT EXISTS( SELECT 1 - FROM licitacao.licitacao_anulada - WHERE licitacao_anulada.cod_licitacao = licitacao.cod_licitacao - AND licitacao_anulada.cod_modalidade = licitacao.cod_modalidade - AND licitacao_anulada.cod_entidade = licitacao.cod_entidade - AND licitacao_anulada.exercicio = licitacao.exercicio + AND NOT EXISTS( SELECT 1 + FROM licitacao.licitacao_anulada + WHERE licitacao_anulada.cod_licitacao = licitacao.cod_licitacao + AND licitacao_anulada.cod_modalidade = licitacao.cod_modalidade + AND licitacao_anulada.cod_entidade = licitacao.cod_entidade + AND licitacao_anulada.exercicio = licitacao.exercicio ) - + GROUP BY tipo_registro , cod_orgao_resp , cod_unidade_resp @@ -1613,9 +1623,9 @@ class TTCEMGDispensaInexigibilidade extends Persistente , documento_pessoa.num_documento , dt_credenciamento , num_lote - , mapa_item.cod_item - , num_inscricao_estadual - , uf_inscricao_estadual + , mapa_item.cod_item + , num_inscricao_estadual + , uf_inscricao_estadual , num_certidao_regularidade_inss , dt_emissao_certidao_regularidade_inss , dt_validade_certidao_regularidade_inss @@ -1626,8 +1636,9 @@ class TTCEMGDispensaInexigibilidade extends Persistente , dt_emissao_cndt , dt_validade_cndt , mapa.cod_tipo_licitacao - , config_licitacao.exercicio_licitacao + , config_licitacao.exercicio_licitacao , config_licitacao.num_licitacao + ORDER BY num_processo "; return $stSql; diff --git a/gestaoPrestacaoContas/fontes/PHP/TCEMG/classes/mapeamento/2015/TTCEMGExportacaoARC.class.php b/gestaoPrestacaoContas/fontes/PHP/TCEMG/classes/mapeamento/2015/TTCEMGExportacaoARC.class.php index 04d5206..bf8619f 100644 --- a/gestaoPrestacaoContas/fontes/PHP/TCEMG/classes/mapeamento/2015/TTCEMGExportacaoARC.class.php +++ b/gestaoPrestacaoContas/fontes/PHP/TCEMG/classes/mapeamento/2015/TTCEMGExportacaoARC.class.php @@ -566,37 +566,55 @@ class TTCEMGExportacaoARC extends Persistente $stSql = " SELECT tipo_registro - , '20'||cod_correcao AS cod_estorno - , cod_orgao - , deducao_receita - , indentificador_deducao_reduzida AS identificador_deducao - , natureza_receita_reduzida AS natureza_receita_estornada - ,( SELECT sem_acentos(descricao) as descricao - FROM orcamento.conta_receita - WHERE REPLACE(conta_receita.cod_estrutural, '.', '')::TEXT = RPAD(natureza_receita_reduzida::TEXT, 14, '0')::TEXT - AND exercicio = '".$this->getDado('exercicio')."' - ) AS especificacao_estornada + , '20'||cod_correcao AS cod_estorno + , cod_orgao + , deducao_receita + , indentificador_deducao_reduzida AS identificador_deducao + , natureza_receita_reduzida AS natureza_receita_estornada + , ( SELECT sem_acentos(descricao) as descricao + FROM orcamento.conta_receita + WHERE REPLACE(conta_receita.cod_estrutural, '.', '')::TEXT = RPAD(natureza_receita_reduzida::TEXT, 14, '0')::TEXT + AND exercicio = '".$this->getDado('exercicio')."' + ) AS especificacao_estornada , SUM(vl_reduzido_acrescido) AS vl_estornado , cod_correcao - FROM ( SELECT 20 AS tipo_registro , receita.cod_receita , LPAD(configuracao_entidade.valor::VARCHAR,2,'0') AS cod_orgao - , CASE WHEN SUBSTR(conta_receita.cod_estrutural, 1, 1) = '9' - THEN 1 - ELSE 2 + , CASE WHEN SUBSTR(conta_receita.cod_estrutural, 1, 1) = '9' THEN 1 + ELSE 2 END AS deducao_receita , valores_identificadores.cod_identificador AS indentificador_deducao_reduzida - , CASE WHEN SUBSTR(REPLACE(conta_receita.cod_estrutural, '.', ''), 1, 8) = '17240101' - THEN RPAD(SUBSTR(REPLACE(conta_receita.cod_estrutural, '.', ''), 1, 6), 8, '0')::INTEGER - ELSE SUBSTR(REPLACE(conta_receita.cod_estrutural, '.', ''), 1, 8)::INTEGER - END AS natureza_receita_reduzida + , CASE + WHEN SUBSTR(conta_receita.cod_estrutural, 1, 1) = '9' + THEN SUBSTR(REPLACE(conta_receita.cod_estrutural, '.', ''), 1, 9)::integer + ELSE + CASE + WHEN SUBSTR(REPLACE(conta_receita.cod_estrutural, '.', ''), 1, 8)::INTEGER = 17240101 + OR SUBSTR(REPLACE(conta_receita.cod_estrutural, '.', ''), 1, 8)::INTEGER = 17240102 + OR SUBSTR(REPLACE(conta_receita.cod_estrutural, '.', ''), 1, 8)::INTEGER = 17219903 + OR SUBSTR(REPLACE(conta_receita.cod_estrutural, '.', ''), 1, 8)::INTEGER = 19319902 + THEN RPAD(SUBSTR(REPLACE(conta_receita.cod_estrutural, '.', ''), 1, 6), 8, '0')::INTEGER + WHEN SUBSTR(REPLACE(conta_receita.cod_estrutural, '.', ''), 1, 8)::INTEGER = 24210100 + THEN '24210101' + ELSE SUBSTR(REPLACE(conta_receita.cod_estrutural, '.', ''), 1, 8)::INTEGER + END + END AS natureza_receita_reduzida , SUM(arrecadacao_receita.vl_arrecadacao) AS vl_reduzido_acrescido - , CASE WHEN SUBSTR(REPLACE(conta_receita.cod_estrutural, '.', ''), 1, 8) = '17240101' - THEN receita.exercicio||RPAD(SUBSTR(REPLACE(conta_receita.cod_estrutural, '.', ''), 1, 6), 8, '0')::INTEGER - ELSE receita.exercicio||SUBSTR(REPLACE(conta_receita.cod_estrutural, '.', ''), 1, 8)::INTEGER - END AS cod_correcao + , CASE WHEN SUBSTR(conta_receita.cod_estrutural, 1, 1) = '9' + THEN receita.exercicio||SUBSTR(REPLACE(conta_receita.cod_estrutural, '.', ''), 1, 9)::integer + ELSE CASE + WHEN SUBSTR(REPLACE(conta_receita.cod_estrutural, '.', ''), 1, 8)::INTEGER = 17240101 + OR SUBSTR(REPLACE(conta_receita.cod_estrutural, '.', ''), 1, 8)::INTEGER = 17240102 + OR SUBSTR(REPLACE(conta_receita.cod_estrutural, '.', ''), 1, 8)::INTEGER = 17219903 + OR SUBSTR(REPLACE(conta_receita.cod_estrutural, '.', ''), 1, 8)::INTEGER = 19319902 + THEN receita.exercicio||RPAD(SUBSTR(REPLACE(conta_receita.cod_estrutural, '.', ''), 1, 6), 8, '0')::INTEGER + WHEN SUBSTR(REPLACE(conta_receita.cod_estrutural, '.', ''), 1, 8)::INTEGER = 24210100 + THEN receita.exercicio||'24210101' + ELSE receita.exercicio||SUBSTR(REPLACE(conta_receita.cod_estrutural, '.', ''), 1, 8)::INTEGER + END + END AS cod_correcao FROM orcamento.receita @@ -644,20 +662,39 @@ class TTCEMGExportacaoARC extends Persistente SELECT 20 AS tipo_registro , receita.cod_receita , LPAD(configuracao_entidade.valor::VARCHAR,2,'0') AS cod_orgao - , CASE WHEN SUBSTR(conta_receita.cod_estrutural, 1, 1) = '9' - THEN 1 - ELSE 2 - END AS deducao_receita + , CASE WHEN SUBSTR(conta_receita.cod_estrutural, 1, 1) = '9' THEN 1 + ELSE 2 + END AS deducao_receita , valores_identificadores.cod_identificador AS indentificador_deducao_reduzida - , CASE WHEN SUBSTR(REPLACE(conta_receita.cod_estrutural, '.', ''), 1, 8) = '17240101' - THEN RPAD(SUBSTR(REPLACE(conta_receita.cod_estrutural, '.', ''), 1, 6), 8, '0')::INTEGER - ELSE SUBSTR(REPLACE(conta_receita.cod_estrutural, '.', ''), 1, 8)::INTEGER - END AS natureza_receita_reduzida + , CASE + WHEN SUBSTR(conta_receita.cod_estrutural, 1, 1) = '9' + THEN SUBSTR(REPLACE(conta_receita.cod_estrutural, '.', ''), 1, 9)::integer + ELSE + CASE + WHEN SUBSTR(REPLACE(conta_receita.cod_estrutural, '.', ''), 1, 8)::INTEGER = 17240101 + OR SUBSTR(REPLACE(conta_receita.cod_estrutural, '.', ''), 1, 8)::INTEGER = 17240102 + OR SUBSTR(REPLACE(conta_receita.cod_estrutural, '.', ''), 1, 8)::INTEGER = 17219903 + OR SUBSTR(REPLACE(conta_receita.cod_estrutural, '.', ''), 1, 8)::INTEGER = 19319902 + THEN RPAD(SUBSTR(REPLACE(conta_receita.cod_estrutural, '.', ''), 1, 6), 8, '0')::INTEGER + WHEN SUBSTR(REPLACE(conta_receita.cod_estrutural, '.', ''), 1, 8)::INTEGER = 24210100 + THEN '24210101' + ELSE SUBSTR(REPLACE(conta_receita.cod_estrutural, '.', ''), 1, 8)::INTEGER + END + END AS natureza_receita_reduzida , SUM(arrecadacao_estornada_receita.vl_estornado) AS vl_reduzido_acrescido - , CASE WHEN SUBSTR(REPLACE(conta_receita.cod_estrutural, '.', ''), 1, 8) = '17240101' - THEN receita.exercicio||RPAD(SUBSTR(REPLACE(conta_receita.cod_estrutural, '.', ''), 1, 6), 8, '0')::INTEGER - ELSE receita.exercicio||SUBSTR(REPLACE(conta_receita.cod_estrutural, '.', ''), 1, 8)::INTEGER - END AS cod_correcao + , CASE WHEN SUBSTR(conta_receita.cod_estrutural, 1, 1) = '9' + THEN receita.exercicio||SUBSTR(REPLACE(conta_receita.cod_estrutural, '.', ''), 1, 9)::integer + ELSE CASE + WHEN SUBSTR(REPLACE(conta_receita.cod_estrutural, '.', ''), 1, 8)::INTEGER = 17240101 + OR SUBSTR(REPLACE(conta_receita.cod_estrutural, '.', ''), 1, 8)::INTEGER = 17240102 + OR SUBSTR(REPLACE(conta_receita.cod_estrutural, '.', ''), 1, 8)::INTEGER = 17219903 + OR SUBSTR(REPLACE(conta_receita.cod_estrutural, '.', ''), 1, 8)::INTEGER = 19319902 + THEN receita.exercicio||RPAD(SUBSTR(REPLACE(conta_receita.cod_estrutural, '.', ''), 1, 6), 8, '0')::INTEGER + WHEN SUBSTR(REPLACE(conta_receita.cod_estrutural, '.', ''), 1, 8)::INTEGER = 24210100 + THEN receita.exercicio||'24210101' + ELSE receita.exercicio||SUBSTR(REPLACE(conta_receita.cod_estrutural, '.', ''), 1, 8)::INTEGER + END + END AS cod_correcao FROM orcamento.receita @@ -707,53 +744,56 @@ class TTCEMGExportacaoARC extends Persistente SELECT 20 AS tipo_registro , receita.cod_receita , LPAD(configuracao_entidade.valor::VARCHAR,2,'0') AS cod_orgao - , CASE WHEN SUBSTR(conta_receita.cod_estrutural, 1, 1) = '9' - THEN 1 - ELSE 2 - END AS deducao_receita + , CASE WHEN SUBSTR(conta_receita.cod_estrutural, 1, 1) = '9' THEN 1 + ELSE 2 + END AS deducao_receita , valores_identificadores.cod_identificador AS indentificador_deducao_reduzida - , SUBSTR(REPLACE(conta_receita.cod_estrutural, '.', ''), 2, 9)::INTEGER AS natureza_receita_reduzida + , CASE + WHEN SUBSTR(conta_receita.cod_estrutural, 1, 1) = '9' + THEN SUBSTR(REPLACE(conta_receita.cod_estrutural, '.', ''), 1, 9)::integer + ELSE + CASE + WHEN SUBSTR(REPLACE(conta_receita.cod_estrutural, '.', ''), 1, 8)::INTEGER = 17240101 + OR SUBSTR(REPLACE(conta_receita.cod_estrutural, '.', ''), 1, 8)::INTEGER = 17240102 + OR SUBSTR(REPLACE(conta_receita.cod_estrutural, '.', ''), 1, 8)::INTEGER = 17219903 + OR SUBSTR(REPLACE(conta_receita.cod_estrutural, '.', ''), 1, 8)::INTEGER = 19319902 + THEN RPAD(SUBSTR(REPLACE(conta_receita.cod_estrutural, '.', ''), 1, 6), 8, '0')::INTEGER + WHEN SUBSTR(REPLACE(conta_receita.cod_estrutural, '.', ''), 1, 8)::INTEGER = 24210100 + THEN '24210101' + ELSE SUBSTR(REPLACE(conta_receita.cod_estrutural, '.', ''), 1, 8)::INTEGER + END + END AS natureza_receita_reduzida , SUM(redutora.vl_deducao) AS vl_reduzido_acrescido - , receita.exercicio||SUBSTR(REPLACE(conta_receita.cod_estrutural, '.', ''), 1, 9) AS cod_correcao - + , CASE WHEN SUBSTR(conta_receita.cod_estrutural, 1, 1) = '9' + THEN receita.exercicio||SUBSTR(REPLACE(conta_receita.cod_estrutural, '.', ''), 1, 9)::integer + ELSE CASE + WHEN SUBSTR(REPLACE(conta_receita.cod_estrutural, '.', ''), 1, 8)::INTEGER = 17240101 + OR SUBSTR(REPLACE(conta_receita.cod_estrutural, '.', ''), 1, 8)::INTEGER = 17240102 + OR SUBSTR(REPLACE(conta_receita.cod_estrutural, '.', ''), 1, 8)::INTEGER = 17219903 + OR SUBSTR(REPLACE(conta_receita.cod_estrutural, '.', ''), 1, 8)::INTEGER = 19319902 + THEN receita.exercicio||RPAD(SUBSTR(REPLACE(conta_receita.cod_estrutural, '.', ''), 1, 6), 8, '0')::INTEGER + WHEN SUBSTR(REPLACE(conta_receita.cod_estrutural, '.', ''), 1, 8)::INTEGER = 24210100 + THEN receita.exercicio||'24210101' + ELSE receita.exercicio||SUBSTR(REPLACE(conta_receita.cod_estrutural, '.', ''), 1, 8)::INTEGER + END + END AS cod_correcao FROM orcamento.receita - - INNER JOIN (SELECT tabela.cod_receita_dedutora - , tabela.exercicio - , SUM(tabela.vl_arrecadacao) AS vl_deducao - FROM ( - /* - SELECT arrecadacao_receita.cod_arrecadacao - , arrecadacao_receita.cod_receita AS cod_receita_dedutora - , arrecadacao_receita.exercicio - , arrecadacao_receita.vl_arrecadacao - - FROM tesouraria.arrecadacao_receita - - INNER JOIN tesouraria.arrecadacao - ON arrecadacao.cod_arrecadacao=arrecadacao_receita.cod_arrecadacao - AND arrecadacao.exercicio = arrecadacao_receita.exercicio - AND arrecadacao.timestamp_arrecadacao = arrecadacao_receita.timestamp_arrecadacao - AND arrecadacao.devolucao = false - - WHERE arrecadacao_receita.timestamp_arrecadacao::date BETWEEN TO_DATE( '01/".$this->getDado('mes')."/".$this->getDado('exercicio')."', 'dd/mm/yyyy' ) AND last_day(TO_DATE('".$this->getDado('exercicio')."' || '-' || '".$this->getDado('mes')."' || '-' || '01','yyyy-mm-dd')) - - UNION - */ - SELECT arrecadacao_receita_dedutora_estornada.cod_arrecadacao - , arrecadacao_receita_dedutora_estornada.cod_receita_dedutora - , arrecadacao_receita_dedutora_estornada.exercicio - , arrecadacao_receita_dedutora_estornada.vl_estornado AS vl_arrecadacao - - FROM tesouraria.arrecadacao_receita_dedutora_estornada - - WHERE arrecadacao_receita_dedutora_estornada.timestamp_dedutora_estornada::date BETWEEN TO_DATE( '01/".$this->getDado('mes')."/".$this->getDado('exercicio')."', 'dd/mm/yyyy' ) AND last_day(TO_DATE('".$this->getDado('exercicio')."' || '-' || '".$this->getDado('mes')."' || '-' || '01','yyyy-mm-dd')) - - ) AS tabela - + INNER JOIN ( + SELECT tabela.cod_receita_dedutora + , tabela.exercicio + , SUM(tabela.vl_arrecadacao) AS vl_deducao + FROM ( + SELECT arrecadacao_receita_dedutora_estornada.cod_arrecadacao + , arrecadacao_receita_dedutora_estornada.cod_receita_dedutora + , arrecadacao_receita_dedutora_estornada.exercicio + , arrecadacao_receita_dedutora_estornada.vl_estornado AS vl_arrecadacao + FROM tesouraria.arrecadacao_receita_dedutora_estornada + WHERE arrecadacao_receita_dedutora_estornada.timestamp_dedutora_estornada::date BETWEEN TO_DATE( '01/".$this->getDado('mes')."/".$this->getDado('exercicio')."', 'dd/mm/yyyy' ) + AND last_day(TO_DATE('".$this->getDado('exercicio')."' || '-' || '".$this->getDado('mes')."' || '-' || '01','yyyy-mm-dd')) + ) AS tabela GROUP BY tabela.cod_receita_dedutora - , tabela.exercicio - , tabela.vl_arrecadacao + , tabela.exercicio + , tabela.vl_arrecadacao ) AS redutora ON redutora.cod_receita_dedutora = receita.cod_receita AND redutora.exercicio = receita.exercicio @@ -837,10 +877,19 @@ class TTCEMGExportacaoARC extends Persistente , receita.cod_receita , receita.cod_recurso AS cod_fonte_reduzida , SUM(valor_lancamento.vl_lancamento) AS vl_reduzido_acrescido - , CASE WHEN SUBSTR(REPLACE(conta_receita.cod_estrutural, '.', ''), 1, 8) = '17240101' - THEN receita.exercicio||RPAD(SUBSTR(REPLACE(conta_receita.cod_estrutural, '.', ''), 1, 6), 8, '0')::INTEGER - ELSE receita.exercicio||SUBSTR(REPLACE(conta_receita.cod_estrutural, '.', ''), 1, 8)::INTEGER - END AS cod_correcao + , CASE WHEN SUBSTR(conta_receita.cod_estrutural, 1, 1) = '9' + THEN receita.exercicio||SUBSTR(REPLACE(conta_receita.cod_estrutural, '.', ''), 1, 9)::integer + ELSE CASE + WHEN SUBSTR(REPLACE(conta_receita.cod_estrutural, '.', ''), 1, 8)::INTEGER = 17240101 + OR SUBSTR(REPLACE(conta_receita.cod_estrutural, '.', ''), 1, 8)::INTEGER = 17240102 + OR SUBSTR(REPLACE(conta_receita.cod_estrutural, '.', ''), 1, 8)::INTEGER = 17219903 + OR SUBSTR(REPLACE(conta_receita.cod_estrutural, '.', ''), 1, 8)::INTEGER = 19319902 + THEN receita.exercicio||RPAD(SUBSTR(REPLACE(conta_receita.cod_estrutural, '.', ''), 1, 6), 8, '0')::INTEGER + WHEN SUBSTR(REPLACE(conta_receita.cod_estrutural, '.', ''), 1, 8)::INTEGER = 24210100 + THEN receita.exercicio||'24210101' + ELSE receita.exercicio||SUBSTR(REPLACE(conta_receita.cod_estrutural, '.', ''), 1, 8)::INTEGER + END + END AS cod_correcao FROM contabilidade.lancamento_receita @@ -895,51 +944,40 @@ class TTCEMGExportacaoARC extends Persistente , receita.cod_receita , receita.cod_recurso AS cod_fonte_reduzida , SUM(redutora.vl_deducao) AS vl_reduzido_acrescido - , receita.exercicio||SUBSTR(REPLACE(conta_receita.cod_estrutural, '.', ''), 1, 9) AS cod_correcao - + , CASE WHEN SUBSTR(conta_receita.cod_estrutural, 1, 1) = '9' + THEN receita.exercicio||SUBSTR(REPLACE(conta_receita.cod_estrutural, '.', ''), 1, 9)::integer + ELSE CASE + WHEN SUBSTR(REPLACE(conta_receita.cod_estrutural, '.', ''), 1, 8)::INTEGER = 17240101 + OR SUBSTR(REPLACE(conta_receita.cod_estrutural, '.', ''), 1, 8)::INTEGER = 17240102 + OR SUBSTR(REPLACE(conta_receita.cod_estrutural, '.', ''), 1, 8)::INTEGER = 17219903 + OR SUBSTR(REPLACE(conta_receita.cod_estrutural, '.', ''), 1, 8)::INTEGER = 19319902 + THEN receita.exercicio||RPAD(SUBSTR(REPLACE(conta_receita.cod_estrutural, '.', ''), 1, 6), 8, '0')::INTEGER + WHEN SUBSTR(REPLACE(conta_receita.cod_estrutural, '.', ''), 1, 8)::INTEGER = 24210100 + THEN receita.exercicio||'24210101' + ELSE receita.exercicio||SUBSTR(REPLACE(conta_receita.cod_estrutural, '.', ''), 1, 8)::INTEGER + END + END AS cod_correcao FROM orcamento.receita - INNER JOIN ( SELECT tabela.cod_receita_dedutora - , tabela.exercicio - , SUM(tabela.vl_arrecadacao) AS vl_deducao - - FROM( - /* - SELECT arrecadacao_receita.cod_arrecadacao - , arrecadacao_receita.cod_receita AS cod_receita_dedutora - , arrecadacao_receita.exercicio - , arrecadacao_receita.vl_arrecadacao - - FROM tesouraria.arrecadacao_receita - - INNER JOIN tesouraria.arrecadacao - ON arrecadacao.cod_arrecadacao = arrecadacao_receita.cod_arrecadacao - AND arrecadacao.exercicio = arrecadacao_receita.exercicio - AND arrecadacao.timestamp_arrecadacao = arrecadacao_receita.timestamp_arrecadacao - AND arrecadacao.devolucao = false - - WHERE arrecadacao_receita.timestamp_arrecadacao::date BETWEEN TO_DATE( '01/".$this->getDado('mes')."/".$this->getDado('exercicio')."', 'dd/mm/yyyy' ) AND last_day(TO_DATE('".$this->getDado('exercicio')."' || '-' || '".$this->getDado('mes')."' || '-' || '01','yyyy-mm-dd')) - - UNION - */ - SELECT arrecadacao_receita_dedutora_estornada.cod_arrecadacao - , arrecadacao_receita_dedutora_estornada.cod_receita_dedutora - , arrecadacao_receita_dedutora_estornada.exercicio - , arrecadacao_receita_dedutora_estornada.vl_estornado AS vl_arrecadacao - - FROM tesouraria.arrecadacao_receita_dedutora_estornada - - WHERE arrecadacao_receita_dedutora_estornada.timestamp_dedutora_estornada::date BETWEEN TO_DATE( '01/".$this->getDado('mes')."/".$this->getDado('exercicio')."', 'dd/mm/yyyy' ) AND last_day(TO_DATE('".$this->getDado('exercicio')."' || '-' || '".$this->getDado('mes')."' || '-' || '01','yyyy-mm-dd')) - - ) AS tabela - - GROUP BY tabela.cod_receita_dedutora - , tabela.exercicio - , tabela.vl_arrecadacao - - ) AS redutora - ON redutora.cod_receita_dedutora=receita.cod_receita - AND redutora.exercicio=receita.exercicio + INNER JOIN ( + SELECT tabela.cod_receita_dedutora + , tabela.exercicio + , SUM(tabela.vl_arrecadacao) AS vl_deducao + FROM ( + SELECT arrecadacao_receita_dedutora_estornada.cod_arrecadacao + , arrecadacao_receita_dedutora_estornada.cod_receita_dedutora + , arrecadacao_receita_dedutora_estornada.exercicio + , arrecadacao_receita_dedutora_estornada.vl_estornado AS vl_arrecadacao + FROM tesouraria.arrecadacao_receita_dedutora_estornada + WHERE arrecadacao_receita_dedutora_estornada.timestamp_dedutora_estornada::date BETWEEN TO_DATE( '01/".$this->getDado('mes')."/".$this->getDado('exercicio')."', 'dd/mm/yyyy' ) + AND last_day(TO_DATE('".$this->getDado('exercicio')."' || '-' || '".$this->getDado('mes')."' || '-' || '01','yyyy-mm-dd')) + ) AS tabela + GROUP BY tabela.cod_receita_dedutora + , tabela.exercicio + , tabela.vl_arrecadacao + ) AS redutora + ON redutora.cod_receita_dedutora=receita.cod_receita + AND redutora.exercicio=receita.exercicio INNER JOIN administracao.configuracao_entidade ON configuracao_entidade.cod_entidade = receita.cod_entidade diff --git a/gestaoPrestacaoContas/fontes/PHP/TCEMG/classes/mapeamento/2015/TTCEMGExtraOrcamentarias.class.php b/gestaoPrestacaoContas/fontes/PHP/TCEMG/classes/mapeamento/2015/TTCEMGExtraOrcamentarias.class.php index d4441dc..55255b7 100755 --- a/gestaoPrestacaoContas/fontes/PHP/TCEMG/classes/mapeamento/2015/TTCEMGExtraOrcamentarias.class.php +++ b/gestaoPrestacaoContas/fontes/PHP/TCEMG/classes/mapeamento/2015/TTCEMGExtraOrcamentarias.class.php @@ -214,13 +214,19 @@ class TTCEMGExtraOrcamentarias extends TOrcamentoContaReceita , cod_font_recurso , ABS(vl_saldo_ant) AS vl_saldo_ant , ABS(vl_saldo_atual) AS vl_saldo_atual - , CASE WHEN vl_saldo_ant < 0.00 - THEN 'D' - ELSE 'C' + , CASE WHEN natureza_anterior != ' ' + THEN natureza_anterior + ELSE CASE WHEN vl_saldo_ant < 0.00 + THEN 'D' + ELSE 'C' + END END AS nat_saldo_anterior_fonte - , CASE WHEN vl_saldo_atual < 0.00 - THEN 'D' - ELSE 'C' + , CASE WHEN natureza_atual != ' ' + THEN natureza_atual + ELSE CASE WHEN vl_saldo_atual < 0.00 + THEN 'D' + ELSE 'C' + END END AS nat_saldo_atual_fonte FROM ( SELECT tipo_registro @@ -704,14 +710,18 @@ class TTCEMGExtraOrcamentarias extends TOrcamentoContaReceita $stSql = " SELECT 23 AS tipo_registro , tcemg.seq_num_op_extra(transferencia.exercicio,transferencia.cod_entidade,1,transferencia.cod_lote)::varchar AS cod_reduzido_op - , CASE WHEN pagamento_tipo_documento.cod_tipo_documento IS NULL THEN '99' - ELSE pagamento_tipo_documento.cod_tipo_documento + , CASE WHEN pagamento_tipo_documento.cod_tipo_documento IS NULL AND SUBSTR(cod_ctb_transferencia.cod_estrutural, 1, 7) <> '1111101' THEN '99' + WHEN SUBSTR(cod_ctb_transferencia.cod_estrutural, 1, 7) = '1111101' THEN '05' + ELSE pagamento_tipo_documento.cod_tipo_documento::VARCHAR END AS tipo_documento_op , pagamento_tipo_documento.num_documento AS num_documento - , cod_ctb_transferencia.cod_ctb_anterior as cod_ctb + , CASE WHEN SUBSTR(cod_ctb_transferencia.cod_estrutural, 1, 7) = '1111101' THEN '' + ELSE cod_ctb_transferencia.cod_ctb_anterior::varchar + END AS cod_ctb , COALESCE(plano_recurso.cod_recurso,'100') AS cod_fonte_ctb - , CASE WHEN pagamento_tipo_documento.cod_tipo_documento = 99 THEN 'Outros' - WHEN pagamento_tipo_documento.cod_tipo_documento IS NULL THEN 'Outros' + , CASE WHEN pagamento_tipo_documento.cod_tipo_documento = 99 AND SUBSTR(cod_ctb_transferencia.cod_estrutural, 1, 7) <> '1111101' THEN 'Outros' + WHEN pagamento_tipo_documento.cod_tipo_documento IS NULL AND SUBSTR(cod_ctb_transferencia.cod_estrutural, 1, 7) <> '1111101' THEN 'Outros' + WHEN SUBSTR(cod_ctb_transferencia.cod_estrutural, 1, 7) = '1111101' THEN '' ELSE tipo_documento.descricao END AS desctipodocumentoop , TO_CHAR(transferencia.dt_autenticacao, 'ddmmyyyy') AS dt_emissao @@ -798,6 +808,7 @@ class TTCEMGExtraOrcamentarias extends TOrcamentoContaReceita , transferencia.cod_plano_credito , transferencia.cod_plano_debito , conta_debito.sequencia + , REPLACE(plano_conta.cod_estrutural , '.', '') as cod_estrutural FROM contabilidade.conta_debito INNER JOIN contabilidade.lote AS lo @@ -817,7 +828,11 @@ class TTCEMGExtraOrcamentarias extends TOrcamentoContaReceita ON plano_analitica.cod_plano = transferencia.cod_plano_credito AND plano_analitica.natureza_saldo = 'D' AND plano_analitica.exercicio = conta_debito.exercicio - + + INNER JOIN contabilidade.plano_conta + ON plano_analitica.exercicio = plano_conta.exercicio + AND plano_analitica.cod_conta = plano_conta.cod_conta + LEFT JOIN tcemg.conta_bancaria ON conta_bancaria.cod_conta = plano_analitica.cod_conta AND conta_bancaria.exercicio = plano_analitica.exercicio diff --git a/gestaoPrestacaoContas/fontes/PHP/TCEMG/classes/mapeamento/2015/TTCEMGJulgamentoLicitacao.class.php b/gestaoPrestacaoContas/fontes/PHP/TCEMG/classes/mapeamento/2015/TTCEMGJulgamentoLicitacao.class.php index 16264ae..96bef29 100755 --- a/gestaoPrestacaoContas/fontes/PHP/TCEMG/classes/mapeamento/2015/TTCEMGJulgamentoLicitacao.class.php +++ b/gestaoPrestacaoContas/fontes/PHP/TCEMG/classes/mapeamento/2015/TTCEMGJulgamentoLicitacao.class.php @@ -28,30 +28,20 @@ * Data de Criação: 15/09/2006 * @author Analista: Gelson W. Gonçalves - * @author Desenvolvedor: Nome do Programador + * @author Desenvolvedor: Jean da Silva * @package URBEM * @subpackage Mapeamento - $Id: TLicitacaoParticipante.class.php 57380 2014-02-28 17:45:35Z diogo.zarpelon $ + $Id: TTCEMGJulgamentoLicitacao.class.php 64106 2015-12-02 19:13:45Z michel $ * Casos de uso: uc-03.05.18 uc-03.05.19 */ include_once '../../../../../../gestaoAdministrativa/fontes/PHP/framework/include/valida.inc.php'; -include_once ( CLA_PERSISTENTE ); +include_once CLA_PERSISTENTE; -/** - * Efetua conexão com a tabela licitacao.participante - * Data de Criação: 15/09/2006 - - * @author Analista: Gelson W. Gonçalves - * @author Desenvolvedor: Thiago La Delfa Cabelleira - - * @package URBEM - * @subpackage Mapeamento -*/ class TTCEMGJulgamentoLicitacao extends Persistente { /** @@ -63,123 +53,129 @@ class TTCEMGJulgamentoLicitacao extends Persistente { return $this->executaRecupera("montaRecuperaExportacao10", $rsRecordSet, $stFiltro, $stOrder, $boTransacao); } - + public function montaRecuperaExportacao10() { - $stSql = "SELECT - 10 AS tipo_registro - , LPAD(configuracao_entidade.valor,2,'0') AS cod_orgao - , LPAD(LPAD(licitacao.num_orgao::VARCHAR, 2, '0') || LPAD(licitacao.num_unidade::VARCHAR, 2, '0'),5,'0') AS cod_unidade - , config_licitacao.exercicio_licitacao - , config_licitacao.num_licitacao AS num_processo_licitatorio - , documento_pessoa.tipo_documento AS tipo_documento - , documento_pessoa.num_documento AS num_documento - , CASE WHEN mapa.cod_tipo_licitacao = 2 - THEN homologacao.lote::VARCHAR - ELSE ' ' - END AS num_lote - , mapa_item.cod_item AS cod_item - , (mapa_item.vl_total / mapa_item.quantidade )::numeric(14,4) AS vl_unitario - , mapa_item.quantidade::numeric(14,4) AS quantidade - -- , mapa_item.lote::varchar || mapa_item.cod_item::varchar AS sequencial - + $stSql = "SELECT 10 AS tipo_registro + , LPAD(configuracao_entidade.valor,2,'0') AS cod_orgao + , LPAD(LPAD(licitacao.num_orgao::VARCHAR, 2, '0') || LPAD(licitacao.num_unidade::VARCHAR, 2, '0'),5,'0') AS cod_unidade + , ( SELECT exercicio_licitacao + FROM tcemg.fn_exercicio_numero_licitacao ('".$this->getDado('exercicio')."', '".$this->getDado('entidades')."') + VALUES (cod_licitacao INTEGER + ,cod_modalidade INTEGER + ,cod_entidade INTEGER + ,exercicio CHAR(4) + ,exercicio_licitacao VARCHAR + ,num_licitacao TEXT ) + WHERE cod_entidade = licitacao.cod_entidade + AND cod_licitacao = licitacao.cod_licitacao + AND cod_modalidade = licitacao.cod_modalidade + AND exercicio = licitacao.exercicio + ) AS exercicio_licitacao + , ( SELECT num_licitacao + FROM tcemg.fn_exercicio_numero_licitacao ('".$this->getDado('exercicio')."', '".$this->getDado('entidades')."') + VALUES (cod_licitacao INTEGER + ,cod_modalidade INTEGER + ,cod_entidade INTEGER + ,exercicio CHAR(4) + ,exercicio_licitacao VARCHAR + ,num_licitacao TEXT ) + WHERE cod_entidade = licitacao.cod_entidade + AND cod_licitacao = licitacao.cod_licitacao + AND cod_modalidade = licitacao.cod_modalidade + AND exercicio = licitacao.exercicio + ) AS num_processo_licitatorio + , documento_pessoa.tipo_documento AS tipo_documento + , documento_pessoa.num_documento AS num_documento + , CASE WHEN mapa.cod_tipo_licitacao = 2 + THEN homologacao.lote::VARCHAR + ELSE ' ' + END AS num_lote + , mapa_item.cod_item AS cod_item + , (mapa_item.vl_total / mapa_item.quantidade )::numeric(14,4) AS vl_unitario + , mapa_item.quantidade::numeric(14,4) AS quantidade + FROM licitacao.licitacao - - JOIN licitacao.participante + + INNER JOIN licitacao.participante ON participante.cod_licitacao = licitacao.cod_licitacao AND participante.cod_modalidade = licitacao.cod_modalidade AND participante.cod_entidade = licitacao.cod_entidade AND participante.exercicio = licitacao.exercicio - - JOIN compras.mapa + + INNER JOIN compras.mapa ON mapa.exercicio = licitacao.exercicio_mapa AND mapa.cod_mapa = licitacao.cod_mapa - - JOIN compras.mapa_solicitacao + + INNER JOIN compras.mapa_solicitacao ON mapa_solicitacao.exercicio = mapa.exercicio AND mapa_solicitacao.cod_mapa = mapa.cod_mapa - - JOIN compras.mapa_item + + INNER JOIN compras.mapa_item ON mapa_item.exercicio = mapa_solicitacao.exercicio AND mapa_item.cod_entidade = mapa_solicitacao.cod_entidade AND mapa_item.cod_solicitacao = mapa_solicitacao.cod_solicitacao AND mapa_item.cod_mapa = mapa_solicitacao.cod_mapa AND mapa_item.exercicio_solicitacao = mapa_solicitacao.exercicio_solicitacao - - JOIN compras.mapa_cotacao + + INNER JOIN compras.mapa_cotacao ON mapa_cotacao.exercicio_mapa = mapa.exercicio AND mapa_cotacao.cod_mapa = mapa.cod_mapa - - JOIN compras.cotacao + + INNER JOIN compras.cotacao ON cotacao.exercicio = mapa_cotacao.exercicio_cotacao AND cotacao.cod_cotacao = mapa_cotacao.cod_cotacao - - JOIN compras.julgamento + + INNER JOIN compras.julgamento ON julgamento.exercicio = cotacao.exercicio AND julgamento.cod_cotacao = cotacao.cod_cotacao - - JOIN compras.julgamento_item + + INNER JOIN compras.julgamento_item ON julgamento_item.exercicio = julgamento.exercicio AND julgamento_item.cod_cotacao = julgamento.cod_cotacao AND julgamento_item.cod_item = mapa_item.cod_item - JOIN licitacao.homologacao + INNER JOIN licitacao.homologacao ON homologacao.cod_licitacao=licitacao.cod_licitacao AND homologacao.cod_modalidade=licitacao.cod_modalidade AND homologacao.cod_entidade=licitacao.cod_entidade AND homologacao.exercicio_licitacao=licitacao.exercicio AND homologacao.cod_item=julgamento_item.cod_item AND homologacao.lote=julgamento_item.lote - AND ( - SELECT homologacao_anulada.num_homologacao FROM licitacao.homologacao_anulada - WHERE homologacao_anulada.cod_licitacao=licitacao.cod_licitacao - AND homologacao_anulada.cod_modalidade=licitacao.cod_modalidade - AND homologacao_anulada.cod_entidade=licitacao.cod_entidade - AND homologacao_anulada.exercicio_licitacao=licitacao.exercicio - AND homologacao.num_homologacao=homologacao_anulada.num_homologacao - AND homologacao.cod_item=homologacao_anulada.cod_item - AND homologacao.lote=homologacao_anulada.lote - ) IS NULL - - JOIN administracao.configuracao_entidade + + LEFT JOIN licitacao.homologacao_anulada + ON homologacao_anulada.cod_licitacao=homologacao.cod_licitacao + AND homologacao_anulada.cod_modalidade=homologacao.cod_modalidade + AND homologacao_anulada.cod_entidade=homologacao.cod_entidade + AND homologacao_anulada.exercicio_licitacao=homologacao.exercicio_licitacao + AND homologacao_anulada.num_homologacao=homologacao.num_homologacao + AND homologacao_anulada.cod_item=homologacao.cod_item + AND homologacao_anulada.lote=homologacao.lote + + INNER JOIN administracao.configuracao_entidade ON configuracao_entidade.parametro = 'tcemg_codigo_orgao_entidade_sicom' AND configuracao_entidade.cod_modulo = 55 AND configuracao_entidade.exercicio = licitacao.exercicio AND configuracao_entidade.cod_entidade = licitacao.cod_entidade - - JOIN sw_cgm AS responsavel + + INNER JOIN sw_cgm AS responsavel ON responsavel.numcgm = participante.numcgm_representante - - JOIN ( SELECT num_documento, numcgm, tipo_documento + + INNER JOIN ( SELECT num_documento, numcgm, tipo_documento FROM ( SELECT cpf AS num_documento, numcgm, 1 AS tipo_documento FROM sw_cgm_pessoa_fisica - UNION - SELECT cnpj AS num_documento, numcgm, 2 AS tipo_documento FROM sw_cgm_pessoa_juridica - ) AS tabela - GROUP BY numcgm, num_documento, tipo_documento - ) AS documento_pessoa + ) AS tabela + GROUP BY numcgm, num_documento, tipo_documento + ) AS documento_pessoa ON documento_pessoa.numcgm = julgamento_item.cgm_fornecedor - - JOIN ( - SELECT * FROM tcemg.fn_exercicio_numero_licitacao ('".$this->getDado('exercicio')."', '".$this->getDado('entidades')."') - VALUES (cod_licitacao INTEGER - ,cod_modalidade INTEGER - ,cod_entidade INTEGER - ,exercicio CHAR(4) - ,exercicio_licitacao VARCHAR - ,num_licitacao TEXT ) - ) AS config_licitacao - ON config_licitacao.cod_entidade = licitacao.cod_entidade - AND config_licitacao.cod_licitacao = licitacao.cod_licitacao - AND config_licitacao.cod_modalidade = licitacao.cod_modalidade - AND config_licitacao.exercicio = licitacao.exercicio - + WHERE TO_DATE(TO_CHAR(homologacao.timestamp,'dd/mm/yyyy'), 'dd/mm/yyyy') BETWEEN TO_DATE('01/" . $this->getDado('mes') . "/" . $this->getDado('exercicio') . "', 'dd/mm/yyyy') AND last_day(TO_DATE('" . $this->getDado('exercicio') . "' || '-' || '".$this->getDado('mes') . "' || '-' || '01','yyyy-mm-dd')) + AND homologacao_anulada.cod_licitacao IS NULL AND licitacao.cod_entidade IN (" . $this->getDado('entidades') . ") AND licitacao.cod_modalidade NOT IN (8,9) AND NOT EXISTS ( SELECT 1 @@ -189,25 +185,26 @@ class TTCEMGJulgamentoLicitacao extends Persistente AND licitacao_anulada.cod_entidade = licitacao.cod_entidade AND licitacao_anulada.exercicio = licitacao.exercicio ) - - GROUP BY tipo_registro - , cod_orgao - , cod_unidade - , num_processo_licitatorio - , tipo_documento - , num_documento - , num_lote - , mapa_item.cod_item - , mapa_item.vl_total - , mapa_item.quantidade - , licitacao.exercicio - , config_licitacao.exercicio_licitacao - , config_licitacao.num_licitacao - ORDER BY num_processo_licitatorio - "; + + GROUP BY tipo_registro + , cod_orgao + , cod_unidade + , tipo_documento + , num_documento + , num_lote + , mapa_item.cod_item + , mapa_item.vl_total + , mapa_item.quantidade + , licitacao.cod_entidade + , licitacao.cod_licitacao + , licitacao.cod_modalidade + , licitacao.exercicio + + ORDER BY num_processo_licitatorio "; + return $stSql; } - + // detalhamento 20 foi removido porque não tem os filtros necessários ainda. /* public function recuperaDetalhamento20(&$rsRecordSet,$stFiltro="",$stOrder="",$boTransacao="") @@ -321,7 +318,7 @@ class TTCEMGJulgamentoLicitacao extends Persistente "; } */ - + public function recuperaExportacao30(&$rsRecordSet,$stFiltro="",$stOrder="",$boTransacao="") { return $this->executaRecupera("montaRecuperaExportacao30",$rsRecordSet,$stFiltro,$stOrder,$boTransacao); @@ -330,141 +327,148 @@ class TTCEMGJulgamentoLicitacao extends Persistente public function montaRecuperaExportacao30() { $stSql = " - SELECT - 30 AS tipo_registro - , LPAD(configuracao_entidade.valor,2,'0') AS cod_orgao - , LPAD(LPAD(licitacao.num_orgao::VARCHAR, 2, '0') || LPAD(licitacao.num_unidade::VARCHAR, 2, '0'),5,'0') AS cod_unidade - , config_licitacao.exercicio_licitacao - , config_licitacao.num_licitacao AS num_processo_licitatorio - , TO_CHAR(julgamento.timestamp,'ddmmyyyy') AS dt_julgamento - , 1 AS presenca_licitantes - , CASE WHEN participante.renuncia_recurso = true THEN + SELECT 30 AS tipo_registro + , LPAD(configuracao_entidade.valor,2,'0') AS cod_orgao + , LPAD(LPAD(licitacao.num_orgao::VARCHAR, 2, '0') || LPAD(licitacao.num_unidade::VARCHAR, 2, '0'),5,'0') AS cod_unidade + , (SELECT exercicio_licitacao + FROM tcemg.fn_exercicio_numero_licitacao ('".$this->getDado('exercicio')."', '".$this->getDado('entidades')."') + VALUES (cod_licitacao INTEGER + ,cod_modalidade INTEGER + ,cod_entidade INTEGER + ,exercicio CHAR(4) + ,exercicio_licitacao VARCHAR + ,num_licitacao TEXT ) + WHERE cod_entidade = licitacao.cod_entidade + AND cod_licitacao = licitacao.cod_licitacao + AND cod_modalidade = licitacao.cod_modalidade + AND exercicio = licitacao.exercicio + ) AS exercicio_licitacao + , (SELECT num_licitacao + FROM tcemg.fn_exercicio_numero_licitacao ('".$this->getDado('exercicio')."', '".$this->getDado('entidades')."') + VALUES (cod_licitacao INTEGER + ,cod_modalidade INTEGER + ,cod_entidade INTEGER + ,exercicio CHAR(4) + ,exercicio_licitacao VARCHAR + ,num_licitacao TEXT ) + WHERE cod_entidade = licitacao.cod_entidade + AND cod_licitacao = licitacao.cod_licitacao + AND cod_modalidade = licitacao.cod_modalidade + AND exercicio = licitacao.exercicio + ) AS num_processo_licitatorio + , TO_CHAR(julgamento.timestamp,'ddmmyyyy') AS dt_julgamento + , 1 AS presenca_licitantes + , CASE WHEN participante.renuncia_recurso = true THEN 1 ELSE 2 END AS renuncia_recurso - + FROM licitacao.licitacao - - JOIN licitacao.participante + + INNER JOIN licitacao.participante ON participante.cod_licitacao = licitacao.cod_licitacao AND participante.cod_modalidade = licitacao.cod_modalidade AND participante.cod_entidade = licitacao.cod_entidade AND participante.exercicio = licitacao.exercicio - - JOIN compras.mapa + + INNER JOIN compras.mapa ON mapa.exercicio = licitacao.exercicio_mapa AND mapa.cod_mapa = licitacao.cod_mapa - - JOIN compras.mapa_solicitacao + + INNER JOIN compras.mapa_solicitacao ON mapa_solicitacao.exercicio = mapa.exercicio AND mapa_solicitacao.cod_mapa = mapa.cod_mapa - - JOIN compras.mapa_item + + INNER JOIN compras.mapa_item ON mapa_item.exercicio = mapa_solicitacao.exercicio AND mapa_item.cod_entidade = mapa_solicitacao.cod_entidade AND mapa_item.cod_solicitacao = mapa_solicitacao.cod_solicitacao AND mapa_item.cod_mapa = mapa_solicitacao.cod_mapa AND mapa_item.exercicio_solicitacao = mapa_solicitacao.exercicio_solicitacao - - JOIN compras.mapa_cotacao + + INNER JOIN compras.mapa_cotacao ON mapa_cotacao.exercicio_mapa = mapa.exercicio AND mapa_cotacao.cod_mapa = mapa.cod_mapa - - JOIN compras.cotacao + + INNER JOIN compras.cotacao ON cotacao.exercicio = mapa_cotacao.exercicio_cotacao AND cotacao.cod_cotacao = mapa_cotacao.cod_cotacao - - JOIN compras.julgamento + + INNER JOIN compras.julgamento ON julgamento.exercicio = cotacao.exercicio AND julgamento.cod_cotacao = cotacao.cod_cotacao - - JOIN compras.julgamento_item + + INNER JOIN compras.julgamento_item ON julgamento_item.exercicio = julgamento.exercicio AND julgamento_item.cod_cotacao = julgamento.cod_cotacao AND julgamento_item.cod_item = mapa_item.cod_item - - JOIN licitacao.homologacao + + INNER JOIN licitacao.homologacao ON homologacao.cod_licitacao=licitacao.cod_licitacao AND homologacao.cod_modalidade=licitacao.cod_modalidade AND homologacao.cod_entidade=licitacao.cod_entidade AND homologacao.exercicio_licitacao=licitacao.exercicio AND homologacao.cod_item=julgamento_item.cod_item AND homologacao.lote=julgamento_item.lote - AND ( - SELECT homologacao_anulada.num_homologacao FROM licitacao.homologacao_anulada - WHERE homologacao_anulada.cod_licitacao=licitacao.cod_licitacao - AND homologacao_anulada.cod_modalidade=licitacao.cod_modalidade - AND homologacao_anulada.cod_entidade=licitacao.cod_entidade - AND homologacao_anulada.exercicio_licitacao=licitacao.exercicio - AND homologacao.num_homologacao=homologacao_anulada.num_homologacao - AND homologacao.cod_item=homologacao_anulada.cod_item - AND homologacao.lote=homologacao_anulada.lote - ) IS NULL - - JOIN administracao.configuracao_entidade + + LEFT JOIN licitacao.homologacao_anulada + ON homologacao_anulada.cod_licitacao=homologacao.cod_licitacao + AND homologacao_anulada.cod_modalidade=homologacao.cod_modalidade + AND homologacao_anulada.cod_entidade=homologacao.cod_entidade + AND homologacao_anulada.exercicio_licitacao=homologacao.exercicio_licitacao + AND homologacao_anulada.num_homologacao=homologacao.num_homologacao + AND homologacao_anulada.cod_item=homologacao.cod_item + AND homologacao_anulada.lote=homologacao.lote + + INNER JOIN administracao.configuracao_entidade ON configuracao_entidade.parametro = 'tcemg_codigo_orgao_entidade_sicom' AND configuracao_entidade.cod_modulo = 55 AND configuracao_entidade.exercicio = licitacao.exercicio AND configuracao_entidade.cod_entidade = licitacao.cod_entidade - - JOIN sw_cgm AS responsavel + + INNER JOIN sw_cgm AS responsavel ON responsavel.numcgm = participante.numcgm_representante - - JOIN ( SELECT num_documento, numcgm, tipo_documento + + INNER JOIN ( SELECT num_documento, numcgm, tipo_documento FROM ( SELECT cpf AS num_documento, numcgm, 1 AS tipo_documento FROM sw_cgm_pessoa_fisica - UNION - SELECT cnpj AS num_documento, numcgm, 2 AS tipo_documento FROM sw_cgm_pessoa_juridica ) AS tabela GROUP BY numcgm, num_documento, tipo_documento - ) AS documento_pessoa + ) AS documento_pessoa ON documento_pessoa.numcgm = responsavel.numcgm - - JOIN ( - SELECT * FROM tcemg.fn_exercicio_numero_licitacao ('".$this->getDado('exercicio')."', '".$this->getDado('entidades')."') - VALUES (cod_licitacao INTEGER - ,cod_modalidade INTEGER - ,cod_entidade INTEGER - ,exercicio CHAR(4) - ,exercicio_licitacao VARCHAR - ,num_licitacao TEXT ) - ) AS config_licitacao - ON config_licitacao.cod_entidade = licitacao.cod_entidade - AND config_licitacao.cod_licitacao = licitacao.cod_licitacao - AND config_licitacao.cod_modalidade = licitacao.cod_modalidade - AND config_licitacao.exercicio = licitacao.exercicio - - WHERE TO_DATE(TO_CHAR(homologacao.timestamp,'dd/mm/yyyy'), 'dd/mm/yyyy') BETWEEN TO_DATE('01/" . $this->getDado('mes') . "/" . $this->getDado('exercicio') . "', 'dd/mm/yyyy') - AND last_day(TO_DATE('" . $this->getDado('exercicio') . "' || '-' || '".$this->getDado('mes') . "' || '-' || '01','yyyy-mm-dd')) - AND licitacao.cod_entidade IN (" . $this->getDado('entidades'). ") - AND licitacao.cod_modalidade NOT IN (8,9) - AND NOT EXISTS( SELECT 1 - FROM licitacao.licitacao_anulada - WHERE licitacao_anulada.cod_licitacao = licitacao.cod_licitacao - AND licitacao_anulada.cod_modalidade = licitacao.cod_modalidade - AND licitacao_anulada.cod_entidade = licitacao.cod_entidade - AND licitacao_anulada.exercicio = licitacao.exercicio - ) - GROUP BY tipo_registro - , cod_orgao - , cod_unidade - , num_processo_licitatorio - , dt_julgamento, presenca_licitantes - , renuncia_recurso - , licitacao.exercicio - , config_licitacao.exercicio_licitacao - , config_licitacao.num_licitacao - - ORDER BY num_processo_licitatorio - "; + + WHERE TO_DATE(TO_CHAR(homologacao.timestamp,'dd/mm/yyyy'), 'dd/mm/yyyy') BETWEEN TO_DATE('01/" . $this->getDado('mes') . "/" . $this->getDado('exercicio') . "', 'dd/mm/yyyy') + AND last_day(TO_DATE('" . $this->getDado('exercicio') . "' || '-' || '".$this->getDado('mes') . "' || '-' || '01','yyyy-mm-dd')) + AND homologacao_anulada.cod_licitacao IS NULL + AND licitacao.cod_entidade IN (" . $this->getDado('entidades'). ") + AND licitacao.cod_modalidade NOT IN (8,9) + AND NOT EXISTS( SELECT 1 + FROM licitacao.licitacao_anulada + WHERE licitacao_anulada.cod_licitacao = licitacao.cod_licitacao + AND licitacao_anulada.cod_modalidade = licitacao.cod_modalidade + AND licitacao_anulada.cod_entidade = licitacao.cod_entidade + AND licitacao_anulada.exercicio = licitacao.exercicio + ) + + GROUP BY tipo_registro + , cod_orgao + , cod_unidade + , dt_julgamento, presenca_licitantes + , renuncia_recurso + , licitacao.cod_entidade + , licitacao.cod_licitacao + , licitacao.cod_modalidade + , licitacao.exercicio + + ORDER BY num_processo_licitatorio "; + return $stSql; } - + public function __destruct(){} - } \ No newline at end of file diff --git a/gestaoPrestacaoContas/fontes/PHP/TCEMG/classes/mapeamento/2015/TTCEMGLQD.class.php b/gestaoPrestacaoContas/fontes/PHP/TCEMG/classes/mapeamento/2015/TTCEMGLQD.class.php index 6641761..863739c 100755 --- a/gestaoPrestacaoContas/fontes/PHP/TCEMG/classes/mapeamento/2015/TTCEMGLQD.class.php +++ b/gestaoPrestacaoContas/fontes/PHP/TCEMG/classes/mapeamento/2015/TTCEMGLQD.class.php @@ -28,20 +28,17 @@ * Data de Criação: 30/01/2007 * @author Analista: Gelson - * @author Desenvolvedor: Henrique Boaventura + * @author Desenvolvedor: Jean da Silva * @package URBEM * @subpackage Mapeamento - $Revision: 56934 $ - $Name$ - $Author: gelson $ - $Date: 2014-01-08 17:46:44 -0200 (Wed, 08 Jan 2014) $ + $Id: TTCEMGLQD.class.php 64106 2015-12-02 19:13:45Z michel $ * Casos de uso: uc-06.04.00 */ include_once '../../../../../../gestaoAdministrativa/fontes/PHP/framework/include/valida.inc.php'; -include_once ( CLA_PERSISTENTE ); +include_once CLA_PERSISTENTE; class TTCEMGLQD extends Persistente { @@ -59,44 +56,39 @@ class TTCEMGLQD extends Persistente { $stSql = " SELECT * - FROM ( - SELECT - 10 AS tipo_registro - , LPAD((nota_liquidacao.cod_nota::VARCHAR || nota_liquidacao.exercicio), 15, '0') AS cod_reduzido - , LPAD(configuracao_entidade.valor::VARCHAR,2,'0') AS cod_orgao - , LPAD(LPAD(despesa.num_orgao::VARCHAR,2,'0') || LPAD(despesa.num_unidade::VARCHAR,2,'0'),5,'0') AS cod_unidade - , 1 AS tipo_liquidacao - , empenho.cod_empenho AS num_empenho - , TO_CHAR(empenho.dt_empenho,'ddmmyyyy') AS dt_empenho - , TO_CHAR(nota_liquidacao.dt_liquidacao,'ddmmyyyy') AS dt_liquidacao - , TCEMG.numero_nota_liquidacao('".$this->getDado('exercicio')."', - empenho.cod_entidade, - nota_liquidacao.cod_nota, - nota_liquidacao.exercicio_empenho, - empenho.cod_empenho - ) AS num_liquidacao - , LPAD(REPLACE(SUM(nota_liquidacao_item.vl_total)::varchar,'.',','),13,'0') AS vl_liquidado - , CASE WHEN sw_cgm_pessoa_fisica.cpf IS NOT NULL - THEN sw_cgm_pessoa_fisica.cpf - ELSE ordenador.cpf - END AS cpf_liquidante - + FROM ( + SELECT 10 AS tipo_registro + , LPAD((nota_liquidacao.cod_nota::VARCHAR || nota_liquidacao.exercicio), 15, '0') AS cod_reduzido + , LPAD(configuracao_entidade.valor::VARCHAR,2,'0') AS cod_orgao + , LPAD(LPAD(despesa.num_orgao::VARCHAR,2,'0') || LPAD(despesa.num_unidade::VARCHAR,2,'0'),5,'0') AS cod_unidade + , 1 AS tipo_liquidacao + , empenho.cod_empenho AS num_empenho + , TO_CHAR(empenho.dt_empenho,'ddmmyyyy') AS dt_empenho + , TO_CHAR(nota_liquidacao.dt_liquidacao,'ddmmyyyy') AS dt_liquidacao + , TCEMG.numero_nota_liquidacao('".$this->getDado('exercicio')."', + empenho.cod_entidade, + nota_liquidacao.cod_nota, + nota_liquidacao.exercicio_empenho, + empenho.cod_empenho + ) AS num_liquidacao + , LPAD(REPLACE(SUM(nota_liquidacao_item.vl_total)::varchar,'.',','),13,'0') AS vl_liquidado + , ordenador.cpf AS cpf_liquidante FROM empenho.pre_empenho - - JOIN empenho.empenho + + INNER JOIN empenho.empenho ON empenho.exercicio = pre_empenho.exercicio AND empenho.cod_pre_empenho = pre_empenho.cod_pre_empenho - - JOIN empenho.nota_liquidacao + + INNER JOIN empenho.nota_liquidacao ON nota_liquidacao.exercicio_empenho = empenho.exercicio AND nota_liquidacao.cod_entidade = empenho.cod_entidade AND nota_liquidacao.cod_empenho = empenho.cod_empenho - - JOIN empenho.nota_liquidacao_item + + INNER JOIN empenho.nota_liquidacao_item ON nota_liquidacao_item.exercicio = nota_liquidacao.exercicio AND nota_liquidacao_item.cod_entidade = nota_liquidacao.cod_entidade AND nota_liquidacao_item.cod_nota = nota_liquidacao.cod_nota - + LEFT JOIN (SELECT despesa.* , conta_despesa.cod_estrutural , pre_empenho_despesa.cod_pre_empenho @@ -112,38 +104,27 @@ class TTCEMGLQD extends Persistente INNER JOIN orcamento.recurso ON despesa.cod_recurso = recurso.cod_recurso AND despesa.exercicio = recurso.exercicio - JOIN tcemg.uniorcam + INNER JOIN tcemg.uniorcam ON uniorcam.exercicio = despesa.exercicio AND uniorcam.num_orgao = despesa.num_orgao AND uniorcam.num_unidade = despesa.num_unidade - ) AS despesa - ON despesa.exercicio = pre_empenho.exercicio - AND despesa.cod_pre_empenho = pre_empenho.cod_pre_empenho - - JOIN administracao.configuracao_entidade - ON configuracao_entidade.cod_entidade = nota_liquidacao.cod_entidade - AND configuracao_entidade.parametro = 'tcemg_codigo_orgao_entidade_sicom' - AND configuracao_entidade.cod_modulo = 55 - AND configuracao_entidade.exercicio = nota_liquidacao.exercicio - - LEFT JOIN sw_cgm_pessoa_fisica - ON sw_cgm_pessoa_fisica.numcgm::VARCHAR = ( SELECT TCEMG.buscar_responsavel_lqd (nota_liquidacao.cod_entidade::VARCHAR, - nota_liquidacao.cod_nota::VARCHAR, - TO_CHAR(nota_liquidacao.dt_liquidacao, 'dd/mm/yyyy') - ) - ) - LEFT JOIN (SELECT cpf - , numcgm - FROM sw_cgm_pessoa_fisica) AS ordenador - ON ordenador.numcgm::VARCHAR = despesa.cgm_ordenador::VARCHAR - - WHERE nota_liquidacao.exercicio = '".Sessao::getExercicio()."' - AND TO_CHAR(nota_liquidacao.dt_liquidacao,'mmyyyy') = '"; - - $stSql .= "".$this->getDado('mes')."".Sessao::getExercicio()."' - - AND nota_liquidacao.cod_entidade IN (".$this->getDado('entidades').") - AND pre_empenho.implantado = 'f' + ) AS despesa + ON despesa.exercicio = pre_empenho.exercicio + AND despesa.cod_pre_empenho = pre_empenho.cod_pre_empenho + + INNER JOIN administracao.configuracao_entidade + ON configuracao_entidade.cod_entidade = nota_liquidacao.cod_entidade + AND configuracao_entidade.parametro = 'tcemg_codigo_orgao_entidade_sicom' + AND configuracao_entidade.cod_modulo = 55 + AND configuracao_entidade.exercicio = nota_liquidacao.exercicio + + LEFT JOIN sw_cgm_pessoa_fisica AS ordenador + ON ordenador.numcgm = despesa.cgm_ordenador + + WHERE nota_liquidacao.exercicio = '".Sessao::getExercicio()."' + AND TO_CHAR(nota_liquidacao.dt_liquidacao,'mmyyyy') = '".$this->getDado('mes')."".Sessao::getExercicio()."' + AND nota_liquidacao.cod_entidade IN (".$this->getDado('entidades').") + AND pre_empenho.implantado = 'f' GROUP BY empenho.cod_entidade , nota_liquidacao.cod_nota @@ -154,64 +135,56 @@ class TTCEMGLQD extends Persistente , despesa.num_orgao , empenho.dt_empenho , nota_liquidacao.dt_liquidacao - , sw_cgm_pessoa_fisica.cpf , nota_liquidacao.exercicio - , ordenador.cpf - - UNION - - SELECT - 10 AS tipo_registro - , LPAD((nota_liquidacao.cod_nota::VARCHAR || nota_liquidacao.exercicio), 15, '0') AS cod_reduzido - , LPAD(configuracao_entidade.valor::VARCHAR,2,'0') AS cod_orgao - , CASE WHEN uniorcam.num_orgao_atual IS NOT NULL - THEN LPAD(LPAD(uniorcam.num_orgao_atual::VARCHAR,2,'0')||LPAD(uniorcam.num_unidade_atual::VARCHAR,2,'0'),5,'0') - ELSE LPAD(restos_pre_empenho.num_unidade::VARCHAR,5,'0') - END AS cod_unidade - , 2 AS tipo_liquidacao - , empenho.cod_empenho AS num_empenho - , TO_CHAR(empenho.dt_empenho,'ddmmyyyy') AS dt_empenho - , TO_CHAR(nota_liquidacao.dt_liquidacao,'ddmmyyyy') AS dt_liquidacao - , TCEMG.numero_nota_liquidacao('".$this->getDado('exercicio')."', - empenho.cod_entidade, - nota_liquidacao.cod_nota, - nota_liquidacao.exercicio_empenho, - empenho.cod_empenho - ) AS num_liquidacao - , LPAD(REPLACE(SUM(nota_liquidacao_item.vl_total)::varchar,'.',','),13,'0') AS vl_liquidado - , CASE WHEN sw_cgm_pessoa_fisica.cpf IS NOT NULL - THEN sw_cgm_pessoa_fisica.cpf - WHEN uniorcam.num_orgao_atual IS NOT NULL AND uniorcam.cgm_ordenador IS NOT NULL - THEN (SELECT cpf FROM sw_cgm_pessoa_fisica WHERE numcgm = uniorcam.cgm_ordenador) - WHEN uniorcam.num_orgao_atual IS NOT NULL AND (SELECT t_u.cgm_ordenador FROM tcemg.uniorcam AS t_u WHERE t_u.num_unidade = uniorcam.num_unidade_atual and t_u.num_orgao = uniorcam.num_orgao_atual) IS NOT NULL - THEN (SELECT cpf FROM sw_cgm_pessoa_fisica WHERE numcgm = (SELECT t_u.cgm_ordenador FROM tcemg.uniorcam AS t_u WHERE t_u.num_unidade = uniorcam.num_unidade_atual and t_u.num_orgao = uniorcam.num_orgao_atual)) - ELSE '' - END AS cpf_liquidante + , ordenador.cpf + + UNION + + SELECT 10 AS tipo_registro + , LPAD((nota_liquidacao.cod_nota::VARCHAR || nota_liquidacao.exercicio), 15, '0') AS cod_reduzido + , LPAD(configuracao_entidade.valor::VARCHAR,2,'0') AS cod_orgao + , CASE WHEN uniorcam.num_orgao_atual IS NOT NULL + THEN LPAD(LPAD(uniorcam.num_orgao_atual::VARCHAR,2,'0')||LPAD(uniorcam.num_unidade_atual::VARCHAR,2,'0'),5,'0') + ELSE LPAD(restos_pre_empenho.num_unidade::VARCHAR,5,'0') + END AS cod_unidade + , 2 AS tipo_liquidacao + , empenho.cod_empenho AS num_empenho + , TO_CHAR(empenho.dt_empenho,'ddmmyyyy') AS dt_empenho + , TO_CHAR(nota_liquidacao.dt_liquidacao,'ddmmyyyy') AS dt_liquidacao + , TCEMG.numero_nota_liquidacao('".$this->getDado('exercicio')."', + empenho.cod_entidade, + nota_liquidacao.cod_nota, + nota_liquidacao.exercicio_empenho, + empenho.cod_empenho + ) AS num_liquidacao + , LPAD(REPLACE(SUM(nota_liquidacao_item.vl_total)::varchar,'.',','),13,'0') AS vl_liquidado + , ordenador.cpf AS cpf_liquidante + FROM empenho.pre_empenho - - JOIN empenho.restos_pre_empenho - ON restos_pre_empenho.cod_pre_empenho = pre_empenho.cod_pre_empenho - AND restos_pre_empenho.exercicio = pre_empenho.exercicio - + + INNER JOIN empenho.restos_pre_empenho + ON restos_pre_empenho.cod_pre_empenho = pre_empenho.cod_pre_empenho + AND restos_pre_empenho.exercicio = pre_empenho.exercicio + LEFT JOIN tcemg.uniorcam ON uniorcam.num_unidade = restos_pre_empenho.num_unidade - AND uniorcam.exercicio = restos_pre_empenho.exercicio + AND uniorcam.exercicio = restos_pre_empenho.exercicio AND uniorcam.num_orgao_atual IS NOT NULL - - JOIN empenho.empenho + + INNER JOIN empenho.empenho ON empenho.exercicio = pre_empenho.exercicio AND empenho.cod_pre_empenho = pre_empenho.cod_pre_empenho - - JOIN empenho.nota_liquidacao + + INNER JOIN empenho.nota_liquidacao ON nota_liquidacao.exercicio_empenho = empenho.exercicio AND nota_liquidacao.cod_entidade = empenho.cod_entidade AND nota_liquidacao.cod_empenho = empenho.cod_empenho - - JOIN empenho.nota_liquidacao_item + + INNER JOIN empenho.nota_liquidacao_item ON nota_liquidacao_item.exercicio = nota_liquidacao.exercicio AND nota_liquidacao_item.cod_entidade = nota_liquidacao.cod_entidade AND nota_liquidacao_item.cod_nota = nota_liquidacao.cod_nota - + LEFT JOIN (SELECT despesa.* , conta_despesa.cod_estrutural , pre_empenho_despesa.cod_pre_empenho @@ -219,74 +192,69 @@ class TTCEMGLQD extends Persistente , uniorcam.cgm_ordenador , uniorcam.num_unidade AS num_unidade_uniorcam , uniorcam.num_orgao AS num_orgao_uniorcam - FROM empenho.pre_empenho_despesa - INNER JOIN orcamento.despesa - ON despesa.exercicio = pre_empenho_despesa.exercicio - AND despesa.cod_despesa = pre_empenho_despesa.cod_despesa - INNER JOIN orcamento.conta_despesa - ON conta_despesa.exercicio = despesa.exercicio - AND conta_despesa.cod_conta = despesa.cod_conta - INNER JOIN orcamento.recurso - ON despesa.cod_recurso = recurso.cod_recurso - AND despesa.exercicio = recurso.exercicio - JOIN tcemg.uniorcam - ON uniorcam.exercicio = despesa.exercicio - AND uniorcam.num_orgao = despesa.num_orgao - AND uniorcam.num_unidade = despesa.num_unidade - ) AS despesa - ON despesa.exercicio = pre_empenho.exercicio - AND despesa.cod_pre_empenho = pre_empenho.cod_pre_empenho - - JOIN administracao.configuracao_entidade - ON configuracao_entidade.cod_entidade = nota_liquidacao.cod_entidade - AND configuracao_entidade.parametro = 'tcemg_codigo_orgao_entidade_sicom' - AND configuracao_entidade.cod_modulo = 55 - AND configuracao_entidade.exercicio = nota_liquidacao.exercicio - - LEFT JOIN sw_cgm_pessoa_fisica - ON sw_cgm_pessoa_fisica.numcgm::VARCHAR = ( SELECT TCEMG.buscar_responsavel_lqd (nota_liquidacao.cod_entidade::VARCHAR, - nota_liquidacao.cod_nota::VARCHAR, - TO_CHAR(nota_liquidacao.dt_liquidacao, 'dd/mm/yyyy') - ) - ) - LEFT JOIN (SELECT cpf - , numcgm - FROM sw_cgm_pessoa_fisica) AS ordenador - ON ( ordenador.numcgm::VARCHAR = despesa.cgm_ordenador::VARCHAR + FROM empenho.pre_empenho_despesa + INNER JOIN orcamento.despesa + ON despesa.exercicio = pre_empenho_despesa.exercicio + AND despesa.cod_despesa = pre_empenho_despesa.cod_despesa + INNER JOIN orcamento.conta_despesa + ON conta_despesa.exercicio = despesa.exercicio + AND conta_despesa.cod_conta = despesa.cod_conta + INNER JOIN orcamento.recurso + ON despesa.cod_recurso = recurso.cod_recurso + AND despesa.exercicio = recurso.exercicio + INNER JOIN tcemg.uniorcam + ON uniorcam.exercicio = despesa.exercicio + AND uniorcam.num_orgao = despesa.num_orgao + AND uniorcam.num_unidade = despesa.num_unidade + ) AS despesa + ON despesa.exercicio = pre_empenho.exercicio + AND despesa.cod_pre_empenho = pre_empenho.cod_pre_empenho + + INNER JOIN administracao.configuracao_entidade + ON configuracao_entidade.cod_entidade = nota_liquidacao.cod_entidade + AND configuracao_entidade.parametro = 'tcemg_codigo_orgao_entidade_sicom' + AND configuracao_entidade.cod_modulo = 55 + AND configuracao_entidade.exercicio = nota_liquidacao.exercicio + + LEFT JOIN sw_cgm_pessoa_fisica AS ordenador + ON ( ( ordenador.numcgm = uniorcam.cgm_ordenador + AND uniorcam.num_orgao_atual IS NOT NULL + AND uniorcam.cgm_ordenador IS NOT NULL + ) + OR + ( uniorcam.num_orgao_atual IS NOT NULL + AND (SELECT t_u.cgm_ordenador FROM tcemg.uniorcam AS t_u WHERE t_u.num_unidade = uniorcam.num_unidade_atual and t_u.num_orgao = uniorcam.num_orgao_atual) IS NOT NULL + AND ordenador.numcgm = (SELECT t_u.cgm_ordenador FROM tcemg.uniorcam AS t_u WHERE t_u.num_unidade = uniorcam.num_unidade_atual and t_u.num_orgao = uniorcam.num_orgao_atual) + ) OR - ordenador.numcgm::VARCHAR = uniorcam.cgm_ordenador::VARCHAR + ( ordenador.numcgm = despesa.cgm_ordenador AND uniorcam.num_orgao_atual IS NULL AND uniorcam.cgm_ordenador IS NULL ) ) - + WHERE nota_liquidacao.exercicio = '".Sessao::getExercicio()."' - AND TO_CHAR(nota_liquidacao.dt_liquidacao,'mmyyyy') = '"; - - $stSql .= "".$this->getDado('mes')."".Sessao::getExercicio()."' - + AND TO_CHAR(nota_liquidacao.dt_liquidacao,'mmyyyy') = '".$this->getDado('mes')."".Sessao::getExercicio()."' AND nota_liquidacao.cod_entidade IN (".$this->getDado('entidades').") AND pre_empenho.implantado = 't' - GROUP BY empenho.cod_entidade - , nota_liquidacao.cod_nota - , nota_liquidacao.exercicio_empenho - , empenho.cod_empenho - , configuracao_entidade.valor - , despesa.num_unidade - , despesa.num_orgao - , empenho.dt_empenho - , nota_liquidacao.dt_liquidacao - , sw_cgm_pessoa_fisica.cpf - , nota_liquidacao.exercicio - , ordenador.cpf - , cod_unidade - , uniorcam.num_orgao - , uniorcam.num_unidade - , restos_pre_empenho.num_unidade - , uniorcam.cgm_ordenador - , cpf_liquidante - ) AS tabela - - ORDER BY num_empenho - "; + GROUP BY empenho.cod_entidade + , nota_liquidacao.cod_nota + , nota_liquidacao.exercicio_empenho + , empenho.cod_empenho + , configuracao_entidade.valor + , despesa.num_unidade + , despesa.num_orgao + , empenho.dt_empenho + , nota_liquidacao.dt_liquidacao + , nota_liquidacao.exercicio + , ordenador.cpf + , cod_unidade + , uniorcam.num_orgao + , uniorcam.num_unidade + , restos_pre_empenho.num_unidade + , uniorcam.cgm_ordenador + , cpf_liquidante + ) AS tabela + + ORDER BY num_empenho "; return $stSql; } @@ -299,33 +267,32 @@ class TTCEMGLQD extends Persistente { $stSql = " SELECT * - FROM ( - SELECT - 11 AS tipo_registro - , LPAD((nota_liquidacao.cod_nota::VARCHAR || nota_liquidacao.exercicio), 15, '0') AS cod_reduzido - , LPAD(LPAD(despesa.num_orgao::VARCHAR,2,'0') || LPAD(despesa.num_unidade::VARCHAR,2,'0'),5,'0') AS cod_unidade - , empenho.cod_empenho AS num_empenho - , TO_CHAR(empenho.dt_empenho,'ddmmyyyy') AS dt_empenho - , TCEMG.numero_nota_liquidacao('".Sessao::getExercicio()."',empenho.cod_entidade,nota_liquidacao.cod_nota,nota_liquidacao.exercicio_empenho,empenho.cod_empenho) AS num_liquidacao - , despesa.cod_fonte::varchar AS cod_font_recursos - , REPLACE(SUM(nota_liquidacao_item.vl_total)::varchar,'.',',') AS vl_fonte - + FROM ( + SELECT 11 AS tipo_registro + , LPAD((nota_liquidacao.cod_nota::VARCHAR || nota_liquidacao.exercicio), 15, '0') AS cod_reduzido + , LPAD(LPAD(despesa.num_orgao::VARCHAR,2,'0') || LPAD(despesa.num_unidade::VARCHAR,2,'0'),5,'0') AS cod_unidade + , empenho.cod_empenho AS num_empenho + , TO_CHAR(empenho.dt_empenho,'ddmmyyyy') AS dt_empenho + , TCEMG.numero_nota_liquidacao('".Sessao::getExercicio()."',empenho.cod_entidade,nota_liquidacao.cod_nota,nota_liquidacao.exercicio_empenho,empenho.cod_empenho) AS num_liquidacao + , despesa.cod_fonte::varchar AS cod_font_recursos + , REPLACE(SUM(nota_liquidacao_item.vl_total)::varchar,'.',',') AS vl_fonte + FROM empenho.pre_empenho - - JOIN empenho.empenho + + INNER JOIN empenho.empenho ON empenho.exercicio = pre_empenho.exercicio AND empenho.cod_pre_empenho = pre_empenho.cod_pre_empenho - - JOIN empenho.nota_liquidacao + + INNER JOIN empenho.nota_liquidacao ON nota_liquidacao.exercicio_empenho = empenho.exercicio AND nota_liquidacao.cod_entidade = empenho.cod_entidade AND nota_liquidacao.cod_empenho = empenho.cod_empenho - - JOIN empenho.nota_liquidacao_item + + INNER JOIN empenho.nota_liquidacao_item ON nota_liquidacao_item.exercicio = nota_liquidacao.exercicio AND nota_liquidacao_item.cod_entidade = nota_liquidacao.cod_entidade AND nota_liquidacao_item.cod_nota = nota_liquidacao.cod_nota - + LEFT JOIN (SELECT despesa.* , conta_despesa.cod_estrutural , pre_empenho_despesa.cod_pre_empenho @@ -341,34 +308,24 @@ class TTCEMGLQD extends Persistente INNER JOIN orcamento.recurso ON despesa.cod_recurso = recurso.cod_recurso AND despesa.exercicio = recurso.exercicio - JOIN tcemg.uniorcam + INNER JOIN tcemg.uniorcam ON uniorcam.exercicio = despesa.exercicio AND uniorcam.num_orgao = despesa.num_orgao AND uniorcam.num_unidade = despesa.num_unidade - ) AS despesa - ON despesa.exercicio = pre_empenho.exercicio - AND despesa.cod_pre_empenho = pre_empenho.cod_pre_empenho - - JOIN administracao.configuracao_entidade - ON configuracao_entidade.cod_entidade = nota_liquidacao.cod_entidade - AND configuracao_entidade.parametro = 'tcemg_codigo_orgao_entidade_sicom' - AND configuracao_entidade.cod_modulo = 55 - AND configuracao_entidade.exercicio = nota_liquidacao.exercicio - - LEFT JOIN sw_cgm - ON sw_cgm.numcgm::VARCHAR = (SELECT TCEMG.buscar_responsavel_lqd (nota_liquidacao.cod_entidade::VARCHAR, - nota_liquidacao.cod_nota::VARCHAR, - TO_CHAR(nota_liquidacao.dt_liquidacao, 'dd/mm/yyyy') - ) - ) - - WHERE nota_liquidacao.exercicio = '".Sessao::getExercicio()."' - AND TO_CHAR(nota_liquidacao.dt_liquidacao,'mmyyyy') = '"; - - $stSql .= "".$this->getDado('mes')."".Sessao::getExercicio()."' - - AND nota_liquidacao.cod_entidade IN (".$this->getDado('entidades').") - AND pre_empenho.implantado = 'f' + ) AS despesa + ON despesa.exercicio = pre_empenho.exercicio + AND despesa.cod_pre_empenho = pre_empenho.cod_pre_empenho + + INNER JOIN administracao.configuracao_entidade + ON configuracao_entidade.cod_entidade = nota_liquidacao.cod_entidade + AND configuracao_entidade.parametro = 'tcemg_codigo_orgao_entidade_sicom' + AND configuracao_entidade.cod_modulo = 55 + AND configuracao_entidade.exercicio = nota_liquidacao.exercicio + + WHERE nota_liquidacao.exercicio = '".Sessao::getExercicio()."' + AND TO_CHAR(nota_liquidacao.dt_liquidacao,'mmyyyy') = '".$this->getDado('mes')."".Sessao::getExercicio()."' + AND nota_liquidacao.cod_entidade IN (".$this->getDado('entidades').") + AND pre_empenho.implantado = 'f' GROUP BY empenho.cod_entidade , nota_liquidacao.cod_nota @@ -381,47 +338,46 @@ class TTCEMGLQD extends Persistente , nota_liquidacao.dt_liquidacao , despesa.cod_fonte , nota_liquidacao.exercicio - + UNION - - SELECT - 11 AS tipo_registro - , LPAD((nota_liquidacao.cod_nota::VARCHAR || nota_liquidacao.exercicio), 15, '0') AS cod_reduzido - , CASE WHEN uniorcam.num_orgao_atual IS NOT NULL - THEN LPAD(LPAD(uniorcam.num_orgao_atual::VARCHAR,2,'0')||LPAD(uniorcam.num_unidade_atual::VARCHAR,2,'0'),5,'0') - ELSE LPAD(restos_pre_empenho.num_unidade::VARCHAR,5,'0') - END AS cod_unidade - , empenho.cod_empenho AS num_empenho - , TO_CHAR(empenho.dt_empenho,'ddmmyyyy') AS dt_empenho - , TCEMG.numero_nota_liquidacao('".Sessao::getExercicio()."',empenho.cod_entidade,nota_liquidacao.cod_nota,nota_liquidacao.exercicio_empenho,empenho.cod_empenho) AS num_liquidacao - , restos_pre_empenho.recurso::varchar AS cod_font_recursos - , REPLACE(SUM(nota_liquidacao_item.vl_total)::varchar,'.',',') AS vl_fonte - + + SELECT 11 AS tipo_registro + , LPAD((nota_liquidacao.cod_nota::VARCHAR || nota_liquidacao.exercicio), 15, '0') AS cod_reduzido + , CASE WHEN uniorcam.num_orgao_atual IS NOT NULL + THEN LPAD(LPAD(uniorcam.num_orgao_atual::VARCHAR,2,'0')||LPAD(uniorcam.num_unidade_atual::VARCHAR,2,'0'),5,'0') + ELSE LPAD(restos_pre_empenho.num_unidade::VARCHAR,5,'0') + END AS cod_unidade + , empenho.cod_empenho AS num_empenho + , TO_CHAR(empenho.dt_empenho,'ddmmyyyy') AS dt_empenho + , TCEMG.numero_nota_liquidacao('".Sessao::getExercicio()."',empenho.cod_entidade,nota_liquidacao.cod_nota,nota_liquidacao.exercicio_empenho,empenho.cod_empenho) AS num_liquidacao + , restos_pre_empenho.recurso::varchar AS cod_font_recursos + , REPLACE(SUM(nota_liquidacao_item.vl_total)::varchar,'.',',') AS vl_fonte + FROM empenho.pre_empenho - - JOIN empenho.restos_pre_empenho - ON restos_pre_empenho.cod_pre_empenho = pre_empenho.cod_pre_empenho - AND restos_pre_empenho.exercicio = pre_empenho.exercicio - - LEFT JOIN tcemg.uniorcam + + INNER JOIN empenho.restos_pre_empenho + ON restos_pre_empenho.cod_pre_empenho = pre_empenho.cod_pre_empenho + AND restos_pre_empenho.exercicio = pre_empenho.exercicio + + LEFT JOIN tcemg.uniorcam ON uniorcam.num_unidade = restos_pre_empenho.num_unidade - AND uniorcam.exercicio = restos_pre_empenho.exercicio + AND uniorcam.exercicio = restos_pre_empenho.exercicio AND uniorcam.num_orgao_atual IS NOT NULL - - JOIN empenho.empenho + + INNER JOIN empenho.empenho ON empenho.exercicio = pre_empenho.exercicio AND empenho.cod_pre_empenho = pre_empenho.cod_pre_empenho - - JOIN empenho.nota_liquidacao + + INNER JOIN empenho.nota_liquidacao ON nota_liquidacao.exercicio_empenho = empenho.exercicio AND nota_liquidacao.cod_entidade = empenho.cod_entidade AND nota_liquidacao.cod_empenho = empenho.cod_empenho - - JOIN empenho.nota_liquidacao_item + + INNER JOIN empenho.nota_liquidacao_item ON nota_liquidacao_item.exercicio = nota_liquidacao.exercicio AND nota_liquidacao_item.cod_entidade = nota_liquidacao.cod_entidade AND nota_liquidacao_item.cod_nota = nota_liquidacao.cod_nota - + LEFT JOIN (SELECT despesa.* , conta_despesa.cod_estrutural , pre_empenho_despesa.cod_pre_empenho @@ -429,66 +385,53 @@ class TTCEMGLQD extends Persistente , uniorcam.cgm_ordenador , uniorcam.num_unidade AS num_unidade_uniorcam , uniorcam.num_orgao AS num_orgao_uniorcam - + FROM empenho.pre_empenho_despesa + INNER JOIN orcamento.despesa + ON despesa.exercicio = pre_empenho_despesa.exercicio + AND despesa.cod_despesa = pre_empenho_despesa.cod_despesa + INNER JOIN orcamento.conta_despesa + ON conta_despesa.exercicio = despesa.exercicio + AND conta_despesa.cod_conta = despesa.cod_conta + INNER JOIN orcamento.recurso + ON despesa.cod_recurso = recurso.cod_recurso + AND despesa.exercicio = recurso.exercicio + INNER JOIN tcemg.uniorcam + ON uniorcam.exercicio = despesa.exercicio + AND uniorcam.num_orgao = despesa.num_orgao + AND uniorcam.num_unidade = despesa.num_unidade + ) AS despesa + ON despesa.exercicio = pre_empenho.exercicio + AND despesa.cod_pre_empenho = pre_empenho.cod_pre_empenho + + INNER JOIN administracao.configuracao_entidade + ON configuracao_entidade.cod_entidade = nota_liquidacao.cod_entidade + AND configuracao_entidade.parametro = 'tcemg_codigo_orgao_entidade_sicom' + AND configuracao_entidade.cod_modulo = 55 + AND configuracao_entidade.exercicio = nota_liquidacao.exercicio - FROM empenho.pre_empenho_despesa - INNER JOIN orcamento.despesa - ON despesa.exercicio = pre_empenho_despesa.exercicio - AND despesa.cod_despesa = pre_empenho_despesa.cod_despesa - INNER JOIN orcamento.conta_despesa - ON conta_despesa.exercicio = despesa.exercicio - AND conta_despesa.cod_conta = despesa.cod_conta - INNER JOIN orcamento.recurso - ON despesa.cod_recurso = recurso.cod_recurso - AND despesa.exercicio = recurso.exercicio - JOIN tcemg.uniorcam - ON uniorcam.exercicio = despesa.exercicio - AND uniorcam.num_orgao = despesa.num_orgao - AND uniorcam.num_unidade = despesa.num_unidade - ) AS despesa - ON despesa.exercicio = pre_empenho.exercicio - AND despesa.cod_pre_empenho = pre_empenho.cod_pre_empenho - - JOIN administracao.configuracao_entidade - ON configuracao_entidade.cod_entidade = nota_liquidacao.cod_entidade - AND configuracao_entidade.parametro = 'tcemg_codigo_orgao_entidade_sicom' - AND configuracao_entidade.cod_modulo = 55 - AND configuracao_entidade.exercicio = nota_liquidacao.exercicio - - LEFT JOIN sw_cgm - ON sw_cgm.numcgm::VARCHAR = (SELECT TCEMG.buscar_responsavel_lqd (nota_liquidacao.cod_entidade::VARCHAR, - nota_liquidacao.cod_nota::VARCHAR, - TO_CHAR(nota_liquidacao.dt_liquidacao, 'dd/mm/yyyy') - ) - ) - WHERE nota_liquidacao.exercicio = '".Sessao::getExercicio()."' - AND TO_CHAR(nota_liquidacao.dt_liquidacao,'mmyyyy') = '"; - - $stSql .= "".$this->getDado('mes')."".Sessao::getExercicio()."' - + AND TO_CHAR(nota_liquidacao.dt_liquidacao,'mmyyyy') = '".$this->getDado('mes')."".Sessao::getExercicio()."' AND nota_liquidacao.cod_entidade IN (".$this->getDado('entidades').") AND pre_empenho.implantado = 't' - GROUP BY empenho.cod_entidade - , nota_liquidacao.cod_nota - , nota_liquidacao.exercicio_empenho - , empenho.cod_empenho - , configuracao_entidade.valor - , despesa.num_unidade - , despesa.num_orgao - , empenho.dt_empenho - , nota_liquidacao.dt_liquidacao - , restos_pre_empenho.recurso - , nota_liquidacao.exercicio - , despesa.num_unidade_uniorcam - , despesa.num_orgao_uniorcam - , cod_unidade - , restos_pre_empenho.num_unidade - ) AS tabela - - ORDER BY num_empenho - "; + GROUP BY empenho.cod_entidade + , nota_liquidacao.cod_nota + , nota_liquidacao.exercicio_empenho + , empenho.cod_empenho + , configuracao_entidade.valor + , despesa.num_unidade + , despesa.num_orgao + , empenho.dt_empenho + , nota_liquidacao.dt_liquidacao + , restos_pre_empenho.recurso + , nota_liquidacao.exercicio + , despesa.num_unidade_uniorcam + , despesa.num_orgao_uniorcam + , cod_unidade + , restos_pre_empenho.num_unidade + ) AS tabela + + ORDER BY num_empenho "; return $stSql; } @@ -501,36 +444,34 @@ class TTCEMGLQD extends Persistente { $stSql = " SELECT * - FROM ( - SELECT - 12 AS tipo_registro - --, TCEMG.numero_nota_liquidacao('".Sessao::getExercicio()."',empenho.cod_entidade,nota_liquidacao.cod_nota,nota_liquidacao.exercicio_empenho,empenho.cod_empenho) AS cod_reduzido - , LPAD((nota_liquidacao.cod_nota::VARCHAR || nota_liquidacao.exercicio), 15, '0') AS cod_reduzido - , LPAD(LPAD(despesa.num_orgao::VARCHAR,2,'0') || LPAD(despesa.num_unidade::VARCHAR,2,'0'),5,'0') AS cod_unidade - , empenho.cod_empenho AS num_empenho - , TO_CHAR(empenho.dt_empenho,'ddmmyyyy') AS dt_empenho - , nota_liquidacao.cod_nota AS num_liquidacao - , SUBSTR(TO_CHAR(nota_liquidacao.dt_liquidacao,'ddmmyyyy'),3,2) AS mes_competencia - , nota_liquidacao.exercicio::integer AS exercicio_competencia - , REPLACE(SUM(nota_liquidacao_item.vl_total)::varchar,'.',',') AS vl_despesa_anterior - , despesa.cod_estrutural - + FROM ( + SELECT 12 AS tipo_registro + , LPAD((nota_liquidacao.cod_nota::VARCHAR || nota_liquidacao.exercicio), 15, '0') AS cod_reduzido + , LPAD(LPAD(despesa.num_orgao::VARCHAR,2,'0') || LPAD(despesa.num_unidade::VARCHAR,2,'0'),5,'0') AS cod_unidade + , empenho.cod_empenho AS num_empenho + , TO_CHAR(empenho.dt_empenho,'ddmmyyyy') AS dt_empenho + , nota_liquidacao.cod_nota AS num_liquidacao + , SUBSTR(TO_CHAR(nota_liquidacao.dt_liquidacao,'ddmmyyyy'),3,2) AS mes_competencia + , nota_liquidacao.exercicio::integer AS exercicio_competencia + , REPLACE(SUM(nota_liquidacao_item.vl_total)::varchar,'.',',') AS vl_despesa_anterior + , despesa.cod_estrutural + FROM empenho.pre_empenho - - JOIN empenho.empenho + + INNER JOIN empenho.empenho ON empenho.exercicio = pre_empenho.exercicio AND empenho.cod_pre_empenho = pre_empenho.cod_pre_empenho - - JOIN empenho.nota_liquidacao + + INNER JOIN empenho.nota_liquidacao ON nota_liquidacao.exercicio_empenho = empenho.exercicio AND nota_liquidacao.cod_entidade = empenho.cod_entidade AND nota_liquidacao.cod_empenho = empenho.cod_empenho - - JOIN empenho.nota_liquidacao_item + + INNER JOIN empenho.nota_liquidacao_item ON nota_liquidacao_item.exercicio = nota_liquidacao.exercicio AND nota_liquidacao_item.cod_entidade = nota_liquidacao.cod_entidade AND nota_liquidacao_item.cod_nota = nota_liquidacao.cod_nota - + LEFT JOIN (SELECT despesa.* , conta_despesa.cod_estrutural , pre_empenho_despesa.cod_pre_empenho @@ -550,35 +491,32 @@ class TTCEMGLQD extends Persistente ON uniorcam.exercicio = despesa.exercicio AND uniorcam.num_orgao = despesa.num_orgao AND uniorcam.num_unidade = despesa.num_unidade - ) AS despesa - ON despesa.exercicio = pre_empenho.exercicio - AND despesa.cod_pre_empenho = pre_empenho.cod_pre_empenho - - JOIN administracao.configuracao_entidade - ON configuracao_entidade.cod_entidade = nota_liquidacao.cod_entidade - AND configuracao_entidade.parametro = 'tcemg_codigo_orgao_entidade_sicom' - AND configuracao_entidade.cod_modulo = 55 - AND configuracao_entidade.exercicio = nota_liquidacao.exercicio - - JOIN sw_cgm - ON sw_cgm.numcgm = (SELECT valor::integer AS num_cgm + ) AS despesa + ON despesa.exercicio = pre_empenho.exercicio + AND despesa.cod_pre_empenho = pre_empenho.cod_pre_empenho + + INNER JOIN administracao.configuracao_entidade + ON configuracao_entidade.cod_entidade = nota_liquidacao.cod_entidade + AND configuracao_entidade.parametro = 'tcemg_codigo_orgao_entidade_sicom' + AND configuracao_entidade.cod_modulo = 55 + AND configuracao_entidade.exercicio = nota_liquidacao.exercicio + + INNER JOIN sw_cgm + ON sw_cgm.numcgm = (SELECT valor::integer AS num_cgm FROM administracao.configuracao_entidade WHERE cod_entidade = nota_liquidacao.cod_entidade AND exercicio = nota_liquidacao.exercicio AND cod_modulo = 55 AND parametro = 'tcemg_cgm_responsavel' - ) - + ) + LEFT JOIN sw_cgm_pessoa_fisica ON sw_cgm_pessoa_fisica.numcgm = sw_cgm.numcgm - - WHERE nota_liquidacao.exercicio = '".Sessao::getExercicio()."' - AND TO_CHAR(nota_liquidacao.dt_liquidacao,'mmyyyy') = '"; - - $stSql .= "".$this->getDado('mes')."".Sessao::getExercicio()."' - - AND nota_liquidacao.cod_entidade IN (".$this->getDado('entidades').") - AND pre_empenho.implantado = 'f' + + WHERE nota_liquidacao.exercicio = '".Sessao::getExercicio()."' + AND TO_CHAR(nota_liquidacao.dt_liquidacao,'mmyyyy') = '".$this->getDado('mes')."".Sessao::getExercicio()."' + AND nota_liquidacao.cod_entidade IN (".$this->getDado('entidades').") + AND pre_empenho.implantado = 'f' GROUP BY empenho.cod_entidade , nota_liquidacao.cod_nota @@ -591,119 +529,116 @@ class TTCEMGLQD extends Persistente , nota_liquidacao.dt_liquidacao , nota_liquidacao.exercicio , despesa.cod_estrutural - - UNION - - SELECT - 12 AS tipo_registro - --, TCEMG.numero_nota_liquidacao('".Sessao::getExercicio()."',empenho.cod_entidade,nota_liquidacao.cod_nota,nota_liquidacao.exercicio_empenho,empenho.cod_empenho) AS cod_reduzido - , LPAD((nota_liquidacao.cod_nota::VARCHAR || nota_liquidacao.exercicio), 15, '0') AS cod_reduzido - , CASE WHEN uniorcam.num_orgao_atual IS NOT NULL - THEN LPAD(LPAD(uniorcam.num_orgao_atual::VARCHAR,2,'0')||LPAD(uniorcam.num_unidade_atual::VARCHAR,2,'0'),5,'0') - ELSE LPAD(restos_pre_empenho.num_unidade::VARCHAR,5,'0') - END AS cod_unidade - , empenho.cod_empenho AS num_empenho - , TO_CHAR(empenho.dt_empenho,'ddmmyyyy') AS dt_empenho - , nota_liquidacao.cod_nota AS num_liquidacao - , SUBSTR(TO_CHAR(nota_liquidacao.dt_liquidacao,'ddmmyyyy'),3,2) AS mes_competencia - , nota_liquidacao.exercicio::integer AS exercicio_competencia - , REPLACE(SUM(nota_liquidacao_item.vl_total)::varchar,'.',',') AS vl_despesa_anterior - , despesa.cod_estrutural - + + UNION + + SELECT 12 AS tipo_registro + , LPAD((nota_liquidacao.cod_nota::VARCHAR || nota_liquidacao.exercicio), 15, '0') AS cod_reduzido + , CASE WHEN uniorcam.num_orgao_atual IS NOT NULL + THEN LPAD(LPAD(uniorcam.num_orgao_atual::VARCHAR,2,'0')||LPAD(uniorcam.num_unidade_atual::VARCHAR,2,'0'),5,'0') + ELSE LPAD(restos_pre_empenho.num_unidade::VARCHAR,5,'0') + END AS cod_unidade + , empenho.cod_empenho AS num_empenho + , TO_CHAR(empenho.dt_empenho,'ddmmyyyy') AS dt_empenho + , nota_liquidacao.cod_nota AS num_liquidacao + , SUBSTR(TO_CHAR(nota_liquidacao.dt_liquidacao,'ddmmyyyy'),3,2) AS mes_competencia + , nota_liquidacao.exercicio::integer AS exercicio_competencia + , REPLACE(SUM(nota_liquidacao_item.vl_total)::varchar,'.',',') AS vl_despesa_anterior + , despesa.cod_estrutural + FROM empenho.pre_empenho - - JOIN empenho.restos_pre_empenho - ON restos_pre_empenho.cod_pre_empenho = pre_empenho.cod_pre_empenho - AND restos_pre_empenho.exercicio = pre_empenho.exercicio - - LEFT JOIN tcemg.uniorcam + + INNER JOIN empenho.restos_pre_empenho + ON restos_pre_empenho.cod_pre_empenho = pre_empenho.cod_pre_empenho + AND restos_pre_empenho.exercicio = pre_empenho.exercicio + + LEFT JOIN tcemg.uniorcam ON uniorcam.num_unidade = restos_pre_empenho.num_unidade - AND uniorcam.exercicio = restos_pre_empenho.exercicio + AND uniorcam.exercicio = restos_pre_empenho.exercicio AND uniorcam.num_orgao_atual IS NOT NULL - - JOIN empenho.empenho + + INNER JOIN empenho.empenho ON empenho.exercicio = pre_empenho.exercicio AND empenho.cod_pre_empenho = pre_empenho.cod_pre_empenho - - JOIN empenho.nota_liquidacao + + INNER JOIN empenho.nota_liquidacao ON nota_liquidacao.exercicio_empenho = empenho.exercicio AND nota_liquidacao.cod_entidade = empenho.cod_entidade AND nota_liquidacao.cod_empenho = empenho.cod_empenho - - JOIN empenho.nota_liquidacao_item + + INNER JOIN empenho.nota_liquidacao_item ON nota_liquidacao_item.exercicio = nota_liquidacao.exercicio AND nota_liquidacao_item.cod_entidade = nota_liquidacao.cod_entidade AND nota_liquidacao_item.cod_nota = nota_liquidacao.cod_nota - + LEFT JOIN (SELECT despesa.* , conta_despesa.cod_estrutural , pre_empenho_despesa.cod_pre_empenho , recurso.cod_fonte , uniorcam.num_unidade AS num_unidade_uniorcam , uniorcam.num_orgao AS num_orgao_uniorcam - FROM empenho.pre_empenho_despesa - INNER JOIN orcamento.despesa - ON despesa.exercicio = pre_empenho_despesa.exercicio - AND despesa.cod_despesa = pre_empenho_despesa.cod_despesa - INNER JOIN orcamento.conta_despesa - ON conta_despesa.exercicio = despesa.exercicio - AND conta_despesa.cod_conta = despesa.cod_conta - INNER JOIN orcamento.recurso - ON despesa.cod_recurso = recurso.cod_recurso - AND despesa.exercicio = recurso.exercicio - JOIN tcemg.uniorcam - ON uniorcam.exercicio = despesa.exercicio - AND uniorcam.num_orgao = despesa.num_orgao - AND uniorcam.num_unidade = despesa.num_unidade - ) AS despesa - ON despesa.exercicio = pre_empenho.exercicio - AND despesa.cod_pre_empenho = pre_empenho.cod_pre_empenho - - JOIN administracao.configuracao_entidade - ON configuracao_entidade.cod_entidade = nota_liquidacao.cod_entidade - AND configuracao_entidade.parametro = 'tcemg_codigo_orgao_entidade_sicom' - AND configuracao_entidade.cod_modulo = 55 - AND configuracao_entidade.exercicio = nota_liquidacao.exercicio - - JOIN sw_cgm - ON sw_cgm.numcgm = (SELECT valor::integer AS num_cgm + FROM empenho.pre_empenho_despesa + INNER JOIN orcamento.despesa + ON despesa.exercicio = pre_empenho_despesa.exercicio + AND despesa.cod_despesa = pre_empenho_despesa.cod_despesa + INNER JOIN orcamento.conta_despesa + ON conta_despesa.exercicio = despesa.exercicio + AND conta_despesa.cod_conta = despesa.cod_conta + INNER JOIN orcamento.recurso + ON despesa.cod_recurso = recurso.cod_recurso + AND despesa.exercicio = recurso.exercicio + INNER JOIN tcemg.uniorcam + ON uniorcam.exercicio = despesa.exercicio + AND uniorcam.num_orgao = despesa.num_orgao + AND uniorcam.num_unidade = despesa.num_unidade + ) AS despesa + ON despesa.exercicio = pre_empenho.exercicio + AND despesa.cod_pre_empenho = pre_empenho.cod_pre_empenho + + INNER JOIN administracao.configuracao_entidade + ON configuracao_entidade.cod_entidade = nota_liquidacao.cod_entidade + AND configuracao_entidade.parametro = 'tcemg_codigo_orgao_entidade_sicom' + AND configuracao_entidade.cod_modulo = 55 + AND configuracao_entidade.exercicio = nota_liquidacao.exercicio + + INNER JOIN sw_cgm + ON sw_cgm.numcgm = (SELECT valor::integer AS num_cgm FROM administracao.configuracao_entidade WHERE cod_entidade = nota_liquidacao.cod_entidade AND exercicio = nota_liquidacao.exercicio AND cod_modulo = 55 AND parametro = 'tcemg_cgm_responsavel' - ) - + ) + LEFT JOIN sw_cgm_pessoa_fisica ON sw_cgm_pessoa_fisica.numcgm = sw_cgm.numcgm - + WHERE nota_liquidacao.exercicio = '".Sessao::getExercicio()."' - AND TO_CHAR(nota_liquidacao.dt_liquidacao,'mmyyyy') = '"; - - $stSql .= "".$this->getDado('mes')."".Sessao::getExercicio()."' - + AND TO_CHAR(nota_liquidacao.dt_liquidacao,'mmyyyy') = '".$this->getDado('mes')."".Sessao::getExercicio()."' AND nota_liquidacao.cod_entidade IN (".$this->getDado('entidades').") AND pre_empenho.implantado = 't' - GROUP BY empenho.cod_entidade - , nota_liquidacao.cod_nota - , nota_liquidacao.exercicio_empenho - , empenho.cod_empenho - , configuracao_entidade.valor - , despesa.num_unidade - , despesa.num_orgao - , empenho.dt_empenho - , nota_liquidacao.dt_liquidacao - , nota_liquidacao.exercicio - , despesa.cod_estrutural - , despesa.num_unidade_uniorcam - , despesa.num_orgao_uniorcam - , cod_unidade - , restos_pre_empenho.num_unidade - ) AS tabela - WHERE tabela.cod_estrutural ilike '%3.1.9.0.91%' - ORDER BY num_empenho - "; + GROUP BY empenho.cod_entidade + , nota_liquidacao.cod_nota + , nota_liquidacao.exercicio_empenho + , empenho.cod_empenho + , configuracao_entidade.valor + , despesa.num_unidade + , despesa.num_orgao + , empenho.dt_empenho + , nota_liquidacao.dt_liquidacao + , nota_liquidacao.exercicio + , despesa.cod_estrutural + , despesa.num_unidade_uniorcam + , despesa.num_orgao_uniorcam + , cod_unidade + , restos_pre_empenho.num_unidade + ) AS tabela + + WHERE tabela.cod_estrutural ilike '%3.1.9.0.91%' + + ORDER BY num_empenho "; + return $stSql; } diff --git a/gestaoPrestacaoContas/fontes/PHP/TCEMG/classes/mapeamento/2015/TTCEMGOPS.class.php b/gestaoPrestacaoContas/fontes/PHP/TCEMG/classes/mapeamento/2015/TTCEMGOPS.class.php index 82f6a98..94e5617 100644 --- a/gestaoPrestacaoContas/fontes/PHP/TCEMG/classes/mapeamento/2015/TTCEMGOPS.class.php +++ b/gestaoPrestacaoContas/fontes/PHP/TCEMG/classes/mapeamento/2015/TTCEMGOPS.class.php @@ -30,12 +30,14 @@ * @author Analista: Valtair * @author Desenvolvedor: Carlos Adriano + $Id: TTCEMGOPS.class.php 64106 2015-12-02 19:13:45Z michel $ + * @package URBEM * @subpackage Mapeamento */ include_once '../../../../../../gestaoAdministrativa/fontes/PHP/framework/include/valida.inc.php'; -include_once ( CLA_PERSISTENTE ); +include_once CLA_PERSISTENTE; class TTCEMGOPS extends Persistente { @@ -74,147 +76,153 @@ class TTCEMGOPS extends Persistente public function montaRecuperaDadosOPS10() { - $stSql = " SELECT '10' AS tiporegistro - , LPAD((SELECT valor FROM administracao.configuracao_entidade WHERE exercicio = '".$this->getDado('exercicio')."' AND cod_entidade = empenho.cod_entidade AND parametro = 'tcemg_codigo_orgao_entidade_sicom'), 2, '0')::VARCHAR AS codorgao - , CASE WHEN (pre_empenho.cod_pre_empenho = restos_pre_empenho.cod_pre_empenho and pre_empenho.implantado = 't') THEN - CASE WHEN ( uniorcam.num_orgao_atual IS NOT NULL) THEN - LPAD(LPAD(uniorcam.num_orgao_atual::VARCHAR,2,'0')||LPAD(uniorcam.num_unidade_atual::VARCHAR,2,'0'),5,'0')::VARCHAR - ELSE LPAD(restos_pre_empenho.num_unidade::VARCHAR,5,'0')::VARCHAR - END - ELSE LPAD((lpad(despesa.num_orgao::VARCHAR, 3, '0')||LPAD(despesa.num_unidade::VARCHAR, 2, '0')),5,'0')::VARCHAR - END AS codunidadesub - , TO_CHAR(pagamento_liquidacao_nota_liquidacao_paga.timestamp,'yyyymmddhh24mm')||LPAD(ordem_pagamento.cod_ordem::VARCHAR,10,'0') AS nroop - , TO_CHAR(pagamento_liquidacao_nota_liquidacao_paga.timestamp,'ddmmyyyy') AS dtpagamento - , sum(nota_liquidacao_paga.vl_pago) AS vlop - , CASE WHEN ordem_pagamento.observacao <> '' - THEN trim(regexp_replace(sem_acentos(ordem_pagamento.observacao), '[º|°]', '', 'gi')) - ELSE 'pagamento OP' || ordem_pagamento.cod_ordem::varchar - END AS especificacaoop - , (SELECT cpf - FROM sw_cgm_pessoa_fisica - WHERE sw_cgm_pessoa_fisica.numcgm = (SELECT numcgm - FROM administracao.auditoria - WHERE auditoria.objeto = (SELECT objeto - FROM administracao.auditoria - WHERE objeto = (SELECT '".chr(34)."cod_ordem".chr(34)." => ".chr(34)."'||op2.cod_ordem||'".chr(34).",".chr(34)."cod_entidade".chr(34)." => ".chr(34)."'||op2.cod_entidade||'".chr(34).",".chr(34)."exercicio".chr(34)." => ".chr(34)."'||op2.exercicio||'".chr(34)."' - FROM empenho.ordem_pagamento AS op2 - WHERE op2.exercicio = ordem_pagamento.exercicio - AND op2.cod_entidade = ordem_pagamento.cod_entidade - AND op2.cod_ordem = ordem_pagamento.cod_ordem limit 1 - ) - ) - --AND auditoria.cod_acao = 816 - AND substr(timestamp::varchar,1,4) = '".$this->getDado('exercicio')."' - ) - ) AS cpfresppgto - - FROM empenho.nota_liquidacao as nl - - JOIN empenho.nota_liquidacao_paga - ON nota_liquidacao_paga.exercicio = nl.exercicio - AND nota_liquidacao_paga.cod_entidade = nl.cod_entidade - AND nota_liquidacao_paga.cod_nota = nl.cod_nota - - LEFT JOIN empenho.nota_liquidacao_paga_anulada - ON nota_liquidacao_paga_anulada.exercicio = nota_liquidacao_paga.exercicio - AND nota_liquidacao_paga_anulada.cod_nota = nota_liquidacao_paga.cod_nota - AND nota_liquidacao_paga_anulada.cod_entidade = nota_liquidacao_paga.cod_entidade - AND nota_liquidacao_paga_anulada.timestamp = nota_liquidacao_paga.timestamp - - - JOIN empenho.nota_liquidacao_conta_pagadora - ON nota_liquidacao_conta_pagadora.exercicio_liquidacao = nota_liquidacao_paga.exercicio - AND nota_liquidacao_conta_pagadora.cod_entidade = nota_liquidacao_paga.cod_entidade - AND nota_liquidacao_conta_pagadora.cod_nota = nota_liquidacao_paga.cod_nota - AND nota_liquidacao_conta_pagadora.timestamp = nota_liquidacao_paga.timestamp - - JOIN empenho.pagamento_liquidacao_nota_liquidacao_paga - ON nota_liquidacao_paga.cod_entidade = pagamento_liquidacao_nota_liquidacao_paga.cod_entidade - AND nota_liquidacao_paga.cod_nota = pagamento_liquidacao_nota_liquidacao_paga.cod_nota - AND nota_liquidacao_paga.exercicio = pagamento_liquidacao_nota_liquidacao_paga.exercicio_liquidacao - AND nota_liquidacao_paga.timestamp = pagamento_liquidacao_nota_liquidacao_paga.timestamp - - JOIN empenho.pagamento_liquidacao - ON pagamento_liquidacao.exercicio = pagamento_liquidacao_nota_liquidacao_paga.exercicio - AND pagamento_liquidacao.cod_entidade = pagamento_liquidacao_nota_liquidacao_paga.cod_entidade - AND pagamento_liquidacao.cod_ordem = pagamento_liquidacao_nota_liquidacao_paga.cod_ordem - AND pagamento_liquidacao.exercicio_liquidacao = pagamento_liquidacao_nota_liquidacao_paga.exercicio_liquidacao - AND pagamento_liquidacao.cod_nota = pagamento_liquidacao_nota_liquidacao_paga.cod_nota - - JOIN empenho.empenho - ON empenho.exercicio = nl.exercicio_empenho - AND empenho.cod_entidade = nl.cod_entidade - AND empenho.cod_empenho = nl.cod_empenho - - JOIN empenho.pre_empenho - ON pre_empenho.exercicio = empenho.exercicio - AND pre_empenho.cod_pre_empenho = empenho.cod_pre_empenho - - LEFT JOIN empenho.restos_pre_empenho - ON restos_pre_empenho.cod_pre_empenho = pre_empenho.cod_pre_empenho - AND restos_pre_empenho.exercicio = pre_empenho.exercicio - - LEFT JOIN sw_cgm - ON sw_cgm.numcgm = pre_empenho.cgm_beneficiario - - LEFT JOIN sw_cgm_pessoa_fisica + $stSql = " SELECT '10' AS tiporegistro + , LPAD((SELECT valor FROM administracao.configuracao_entidade WHERE exercicio = '".$this->getDado('exercicio')."' AND cod_entidade = empenho.cod_entidade AND parametro = 'tcemg_codigo_orgao_entidade_sicom'), 2, '0')::VARCHAR AS codorgao + , CASE WHEN pre_empenho.cod_pre_empenho = restos_pre_empenho.cod_pre_empenho AND pre_empenho.implantado = 't' THEN + CASE WHEN uniorcam_restos_atual.num_orgao IS NOT NULL THEN + LPAD(LPAD(uniorcam_restos_atual.num_orgao::VARCHAR,2,'0')||LPAD(uniorcam_restos_atual.num_unidade::VARCHAR,2,'0'),5,'0')::VARCHAR + ELSE + LPAD(restos_pre_empenho.num_unidade::VARCHAR,5,'0')::VARCHAR + END + ELSE + LPAD((lpad(despesa.num_orgao::VARCHAR, 3, '0')||LPAD(despesa.num_unidade::VARCHAR, 2, '0')),5,'0')::VARCHAR + END AS codunidadesub + , TO_CHAR(pagamento_liquidacao_nota_liquidacao_paga.timestamp,'yyyymmddhh24mm')||LPAD(ordem_pagamento.cod_ordem::VARCHAR,10,'0') AS nroop + , TO_CHAR(pagamento_liquidacao_nota_liquidacao_paga.timestamp,'ddmmyyyy') AS dtpagamento + , sum(nota_liquidacao_paga.vl_pago) AS vlop + , CASE WHEN ordem_pagamento.observacao <> '' THEN + trim(regexp_replace(sem_acentos(ordem_pagamento.observacao), '[º|°]', '', 'gi')) + ELSE + 'pagamento OP' || ordem_pagamento.cod_ordem::varchar + END AS especificacaoop + , cgm_ordenador.cpf AS cpfresppgto + + FROM empenho.nota_liquidacao as nl + + INNER JOIN empenho.nota_liquidacao_paga + ON nota_liquidacao_paga.exercicio = nl.exercicio + AND nota_liquidacao_paga.cod_entidade = nl.cod_entidade + AND nota_liquidacao_paga.cod_nota = nl.cod_nota + + LEFT JOIN empenho.nota_liquidacao_paga_anulada + ON nota_liquidacao_paga_anulada.exercicio = nota_liquidacao_paga.exercicio + AND nota_liquidacao_paga_anulada.cod_nota = nota_liquidacao_paga.cod_nota + AND nota_liquidacao_paga_anulada.cod_entidade = nota_liquidacao_paga.cod_entidade + AND nota_liquidacao_paga_anulada.timestamp = nota_liquidacao_paga.timestamp + + INNER JOIN empenho.nota_liquidacao_conta_pagadora + ON nota_liquidacao_conta_pagadora.exercicio_liquidacao = nota_liquidacao_paga.exercicio + AND nota_liquidacao_conta_pagadora.cod_entidade = nota_liquidacao_paga.cod_entidade + AND nota_liquidacao_conta_pagadora.cod_nota = nota_liquidacao_paga.cod_nota + AND nota_liquidacao_conta_pagadora.timestamp = nota_liquidacao_paga.timestamp + + INNER JOIN empenho.pagamento_liquidacao_nota_liquidacao_paga + ON nota_liquidacao_paga.cod_entidade = pagamento_liquidacao_nota_liquidacao_paga.cod_entidade + AND nota_liquidacao_paga.cod_nota = pagamento_liquidacao_nota_liquidacao_paga.cod_nota + AND nota_liquidacao_paga.exercicio = pagamento_liquidacao_nota_liquidacao_paga.exercicio_liquidacao + AND nota_liquidacao_paga.timestamp = pagamento_liquidacao_nota_liquidacao_paga.timestamp + + INNER JOIN empenho.pagamento_liquidacao + ON pagamento_liquidacao.exercicio = pagamento_liquidacao_nota_liquidacao_paga.exercicio + AND pagamento_liquidacao.cod_entidade = pagamento_liquidacao_nota_liquidacao_paga.cod_entidade + AND pagamento_liquidacao.cod_ordem = pagamento_liquidacao_nota_liquidacao_paga.cod_ordem + AND pagamento_liquidacao.exercicio_liquidacao = pagamento_liquidacao_nota_liquidacao_paga.exercicio_liquidacao + AND pagamento_liquidacao.cod_nota = pagamento_liquidacao_nota_liquidacao_paga.cod_nota + + INNER JOIN empenho.empenho + ON empenho.exercicio = nl.exercicio_empenho + AND empenho.cod_entidade = nl.cod_entidade + AND empenho.cod_empenho = nl.cod_empenho + + INNER JOIN empenho.pre_empenho + ON pre_empenho.exercicio = empenho.exercicio + AND pre_empenho.cod_pre_empenho = empenho.cod_pre_empenho + + LEFT JOIN empenho.restos_pre_empenho + ON restos_pre_empenho.cod_pre_empenho = pre_empenho.cod_pre_empenho + AND restos_pre_empenho.exercicio = pre_empenho.exercicio + + LEFT JOIN tcemg.uniorcam AS uniorcam_restos + ON uniorcam_restos.num_unidade = restos_pre_empenho.num_unidade + AND uniorcam_restos.num_orgao = restos_pre_empenho.num_orgao + AND uniorcam_restos.exercicio = restos_pre_empenho.exercicio + AND uniorcam_restos.num_orgao_atual IS NOT NULL + + LEFT JOIN tcemg.uniorcam AS uniorcam_restos_atual + ON uniorcam_restos_atual.num_unidade = uniorcam_restos.num_unidade_atual + AND uniorcam_restos_atual.num_orgao = uniorcam_restos.num_orgao_atual + AND uniorcam_restos_atual.exercicio = '".$this->getDado('exercicio')."' + + LEFT JOIN sw_cgm + ON sw_cgm.numcgm = pre_empenho.cgm_beneficiario + + LEFT JOIN sw_cgm_pessoa_fisica ON sw_cgm_pessoa_fisica.numcgm = pre_empenho.cgm_beneficiario - LEFT JOIN sw_cgm_pessoa_juridica + LEFT JOIN sw_cgm_pessoa_juridica ON sw_cgm_pessoa_juridica.numcgm = pre_empenho.cgm_beneficiario - LEFT JOIN empenho.pre_empenho_despesa - ON pre_empenho.exercicio = pre_empenho_despesa.exercicio - AND pre_empenho.cod_pre_empenho = pre_empenho_despesa.cod_pre_empenho - - LEFT JOIN orcamento.despesa - ON despesa.exercicio = pre_empenho_despesa.exercicio - AND despesa.cod_despesa = pre_empenho_despesa.cod_despesa - - LEFT JOIN tcemg.uniorcam - ON uniorcam.num_unidade = restos_pre_empenho.num_unidade - AND uniorcam.num_orgao = restos_pre_empenho.num_orgao - AND uniorcam.exercicio = restos_pre_empenho.exercicio - AND uniorcam.num_orgao_atual IS NOT NULL - - JOIN empenho.ordem_pagamento - ON pagamento_liquidacao.exercicio = ordem_pagamento.exercicio - AND pagamento_liquidacao.cod_entidade = ordem_pagamento.cod_entidade - AND pagamento_liquidacao.cod_ordem = ordem_pagamento.cod_ordem - - LEFT JOIN ( SELECT ordem_pagamento_retencao.cod_ordem - , ordem_pagamento_retencao.cod_entidade - , ordem_pagamento_retencao.exercicio - , SUM(ordem_pagamento_retencao.vl_retencao) AS vl_retencao - FROM empenho.ordem_pagamento_retencao - JOIN contabilidade.plano_analitica - ON ordem_pagamento_retencao.cod_plano = plano_analitica.cod_plano - AND ordem_pagamento_retencao.exercicio = plano_analitica.exercicio - JOIN contabilidade.plano_conta - ON plano_conta.cod_conta = plano_analitica.cod_conta - AND plano_conta.exercicio = plano_analitica.exercicio - WHERE SUBSTR(plano_conta.cod_estrutural, 1, 1) <> '4' - GROUP BY ordem_pagamento_retencao.cod_ordem - , ordem_pagamento_retencao.cod_entidade - , ordem_pagamento_retencao.exercicio - ) AS vl_retencao_orcamentaria - ON vl_retencao_orcamentaria.cod_ordem = ordem_pagamento.cod_ordem - AND vl_retencao_orcamentaria.cod_entidade = ordem_pagamento.cod_entidade - AND vl_retencao_orcamentaria.exercicio = ordem_pagamento.exercicio - - WHERE (to_char(ordem_pagamento.dt_emissao, 'yyyy'))::integer = '".$this->getDado('exercicio')."' - AND TO_DATE(nota_liquidacao_paga.timestamp::varchar, 'YYYY-MM-DD') BETWEEN TO_DATE('".$this->getDado('dt_inicial')."','dd/mm/yyyy') AND TO_DATE('".$this->getDado('dt_final')."','dd/mm/yyyy') - AND ordem_pagamento.cod_entidade IN (".$this->getDado('entidade').") - --AND nota_liquidacao_paga_anulada.timestamp_anulada IS NULL - GROUP BY tiporegistro - , codorgao - , codunidadesub - , nroop - , dtpagamento - , especificacaoop - , cpfresppgto - - ORDER BY nroop"; + LEFT JOIN empenho.pre_empenho_despesa + ON pre_empenho.exercicio = pre_empenho_despesa.exercicio + AND pre_empenho.cod_pre_empenho = pre_empenho_despesa.cod_pre_empenho + + LEFT JOIN orcamento.despesa + ON despesa.exercicio = pre_empenho_despesa.exercicio + AND despesa.cod_despesa = pre_empenho_despesa.cod_despesa + + LEFT JOIN tcemg.uniorcam AS uniorcam_despesa + ON uniorcam_despesa.num_unidade = despesa.num_unidade + AND uniorcam_despesa.num_orgao = despesa.num_orgao + AND uniorcam_despesa.exercicio = despesa.exercicio + + INNER JOIN empenho.ordem_pagamento + ON pagamento_liquidacao.exercicio = ordem_pagamento.exercicio + AND pagamento_liquidacao.cod_entidade = ordem_pagamento.cod_entidade + AND pagamento_liquidacao.cod_ordem = ordem_pagamento.cod_ordem + + LEFT JOIN ( SELECT ordem_pagamento_retencao.cod_ordem + , ordem_pagamento_retencao.cod_entidade + , ordem_pagamento_retencao.exercicio + , SUM(ordem_pagamento_retencao.vl_retencao) AS vl_retencao + FROM empenho.ordem_pagamento_retencao + INNER JOIN contabilidade.plano_analitica + ON ordem_pagamento_retencao.cod_plano = plano_analitica.cod_plano + AND ordem_pagamento_retencao.exercicio = plano_analitica.exercicio + INNER JOIN contabilidade.plano_conta + ON plano_conta.cod_conta = plano_analitica.cod_conta + AND plano_conta.exercicio = plano_analitica.exercicio + WHERE SUBSTR(plano_conta.cod_estrutural, 1, 1) <> '4' + GROUP BY ordem_pagamento_retencao.cod_ordem + , ordem_pagamento_retencao.cod_entidade + , ordem_pagamento_retencao.exercicio + ) AS vl_retencao_orcamentaria + ON vl_retencao_orcamentaria.cod_ordem = ordem_pagamento.cod_ordem + AND vl_retencao_orcamentaria.cod_entidade = ordem_pagamento.cod_entidade + AND vl_retencao_orcamentaria.exercicio = ordem_pagamento.exercicio + + LEFT JOIN sw_cgm_pessoa_fisica AS cgm_ordenador + ON ( restos_pre_empenho.cod_pre_empenho IS NOT NULL + AND pre_empenho.implantado = 't' + AND cgm_ordenador.numcgm = uniorcam_restos_atual.cgm_ordenador + ) + OR ( ( restos_pre_empenho.cod_pre_empenho IS NULL + OR pre_empenho.implantado <> 't' ) + AND cgm_ordenador.numcgm = uniorcam_despesa.cgm_ordenador + ) + + WHERE (to_char(ordem_pagamento.dt_emissao, 'yyyy'))::integer = '".$this->getDado('exercicio')."' + AND TO_DATE(nota_liquidacao_paga.timestamp::varchar, 'YYYY-MM-DD') BETWEEN TO_DATE('".$this->getDado('dt_inicial')."','dd/mm/yyyy') AND TO_DATE('".$this->getDado('dt_final')."','dd/mm/yyyy') + AND ordem_pagamento.cod_entidade IN (".$this->getDado('entidade').") + + GROUP BY tiporegistro + , codorgao + , codunidadesub + , nroop + , dtpagamento + , especificacaoop + , cpfresppgto + + ORDER BY nroop "; return $stSql; } diff --git a/gestaoPrestacaoContas/fontes/PHP/TCEMG/classes/mapeamento/2015/TTCEMGRelatorioRazaoDespesa.class.php b/gestaoPrestacaoContas/fontes/PHP/TCEMG/classes/mapeamento/2015/TTCEMGRelatorioRazaoDespesa.class.php index c23f906..1065fb0 100644 --- a/gestaoPrestacaoContas/fontes/PHP/TCEMG/classes/mapeamento/2015/TTCEMGRelatorioRazaoDespesa.class.php +++ b/gestaoPrestacaoContas/fontes/PHP/TCEMG/classes/mapeamento/2015/TTCEMGRelatorioRazaoDespesa.class.php @@ -33,7 +33,7 @@ * @package URBEM * @subpackage Mapeamento * - * $Id: TTCEMGRelatorioRazaoDespesa.class.php 62269 2015-04-15 18:28:39Z franver $ + * $Id: TTCEMGRelatorioRazaoDespesa.class.php 63835 2015-10-22 13:53:31Z franver $ * * $Name: $ * $Date: $ @@ -416,10 +416,7 @@ class TTCEMGRelatorioRazaoDespesa extends Persistente dt_empenho, dt_pagamento ; "; - - //SistemaLegado::mostravar($stSql); - //die; - + return $stSql; } diff --git a/gestaoPrestacaoContas/fontes/PHP/TCEMG/classes/mapeamento/TTCEMGRelatorioDividaFlutuante.class.php b/gestaoPrestacaoContas/fontes/PHP/TCEMG/classes/mapeamento/TTCEMGRelatorioDividaFlutuante.class.php index 309f573..0456d6c 100644 --- a/gestaoPrestacaoContas/fontes/PHP/TCEMG/classes/mapeamento/TTCEMGRelatorioDividaFlutuante.class.php +++ b/gestaoPrestacaoContas/fontes/PHP/TCEMG/classes/mapeamento/TTCEMGRelatorioDividaFlutuante.class.php @@ -27,7 +27,7 @@ * Página de Mapemanto Relatorio Divida Flutuante * Data de Criação: 31/07/2014 * @author Desenvolvedor: Evandro Melos - *$Id: TTCEMGRelatorioDividaFlutuante.class.php 59719 2014-09-08 15:00:53Z franver $ + *$Id: TTCEMGRelatorioDividaFlutuante.class.php 64143 2015-12-08 17:05:11Z jean $ *$Date: $ *$Author: $ *$Rev: $ @@ -427,6 +427,7 @@ class TTCEMGRelatorioDividaFlutuante extends Persistente $rsRecordSet = new RecordSet; $stSql = $this->montaRecuperaDepositosDividaFlutuante(); $this->stDebug = $stSql; + //stemaLegado::mostraVar($stSql);die; $obErro = $obConexao->executaSQL( $rsRecordSet, $stSql, "", $boTransacao ); } @@ -435,7 +436,7 @@ class TTCEMGRelatorioDividaFlutuante extends Persistente $stSql = " SELECT cod_entidade - ,nom_conta + ,cod_plano::VARCHAR || ' - ' || nom_conta AS nom_conta ,nom_entidade ,ABS(SUM(vl_saldo_anterior)) as vl_saldo_anterior ,ABS(SUM(vl_saldo_debitos)) as inscricao @@ -449,6 +450,7 @@ class TTCEMGRelatorioDividaFlutuante extends Persistente ,'A') AS( cod_estrutural VARCHAR + ,cod_plano INTEGER ,nivel INTEGER ,nom_conta VARCHAR ,nom_entidade VARCHAR @@ -458,7 +460,7 @@ class TTCEMGRelatorioDividaFlutuante extends Persistente ,vl_saldo_creditos NUMERIC ,vl_saldo_atual NUMERIC ) - GROUP BY cod_entidade, nom_entidade, nom_conta + GROUP BY cod_entidade, nom_entidade, nom_conta, cod_plano "; return $stSql; } diff --git a/gestaoPrestacaoContas/fontes/PHP/TCEMG/classes/negocio/RTCEMGExportacaoArquivosPlanejamento.class.php b/gestaoPrestacaoContas/fontes/PHP/TCEMG/classes/negocio/RTCEMGExportacaoArquivosPlanejamento.class.php index 6e68b44..220868e 100644 --- a/gestaoPrestacaoContas/fontes/PHP/TCEMG/classes/negocio/RTCEMGExportacaoArquivosPlanejamento.class.php +++ b/gestaoPrestacaoContas/fontes/PHP/TCEMG/classes/negocio/RTCEMGExportacaoArquivosPlanejamento.class.php @@ -149,7 +149,7 @@ class RTCEMGExportacaoArquivosPlanejamento } //Tipo Registro 12 - /*$rsAdminConfiguracao = new Recordset(); + $rsAdminConfiguracao = new Recordset(); $obTAdministracaoConfiguracao = new TAdministracaoConfiguracao(); $obTAdministracaoConfiguracao->setDado('exercicio', Sessao::getExercicio()); $obTAdministracaoConfiguracao->setDado('parametro', 'cod_entidade_prefeitura'); @@ -161,7 +161,7 @@ class RTCEMGExportacaoArquivosPlanejamento $this->obTAdministracaoConfiguracaoEntidade->setDado('parametro', 'tcemg_codigo_orgao_entidade_sicom'); $this->obTAdministracaoConfiguracaoEntidade->setDado('exercicio', Sessao::getExercicio()); $this->obTAdministracaoConfiguracaoEntidade->recuperaPorChave($rsAdminConfigEntidade); - + if ($rsAdminConfigEntidade->getNumLinhas() < 0) { $obTAdministracaoConfiguracao->setDado('exercicio', Sessao::getExercicio()); $obTAdministracaoConfiguracao->setDado('parametro', 'nom_prefeitura'); @@ -170,7 +170,7 @@ class RTCEMGExportacaoArquivosPlanejamento SistemaLegado::alertaAviso("FLExportarArquivosPlanejamento.php?".Sessao::getId()."&stAcao=$stAcao", "As configuração de Orgão não está configuradas. Por favor configurar a Entidade (".$rsAdminConfiguracao2->getCampo('valor').").", "", "aviso", Sessao::getId(), "../"); die; - }*/ + } $this->obTTCEMGAMP->setDado('entidades', $this->getCodEntidades()); diff --git a/gestaoPrestacaoContas/fontes/PHP/TCEMG/instancias/configuracao/FMManterExt.php b/gestaoPrestacaoContas/fontes/PHP/TCEMG/instancias/configuracao/FMManterExt.php index bfb96de..41ca4ba 100755 --- a/gestaoPrestacaoContas/fontes/PHP/TCEMG/instancias/configuracao/FMManterExt.php +++ b/gestaoPrestacaoContas/fontes/PHP/TCEMG/instancias/configuracao/FMManterExt.php @@ -114,7 +114,7 @@ $obBscConta->obCampoCod->setNull ( true ); $obBscConta->obCampoCod->setValue ( $inCodConta ); $obBscConta->obCampoCod->setAlign ( "left" ); $obBscConta->obCampoCod->obEvento->setOnChange("montaParametrosGET('buscaEstrutural','inTipoLancamento,inCodConta,inSubTipo','true');"); -$obBscConta->setFuncaoBusca("abrePopUp('".CAM_GF_CONT_POPUPS."planoConta/FLPlanoConta.php','frm','inCodConta','stConta','conta_analitica_estrutural','".Sessao::getId()."&inCodIniEstrutural=1,2,5,6&tipoBusca2=extmmaa','800','550');"); +$obBscConta->setFuncaoBusca("abrePopUp('".CAM_GF_CONT_POPUPS."planoConta/FLPlanoConta.php','frm','inCodConta','stConta','conta_analitica_estrutural','".Sessao::getId()."&inCodIniEstrutural=1,2,3.5,4.5,5,6&tipoBusca2=extmmaa','800','550');"); $obBtnOk = new Button(); $obBtnOk->setValue('Incluir'); diff --git a/gestaoPrestacaoContas/fontes/PHP/TCEMG/instancias/configuracao/FMManterRegistroPreco.php b/gestaoPrestacaoContas/fontes/PHP/TCEMG/instancias/configuracao/FMManterRegistroPreco.php index 7746846..ec1186e 100644 --- a/gestaoPrestacaoContas/fontes/PHP/TCEMG/instancias/configuracao/FMManterRegistroPreco.php +++ b/gestaoPrestacaoContas/fontes/PHP/TCEMG/instancias/configuracao/FMManterRegistroPreco.php @@ -404,8 +404,8 @@ $obBscOrgaoGerenciador->setValue($stNomGerenciador); $obBscOrgaoGerenciador->obCampoCod->setName("inNumOrgaoGerenciador"); $obBscOrgaoGerenciador->obCampoCod->setId("inNumOrgaoGerenciador"); $obBscOrgaoGerenciador->obCampoCod->setValue( $inNumGerenciador ); -$stParametrosAbrePopUp = Sessao::getId()."&stCtrl=buscaOrgaoGerenciador&stTabelaVinculo=sw_cgm_pessoa_fisica&stCampoVinculo=numcgm"; -$stParametrosOnBlur = "&stTabelaVinculo=sw_cgm_pessoa_fisica&stCampoVinculo=numcgm&inNumOrgaoGerenciador='+this.value"; +$stParametrosAbrePopUp = Sessao::getId()."&stCtrl=buscaOrgaoGerenciador&stTabelaVinculo=sw_cgm_pessoa_juridica&stCampoVinculo=numcgm"; +$stParametrosOnBlur = "&stTabelaVinculo=sw_cgm_pessoa_juridica&stCampoVinculo=numcgm&inNumOrgaoGerenciador='+this.value"; $obBscOrgaoGerenciador->obCampoCod->obEvento->setOnBlur("ajaxJavaScript('".$pgOcul."?".Sessao::getId().$stParametrosOnBlur.",'buscaOrgaoGerenciador');"); $obBscOrgaoGerenciador->setFuncaoBusca( "abrePopUp('".CAM_GA_CGM_POPUPS."cgm/FLProcurarCgm.php','frm','inNumOrgaoGerenciador','inNomOrgaoGerenciador','orgaoGerenciador','".$stParametrosAbrePopUp."','800','550');" ); diff --git a/gestaoPrestacaoContas/fontes/PHP/TCEMG/instancias/configuracao/JSManterRegistroPreco.js b/gestaoPrestacaoContas/fontes/PHP/TCEMG/instancias/configuracao/JSManterRegistroPreco.js index eaa75e0..4256abc 100644 --- a/gestaoPrestacaoContas/fontes/PHP/TCEMG/instancias/configuracao/JSManterRegistroPreco.js +++ b/gestaoPrestacaoContas/fontes/PHP/TCEMG/instancias/configuracao/JSManterRegistroPreco.js @@ -31,7 +31,7 @@ * @author Desenvolvedor: Franver Sarmento de Moraes * * @ignore - * $Id: JSManterRegistroPreco.js 63282 2015-08-12 14:11:42Z michel $ + * $Id: JSManterRegistroPreco.js 63765 2015-10-07 18:51:47Z michel $ * */ ?> @@ -98,6 +98,7 @@ function ValidaRegistroPreco() alertaAviso(mensagem,'form','erro','', '../'); } else{ + BloqueiaFrames(true,false); Salvar(); } } diff --git a/gestaoPrestacaoContas/fontes/PHP/TCEMG/instancias/configuracao/OCManterExt.php b/gestaoPrestacaoContas/fontes/PHP/TCEMG/instancias/configuracao/OCManterExt.php index f664b5f..918b474 100755 --- a/gestaoPrestacaoContas/fontes/PHP/TCEMG/instancias/configuracao/OCManterExt.php +++ b/gestaoPrestacaoContas/fontes/PHP/TCEMG/instancias/configuracao/OCManterExt.php @@ -109,7 +109,7 @@ switch ($stCtrl) { $obTContabilidadePlanoAnalitica = new TContabilidadePlanoAnalitica(); $stFiltro.= " AND pa.exercicio = '".Sessao::getExercicio()."' "; $stFiltro.= " AND pa.cod_plano = ".$_REQUEST['inCodConta']." "; - $stFiltro.= " AND (pc.cod_estrutural LIKE '1.%' OR pc.cod_estrutural LIKE '2.%' OR pc.cod_estrutural LIKE '5.%' OR pc.cod_estrutural LIKE '6.%' ) "; + $stFiltro.= " AND pc.cod_estrutural SIMILAR TO('1.%|2.%|3.5%|4.5%|5.%|6.%') "; $obTContabilidadePlanoAnalitica->recuperaContaAnalitica( $rsConta, $stFiltro ); if ( $rsConta->getNumLinhas() > 0 ) { $stJs = "document.getElementById('stConta').innerHTML = '".$rsConta->getCampo('nom_conta')."'; "; diff --git a/gestaoPrestacaoContas/fontes/PHP/TCEMG/instancias/configuracao/OCManterRegistroPreco.php b/gestaoPrestacaoContas/fontes/PHP/TCEMG/instancias/configuracao/OCManterRegistroPreco.php index c7ce4e9..cc880a4 100644 --- a/gestaoPrestacaoContas/fontes/PHP/TCEMG/instancias/configuracao/OCManterRegistroPreco.php +++ b/gestaoPrestacaoContas/fontes/PHP/TCEMG/instancias/configuracao/OCManterRegistroPreco.php @@ -31,10 +31,10 @@ * @author Desenvolvedor: Franver Sarmento de Moraes * * @ignore - * $Id: OCManterRegistroPreco.php 63756 2015-10-06 16:58:53Z franver $ - * $Date: 2015-10-06 13:58:53 -0300 (Ter, 06 Out 2015) $ - * $Author: franver $ - * $Rev: 63756 $ + * $Id: OCManterRegistroPreco.php 63773 2015-10-08 17:59:44Z michel $ + * $Date: 2015-10-08 14:59:44 -0300 (Qui, 08 Out 2015) $ + * $Author: michel $ + * $Rev: 63773 $ * */ include_once '../../../../../../gestaoAdministrativa/fontes/PHP/pacotes/FrameworkHTML.inc.php'; @@ -1620,7 +1620,7 @@ function preencheComboOrgaoAbaQuantitativo() } } foreach( $arOrgaosTMP as $key => $arOrgao) { - $stJs .= "f.inCodOrgaoQ.options[".$inContador++."] = new Option('".$arOrgao."','".$key."'); \n"; + $stJs .= "f.inCodOrgaoQ.options[".$inContador++."] = new Option('".addslashes($arOrgao)."','".$key."'); \n"; } $stJs .= "if(f.inCodUnidadeQ){ \n"; @@ -1681,7 +1681,7 @@ function preencheLoteOuNumItemAbaQuantitativo($boLote = false) $stJs .= "f.inCodLoteQ.options[".$inContador++."] = new Option('Selecione',''); \n"; foreach( $arLote as $key => $value) { - $stJs .= "f.inCodLoteQ.options[".$inContador++."] = new Option('".$value."','".$key."');\n"; + $stJs .= "f.inCodLoteQ.options[".$inContador++."] = new Option('".addslashes($value)."','".$key."');\n"; } $_REQUEST['inCodLoteQ'] = NULL; @@ -1713,7 +1713,7 @@ function preencheNumItemAbaQuantitativo($boValidaCodLote = false) } foreach( $arItensTMP as $key => $arItem) { - $stJs .= "f.inNumItemQ.options[".$inContador++."] = new Option('".$arItem."',".$key."); \n"; + $stJs .= "f.inNumItemQ.options[".$inContador++."] = new Option('".addslashes($arItem)."','".$key."'); \n"; } $stJs .= "f.nuHdnQtdeFornecida.value = '0,0000'; \n"; @@ -1764,7 +1764,8 @@ function preencheComboFornecedorAbaQuantitativo() foreach( $arItens as $arItem) { if ( $arItem["inNumItemLote"] == $_REQUEST['inNumItemQ'] && $arItem["stCodigoLote"] == $inCloLoteV) { $stJs .= "f.inHdnCodItemQ.value = ".$arItem["inCodItem"].";\n"; - $stJs .= "f.inCodFornecedorQ.options[".$inContador++."] = new Option('".$arItem["inNumCGMVencedor"]." - ".$arItem['stNomCGMVencedor']."','".$arItem["inNumCGMVencedor"]."'); \n"; + $stCgmVencedor = addslashes($arItem["inNumCGMVencedor"]." - ".$arItem['stNomCGMVencedor']); + $stJs .= "f.inCodFornecedorQ.options[".$inContador++."] = new Option('".$stCgmVencedor."','".$arItem["inNumCGMVencedor"]."'); \n"; } } @@ -2175,7 +2176,8 @@ function carregaLicitacao() while (!($rsModalidade->eof())) { $inCount++; - $stJs .= "f.inCodModalidade.options[".$inCount."] = new Option('".$rsModalidade->getCampo('cod_modalidade')." - ".$rsModalidade->getCampo('descricao')."','".$rsModalidade->getCampo('cod_modalidade')."'); \n"; + $stModalidade = addslashes($rsModalidade->getCampo('cod_modalidade')." - ".$rsModalidade->getCampo('descricao')); + $stJs .= "f.inCodModalidade.options[".$inCount."] = new Option('".$stModalidade."','".$rsModalidade->getCampo('cod_modalidade')."'); \n"; if($rsModalidade->getCampo('cod_modalidade')==$inCodModalidade){ $stJs .= "d.getElementById('inCodModalidade').selectedIndex = ".$inCount."; \n"; $stJs .= "jQuery('#inCodModalidade').val('".$inCodModalidade."'); \n"; diff --git a/gestaoPrestacaoContas/fontes/PHP/TCEMG/instancias/configuracao/PRManterRegistroPreco.php b/gestaoPrestacaoContas/fontes/PHP/TCEMG/instancias/configuracao/PRManterRegistroPreco.php index f191dd7..e99971d 100644 --- a/gestaoPrestacaoContas/fontes/PHP/TCEMG/instancias/configuracao/PRManterRegistroPreco.php +++ b/gestaoPrestacaoContas/fontes/PHP/TCEMG/instancias/configuracao/PRManterRegistroPreco.php @@ -32,10 +32,10 @@ * * @ignore * - * $Id: PRManterRegistroPreco.php 63322 2015-08-18 13:58:14Z michel $ - * $Date: 2015-08-18 10:58:14 -0300 (Ter, 18 Ago 2015) $ + * $Id: PRManterRegistroPreco.php 63765 2015-10-07 18:51:47Z michel $ + * $Date: 2015-10-07 15:51:47 -0300 (Qua, 07 Out 2015) $ * $Author: michel $ - * $Rev: 63322 $ + * $Rev: 63765 $ **/ include_once '../../../../../../gestaoAdministrativa/fontes/PHP/pacotes/FrameworkHTML.inc.php'; @@ -61,10 +61,9 @@ $stAcao = $request->get('stAcao', 'incluir'); $obTTCEMGRegistroPrecos = new TTCEMGRegistroPrecos(); -Sessao::setTrataExcecao(true); -Sessao::getTransacao()->setMapeamento( $obTTCEMGRegistroPrecos ); - $obErro = new Erro; +$obTransacao = new Transacao(); +$obErro = $obTransacao->abreTransacao($boFlagTransacao, $boTransacao); switch ($stAcao) { @@ -75,57 +74,72 @@ switch ($stAcao) { $obTTCEMGRegistroPrecosOrgaoItem->setDado('cod_entidade' , $request->get('inCodEntidade')); $obTTCEMGRegistroPrecosOrgaoItem->setDado('interno' , $request->get('boInterno')); $obTTCEMGRegistroPrecosOrgaoItem->setDado('numcgm_gerenciador' , $request->get('numcgmGerenciador')); - $obErro = $obTTCEMGRegistroPrecosOrgaoItem->exclusao(); + $obErro = $obTTCEMGRegistroPrecosOrgaoItem->exclusao($boTransacao); - $obTTCEMGItemRegistroPrecos = new TTCEMGItemRegistroPrecos(); - $obTTCEMGItemRegistroPrecos->setDado('numero_registro_precos' , $request->get('inNroRegistroPrecos')); - $obTTCEMGItemRegistroPrecos->setDado('exercicio' , $request->get('stExercicioRegistroPrecos')); - $obTTCEMGItemRegistroPrecos->setDado('cod_entidade' , $request->get('inCodEntidade')); - $obTTCEMGItemRegistroPrecos->setDado('interno' , $request->get('boInterno')); - $obTTCEMGItemRegistroPrecos->setDado('numcgm_gerenciador' , $request->get('numcgmGerenciador')); - $obErro = $obTTCEMGItemRegistroPrecos->exclusao(); + if (!$obErro->ocorreu()) { + $obTTCEMGItemRegistroPrecos = new TTCEMGItemRegistroPrecos(); + $obTTCEMGItemRegistroPrecos->setDado('numero_registro_precos' , $request->get('inNroRegistroPrecos')); + $obTTCEMGItemRegistroPrecos->setDado('exercicio' , $request->get('stExercicioRegistroPrecos')); + $obTTCEMGItemRegistroPrecos->setDado('cod_entidade' , $request->get('inCodEntidade')); + $obTTCEMGItemRegistroPrecos->setDado('interno' , $request->get('boInterno')); + $obTTCEMGItemRegistroPrecos->setDado('numcgm_gerenciador' , $request->get('numcgmGerenciador')); + $obErro = $obTTCEMGItemRegistroPrecos->exclusao($boTransacao); + } - $obTTCEMGRegistroPrecosOrgao = new TTCEMGRegistroPrecosOrgao(); - $obTTCEMGRegistroPrecosOrgao->setDado('numero_registro_precos' , $request->get('inNroRegistroPrecos')); - $obTTCEMGRegistroPrecosOrgao->setDado('exercicio_registro_precos', $request->get('stExercicioRegistroPrecos')); - $obTTCEMGRegistroPrecosOrgao->setDado('cod_entidade' , $request->get('inCodEntidade')); - $obTTCEMGRegistroPrecosOrgao->setDado('interno' , $request->get('boInterno')); - $obTTCEMGRegistroPrecosOrgao->setDado('numcgm_gerenciador' , $request->get('numcgmGerenciador')); - $obErro = $obTTCEMGRegistroPrecosOrgao->exclusao(); + if (!$obErro->ocorreu()) { + $obTTCEMGRegistroPrecosOrgao = new TTCEMGRegistroPrecosOrgao(); + $obTTCEMGRegistroPrecosOrgao->setDado('numero_registro_precos' , $request->get('inNroRegistroPrecos')); + $obTTCEMGRegistroPrecosOrgao->setDado('exercicio_registro_precos', $request->get('stExercicioRegistroPrecos')); + $obTTCEMGRegistroPrecosOrgao->setDado('cod_entidade' , $request->get('inCodEntidade')); + $obTTCEMGRegistroPrecosOrgao->setDado('interno' , $request->get('boInterno')); + $obTTCEMGRegistroPrecosOrgao->setDado('numcgm_gerenciador' , $request->get('numcgmGerenciador')); + $obErro = $obTTCEMGRegistroPrecosOrgao->exclusao($boTransacao); + } - $obTTCEMGLoteRegistroPrecos = new TTCEMGLoteRegistroPrecos(); - $obTTCEMGLoteRegistroPrecos->setDado('numero_registro_precos' , $request->get('inNroRegistroPrecos')); - $obTTCEMGLoteRegistroPrecos->setDado('exercicio' , $request->get('stExercicioRegistroPrecos')); - $obTTCEMGLoteRegistroPrecos->setDado('cod_entidade' , $request->get('inCodEntidade')); - $obTTCEMGLoteRegistroPrecos->setDado('interno' , $request->get('boInterno')); - $obTTCEMGLoteRegistroPrecos->setDado('numcgm_gerenciador' , $request->get('numcgmGerenciador')); - $obErro = $obTTCEMGLoteRegistroPrecos->exclusao(); - - $obTTCEMGEmpenhoRegistroPrecos = new TTCEMGEmpenhoRegistroPrecos(); - $obTTCEMGEmpenhoRegistroPrecos->setDado('numero_registro_precos' , $request->get('inNroRegistroPrecos')); - $obTTCEMGEmpenhoRegistroPrecos->setDado('exercicio' , $request->get('stExercicioRegistroPrecos')); - $obTTCEMGEmpenhoRegistroPrecos->setDado('cod_entidade' , $request->get('inCodEntidade')); - $obTTCEMGEmpenhoRegistroPrecos->setDado('interno' , $request->get('boInterno')); - $obTTCEMGEmpenhoRegistroPrecos->setDado('numcgm_gerenciador' , $request->get('numcgmGerenciador')); - $obErro = $obTTCEMGEmpenhoRegistroPrecos->exclusao(); + if (!$obErro->ocorreu()) { + $obTTCEMGLoteRegistroPrecos = new TTCEMGLoteRegistroPrecos(); + $obTTCEMGLoteRegistroPrecos->setDado('numero_registro_precos' , $request->get('inNroRegistroPrecos')); + $obTTCEMGLoteRegistroPrecos->setDado('exercicio' , $request->get('stExercicioRegistroPrecos')); + $obTTCEMGLoteRegistroPrecos->setDado('cod_entidade' , $request->get('inCodEntidade')); + $obTTCEMGLoteRegistroPrecos->setDado('interno' , $request->get('boInterno')); + $obTTCEMGLoteRegistroPrecos->setDado('numcgm_gerenciador' , $request->get('numcgmGerenciador')); + $obErro = $obTTCEMGLoteRegistroPrecos->exclusao($boTransacao); + } + + if (!$obErro->ocorreu()) { + $obTTCEMGEmpenhoRegistroPrecos = new TTCEMGEmpenhoRegistroPrecos(); + $obTTCEMGEmpenhoRegistroPrecos->setDado('numero_registro_precos' , $request->get('inNroRegistroPrecos')); + $obTTCEMGEmpenhoRegistroPrecos->setDado('exercicio' , $request->get('stExercicioRegistroPrecos')); + $obTTCEMGEmpenhoRegistroPrecos->setDado('cod_entidade' , $request->get('inCodEntidade')); + $obTTCEMGEmpenhoRegistroPrecos->setDado('interno' , $request->get('boInterno')); + $obTTCEMGEmpenhoRegistroPrecos->setDado('numcgm_gerenciador' , $request->get('numcgmGerenciador')); + $obErro = $obTTCEMGEmpenhoRegistroPrecos->exclusao($boTransacao); + } - $obTTCEMGRegistroPrecosLicitacao = new TTCEMGRegistroPrecosLicitacao(); - $obTTCEMGRegistroPrecosLicitacao->setDado('cod_entidade' , $request->get('inCodEntidade')); - $obTTCEMGRegistroPrecosLicitacao->setDado('numero_registro_precos' , $request->get('inNroRegistroPrecos')); - $obTTCEMGRegistroPrecosLicitacao->setDado('exercicio' , $request->get('stExercicioRegistroPrecos')); - $obTTCEMGRegistroPrecosLicitacao->setDado('interno' , $request->get('boInterno')); - $obTTCEMGRegistroPrecosLicitacao->setDado('numcgm_gerenciador' , $request->get('numcgmGerenciador')); - $obErro = $obTTCEMGRegistroPrecosLicitacao->exclusao(); + if (!$obErro->ocorreu()) { + $obTTCEMGRegistroPrecosLicitacao = new TTCEMGRegistroPrecosLicitacao(); + $obTTCEMGRegistroPrecosLicitacao->setDado('cod_entidade' , $request->get('inCodEntidade')); + $obTTCEMGRegistroPrecosLicitacao->setDado('numero_registro_precos' , $request->get('inNroRegistroPrecos')); + $obTTCEMGRegistroPrecosLicitacao->setDado('exercicio' , $request->get('stExercicioRegistroPrecos')); + $obTTCEMGRegistroPrecosLicitacao->setDado('interno' , $request->get('boInterno')); + $obTTCEMGRegistroPrecosLicitacao->setDado('numcgm_gerenciador' , $request->get('numcgmGerenciador')); + $obErro = $obTTCEMGRegistroPrecosLicitacao->exclusao($boTransacao); + } - $obTTCEMGRegistroPrecos = new TTCEMGRegistroPrecos(); - $obTTCEMGRegistroPrecos->setDado('numero_registro_precos' , $request->get('inNroRegistroPrecos')); - $obTTCEMGRegistroPrecos->setDado('exercicio' , $request->get('stExercicioRegistroPrecos')); - $obTTCEMGRegistroPrecos->setDado('cod_entidade' , $request->get('inCodEntidade')); - $obTTCEMGRegistroPrecos->setDado('interno' , $request->get('boInterno')); - $obTTCEMGRegistroPrecos->setDado('numcgm_gerenciador' , $request->get('numcgmGerenciador')); - $obErro = $obTTCEMGRegistroPrecos->exclusao(); - - SistemaLegado::alertaAviso($pgList."?".Sessao::getId()."&inCodEntidade=".$request->get('inCodEntidade')."&stAcao=".$stAcao,'Registro de Preço - '.$request->get('inNroProcessoAdesao')."/".$request->get('stExercicioProcessoAdesao'),"excluir","excluir", Sessao::getId(), "../"); + if (!$obErro->ocorreu()) { + $obTTCEMGRegistroPrecos = new TTCEMGRegistroPrecos(); + $obTTCEMGRegistroPrecos->setDado('numero_registro_precos' , $request->get('inNroRegistroPrecos')); + $obTTCEMGRegistroPrecos->setDado('exercicio' , $request->get('stExercicioRegistroPrecos')); + $obTTCEMGRegistroPrecos->setDado('cod_entidade' , $request->get('inCodEntidade')); + $obTTCEMGRegistroPrecos->setDado('interno' , $request->get('boInterno')); + $obTTCEMGRegistroPrecos->setDado('numcgm_gerenciador' , $request->get('numcgmGerenciador')); + $obErro = $obTTCEMGRegistroPrecos->exclusao($boTransacao); + } + + if (!$obErro->ocorreu()) { + $stMsg = 'Registro de Preço - '.$request->get('inNroRegistroPrecos')."/".$request->get('stExercicioRegistroPrecos'); + SistemaLegado::alertaAviso($pgList."?".Sessao::getId()."&inCodEntidade=".$request->get('inCodEntidade')."&stAcao=".$stAcao,$stMsg,"excluir","excluir", Sessao::getId(), "../"); + } break; default: @@ -171,7 +185,7 @@ switch ($stAcao) { $obTTCEMGRegistroPrecosLicitacao->setDado('exercicio' , $request->get('stExercicioRegistroPreco')); $obTTCEMGRegistroPrecosLicitacao->setDado('interno' , $request->get('boTipoRegPreco')); $obTTCEMGRegistroPrecosLicitacao->setDado('numcgm_gerenciador' , $request->get('inNumOrgaoGerenciador')); - + $obErro = $obTTCEMGRegistroPrecosLicitacao->exclusao($boTransacao); if (!$obErro->ocorreu()) { @@ -181,7 +195,7 @@ switch ($stAcao) { $obTTCEMGRegistroPrecosLicitacao->setDado('cod_modalidade' , $request->get('inCodModalidade')); $obTTCEMGRegistroPrecosLicitacao->setDado('cod_entidade_licitacao' , $request->get('inCodEntidade')); $obTTCEMGRegistroPrecosLicitacao->setDado('exercicio_licitacao' , $request->get('stExercicioLicitacao')); - + $obErro = $obTTCEMGRegistroPrecosLicitacao->inclusao($boTransacao); } } @@ -197,7 +211,7 @@ switch ($stAcao) { $obTTCEMGRegistroPrecosOrgaoItem->setDado('interno' , $request->get('boTipoRegPreco')); $obTTCEMGRegistroPrecosOrgaoItem->setDado('numcgm_gerenciador' , $request->get('inNumOrgaoGerenciador')); $obErro = $obTTCEMGRegistroPrecosOrgaoItem->exclusao($boTransacao); - + if (!$obErro->ocorreu()) { # Exclui todos os Orgãos e as Unidades para o tipo de registro de preço. $obTTCEMGRegistroPrecosOrgao = new TTCEMGRegistroPrecosOrgao(); @@ -208,7 +222,7 @@ switch ($stAcao) { $obTTCEMGRegistroPrecosOrgao->setDado('numcgm_gerenciador' , $request->get('inNumOrgaoGerenciador')); $obErro = $obTTCEMGRegistroPrecosOrgao->exclusao($boTransacao); } - + if (!$obErro->ocorreu()) { # Exclui todos os Itens para o tipo de registro de preço. $obTTCEMGItemRegistroPrecos = new TTCEMGItemRegistroPrecos(); @@ -219,7 +233,7 @@ switch ($stAcao) { $obTTCEMGItemRegistroPrecos->setDado('numcgm_gerenciador' , $request->get('inNumOrgaoGerenciador')); $obErro = $obTTCEMGItemRegistroPrecos->exclusao($boTransacao); } - + if (!$obErro->ocorreu()) { # Exclui todos os Empenhos para o tipo de registro de preço. $obTTCEMGEmpenhoRegistroPrecos = new TTCEMGEmpenhoRegistroPrecos(); @@ -262,44 +276,46 @@ switch ($stAcao) { $obErro = $obTTCEMGRegistroPrecosOrgao->inclusao($boTransacao); }else{ $obErro->setDescricao('Informe o CGM do Responsável pela Aprovação do Orgão: '.$arOrgao['stMontaCodOrgaoM'].' - '.$arOrgao['stMontaCodUnidadeM']); - break; } + + if ($obErro->ocorreu()) + break; } } } - + if (!$obErro->ocorreu()) { if (is_array($arItens) && count($arItens) > 0) { $boProcessoPorLote = $request->get('inProcessoPorLote'); $inDescontoTabela = $request->get('inDescontoTabela'); - + foreach ($arItens as $item) { # Cadastro de Lote quando necessário $inCodLote = ((!empty($item['stCodigoLote']) && $item['stCodigoLote'] != 0) ? $item['stCodigoLote'] : 0); $txtDescricaoLote = (!empty($item['txtDescricaoLote']) ? $item['txtDescricaoLote'] : ''); - + $obTTCEMGLoteRegistroPrecos->setDado('cod_lote' , $inCodLote); $obErro = $obTTCEMGLoteRegistroPrecos->recuperaPorChave( $rsLote, $boTransacao ); if (!$obErro->ocorreu()) { $obTTCEMGLoteRegistroPrecos->setDado('descricao_lote' , $txtDescricaoLote); - + $nuPercentualLote = ($boProcessoPorLote == true) ? $item['nuPercentualLote'] : 0; $obTTCEMGLoteRegistroPrecos->setDado('percentual_desconto_lote' , $nuPercentualLote); - + if ($rsLote->getNumLinhas() > 0) { $obErro = $obTTCEMGLoteRegistroPrecos->alteracao($boTransacao); } else { $obErro = $obTTCEMGLoteRegistroPrecos->inclusao($boTransacao); } - + if (!$obErro->ocorreu()) { if ($inDescontoTabela == 2 || ($inDescontoTabela == 1 && $boProcessoPorLote == 1)) { $nuPercentualItem = 0; } else { $nuPercentualItem = $item['nuPercentualItem']; } - + # Cadastro dos Itens do Registro de Preço, vinculação ao lote $obTTCEMGItemRegistroPrecos->setDado('cod_lote' , $inCodLote); $obTTCEMGItemRegistroPrecos->setDado('cod_item' , $item['inCodItem']); @@ -320,7 +336,11 @@ switch ($stAcao) { $boItemAderidaSuperior = true; } } + } + + if ($obErro->ocorreu()) + break; } } } @@ -336,10 +356,13 @@ switch ($stAcao) { $obTTCEMGRegistroPrecosOrgaoItem->setDado('cgm_fornecedor' ,$arOrgaoItemQuantitativo['inCodFornecedorQ']); $obTTCEMGRegistroPrecosOrgaoItem->setDado('quantidade' ,$arOrgaoItemQuantitativo['nuQtdeOrgao']); $obErro = $obTTCEMGRegistroPrecosOrgaoItem->inclusao($boTransacao); + + if ($obErro->ocorreu()) + break; } } } - + if (!$obErro->ocorreu()) { if (is_array($arEmpenhos) && count($arEmpenhos) > 0) { foreach ($arEmpenhos as $empenho) { @@ -348,6 +371,9 @@ switch ($stAcao) { $obTTCEMGEmpenhoRegistroPrecos->setDado('exercicio_empenho' , $empenho['exercicio']); $obTTCEMGEmpenhoRegistroPrecos->setDado('cod_entidade_empenho' , $empenho['cod_entidade']); $obErro = $obTTCEMGEmpenhoRegistroPrecos->inclusao($boTransacao); + + if ($obErro->ocorreu()) + break; } } } @@ -360,12 +386,13 @@ switch ($stAcao) { Sessao::remove('arOrgaos'); Sessao::remove('arOrgaoItemQuantitativos'); - $stMsg = "Adesão a Registro de Preço"; - + $stMsg = ""; if($boItemAderidaSuperior) - $stMsg = "Itens foram incluidos/alterados com Quantidade Aderida superior a Quantidade Licitada"; + $stMsg = ". Itens foram incluidos/alterados com Quantidade Aderida superior a Quantidade Licitada."; - SistemaLegado::alertaAviso($pgFilt."?".Sessao::getId()."&stAcao=alterar",$stMsg,"incluir","aviso", Sessao::getId(), "../"); + $stMsg = 'Registro de Preço - '.$request->get('stCodigoProcesso').'/'.$request->get('stExercicioRegistroPreco').$stMsg; + + SistemaLegado::alertaAviso($pgFilt."?".Sessao::getId()."&stAcao=".$stAcao,$stMsg,"incluir","aviso", Sessao::getId(), "../"); } } @@ -373,6 +400,10 @@ switch ($stAcao) { } -Sessao::encerraExcecao(); +if ($obErro->ocorreu()) + SistemaLegado::exibeAviso($obErro->getDescricao(),"n_".$stAcao,"erro"); + +SistemaLegado::liberaFrames(true,true); +$obTransacao->fechaTransacao( $boFlagTransacao, $boTransacao, $obErro, $obTTCEMGRegistroPrecos ); ?> \ No newline at end of file diff --git a/gestaoPrestacaoContas/fontes/PHP/TCEMG/instancias/exportacao/OCExportarBalanceteContabil.php b/gestaoPrestacaoContas/fontes/PHP/TCEMG/instancias/exportacao/OCExportarBalanceteContabil.php index fea56ce..dbd14e9 100644 --- a/gestaoPrestacaoContas/fontes/PHP/TCEMG/instancias/exportacao/OCExportarBalanceteContabil.php +++ b/gestaoPrestacaoContas/fontes/PHP/TCEMG/instancias/exportacao/OCExportarBalanceteContabil.php @@ -29,7 +29,7 @@ * @category Urbem * @package TCE/MG * @author Eduardo Schitz - * $Id: OCExportarBalanceteContabil.php 62872 2015-07-01 20:16:55Z franver $ + * $Id: OCExportarBalanceteContabil.php 63835 2015-10-22 13:53:31Z franver $ */ set_time_limit(0); include_once '../../../../../../gestaoAdministrativa/fontes/PHP/framework/include/valida.inc.php'; @@ -48,7 +48,6 @@ SistemaLegado::BloqueiaFrames(); $obExportador = new Exportador(); $arFiltro = Sessao::read('filtroRelatorio'); -//SistemaLegado::mostraVar($arFiltro);die(); $stEntidades = implode(",",$arFiltro['inCodEntidade']); $inMes = $arFiltro['inMes']; diff --git a/gestaoPrestacaoContas/fontes/PHP/TCEMG/instancias/layout_arquivos/acompanhamentoMesal/2014/ARC.csv.inc.php b/gestaoPrestacaoContas/fontes/PHP/TCEMG/instancias/layout_arquivos/acompanhamentoMesal/2014/ARC.csv.inc.php index f6bf7ec..4b97906 100644 --- a/gestaoPrestacaoContas/fontes/PHP/TCEMG/instancias/layout_arquivos/acompanhamentoMesal/2014/ARC.csv.inc.php +++ b/gestaoPrestacaoContas/fontes/PHP/TCEMG/instancias/layout_arquivos/acompanhamentoMesal/2014/ARC.csv.inc.php @@ -31,10 +31,10 @@ * @author Desenvolvedor: Franver Sarmento de Moraes * * @ignore - * $Id: ARC.csv.inc.php 62404 2015-05-04 20:44:10Z arthur $ - * $Date: 2015-05-04 17:44:10 -0300 (Seg, 04 Mai 2015) $ - * $Author: arthur $ - * $Rev: 62404 $ + * $Id: ARC.csv.inc.php 63835 2015-10-22 13:53:31Z franver $ + * $Date: 2015-10-22 11:53:31 -0200 (Qui, 22 Out 2015) $ + * $Author: franver $ + * $Rev: 63835 $ * */ /** @@ -290,7 +290,6 @@ if (count($rsRecordSetARC20->getElementos()) > 0) { if (count($rsRecordSetARC21->getElementos()) > 0) { foreach ($rsRecordSetARC21->getElementos() as $arARC21) { $stChave2 = $arARC21['cod_correcao']; - //sistemaLegado::mostravar("CODIGO 21: ".$stChave1); if ($stChave1 === $stChave2) { $rsBloco = 'rsBloco_'.$inCount; diff --git a/gestaoPrestacaoContas/fontes/PHP/TCEMG/instancias/layout_arquivos/acompanhamentoMesal/2014/CTB.csv.inc.php b/gestaoPrestacaoContas/fontes/PHP/TCEMG/instancias/layout_arquivos/acompanhamentoMesal/2014/CTB.csv.inc.php index cd6727e..d856a1d 100644 --- a/gestaoPrestacaoContas/fontes/PHP/TCEMG/instancias/layout_arquivos/acompanhamentoMesal/2014/CTB.csv.inc.php +++ b/gestaoPrestacaoContas/fontes/PHP/TCEMG/instancias/layout_arquivos/acompanhamentoMesal/2014/CTB.csv.inc.php @@ -31,7 +31,7 @@ * @author Desenvolvedor: Lisiane Morais * * @ignore - * $Id: CTB.csv.inc.php 62269 2015-04-15 18:28:39Z franver $ + * $Id: CTB.csv.inc.php 63835 2015-10-22 13:53:31Z franver $ * $Date:$ * $Author:$ * $Rev:$ @@ -118,7 +118,6 @@ if (count($rsRecordSet10->arElementos) > 0) { $obTTCEMGArquivoCTB->inclusao();$obTTCEMGArquivoCTB->debug(); } }else { - SistemaLegado::mostraVar($arCTB20['tipo_aplicacao']); $obTTCEMGArquivoCTB->setDado('ano', Sessao::getExercicio()); $obTTCEMGArquivoCTB->setDado('cod_ctb_view', $arCTB20['cod_ctb_view']); $obTTCEMGArquivoCTB->setDado('cod_ctb', $arCTB20['cod_ctb']); diff --git a/gestaoPrestacaoContas/fontes/PHP/TCEMG/instancias/layout_arquivos/acompanhamentoMesal/2015/ARC.csv.inc.php b/gestaoPrestacaoContas/fontes/PHP/TCEMG/instancias/layout_arquivos/acompanhamentoMesal/2015/ARC.csv.inc.php index f6bf7ec..4b97906 100644 --- a/gestaoPrestacaoContas/fontes/PHP/TCEMG/instancias/layout_arquivos/acompanhamentoMesal/2015/ARC.csv.inc.php +++ b/gestaoPrestacaoContas/fontes/PHP/TCEMG/instancias/layout_arquivos/acompanhamentoMesal/2015/ARC.csv.inc.php @@ -31,10 +31,10 @@ * @author Desenvolvedor: Franver Sarmento de Moraes * * @ignore - * $Id: ARC.csv.inc.php 62404 2015-05-04 20:44:10Z arthur $ - * $Date: 2015-05-04 17:44:10 -0300 (Seg, 04 Mai 2015) $ - * $Author: arthur $ - * $Rev: 62404 $ + * $Id: ARC.csv.inc.php 63835 2015-10-22 13:53:31Z franver $ + * $Date: 2015-10-22 11:53:31 -0200 (Qui, 22 Out 2015) $ + * $Author: franver $ + * $Rev: 63835 $ * */ /** @@ -290,7 +290,6 @@ if (count($rsRecordSetARC20->getElementos()) > 0) { if (count($rsRecordSetARC21->getElementos()) > 0) { foreach ($rsRecordSetARC21->getElementos() as $arARC21) { $stChave2 = $arARC21['cod_correcao']; - //sistemaLegado::mostravar("CODIGO 21: ".$stChave1); if ($stChave1 === $stChave2) { $rsBloco = 'rsBloco_'.$inCount; diff --git a/gestaoPrestacaoContas/fontes/PHP/TCEMG/instancias/layout_arquivos/acompanhamentoMesal/2015/CAIXA.csv.inc.php b/gestaoPrestacaoContas/fontes/PHP/TCEMG/instancias/layout_arquivos/acompanhamentoMesal/2015/CAIXA.csv.inc.php index bd4a307..c7b9560 100644 --- a/gestaoPrestacaoContas/fontes/PHP/TCEMG/instancias/layout_arquivos/acompanhamentoMesal/2015/CAIXA.csv.inc.php +++ b/gestaoPrestacaoContas/fontes/PHP/TCEMG/instancias/layout_arquivos/acompanhamentoMesal/2015/CAIXA.csv.inc.php @@ -28,10 +28,10 @@ * @author Desenvolvedor: Franver Sarmento de Moraes * * @ignore - * $Id: CAIXA.csv.inc.php 63511 2015-09-04 17:49:49Z michel $ - * $Date: 2015-09-04 14:49:49 -0300 (Sex, 04 Set 2015) $ - * $Author: michel $ - * $Rev: 63511 $ + * $Id: CAIXA.csv.inc.php 63912 2015-11-05 18:10:02Z lisiane $ + * $Date: 2015-11-05 16:10:02 -0200 (Qui, 05 Nov 2015) $ + * $Author: lisiane $ + * $Rev: 63912 $ * */ /** @@ -171,7 +171,7 @@ foreach ($rsRecordSetCAIXA10->getElementos() as $arCAIXA10) { $stChave12 = ''; $stChaveComp12 = ''; foreach ($rsRecordSetCAIXA12->getElementos() as $arCAIXA12) { - $stChaveComp12 = $arCAIXA12['cod_reduzido']; + $stChaveComp12 = trim($arCAIXA12['cod_reduzido']); if ($stChave12 <> $arCAIXA12['tipo_registro'].$arCAIXA12['tipo_movimentacao'].$arCAIXA12['tipo_entr_saida'].$arCAIXA12['cod_ctb_transf'].$arCAIXA12['cod_fonte_ctb_transf']) { @@ -236,7 +236,7 @@ foreach ($rsRecordSetCAIXA10->getElementos() as $arCAIXA10) { $stChave13 = ''; $stChaveComp13 = ''; foreach ($rsRecordSetCAIXA13->getElementos() as $arCAIXA13) { - $stChaveComp13 = $arCAIXA13['cod_reduzido']; + $stChaveComp13 = trim($arCAIXA13['cod_reduzido']); if($stChaveComp12 == $stChaveComp13){ if (!($stChave13 === $arCAIXA13['tipo_registro'].$arCAIXA13['cod_reduzido'].$arCAIXA13['e_deducao_de_receita'].$arCAIXA13['identificador_deducao'].$arCAIXA13['cod_fonte_ctb_transf'].$arCAIXA13['natureza_receita'])) { diff --git a/gestaoPrestacaoContas/fontes/PHP/TCEMG/instancias/layout_arquivos/acompanhamentoMesal/2015/CTB.csv.inc.php b/gestaoPrestacaoContas/fontes/PHP/TCEMG/instancias/layout_arquivos/acompanhamentoMesal/2015/CTB.csv.inc.php index 2446bfc..cc7ca67 100644 --- a/gestaoPrestacaoContas/fontes/PHP/TCEMG/instancias/layout_arquivos/acompanhamentoMesal/2015/CTB.csv.inc.php +++ b/gestaoPrestacaoContas/fontes/PHP/TCEMG/instancias/layout_arquivos/acompanhamentoMesal/2015/CTB.csv.inc.php @@ -31,7 +31,7 @@ * @author Desenvolvedor: Lisiane Morais * * @ignore - * $Id: CTB.csv.inc.php 62371 2015-04-29 16:38:50Z michel $ + * $Id: CTB.csv.inc.php 64060 2015-11-25 18:30:12Z lisiane $ * $Date:$ * $Author:$ * $Rev:$ @@ -47,7 +47,6 @@ $rsRecordSet10 = new RecordSet(); $rsRecordSet20 = new RecordSet(); $rsRecordSet21 = new RecordSet(); $rsRecordSet22 = new RecordSet(); -$obTTCEMGArquivoCTB = new TTCEMGArquivoCTB(); $obTTCEMGCTB = new TTCEMGCTB(); $obTTCEMGCTB->setDado('exercicio', Sessao::getExercicio()); diff --git a/gestaoPrestacaoContas/fontes/PHP/TCEMG/instancias/relatorios/OCRelatorioDividaFlutuante.php b/gestaoPrestacaoContas/fontes/PHP/TCEMG/instancias/relatorios/OCRelatorioDividaFlutuante.php index 07a8183..13e1507 100644 --- a/gestaoPrestacaoContas/fontes/PHP/TCEMG/instancias/relatorios/OCRelatorioDividaFlutuante.php +++ b/gestaoPrestacaoContas/fontes/PHP/TCEMG/instancias/relatorios/OCRelatorioDividaFlutuante.php @@ -27,7 +27,7 @@ * Página de Formulario * Data de Criação: 31/07/2014 * @author Desenvolvedor: Evandro Melos - * $Id: OCRelatorioDividaFlutuante.php 59612 2014-09-02 12:00:51Z gelson $ + * $Id: OCRelatorioDividaFlutuante.php 64143 2015-12-08 17:05:11Z jean $ * $Date: $ * $Author: $ * $Rev: $ @@ -119,7 +119,7 @@ $arDados['data_final'] = $stDataFinal; $arDados['total_restos_entidade'] = $artotal; $arDados['restos_pagar'] = $rsRestosPagar; -$arDados['depositos'] = $rsBalVerificacao; +$arDados['depositos'] = $rsDepositoDividaFlutuante; $arDados['totais_orgao'] = $rsTotalOrgao; $arDados['totais_contas_devedoras'] = $rsTotalOrgao; diff --git a/gestaoPrestacaoContas/fontes/PHP/TCEMS/instancias/configuracao/OCManterRGFAnexo1.php b/gestaoPrestacaoContas/fontes/PHP/TCEMS/instancias/configuracao/OCManterRGFAnexo1.php index 4070f1b..3d68929 100644 --- a/gestaoPrestacaoContas/fontes/PHP/TCEMS/instancias/configuracao/OCManterRGFAnexo1.php +++ b/gestaoPrestacaoContas/fontes/PHP/TCEMS/instancias/configuracao/OCManterRGFAnexo1.php @@ -79,7 +79,6 @@ function preencheListaDespesas() function montaListaDespesas() { $stJs = ''; - //SistemaLegado::mostravar(Sessao::read('arListaDespesa')); exit; $rsLista = new RecordSet; $rsLista->preenche(Sessao::read('arListaDespesa')); diff --git a/gestaoPrestacaoContas/fontes/PHP/TCEMS/instancias/relatoriosMensais/OCGeraDemonstrativoRestosPagar.php b/gestaoPrestacaoContas/fontes/PHP/TCEMS/instancias/relatoriosMensais/OCGeraDemonstrativoRestosPagar.php index a713f35..2016f8d 100644 --- a/gestaoPrestacaoContas/fontes/PHP/TCEMS/instancias/relatoriosMensais/OCGeraDemonstrativoRestosPagar.php +++ b/gestaoPrestacaoContas/fontes/PHP/TCEMS/instancias/relatoriosMensais/OCGeraDemonstrativoRestosPagar.php @@ -39,10 +39,6 @@ include_once '../../../../../../gestaoAdministrativa/fontes/PHP/framework/includ include_once '../../../../../../gestaoAdministrativa/fontes/PHP/pacotes/FrameworkBirt.inc.php'; include_once ( CAM_GF_ORC_MAPEAMENTO."TOrcamentoEntidade.class.php" ); -// $obTOrcamentoEntidade = new TOrcamentoEntidade(); -// $obTOrcamentoEntidade->setDado( 'exercicio' , $_REQUEST['stExercicio'] ); -// $obTOrcamentoEntidade->recuperaEntidades( $rsEntidade, "and e.cod_entidade in (".implode(',',$_REQUEST['inCodEntidade']).")" ); - // SistemaLegado::mostravar(Sessao::read('assinaturas')); exit; $obErro = new Erro(); $preview = new PreviewBirt(6,57,4); diff --git a/gestaoPrestacaoContas/fontes/PHP/TCEPB/instancias/configuracao/OCManterEmpenhoObras.php b/gestaoPrestacaoContas/fontes/PHP/TCEPB/instancias/configuracao/OCManterEmpenhoObras.php index 5619ff9..9775f61 100644 --- a/gestaoPrestacaoContas/fontes/PHP/TCEPB/instancias/configuracao/OCManterEmpenhoObras.php +++ b/gestaoPrestacaoContas/fontes/PHP/TCEPB/instancias/configuracao/OCManterEmpenhoObras.php @@ -72,7 +72,6 @@ switch ($stCtrl) { $stJs .= "f.".$stNomeCombo.".options[0] = new Option('Selecione','', 'selected');\n"; $inContador = 1; while ( !$rsRecordSet->eof() ) { - //SistemaLegado::mostravar( $rsRecordSet ); $stCodigo = $rsRecordSet->getCampo( "num_obra" ); $stDescr = $rsRecordSet->getCampo( "num_obra" )." - "; $stDescr .= $rsRecordSet->getCampo( "descricao"); diff --git a/gestaoPrestacaoContas/fontes/PHP/TCEPE/instancias/configuracao/PRManterTipoCredor.php b/gestaoPrestacaoContas/fontes/PHP/TCEPE/instancias/configuracao/PRManterTipoCredor.php index b689663..13f209f 100644 --- a/gestaoPrestacaoContas/fontes/PHP/TCEPE/instancias/configuracao/PRManterTipoCredor.php +++ b/gestaoPrestacaoContas/fontes/PHP/TCEPE/instancias/configuracao/PRManterTipoCredor.php @@ -70,7 +70,6 @@ switch ($_REQUEST['stAcao']) { if($rsCgmTipoCredor->getNumLinhas()>0){ foreach( $rsCgmTipoCredor->getElementos() AS $arCredor ){ - SistemaLegado::mostraVar($arCredor); $obTTCEPECgmTipoCredor->setDado("exercicio" ,$arCredor['exercicio']); $obTTCEPECgmTipoCredor->setDado("cgm_credor",$arCredor['cgm_credor']); $obErro = $obTTCEPECgmTipoCredor->exclusao($boTransacao); diff --git a/gestaoPrestacaoContas/fontes/PHP/TCEPE/instancias/layoutArquivos/EOF/SaldosContasContabeis.inc.php b/gestaoPrestacaoContas/fontes/PHP/TCEPE/instancias/layoutArquivos/EOF/SaldosContasContabeis.inc.php index 242ed4b..e8b011f 100644 --- a/gestaoPrestacaoContas/fontes/PHP/TCEPE/instancias/layoutArquivos/EOF/SaldosContasContabeis.inc.php +++ b/gestaoPrestacaoContas/fontes/PHP/TCEPE/instancias/layoutArquivos/EOF/SaldosContasContabeis.inc.php @@ -31,10 +31,10 @@ * @author Desenvolvedor: * * @ignore - * $Id: SaldosContasContabeis.inc.php 60705 2014-11-11 12:09:24Z jean $ - * $Date: 2014-11-11 10:09:24 -0200 (Ter, 11 Nov 2014) $ - * $Author: jean $ - * $Rev: 60705 $ + * $Id: SaldosContasContabeis.inc.php 63835 2015-10-22 13:53:31Z franver $ + * $Date: 2015-10-22 11:53:31 -0200 (Qui, 22 Out 2015) $ + * $Author: franver $ + * $Rev: 63835 $ * */ include_once CAM_GPC_TCEPE_MAPEAMENTO."TTCEPESaldosContasContabeis.class.php"; @@ -49,8 +49,7 @@ $obTTCEPESaldosContasContabeis->setDado('cod_entidade', $inCodEntidade ); $obTTCEPESaldosContasContabeis->setDado('competencia' , $inCodCompetencia ); $obTTCEPESaldosContasContabeis->recuperaTodos($rsRecordSet, '', '', ''); -//sistemaLegado::mostravar($rsRecordSet); -//die('Fim'); + $obExportador->roUltimoArquivo->addBloco($rsRecordSet); $obExportador->roUltimoArquivo->roUltimoBloco->addColuna("reservado_tce"); diff --git a/gestaoPrestacaoContas/fontes/PHP/TCERJ/classes/mapeamento/TCRJConfiguracao.class.php b/gestaoPrestacaoContas/fontes/PHP/TCERJ/classes/mapeamento/TCRJConfiguracao.class.php index d1b068b..bcda72a 100755 --- a/gestaoPrestacaoContas/fontes/PHP/TCERJ/classes/mapeamento/TCRJConfiguracao.class.php +++ b/gestaoPrestacaoContas/fontes/PHP/TCERJ/classes/mapeamento/TCRJConfiguracao.class.php @@ -33,10 +33,10 @@ * @package URBEM * @subpackage Mapeamento - $Revision: 59612 $ + $Revision: 63835 $ $Name$ $Autor:$ - $Date: 2014-09-02 09:00:51 -0300 (Ter, 02 Set 2014) $ + $Date: 2015-10-22 11:53:31 -0200 (Qui, 22 Out 2015) $ * Casos de uso: uc-06.02.01 @@ -77,315 +77,4 @@ function TCRJConfiguracao() $this->SetDado("cod_modulo",32); } -///** -// * @access Public -// * @param Object $rsRecordSet Objeto RecordSet -// * @param String $stCondicao String de condição do SQL (WHERE) -// * @param String $stOrdem String de Ordenação do SQL (ORDER BY) -// * @param Boolean $boTransacao -// * @return Object Objeto Erro -//*/ -//function recuperaRelatorioAutorizacao(&$rsRecordSet, $stCondicao = "" , $stOrdem = "" , $boTransacao = "") { -// $obErro = new Erro; -// $obConexao = new Conexao; -// $rsRecordSet = new RecordSet; -// -// if(trim($stOrdem)) -// $stOrdem = (strpos($stOrdem,"ORDER BY")===false)?" ORDER BY $stOrdem":$stOrdem; -// $stSql = $this->montaRelatorioAutorizacao(); -// $this->setDebug( $stSql ); -// $obErro = $obConexao->executaSQL( $rsRecordSet, $stSql, $boTransacao ); -// return $obErro; -//} -// -///** -// * Seta dados para fazer o recuperaRelacionamento -// * @access Public -// * @return String $stSql -//*/ -//function montaRelatorioAutorizacao() { -// -// -// $stSql = "SELECT \n"; -// $stSql .= " tabela.* \n"; -// $stSql .= " ,publico.fn_mascara_dinamica( ( SELECT valor FROM administracao.configuracao \n"; -// $stSql .= " WHERE parametro = 'masc_despesa' AND exercicio ='".$this->getDado( "exercicio" )."' ) \n"; -// $stSql .= " ,tabela.num_orgao \n"; -// $stSql .= " ||'.'||tabela.num_unidade \n"; -// $stSql .= " ||'.'||tabela.cod_funcao \n"; -// $stSql .= " ||'.'||tabela.cod_subfuncao \n"; -// $stSql .= " ||'.'||tabela.cod_programa \n"; -// $stSql .= " ||'.'||tabela.num_pao \n"; -// $stSql .= " ||'.'||replace(cd.cod_estrutural,'.','') \n"; -// $stSql .= " ) AS dotacao \n"; -// $stSql .= " ,cd.descricao AS nom_conta \n"; -// $stSql .= "FROM ( \n"; -// $stSql .= " SELECT \n"; -// $stSql .= " tabela.* \n"; -// $stSql .= " ,CGM.nom_cgm as nom_entidade \n"; -// $stSql .= " ,de.cod_funcao \n"; -// $stSql .= " ,de.cod_subfuncao \n"; -// $stSql .= " ,de.cod_programa \n"; -// $stSql .= " ,de.num_pao \n"; -// $stSql .= " ,de.cod_despesa as dotacao_reduzida \n"; -// $stSql .= " FROM \n"; -// $stSql .= " ( \n"; -// $stSql .= " SELECT \n"; -// $stSql .= " pe.cod_pre_empenho \n"; -// $stSql .= " ,pe.descricao \n"; -// $stSql .= " ,aa.motivo \n"; -// $stSql .= " ,TO_CHAR(aa.dt_anulacao,'dd/mm/yyyy') as dt_anulacao \n"; -// $stSql .= " ,ae.cod_entidade \n"; -// $stSql .= " ,to_char(ae.dt_autorizacao, 'dd/mm/yyyy') as dt_autorizacao \n"; -// $stSql .= " ,to_char(ae.dt_autorizacao, 'dd/mm/yyyy') as dt_autorizacao \n"; -//// $stSql .= " ,to_char(it.vl_total,'999999999999999D99') as valor_total \n"; -//// $stSql .= " ,to_char((it.vl_total/it.quantidade),'999999999999999D99') as valor_unitario \n"; -// $stSql .= " ,it.vl_total as valor_total \n"; -// $stSql .= " ,(it.vl_total/it.quantidade) as valor_unitario \n"; -// $stSql .= " ,it.num_item \n"; -//// $stSql .= " ,to_char(it.quantidade, '9999999999999D9999') as quantidade \n"; -// $stSql .= " ,it.quantidade as quantidade \n"; -// $stSql .= " ,it.nom_unidade \n"; -// $stSql .= " ,um.simbolo \n"; -// $stSql .= " ,it.nom_item \n"; -// $stSql .= " ,it.complemento \n"; -// $stSql .= " ,oo.num_orgao ||' - '||oo.nom_orgao as num_nom_orgao \n"; -// $stSql .= " ,ou.num_unidade ||' - '||ou.nom_unidade as num_nom_unidade \n"; -// $stSql .= " ,cg.numcgm as num_fornecedor \n"; -// $stSql .= " ,cg.nom_cgm \n"; -// $stSql .= " ,oe.numcgm \n"; -// $stSql .= " ,CASE WHEN pf.numcgm IS NOT NULL THEN pf.cpf \n"; -// $stSql .= " ELSE pj.cnpj \n"; -// $stSql .= " END as cpf_cnpj \n"; -// $stSql .= " ,cg.tipo_logradouro||' '||cg.logradouro||' '||cg.numero||' '||cg.complemento as endereco \n"; -// $stSql .= " ,mu.nom_municipio \n"; -// $stSql .= " ,CASE WHEN cg.fone_residencial IS NOT NULL THEN cg.fone_residencial \n"; -// $stSql .= " ELSE cg.fone_comercial \n"; -// $stSql .= " END as telefone \n"; -// $stSql .= " ,uf.sigla_uf \n"; -// $stSql .= " ,pd.cod_despesa \n"; -// $stSql .= " ,pd.cod_conta \n"; -// $stSql .= " ,ae.exercicio \n"; -// $stSql .= " ,ae.num_orgao \n"; -// $stSql .= " ,TO_CHAR(ore.dt_validade_final ,'dd/mm/yyyy') as dt_validade_final \n"; -// $stSql .= " ,ae.num_unidade \n"; -//// $stSql .= " ,cd.descricao AS nom_conta \n"; -//// $stSql .= " ,de.cod_despesa as dotacao_reduzida \n"; -// $stSql .= " FROM \n"; -// $stSql .= " empenho.pre_empenho as pe \n"; -// $stSql .= " LEFT JOIN \n"; -// $stSql .= " empenho.autorizacao_empenho as ae \n"; -// $stSql .= " ON ( ae.cod_pre_empenho = pe.cod_pre_empenho \n"; -// $stSql .= " AND ae.exercicio = pe.exercicio ) \n"; -// $stSql .= " LEFT JOIN \n"; -// $stSql .= " empenho.autorizacao_reserva as ar \n"; -// $stSql .= " ON ( ar.cod_autorizacao = ae.cod_autorizacao AND \n"; -// $stSql .= " ar.exercicio = ae.exercicio AND \n"; -// $stSql .= " ar.cod_entidade = ae.cod_entidade ) \n"; -// $stSql .= " LEFT JOIN \n"; -// $stSql .= " orcamento.reserva as ore \n"; -// $stSql .= " ON ( ore.cod_reserva = ar.cod_reserva AND \n"; -// $stSql .= " ore.exercicio = ar.exercicio ) \n"; -// $stSql .= " LEFT JOIN \n"; -// $stSql .= " empenho.autorizacao_anulada as aa \n"; -// $stSql .= " ON ( ae.cod_entidade = aa.cod_entidade \n"; -// $stSql .= " AND ae.exercicio = aa.exercicio \n"; -// $stSql .= " AND ae.cod_autorizacao = aa.cod_autorizacao ) \n"; -// $stSql .= " LEFT JOIN \n"; -// $stSql .= " empenho.pre_empenho_despesa as pd \n"; -// $stSql .= " ON ( pe.cod_pre_empenho = pd.cod_pre_empenho \n"; -// $stSql .= " AND pe.exercicio = pd.exercicio ) \n"; -// $stSql .= " ,empenho.item_pre_empenho as it \n"; -// $stSql .= " ,orcamento.unidade as ou \n"; -// $stSql .= " ,orcamento.orgao as oo \n"; -// $stSql .= " ,orcamento.entidade as oe \n"; -//// $stSql .= " ,orcamento.despesa as de \n"; -//// $stSql .= " ,orcamento.conta_despesa as cd \n"; -// $stSql .= " ,administracao.unidade_medida as um \n"; -// $stSql .= " ,sw_cgm as cg \n"; -// $stSql .= " LEFT JOIN \n"; -// $stSql .= " sw_cgm_pessoa_fisica as pf \n"; -// $stSql .= " ON (cg.numcgm = pf.numcgm) \n"; -// $stSql .= " LEFT JOIN \n"; -// $stSql .= " sw_cgm_pessoa_juridica as pj \n"; -// $stSql .= " ON (cg.numcgm = pj.numcgm) \n"; -// $stSql .= " ,sw_municipio as mu \n"; -// $stSql .= " ,sw_uf as uf \n"; -// $stSql .= " WHERE pe.cod_pre_empenho = it.cod_pre_empenho \n"; -// $stSql .= " AND pe.exercicio = it.exercicio \n"; -// $stSql .= " AND pe.cod_pre_empenho = ae.cod_pre_empenho \n"; -// $stSql .= " AND pe.exercicio = ae.exercicio \n"; -// $stSql .= " --Órgão \n"; -// $stSql .= " AND ae.num_orgao = ou.num_orgao \n"; -// $stSql .= " AND ae.num_unidade = ou.num_unidade \n"; -// $stSql .= " AND ae.exercicio = ou.exercicio \n"; -// $stSql .= " AND ou.num_orgao = oo.num_orgao \n"; -// $stSql .= " AND ou.exercicio = oo.exercicio \n"; -// $stSql .= " --Unidade \n"; -// $stSql .= " AND ae.num_orgao = ou.num_orgao \n"; -// $stSql .= " AND ae.num_unidade = ou.num_unidade \n"; -// $stSql .= " AND ae.exercicio = ou.exercicio \n"; -// $stSql .= " -- Entidade \n"; -// $stSql .= " AND ae.cod_entidade = OE.cod_entidade \n"; -// $stSql .= " AND ae.exercicio = OE.exercicio \n"; -//// $stSql .= " --Orcamento/Despesa \n"; -//// $stSql .= " AND pd.cod_despesa = de.cod_despesa \n"; -//// $stSql .= " AND pd.exercicio = de.exercicio \n"; -//// $stSql .= " --Conta Despesa \n"; -//// $stSql .= " AND pd.cod_conta = cd.cod_conta \n"; -//// $stSql .= " AND pd.exercicio = cd.exercicio \n"; -// $stSql .= " --CGM \n"; -// $stSql .= " AND pe.cgm_beneficiario = cg.numcgm \n"; -// $stSql .= " --Municipio \n"; -// $stSql .= " AND cg.cod_municipio = mu.cod_municipio \n"; -// $stSql .= " AND cg.cod_uf = mu.cod_uf \n"; -// $stSql .= " --Uf \n"; -// $stSql .= " AND mu.cod_uf = uf.cod_uf \n"; -// $stSql .= " --Unidade Medida \n"; -// $stSql .= " AND it.cod_unidade = um.cod_unidade \n"; -// $stSql .= " AND it.nom_unidade = um.nom_unidade \n"; -// $stSql .= " " . $this->getDado( "filtro" ) ." \n"; -// $stSql .= " ORDER BY ae.cod_pre_empenho, it.num_item \n"; -// $stSql .= " ) as tabela \n"; -// $stSql .= " LEFT JOIN \n"; -// $stSql .= " orcamento.despesa as de \n"; -// $stSql .= " ON ( de.cod_despesa = tabela.cod_despesa \n"; -// $stSql .= " AND de.exercicio = tabela.exercicio ) \n"; -// $stSql .= " ,sw_cgm as cgm \n"; -// $stSql .= " WHERE \n"; -// $stSql .= " CGM.numcgm = tabela.numcgm \n"; -// $stSql .= ") as tabela \n"; -// $stSql .= " LEFT JOIN \n"; -// $stSql .= " orcamento.conta_despesa as cd \n"; -// $stSql .= " ON ( cd.cod_conta = tabela.cod_conta \n"; -// $stSql .= " AND cd.exercicio = tabela.exercicio ) \n"; -//// $stSql .= "WHERE \n"; -//// mostravar( $stSql ); -//// die(); -// return $stSql; -// -//} -// -///** -// * Seta os dados pra fazer o recuperaSaldoAnterior -// * @access Private -// * @return $stSql -//*/ -//function montaRecuperaSaldoAnterior() { -// $stSql = "SELECT \n"; -// $stSql .= " empenho.fn_saldo_dotacao ( \n"; -// $stSql .= " '".$this->getDado( "exercicio" )."' \n"; -// $stSql .= " ,".$this->getDado( "cod_despesa" )." \n"; -// $stSql .= " ) AS saldo_anterior \n"; -// return $stSql; -//} -// -// -///** -// * @access Public -// * @param Object $rsRecordSet Objeto RecordSet -// * @param String $stOrdem String de Ordenação do SQL (ORDER BY) -// * @param Boolean $boTransacao -// * @return Object Objeto Erro -//*/ -//function recuperaSaldoAnterior(&$rsRecordSet, $stOrdem = "" , $boTransacao = "") { -// $obErro = new Erro; -// $obConexao = new Conexao; -// $rsRecordSet = new RecordSet; -// -// if(trim($stOrdem)) -// $stOrdem = (strpos($stOrdem,"ORDER BY")===false)?" ORDER BY $stOrdem":$stOrdem; -// $stSql = $this->montaRecuperaSaldoAnterior(); -// $this->setDebug( $stSql ); -// $obErro = $obConexao->executaSQL( $rsRecordSet, $stSql, $boTransacao ); -// return $obErro; -//} -// -// /** -// * Executa um Select no banco de dados a partir do comando SQL montado no método montaRecuperaDadosExportacao. -// * @access Public -// * @param Object $rsRecordSet Objeto RecordSet -// * @param String $stCondicao String de condição do SQL (WHERE) -// * @param String $stOrdem String de Ordenação do SQL (ORDER BY) -// * @param Boolean $boTransacao -// * @return Object Objeto Erro -// */ -// function recuperaDadosExportacao(&$rsRecordSet, $stCondicao = "" , $stOrdem = "" , $boTransacao = "") { -// $obErro = new Erro; -// $obConexao = new Conexao; -// $rsRecordSet = new RecordSet; -// if(trim($stOrdem)) -// $stOrdem = (strpos($stOrdem,"ORDER BY")===false)?" ORDER BY $stOrdem":$stOrdem; -// $stSql = $this->montaRecuperaDadosExportacao().$stCondicao.$stOrdem; -// $this->setDebug( $stSql ); -// $obErro = $obConexao->executaSQL( $rsRecordSet, $stSql, $boTransacao ); -// return $obErro; -// } -// -// function MontaRecuperaDadosExportacao() { -// $stSql = ""; -// $stSql .= "SELECT \n"; -// $stSql .= " SW.numcgm, \n"; -// $stSql .= " SW.nom_cgm, \n"; -// $stSql .= " CASE WHEN PF.numcgm IS NOT NULL THEN replace(replace(replace(PF.cpf,'-',''),'\r',''),'\n','') ELSE replace(replace(replace(PJ.cnpj,'-',''),'\r',''),'\n','') END AS cpf_cnpj, \n"; -// $stSql .= " CASE \n"; -// $stSql .= " WHEN PJ.insc_estadual = '' THEN '0' \n"; -// $stSql .= " ELSE replace(PJ.insc_estadual,'-','') \n"; -// $stSql .= " END as insc_estadual, \n"; -// $stSql .= " CASE \n"; -// $stSql .= " WHEN EF.inscricao_economica IS NOT NULL THEN replace(EF.inscricao_economica,'-','') \n"; -// $stSql .= " WHEN ED.inscricao_economica IS NOT NULL THEN replace(ED.inscricao_economica,'-','') \n"; -// $stSql .= " WHEN EA.inscricao_economica IS NOT NULL THEN replace(EA.inscricao_economica,'-','') \n"; -// $stSql .= " ELSE '' \n"; -// $stSql .= " END AS insc_municipal, \n"; -// $stSql .= " SW.tipo_logradouro||' '||SW.logradouro||' n:'||SW.numero||' '||SW.complemento||' '||SW.bairro AS endereco, \n"; -// $stSql .= " SM.nom_municipio, \n"; -// $stSql .= " SF.sigla_uf as nom_uf, \n"; -// $stSql .= " SW.cep, \n"; -// $stSql .= " SW.fone_comercial, \n"; -// $stSql .= " '' AS fax, \n"; -// $stSql .= " TC.tipo \n"; -// $stSql .= "FROM \n"; -// $stSql .= " sw_municipio AS SM, \n"; -// $stSql .= " sw_uf AS SF, \n"; -// $stSql .= " tcers.credor AS TC, \n"; -// $stSql .= " sw_cgm AS SW \n"; -// $stSql .= "LEFT JOIN \n"; -// $stSql .= " sw_cgm_pessoa_fisica AS PF \n"; -// $stSql .= "ON \n"; -// $stSql .= " SW.numcgm = PF.numcgm \n"; -// $stSql .= "LEFT JOIN \n"; -// $stSql .= " sw_cgm_pessoa_juridica AS PJ \n"; -// $stSql .= "ON \n"; -// $stSql .= " SW.numcgm = PJ.numcgm \n"; -// $stSql .= "LEFT JOIN \n"; -// $stSql .= " economico.cadastro_economico_empresa_fato AS EF \n"; -// $stSql .= "ON \n"; -// $stSql .= " EF.numcgm = SW.numcgm \n"; -// $stSql .= "LEFT JOIN \n"; -// $stSql .= " economico.cadastro_economico_empresa_direito AS ED \n"; -// $stSql .= "ON \n"; -// $stSql .= " ED.numcgm = SW.numcgm \n"; -// $stSql .= "LEFT JOIN \n"; -// $stSql .= " economico.cadastro_economico_autonomo AS EA \n"; -// $stSql .= "ON \n"; -// $stSql .= " EA.numcgm = SW.numcgm \n"; -// $stSql .= "WHERE \n"; -// $stSql .= " SW.numcgm = TC.numcgm AND \n"; -// $stSql .= " SW.cod_municipio = SM.cod_municipio AND \n"; -// $stSql .= " SW.cod_uf = SM.cod_uf AND \n"; -// $stSql .= " SM.cod_uf = SF.cod_uf AND \n"; -// $stSql .= " TC.exercicio = ".$this->getDado("inExercicio")." AND \n"; -// $stSql .= " TC.numcgm in \n"; -// $stSql .= " (SELECT \n"; -// $stSql .= " EP.cgm_beneficiario \n"; -// $stSql .= " FROM \n"; -// $stSql .= " empenho.empenho AS EE, \n"; -// $stSql .= " empenho.pre_empenho AS EP \n"; -// $stSql .= " WHERE \n"; -// $stSql .= " EE.exercicio = EP.exercicio AND \n"; -// $stSql .= " EE.cod_pre_empenho = EP.cod_pre_empenho) \n"; -// return $stSql; -// } -// } diff --git a/gestaoPrestacaoContas/fontes/PHP/TCERJ/instancias/configuracao/FMManterAjustesEmpenho.php b/gestaoPrestacaoContas/fontes/PHP/TCERJ/instancias/configuracao/FMManterAjustesEmpenho.php index 938d59a..a5ca3b8 100755 --- a/gestaoPrestacaoContas/fontes/PHP/TCERJ/instancias/configuracao/FMManterAjustesEmpenho.php +++ b/gestaoPrestacaoContas/fontes/PHP/TCERJ/instancias/configuracao/FMManterAjustesEmpenho.php @@ -32,10 +32,10 @@ * @ignore - $Revision: 59612 $ + $Revision: 63835 $ $Name$ - $Author: gelson $ - $Date: 2014-09-02 09:00:51 -0300 (Ter, 02 Set 2014) $ + $Author: franver $ + $Date: 2015-10-22 11:53:31 -0200 (Qui, 22 Out 2015) $ * Casos de uso: uc-02.08.14 */ @@ -62,9 +62,6 @@ $pgProc = "PR".$stPrograma.".php"; $pgOcul = "OC".$stPrograma.".php"; $pgJS = "JS".$stPrograma.".js"; -//SistemaLegado::mostraVar($_POST); -//die(); - $arFiltro = array(); foreach ($_POST as $stCampo => $stValor) { $arFiltro[$stCampo] = $stValor; diff --git a/gestaoPrestacaoContas/fontes/PHP/TCERN/classes/mapeamento/TTRNANEXO42.class.php b/gestaoPrestacaoContas/fontes/PHP/TCERN/classes/mapeamento/TTRNANEXO42.class.php index 65d726a..2094239 100755 --- a/gestaoPrestacaoContas/fontes/PHP/TCERN/classes/mapeamento/TTRNANEXO42.class.php +++ b/gestaoPrestacaoContas/fontes/PHP/TCERN/classes/mapeamento/TTRNANEXO42.class.php @@ -83,8 +83,7 @@ function montaRecuperaOrgao() AND exercicio = '".$this->getDado('exercicio')."' ) AND configuracao_entidade.cod_modulo = 49 AND configuracao_entidade.parametro = 'cod_orgao_tce'"; - //sistemaLegado::mostravar($stSql); - //die('Fim'); + return $stSql; } @@ -148,8 +147,7 @@ function montaRecuperaRelacionamento() , situacao , norma , dt_norma"; - //sistemaLegado::mostravar($stSql); - //die('Fim'); + return $stSql; } @@ -196,8 +194,7 @@ function montaRecuperaRespGestora() WHERE unidade_gestora.exercicio = '".$this->getDado('exercicio')."' AND unidade_gestora_responsavel.dt_inicio >= '".$this->getDado('dtIni')."' AND unidade_gestora_responsavel.dt_fim <= '".$this->getDado('dtFim')."'"; - //sistemaLegado::mostravar($stSql); - //die('Fim'); + return $stSql; } @@ -246,8 +243,7 @@ function montaRecuperaOrcamentaria() ON sw_uf.cod_uf = sw_municipio.cod_uf WHERE unidade_gestora.exercicio = '".$this->getDado('exercicio')."'"; - //sistemaLegado::mostravar($stSql); - //die('Fim'); + return $stSql; } @@ -296,8 +292,7 @@ function montaRecuperaRespOrcamentaria() WHERE unidade_gestora.exercicio = '".$this->getDado('exercicio')."' AND unidade_orcamentaria_responsavel.dt_inicio >= '".$this->getDado('dtIni')."' AND unidade_orcamentaria_responsavel.dt_fim <= '".$this->getDado('dtFim')."'"; - //sistemaLegado::mostravar($stSql); - //die('Fim'); + return $stSql; } diff --git a/gestaoPrestacaoContas/fontes/PHP/TCERN/instancias/configuracao/FMManterConfiguracaoUnidadeOrcamentaria.php b/gestaoPrestacaoContas/fontes/PHP/TCERN/instancias/configuracao/FMManterConfiguracaoUnidadeOrcamentaria.php index 55ec8f8..8b1503d 100755 --- a/gestaoPrestacaoContas/fontes/PHP/TCERN/instancias/configuracao/FMManterConfiguracaoUnidadeOrcamentaria.php +++ b/gestaoPrestacaoContas/fontes/PHP/TCERN/instancias/configuracao/FMManterConfiguracaoUnidadeOrcamentaria.php @@ -255,11 +255,7 @@ $obBtLimpar->obEvento->setOnClick( "limparResponsavel();"); $obSpnGestor = new Span(); $obSpnGestor->setId( 'spnResponsavel' ); -/*if (Sessao::read('arResponsavel')) { - sistemaLegado::mostravar($_REQUEST); - die('Fim'); -}*/ -//****************************************// +f//****************************************// // Monta FORMULARIO //****************************************// $obFormulario = new Formulario; diff --git a/gestaoPrestacaoContas/fontes/PHP/TCESC/instancias/exportacao/PRGeraArquivosEsfingeConcursos.php b/gestaoPrestacaoContas/fontes/PHP/TCESC/instancias/exportacao/PRGeraArquivosEsfingeConcursos.php index 731f9e7..0794370 100755 --- a/gestaoPrestacaoContas/fontes/PHP/TCESC/instancias/exportacao/PRGeraArquivosEsfingeConcursos.php +++ b/gestaoPrestacaoContas/fontes/PHP/TCESC/instancias/exportacao/PRGeraArquivosEsfingeConcursos.php @@ -52,7 +52,6 @@ function geraArquivosConcursos(&$obExportador , $stDataInicial, $stDataFinal) $obTConcursoConcurso->setDado( 'dt_inicial' , $stDataInicial ); $obTConcursoConcurso->setDado( 'dt_final' , $stDataFinal ); $obTConcursoConcurso->recuperaConcursoEsfinge( $rsConcurso ); -// sistemaLegado::mostravar( $rsConcurso ); $obExportador->addArquivo("concurso.txt"); $obExportador->roUltimoArquivo->addBloco($rsConcurso); @@ -88,7 +87,6 @@ function geraArquivosConcursos(&$obExportador , $stDataInicial, $stDataFinal) $obTConcursoConcurso->setDado( 'dt_inicial' , $stDataInicial ); $obTConcursoConcurso->setDado( 'dt_final' , $stDataFinal ); $obTConcursoConcurso->recuperaResultadoConcursoEsfinge( $rsResultadoConcurso ); -// sistemaLegado::mostravar( $rsResultadoConcurso ); $obExportador->addArquivo("resultadoconcurso.txt"); $obExportador->roUltimoArquivo->addBloco($rsResultadoConcurso); diff --git a/gestaoPrestacaoContas/fontes/PHP/TCESC/instancias/exportacao/PRGeraArquivosEsfingeContratos.php b/gestaoPrestacaoContas/fontes/PHP/TCESC/instancias/exportacao/PRGeraArquivosEsfingeContratos.php index 431e7be..fda150b 100755 --- a/gestaoPrestacaoContas/fontes/PHP/TCESC/instancias/exportacao/PRGeraArquivosEsfingeContratos.php +++ b/gestaoPrestacaoContas/fontes/PHP/TCESC/instancias/exportacao/PRGeraArquivosEsfingeContratos.php @@ -54,7 +54,6 @@ function geraArquivosContratos(&$obExportador , $stDataInicial, $stDataFinal) $obTLicitacaoContrato->setDado( 'dt_inicial', $stDataInicial ); $obTLicitacaoContrato->setDado( 'dt_final', $stDataFinal ); $obTLicitacaoContrato->recuperaContratoEsfinge( $rsContrato ); -// sistemaLegado::mostravar( $rsContrato ); $obExportador->addArquivo("contrato.txt"); $obExportador->roUltimoArquivo->addBloco($rsContrato); diff --git a/gestaoPrestacaoContas/fontes/PHP/TCESC/instancias/exportacao/PRGeraArquivosEsfingeConvenios.php b/gestaoPrestacaoContas/fontes/PHP/TCESC/instancias/exportacao/PRGeraArquivosEsfingeConvenios.php index 289e22a..d2ed7b0 100755 --- a/gestaoPrestacaoContas/fontes/PHP/TCESC/instancias/exportacao/PRGeraArquivosEsfingeConvenios.php +++ b/gestaoPrestacaoContas/fontes/PHP/TCESC/instancias/exportacao/PRGeraArquivosEsfingeConvenios.php @@ -97,7 +97,6 @@ function geraArquivosConvenios(&$obExportador , $stDataInicial, $stDataFinal) $obTParticipanteConvenio->setDado( 'dt_inicial' , $stDataInicial ); $obTParticipanteConvenio->setDado( 'dt_final' , $stDataFinal ); $obTParticipanteConvenio->recuperaParticipanteConvenioEsfinge( $rsParticipanteConvenio ); -// sistemaLegado::mostravar( $rsParticipanteConvenio ); $obExportador->addArquivo("participanteconvenio.txt"); $obExportador->roUltimoArquivo->addBloco($rsParticipanteConvenio ); @@ -132,7 +131,6 @@ function geraArquivosConvenios(&$obExportador , $stDataInicial, $stDataFinal) $obTParticipanteConvenio->setDado( 'dt_inicial' , $stDataInicial ); $obTParticipanteConvenio->setDado( 'dt_final' , $stDataFinal ); $obTParticipanteConvenio->recuperaCertidaoConveniadoEsfinge( $rsCertidaoConveniado ); -// sistemaLegado::mostravar( $rsCertidaoConveniado ); $obExportador->addArquivo("certidaoconvenianado.txt"); $obExportador->roUltimoArquivo->addBloco($rsCertidaoConveniado); diff --git a/gestaoPrestacaoContas/fontes/PHP/TCESC/instancias/exportacao/PRGeraArquivosEsfingePlanoCargos.php b/gestaoPrestacaoContas/fontes/PHP/TCESC/instancias/exportacao/PRGeraArquivosEsfingePlanoCargos.php index 04d729a..1b928cb 100755 --- a/gestaoPrestacaoContas/fontes/PHP/TCESC/instancias/exportacao/PRGeraArquivosEsfingePlanoCargos.php +++ b/gestaoPrestacaoContas/fontes/PHP/TCESC/instancias/exportacao/PRGeraArquivosEsfingePlanoCargos.php @@ -149,7 +149,6 @@ function geraArquivosPlanoCargos(&$obExportador , $stDataInicial, $stDataFinal) $obTFlolhaPagamentoPadrao->setDado( 'dt_inicial' , $stDataInicial ); $obTFlolhaPagamentoPadrao->setDado( 'dt_final' , $stDataFinal ); $obTFlolhaPagamentoPadrao->recuperaAtualizacaoNivelEsfinge( $rsAtualizacaoNivel ); -// sistemaLegado::mostravar( $rsAtualizacaoNivel ); $obExportador->addArquivo("atualizacaocargogruporeferencianivel.txt"); $obExportador->roUltimoArquivo->addBloco($rsAtualizacaoNivel); diff --git a/gestaoPrestacaoContas/fontes/PHP/TCESC/instancias/exportacao/PRGeraArquivosEsfingeRegContabeis.php b/gestaoPrestacaoContas/fontes/PHP/TCESC/instancias/exportacao/PRGeraArquivosEsfingeRegContabeis.php index 159cd8e..3451709 100755 --- a/gestaoPrestacaoContas/fontes/PHP/TCESC/instancias/exportacao/PRGeraArquivosEsfingeRegContabeis.php +++ b/gestaoPrestacaoContas/fontes/PHP/TCESC/instancias/exportacao/PRGeraArquivosEsfingeRegContabeis.php @@ -89,179 +89,6 @@ function geraArquivosRegContabeis(&$obExportador , $stDataInicial, $stDataFinal) $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("NUMERICO_ZEROS_ESQ"); $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(16); -// $obTEmpenhoNotaLiquidacaoItemAnulado = new TEmpenhoNotaLiquidacaoItemAnulado; -// $obTEmpenhoNotaLiquidacaoItemAnulado->setDado( 'exercicio' , $arFiltroRelatorio['stExercicio'] ); -// $obTEmpenhoNotaLiquidacaoItemAnulado->setDado( 'cod_entidade', implode(",", $arFiltroRelatorio['inCodEntidade'] ) ); -// $obTEmpenhoNotaLiquidacaoItemAnulado->setDado( 'dt_inicial' , $stDataInicial ); -// $obTEmpenhoNotaLiquidacaoItemAnulado->setDado( 'dt_final' , $stDataFinal ); -// $obTEmpenhoNotaLiquidacaoItemAnulado->recuperaEstornoLiquidacaoEsfinge( $rsEstornoLiquidacao ); -//// sistemaLegado::mostravar( $rsEstornoLiquidacao ); -// -// $obExportador->addArquivo("estornoliquidacao.txt"); -// $obExportador->roUltimoArquivo->addBloco($rsEstornoLiquidacao ); -// -// $obExportador->roUltimoArquivo->roUltimoBloco->addColuna("cod_entidade"); -// $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("NUMERICO_ZEROS_ESQ"); -// $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(4); -// -// $obExportador->roUltimoArquivo->roUltimoBloco->addColuna("cod_empenho"); -// $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("NUMERICO_ZEROS_ESQ"); -// $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(16); -// -// $obExportador->roUltimoArquivo->roUltimoBloco->addColuna(""); -// $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setCampoObrigatorio( false ); -// $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("NUMERICO_ZEROS_ESQ"); -// $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(16); -// -// $obExportador->roUltimoArquivo->roUltimoBloco->addColuna("dt_liquidacao"); -// $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("DATA_YYYYMMDD"); -// $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(8); -// -// $obExportador->roUltimoArquivo->roUltimoBloco->addColuna("timestamp"); -// $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("DATA_YYYYMMDD"); -// $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(8); -// -// $obExportador->roUltimoArquivo->roUltimoBloco->addColuna(""); -// $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setCampoObrigatorio( false ); -// $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("CARACTER_ESPACOS_DIR"); -// $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(255); -// -// $obExportador->roUltimoArquivo->roUltimoBloco->addColuna("vl_anulado"); -// $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("NUMERICO_ZEROS_ESQ"); -// $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(16); -// -// $obTEmpenhoNotaLiquidacaoPaga = new TEmpenhoNotaLiquidacaoPaga; -// $obTEmpenhoNotaLiquidacaoPaga->setDado( 'exercicio' , $arFiltroRelatorio['stExercicio'] ); -// $obTEmpenhoNotaLiquidacaoPaga->setDado( 'cod_entidade', implode(",", $arFiltroRelatorio['inCodEntidade'] ) ); -// $obTEmpenhoNotaLiquidacaoPaga->setDado( 'dt_inicial' , $stDataInicial ); -// $obTEmpenhoNotaLiquidacaoPaga->setDado( 'dt_final' , $stDataFinal ); -// $obTEmpenhoNotaLiquidacaoPaga->recuperaPagamentoEmpenhoEsfinge( $rsPagamentoEmpenho ); -//// sistemaLegado::mostravar( $rsPagamentoEmpenho ); -// -// $obExportador->addArquivo("pagamentoempenho.txt"); -// $obExportador->roUltimoArquivo->addBloco($rsPagamentoEmpenho); -// -// $obExportador->roUltimoArquivo->roUltimoBloco->addColuna("cod_entidade"); -// $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("NUMERICO_ZEROS_ESQ"); -// $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(4); -// -// $obExportador->roUltimoArquivo->roUltimoBloco->addColuna("cod_empenho"); -// $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("NUMERICO_ZEROS_ESQ"); -// $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(16); -// -// $obExportador->roUltimoArquivo->roUltimoBloco->addColuna("timestamp"); -// $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("DATA_YYYYMMDD"); -// $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(8); -// -// $obExportador->roUltimoArquivo->roUltimoBloco->addColuna(""); -// $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setCampoObrigatorio( false ); -// $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("NUMERICO_ZEROS_ESQ"); -// $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(16); -// -// $obExportador->roUltimoArquivo->roUltimoBloco->addColuna(""); -// $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setCampoObrigatorio( false ); -// $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("NUMERICO_ZEROS_ESQ"); -// $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(2); -// -// $obExportador->roUltimoArquivo->roUltimoBloco->addColuna(""); -// $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setCampoObrigatorio( false ); -// $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("NUMERICO_ZEROS_ESQ"); -// $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(5); -// -// $obExportador->roUltimoArquivo->roUltimoBloco->addColuna("vl_pago"); -// $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("NUMERICO_ZEROS_ESQ"); -// $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(16); -// -// $obExportador->roUltimoArquivo->roUltimoBloco->addColuna("dt_vencimento"); -// $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("DATA_YYYYMMDD"); -// $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(8); -// -// $obExportador->roUltimoArquivo->roUltimoBloco->addColuna(""); -// $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setCampoObrigatorio( false ); -// $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("DATA_YYYYMMDD"); -// $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(8); -// -// $obExportador->roUltimoArquivo->roUltimoBloco->addColuna(""); -// $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setCampoObrigatorio( false ); -// $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("DATA_YYYYMMDD"); -// $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(8); -// -// $obTEmpenhoNotaLiquidacaoContaPagadora = new TEmpenhoNotaLiquidacaoContaPagadora; -// $obTEmpenhoNotaLiquidacaoContaPagadora->setDado( 'exercicio' , $arFiltroRelatorio['stExercicio'] ); -// $obTEmpenhoNotaLiquidacaoContaPagadora->setDado( 'cod_entidade', implode(",", $arFiltroRelatorio['inCodEntidade'] ) ); -// $obTEmpenhoNotaLiquidacaoContaPagadora->setDado( 'dt_inicial' , $stDataInicial ); -// $obTEmpenhoNotaLiquidacaoContaPagadora->setDado( 'dt_final' , $stDataFinal ); -// $obTEmpenhoNotaLiquidacaoContaPagadora->recuperaDesembolsoEsfinge( $rsDesembolso ); -//// sistemaLegado::mostravar( $rsDesembolso ); -// -// $obExportador->addArquivo("desembolso.txt"); -// $obExportador->roUltimoArquivo->addBloco($rsDesembolso); -// -// $obExportador->roUltimoArquivo->roUltimoBloco->addColuna("cod_entidade"); -// $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("NUMERICO_ZEROS_ESQ"); -// $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(4); -// -// $obExportador->roUltimoArquivo->roUltimoBloco->addColuna("cod_empenho"); -// $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("NUMERICO_ZEROS_ESQ"); -// $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(16); -// -// $obExportador->roUltimoArquivo->roUltimoBloco->addColuna(""); -// $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setCampoObrigatorio( false ); -// $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("NUMERICO_ZEROS_ESQ"); -// $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(16); -// -// $obExportador->roUltimoArquivo->roUltimoBloco->addColuna("timestamp"); -// $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("DATA_YYYYMMDD"); -// $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(8); -// -// $obExportador->roUltimoArquivo->roUltimoBloco->addColuna("exercicio"); -// $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("NUMERICO_ZEROS_ESQ"); -// $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(4); -// -// $obExportador->roUltimoArquivo->roUltimoBloco->addColuna("cod_estrutural"); -// $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("CARACTER_ESPACOS_DIR"); -// $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(50); -// -// $obExportador->roUltimoArquivo->roUltimoBloco->addColuna("vl_pago"); -// $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("NUMERICO_ZEROS_ESQ"); -// $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(16); -// -// $obTEmpenhoNotaLiquidacaoPagaAnulada = new TEmpenhoNotaLiquidacaoPagaAnulada; -// $obTEmpenhoNotaLiquidacaoPagaAnulada->setDado( 'exercicio' , $arFiltroRelatorio['stExercicio'] ); -// $obTEmpenhoNotaLiquidacaoPagaAnulada->setDado( 'cod_entidade', implode(",", $arFiltroRelatorio['inCodEntidade'] ) ); -// $obTEmpenhoNotaLiquidacaoPagaAnulada->setDado( 'dt_inicial' , $stDataInicial ); -// $obTEmpenhoNotaLiquidacaoPagaAnulada->setDado( 'dt_final' , $stDataFinal ); -// $obTEmpenhoNotaLiquidacaoPagaAnulada->recuperaEstornoPagamentoEsfinge( $rsEstornoPagamento ); -//// sistemaLegado::mostravar( $rsEstornoPagamento ); -// -// $obExportador->addArquivo("estornopagamento.txt"); -// $obExportador->roUltimoArquivo->addBloco($rsEstornoPagamento ); -// -// $obExportador->roUltimoArquivo->roUltimoBloco->addColuna("cod_entidade"); -// $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("NUMERICO_ZEROS_ESQ"); -// $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(4); -// -// $obExportador->roUltimoArquivo->roUltimoBloco->addColuna("cod_empenho"); -// $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("NUMERICO_ZEROS_ESQ"); -// $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(16); -// -// $obExportador->roUltimoArquivo->roUltimoBloco->addColuna("timestamp"); -// $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("DATA_YYYYMMDD"); -// $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(8); -// -// $obExportador->roUltimoArquivo->roUltimoBloco->addColuna("timestamp_anulada"); -// $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("DATA_YYYYMMDD"); -// $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(8); -// -// $obExportador->roUltimoArquivo->roUltimoBloco->addColuna(""); -// $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setCampoObrigatorio( false ); -// $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("NUMERICO_ZEROS_ESQ"); -// $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(16); -// -// $obExportador->roUltimoArquivo->roUltimoBloco->addColuna("vl_anulado"); -// $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("NUMERICO_ZEROS_ESQ"); -// $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(16); - } include_once '../../../../../../gestaoAdministrativa/fontes/PHP/framework/include/rodape.inc.php'; diff --git a/gestaoPrestacaoContas/fontes/PHP/TCMBA/classes/mapeamento/2015/TTBAAdCont.class.php b/gestaoPrestacaoContas/fontes/PHP/TCMBA/classes/mapeamento/2015/TTBAAdCont.class.php index fe26685..88cb697 100644 --- a/gestaoPrestacaoContas/fontes/PHP/TCMBA/classes/mapeamento/2015/TTBAAdCont.class.php +++ b/gestaoPrestacaoContas/fontes/PHP/TCMBA/classes/mapeamento/2015/TTBAAdCont.class.php @@ -65,30 +65,21 @@ class TTBAAdCont extends Persistente public function montarRecuperaDadosAditivoContrato() { - $stSql .= "SELECT 1 AS tipo_registro - , ".$this->getDado('unidade_gestora')." AS unidade_gestora - , contrato.num_contrato - , contrato_aditivos.num_aditivo - , contrato_aditivos.objeto - , TO_CHAR(contrato_aditivos.dt_assinatura, 'DDMMYYYY') AS dt_assinatura_aditivo - , TO_CHAR(contrato_aditivos.dt_vencimento, 'DDMMYYYY') AS dt_vencimento_aditivo - , SUBSTR(TRIM(cgm_imprensa.nom_cgm), 1, 50) AS imprensa_oficial - , TO_CHAR(publicacao_contrato_aditivos.dt_publicacao, 'dd/mm/yyyy') AS dt_publicacao_aditivo - , contrato_aditivos.valor_contratado AS valor_contratado_aditivo - , TO_CHAR(contrato.dt_assinatura, 'YYYYMM') AS competencia - , TO_CHAR(contrato.inicio_execucao, 'DDMMYYYY') AS inicio_execucao_contrato - , despesa.num_orgao - , despesa.num_unidade - , despesa.cod_programa - , SUBSTR(despesa.num_pao::VARCHAR, 1, 1) AS tipo_projeto_atividade - , SUBSTR(despesa.num_pao::VARCHAR, 2, 3) AS codigo_projeto_atividade - , contrato_aditivos.fundamentacao - , 'N' AS exame_previo - , contrato.exercicio AS ano - , fonte_recurso.descricao AS fonte_recurso - , despesa.cod_funcao - , despesa.cod_despesa - , despesa.cod_subfuncao + $stSql = " + SELECT 1 AS tipo_registro + , ".$this->getDado('unidade_gestora')." AS unidade_gestora + , contrato_aditivos.num_aditivo + , contrato.numero_contrato AS num_contrato + , contrato_aditivos.objeto + , TO_CHAR(contrato_aditivos.dt_assinatura, 'DDMMYYYY') AS dt_assinatura_aditivo + , TO_CHAR(contrato_aditivos.dt_vencimento, 'DDMMYYYY') AS dt_vencimento_aditivo + , SUBSTR(TRIM(cgm_imprensa.nom_cgm), 1, 50) AS imprensa_oficial + , TO_CHAR(publicacao_contrato_aditivos.dt_publicacao, 'dd/mm/yyyy') AS dt_publicacao_aditivo + , contrato_aditivos.valor_contratado AS valor_contratado_aditivo + , TO_CHAR(contrato.dt_assinatura, 'YYYYMM') AS competencia + , TO_CHAR(contrato.inicio_execucao, 'DDMMYYYY') AS inicio_execucao_contrato + , contrato_aditivos.fundamentacao + , 'N' AS exame_previo FROM licitacao.contrato @@ -112,115 +103,22 @@ class TTBAAdCont extends Persistente INNER JOIN sw_cgm AS cgm_imprensa ON publicacao_contrato.numcgm = cgm_imprensa.numcgm - INNER JOIN licitacao.contrato_compra_direta - ON contrato_compra_direta.num_contrato = contrato.num_contrato - AND contrato_compra_direta.cod_entidade = contrato.cod_entidade - AND contrato_compra_direta.exercicio = contrato.exercicio + LEFT JOIN licitacao.contrato_compra_direta + ON contrato_compra_direta.num_contrato = contrato.num_contrato + AND contrato_compra_direta.cod_entidade = contrato.cod_entidade + AND contrato_compra_direta.exercicio = contrato.exercicio - INNER JOIN compras.compra_direta - ON compra_direta.cod_compra_direta = contrato_compra_direta.cod_compra_direta - AND compra_direta.cod_entidade = contrato_compra_direta.cod_entidade - AND compra_direta.exercicio_entidade = contrato_compra_direta.exercicio_compra_direta - AND compra_direta.cod_modalidade = contrato_compra_direta.cod_modalidade - - INNER JOIN compras.mapa - ON mapa.exercicio = compra_direta.exercicio_mapa - AND mapa.cod_mapa = compra_direta.cod_mapa - - INNER JOIN compras.objeto - ON mapa.cod_objeto = objeto.cod_objeto - - INNER JOIN compras.mapa_cotacao - ON mapa.exercicio = mapa_cotacao.exercicio_mapa - AND mapa.cod_mapa = mapa_cotacao.cod_mapa - - INNER JOIN compras.cotacao_item - ON mapa_cotacao.exercicio_cotacao = cotacao_item.exercicio - AND mapa_cotacao.cod_cotacao = cotacao_item.cod_cotacao - - INNER JOIN compras.cotacao_fornecedor_item - ON cotacao_item.exercicio = cotacao_fornecedor_item.exercicio - AND cotacao_item.cod_cotacao = cotacao_fornecedor_item.cod_cotacao - AND cotacao_item.cod_item = cotacao_fornecedor_item.cod_item - AND cotacao_item.lote = cotacao_fornecedor_item.lote - - INNER JOIN compras.julgamento_item - ON cotacao_fornecedor_item.exercicio = julgamento_item.exercicio - AND cotacao_fornecedor_item.cod_cotacao = julgamento_item.cod_cotacao - AND cotacao_fornecedor_item.cod_item = julgamento_item.cod_item - AND cotacao_fornecedor_item.cgm_fornecedor = julgamento_item.cgm_fornecedor - AND cotacao_fornecedor_item.lote = julgamento_item.lote - - INNER JOIN empenho.item_pre_empenho_julgamento - ON julgamento_item.exercicio = item_pre_empenho_julgamento.exercicio_julgamento - AND julgamento_item.cod_cotacao = item_pre_empenho_julgamento.cod_cotacao - AND julgamento_item.cod_item = item_pre_empenho_julgamento.cod_item - AND julgamento_item.lote = item_pre_empenho_julgamento.lote - AND julgamento_item.cgm_fornecedor = item_pre_empenho_julgamento.cgm_fornecedor - - INNER JOIN empenho.item_pre_empenho - ON item_pre_empenho_julgamento.cod_pre_empenho = item_pre_empenho.cod_pre_empenho - AND item_pre_empenho_julgamento.exercicio = item_pre_empenho.exercicio - AND item_pre_empenho_julgamento.num_item = item_pre_empenho.num_item - - INNER JOIN empenho.pre_empenho - ON item_pre_empenho.cod_pre_empenho = pre_empenho.cod_pre_empenho - AND item_pre_empenho.exercicio = pre_empenho.exercicio - - INNER JOIN empenho.pre_empenho_despesa - ON pre_empenho.cod_pre_empenho = pre_empenho_despesa.cod_pre_empenho - AND pre_empenho.exercicio = pre_empenho_despesa.exercicio - - INNER JOIN orcamento.despesa - ON pre_empenho_despesa.exercicio = despesa.exercicio - AND pre_empenho_despesa.cod_despesa = despesa.cod_despesa - - INNER JOIN orcamento.recurso - ON despesa.exercicio = recurso.exercicio - AND despesa.cod_recurso = recurso.cod_recurso - - INNER JOIN orcamento.recurso_direto - ON recurso_direto.exercicio = recurso.exercicio - AND recurso_direto.cod_recurso = recurso.cod_recurso - - INNER JOIN orcamento.fonte_recurso - ON fonte_recurso.cod_fonte = recurso_direto.cod_fonte - - WHERE NOT EXISTS ( - SELECT 1 - FROM licitacao.contrato_anulado - WHERE num_contrato = contrato_anulado.num_contrato - AND contrato.exercicio = contrato_anulado.exercicio - AND contrato.cod_entidade = contrato_anulado.cod_entidade - ) - AND NOT EXISTS ( - SELECT 1 - FROM licitacao.contrato_aditivos_anulacao - WHERE exercicio_contrato = contrato_aditivos_anulacao.exercicio_contrato - AND contrato_aditivos.cod_entidade = contrato_aditivos_anulacao.cod_entidade - AND contrato_aditivos.num_contrato = contrato_aditivos_anulacao.num_contrato - AND contrato_aditivos.exercicio = contrato_aditivos_anulacao.exercicio - AND contrato_aditivos.num_aditivo = contrato_aditivos_anulacao.num_aditivo - ) - AND NOT EXISTS ( - SELECT 1 - FROM compras.cotacao_anulada - WHERE cotacao_item.exercicio = cotacao_anulada.exercicio - AND cotacao_item.cod_cotacao = cotacao_anulada.cod_cotacao - ) - AND julgamento_item.ordem = 1 - AND NOT EXISTS ( - SELECT 1 - FROM empenho.empenho_anulado_item - WHERE item_pre_empenho.exercicio = empenho_anulado_item.exercicio - AND item_pre_empenho.cod_pre_empenho = empenho_anulado_item.cod_pre_empenho - AND item_pre_empenho.num_item = empenho_anulado_item.num_item - ) - AND contrato.exercicio = '".$this->getDado('exercicio')."' - AND contrato.dt_assinatura BETWEEN TO_DATE('".$this->getDado('dt_inicial')."','DD/MM/YYYY') - AND TO_DATE('".$this->getDado('dt_final')."','DD/MM/YYYY') - AND contrato.cod_entidade IN (".$this->getDado('entidades').") "; - + LEFT JOIN compras.compra_direta + ON compra_direta.cod_compra_direta = contrato_compra_direta.cod_compra_direta + AND compra_direta.cod_entidade = contrato_compra_direta.cod_entidade + AND compra_direta.exercicio_entidade = contrato_compra_direta.exercicio_compra_direta + AND compra_direta.cod_modalidade = contrato_compra_direta.cod_modalidade + + WHERE contrato_aditivos.exercicio = '".$this->getDado('exercicio')."' + AND contrato_aditivos.dt_assinatura BETWEEN TO_DATE('".$this->getDado('dt_inicial')."','DD/MM/YYYY') + AND TO_DATE('".$this->getDado('dt_final')."','DD/MM/YYYY') + AND contrato_aditivos.cod_entidade IN (".$this->getDado('entidades').") + "; return $stSql; } diff --git a/gestaoPrestacaoContas/fontes/PHP/TCMBA/classes/mapeamento/2015/TTBAAltOrc.class.php b/gestaoPrestacaoContas/fontes/PHP/TCMBA/classes/mapeamento/2015/TTBAAltOrc.class.php index f4b7755..620d0ba 100755 --- a/gestaoPrestacaoContas/fontes/PHP/TCMBA/classes/mapeamento/2015/TTBAAltOrc.class.php +++ b/gestaoPrestacaoContas/fontes/PHP/TCMBA/classes/mapeamento/2015/TTBAAltOrc.class.php @@ -33,32 +33,15 @@ * @package URBEM * @subpackage Mapeamento - $Revision: 63389 $ - $Name$ - $Author: domluc $ - $Date: 2008-08-18 10:43:34 -0300 (Seg, 18 Ago 2008) $ + $Id: TTBAAltOrc.class.php 63819 2015-10-19 20:52:10Z michel $ * Casos de uso: uc-06.03.00 */ -/* -$Log$ -Revision 1.1 2007/10/16 01:38:47 diego -Arquivos novos - -*/ include_once '../../../../../../gestaoAdministrativa/fontes/PHP/framework/include/valida.inc.php'; -include_once ( CLA_PERSISTENTE ); +include_once CLA_PERSISTENTE; -/** - * - * Data de Criação: 15/10/2007 - - * @author Analista: Diego Barbosa Victoria - * @author Desenvolvedor: Diego Barbosa Victoria - -*/ class TTBAAltOrc extends Persistente { /** @@ -193,7 +176,7 @@ public function montaRecuperaDadosTribunal() ON vinculo_tipo_norma.cod_tipo_norma = norma.cod_tipo_norma WHERE despesa.exercicio = '".$this->getDado('exercicio')."' - AND despesa.cod_entidade IN ( ".$this->getDado('entidades')." ) + AND despesa.cod_entidade IN ( ".$this->getDado('entidades')." ) AND su.dt_suplementacao BETWEEN TO_DATE('".$this->getDado('dt_inicial')."','dd/mm/yyyy') AND TO_DATE('".$this->getDado('dt_final')."','dd/mm/yyyy') AND su.cod_tipo <> 16 @@ -209,4 +192,93 @@ public function montaRecuperaDadosTribunal() return $stSql; } +function recuperaLogErro(&$rsRecordSet, $stCondicao = "" , $stOrdem = "" , $boTransacao = "") +{ + $obErro = new Erro; + $obConexao = new Conexao; + $rsRecordSet = new RecordSet; + + $stSql = $this->montaRecuperaLogErro().$stCondicao.$stOrdem; + $this->setDebug( $stSql ); + $obErro = $obConexao->executaSQL( $rsRecordSet, $stSql, $boTransacao ); + + return $obErro; +} + +function montaRecuperaLogErro() +{ + $stSql = " SELECT count(despesa.exercicio) as registros + , count(vinculo_tipo_norma.cod_tipo) AS obrigatorio + FROM ( + SELECT exercicio + ,cod_norma + ,cod_tipo + ,dt_suplementacao + ,cod_despesa + ,SUM(vl_suplementado) AS vl_suplementado + ,SUM(vl_reducao) AS vl_reducao + FROM ( + SELECT OS.exercicio + ,OS.cod_suplementacao + ,OS.cod_norma + ,OS.cod_tipo + ,OS.dt_suplementacao + ,OSS.cod_despesa + ,OSS.valor as vl_suplementado + ,0.00 as vl_reducao + FROM orcamento.suplementacao AS OS + INNER JOIN orcamento.suplementacao_suplementada AS OSS + ON OSS.exercicio = OS.exercicio + AND OSS.cod_suplementacao = OS.cod_suplementacao + AND OS.exercicio='".$this->getDado('exercicio')."' + LEFT JOIN orcamento.suplementacao_anulada + ON suplementacao_anulada.exercicio = OS.exercicio + AND suplementacao_anulada.cod_suplementacao = OS.cod_suplementacao + WHERE suplementacao_anulada.cod_suplementacao_anulacao IS NULL + + UNION + + SELECT OS.exercicio + ,OS.cod_suplementacao + ,OS.cod_norma + ,OS.cod_tipo + ,OS.dt_suplementacao + ,OSR.cod_despesa + ,0.00 as vl_suplementado + ,OSR.valor as vl_reducao + FROM orcamento.suplementacao AS OS + INNER JOIN orcamento.suplementacao_reducao AS OSR + ON OSR.exercicio = OS.exercicio + AND OSR.cod_suplementacao = OS.cod_suplementacao + AND OS.exercicio='".$this->getDado('exercicio')."' + LEFT JOIN orcamento.suplementacao_anulada + ON suplementacao_anulada.exercicio = OS.exercicio + AND suplementacao_anulada.cod_suplementacao = OS.cod_suplementacao + WHERE suplementacao_anulada.cod_suplementacao_anulacao IS NULL + ) as tbl + GROUP BY exercicio,cod_despesa,cod_norma,cod_tipo,dt_suplementacao + ) as su + + INNER JOIN orcamento.despesa + ON despesa.exercicio = su.exercicio + AND despesa.cod_despesa = su.cod_despesa + + INNER JOIN orcamento.conta_despesa + ON conta_despesa.exercicio = despesa.exercicio + AND conta_despesa.cod_conta = despesa.cod_conta + + INNER JOIN normas.norma + ON norma.cod_norma = su.cod_norma + + LEFT JOIN tcmba.vinculo_tipo_norma + ON vinculo_tipo_norma.cod_tipo_norma = norma.cod_tipo_norma + + WHERE despesa.exercicio = '".$this->getDado('exercicio')."' + AND despesa.cod_entidade IN ( ".$this->getDado('entidades')." ) + AND su.dt_suplementacao BETWEEN TO_DATE('".$this->getDado('dt_inicial')."','dd/mm/yyyy') AND TO_DATE('".$this->getDado('dt_final')."','dd/mm/yyyy') + AND su.cod_tipo <> 16 + "; + return $stSql; +} + } diff --git a/gestaoPrestacaoContas/fontes/PHP/TCMBA/classes/mapeamento/2015/TTBACertidoesContratos.class.php b/gestaoPrestacaoContas/fontes/PHP/TCMBA/classes/mapeamento/2015/TTBACertidoesContratos.class.php index 646bc99..4893d82 100755 --- a/gestaoPrestacaoContas/fontes/PHP/TCMBA/classes/mapeamento/2015/TTBACertidoesContratos.class.php +++ b/gestaoPrestacaoContas/fontes/PHP/TCMBA/classes/mapeamento/2015/TTBACertidoesContratos.class.php @@ -33,7 +33,7 @@ * @package URBEM * @subpackage Mapeamento - $Revision: 63687 $ + $Revision: 63825 $ $Name$ $Author: domluc $ $Date: 2008-08-18 10:43:34 -0300 (Seg, 18 Ago 2008) $ @@ -83,6 +83,7 @@ public function montaRecuperaDadosTribunal() , TO_CHAR(contrato_documento.dt_emissao ,'DDMMYYYY') AS dt_emissao , TO_CHAR(contrato_documento.dt_validade,'DDMMYYYY') AS dt_validade , '".$this->getDado('competencia')."' AS competencia + , documento.nom_documento AS descricao FROM licitacao.documento @@ -100,9 +101,9 @@ public function montaRecuperaDadosTribunal() ON documento.cod_documento = contrato_documento.cod_documento INNER JOIN licitacao.contrato - ON contrato.exercicio = contrato_documento.exercicio - AND contrato.cod_entidade = contrato_documento.cod_entidade - AND contrato.num_contrato = contrato_documento.num_contrato + ON contrato.exercicio = contrato_documento.exercicio + AND contrato.cod_entidade = contrato_documento.cod_entidade + AND contrato.num_contrato = contrato_documento.num_contrato LEFT JOIN ( SELECT documento_de_para.cod_documento_tcm AS cod_tipo_tcm , documento_de_para.cod_documento @@ -122,6 +123,7 @@ public function montaRecuperaDadosTribunal() , contrato_documento.num_documento , contrato_documento.dt_emissao , contrato_documento.dt_validade + , documento.nom_documento ORDER BY contrato_documento.exercicio , contrato_documento.dt_validade @@ -129,6 +131,7 @@ public function montaRecuperaDadosTribunal() , contrato.numero_contrato , contrato_documento.num_documento , documento_de_para.cod_tipo_tcm + , documento.nom_documento "; return $stSql; diff --git a/gestaoPrestacaoContas/fontes/PHP/TCMBA/classes/mapeamento/2015/TTBACombustivel.class.php b/gestaoPrestacaoContas/fontes/PHP/TCMBA/classes/mapeamento/2015/TTBACombustivel.class.php index faf8db5..b82cb4b 100755 --- a/gestaoPrestacaoContas/fontes/PHP/TCMBA/classes/mapeamento/2015/TTBACombustivel.class.php +++ b/gestaoPrestacaoContas/fontes/PHP/TCMBA/classes/mapeamento/2015/TTBACombustivel.class.php @@ -33,7 +33,7 @@ * @package URBEM * @subpackage Mapeamento - $Revision: 63646 $ + $Revision: 64003 $ $Name$ $Author: domluc $ $Date: 2008-08-18 10:43:34 -0300 (Seg, 18 Ago 2008) $ @@ -100,6 +100,7 @@ function montaRecuperaDadosTribunal() , SUM(custo_mensal) AS custo_mensal , competencia , unidade_gestora + , cod_tipo FROM ( @@ -110,10 +111,11 @@ function montaRecuperaDadosTribunal() WHEN combustivel.cod_combustivel = 2 THEN 1 WHEN combustivel.cod_combustivel = 3 THEN 2 END AS tipo_combustivel - , SUM(COALESCE(manutencao_item.quantidade,0.00)) AS km_ltr + , COALESCE(manutencao_item.quantidade,0.00) AS km_ltr , COALESCE(manutencao_item.valor,0.00) AS custo_mensal , TO_CHAR(manutencao.dt_manutencao, 'yyyymm') AS competencia - + , item.cod_tipo + FROM frota.manutencao INNER JOIN frota.manutencao_item @@ -126,8 +128,11 @@ function montaRecuperaDadosTribunal() INNER JOIN frota.tipo_item ON tipo_item.cod_tipo = item.cod_tipo - INNER JOIN almoxarifado.catalogo_item - ON catalogo_item.cod_item = item.cod_item + INNER JOIN frota.combustivel_item + ON item.cod_item = combustivel_item.cod_item + + INNER JOIN frota.combustivel + ON combustivel.cod_combustivel = combustivel_item.cod_combustivel INNER JOIN frota.veiculo ON veiculo.cod_veiculo = manutencao.cod_veiculo @@ -141,9 +146,6 @@ function montaRecuperaDadosTribunal() LEFT JOIN frota.veiculo_combustivel ON veiculo_combustivel.cod_veiculo = veiculo.cod_veiculo - LEFT JOIN frota.combustivel - ON combustivel.cod_combustivel = veiculo_combustivel.cod_combustivel - WHERE manutencao.exercicio = '".$this->getDado('exercicio')."' AND manutencao.dt_manutencao BETWEEN TO_DATE('".$this->getDado('dt_inicial')."','dd/mm/yyyy') AND TO_DATE('".$this->getDado('dt_final')."','dd/mm/yyyy') @@ -159,19 +161,23 @@ function montaRecuperaDadosTribunal() AND bem_comprado.cod_entidade IN (2) GROUP BY veiculo_propriedade.cod_veiculo ) + AND item.cod_tipo = 1 + GROUP BY veiculo.placa , tipo_combustivel , manutencao_item.valor , manutencao.dt_manutencao + , item.cod_tipo + , manutencao_item.quantidade ) AS retorno WHERE custo_mensal > 0.00 - GROUP BY placa , tipo_registro , tipo_combustivel , competencia - , unidade_gestora "; + , unidade_gestora + , cod_tipo "; return $stSql; } diff --git a/gestaoPrestacaoContas/fontes/PHP/TCMBA/classes/mapeamento/2015/TTBAConsContRazao.class.php b/gestaoPrestacaoContas/fontes/PHP/TCMBA/classes/mapeamento/2015/TTBAConsContRazao.class.php index 0e819de..1dbcb9b 100644 --- a/gestaoPrestacaoContas/fontes/PHP/TCMBA/classes/mapeamento/2015/TTBAConsContRazao.class.php +++ b/gestaoPrestacaoContas/fontes/PHP/TCMBA/classes/mapeamento/2015/TTBAConsContRazao.class.php @@ -80,140 +80,35 @@ class TTBAConsContRazao extends Persistente , LPAD(".$this->getDado('unidade_gestora')."::VARCHAR,4,'0') AS unidade_gestora , ".$this->getDado('exercicio')."::VARCHAR||LPAD(".$this->getDado('mes')."::VARCHAR,2,'0') AS competencia , '' AS reservado_tcm - , cod_estrutural AS conta_contabil - , SUM(deb_ant) AS deb_ant - , SUM(cred_ant) AS cred_ant - , SUM(deb_mes) AS deb_mes - , SUM(cred_mes) AS cred_mes - , SUM(deb_mes_ant) AS deb_mes_ant - , SUM(cred_mes_ant) AS cred_mes_ant - , (SUM(COALESCE(deb_mes,0.00))+SUM(COALESCE(deb_mes_ant,0.00))) AS deb_ate_mes - , (SUM(COALESCE(cred_mes,0.00))+SUM(COALESCE(cred_mes_ant,0.00))) AS cred_ate_mes - , (SUM(COALESCE(deb_mes,0.00))+SUM(COALESCE(deb_mes_ant,0.00))) AS deb_exercicio - , (SUM(COALESCE(cred_mes,0.00))+SUM(COALESCE(cred_mes_ant,0.00))) AS cred_exercicio - - FROM - ( - SELECT - plano_conta.cod_estrutural - ,0.00 AS deb_ant - ,0.00 AS cred_ant - ,COALESCE(SUM(retorno_mes.saldo_debitos),0.00) AS deb_mes - ,COALESCE(SUM(retorno_mes.saldo_creditos),0.00) AS cred_mes - ,0.00 AS deb_mes_ant - ,0.00 AS cred_mes_ant - FROM - contabilidade.plano_conta - - INNER JOIN - ( - SELECT * - FROM - contabilidade.fn_rl_balancete_verificacao('".$this->getDado('exercicio')."', ' cod_entidade IN (".$this->getDado('entidades').") ', '".$this->getDado('dt_inicial')."', '".$this->getDado('dt_final')."', 'S') AS retorno - ( - cod_estrutural VARCHAR - ,nivel INTEGER - ,nom_conta VARCHAR - ,cod_sistema INTEGER - ,indicador_superavit CHAR(12) - ,saldo_anterior NUMERIC - ,saldo_debitos NUMERIC - ,saldo_creditos NUMERIC - ,saldo_atual NUMERIC - ) - ) AS retorno_mes - ON plano_conta.cod_estrutural = retorno_mes.cod_estrutural + , REPLACE(retorno.cod_estrutural, '.', '') AS conta_contabil + , ABS(retorno.deb_ex_ant) AS deb_ex_ant + , ABS(retorno.deb_mov_ant) AS deb_mov_ant + , ABS(retorno.deb_mes) AS deb_mes + , ABS(retorno.deb_mov) AS deb_mov + , ABS(retorno.cred_ex_ant) AS cred_ex_ant + , ABS(retorno.cred_mov_ant) AS cred_mov_ant + , ABS(retorno.cred_mes) AS cred_mes + , ABS(retorno.cred_mov) AS cred_mov + , ABS(retorno.deb_ex) AS deb_ex + , ABS(retorno.cred_ex) AS cred_ex + + FROM tcmba.fn_conscontrazao ('".Sessao::getExercicio()."', + '".$this->getDado('entidades')."', + '".$this->getDado('dt_inicial')."', + '".$this->getDado('dt_final')."', + '".$this->getDado('dt_final_ant')."') AS retorno + + INNER JOIN contabilidade.plano_conta + ON plano_conta.cod_estrutural = retorno.cod_estrutural AND plano_conta.exercicio = '".$this->getDado('exercicio')."' - AND plano_conta.indicador_superavit = retorno_mes.indicador_superavit - - GROUP BY plano_conta.cod_estrutural - - UNION ALL - - SELECT - plano_conta.cod_estrutural - ,0.00 AS deb_ant - ,0.00 AS cred_ant - ,0.00 AS deb_mes - ,0.00 AS cred_mes - ,COALESCE(SUM(retorno_mes_ant.saldo_debitos),0.00) AS deb_mes_ant - ,COALESCE(SUM(retorno_mes_ant.saldo_creditos),0.00) AS cred_mes_ant - FROM - contabilidade.plano_conta - - INNER JOIN - ( - SELECT - - * - - FROM - - contabilidade.fn_rl_balancete_verificacao('".$this->getDado('exercicio')."', ' cod_entidade IN (".$this->getDado('entidades').") ', '".$this->getDado('dt_inicial_ant')."', '".$this->getDado('dt_final_ant')."', 'A') AS retorno - ( - cod_estrutural VARCHAR - ,nivel INTEGER - ,nom_conta VARCHAR - ,cod_sistema INTEGER - ,indicador_superavit CHAR(12) - ,saldo_anterior NUMERIC - ,saldo_debitos NUMERIC - ,saldo_creditos NUMERIC - ,saldo_atual NUMERIC - ) - ) AS retorno_mes_ant - ON plano_conta.cod_estrutural = retorno_mes_ant.cod_estrutural - AND plano_conta.exercicio = '".$this->getDado('exercicio')."' - AND plano_conta.indicador_superavit = retorno_mes_ant.indicador_superavit - - GROUP BY plano_conta.cod_estrutural - - UNION ALL - - SELECT - plano_conta.cod_estrutural - ,COALESCE(SUM(retorno_anterior.saldo_debitos),0.00) AS deb_ant - ,COALESCE(SUM(retorno_anterior.saldo_creditos),0.00) AS cred_ant - ,0.00 AS deb_mes - ,0.00 AS cred_mes - ,0.00 AS deb_mes_ant - ,0.00 AS cred_mes_ant - FROM - contabilidade.plano_conta - - INNER JOIN - ( - SELECT - - * - - FROM - - contabilidade.fn_rl_balancete_verificacao('".$this->getDado('exercicio_ant')."', ' cod_entidade IN (".$this->getDado('entidades').") ', '01/01/".$this->getDado('exercicio_ant')."', '31/12/".$this->getDado('exercicio_ant')."', 'A') AS retorno - ( - cod_estrutural VARCHAR - ,nivel INTEGER - ,nom_conta VARCHAR - ,cod_sistema INTEGER - ,indicador_superavit CHAR(12) - ,saldo_anterior NUMERIC - ,saldo_debitos NUMERIC - ,saldo_creditos NUMERIC - ,saldo_atual NUMERIC - ) - ) AS retorno_anterior - ON plano_conta.cod_estrutural = retorno_anterior.cod_estrutural - AND plano_conta.exercicio = '".$this->getDado('exercicio')."' - AND plano_conta.indicador_superavit = retorno_anterior.indicador_superavit - - GROUP BY plano_conta.cod_estrutural - - ) AS retorno - - GROUP BY cod_estrutural - - ORDER BY cod_estrutural + + INNER JOIN contabilidade.plano_analitica + ON plano_analitica.exercicio = plano_conta.exercicio + AND plano_analitica.cod_conta = plano_conta.cod_conta + + ORDER BY retorno.cod_estrutural "; + return $stSql; } diff --git a/gestaoPrestacaoContas/fontes/PHP/TCMBA/classes/mapeamento/2015/TTBADotTermoParc.class.php b/gestaoPrestacaoContas/fontes/PHP/TCMBA/classes/mapeamento/2015/TTBADotTermoParc.class.php index 889388a..dd6d36e 100644 --- a/gestaoPrestacaoContas/fontes/PHP/TCMBA/classes/mapeamento/2015/TTBADotTermoParc.class.php +++ b/gestaoPrestacaoContas/fontes/PHP/TCMBA/classes/mapeamento/2015/TTBADotTermoParc.class.php @@ -31,7 +31,7 @@ * @author Analista: Valtair Santos * @author Desenvolvedor: Arthur Cruz - $Id $ + $Id: TTBADotTermoParc.class.php 64109 2015-12-03 15:34:08Z michel $ */ include_once '../../../../../../gestaoAdministrativa/fontes/PHP/framework/include/valida.inc.php'; @@ -41,7 +41,7 @@ class TTBADotTermoParc extends Persistente { public function __construct(){ - parent::Persistente(); + parent::Persistente(); } public function recuperaDadosDotacaoParceria(&$rsRecordSet, $stCondicao = '', $stOrdem = '', $boTransacao = '') @@ -59,63 +59,65 @@ class TTBADotTermoParc extends Persistente public function montarRecuperaDadosDotacaoParceria() { - $stSql = " SELECT 1 AS tipo_registro - , ".$this->getDado('unidade_gestora')." AS unidade_gestora - , termo_parceria_prorrogacao.nro_termo_aditivo AS num_termo - , row_number() over( ORDER BY despesa.cod_despesa ) AS num_sequencial - , despesa.cod_despesa - , despesa.num_unidade AS unidade_orcamentaria - , termo_parceria_dotacao.exercicio AS ano - , orcamento.fn_consulta_tipo_pao(despesa.exercicio, despesa.num_pao) AS tipo_projeto - , acao.num_acao AS cod_projeto - , despesa.cod_recurso AS fonte_recurso - , despesa.cod_funcao - , despesa.cod_subfuncao - , programa.num_programa AS cod_programa - , despesa.num_orgao AS cod_orgao - , TO_CHAR(termo_parceria.dt_inicio, 'YYYYMM') AS competencia - - FROM tcmba.termo_parceria_dotacao - - INNER JOIN orcamento.despesa - ON despesa.exercicio = termo_parceria_dotacao.exercicio_despesa - AND despesa.cod_despesa = termo_parceria_dotacao.cod_despesa - - INNER JOIN orcamento.conta_despesa - ON despesa.exercicio = conta_despesa.exercicio - AND despesa.cod_conta = conta_despesa.cod_conta - - INNER JOIN orcamento.pao - ON pao.exercicio = despesa.exercicio - AND pao.num_pao = despesa.num_pao - - INNER JOIN orcamento.pao_ppa_acao - ON pao_ppa_acao.exercicio = pao.exercicio - AND pao_ppa_acao.num_pao = pao.num_pao - - INNER JOIN ppa.acao - ON acao.cod_acao = pao_ppa_acao.cod_acao - - INNER JOIN ppa.programa - ON programa.cod_programa = acao.cod_programa - - INNER JOIN tcmba.termo_parceria - ON termo_parceria.exercicio = termo_parceria_dotacao.exercicio - AND termo_parceria.cod_entidade = termo_parceria_dotacao.cod_entidade - AND termo_parceria.nro_processo = termo_parceria_dotacao.nro_processo - - INNER JOIN tcmba.termo_parceria_prorrogacao - ON termo_parceria_prorrogacao.exercicio = termo_parceria.exercicio - AND termo_parceria_prorrogacao.cod_entidade = termo_parceria.cod_entidade - AND termo_parceria_prorrogacao.nro_processo = termo_parceria.nro_processo - - WHERE termo_parceria_dotacao.exercicio = '".$this->getDado('exercicio')."' - AND termo_parceria_dotacao.cod_entidade IN (".$this->getDado('entidades').") - AND termo_parceria.dt_inicio >= TO_DATE('".$this->getDado('dt_inicial')."', 'DD/MM/YYYY') - AND termo_parceria.dt_termino <= TO_DATE('".$this->getDado('dt_final')."', 'DD/MM/YYYY') - - ORDER BY despesa.cod_despesa "; - + $stSql = " + SELECT 1 AS tipo_registro + , ".$this->getDado('unidade_gestora')." AS unidade_gestora + , termo_parceria_prorrogacao.nro_termo_aditivo AS num_termo + , row_number() over( ORDER BY despesa.cod_despesa ) AS num_sequencial + , despesa.cod_despesa + , despesa.num_unidade AS unidade_orcamentaria + , termo_parceria_dotacao.exercicio AS ano + , orcamento.fn_consulta_tipo_pao(despesa.exercicio, despesa.num_pao) AS tipo_projeto + , acao.num_acao AS cod_projeto + , despesa.cod_recurso AS fonte_recurso + , despesa.cod_funcao + , despesa.cod_subfuncao + , programa.num_programa AS cod_programa + , despesa.num_orgao AS cod_orgao + , TO_CHAR(termo_parceria.dt_inicio, 'YYYYMM') AS competencia + + FROM tcmba.termo_parceria_dotacao + + INNER JOIN orcamento.despesa + ON despesa.exercicio = termo_parceria_dotacao.exercicio_despesa + AND despesa.cod_despesa = termo_parceria_dotacao.cod_despesa + + INNER JOIN orcamento.conta_despesa + ON despesa.exercicio = conta_despesa.exercicio + AND despesa.cod_conta = conta_despesa.cod_conta + + INNER JOIN orcamento.pao + ON pao.exercicio = despesa.exercicio + AND pao.num_pao = despesa.num_pao + + INNER JOIN orcamento.pao_ppa_acao + ON pao_ppa_acao.exercicio = pao.exercicio + AND pao_ppa_acao.num_pao = pao.num_pao + + INNER JOIN ppa.acao + ON acao.cod_acao = pao_ppa_acao.cod_acao + + INNER JOIN ppa.programa + ON programa.cod_programa = acao.cod_programa + + INNER JOIN tcmba.termo_parceria + ON termo_parceria.exercicio = termo_parceria_dotacao.exercicio + AND termo_parceria.cod_entidade = termo_parceria_dotacao.cod_entidade + AND termo_parceria.nro_processo = termo_parceria_dotacao.nro_processo + + INNER JOIN tcmba.termo_parceria_prorrogacao + ON termo_parceria_prorrogacao.exercicio = termo_parceria.exercicio + AND termo_parceria_prorrogacao.cod_entidade = termo_parceria.cod_entidade + AND termo_parceria_prorrogacao.nro_processo = termo_parceria.nro_processo + + WHERE termo_parceria_dotacao.exercicio = '".$this->getDado('exercicio')."' + AND termo_parceria_dotacao.cod_entidade IN (".$this->getDado('entidades').") + AND ( ( termo_parceria.dt_inicio <= TO_DATE('".$this->getDado('dt_inicial')."', 'DD/MM/YYYY') OR ( termo_parceria.dt_inicio BETWEEN TO_DATE('".$this->getDado('dt_inicial')."', 'DD/MM/YYYY') AND TO_DATE('".$this->getDado('dt_final')."', 'DD/MM/YYYY') ) )--DATA INICIO + AND ( termo_parceria.dt_termino >= TO_DATE('".$this->getDado('dt_final')."', 'DD/MM/YYYY') OR ( termo_parceria.dt_termino BETWEEN TO_DATE('".$this->getDado('dt_inicial')."', 'DD/MM/YYYY') AND TO_DATE('".$this->getDado('dt_final')."', 'DD/MM/YYYY') ) )--DATA TERMINO + ) + + ORDER BY despesa.cod_despesa "; + return $stSql; } diff --git a/gestaoPrestacaoContas/fontes/PHP/TCMBA/classes/mapeamento/2015/TTBAEditalCadastro.class.php b/gestaoPrestacaoContas/fontes/PHP/TCMBA/classes/mapeamento/2015/TTBAEditalCadastro.class.php index bf41d63..10a199a 100644 --- a/gestaoPrestacaoContas/fontes/PHP/TCMBA/classes/mapeamento/2015/TTBAEditalCadastro.class.php +++ b/gestaoPrestacaoContas/fontes/PHP/TCMBA/classes/mapeamento/2015/TTBAEditalCadastro.class.php @@ -89,7 +89,7 @@ class TTBAEditalCadastro extends Persistente WHEN modalidade.cod_modalidade = 3 AND tipo_objeto.cod_tipo_objeto = 4 THEN 22 WHEN modalidade.cod_modalidade = 3 AND tipo_objeto.cod_tipo_objeto = 3 THEN 23 END AS edital_modalidade - , licitacao.cod_processo + , LPAD(licitacao.cod_processo::VARCHAR,8,'0')||licitacao.exercicio_processo AS cod_administrativo , TO_CHAR(publicacao_edital.data_publicacao, 'DDMMYYYY') AS data_publicacao , objeto.descricao AS objeto , edital.observacao_validade_proposta AS observacao_objeto @@ -126,12 +126,13 @@ class TTBAEditalCadastro extends Persistente WHERE edital.exercicio = '".$this->getDado('stExercicio')."' AND edital.cod_entidade IN (".$this->getDado('stEntidade').") + AND modalidade.cod_modalidade NOT IN (9,8) AND edital.dt_abertura_propostas BETWEEN TO_DATE('".$this->getDado('dtInicio')."', 'DD/MM/YYYY') AND TO_DATE('".$this->getDado('dtFim')."', 'DD/MM/YYYY') GROUP BY edital.num_edital , edital_modalidade - , licitacao.cod_processo + , cod_administrativo , data_publicacao , objeto , observacao_objeto diff --git a/gestaoPrestacaoContas/fontes/PHP/TCMBA/classes/mapeamento/2015/TTBAFiscalCadastro.class.php b/gestaoPrestacaoContas/fontes/PHP/TCMBA/classes/mapeamento/2015/TTBAFiscalCadastro.class.php index 21393d8..f4ee967 100644 --- a/gestaoPrestacaoContas/fontes/PHP/TCMBA/classes/mapeamento/2015/TTBAFiscalCadastro.class.php +++ b/gestaoPrestacaoContas/fontes/PHP/TCMBA/classes/mapeamento/2015/TTBAFiscalCadastro.class.php @@ -27,7 +27,7 @@ * Extensão da Classe de mapeamento * Data de Criação: 02/10/2015 - * @author Analista: Carlos Adriano + * @author Analista: Valtair Santos * @author Desenvolvedor: Carlos Adriano * @package URBEM @@ -36,14 +36,6 @@ include_once '../../../../../../gestaoAdministrativa/fontes/PHP/framework/include/valida.inc.php'; include_once ( CLA_PERSISTENTE ); -/** - * - * Data de Criação: 02/10/2015 - - * @author Analista: Carlos Adriano - * @author Desenvolvedor: Carlos Adriano - -*/ class TTBAFiscalCadastro extends Persistente { /** @@ -86,17 +78,21 @@ public function montaRecuperaDadosTribunal() INNER JOIN sw_cgm ON sw_cgm.numcgm = obra_fiscal.numcgm + LEFT JOIN sw_cgm_pessoa_fisica ON sw_cgm_pessoa_fisica.numcgm = sw_cgm.numcgm + LEFT JOIN sw_cgm_pessoa_juridica ON sw_cgm_pessoa_juridica.numcgm = sw_cgm.numcgm WHERE obra_fiscal.exercicio = '".$this->getDado('exercicio')."' AND obra_fiscal.cod_entidade IN ( ".$this->getDado('entidades')." ) - AND obra_fiscal.data_inicio <= TO_DATE('".$this->getDado('dt_inicial')."', 'dd/mm/yyyy') - AND obra_fiscal.data_final >= TO_DATE('".$this->getDado('dt_final')."', 'dd/mm/yyyy') "; + AND TO_CHAR( obra_fiscal.data_inicio, 'MM/YYYY') <= TO_CHAR( TO_DATE('".$this->getDado('dt_final')."', 'DD/MM/YYYY'), 'MM/YYYY') + AND TO_CHAR( obra_fiscal.data_final, 'MM/YYYY') >= TO_CHAR( TO_DATE('".$this->getDado('dt_inicial')."', 'DD/MM/YYYY'), 'MM/YYYY') "; return $stSql; } -} \ No newline at end of file +} + +?> \ No newline at end of file diff --git a/gestaoPrestacaoContas/fontes/PHP/TCMBA/classes/mapeamento/2015/TTBAObrasFiscais.class.php b/gestaoPrestacaoContas/fontes/PHP/TCMBA/classes/mapeamento/2015/TTBAObrasFiscais.class.php index 2d6db10..8e9a0f7 100644 --- a/gestaoPrestacaoContas/fontes/PHP/TCMBA/classes/mapeamento/2015/TTBAObrasFiscais.class.php +++ b/gestaoPrestacaoContas/fontes/PHP/TCMBA/classes/mapeamento/2015/TTBAObrasFiscais.class.php @@ -68,9 +68,9 @@ class TTBAObrasFiscais extends Persistente function montaRecuperaObrasFiscais() { - $stSql .= " SELECT 1 AS tp_registro + $stSql .= " SELECT 1 AS tipo_registro , ".$this->getDado('unidade_gestora')." AS unidade_gestora - , cod_obra AS num_obra + , obra.nro_obra AS num_obra , responsavel.documento AS nu_cpfcnpjfiscal , obra_fiscal.matricula , obra_fiscal.registro_profissional @@ -78,6 +78,11 @@ class TTBAObrasFiscais extends Persistente , obra_fiscal.data_final , TO_CHAR(TO_DATE('".$this->getDado('dt_inicial')."','dd/mm/yyyy'), 'mmyyyy') AS competencia FROM tcmba.obra_fiscal + INNER JOIN tcmba.obra + ON obra.cod_obra = obra_fiscal.cod_obra + AND obra.cod_entidade = obra_fiscal.cod_entidade + AND obra.exercicio = obra_fiscal.exercicio + AND obra.cod_tipo = obra_fiscal.cod_tipo INNER JOIN ( SELECT numcgm , cnpj AS documento FROM public.sw_cgm_pessoa_juridica @@ -88,7 +93,7 @@ class TTBAObrasFiscais extends Persistente ) AS responsavel ON responsavel.numcgm = obra_fiscal.numcgm WHERE obra_fiscal.data_inicio BETWEEN TO_DATE('".$this->getDado('dt_inicial')."', 'dd/mm/yyyy') AND TO_DATE('".$this->getDado('dt_final')."', 'dd/mm/yyyy') - AND cod_entidade in (".$this->getDado('entidades').")"; + AND obra_fiscal.cod_entidade in (".$this->getDado('entidades').")"; return $stSql; } } diff --git a/gestaoPrestacaoContas/fontes/PHP/TCMBA/classes/mapeamento/2015/TTBAPagamento.class.php b/gestaoPrestacaoContas/fontes/PHP/TCMBA/classes/mapeamento/2015/TTBAPagamento.class.php index 92d4430..c31aeb0 100755 --- a/gestaoPrestacaoContas/fontes/PHP/TCMBA/classes/mapeamento/2015/TTBAPagamento.class.php +++ b/gestaoPrestacaoContas/fontes/PHP/TCMBA/classes/mapeamento/2015/TTBAPagamento.class.php @@ -33,166 +33,194 @@ * @package URBEM * @subpackage Mapeamento - $Revision: 63751 $ - $Name$ - $Author: domluc $ - $Date: 2008-08-18 10:43:34 -0300 (Seg, 18 Ago 2008) $ + $Id: TTBAPagamento.class.php 63980 2015-11-13 17:59:02Z lisiane $ * Casos de uso: uc-06.03.00 */ -/* -$Log$ -Revision 1.2 2007/10/07 22:31:11 diego -Corrigindo formatação e informações - -Revision 1.1 2007/07/16 02:39:13 diego -Primeira versão. - -*/ - include_once '../../../../../../gestaoAdministrativa/fontes/PHP/framework/include/valida.inc.php'; -include_once ( CLA_PERSISTENTE ); -include_once ( CAM_GF_EMP_MAPEAMENTO."TEmpenhoNotaLiquidacaoPaga.class.php" ); +include_once CLA_PERSISTENTE; +include_once CAM_GF_EMP_MAPEAMENTO.'TEmpenhoNotaLiquidacaoPaga.class.php'; class TTBAPagamento extends TEmpenhoNotaLiquidacaoPaga { -/** - * Método Construtor - * @access Private -*/ -public function __construct() -{ - parent::TEmpenhoNotaLiquidacaoPaga(); - - $this->setDado('exercicio', Sessao::getExercicio() ); -} - -public function recuperaDadosTribunal(&$rsRecordSet, $stCondicao = "" , $stOrdem = "" , $boTransacao = "") -{ - $obErro = new Erro; - $obConexao = new Conexao; - $rsRecordSet = new RecordSet; - - $stSql = $this->montaRecuperaDadosTribunal().$stCondicao.$stOrdem; - $this->setDebug( $stSql ); - $obErro = $obConexao->executaSQL( $rsRecordSet, $stSql, $boTransacao ); - - return $obErro; -} - -public function montaRecuperaDadosTribunal() -{ $stSql .= " SELECT 1 as tp_registro - , ".$this->getDado('inCodGestora')." AS unidade_gestora - , CASE WHEN restos_pre_empenho.num_orgao IS NULL THEN - des.num_orgao - ELSE - restos_pre_empenho.num_orgao - END as cod_orgao --num_orgao - , CASE WHEN restos_pre_empenho.num_unidade IS NULL THEN - des.num_unidade - ELSE - restos_pre_empenho.num_unidade - END as cod_unidade --num_unidade - , emp.cod_empenho - , to_char(pag.timestamp,'dd/mm/yyyy') as data_pagamento - , liq.exercicio_empenho as exercicio - , sum(vl_pago) AS vl_pago - , REPLACE(plc.cod_estrutural, '.', '') AS cod_estrutural - , doc.cod_tipo - , doc.num_documento - , 0 AS nu_processo - , to_char(pag.timestamp,'mmyyyy') as competencia - , CASE WHEN (emp.exercicio::INTEGER < to_char(pag.timestamp,'yyyy')::INTEGER) THEN 2 - ELSE 1 - END AS resto - FROM empenho.empenho AS emp - - INNER JOIN empenho.nota_liquidacao AS liq - ON emp.exercicio = liq.exercicio_empenho - AND emp.cod_entidade = liq.cod_entidade - AND emp.cod_empenho = liq.cod_empenho - - INNER JOIN empenho.nota_liquidacao_paga AS pag - ON liq.exercicio = pag.exercicio - AND liq.cod_entidade = pag.cod_entidade - AND liq.cod_nota = pag.cod_nota - - INNER JOIN empenho.pre_empenho AS pre - ON emp.exercicio = pre.exercicio - AND emp.cod_pre_empenho = pre.cod_pre_empenho - - INNER JOIN tesouraria.pagamento - ON pagamento.exercicio = pag.exercicio - AND pagamento.cod_entidade = pag.cod_entidade - AND pagamento.cod_nota = pag.cod_nota - AND pagamento.timestamp = pag.timestamp - - INNER JOIN empenho.nota_liquidacao_conta_pagadora as lcp - ON pag.exercicio = lcp.exercicio_liquidacao - AND pag.cod_entidade= lcp.cod_entidade - AND pag.cod_nota = lcp.cod_nota - AND pag.timestamp = lcp.timestamp - - LEFT JOIN empenho.restos_pre_empenho - ON restos_pre_empenho.cod_pre_empenho = pre.cod_pre_empenho - AND restos_pre_empenho.exercicio = pre.exercicio - - LEFT JOIN ( SELECT exercicio - , cod_entidade - , cod_nota - , timestamp - , sum(vl_anulado) as vl_anulado - FROM empenho.nota_liquidacao_paga_anulada - WHERE to_char(timestamp_anulada,'yyyy') = '".Sessao::getExercicio()."' - AND cod_entidade in ( ".$this->getDado('stEntidades')." ) - GROUP BY exercicio, cod_entidade, cod_nota, timestamp - ) as paa - ON pag.exercicio = paa.exercicio - AND pag.cod_entidade= paa.cod_entidade - AND pag.cod_nota = paa.cod_nota - AND pag.timestamp = paa.timestamp - - LEFT JOIN contabilidade.plano_analitica AS pla - ON lcp.exercicio = pla.exercicio - AND lcp.cod_plano = pla.cod_plano - - LEFT JOIN contabilidade.plano_conta as plc - ON pla.exercicio = plc.exercicio - AND pla.cod_conta = plc.cod_conta - - LEFT JOIN empenho.pre_empenho_despesa AS ped - ON pre.exercicio = ped.exercicio - AND pre.cod_pre_empenho = ped.cod_pre_empenho - - LEFT JOIN orcamento.despesa AS des - ON ped.exercicio = des.exercicio - AND ped.cod_despesa = des.cod_despesa - - LEFT JOIN tcmba.pagamento_tipo_documento_pagamento as doc - ON pagamento.exercicio = doc.exercicio - AND pagamento.cod_entidade = doc.cod_entidade - AND pagamento.cod_nota = doc.cod_nota - AND pagamento.timestamp = doc.timestamp - - WHERE pag.timestamp BETWEEN TO_DATE('".$this->getDado('dt_inicial')."' , 'dd/mm/yyyy') AND TO_DATE('".$this->getDado('dt_final')."', 'dd/mm/yyyy') - AND emp.cod_entidade in ( ".$this->getDado('stEntidades')." ) - - GROUP BY pag.timestamp - , cod_orgao - , cod_unidade - , emp.cod_empenho - , liq.exercicio_empenho - , plc.cod_estrutural - , doc.cod_tipo - , doc.num_documento - , competencia - , emp.exercicio - - ORDER BY emp.cod_empenho - , pag.timestamp - "; - return $stSql; -} + /** + * Método Construtor + * @access Private + */ + public function __construct() + { + parent::TEmpenhoNotaLiquidacaoPaga(); + + $this->setDado('exercicio', Sessao::getExercicio() ); + } + + public function recuperaDadosTribunal(&$rsRecordSet, $stCondicao = "" , $stOrdem = "" , $boTransacao = "") + { + $obErro = new Erro; + $obConexao = new Conexao; + $rsRecordSet = new RecordSet; + + $stSql = $this->montaRecuperaDadosTribunal().$stCondicao.$stOrdem; + $this->setDebug( $stSql ); + $obErro = $obConexao->executaSQL( $rsRecordSet, $stSql, $boTransacao ); + + return $obErro; + } + + public function montaRecuperaDadosTribunal() + { $stSql .= " SELECT 1 as tp_registro + , ".$this->getDado('inCodGestora')." AS unidade_gestora + , CASE WHEN restos_pre_empenho.num_orgao IS NULL THEN + des.num_orgao + ELSE + restos_pre_empenho.num_orgao + END as cod_orgao --num_orgao + , CASE WHEN restos_pre_empenho.num_unidade IS NULL THEN + des.num_unidade + ELSE + restos_pre_empenho.num_unidade + END as cod_unidade --num_unidade + , emp.cod_empenho + , to_char(pag.timestamp,'dd/mm/yyyy') as data_pagamento + , liq.exercicio_empenho as exercicio + , sum(vl_pago) AS vl_pago + , REPLACE(plc.cod_estrutural, '.', '') AS cod_estrutural + , doc.cod_tipo + , doc.num_documento + , plnlp.cod_ordem AS nu_processo + , to_char(pag.timestamp,'yyyymm') as competencia + , CASE WHEN (emp.exercicio::INTEGER < to_char(pag.timestamp,'yyyy')::INTEGER) THEN 2 + ELSE 1 + END AS resto + FROM empenho.empenho AS emp + + INNER JOIN empenho.nota_liquidacao AS liq + ON emp.exercicio = liq.exercicio_empenho + AND emp.cod_entidade = liq.cod_entidade + AND emp.cod_empenho = liq.cod_empenho + + INNER JOIN empenho.nota_liquidacao_paga AS pag + ON liq.exercicio = pag.exercicio + AND liq.cod_entidade = pag.cod_entidade + AND liq.cod_nota = pag.cod_nota + + INNER JOIN empenho.pagamento_liquidacao_nota_liquidacao_paga AS plnlp + ON plnlp.cod_entidade = pag.cod_entidade + AND plnlp.cod_nota = pag.cod_nota + AND plnlp.exercicio_liquidacao = pag.exercicio + AND plnlp.timestamp = pag.timestamp + + INNER JOIN empenho.pre_empenho AS pre + ON emp.exercicio = pre.exercicio + AND emp.cod_pre_empenho = pre.cod_pre_empenho + + INNER JOIN tesouraria.pagamento + ON pagamento.exercicio = pag.exercicio + AND pagamento.cod_entidade = pag.cod_entidade + AND pagamento.cod_nota = pag.cod_nota + AND pagamento.timestamp = pag.timestamp + + INNER JOIN empenho.nota_liquidacao_conta_pagadora as lcp + ON pag.exercicio = lcp.exercicio_liquidacao + AND pag.cod_entidade= lcp.cod_entidade + AND pag.cod_nota = lcp.cod_nota + AND pag.timestamp = lcp.timestamp + + LEFT JOIN empenho.restos_pre_empenho + ON restos_pre_empenho.cod_pre_empenho = pre.cod_pre_empenho + AND restos_pre_empenho.exercicio = pre.exercicio + + LEFT JOIN ( SELECT exercicio + , cod_entidade + , cod_nota + , timestamp + , sum(vl_anulado) as vl_anulado + FROM empenho.nota_liquidacao_paga_anulada + WHERE to_char(timestamp_anulada,'yyyy') = '".Sessao::getExercicio()."' + AND cod_entidade in ( ".$this->getDado('stEntidades')." ) + GROUP BY exercicio, cod_entidade, cod_nota, timestamp + ) as paa + ON pag.exercicio = paa.exercicio + AND pag.cod_entidade= paa.cod_entidade + AND pag.cod_nota = paa.cod_nota + AND pag.timestamp = paa.timestamp + + LEFT JOIN contabilidade.plano_analitica AS pla + ON lcp.exercicio = pla.exercicio + AND lcp.cod_plano = pla.cod_plano + + LEFT JOIN contabilidade.plano_conta as plc + ON pla.exercicio = plc.exercicio + AND pla.cod_conta = plc.cod_conta + + LEFT JOIN empenho.pre_empenho_despesa AS ped + ON pre.exercicio = ped.exercicio + AND pre.cod_pre_empenho = ped.cod_pre_empenho + + LEFT JOIN orcamento.despesa AS des + ON ped.exercicio = des.exercicio + AND ped.cod_despesa = des.cod_despesa + + LEFT JOIN tcmba.pagamento_tipo_documento_pagamento as doc + ON pagamento.exercicio = doc.exercicio + AND pagamento.cod_entidade = doc.cod_entidade + AND pagamento.cod_nota = doc.cod_nota + AND pagamento.timestamp = doc.timestamp + + WHERE pag.timestamp BETWEEN TO_DATE('".$this->getDado('dt_inicial')."' , 'dd/mm/yyyy') AND TO_DATE('".$this->getDado('dt_final')."', 'dd/mm/yyyy') + AND emp.cod_entidade in ( ".$this->getDado('stEntidades')." ) + + GROUP BY pag.timestamp + , cod_orgao + , cod_unidade + , emp.cod_empenho + , liq.exercicio_empenho + , plc.cod_estrutural + , doc.cod_tipo + , doc.num_documento + , competencia + , emp.exercicio + , plnlp.cod_ordem + + ORDER BY emp.cod_empenho + , pag.timestamp + "; + return $stSql; + } + + function recuperaLogErro(&$rsRecordSet, $stCondicao = "" , $stOrdem = "" , $boTransacao = "") + { + $obErro = new Erro; + $obConexao = new Conexao; + $rsRecordSet = new RecordSet; + + $stSql = $this->montaRecuperaLogErro().$stCondicao.$stOrdem; + $this->setDebug( $stSql ); + $obErro = $obConexao->executaSQL( $rsRecordSet, $stSql, $boTransacao ); + + return $obErro; + } + + function montaRecuperaLogErro() + { + $stSql = " SELECT count(to_char(pag.timestamp,'yyyy')) registros + , count(doc.exercicio) as obrigatorio + FROM empenho.nota_liquidacao_paga AS pag + INNER JOIN tesouraria.pagamento + ON pagamento.exercicio = pag.exercicio + AND pagamento.cod_nota = pag.cod_nota + AND pagamento.cod_entidade = pag.cod_entidade + AND pagamento.timestamp = pag.timestamp + LEFT JOIN tcmba.pagamento_tipo_documento_pagamento as doc + ON doc.cod_entidade = pagamento.cod_entidade + AND doc.exercicio = pagamento.exercicio + AND doc.timestamp = pagamento.timestamp + AND doc.cod_nota = pagamento.cod_nota + WHERE pag.timestamp BETWEEN TO_DATE('".$this->getDado('dt_inicial')."' , 'dd/mm/yyyy') AND TO_DATE('".$this->getDado('dt_final')."', 'dd/mm/yyyy') + AND pag.cod_entidade IN (".$this->getDado('stEntidades').") + "; + return $stSql; + } } diff --git a/gestaoPrestacaoContas/fontes/PHP/TCMBA/classes/mapeamento/2015/TTBAPagamentoRetencao.class.php b/gestaoPrestacaoContas/fontes/PHP/TCMBA/classes/mapeamento/2015/TTBAPagamentoRetencao.class.php index 829af99..478c474 100644 --- a/gestaoPrestacaoContas/fontes/PHP/TCMBA/classes/mapeamento/2015/TTBAPagamentoRetencao.class.php +++ b/gestaoPrestacaoContas/fontes/PHP/TCMBA/classes/mapeamento/2015/TTBAPagamentoRetencao.class.php @@ -28,7 +28,7 @@ * * @package URBEM * @subpackage Mapeamento - * @version $Id: TTBAPagamentoRetencao.class.php 63710 2015-10-01 17:30:49Z carlos.silva $ + * @version $Id: TTBAPagamentoRetencao.class.php 63992 2015-11-16 16:49:19Z lisiane $ * @author Michel Teixeira */ @@ -61,142 +61,163 @@ class TTBAPagamentoRetencao extends Persistente return $obErro; } - function montaRecuperaDadosTribunal() +function montaRecuperaDadosTribunal() { $stSql = " SELECT 1 AS tipo_registro - , opr.exercicio AS ano_criacao - , des.num_orgao AS cod_orgao - , des.num_unidade AS unidade_orcamentaria - , emp.cod_empenho AS num_empenho - , emp.cod_empenho AS num_sub_empenho - , conta_receita.descricao AS nome_conta_retencao - , REPLACE(conta_receita.cod_estrutural,'.','') AS conta_contabil - , COALESCE(SUM(vl.vl_lancamento),0.00) AS vl_pagamento_retencao - , ".$this->getDado('exercicio')."::VARCHAR||".$this->getDado('inMes')."::VARCHAR AS competencia - , to_char(nlp.timestamp,'dd/mm/yyyy') AS dt_pagamento_retencao + , empenho.exercicio , ".$this->getDado('unidade_gestora')." AS unidade_gestora - , REPLACE(plano_conta.cod_estrutural,'.','') AS conta_contabil_pagadora - , plano_conta.nom_conta AS nome_conta_pagadora - , ptdp.cod_tipo AS tipo_pagamento - , ptdp.num_documento AS detalhe_tipo_pagamento - - FROM empenho.empenho AS emp - - INNER JOIN empenho.pre_empenho AS pre - ON emp.exercicio = pre.exercicio - AND emp.cod_pre_empenho = pre.cod_pre_empenho - - INNER JOIN empenho.nota_liquidacao AS liq - ON emp.exercicio = liq.exercicio_empenho - AND emp.cod_entidade = liq.cod_entidade - AND emp.cod_empenho = liq.cod_empenho - - INNER JOIN empenho.pagamento_liquidacao AS pli - ON liq.exercicio = pli.exercicio - AND liq.cod_entidade = pli.cod_entidade - AND liq.cod_nota = pli.cod_nota - - INNER JOIN empenho.pagamento_liquidacao_nota_liquidacao_paga AS plnlp - ON plnlp.exercicio = pli.exercicio - AND plnlp.cod_entidade = pli.cod_entidade - AND plnlp.cod_ordem = pli.cod_ordem - AND plnlp.exercicio_liquidacao = pli.exercicio_liquidacao - AND plnlp.cod_nota = pli.cod_nota - - INNER JOIN empenho.nota_liquidacao_paga AS nlp - ON plnlp.cod_nota = nlp.cod_nota - AND plnlp.cod_entidade = nlp.cod_entidade - AND plnlp.exercicio = nlp.exercicio - AND plnlp.timestamp = nlp.timestamp - - INNER JOIN empenho.ordem_pagamento AS opa - ON pli.exercicio = opa.exercicio - AND pli.cod_entidade = opa.cod_entidade - AND pli.cod_ordem = opa.cod_ordem - - INNER JOIN empenho.ordem_pagamento_retencao AS opr - ON opa.exercicio = opr.exercicio - AND opa.cod_entidade = opr.cod_entidade - AND opa.cod_ordem = opr.cod_ordem - - INNER JOIN contabilidade.lancamento_retencao AS lr - ON lr.exercicio = opr.exercicio - AND lr.cod_entidade = opr.cod_entidade - AND lr.cod_ordem = opr.cod_ordem - AND lr.cod_plano = opr.cod_plano - AND lr.sequencial = opr.sequencial - - INNER JOIN contabilidade.lancamento AS l - ON l.exercicio = lr.exercicio - AND l.cod_entidade = lr.cod_entidade - AND l.tipo = lr.tipo - AND l.cod_lote = lr.cod_lote - AND l.sequencia = lr.sequencia - - INNER JOIN contabilidade.valor_lancamento AS vl - ON l.exercicio = vl.exercicio - AND l.cod_entidade = vl.cod_entidade - AND l.cod_lote = vl.cod_lote - AND l.tipo = vl.tipo - AND l.sequencia = vl.sequencia - AND vl.tipo_valor = 'D' - - INNER JOIN empenho.pre_empenho_despesa AS ped - ON pre.exercicio = ped.exercicio - AND pre.cod_pre_empenho = ped.cod_pre_empenho + , despesa.num_orgao AS cod_orgao + , despesa.num_unidade AS unidade_orcamentaria + , empenho.cod_empenho AS num_empenho + , empenho.cod_empenho AS num_sub_empenho + , REPLACE(pc.cod_estrutural,'.','') AS conta_contabil + , opr.cod_ordem + , TO_CHAR(nlp.timestamp,'yyyymm') AS competencia + , opr.vl_retencao as vl_total_retencao + , TO_CHAR(nlp.timestamp,'dd/mm/yyyy') AS dt_pagamento + , REPLACE(conta.cod_estrutural,'.','') AS conta_pagadora + , pagamento_tipo_documento_pagamento.cod_tipo AS tipo_pagamento + , pagamento_tipo_documento_pagamento.num_documento AS detalhe_tipo_pagamento + ,(coalesce(sum(nlp.vl_pago),0.00) - coalesce(sum(nlpa.vl_anulado),0.00)) as vl_pagamento_retencao + FROM empenho.ordem_pagamento_retencao as OPR + JOIN contabilidade.plano_analitica as PA + ON pa.cod_plano = opr.cod_plano + AND pa.exercicio = opr.exercicio + JOIN contabilidade.plano_conta as PC + ON pa.cod_conta = pc.cod_conta + AND pa.exercicio = pc.exercicio + INNER JOIN empenho.pagamento_liquidacao as pl + ON OPR.exercicio = pl.exercicio_liquidacao + AND OPR.cod_entidade = pl.cod_entidade + AND OPR.cod_ordem = pl.cod_ordem + INNER JOIN empenho.nota_liquidacao as nl + ON nl.exercicio = pl.exercicio_liquidacao + AND nl.cod_entidade = pl.cod_entidade + AND nl.cod_nota = pl.cod_nota + INNER JOIN empenho.pagamento_liquidacao_nota_liquidacao_paga as plnlp + ON plnlp.exercicio = pl.exercicio + AND plnlp.cod_entidade = pl.cod_entidade + AND plnlp.cod_ordem = pl.cod_ordem + AND plnlp.exercicio_liquidacao = pl.exercicio_liquidacao + AND plnlp.cod_nota = pl.cod_nota + AND plnlp.timestamp = (SELECT max(timestamp) FROM empenho.pagamento_liquidacao_nota_liquidacao_paga + WHERE pagamento_liquidacao_nota_liquidacao_paga.exercicio = plnlp.exercicio + AND pagamento_liquidacao_nota_liquidacao_paga.cod_entidade = plnlp.cod_entidade + AND pagamento_liquidacao_nota_liquidacao_paga.cod_ordem = plnlp.cod_ordem + AND pagamento_liquidacao_nota_liquidacao_paga.exercicio_liquidacao = plnlp.exercicio_liquidacao + AND pagamento_liquidacao_nota_liquidacao_paga.cod_nota = plnlp.cod_nota ) + INNER JOIN empenho.nota_liquidacao_paga as nlp + ON nlp.exercicio = plnlp.exercicio_liquidacao + AND nlp.cod_entidade = plnlp.cod_entidade + AND nlp.cod_nota = plnlp.cod_nota + AND nlp.timestamp = plnlp.timestamp + LEFT JOIN ( SELECT exercicio + , cod_entidade + , cod_nota + , timestamp + , coalesce(sum(vl_anulado),0.00) as vl_anulado + FROM empenho.nota_liquidacao_paga_anulada + GROUP BY exercicio, cod_entidade, cod_nota, timestamp + ) AS nlpa + ON nlpa.exercicio = nlp.exercicio + AND nlpa.cod_entidade = nlp.cod_entidade + AND nlpa.cod_nota = nlp.cod_nota + AND nlpa.timestamp = nlp.timestamp + INNER JOIN empenho.nota_liquidacao_conta_pagadora AS nlcp + ON nlcp.exercicio_liquidacao = nlp.exercicio + AND nlcp.cod_entidade = nlp.cod_entidade + AND nlcp.cod_nota = nlp.cod_nota + AND nlcp.timestamp = nlp.timestamp + INNER JOIN ( SELECT pa.exercicio + , pa.cod_plano + , pc.nom_conta + , rec.cod_recurso + , rec.nom_recurso + , pc.cod_estrutural + FROM contabilidade.plano_analitica as pa + , contabilidade.plano_conta as pc + , contabilidade.plano_recurso as pr + , orcamento.recurso as rec + WHERE pa.cod_conta = pc.cod_conta + AND pa.exercicio = pc.exercicio + AND pa.cod_plano = pr.cod_plano + AND pa.exercicio = pr.exercicio + AND pr.cod_recurso = rec.cod_recurso + AND pr.exercicio = rec.exercicio + ) AS conta + ON conta.cod_plano = nlcp.cod_plano + AND conta.exercicio = nlcp.exercicio + INNER JOIN empenho.empenho + ON empenho.exercicio = nl.exercicio_empenho + AND empenho.cod_entidade = nl.cod_entidade + AND empenho.cod_empenho = nl.cod_empenho + LEFT JOIN tcmba.pagamento_tipo_documento_pagamento + ON pagamento_tipo_documento_pagamento.cod_entidade = nlp.cod_entidade + AND pagamento_tipo_documento_pagamento.exercicio = nlp.exercicio + AND pagamento_tipo_documento_pagamento.timestamp = nlp.timestamp + AND pagamento_tipo_documento_pagamento.cod_nota = nlp.cod_nota + INNER JOIN empenho.pre_empenho + ON empenho.exercicio = pre_empenho.exercicio + AND empenho.cod_pre_empenho = pre_empenho.cod_pre_empenho + INNER JOIN empenho.pre_empenho_despesa + ON pre_empenho.exercicio = pre_empenho_despesa.exercicio + AND pre_empenho.cod_pre_empenho = pre_empenho_despesa.cod_pre_empenho + INNER JOIN orcamento.despesa + ON despesa.exercicio = pre_empenho_despesa.exercicio + AND despesa.cod_despesa = pre_empenho_despesa.cod_despesa + WHERE opr.exercicio = '".$this->getDado('exercicio')."' + AND opr.cod_entidade IN (".$this->getDado('entidades').") + AND to_date(to_char(nlp.timestamp,'dd/mm/yyyy'),'dd/mm/yyyy') BETWEEN TO_DATE('".$this->getDado('data_inicial')."', 'dd/mm/yyyy') + AND TO_DATE('".$this->getDado('data_final')."', 'dd/mm/yyyy') + GROUP BY empenho.exercicio + , despesa.num_orgao + , despesa.num_unidade + , empenho.cod_empenho + , empenho.cod_empenho + , pc.cod_estrutural + , opr.cod_ordem + , nlp.timestamp + , opr.vl_retencao + , conta.cod_estrutural + , pagamento_tipo_documento_pagamento.cod_tipo + , pagamento_tipo_documento_pagamento.num_documento + "; + + return $stSql; + } - INNER JOIN orcamento.despesa AS des - ON des.exercicio = ped.exercicio - AND des.cod_despesa = ped.cod_despesa + function recuperaLogErro(&$rsRecordSet, $stCondicao = "" , $stOrdem = "" , $boTransacao = "") + { + $obErro = new Erro; + $obConexao = new Conexao; + $rsRecordSet = new RecordSet; - INNER JOIN orcamento.receita - ON receita.exercicio = opr.exercicio - AND receita.cod_receita = opr.cod_receita + $stSql = $this->montaRecuperaLogErro().$stCondicao.$stOrdem; + $this->setDebug( $stSql ); + $obErro = $obConexao->executaSQL( $rsRecordSet, $stSql, $boTransacao ); - INNER JOIN orcamento.conta_receita - ON receita.exercicio = conta_receita.exercicio - AND receita.cod_conta = conta_receita.cod_conta + return $obErro; + } + function montaRecuperaLogErro() + { + $stSql = " SELECT count(to_char(nlp.timestamp,'yyyy')) registros + , count(ptdp.exercicio) as obrigatorio + FROM empenho.nota_liquidacao_paga AS nlp INNER JOIN tesouraria.pagamento - ON pagamento.exercicio = nlp.exercicio - AND pagamento.cod_nota = nlp.cod_nota + ON pagamento.exercicio = nlp.exercicio + AND pagamento.cod_nota = nlp.cod_nota AND pagamento.cod_entidade = nlp.cod_entidade - AND pagamento.timestamp = nlp.timestamp - - INNER JOIN contabilidade.plano_analitica - ON pagamento.exercicio_plano = plano_analitica.exercicio - AND pagamento.cod_plano = plano_analitica.cod_plano - - INNER JOIN contabilidade.plano_conta - ON plano_conta.exercicio = plano_analitica.exercicio - AND plano_conta.cod_conta = plano_analitica.cod_conta - + AND pagamento.timestamp = nlp.timestamp LEFT JOIN tcmba.pagamento_tipo_documento_pagamento AS ptdp ON ptdp.cod_entidade = pagamento.cod_entidade AND ptdp.exercicio = pagamento.exercicio AND ptdp.timestamp = pagamento.timestamp AND ptdp.cod_nota = pagamento.cod_nota - WHERE to_char(nlp.timestamp,'yyyy') = '".$this->getDado('exercicio')."' AND to_date(to_char(nlp.timestamp,'dd/mm/yyyy'),'dd/mm/yyyy') BETWEEN TO_DATE('".$this->getDado('dt_inicial')."','dd/mm/yyyy') AND TO_DATE('".$this->getDado('dt_final')."','dd/mm/yyyy') - AND liq.cod_entidade IN (".$this->getDado('stEntidades').") - - GROUP BY tipo_registro - , opr.exercicio - , des.num_orgao - , des.num_unidade - , emp.cod_empenho - , conta_receita.descricao - , conta_receita.cod_estrutural - , to_char(nlp.timestamp,'dd/mm/yyyy') - , plano_conta.cod_estrutural - , plano_conta.nom_conta - , ptdp.cod_tipo - , ptdp.num_documento - - ORDER BY num_empenho - , dt_pagamento_retencao - "; + AND nlp.cod_entidade IN (".$this->getDado('stEntidades').") + "; return $stSql; } diff --git a/gestaoPrestacaoContas/fontes/PHP/TCMBA/classes/mapeamento/2015/TTBAPagamentoRetencaoEmpresa.class.php b/gestaoPrestacaoContas/fontes/PHP/TCMBA/classes/mapeamento/2015/TTBAPagamentoRetencaoEmpresa.class.php index 60ac7b0..a6110a8 100644 --- a/gestaoPrestacaoContas/fontes/PHP/TCMBA/classes/mapeamento/2015/TTBAPagamentoRetencaoEmpresa.class.php +++ b/gestaoPrestacaoContas/fontes/PHP/TCMBA/classes/mapeamento/2015/TTBAPagamentoRetencaoEmpresa.class.php @@ -33,10 +33,7 @@ * @package URBEM * @subpackage Mapeamento - $Revision: $ - $Name$ - $Author: $ - $Date: $ + $Id: TTBAPagamentoRetencaoEmpresa.class.php 63896 2015-11-03 19:03:23Z michel $ */ include_once '../../../../../../gestaoAdministrativa/fontes/PHP/framework/include/valida.inc.php'; @@ -69,141 +66,60 @@ class TTBAPagamentoRetencaoEmpresa extends Persistente public function montaRecuperaDadosTribunal() { $stSql = " SELECT 1 AS tipo_registro - , pagamento_liquidacao.cod_ordem AS num_pagamento - , ordem_pagamento_retencao.exercicio AS ano_criacao + , pagamento.cod_ordem AS num_pagamento + , pagamento.exercicio_ordem AS ano_criacao , despesa.num_orgao AS cod_orgao , despesa.num_unidade AS unidade_orcamentaria - , empenho.cod_empenho AS num_empenho - , empenho.cod_empenho AS num_sub_empenho - , conta_receita.descricao AS nome_conta_retencao - , REPLACE(conta_receita.cod_estrutural,'.','') AS conta_contabil - , COALESCE(SUM(valor_lancamento.vl_lancamento),0.00) AS vl_pagamento_retencao + , pagamento.cod_empenho AS num_empenho + , pagamento.cod_empenho AS num_sub_empenho + , pagamento.nom_conta_retencao AS nome_conta_retencao + , REPLACE(pagamento.cod_estrutural_retencao,'.','') AS conta_contabil + , COALESCE(SUM(pagamento.vl_pago_retencao),0.00) AS vl_pagamento_retencao , ".$this->getDado('stExercicio').$this->getDado('inMes')." AS competencia - , to_char(nota_liquidacao_paga.timestamp,'dd/mm/yyyy') AS dt_pagamento_retencao + , to_char(pagamento.timestamp_pagamento,'dd/mm/yyyy') AS dt_pagamento_retencao , ".$this->getDado('inCodGestora')." AS unidade_gestora - , REPLACE(plano_conta.cod_estrutural,'.','') AS conta_contabil_pagadora - , plano_conta.nom_conta AS nome_conta_pagadora + , REPLACE(pagamento.cod_estrutural_plano_pagamento,'.','') AS conta_contabil_pagadora + , pagamento.nom_conta_plano_pagamento AS nome_conta_pagadora , pagamento_tipo_documento_pagamento.cod_tipo AS tipo_pagamento , pagamento_tipo_documento_pagamento.num_documento AS detalhe_tipo_pagamento - FROM empenho.empenho - - INNER JOIN empenho.pre_empenho - ON empenho.exercicio = pre_empenho.exercicio - AND empenho.cod_pre_empenho = pre_empenho.cod_pre_empenho - - INNER JOIN empenho.nota_liquidacao - ON empenho.exercicio = nota_liquidacao.exercicio_empenho - AND empenho.cod_entidade = nota_liquidacao.cod_entidade - AND empenho.cod_empenho = nota_liquidacao.cod_empenho - - INNER JOIN empenho.pagamento_liquidacao - ON nota_liquidacao.exercicio = pagamento_liquidacao.exercicio - AND nota_liquidacao.cod_entidade = pagamento_liquidacao.cod_entidade - AND nota_liquidacao.cod_nota = pagamento_liquidacao.cod_nota - - INNER JOIN empenho.pagamento_liquidacao_nota_liquidacao_paga - ON pagamento_liquidacao_nota_liquidacao_paga.exercicio = pagamento_liquidacao.exercicio - AND pagamento_liquidacao_nota_liquidacao_paga.cod_entidade = pagamento_liquidacao.cod_entidade - AND pagamento_liquidacao_nota_liquidacao_paga.cod_ordem = pagamento_liquidacao.cod_ordem - AND pagamento_liquidacao_nota_liquidacao_paga.exercicio_liquidacao = pagamento_liquidacao.exercicio_liquidacao - AND pagamento_liquidacao_nota_liquidacao_paga.cod_nota = pagamento_liquidacao.cod_nota - - INNER JOIN empenho.nota_liquidacao_paga - ON pagamento_liquidacao_nota_liquidacao_paga.cod_nota = nota_liquidacao_paga.cod_nota - AND pagamento_liquidacao_nota_liquidacao_paga.cod_entidade = nota_liquidacao_paga.cod_entidade - AND pagamento_liquidacao_nota_liquidacao_paga.exercicio = nota_liquidacao_paga.exercicio - AND pagamento_liquidacao_nota_liquidacao_paga.timestamp = nota_liquidacao_paga.timestamp - - INNER JOIN empenho.ordem_pagamento - ON pagamento_liquidacao.exercicio = ordem_pagamento.exercicio - AND pagamento_liquidacao.cod_entidade = ordem_pagamento.cod_entidade - AND pagamento_liquidacao.cod_ordem = ordem_pagamento.cod_ordem - - INNER JOIN empenho.ordem_pagamento_retencao - ON ordem_pagamento.exercicio = ordem_pagamento_retencao.exercicio - AND ordem_pagamento.cod_entidade = ordem_pagamento_retencao.cod_entidade - AND ordem_pagamento.cod_ordem = ordem_pagamento_retencao.cod_ordem - - INNER JOIN contabilidade.lancamento_retencao - ON lancamento_retencao.exercicio = ordem_pagamento_retencao.exercicio - AND lancamento_retencao.cod_entidade = ordem_pagamento_retencao.cod_entidade - AND lancamento_retencao.cod_ordem = ordem_pagamento_retencao.cod_ordem - AND lancamento_retencao.cod_plano = ordem_pagamento_retencao.cod_plano - AND lancamento_retencao.sequencial = ordem_pagamento_retencao.sequencial - - INNER JOIN contabilidade.lancamento - ON lancamento.exercicio = lancamento_retencao.exercicio - AND lancamento.cod_entidade = lancamento_retencao.cod_entidade - AND lancamento.tipo = lancamento_retencao.tipo - AND lancamento.cod_lote = lancamento_retencao.cod_lote - AND lancamento.sequencia = lancamento_retencao.sequencia - - INNER JOIN contabilidade.valor_lancamento - ON lancamento.exercicio = valor_lancamento.exercicio - AND lancamento.cod_entidade = valor_lancamento.cod_entidade - AND lancamento.cod_lote = valor_lancamento.cod_lote - AND lancamento.tipo = valor_lancamento.tipo - AND lancamento.sequencia = valor_lancamento.sequencia - AND valor_lancamento.tipo_valor = 'D' + FROM empenho.fn_relatorio_pagamento_ordem_nota_empenho('".$this->getDado('stExercicio')."','".$this->getDado('stEntidade')."','',0,'',0,'',0,TRUE,TRUE) AS pagamento INNER JOIN empenho.pre_empenho_despesa - ON pre_empenho.exercicio = pre_empenho_despesa.exercicio - AND pre_empenho.cod_pre_empenho = pre_empenho_despesa.cod_pre_empenho + ON pagamento.exercicio_empenho = pre_empenho_despesa.exercicio + AND pagamento.cod_pre_empenho = pre_empenho_despesa.cod_pre_empenho INNER JOIN orcamento.despesa ON despesa.exercicio = pre_empenho_despesa.exercicio AND despesa.cod_despesa = pre_empenho_despesa.cod_despesa - INNER JOIN orcamento.receita - ON receita.exercicio = ordem_pagamento_retencao.exercicio - AND receita.cod_receita = ordem_pagamento_retencao.cod_receita - - INNER JOIN orcamento.conta_receita - ON receita.exercicio = conta_receita.exercicio - AND receita.cod_conta = conta_receita.cod_conta - - INNER JOIN tesouraria.pagamento - ON pagamento.exercicio = nota_liquidacao_paga.exercicio - AND pagamento.cod_nota = nota_liquidacao_paga.cod_nota - AND pagamento.cod_entidade = nota_liquidacao_paga.cod_entidade - AND pagamento.timestamp = nota_liquidacao_paga.timestamp - - INNER JOIN contabilidade.plano_analitica - ON pagamento.exercicio_plano = plano_analitica.exercicio - AND pagamento.cod_plano = plano_analitica.cod_plano - - INNER JOIN contabilidade.plano_conta - ON plano_conta.exercicio = plano_analitica.exercicio - AND plano_conta.cod_conta = plano_analitica.cod_conta + INNER JOIN orcamento.conta_despesa + ON conta_despesa.cod_conta = pre_empenho_despesa.cod_conta + AND conta_despesa.exercicio = pre_empenho_despesa.exercicio + AND conta_despesa.cod_estrutural NOT LIKE ('3.1.%') LEFT JOIN tcmba.pagamento_tipo_documento_pagamento ON pagamento_tipo_documento_pagamento.cod_entidade = pagamento.cod_entidade AND pagamento_tipo_documento_pagamento.exercicio = pagamento.exercicio - AND pagamento_tipo_documento_pagamento.timestamp = pagamento.timestamp + AND pagamento_tipo_documento_pagamento.timestamp = pagamento.timestamp_pagamento AND pagamento_tipo_documento_pagamento.cod_nota = pagamento.cod_nota - - INNER JOIN orcamento.conta_despesa - ON conta_despesa.cod_conta = pre_empenho_despesa.cod_conta - AND conta_despesa.exercicio = pre_empenho_despesa.exercicio - WHERE to_char(nota_liquidacao_paga.timestamp,'yyyy') = '".$this->getDado('stExercicio')."' - AND to_date(to_char(nota_liquidacao_paga.timestamp,'dd/mm/yyyy'),'dd/mm/yyyy') BETWEEN TO_DATE('".$this->getDado('dtInicio')."','dd/mm/yyyy') - AND TO_DATE('".$this->getDado('dtFim')."','dd/mm/yyyy') - AND nota_liquidacao.cod_entidade IN (".$this->getDado('stEntidade').") - AND conta_despesa.cod_estrutural NOT LIKE ('3.1.%') + WHERE to_date(to_char(pagamento.timestamp_pagamento,'dd/mm/yyyy'),'dd/mm/yyyy') BETWEEN TO_DATE('".$this->getDado('dtInicio')."','dd/mm/yyyy') + AND TO_DATE('".$this->getDado('dtFim')."','dd/mm/yyyy') + AND pagamento.cod_estrutural_plano_pagamento ILIKE '1.1.1.1.1.01%' GROUP BY tipo_registro , num_pagamento - , ordem_pagamento_retencao.exercicio + , pagamento.exercicio_ordem + , pagamento.exercicio , despesa.num_orgao , despesa.num_unidade - , empenho.cod_empenho - , conta_receita.descricao - , conta_receita.cod_estrutural + , pagamento.cod_empenho + , pagamento.nom_conta_retencao + , pagamento.cod_estrutural_retencao , dt_pagamento_retencao - , plano_conta.cod_estrutural - , plano_conta.nom_conta + , pagamento.cod_estrutural_plano_pagamento + , pagamento.nom_conta_plano_pagamento , pagamento_tipo_documento_pagamento.cod_tipo , pagamento_tipo_documento_pagamento.num_documento @@ -212,6 +128,39 @@ class TTBAPagamentoRetencaoEmpresa extends Persistente return $stSql; } + function recuperaLogErro(&$rsRecordSet, $stCondicao = "" , $stOrdem = "" , $boTransacao = "") + { + $obErro = new Erro; + $obConexao = new Conexao; + $rsRecordSet = new RecordSet; + + $stSql = $this->montaRecuperaLogErro().$stCondicao.$stOrdem; + $this->setDebug( $stSql ); + $obErro = $obConexao->executaSQL( $rsRecordSet, $stSql, $boTransacao ); + + return $obErro; + } + + function montaRecuperaLogErro() + { + $stSql = " SELECT count(to_char(pagamento.timestamp_pagamento,'yyyy')) registros + , count(pagamento_tipo_documento_pagamento.exercicio) as obrigatorio + + FROM empenho.fn_relatorio_pagamento_ordem_nota_empenho('".$this->getDado('stExercicio')."','".$this->getDado('stEntidade')."','',0,'',0,'',0,TRUE,TRUE) AS pagamento + + LEFT JOIN tcmba.pagamento_tipo_documento_pagamento + ON pagamento_tipo_documento_pagamento.cod_entidade = pagamento.cod_entidade + AND pagamento_tipo_documento_pagamento.exercicio = pagamento.exercicio + AND pagamento_tipo_documento_pagamento.timestamp = pagamento.timestamp_pagamento + AND pagamento_tipo_documento_pagamento.cod_nota = pagamento.cod_nota + + WHERE to_date(to_char(pagamento.timestamp_pagamento,'dd/mm/yyyy'),'dd/mm/yyyy') BETWEEN TO_DATE('".$this->getDado('dtInicio')."','dd/mm/yyyy') + AND TO_DATE('".$this->getDado('dtFim')."','dd/mm/yyyy') + AND pagamento.cod_estrutural_plano_pagamento ILIKE '1.1.1.1.1.01%' + "; + return $stSql; + } + public function __destruct() {} } diff --git a/gestaoPrestacaoContas/fontes/PHP/TCMBA/classes/mapeamento/2015/TTBAResCont.class.php b/gestaoPrestacaoContas/fontes/PHP/TCMBA/classes/mapeamento/2015/TTBAResCont.class.php index f22c62a..7fec22e 100644 --- a/gestaoPrestacaoContas/fontes/PHP/TCMBA/classes/mapeamento/2015/TTBAResCont.class.php +++ b/gestaoPrestacaoContas/fontes/PHP/TCMBA/classes/mapeamento/2015/TTBAResCont.class.php @@ -79,7 +79,7 @@ class TTBAResCont extends Persistente { $stSql .= " SELECT 1 AS tipo_registro , ".$this->getDado('unidade_gestora')." AS unidade_gestora - , contrato.num_contrato + , contrato.numero_contrato AS num_contrato , rescisao_contrato.num_rescisao , SUBSTR(TRIM(rescisao_contrato.motivo), 1, 50) AS motivo_rescisao , TO_CHAR(rescisao_contrato.dt_rescisao, 'dd/mm/yyyy') AS dt_rescisao @@ -103,7 +103,7 @@ class TTBAResCont extends Persistente AND contrato.cod_entidade = rescisao_contrato.cod_entidade AND contrato.num_contrato = rescisao_contrato.num_contrato - LEFT JOIN licitacao.publicacao_rescisao_contrato + INNER JOIN licitacao.publicacao_rescisao_contrato ON rescisao_contrato.num_contrato = publicacao_rescisao_contrato.num_contrato AND rescisao_contrato.exercicio_contrato = publicacao_rescisao_contrato.exercicio_contrato AND rescisao_contrato.cod_entidade = publicacao_rescisao_contrato.cod_entidade diff --git a/gestaoPrestacaoContas/fontes/PHP/TCMBA/classes/mapeamento/2015/TTBARetencao.class.php b/gestaoPrestacaoContas/fontes/PHP/TCMBA/classes/mapeamento/2015/TTBARetencao.class.php index c574201..1033ce4 100755 --- a/gestaoPrestacaoContas/fontes/PHP/TCMBA/classes/mapeamento/2015/TTBARetencao.class.php +++ b/gestaoPrestacaoContas/fontes/PHP/TCMBA/classes/mapeamento/2015/TTBARetencao.class.php @@ -33,7 +33,7 @@ * @package URBEM * @subpackage Mapeamento - $Revision: 63720 $ + $Revision: 63882 $ $Name$ $Author: domluc $ $Date: 2008-08-18 10:43:34 -0300 (Seg, 18 Ago 2008) $ @@ -139,7 +139,10 @@ function montaRecuperaDadosTribunal() INNER JOIN empenho.nota_liquidacao_paga ON nota_liquidacao.exercicio = nota_liquidacao_paga.exercicio AND nota_liquidacao.cod_entidade = nota_liquidacao_paga.cod_entidade - AND nota_liquidacao.cod_nota = nota_liquidacao_paga.cod_nota + AND nota_liquidacao.cod_nota = nota_liquidacao_paga.cod_nota + +-- Ao retirar esta linha os registros bem duplicados porque são lançados 2 na nota_liquidacao_paga. O registro de pagamento e o de retenção, assim para trazer apenas um registro de retenção é necessário igualar a retenção ao valor da nota_liquidacao + AND nota_liquidacao_paga.vl_pago = ordem_pagamento_retencao.vl_retencao INNER JOIN empenho.pre_empenho_despesa ON pre_empenho.exercicio = pre_empenho_despesa.exercicio diff --git a/gestaoPrestacaoContas/fontes/PHP/TCMBA/classes/mapeamento/2015/TTCMBACadastroObra.class.php b/gestaoPrestacaoContas/fontes/PHP/TCMBA/classes/mapeamento/2015/TTCMBACadastroObra.class.php index e9d720e..211dfb6 100644 --- a/gestaoPrestacaoContas/fontes/PHP/TCMBA/classes/mapeamento/2015/TTCMBACadastroObra.class.php +++ b/gestaoPrestacaoContas/fontes/PHP/TCMBA/classes/mapeamento/2015/TTCMBACadastroObra.class.php @@ -72,10 +72,10 @@ class TTCMBACadastroObra extends Persistente , obra_andamento.cod_situacao as situacao_obra , obra.vl_obra , CASE WHEN obra.cod_modalidade = 8 THEN - licitacao.cod_processo + licitacao.exercicio||LPAD(licitacao.cod_entidade::VARCHAR,2,'0')||LPAD(licitacao.cod_modalidade::VARCHAR,2,'0')||LPAD(licitacao.cod_licitacao::VARCHAR,4,'0') END as processo_dispensa , CASE WHEN obra.cod_modalidade != 8 THEN - licitacao.cod_processo + licitacao.exercicio||LPAD(licitacao.cod_entidade::VARCHAR,2,'0')||LPAD(licitacao.cod_modalidade::VARCHAR,2,'0')||LPAD(licitacao.cod_licitacao::VARCHAR,4,'0') END as processo_licitatorio , '' as reservado_tcm , CASE WHEN obra_andamento.cod_situacao IN(2,3) THEN @@ -92,7 +92,7 @@ class TTCMBACadastroObra extends Persistente , obra.local , obra.cep , sw_bairro.nom_bairro - , obra.cod_funcao + , tipo_funcao_obra.nro_funcao , obra.cod_tipo , obra_medicao.cod_medida , obra_medicao.vl_medicao::NUMERIC(14,3) as vl_medicao @@ -132,6 +132,10 @@ class TTCMBACadastroObra extends Persistente AND licitacao.cod_modalidade = obra.cod_modalidade AND licitacao.cod_entidade = obra.cod_entidade AND licitacao.exercicio = obra.exercicio + + INNER JOIN tcmba.tipo_funcao_obra + ON tipo_funcao_obra.cod_funcao= obra.cod_funcao + WHERE obra.data_inicio <= TO_DATE('".$this->getDado('data_final')."','dd/mm/yyyy') AND obra.data_recebimento >= TO_DATE('".$this->getDado('data_inicial')."','dd/mm/yyyy') diff --git a/gestaoPrestacaoContas/fontes/PHP/TCMBA/classes/mapeamento/2015/TTCMBAContrataMdo.class.php b/gestaoPrestacaoContas/fontes/PHP/TCMBA/classes/mapeamento/2015/TTCMBAContrataMdo.class.php index 943be06..637d2f2 100644 --- a/gestaoPrestacaoContas/fontes/PHP/TCMBA/classes/mapeamento/2015/TTCMBAContrataMdo.class.php +++ b/gestaoPrestacaoContas/fontes/PHP/TCMBA/classes/mapeamento/2015/TTCMBAContrataMdo.class.php @@ -65,7 +65,7 @@ class TTCMBAContrataMdo extends Persistente , '".$this->getDado('unidade_gestora')."' as unidade_gestora , contratado.cpf AS cpf_contratado , contratado.nom_cgm AS nom_contratado - , obra_contratos.cod_tipo AS tipo_contratacao + , obra_contratos.cod_contratacao AS tipo_contratacao , obra_contratos.nro_instrumento AS num_instrumento , obra_contratos.nro_contrato AS num_contrato , obra_contratos.nro_convenio AS num_convenio diff --git a/gestaoPrestacaoContas/fontes/PHP/TCMBA/classes/mapeamento/2015/TTCMBAContrato2.class.php b/gestaoPrestacaoContas/fontes/PHP/TCMBA/classes/mapeamento/2015/TTCMBAContrato2.class.php index 69ccb00..132e696 100644 --- a/gestaoPrestacaoContas/fontes/PHP/TCMBA/classes/mapeamento/2015/TTCMBAContrato2.class.php +++ b/gestaoPrestacaoContas/fontes/PHP/TCMBA/classes/mapeamento/2015/TTCMBAContrato2.class.php @@ -79,7 +79,7 @@ class TTCMBAContrato2 extends Persistente $stSql = " SELECT 1 AS tipo_registro , ".$this->getDado('unidade_gestora')." AS unidade_gestora , licitacao.exercicio||LPAD(licitacao.cod_entidade::VARCHAR,2,'0')||LPAD(licitacao.cod_modalidade::VARCHAR,2,'0')||LPAD(licitacao.cod_licitacao::VARCHAR,4,'0') AS num_processo - , contrato.num_contrato + , contrato.numero_contrato , 1 as tipo_moeda , objeto.descricao AS objeto_contrato , CASE WHEN sw_cgm_pessoa_fisica.cpf IS NOT NULL THEN 1 @@ -101,7 +101,7 @@ class TTCMBAContrato2 extends Persistente , TO_CHAR(contrato.inicio_execucao, 'dd/mm/yyyy') AS dt_inicio_execucao , 'N' AS exame_previo , '1' AS anterior_siga - , 17 AS tipo_contrato -- 17 = outros (forçado por enquanto) + , tipo_contrato.tipo_tc AS tipo_contrato , 'S' AS indicador_licitacao -- (forçado por enquanto) , 'N' AS indicador_dispensa -- (forçado por enquanto) @@ -222,6 +222,9 @@ class TTCMBAContrato2 extends Persistente AND item_pre_empenho.cod_pre_empenho = empenho_anulado_item.cod_pre_empenho AND item_pre_empenho.num_item = empenho_anulado_item.num_item + INNER JOIN licitacao.tipo_contrato + ON tipo_contrato.cod_tipo = contrato.cod_tipo_contrato + WHERE contrato_anulado.num_contrato IS NULL AND cotacao_anulada.cod_cotacao IS NULL AND julgamento_item.ordem = 1 @@ -232,7 +235,7 @@ class TTCMBAContrato2 extends Persistente AND TO_DATE('".$this->getDado('dt_final')."','dd/mm/yyyy') GROUP BY licitacao.cod_processo, - contrato.num_contrato, + contrato.numero_contrato, objeto.descricao, sw_cgm_pessoa_fisica.cpf, sw_cgm_pessoa_juridica.cnpj, @@ -243,9 +246,14 @@ class TTCMBAContrato2 extends Persistente publicacao_contrato.dt_publicacao, contrato.valor_contratado, tipo_item.cod_tipo, - contrato.inicio_execucao + contrato.inicio_execucao, + licitacao.exercicio, + licitacao.cod_entidade, + licitacao.cod_modalidade, + licitacao.cod_licitacao, + mapa_cotacao.cod_mapa, + tipo_contrato.tipo_tc "; - return $stSql; } diff --git a/gestaoPrestacaoContas/fontes/PHP/TCMBA/classes/mapeamento/2015/TTCMBADocDiver.class.php b/gestaoPrestacaoContas/fontes/PHP/TCMBA/classes/mapeamento/2015/TTCMBADocDiver.class.php index 337d4f1..be61131 100644 --- a/gestaoPrestacaoContas/fontes/PHP/TCMBA/classes/mapeamento/2015/TTCMBADocDiver.class.php +++ b/gestaoPrestacaoContas/fontes/PHP/TCMBA/classes/mapeamento/2015/TTCMBADocDiver.class.php @@ -68,37 +68,43 @@ class TTCMBADocDiver extends Persistente { } public function montaRecuperaDados() - { $stSql = " SELECT 1 AS tp_registro - , de.num_unidade AS cd_unidade + { $stSql = " SELECT 1 AS tipo_registro + , despesa.num_unidade AS unidade_orcamentaria , '".$this->getDado('unidade_gestora')."' AS unidade_gestora - , em.cod_empenho AS nu_empenho - , nota_liq_paga.data_pagamento AS dt_pagamento_empenho - , nota_liq_paga.num_documento AS num_documento - , de.num_orgao AS cd_orgao - , op.exercicio AS dt_ano - , cgm_pe.tp_pessoa + , empenho.cod_empenho AS num_empenho + , empenho.cod_empenho AS subempenho + , nota_liq_paga.data_pagamento AS dt_pagamento_empenho + , nota_liq_paga.num_documento AS num_documento + , despesa.num_orgao AS cod_orgao + , ordem_pagamento.exercicio AS dt_ano + , cgm_pe.tipo_pessoa , cgm_pe.documento - , cgm_pe.nom_cgm as beneficiario - , nota_liq_paga.nm_documento + , cgm_pe.nom_cgm AS emitente + , nota_liq_paga.tipo_documento , nota_liq_paga.data_emissao - , nota_liq_paga.vl_pago - , op.observacao AS objeto_documento - , TO_CHAR(nota_liq_paga.data_pagamento, 'yyyymm') as competencia - FROM empenho.ordem_pagamento AS op - LEFT JOIN empenho.ordem_pagamento_anulada AS opa - ON op.cod_ordem = opa.cod_ordem - AND op.exercicio = opa.exercicio - AND op.cod_entidade = opa.cod_entidade - AND op.exercicio = '".$this->getDado('exercicio')."' - JOIN empenho.pagamento_liquidacao as pl - ON op.cod_ordem = pl.cod_ordem - AND op.cod_entidade = pl.cod_entidade - AND op.exercicio = '".$this->getDado('exercicio')."' - AND op.exercicio = pl.exercicio - JOIN empenho.nota_liquidacao as nl - ON pl.cod_nota = nl.cod_nota - AND pl.cod_entidade = nl.cod_entidade - AND pl.exercicio_liquidacao = nl.exercicio + , nota_liq_paga.vl_pago AS vl_doc + , ordem_pagamento.observacao AS objeto + , TO_CHAR(nota_liq_paga.data_pagamento, 'yyyymm') AS competencia + + FROM empenho.ordem_pagamento + + LEFT JOIN empenho.ordem_pagamento_anulada + ON ordem_pagamento.cod_ordem = ordem_pagamento_anulada.cod_ordem + AND ordem_pagamento.exercicio = ordem_pagamento_anulada.exercicio + AND ordem_pagamento.cod_entidade = ordem_pagamento_anulada.cod_entidade + AND ordem_pagamento.exercicio = '".$this->getDado('exercicio')."' + + JOIN empenho.pagamento_liquidacao + ON ordem_pagamento.cod_ordem = pagamento_liquidacao.cod_ordem + AND ordem_pagamento.cod_entidade = pagamento_liquidacao.cod_entidade + AND ordem_pagamento.exercicio = '".$this->getDado('exercicio')."' + AND ordem_pagamento.exercicio = pagamento_liquidacao.exercicio + + JOIN empenho.nota_liquidacao + ON pagamento_liquidacao.cod_nota = nota_liquidacao.cod_nota + AND pagamento_liquidacao.cod_entidade = nota_liquidacao.cod_entidade + AND pagamento_liquidacao.exercicio_liquidacao = nota_liquidacao.exercicio + LEFT JOIN ( SELECT nlp.cod_entidade , nlp.cod_nota , plnlp.cod_ordem @@ -108,7 +114,7 @@ class TTCMBADocDiver extends Persistente { , sum(coalesce(nlpa.vl_anulado ,0.00)) as vl_anulado , TO_DATE(TO_CHAR(nlp.timestamp, 'dd/mm/yyyy'),'dd/mm/yyyy') AS data_pagamento , ptdp.num_documento - , tipo_documento_pagamento.descricao AS nm_documento + , tipo_documento_pagamento.descricao AS tipo_documento , TO_DATE(TO_CHAR(ptdp.timestamp, 'dd/mm/yyyy'),'dd/mm/yyyy') AS data_emissao FROM empenho.pagamento_liquidacao_nota_liquidacao_paga as plnlp , tesouraria.pagamento as tp @@ -120,57 +126,61 @@ class TTCMBADocDiver extends Persistente { LEFT JOIN tcmba.tipo_documento_pagamento ON tipo_documento_pagamento.cod_tipo = ptdp.cod_tipo , empenho.nota_liquidacao_paga as nlp - LEFT JOIN (SELECT exercicio + LEFT JOIN ( + SELECT exercicio , cod_nota , cod_entidade , timestamp , coalesce(sum(nlpa.vl_anulado),0.00) as vl_anulado FROM empenho.nota_liquidacao_paga_anulada as nlpa GROUP BY exercicio, cod_nota, cod_entidade, timestamp - ) as nlpa - ON nlp.exercicio = nlpa.exercicio - AND nlp.cod_nota = nlpa.cod_nota - AND nlp.cod_entidade = nlpa.cod_entidade - AND nlp.timestamp = nlpa.timestamp - WHERE nlp.cod_entidade = plnlp.cod_entidade - AND nlp.cod_nota = plnlp.cod_nota - AND nlp.exercicio = plnlp.exercicio_liquidacao - AND nlp.timestamp = plnlp.timestamp - AND plnlp.exercicio = '".$this->getDado('exercicio')."' - AND nlp.cod_entidade = tp.cod_entidade - AND nlp.cod_nota = tp.cod_nota - AND nlp.exercicio = tp.exercicio - AND nlp.timestamp = tp.timestamp - AND nlpa.cod_nota IS NULL - GROUP BY nlp.cod_entidade - , nlp.cod_nota - , nlp.exercicio - , nlpa.vl_anulado - , plnlp.cod_ordem - , plnlp.exercicio - , nlp.timestamp - , num_documento - , tipo_documento_pagamento.descricao - , ptdp.timestamp - ) as nota_liq_paga - ON pl.cod_nota = nota_liq_paga.cod_nota - AND pl.cod_entidade = nota_liq_paga.cod_entidade - AND pl.exercicio = nota_liq_paga.exercicio - AND pl.cod_ordem = nota_liq_paga.cod_ordem - AND pl.exercicio_liquidacao = nota_liq_paga.exercicio_liquidacao - JOIN empenho.empenho as em - ON nl.cod_empenho = em.cod_empenho - AND nl.exercicio_empenho = em.exercicio - AND nl.cod_entidade = em.cod_entidade - AND em.exercicio = '".$this->getDado('exercicio')."' - JOIN empenho.pre_empenho as pe - ON em.exercicio = pe.exercicio - AND em.cod_pre_empenho = pe.cod_pre_empenho - AND em.exercicio = '".$this->getDado('exercicio')."' + ) AS nlpa + ON nlp.exercicio = nlpa.exercicio + AND nlp.cod_nota = nlpa.cod_nota + AND nlp.cod_entidade = nlpa.cod_entidade + AND nlp.timestamp = nlpa.timestamp + WHERE nlp.cod_entidade = plnlp.cod_entidade + AND nlp.cod_nota = plnlp.cod_nota + AND nlp.exercicio = plnlp.exercicio_liquidacao + AND nlp.timestamp = plnlp.timestamp + AND plnlp.exercicio = '".$this->getDado('exercicio')."' + AND nlp.cod_entidade = tp.cod_entidade + AND nlp.cod_nota = tp.cod_nota + AND nlp.exercicio = tp.exercicio + AND nlp.timestamp = tp.timestamp + AND nlpa.cod_nota IS NULL + GROUP BY nlp.cod_entidade + , nlp.cod_nota + , nlp.exercicio + , nlpa.vl_anulado + , plnlp.cod_ordem + , plnlp.exercicio + , nlp.timestamp + , num_documento + , tipo_documento_pagamento.descricao + , ptdp.timestamp + ) AS nota_liq_paga + ON pagamento_liquidacao.cod_nota = nota_liq_paga.cod_nota + AND pagamento_liquidacao.cod_entidade = nota_liq_paga.cod_entidade + AND pagamento_liquidacao.exercicio = nota_liq_paga.exercicio + AND pagamento_liquidacao.cod_ordem = nota_liq_paga.cod_ordem + AND pagamento_liquidacao.exercicio_liquidacao = nota_liq_paga.exercicio_liquidacao + + JOIN empenho.empenho + ON nota_liquidacao.cod_empenho = empenho.cod_empenho + AND nota_liquidacao.exercicio_empenho = empenho.exercicio + AND nota_liquidacao.cod_entidade = empenho.cod_entidade + AND empenho.exercicio = '".$this->getDado('exercicio')."' + + JOIN empenho.pre_empenho + ON empenho.exercicio = pre_empenho.exercicio + AND empenho.cod_pre_empenho = pre_empenho.cod_pre_empenho + AND empenho.exercicio = '".$this->getDado('exercicio')."' + JOIN ( SELECT sw_cgm.numcgm - , nom_cgm + , nom_cgm , sw_cgm_pessoa_fisica.cpf AS documento - , 1 AS tp_pessoa + , 1 AS tipo_pessoa FROM sw_cgm JOIN sw_cgm_pessoa_fisica ON sw_cgm_pessoa_fisica.numcgm = sw_cgm.numcgm @@ -178,20 +188,24 @@ class TTCMBADocDiver extends Persistente { SELECT sw_cgm.numcgm , nom_cgm , sw_cgm_pessoa_juridica.cnpj AS documento - , 2 AS tp_pessoa + , 2 AS tipo_pessoa FROM sw_cgm JOIN sw_cgm_pessoa_juridica ON sw_cgm_pessoa_juridica.numcgm = sw_cgm.numcgm - ) as cgm_pe - ON pe.cgm_beneficiario = cgm_pe.numcgm - LEFT JOIN empenho.pre_empenho_despesa as ped - ON pe.cod_pre_empenho = ped.cod_pre_empenho - AND pe.exercicio = ped.exercicio - LEFT JOIN orcamento.despesa as de - ON ped.cod_despesa = de.cod_despesa - AND ped.exercicio = de.exercicio - WHERE nota_liq_paga.data_pagamento BETWEEN TO_DATE('".$this->getDado('dt_inicial')."' , 'dd/mm/yyyy') AND TO_DATE('".$this->getDado('dt_final')."' , 'dd/mm/yyyy') - AND opa.cod_ordem IS NULL + ) AS cgm_pe + ON pre_empenho.cgm_beneficiario = cgm_pe.numcgm + + LEFT JOIN empenho.pre_empenho_despesa + ON pre_empenho.cod_pre_empenho = pre_empenho_despesa.cod_pre_empenho + AND pre_empenho.exercicio = pre_empenho_despesa.exercicio + + LEFT JOIN orcamento.despesa + ON pre_empenho_despesa.cod_despesa = despesa.cod_despesa + AND pre_empenho_despesa.exercicio = despesa.exercicio + + WHERE nota_liq_paga.data_pagamento BETWEEN TO_DATE('".$this->getDado('dt_inicial')."' , 'dd/mm/yyyy') + AND TO_DATE('".$this->getDado('dt_final')."' , 'dd/mm/yyyy') + AND ordem_pagamento_anulada.cod_ordem IS NULL "; return $stSql; } diff --git a/gestaoPrestacaoContas/fontes/PHP/TCMBA/classes/mapeamento/2015/TTCMBAEditPregaoElet.class.php b/gestaoPrestacaoContas/fontes/PHP/TCMBA/classes/mapeamento/2015/TTCMBAEditPregaoElet.class.php new file mode 100755 index 0000000..0fa7ef0 --- /dev/null +++ b/gestaoPrestacaoContas/fontes/PHP/TCMBA/classes/mapeamento/2015/TTCMBAEditPregaoElet.class.php @@ -0,0 +1,131 @@ + +setDado('exercicio', Sessao::getExercicio() ); + } + + function recuperaDadosTribunal(&$rsRecordSet, $stCondicao = "" , $stOrdem = "" , $boTransacao = "") + { + $obErro = new Erro; + $obConexao = new Conexao; + $rsRecordSet = new RecordSet; + + $stSql = $this->montaRecuperaDadosTribunal().$stCondicao.$stOrdem; + $this->setDebug( $stSql ); + $obErro = $obConexao->executaSQL( $rsRecordSet, $stSql, $boTransacao ); + + return $obErro; + } + + function montaRecuperaDadosTribunal() + { + $stSql = " SELECT 1 as tipo_registro + , '".$this->getDado('unidade_gestora')."' as unidade_gestora + , edital.exercicio||LPAD(edital.num_edital::VARCHAR,8,'0') as num_edital + , CASE WHEN modalidade.cod_modalidade = 3 AND tipo_objeto.cod_tipo_objeto = 1 THEN 1 + WHEN modalidade.cod_modalidade = 3 AND tipo_objeto.cod_tipo_objeto = 2 THEN 2 + WHEN modalidade.cod_modalidade = 3 AND licitacao.registro_precos = TRUE THEN 3 + WHEN modalidade.cod_modalidade = 5 THEN 4 + WHEN modalidade.cod_modalidade = 1 AND tipo_objeto.cod_tipo_objeto = 1 THEN 5 + WHEN modalidade.cod_modalidade = 1 AND tipo_objeto.cod_tipo_objeto = 2 THEN 6 + WHEN modalidade.cod_modalidade = 4 THEN 7 + WHEN modalidade.cod_modalidade = 2 AND tipo_objeto.cod_tipo_objeto = 1 THEN 10 + WHEN modalidade.cod_modalidade = 2 AND tipo_objeto.cod_tipo_objeto = 2 THEN 12 + WHEN modalidade.cod_modalidade = 6 AND licitacao.registro_precos = FALSE THEN 14 + WHEN modalidade.cod_modalidade = 7 AND licitacao.registro_precos = FALSE THEN 15 + WHEN modalidade.cod_modalidade = 1 AND licitacao.registro_precos = TRUE THEN 16 + WHEN modalidade.cod_modalidade = 2 AND licitacao.registro_precos = TRUE THEN 17 + WHEN modalidade.cod_modalidade = 6 AND licitacao.registro_precos = TRUE THEN 18 + WHEN modalidade.cod_modalidade = 7 AND licitacao.registro_precos = TRUE THEN 19 + WHEN modalidade.cod_modalidade = 3 AND tipo_objeto.cod_tipo_objeto = 4 THEN 22 + WHEN modalidade.cod_modalidade = 3 AND tipo_objeto.cod_tipo_objeto = 3 THEN 23 + END AS edital_modalidade + , TO_CHAR(edital.dt_entrega_propostas,'ddmmyyyy') as data_recebimento_proposta + , REPLACE(edital.hora_entrega_propostas,':','')::varchar as hora_recebimento_proposta + , TO_CHAR(edital.dt_final_entrega_propostas,'ddmmyyyy') as data_final_entrega + , REPLACE(edital.hora_final_entrega_propostas,':','')::varchar as hora_final_entrega + , TO_CHAR(edital.dt_abertura_propostas,'ddmmyyyy') as data_sessao_disputa + , REPLACE(edital.hora_abertura_propostas,':','') as hora_inicio_disputa + + FROM licitacao.edital + + INNER JOIN licitacao.publicacao_edital + ON publicacao_edital.num_edital = edital.num_edital + AND publicacao_edital.exercicio = edital.exercicio + + INNER JOIN licitacao.licitacao + ON licitacao.cod_licitacao = edital.cod_licitacao + AND licitacao.cod_modalidade = edital.cod_modalidade + AND licitacao.cod_entidade = edital.cod_entidade + AND licitacao.exercicio = edital.exercicio_licitacao + + INNER JOIN licitacao.homologacao + ON homologacao.cod_licitacao = licitacao.cod_licitacao + AND homologacao.cod_modalidade = licitacao.cod_modalidade + AND homologacao.cod_entidade = licitacao.cod_entidade + AND homologacao.exercicio_licitacao = licitacao.exercicio + + INNER JOIN compras.objeto + ON objeto.cod_objeto = licitacao.cod_objeto + + INNER JOIN compras.tipo_objeto + ON tipo_objeto.cod_tipo_objeto = licitacao.cod_tipo_objeto + + INNER JOIN compras.modalidade + ON modalidade.cod_modalidade = licitacao.cod_modalidade + + WHERE edital.exercicio = '".$this->getDado('exercicio')."' + AND edital.cod_entidade IN (".$this->getDado('entidades').") + AND edital.dt_aprovacao_juridico BETWEEN TO_DATE('".$this->getDado('dt_inicial')."','dd/mm/yyyy') + AND TO_DATE('".$this->getDado('dt_final')."','dd/mm/yyyy') + AND edital.cod_modalidade IN (6,7) + "; + return $stSql; + } + +} + +?> \ No newline at end of file diff --git a/gestaoPrestacaoContas/fontes/PHP/TCMBA/classes/mapeamento/2015/TTCMBAEditalDotacao.class.php b/gestaoPrestacaoContas/fontes/PHP/TCMBA/classes/mapeamento/2015/TTCMBAEditalDotacao.class.php new file mode 100644 index 0000000..bc4e883 --- /dev/null +++ b/gestaoPrestacaoContas/fontes/PHP/TCMBA/classes/mapeamento/2015/TTCMBAEditalDotacao.class.php @@ -0,0 +1,177 @@ + +setDado('exercicio', Sessao::getExercicio() ); + } + + function recuperaDadosTribunal(&$rsRecordSet, $stCondicao = "" , $stOrdem = "" , $boTransacao = "") + { + $obErro = new Erro; + $obConexao = new Conexao; + $rsRecordSet = new RecordSet; + + $stSql = $this->montaRecuperaDadosTribunal().$stCondicao.$stOrdem; + $this->setDebug( $stSql ); + $obErro = $obConexao->executaSQL( $rsRecordSet, $stSql, $boTransacao ); + + return $obErro; + } + + function montaRecuperaDadosTribunal() + { + $stSql = " SELECT DISTINCT 1 AS tipo_registro + , ".$this->getDado('unidade_gestora')." AS unidade_gestora + , edital.exercicio||LPAD(edital.num_edital::varchar, 8,'0') AS nu_edital + , CASE WHEN licitacao.cod_modalidade = 3 AND tipo_objeto.cod_tipo_objeto = 1 THEN 1 + WHEN licitacao.cod_modalidade = 3 AND tipo_objeto.cod_tipo_objeto = 2 THEN 2 + WHEN licitacao.cod_modalidade = 3 AND licitacao.registro_precos = TRUE THEN 3 + WHEN licitacao.cod_modalidade = 5 THEN 4 + WHEN licitacao.cod_modalidade = 1 AND tipo_objeto.cod_tipo_objeto = 1 THEN 5 + WHEN licitacao.cod_modalidade = 1 AND tipo_objeto.cod_tipo_objeto = 2 THEN 6 + WHEN licitacao.cod_modalidade = 4 THEN 7 + WHEN licitacao.cod_modalidade = 2 AND tipo_objeto.cod_tipo_objeto = 1 THEN 10 + WHEN licitacao.cod_modalidade = 2 AND tipo_objeto.cod_tipo_objeto = 2 THEN 12 + WHEN licitacao.cod_modalidade = 6 AND licitacao.registro_precos = FALSE THEN 14 + WHEN licitacao.cod_modalidade = 7 AND licitacao.registro_precos = FALSE THEN 15 + WHEN licitacao.cod_modalidade = 1 AND licitacao.registro_precos = TRUE THEN 16 + WHEN licitacao.cod_modalidade = 2 AND licitacao.registro_precos = TRUE THEN 17 + WHEN licitacao.cod_modalidade = 6 AND licitacao.registro_precos = TRUE THEN 18 + WHEN licitacao.cod_modalidade = 7 AND licitacao.registro_precos = TRUE THEN 19 + WHEN licitacao.cod_modalidade = 3 AND tipo_objeto.cod_tipo_objeto = 4 THEN 22 + WHEN licitacao.cod_modalidade = 3 AND tipo_objeto.cod_tipo_objeto = 3 THEN 23 + END AS edital_modalidade + , licitacao.num_orgao + , licitacao.num_unidade + , despesa.cod_funcao AS cod_funcao + , despesa.cod_subfuncao AS cod_subfuncao + , ppa.programa.num_programa AS cod_programa + , orcamento.fn_consulta_tipo_pao(despesa.exercicio, despesa.num_pao) AS tipo_projeto + , acao.num_acao AS num_projeto + , despesa.cod_recurso AS fonte_recurso + , (LPAD(''||REPLACE(conta_despesa.cod_estrutural, '.', ''),8, '')) AS elemento_despesa + , TO_CHAR(edital.dt_aprovacao_juridico, 'yyyymm') AS competencia + FROM licitacao.licitacao + INNER JOIN licitacao.edital + ON edital.cod_licitacao = licitacao.cod_licitacao + AND edital.cod_modalidade = licitacao.cod_modalidade + AND edital.cod_entidade = licitacao.cod_entidade + AND edital.exercicio_licitacao = licitacao.exercicio + INNER JOIN compras.tipo_objeto + ON tipo_objeto.cod_tipo_objeto = licitacao.cod_tipo_objeto + INNER JOIN compras.mapa + ON licitacao.exercicio_mapa = mapa.exercicio + AND licitacao.cod_mapa = mapa.cod_mapa + INNER JOIN compras.mapa_solicitacao + ON mapa_solicitacao.exercicio = mapa.exercicio + AND mapa_solicitacao.cod_mapa = mapa.cod_mapa + INNER JOIN compras.solicitacao_homologada + ON solicitacao_homologada.exercicio=mapa_solicitacao.exercicio_solicitacao + AND solicitacao_homologada.cod_entidade=mapa_solicitacao.cod_entidade + AND solicitacao_homologada.cod_solicitacao=mapa_solicitacao.cod_solicitacao + INNER JOIN licitacao.homologacao + ON homologacao.cod_licitacao=licitacao.cod_licitacao + AND homologacao.cod_modalidade=licitacao.cod_modalidade + AND homologacao.cod_entidade=licitacao.cod_entidade + AND homologacao.exercicio_licitacao=licitacao.exercicio + AND ( + SELECT homologacao_anulada.num_homologacao FROM licitacao.homologacao_anulada + WHERE homologacao_anulada.cod_licitacao=licitacao.cod_licitacao + AND homologacao_anulada.cod_modalidade=licitacao.cod_modalidade + AND homologacao_anulada.cod_entidade=licitacao.cod_entidade + AND homologacao_anulada.exercicio_licitacao=licitacao.exercicio + AND homologacao.num_homologacao=homologacao_anulada.num_homologacao + AND homologacao.cod_item=homologacao_anulada.cod_item + ) IS NULL + INNER JOIN compras.solicitacao_homologada_reserva + ON solicitacao_homologada_reserva.exercicio=solicitacao_homologada.exercicio + AND solicitacao_homologada_reserva.cod_entidade=solicitacao_homologada.cod_entidade + AND solicitacao_homologada_reserva.cod_solicitacao=solicitacao_homologada.cod_solicitacao + AND solicitacao_homologada_reserva.cod_item=homologacao.cod_item + INNER JOIN orcamento.despesa + ON despesa.exercicio = solicitacao_homologada_reserva.exercicio + AND despesa.cod_despesa = solicitacao_homologada_reserva.cod_despesa + INNER JOIN orcamento.conta_despesa + ON conta_despesa.exercicio = despesa.exercicio + AND conta_despesa.cod_conta = despesa.cod_conta + INNER JOIN compras.mapa_item_dotacao + ON mapa_item_dotacao.exercicio=solicitacao_homologada.exercicio + AND mapa_item_dotacao.cod_entidade=solicitacao_homologada.cod_entidade + AND mapa_item_dotacao.cod_solicitacao=solicitacao_homologada.cod_solicitacao + AND mapa_item_dotacao.cod_item=homologacao.cod_item + AND mapa_item_dotacao.cod_mapa=mapa.cod_mapa + AND mapa_item_dotacao.cod_despesa=despesa.cod_despesa + INNER JOIN orcamento.programa + ON programa.cod_programa = despesa.cod_programa + AND programa.exercicio = despesa.exercicio + INNER JOIN orcamento.programa_ppa_programa + ON programa_ppa_programa.cod_programa = programa.cod_programa + AND programa_ppa_programa.exercicio = programa.exercicio + INNER JOIN ppa.programa + ON ppa.programa.cod_programa = programa_ppa_programa.cod_programa + INNER JOIN orcamento.pao + ON pao.num_pao = despesa.num_pao + AND pao.exercicio = despesa.exercicio + INNER JOIN orcamento.pao_ppa_acao + ON pao_ppa_acao.num_pao = pao.num_pao + AND pao_ppa_acao.exercicio = pao.exercicio + INNER JOIN ppa.acao + ON acao.cod_acao = pao_ppa_acao.cod_acao + WHERE homologacao.cod_entidade IN (".$this->getDado('entidades').") + AND licitacao.exercicio = '".$this->getDado('exercicio')."' + AND TO_DATE(TO_CHAR(dt_aprovacao_juridico,'dd/mm/yyyy'),'dd/mm/yyyy') BETWEEN TO_DATE('".$this->getDado('dt_inicial')."','dd/mm/yyyy') + AND TO_DATE('".$this->getDado('dt_final')."','dd/mm/yyyy') + AND licitacao.cod_modalidade NOT IN (8,9) + "; + return $stSql; + } + +} + +?> \ No newline at end of file diff --git a/gestaoPrestacaoContas/fontes/PHP/TCMBA/classes/mapeamento/2015/TTCMBAEditalEndereco.class.php b/gestaoPrestacaoContas/fontes/PHP/TCMBA/classes/mapeamento/2015/TTCMBAEditalEndereco.class.php index a9f03e4..536e084 100644 --- a/gestaoPrestacaoContas/fontes/PHP/TCMBA/classes/mapeamento/2015/TTCMBAEditalEndereco.class.php +++ b/gestaoPrestacaoContas/fontes/PHP/TCMBA/classes/mapeamento/2015/TTCMBAEditalEndereco.class.php @@ -26,18 +26,16 @@ /** * Página de Include Oculta - Exportação Arquivos GF - * Data de Criação : 19/10/2007 + * Data de Criação : 03/09/2015 - * @author Analista: Gelson Wolvowski Gonçalves - * @author Desenvolvedor: Henrique Girardi dos Santos + * @author Analista: Valtair Santos + * @author Desenvolvedor: Jean Silva $Id $ - - * Casos de uso: uc-06.05.00 */ include_once '../../../../../../gestaoAdministrativa/fontes/PHP/framework/include/valida.inc.php'; -include_once ( CLA_PERSISTENTE ); +include_once CLA_PERSISTENTE; class TTCMBAEditalEndereco extends Persistente { @@ -70,25 +68,25 @@ class TTCMBAEditalEndereco extends Persistente $stSql = " SELECT 1 AS tipo_registro , ".$this->getDado('unidade_gestora')." AS unidade_gestora , edital.num_edital - , CASE WHEN edital.cod_modalidade = 3 AND tipo_objeto.cod_tipo_objeto = 1 THEN 1 - WHEN edital.cod_modalidade = 3 AND tipo_objeto.cod_tipo_objeto = 2 THEN 2 - WHEN edital.cod_modalidade = 3 AND licitacao.registro_precos = TRUE THEN 3 - WHEN edital.cod_modalidade = 5 THEN 4 - WHEN edital.cod_modalidade = 1 AND tipo_objeto.cod_tipo_objeto = 1 THEN 5 - WHEN edital.cod_modalidade = 1 AND tipo_objeto.cod_tipo_objeto = 2 THEN 6 - WHEN edital.cod_modalidade = 4 THEN 7 - WHEN edital.cod_modalidade = 2 AND tipo_objeto.cod_tipo_objeto = 1 THEN 10 - WHEN edital.cod_modalidade = 2 AND tipo_objeto.cod_tipo_objeto = 2 THEN 12 + , CASE WHEN edital.cod_modalidade = 3 AND tipo_objeto.cod_tipo_objeto = 1 THEN 1 + WHEN edital.cod_modalidade = 3 AND tipo_objeto.cod_tipo_objeto = 2 THEN 2 + WHEN edital.cod_modalidade = 3 AND licitacao.registro_precos = TRUE THEN 3 + WHEN edital.cod_modalidade = 5 THEN 4 + WHEN edital.cod_modalidade = 1 AND tipo_objeto.cod_tipo_objeto = 1 THEN 5 + WHEN edital.cod_modalidade = 1 AND tipo_objeto.cod_tipo_objeto = 2 THEN 6 + WHEN edital.cod_modalidade = 4 THEN 7 + WHEN edital.cod_modalidade = 2 AND tipo_objeto.cod_tipo_objeto = 1 THEN 10 + WHEN edital.cod_modalidade = 2 AND tipo_objeto.cod_tipo_objeto = 2 THEN 12 WHEN edital.cod_modalidade = 6 AND licitacao.registro_precos = FALSE THEN 14 WHEN edital.cod_modalidade = 7 AND licitacao.registro_precos = FALSE THEN 15 - WHEN edital.cod_modalidade = 1 AND licitacao.registro_precos = TRUE THEN 16 - WHEN edital.cod_modalidade = 2 AND licitacao.registro_precos = TRUE THEN 17 - WHEN edital.cod_modalidade = 6 AND licitacao.registro_precos = TRUE THEN 18 - WHEN edital.cod_modalidade = 7 AND licitacao.registro_precos = TRUE THEN 19 - WHEN edital.cod_modalidade = 3 AND tipo_objeto.cod_tipo_objeto = 4 THEN 22 - WHEN edital.cod_modalidade = 3 AND tipo_objeto.cod_tipo_objeto = 3 THEN 23 + WHEN edital.cod_modalidade = 1 AND licitacao.registro_precos = TRUE THEN 16 + WHEN edital.cod_modalidade = 2 AND licitacao.registro_precos = TRUE THEN 17 + WHEN edital.cod_modalidade = 6 AND licitacao.registro_precos = TRUE THEN 18 + WHEN edital.cod_modalidade = 7 AND licitacao.registro_precos = TRUE THEN 19 + WHEN edital.cod_modalidade = 3 AND tipo_objeto.cod_tipo_objeto = 4 THEN 22 + WHEN edital.cod_modalidade = 3 AND tipo_objeto.cod_tipo_objeto = 3 THEN 23 END AS modalidade - , edital.local_entrega_propostas + , edital.local_entrega_propostas AS logradouro , '' AS endereco , '' AS complemento , '' AS bairro @@ -96,7 +94,7 @@ class TTCMBAEditalEndereco extends Persistente , (SELECT valor FROM administracao.configuracao WHERE cod_modulo = 2 AND exercicio = edital.exercicio AND parametro = 'cod_municipio_ibge' - ) AS municipio_ibge + ) AS municipio_ibge , 1 AS finalidade , TO_CHAR(edital.dt_aprovacao_juridico,'yyyymm') AS competencia @@ -115,6 +113,7 @@ class TTCMBAEditalEndereco extends Persistente AND edital.cod_entidade IN (".$this->getDado('entidades').") AND edital.dt_aprovacao_juridico BETWEEN TO_DATE('".$this->getDado('dt_inicial')."', 'dd/mm/yyyy') AND TO_DATE('".$this->getDado('dt_final')."', 'dd/mm/yyyy') + AND edital.cod_modalidade NOT IN (8,9) "; return $stSql; } diff --git a/gestaoPrestacaoContas/fontes/PHP/TCMBA/classes/mapeamento/2015/TTCMBAFolhaPgt.class.php b/gestaoPrestacaoContas/fontes/PHP/TCMBA/classes/mapeamento/2015/TTCMBAFolhaPgt.class.php new file mode 100644 index 0000000..8333fbc --- /dev/null +++ b/gestaoPrestacaoContas/fontes/PHP/TCMBA/classes/mapeamento/2015/TTCMBAFolhaPgt.class.php @@ -0,0 +1,180 @@ + +montaRecuperaTribunal().$stCondicao.$stOrdem; + $this->setDebug( $stSql ); + $obErro = $obConexao->executaSQL( $rsRecordSet, $stSql, $boTransacao ); + + return $obErro; + } + + public function montaRecuperaTribunal() + { + $stSql = "SELECT 1 as tipo_registro + , ".$this->getDado('unidade_gestora')." AS unidade_gestora + , CASE WHEN restos_pre_empenho.num_orgao IS NULL THEN + despesa.num_orgao + ELSE + restos_pre_empenho.num_orgao + END AS cod_orgao --num_orgao + , CASE WHEN restos_pre_empenho.num_unidade IS NULL THEN + despesa.num_unidade + ELSE + restos_pre_empenho.num_unidade + END AS unidade_orcamentaria + , empenho.cod_empenho AS num_empenho + , empenho.cod_empenho AS subempenho + , TO_CHAR(nota_liquidacao_paga.timestamp,'dd/mm/yyyy') as dt_pagamento_empenho + , nota_liquidacao.exercicio_empenho as exercicio + , SUM(nota_liquidacao_paga.vl_pago) AS vl_pago + , pre_empenho.descricao AS objeto + , to_char(nota_liquidacao_paga.timestamp,'yyyymm') as competencia + , to_char(nota_liquidacao_paga.timestamp,'mm') as mes_referencia + , to_char(nota_liquidacao_paga.timestamp,'yyyy') as ano_referencia + + FROM empenho.empenho + + INNER JOIN empenho.nota_liquidacao + ON empenho.exercicio = nota_liquidacao.exercicio_empenho + AND empenho.cod_entidade = nota_liquidacao.cod_entidade + AND empenho.cod_empenho = nota_liquidacao.cod_empenho + + INNER JOIN empenho.nota_liquidacao_paga + ON nota_liquidacao.exercicio = nota_liquidacao_paga.exercicio + AND nota_liquidacao.cod_entidade = nota_liquidacao_paga.cod_entidade + AND nota_liquidacao.cod_nota = nota_liquidacao_paga.cod_nota + + INNER JOIN empenho.pre_empenho + ON empenho.exercicio = pre_empenho.exercicio + AND empenho.cod_pre_empenho = pre_empenho.cod_pre_empenho + + INNER JOIN tesouraria.pagamento + ON pagamento.exercicio = nota_liquidacao_paga.exercicio + AND pagamento.cod_entidade = nota_liquidacao_paga.cod_entidade + AND pagamento.cod_nota = nota_liquidacao_paga.cod_nota + AND pagamento.timestamp = nota_liquidacao_paga.timestamp + + INNER JOIN empenho.nota_liquidacao_conta_pagadora + ON nota_liquidacao_paga.exercicio = nota_liquidacao_conta_pagadora.exercicio_liquidacao + AND nota_liquidacao_paga.cod_entidade = nota_liquidacao_conta_pagadora.cod_entidade + AND nota_liquidacao_paga.cod_nota = nota_liquidacao_conta_pagadora.cod_nota + AND nota_liquidacao_paga.timestamp = nota_liquidacao_conta_pagadora.timestamp + + LEFT JOIN empenho.restos_pre_empenho + ON restos_pre_empenho.cod_pre_empenho = pre_empenho.cod_pre_empenho + AND restos_pre_empenho.exercicio = pre_empenho.exercicio + + LEFT JOIN ( SELECT exercicio + , cod_entidade + , cod_nota + , timestamp + , sum(vl_anulado) as vl_anulado + FROM empenho.nota_liquidacao_paga_anulada + WHERE to_char(timestamp_anulada,'yyyy') = '".Sessao::getExercicio()."' + AND cod_entidade in ( ".$this->getDado('entidades')." ) + GROUP BY exercicio, cod_entidade, cod_nota, timestamp + ) as paa + ON nota_liquidacao_paga.exercicio = paa.exercicio + AND nota_liquidacao_paga.cod_entidade = paa.cod_entidade + AND nota_liquidacao_paga.cod_nota = paa.cod_nota + AND nota_liquidacao_paga.timestamp = paa.timestamp + + LEFT JOIN contabilidade.plano_analitica + ON nota_liquidacao_conta_pagadora.exercicio = plano_analitica.exercicio + AND nota_liquidacao_conta_pagadora.cod_plano = plano_analitica.cod_plano + + LEFT JOIN contabilidade.plano_conta + ON plano_analitica.exercicio = plano_conta.exercicio + AND plano_analitica.cod_conta = plano_conta.cod_conta + + LEFT JOIN empenho.pre_empenho_despesa + ON pre_empenho.exercicio = pre_empenho_despesa.exercicio + AND pre_empenho.cod_pre_empenho = pre_empenho_despesa.cod_pre_empenho + + LEFT JOIN orcamento.despesa + ON pre_empenho_despesa.exercicio = despesa.exercicio + AND pre_empenho_despesa.cod_despesa = despesa.cod_despesa + + LEFT JOIN orcamento.conta_despesa + ON conta_despesa.exercicio = despesa.exercicio + AND conta_despesa.cod_conta = despesa.cod_conta + + LEFT JOIN tcmba.pagamento_tipo_documento_pagamento + ON pagamento.exercicio = pagamento_tipo_documento_pagamento.exercicio + AND pagamento.cod_entidade = pagamento_tipo_documento_pagamento.cod_entidade + AND pagamento.cod_nota = pagamento_tipo_documento_pagamento.cod_nota + AND pagamento.timestamp = pagamento_tipo_documento_pagamento.timestamp + + WHERE nota_liquidacao_paga.timestamp BETWEEN TO_DATE('".$this->getDado('data_inicial')."' , 'dd/mm/yyyy') AND TO_DATE('".$this->getDado('data_final')."', 'dd/mm/yyyy') + AND empenho.cod_entidade IN ( ".$this->getDado('entidades')." ) + AND conta_despesa.cod_estrutural ilike '3.1.9.0%' + + GROUP BY restos_pre_empenho.num_orgao + , despesa.num_orgao + , restos_pre_empenho.num_unidade + , despesa.num_unidade + , empenho.cod_empenho + , nota_liquidacao_paga.timestamp + , nota_liquidacao.exercicio_empenho + , pre_empenho.descricao + "; + + return $stSql; + } + +}//fim da classe +?> + \ No newline at end of file diff --git a/gestaoPrestacaoContas/fontes/PHP/TCMBA/classes/mapeamento/2015/TTCMBALancExtraOrc.class.php b/gestaoPrestacaoContas/fontes/PHP/TCMBA/classes/mapeamento/2015/TTCMBALancExtraOrc.class.php index 601405b..52ca0de 100644 --- a/gestaoPrestacaoContas/fontes/PHP/TCMBA/classes/mapeamento/2015/TTCMBALancExtraOrc.class.php +++ b/gestaoPrestacaoContas/fontes/PHP/TCMBA/classes/mapeamento/2015/TTCMBALancExtraOrc.class.php @@ -65,109 +65,192 @@ class TTCMBALancExtraOrc extends Persistente public function montaRecuperaLancamentoExtraOrcamentario() { - $stSql = " SELECT 1 AS tipo_registro - , ".$this->getDado('inCodGestora')." AS unidade_gestora - , transferencia.cod_lote as num_lancamento - , TO_CHAR(lote.dt_lote ,'yyyymm') AS competencia - , TO_CHAR(lote.dt_lote ,'ddmmyyyy') AS data_lancamento - , REPLACE(plano_conta.cod_estrutural::VARCHAR,'.','') AS conta_contabil - , CASE WHEN sw_cgm_pessoa_fisica.cpf IS NOT NULL - THEN sw_cgm_pessoa_fisica.cpf - WHEN sw_cgm_pessoa_juridica.cnpj IS NOT NULL - THEN sw_cgm_pessoa_juridica.cnpj - ELSE '' - END AS documento_credor - , sw_cgm.nom_cgm AS nome_credor - , CASE WHEN transferencia.cod_tipo = 1 - THEN 2 - ELSE 1 - END AS tipo_lancamento - , REPLACE(transferencia.valor::VARCHAR, '.', '') AS valor_lancamento - - FROM tesouraria.transferencia - - LEFT JOIN tesouraria.recibo_extra_transferencia - ON recibo_extra_transferencia.cod_lote = transferencia.cod_lote - AND recibo_extra_transferencia.cod_entidade = transferencia.cod_entidade - AND recibo_extra_transferencia.exercicio = transferencia.exercicio - AND recibo_extra_transferencia.tipo = transferencia.tipo - - INNER JOIN contabilidade.plano_analitica - ON plano_analitica.cod_plano = transferencia.cod_plano_credito - --AND plano_analitica.cod_plano = transferencia.cod_plano_debito - AND plano_analitica.exercicio = transferencia.exercicio - - LEFT JOIN contabilidade.plano_recurso - ON plano_recurso.exercicio = plano_analitica.exercicio - AND plano_recurso.cod_plano = plano_analitica.cod_plano - - LEFT JOIN orcamento.recurso('".$this->getDado('stExercicio')."') AS recurso - ON recurso.cod_recurso = plano_recurso.cod_recurso - AND recurso.exercicio = plano_recurso.exercicio - - INNER JOIN contabilidade.plano_conta - ON plano_conta.cod_conta = plano_analitica.cod_conta - AND plano_conta.exercicio = plano_analitica.exercicio - - LEFT JOIN contabilidade.plano_banco - ON plano_banco.cod_plano = transferencia.cod_plano_credito - AND plano_banco.exercicio = transferencia.exercicio - - LEFT JOIN monetario.conta_corrente - ON conta_corrente.cod_banco = plano_banco.cod_banco - AND conta_corrente.cod_agencia = plano_banco.cod_agencia - AND conta_corrente.cod_conta_corrente = plano_banco.cod_conta_corrente + $stSql = " + SELECT + 1 AS tipo_registro + , ".$this->getDado('inCodGestora')." AS unidade_gestora + , cod_tipo AS tipo_lancamento + , documento_credor + , nome_credor + , SUM(COALESCE(valor_lancamento,0.00)) AS valor_lancamento + , data_lancamento + , codigo_contabil AS conta_contabil + , num_lancamento + + FROM + ( +-- DESPESA EXTRA + SELECT + plano_conta.cod_estrutural AS codigo_contabil + , transferencia.valor AS valor_lancamento + , 2 AS cod_tipo + , TO_CHAR(lote.dt_lote ,'ddmmyyyy') AS data_lancamento + , CASE WHEN sw_cgm_pessoa_fisica.cpf IS NOT NULL + THEN sw_cgm_pessoa_fisica.cpf + WHEN sw_cgm_pessoa_juridica.cnpj IS NOT NULL + THEN sw_cgm_pessoa_juridica.cnpj + ELSE '' + END AS documento_credor + , sw_cgm.nom_cgm AS nome_credor + , recibo_extra.cod_recibo_extra AS num_lancamento + + FROM tesouraria.transferencia + + INNER JOIN contabilidade.plano_analitica + ON plano_analitica.cod_plano = transferencia.cod_plano_debito + AND plano_analitica.exercicio = transferencia.exercicio + + INNER JOIN contabilidade.plano_conta + ON plano_analitica.cod_conta = plano_conta.cod_conta + AND plano_analitica.exercicio = plano_conta.exercicio + + LEFT JOIN tesouraria.transferencia_estornada + ON transferencia_estornada.cod_entidade = transferencia.cod_entidade + AND transferencia_estornada.tipo = transferencia.tipo + AND transferencia_estornada.exercicio = transferencia.exercicio + AND transferencia_estornada.cod_lote = transferencia.cod_lote + + INNER JOIN contabilidade.lote + ON lote.exercicio = transferencia.exercicio + AND lote.cod_entidade = transferencia.cod_entidade + AND lote.tipo = transferencia.tipo + AND lote.cod_lote = transferencia.cod_lote + + INNER JOIN tesouraria.recibo_extra + ON recibo_extra.cod_plano = plano_analitica.cod_plano + AND recibo_extra.exercicio = plano_analitica.exercicio + + LEFT JOIN tesouraria.recibo_extra_credor + ON recibo_extra_credor.cod_entidade = recibo_extra.cod_entidade + AND recibo_extra_credor.exercicio = recibo_extra.exercicio + AND recibo_extra_credor.cod_recibo_extra = recibo_extra.cod_recibo_extra + AND recibo_extra_credor.tipo_recibo = recibo_extra.tipo_recibo - LEFT JOIN monetario.banco - ON banco.cod_banco = conta_corrente.cod_banco - - INNER JOIN orcamento.entidade - ON entidade.cod_entidade = transferencia.cod_entidade - AND entidade.exercicio = transferencia.exercicio + LEFT JOIN sw_cgm + ON sw_cgm.numcgm = recibo_extra_credor.numcgm - INNER JOIN contabilidade.lote - ON lote.exercicio = transferencia.exercicio - AND lote.cod_entidade = transferencia.cod_entidade - AND lote.tipo = transferencia.tipo - AND lote.cod_lote = transferencia.cod_lote - - LEFT JOIN tesouraria.transferencia_credor - ON transferencia_credor.cod_lote = transferencia.cod_lote - AND transferencia_credor.cod_entidade = transferencia.cod_entidade - AND transferencia_credor.exercicio = transferencia.exercicio - AND transferencia_credor.tipo = transferencia.tipo - - LEFT JOIN sw_cgm - ON sw_cgm.numcgm = transferencia_credor.numcgm + LEFT JOIN sw_cgm_pessoa_fisica + ON sw_cgm.numcgm = sw_cgm_pessoa_fisica.numcgm + + LEFT JOIN sw_cgm_pessoa_juridica + ON sw_cgm.numcgm = sw_cgm_pessoa_juridica.numcgm + + WHERE transferencia.cod_tipo = 1 + AND TO_DATE(TO_CHAR(transferencia.timestamp_transferencia,'dd/mm/yyyy'),'dd/mm/yyyy') BETWEEN + TO_DATE('".$this->getDado('dtInicio')."'::VARCHAR,'dd/mm/yyyy') AND + TO_DATE('".$this->getDado('dtFim')."'::VARCHAR,'dd/mm/yyyy') + AND TO_CHAR(transferencia.timestamp_transferencia,'yyyy') = '".$this->getDado('stExercicio')."' + AND transferencia.cod_entidade IN (".$this->getDado('stEntidades').") + + UNION ALL +-- RECEITA EXTRA + SELECT + plano_conta.cod_estrutural AS codigo_contabil + , transferencia.valor AS valor_lancamento + , 1 AS cod_tipo + , TO_CHAR(lote.dt_lote ,'ddmmyyyy') AS data_lancamento + , CASE WHEN sw_cgm_pessoa_fisica.cpf IS NOT NULL + THEN sw_cgm_pessoa_fisica.cpf + WHEN sw_cgm_pessoa_juridica.cnpj IS NOT NULL + THEN sw_cgm_pessoa_juridica.cnpj + ELSE '' + END AS documento_credor + , sw_cgm.nom_cgm AS nome_credor + , recibo_extra.cod_recibo_extra AS num_lancamento + + FROM tesouraria.transferencia + + LEFT JOIN tesouraria.recibo_extra_transferencia + ON recibo_extra_transferencia.cod_lote = transferencia.cod_lote + AND recibo_extra_transferencia.cod_entidade = transferencia.cod_entidade + AND recibo_extra_transferencia.exercicio = transferencia.exercicio + AND recibo_extra_transferencia.tipo = transferencia.tipo + + INNER JOIN contabilidade.plano_analitica + ON plano_analitica.cod_plano = transferencia.cod_plano_credito + AND plano_analitica.exercicio = transferencia.exercicio + + LEFT JOIN contabilidade.plano_recurso + ON plano_recurso.exercicio = plano_analitica.exercicio + AND plano_recurso.cod_plano = plano_analitica.cod_plano + + LEFT JOIN orcamento.recurso('".$this->getDado('stExercicio')."') AS recurso + ON recurso.cod_recurso = plano_recurso.cod_recurso + AND recurso.exercicio = plano_recurso.exercicio + + INNER JOIN contabilidade.plano_conta + ON plano_conta.cod_conta = plano_analitica.cod_conta + AND plano_conta.exercicio = plano_analitica.exercicio + + LEFT JOIN contabilidade.plano_banco + ON plano_banco.cod_plano = transferencia.cod_plano_credito + AND plano_banco.exercicio = transferencia.exercicio + + LEFT JOIN monetario.conta_corrente + ON conta_corrente.cod_banco = plano_banco.cod_banco + AND conta_corrente.cod_agencia = plano_banco.cod_agencia + AND conta_corrente.cod_conta_corrente = plano_banco.cod_conta_corrente + + LEFT JOIN monetario.banco + ON banco.cod_banco = conta_corrente.cod_banco + + INNER JOIN orcamento.entidade + ON entidade.cod_entidade = transferencia.cod_entidade + AND entidade.exercicio = transferencia.exercicio + + INNER JOIN sw_cgm as entidade_cgm + ON entidade_cgm.numcgm = entidade.numcgm + + LEFT JOIN tesouraria.transferencia_estornada + ON transferencia_estornada.exercicio = transferencia.exercicio + AND transferencia_estornada.cod_entidade = transferencia.cod_entidade + AND transferencia_estornada.cod_lote = transferencia.cod_lote + AND transferencia_estornada.tipo = transferencia.tipo + + INNER JOIN tesouraria.recibo_extra + ON recibo_extra.cod_plano = plano_analitica.cod_plano + AND recibo_extra.exercicio = plano_analitica.exercicio + + LEFT JOIN tesouraria.recibo_extra_credor + ON recibo_extra_credor.cod_entidade = recibo_extra.cod_entidade + AND recibo_extra_credor.exercicio = recibo_extra.exercicio + AND recibo_extra_credor.cod_recibo_extra = recibo_extra.cod_recibo_extra + AND recibo_extra_credor.tipo_recibo = recibo_extra.tipo_recibo - LEFT JOIN sw_cgm_pessoa_fisica - ON sw_cgm.numcgm = sw_cgm_pessoa_fisica.numcgm + LEFT JOIN sw_cgm + ON sw_cgm.numcgm = recibo_extra_credor.numcgm - LEFT JOIN sw_cgm_pessoa_juridica - ON sw_cgm.numcgm = sw_cgm_pessoa_juridica.numcgm - - INNER JOIN ( - SELECT plano_analitica.cod_plano || ' - ' || plano_conta.nom_conta as nome_conta_banco - , plano_analitica.cod_plano as cod_plano_banco - , plano_analitica.exercicio - - FROM contabilidade.plano_conta - - INNER JOIN contabilidade.plano_analitica - ON plano_conta.cod_conta = plano_analitica.cod_conta - AND plano_conta.exercicio = plano_analitica.exercicio - - ) AS conta_banco - ON conta_banco.cod_plano_banco = transferencia.cod_plano_debito - AND conta_banco.exercicio = transferencia.exercicio + LEFT JOIN sw_cgm_pessoa_fisica + ON sw_cgm.numcgm = sw_cgm_pessoa_fisica.numcgm - WHERE transferencia.cod_tipo IN(1,2) - AND transferencia.tipo = 'T' - AND transferencia.exercicio = '".$this->getDado('stExercicio')."' - AND TO_DATE(timestamp_transferencia::VARCHAR,'yyyy-mm-dd') BETWEEN TO_DATE('".$this->getDado('dtInicio')."','dd/mm/yyyy') - AND TO_DATE('".$this->getDado('dtFim')."','dd/mm/yyyy') - ORDER BY transferencia.cod_tipo "; + LEFT JOIN sw_cgm_pessoa_juridica + ON sw_cgm.numcgm = sw_cgm_pessoa_juridica.numcgm + + INNER JOIN contabilidade.lote + ON lote.exercicio = transferencia.exercicio + AND lote.cod_entidade = transferencia.cod_entidade + AND lote.tipo = transferencia.tipo + AND lote.cod_lote = transferencia.cod_lote + + WHERE transferencia.cod_tipo = 2 + AND transferencia.tipo = 'T' + AND TO_DATE(timestamp_transferencia::VARCHAR,'yyyy-mm-dd') BETWEEN + TO_DATE('".$this->getDado('dtInicio')."'::VARCHAR,'dd/mm/yyyy')AND + TO_DATE('".$this->getDado('dtFim')."'::VARCHAR,'dd/mm/yyyy') + AND transferencia.cod_entidade IN (".$this->getDado('stEntidades').") + ) AS retorno + + GROUP BY tipo_registro + , unidade_gestora + , cod_tipo + , documento_credor + , nome_credor + , data_lancamento + , codigo_contabil + , num_lancamento + ORDER BY data_lancamento + "; return $stSql; } diff --git a/gestaoPrestacaoContas/fontes/PHP/TCMBA/classes/mapeamento/2015/TTCMBAMovRestoPagar.class.php b/gestaoPrestacaoContas/fontes/PHP/TCMBA/classes/mapeamento/2015/TTCMBAMovRestoPagar.class.php index a42a840..857409a 100644 --- a/gestaoPrestacaoContas/fontes/PHP/TCMBA/classes/mapeamento/2015/TTCMBAMovRestoPagar.class.php +++ b/gestaoPrestacaoContas/fontes/PHP/TCMBA/classes/mapeamento/2015/TTCMBAMovRestoPagar.class.php @@ -28,7 +28,7 @@ * Data de Criação : 03/09/2015 * @author Analista Valtair Santos * @author Desenvolvedor Evandro Melos - * $Id: TTCMBAMovRestoPagar.class.php 63510 2015-09-04 15:12:29Z evandro $ + * $Id: TTCMBAMovRestoPagar.class.php 63787 2015-10-13 18:41:08Z lisiane $ * $Rev:$ * $Author:$ * $Date:$ @@ -94,7 +94,7 @@ class TTCMBAMovRestoPagar extends Persistente { ON pre_empenho.exercicio = empenho.exercicio AND pre_empenho.cod_pre_empenho = empenho.cod_pre_empenho - INNER JOIN ( SELECT nota_liquidacao_paga.exercicio + LEFT JOIN ( SELECT nota_liquidacao_paga.exercicio , nota_liquidacao_paga.cod_entidade , nota_liquidacao_paga.cod_nota , ( SUM(COALESCE(nota_liquidacao_paga.vl_total,0.00)) - SUM(COALESCE(nota_liquidacao_paga_anulada.vl_anulado,0.00)) ) AS vl_total @@ -153,13 +153,18 @@ class TTCMBAMovRestoPagar extends Persistente { ON despesa.exercicio = pre_empenho_despesa.exercicio AND despesa.cod_despesa = pre_empenho_despesa.cod_despesa - LEFT JOIN empenho.restos_pre_empenho + INNER JOIN empenho.restos_pre_empenho ON restos_pre_empenho.exercicio = pre_empenho.exercicio AND restos_pre_empenho.cod_pre_empenho = pre_empenho.cod_pre_empenho + + INNER join empenho.empenho_anulado + ON empenho.exercicio = empenho_anulado.exercicio + AND empenho.cod_entidade = empenho_anulado.cod_entidade + AND empenho.cod_empenho = empenho_anulado.cod_empenho WHERE empenho.exercicio <= '".$this->getDado('exercicio_anterior')."' - AND empenho.dt_empenho <= TO_DATE('31/12/".$this->getDado('exercicio_anterior')."','dd/mm/yyyy') - AND nota_liquidacao.dt_liquidacao <= TO_DATE('31/12/".$this->getDado('exercicio_anterior')."','dd/mm/yyyy') + AND TO_DATE(empenho_anulado.timestamp::TEXT,'yyyy-mm-dd') BETWEEN TO_DATE('".$this->getDado('dt_inicial')."','dd/mm/yyyy') + AND TO_DATE('".$this->getDado('dt_final')."','dd/mm/yyyy') AND empenho.cod_entidade IN (".$this->getDado('cod_entidade').") "; return $stSql; diff --git a/gestaoPrestacaoContas/fontes/PHP/TCMBA/classes/mapeamento/2015/TTCMBAObraMedicao.class.php b/gestaoPrestacaoContas/fontes/PHP/TCMBA/classes/mapeamento/2015/TTCMBAObraMedicao.class.php index 2e6178e..f7ac13a 100644 --- a/gestaoPrestacaoContas/fontes/PHP/TCMBA/classes/mapeamento/2015/TTCMBAObraMedicao.class.php +++ b/gestaoPrestacaoContas/fontes/PHP/TCMBA/classes/mapeamento/2015/TTCMBAObraMedicao.class.php @@ -69,6 +69,7 @@ class TTCMBAObraMedicao extends Persistente , obra_medicao.cod_medicao AS num_medicao , obra_medicao.data_inicio AS dt_inicio_medicao , obra_medicao.data_final AS dt_final_medicao + , obra_medicao.data_medicao , obra_medicao.vl_medicao , obra_medicao.nro_nota_fiscal AS num_nota_fiscal , obra_medicao.data_nota_fiscal AS dt_nota_fiscal @@ -79,6 +80,7 @@ class TTCMBAObraMedicao extends Persistente , obra_fiscal.matricula AS matricula_fiscal_1 , '' AS cpf_cnpj_resp_2 , '' AS matricula_fiscal_2 + , '' AS registro_classe_2 , '".$this->getDado('competencia')."' AS competencia FROM tcmba.obra @@ -88,6 +90,12 @@ class TTCMBAObraMedicao extends Persistente AND obra_fiscal.cod_entidade = obra.cod_entidade AND obra_fiscal.exercicio = obra.exercicio AND obra_fiscal.cod_tipo = obra.cod_tipo + AND obra_fiscal.data_inicio = (SELECT MAX(OF.data_inicio) FROM tcmba.obra_fiscal AS OF + WHERE OF.cod_obra = obra_fiscal.cod_obra + AND OF.cod_entidade = obra_fiscal.cod_entidade + AND OF.exercicio = obra_fiscal.exercicio + AND OF.cod_tipo = obra_fiscal.cod_tipo + ) INNER JOIN tcmba.obra_medicao ON obra_medicao.cod_obra = obra.cod_obra @@ -109,8 +117,8 @@ class TTCMBAObraMedicao extends Persistente ) AS responsavel_fiscal ON responsavel_fiscal.numcgm = obra_fiscal.numcgm - WHERE obra_medicao.data_final > TO_DATE('".$this->getDado('data_inicial')."','dd/mm/yyyy') - AND obra_medicao.data_inicio < TO_DATE('".$this->getDado('data_final')."','dd/mm/yyyy') + WHERE obra_medicao.data_medicao BETWEEN TO_DATE('".$this->getDado('data_inicial')."','dd/mm/yyyy') + AND TO_DATE('".$this->getDado('data_final')."','dd/mm/yyyy') "; return $stSql; } diff --git a/gestaoPrestacaoContas/fontes/PHP/TCMBA/classes/mapeamento/2015/TTCMBAPatrimonio.class.php b/gestaoPrestacaoContas/fontes/PHP/TCMBA/classes/mapeamento/2015/TTCMBAPatrimonio.class.php index 470fd2a..2672ec4 100755 --- a/gestaoPrestacaoContas/fontes/PHP/TCMBA/classes/mapeamento/2015/TTCMBAPatrimonio.class.php +++ b/gestaoPrestacaoContas/fontes/PHP/TCMBA/classes/mapeamento/2015/TTCMBAPatrimonio.class.php @@ -75,7 +75,7 @@ function montaRecuperaDadosTribunal() $stSql = " SELECT 1 AS tipo_registro , ".$this->getDado('inCodGestora')." AS unidade_gestora - , TO_CHAR(bem.dt_aquisicao,'yyyy') AS exercicio + , TO_CHAR(bem.".$this->getDado('tipoPeriodo').",'yyyy') AS exercicio , bem.num_placa AS tombo_bem , tipo_bem.cod_tipo_tcm AS tipo_bem , TRANSLATE(bem.descricao, ';,!?', '') AS descricao @@ -84,7 +84,7 @@ function montaRecuperaDadosTribunal() , bem.vl_bem AS valor_bem , sw_cgm.nom_cgm AS funcionario_responsavel , sw_cgm_pessoa_fisica.cpf - , TO_CHAR(bem.dt_aquisicao,'dd/mm/yyyy') AS data_aquisicao + , TO_CHAR(bem.".$this->getDado('tipoPeriodo').",'dd/mm/yyyy') AS data_aquisicao , TO_CHAR(bem_baixado.dt_baixa,'dd/mm/yyyy') AS data_baixa , 000 as num_orgao , 000 as num_unidade @@ -157,7 +157,7 @@ function montaRecuperaDadosTribunal() ) AS historico_bem ON historico_bem.cod_bem = bem.cod_bem - WHERE bem.dt_aquisicao BETWEEN TO_DATE('".$this->getDado('dt_inicio')."','dd/mm/yyyy') AND TO_DATE('".$this->getDado('dt_fim')."','dd/mm/yyyy') + WHERE bem.".$this->getDado('tipoPeriodo')." BETWEEN TO_DATE('".$this->getDado('dt_inicio')."','dd/mm/yyyy') AND TO_DATE('".$this->getDado('dt_fim')."','dd/mm/yyyy') OR ( ((bem_baixado.cod_bem IS NOT NULL) AND (bem_baixado.dt_baixa BETWEEN TO_DATE('".$this->getDado('dt_inicio')."','dd/mm/yyyy') AND TO_DATE('".$this->getDado('dt_fim')."','dd/mm/yyyy'))) ) \n "; diff --git a/gestaoPrestacaoContas/fontes/PHP/TCMBA/classes/mapeamento/2015/TTCMBAPessoal.class.php b/gestaoPrestacaoContas/fontes/PHP/TCMBA/classes/mapeamento/2015/TTCMBAPessoal.class.php new file mode 100644 index 0000000..40380d6 --- /dev/null +++ b/gestaoPrestacaoContas/fontes/PHP/TCMBA/classes/mapeamento/2015/TTCMBAPessoal.class.php @@ -0,0 +1,296 @@ +montaRecuperaPessoal().$stCondicao.$stOrdem; + $this->setDebug( $stSql ); + $obErro = $obConexao->executaSQL( $rsRecordSet, $stSql, $boTransacao,$obConexao ); + return $obErro; + } + + public function montaRecuperaPessoal() + { + $stSql=" SELECT DISTINCT + 1 AS tipo_registro + , ".$this->getDado('unidade_gestora')." AS unidade_gestora + , contrato_servidor.cod_cargo + , CASE WHEN tipos_atos_pessoal IS NOT NULL THEN + tipos_atos_pessoal.tipo_ato::integer + ELSE + tipo_ato_pessoal.cod_tipo + END AS tipo_ato + , contrato.registro AS matricula + , contrato_servidor_nomeacao_posse.dt_admissao + , sw_cgm.nom_cgm AS nome_servidor + , sw_cgm_pessoa_fisica.cpf + , sw_cgm_pessoa_fisica.dt_nascimento + ,CASE WHEN tipo_ato_pessoal.cod_tipo NOT IN (4,7,22,24,26,32,23,13,14,15,25,35) THEN + norma.num_norma + ELSE + '' + END AS numero_ato + , norma.dt_publicacao as data_ato + , '' AS imprensa_oficial + , edital.cod_edital as numero_concurso + ,CASE WHEN tipo_ato_pessoal.cod_tipo = 4 THEN + norma.num_norma + ELSE + '' + END AS numero_ato + , '' AS reservado_tcm + , '' AS imprensa_oficial_ato + ,CASE WHEN de_para_tipo_cargo_tcmba.cod_tipo_cargo_tce = 2 THEN + 1 + ELSE + 2 + END AS cargo_efetivo + , '".$this->getDado('competencia')."' AS competencia + , '' AS fundamentacao_legal + , '' AS reservado_tcm2 + , de_para_tipo_cargo_tcmba.cod_tipo_regime_tce AS tipo_regime + , CASE WHEN assentamento_assentamento.cod_motivo = 7 THEN + assentamento_gerado.periodo_inicial + END AS data_efetivacao + ,CASE WHEN ( SELECT recuperarSituacaoDoContrato(contrato_servidor.cod_contrato + , contrato_servidor_periodo.cod_periodo_movimentacao + ,'".$this->getDado('entidades')."' + ) + ) = 'A' + THEN + 1 + ELSE + 2 + END AS indicador_acumulo_cargo + , '' AS orgao_entidade + ,CASE WHEN de_para_tipo_cargo_tcmba.cod_tipo_cargo_tce = 4 THEN + cargo.descricao + ELSE + '' + END AS funcao_servidor_temporario + , '' AS reservado_tcm3 + , cargo.cod_cargo||' - '||cargo.descricao as funcao_desempenhada + , orgao_descricao.descricao + ,CASE WHEN adido_cedido.indicativo_onus = 'c' THEN + '1' + ELSE + '2' + END AS onus_cedente + , adido_cedido.cgm_cedente_cessionario||' - '||sw_cgm.nom_cgm AS nome_cedente + , '' AS numero_processo + , recuperaCargoAcumuladoServidor(contrato_servidor.cod_contrato + ,servidor_contrato_servidor.cod_servidor + ,'".$this->getDado('periodo_movimentacao')."' + ,'".$this->getDado('entidades')."' + ) AS nome_cargo_acumulado + ,CASE WHEN tipo_ato_pessoal.cod_tipo <> 4 THEN + norma.dt_publicacao + END AS data_publicacao + ,CASE WHEN tipo_ato_pessoal.cod_tipo = 4 THEN + norma.dt_publicacao + END AS data_publicacao_afastamento + , '' AS justificativa_contratacao + , CASE WHEN assentamento_assentamento.cod_motivo = 7 THEN + assentamento_gerado.periodo_final + END AS data_termino_contrato + , '' AS cargo_anterior + , '' AS processo_numero_tcm + , '' AS processo_digito_tcm + , '' AS processo_ano_tcm + ,CASE WHEN adido_cedido.indicativo_onus = 'c' THEN + cargo.cod_cargo||' - '||cargo.descricao + END AS cargo_origem_destino_cessao + , 'N' AS status_concurso + , 2 AS anterior_siga + + FROM pessoal".$this->getDado('entidades').".contrato + + LEFT JOIN pessoal".$this->getDado('entidades').".contrato_pensionista + ON contrato_pensionista.cod_contrato = contrato.cod_contrato + + LEFT JOIN pessoal".$this->getDado('entidades').".contrato_servidor + ON contrato.cod_contrato = contrato_servidor.cod_contrato + + LEFT JOIN (SELECT contrato_servidor_nomeacao_posse.* + FROM pessoal".$this->getDado('entidades').".contrato_servidor_nomeacao_posse + INNER JOIN( SELECT max_nomeacao.cod_contrato + , max(max_nomeacao.timestamp) as timestamp + FROM pessoal".$this->getDado('entidades').".contrato_servidor_nomeacao_posse as max_nomeacao + WHERE max_nomeacao.timestamp <= (ultimoTimestampPeriodoMovimentacao('".$this->getDado('periodo_movimentacao')."' + ,'".$this->getDado('entidades')."') + )::timestamp + GROUP BY max_nomeacao.cod_contrato + ) as max_nomeacao + ON max_nomeacao.cod_contrato = contrato_servidor_nomeacao_posse.cod_contrato + AND max_nomeacao.timestamp = contrato_servidor_nomeacao_posse.timestamp + ) as contrato_servidor_nomeacao_posse + ON contrato_servidor_nomeacao_posse.cod_contrato = contrato_servidor.cod_contrato + + LEFT JOIN pessoal".$this->getDado('entidades').".servidor_contrato_servidor + ON servidor_contrato_servidor.cod_contrato = contrato_servidor.cod_contrato + + LEFT JOIN pessoal".$this->getDado('entidades').".servidor + ON servidor.cod_servidor = servidor_contrato_servidor.cod_servidor + + INNER JOIN sw_cgm + ON sw_cgm.numcgm = servidor.numcgm + + INNER JOIN sw_cgm_pessoa_fisica + ON sw_cgm_pessoa_fisica.numcgm = sw_cgm.numcgm + + LEFT JOIN folhapagamento".$this->getDado('entidades').".contrato_servidor_periodo + ON contrato_servidor_periodo.cod_contrato = contrato.cod_contrato + + LEFT JOIN normas.norma + ON norma.cod_norma = contrato_servidor.cod_norma + + LEFT JOIN pessoal".$this->getDado('entidades').".assentamento_gerado_contrato_servidor + ON assentamento_gerado_contrato_servidor.cod_contrato = contrato.cod_contrato + + LEFT JOIN (SELECT assentamento_gerado.* + FROM pessoal".$this->getDado('entidades').".assentamento_gerado + INNER JOIN(SELECT MAX(max_assentamento_gerado.timestamp) as timestamp + , max_assentamento_gerado.cod_assentamento_gerado + FROM pessoal".$this->getDado('entidades').".assentamento_gerado as max_assentamento_gerado + WHERE max_assentamento_gerado.timestamp <= (ultimoTimestampPeriodoMovimentacao('".$this->getDado('periodo_movimentacao')."' + ,'".$this->getDado('entidades')."') + )::timestamp + GROUP BY max_assentamento_gerado.cod_assentamento_gerado + ) as max_assentamento_gerado + ON max_assentamento_gerado.cod_assentamento_gerado = assentamento_gerado.cod_assentamento_gerado + AND max_assentamento_gerado.timestamp = assentamento_gerado.timestamp + )as assentamento_gerado + ON assentamento_gerado.cod_assentamento_gerado = assentamento_gerado_contrato_servidor.cod_assentamento_gerado + AND (TO_CHAR(assentamento_gerado.periodo_inicial,'yyyymm') <= '".$this->getDado('competencia')."' + AND + (TO_CHAR(assentamento_gerado.periodo_final,'yyyymm') >= '".$this->getDado('competencia')."' ) OR assentamento_gerado.periodo_final is null) + + LEFT JOIN pessoal".$this->getDado('entidades').".assentamento_assentamento + ON assentamento_assentamento.cod_assentamento = assentamento_gerado.cod_assentamento + + INNER JOIN pessoal".$this->getDado('entidades').".tcmba_assentamento_ato_pessoal + ON tcmba_assentamento_ato_pessoal.cod_assentamento = assentamento_assentamento.cod_assentamento + + INNER JOIN tcmba.tipo_ato_pessoal + ON tipo_ato_pessoal.cod_tipo = tcmba_assentamento_ato_pessoal.cod_tipo_ato_pessoal + + LEFT JOIN concurso.candidato + ON candidato.numcgm = sw_cgm_pessoa_fisica.numcgm + + LEFT JOIN concurso.concurso_candidato + ON concurso_candidato.cod_candidato = candidato.cod_candidato + + LEFT JOIN concurso.edital + ON edital.cod_edital = concurso_candidato.cod_edital + + INNER JOIN pessoal".$this->getDado('entidades').".sub_divisao + ON sub_divisao.cod_sub_divisao = contrato_servidor.cod_sub_divisao + + LEFT JOIN pessoal".$this->getDado('entidades').".de_para_tipo_cargo_tcmba + ON de_para_tipo_cargo_tcmba.cod_sub_divisao = sub_divisao.cod_sub_divisao + + LEFT JOIN (SELECT contrato_servidor_funcao.* + FROM pessoal".$this->getDado('entidades').".contrato_servidor_funcao + INNER JOIN (SELECT max.cod_contrato + , max(max.timestamp) as timestamp + FROM pessoal".$this->getDado('entidades').".contrato_servidor_funcao as max + WHERE max.timestamp <= (ultimoTimestampPeriodoMovimentacao('".$this->getDado('periodo_movimentacao')."' + ,'".$this->getDado('entidades')."') + )::timestamp + GROUP BY max.cod_contrato + ) as max_contrato_servidor_funcao + ON max_contrato_servidor_funcao.cod_contrato = contrato_servidor_funcao.cod_contrato + AND max_contrato_servidor_funcao.timestamp = contrato_servidor_funcao.timestamp + ) AS contrato_servidor_funcao + ON contrato_servidor_funcao.cod_contrato = contrato_servidor.cod_contrato + + LEFT JOIN pessoal".$this->getDado('entidades').".cargo + ON cargo.cod_cargo = contrato_servidor_funcao.cod_cargo + + LEFT JOIN (SELECT contrato_servidor_orgao.* + FROM pessoal".$this->getDado('entidades').".contrato_servidor_orgao + INNER JOIN( SELECT max.cod_contrato + , max(max.timestamp) as timestamp + FROM pessoal".$this->getDado('entidades').".contrato_servidor_orgao as max + WHERE max.timestamp <= (ultimoTimestampPeriodoMovimentacao('".$this->getDado('periodo_movimentacao')."' + ,'".$this->getDado('entidades')."') + )::timestamp + GROUP BY max.cod_contrato + ) AS max_contrato_servidor_orgao + ON max_contrato_servidor_orgao.cod_contrato = contrato_servidor_orgao.cod_contrato + AND max_contrato_servidor_orgao.timestamp = contrato_servidor_orgao.timestamp + ) AS contrato_servidor_orgao + ON contrato_servidor_orgao.cod_contrato = contrato_servidor.cod_contrato + + LEFT JOIN organograma.orgao_descricao + ON orgao_descricao.cod_orgao = contrato_servidor_orgao.cod_orgao + + LEFT JOIN pessoal".$this->getDado('entidades').".adido_cedido + ON adido_cedido.cod_contrato = contrato_servidor.cod_contrato + + LEFT JOIN (SELECT * + FROM tcmba.recuperaAtosDePessoalTCMBA('".$this->getDado('periodo_movimentacao')."' + , '".$this->getDado('competencia')."' + , '".$this->getDado('entidades')."' + ) + AS resultado( + tipo_ato INTEGER + ,cod_contrato INTEGER + ) + )as tipos_atos_pessoal + ON tipos_atos_pessoal.cod_contrato::integer = contrato.cod_contrato + + WHERE contrato_servidor_periodo.cod_periodo_movimentacao = '".$this->getDado('periodo_movimentacao')."' + + ORDER BY sw_cgm.nom_cgm + + "; + + return $stSql; + } +} diff --git a/gestaoPrestacaoContas/fontes/PHP/TCMBA/classes/mapeamento/2015/TTCMBAProrrogParc.class.php b/gestaoPrestacaoContas/fontes/PHP/TCMBA/classes/mapeamento/2015/TTCMBAProrrogParc.class.php index 08dedf6..5f8b1a6 100644 --- a/gestaoPrestacaoContas/fontes/PHP/TCMBA/classes/mapeamento/2015/TTCMBAProrrogParc.class.php +++ b/gestaoPrestacaoContas/fontes/PHP/TCMBA/classes/mapeamento/2015/TTCMBAProrrogParc.class.php @@ -60,7 +60,7 @@ class TTCMBAProrrogParc extends Persistente $stSql = " SELECT 1 AS tipo_registro , ".$this->getDado('unidade_gestora')." AS unidade_gestora , nro_processo - , '1111111' as competencia + , '".$this->getDado('competencia')."' AS competencia , dt_prorrogacao , '' as reservado_tcm , CASE WHEN indicador_adimplemento IS TRUE THEN diff --git a/gestaoPrestacaoContas/fontes/PHP/TCMBA/classes/mapeamento/2015/TTCMBARetencaoEmpresa.class.php b/gestaoPrestacaoContas/fontes/PHP/TCMBA/classes/mapeamento/2015/TTCMBARetencaoEmpresa.class.php index 3bc731b..d3de234 100644 --- a/gestaoPrestacaoContas/fontes/PHP/TCMBA/classes/mapeamento/2015/TTCMBARetencaoEmpresa.class.php +++ b/gestaoPrestacaoContas/fontes/PHP/TCMBA/classes/mapeamento/2015/TTCMBARetencaoEmpresa.class.php @@ -29,7 +29,7 @@ * @author Analista Valtair Santos * @author Desenvolvedor Michel Teixeira * - * $Id: TTCMBARetencaoEmpresa.class.php 63716 2015-10-01 19:03:03Z carlos.silva $ + * $Id: TTCMBARetencaoEmpresa.class.php 64041 2015-11-23 17:09:34Z lisiane $ */ include_once '../../../../../../gestaoAdministrativa/fontes/PHP/framework/include/valida.inc.php'; include_once CLA_PERSISTENTE; @@ -68,7 +68,7 @@ class TTCMBARetencaoEmpresa extends Persistente { , empenho.exercicio AS ano_criacao , to_char(nota_liquidacao_paga.timestamp,'dd/mm/yyyy') AS dt_pagamento_empenho , REPLACE(plano_conta.cod_estrutural,'.','') AS conta_contabil - , COALESCE(SUM(ordem_pagamento_retencao.vl_retencao),0.00) AS vl_retencao + , COALESCE(ordem_pagamento_retencao.vl_retencao,0.00) AS vl_retencao , '".$this->getDado('competencia')."' AS competencia , '' AS reservado_tcm @@ -88,28 +88,64 @@ class TTCMBARetencaoEmpresa extends Persistente { AND empenho.cod_empenho = nota_liquidacao.cod_empenho INNER JOIN empenho.pagamento_liquidacao - ON nota_liquidacao.exercicio = pagamento_liquidacao.exercicio + ON nota_liquidacao.exercicio = pagamento_liquidacao.exercicio_liquidacao AND nota_liquidacao.cod_entidade = pagamento_liquidacao.cod_entidade - AND nota_liquidacao.cod_nota = pagamento_liquidacao.cod_nota + AND nota_liquidacao.cod_nota = pagamento_liquidacao.cod_nota + + INNER JOIN empenho.pagamento_liquidacao_nota_liquidacao_paga + ON pagamento_liquidacao_nota_liquidacao_paga.exercicio = pagamento_liquidacao.exercicio + AND pagamento_liquidacao_nota_liquidacao_paga.cod_entidade = pagamento_liquidacao.cod_entidade + AND pagamento_liquidacao_nota_liquidacao_paga.cod_ordem = pagamento_liquidacao.cod_ordem + AND pagamento_liquidacao_nota_liquidacao_paga.exercicio_liquidacao = pagamento_liquidacao.exercicio_liquidacao + AND pagamento_liquidacao_nota_liquidacao_paga.cod_nota = pagamento_liquidacao.cod_nota + + INNER JOIN empenho.nota_liquidacao_paga + ON pagamento_liquidacao_nota_liquidacao_paga.cod_entidade = nota_liquidacao_paga.cod_entidade + AND pagamento_liquidacao_nota_liquidacao_paga.timestamp = nota_liquidacao_paga.timestamp + AND pagamento_liquidacao_nota_liquidacao_paga.exercicio_liquidacao = nota_liquidacao_paga.exercicio + AND pagamento_liquidacao_nota_liquidacao_paga.cod_nota = nota_liquidacao_paga.cod_nota + + INNER JOIN empenho.nota_liquidacao_conta_pagadora + ON nota_liquidacao_conta_pagadora.cod_entidade = nota_liquidacao_paga.cod_entidade + AND nota_liquidacao_conta_pagadora.cod_nota = nota_liquidacao_paga.cod_nota + AND nota_liquidacao_conta_pagadora.exercicio_liquidacao = nota_liquidacao_paga.exercicio + AND nota_liquidacao_conta_pagadora.timestamp = nota_liquidacao_paga.timestamp + + INNER JOIN ( + SELECT plano_analitica.exercicio + , plano_analitica.cod_plano + , plano_conta.nom_conta + , recurso.cod_recurso + , recurso.nom_recurso + , plano_conta.cod_estrutural + FROM contabilidade.plano_analitica + INNER JOIN contabilidade.plano_conta + ON plano_conta.cod_conta = plano_analitica.cod_conta + AND plano_conta.exercicio = plano_analitica.exercicio + INNER JOIN contabilidade.plano_recurso + ON plano_recurso.cod_plano = plano_analitica.cod_plano + AND plano_recurso.exercicio = plano_analitica.exercicio + INNER JOIN orcamento.recurso + ON recurso.exercicio = plano_recurso.exercicio + AND recurso.cod_recurso = plano_recurso.cod_recurso + ) AS conta + ON conta.cod_plano = nota_liquidacao_conta_pagadora.cod_plano + AND conta.exercicio = nota_liquidacao_conta_pagadora.exercicio + AND conta.cod_estrutural ilike '1.1.1.1.1.01%' INNER JOIN empenho.ordem_pagamento ON pagamento_liquidacao.exercicio = ordem_pagamento.exercicio AND pagamento_liquidacao.cod_entidade = ordem_pagamento.cod_entidade - AND pagamento_liquidacao.cod_ordem = ordem_pagamento.cod_ordem + AND pagamento_liquidacao.cod_ordem = ordem_pagamento.cod_ordem INNER JOIN empenho.ordem_pagamento_retencao ON ordem_pagamento.exercicio = ordem_pagamento_retencao.exercicio AND ordem_pagamento.cod_entidade = ordem_pagamento_retencao.cod_entidade - AND ordem_pagamento.cod_ordem = ordem_pagamento_retencao.cod_ordem - - INNER JOIN empenho.nota_liquidacao_paga - ON nota_liquidacao.exercicio = nota_liquidacao_paga.exercicio - AND nota_liquidacao.cod_entidade = nota_liquidacao_paga.cod_entidade - AND nota_liquidacao.cod_nota = nota_liquidacao_paga.cod_nota + AND ordem_pagamento.cod_ordem = ordem_pagamento_retencao.cod_ordem INNER JOIN contabilidade.plano_analitica ON ordem_pagamento_retencao.exercicio = plano_analitica.exercicio - AND ordem_pagamento_retencao.cod_plano = plano_analitica.cod_plano + AND ordem_pagamento_retencao.cod_plano = plano_analitica.cod_plano INNER JOIN contabilidade.plano_conta ON plano_analitica.exercicio = plano_conta.exercicio @@ -123,12 +159,12 @@ class TTCMBARetencaoEmpresa extends Persistente { ON pre_empenho_despesa.cod_conta = conta_despesa.cod_conta AND pre_empenho_despesa.exercicio = conta_despesa.exercicio - WHERE to_char(nota_liquidacao_paga.timestamp,'yyyy') = '".$this->getDado('exercicio')."' - AND to_date(to_char(nota_liquidacao_paga.timestamp,'dd/mm/yyyy'),'dd/mm/yyyy') BETWEEN TO_DATE('".$this->getDado('dt_inicial')."','dd/mm/yyyy') - AND TO_DATE('".$this->getDado('dt_final')."','dd/mm/yyyy') - AND nota_liquidacao.cod_entidade IN (".$this->getDado('cod_entidade').") - --EXCETO FOLHA DE PAGAMENTO - AND conta_despesa.cod_estrutural NOT LIKE ('3.1%') + WHERE to_char(nota_liquidacao_paga.timestamp,'yyyy') = '".$this->getDado('exercicio')."' + AND to_date(to_char(nota_liquidacao_paga.timestamp,'dd/mm/yyyy'),'dd/mm/yyyy') BETWEEN TO_DATE('".$this->getDado('dt_inicial')."','dd/mm/yyyy') + AND TO_DATE('".$this->getDado('dt_final')."','dd/mm/yyyy') + AND nota_liquidacao.cod_entidade IN (".$this->getDado('cod_entidade').") + --EXCETO FOLHA DE PAGAMENTO + AND conta_despesa.cod_estrutural NOT LIKE ('3.1%') GROUP BY to_char(nota_liquidacao_paga.timestamp,'dd/mm/yyyy') , to_char(nota_liquidacao_paga.timestamp,'yyyy') @@ -137,11 +173,11 @@ class TTCMBARetencaoEmpresa extends Persistente { , plano_conta.cod_estrutural , conta_despesa.cod_estrutural , pagamento_liquidacao.cod_ordem + , ordem_pagamento_retencao.vl_retencao ORDER BY pagamento_liquidacao.cod_ordem , empenho.cod_empenho , dt_pagamento_empenho "; - return $stSql; } diff --git a/gestaoPrestacaoContas/fontes/PHP/TCMBA/classes/mapeamento/2015/TTCMBASalario2.class.php b/gestaoPrestacaoContas/fontes/PHP/TCMBA/classes/mapeamento/2015/TTCMBASalario2.class.php new file mode 100644 index 0000000..fb8360e --- /dev/null +++ b/gestaoPrestacaoContas/fontes/PHP/TCMBA/classes/mapeamento/2015/TTCMBASalario2.class.php @@ -0,0 +1,266 @@ +setEstrutura( array() ); + $this->setEstruturaAuxiliar( array() ); + $this->setDado('exercicio', Sessao::getExercicio() ); + } + + public function recuperaDados(&$rsRecordSet, $stCondicao = "" , $stOrdem = "" , $boTransacao = "") + { + $obErro = new Erro; + $obConexao = new Conexao; + $rsRecordSet = new RecordSet; + + $stSql = $this->montaRecuperaDados().$stCondicao.$stOrdem; + $this->setDebug( $stSql ); + $obErro = $obConexao->executaSQL( $rsRecordSet, $stSql, $boTransacao ); + + return $obErro; + } + + function montaRecuperaDados() + { + $stSql = " SELECT 1 AS tipo_registro + , ".$this->getDado('unidade_gestora')." AS unidade_gestora + , '".$this->getDado('competencia')."' AS competencia + , * + FROM tcmba.recuperaServidorSalario2( '".$this->getDado('exercicio')."' + , '".$this->getDado('entidades')."' + , '".$this->getDado('entidade_rh')."' + , '".$this->getDado('mes_ano')."' ) + "; + + return $stSql; + } + + function recuperaLogErro(&$rsRecordSet, $stCondicao = "" , $stOrdem = "" , $boTransacao = "") + { + $obErro = new Erro; + $obConexao = new Conexao; + $rsRecordSet = new RecordSet; + + $stSql = $this->montaRecuperaLogErro().$stCondicao.$stOrdem; + $this->setDebug( $stSql ); + $obErro = $obConexao->executaSQL( $rsRecordSet, $stSql, $boTransacao ); + + return $obErro; + } + + function montaRecuperaLogErro() + { + $stSql = " + SELECT count(contrato.cod_contrato) AS registros + , ( SELECT count(cod_evento) + FROM folhapagamento".$this->getDado('entidade_rh').".tcmba_salario_base + WHERE cod_entidade IN (".$this->getDado('entidades').") + AND exercicio = '".$this->getDado('exercicio')."' + ) AS obrigatorio1 + , ( SELECT count(cod_evento) + FROM folhapagamento".$this->getDado('entidade_rh').".tcmba_vantagens_salariais + WHERE cod_entidade IN (".$this->getDado('entidades').") + AND exercicio = '".$this->getDado('exercicio')."' + ) AS obrigatorio2 + , ( SELECT count(cod_evento) + FROM folhapagamento".$this->getDado('entidade_rh').".tcmba_gratificacao_funcao + WHERE cod_entidade IN (".$this->getDado('entidades').") + AND exercicio = '".$this->getDado('exercicio')."' + ) AS obrigatorio3 + , ( SELECT count(cod_evento) + FROM folhapagamento".$this->getDado('entidade_rh').".tcmba_salario_familia + WHERE cod_entidade IN (".$this->getDado('entidades').") + AND exercicio = '".$this->getDado('exercicio')."' + ) AS obrigatorio4 + , ( SELECT count(cod_evento) + FROM folhapagamento".$this->getDado('entidade_rh').".tcmba_salario_horas_extras + WHERE cod_entidade IN (".$this->getDado('entidades').") + AND exercicio = '".$this->getDado('exercicio')."' + ) AS obrigatorio5 + , ( SELECT count(cod_evento) + FROM folhapagamento".$this->getDado('entidade_rh').".tcmba_salario_descontos + WHERE cod_entidade IN (".$this->getDado('entidades').") + AND exercicio = '".$this->getDado('exercicio')."' + ) AS obrigatorio6 + , ( SELECT count(cod_evento) + FROM folhapagamento".$this->getDado('entidade_rh').".tcmba_plano_saude + WHERE cod_entidade IN (".$this->getDado('entidades').") + AND exercicio = '".$this->getDado('exercicio')."' + ) AS obrigatorio7 + , count(contrato_servidor.num_orgao) AS obrigatorio8 + , count(de_para_tipo_cargo_tcmba.cod_tipo_cargo_tce) AS obrigatorio9 + , count(tcmba_cargo_servidor.cod_cargo) AS obrigatorio10 + , count(fonte_recurso_lotacao.cod_orgao) AS obrigatorio11 + , count(tcmba_cargo_servidor_temporario.cod_cargo) AS obrigatorio12 + FROM ( + SELECT contrato.cod_contrato + FROM pessoal".$this->getDado('entidade_rh').".contrato + + INNER JOIN folhapagamento".$this->getDado('entidade_rh').".periodo_movimentacao + ON to_char(periodo_movimentacao.dt_inicial,'mmyyyy') = '".$this->getDado('mes_ano')."' + + LEFT JOIN folhapagamento".$this->getDado('entidade_rh').".registro_evento_periodo + ON periodo_movimentacao.cod_periodo_movimentacao = registro_evento_periodo.cod_periodo_movimentacao + AND contrato.cod_contrato = registro_evento_periodo.cod_contrato + + LEFT JOIN ( select max(cod_complementar) as cod_complementar + , cod_contrato + , cod_periodo_movimentacao + from folhapagamento".$this->getDado('entidade_rh').".registro_evento_complementar + group by registro_evento_complementar.cod_contrato + , registro_evento_complementar.cod_periodo_movimentacao + ) AS registro_evento_complementar + ON contrato.cod_contrato = registro_evento_complementar.cod_contrato + AND registro_evento_complementar.cod_periodo_movimentacao = periodo_movimentacao.cod_periodo_movimentacao + + LEFT JOIN folhapagamento".$this->getDado('entidade_rh').".registro_evento_ferias + ON periodo_movimentacao.cod_periodo_movimentacao = registro_evento_ferias.cod_periodo_movimentacao + AND contrato.cod_contrato = registro_evento_ferias.cod_contrato + + LEFT JOIN folhapagamento".$this->getDado('entidade_rh').".registro_evento_decimo + ON periodo_movimentacao.cod_periodo_movimentacao = registro_evento_decimo.cod_periodo_movimentacao + AND contrato.cod_contrato = registro_evento_decimo.cod_contrato + + WHERE registro_evento_periodo.cod_contrato IS NOT NULL + OR registro_evento_complementar.cod_contrato IS NOT NULL + OR registro_evento_decimo.cod_contrato IS NOT NULL + OR registro_evento_ferias.cod_contrato IS NOT NULL + + GROUP BY contrato.cod_contrato + ) AS contrato + + INNER JOIN ( SELECT servidor_contrato_servidor.cod_contrato + , contrato_servidor_orgao.cod_orgao + , de_para_lotacao_orgao.num_orgao + , contrato_servidor.cod_sub_divisao + , contrato_servidor.cod_cargo + FROM pessoal".$this->getDado('entidade_rh').".servidor + INNER JOIN pessoal".$this->getDado('entidade_rh').".servidor_contrato_servidor + ON servidor_contrato_servidor.cod_servidor = servidor.cod_servidor + INNER JOIN pessoal".$this->getDado('entidade_rh').".contrato_servidor + ON contrato_servidor.cod_contrato = servidor_contrato_servidor.cod_contrato + INNER JOIN (SELECT contrato_servidor_orgao.cod_contrato + , contrato_servidor_orgao.cod_orgao + , contrato_servidor_orgao.timestamp + FROM pessoal".$this->getDado('entidade_rh').".contrato_servidor_orgao + WHERE contrato_servidor_orgao.timestamp = ( + SELECT max(CSO.timestamp) AS timestamp + FROM pessoal".$this->getDado('entidade_rh').".contrato_servidor_orgao AS CSO + WHERE CSO.cod_contrato = contrato_servidor_orgao.cod_contrato + ) + ) AS contrato_servidor_orgao + ON contrato_servidor_orgao.cod_contrato = contrato_servidor.cod_contrato + LEFT JOIN pessoal".$this->getDado('entidade_rh').".de_para_lotacao_orgao + ON de_para_lotacao_orgao.cod_orgao = contrato_servidor_orgao.cod_orgao + AND de_para_lotacao_orgao.exercicio = '".$this->getDado('exercicio')."' + + UNION + + SELECT contrato_pensionista.cod_contrato + , contrato_pensionista_orgao.cod_orgao + , de_para_lotacao_orgao.num_orgao + , contrato_servidor.cod_sub_divisao + , contrato_servidor.cod_cargo + FROM pessoal".$this->getDado('entidade_rh').".pensionista + INNER JOIN pessoal".$this->getDado('entidade_rh').".contrato_pensionista + ON contrato_pensionista.cod_pensionista = pensionista.cod_pensionista + AND contrato_pensionista.cod_contrato_cedente = pensionista.cod_contrato_cedente + INNER JOIN pessoal".$this->getDado('entidade_rh').".contrato_servidor + ON contrato_servidor.cod_contrato = contrato_pensionista.cod_contrato_cedente + INNER JOIN (SELECT contrato_pensionista_orgao.* + FROM pessoal".$this->getDado('entidade_rh').".contrato_pensionista_orgao + WHERE contrato_pensionista_orgao.timestamp = ( + SELECT max(CPO.timestamp) AS timestamp + FROM pessoal".$this->getDado('entidade_rh').".contrato_pensionista_orgao AS CPO + WHERE CPO.cod_contrato = contrato_pensionista_orgao.cod_contrato + ) + ) AS contrato_pensionista_orgao + ON contrato_pensionista_orgao.cod_contrato = contrato_pensionista.cod_contrato + LEFT JOIN pessoal".$this->getDado('entidade_rh').".de_para_lotacao_orgao + ON de_para_lotacao_orgao.cod_orgao = contrato_pensionista_orgao.cod_orgao + AND de_para_lotacao_orgao.exercicio = '".$this->getDado('exercicio')."' + ) AS contrato_servidor + ON contrato.cod_contrato = contrato_servidor.cod_contrato + + LEFT JOIN pessoal".$this->getDado('entidade_rh').".de_para_tipo_cargo_tcmba + ON de_para_tipo_cargo_tcmba.cod_sub_divisao = contrato_servidor.cod_sub_divisao + + LEFT JOIN ( select cod_cargo + , cod_entidade + , exercicio + from folhapagamento".$this->getDado('entidade_rh').".tcmba_cargo_servidor + group by cod_cargo + , cod_entidade + , exercicio + ) AS tcmba_cargo_servidor + ON tcmba_cargo_servidor.cod_cargo = contrato_servidor.cod_cargo + AND tcmba_cargo_servidor.cod_entidade IN (".$this->getDado('entidades').") + AND tcmba_cargo_servidor.exercicio = '".$this->getDado('exercicio')."' + + LEFT JOIN ( select cod_orgao + , cod_entidade + , exercicio + from tcmba.fonte_recurso_lotacao + group by cod_orgao + , cod_entidade + , exercicio + ) AS fonte_recurso_lotacao + ON fonte_recurso_lotacao.cod_orgao = contrato_servidor.cod_orgao + AND fonte_recurso_lotacao.cod_entidade IN (".$this->getDado('entidades').") + AND fonte_recurso_lotacao.exercicio = '".$this->getDado('exercicio')."' + + LEFT JOIN ( select cod_cargo + , cod_entidade + , exercicio + from folhapagamento".$this->getDado('entidade_rh').".tcmba_cargo_servidor_temporario + group by cod_cargo + , cod_entidade + , exercicio + ) AS tcmba_cargo_servidor_temporario + ON tcmba_cargo_servidor_temporario.cod_cargo = contrato_servidor.cod_cargo + AND tcmba_cargo_servidor_temporario.cod_entidade IN (".$this->getDado('entidades').") + AND tcmba_cargo_servidor_temporario.exercicio = '".$this->getDado('exercicio')."' "; + + return $stSql; + } + +} diff --git a/gestaoPrestacaoContas/fontes/PHP/TCMBA/classes/mapeamento/2015/TTCMBATermoCont.class.php b/gestaoPrestacaoContas/fontes/PHP/TCMBA/classes/mapeamento/2015/TTCMBATermoCont.class.php index ace0049..0bfeedd 100644 --- a/gestaoPrestacaoContas/fontes/PHP/TCMBA/classes/mapeamento/2015/TTCMBATermoCont.class.php +++ b/gestaoPrestacaoContas/fontes/PHP/TCMBA/classes/mapeamento/2015/TTCMBATermoCont.class.php @@ -138,6 +138,21 @@ function montaRecuperaDadosTribunal() WHERE contrato.dt_assinatura BETWEEN TO_DATE('".$this->getDado('stDataInicial')."','dd/mm/yyyy') AND TO_DATE('".$this->getDado('stDataFinal')."','dd/mm/yyyy') AND contrato.cod_entidade IN (".$this->getDado('stEntidades').") AND contrato.exercicio = '".$this->getDado('exercicio')."' + + GROUP BY tipo_registro + , unidade_gestora + , contrato.numero_contrato + , num_termo + , pessoa_fisica_juridica.documento + , pessoa_fisica_juridica.tipo_pessoa + , dt_termo + , nom_responsavel + , publicacao_contrato.dt_publicacao + , vl_termo + , competencia + , contrato.justificativa + , contrato.fundamentacao_legal + , contrato.objeto "; return $stSql; } diff --git a/gestaoPrestacaoContas/fontes/PHP/TCMBA/classes/mapeamento/2015/TTCMBATermoParc.class.php b/gestaoPrestacaoContas/fontes/PHP/TCMBA/classes/mapeamento/2015/TTCMBATermoParc.class.php index 21bb77f..8b84b5e 100644 --- a/gestaoPrestacaoContas/fontes/PHP/TCMBA/classes/mapeamento/2015/TTCMBATermoParc.class.php +++ b/gestaoPrestacaoContas/fontes/PHP/TCMBA/classes/mapeamento/2015/TTCMBATermoParc.class.php @@ -85,7 +85,7 @@ class TTCMBATermoParc extends Persistente , despesa.num_orgao AS cod_orgao , despesa.cod_funcao , despesa.cod_subfuncao - , despesa.cod_programa + , ppaprograma.num_programa AS cod_programa , 2 AS indicador_siga FROM tcmba.termo_parceria @@ -110,6 +110,17 @@ class TTCMBATermoParc extends Persistente INNER JOIN ppa.acao ON acao.cod_acao = pao_ppa_acao.cod_acao + INNER JOIN orcamento.programa + ON programa.cod_programa = despesa.cod_programa + AND programa.exercicio = despesa.exercicio + + INNER JOIN orcamento.programa_ppa_programa + ON programa_ppa_programa.cod_programa = programa.cod_programa + AND programa_ppa_programa.exercicio = programa.exercicio + + INNER JOIN ppa.programa AS ppaprograma + ON ppaprograma.cod_programa = programa_ppa_programa.cod_programa_ppa + INNER JOIN ( SELECT sw_cgm_pessoa_juridica.cnpj , sw_cgm.numcgm diff --git a/gestaoPrestacaoContas/fontes/PHP/TCMBA/classes/mapeamento/TTCMBACargoServidor.class.php b/gestaoPrestacaoContas/fontes/PHP/TCMBA/classes/mapeamento/TTCMBACargoServidor.class.php new file mode 100644 index 0000000..05f3979 --- /dev/null +++ b/gestaoPrestacaoContas/fontes/PHP/TCMBA/classes/mapeamento/TTCMBACargoServidor.class.php @@ -0,0 +1,96 @@ + +setTabela('folhapagamento.tcmba_cargo_servidor'); + $this->setComplementoChave('exercicio, cod_entidade, cod_tipo_funcao, cod_cargo'); + + $this->AddCampo('exercicio' , 'varchar', true, '4', true, true); + $this->AddCampo('cod_entidade' , 'integer', true, '', true, true); + $this->AddCampo('cod_tipo_funcao' , 'integer', true, '', true, true); + $this->AddCampo('cod_cargo' , 'integer', true, '', true, true); + } + + public function recuperaCargos(&$rsRecordSet, $stCondicao = "" , $stOrdem = "" , $boTransacao = "") + { + $obErro = new Erro(); + $obConexao = new Conexao(); + $rsRecordSet = new RecordSet; + + $stSql = $this->montaRecuperaCargos().$stCondicao.$stOrdem; + $this->setDebug($stSql); + $obErro = $obConexao->executaSQL( $rsRecordSet, $stSql, $boTransacao ); + + return $obErro; + } + + public function montaRecuperaCargos() + { + $stSql =" SELECT tipo_funcao_servidor.cod_tipo_funcao + , INITCAP(cargo.descricao) AS descricao + , tcmba_cargo_servidor.cod_cargo + + FROM folhapagamento.tcmba_cargo_servidor + + INNER JOIN tcmba.tipo_funcao_servidor + ON tcmba_cargo_servidor.cod_tipo_funcao = tipo_funcao_servidor.cod_tipo_funcao + + INNER JOIN pessoal.cargo + ON cargo.cod_cargo = tcmba_cargo_servidor.cod_cargo + + WHERE tcmba_cargo_servidor.cod_entidade = ".$this->getDado('cod_entidade')." + AND tcmba_cargo_servidor.exercicio = '".$this->getDado('exercicio')."' + AND tipo_funcao_servidor.cod_tipo_funcao = ".$this->getDado('cod_tipo_funcao'); + + return $stSql; + } + + public function __destruct(){} + +} + +?> \ No newline at end of file diff --git a/gestaoPrestacaoContas/fontes/PHP/TCMBA/classes/mapeamento/TTCMBACargoServidorTemporario.class.php b/gestaoPrestacaoContas/fontes/PHP/TCMBA/classes/mapeamento/TTCMBACargoServidorTemporario.class.php new file mode 100644 index 0000000..0c5c2e0 --- /dev/null +++ b/gestaoPrestacaoContas/fontes/PHP/TCMBA/classes/mapeamento/TTCMBACargoServidorTemporario.class.php @@ -0,0 +1,96 @@ + +setTabela('folhapagamento.tcmba_cargo_servidor_temporario'); + $this->setComplementoChave('exercicio, cod_entidade, cod_tipo_funcao, cod_cargo'); + + $this->AddCampo('exercicio' , 'varchar', true, '4', true, true); + $this->AddCampo('cod_entidade' , 'integer', true, '', true, true); + $this->AddCampo('cod_tipo_funcao' , 'integer', true, '', true, true); + $this->AddCampo('cod_cargo' , 'integer', true, '', true, true); + } + + public function recuperaCargosTemporario(&$rsRecordSet, $stCondicao = "" , $stOrdem = "" , $boTransacao = "") + { + $obErro = new Erro(); + $obConexao = new Conexao(); + $rsRecordSet = new RecordSet; + + $stSql = $this->montaRecuperaCargosTemporario().$stCondicao.$stOrdem; + $this->setDebug($stSql); + $obErro = $obConexao->executaSQL( $rsRecordSet, $stSql, $boTransacao ); + + return $obErro; + } + + public function montaRecuperaCargosTemporario() + { + $stSql =" SELECT tipo_funcao_servidor_temporario.cod_tipo_funcao + , INITCAP(cargo.descricao) AS descricao + , tcmba_cargo_servidor_temporario.cod_cargo + + FROM folhapagamento.tcmba_cargo_servidor_temporario + + INNER JOIN tcmba.tipo_funcao_servidor_temporario + ON tcmba_cargo_servidor_temporario.cod_tipo_funcao = tipo_funcao_servidor_temporario.cod_tipo_funcao + + INNER JOIN pessoal.cargo + ON cargo.cod_cargo = tcmba_cargo_servidor_temporario.cod_cargo + + WHERE tcmba_cargo_servidor_temporario.cod_entidade = ".$this->getDado('cod_entidade')." + AND tcmba_cargo_servidor_temporario.exercicio = '".$this->getDado('exercicio')."' + AND tipo_funcao_servidor_temporario.cod_tipo_funcao = ".$this->getDado('cod_tipo_funcao'); + + return $stSql; + } + + public function __destruct(){} + +} + +?> \ No newline at end of file diff --git a/gestaoPrestacaoContas/fontes/PHP/TCMBA/classes/mapeamento/TTCMBAEmprestimoConsignado.class.php b/gestaoPrestacaoContas/fontes/PHP/TCMBA/classes/mapeamento/TTCMBAEmprestimoConsignado.class.php new file mode 100644 index 0000000..df4b679 --- /dev/null +++ b/gestaoPrestacaoContas/fontes/PHP/TCMBA/classes/mapeamento/TTCMBAEmprestimoConsignado.class.php @@ -0,0 +1,133 @@ + +setTabela('folhapagamento.tcmba_emprestimo_consignado'); + $this->setComplementoChave('exercicio', 'cod_entidade', 'cod_banco', 'cod_evento'); + + $this->AddCampo('exercicio' , 'varchar', true, '4', true, true); + $this->AddCampo('cod_entidade' , 'integer', true, '', true, true); + $this->AddCampo('cod_banco' , 'integer', true, '', true, true); + $this->AddCampo('cod_evento' , 'integer', true, '', true, true); + } + + public function recuperaBancosEmprestimo(&$rsRecordSet, $stCondicao = "" , $stOrdem = "" , $boTransacao = "") + { + $obErro = new Erro(); + $obConexao = new Conexao(); + $rsRecordSet = new RecordSet; + + $stSql = $this->montaRecuperaBancosEmprestimo().$stCondicao.$stOrdem; + $this->setDebug($stSql); + $obErro = $obConexao->executaSQL( $rsRecordSet, $stSql, $boTransacao ); + + return $obErro; + } + + public function montaRecuperaBancosEmprestimo() + { + $stSql =" SELECT banco.cod_banco + , banco.num_banco + , banco.nom_banco + + FROM monetario.banco + + INNER JOIN folhapagamento.tcmba_emprestimo_consignado + ON tcmba_emprestimo_consignado.cod_banco = banco.cod_banco + + WHERE folhapagamento.tcmba_emprestimo_consignado.cod_entidade = ".$this->getDado('cod_entidade')." + AND folhapagamento.tcmba_emprestimo_consignado.exercicio = '".$this->getDado('exercicio')."' + + GROUP BY banco.num_banco + , banco.nom_banco + , banco.cod_banco + ORDER BY banco.num_banco "; + + return $stSql; + } + + public function recuperaEventosEmprestimo(&$rsRecordSet, $stCondicao = "" , $stOrdem = "" , $boTransacao = "") + { + $obErro = new Erro(); + $obConexao = new Conexao(); + $rsRecordSet = new RecordSet; + + $stSql = $this->montaRecuperaEventosEmprestimo().$stCondicao.$stOrdem; + $this->setDebug($stSql); + $obErro = $obConexao->executaSQL( $rsRecordSet, $stSql, $boTransacao ); + + return $obErro; + } + + public function montaRecuperaEventosEmprestimo() + { + $stSql =" SELECT banco.num_banco + , banco.nom_banco + , evento.cod_evento + , evento.descricao + , evento.codigo + + FROM folhapagamento.tcmba_emprestimo_consignado + + INNER JOIN monetario.banco + ON banco.cod_banco = tcmba_emprestimo_consignado.cod_banco + + INNER JOIN folhapagamento.evento + ON tcmba_emprestimo_consignado.cod_evento = evento.cod_evento + + WHERE tcmba_emprestimo_consignado.cod_entidade = ".$this->getDado('cod_entidade')." + AND tcmba_emprestimo_consignado.exercicio = '".$this->getDado('exercicio')."' + AND banco.cod_banco = ".$this->getDado('cod_banco'); + + return $stSql; + } + + public function __destruct(){} + +} + +?> \ No newline at end of file diff --git a/gestaoPrestacaoContas/fontes/PHP/TCMBA/classes/mapeamento/TTCMBAFonteRecursoLocal.class.php b/gestaoPrestacaoContas/fontes/PHP/TCMBA/classes/mapeamento/TTCMBAFonteRecursoLocal.class.php new file mode 100644 index 0000000..4337aff --- /dev/null +++ b/gestaoPrestacaoContas/fontes/PHP/TCMBA/classes/mapeamento/TTCMBAFonteRecursoLocal.class.php @@ -0,0 +1,92 @@ + +setTabela('tcmba.fonte_recurso_local'); + $this->setComplementoChave('cod_tipo_fonte, exercicio, cod_entidade, cod_local'); + + $this->AddCampo('cod_tipo_fonte' , 'integer', true, '', true, true); + $this->AddCampo('exercicio' , 'varchar', true, '4', true, true); + $this->AddCampo('cod_entidade' , 'integer', true, '', true, true); + $this->AddCampo('cod_local' , 'integer', true, '', true, true); + } + + public function recuperaFonteRecursoLocal(&$rsRecordSet, $stCondicao = "" , $stOrdem = "" , $boTransacao = "") + { + $obErro = new Erro(); + $obConexao = new Conexao(); + $rsRecordSet = new RecordSet; + + $stSql = $this->montaRecuperaFonteRecursoLocal().$stCondicao.$stOrdem; + $this->setDebug($stSql); + $obErro = $obConexao->executaSQL( $rsRecordSet, $stSql, $boTransacao ); + + return $obErro; + } + + public function montaRecuperaFonteRecursoLocal() + { + $stSql =" SELECT fonte_recurso_local.cod_tipo_fonte + , local.cod_local + , local.descricao + FROM tcmba.fonte_recurso_local + + INNER JOIN organograma.local + ON local.cod_local = fonte_recurso_local.cod_local + + WHERE fonte_recurso_local.cod_tipo_fonte = ".$this->getDado('cod_tipo_fonte')." + AND fonte_recurso_local.cod_entidade = ".$this->getDado('cod_entidade')." + AND fonte_recurso_local.exercicio = '".$this->getDado('exercicio')."' "; + + return $stSql; + } + + public function __destruct(){} + +} + +?> \ No newline at end of file diff --git a/gestaoPrestacaoContas/fontes/PHP/TCMBA/classes/mapeamento/TTCMBAFonteRecursoLotacao.class.php b/gestaoPrestacaoContas/fontes/PHP/TCMBA/classes/mapeamento/TTCMBAFonteRecursoLotacao.class.php new file mode 100644 index 0000000..641c58e --- /dev/null +++ b/gestaoPrestacaoContas/fontes/PHP/TCMBA/classes/mapeamento/TTCMBAFonteRecursoLotacao.class.php @@ -0,0 +1,131 @@ + +setTabela('tcmba.fonte_recurso_lotacao'); + $this->setComplementoChave('cod_tipo_fonte, exercicio, cod_entidade, cod_orgao'); + + $this->AddCampo('cod_tipo_fonte' , 'integer', true, '', true, true); + $this->AddCampo('exercicio' , 'varchar', true, '4', true, true); + $this->AddCampo('cod_entidade' , 'integer', true, '', true, true); + $this->AddCampo('cod_orgao' , 'integer', true, '', true, true); + } + + public function recuperaFonteRecursoLotacao(&$rsRecordSet, $stCondicao = "" , $stOrdem = "" , $boTransacao = "") + { + $obErro = new Erro(); + $obConexao = new Conexao(); + $rsRecordSet = new RecordSet; + + $stSql = $this->montaRecuperaFonteRecursoLotacao().$stCondicao.$stOrdem; + $this->setDebug($stSql); + $obErro = $obConexao->executaSQL( $rsRecordSet, $stSql, $boTransacao ); + + return $obErro; + } + + public function montaRecuperaFonteRecursoLotacao() + { + $stSql = " SELECT recuperaDescricaoOrgao(orgao.cod_orgao, '".Sessao::getExercicio()."-01-01') AS descricao + , vw_orgao_nivel.orgao AS cod_estrutural + , orgao.cod_orgao + + FROM organograma.orgao + + INNER JOIN organograma.vw_orgao_nivel + ON vw_orgao_nivel.cod_orgao = orgao.cod_orgao + + INNER JOIN organograma.organograma + ON organograma.cod_organograma = vw_orgao_nivel.cod_organograma + AND organograma.ativo = TRUE "; + + return $stSql; + } + + public function recuperaFonteRecursoLotacaoSelecionado(&$rsRecordSet, $stCondicao = "" , $stOrdem = "" , $boTransacao = "") + { + $obErro = new Erro(); + $obConexao = new Conexao(); + $rsRecordSet = new RecordSet; + + $stSql = $this->montaRecuperaFonteRecursoLotacaoSelecionado().$stCondicao.$stOrdem; + $this->setDebug($stSql); + $obErro = $obConexao->executaSQL( $rsRecordSet, $stSql, $boTransacao ); + + return $obErro; + } + + public function montaRecuperaFonteRecursoLotacaoSelecionado() + { + $stSql = " SELECT recuperaDescricaoOrgao(orgao.cod_orgao, '".Sessao::getExercicio()."-01-01') AS descricao + , vw_orgao_nivel.orgao AS cod_estrutural + , fonte_recurso_lotacao.cod_orgao + + FROM tcmba.fonte_recurso_lotacao + + INNER JOIN organograma.orgao + ON orgao.cod_orgao = fonte_recurso_lotacao.cod_orgao + + INNER JOIN organograma.vw_orgao_nivel + ON vw_orgao_nivel.cod_orgao = orgao.cod_orgao + + INNER JOIN organograma.organograma + ON organograma.cod_organograma = vw_orgao_nivel.cod_organograma + AND organograma.ativo = TRUE + + WHERE fonte_recurso_lotacao.cod_tipo_fonte = ".$this->getDado('cod_tipo_fonte')." + AND fonte_recurso_lotacao.cod_entidade = ".$this->getDado('cod_entidade')." + AND fonte_recurso_lotacao.exercicio = '".$this->getDado('exercicio')."' "; + + return $stSql; + } + + public function __destruct(){} + +} + +?> \ No newline at end of file diff --git a/gestaoPrestacaoContas/fontes/PHP/TCMBA/classes/mapeamento/TTCMBAFonteRecursoServidor.class.php b/gestaoPrestacaoContas/fontes/PHP/TCMBA/classes/mapeamento/TTCMBAFonteRecursoServidor.class.php new file mode 100644 index 0000000..72c57df --- /dev/null +++ b/gestaoPrestacaoContas/fontes/PHP/TCMBA/classes/mapeamento/TTCMBAFonteRecursoServidor.class.php @@ -0,0 +1,96 @@ + +setTabela('tcmba.tipo_fonte_recurso_servidor'); + $this->setComplementoChave('cod_tipo_fonte'); + + $this->AddCampo('cod_tipo_fonte' , 'integer', true, '', true, true); + $this->AddCampo('descricao' , 'varchar', true, '100', false, false); + } + + public function recuperaFonteRecursoLotacaoLocal(&$rsRecordSet, $stCondicao = "" , $stOrdem = "" , $boTransacao = "") + { + $obErro = new Erro(); + $obConexao = new Conexao(); + $rsRecordSet = new RecordSet; + + $stSql = $this->montaRecuperaFonteRecursoLotacaoLocal().$stCondicao.$stOrdem; + $this->setDebug($stSql); + $obErro = $obConexao->executaSQL( $rsRecordSet, $stSql, $boTransacao ); + + return $obErro; + } + + public function montaRecuperaFonteRecursoLotacaoLocal() + { + $stSql =" SELECT tipo_fonte_recurso_servidor.cod_tipo_fonte + , tipo_fonte_recurso_servidor.descricao + + FROM tcmba.tipo_fonte_recurso_servidor + + INNER JOIN tcmba.fonte_recurso_lotacao + ON fonte_recurso_lotacao.cod_tipo_fonte = tipo_fonte_recurso_servidor.cod_tipo_fonte + + LEFT JOIN tcmba.fonte_recurso_local + ON fonte_recurso_local.cod_tipo_fonte = tipo_fonte_recurso_servidor.cod_tipo_fonte + + WHERE fonte_recurso_lotacao.cod_entidade = ".$this->getDado('cod_entidade')." + AND fonte_recurso_lotacao.exercicio = '".$this->getDado('exercicio')."' + + GROUP BY tipo_fonte_recurso_servidor.cod_tipo_fonte + , tipo_fonte_recurso_servidor.descricao + ORDER BY tipo_fonte_recurso_servidor.cod_tipo_fonte "; + + return $stSql; + } + + public function __destruct(){} + +} + +?> \ No newline at end of file diff --git a/gestaoPrestacaoContas/fontes/PHP/TCMBA/classes/mapeamento/TTCMBAGratificacaoFuncao.class.php b/gestaoPrestacaoContas/fontes/PHP/TCMBA/classes/mapeamento/TTCMBAGratificacaoFuncao.class.php new file mode 100644 index 0000000..8c24e13 --- /dev/null +++ b/gestaoPrestacaoContas/fontes/PHP/TCMBA/classes/mapeamento/TTCMBAGratificacaoFuncao.class.php @@ -0,0 +1,92 @@ + +setTabela('folhapagamento.tcmba_gratificacao_funcao'); + $this->setComplementoChave('exercicio', 'cod_entidade', 'cod_evento'); + + $this->AddCampo('exercicio' , 'varchar', true, '4', true, true); + $this->AddCampo('cod_entidade' , 'integer', true, '', true, true); + $this->AddCampo('cod_evento' , 'integer', true, '', true, true); + } + + public function recuperaEventosGratificacaoFuncao(&$rsRecordSet, $stCondicao = "" , $stOrdem = "" , $boTransacao = "") + { + $obErro = new Erro(); + $obConexao = new Conexao(); + $rsRecordSet = new RecordSet; + + $stSql = $this->montaRecuperaEventosGratificacaoFuncao().$stCondicao.$stOrdem; + $this->setDebug($stSql); + $obErro = $obConexao->executaSQL( $rsRecordSet, $stSql, $boTransacao ); + + return $obErro; + } + + public function montaRecuperaEventosGratificacaoFuncao() + { + + $stSql =" SELECT evento.cod_evento + , evento.codigo + , evento.descricao + + FROM folhapagamento.tcmba_gratificacao_funcao + + INNER JOIN folhapagamento.evento + ON evento.cod_evento = tcmba_gratificacao_funcao.cod_evento + + WHERE tcmba_gratificacao_funcao.cod_entidade = ".$this->getDado('cod_entidade')." + AND tcmba_gratificacao_funcao.exercicio = '".$this->getDado('exercicio')."' "; + + return $stSql; + } + + public function __destruct(){} + +} + +?> \ No newline at end of file diff --git a/gestaoPrestacaoContas/fontes/PHP/TCMBA/classes/mapeamento/TTCMBAObra.class.php b/gestaoPrestacaoContas/fontes/PHP/TCMBA/classes/mapeamento/TTCMBAObra.class.php index 6b91507..60266f1 100644 --- a/gestaoPrestacaoContas/fontes/PHP/TCMBA/classes/mapeamento/TTCMBAObra.class.php +++ b/gestaoPrestacaoContas/fontes/PHP/TCMBA/classes/mapeamento/TTCMBAObra.class.php @@ -27,7 +27,7 @@ * @author Analista Valtair Santos * @author Desenvolvedor Michel Teixeira * - * $Id: TTCMBAObra.class.php 63632 2015-09-22 17:42:03Z michel $ + * $Id: TTCMBAObra.class.php 63771 2015-10-08 13:39:13Z jean $ */ include_once '../../../../../../gestaoAdministrativa/fontes/PHP/framework/include/valida.inc.php'; include_once CLA_PERSISTENTE; @@ -123,7 +123,7 @@ class TTCMBAObra extends Persistente , obra.cod_uf , obra.cod_municipio , obra.cod_funcao - , LPAD(obra.nro_obra::VARCHAR, 10, '0') AS nro_obra + , obra.nro_obra , obra.descricao , obra.vl_obra , TO_CHAR(obra.data_cadastro,'dd/mm/yyyy') AS data_cadastro diff --git a/gestaoPrestacaoContas/fontes/PHP/TCMBA/classes/mapeamento/TTCMBAObraMedicao.class.php b/gestaoPrestacaoContas/fontes/PHP/TCMBA/classes/mapeamento/TTCMBAObraMedicao.class.php index bef4afa..f947612 100644 --- a/gestaoPrestacaoContas/fontes/PHP/TCMBA/classes/mapeamento/TTCMBAObraMedicao.class.php +++ b/gestaoPrestacaoContas/fontes/PHP/TCMBA/classes/mapeamento/TTCMBAObraMedicao.class.php @@ -27,7 +27,7 @@ * @author Analista Valtair Santos * @author Desenvolvedor Michel Teixeira * - * $Id: TTCMBAObraMedicao.class.php 63632 2015-09-22 17:42:03Z michel $ + * $Id: TTCMBAObraMedicao.class.php 63809 2015-10-19 16:52:56Z lisiane $ */ include_once '../../../../../../gestaoAdministrativa/fontes/PHP/framework/include/valida.inc.php'; include_once CLA_PERSISTENTE; @@ -52,9 +52,11 @@ class TTCMBAObraMedicao extends Persistente $this->AddCampo('cod_medida' , 'integer' , true , '' , false, true ); $this->AddCampo('data_inicio' , 'date' , true , '' , false, false); $this->AddCampo('data_final' , 'date' , true , '' , false, false); + $this->AddCampo('data_medicao' , 'date' , true , '' , false, false); $this->AddCampo('vl_medicao' , 'numeric' , true , '16,2', false, false); $this->AddCampo('nro_nota_fiscal' , 'varchar' , true , '20' , false, false); $this->AddCampo('data_nota_fiscal' , 'date' , true , '' , false, false); $this->AddCampo('numcgm' , 'integer' , true , '' , false, true ); } } + diff --git a/gestaoPrestacaoContas/fontes/PHP/TCMBA/classes/mapeamento/TTCMBAPlanoSaude.class.php b/gestaoPrestacaoContas/fontes/PHP/TCMBA/classes/mapeamento/TTCMBAPlanoSaude.class.php new file mode 100644 index 0000000..6074f71 --- /dev/null +++ b/gestaoPrestacaoContas/fontes/PHP/TCMBA/classes/mapeamento/TTCMBAPlanoSaude.class.php @@ -0,0 +1,92 @@ + +setTabela('folhapagamento.tcmba_plano_saude'); + $this->setComplementoChave('exercicio', 'cod_entidade', 'cod_evento'); + + $this->AddCampo('exercicio' , 'varchar', true, '4', true, true); + $this->AddCampo('cod_entidade' , 'integer', true, '', true, true); + $this->AddCampo('cod_evento' , 'integer', true, '', true, true); + } + + public function recuperaEventosPlanoSaude(&$rsRecordSet, $stCondicao = "" , $stOrdem = "" , $boTransacao = "") + { + $obErro = new Erro(); + $obConexao = new Conexao(); + $rsRecordSet = new RecordSet; + + $stSql = $this->montaRecuperaEventosPlanoSaude().$stCondicao.$stOrdem; + $this->setDebug($stSql); + $obErro = $obConexao->executaSQL( $rsRecordSet, $stSql, $boTransacao ); + + return $obErro; + } + + public function montaRecuperaEventosPlanoSaude() + { + + $stSql =" SELECT evento.cod_evento + , evento.codigo + , evento.descricao + + FROM folhapagamento.tcmba_plano_saude + + INNER JOIN folhapagamento.evento + ON evento.cod_evento = tcmba_plano_saude.cod_evento + + WHERE tcmba_plano_saude.cod_entidade = ".$this->getDado('cod_entidade')." + AND tcmba_plano_saude.exercicio = '".$this->getDado('exercicio')."' "; + + return $stSql; + } + + public function __destruct(){} + +} + +?> \ No newline at end of file diff --git a/gestaoPrestacaoContas/fontes/PHP/TCMBA/classes/mapeamento/TTCMBASalarioBase.class.php b/gestaoPrestacaoContas/fontes/PHP/TCMBA/classes/mapeamento/TTCMBASalarioBase.class.php new file mode 100644 index 0000000..0cf0258 --- /dev/null +++ b/gestaoPrestacaoContas/fontes/PHP/TCMBA/classes/mapeamento/TTCMBASalarioBase.class.php @@ -0,0 +1,92 @@ + +setTabela('folhapagamento.tcmba_salario_base'); + $this->setComplementoChave('exercicio', 'cod_entidade', 'cod_evento'); + + $this->AddCampo('exercicio' , 'varchar', true, '4', true, true); + $this->AddCampo('cod_entidade' , 'integer', true, '', true, true); + $this->AddCampo('cod_evento' , 'integer', true, '', true, true); + } + + public function recuperaEventosSalarioBase(&$rsRecordSet, $stCondicao = "" , $stOrdem = "" , $boTransacao = "") + { + $obErro = new Erro(); + $obConexao = new Conexao(); + $rsRecordSet = new RecordSet; + + $stSql = $this->montaRecuperaEventosSalarioBase().$stCondicao.$stOrdem; + $this->setDebug($stSql); + $obErro = $obConexao->executaSQL( $rsRecordSet, $stSql, $boTransacao ); + + return $obErro; + } + + public function montaRecuperaEventosSalarioBase() + { + + $stSql =" SELECT evento.cod_evento + , evento.codigo + , evento.descricao + + FROM folhapagamento.tcmba_salario_base + + INNER JOIN folhapagamento.evento + ON evento.cod_evento = tcmba_salario_base.cod_evento + + WHERE tcmba_salario_base.cod_entidade = ".$this->getDado('cod_entidade')." + AND tcmba_salario_base.exercicio = '".$this->getDado('exercicio')."' "; + + return $stSql; + } + + public function __destruct(){} + +} + +?> \ No newline at end of file diff --git a/gestaoPrestacaoContas/fontes/PHP/TCMBA/classes/mapeamento/TTCMBASalarioDescontos.class.php b/gestaoPrestacaoContas/fontes/PHP/TCMBA/classes/mapeamento/TTCMBASalarioDescontos.class.php new file mode 100644 index 0000000..61b7792 --- /dev/null +++ b/gestaoPrestacaoContas/fontes/PHP/TCMBA/classes/mapeamento/TTCMBASalarioDescontos.class.php @@ -0,0 +1,92 @@ + +setTabela('folhapagamento.tcmba_salario_descontos'); + $this->setComplementoChave('exercicio', 'cod_entidade', 'cod_evento'); + + $this->AddCampo('exercicio' , 'varchar', true, '4', true, true); + $this->AddCampo('cod_entidade' , 'integer', true, '', true, true); + $this->AddCampo('cod_evento' , 'integer', true, '', true, true); + } + + public function recuperaEventosDemaisDescontos(&$rsRecordSet, $stCondicao = "" , $stOrdem = "" , $boTransacao = "") + { + $obErro = new Erro(); + $obConexao = new Conexao(); + $rsRecordSet = new RecordSet; + + $stSql = $this->montaRecuperaEventosDemaisDescontos().$stCondicao.$stOrdem; + $this->setDebug($stSql); + $obErro = $obConexao->executaSQL( $rsRecordSet, $stSql, $boTransacao ); + + return $obErro; + } + + public function montaRecuperaEventosDemaisDescontos() + { + + $stSql =" SELECT evento.cod_evento + , evento.codigo + , evento.descricao + + FROM folhapagamento.tcmba_salario_descontos + + INNER JOIN folhapagamento.evento + ON evento.cod_evento = tcmba_salario_descontos.cod_evento + + WHERE tcmba_salario_descontos.cod_entidade = ".$this->getDado('cod_entidade')." + AND tcmba_salario_descontos.exercicio = '".$this->getDado('exercicio')."' "; + + return $stSql; + } + + public function __destruct(){} + +} + +?> \ No newline at end of file diff --git a/gestaoPrestacaoContas/fontes/PHP/TCMBA/classes/mapeamento/TTCMBASalarioFamilia.class.php b/gestaoPrestacaoContas/fontes/PHP/TCMBA/classes/mapeamento/TTCMBASalarioFamilia.class.php new file mode 100644 index 0000000..79ab9d2 --- /dev/null +++ b/gestaoPrestacaoContas/fontes/PHP/TCMBA/classes/mapeamento/TTCMBASalarioFamilia.class.php @@ -0,0 +1,92 @@ + +setTabela('folhapagamento.tcmba_salario_familia'); + $this->setComplementoChave('exercicio', 'cod_entidade', 'cod_evento'); + + $this->AddCampo('exercicio' , 'varchar', true, '4', true, true); + $this->AddCampo('cod_entidade' , 'integer', true, '', true, true); + $this->AddCampo('cod_evento' , 'integer', true, '', true, true); + } + + public function recuperaEventosSalarioFamilia(&$rsRecordSet, $stCondicao = "" , $stOrdem = "" , $boTransacao = "") + { + $obErro = new Erro(); + $obConexao = new Conexao(); + $rsRecordSet = new RecordSet; + + $stSql = $this->montaRecuperaEventosSalarioFamilia().$stCondicao.$stOrdem; + $this->setDebug($stSql); + $obErro = $obConexao->executaSQL( $rsRecordSet, $stSql, $boTransacao ); + + return $obErro; + } + + public function montaRecuperaEventosSalarioFamilia() + { + + $stSql =" SELECT evento.cod_evento + , evento.codigo + , evento.descricao + + FROM folhapagamento.tcmba_salario_familia + + INNER JOIN folhapagamento.evento + ON evento.cod_evento = tcmba_salario_familia.cod_evento + + WHERE tcmba_salario_familia.cod_entidade = ".$this->getDado('cod_entidade')." + AND tcmba_salario_familia.exercicio = '".$this->getDado('exercicio')."' "; + + return $stSql; + } + + public function __destruct(){} + +} + +?> \ No newline at end of file diff --git a/gestaoPrestacaoContas/fontes/PHP/TCMBA/classes/mapeamento/TTCMBASalarioHorasExtras.class.php b/gestaoPrestacaoContas/fontes/PHP/TCMBA/classes/mapeamento/TTCMBASalarioHorasExtras.class.php new file mode 100644 index 0000000..f90e02f --- /dev/null +++ b/gestaoPrestacaoContas/fontes/PHP/TCMBA/classes/mapeamento/TTCMBASalarioHorasExtras.class.php @@ -0,0 +1,92 @@ + +setTabela('folhapagamento.tcmba_salario_horas_extras'); + $this->setComplementoChave('exercicio', 'cod_entidade', 'cod_evento'); + + $this->AddCampo('exercicio' , 'varchar', true, '4', true, true); + $this->AddCampo('cod_entidade' , 'integer', true, '', true, true); + $this->AddCampo('cod_evento' , 'integer', true, '', true, true); + } + + public function recuperaEventosHorasExtras(&$rsRecordSet, $stCondicao = "" , $stOrdem = "" , $boTransacao = "") + { + $obErro = new Erro(); + $obConexao = new Conexao(); + $rsRecordSet = new RecordSet; + + $stSql = $this->montaRecuperaEventosHorasExtras().$stCondicao.$stOrdem; + $this->setDebug($stSql); + $obErro = $obConexao->executaSQL( $rsRecordSet, $stSql, $boTransacao ); + + return $obErro; + } + + public function montaRecuperaEventosHorasExtras() + { + + $stSql =" SELECT evento.cod_evento + , evento.codigo + , evento.descricao + + FROM folhapagamento.tcmba_salario_horas_extras + + INNER JOIN folhapagamento.evento + ON evento.cod_evento = tcmba_salario_horas_extras.cod_evento + + WHERE tcmba_salario_horas_extras.cod_entidade = ".$this->getDado('cod_entidade')." + AND tcmba_salario_horas_extras.exercicio = '".$this->getDado('exercicio')."' "; + + return $stSql; + } + + public function __destruct(){} + +} + +?> \ No newline at end of file diff --git a/gestaoPrestacaoContas/fontes/PHP/TCMBA/classes/mapeamento/TTCMBATermoParceria.class.php b/gestaoPrestacaoContas/fontes/PHP/TCMBA/classes/mapeamento/TTCMBATermoParceria.class.php new file mode 100644 index 0000000..de149ac --- /dev/null +++ b/gestaoPrestacaoContas/fontes/PHP/TCMBA/classes/mapeamento/TTCMBATermoParceria.class.php @@ -0,0 +1,75 @@ + +setTabela('tcmba.termo_parceria'); + $this->setComplementoChave('exercicio, cod_entidade, nro_processo'); + + $this->AddCampo('exercicio' , 'varchar', true, '4', true, true); + $this->AddCampo('cod_entidade' , 'integer', true, '', true, true); + $this->AddCampo('nro_processo' , 'varchar', true, '16', true, false); + $this->AddCampo('dt_assinatura' , 'date', true, '', false, false); + $this->AddCampo('dt_publicacao' , 'date', true, '', false, false); + $this->AddCampo('imprensa_oficial' , 'varchar', true, '50', false, false); + $this->AddCampo('dt_inicio' , 'date', true, '', false, false); + $this->AddCampo('dt_termino' , 'date', true, '', false, false); + $this->AddCampo('numcgm' , 'integer', true, '', false, true); + $this->AddCampo('processo_licitatorio', 'varchar', false, '36', false, false); + $this->AddCampo('processo_dispensa' , 'varchar', false, '16', false, false); + $this->AddCampo('objeto' , 'varchar', true, '400', false, false); + $this->AddCampo('nro_processo_mj' , 'varchar', false, '36', false, false); + $this->AddCampo('dt_processo_mj' , 'date', false, '', false, false); + $this->AddCampo('dt_publicacao_mj' , 'date', false, '', false, false); + $this->AddCampo('vl_parceiro_publico' , 'numeric', false,'14,2', false, false); + $this->AddCampo('vl_termo_parceria' , 'numeric', false,'14,2', false, false); + } + + public function __destruct(){} + +} + +?> \ No newline at end of file diff --git a/gestaoPrestacaoContas/fontes/PHP/TCMBA/classes/mapeamento/TTCMBATermoParceriaDotacao.class.php b/gestaoPrestacaoContas/fontes/PHP/TCMBA/classes/mapeamento/TTCMBATermoParceriaDotacao.class.php new file mode 100644 index 0000000..98a9229 --- /dev/null +++ b/gestaoPrestacaoContas/fontes/PHP/TCMBA/classes/mapeamento/TTCMBATermoParceriaDotacao.class.php @@ -0,0 +1,63 @@ + +setTabela('tcmba.termo_parceria_dotacao'); + $this->setComplementoChave('exercicio, cod_entidade, nro_processo, exercicio_despesa, cod_despesa'); + + $this->AddCampo('exercicio' , 'varchar', true, '4', true, true); + $this->AddCampo('cod_entidade' , 'integer', true, '', true, true); + $this->AddCampo('nro_processo' , 'varchar', true, '16', true, true); + $this->AddCampo('exercicio_despesa', 'varchar', true, '4', true, true); + $this->AddCampo('cod_despesa' , 'integer', true, '', true, true); + } + + public function __destruct(){} + +} + +?> \ No newline at end of file diff --git a/gestaoPrestacaoContas/fontes/PHP/TCMBA/classes/mapeamento/TTCMBATermoParceriaProrrogacao.class.php b/gestaoPrestacaoContas/fontes/PHP/TCMBA/classes/mapeamento/TTCMBATermoParceriaProrrogacao.class.php new file mode 100644 index 0000000..b00049e --- /dev/null +++ b/gestaoPrestacaoContas/fontes/PHP/TCMBA/classes/mapeamento/TTCMBATermoParceriaProrrogacao.class.php @@ -0,0 +1,70 @@ + +setTabela('tcmba.termo_parceria_prorrogacao'); + $this->setComplementoChave('exercicio, cod_entidade, nro_processo, nro_termo_aditivo, exercicio_aditivo'); + + $this->AddCampo('exercicio' , 'varchar', true, '4', true, true); + $this->AddCampo('cod_entidade' , 'integer', true, '', true, true); + $this->AddCampo('nro_processo' , 'varchar', true, '16', true, true); + $this->AddCampo('nro_termo_aditivo' , 'varchar', true, '36', true, false); + $this->AddCampo('exercicio_aditivo' , 'varchar', true, '4', true, false); + $this->AddCampo('dt_prorrogacao' , 'date', true, '', false, false); + $this->AddCampo('dt_publicacao' , 'date', true, '', false, false); + $this->AddCampo('imprensa_oficial' , 'varchar', true, '50', false, false); + $this->AddCampo('indicador_adimplemento', 'boolean', true, '', false, false); + $this->AddCampo('dt_inicio' , 'date', true, '', false, false); + $this->AddCampo('dt_termino' , 'date', true, '', false, false); + $this->AddCampo('vl_prorrogacao' , 'numeric', true, '14,2', false, false); + } + + public function __destruct(){} + +} + +?> \ No newline at end of file diff --git a/gestaoPrestacaoContas/fontes/PHP/TCMBA/classes/mapeamento/TTCMBATipoFuncaoServidor.class.php b/gestaoPrestacaoContas/fontes/PHP/TCMBA/classes/mapeamento/TTCMBATipoFuncaoServidor.class.php new file mode 100644 index 0000000..69d961c --- /dev/null +++ b/gestaoPrestacaoContas/fontes/PHP/TCMBA/classes/mapeamento/TTCMBATipoFuncaoServidor.class.php @@ -0,0 +1,93 @@ + +setTabela('tcmba.tipo_funcao_servidor'); + $this->setComplementoChave('cod_tipo_funcao'); + + $this->AddCampo('cod_tipo_funcao' , 'integer', true, '', true, true); + $this->AddCampo('descricao' , 'varchar', true, '100', false, false); + } + + public function recuperaFuncaoCargo(&$rsRecordSet, $stCondicao = "" , $stOrdem = "" , $boTransacao = "") + { + $obErro = new Erro(); + $obConexao = new Conexao(); + $rsRecordSet = new RecordSet; + + $stSql = $this->montaRecuperaFuncaoCargo().$stCondicao.$stOrdem; + $this->setDebug($stSql); + $obErro = $obConexao->executaSQL( $rsRecordSet, $stSql, $boTransacao ); + + return $obErro; + } + + public function montaRecuperaFuncaoCargo() + { + $stSql =" SELECT tipo_funcao_servidor.cod_tipo_funcao + , tipo_funcao_servidor.descricao + + FROM tcmba.tipo_funcao_servidor + + INNER JOIN folhapagamento.tcmba_cargo_servidor + ON tcmba_cargo_servidor.cod_tipo_funcao = tipo_funcao_servidor.cod_tipo_funcao + + WHERE tcmba_cargo_servidor.cod_entidade = ".$this->getDado('cod_entidade')." + AND tcmba_cargo_servidor.exercicio = '".$this->getDado('exercicio')."' + + GROUP BY tipo_funcao_servidor.cod_tipo_funcao + , tipo_funcao_servidor.descricao + ORDER BY tipo_funcao_servidor.cod_tipo_funcao "; + + return $stSql; + } + + public function __destruct(){} + +} + +?> \ No newline at end of file diff --git a/gestaoPrestacaoContas/fontes/PHP/TCMBA/classes/mapeamento/TTCMBATipoFuncaoServidorTemporario.class.php b/gestaoPrestacaoContas/fontes/PHP/TCMBA/classes/mapeamento/TTCMBATipoFuncaoServidorTemporario.class.php new file mode 100644 index 0000000..a064e07 --- /dev/null +++ b/gestaoPrestacaoContas/fontes/PHP/TCMBA/classes/mapeamento/TTCMBATipoFuncaoServidorTemporario.class.php @@ -0,0 +1,93 @@ + +setTabela('tcmba.tipo_funcao_servidor_temporario'); + $this->setComplementoChave('cod_tipo_funcao'); + + $this->AddCampo('cod_tipo_funcao' , 'integer', true, '', true, true); + $this->AddCampo('descricao' , 'varchar', true, '100', false, false); + } + + public function recuperaFuncaoCargoTemporario(&$rsRecordSet, $stCondicao = "" , $stOrdem = "" , $boTransacao = "") + { + $obErro = new Erro(); + $obConexao = new Conexao(); + $rsRecordSet = new RecordSet; + + $stSql = $this->montaRecuperaFuncaoCargoTemporario().$stCondicao.$stOrdem; + $this->setDebug($stSql); + $obErro = $obConexao->executaSQL( $rsRecordSet, $stSql, $boTransacao ); + + return $obErro; + } + + public function montaRecuperaFuncaoCargoTemporario() + { + $stSql =" SELECT tipo_funcao_servidor_temporario.cod_tipo_funcao + , tipo_funcao_servidor_temporario.descricao + + FROM tcmba.tipo_funcao_servidor_temporario + + INNER JOIN folhapagamento.tcmba_cargo_servidor_temporario + ON tcmba_cargo_servidor_temporario.cod_tipo_funcao = tipo_funcao_servidor_temporario.cod_tipo_funcao + + WHERE tcmba_cargo_servidor_temporario.cod_entidade = ".$this->getDado('cod_entidade')." + AND tcmba_cargo_servidor_temporario.exercicio = '".$this->getDado('exercicio')."' + + GROUP BY tipo_funcao_servidor_temporario.cod_tipo_funcao + , tipo_funcao_servidor_temporario.descricao + ORDER BY tipo_funcao_servidor_temporario.cod_tipo_funcao "; + + return $stSql; + } + + public function __destruct(){} + +} + +?> \ No newline at end of file diff --git a/gestaoPrestacaoContas/fontes/PHP/TCMBA/classes/mapeamento/TTCMBAVantagensSalariais.class.php b/gestaoPrestacaoContas/fontes/PHP/TCMBA/classes/mapeamento/TTCMBAVantagensSalariais.class.php new file mode 100644 index 0000000..970d6e2 --- /dev/null +++ b/gestaoPrestacaoContas/fontes/PHP/TCMBA/classes/mapeamento/TTCMBAVantagensSalariais.class.php @@ -0,0 +1,92 @@ + +setTabela('folhapagamento.tcmba_vantagens_salariais'); + $this->setComplementoChave('exercicio', 'cod_entidade', 'cod_evento'); + + $this->AddCampo('exercicio' , 'varchar', true, '4', true, true); + $this->AddCampo('cod_entidade' , 'integer', true, '', true, true); + $this->AddCampo('cod_evento' , 'integer', true, '', true, true); + } + + public function recuperaEventosVantagensSalariais(&$rsRecordSet, $stCondicao = "" , $stOrdem = "" , $boTransacao = "") + { + $obErro = new Erro(); + $obConexao = new Conexao(); + $rsRecordSet = new RecordSet; + + $stSql = $this->montaRecuperaEventosVantagensSalariais().$stCondicao.$stOrdem; + $this->setDebug($stSql); + $obErro = $obConexao->executaSQL( $rsRecordSet, $stSql, $boTransacao ); + + return $obErro; + } + + public function montaRecuperaEventosVantagensSalariais() + { + + $stSql =" SELECT evento.cod_evento + , evento.codigo + , evento.descricao + + FROM folhapagamento.tcmba_vantagens_salariais + + INNER JOIN folhapagamento.evento + ON evento.cod_evento = tcmba_vantagens_salariais.cod_evento + + WHERE tcmba_vantagens_salariais.cod_entidade = ".$this->getDado('cod_entidade')." + AND tcmba_vantagens_salariais.exercicio = '".$this->getDado('exercicio')."' "; + + return $stSql; + } + + public function __destruct(){} + +} + +?> \ No newline at end of file diff --git a/gestaoPrestacaoContas/fontes/PHP/TCMBA/instancias/configuracao/FLManterConfiguracaoParcSubvOSCIP.php b/gestaoPrestacaoContas/fontes/PHP/TCMBA/instancias/configuracao/FLManterConfiguracaoParcSubvOSCIP.php new file mode 100644 index 0000000..482fa93 --- /dev/null +++ b/gestaoPrestacaoContas/fontes/PHP/TCMBA/instancias/configuracao/FLManterConfiguracaoParcSubvOSCIP.php @@ -0,0 +1,92 @@ + +get("stCtrl"); +$stAcao = $request->get("stAcao"); + + +//****************************************// +//Define COMPONENTES DO FORMULARIO +//****************************************// +//Instancia o formulário +$obForm = new Form; +$obForm->setAction($pgForm); +$obForm->setTarget("telaPrincipal"); + +//Define o objeto da ação stAcao +$obHdnAcao = new Hidden; +$obHdnAcao->setId ("stAcao"); +$obHdnAcao->setName ("stAcao"); +$obHdnAcao->setValue($stAcao); + +//Define o objeto de controle +$obHdnCtrl = new Hidden; +$obHdnCtrl->setName ("stCtrl"); +$obHdnCtrl->setId ("stCtrl"); +$obHdnCtrl->setValue($stCtrl); + +$obITextBoxSelectEntidadeGeral = new ITextBoxSelectEntidadeGeral(); +$obITextBoxSelectEntidadeGeral->setNull(false); + +//****************************************// +//Monta FORMULARIO +//****************************************// +$obFormulario = new Formulario; +$obFormulario->addForm ( $obForm ); +$obFormulario->addHidden ( $obHdnCtrl ); +$obFormulario->addHidden ( $obHdnAcao ); +$obFormulario->addTitulo ( "Dados para Termos de Parceria/Subvenção/OSCIP" ); +$obFormulario->addComponente ( $obITextBoxSelectEntidadeGeral ); +$obFormulario->OK(); +$obFormulario->show(); + +require_once '../../../../../../gestaoAdministrativa/fontes/PHP/framework/include/rodape.inc.php'; +?> diff --git a/gestaoPrestacaoContas/fontes/PHP/TCMBA/instancias/configuracao/FLManterConfiguracaoProrrogacaoTermo.php b/gestaoPrestacaoContas/fontes/PHP/TCMBA/instancias/configuracao/FLManterConfiguracaoProrrogacaoTermo.php new file mode 100644 index 0000000..94df5cc --- /dev/null +++ b/gestaoPrestacaoContas/fontes/PHP/TCMBA/instancias/configuracao/FLManterConfiguracaoProrrogacaoTermo.php @@ -0,0 +1,115 @@ + +get("stCtrl"); +$stAcao = $request->get("stAcao"); +$stExercicioProcesso = $request->get('stExercicioProcesso', Sessao::getExercicio()); + +//****************************************// +//Define COMPONENTES DO FORMULARIO +//****************************************// +//Instancia o formulário +$obForm = new Form(); +$obForm->setAction($pgForm); +$obForm->setTarget("telaPrincipal"); + +//Define o objeto da ação stAcao +$obHdnAcao = new Hidden(); +$obHdnAcao->setId ( "stAcao" ); +$obHdnAcao->setName ( "stAcao" ); +$obHdnAcao->setValue( $stAcao ); + +//Define o objeto de controle +$obHdnCtrl = new Hidden(); +$obHdnCtrl->setName ( "stCtrl" ); +$obHdnCtrl->setId ( "stCtrl" ); +$obHdnCtrl->setValue( $stCtrl ); + +$obTxtExercicioProcesso = new TextBox(); +$obTxtExercicioProcesso->setRotulo ( "Exercício do Processo"); +$obTxtExercicioProcesso->setTitle ( "Informe o exercício do Processo." ); +$obTxtExercicioProcesso->setName ( "stExercicioProcesso" ); +$obTxtExercicioProcesso->setId ( "stExercicioProcesso" ); +$obTxtExercicioProcesso->setValue ( $stExercicioProcesso ); +$obTxtExercicioProcesso->setInteiro ( false ); +$obTxtExercicioProcesso->setNull ( false ); +$obTxtExercicioProcesso->setMaxLength( 4 ); +$obTxtExercicioProcesso->setSize ( 5 ); + +$obITextBoxSelectEntidadeGeral = new ITextBoxSelectEntidadeGeral(); +$obITextBoxSelectEntidadeGeral->setNull( false ); +$obITextBoxSelectEntidadeGeral->obTextBox->obEvento->setOnChange( " if(this.value != '') { montaParametrosGET('preencheTermos');} \n" ); +$obITextBoxSelectEntidadeGeral->obSelect->obEvento->setOnChange ( " if(this.value != '') { montaParametrosGET('preencheTermos');} \n" ); + +$obCmbTermoParceria = new Select(); +$obCmbTermoParceria->setRotulo("Termo de Parceira/Subvenção/OSCIP"); +$obCmbTermoParceria->setTitle("Selecione um Termo de Parceria/Subvenção/OSCIP, para adicionar uma prorrogação."); +$obCmbTermoParceria->setName("stNumeroProcesso"); +$obCmbTermoParceria->setId("stNumeroProcesso"); +$obCmbTermoParceria->addOption("","Selecione"); +$obCmbTermoParceria->setNull( false ); + +//****************************************// +//Monta FORMULARIO +//****************************************// +$obFormulario = new Formulario(); +$obFormulario->addForm ( $obForm ); +$obFormulario->addHidden ( $obHdnCtrl ); +$obFormulario->addHidden ( $obHdnAcao ); +$obFormulario->addTitulo ( "Dados para Filtro de Termos de Parceria/Subvenção/OSCIP" ); +$obFormulario->addComponente ( $obTxtExercicioProcesso ); +$obFormulario->addComponente ( $obITextBoxSelectEntidadeGeral ); +$obFormulario->addComponente ( $obCmbTermoParceria ); +$obFormulario->OK(); +$obFormulario->show(); + +require_once '../../../../../../gestaoAdministrativa/fontes/PHP/framework/include/rodape.inc.php'; +?> diff --git a/gestaoPrestacaoContas/fontes/PHP/TCMBA/instancias/configuracao/FLManterConfiguracaoTipoSalario.php b/gestaoPrestacaoContas/fontes/PHP/TCMBA/instancias/configuracao/FLManterConfiguracaoTipoSalario.php new file mode 100644 index 0000000..cbf3c2c --- /dev/null +++ b/gestaoPrestacaoContas/fontes/PHP/TCMBA/instancias/configuracao/FLManterConfiguracaoTipoSalario.php @@ -0,0 +1,100 @@ + +get('stAcao'); + +Sessao::remove('stEntidade'); +Sessao::remove('arSchemasRH'); +Sessao::remove('arFuncaoCargoServidor'); +Sessao::remove('arFuncaoCargoServidorTemporario'); +Sessao::remove('arBancoEventosEmprestimo'); +Sessao::remove('arFonteRecursoLotacaoLocal'); +Sessao::write("boEntidade",false); + +$obForm = new Form; +$obForm->setAction($pgForm); +$obForm->setTarget('telaPrincipal'); + +$obHdnAcao = new Hidden; +$obHdnAcao->setName ('stAcao'); +$obHdnAcao->setValue($stAcao); + +$obHdnNomEntidade = new Hidden; +$obHdnNomEntidade->setId('stNomEntidade'); +$obHdnNomEntidade->setName('stNomEntidade'); + +$obROrcamentoEntidade = new ROrcamentoEntidade; +$obROrcamentoEntidade->setExercicio(Sessao::getExercicio()); +$obROrcamentoEntidade->listarEntidades($rsEntidades); + +$obCmbEntidades = new Select (); +$obCmbEntidades->setRotulo ('Entidade'); +$obCmbEntidades->setId ('inCodEntidade'); +$obCmbEntidades->setName ('inCodEntidade'); +$obCmbEntidades->setCampoId ('cod_entidade'); +$obCmbEntidades->setCampoDesc ('[nom_cgm]'); +$obCmbEntidades->addOption ('', 'Selecione'); +$obCmbEntidades->setNull ( false ); +$obCmbEntidades->preencheCombo($rsEntidades); +$obCmbEntidades->obEvento->setOnBlur("jQuery('#stNomEntidade').val(jQuery('#inCodEntidade :selected').text());"); + +$obFormulario = new Formulario(); +$obFormulario->addForm ($obForm); +$obFormulario->addHidden ($obHdnAcao); +$obFormulario->addHidden ($obHdnNomEntidade); +$obFormulario->addComponente ($obCmbEntidades); +$obFormulario->Ok(); + +$obFormulario->show(); + +include_once '../../../../../../gestaoAdministrativa/fontes/PHP/framework/include/rodape.inc.php'; + +?> \ No newline at end of file diff --git a/gestaoPrestacaoContas/fontes/PHP/TCMBA/instancias/configuracao/FLRelacionarLotacoesOrgaos.php b/gestaoPrestacaoContas/fontes/PHP/TCMBA/instancias/configuracao/FLRelacionarLotacoesOrgaos.php new file mode 100644 index 0000000..fbe1908 --- /dev/null +++ b/gestaoPrestacaoContas/fontes/PHP/TCMBA/instancias/configuracao/FLRelacionarLotacoesOrgaos.php @@ -0,0 +1,88 @@ + +get('stAcao'); + +Sessao::remove('stEntidade'); +Sessao::remove('arSchemasRH'); +Sessao::write ("boEntidade", false); + +$obForm = new Form; +$obForm->setAction($pgForm); +$obForm->setTarget('telaPrincipal'); + +$obHdnAcao = new Hidden; +$obHdnAcao->setName ('stAcao'); +$obHdnAcao->setValue($stAcao); + +$obROrcamentoEntidade = new ROrcamentoEntidade; +$obROrcamentoEntidade->setExercicio (Sessao::getExercicio()); +$obROrcamentoEntidade->listarEntidades($rsEntidades); + +$obCmbEntidades = new Select; +$obCmbEntidades->setRotulo ('Entidade'); +$obCmbEntidades->setId ('inCodEntidade'); +$obCmbEntidades->setName ('inCodEntidade'); +$obCmbEntidades->setCampoId ('cod_entidade'); +$obCmbEntidades->setCampoDesc ('[nom_cgm]'); +$obCmbEntidades->addOption ('', 'Selecione'); +$obCmbEntidades->preencheCombo($rsEntidades); + +$obFormulario = new Formulario; +$obFormulario->addForm ($obForm); +$obFormulario->addHidden ($obHdnAcao); +$obFormulario->addComponente($obCmbEntidades); +$obFormulario->Ok(); + +$obFormulario->show(); + +require_once '../../../../../../gestaoAdministrativa/fontes/PHP/framework/include/rodape.inc.php'; diff --git a/gestaoPrestacaoContas/fontes/PHP/TCMBA/instancias/configuracao/FMManterConfiguracaoObrasServicos.php b/gestaoPrestacaoContas/fontes/PHP/TCMBA/instancias/configuracao/FMManterConfiguracaoObrasServicos.php index 93dd380..a2193ba 100644 --- a/gestaoPrestacaoContas/fontes/PHP/TCMBA/instancias/configuracao/FMManterConfiguracaoObrasServicos.php +++ b/gestaoPrestacaoContas/fontes/PHP/TCMBA/instancias/configuracao/FMManterConfiguracaoObrasServicos.php @@ -29,7 +29,7 @@ * @author Analista Dagiane Vieira * @author Desenvolvedor Michel Teixeira * - * $Id: FMManterConfiguracaoObrasServicos.php 63632 2015-09-22 17:42:03Z michel $ + * $Id: FMManterConfiguracaoObrasServicos.php 63809 2015-10-19 16:52:56Z lisiane $ */ include_once '../../../../../../gestaoAdministrativa/fontes/PHP/pacotes/FrameworkHTML.inc.php'; include_once '../../../../../../gestaoAdministrativa/fontes/PHP/framework/include/cabecalho.inc.php'; @@ -64,13 +64,20 @@ Sessao::write('arContrato' , array()); //Define a função do arquivo, ex: incluir, excluir, alterar, consultar, etc $stAcao = $request->get('stAcao'); -$stLink = ""; -if ($stAcao == 'alterar') { - $stLink = '&stAcao='.$request->get('stAcao').'&inCodEntidade='.$request->get('inCodEntidade').'&stExercicio='.$request->get('stExercicio'); - $stLink .= "&inCodTipoObra=".$request->get('inCodTipoObra')."&stNroObra=".$request->get('stNroObra')."&stExercicioLicitacao=".$request->get('stExercicioLicitacao'); - $stLink .= "&inCodModalidade=".$request->get('inCodModalidade')."&inCodLicitacao=".$request->get('inCodLicitacao'); -} -Sessao::write('stLink' , $stLink); +$arLink = Sessao::read('arLink'); + +if ( count($arLink) > 0 ) { + $stLink = ''; + foreach ($arLink as $stCampo => $stValor) { + if (is_array($stValor)) { + foreach ($stValor as $stCampo2 => $stValor2) { + $stLink .= "&".$stCampo2."=".@urlencode( $stValor2 ); + } + } else { + $stLink .= "&".$stCampo."=".urlencode( $stValor ); + } + } + } $rsCEP = new RecordSet(); $rsLicitacao = new RecordSet(); @@ -531,6 +538,15 @@ $obDtFinalMedicao->setNull ( true ); $obDtFinalMedicao->setSize ( 10 ); $obDtFinalMedicao->setMaxLength ( 10 ); +$obDtMedicao = new Data; +$obDtMedicao->setId ( "dtMedicao" ); +$obDtMedicao->setName ( "dtMedicao" ); +$obDtMedicao->setRotulo ( "**Data da Medição" ); +$obDtMedicao->setValue ( $request->get('dtMedicao') ); +$obDtMedicao->setNull ( true ); +$obDtMedicao->setSize ( 10 ); +$obDtMedicao->setMaxLength ( 10 ); + $obNumVlMedicao = new Moeda; $obNumVlMedicao->setId ( 'nuVlMedicao' ); $obNumVlMedicao->setName ( 'nuVlMedicao' ); @@ -721,6 +737,7 @@ $obFormulario->addComponente ( $obTxtNroMedicao ); $obFormulario->addComponente ( $obISelectMedidaObra ); $obFormulario->addComponente ( $obDtInicioMedicao ); $obFormulario->addComponente ( $obDtFinalMedicao ); +$obFormulario->addComponente ( $obDtMedicao ); $obFormulario->addComponente ( $obNumVlMedicao ); $obFormulario->addComponente ( $obTxtNFMedicao ); $obFormulario->addComponente ( $obDtNFMedicao ); diff --git a/gestaoPrestacaoContas/fontes/PHP/TCMBA/instancias/configuracao/FMManterConfiguracaoParcSubvOSCIP.php b/gestaoPrestacaoContas/fontes/PHP/TCMBA/instancias/configuracao/FMManterConfiguracaoParcSubvOSCIP.php new file mode 100644 index 0000000..b5ade5a --- /dev/null +++ b/gestaoPrestacaoContas/fontes/PHP/TCMBA/instancias/configuracao/FMManterConfiguracaoParcSubvOSCIP.php @@ -0,0 +1,306 @@ + +get("stCtrl"); +$stAcao = $request->get("stAcao"); +$stExercicioProcesso = $request->get('stExercicioProcesso', Sessao::getExercicio()); + +//****************************************// +//Define COMPONENTES DO FORMULARIO +//****************************************// +//Instancia o formulário +$obForm = new Form; +$obForm->setAction($pgProc); +$obForm->setTarget("oculto"); + +//Define o objeto da ação stAcao +$obHdnAcao = new Hidden; +$obHdnAcao->setId ("stAcao"); +$obHdnAcao->setName ("stAcao"); +$obHdnAcao->setValue($stAcao); + +//Define o objeto de controle +$obHdnCtrl = new Hidden; +$obHdnCtrl->setName ("stCtrl"); +$obHdnCtrl->setId ("stCtrl"); +$obHdnCtrl->setValue($stCtrl); + +$obHdnNumeroProcessoAnterior = new Hidden; +$obHdnNumeroProcessoAnterior->setName ("stHdnNumeroProcessoAnterior"); +$obHdnNumeroProcessoAnterior->setId ("stHdnNumeroProcessoAnterior"); + +$obILabelEntidade = new ILabelEntidade($obFrom); +$obILabelEntidade->setExercicio( $stExercicioProcesso ); +$obILabelEntidade->setMostraCodigo( true ); +$obILabelEntidade->setCodEntidade( $request->get('inCodEntidade') ); + +/* + * Cadastro dos Termos de Parceria/Subvenção/OSCIP + **/ +$obTxtExercicioProcesso = new TextBox; +$obTxtExercicioProcesso->setRotulo ( "Exercício do Processo"); +$obTxtExercicioProcesso->setTitle ( "Informe o exercício do Processo." ); +$obTxtExercicioProcesso->setName ( "stExercicioProcesso" ); +$obTxtExercicioProcesso->setId ( "stExercicioProcesso" ); +$obTxtExercicioProcesso->setValue ( $stExercicioProcesso ); +$obTxtExercicioProcesso->setInteiro ( false ); +$obTxtExercicioProcesso->setNull ( false ); +$obTxtExercicioProcesso->setMaxLength( 4 ); +$obTxtExercicioProcesso->setSize ( 5 ); + +$obHdnExercicioProcesso = new hidden; +$obHdnExercicioProcesso->setName ("hdnExercicioProcesso"); +$obHdnExercicioProcesso->setId ("hdnExercicioProcesso"); +$obHdnExercicioProcesso->setValue ($stExercicioProcesso); + +$obTxtNumeroProcesso = new TextBox(); +$obTxtNumeroProcesso->setRotulo ("Número Processo"); +$obTxtNumeroProcesso->setTitle ("Informe o número do processo da Subvenção, OSCIP e Termo de Parceria"); +$obTxtNumeroProcesso->setId ('stNumeroProcesso'); +$obTxtNumeroProcesso->setName ('stNumeroProcesso'); +$obTxtNumeroProcesso->setNull (false); +$obTxtNumeroProcesso->setMaxLength(16); +$obTxtNumeroProcesso->setSize (16); +$obTxtNumeroProcesso->obEvento->setOnBlur(" montaParametrosGET('validaTermoParceria');"); + +$obDtAssinatura = new Data(); +$obDtAssinatura->setRotulo("Data Assinatura"); +$obDtAssinatura->setName ('stDtAssinatura'); +$obDtAssinatura->setId ('stDtAssinatura'); +$obDtAssinatura->setNull (false); +$obDtAssinatura->obEvento->setOnBlur(" if( this.value != ''){ jQuery('#stDtPublicacao').removeProp('disabled'); jQuery('#stDtPublicacao').focus(); } else { jQuery('#stDtPublicacao').prop('disabled', true);}"); + +$obDtPublicacao = new Data(); +$obDtPublicacao->setRotulo ( "Data Publicação" ); +$obDtPublicacao->setName ( 'stDtPublicacao' ); +$obDtPublicacao->setId ( 'stDtPublicacao' ); +$obDtPublicacao->setNull ( false ); +$obDtPublicacao->setDisabled( true ); +$obDtPublicacao->obEvento->setOnBlur (" if( this.value != '' && jQuery('stDtAssinatura').val() != '') { montaParametrosGET('validaPeriodicidade', 'stDtAssinatura,stDtPublicacao'); } \n"); + +$obTxtImprensaOficial = new TextBox(); +$obTxtImprensaOficial->setRotulo ("Imprensa Oficial"); +$obTxtImprensaOficial->setName ("stImprensaOficial"); +$obTxtImprensaOficial->setId ("stImprensaOficial"); +$obTxtImprensaOficial->setNull (false); +$obTxtImprensaOficial->setMaxLength(50); +$obTxtImprensaOficial->setSize (42); + +$obDtInicioTermo = new Data(); +$obDtInicioTermo->setRotulo( "Data Início Termo" ); +$obDtInicioTermo->setTitle ( "Informe a data de início da vigência do termo." ); +$obDtInicioTermo->setName ( 'stDtInicioTermo' ); +$obDtInicioTermo->setId ( 'stDtInicioTermo' ); +$obDtInicioTermo->setNull ( false ); +$obDtInicioTermo->obEvento->setOnBlur(" if( this.value != ''){ jQuery('#stDtTerminoTermo').removeProp('disabled'); jQuery('#stDtTerminoTermo').focus(); } else { jQuery('#stDtTerminoTermo').prop('disabled', true);}"); + +$obDtTerminoTermo = new Data(); +$obDtTerminoTermo->setRotulo ( "Data Término Termo" ); +$obDtTerminoTermo->setTitle ( "Informe a data do término da vigência do termo." ); +$obDtTerminoTermo->setName ( 'stDtTerminoTermo' ); +$obDtTerminoTermo->setId ( 'stDtTerminoTermo' ); +$obDtTerminoTermo->setNull ( false ); +$obDtTerminoTermo->setDisabled( true ); +$obDtTerminoTermo->obEvento->setOnBlur(" if(this.value != '' && jQuery('stDtInicioTermo').val() != '') { montaParametrosGET('validaPeriodicidade', 'stDtInicioTermo,stDtTerminoTermo'); } \n"); + +//CGM fornecedor +$obBscCGMParceria = new IPopUpCGMVinculado($obForm); +$obBscCGMParceria->setTabelaVinculo ('sw_cgm_pessoa_juridica'); +$obBscCGMParceria->setCampoVinculo ('numcgm'); +$obBscCGMParceria->setRotulo ('CGM da OSCIP/Termo Parceria'); +$obBscCGMParceria->setName ('stNomParceria'); +$obBscCGMParceria->setId ('stNomParceria'); +$obBscCGMParceria->obCampoCod->setName("inCGMParceria"); +$obBscCGMParceria->obCampoCod->setId ("inCGMParceria"); +$obBscCGMParceria->obCampoCod->setNull(false); +$obBscCGMParceria->setNull (false); + +$obTxtObjeto = new TextArea(); +$obTxtObjeto->setRotulo ("Objeto"); +$obTxtObjeto->setName ("txtObjeto"); +$obTxtObjeto->setId ("txtObjeto"); +$obTxtObjeto->setNull (false); +$obTxtObjeto->setMaxCaracteres(400); + +$obTxtProcessoMJ = new TextBox(); +$obTxtProcessoMJ->setRotulo ("Processo da OSCIP no M. Justiça"); +$obTxtProcessoMJ->setTitle ("Informe o número do processo de concessão do título de OSCIP pelo Ministério da Justiça."); +$obTxtProcessoMJ->setName ("stProcessoMJ"); +$obTxtProcessoMJ->setId ("stProcessoMJ"); +$obTxtProcessoMJ->setMaxLength(36); +$obTxtProcessoMJ->setSize (30); + +$obDtProcessoMJ = new Data(); +$obDtProcessoMJ->setRotulo("Data Processo no M. Justiça"); +$obDtProcessoMJ->setName ("dtProcessoMJ"); +$obDtProcessoMJ->setId ("dtProcessoMJ"); + +$obDtPublicacaoMJ = new Data(); +$obDtPublicacaoMJ->setRotulo("Data Publicacao no M. Justiça"); +$obDtPublicacaoMJ->setName ("dtPublicacaoMJ"); +$obDtPublicacaoMJ->setId ("dtPublicacaoMJ"); + +/* + * + * Cadastro das Licitações + **/ +$obTxtProcessoLicitatorio = new TextBox(); +$obTxtProcessoLicitatorio->setRotulo ("Processo Licitatório"); +$obTxtProcessoLicitatorio->setTitle ("Preencher, quando for o caso, o Processo Licitatório feito para escolha da OSCIP parceria no termo sendo registrado."); +$obTxtProcessoLicitatorio->setName ("stProcessoLicitatorio"); +$obTxtProcessoLicitatorio->setId ("stProcessoLicitatorio"); +$obTxtProcessoLicitatorio->setMaxLength (36); +$obTxtProcessoLicitatorio->setSize (36); +$obTxtProcessoLicitatorio->setAlfaNumerico(true); + +$obTxtProcessoDispensa = new TextBox(); +$obTxtProcessoDispensa->setRotulo ("Processo de dispensa"); +$obTxtProcessoDispensa->setTitle ("Preencher, quando for o caso, o Processo de Dispensa feito para a escolha da OSCIP parceria no termo sendo registrado."); +$obTxtProcessoDispensa->setName ("stProcessoDispensa"); +$obTxtProcessoDispensa->setId ("stProcessoDispensa"); +$obTxtProcessoDispensa->setMaxLength (16); +$obTxtProcessoDispensa->setSize (16); +$obTxtProcessoDispensa->setAlfaNumerico(true); +/***************************** + * Cadastro dos Recursos Financeiros + ***************************** + */ +$obVlParceiroPublico = new Moeda(); +$obVlParceiroPublico->setRotulo ("Valor do Parceiro"); +$obVlParceiroPublico->setTitle ("Informe o valor dos recursos financeiros sob a responsabilidade do parceiro."); +$obVlParceiroPublico->setName ("vlParceiroPublico"); +$obVlParceiroPublico->setId ("vlParceiroPublico"); +$obVlParceiroPublico->setMaxLength(21); +$obVlParceiroPublico->setSize (21); + +$obVlParceiroOSCIP = new Moeda(); +$obVlParceiroOSCIP->setRotulo ("Valor da Subvenção/OSCIP /Termo Parceria"); +$obVlParceiroOSCIP->setTitle ("Informe o valor dos recursos financeiros sob a responsabilidade da OSCIP."); +$obVlParceiroOSCIP->setName ("vlParceiroOSCIP"); +$obVlParceiroOSCIP->setId ("vlParceiroOSCIP"); +$obVlParceiroOSCIP->setMaxLength(21); +$obVlParceiroOSCIP->setSize (21); + +/****************************** + * Cadastro das Dotações para os Termos de Parceria/Subvenção/OSCIP + ****************************** + **/ +// Define Objeto BuscaInner para Despesa +$obBscDespesa = new BuscaInner; +$obBscDespesa->setRotulo ("Dotação Orçamentária"); +$obBscDespesa->setTitle ("Dotação referente aos recursos financeiros sob a responsabilidade do parceiro público, a dotação a ser usada para pagamento das despesas do termo."); +$obBscDespesa->setId ("stNomDespesa"); +$obBscDespesa->setNullBarra (false); +$obBscDespesa->setObrigatorioBarra (true); +$obBscDespesa->obCampoCod->setName ("inCodDespesa"); +$obBscDespesa->obCampoCod->setSize (10); +$obBscDespesa->obCampoCod->setMaxLength(5); +$obBscDespesa->obCampoCod->setAlign ("left"); +$obBscDespesa->setFuncaoBusca ("abrePopUp('".CAM_GF_ORC_POPUPS."despesa/LSDespesa.php','frm','inCodDespesa','stNomDespesa','','".Sessao::getId()."','800','550');"); +$obBscDespesa->setValoresBusca ( CAM_GF_ORC_POPUPS."despesa/OCDespesa.php?".Sessao::getId(), $obForm->getName(), ''); + +$obSpnDotacoes = new Span(); +$obSpnDotacoes->setId("spnDotacoes"); + +$obSpnListaTermosCadastrados = new Span(); +$obSpnListaTermosCadastrados->setId('spnListaTermosCadastrados'); + +$obBtnOK = new OK(true); +$obBtnLimpar = new Button(); +$obBtnLimpar->setName("btnLimpar"); +$obBtnLimpar->setId("btnLimpar"); +$obBtnLimpar->setValue("Limpar"); +$obBtnLimpar->obEvento->setOnClick("LimparFormulario(); \n"); + +$arBarraOkLimpar = array($obBtnOK,$obBtnLimpar); + +//****************************************// +//Monta FORMULARIO +//****************************************// +$obFormulario = new Formulario; +$obFormulario->addForm ( $obForm ); +$obFormulario->addHidden ( $obHdnCtrl ); +$obFormulario->addHidden ( $obHdnAcao ); +$obFormulario->addHidden ( $obHdnExercicioProcesso ); +$obFormulario->addHidden ( $obHdnNumeroProcessoAnterior ); +$obFormulario->addTitulo ( "Dados para Termos de Parceria/Subvenção/OSCIP" ); +$obILabelEntidade->geraFormulario( $obFormulario ); +$obFormulario->addComponente ( $obTxtExercicioProcesso ); +$obFormulario->addComponente ( $obTxtNumeroProcesso ); +$obFormulario->addComponente ( $obDtAssinatura ); +$obFormulario->addComponente ( $obDtPublicacao ); +$obFormulario->addComponente ( $obTxtImprensaOficial ); +$obFormulario->addComponente ( $obDtInicioTermo ); +$obFormulario->addComponente ( $obDtTerminoTermo ); +$obFormulario->addComponente ( $obBscCGMParceria ); +$obFormulario->addComponente ( $obTxtObjeto ); +$obFormulario->addComponente ( $obTxtProcessoMJ ); +$obFormulario->addComponente ( $obDtProcessoMJ ); +$obFormulario->addComponente ( $obDtPublicacaoMJ ); +$obFormulario->addTitulo ( "Dados para Configuração de Licitações" ); +$obFormulario->addComponente ( $obTxtProcessoLicitatorio ); +$obFormulario->addComponente ( $obTxtProcessoDispensa ); +$obFormulario->addTitulo ( "Dados para Configuração de Recursos Financeiros" ); +$obFormulario->addComponente ( $obVlParceiroPublico ); +$obFormulario->addComponente ( $obVlParceiroOSCIP ); +$obFormulario->addTitulo ( "Dados para Configuração de Dotações" ); +$obFormulario->addComponente ( $obBscDespesa ); +$obFormulario->Incluir ( 'Dotacoes', array( $obBscDespesa,$obBscDespesa->obCampoCod ), true, false, '',true); +$obFormulario->addSpan ( $obSpnDotacoes ); +$obFormulario->defineBarra ( $arBarraOkLimpar ); +$obFormulario->addSpan ( $obSpnListaTermosCadastrados ); +$obFormulario->show(); + +require_once '../../../../../../gestaoAdministrativa/fontes/PHP/framework/include/rodape.inc.php'; +?> \ No newline at end of file diff --git a/gestaoPrestacaoContas/fontes/PHP/TCMBA/instancias/configuracao/FMManterConfiguracaoProrrogacaoTermo.php b/gestaoPrestacaoContas/fontes/PHP/TCMBA/instancias/configuracao/FMManterConfiguracaoProrrogacaoTermo.php new file mode 100644 index 0000000..125c9bc --- /dev/null +++ b/gestaoPrestacaoContas/fontes/PHP/TCMBA/instancias/configuracao/FMManterConfiguracaoProrrogacaoTermo.php @@ -0,0 +1,262 @@ + +get("stCtrl"); +$stAcao = $request->get("stAcao"); +$stExercicioProcesso = $request->get('stExercicioProcesso'); +$inCodEntidade = $request->get('inCodEntidade'); +$stNumeroProcesso = $request->get('stNumeroProcesso'); + +//****************************************// +//Define COMPONENTES DO FORMULARIO +//****************************************// +//Instancia o formulário +$obForm = new Form; +$obForm->setAction($pgProc); +$obForm->setTarget("oculto"); + +//Define o objeto da ação stAcao +$obHdnAcao = new Hidden; +$obHdnAcao->setId ("stAcao"); +$obHdnAcao->setName ("stAcao"); +$obHdnAcao->setValue($stAcao); + +//Define o objeto de controle +$obHdnCtrl = new Hidden; +$obHdnCtrl->setName ("stCtrl"); +$obHdnCtrl->setId ("stCtrl"); +$obHdnCtrl->setValue($stCtrl); + +$obHdnInId = new Hidden; +$obHdnInId->setName( "inId" ); +$obHdnInId->setId ( "inId" ); + + +$obHdnExercicio = new Hidden(); +$obHdnExercicio->setName ("stExercicioProcesso"); +$obHdnExercicio->setId ("stExercicioProcesso"); +$obHdnExercicio->setValue($stExercicioProcesso); + +$obHdnNumeroProcesso = new Hidden(); +$obHdnNumeroProcesso->setName ("stNumeroProcesso"); +$obHdnNumeroProcesso->setId ("stNumeroProcesso"); +$obHdnNumeroProcesso->setValue($stNumeroProcesso); + +$obHdnDataTerminoTermo = new Hidden(); +$obHdnDataTerminoTermo->setName("stDtTerminoTermo"); +$obHdnDataTerminoTermo->setId ("stDtTerminoTermo"); + +$obLblExercicio = new Label(); +$obLblExercicio->setRotulo("Exercicio do Termo de Parceria"); +$obLblExercicio->setId ("stExercicioTermo"); +$obLblExercicio->setName ("stExercicioTermo"); +$obLblExercicio->setValue ($stExercicioProcesso); + +$obILabelEntidade = new ILabelEntidade($obFrom); +$obILabelEntidade->setExercicio ($stExercicioProcesso); +$obILabelEntidade->setMostraCodigo(true); +$obILabelEntidade->setCodEntidade ($inCodEntidade); + +$obLblNumProcesso = new Label(); +$obLblNumProcesso->setRotulo("Número Processo"); +$obLblNumProcesso->setId ("stNumProcesso"); +$obLblNumProcesso->setName ("stNumProcesso"); +$obLblNumProcesso->setValue ($stNumeroProcesso); + +$obLblDataInicio = new Label(); +$obLblDataInicio->setRotulo("Data de Início"); +$obLblDataInicio->setId ("stDataInicio"); +$obLblDataInicio->setName ("stDataInicio"); + +$obLblDataTermino = new Label(); +$obLblDataTermino->setRotulo("Data de Término"); +$obLblDataTermino->setId ("stDataTermino"); +$obLblDataTermino->setName ("stDataTermino"); + +$obLblObjeto = new Label(); +$obLblObjeto->setRotulo("Objeto"); +$obLblObjeto->setId ("stObjeto"); +$obLblObjeto->setName ("stObjeto"); + +/****************************** + * Cadastro das Prorrogação Termos de Parceria/Subvenção/OSCIP + ****************************** + **/ +$obTxtExercicioProrrogacao = new TextBox; +$obTxtExercicioProrrogacao->setRotulo ("Exercício do Prorrogacao"); +$obTxtExercicioProrrogacao->setTitle ("Informe o exercício do Prorrogacao."); +$obTxtExercicioProrrogacao->setName ("stExercicioProrrogacao"); +$obTxtExercicioProrrogacao->setId ("stExercicioProrrogacao"); +$obTxtExercicioProrrogacao->setMaxLength (4); +$obTxtExercicioProrrogacao->setSize (5); +$obTxtExercicioProrrogacao->setInteiro (false); +$obTxtExercicioProrrogacao->setNullBarra (false); +$obTxtExercicioProrrogacao->setObrigatorioBarra(true); + +$obTxtNumeroTermoAditivo = new TextBox(); +$obTxtNumeroTermoAditivo->setRotulo ("Número do termo aditivo"); +$obTxtNumeroTermoAditivo->setTitle ("Informe o número do aditivo que trata da prorrogação"); +$obTxtNumeroTermoAditivo->setName ("stNumeroAditivo"); +$obTxtNumeroTermoAditivo->setId ("stNumeroAditivo"); +$obTxtNumeroTermoAditivo->setMaxLength (36); +$obTxtNumeroTermoAditivo->setSize (36); +$obTxtNumeroTermoAditivo->setNullBarra (false); +$obTxtNumeroTermoAditivo->setObrigatorioBarra(true); + +$obDtProrrogacao = new Data(); +$obDtProrrogacao->setRotulo ("Data da prorrogação"); +$obDtProrrogacao->setName ("dtProrrogacao"); +$obDtProrrogacao->setId ("dtProrrogacao"); +$obDtProrrogacao->setNullBarra (false); +$obDtProrrogacao->setObrigatorioBarra(true); + +$obDtPublicaoProrrogacao = new Data(); +$obDtPublicaoProrrogacao->setRotulo ("Data de Publicação da Prorrogação"); +$obDtPublicaoProrrogacao->setName ("dtPublicacaoProrrogacao"); +$obDtPublicaoProrrogacao->setId ("dtPublicacaoProrrogacao"); +$obDtPublicaoProrrogacao->setNullBarra (false); +$obDtPublicaoProrrogacao->setObrigatorioBarra(true); + +$obTxtImprensaOficialProrrogacao = new TextBox(); +$obTxtImprensaOficialProrrogacao->setRotulo ("Imprensa oficial"); +$obTxtImprensaOficialProrrogacao->setName ("stImprensaOficialProrrogacao"); +$obTxtImprensaOficialProrrogacao->setId ("stImprensaOficialProrrogacao"); +$obTxtImprensaOficialProrrogacao->setMaxLength (50); +$obTxtImprensaOficialProrrogacao->setSize (42); +$obTxtImprensaOficialProrrogacao->setNullBarra (false); +$obTxtImprensaOficialProrrogacao->setObrigatorioBarra(true); + +$obRdAdimplementoSim = new Radio(); +$obRdAdimplementoSim->setRotulo ("Indicador de adimplemento"); +$obRdAdimplementoSim->setTitle ("Selecione caso tenha havido ou não adimplência por parte da OSCIP."); +$obRdAdimplementoSim->setLabel ("Sim"); +$obRdAdimplementoSim->setName ("boIndicadorAdimplemento"); +$obRdAdimplementoSim->setId ("boIndicadorAdimplemento"); +$obRdAdimplementoSim->setChecked (false); +$obRdAdimplementoSim->setValue ('t'); +$obRdAdimplementoSim->setObrigatorioBarra(true); + +$obRdAdimplementoNao = new Radio(); +$obRdAdimplementoNao->setRotulo ("Indicador de adimplemento"); +$obRdAdimplementoNao->setTitle ("Selecione caso tenha havido ou não adimplência por parte da OSCIP."); +$obRdAdimplementoNao->setLabel ("Não"); +$obRdAdimplementoNao->setName ("boIndicadorAdimplemento"); +$obRdAdimplementoNao->setId ("boIndicadorAdimplemento"); +$obRdAdimplementoNao->setChecked (true); +$obRdAdimplementoNao->setValue ('f'); +$obRdAdimplementoNao->setObrigatorioBarra(true); + +$obDtInicioProrrogacao = new Data(); +$obDtInicioProrrogacao->setRotulo ("Data do Início"); +$obDtInicioProrrogacao->setName ("dtInicioProrrogacao"); +$obDtInicioProrrogacao->setId ("dtInicioProrrogacao"); +$obDtInicioProrrogacao->setNullBarra (false); +$obDtInicioProrrogacao->setObrigatorioBarra(true); +$obDtInicioProrrogacao->obEvento->setOnBlur(" if( this.value != '' && jQuery('#stDtTerminoTermo').val() != ''){ montaParametrosGET('validaDataProrrogacao'); }\n"); + +$obDtTerminoProrrogacao = new Data(); +$obDtTerminoProrrogacao->setRotulo ("Data de Término"); +$obDtTerminoProrrogacao->setName ("dtTerminoProrrogacao"); +$obDtTerminoProrrogacao->setId ("dtTerminoProrrogacao"); +$obDtTerminoProrrogacao->setNullBarra (false); +$obDtTerminoProrrogacao->setObrigatorioBarra(true); +$obDtTerminoProrrogacao->obEvento->setOnBlur(" if(this.value != '' && jQuery('dtInicioProrrogacao').val() != '') { montaParametrosGET('validaPeriodicidade', 'dtInicioProrrogacao,dtTerminoProrrogacao');} \n"); + +$obVlProrrogacao = new Moeda(); +$obVlProrrogacao->setRotulo ("Valor da prorrogação"); +$obVlProrrogacao->setName ("vlProrrogacao"); +$obVlProrrogacao->setId ("vlProrrogacao"); +$obVlProrrogacao->setMaxLength (21); +$obVlProrrogacao->setSize (15); +$obVlProrrogacao->setNullBarra (false); +$obVlProrrogacao->setObrigatorioBarra(true); + +$obSpnProrrogacoes = new Span(); +$obSpnProrrogacoes->setId('spnProrrogacoes'); + +//****************************************// +//Monta FORMULARIO +//****************************************// +$obFormulario = new Formulario; +$obFormulario->addForm ( $obForm ); +$obFormulario->addHidden ( $obHdnCtrl ); +$obFormulario->addHidden ( $obHdnAcao ); +$obFormulario->addHidden ( $obHdnInId ); +$obFormulario->addHidden ( $obHdnExercicio ); +$obFormulario->addHidden ( $obHdnNumeroProcesso ); +$obFormulario->addHidden ( $obHdnDataTerminoTermo ); +$obFormulario->addTitulo ( "Dados para Termos de Parceria/Subvenção/OSCIP" ); +$obILabelEntidade->geraFormulario( $obFormulario ); +$obFormulario->addComponente ( $obLblExercicio ); +$obFormulario->addComponente ( $obLblNumProcesso ); +$obFormulario->addComponente ( $obLblDataInicio ); +$obFormulario->addComponente ( $obLblDataTermino ); +$obFormulario->addComponente ( $obLblObjeto ); +$obFormulario->addTitulo ( "Dados para Prorrogação do Termos de Parceria/Subvenção/OSCIP" ); +$obFormulario->addComponente ( $obTxtExercicioProrrogacao ); +$obFormulario->addComponente ( $obTxtNumeroTermoAditivo ); +$obFormulario->addComponente ( $obDtProrrogacao ); +$obFormulario->addComponente ( $obDtPublicaoProrrogacao ); +$obFormulario->addComponente ( $obTxtImprensaOficialProrrogacao ); +$obFormulario->addComponenteComposto ( $obRdAdimplementoSim, $obRdAdimplementoNao ); +$obFormulario->addComponente ( $obDtInicioProrrogacao ); +$obFormulario->addComponente ( $obDtTerminoProrrogacao ); +$obFormulario->addComponente ( $obVlProrrogacao ); +$obFormulario->IncluirAlterar( 'Prorrogacoes',array($obTxtExercicioProrrogacao,$obTxtNumeroTermoAditivo,$obDtProrrogacao,$obDtPublicaoProrrogacao,$obTxtImprensaOficialProrrogacao,$obRdAdimplementoSim,$obRdAdimplementoNao,$obDtInicioProrrogacao,$obDtTerminoProrrogacao,$obVlProrrogacao), true, false,'', true); +$obFormulario->addSpan ( $obSpnProrrogacoes ); +$obFormulario->OK(true); +$obFormulario->show(); + + +require_once '../../../../../../gestaoAdministrativa/fontes/PHP/framework/include/rodape.inc.php'; +?> \ No newline at end of file diff --git a/gestaoPrestacaoContas/fontes/PHP/TCMBA/instancias/configuracao/FMManterConfiguracaoTipoSalario.php b/gestaoPrestacaoContas/fontes/PHP/TCMBA/instancias/configuracao/FMManterConfiguracaoTipoSalario.php new file mode 100644 index 0000000..4a5c73a --- /dev/null +++ b/gestaoPrestacaoContas/fontes/PHP/TCMBA/instancias/configuracao/FMManterConfiguracaoTipoSalario.php @@ -0,0 +1,483 @@ + +get('inCodEntidade')); + +// Busca a entidade definida como prefeitura na configuração do orçamento +$stCampo = "valor"; +$stTabela = "administracao.configuracao"; +$stFiltro = " WHERE exercicio = '".Sessao::getExercicio()."'"; +$stFiltro .= " AND parametro = 'cod_entidade_prefeitura' "; + +$inCodEntidadePrefeitura = SistemaLegado::pegaDado($stCampo, $stTabela, $stFiltro); + +// Se foi selecionada a entidade definida como prefeitura, não vai "_" no schema +if ($request->get('inCodEntidade') == $inCodEntidadePrefeitura) { + $stFiltro = " WHERE nspname = 'pessoal'"; + $stSchema = ''; +} else { + $stFiltro = " WHERE nspname = 'pessoal_".$request->get('inCodEntidade')."'"; + $stSchema = '_'.$request->get('inCodEntidade'); +} + +$obTEntidade = new TEntidade(); +$obTEntidade->recuperaEsquemasCriados($rsEsquemas, $stFiltro); + +// Verifica se existe o schema para a entidade selecionada +if ($rsEsquemas->getNumLinhas() < 1) { + SistemaLegado::alertaAviso($pgFilt.'?stAcao='.$request->get('stAcao'), 'Não existe entidade criada no RH para a entidade selecionada!' , '', 'aviso', Sessao::getId(), '../'); +} + +// Se foi selecionada a entidade definida como prefeitura, não vai "_" no schema +if ($request->get('inCodEntidade') == $inCodEntidadePrefeitura) { + Sessao::setEntidade(''); +} else { + // Se não foi selecionada a entidade definida como prefeitura + // ao executar as consultas, automaticamente é adicionado o "_" + cod_entidade selecionada + $arSchemasRH = array(); + $obTEntidade->recuperaSchemasRH($rsSchemasRH); + while (!$rsSchemasRH->eof()) { + $arSchemasRH[] = $rsSchemasRH->getCampo("schema_nome"); + $rsSchemasRH->proximo(); + } + Sessao::write('arSchemasRH', $arSchemasRH, true); + Sessao::setEntidade($request->get('inCodEntidade')); +} + +$obForm = new Form(); +$obForm->setAction( $pgProc ); +$obForm->setTarget( "oculto" ); + +$obHdnAcao = new Hidden(); +$obHdnAcao->setName ( "stAcao" ); +$obHdnAcao->setValue( $request->get('stAcao') ); + +$obHdnSchema = new Hidden; +$obHdnSchema->setName ( 'stSchema' ); +$obHdnSchema->setValue( $stSchema ); + +$obHdnEntidade = new Hidden(); +$obHdnEntidade->setName( "inCodEntidade" ); +$obHdnEntidade->setValue( $request->get('inCodEntidade') ); + +$obLblEntidade = new Label; +$obLblEntidade->setRotulo('Entidade'); +$obLblEntidade->setName ('stEntidade'); +$obLblEntidade->setId ('stEntidade'); +$obLblEntidade->setValue ($request->get('stNomEntidade')); + +/*** Tipo Função Servidor ***/ +$obTTCMBATipoFuncaoServidor = new TTCMBATipoFuncaoServidor(); +$obTTCMBATipoFuncaoServidor->recuperaTodos($rsTipoFuncaoServidor, ' ORDER BY cod_tipo_funcao'); + +$obCmbTipoFuncaoServidor = new Select(); +$obCmbTipoFuncaoServidor->setName ('cmbTipofuncaoServidor'); +$obCmbTipoFuncaoServidor->setId ('cmbTipofuncaoServidor'); +$obCmbTipoFuncaoServidor->setValue ('[cod_tipo_funcao]'); +$obCmbTipoFuncaoServidor->addOption ('','Selecione'); +$obCmbTipoFuncaoServidor->setRotulo ('*Tipo Função do Servidor'); +$obCmbTipoFuncaoServidor->setCampoId ('[cod_tipo_funcao]'); +$obCmbTipoFuncaoServidor->setCampodesc ('[cod_tipo_funcao] - [descricao]'); +$obCmbTipoFuncaoServidor->setTitle ('Informe o Tipo Funçao do Servidor.'); +$obCmbTipoFuncaoServidor->preencheCombo ($rsTipoFuncaoServidor); +// ver se tem como reorganizar de forma numerica a lista + +$obTPessoalCargo = new TPessoalCargo ; +$obTPessoalCargo->recuperaTodos( $rsPessoalCargo, " ORDER BY cod_cargo" ); + +$obCmbCargosServidor = new SelectMultiplo(); +$obCmbCargosServidor->setName ( 'arCargosServidor' ); +$obCmbCargosServidor->setRotulo( "Cargo" ); +$obCmbCargosServidor->setNull ( true ); +$obCmbCargosServidor->setObrigatorioBarra (true); +$obCmbCargosServidor->setTitle ( 'Cargos Disponíveis' ); + +$obCmbCargosServidor->SetNomeLista1( 'arCargosDisponiveisServidor' ); +$obCmbCargosServidor->setCampoId1 ( '[cod_cargo]' ); +$obCmbCargosServidor->setCampoDesc1( '[cod_cargo] - [descricao]' ); +$obCmbCargosServidor->SetRecord1 ( $rsPessoalCargo ); + +$obCmbCargosServidor->SetNomeLista2( 'arCargosSelecionadosServidor' ); +$obCmbCargosServidor->setCampoId2 ( '[cod_cargo]' ); +$obCmbCargosServidor->setCampoDesc2( '[cod_cargo] - [descricao]' ); +$obCmbCargosServidor->SetRecord2 ( new RecordSet() ); + +$obspnListaFuncaoServidor = new Span; +$obspnListaFuncaoServidor->setId ( 'spnListaFuncaoServidor' ); + +$obBtnIncluirCargoServidor = new Button; +$obBtnIncluirCargoServidor->setValue( 'Incluir' ); +$obBtnIncluirCargoServidor->obEvento->setOnClick( "montaParametrosGET('incluirFuncaoServidorLista','cmbTipofuncaoServidor,arCargosSelecionadosServidor');" ); + +$obBtnLimparCargoServidor = new Button; +$obBtnLimparCargoServidor->setValue( 'Limpar' ); +$obBtnLimparCargoServidor->obEvento->setOnClick( "executaFuncaoAjax('limparListaCargoServidor');" ); + +/*** Tipo Função Servidor Temporário ***/ +$obTTCMBATipoFuncaoServidorTemporario = new TTCMBATipoFuncaoServidorTemporario(); +$obTTCMBATipoFuncaoServidorTemporario->recuperaTodos($rsTipoFuncaoServidorTemporario, ' ORDER BY cod_tipo_funcao'); + +$obCmbTipoFuncaoServidorTemporario = new Select(); +$obCmbTipoFuncaoServidorTemporario->setName ('cmbTipofuncaoServidorTemporario'); +$obCmbTipoFuncaoServidorTemporario->setId ('cmbTipofuncaoServidorTemporario'); +$obCmbTipoFuncaoServidorTemporario->setValue ('[cod_tipo_funcao]'); +$obCmbTipoFuncaoServidorTemporario->addOption ('','Selecione'); +$obCmbTipoFuncaoServidorTemporario->setRotulo ('*Função Servidor Temporário'); +$obCmbTipoFuncaoServidorTemporario->setCampoId ('[cod_tipo_funcao]'); +$obCmbTipoFuncaoServidorTemporario->setCampodesc ('[cod_tipo_funcao] - [descricao]'); +$obCmbTipoFuncaoServidorTemporario->setTitle ('Informe o Tipo Funçao do Servidor Temporário.'); +$obCmbTipoFuncaoServidorTemporario->preencheCombo ($rsTipoFuncaoServidorTemporario); + +$obCmbCargosServidorTemporario = new SelectMultiplo(); +$obCmbCargosServidorTemporario->setName ( 'arCargosServidorTemporario' ); +$obCmbCargosServidorTemporario->setRotulo( "Cargo" ); +$obCmbCargosServidorTemporario->setNull ( true ); +$obCmbCargosServidorTemporario->setObrigatorioBarra (true); +$obCmbCargosServidorTemporario->setTitle ( 'Cargos Disponíveis' ); + +$obCmbCargosServidorTemporario->SetNomeLista1( 'arCargosDisponiveisServidorTemporario' ); +$obCmbCargosServidorTemporario->setCampoId1 ( '[cod_cargo]' ); +$obCmbCargosServidorTemporario->setCampoDesc1( '[cod_cargo] - [descricao]' ); +$obCmbCargosServidorTemporario->SetRecord1 ( $rsPessoalCargo ); + +$obCmbCargosServidorTemporario->SetNomeLista2( 'arCargosSelecionadosServidorTemporario' ); +$obCmbCargosServidorTemporario->setCampoId2 ( '[cod_cargo]' ); +$obCmbCargosServidorTemporario->setCampoDesc2( '[cod_cargo] - [descricao]' ); +$obCmbCargosServidorTemporario->SetRecord2 ( new RecordSet() ); + +$obspnListaFuncaoServidorTemporario = new Span; +$obspnListaFuncaoServidorTemporario->setId ( 'spnListaFuncaoServidorTemporario' ); + +$obBtnIncluirCargoServidorTemporario = new Button; +$obBtnIncluirCargoServidorTemporario->setValue( 'Incluir' ); +$obBtnIncluirCargoServidorTemporario->obEvento->setOnClick( "montaParametrosGET('incluirFuncaoServidorListaTemporario','cmbTipofuncaoServidorTemporario,arCargosSelecionadosServidorTemporario');" ); + +$obBtnLimparCargoServidorTemporario = new Button; +$obBtnLimparCargoServidorTemporario->setValue( 'Limpar' ); +$obBtnLimparCargoServidorTemporario->obEvento->setOnClick( "executaFuncaoAjax('limparListaCargoServidorTemporario');" ); + +/*** Banco Empréstimo ***/ +$obTMONBanco = new TMONBanco(); +$obTMONBanco->recuperaTodos($rsBancoEmprestimo, " WHERE num_banco IN ('001','237','218','318','104','412','229','081','265','399','341','004','638','453','033') "); + +$obCmbBancoEmprestimo = new Select(); +$obCmbBancoEmprestimo->setName ('cmbBancoEmprestimo'); +$obCmbBancoEmprestimo->setId ('cmbBancoEmprestimo'); +$obCmbBancoEmprestimo->setValue ('[cod_banco]'); +$obCmbBancoEmprestimo->addOption ('','Selecione'); +$obCmbBancoEmprestimo->setRotulo ('*Código de compensação do banco do Empréstimo'); +$obCmbBancoEmprestimo->setCampoId ('[cod_banco]'); +$obCmbBancoEmprestimo->setCampodesc ('[num_banco] - [nom_banco]'); +$obCmbBancoEmprestimo->setTitle ('Informe o código de compensação do banco do empréstimo.'); +$obCmbBancoEmprestimo->preencheCombo ($rsBancoEmprestimo); + +$obTFolhaPagamentoEvento = new TFolhaPagamentoEvento(); +$obTFolhaPagamentoEvento->recuperaTodos( $rsEventosEmprestimo, ' ORDER BY cod_evento' ); + +$obCmbEventosBancoEmprestimo = new SelectMultiplo(); +$obCmbEventosBancoEmprestimo->setName ( 'arEventosBancoEmprestimo' ); +$obCmbEventosBancoEmprestimo->setRotulo( "Empréstimos Consignados" ); +$obCmbEventosBancoEmprestimo->setNull ( true ); +$obCmbEventosBancoEmprestimo->setObrigatorioBarra (true); +$obCmbEventosBancoEmprestimo->setTitle ( 'Empréstimos Consignados Disponíveis' ); + +$obCmbEventosBancoEmprestimo->SetNomeLista1( 'arEventosDisponiveis' ); +$obCmbEventosBancoEmprestimo->setCampoId1 ( '[cod_evento]' ); +$obCmbEventosBancoEmprestimo->setCampoDesc1( '[codigo] - [descricao]' ); +$obCmbEventosBancoEmprestimo->SetRecord1 ( $rsEventosEmprestimo ); + +$obCmbEventosBancoEmprestimo->SetNomeLista2( 'arEventosSelecionados' ); +$obCmbEventosBancoEmprestimo->setCampoId2 ( '[cod_evento]' ); +$obCmbEventosBancoEmprestimo->setCampoDesc2( '[codigo] - [descricao]' ); +$obCmbEventosBancoEmprestimo->SetRecord2 ( new RecordSet() ); + +$obspnListaBancoEmprestimo = new Span; +$obspnListaBancoEmprestimo->setId ( 'spnListaBancoEmprestimo' ); + +$obBtnIncluirEventosEmprestimo = new Button; +$obBtnIncluirEventosEmprestimo->setValue( 'Incluir' ); +$obBtnIncluirEventosEmprestimo->obEvento->setOnClick( "montaParametrosGET('incluirBancoEmprestimo','cmbBancoEmprestimo,arEventosSelecionados');" ); + +$obBtnLimparEventosEmprestimo = new Button; +$obBtnLimparEventosEmprestimo->setValue( 'Limpar' ); +$obBtnLimparEventosEmprestimo->obEvento->setOnClick( "executaFuncaoAjax('limparListaEventosEmprestimo');" ); + +/*** Informações de Vantagens/Descontos ***/ +$obRFolhaPagamentoEvento = new RFolhaPagamentoEvento(); +$obRFolhaPagamentoEvento->listar($rsEventosProventos, " AND natureza = 'P' ", " ORDER BY codigo"); + +/*** Salário Base ***/ +$obCmbSalarioBase = new SelectMultiplo(); +$obCmbSalarioBase->setName ( 'arSalariosBase' ); +$obCmbSalarioBase->setRotulo( "Salário Base" ); +$obCmbSalarioBase->setTitle ( 'Salários Base Disponíveis' ); + +$obCmbSalarioBase->SetNomeLista1( 'arSalariosBaseDisponiveis' ); +$obCmbSalarioBase->setCampoId1 ( '[cod_evento]' ); +$obCmbSalarioBase->setCampoDesc1( '[codigo] - [descricao]' ); +$obCmbSalarioBase->SetRecord1 ( $rsEventosProventos ); + +$obCmbSalarioBase->SetNomeLista2( 'arSalarioBaseSelecionados' ); +$obCmbSalarioBase->setCampoId2 ( '[cod_evento]' ); +$obCmbSalarioBase->setCampoDesc2( '[codigo] - [descricao]' ); +$obCmbSalarioBase->SetRecord2 ( new RecordSet() ); + +/*** Demais Vantagens Salariais ***/ +$obCmbVantagensSalariais = new SelectMultiplo(); +$obCmbVantagensSalariais->setName ( 'arVantagensSalariais' ); +$obCmbVantagensSalariais->setRotulo( "Demais vantagens salariais" ); +$obCmbVantagensSalariais->setTitle ( 'Demais vantagens salariais Disponíveis' ); + +$obCmbVantagensSalariais->SetNomeLista1( 'arVantagensSalariaisDisponiveis' ); +$obCmbVantagensSalariais->setCampoId1 ( '[cod_evento]' ); +$obCmbVantagensSalariais->setCampoDesc1( '[codigo] - [descricao]' ); +$obCmbVantagensSalariais->SetRecord1 ( $rsEventosProventos ); + +$obCmbVantagensSalariais->SetNomeLista2( 'arVantagensSalariaisSelecionados' ); +$obCmbVantagensSalariais->setCampoId2 ( '[cod_evento]' ); +$obCmbVantagensSalariais->setCampoDesc2( '[codigo] - [descricao]' ); +$obCmbVantagensSalariais->SetRecord2 ( new RecordSet() ); + +/*** Gratificação de função ***/ +$obCmbGratificacaoFuncao = new SelectMultiplo(); +$obCmbGratificacaoFuncao->setName ( 'arGratificacaoFuncao' ); +$obCmbGratificacaoFuncao->setRotulo( "Gratificação de função" ); +$obCmbGratificacaoFuncao->setTitle ( 'Gratificação de função Disponíveis' ); + +$obCmbGratificacaoFuncao->SetNomeLista1( 'arGratificacaoFuncaoDisponiveis' ); +$obCmbGratificacaoFuncao->setCampoId1 ( '[cod_evento]' ); +$obCmbGratificacaoFuncao->setCampoDesc1( '[codigo] - [descricao]' ); +$obCmbGratificacaoFuncao->SetRecord1 ( $rsEventosProventos ); + +$obCmbGratificacaoFuncao->SetNomeLista2( 'arGratificacaoFuncaoSelecionados' ); +$obCmbGratificacaoFuncao->setCampoId2 ( '[cod_evento]' ); +$obCmbGratificacaoFuncao->setCampoDesc2( '[codigo] - [descricao]' ); +$obCmbGratificacaoFuncao->SetRecord2 ( new RecordSet() ); + +/*** Salário Família ***/ +$obCmbSalarioFamilia = new SelectMultiplo(); +$obCmbSalarioFamilia->setName ( 'arSalarioFamilia' ); +$obCmbSalarioFamilia->setRotulo( "Salário Família" ); +$obCmbSalarioFamilia->setTitle ( 'Salário Família Disponíveis' ); + +$obCmbSalarioFamilia->SetNomeLista1( 'arSalarioFamiliaDisponiveis' ); +$obCmbSalarioFamilia->setCampoId1 ( '[cod_evento]' ); +$obCmbSalarioFamilia->setCampoDesc1( '[codigo] - [descricao]' ); +$obCmbSalarioFamilia->SetRecord1 ( $rsEventosProventos ); + +$obCmbSalarioFamilia->SetNomeLista2( 'arSalarioFamiliaSelecionados' ); +$obCmbSalarioFamilia->setCampoId2 ( '[cod_evento]' ); +$obCmbSalarioFamilia->setCampoDesc2( '[codigo] - [descricao]' ); +$obCmbSalarioFamilia->SetRecord2 ( new RecordSet() ); + +/*** Horas Extras trabalhadas ***/ +$obCmbHorasExtras = new SelectMultiplo(); +$obCmbHorasExtras->setName ( 'arHorasExtras' ); +$obCmbHorasExtras->setRotulo( "Horas Extras trabalhadas" ); +$obCmbHorasExtras->setTitle ( 'Horas Extras trabalhadas Disponíveis' ); + +$obCmbHorasExtras->SetNomeLista1( 'arHorasExtrasDisponiveis' ); +$obCmbHorasExtras->setCampoId1 ( '[cod_evento]' ); +$obCmbHorasExtras->setCampoDesc1( '[codigo] - [descricao]' ); +$obCmbHorasExtras->SetRecord1 ( $rsEventosProventos ); + +$obCmbHorasExtras->SetNomeLista2( 'arHorasExtrasSelecionados' ); +$obCmbHorasExtras->setCampoId2 ( '[cod_evento]' ); +$obCmbHorasExtras->setCampoDesc2( '[codigo] - [descricao]' ); +$obCmbHorasExtras->SetRecord2 ( new RecordSet() ); + +/*** Demais Descontos ***/ +$obCmbDemaisDescontos = new SelectMultiplo(); +$obCmbDemaisDescontos->setName ( 'arDemaisDescontos' ); +$obCmbDemaisDescontos->setRotulo( "Demais Descontos" ); +$obCmbDemaisDescontos->setTitle ( 'Informar o total dos demais descontos EXCETO IR, INSS, Consignado, pensão e plano de saúde' ); + +$obCmbDemaisDescontos->SetNomeLista1( 'arDemaisDescontosDisponiveis' ); +$obCmbDemaisDescontos->setCampoId1 ( '[cod_evento]' ); +$obCmbDemaisDescontos->setCampoDesc1( '[codigo] - [descricao]' ); +$obCmbDemaisDescontos->SetRecord1 ( $rsEventosProventos ); + +$obCmbDemaisDescontos->SetNomeLista2( 'arDemaisDescontosSelecionados' ); +$obCmbDemaisDescontos->setCampoId2 ( '[cod_evento]' ); +$obCmbDemaisDescontos->setCampoDesc2( '[codigo] - [descricao]' ); +$obCmbDemaisDescontos->SetRecord2 ( new RecordSet() ); + +/*** Plano de Saúde/Odontológico ***/ +$obRFolhaPagamentoEvento->listar($rsEventosDescontos, " AND natureza = 'D' ", " ORDER BY codigo"); + +$obCmbPlanoSaude = new SelectMultiplo(); +$obCmbPlanoSaude->setName ( 'arPlanoSaude' ); +$obCmbPlanoSaude->setRotulo( "Plano de Saúde/Odontológico" ); +$obCmbPlanoSaude->setTitle ( 'Planos de Saúde/Odontológico Disponíveis' ); + +$obCmbPlanoSaude->SetNomeLista1( 'arPlanoSaudeDisponiveis' ); +$obCmbPlanoSaude->setCampoId1 ( '[cod_evento]' ); +$obCmbPlanoSaude->setCampoDesc1( '[codigo] - [descricao]' ); +$obCmbPlanoSaude->SetRecord1 ( $rsEventosDescontos ); + +$obCmbPlanoSaude->SetNomeLista2( 'arPlanoSaudeSelecionados' ); +$obCmbPlanoSaude->setCampoId2 ( '[cod_evento]' ); +$obCmbPlanoSaude->setCampoDesc2( '[codigo] - [descricao]' ); +$obCmbPlanoSaude->SetRecord2 ( new RecordSet() ); + +/*** Classe/Aplicação do Salário do Servidor ***/ +$obTTCMBAFonteRecursoServidor = new TTCMBAFonteRecursoServidor(); +$obTTCMBAFonteRecursoServidor->recuperaTodos($rsFonteRecurso, ' ORDER BY cod_tipo_fonte'); + +$obCmbFonteRecursoServidor = new Select(); +$obCmbFonteRecursoServidor->setName ('cmbFonteRecursoServidor'); +$obCmbFonteRecursoServidor->setId ('cmbFonteRecursoServidor'); +$obCmbFonteRecursoServidor->setValue ('[cod_tipo_fonte]'); +$obCmbFonteRecursoServidor->addOption ('','Selecione'); +$obCmbFonteRecursoServidor->setRotulo ('*Classe/Aplicação do Salário do Servidor'); +$obCmbFonteRecursoServidor->setCampoId ('[cod_tipo_fonte]'); +$obCmbFonteRecursoServidor->setCampodesc ('[cod_tipo_fonte] - [descricao]'); +$obCmbFonteRecursoServidor->setTitle ('Informe a Classe/Aplicação do Salário do Servidor.'); +$obCmbFonteRecursoServidor->preencheCombo ($rsFonteRecurso); + +$obISelectMultiploLotacao = new ISelectMultiploLotacao; +$obISelectMultiploLotacao->setRotulo("*Lotação"); + +$obISelectMultiploLocal = new ISelectMultiploLocal; + +$obspnListaFonteecursoServidor = new Span; +$obspnListaFonteecursoServidor->setId ( 'spnListaFonteRecursoServidor' ); + +$obBtnIncluirFonteRecursoServidor = new Button; +$obBtnIncluirFonteRecursoServidor->setValue( 'Incluir' ); +$obBtnIncluirFonteRecursoServidor->obEvento->setOnClick( "montaParametrosGET('incluirFonteRecursoServidor','cmbFonteRecursoServidor,inCodLotacaoSelecionados,inCodLocalSelecionados');" ); + +$obBtnLimparFonteRecursoServidor = new Button; +$obBtnLimparFonteRecursoServidor->setValue( 'Limpar' ); +$obBtnLimparFonteRecursoServidor->obEvento->setOnClick( "executaFuncaoAjax('limparListaFonteRecursoServidor');" ); + +$obOk = new Ok; +$obOk->setId ("btnOk"); +$obOk->setName ("btnOk"); + +$obLimpar = new Button; +$obLimpar->setValue ( "Limpar" ); +$obLimpar->setId ( "btnLimpar" ); +$obLimpar->setName ( "btnLimpar" ); +$obLimpar->obEvento->setOnClick( "executaFuncaoAjax('limparTudo');" ); + +$obFormulario = new Formulario(); +$obFormulario->addForm ( $obForm ); +$obFormulario->addHidden ( $obHdnAcao ); +$obFormulario->addHidden ( $obHdnSchema ); +$obFormulario->addHidden ( $obHdnEntidade ); + +$obFormulario->addComponente ( $obLblEntidade ); + +/*** Função Servidor ***/ +$obFormulario->addTitulo ( 'Informações de Função do Servidor' ); +$obFormulario->addComponente ( $obCmbTipoFuncaoServidor ); +$obFormulario->addComponente ( $obCmbCargosServidor ); +$obFormulario->agrupaComponentes( array( $obBtnIncluirCargoServidor, $obBtnLimparCargoServidor ) ); +$obFormulario->addSpan ( $obspnListaFuncaoServidor ); + +$obFormulario->addTitulo ( 'Informações de Função Temporário' ); +$obFormulario->addComponente ( $obCmbTipoFuncaoServidorTemporario ); +$obFormulario->addComponente ( $obCmbCargosServidorTemporario ); +$obFormulario->agrupaComponentes( array( $obBtnIncluirCargoServidorTemporario, $obBtnLimparCargoServidorTemporario ) ); +$obFormulario->addSpan ( $obspnListaFuncaoServidorTemporario ); + +$obFormulario->addTitulo ( 'Informações de Aplicação do Salário do Servidor' ); +$obFormulario->addComponente ( $obCmbFonteRecursoServidor ); +$obFormulario->addComponente ( $obISelectMultiploLotacao ); +$obFormulario->addComponente ( $obISelectMultiploLocal ); +$obFormulario->agrupaComponentes( array( $obBtnIncluirFonteRecursoServidor, $obBtnLimparFonteRecursoServidor ) ); +$obFormulario->addSpan ( $obspnListaFonteecursoServidor ); + +$obFormulario->addTitulo ( 'Informações de Vantagens/Descontos' ); +$obFormulario->addComponente ( $obCmbSalarioBase ); +$obFormulario->addComponente ( $obCmbVantagensSalariais ); +$obFormulario->addComponente ( $obCmbGratificacaoFuncao ); +$obFormulario->addComponente ( $obCmbSalarioFamilia ); +$obFormulario->addComponente ( $obCmbHorasExtras ); +$obFormulario->addComponente ( $obCmbDemaisDescontos ); +$obFormulario->addComponente ( $obCmbPlanoSaude ); + +$obFormulario->addTitulo ( 'Informações de Empréstimos' ); +$obFormulario->addComponente ( $obCmbBancoEmprestimo ); +$obFormulario->addComponente ( $obCmbEventosBancoEmprestimo ); +$obFormulario->agrupaComponentes( array( $obBtnIncluirEventosEmprestimo, $obBtnLimparEventosEmprestimo ) ); +$obFormulario->addSpan ( $obspnListaBancoEmprestimo ); + +$obFormulario->defineBarra ( array( $obOk,$obLimpar ) ); +$obFormulario->show(); + +// Carrega as listas já cadastradas +$jsOnLoad = " executaFuncaoAjax('funcoesExistentes'); "; +$jsOnLoad .= " executaFuncaoAjax('funcoesTemporarioExistentes');"; +$jsOnLoad .= " executaFuncaoAjax('bancoEventosExistentes');"; +$jsOnLoad .= " executaFuncaoAjax('salarioBaseExistentes');"; +$jsOnLoad .= " executaFuncaoAjax('vantagensSalariaisExistentes');"; +$jsOnLoad .= " executaFuncaoAjax('gratificacaoFuncaoExistentes');"; +$jsOnLoad .= " executaFuncaoAjax('salarioFamiliaExistentes');"; +$jsOnLoad .= " executaFuncaoAjax('horasExtrasExistentes');"; +$jsOnLoad .= " executaFuncaoAjax('demaisDescontosExistentes');"; +$jsOnLoad .= " executaFuncaoAjax('planoSaudeExistentes');"; +$jsOnLoad .= " executaFuncaoAjax('fonteRecursoExistentes');"; + +require_once '../../../../../../gestaoAdministrativa/fontes/PHP/framework/include/rodape.inc.php'; + +?> \ No newline at end of file diff --git a/gestaoPrestacaoContas/fontes/PHP/TCMBA/instancias/configuracao/FMRelacionarLotacoesOrgaos.php b/gestaoPrestacaoContas/fontes/PHP/TCMBA/instancias/configuracao/FMRelacionarLotacoesOrgaos.php new file mode 100644 index 0000000..f2f2068 --- /dev/null +++ b/gestaoPrestacaoContas/fontes/PHP/TCMBA/instancias/configuracao/FMRelacionarLotacoesOrgaos.php @@ -0,0 +1,159 @@ + +get('stAcao'); + +$obForm = new Form; +$obForm->setAction($pgProc); +$obForm->setTarget('oculto'); + +$obHdnAcao = new Hidden; +$obHdnAcao->setName ('stAcao'); +$obHdnAcao->setValue($stAcao); + +// Busca a entidade definida como prefeitura na configuração do orçamento +$stCampo = "valor"; +$stTabela = "administracao.configuracao"; +$stFiltro = " WHERE exercicio = '".Sessao::getExercicio()."'"; +$stFiltro .= " AND parametro = 'cod_entidade_prefeitura' "; + +$inCodEntidadePrefeitura = SistemaLegado::pegaDado($stCampo, $stTabela, $stFiltro); + +// Se foi selecionada a entidade definida como prefeitura, não vai "_" no schema +if ($_REQUEST['inCodEntidade'] == $inCodEntidadePrefeitura) { + $stFiltro = " WHERE nspname = 'pessoal'"; + $stSchema = ''; +} else { + $stFiltro = " WHERE nspname = 'pessoal_".$_REQUEST['inCodEntidade']."'"; + $stSchema = '_'.$_REQUEST['inCodEntidade']; +} + +$obTEntidade = new TEntidade(); +$obTEntidade->recuperaEsquemasCriados($rsEsquemas, $stFiltro); + +// Verifica se existe o schema para a entidade selecionada +if ($rsEsquemas->getNumLinhas() < 1) { + SistemaLegado::alertaAviso($pgFilt.'?stAcao='.$_REQUEST['stAcao'], 'Não existe entidade criada no RH para a entidade selecionada!' , '', 'aviso', Sessao::getId(), '../'); +} + +// Se foi selecionada a entidade definida como prefeitura, não vai "_" no schema +if ($_REQUEST['inCodEntidade'] == $inCodEntidadePrefeitura) { + Sessao::setEntidade(''); +} else { + // Se não foi selecionada a entidade definida como prefeitura + // ao executar as consultas, automaticamente é adicionado o "_" + cod_entidade selecionada + $arSchemasRH = array(); + $obTEntidade->recuperaSchemasRH($rsSchemasRH); + while (!$rsSchemasRH->eof()) { + $arSchemasRH[] = $rsSchemasRH->getCampo("schema_nome"); + $rsSchemasRH->proximo(); + } + Sessao::write('arSchemasRH', $arSchemasRH, true); + + Sessao::setEntidade($_REQUEST['inCodEntidade']); +} + +$obHdnSchema = new Hidden; +$obHdnSchema->setName ('stSchema'); +$obHdnSchema->setValue($stSchema); + +$obTOrganogramaOrgao = new TOrganogramaOrgao; +$obTOrganogramaOrgao->setDado('stEntidade' , Sessao::getEntidade()); +$obTOrganogramaOrgao->recuperaLotacaoOrgao($rsOrgao); + +$obTOrcamentoOrgao = new TOrcamentoOrgao; +$obTOrcamentoOrgao->setDado('exercicio', Sessao::getExercicio()); +$obTOrcamentoOrgao->recuperaDadosExercicio($rsOrcamentoOrgao, '', ' ORDER BY orgao.num_orgao'); + +$obCmbOrgao = new Select; +$obCmbOrgao->setId ('cmbOrgao_[cod_orgao]'); +$obCmbOrgao->setName ('cmbOrgao_[cod_orgao]'); +$obCmbOrgao->setCampoId ('[num_orgao]'); +$obCmbOrgao->setCampoDesc ('[nom_orgao]'); +$obCmbOrgao->addOption ('','Selecione'); +$obCmbOrgao->preencheCombo($rsOrcamentoOrgao); +$obCmbOrgao->setValue ('[num_orgao]'); + +//cria uma table para demonstrar os valores para o vinculo +$obTable = new Table; +$obTable->setId('tblOrgao'); +$obTable->setRecordset ($rsOrgao); +$obTable->addLineNumber (true); + +$obTable->Head->addCabecalho('Lotação do Servidor' , 50); +$obTable->Head->addCabecalho('Órgão Orçamentário' , 15); + +$obTable->Body->addCampo('[estrutural] - [descricao]', 'E'); +$obTable->Body->addCampo($obCmbOrgao, 'E'); + +$obTable->montaHTML(true); +$stHTML = $obTable->getHtml(); + +$obSpnLista = new Span; +$obSpnLista->setId ('spnLista'); +$obSpnLista->setValue($stHTML); + +$obFormulario = new Formulario; +$obFormulario->addForm ($obForm); +$obFormulario->addHidden($obHdnAcao); +$obFormulario->addSpan ($obSpnLista); +$obFormulario->Cancelar ($pgFilt.'?'.Sessao::getId().'&stAcao='.$stAcao); + +$obFormulario->show(); + +require_once '../../../../../../gestaoAdministrativa/fontes/PHP/framework/include/rodape.inc.php'; diff --git a/gestaoPrestacaoContas/fontes/PHP/TCMBA/instancias/configuracao/JSManterConfiguracaoParcSubvOSCIP.js b/gestaoPrestacaoContas/fontes/PHP/TCMBA/instancias/configuracao/JSManterConfiguracaoParcSubvOSCIP.js new file mode 100644 index 0000000..7004d84 --- /dev/null +++ b/gestaoPrestacaoContas/fontes/PHP/TCMBA/instancias/configuracao/JSManterConfiguracaoParcSubvOSCIP.js @@ -0,0 +1,63 @@ + + + \ No newline at end of file diff --git a/gestaoPrestacaoContas/fontes/PHP/TCMBA/instancias/configuracao/JSManterConfiguracaoProrrogacaoTermo.js b/gestaoPrestacaoContas/fontes/PHP/TCMBA/instancias/configuracao/JSManterConfiguracaoProrrogacaoTermo.js new file mode 100644 index 0000000..ba2a96f --- /dev/null +++ b/gestaoPrestacaoContas/fontes/PHP/TCMBA/instancias/configuracao/JSManterConfiguracaoProrrogacaoTermo.js @@ -0,0 +1,49 @@ + + + \ No newline at end of file diff --git a/gestaoPrestacaoContas/fontes/PHP/TCMBA/instancias/configuracao/LSManterConfiguracaoObrasServicos.php b/gestaoPrestacaoContas/fontes/PHP/TCMBA/instancias/configuracao/LSManterConfiguracaoObrasServicos.php index 9baff38..f7efd96 100644 --- a/gestaoPrestacaoContas/fontes/PHP/TCMBA/instancias/configuracao/LSManterConfiguracaoObrasServicos.php +++ b/gestaoPrestacaoContas/fontes/PHP/TCMBA/instancias/configuracao/LSManterConfiguracaoObrasServicos.php @@ -29,7 +29,7 @@ * @author Analista Dagiane Vieira * @author Desenvolvedor Michel Teixeira * - * $Id: LSManterConfiguracaoObrasServicos.php 63632 2015-09-22 17:42:03Z michel $ + * $Id: LSManterConfiguracaoObrasServicos.php 63771 2015-10-08 13:39:13Z jean $ */ include_once '../../../../../../gestaoAdministrativa/fontes/PHP/pacotes/FrameworkHTML.inc.php'; @@ -58,7 +58,8 @@ $inCodLicitacao = $arLicitacao[0]; $stCaminho = CAM_GPC_TCMBA_INSTANCIAS."configuracao/"; if ($stAcao == 'alterar') { - $stCaminho .= $pgForm; + Sessao::write('arLink',$_REQUEST); + $stCaminho = $pgForm; } else { $stCaminho .= $pgProc; } @@ -89,6 +90,7 @@ if ($stFiltro != '') $stFiltro = ' WHERE '.substr($stFiltro,0,strlen($stFiltro)-4); $stOrder = " ORDER BY obra.exercicio, obra.cod_entidade, LPAD(obra.nro_obra::VARCHAR, 10, '0') "; + $obTTCMBAObra->recuperaObra($rsObra, $stFiltro, $stOrder); $obLista = new Lista; @@ -153,6 +155,9 @@ $obLista->ultimoDado->setAlinhamento("CENTRO"); $obLista->ultimoDado->setCampo( "[st_licitacao]" ); $obLista->commitDado(); +$stLink = "&inCodEntidade=".$inCodEntidade."&stExercicio=".$stExercicio."&inCodTipoObra=".$inCodTipoObra."&stNroObra".$stNroObra; +$stLink .= "&stExercicioLicitacao=".$stExercicioLicitacao."&inCodModalidade=".$inCodModalidade."&inCodLicitacao=".$request->get('inCodLicitacao'); + $obLista->addAcao(); $obLista->ultimaAcao->setAcao( $stAcao ); $obLista->ultimaAcao->addCampo("&inCodEntidade" , "cod_entidade"); @@ -161,7 +166,8 @@ $obLista->ultimaAcao->addCampo("&stExercicio" , "exercicio"); $obLista->ultimaAcao->addCampo("&inCodTipo" , "cod_tipo"); $obLista->ultimaAcao->addCampo("stNroObra" , "nro_obra"); $obLista->ultimaAcao->addCampo("&stDescQuestao" , "[nro_obra]/[exercicio]"); -$obLista->ultimaAcao->setLink ($stCaminho."?".Sessao::getId()."&stAcao=".$stAcao."&inCodEntidade=".$inCodEntidade."&stExercicio=".$stExercicio."&inCodTipoObra=".$inCodTipoObra."&stNroObra=".$stNroObra."&stExercicioLicitacao=".$stExercicioLicitacao."&inCodModalidade=".$inCodModalidade."&inCodLicitacao=".$request->get('inCodLicitacao')); +//$obLista->ultimaAcao->setLink ($stCaminho."?".Sessao::getId()."&stAcao=".$stAcao.$stLink); +$obLista->ultimaAcao->setLink ($stCaminho."?stAcao=".$stAcao."&".Sessao::getId().$stLink); $obLista->commitAcao(); $obLista->show(); diff --git a/gestaoPrestacaoContas/fontes/PHP/TCMBA/instancias/configuracao/OCManterConfiguracaoObrasServicos.php b/gestaoPrestacaoContas/fontes/PHP/TCMBA/instancias/configuracao/OCManterConfiguracaoObrasServicos.php index 804b8f1..4bc7934 100644 --- a/gestaoPrestacaoContas/fontes/PHP/TCMBA/instancias/configuracao/OCManterConfiguracaoObrasServicos.php +++ b/gestaoPrestacaoContas/fontes/PHP/TCMBA/instancias/configuracao/OCManterConfiguracaoObrasServicos.php @@ -29,7 +29,7 @@ * @author Analista Dagiane Vieira * @author Desenvolvedor Michel Teixeira * - * $Id: OCManterConfiguracaoObrasServicos.php 63632 2015-09-22 17:42:03Z michel $ + * $Id: OCManterConfiguracaoObrasServicos.php 63809 2015-10-19 16:52:56Z lisiane $ */ include_once '../../../../../../gestaoAdministrativa/fontes/PHP/pacotes/FrameworkHTML.inc.php'; @@ -788,6 +788,9 @@ function incluirMedicao() if($_REQUEST['dtFinalMedicao']=='') $obErro->setDescricao('Informe a Data Final da Medição da Obra.'); + if($_REQUEST['dtMedicao']=='') + $obErro->setDescricao('Informe a Data da Medição da Obra.'); + if($_REQUEST['dtInicioMedicao']=='') $obErro->setDescricao('Informe a Data de Início da Medição da Obra.'); @@ -815,6 +818,7 @@ function incluirMedicao() $arMedicaoTemp['inCodMedidaObra'] = $_REQUEST['inCodMedidaObra']; $arMedicaoTemp['dtInicioMedicao'] = $_REQUEST['dtInicioMedicao']; $arMedicaoTemp['dtFinalMedicao'] = $_REQUEST['dtFinalMedicao']; + $arMedicaoTemp['dtMedicao'] = $_REQUEST['dtMedicao']; $arMedicaoTemp['nuVlMedicao'] = $_REQUEST['nuVlMedicao']; $arMedicaoTemp['stNFMedicao'] = $_REQUEST['stNFMedicao']; $arMedicaoTemp['dtNFMedicao'] = $_REQUEST['dtNFMedicao']; @@ -867,6 +871,10 @@ function montaListaMedicao() $obLista->ultimoCabecalho->setWidth( 12 ); $obLista->commitCabecalho(); $obLista->addCabecalho(); + $obLista->ultimoCabecalho->addConteudo( "Data da medição" ); + $obLista->ultimoCabecalho->setWidth( 20 ); + $obLista->commitCabecalho(); + $obLista->addCabecalho(); $obLista->ultimoCabecalho->addConteudo( "Valor da medição" ); $obLista->ultimoCabecalho->setWidth( 20 ); $obLista->commitCabecalho(); @@ -888,6 +896,10 @@ function montaListaMedicao() $obLista->ultimoDado->setAlinhamento('CENTRO' ); $obLista->commitDado(); $obLista->addDado(); + $obLista->ultimoDado->setCampo( "dtMedicao" ); + $obLista->ultimoDado->setAlinhamento('CENTRO' ); + $obLista->commitDado(); + $obLista->addDado(); $obLista->ultimoDado->setCampo( "nuVlMedicao" ); $obLista->ultimoDado->setAlinhamento('ESQUERDA' ); $obLista->commitDado(); @@ -936,6 +948,7 @@ function montaAlteraMedicao() $stJs .= "jQuery('#inCodMedidaObra').val('".$value['inCodMedidaObra']."'); \n"; $stJs .= "jQuery('#dtInicioMedicao').val('".$value['dtInicioMedicao']."'); \n"; $stJs .= "jQuery('#dtFinalMedicao').val('".$value['dtFinalMedicao']."'); \n"; + $stJs .= "jQuery('#dtMedicao').val('".$value['dtMedicao']."'); \n"; $stJs .= "jQuery('#nuVlMedicao').val('".$value['nuVlMedicao']."'); \n"; $stJs .= "jQuery('#stNFMedicao').val('".$value['stNFMedicao']."'); \n"; $stJs .= "jQuery('#dtNFMedicao').val('".$value['dtNFMedicao']."'); \n"; @@ -973,6 +986,9 @@ function alteraMedicao() if($_REQUEST['dtInicioMedicao']=='') $obErro->setDescricao('Informe a Data de Início da Medição da Obra.'); + if($_REQUEST['dtMedicao']=='') + $obErro->setDescricao('Informe a Data da Medição da Obra.'); + if($_REQUEST['inCodMedidaObra']=='') $obErro->setDescricao('Informe a Unidade de Medida da Obra.'); @@ -998,6 +1014,7 @@ function alteraMedicao() $arMedicao[$key]['inCodMedidaObra'] = $_REQUEST['inCodMedidaObra']; $arMedicao[$key]['dtInicioMedicao'] = $_REQUEST['dtInicioMedicao']; $arMedicao[$key]['dtFinalMedicao'] = $_REQUEST['dtFinalMedicao']; + $arMedicao[$key]['dtMedicao'] = $_REQUEST['dtMedicao']; $arMedicao[$key]['nuVlMedicao'] = $_REQUEST['nuVlMedicao']; $arMedicao[$key]['stNFMedicao'] = $_REQUEST['stNFMedicao']; $arMedicao[$key]['dtNFMedicao'] = $_REQUEST['dtNFMedicao']; @@ -1050,6 +1067,7 @@ function limparMedicao() $stJs .= "jQuery('#inCodMedidaObra').val(''); \n"; $stJs .= "jQuery('#dtInicioMedicao').val(''); \n"; $stJs .= "jQuery('#dtFinalMedicao').val(''); \n"; + $stJs .= "jQuery('#dtMedicao').val(''); \n"; $stJs .= "jQuery('#nuVlMedicao').val(''); \n"; $stJs .= "jQuery('#stNFMedicao').val(''); \n"; $stJs .= "jQuery('#dtNFMedicao').val(''); \n"; @@ -1568,6 +1586,7 @@ function montaObra() $arMedicao[$inId]['inCodMedidaObra'] = $rsObraMedicao->getCampo('cod_medida'); $arMedicao[$inId]['dtInicioMedicao'] = $rsObraMedicao->getCampo('data_inicio'); $arMedicao[$inId]['dtFinalMedicao'] = $rsObraMedicao->getCampo('data_final'); + $arMedicao[$inId]['dtMedicao'] = $rsObraMedicao->getCampo('data_medicao'); $arMedicao[$inId]['nuVlMedicao'] = number_format($rsObraMedicao->getCampo('vl_medicao'), 2, ",", "."); $arMedicao[$inId]['stNFMedicao'] = $rsObraMedicao->getCampo('nro_nota_fiscal'); $arMedicao[$inId]['dtNFMedicao'] = $rsObraMedicao->getCampo('data_nota_fiscal'); diff --git a/gestaoPrestacaoContas/fontes/PHP/TCMBA/instancias/configuracao/OCManterConfiguracaoParcSubvOSCIP.php b/gestaoPrestacaoContas/fontes/PHP/TCMBA/instancias/configuracao/OCManterConfiguracaoParcSubvOSCIP.php new file mode 100644 index 0000000..dfc431c --- /dev/null +++ b/gestaoPrestacaoContas/fontes/PHP/TCMBA/instancias/configuracao/OCManterConfiguracaoParcSubvOSCIP.php @@ -0,0 +1,455 @@ + +get('stCtrl'); + +function consultaTermoParceria() +{ + $arTermoParcerias = Sessao::remove('arTermoParcerias'); + + $rsTermoParcerias = new RecordSet(); + + $obTTCMBATermoParceria = new TTCMBATermoParceria(); + $obTTCMBATermoParceria->setDado('exercicio' , $_REQUEST['stExercicioTermo'] ); + $obTTCMBATermoParceria->setDado('cod_entidade', $_REQUEST['inCodEntidade']); + $obTTCMBATermoParceria->recuperaPorChave($rsTermoParcerias, $boTransacao); + + $rsTermoParcerias->ordena('nro_processo', "ASC", SORT_STRING); + $rsTermoParcerias->addFormatacao("vl_parceiro_publico", "NUMERIC_BR"); + $rsTermoParcerias->addFormatacao("vl_termo_parceria" , "NUMERIC_BR"); + + while(!$rsTermoParcerias->eof()) + { + $inNovo = ($rsTermoParcerias->getCorrente()-1); + $arTermoParcerias[$inNovo]["inId"] = $inNovo; + $arTermoParcerias[$inNovo]["exercicio"] = $rsTermoParcerias->getCampo("exercicio"); + $arTermoParcerias[$inNovo]["cod_entidade"] = $rsTermoParcerias->getCampo("cod_entidade"); + $arTermoParcerias[$inNovo]["nro_processo"] = $rsTermoParcerias->getCampo("nro_processo"); + $arTermoParcerias[$inNovo]["dt_assinatura"] = $rsTermoParcerias->getCampo("dt_assinatura"); + $arTermoParcerias[$inNovo]["dt_publicacao"] = $rsTermoParcerias->getCampo("dt_publicacao"); + $arTermoParcerias[$inNovo]["imprensa_oficial"] = $rsTermoParcerias->getCampo("imprensa_oficial"); + $arTermoParcerias[$inNovo]["dt_inicio"] = $rsTermoParcerias->getCampo("dt_inicio"); + $arTermoParcerias[$inNovo]["dt_termino"] = $rsTermoParcerias->getCampo("dt_termino"); + $arTermoParcerias[$inNovo]["numcgm"] = $rsTermoParcerias->getCampo("numcgm"); + $arTermoParcerias[$inNovo]["objeto"] = $rsTermoParcerias->getCampo("objeto"); + $arTermoParcerias[$inNovo]["nro_processo_mj"] = $rsTermoParcerias->getCampo("nro_processo_mj"); + $arTermoParcerias[$inNovo]["dt_processo_mj"] = $rsTermoParcerias->getCampo("dt_processo_mj"); + $arTermoParcerias[$inNovo]["dt_publicacao_mj"] = $rsTermoParcerias->getCampo("dt_publicacao_mj"); + $arTermoParcerias[$inNovo]["processo_licitatorio"] = $rsTermoParcerias->getCampo("processo_licitatorio"); + $arTermoParcerias[$inNovo]["processo_dispensa"] = $rsTermoParcerias->getCampo("processo_dispensa"); + $arTermoParcerias[$inNovo]["vl_parceiro_publico"] = $rsTermoParcerias->getCampo("vl_parceiro_publico"); + $arTermoParcerias[$inNovo]["vl_termo_parceria"] = $rsTermoParcerias->getCampo("vl_termo_parceria"); + + $rsTermoParcerias->proximo(); + } + $rsTermoParcerias->setPrimeiroElemento(); + + Sessao::write('arTermoParcerias', $arTermoParcerias); + + $stJs .= geraSpanTermoParceria(); + return $stJs; +} + +function alterarTermoParceria() +{ + $arTermoParcerias = Sessao::read("arTermoParcerias"); + $rsTermoParceriaDotacoes = new RecordSet(); + + if(!is_array($arTermoParcerias)) + $arTermoParcerias = array(); + + foreach($arTermoParcerias AS $arTermoParceiro) { + if($arTermoParceiro["inId"] == $_REQUEST["inId"]){ + $stJs .= "jQuery('#stExercicioTermo').val(\"".$arTermoParceiro["exercicio"]."\"); \n "; + $stJs .= "jQuery('#stExercicioProcesso').val(\"".$arTermoParceiro["exercicio"]."\"); \n "; + $stJs .= "jQuery('#stExercicioProcesso').prop('disabled', true); \n "; + $stJs .= "jQuery('#hdnExercicioProcesso').val(\"".$arTermoParceiro["exercicio"]."\"); \n "; + $stJs .= "jQuery('#stNumeroProcesso').val(\"".$arTermoParceiro["nro_processo"]."\"); \n "; + $stJs .= "jQuery('#stHdnNumeroProcessoAnterior').val(\"".$arTermoParceiro["nro_processo"]."\"); \n "; + $stJs .= "jQuery('#stDtAssinatura').val(\"".$arTermoParceiro["dt_assinatura"]."\"); \n "; + $stJs .= "jQuery('#stDtPublicacao').removeProp('disabled'); \n "; + $stJs .= "jQuery('#stDtPublicacao').val(\"".$arTermoParceiro["dt_publicacao"]."\"); \n "; + $stJs .= "jQuery('#stImprensaOficial').val(\"".$arTermoParceiro["imprensa_oficial"]."\"); \n "; + $stJs .= "jQuery('#stDtInicioTermo').val(\"".$arTermoParceiro["dt_inicio"]."\"); \n "; + $stJs .= "jQuery('#stDtTerminoTermo').removeProp('disabled'); \n "; + $stJs .= "jQuery('#stDtTerminoTermo').val(\"".$arTermoParceiro["dt_termino"]."\"); \n "; + $stJs .= "jQuery('#inCGMParceria').focus(); \n "; + $stJs .= "jQuery('#inCGMParceria').val(\"".$arTermoParceiro["numcgm"]."\"); \n "; + $stJs .= "jQuery('#txtObjeto').focus(); \n "; + $stJs .= "jQuery('#txtObjeto').val(\"".$arTermoParceiro["objeto"]."\"); \n "; + $stJs .= "jQuery('#stProcessoMJ').val(\"".$arTermoParceiro["nro_processo_mj"]."\"); \n "; + $stJs .= "jQuery('#dtProcessoMJ').val(\"".$arTermoParceiro["dt_processo_mj"]."\"); \n "; + $stJs .= "jQuery('#dtPublicacaoMJ').val(\"".$arTermoParceiro["dt_publicacao_mj"]."\"); \n "; + $stJs .= "jQuery('#stProcessoLicitatorio').val(\"".$arTermoParceiro["processo_licitatorio"]."\"); \n "; + $stJs .= "jQuery('#stProcessoDispensa').val(\"".$arTermoParceiro["processo_dispensa"]."\"); \n "; + $stJs .= "jQuery('#vlParceiroPublico').val(\"".$arTermoParceiro["vl_parceiro_publico"]."\"); \n "; + $stJs .= "jQuery('#vlParceiroOSCIP').val(\"".$arTermoParceiro["vl_termo_parceria"]."\"); \n "; + $stJs .= "jQuery('#Ok').prop('value','Alterar'); \n "; + $stJs .= "jQuery('#stAcao').val('configurar'); \n "; + + $obTTCMBATermoParceriaDotacao = new TTCMBATermoParceriaDotacao(); + $obTTCMBATermoParceriaDotacao->setDado('exercicio' , $arTermoParceiro["exercicio"] ); + $obTTCMBATermoParceriaDotacao->setDado('cod_entidade', $arTermoParceiro["cod_entidade"]); + $obTTCMBATermoParceriaDotacao->setDado('nro_processo', $arTermoParceiro["nro_processo"] ); + $obTTCMBATermoParceriaDotacao->recuperaPorChave($rsTermoParceriaDotacoes, $boTransacao); + + $arDotacoes = array(); + $rsDespesa = new RecordSet(); + + foreach($rsTermoParceriaDotacoes->getElementos() AS $arDotacao){ + $stCondicao = " AND O.cod_despesa = ".$arDotacao["cod_despesa"]; + $stCondicao .= " AND O.exercicio = '".$arDotacao["exercicio_despesa"]."' "; + + $stOrdem = " ORDER BY dotacao"; + + $obTOrcamentoDespesa = new TOrcamentoDespesa(); + $obTOrcamentoDespesa->setDado('exercicio', $arDotacao["exercicio_despesa"]); + $obTOrcamentoDespesa->recuperaDespesaDotacao($rsDespesa, $stCondicao, $stOrdem, $boTransacao); + + $inNovo = count($arDotacoes); + $arDotacoes[$inNovo]['inId'] = $inNovo; + $arDotacoes[$inNovo]['exercicio_despesa'] = $arDotacao["exercicio_despesa"]; + $arDotacoes[$inNovo]['cod_despesa'] = $rsDespesa->getCampo('cod_despesa'); + $arDotacoes[$inNovo]['nom_despesa'] = $rsDespesa->getCampo('descricao'); + $arDotacoes[$inNovo]['dotacao'] = $rsDespesa->getCampo('dotacao'); + } + + Sessao::write("arDotacoes", $arDotacoes); + $stJs .= gerarSpanDotacoes(); + } + } + + return $stJs; +} + +function geraSpanTermoParceria() +{ + $rsRecordSet = new recordset(); + $rsRecordSet->preenche(Sessao::read("arTermoParcerias")); + + $obLista = new Lista; + $obLista->setMostraPaginacao( false ); + $obLista->setTitulo( "Lista de Termos de Parceria" ); + $obLista->setRecordSet( $rsRecordSet ); + + $obLista->addCabecalho(); + $obLista->ultimoCabecalho->addConteudo(" "); + $obLista->ultimoCabecalho->setWidth( 3 ); + $obLista->commitCabecalho(); + + $obLista->addCabecalho(); + $obLista->ultimoCabecalho->addConteudo( "Número do Processo" ); + $obLista->ultimoCabecalho->setWidth( 10 ); + $obLista->commitCabecalho(); + + $obLista->addCabecalho(); + $obLista->ultimoCabecalho->addConteudo( "Data Assinatura" ); + $obLista->ultimoCabecalho->setWidth( 10 ); + $obLista->commitCabecalho(); + + $obLista->addCabecalho(); + $obLista->ultimoCabecalho->addConteudo( "Data Publicação" ); + $obLista->ultimoCabecalho->setWidth( 10 ); + $obLista->commitCabecalho(); + + $obLista->addCabecalho(); + $obLista->ultimoCabecalho->addConteudo( "Imprensa Oficial" ); + $obLista->ultimoCabecalho->setWidth( 10 ); + $obLista->commitCabecalho(); + + $obLista->addCabecalho(); + $obLista->ultimoCabecalho->addConteudo( "Data Início" ); + $obLista->ultimoCabecalho->setWidth( 10 ); + $obLista->commitCabecalho(); + + $obLista->addCabecalho(); + $obLista->ultimoCabecalho->addConteudo( "Data Término" ); + $obLista->ultimoCabecalho->setWidth( 10 ); + $obLista->commitCabecalho(); + + $obLista->addCabecalho(); + $obLista->ultimoCabecalho->addConteudo( "Ação" ); + $obLista->ultimoCabecalho->setWidth( 10 ); + $obLista->commitCabecalho(); + + $obLista->addDado(); + $obLista->ultimoDado->setCampo( "[nro_processo]/[exercicio]"); + $obLista->ultimoDado->setAlinhamento( 'ESQUERDA' ); + $obLista->commitDado(); + + $obLista->addDado(); + $obLista->ultimoDado->setCampo( "[dt_assinatura]"); + $obLista->ultimoDado->setAlinhamento( 'ESQUERDA' ); + $obLista->commitDado(); + + $obLista->addDado(); + $obLista->ultimoDado->setCampo( "[dt_publicacao]"); + $obLista->ultimoDado->setAlinhamento( 'ESQUERDA' ); + $obLista->commitDado(); + + $obLista->addDado(); + $obLista->ultimoDado->setCampo( "[imprensa_oficial]"); + $obLista->ultimoDado->setAlinhamento( 'ESQUERDA' ); + $obLista->commitDado(); + + $obLista->addDado(); + $obLista->ultimoDado->setCampo( "[dt_inicio]"); + $obLista->ultimoDado->setAlinhamento( 'ESQUERDA' ); + $obLista->commitDado(); + + $obLista->addDado(); + $obLista->ultimoDado->setCampo( "[dt_termino]"); + $obLista->ultimoDado->setAlinhamento( 'ESQUERDA' ); + $obLista->commitDado(); + + $obLista->addAcao(); + $obLista->ultimaAcao->setAcao( "ALTERAR" ); + $obLista->ultimaAcao->setFuncaoAjax( true ); + $obLista->ultimaAcao->setLink( "JavaScript:executaFuncaoAjax('alterarTermoParceria');"); + $obLista->ultimaAcao->addCampo("1","inId"); + $obLista->commitAcao(); + + $obLista->addAcao(); + $obLista->ultimaAcao->setAcao( "excluir" ); + $obLista->ultimaAcao->setFuncaoAjax( false ); + $obLista->ultimaAcao->setLink( CAM_GPC_TCMBA_INSTANCIAS."configuracao/PRManterConfiguracaoParcSubvOSCIP.php?" ); + $obLista->ultimaAcao->addCampo("inId" ,"inId"); + $obLista->ultimaAcao->addCampo("inCodEntidade" ,"cod_entidade"); + $obLista->ultimaAcao->addCampo("stAcao=excluirTermoParceria&1",""); + $obLista->ultimaAcao->addCampo("frameDestino=oculto&2",""); + $obLista->commitAcao(); + + $obLista->montaInnerHtml(); + $stHtml = $obLista->getHTML(); + $stJs .= "jQuery('#spnListaTermosCadastrados').html('".$stHtml."');"; + + return $stJs; +} + +function excluirDotacoes() +{ + $arDotacoes = Sessao::read("arDotacoes"); + + $arTemp = array(); + foreach ($arDotacoes as $arDotacao) { + if ($arDotacao["inId"] != $_GET["inId"]) { + $arTemp[] = $arDotacao; + } + } + Sessao::write('arDotacoes',$arTemp); + $stJs .= gerarSpanDotacoes(); + + return $stJs; +} + +function incluirDotacoes() +{ + $stJs = processarDotacoes("incluir"); + + return $stJs; +} + +function processarDotacoes($stAcao) +{ + $arDotacoes = Sessao::read("arDotacoes"); + + if (!is_array($arDotacoes)) + $arDotacoes = array(); + + if( validaInclusaoListaDotacoes($arDotacoes) ) { + $stCondicao = " AND O.cod_despesa = ".$_REQUEST['inCodDespesa']; + $stCondicao .= " AND O.exercicio = '".Sessao::getExercicio()."' "; + + $stOrdem = " ORDER BY dotacao"; + + $obTOrcamentoDespesa = new TOrcamentoDespesa(); + $obTOrcamentoDespesa->setDado('exercicio', Sessao::getExercicio()); + $obTOrcamentoDespesa->recuperaDespesaDotacao($rsDespesa, $stCondicao, $stOrdem, $boTransacao); + + $inNovo = count($arDotacoes); + $arDotacoes[$inNovo]['inId'] = $inNovo; + $arDotacoes[$inNovo]['exercicio_despesa'] = Sessao::getExercicio(); + $arDotacoes[$inNovo]['cod_despesa'] = $rsDespesa->getCampo('cod_despesa'); + $arDotacoes[$inNovo]['nom_despesa'] = $rsDespesa->getCampo('descricao'); + $arDotacoes[$inNovo]['dotacao'] = $rsDespesa->getCampo('dotacao'); + + Sessao::write("arDotacoes", $arDotacoes); + $stJs .= gerarSpanDotacoes(); + } else { + $stJs .= "alertaAviso('Essa dotação já foi incluida na lista.','form','erro','".Sessao::getId()."');\n"; + } + return $stJs; +} + +function validaInclusaoListaDotacoes($arDotacoes) +{ + foreach ($arDotacoes as $key => $value) { + if ( $_REQUEST['inCodDespesa'] == $value['cod_despesa'] ) { + return false; + } + } + return true; +} + +function gerarSpanDotacoes() +{ + $rsRecordSet = new recordset(); + $rsRecordSet->preenche(Sessao::read("arDotacoes")); + + $obLista = new Lista; + $obLista->setMostraPaginacao( false ); + $obLista->setTitulo( "Lista de Dotações de despesas do Termo de Parceria" ); + $obLista->setRecordSet( $rsRecordSet ); + + $obLista->addCabecalho(); + $obLista->ultimoCabecalho->addConteudo(" "); + $obLista->ultimoCabecalho->setWidth( 3 ); + $obLista->commitCabecalho(); + + $obLista->addCabecalho(); + $obLista->ultimoCabecalho->addConteudo( "Dotação / Descrição" ); + $obLista->ultimoCabecalho->setWidth( 70 ); + $obLista->commitCabecalho(); + + $obLista->addCabecalho(); + $obLista->ultimoCabecalho->addConteudo( "Ação" ); + $obLista->ultimoCabecalho->setWidth( 10 ); + $obLista->commitCabecalho(); + + $obLista->addDado(); + $obLista->ultimoDado->setCampo( "[dotacao] - [nom_despesa]"); + $obLista->ultimoDado->setAlinhamento( 'ESQUERDA' ); + $obLista->commitDado(); + + $obLista->addAcao(); + $obLista->ultimaAcao->setAcao( "EXCLUIR" ); + $obLista->ultimaAcao->setFuncaoAjax( true ); + $obLista->ultimaAcao->setLink( "JavaScript:executaFuncaoAjax('excluirDotacoes');"); + $obLista->ultimaAcao->addCampo("1","inId"); + $obLista->commitAcao(); + + $obLista->montaInnerHtml(); + $stHtml = $obLista->getHTML(); + $stJs .= "jQuery('#spnDotacoes').html('".$stHtml."');"; + + return $stJs; +} + +function validaPeriodicidade( $stDtInicio, $stDtTermino, $stCampoDataTermino) { + if($stCampoDataTermino == 'stDtPublicacao') { + $boMaiorIgual = false; + } else { + $boMaiorIgual = true; + } + + if(SistemaLegado::comparaDatas($stDtInicio,$stDtTermino, $boMaiorIgual)){ + $stJs .= "jQuery(\"#".$stCampoDataTermino."\").val(''); \n"; + $stJs .= "jQuery(\"#".$stCampoDataTermino."\").focus(); \n"; + if($stCampoDataTermino == 'stDtPublicacao') { + $stJs .= "alertaAviso('Data de Publicação, deve ser maior ou igual que a Data de Assinatura (".$stDtInicio.").','form','aviso','".Sessao::getId()."');\n"; + } else { + $stJs .= "alertaAviso('Data de Término, deve ser maior que a Data de Início (".$stDtInicio.").','form','aviso','".Sessao::getId()."');\n"; + } + } + return $stJs; +} + +function validaTermoParceria(){ + $arTermoParcerias = Sessao::read("arTermoParcerias"); + if(!is_array($arTermoParcerias)) + $arTermoParcerias = array(); + foreach($arTermoParcerias AS $arTermoParceria){ + if($arTermoParceria['exercicio'] == $_REQUEST['stExercicioProcesso'] && $arTermoParceria['nro_processo'] == $_REQUEST['stNumeroProcesso']){ + $stJs .= "jQuery(\"#stNumeroProcesso\").val(''); \n"; + $stJs .= "jQuery(\"#stNumeroProcesso\").focus(); \n"; + $stJs .= "alertaAviso('O Termo de Parceria (".$arTermoParceria['nro_processo']."/".$arTermoParceria['exercicio']."), já foi cadastrado.','form','aviso','".Sessao::getId()."');\n"; + } + } + + return $stJs; +} + +switch ($stCtrl) { + case "consultaTermoParceria": + $stJs .= consultaTermoParceria(); + break; + case "alterarTermoParceria": + $stJs .= alterarTermoParceria(); + break; + case "incluirDotacoes": + $stJs .= incluirDotacoes(); + break; + case "excluirDotacoes": + $stJs .= excluirDotacoes(); + break; + case "validaPeriodicidade": + if(array_key_exists('stDtInicioTermo',$request->getAll()) && array_key_exists('stDtTerminoTermo',$request->getAll())) { + $stDataInicio = $request->get('stDtInicioTermo'); + $stDataTermino = $request->get('stDtTerminoTermo'); + $stCampoDataTermino = 'stDtTerminoTermo'; + } else if(array_key_exists('stDtAssinatura',$request->getAll()) && array_key_exists('stDtPublicacao',$request->getAll())) { + $stDataInicio = $request->get('stDtAssinatura'); + $stDataTermino = $request->get('stDtPublicacao'); + $stCampoDataTermino = 'stDtPublicacao'; + } + $stJs .= validaPeriodicidade($stDataInicio, $stDataTermino, $stCampoDataTermino); + break; + case "validaTermoParceria": + $stJs .= validaTermoParceria(); + break; +} +if ($stJs) { + echo $stJs; +} + +?> \ No newline at end of file diff --git a/gestaoPrestacaoContas/fontes/PHP/TCMBA/instancias/configuracao/OCManterConfiguracaoProrrogacaoTermo.php b/gestaoPrestacaoContas/fontes/PHP/TCMBA/instancias/configuracao/OCManterConfiguracaoProrrogacaoTermo.php new file mode 100644 index 0000000..dd04cde --- /dev/null +++ b/gestaoPrestacaoContas/fontes/PHP/TCMBA/instancias/configuracao/OCManterConfiguracaoProrrogacaoTermo.php @@ -0,0 +1,442 @@ + +get('stCtrl'); + +function preencheTermos() { + $rsTermoParcerias = new RecordSet(); + + $obTTCMBATermoParceria = new TTCMBATermoParceria(); + $obTTCMBATermoParceria->setDado('exercicio' , $_REQUEST['stExercicioTermo'] ); + $obTTCMBATermoParceria->setDado('cod_entidade', $_REQUEST['inCodEntidade']); + $obTTCMBATermoParceria->recuperaPorChave($rsTermoParcerias, $boTransacao); + + $rsTermoParcerias->ordena('nro_processo', "ASC", SORT_STRING); + + $stJs .= " jQuery('#stNumeroProcesso').empty().append(new Option('Selecione','') ); \n"; + while(!$rsTermoParcerias->eof()){ + $stJs .= " jQuery('#stNumeroProcesso').append(new Option(\"".trim($rsTermoParcerias->getCampo('nro_processo'))."\",\"".trim($rsTermoParcerias->getCampo('nro_processo'))."\") ); "; + $rsTermoParcerias->proximo(); + } + $rsTermoParcerias->setPrimeiroElemento(); + + return $stJs; +} + +function buscaProrrogacoes() { + $arProrrogacoes = array(); + $rsProrrogacao = new RecordSet(); + + $obTTCMBATermoParceriaProrrogacao = new TTCMBATermoParceriaProrrogacao(); + $obTTCMBATermoParceriaProrrogacao->setDado('exercicio' , $_REQUEST['stExercicioProcesso'] ); + $obTTCMBATermoParceriaProrrogacao->setDado('cod_entidade', $_REQUEST['inCodEntidade']); + $obTTCMBATermoParceriaProrrogacao->setDado('nro_processo', $_REQUEST["stNumeroProcesso"] ); + $obTTCMBATermoParceriaProrrogacao->recuperaPorChave($rsProrrogacao, $boTransacao); + + $rsProrrogacao->addFormatacao('vl_prorrogacao', 'NUMERIC_BR'); + $rsProrrogacao->ordena('nro_processo', 'ASC', SORT_STRING); + + while(!$rsProrrogacao->eof()){ + $inNovo = ($rsProrrogacao->getCorrente() - 1 ); + $arProrrogacoes[$inNovo]['inId'] = $inNovo; + $arProrrogacoes[$inNovo]['numeroTermoAditivo'] = $rsProrrogacao->getCampo('nro_termo_aditivo'); + $arProrrogacoes[$inNovo]['exercicioTermoAditivo'] = $rsProrrogacao->getCampo('exercicio_aditivo'); + $arProrrogacoes[$inNovo]['dataProrrogacao'] = $rsProrrogacao->getCampo('dt_prorrogacao'); + $arProrrogacoes[$inNovo]['dataPublicacao'] = $rsProrrogacao->getCampo('dt_publicacao'); + $arProrrogacoes[$inNovo]['imprensaOficial'] = $rsProrrogacao->getCampo('imprensa_oficial'); + $arProrrogacoes[$inNovo]['boIndicadorAdimplemento'] = $rsProrrogacao->getCampo('indicador_adimplemento'); + $arProrrogacoes[$inNovo]['indicadorAdimplemento'] = ($rsProrrogacao->getCampo('indicador_adimplemento') == 't')?'Sim':'Não'; + $arProrrogacoes[$inNovo]['dataInicio'] = $rsProrrogacao->getCampo('dt_inicio'); + $arProrrogacoes[$inNovo]['dataTermino'] = $rsProrrogacao->getCampo('dt_termino'); + $arProrrogacoes[$inNovo]['valorProrrogacao'] = $rsProrrogacao->getCampo('vl_prorrogacao'); + + $rsProrrogacao->proximo(); + } + + Sessao::write("arProrrogacoes", $arProrrogacoes); + $stJs .= gerarSpanProrrogacoes(); + $stJs .= buscaDadosTermo(); + + return $stJs; +} + +function buscaDadosTermo(){ + $rsTermoParcerias = new RecordSet(); + + $obTTCMBATermoParceria = new TTCMBATermoParceria(); + $obTTCMBATermoParceria->setDado('exercicio' , $_REQUEST['stExercicioProcesso']); + $obTTCMBATermoParceria->setDado('cod_entidade', $_REQUEST['inCodEntidade']); + $obTTCMBATermoParceria->setDado('nro_processo', $_REQUEST["stNumeroProcesso"]); + $obTTCMBATermoParceria->recuperaPorChave($rsTermoParcerias, $boTransacao); + + if($rsTermoParcerias->getNumLinhas() == 1 ){ + while(!$rsTermoParcerias->eof()){ + $stJs .= " jQuery('#stDataInicio').html(\"".$rsTermoParcerias->getCampo('dt_inicio')."\"); \n"; + $stJs .= " jQuery('#stDataTermino').html(\"".$rsTermoParcerias->getCampo('dt_termino')."\"); \n"; + $stJs .= " jQuery('#stDtTerminoTermo').val(\"".$rsTermoParcerias->getCampo('dt_termino')."\"); \n"; + $stJs .= " jQuery('#stObjeto').html(\"".$rsTermoParcerias->getCampo('objeto')."\"); \n"; + $rsTermoParcerias->proximo(); + } + } + $rsTermoParcerias->setPrimeiroElemento(); + return $stJs; +} + +function incluirProrrogacoes() +{ + $arProrrogacoes = Sessao::read("arProrrogacoes"); + + if (!is_array($arProrrogacoes)) + $arProrrogacoes = array(); + + if( validaInclusaoListaProrrogacao($arProrrogacoes) ) { + $inNovo = count($arProrrogacoes); + $arProrrogacoes[$inNovo]['inId'] = $inNovo; + $arProrrogacoes[$inNovo]['numeroTermoAditivo'] = trim($_REQUEST['stNumeroAditivo']); + $arProrrogacoes[$inNovo]['exercicioTermoAditivo'] = $_REQUEST['stExercicioProrrogacao']; + $arProrrogacoes[$inNovo]['dataProrrogacao'] = $_REQUEST['dtProrrogacao']; + $arProrrogacoes[$inNovo]['dataPublicacao'] = $_REQUEST['dtPublicacaoProrrogacao']; + $arProrrogacoes[$inNovo]['imprensaOficial'] = $_REQUEST['stImprensaOficialProrrogacao']; + $arProrrogacoes[$inNovo]['boIndicadorAdimplemento'] = $_REQUEST['boIndicadorAdimplemento']; + $arProrrogacoes[$inNovo]['indicadorAdimplemento'] = ($_REQUEST['boIndicadorAdimplemento'] == 't')?'Sim':'Não'; + $arProrrogacoes[$inNovo]['dataInicio'] = $_REQUEST['dtInicioProrrogacao']; + $arProrrogacoes[$inNovo]['dataTermino'] = $_REQUEST['dtTerminoProrrogacao']; + $arProrrogacoes[$inNovo]['valorProrrogacao'] = $_REQUEST['vlProrrogacao']; + Sessao::write("arProrrogacoes", $arProrrogacoes); + $stJs .= gerarSpanProrrogacoes(); + } else { + $stJs .= "alertaAviso('Essa Prorrogação já foi incluida na lista.','aviso','aviso','".Sessao::getId()."');\n"; + } + + return $stJs; +} + +function carregarProrrogacoes() +{ + $arProrrogacoes = Sessao::read("arProrrogacoes"); + $inId = $_REQUEST["inId"]; + + foreach ($arProrrogacoes as $chave => $dados) { + if (trim($inId) == trim($dados["inId"])) { + $stJs .= " jQuery('#stNumeroAditivo').val('".$dados["numeroTermoAditivo"]."'); \n"; + $stJs .= " jQuery('#dtProrrogacao').val('".$dados["dataProrrogacao"]."'); \n"; + $stJs .= " jQuery('#dtPublicacaoProrrogacao').val('".$dados["dataPublicacao"]."'); \n"; + $stJs .= " jQuery('#stImprensaOficialProrrogacao').val('".$dados["imprensaOficial"]."'); \n"; + $stJs .= " jQuery('input[name=\"boIndicadorAdimplemento\"][value=\"".$dados['boIndicadorAdimplemento']."\"]').prop('checked',true); \n"; + $stJs .= " jQuery('#dtInicioProrrogacao').val('".$dados["dataInicio"]."'); \n"; + $stJs .= " jQuery('#dtTerminoProrrogacao').val('".$dados["dataTermino"]."'); \n"; + $stJs .= " jQuery('#vlProrrogacao').val('".$dados["valorProrrogacao"]."'); \n"; + $stJs .= " jQuery('#inId').val('".$dados["inId"]."'); \n"; + } + } + $stJs .= " jQuery('#btIncluirProrrogacoes').prop('disabled', 'disabled'); \n"; + $stJs .= " jQuery('#btAlterarProrrogacoes').removeProp('disabled'); \n"; + $stJs .= " jQuery('#btAlterarProrrogacoes').attr('onClick', ' montaParametrosGET(\'alterarProrrogacoes\'); ' );"; + + return $stJs; +} + +function validaInclusaoListaProrrogacao($arProrrogacoes) +{ + foreach ($arProrrogacoes as $key => $value) { + if ( trim($_REQUEST['stNumeroAditivo']) == $value['numeroTermoAditivo'] && trim($_REQUEST['stExercicioProrrogacao']) == $value['exercicioTermoAditivo'] ) { + return false; + } + } + return true; +} + +function alterarProrrogacoes() +{ + $inId = $_REQUEST["inId"]; + $arProrrogacoes = Sessao::read('arProrrogacoes'); + + if ( validaInclusaoListaProrrogacao($arProrrogacoes) ) { + foreach ($arProrrogacoes as $campo => $valor) { + if (trim($valor["inId"]) == trim($inId)) { + $arProrrogacoes[$campo]['numeroTermoAditivo'] = $_REQUEST['stNumeroAditivo']; + $arProrrogacoes[$campo]['dataProrrogacao'] = $_REQUEST['dtProrrogacao']; + $arProrrogacoes[$campo]['dataPublicacao'] = $_REQUEST['dtPublicacaoProrrogacao']; + $arProrrogacoes[$campo]['imprensaOficial'] = $_REQUEST['stImprensaOficialProrrogacao']; + $arProrrogacoes[$campo]['boIndicadorAdimplemento'] = $_REQUEST['boIndicadorAdimplemento']; + $arProrrogacoes[$campo]['indicadorAdimplemento'] = ($_REQUEST['boIndicadorAdimplemento'] == 't')?'Sim':'Não'; + $arProrrogacoes[$campo]['dataInicio'] = $_REQUEST['dtInicioProrrogacao']; + $arProrrogacoes[$campo]['dataTermino'] = $_REQUEST['dtTerminoProrrogacao']; + $arProrrogacoes[$campo]['valorProrrogacao'] = $_REQUEST['vlProrrogacao']; + } + } + Sessao::write('arProrrogacoes', $arProrrogacoes); + $stJs .= gerarSpanProrrogacoes(); + $stJs .= " limpaFormularioProrrogacoes(); \n"; + } else { + $stJs .= "alertaAviso('Essa Prorrogação já foi incluida na lista!','aviso','aviso','".Sessao::getId()."');\n"; + } + + return $stJs; +} + +function excluirProrrogacoes() +{ + $arProrrogacoes = Sessao::read("arProrrogacoes"); + + $arTemp = array(); + foreach ($arProrrogacoes as $arProrrogacao) { + if ($arProrrogacao["inId"] != $_GET["inId"]) { + $arProrrogacao["inId"] = count($arTemp); + $arTemp[] = $arProrrogacao; + } + } + Sessao::write('arProrrogacoes',$arTemp); + $stJs .= gerarSpanProrrogacoes(); + + return $stJs; +} + +function gerarSpanProrrogacoes() +{ + $rsRecordSet = new recordset(); + $rsRecordSet->preenche(Sessao::read("arProrrogacoes")); + + $obLista = new Lista; + $obLista->setMostraPaginacao( false ); + $obLista->setTitulo( "Lista de Prorrogações do Termo de Parceria" ); + $obLista->setRecordSet( $rsRecordSet ); + + $obLista->addCabecalho(); + $obLista->ultimoCabecalho->addConteudo(" "); + $obLista->ultimoCabecalho->setWidth( 3 ); + $obLista->commitCabecalho(); + + $obLista->addCabecalho(); + $obLista->ultimoCabecalho->addConteudo( "N° Termo Aditivo" ); + $obLista->ultimoCabecalho->setWidth( 10 ); + $obLista->commitCabecalho(); + + $obLista->addCabecalho(); + $obLista->ultimoCabecalho->addConteudo( "Data da Prorrogação" ); + $obLista->ultimoCabecalho->setWidth( 8 ); + $obLista->commitCabecalho(); + + $obLista->addCabecalho(); + $obLista->ultimoCabecalho->addConteudo( "Data da Publicação" ); + $obLista->ultimoCabecalho->setWidth( 8 ); + $obLista->commitCabecalho(); + + $obLista->addCabecalho(); + $obLista->ultimoCabecalho->addConteudo( "Imprensa oficial" ); + $obLista->ultimoCabecalho->setWidth( 30 ); + $obLista->commitCabecalho(); + + $obLista->addCabecalho(); + $obLista->ultimoCabecalho->addConteudo( "Indicador de adimplemento" ); + $obLista->ultimoCabecalho->setWidth( 5 ); + $obLista->commitCabecalho(); + + $obLista->addCabecalho(); + $obLista->ultimoCabecalho->addConteudo( "Data do Início" ); + $obLista->ultimoCabecalho->setWidth( 8 ); + $obLista->commitCabecalho(); + + $obLista->addCabecalho(); + $obLista->ultimoCabecalho->addConteudo( "Data do Término" ); + $obLista->ultimoCabecalho->setWidth( 8 ); + $obLista->commitCabecalho(); + + $obLista->addCabecalho(); + $obLista->ultimoCabecalho->addConteudo( "Valor Prorrogação" ); + $obLista->ultimoCabecalho->setWidth( 10 ); + $obLista->commitCabecalho(); + + $obLista->addCabecalho(); + $obLista->ultimoCabecalho->addConteudo( "Ação" ); + $obLista->ultimoCabecalho->setWidth( 6 ); + $obLista->commitCabecalho(); + + $obLista->addDado(); + $obLista->ultimoDado->setCampo( "[numeroTermoAditivo]/[exercicioTermoAditivo]"); + $obLista->ultimoDado->setAlinhamento( 'DIREITA' ); + $obLista->commitDado(); + + $obLista->addDado(); + $obLista->ultimoDado->setCampo( "[dataProrrogacao]"); + $obLista->ultimoDado->setAlinhamento( 'CENTRO' ); + $obLista->commitDado(); + + $obLista->addDado(); + $obLista->ultimoDado->setCampo( "[dataPublicacao]"); + $obLista->ultimoDado->setAlinhamento( 'CENTRO' ); + $obLista->commitDado(); + + $obLista->addDado(); + $obLista->ultimoDado->setCampo( "[imprensaOficial]"); + $obLista->ultimoDado->setAlinhamento( 'ESQUERDA' ); + $obLista->commitDado(); + + $obLista->addDado(); + $obLista->ultimoDado->setCampo( "[indicadorAdimplemento]"); + $obLista->ultimoDado->setAlinhamento( 'CENTRO' ); + $obLista->commitDado(); + + $obLista->addDado(); + $obLista->ultimoDado->setCampo( "[dataInicio]"); + $obLista->ultimoDado->setAlinhamento( 'CENTRO' ); + $obLista->commitDado(); + + $obLista->addDado(); + $obLista->ultimoDado->setCampo( "[dataTermino]"); + $obLista->ultimoDado->setAlinhamento( 'CENTRO' ); + $obLista->commitDado(); + + $obLista->addDado(); + $obLista->ultimoDado->setCampo( "[valorProrrogacao]"); + $obLista->ultimoDado->setAlinhamento( 'DIREITA' ); + $obLista->commitDado(); + + $obLista->addAcao(); + $obLista->ultimaAcao->setAcao( "ALTERAR" ); + $obLista->ultimaAcao->setFuncaoAjax( true ); + $obLista->ultimaAcao->setLink( "JavaScript:executaFuncaoAjax('carregarProrrogacoes');"); + $obLista->ultimaAcao->addCampo("1","inId"); + $obLista->commitAcao(); + + $obLista->addAcao(); + $obLista->ultimaAcao->setAcao( "EXCLUIR" ); + $obLista->ultimaAcao->setFuncaoAjax( true ); + $obLista->ultimaAcao->setLink( "JavaScript:executaFuncaoAjax('excluirProrrogacoes');"); + $obLista->ultimaAcao->addCampo("1","inId"); + $obLista->commitAcao(); + + $obLista->montaInnerHtml(); + $stHtml = $obLista->getHTML(); + $stJs .= "jQuery('#spnProrrogacoes').html('".$stHtml."');"; + + return $stJs; +} + +function validaDataProrrogacao() +{ + $stDataInicioProrrogacao = $_REQUEST['dtInicioProrrogacao']; + $stDataTerminoTermo = $_REQUEST['stDtTerminoTermo']; + + if(SistemaLegado::comparaDatas($stDataTerminoTermo, $stDataInicioProrrogacao, true)){ + $stJs .= " jQuery('#dtInicioProrrogacao').val(''); \n"; + $stJs .= " jQuery('#dtInicioProrrogacao').focus(); \n"; + $stJs .= "alertaAviso('Data de Início da prorrogação, deve ser maior que a data de termino(".$stDataTerminoTermo.") do Termo de Parceria.','form','aviso','".Sessao::getId()."');\n"; + } else { + $arProrrogacoes = Sessao::read("arProrrogacoes"); + if(!is_array($arProrrogacoes)){ + $arProrrogacoes = array(); + } + $boValidaData = false; + foreach($arProrrogacoes AS $arProrrogacao){ + if(SistemaLegado::comparaDatas($arProrrogacao["dataTermino"],$stDataInicioProrrogacao, true)){ + $boValidaData = true; + $stTermoProrrogacao = $arProrrogacao["numeroTermoAditivo"]; + $stDataTerminoProrrogacao = $arProrrogacao["dataTermino"]; + } + } + if($boValidaData){ + $stJs .= " jQuery('#dtInicioProrrogacao').val(''); \n"; + $stJs .= " jQuery('#dtInicioProrrogacao').focus(); \n"; + $stJs .= " alertaAviso('Data de Início da prorrogação, deve ser maior que a data de termino(".$stDataTerminoProrrogacao.") do Termo de Prorrogação(".$stTermoProrrogacao.").','form','aviso','".Sessao::getId()."');\n"; + $boValidaData = false; + } + } + + return $stJs; +} + +function validaPeriodicidade( $stDtInicio, $stDtTermino, $stCampoDataTermino) { + + if(SistemaLegado::comparaDatas($stDtInicio,$stDtTermino, $boMaiorIgual)){ + $stJs .= "jQuery(\"#".$stCampoDataTermino."\").val(''); \n"; + $stJs .= "jQuery(\"#".$stCampoDataTermino."\").focus(); \n"; + $stJs .= "alertaAviso('Data de Término, deve ser maior que a Data de Início (".$stDtInicio.").','form','aviso','".Sessao::getId()."');\n"; + } + return $stJs; +} + +switch ($stCtrl) { + case "preencheTermos": + $stJs .= preencheTermos(); + break; + case "carregarProrrogacoes": + $stJs .= carregarProrrogacoes(); + break; + case "incluirProrrogacoes": + $stJs .= incluirProrrogacoes(); + break; + case "alterarProrrogacoes": + $stJs .= alterarProrrogacoes(); + break; + case "excluirProrrogacoes": + $stJs .= excluirProrrogacoes(); + break; + case "validaDataProrrogacao": + $stJs .= validaDataProrrogacao(); + break; + case "buscaProrrogacoes": + $stJs .= buscaProrrogacoes(); + break; + case "validaPeriodicidade": + if(array_key_exists('dtInicioProrrogacao',$request->getAll()) && array_key_exists('dtTerminoProrrogacao',$request->getAll())) { + $stDataInicio = $request->get('dtInicioProrrogacao'); + $stDataTermino = $request->get('dtTerminoProrrogacao'); + $stCampoDataTermino = 'dtTerminoProrrogacao'; + } + $stJs .= validaPeriodicidade($stDataInicio, $stDataTermino, $stCampoDataTermino); + break; +} +if ($stJs) { + echo $stJs; +} +?> \ No newline at end of file diff --git a/gestaoPrestacaoContas/fontes/PHP/TCMBA/instancias/configuracao/OCManterConfiguracaoTipoSalario.php b/gestaoPrestacaoContas/fontes/PHP/TCMBA/instancias/configuracao/OCManterConfiguracaoTipoSalario.php new file mode 100644 index 0000000..a644470 --- /dev/null +++ b/gestaoPrestacaoContas/fontes/PHP/TCMBA/instancias/configuracao/OCManterConfiguracaoTipoSalario.php @@ -0,0 +1,1208 @@ + +get('stCtrl'); +$stAcao = $request->get('stAcao'); + +switch ($stCtrl) { + + /*** Tipo Função Servidor ***/ + case "incluirFuncaoServidorLista": + unset($inCounter); + + $cmbTipofuncaoServidor = $request->get('cmbTipofuncaoServidor'); + $arCargosSelecionadosServidor = $request->get('arCargosSelecionadosServidor'); + + if ($cmbTipofuncaoServidor != '' && $arCargosSelecionadosServidor != '') { + $arFuncaoCargoServidorSessao = Sessao::read('arFuncaoCargoServidor'); + + if (is_array($arFuncaoCargoServidorSessao)) { + foreach ($arFuncaoCargoServidorSessao as $arFuncaoCargoServidorTmp) { + if ($arFuncaoCargoServidorTmp['cod_tipo_funcao'] == $cmbTipofuncaoServidor) { + echo "alertaAviso('@Esta Função de Servidor já está cadastrada na Lista de Funções(s).','form','erro','".Sessao::getId()."');"; + exit; + } + } + } + + $obTTCMBATipoFuncaoServidor = new TTCMBATipoFuncaoServidor(); + $obTTCMBATipoFuncaoServidor->setDado('cod_tipo_funcao', $cmbTipofuncaoServidor); + $obTTCMBATipoFuncaoServidor->recuperaPorChave($rsTipoFuncaoServidor); + + $obTPessoalCargo = new TPessoalCargo(); + $obTPessoalCargo->recuperaTodos( $rsPessoalCargo, ' WHERE cod_cargo IN ('.implode(',', $arCargosSelecionadosServidor).')' ); + + $inCounter = (Sessao::read('arFuncaoCargoServidor') == "") ? 0 : count(Sessao::read('arFuncaoCargoServidor')); + + $arFuncaoCargoServidorSessao[$inCounter]['id'] = $inCounter; + $arFuncaoCargoServidorSessao[$inCounter]['cod_tipo'] = $inCounter; + $arFuncaoCargoServidorSessao[$inCounter]['cod_tipo_funcao'] = $rsTipoFuncaoServidor->getCampo('cod_tipo_funcao'); + $arFuncaoCargoServidorSessao[$inCounter]['descricao'] = $rsTipoFuncaoServidor->getCampo('descricao'); + $arFuncaoCargoServidorSessao[$inCounter]['cargos'] = $rsPessoalCargo->arElementos; + + Sessao::write('arFuncaoCargoServidor',$arFuncaoCargoServidorSessao); + + $stJs = montaListaFuncaoServidor("incluir"); + $stJs .= "JavaScript:passaItem('document.frm.arCargosSelecionadosServidor','document.frm.arCargosDisponiveisServidor','tudo');"; + $stJs .= "jq('select#cmbTipofuncaoServidor').selectOptions('');"; + echo "alertaAviso('Função e cargo(s) inseridos na lista.','','info','".Sessao::getId()."');"; + + echo $stJs; + + } else { + echo "alertaAviso('@Selecione uma função e pelo menos um cargo.','form','erro','".Sessao::getId()."');"; + } + break; + + case "excluirFuncaoServidorLista": + $inCount = 0; + + if (is_array(Sessao::read('arFuncaoCargoServidor'))) { + foreach (Sessao::read('arFuncaoCargoServidor') as $arFuncaoCargoServidorTmp ) { + if ($arFuncaoCargoServidorTmp["cod_tipo"] != $request->get("inVlTipo")) { + $arTmp[$inCount] = $arFuncaoCargoServidorTmp; + $inCount++; + } + } + } + + echo "alertaAviso('Tipo de Função excluida.','','info','".Sessao::getId()."');"; + echo " jq('#arCargosDisponiveisServidor').focus(); "; + + Sessao::write('arFuncaoCargoServidor',$arTmp); + $stJs = montaListaFuncaoServidor("mostrar"); + echo $stJs; + break; + + case "detalharListaCargoServidor": + $inCodTipo = $request->get('cod_tipo'); + + $arFuncaoCargoServidor = Sessao::read('arFuncaoCargoServidor'); + for ($i = 0 ;$i < count(Sessao::read('arFuncaoCargoServidor')); $i++) { + if ($inCodTipo == $arFuncaoCargoServidor[$i]["cod_tipo"]) { + $rsFuncaoCargos = new RecordSet ; + $rsFuncaoCargos->preenche($arFuncaoCargoServidor[$i]["cargos"]); + break; + } + } + + while (!$rsFuncaoCargos->EOF()) { + $rsFuncaoCargos->setCampo('cod_tipo', $inCodTipo); + $rsFuncaoCargos->proximo(); + } + + $obTable = new Table; + $obTable->setRecordset( $rsFuncaoCargos ); + $obTable->addLineNumber(false); + $obTable->Head->addCabecalho('Cargos', 50); + $obTable->Body->addCampo('[cod_cargo] - [descricao]', 'E'); + + $stTableAction = 'excluir'; + $stFunctionJs = "ajaxJavaScript("OCManterConfiguracaoTipoSalario.php?cod_cargo=%s&cod_tipo=%s"; + $stFunctionJs .= "","excluirCargo")"; + + $obTable->Body->addAcao($stTableAction, $stFunctionJs, array( 'cod_cargo', 'cod_tipo' ) ); + + $obTable->montaHTML(true); + $stHTML = $obTable->getHtml(); + + echo $stHTML; + break; + + case "excluirCargo": + $arFuncaoCargoServidorSessao = Sessao::read('arFuncaoCargoServidor'); + + foreach ($arFuncaoCargoServidorSessao AS $arFuncaoCargoServidorTmp) { + if ($arFuncaoCargoServidorTmp['cod_tipo'] == $request->get('cod_tipo')) { + + if (count($arFuncaoCargoServidorTmp['cargos']) == 1) { + echo "alertaAviso('@Não é possível deletar este cargo, pois ele é o único relacionado a esta função.','form','erro','".Sessao::getId()."');"; + echo " jq('#arCargosDisponiveisServidor').focus(); "; + die; + } + + foreach ($arFuncaoCargoServidorTmp['cargos'] AS $arCargoTmp) { + if ($arCargoTmp['cod_cargo'] != $request->get('cod_cargo')) { + $arOcorrenciaNova[] = $arCargoTmp; + } + } + $arFuncaoCargoServidorTmp['cargos'] = $arOcorrenciaNova; + } + $arCargosNovasSessao[] = $arFuncaoCargoServidorTmp; + } + + echo "alertaAviso('Cargo excluido.','','info','".Sessao::getId()."');"; + echo " jq('#arCargosDisponiveisServidor').focus(); "; + + Sessao::write('arFuncaoCargoServidor', $arCargosNovasSessao); + $stJs = montaListaFuncaoServidor("mostrar"); + echo $stJs; + break; + + case "limparListaCargoServidor": + $stJs .= "JavaScript:passaItem('document.frm.arCargosSelecionadosServidor','document.frm.arCargosDisponiveisServidor','tudo');"; + $stJs .= "jq('select#cmbTipofuncaoServidor').selectOptions('');"; + echo $stJs; + break; + + case "funcoesExistentes": + $obTTCMBATipoFuncaoServidor = new TTCMBATipoFuncaoServidor(); + $obTTCMBATipoFuncaoServidor->setDado('cod_entidade', Sessao::read('cod_entidade')); + $obTTCMBATipoFuncaoServidor->setDado('exercicio' , Sessao::getExercicio()); + $obTTCMBATipoFuncaoServidor->recuperaFuncaoCargo($rsFuncaoCargo); + + $inCounter = 0; + $arFuncaoCargoServidorSessao = array(); + + foreach ($rsFuncaoCargo->arElementos as $tipoFuncao) { + $obTTCMBACargoServidor = new TTCMBACargoServidor(); + $obTTCMBACargoServidor->setDado('cod_tipo_funcao', $tipoFuncao['cod_tipo_funcao']); + $obTTCMBACargoServidor->setDado('cod_entidade' , Sessao::read('cod_entidade')); + $obTTCMBACargoServidor->setDado('exercicio' , Sessao::getExercicio()); + $obTTCMBACargoServidor->recuperaCargos($rsCargos , ' ORDER BY cod_cargo '); + + $arFuncaoCargoServidorSessao[$inCounter]['id'] = $inCounter; + $arFuncaoCargoServidorSessao[$inCounter]['cod_tipo'] = $inCounter; + $arFuncaoCargoServidorSessao[$inCounter]['cod_tipo_funcao'] = $tipoFuncao['cod_tipo_funcao']; + $arFuncaoCargoServidorSessao[$inCounter]['descricao'] = $tipoFuncao['descricao']; + $arFuncaoCargoServidorSessao[$inCounter]['cargos'] = $rsCargos->arElementos; + + $inCounter++; + } + + Sessao::write('arFuncaoCargoServidor', $arFuncaoCargoServidorSessao); + + $stJs = montaListaFuncaoServidor("mostrar"); + echo $stJs; + break; + + /*** Tipo Função Servidor Temporário ***/ + case "incluirFuncaoServidorListaTemporario": + unset($inCounter); + + $cmbTipofuncaoServidorTemporario = $request->get('cmbTipofuncaoServidorTemporario'); + $arCargosSelecionadosServidorTemporario = $request->get('arCargosSelecionadosServidorTemporario'); + + if ($cmbTipofuncaoServidorTemporario != '' && $arCargosSelecionadosServidorTemporario != '') { + $arFuncaoCargoServidorSessaoTemporario = Sessao::read('arFuncaoCargoServidorTemporario'); + + if (is_array($arFuncaoCargoServidorSessaoTemporario)) { + foreach ($arFuncaoCargoServidorSessaoTemporario as $arFuncaoCargoServidorTmpTemporario) { + if ($arFuncaoCargoServidorTmpTemporario['cod_tipo_funcao'] == $cmbTipofuncaoServidorTemporario) { + echo "alertaAviso('@Esta Função de Servidor Temporário já está cadastrada na Lista de Funções(s).','form','erro','".Sessao::getId()."');"; + exit; + } + } + } + + $obTTCMBATipoFuncaoServidorTemporario = new TTCMBATipoFuncaoServidorTemporario(); + $obTTCMBATipoFuncaoServidorTemporario->setDado('cod_tipo_funcao', $cmbTipofuncaoServidorTemporario); + $obTTCMBATipoFuncaoServidorTemporario->recuperaPorChave($rsTipoFuncaoServidorTemporario); + + $obTPessoalCargo = new TPessoalCargo(); + $obTPessoalCargo->recuperaTodos( $rsPessoalCargo, ' WHERE cod_cargo IN ('.implode(',', $arCargosSelecionadosServidorTemporario).')' ); + + $inCounter = (Sessao::read('arFuncaoCargoServidorTemporario') == "") ? 0 : count(Sessao::read('arFuncaoCargoServidorTemporario')); + + $arFuncaoCargoServidorSessaoTemporario[$inCounter]['id'] = $inCounter; + $arFuncaoCargoServidorSessaoTemporario[$inCounter]['cod_tipo'] = $inCounter; + $arFuncaoCargoServidorSessaoTemporario[$inCounter]['cod_tipo_funcao'] = $rsTipoFuncaoServidorTemporario->getCampo('cod_tipo_funcao'); + $arFuncaoCargoServidorSessaoTemporario[$inCounter]['descricao'] = $rsTipoFuncaoServidorTemporario->getCampo('descricao'); + $arFuncaoCargoServidorSessaoTemporario[$inCounter]['cargos'] = $rsPessoalCargo->arElementos; + + Sessao::write('arFuncaoCargoServidorTemporario',$arFuncaoCargoServidorSessaoTemporario); + + + $stJs = montaListaFuncaoServidorTemporario("incluir"); + $stJs .= "JavaScript:passaItem('document.frm.arCargosSelecionadosServidorTemporario','document.frm.arCargosDisponiveisServidorTemporario','tudo');"; + $stJs .= "jq('select#cmbTipofuncaoServidorTemporario').selectOptions('');"; + echo "alertaAviso('Função e cargo(s) inseridos na lista.','','info','".Sessao::getId()."');"; + + echo $stJs; + + } else { + echo "alertaAviso('@Selecione uma função e pelo menos um cargo.','form','erro','".Sessao::getId()."');"; + } + break; + + case "excluirFuncaoServidorListaTemporario": + $inCount = 0; + + if (is_array(Sessao::read('arFuncaoCargoServidorTemporario'))) { + foreach (Sessao::read('arFuncaoCargoServidorTemporario') as $arFuncaoCargoServidorTmpTemporario ) { + if ($arFuncaoCargoServidorTmpTemporario["cod_tipo"] != $request->get("inVlTipo")) { + $arTmp[$inCount] = $arFuncaoCargoServidorTmpTemporario; + $inCount++; + } + } + } + + echo "alertaAviso('Função de Servidor Temporário excluida.','','info','".Sessao::getId()."');"; + echo " jq('#arCargosDisponiveisServidorTemporario').focus(); "; + + Sessao::write('arFuncaoCargoServidorTemporario',$arTmp); + $stJs = montaListaFuncaoServidorTemporario("mostrar"); + echo $stJs; + break; + + case "detalharListaCargoServidorTemporario": + $inCodTipo = $request->get('cod_tipo'); + + $arFuncaoCargoServidorTemporario = Sessao::read('arFuncaoCargoServidorTemporario'); + for ($i = 0 ;$i < count(Sessao::read('arFuncaoCargoServidorTemporario')); $i++) { + if ($inCodTipo == $arFuncaoCargoServidorTemporario[$i]["cod_tipo"]) { + $rsFuncaoCargosTemporario = new RecordSet ; + $rsFuncaoCargosTemporario->preenche($arFuncaoCargoServidorTemporario[$i]["cargos"]); + break; + } + } + + while (!$rsFuncaoCargosTemporario->EOF()) { + $rsFuncaoCargosTemporario->setCampo('cod_tipo', $inCodTipo); + $rsFuncaoCargosTemporario->proximo(); + } + + $obTable = new Table; + $obTable->setRecordset( $rsFuncaoCargosTemporario ); + $obTable->addLineNumber(false); + $obTable->Head->addCabecalho('Cargos', 50); + $obTable->Body->addCampo('[cod_cargo] - [descricao]', 'E'); + + $stTableAction = 'excluir'; + $stFunctionJs = "ajaxJavaScript("OCManterConfiguracaoTipoSalario.php?cod_cargo=%s&cod_tipo=%s"; + $stFunctionJs .= "","excluirCargoTemporario")"; + + $obTable->Body->addAcao($stTableAction, $stFunctionJs, array( 'cod_cargo', 'cod_tipo' ) ); + + $obTable->montaHTML(true); + $stHTML = $obTable->getHtml(); + + echo $stHTML; + break; + + case "excluirCargoTemporario": + $arFuncaoCargoServidorSessaoTemporario = Sessao::read('arFuncaoCargoServidorTemporario'); + + foreach ($arFuncaoCargoServidorSessaoTemporario AS $arFuncaoCargoServidorTmpTempoario) { + if ($arFuncaoCargoServidorTmpTempoario['cod_tipo'] == $request->get('cod_tipo')) { + + if (count($arFuncaoCargoServidorTmpTempoario['cargos']) == 1) { + echo "alertaAviso('@Não é possível deletar este cargo, pois ele é o único relacionado a esta função.','form','erro','".Sessao::getId()."');"; + echo " jq('#arCargosDisponiveisServidorTemporario').focus(); "; + die; + } + + foreach ($arFuncaoCargoServidorTmpTempoario['cargos'] AS $arCargoTmp) { + if ($arCargoTmp['cod_cargo'] != $request->get('cod_cargo')) { + $arCargoNovo[] = $arCargoTmp; + } + } + $arFuncaoCargoServidorTmpTempoario['cargos'] = $arCargoNovo; + } + $arCargosNovasSessao[] = $arFuncaoCargoServidorTmpTempoario; + } + + echo "alertaAviso('Cargo excluido.','','info','".Sessao::getId()."');"; + echo " jq('#arCargosDisponiveisServidorTemporario').focus(); "; + + Sessao::write('arFuncaoCargoServidorTemporario', $arCargosNovasSessao); + $stJs = montaListaFuncaoServidorTemporario("mostrar"); + echo $stJs; + break; + + case "limparListaCargoServidorTemporario": + $stJs .= "JavaScript:passaItem('document.frm.arCargosSelecionadosServidorTemporario','document.frm.arCargosDisponiveisServidorTemporario','tudo');"; + $stJs .= "jq('select#cmbTipofuncaoServidorTemporario').selectOptions('');"; + echo $stJs; + break; + + case "funcoesTemporarioExistentes": + $obTTCMBATipoFuncaoServidorTemporario = new TTCMBATipoFuncaoServidorTemporario(); + $obTTCMBATipoFuncaoServidorTemporario->setDado('cod_entidade', Sessao::read('cod_entidade')); + $obTTCMBATipoFuncaoServidorTemporario->setDado('exercicio' , Sessao::getExercicio()); + $obTTCMBATipoFuncaoServidorTemporario->recuperaFuncaoCargoTemporario($rsFuncaoCargoTemporario); + + $inCounter = 0; + $arFuncaoCargoServidorTemporarioSessao = array(); + + foreach ($rsFuncaoCargoTemporario->arElementos as $tipoFuncao) { + $obTTCMBACargoServidorTemporario = new TTCMBACargoServidorTemporario(); + $obTTCMBACargoServidorTemporario->setDado('cod_tipo_funcao', $tipoFuncao['cod_tipo_funcao']); + $obTTCMBACargoServidorTemporario->setDado('cod_entidade' , Sessao::read('cod_entidade')); + $obTTCMBACargoServidorTemporario->setDado('exercicio' , Sessao::getExercicio()); + $obTTCMBACargoServidorTemporario->recuperaCargosTemporario($rsCargos, ' ORDER BY cod_cargo '); + + $arFuncaoCargoServidorTemporarioSessao[$inCounter]['id'] = $inCounter; + $arFuncaoCargoServidorTemporarioSessao[$inCounter]['cod_tipo'] = $inCounter; + $arFuncaoCargoServidorTemporarioSessao[$inCounter]['cod_tipo_funcao'] = $tipoFuncao['cod_tipo_funcao']; + $arFuncaoCargoServidorTemporarioSessao[$inCounter]['descricao'] = $tipoFuncao['descricao']; + $arFuncaoCargoServidorTemporarioSessao[$inCounter]['cargos'] = $rsCargos->arElementos; + + $inCounter++; + } + + Sessao::write('arFuncaoCargoServidorTemporario', $arFuncaoCargoServidorTemporarioSessao); + + $stJs = montaListaFuncaoServidorTemporario("mostrar"); + echo $stJs; + break; + + /*** Bancos Emprestimos ***/ + case "incluirBancoEmprestimo": + unset($inCounter); + + $cmbBancoEmprestimo = $request->get('cmbBancoEmprestimo'); + $arEventosSelecionados = $request->get('arEventosSelecionados'); + + if ($cmbBancoEmprestimo != '' && $arEventosSelecionados != '') { + $arBancoEventosEmprestimoSessao = Sessao::read('arBancoEventosEmprestimo'); + + if (is_array($arBancoEventosEmprestimoSessao)) { + foreach ($arBancoEventosEmprestimoSessao as $arBancoEventosEmprestimoTmp) { + if ($arBancoEventosEmprestimoTmp['cod_banco'] == $cmbBancoEmprestimo) { + echo "alertaAviso('@Esta Código de compensação do banco já está cadastrado na Lista.','form','erro','".Sessao::getId()."');"; + exit; + } + } + } + + $obTMONBanco = new TMONBanco(); + $obTMONBanco->setDado('cod_banco', $cmbBancoEmprestimo); + $obTMONBanco->recuperaPorChave($rsBancoEmprestimo); + + $obTFolhaPagamentoEvento = new TFolhaPagamentoEvento(); + $obTFolhaPagamentoEvento->recuperaTodos( $rsEventosEmprestimo, ' WHERE cod_evento IN ('.implode(',', $arEventosSelecionados).')' ); + + $inCounter = (Sessao::read('arBancoEventosEmprestimo') == "") ? 0 : count(Sessao::read('arBancoEventosEmprestimo')); + + $arBancoEventosEmprestimoSessao[$inCounter]['id'] = $inCounter; + $arBancoEventosEmprestimoSessao[$inCounter]['cod_tipo'] = $inCounter; + $arBancoEventosEmprestimoSessao[$inCounter]['cod_banco'] = $rsBancoEmprestimo->getCampo('cod_banco'); + $arBancoEventosEmprestimoSessao[$inCounter]['num_banco'] = $rsBancoEmprestimo->getCampo('num_banco'); + $arBancoEventosEmprestimoSessao[$inCounter]['nom_banco'] = $rsBancoEmprestimo->getCampo('nom_banco'); + $arBancoEventosEmprestimoSessao[$inCounter]['eventos'] = $rsEventosEmprestimo->arElementos; + + Sessao::write('arBancoEventosEmprestimo',$arBancoEventosEmprestimoSessao); + + $stJs = montaListaBancoEmprestimo("incluir"); + $stJs .= "JavaScript:passaItem('document.frm.arEventosSelecionados','document.frm.arEventosDisponiveis','tudo');"; + $stJs .= "jq('select#cmbBancoEmprestimo').selectOptions('');"; + echo "alertaAviso('Banco e evento(s) inseridos na lista.','','info','".Sessao::getId()."');"; + + echo $stJs; + + } else { + echo "alertaAviso('@Selecione um banco e pelo menos um evento.','form','erro','".Sessao::getId()."');"; + } + break; + + case "excluirBancoEmprestimoLista": + $inCount = 0; + + if (is_array(Sessao::read('arBancoEventosEmprestimo'))) { + foreach (Sessao::read('arBancoEventosEmprestimo') as $arBancoEventosEmprestimoTmp ) { + if ($arBancoEventosEmprestimoTmp["cod_tipo"] != $request->get("inVlTipo")) { + $arTmp[$inCount] = $arBancoEventosEmprestimoTmp; + $inCount++; + } + } + } + + echo "alertaAviso('Código de compensação do banco do Empréstimo excluido.','','info','".Sessao::getId()."');"; + echo "jq('#arEventosDisponiveis').focus();"; + + Sessao::write('arBancoEventosEmprestimo',$arTmp); + $stJs = montaListaBancoEmprestimo("mostrar"); + echo $stJs; + break; + + case "detalharListaEventosEmprestimo": + $inCodTipo = $request->get('cod_tipo'); + + $arBancoEventosEmprestimo = Sessao::read('arBancoEventosEmprestimo'); + for ($i = 0 ;$i < count(Sessao::read('arBancoEventosEmprestimo')); $i++) { + if ($inCodTipo == $arBancoEventosEmprestimo[$i]["cod_tipo"]) { + $rsBancoEventosEmprestimo = new RecordSet ; + $rsBancoEventosEmprestimo->preenche($arBancoEventosEmprestimo[$i]["eventos"]); + break; + } + } + + while (!$rsBancoEventosEmprestimo->EOF()) { + $rsBancoEventosEmprestimo->setCampo('cod_tipo', $inCodTipo); + $rsBancoEventosEmprestimo->proximo(); + } + $obTable = new Table; + $obTable->setRecordset( $rsBancoEventosEmprestimo ); + $obTable->addLineNumber(false); + $obTable->Head->addCabecalho('Empréstimos Consignados', 50); + $obTable->Body->addCampo('[codigo] - [descricao]', 'E'); + + $stTableAction = 'excluir'; + $stFunctionJs = "ajaxJavaScript("OCManterConfiguracaoTipoSalario.php?cod_evento=%s&cod_tipo=%s"; + $stFunctionJs .= "","excluirEventosEmprestimo")"; + + $obTable->Body->addAcao($stTableAction, $stFunctionJs, array( 'cod_evento', 'cod_tipo' ) ); + + $obTable->montaHTML(true); + $stHTML = $obTable->getHtml(); + + echo $stHTML; + break; + + case "excluirEventosEmprestimo": + $arBancoEventosEmprestimoSessao = Sessao::read('arBancoEventosEmprestimo'); + + foreach ($arBancoEventosEmprestimoSessao AS $arBancoEventosEmprestimoTmp) { + if ($arBancoEventosEmprestimoTmp['cod_tipo'] == $request->get('cod_tipo')) { + + if (count($arBancoEventosEmprestimoTmp['eventos']) == 1) { + echo "alertaAviso('@Não é possível deletar este evento de empréstimo, pois ele é o único relacionado a esta código de compensação.','form','erro','".Sessao::getId()."');"; + echo "jq('#arEventosDisponiveis').focus();"; + die; + } + + foreach ($arBancoEventosEmprestimoTmp['eventos'] AS $arEventosTmp) { + if ($arEventosTmp['cod_evento'] != $request->get('cod_evento')) { + $arEventosNovo[] = $arEventosTmp; + } + } + $arBancoEventosEmprestimoTmp['eventos'] = $arEventosNovo; + } + $arEventosNovaSessao[] = $arBancoEventosEmprestimoTmp; + } + + echo "alertaAviso('Evento de empréstimo excluido.','','info','".Sessao::getId()."');"; + echo "jq('#arEventosDisponiveis').focus();"; + + Sessao::write('arBancoEventosEmprestimo', $arEventosNovaSessao); + $stJs = montaListaBancoEmprestimo("mostrar"); + echo $stJs; + break; + + case "limparListaEventosEmprestimo": + $stJs .= "JavaScript:passaItem('document.frm.arEventosSelecionados','document.frm.arEventosDisponiveis','tudo');"; + $stJs .= "jq('select#cmbBancoEmprestimo').selectOptions('');"; + echo $stJs; + break; + + case "bancoEventosExistentes": + $obTTCMBAEmprestimoConsignado = new TTCMBAEmprestimoConsignado(); + $obTTCMBAEmprestimoConsignado->setDado('cod_entidade', Sessao::read('cod_entidade')); + $obTTCMBAEmprestimoConsignado->setDado('exercicio' , Sessao::getExercicio()); + $obTTCMBAEmprestimoConsignado->recuperaBancosEmprestimo($rsBancoEventos); + + $inCounter = 0; + $arBancoEventosEmprestimoSessao = array(); + + foreach ($rsBancoEventos->arElementos as $bancoEvento) { + $obTTCMBAEmprestimoConsignado->setDado('cod_banco', $bancoEvento['cod_banco']); + $obTTCMBAEmprestimoConsignado->recuperaEventosEmprestimo($rEventos, ' ORDER BY evento.cod_evento '); + + $arBancoEventosEmprestimoSessao[$inCounter]['id'] = $inCounter; + $arBancoEventosEmprestimoSessao[$inCounter]['cod_tipo'] = $inCounter; + $arBancoEventosEmprestimoSessao[$inCounter]['cod_banco'] = $bancoEvento['cod_banco']; + $arBancoEventosEmprestimoSessao[$inCounter]['num_banco'] = $bancoEvento['num_banco']; + $arBancoEventosEmprestimoSessao[$inCounter]['nom_banco'] = $bancoEvento['nom_banco']; + $arBancoEventosEmprestimoSessao[$inCounter]['eventos'] = $rEventos->arElementos; + + $inCounter++; + } + + Sessao::write('arBancoEventosEmprestimo', $arBancoEventosEmprestimoSessao); + + $stJs = montaListaBancoEmprestimo("mostrar"); + echo $stJs; + break; + + /*** Salário Base ***/ + case "salarioBaseExistentes": + + $obTTCMBASalarioBase = new TTCMBASalarioBase(); + $obTTCMBASalarioBase->setDado('cod_entidade', Sessao::read('cod_entidade')); + $obTTCMBASalarioBase->setDado('exercicio' , Sessao::getExercicio()); + $obTTCMBASalarioBase->recuperaEventosSalarioBase($rsEventosSalarioBase); + + if ( $rsEventosSalarioBase->getNumLinhas() > 0 ) { + + while (!$rsEventosSalarioBase->eof()) { + $stJs .= " jq('#arSalariosBaseDisponiveis').removeOption('" . $rsEventosSalarioBase->getCampo('cod_evento') . "'); "; + $stJs .= " jq('#arSalarioBaseSelecionados').addOption('" . $rsEventosSalarioBase->getCampo('cod_evento') . "','" . $rsEventosSalarioBase->getCampo('codigo')." - ".$rsEventosSalarioBase->getCampo('descricao') . "');"; + $rsEventosSalarioBase->proximo(); + } + echo $stJs; + } + + break; + + /*** Demais Vantagens Salariais ***/ + case "vantagensSalariaisExistentes": + + $obTTCMBAVantagensSalariais = new TTCMBAVantagensSalariais(); + $obTTCMBAVantagensSalariais->setDado('cod_entidade', Sessao::read('cod_entidade')); + $obTTCMBAVantagensSalariais->setDado('exercicio' , Sessao::getExercicio()); + $obTTCMBAVantagensSalariais->recuperaEventosVantagensSalariais($rsEventosVantagensSalariais); + + if ( $rsEventosVantagensSalariais->getNumLinhas() > 0 ) { + + while (!$rsEventosVantagensSalariais->eof()) { + $stJs .= " jq('#arVantagensSalariaisDisponiveis').removeOption('" . $rsEventosVantagensSalariais->getCampo('cod_evento') . "'); "; + $stJs .= " jq('#arVantagensSalariaisSelecionados').addOption('" . $rsEventosVantagensSalariais->getCampo('cod_evento') . "','" . $rsEventosVantagensSalariais->getCampo('codigo')." - ".$rsEventosVantagensSalariais->getCampo('descricao') . "');"; + $rsEventosVantagensSalariais->proximo(); + } + echo $stJs; + } + + break; + + /*** Gratificação de função ***/ + case "gratificacaoFuncaoExistentes": + + $obTTCMBAGratificacaoFuncao = new TTCMBAGratificacaoFuncao(); + $obTTCMBAGratificacaoFuncao->setDado('cod_entidade', Sessao::read('cod_entidade')); + $obTTCMBAGratificacaoFuncao->setDado('exercicio' , Sessao::getExercicio()); + $obTTCMBAGratificacaoFuncao->recuperaEventosGratificacaoFuncao($rsEventosGratificacaoFuncao); + + if ( $rsEventosGratificacaoFuncao->getNumLinhas() > 0 ) { + + while (!$rsEventosGratificacaoFuncao->eof()) { + $stJs .= " jq('#arGratificacaoFuncaoDisponiveis').removeOption('" . $rsEventosGratificacaoFuncao->getCampo('cod_evento') . "'); "; + $stJs .= " jq('#arGratificacaoFuncaoSelecionados').addOption('" . $rsEventosGratificacaoFuncao->getCampo('cod_evento') . "','" . $rsEventosGratificacaoFuncao->getCampo('codigo')." - ".$rsEventosGratificacaoFuncao->getCampo('descricao') . "');"; + $rsEventosGratificacaoFuncao->proximo(); + } + echo $stJs; + } + + break; + + /*** Salário Família ***/ + case "salarioFamiliaExistentes": + + $oTTCMBASalarioFamilia = new TTCMBASalarioFamilia(); + $oTTCMBASalarioFamilia->setDado('cod_entidade', Sessao::read('cod_entidade')); + $oTTCMBASalarioFamilia->setDado('exercicio' , Sessao::getExercicio()); + $oTTCMBASalarioFamilia->recuperaEventosSalarioFamilia($rsEventosSalarioFamilia); + + if ( $rsEventosSalarioFamilia->getNumLinhas() > 0 ) { + + while (!$rsEventosSalarioFamilia->eof()) { + $stJs .= " jq('#arSalarioFamiliaDisponiveis').removeOption('" . $rsEventosSalarioFamilia->getCampo('cod_evento') . "'); "; + $stJs .= " jq('#arSalarioFamiliaSelecionados').addOption('" . $rsEventosSalarioFamilia->getCampo('cod_evento') . "','" . $rsEventosSalarioFamilia->getCampo('codigo')." - ".$rsEventosSalarioFamilia->getCampo('descricao') . "');"; + $rsEventosSalarioFamilia->proximo(); + } + echo $stJs; + } + + break; + + /*** Horas Extras trabalhadas ***/ + case "horasExtrasExistentes": + + $obTTCMBASalarioHorasExtras = new TTCMBASalarioHorasExtras(); + $obTTCMBASalarioHorasExtras->setDado('cod_entidade', Sessao::read('cod_entidade')); + $obTTCMBASalarioHorasExtras->setDado('exercicio' , Sessao::getExercicio()); + $obTTCMBASalarioHorasExtras->recuperaEventosHorasExtras($rsEventosHorasExtras); + + if ( $rsEventosHorasExtras->getNumLinhas() > 0 ) { + + while (!$rsEventosHorasExtras->eof()) { + $stJs .= " jq('#arHorasExtrasDisponiveis').removeOption('" . $rsEventosHorasExtras->getCampo('cod_evento') . "'); "; + $stJs .= "jq('#arHorasExtrasSelecionados').addOption('" . $rsEventosHorasExtras->getCampo('cod_evento') . "','" . $rsEventosHorasExtras->getCampo('codigo')." - ".$rsEventosHorasExtras->getCampo('descricao') . "');"; + $rsEventosHorasExtras->proximo(); + } + echo $stJs; + } + + break; + + /*** Demais Descontos ***/ + case "demaisDescontosExistentes": + + $oTTCMBASalarioDescontos = new TTCMBASalarioDescontos(); + $oTTCMBASalarioDescontos->setDado('cod_entidade', Sessao::read('cod_entidade')); + $oTTCMBASalarioDescontos->setDado('exercicio' , Sessao::getExercicio()); + $oTTCMBASalarioDescontos->recuperaEventosDemaisDescontos($rsEventosDemaisDescontos); + + if ( $rsEventosDemaisDescontos->getNumLinhas() > 0 ) { + + while (!$rsEventosDemaisDescontos->eof()) { + $stJs .= " jq('#arDemaisDescontosDisponiveis').removeOption('" . $rsEventosDemaisDescontos->getCampo('cod_evento') . "'); "; + $stJs .= " jq('#arDemaisDescontosSelecionados').addOption('" . $rsEventosDemaisDescontos->getCampo('cod_evento') . "','" . $rsEventosDemaisDescontos->getCampo('codigo')." - ".$rsEventosDemaisDescontos->getCampo('descricao') . "');"; + $rsEventosDemaisDescontos->proximo(); + } + echo $stJs; + } + + break; + + /*** Plano de Saúde/Odontológico ***/ + case "planoSaudeExistentes": + + $oTTCMBAPlanoSaude = new TTCMBAPlanoSaude(); + $oTTCMBAPlanoSaude->setDado('cod_entidade', Sessao::read('cod_entidade')); + $oTTCMBAPlanoSaude->setDado('exercicio' , Sessao::getExercicio()); + $oTTCMBAPlanoSaude->recuperaEventosPlanoSaude($rsEventosPlanoSaude); + + if ( $rsEventosPlanoSaude->getNumLinhas() > 0 ) { + + while (!$rsEventosPlanoSaude->eof()) { + $stJs .= " jq('#arPlanoSaudeDisponiveis').removeOption('" . $rsEventosPlanoSaude->getCampo('cod_evento') . "'); "; + $stJs .= "jq('#arPlanoSaudeSelecionados').addOption('" . $rsEventosPlanoSaude->getCampo('cod_evento') . "','" . $rsEventosPlanoSaude->getCampo('codigo')." - ".$rsEventosPlanoSaude->getCampo('descricao') . "');"; + $rsEventosPlanoSaude->proximo(); + } + echo $stJs; + } + + break; + + /*** Classe/Aplicação do Salário do Servidor ***/ + case "incluirFonteRecursoServidor": + unset($inCounter); + + $cmbFonteRecursoServidor = $request->get('cmbFonteRecursoServidor'); + $arCodLotacaoSelecionados = $request->get('inCodLotacaoSelecionados'); + $arCodLocalSelecionados = $request->get('inCodLocalSelecionados'); + + if ($cmbFonteRecursoServidor != '' && $arCodLotacaoSelecionados != '') { + $arFonteRecursoLotacaoLocal = Sessao::read('arFonteRecursoLotacaoLocal'); + + if (is_array($arFonteRecursoLotacaoLocal)) { + foreach ($arFonteRecursoLotacaoLocal as $arFonteRecursoLotacaoLocalTmp) { + if ($arFonteRecursoLotacaoLocalTmp['cod_tipo_fonte'] == $cmbFonteRecursoServidor) { + echo "alertaAviso('@Classe/Aplicação do Salário do Servidor já está cadastrada na Lista.','form','erro','".Sessao::getId()."');"; + exit; + } + } + } + + $obTTCMBAFonteRecursoServidor = new TTCMBAFonteRecursoServidor(); + $obTTCMBAFonteRecursoServidor->setDado('cod_tipo_fonte', $cmbFonteRecursoServidor); + $obTTCMBAFonteRecursoServidor->recuperaPorChave($rsFonteRecursoServidor); + + $obTTCMBAFonteRecursoLotacao = new TTCMBAFonteRecursoLotacao(); + $obTTCMBAFonteRecursoLotacao->recuperaFonteRecursoLotacao( $rsFonteRecursoLotacao, ' WHERE orgao.cod_orgao IN ('.implode(',', $arCodLotacaoSelecionados).')' ); + + $rsFonteRecursoLocal = new RecordSet(); + + if (isset($arCodLocalSelecionados)){ + $obTOrganogramaLocal = new TOrganogramaLocal(); + $obTOrganogramaLocal->recuperaTodos( $rsFonteRecursoLocal, ' WHERE cod_local IN ('.implode(',', $arCodLocalSelecionados).')' ); + } + + if (Sessao::read('arFonteRecursoLotacaoLocal') == "") { + $inCounter = 0; + $inOcorrencia = 0; + + $arFonteRecursoLotacaoLocal[$inCounter]['id'] = $inCounter; + $arFonteRecursoLotacaoLocal[$inCounter]['cod_tipo'] = $inCounter; + $arFonteRecursoLotacaoLocal[$inCounter]['cod_tipo_fonte'] = $rsFonteRecursoServidor->getCampo('cod_tipo_fonte'); + $arFonteRecursoLotacaoLocal[$inCounter]['descricao'] = $rsFonteRecursoServidor->getCampo('descricao'); + $arFonteRecursoLotacaoLocal[$inCounter]['lotacao'] = $rsFonteRecursoLotacao->arElementos; + $arFonteRecursoLotacaoLocal[$inCounter]['local'] = $rsFonteRecursoLocal->arElementos; + + Sessao::write('arFonteRecursoLotacaoLocal', $arFonteRecursoLotacaoLocal); + } else { + $inCounter = count(Sessao::read('arFonteRecursoLotacaoLocal')); + + $arFonteRecursoLotacaoLocal[$inCounter]['id'] = $inCounter; + $arFonteRecursoLotacaoLocal[$inCounter]['cod_tipo'] = $inCounter; + $arFonteRecursoLotacaoLocal[$inCounter]['cod_tipo_fonte'] = $rsFonteRecursoServidor->getCampo('cod_tipo_fonte'); + $arFonteRecursoLotacaoLocal[$inCounter]['descricao'] = $rsFonteRecursoServidor->getCampo('descricao'); + $arFonteRecursoLotacaoLocal[$inCounter]['lotacao'] = $rsFonteRecursoLotacao->arElementos; + $arFonteRecursoLotacaoLocal[$inCounter]['local'] = $rsFonteRecursoLocal->arElementos; + + Sessao::write('arFonteRecursoLotacaoLocal',$arFonteRecursoLotacaoLocal); + } + + $stJs = montaListaFonteRecursoServidor("incluir"); + $stJs .= "JavaScript:passaItem('document.frm.inCodLotacaoSelecionados','document.frm.inCodLotacaoDisponiveis','tudo');"; + $stJs .= "JavaScript:passaItem('document.frm.inCodLocalSelecionados','document.frm.inCodLocalDisponiveis','tudo');"; + $stJs .= "jq('select#cmbFonteRecursoServidor').selectOptions('');"; + echo "alertaAviso('Classe/Aplicação inserido na lista.','','info','".Sessao::getId()."');"; + + echo $stJs; + + } else { + echo "alertaAviso('@Selecione uma classe/aplicação e pelo menos uma lotação.','form','erro','".Sessao::getId()."');"; + } + + break; + + case "excluirFonteRecursoLista": + $inCount = 0; + + if (is_array(Sessao::read('arFonteRecursoLotacaoLocal'))) { + foreach (Sessao::read('arFonteRecursoLotacaoLocal') as $arFonteRecursoLotacaoLocalTmp ) { + if ($arFonteRecursoLotacaoLocalTmp["cod_tipo"] != $request->get("inVlTipo")) { + $arTmp[$inCount] = $arFonteRecursoLotacaoLocalTmp; + $inCount++; + } + } + } + + echo "alertaAviso('Classe/Aplicação do Salário do Servidor excluido.','','info','".Sessao::getId()."');"; + echo "jq('#inCodLocalDisponiveis').focus();"; + + Sessao::write('arFonteRecursoLotacaoLocal',$arTmp); + $stJs = montaListaFonteRecursoServidor("mostrar"); + echo $stJs; + break; + + case "detalharFonteRecursoServidor": + $inCodTipo = $request->get('cod_tipo'); + + $rsFonteRecursoLotacao = new RecordSet(); + $rsFonteRecursoLocal = new RecordSet(); + + $arFonteRecursoLotacaoLocal = Sessao::read('arFonteRecursoLotacaoLocal'); + + for ($i = 0 ;$i < count(Sessao::read('arFonteRecursoLotacaoLocal')); $i++) { + if ($inCodTipo == $arFonteRecursoLotacaoLocal[$i]["cod_tipo"]) { + $rsFonteRecursoLotacao->preenche($arFonteRecursoLotacaoLocal[$i]["lotacao"]); + $rsFonteRecursoLocal->preenche($arFonteRecursoLotacaoLocal[$i]["local"]); + break; + } + } + + while (!$rsFonteRecursoLotacao->EOF()) { + $rsFonteRecursoLotacao->setCampo('cod_tipo', $inCodTipo); + $rsFonteRecursoLotacao->proximo(); + } + + $obTableLotacao = new Table; + $obTableLotacao->setRecordset( $rsFonteRecursoLotacao ); + $obTableLotacao->addLineNumber(false); + $obTableLotacao->Head->addCabecalho('Lotação', 50); + $obTableLotacao->Body->addCampo('[cod_estrutural] - [descricao]', 'E'); + + $stTableAction = 'excluir'; + $stFunctionJs = "ajaxJavaScript("OCManterConfiguracaoTipoSalario.php?cod_orgao=%s&cod_tipo=%s"; + $stFunctionJs .= "","excluirFonteRecursoLotacao")"; + + $obTableLotacao->Body->addAcao($stTableAction, $stFunctionJs, array( 'cod_orgao', 'cod_tipo' ) ); + + $obTableLotacao->montaHTML(true); + $stHTML = $obTableLotacao->getHtml(); + + while (!$rsFonteRecursoLocal->EOF()) { + $rsFonteRecursoLocal->setCampo('cod_tipo', $inCodTipo); + $rsFonteRecursoLocal->proximo(); + } + + $obTableLocal = new Table; + $obTableLocal->setRecordset( $rsFonteRecursoLocal ); + $obTableLocal->addLineNumber(false); + $obTableLocal->Head->addCabecalho('Local', 50); + $obTableLocal->Body->addCampo('[cod_local] - [descricao]', 'E'); + + $stTableLocalAction = 'excluir'; + $stFunctionLocalJs = "ajaxJavaScript("OCManterConfiguracaoTipoSalario.php?cod_local=%s&cod_tipo=%s"; + $stFunctionLocalJs .= "","excluirFonteRecursoLocal")"; + + $obTableLocal->Body->addAcao($stTableLocalAction, $stFunctionLocalJs, array( 'cod_local', 'cod_tipo' ) ); + + $obTableLocal->montaHTML(true); + $stHTML = $stHTML."\n".$obTableLocal->getHtml(); + + echo $stHTML; + break; + + case "excluirFonteRecursoLotacao": + $arFonteRecursoLotacaoLocalSessao = Sessao::read('arFonteRecursoLotacaoLocal'); + + foreach ($arFonteRecursoLotacaoLocalSessao AS $arFonteRecursoLotacaoLocalTmp) { + if ($arFonteRecursoLotacaoLocalTmp['cod_tipo'] == $request->get('cod_tipo')) { + + if (count($arFonteRecursoLotacaoLocalTmp['lotacao']) == 1) { + echo "alertaAviso('@Não é possível deletar está lotação, pois ele é o única relacionada a esta classe/aplicação do salário do servidor.','form','erro','".Sessao::getId()."');"; + echo "jq('#inCodLocalDisponiveis').focus();"; + die; + } + + foreach ($arFonteRecursoLotacaoLocalTmp['lotacao'] AS $arLotacaoTmp) { + if ($arLotacaoTmp['cod_orgao'] != $request->get('cod_orgao')) { + $arLotacaoNovo[] = $arLotacaoTmp; + } + } + $arFonteRecursoLotacaoLocalTmp['lotacao'] = $arLotacaoNovo; + } + $arLotacaoNovoSessao[] = $arFonteRecursoLotacaoLocalTmp; + } + + echo "alertaAviso('Lotação excluida.','','info','".Sessao::getId()."');"; + echo "jq('#inCodLocalDisponiveis').focus();"; + + Sessao::write('arFonteRecursoLotacaoLocal', $arLotacaoNovoSessao); + $stJs = montaListaFonteRecursoServidor("mostrar"); + echo $stJs; + break; + + case "excluirFonteRecursoLocal": + $arFonteRecursoLotacaoLocalSessao = Sessao::read('arFonteRecursoLotacaoLocal'); + + foreach ($arFonteRecursoLotacaoLocalSessao AS $arFonteRecursoLotacaoLocalTmp) { + if ($arFonteRecursoLotacaoLocalTmp['cod_tipo'] == $request->get('cod_tipo')) { + + foreach ($arFonteRecursoLotacaoLocalTmp['local'] AS $arLocalTmp) { + if ($arLocalTmp['cod_local'] != $request->get('cod_local')) { + $arLocalNovo[] = $arLocalTmp; + } + } + $arFonteRecursoLotacaoLocalTmp['local'] = $arLocalNovo; + } + $arLocalNovoSessao[] = $arFonteRecursoLotacaoLocalTmp; + } + + echo "alertaAviso('Local excluido.','','info','".Sessao::getId()."');"; + echo "jq('#inCodLocalDisponiveis').focus();"; + + Sessao::write('arFonteRecursoLotacaoLocal', $arLocalNovoSessao); + $stJs = montaListaFonteRecursoServidor("mostrar"); + echo $stJs; + break; + + case "limparListaFonteRecursoServidor": + $stJs .= "JavaScript:passaItem('document.frm.inCodLotacaoSelecionados','document.frm.inCodLotacaoDisponiveis','tudo');"; + $stJs .= "JavaScript:passaItem('document.frm.inCodLocalSelecionados','document.frm.inCodLocalDisponiveis','tudo');"; + $stJs .= "jq('select#cmbFonteRecursoServidor').selectOptions('');"; + echo $stJs; + break; + + case "fonteRecursoExistentes": + $obTTCMBAFonteRecursoServidor = new TTCMBAFonteRecursoServidor(); + $obTTCMBAFonteRecursoServidor->setDado('cod_entidade', Sessao::read('cod_entidade')); + $obTTCMBAFonteRecursoServidor->setDado('exercicio' , Sessao::getExercicio()); + $obTTCMBAFonteRecursoServidor->recuperaFonteRecursoLotacaoLocal($rsRecursoLotacaoLocal); + + $inCounter = 0; + $arFonteRecursoLotacaoLocalSessao = array(); + + foreach ($rsRecursoLotacaoLocal->arElementos as $tipoFonte) { + + $obTTCMBAFonteRecursoLotacao = new TTCMBAFonteRecursoLotacao(); + $obTTCMBAFonteRecursoLotacao->setDado('cod_tipo_fonte' , $tipoFonte['cod_tipo_fonte']); + $obTTCMBAFonteRecursoLotacao->setDado('cod_entidade' , Sessao::read('cod_entidade')); + $obTTCMBAFonteRecursoLotacao->setDado('exercicio' , Sessao::getExercicio()); + $obTTCMBAFonteRecursoLotacao->recuperaFonteRecursoLotacaoSelecionado($rsFonteRecursoLotacao, ' ORDER BY cod_estrutural '); + + $obTTCMBAFonteRecursoLocal = new TTCMBAFonteRecursoLocal(); + $obTTCMBAFonteRecursoLocal->setDado('cod_tipo_fonte' , $tipoFonte['cod_tipo_fonte']); + $obTTCMBAFonteRecursoLocal->setDado('cod_entidade' , Sessao::read('cod_entidade')); + $obTTCMBAFonteRecursoLocal->setDado('exercicio' , Sessao::getExercicio()); + $obTTCMBAFonteRecursoLocal->recuperaFonteRecursoLocal($rsFonteRecursoLocal, ' ORDER BY cod_local '); + + $arFonteRecursoLotacaoLocalSessao[$inCounter]['id'] = $inCounter; + $arFonteRecursoLotacaoLocalSessao[$inCounter]['cod_tipo'] = $inCounter; + $arFonteRecursoLotacaoLocalSessao[$inCounter]['cod_tipo_fonte'] = $tipoFonte['cod_tipo_fonte']; + $arFonteRecursoLotacaoLocalSessao[$inCounter]['descricao'] = $tipoFonte['descricao']; + $arFonteRecursoLotacaoLocalSessao[$inCounter]['lotacao'] = $rsFonteRecursoLotacao->arElementos; + $arFonteRecursoLotacaoLocalSessao[$inCounter]['local'] = $rsFonteRecursoLocal->arElementos; + + $inCounter++; + } + + Sessao::write('arFonteRecursoLotacaoLocal', $arFonteRecursoLotacaoLocalSessao); + $stJs = montaListaFonteRecursoServidor("mostrar"); + + echo $stJs; + break; +} + +function montaListaFuncaoServidor($stAcao) +{ + if ($stAcao == "mostrar") { + if (count(Sessao::read('arFuncaoCargoServidor')) > 0) { + $rsFuncaoCargoServidor = new RecordSet; + $rsFuncaoCargoServidor->preenche(Sessao::read('arFuncaoCargoServidor')); + $rsFuncaoCargoServidor->setPrimeiroElemento(); + + $obTableTree = new TableTree; + $obTableTree->setArquivo ( 'OCManterConfiguracaoTipoSalario.php' ); + $obTableTree->setParametros ( array("cod_tipo") ); + $obTableTree->setComplementoParametros( "stCtrl=detalharListaCargoServidor" ); + $obTableTree->setRecordset ( $rsFuncaoCargoServidor ); + $obTableTree->setSummary ( 'Lista de Funções' ); + $obTableTree->setConditional ( true ); + $obTableTree->Head->AddCabecalho( 'Funções',50 ); + $obTableTree->Body->addCampo ( '[cod_tipo_funcao] - [descricao]', 'E' ); + $obTableTree->Body->addAcao ( 'excluir','executaFuncaoAjax(\'%s\',\'&inVlTipo=%s\')',array('excluirFuncaoServidorLista','cod_tipo') ); + $obTableTree->montaHTML ( true ); + $stHTML = $obTableTree->getHtml(); + + $stJs .= "d.getElementById('spnListaFuncaoServidor').innerHTML = '".$stHTML."';\n"; + } else { + $stJs .= "d.getElementById('spnListaFuncaoServidor').innerHTML = '';\n"; + } + + } else { //Incluir + $arFuncaoCargoServidorSessao = Sessao::read('arFuncaoCargoServidor'); + + for ($inFuncaoCargoServidor = 0; $inFuncaoCargoServidor < count($arFuncaoCargoServidorSessao); $inFuncaoCargoServidor++) { + $arElementos[] = $arFuncaoCargoServidorSessao[$inFuncaoCargoServidor]; + } + + $rsFuncaoCargoServidor = new RecordSet; + $rsFuncaoCargoServidor->preenche ( $arElementos ); + $rsFuncaoCargoServidor->setPrimeiroElemento(); + + $obTableTree = new TableTree; + $obTableTree->setArquivo ( 'OCManterConfiguracaoTipoSalario.php' ); + $obTableTree->setParametros ( array("cod_tipo") ); + $obTableTree->setComplementoParametros( "stCtrl=detalharListaCargoServidor" ); + $obTableTree->setRecordset ( $rsFuncaoCargoServidor ); + $obTableTree->setSummary ( 'Lista de Funções' ); + $obTableTree->setConditional ( true ); + $obTableTree->Head->addCabecalho( 'Funções',50 ); + $obTableTree->Body->addCampo ( '[cod_tipo_funcao] - [descricao]','E' ); + $obTableTree->Body->addAcao ( 'excluir','executaFuncaoAjax(\'%s\',\'&inVlTipo=%s\')',array('excluirFuncaoServidorLista','cod_tipo') ); + + $obTableTree->montaHTML(true); + $html = $obTableTree->getHtml(); + + $stJs .= "d.getElementById('spnListaFuncaoServidor').innerHTML = '".$html."';\n"; + } + + return $stJs; +} + +function montaListaFuncaoServidorTemporario($stAcao) +{ + if ($stAcao == "mostrar") { + if (count(Sessao::read('arFuncaoCargoServidorTemporario')) > 0) { + $rsFuncaoCargoServidorTemporario = new RecordSet; + $rsFuncaoCargoServidorTemporario->preenche(Sessao::read('arFuncaoCargoServidorTemporario')); + + $obTableTree = new TableTree; + $obTableTree->setArquivo ( 'OCManterConfiguracaoTipoSalario.php' ); + $obTableTree->setParametros ( array("cod_tipo") ); + $obTableTree->setComplementoParametros( "stCtrl=detalharListaCargoServidorTemporario" ); + $obTableTree->setRecordset ( $rsFuncaoCargoServidorTemporario ); + $obTableTree->setSummary ( 'Lista de Funções' ); + $obTableTree->setConditional ( true ); + $obTableTree->Head->AddCabecalho( 'Funções',50 ); + $obTableTree->Body->addCampo ( '[cod_tipo_funcao] - [descricao]', 'E' ); + $obTableTree->Body->addAcao ( 'excluir','executaFuncaoAjax(\'%s\',\'&inVlTipo=%s\')',array('excluirFuncaoServidorListaTemporario','cod_tipo') ); + $obTableTree->montaHTML ( true ); + $stHTML = $obTableTree->getHtml(); + + $rsFuncaoCargoServidorTemporario->setPrimeiroElemento(); + + $stJs .= "d.getElementById('spnListaFuncaoServidorTemporario').innerHTML = '".$stHTML."';\n"; + } else { + $stJs .= "d.getElementById('spnListaFuncaoServidorTemporario').innerHTML = '';\n"; + } + + } else { //Incluir + $arFuncaoCargoServidorSessaoTemporario = Sessao::read('arFuncaoCargoServidorTemporario'); + + for ($inFuncaoCargoServidor = 0; $inFuncaoCargoServidor < count($arFuncaoCargoServidorSessaoTemporario); $inFuncaoCargoServidor++) { + $arElementos[] = $arFuncaoCargoServidorSessaoTemporario[$inFuncaoCargoServidor]; + } + + $rsFuncaoCargoServidorTemporario = new RecordSet; + $rsFuncaoCargoServidorTemporario->preenche ( $arElementos ); + $rsFuncaoCargoServidorTemporario->setPrimeiroElemento(); + + $obTableTree = new TableTree; + $obTableTree->setArquivo ( 'OCManterConfiguracaoTipoSalario.php' ); + $obTableTree->setParametros ( array("cod_tipo") ); + $obTableTree->setComplementoParametros( "stCtrl=detalharListaCargoServidorTemporario" ); + $obTableTree->setRecordset ( $rsFuncaoCargoServidorTemporario ); + $obTableTree->setSummary ( 'Lista de Funções' ); + $obTableTree->setConditional ( true ); + $obTableTree->Head->addCabecalho( 'Funções',50 ); + $obTableTree->Body->addCampo ( '[cod_tipo_funcao] - [descricao]','E' ); + $obTableTree->Body->addAcao ( 'excluir','executaFuncaoAjax(\'%s\',\'&inVlTipo=%s\')',array('excluirFuncaoServidorListaTemporario','cod_tipo') ); + + $obTableTree->montaHTML(true); + $html = $obTableTree->getHtml(); + + $stJs .= "d.getElementById('spnListaFuncaoServidorTemporario').innerHTML = '".$html."';\n"; + } + + return $stJs; +} + +function montaListaBancoEmprestimo($stAcao) +{ + if ($stAcao == "mostrar") { + if (count(Sessao::read('arBancoEventosEmprestimo')) > 0) { + $rsBancoEventosEmprestimo = new RecordSet; + $rsBancoEventosEmprestimo->preenche(Sessao::read('arBancoEventosEmprestimo')); + $rsBancoEventosEmprestimo->setPrimeiroElemento(); + + $obTableTree = new TableTree; + $obTableTree->setArquivo ( 'OCManterConfiguracaoTipoSalario.php' ); + $obTableTree->setParametros ( array("cod_tipo") ); + $obTableTree->setComplementoParametros( "stCtrl=detalharListaEventosEmprestimo" ); + $obTableTree->setRecordset ( $rsBancoEventosEmprestimo ); + $obTableTree->setSummary ( 'Lista de Códigos de Compensação' ); + $obTableTree->setConditional ( true ); + $obTableTree->Head->AddCabecalho( 'Empréstimos Consignados',50 ); + $obTableTree->Body->addCampo ( '[num_banco] - [nom_banco]', 'E' ); + $obTableTree->Body->addAcao ( 'excluir','executaFuncaoAjax(\'%s\',\'&inVlTipo=%s\')',array('excluirBancoEmprestimoLista','cod_tipo') ); + $obTableTree->montaHTML ( true ); + $stHTML = $obTableTree->getHtml(); + + $stJs .= "d.getElementById('spnListaBancoEmprestimo').innerHTML = '".$stHTML."';\n"; + } else { + $stJs .= "d.getElementById('spnListaBancoEmprestimo').innerHTML = '';\n"; + } + + } else { //Incluir + $arBancoEventosEmprestimoSessao = Sessao::read('arBancoEventosEmprestimo'); + + for ($inFuncaoCargoServidor = 0; $inFuncaoCargoServidor < count($arBancoEventosEmprestimoSessao); $inFuncaoCargoServidor++) { + $arElementos[] = $arBancoEventosEmprestimoSessao[$inFuncaoCargoServidor]; + } + + $rsBancoEventosEmprestimo = new RecordSet; + $rsBancoEventosEmprestimo->preenche ( $arElementos ); + $rsBancoEventosEmprestimo->setPrimeiroElemento(); + + $obTableTree = new TableTree; + $obTableTree->setArquivo ( 'OCManterConfiguracaoTipoSalario.php' ); + $obTableTree->setParametros ( array("cod_tipo") ); + $obTableTree->setComplementoParametros( "stCtrl=detalharListaEventosEmprestimo" ); + $obTableTree->setRecordset ( $rsBancoEventosEmprestimo ); + $obTableTree->setSummary ( 'Lista de Códigos de Compensação' ); + $obTableTree->setConditional ( true ); + $obTableTree->Head->addCabecalho( 'Empréstimos Consignados',50 ); + $obTableTree->Body->addCampo ( '[num_banco] - [nom_banco]', 'E' ); + $obTableTree->Body->addAcao ( 'excluir','executaFuncaoAjax(\'%s\',\'&inVlTipo=%s\')',array('excluirBancoEmprestimoLista','cod_tipo') ); + + $obTableTree->montaHTML(true); + $html = $obTableTree->getHtml(); + + $stJs .= "d.getElementById('spnListaBancoEmprestimo').innerHTML = '".$html."';\n"; + } + + return $stJs; +} + +function montaListaFonteRecursoServidor($stAcao) +{ + if ($stAcao == "mostrar") { + if (count(Sessao::read('arFonteRecursoLotacaoLocal')) > 0) { + $rsFonteRecursoLotacaoLocalServidor = new RecordSet; + $rsFonteRecursoLotacaoLocalServidor->preenche(Sessao::read('arFonteRecursoLotacaoLocal')); + $rsFonteRecursoLotacaoLocalServidor->setPrimeiroElemento(); + + $obTableTree = new TableTree; + $obTableTree->setArquivo ( 'OCManterConfiguracaoTipoSalario.php' ); + $obTableTree->setParametros ( array("cod_tipo") ); + $obTableTree->setComplementoParametros( "stCtrl=detalharFonteRecursoServidor" ); + $obTableTree->setRecordset ( $rsFonteRecursoLotacaoLocalServidor ); + $obTableTree->setSummary ( 'Lista de Classe/Aplicação do Salário do Servidor' ); + $obTableTree->setConditional ( true ); + $obTableTree->Head->AddCabecalho( 'Classes/Aplicações',50 ); + $obTableTree->Body->addCampo ( '[cod_tipo_fonte] - [descricao]', 'E' ); + $obTableTree->Body->addAcao ( 'excluir','executaFuncaoAjax(\'%s\',\'&inVlTipo=%s\')',array('excluirFonteRecursoLista','cod_tipo') ); + $obTableTree->montaHTML ( true ); + $stHTML = $obTableTree->getHtml(); + + $stJs .= "d.getElementById('spnListaFonteRecursoServidor').innerHTML = '".$stHTML."';\n"; + } else { + $stJs .= "d.getElementById('spnListaFonteRecursoServidor').innerHTML = '';\n"; + } + + } else { //Incluir + $arFonteRecursoLotacaoLocalSessao = Sessao::read('arFonteRecursoLotacaoLocal'); + + for ($inFonteRecursoLotacaoLocal = 0; $inFonteRecursoLotacaoLocal < count($arFonteRecursoLotacaoLocalSessao); $inFonteRecursoLotacaoLocal++) { + $arElementos[] = $arFonteRecursoLotacaoLocalSessao[$inFonteRecursoLotacaoLocal]; + } + + $rsFonteRecursoLotacaoLocalServidor = new RecordSet; + $rsFonteRecursoLotacaoLocalServidor->preenche ( $arElementos ); + $rsFonteRecursoLotacaoLocalServidor->setPrimeiroElemento(); + + $obTableTree = new TableTree; + $obTableTree->setArquivo ( 'OCManterConfiguracaoTipoSalario.php' ); + $obTableTree->setParametros ( array("cod_tipo") ); + $obTableTree->setComplementoParametros( "stCtrl=detalharFonteRecursoServidor" ); + $obTableTree->setRecordset ( $rsFonteRecursoLotacaoLocalServidor ); + $obTableTree->setSummary ( 'Lista de Classe/Aplicação do Salário do Servidor' ); + $obTableTree->setConditional ( true ); + $obTableTree->Head->addCabecalho( 'Classes/Aplicações',50 ); + $obTableTree->Body->addCampo ( '[cod_tipo_fonte] - [descricao]','E' ); + $obTableTree->Body->addAcao ( 'excluir','executaFuncaoAjax(\'%s\',\'&inVlTipo=%s\')',array('excluirFonteRecursoLista','cod_tipo') ); + + $obTableTree->montaHTML(true); + $html = $obTableTree->getHtml(); + + $stJs .= "d.getElementById('spnListaFonteRecursoServidor').innerHTML = '".$html."';\n"; + } + + return $stJs; +} + +?> \ No newline at end of file diff --git a/gestaoPrestacaoContas/fontes/PHP/TCMBA/instancias/configuracao/PRManterConfiguracaoObrasServicos.php b/gestaoPrestacaoContas/fontes/PHP/TCMBA/instancias/configuracao/PRManterConfiguracaoObrasServicos.php index ab16161..e538b5d 100644 --- a/gestaoPrestacaoContas/fontes/PHP/TCMBA/instancias/configuracao/PRManterConfiguracaoObrasServicos.php +++ b/gestaoPrestacaoContas/fontes/PHP/TCMBA/instancias/configuracao/PRManterConfiguracaoObrasServicos.php @@ -29,7 +29,7 @@ * @author Analista Dagiane Vieira * @author Desenvolvedor Michel Teixeira * - * $Id: PRManterConfiguracaoObrasServicos.php 63632 2015-09-22 17:42:03Z michel $ + * $Id: PRManterConfiguracaoObrasServicos.php 63809 2015-10-19 16:52:56Z lisiane $ */ include_once '../../../../../../gestaoAdministrativa/fontes/PHP/pacotes/FrameworkHTML.inc.php'; @@ -164,6 +164,7 @@ if(!$obErro->ocorreu()){ $obTTCMBAObraMedicao->setDado("cod_medida" , $value['inCodMedidaObra'] ); $obTTCMBAObraMedicao->setDado("data_inicio" , $value['dtInicioMedicao'] ); $obTTCMBAObraMedicao->setDado("data_final" , $value['dtFinalMedicao'] ); + $obTTCMBAObraMedicao->setDado("data_medicao" , $value['dtMedicao'] ); $obTTCMBAObraMedicao->setDado("vl_medicao" , $value['nuVlMedicao'] ); $obTTCMBAObraMedicao->setDado("nro_nota_fiscal" , $value['stNFMedicao'] ); $obTTCMBAObraMedicao->setDado("data_nota_fiscal" , $value['dtNFMedicao'] ); @@ -333,6 +334,7 @@ if(!$obErro->ocorreu()){ $obTTCMBAObraMedicao->setDado("cod_medida" , $value['inCodMedidaObra'] ); $obTTCMBAObraMedicao->setDado("data_inicio" , $value['dtInicioMedicao'] ); $obTTCMBAObraMedicao->setDado("data_final" , $value['dtFinalMedicao'] ); + $obTTCMBAObraMedicao->setDado("data_medicao" , $value['dtMedicao'] ); $obTTCMBAObraMedicao->setDado("vl_medicao" , $value['nuVlMedicao'] ); $obTTCMBAObraMedicao->setDado("nro_nota_fiscal" , $value['stNFMedicao'] ); $obTTCMBAObraMedicao->setDado("data_nota_fiscal" , $value['dtNFMedicao'] ); diff --git a/gestaoPrestacaoContas/fontes/PHP/TCMBA/instancias/configuracao/PRManterConfiguracaoParcSubvOSCIP.php b/gestaoPrestacaoContas/fontes/PHP/TCMBA/instancias/configuracao/PRManterConfiguracaoParcSubvOSCIP.php new file mode 100644 index 0000000..12d1d13 --- /dev/null +++ b/gestaoPrestacaoContas/fontes/PHP/TCMBA/instancias/configuracao/PRManterConfiguracaoParcSubvOSCIP.php @@ -0,0 +1,216 @@ + +abreTransacao($boFlagTransacao, $boTransacao); + +if($request->get('stAcao') == 'configurar'){ + $stAcao = 'configurar'; + $rsTermoParcerias = new RecordSet(); + $rsTermoParceriaDotacao = new RecordSet(); + + if ($request->get('stExercicioProcesso') == "") { + $stExercicioProcesso = $request->get('hdnExercicioProcesso'); + } else { + $stExercicioProcesso = $request->get('stExercicioProcesso'); + } + + $arDotacoes = Sessao::read("arDotacoes"); + + if(count($arDotacoes) > 0 && !$obErro->ocorreu()){ + /** + * REMOVE TODAS AS DOTAÇÕES DO TERMO DE PARCERIA + */ + //Verificando se houve alteração na chave nro_processo + if ( trim($request->get('stHdnNumeroProcessoAnterior')) != trim($request->get('stNumeroProcesso')) ) { + $stNumeroProcesso = trim($request->get('stHdnNumeroProcessoAnterior')); + }else{ + $stNumeroProcesso = trim($request->get('stNumeroProcesso')); + } + $obTTCMBATermoParceriaDotacao = new TTCMBATermoParceriaDotacao(); + $obTTCMBATermoParceriaDotacao->setDado('exercicio' , $stExercicioProcesso ); + $obTTCMBATermoParceriaDotacao->setDado('cod_entidade', $request->get('inCodEntidade') ); + $obTTCMBATermoParceriaDotacao->setDado('nro_processo', $stNumeroProcesso ); + $obErro = $obTTCMBATermoParceriaDotacao->recuperaPorChave($rsTermoParceriaDotacao,$boTransacao); + + if(!$obErro->ocorreu() && $rsTermoParceriaDotacao->getNumLinhas() > 0){ + $obErro = $obTTCMBATermoParceriaDotacao->exclusao($boTransacao); + } + } else { + $obErro->setDescricao("É necessário preencher ao menos uma Dotação, para o Termo de Parceria."); + } + + if( !$obErro->ocorreu() ){ + //Verificando se houve alteração na chave nro_processo + if ( trim($request->get('stHdnNumeroProcessoAnterior')) != trim($request->get('stNumeroProcesso')) ) { + $obTTCMBATermoParceria = new TTCMBATermoParceria(); + $obTTCMBATermoParceria->setDado('exercicio' , $stExercicioProcesso ); + $obTTCMBATermoParceria->setDado('cod_entidade' , $request->get('inCodEntidade') ); + $obTTCMBATermoParceria->setDado('nro_processo' , trim($request->get('stHdnNumeroProcessoAnterior')) ); + $obErro = $obTTCMBATermoParceria->recuperaPorChave($rsTermoParceriaAnterior,$boTransacao); + + if ($rsTermoParceriaAnterior->getNumLinhas() > 0 && !$obErro->ocorreu() ) { + $obErro = $obTTCMBATermoParceria->exclusao($boTransacao); + } + } + + if ( !$obErro->ocorreu() ) { + //Insere os novos dados ou realiza a alteração + $obTTCMBATermoParceria->setDado('exercicio' , $stExercicioProcesso); + $obTTCMBATermoParceria->setDado('cod_entidade' , $request->get('inCodEntidade')); + $obTTCMBATermoParceria->setDado('nro_processo' , trim($request->get('stNumeroProcesso'))); + $obTTCMBATermoParceria->setDado('dt_assinatura' , $request->get('stDtAssinatura')); + $obTTCMBATermoParceria->setDado('dt_publicacao' , $request->get('stDtPublicacao')); + $obTTCMBATermoParceria->setDado('imprensa_oficial' , $request->get('stImprensaOficial')); + $obTTCMBATermoParceria->setDado('dt_inicio' , $request->get('stDtInicioTermo')); + $obTTCMBATermoParceria->setDado('dt_termino' , $request->get('stDtTerminoTermo')); + $obTTCMBATermoParceria->setDado('numcgm' , $request->get('inCGMParceria')); + $obTTCMBATermoParceria->setDado('processo_licitatorio', $request->get('stProcessoLicitatorio')); + $obTTCMBATermoParceria->setDado('processo_dispensa' , $request->get('stProcessoDispensa')); + $obTTCMBATermoParceria->setDado('objeto' , $request->get('txtObjeto')); + $obTTCMBATermoParceria->setDado('nro_processo_mj' , $request->get('stProcessoMJ')); + $obTTCMBATermoParceria->setDado('dt_processo_mj' , $request->get('dtProcessoMJ')); + $obTTCMBATermoParceria->setDado('dt_publicacao_mj' , $request->get('dtPublicacaoMJ')); + $obTTCMBATermoParceria->setDado('vl_parceiro_publico' , $request->get('vlParceiroPublico')); + $obTTCMBATermoParceria->setDado('vl_termo_parceria' , $request->get('vlParceiroOSCIP')); + $obErro = $obTTCMBATermoParceria->recuperaPorChave($rsTermoParcerias,$boTransacao); + + if( $rsTermoParcerias->getNumLinhas() < 0 && !$obErro->ocorreu() ){ + $obErro = $obTTCMBATermoParceria->inclusao($boTransacao); + } + } + } + + if(count($arDotacoes) > 0 && !$obErro->ocorreu()){ + /** + * INCLUINDO TODAS AS DOTAÇÕES DO TERMO DE PARCERIA + */ + foreach($arDotacoes AS $arDotacao){ + $obTTCMBATermoParceriaDotacao->setDado('exercicio' , $stExercicioProcesso ); + $obTTCMBATermoParceriaDotacao->setDado('cod_entidade', $request->get('inCodEntidade') ); + $obTTCMBATermoParceriaDotacao->setDado('nro_processo', $request->get('stNumeroProcesso') ); + $obTTCMBATermoParceriaDotacao->setDado('exercicio_despesa', $arDotacao['exercicio_despesa']); + $obTTCMBATermoParceriaDotacao->setDado('cod_despesa' , $arDotacao['cod_despesa']); + $obErro = $obTTCMBATermoParceriaDotacao->inclusao($boTransacao); + + if($obErro->ocorreu()) + break; + } + } + + if(!$obErro->ocorreu()){ + SistemaLegado::alertaAviso($pgForm."?stAcao=".$request->get('stAcao')."&inCodEntidade=".$request->get('inCodEntidade'), $request->get('stNumeroProcesso').'/'.$stExercicioProcesso, 'incluir', "aviso", Sessao::getId(), "../"); + Sessao::remove("arTermoParcerias"); + Sessao::remove("arDotacoes"); + $obTransacao->fechaTransacao($boFlagTransacao, $boTransacao, $obErro, $obTTCMBATermoParceria); + } else { + SistemaLegado::LiberaFrames(true,true); + SistemaLegado::exibeAviso(urlencode($obErro->getDescricao()),"n_incluir","erro"); + } + +} else if($request->get('stAcao') == 'excluirTermoParceria') { + $arTermoParcerias = Sessao::read("arTermoParcerias"); + $stNroProcesso = ""; + foreach($arTermoParcerias AS $arTermoParceria){ + if($arTermoParceria["inId"] == $request->get('inId')){ + + $stNroProcesso = trim($arTermoParceria['nro_processo']).'/'.$arTermoParceria['exercicio']; + + $obTTCMBATermoParceriaProrrogacao = new TTCMBATermoParceriaProrrogacao(); + $obTTCMBATermoParceriaProrrogacao->setDado('exercicio' , $arTermoParceria['exercicio']); + $obTTCMBATermoParceriaProrrogacao->setDado('cod_entidade', $arTermoParceria['cod_entidade']); + $obTTCMBATermoParceriaProrrogacao->setDado('nro_processo', trim($arTermoParceria['nro_processo'])); + $obErro = $obTTCMBATermoParceriaProrrogacao->recuperaPorChave($rsTermoParceriaProrrogacao, $boTransacao); + + if(!$obErro->ocorreu() && $rsTermoParceriaProrrogacao->getNumLinhas() > 0){ + $obErro->setDescricao("Esse Termo de Parceria já possui Prorrogações cadastradas."); + } + + if(!$obErro->ocorreu()){ + $obTTCMBATermoParceriaDotacao = new TTCMBATermoParceriaDotacao(); + $obTTCMBATermoParceriaDotacao->setDado('exercicio' , $arTermoParceria['exercicio']); + $obTTCMBATermoParceriaDotacao->setDado('cod_entidade', $arTermoParceria['cod_entidade']); + $obTTCMBATermoParceriaDotacao->setDado('nro_processo', trim($arTermoParceria['nro_processo'])); + $obErro = $obTTCMBATermoParceriaDotacao->recuperaPorChave($rsTermoParceriaDotacao, $boTransacao); + } + + if(!$obErro->ocorreu() && $rsTermoParceriaDotacao->getNumLinhas() > 0){ + $obErro = $obTTCMBATermoParceriaDotacao->exclusao($boTransacao); + } + + if(!$obErro->ocorreu()){ + $obTTCMBATermoParceria = new TTCMBATermoParceria(); + $obTTCMBATermoParceria->setDado('exercicio' , $arTermoParceria['exercicio']); + $obTTCMBATermoParceria->setDado('cod_entidade', $arTermoParceria['cod_entidade']); + $obTTCMBATermoParceria->setDado('nro_processo', trim($arTermoParceria['nro_processo'])); + $obErro = $obTTCMBATermoParceria->recuperaPorChave($rsTermoParceria, $boTransacao); + } + if(!$obErro->ocorreu() && $rsTermoParceria->getNumLinhas() > 0){ + $obErro = $obTTCMBATermoParceria->exclusao($boTransacao); + } + } + } + if(!$obErro->ocorreu()){ + SistemaLegado::alertaAviso($pgForm."?stAcao=".$request->get('stAcao')."&inCodEntidade=".$request->get('inCodEntidade'), "Exclusao do Termo de Parceria '".$stNroProcesso."'! ", 'excluir', "aviso", Sessao::getId(), "../"); + Sessao::remove("arTermoParcerias"); + Sessao::remove("arDotacoes"); + + $obTransacao->fechaTransacao($boFlagTransacao, $boTransacao, $obErro, $obTTCMBATermoParceria); + + } else { + SistemaLegado::exibeAviso(urlencode($obErro->getDescricao()),"n_excluir","sn"); + } +} + +?> \ No newline at end of file diff --git a/gestaoPrestacaoContas/fontes/PHP/TCMBA/instancias/configuracao/PRManterConfiguracaoProrrogacaoTermo.php b/gestaoPrestacaoContas/fontes/PHP/TCMBA/instancias/configuracao/PRManterConfiguracaoProrrogacaoTermo.php new file mode 100644 index 0000000..b39861b --- /dev/null +++ b/gestaoPrestacaoContas/fontes/PHP/TCMBA/instancias/configuracao/PRManterConfiguracaoProrrogacaoTermo.php @@ -0,0 +1,106 @@ + +abreTransacao($boFlagTransacao, $boTransacao); + +if($request->get('stAcao') == 'configurar'){ + $arProrrogacoes = Sessao::read("arProrrogacoes"); + + if(!is_array($arProrrogacoes)) { + $arProrrogacoes = array(); + } + + if(count($arProrrogacoes) > 0 && !$obErro->ocorreu()){ + /** + * REMOVE TODAS AS PRORROGAÇÔES DO TERMO DE PARCERIA + */ + $obTTCMBATermoParceriaProrrogacao = new TTCMBATermoParceriaProrrogacao(); + $obTTCMBATermoParceriaProrrogacao->setDado('exercicio' , $request->get('stExercicioProcesso')); + $obTTCMBATermoParceriaProrrogacao->setDado('cod_entidade', $request->get('inCodEntidade')); + $obTTCMBATermoParceriaProrrogacao->setDado('nro_processo', trim($request->get('stNumeroProcesso'))); + $obErro = $obTTCMBATermoParceriaProrrogacao->recuperaPorChave($rsTermoParceriaProrrogacao, $boTransacao); + + if(!$obErro->ocorreu() && $rsTermoParceriaProrrogacao->getNumLinhas() > 0){ + $obErro = $obTTCMBATermoParceriaProrrogacao->exclusao($boTransacao); + } + + /** + * INCLUINDO TODAS AS PRORROGAÇÔES DO TERMO DE PARCERIA + */ + foreach($arProrrogacoes AS $arProrrogacao){ + $obTTCMBATermoParceriaProrrogacao->setDado('nro_termo_aditivo' , $arProrrogacao['numeroTermoAditivo']); + $obTTCMBATermoParceriaProrrogacao->setDado('exercicio_aditivo' , $arProrrogacao['exercicioTermoAditivo']); + $obTTCMBATermoParceriaProrrogacao->setDado('dt_prorrogacao' , $arProrrogacao['dataProrrogacao']); + $obTTCMBATermoParceriaProrrogacao->setDado('dt_publicacao' , $arProrrogacao['dataPublicacao']); + $obTTCMBATermoParceriaProrrogacao->setDado('imprensa_oficial' , $arProrrogacao['imprensaOficial']); + $obTTCMBATermoParceriaProrrogacao->setDado('indicador_adimplemento', $arProrrogacao['boIndicadorAdimplemento']); + $obTTCMBATermoParceriaProrrogacao->setDado('dt_inicio' , $arProrrogacao['dataInicio']); + $obTTCMBATermoParceriaProrrogacao->setDado('dt_termino' , $arProrrogacao['dataTermino']); + $obTTCMBATermoParceriaProrrogacao->setDado('vl_prorrogacao' , $arProrrogacao['valorProrrogacao']); + $obErro = $obTTCMBATermoParceriaProrrogacao->inclusao($boTransacao); + + if($obErro->ocorreu()) + break; + } + } + + if(!$obErro->ocorreu()){ + SistemaLegado::alertaAviso($pgFilt."?stAcao=".$request->get('stAcao')."&inCodEntidade=".$request->get('inCodEntidade'), $request->get('stNumeroProcesso').'/'.$request->get('stExercicioProcesso'), 'incluir', "aviso", Sessao::getId(), "../"); + Sessao::remove("arProrrogacoes"); + + $obTransacao->fechaTransacao($boFlagTransacao, $boTransacao, $obErro, $obTTCMBATermoParceria); + } else { + SistemaLegado::exibeAviso(urlencode($obErro->getDescricao()),"n_incluir","erro"); + } + +} +?> \ No newline at end of file diff --git a/gestaoPrestacaoContas/fontes/PHP/TCMBA/instancias/configuracao/PRManterConfiguracaoTipoSalario.php b/gestaoPrestacaoContas/fontes/PHP/TCMBA/instancias/configuracao/PRManterConfiguracaoTipoSalario.php new file mode 100644 index 0000000..2964bbd --- /dev/null +++ b/gestaoPrestacaoContas/fontes/PHP/TCMBA/instancias/configuracao/PRManterConfiguracaoTipoSalario.php @@ -0,0 +1,368 @@ + +get('stAcao'); + +switch ($stAcao) { + case 'configurar' : + + $obErro = $obTransacao->abreTransacao($boFlagTransacao, $boTransacao); + + if (!$obErro->ocorreu()) { + + /*** Tipo Função Servidor ***/ + $arFuncaoCargoServidorSessao = Sessao::read('arFuncaoCargoServidor'); + + $obTTCMBACargoServidor = new TTCMBACargoServidor(); + $obTTCMBACargoServidor->setDado('exercicio' , Sessao::getExercicio()); + $obTTCMBACargoServidor->setDado('cod_entidade', $request->get('inCodEntidade')); + $obErro = $obTTCMBACargoServidor->exclusao($boTransacao); + + if (!$obErro->ocorreu()) { + if( is_array($arFuncaoCargoServidorSessao) ){ + foreach ($arFuncaoCargoServidorSessao as $arFuncaoCargoServidorSessaoTmp) { + foreach ($arFuncaoCargoServidorSessaoTmp["cargos"] as $arCargoSelecionado) { + $obTTCMBACargoServidor->setDado('cod_tipo_funcao' , $arFuncaoCargoServidorSessaoTmp["cod_tipo_funcao"]); + $obTTCMBACargoServidor->setDado('cod_cargo' , $arCargoSelecionado["cod_cargo"]); + $obErro = $obTTCMBACargoServidor->inclusao($boTransacao); + if ( $obErro->ocorreu() ) { + SistemaLegado::exibeAviso(urlencode($obErro->getDescricao()),"n_incluir","erro"); + break; + } + } + } + } + } else { + SistemaLegado::exibeAviso(urlencode($obErro->getDescricao()),"n_incluir","erro"); + } + + /*** Tipo Função Servidor Temporario ***/ + $arFuncaoCargoServidorTemporarioSessao = Sessao::read('arFuncaoCargoServidorTemporario'); + + $obTTCMBACargoServidorTemporario = new TTCMBACargoServidorTemporario(); + $obTTCMBACargoServidorTemporario->setDado('exercicio' , Sessao::getExercicio()); + $obTTCMBACargoServidorTemporario->setDado('cod_entidade', $request->get('inCodEntidade')); + $obErro = $obTTCMBACargoServidorTemporario->exclusao($boTransacao); + + if (!$obErro->ocorreu()) { + if( is_array($arFuncaoCargoServidorTemporarioSessao) ) { + foreach ($arFuncaoCargoServidorTemporarioSessao as $arFuncaoCargoServidorSessaoTemporarioTmp) { + foreach ($arFuncaoCargoServidorSessaoTemporarioTmp["cargos"] as $arCargoSelecionado) { + $obTTCMBACargoServidorTemporario->setDado('cod_tipo_funcao' , $arFuncaoCargoServidorSessaoTemporarioTmp["cod_tipo_funcao"]); + $obTTCMBACargoServidorTemporario->setDado('cod_cargo' , $arCargoSelecionado["cod_cargo"]); + $obErro = $obTTCMBACargoServidorTemporario->inclusao($boTransacao); + if ( $obErro->ocorreu() ) { + SistemaLegado::exibeAviso(urlencode($obErro->getDescricao()),"n_incluir","erro"); + break; + } + } + } + } + } else { + SistemaLegado::exibeAviso(urlencode($obErro->getDescricao()),"n_incluir","erro"); + } + + /*** Bancos Emprestimos ***/ + $arBancoEventosEmprestimoSessao = Sessao::read('arBancoEventosEmprestimo'); + + $obTTCMBAEmprestimoConsignado = new TTCMBAEmprestimoConsignado(); + $obTTCMBAEmprestimoConsignado->setDado('exercicio' , Sessao::getExercicio()); + $obTTCMBAEmprestimoConsignado->setDado('cod_entidade', $request->get('inCodEntidade')); + $obErro = $obTTCMBAEmprestimoConsignado->exclusao($boTransacao); + + if (!$obErro->ocorreu()) { + if ( is_array($arBancoEventosEmprestimoSessao) ) { + foreach ($arBancoEventosEmprestimoSessao as $arBancoEventosEmprestimoSessaoTmp) { + foreach ($arBancoEventosEmprestimoSessaoTmp["eventos"] as $arEventoSelecionado) { + $obTTCMBAEmprestimoConsignado->setDado('cod_banco' , $arBancoEventosEmprestimoSessaoTmp["cod_banco"]); + $obTTCMBAEmprestimoConsignado->setDado('cod_evento' , $arEventoSelecionado["cod_evento"]); + $obErro = $obTTCMBAEmprestimoConsignado->inclusao($boTransacao); + if ( $obErro->ocorreu() ) { + SistemaLegado::exibeAviso(urlencode($obErro->getDescricao()),"n_incluir","erro"); + break; + } + } + } + } + } else { + SistemaLegado::exibeAviso(urlencode($obErro->getDescricao()),"n_incluir","erro"); + } + + /*** Salário Base ***/ + $arSalarioBaseSelecionados = $request->get('arSalarioBaseSelecionados'); + + $obTTCMBASalarioBase = new TTCMBASalarioBase(); + $obTTCMBASalarioBase->setDado('exercicio' , Sessao::getExercicio()); + $obTTCMBASalarioBase->setDado('cod_entidade', $request->get('inCodEntidade')); + $obErro = $obTTCMBASalarioBase->exclusao($boTransacao); + + if (!$obErro->ocorreu()) { + if ( isset($arSalarioBaseSelecionados) ) { + foreach ($arSalarioBaseSelecionados as $arSalarioBaseValor) { + $obTTCMBASalarioBase->setDado('cod_evento', $arSalarioBaseValor); + $obErro = $obTTCMBASalarioBase->inclusao($boTransacao); + if ( $obErro->ocorreu() ) { + SistemaLegado::exibeAviso(urlencode($obErro->getDescricao()),"n_incluir","erro"); + break; + } + } + } + } else { + SistemaLegado::exibeAviso(urlencode($obErro->getDescricao()),"n_incluir","erro"); + } + + /*** Demais Vantagens Salariais ***/ + $arVantagensSalariaisSelecionados = $request->get('arVantagensSalariaisSelecionados'); + + $obTTCMBAVantagensSalariais = new TTCMBAVantagensSalariais(); + $obTTCMBAVantagensSalariais->setDado('exercicio' , Sessao::getExercicio()); + $obTTCMBAVantagensSalariais->setDado('cod_entidade', $request->get('inCodEntidade')); + $obErro = $obTTCMBAVantagensSalariais->exclusao($boTransacao); + + if (!$obErro->ocorreu()) { + if ( isset($arVantagensSalariaisSelecionados) ) { + foreach ($arVantagensSalariaisSelecionados as $arVantagensSalariais) { + $obTTCMBAVantagensSalariais->setDado('cod_evento', $arVantagensSalariais); + $obErro = $obTTCMBAVantagensSalariais->inclusao($boTransacao); + if ( $obErro->ocorreu() ) { + SistemaLegado::exibeAviso(urlencode($obErro->getDescricao()),"n_incluir","erro"); + break; + } + } + } + } else { + SistemaLegado::exibeAviso(urlencode($obErro->getDescricao()),"n_incluir","erro"); + } + + /*** Gratificação de função ***/ + $arGratificacaoFuncaoSelecionados = $request->get('arGratificacaoFuncaoSelecionados'); + + $obTTCMBAGratificacaoFuncao = new TTCMBAGratificacaoFuncao(); + $obTTCMBAGratificacaoFuncao->setDado('exercicio' , Sessao::getExercicio()); + $obTTCMBAGratificacaoFuncao->setDado('cod_entidade', $request->get('inCodEntidade')); + $obErro = $obTTCMBAGratificacaoFuncao->exclusao($boTransacao); + + if (!$obErro->ocorreu()) { + if ( isset($arGratificacaoFuncaoSelecionados) ) { + foreach ($arGratificacaoFuncaoSelecionados as $arGratificacaoFuncao) { + $obTTCMBAGratificacaoFuncao->setDado('cod_evento', $arGratificacaoFuncao); + $obErro = $obTTCMBAGratificacaoFuncao->inclusao($boTransacao); + if ( $obErro->ocorreu() ) { + SistemaLegado::exibeAviso(urlencode($obErro->getDescricao()),"n_incluir","erro"); + break; + } + } + } + } else { + SistemaLegado::exibeAviso(urlencode($obErro->getDescricao()),"n_incluir","erro"); + } + + /*** Salário Família ***/ + $arSalarioFamiliaSelecionados = $request->get('arSalarioFamiliaSelecionados'); + + $obTTCMBASalarioFamilia = new TTCMBASalarioFamilia(); + $obTTCMBASalarioFamilia->setDado('exercicio' , Sessao::getExercicio()); + $obTTCMBASalarioFamilia->setDado('cod_entidade', $request->get('inCodEntidade')); + $obErro = $obTTCMBASalarioFamilia->exclusao($boTransacao); + + if (!$obErro->ocorreu()) { + if ( isset($arSalarioFamiliaSelecionados) ) { + foreach ($arSalarioFamiliaSelecionados as $arSalarioFamilia) { + $obTTCMBASalarioFamilia->setDado('cod_evento', $arSalarioFamilia); + $obErro = $obTTCMBASalarioFamilia->inclusao($boTransacao); + if ( $obErro->ocorreu() ) { + SistemaLegado::exibeAviso(urlencode($obErro->getDescricao()),"n_incluir","erro"); + break; + } + } + } + } else { + SistemaLegado::exibeAviso(urlencode($obErro->getDescricao()),"n_incluir","erro"); + } + + /*** Horas Extras trabalhadas ***/ + $arHorasExtrasSelecionados = $request->get('arHorasExtrasSelecionados'); + + $obTTCMBASalarioHorasExtras = new TTCMBASalarioHorasExtras(); + $obTTCMBASalarioHorasExtras->setDado('exercicio' , Sessao::getExercicio()); + $obTTCMBASalarioHorasExtras->setDado('cod_entidade', $request->get('inCodEntidade')); + $obErro = $obTTCMBASalarioHorasExtras->exclusao($boTransacao); + + if (!$obErro->ocorreu()) { + if ( isset($arHorasExtrasSelecionados) ) { + foreach ($arHorasExtrasSelecionados as $arHorasExtras) { + $obTTCMBASalarioHorasExtras->setDado('cod_evento', $arHorasExtras); + $obErro = $obTTCMBASalarioHorasExtras->inclusao($boTransacao); + if ( $obErro->ocorreu() ) { + SistemaLegado::exibeAviso(urlencode($obErro->getDescricao()),"n_incluir","erro"); + break; + } + } + } + } else { + SistemaLegado::exibeAviso(urlencode($obErro->getDescricao()),"n_incluir","erro"); + } + + /*** Demais Descontos ***/ + $arDemaisDescontosSelecionados = $request->get('arDemaisDescontosSelecionados'); + + $obTTCMBASalarioDescontos = new TTCMBASalarioDescontos(); + $obTTCMBASalarioDescontos->setDado('exercicio' , Sessao::getExercicio()); + $obTTCMBASalarioDescontos->setDado('cod_entidade', $request->get('inCodEntidade')); + $obErro = $obTTCMBASalarioDescontos->exclusao($boTransacao); + + if (!$obErro->ocorreu()) { + if ( isset($arDemaisDescontosSelecionados) ) { + foreach ($arDemaisDescontosSelecionados as $arDemaisDescontos) { + $obTTCMBASalarioDescontos->setDado('cod_evento', $arDemaisDescontos); + $obErro = $obTTCMBASalarioDescontos->inclusao($boTransacao); + if ( $obErro->ocorreu() ) { + SistemaLegado::exibeAviso(urlencode($obErro->getDescricao()),"n_incluir","erro"); + break; + } + } + } + } else { + SistemaLegado::exibeAviso(urlencode($obErro->getDescricao()),"n_incluir","erro"); + } + + /*** Plano de Saúde/Odontológico ***/ + $arPlanoSaudeSelecionados = $request->get('arPlanoSaudeSelecionados'); + + $obTTCMBAPlanoSaude = new TTCMBAPlanoSaude(); + $obTTCMBAPlanoSaude->setDado('exercicio' , Sessao::getExercicio()); + $obTTCMBAPlanoSaude->setDado('cod_entidade', $request->get('inCodEntidade')); + $obErro = $obTTCMBAPlanoSaude->exclusao($boTransacao); + + if (!$obErro->ocorreu()) { + if ( isset($arPlanoSaudeSelecionados) ) { + foreach ($arPlanoSaudeSelecionados as $arPlanoSaude) { + $obTTCMBAPlanoSaude->setDado('cod_evento', $arPlanoSaude); + $obErro = $obTTCMBAPlanoSaude->inclusao($boTransacao); + if ( $obErro->ocorreu() ) { + SistemaLegado::exibeAviso(urlencode($obErro->getDescricao()),"n_incluir","erro"); + break; + } + } + } + } else { + SistemaLegado::exibeAviso(urlencode($obErro->getDescricao()),"n_incluir","erro"); + } + + /*** Classe/Aplicação do Salário do Servidor ***/ + $arFonteRecursoLotacaoLocal = Sessao::read('arFonteRecursoLotacaoLocal'); + + $obTTCMBAFonteRecursoLotacao = new TTCMBAFonteRecursoLotacao(); + $obTTCMBAFonteRecursoLotacao->setDado('exercicio' , Sessao::getExercicio()); + $obTTCMBAFonteRecursoLotacao->setDado('cod_entidade', $request->get('inCodEntidade')); + $obErro = $obTTCMBAFonteRecursoLotacao->exclusao($boTransacao); + + if (!$obErro->ocorreu()) { + $oTTCMBAFonteRecursoLocal = new TTCMBAFonteRecursoLocal(); + $oTTCMBAFonteRecursoLocal->setDado('exercicio' , Sessao::getExercicio()); + $oTTCMBAFonteRecursoLocal->setDado('cod_entidade', $request->get('inCodEntidade')); + $obErro = $oTTCMBAFonteRecursoLocal->exclusao($boTransacao); + + if( is_array($arFonteRecursoLotacaoLocal) ){ + foreach ($arFonteRecursoLotacaoLocal as $arFonteRecursoLotacaoLocalTmp) { + foreach ($arFonteRecursoLotacaoLocalTmp["lotacao"] as $arLotacaoSelecionado) { + $obTTCMBAFonteRecursoLotacao->setDado('cod_tipo_fonte' , $arFonteRecursoLotacaoLocalTmp["cod_tipo_fonte"]); + $obTTCMBAFonteRecursoLotacao->setDado('cod_orgao' , $arLotacaoSelecionado["cod_orgao"]); + $obErro = $obTTCMBAFonteRecursoLotacao->inclusao($boTransacao); + if ( $obErro->ocorreu() ) { + SistemaLegado::exibeAviso(urlencode($obErro->getDescricao()),"n_incluir","erro"); + break; + } + } + + if ( !empty($arFonteRecursoLotacaoLocalTmp["local"]) ) + foreach ($arFonteRecursoLotacaoLocalTmp["local"] as $arLocalSelecionado) { + $oTTCMBAFonteRecursoLocal->setDado('cod_tipo_fonte' , $arFonteRecursoLotacaoLocalTmp["cod_tipo_fonte"]); + $oTTCMBAFonteRecursoLocal->setDado('cod_local' , $arLocalSelecionado["cod_local"]); + $obErro = $oTTCMBAFonteRecursoLocal->inclusao($boTransacao); + if ( $obErro->ocorreu() ) { + SistemaLegado::exibeAviso(urlencode($obErro->getDescricao()),"n_incluir","erro"); + break; + } + } + } + } + } else { + SistemaLegado::exibeAviso(urlencode($obErro->getDescricao()),"n_incluir","erro"); + } + + if ( !$obErro->ocorreu() ) { + $obTransacao->fechaTransacao($boFlagTransacao, $boTransacao, $obErro, $obTTCMBACargoServidor); + SistemaLegado::alertaAviso($pgFilt."?".Sessao::getId()."&stAcao=".$stAcao,"Configuração ","incluir","incluir_n", Sessao::getId(), "../"); + } + + } else { + SistemaLegado::exibeAviso(urlencode($obErro->getDescricao()),"n_incluir","erro"); + } + + break; +} + +?> \ No newline at end of file diff --git a/gestaoPrestacaoContas/fontes/PHP/TCMBA/instancias/configuracao/PRRelacionarLotacoesOrgaos.php b/gestaoPrestacaoContas/fontes/PHP/TCMBA/instancias/configuracao/PRRelacionarLotacoesOrgaos.php new file mode 100644 index 0000000..883f642 --- /dev/null +++ b/gestaoPrestacaoContas/fontes/PHP/TCMBA/instancias/configuracao/PRRelacionarLotacoesOrgaos.php @@ -0,0 +1,118 @@ + +get('stAcao'); + +Sessao::setTrataExcecao(true); + +switch ($stAcao) { +case 'configurar' : + $obErro = new Erro; + $obTransacao = new Transacao; + $obTransacao->abreTransacao($boFlag, $boTransacao); + + $arDados = $_POST; + unset($arDados['stAcao']); + + $rsOrgaoUnidade = new RecordSet; + + // É realizado o processo de apagar todos os dados da tabela para inserir novamente + $obTPessoalDeParaLotacaoOrgaoTCMBA = new TPessoalDeParaLotacaoOrgaoTCMBA(); + $obTPessoalDeParaLotacaoOrgaoTCMBA->setDado('stEntidade' , Sessao::getEntidade()); + $obTPessoalDeParaLotacaoOrgaoTCMBA->recuperaTodos($rsLotacaoOrgao, " WHERE de_para_lotacao_orgao.exercicio = '".Sessao::getExercicio()."'"); + + while (!$rsLotacaoOrgao->eof()) { + $obTPessoalDeParaLotacaoOrgaoTCMBA->setDado('cod_orgao' , $rsLotacaoOrgao->getCampo('cod_orgao')); + $obTPessoalDeParaLotacaoOrgaoTCMBA->setDado('num_orgao' , $rsLotacaoOrgao->getCampo('num_orgao')); + $obTPessoalDeParaLotacaoOrgaoTCMBA->setDado('exercicio' , $rsLotacaoOrgao->getCampo('exercicio')); + $obTPessoalDeParaLotacaoOrgaoTCMBA->setDado('stEntidade' , Sessao::getEntidade()); + $boErro = $obTPessoalDeParaLotacaoOrgaoTCMBA->exclusao($boTransacao); + if ($obErro->ocorreu()) { + break; + } + $rsLotacaoOrgao->proximo(); + } + + if (!$obErro->ocorreu()) { + foreach ($arDados as $stKey => $stValue) { + if($stValue != '') { + $arValue = explode('_', $stValue); + $arKey = explode('_', $stKey); + + $inCodOrgao = $arKey[1]; + $inNumOrgao = $arValue[0]; + + $obTPessoalDeParaLotacaoOrgaoTCMBA->setDado('cod_orgao' , $inCodOrgao); + $obTPessoalDeParaLotacaoOrgaoTCMBA->setDado('num_orgao' , $inNumOrgao); + $obTPessoalDeParaLotacaoOrgaoTCMBA->setDado('exercicio' , Sessao::getExercicio()); + $obTPessoalDeParaLotacaoOrgaoTCMBA->setDado('stEntidade' , Sessao::getEntidade()); + + $obErro = $obTPessoalDeParaLotacaoOrgaoTCMBA->inclusao($boTransacao); + } + if ($obErro->ocorreu()) { + break; + } + } + } + + + if (!$obErro->ocorreu()) { + $obTransacao->commitAndClose(); + SistemaLegado::alertaAviso($pgFilt."?".Sessao::getId()."&stAcao=$stAcao","Configuração ","incluir","incluir_n", Sessao::getId(), "../"); + + } else { + $obTransacao->rollbackAndClose(); + sistemaLegado::exibeAviso($obErro->getDescricao() ,"n_incluir","erro"); + } +} + +Sessao::encerraExcecao(); diff --git a/gestaoPrestacaoContas/fontes/PHP/TCMBA/instancias/exportacao/FLManterExportacao.php b/gestaoPrestacaoContas/fontes/PHP/TCMBA/instancias/exportacao/FLManterExportacao.php index e75c09d..853025a 100755 --- a/gestaoPrestacaoContas/fontes/PHP/TCMBA/instancias/exportacao/FLManterExportacao.php +++ b/gestaoPrestacaoContas/fontes/PHP/TCMBA/instancias/exportacao/FLManterExportacao.php @@ -29,7 +29,7 @@ * @author Analista: Diego Barbosa Victoria * @author Desenvolvedor: Diego Barbosa Victoria * @ignore - $Id: FLManterExportacao.php 63753 2015-10-05 20:51:52Z jean $ + $Id: FLManterExportacao.php 64093 2015-12-02 12:16:17Z evandro $ * Casos de uso: uc-06.03.00 */ @@ -81,12 +81,15 @@ if ($inCodUnidadeGestora != "") { $obRdbTipoExportArqIndividual->setRotulo ( "*Tipo de Exportação" ); $obRdbTipoExportArqIndividual->setTitle ( "Tipo de Exportação" ); $obRdbTipoExportArqIndividual->setChecked( true ); + $obRdbTipoExportArqIndividual->obEvento->setOnClick("jq('input[name=stInformativoErro]').removeAttr('disabled');"); + /* Tipo Arquivo Compactado */ $obRdbTipoExportArqCompactado = new Radio; $obRdbTipoExportArqCompactado->setName ( "stTipoExport" ); $obRdbTipoExportArqCompactado->setLabel ( "Compactados" ); $obRdbTipoExportArqCompactado->setValue ( "compactados" ); - + $obRdbTipoExportArqCompactado->obEvento->setOnClick("jq('#stInformativoErroNao').prop('checked', 'checked'); jq('input[name=stInformativoErro]').attr('disabled','disabled'); "); + switch ($stAcao) { case 'basicos': $arNomeArquivos = array( @@ -120,6 +123,7 @@ if ($inCodUnidadeGestora != "") { ,"Frota.txt" ,"Patrimonio.txt" ); + break; case 'consolidados': $arNomeArquivos = array( @@ -207,6 +211,9 @@ if ($inCodUnidadeGestora != "") { ,"FiscalCadastro.txt" ,"DotTermoParc.txt" ,"TermoParc.txt" + ,"FolhaPgt.txt" + ,"EditalDotacao.txt" + ,"EditPregaoElet.txt" ); break; } @@ -228,6 +235,24 @@ if ($inCodUnidadeGestora != "") { $obISelectEntidade = new ITextBoxSelectEntidadeGeral(); $obISelectEntidade->setCodEntidade(1); + /* Radio para selecionar gera Informativo de Erros Internos*/ + /* Informativo de Erros Sim */ + $obRdbInformativoErroSim = new Radio; + $obRdbInformativoErroSim->setName ( "stInformativoErro" ); + $obRdbInformativoErroSim->setId ( "stInformativoErroSim" ); + $obRdbInformativoErroSim->setLabel ( "Sim" ); + $obRdbInformativoErroSim->setValue ( "Sim" ); + $obRdbInformativoErroSim->setRotulo ( "*Informativo de Erros" ); + $obRdbInformativoErroSim->setTitle ( "Selecione para gerar informativo de erros para uso interno" ); + $obRdbInformativoErroSim->setChecked( true ); + /* Informativo de Erros Não */ + $obRdbInformativoErroNao = new Radio; + $obRdbInformativoErroNao->setName ( "stInformativoErro" ); + $obRdbInformativoErroNao->setId ( "stInformativoErroNao" ); + $obRdbInformativoErroNao->setLabel ( "Não" ); + $obRdbInformativoErroNao->setValue ( "Não" ); + $obRdbInformativoErroNao->setChecked( true ); + $rsArqSelecionados = new RecordSet; $rsArqDisponiveis = new RecordSet; $rsArqDisponiveis->preenche($arElementosArq); @@ -249,6 +274,37 @@ if ($inCodUnidadeGestora != "") { $obCmbArquivos->setCampoId2 ( 'Arquivo' ); $obCmbArquivos->setCampoDesc2 ( 'Nome' ); $obCmbArquivos->SetRecord2($rsArqSelecionados); + + $stTipoPeriodicidade = SistemaLegado::pegaConfiguracao("tcmba_tipo_periodicidade_patrimonio", 45, Sessao::getExercicio(), $boTransacao); + + $obRdbTipoPeriodicidadeAquisicao = new Radio; + $obRdbTipoPeriodicidadeAquisicao->setName ( "stTipoPeriodicidade" ); + $obRdbTipoPeriodicidadeAquisicao->setId ( "stTipoPeriodicidadeAquisicao" ); + $obRdbTipoPeriodicidadeAquisicao->setLabel ( "Data de Aquisição" ); + $obRdbTipoPeriodicidadeAquisicao->setValue ( "aquisicao" ); + $obRdbTipoPeriodicidadeAquisicao->setRotulo ( "*Tipo de Periodicidade" ); + $obRdbTipoPeriodicidadeAquisicao->setTitle ( "Selecione o Tipo de Periodicidade para Exportação do Patrimônio." ); + + $obRdbTipoPeriodicidadeIncorporacao = new Radio; + $obRdbTipoPeriodicidadeIncorporacao->setName ( "stTipoPeriodicidade" ); + $obRdbTipoPeriodicidadeIncorporacao->setId ( "stTipoPeriodicidadeIncorporacao" ); + $obRdbTipoPeriodicidadeIncorporacao->setLabel ( "Data de Incorporação" ); + $obRdbTipoPeriodicidadeIncorporacao->setValue ( "incorporacao" ); + + switch ($stTipoPeriodicidade) { + case 'incorporacao': + $arBooleanPeriodo[0] = false; + $arBooleanPeriodo[1] = true; + break; + + default: + $arBooleanPeriodo[0] = true; + $arBooleanPeriodo[1] = false; + break; + } + + $obRdbTipoPeriodicidadeAquisicao->setChecked ( $arBooleanPeriodo[0] ); + $obRdbTipoPeriodicidadeIncorporacao->setChecked ( $arBooleanPeriodo[1] ); //Instancia o formulário $obForm = new Form; @@ -262,7 +318,11 @@ if ($inCodUnidadeGestora != "") { $obFormulario->addHidden ( $obHdnAcao ); $obFormulario->addComponente ( $obISelectEntidade ); $obFormulario->agrupaComponentes( array($obRdbTipoExportArqIndividual, $obRdbTipoExportArqCompactado) ); + if ($stAcao == "consumo") { + $obFormulario->agrupaComponentes( array($obRdbTipoPeriodicidadeAquisicao, $obRdbTipoPeriodicidadeIncorporacao) ); + } $obFormulario->addComponente ( $obPeriodicidade ); + $obFormulario->agrupaComponentes( array($obRdbInformativoErroSim,$obRdbInformativoErroNao) ); $obFormulario->addComponente ( $obCmbArquivos ); $obFormulario->OK (); diff --git a/gestaoPrestacaoContas/fontes/PHP/TCMBA/instancias/exportacao/LSExportacao.php b/gestaoPrestacaoContas/fontes/PHP/TCMBA/instancias/exportacao/LSExportacao.php index 9ac9778..942dc66 100755 --- a/gestaoPrestacaoContas/fontes/PHP/TCMBA/instancias/exportacao/LSExportacao.php +++ b/gestaoPrestacaoContas/fontes/PHP/TCMBA/instancias/exportacao/LSExportacao.php @@ -32,29 +32,11 @@ * @ignore - $Revision: 59612 $ - $Name$ - $Autor: $ - $Date: 2008-08-18 13:56:34 -0300 (Seg, 18 Ago 2008) $ + $Id: LSExportacao.php 63819 2015-10-19 20:52:10Z michel $ * Casos de uso: uc-06.03.00 */ -/* -$Log$ -Revision 1.1 2007/06/22 22:50:37 diego -Primeira versão. - -Revision 1.3 2007/04/23 15:39:22 rodrigo_sr -uc-06.03.00 - -Revision 1.2 2007/04/13 04:24:51 diego -Alterada paginação p/ lista mostrar todos resultados em uma só página - -Revision 1.1 2007/01/25 20:39:47 diego -Novos arquivos de exportação. - -*/ include_once '../../../../../../gestaoAdministrativa/fontes/PHP/pacotes/FrameworkHTML.inc.php'; include_once '../../../../../../gestaoAdministrativa/fontes/PHP/framework/include/cabecalho.inc.php'; @@ -65,14 +47,38 @@ if ( !is_array($arFiltro['arArquivosDownload']) ) { $arFiltro['arArquivosDownload'] = array(); } -$arArquivos = Sessao::read('arArquivosDownload'); +//Cria Titulo da lista de arquivos +$codAcao = Sessao::read('acao'); +$obRAdministracaoAcao = new RAdministracaoAcao(); +$obRAdministracaoAcao->setCodigoAcao($codAcao); +$obRAdministracaoAcao->listar($rsAcao,null,null,null); +$stNomAcao = $rsAcao->getCampo('nom_acao'); +$stTituloRegistros = ($stNomAcao!='') ? 'Arquivos - '.$stNomAcao : 'Arquivos'; // cria recordset e preenche com o conteudo do array +$arArquivos = Sessao::read('arArquivosDownload'); +$arArquivosErro = array(); + +//Verifica recebimento de Arquivos e separa arquivo Informativo de Erros da lista de arquivos do Tribunal +if ( !is_array($arArquivos) ) + $arArquivos = array(); +else{ + $arArquivosTemp = array(); + foreach($arArquivos as $chave => $arArquivo){ + if( $arArquivo['stNomeArquivo'] != 'URBEM_Informativo_de_Erros.txt' ) + $arArquivosTemp[] = $arArquivo; + else + $arArquivosErro[] = $arArquivo; + } + $arArquivos = $arArquivosTemp; +} + +//Monta Lista de Arquivos do Tribunal $rsArquivos = new RecordSet; $rsArquivos->preenche($arArquivos); $obLista = new Lista; - +$obLista->setTitulo($stTituloRegistros); $obLista->setRecordSet( $rsArquivos ); $obLista->setMostraPaginacao( false ); @@ -96,12 +102,69 @@ $obLista->commitDado(); // SETA O LINK DA ACAO $obLista->addAcao(); $obLista->ultimaAcao->setAcao('download'); -//$obLista->ultimaAcao->setFuncao(true); $obLista->ultimaAcao->addCampo('&arq' ,'stLink'); $obLista->ultimaAcao->addCampo('&label' ,'stNomeArquivo'); $obLista->ultimaAcao->setLink('../../../exportacao/instancias/processamento/download.php?sim=sim'); $obLista->commitAcao(); +$obLista->montaInnerHtml(); +$stHtmlLista = $obLista->getHtml(); + +$obSpnListaRegistros = new Span; +$obSpnListaRegistros->setId ( "spanListaRegistros" ); +$obSpnListaRegistros->setValue( $stHtmlLista ); + +//Monta Lista de Arquivos de Erro +if(count($arArquivosErro)>0){ + $rsArquivosErro = new RecordSet; + $rsArquivosErro->preenche($arArquivosErro); + + $obListaErro = new Lista; + $obListaErro->setTitulo('Arquivos - Informativo de Erros'); + $obListaErro->setRecordSet( $rsArquivosErro ); + $obListaErro->setMostraPaginacao( false ); + + $obListaErro->addCabecalho(); + $obListaErro->ultimoCabecalho->addConteudo(" "); + $obListaErro->ultimoCabecalho->setWidth( 5 ); + $obListaErro->commitCabecalho(); + $obListaErro->addCabecalho(); + $obListaErro->ultimoCabecalho->addConteudo("Arquivos"); + $obListaErro->ultimoCabecalho->setWidth( 55 ); + $obListaErro->commitCabecalho(); + $obListaErro->addCabecalho(); + $obListaErro->ultimoCabecalho->addConteudo(" "); + $obListaErro->ultimoCabecalho->setWidth( 40 ); + $obListaErro->commitCabecalho(); + + $obListaErro->addDado(); + $obListaErro->ultimoDado->setCampo('stNomeArquivo'); + $obListaErro->ultimoDado->setAlinhamento( 'ESQUERDA' ); + $obListaErro->commitDado(); + // SETA O LINK DA ACAO + $obListaErro->addAcao(); + $obListaErro->ultimaAcao->setAcao('download'); + $obListaErro->ultimaAcao->addCampo('&arq' ,'stLink'); + $obListaErro->ultimaAcao->addCampo('&label' ,'stNomeArquivo'); + $obListaErro->ultimaAcao->setLink('../../../exportacao/instancias/processamento/download.php?sim=sim'); + $obListaErro->commitAcao(); + $obListaErro->montaInnerHtml(); + $stHtmlListaErro = $obListaErro->getHtml(); + + $obSpnListaErro = new Span; + $obSpnListaErro->setId ( "spanListaErro" ); + $obSpnListaErro->setValue( $stHtmlListaErro ); +} + +$obForm = new Form; + +$obFormulario = new Formulario; +$obFormulario->addForm( $obForm ); + +if(count($arArquivosErro)>0) + $obFormulario->addSpan ( $obSpnListaErro ); + +$obFormulario->addSpan ( $obSpnListaRegistros ); -$obLista->show(); +$obFormulario->show(); SistemaLegado::LiberaFrames(); ?> diff --git a/gestaoPrestacaoContas/fontes/PHP/TCMBA/instancias/exportacao/OCManterExportacao.php b/gestaoPrestacaoContas/fontes/PHP/TCMBA/instancias/exportacao/OCManterExportacao.php index 9360e57..fa5dd24 100755 --- a/gestaoPrestacaoContas/fontes/PHP/TCMBA/instancias/exportacao/OCManterExportacao.php +++ b/gestaoPrestacaoContas/fontes/PHP/TCMBA/instancias/exportacao/OCManterExportacao.php @@ -33,7 +33,7 @@ * @ignore - $Id: OCManterExportacao.php 63563 2015-09-10 19:09:46Z michel $ + $Id: OCManterExportacao.php 64077 2015-11-27 19:50:48Z jean $ * Casos de uso: uc-06.03.00 */ @@ -41,6 +41,7 @@ include_once '../../../../../../gestaoAdministrativa/fontes/PHP/pacotes/FrameworkHTML.inc.php'; include_once '../../../../../../gestaoAdministrativa/fontes/PHP/framework/include/valida.inc.php'; include_once CAM_GPC_TCMBA_MAPEAMENTO.Sessao::getExercicio().'/TTBAConfiguracao.class.php'; +include_once(CAM_GA_ADM_NEGOCIO."RConfiguracaoConfiguracao.class.php" ); include_once CLA_EXPORTADOR; $stAcao = $request->get('stAcao'); @@ -62,6 +63,8 @@ $inCodUnidadeGestora = $rsEntidade->getCampo('cod_unidade_gestora'); $stDataInicial = $arFiltro['stDataInicial']; $stDataFinal = $arFiltro['stDataFinal']; +$stTipoPeriodicidade = $arFiltro['stTipoPeriodicidade']; + Sessao::write('cod_unidade_gestora',$rsEntidade->getCampo('cod_unidade_gestora')); Sessao::write('nom_unidade' ,$rsEntidade->getCampo('nom_entidade')); @@ -71,6 +74,8 @@ if (SistemaLegado::pegaDado('parametro','administracao.configuracao', " WHERE va $stEntidadeRH = "_".$stEntidades; } +$arLogErros = array(); + foreach ($arFiltro["arArquivosSelecionados"] as $stArquivo) { $obExportador->addArquivo($stArquivo); $obExportador->roUltimoArquivo->setTitulo(substr($stArquivo,0,strpos($stArquivo,'.txt'))); @@ -84,6 +89,29 @@ if ($arFiltro['stTipoExport'] == 'compactados') { $obExportador->setNomeArquivoZip('ExportacaoArquivosPrincipais.zip'); } +$stTemPeriodicidade = SistemaLegado::pegaConfiguracao("tcmba_tipo_periodicidade_patrimonio", 45, Sessao::getExercicio()); + +if ($stTemPeriodicidade != $arFiltro["stTipoPeriodicidade"]) { + $obRConfiguracaoConfiguracao = new RConfiguracaoConfiguracao(); + $obRConfiguracaoConfiguracao->setCodModulo( 45 ); + $obRConfiguracaoConfiguracao->setParametro( 'tcmba_tipo_periodicidade_patrimonio' ); + $obRConfiguracaoConfiguracao->setValor ( $arFiltro["stTipoPeriodicidade"] ); + $obRConfiguracaoConfiguracao->alterar($boTransacao); +} + +if(count($arLogErros)>0 && $arFiltro['stInformativoErro']=='Sim'){ + $rsLogErros = new RecordSet(); + $rsLogErros->preenche($arLogErros); + + $obExportador->addArquivo('URBEM_Informativo_de_Erros.txt'); + $obExportador->roUltimoArquivo->setTitulo('Informativo de Erros para Usuário URBEM'); + $obExportador->roUltimoArquivo->addBloco($rsLogErros); + $obExportador->roUltimoArquivo->roUltimoBloco->addColuna("nome_arquivo"); + $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("CARACTER_ESPACOS_DIR"); + $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(35); + $obExportador->roUltimoArquivo->roUltimoBloco->addColuna("erro"); +} + $obExportador->show(); SistemaLegado::LiberaFrames(); ob_end_flush(); diff --git a/gestaoPrestacaoContas/fontes/PHP/TCMBA/instancias/layout_arquivos/2015/AltOrc.inc.php b/gestaoPrestacaoContas/fontes/PHP/TCMBA/instancias/layout_arquivos/2015/AltOrc.inc.php index 4ab16e2..1c2eb14 100644 --- a/gestaoPrestacaoContas/fontes/PHP/TCMBA/instancias/layout_arquivos/2015/AltOrc.inc.php +++ b/gestaoPrestacaoContas/fontes/PHP/TCMBA/instancias/layout_arquivos/2015/AltOrc.inc.php @@ -33,112 +33,138 @@ * @ignore - $Revision: 63264 $ - $Name$ - $Author: hboaventura $ - $Date: 2008-08-18 13:56:34 -0300 (Seg, 18 Ago 2008) $ + $Id: AltOrc.inc.php 63819 2015-10-19 20:52:10Z michel $ + * Casos de uso: uc-06.03.00 */ - include_once( CAM_GPC_TCMBA_MAPEAMENTO.Sessao::getExercicio()."/TTBAAltOrc.class.php" ); - $obTTBAAltOrc = new TTBAAltOrc(); - $obTTBAAltOrc->setDado('mes' , $inMes ); - $obTTBAAltOrc->setDado('entidades', $stEntidades ); - $obTTBAAltOrc->setDado('unidade_gestora', $inCodUnidadeGestora ); - $obTTBAAltOrc->setDado('dt_inicial', $stDataInicial ); - $obTTBAAltOrc->setDado('dt_final', $stDataFinal ); +include_once CAM_GPC_TCMBA_MAPEAMENTO.Sessao::getExercicio()."/TTBAAltOrc.class.php"; + +$obTTBAAltOrc = new TTBAAltOrc(); +$obTTBAAltOrc->setDado('mes' , $inMes ); +$obTTBAAltOrc->setDado('entidades', $stEntidades ); +$obTTBAAltOrc->setDado('unidade_gestora', $inCodUnidadeGestora ); +$obTTBAAltOrc->setDado('dt_inicial', $stDataInicial ); +$obTTBAAltOrc->setDado('dt_final', $stDataFinal ); + +#Teste de Erro +if($arFiltro['stInformativoErro']=='Sim'){ + $obTTBAAltOrc->recuperaLogErro($rsLogErro); + + //Variável $boLogErro para se houver algum erro que impeça a geração do arquivo + $boLogErro = false; + if( !$rsLogErro->eof() ){ + $arLogErrosTemp = array(); + $inRegistros = $rsLogErro->getCampo("registros"); + $inObrigatorio = $rsLogErro->getCampo("obrigatorio"); + + if( $inRegistros > 0 && $inObrigatorio <> $inRegistros ){ + $arLogErrosTemp['nome_arquivo'] = $stArquivo; + $arLogErrosTemp['erro'] = 'Obrigatório informar o Tipo de Instrumento de Alteração através da configuração: Gestão Prestação de Contas :: TCM - BA :: Configuração :: Configurar Tipo Norma'; + + $arLogErros[] = $arLogErrosTemp; + } + + unset($arLogErrosTemp); + } + unset($rsLogErro); +} +#Fim Teste de Erro + +$rsRecordSet = new RecordSet(); +if( !$boLogErro ) $obTTBAAltOrc->recuperaDadosTribunal($rsRecordSet); - $obExportador->roUltimoArquivo->addBloco($rsRecordSet); - $obExportador->roUltimoArquivo->roUltimoBloco->addColuna("tipo_registro"); - $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("NUMERICO_ESPACOS_ESQ"); - $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(1); +$obExportador->roUltimoArquivo->addBloco($rsRecordSet); +$obExportador->roUltimoArquivo->roUltimoBloco->addColuna("tipo_registro"); +$obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("NUMERICO_ESPACOS_ESQ"); +$obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(1); - $obExportador->roUltimoArquivo->roUltimoBloco->addColuna("unidade_gestora"); - $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("NUMERICO_ZEROS_ESQ"); - $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(4); +$obExportador->roUltimoArquivo->roUltimoBloco->addColuna("unidade_gestora"); +$obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("NUMERICO_ZEROS_ESQ"); +$obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(4); - $obExportador->roUltimoArquivo->roUltimoBloco->addColuna("num_pao"); - $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("NUMERICO_ESPACOS_ESQ"); - $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(4); +$obExportador->roUltimoArquivo->roUltimoBloco->addColuna("num_pao"); +$obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("NUMERICO_ESPACOS_ESQ"); +$obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(4); - $obExportador->roUltimoArquivo->roUltimoBloco->addColuna("tipo_pao"); - $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("NUMERICO_ESPACOS_ESQ"); - $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(1); +$obExportador->roUltimoArquivo->roUltimoBloco->addColuna("tipo_pao"); +$obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("NUMERICO_ESPACOS_ESQ"); +$obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(1); - $obExportador->roUltimoArquivo->roUltimoBloco->addColuna("tipo_fundamento"); - $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("NUMERICO_ESPACOS_ESQ"); - $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(1); +$obExportador->roUltimoArquivo->roUltimoBloco->addColuna("tipo_fundamento"); +$obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("NUMERICO_ESPACOS_ESQ"); +$obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(1); - $obExportador->roUltimoArquivo->roUltimoBloco->addColuna("tipo_alteracao"); - $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("NUMERICO_ESPACOS_ESQ"); - $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(2); +$obExportador->roUltimoArquivo->roUltimoBloco->addColuna("tipo_alteracao"); +$obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("NUMERICO_ESPACOS_ESQ"); +$obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(2); - $obExportador->roUltimoArquivo->roUltimoBloco->addColuna("num_norma"); - $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("CARACTER_ESPACOS_DIR"); - $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(16); +$obExportador->roUltimoArquivo->roUltimoBloco->addColuna("num_norma"); +$obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("CARACTER_ESPACOS_DIR"); +$obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(16); - $obExportador->roUltimoArquivo->roUltimoBloco->addColuna("num_unidade"); - $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("NUMERICO_ESPACOS_ESQ"); - $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(4); +$obExportador->roUltimoArquivo->roUltimoBloco->addColuna("num_unidade"); +$obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("NUMERICO_ESPACOS_ESQ"); +$obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(4); - $obExportador->roUltimoArquivo->roUltimoBloco->addColuna("estrutural"); - $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("NUMERICO_ESPACOS_ESQ"); - $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(8); +$obExportador->roUltimoArquivo->roUltimoBloco->addColuna("estrutural"); +$obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("NUMERICO_ESPACOS_ESQ"); +$obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(8); - $obExportador->roUltimoArquivo->roUltimoBloco->addColuna("cod_recurso"); - $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("NUMERICO_ESPACOS_ESQ"); - $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(4); +$obExportador->roUltimoArquivo->roUltimoBloco->addColuna("cod_recurso"); +$obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("NUMERICO_ESPACOS_ESQ"); +$obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(4); - $obExportador->roUltimoArquivo->roUltimoBloco->addColuna("cod_funcao"); - $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("NUMERICO_ESPACOS_ESQ"); - $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(2); +$obExportador->roUltimoArquivo->roUltimoBloco->addColuna("cod_funcao"); +$obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("NUMERICO_ESPACOS_ESQ"); +$obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(2); - $obExportador->roUltimoArquivo->roUltimoBloco->addColuna("exercicio"); - $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("NUMERICO_ESPACOS_ESQ"); - $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(4); +$obExportador->roUltimoArquivo->roUltimoBloco->addColuna("exercicio"); +$obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("NUMERICO_ESPACOS_ESQ"); +$obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(4); - $obExportador->roUltimoArquivo->roUltimoBloco->addColuna("cod_subfuncao"); - $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("NUMERICO_ESPACOS_ESQ"); - $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(4); +$obExportador->roUltimoArquivo->roUltimoBloco->addColuna("cod_subfuncao"); +$obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("NUMERICO_ESPACOS_ESQ"); +$obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(4); - $obExportador->roUltimoArquivo->roUltimoBloco->addColuna("cod_programa"); - $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("NUMERICO_ESPACOS_ESQ"); - $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(4); +$obExportador->roUltimoArquivo->roUltimoBloco->addColuna("cod_programa"); +$obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("NUMERICO_ESPACOS_ESQ"); +$obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(4); - $obExportador->roUltimoArquivo->roUltimoBloco->addColuna("data_suplementacao"); - $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("DATA_DDMMYYYY"); - $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(8); +$obExportador->roUltimoArquivo->roUltimoBloco->addColuna("data_suplementacao"); +$obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("DATA_DDMMYYYY"); +$obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(8); - $obExportador->roUltimoArquivo->roUltimoBloco->addColuna("vl_suplementacao"); - $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("VALOR_ZEROS_ESQ"); - $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(16); +$obExportador->roUltimoArquivo->roUltimoBloco->addColuna("vl_suplementacao"); +$obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("VALOR_ZEROS_ESQ"); +$obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(16); - $obExportador->roUltimoArquivo->roUltimoBloco->addColuna("competencia"); - $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("NUMERICO_ESPACOS_ESQ"); - $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(6); - - $obExportador->roUltimoArquivo->roUltimoBloco->addColuna("data_publicacao"); - $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("DATA_DDMMYYYY"); - $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(8); +$obExportador->roUltimoArquivo->roUltimoBloco->addColuna("competencia"); +$obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("NUMERICO_ESPACOS_ESQ"); +$obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(6); + +$obExportador->roUltimoArquivo->roUltimoBloco->addColuna("data_publicacao"); +$obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("DATA_DDMMYYYY"); +$obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(8); - $obExportador->roUltimoArquivo->roUltimoBloco->addColuna("nom_norma"); - $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("CARACTER_ESPACOS_DIR"); - $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(100); +$obExportador->roUltimoArquivo->roUltimoBloco->addColuna("nom_norma"); +$obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("CARACTER_ESPACOS_DIR"); +$obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(100); - $obExportador->roUltimoArquivo->roUltimoBloco->addColuna("num_norma"); - $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("NUMERICO_ESPACOS_ESQ"); - $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(10); +$obExportador->roUltimoArquivo->roUltimoBloco->addColuna("num_norma"); +$obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("NUMERICO_ESPACOS_ESQ"); +$obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(10); - $obExportador->roUltimoArquivo->roUltimoBloco->addColuna("data_publicacao"); - $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("DATA_DDMMYYYY"); - $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(8); +$obExportador->roUltimoArquivo->roUltimoBloco->addColuna("data_publicacao"); +$obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("DATA_DDMMYYYY"); +$obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(8); - $obExportador->roUltimoArquivo->roUltimoBloco->addColuna("num_orgao"); - $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("NUMERICO_ESPACOS_ESQ"); - $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(4); +$obExportador->roUltimoArquivo->roUltimoBloco->addColuna("num_orgao"); +$obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("NUMERICO_ESPACOS_ESQ"); +$obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(4); - $obExportador->roUltimoArquivo->roUltimoBloco->addColuna("data_publicacao"); - $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("DATA_DDMMYYYY"); - $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(8); +$obExportador->roUltimoArquivo->roUltimoBloco->addColuna("data_publicacao"); +$obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("DATA_DDMMYYYY"); +$obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(8); diff --git a/gestaoPrestacaoContas/fontes/PHP/TCMBA/instancias/layout_arquivos/2015/CadastroObra.inc.php b/gestaoPrestacaoContas/fontes/PHP/TCMBA/instancias/layout_arquivos/2015/CadastroObra.inc.php index 5d2102c..bad6eec 100644 --- a/gestaoPrestacaoContas/fontes/PHP/TCMBA/instancias/layout_arquivos/2015/CadastroObra.inc.php +++ b/gestaoPrestacaoContas/fontes/PHP/TCMBA/instancias/layout_arquivos/2015/CadastroObra.inc.php @@ -126,7 +126,7 @@ $obExportador->roUltimoArquivo->roUltimoBloco->addColuna("nom_bairro"); $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("ALFANUMERICO_ESPACOS_DIR"); $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(50); -$obExportador->roUltimoArquivo->roUltimoBloco->addColuna("cod_funcao"); +$obExportador->roUltimoArquivo->roUltimoBloco->addColuna("nro_funcao"); $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("ALFANUMERICO_ESPACOS_DIR"); $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(6); diff --git a/gestaoPrestacaoContas/fontes/PHP/TCMBA/instancias/layout_arquivos/2015/CertCont.inc.php b/gestaoPrestacaoContas/fontes/PHP/TCMBA/instancias/layout_arquivos/2015/CertCont.inc.php index c156096..e6a7c28 100644 --- a/gestaoPrestacaoContas/fontes/PHP/TCMBA/instancias/layout_arquivos/2015/CertCont.inc.php +++ b/gestaoPrestacaoContas/fontes/PHP/TCMBA/instancias/layout_arquivos/2015/CertCont.inc.php @@ -33,7 +33,7 @@ * @ignore - $Revision: 63687 $ + $Revision: 63763 $ $Name$ $Author: hboaventura $ $Date: 2008-08-18 13:56:34 -0300 (Seg, 18 Ago 2008) $ @@ -51,7 +51,7 @@ $obTTBACertidoesContratos->setDado('dtInicial' , $stDataInicial ); $obTTBACertidoesContratos->setDado('dtFinal' , $stDataFinal ); - $obTTBACertidoesContratos->recuperaDadosTribunal($rsCertidoesContratos); + $obTTBACertidoesContratos->recuperaDadosTribunal($rsCertidoesContratos); $obExportador->roUltimoArquivo->addBloco($rsCertidoesContratos); @@ -63,7 +63,7 @@ $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("NUMERICO_ESPACOS_ESQ"); $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(4); - $obExportador->roUltimoArquivo->roUltimoBloco->addColuna("num_contrato"); + $obExportador->roUltimoArquivo->roUltimoBloco->addColuna("numero_contrato"); $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("ALFANUMERICO_ESPACOS_DIR"); $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(16); diff --git a/gestaoPrestacaoContas/fontes/PHP/TCMBA/instancias/layout_arquivos/2015/ConsContRazao.inc.php b/gestaoPrestacaoContas/fontes/PHP/TCMBA/instancias/layout_arquivos/2015/ConsContRazao.inc.php index 4bfd90a..fd05eb8 100644 --- a/gestaoPrestacaoContas/fontes/PHP/TCMBA/instancias/layout_arquivos/2015/ConsContRazao.inc.php +++ b/gestaoPrestacaoContas/fontes/PHP/TCMBA/instancias/layout_arquivos/2015/ConsContRazao.inc.php @@ -27,21 +27,18 @@ include_once( CAM_GPC_TCMBA_MAPEAMENTO.Sessao::getExercicio()."/TTBAConsContRazao.class.php" ); $obTTBAConsContRazao = new TTBAConsContRazao(); - $stDtInicialAnterior = date('d/m/Y',mktime(0,0,0,1,1,substr($stDataInicial,6,4))); if ($stDataInicial == "01/01/".Sessao::getExercicio()) { $stDtFinalAnterior = date('d/m/Y',mktime(0,0,0,substr($stDataInicial,3,2),substr($stDataInicial,0,2),substr($stDataInicial,6,4))); } else { $stDtFinalAnterior = date('d/m/Y',mktime(0,0,0,substr($stDataInicial,3,2),substr($stDataInicial,0,2)-1,substr($stDataInicial,6,4))); } - + $obTTBAConsContRazao->setDado('mes', $inMes); $obTTBAConsContRazao->setDado('dt_inicial', $stDataInicial); $obTTBAConsContRazao->setDado('dt_final', $stDataFinal); - $obTTBAConsContRazao->setDado('dt_inicial_ant', $stDtInicialAnterior); $obTTBAConsContRazao->setDado('dt_final_ant', $stDtFinalAnterior); $obTTBAConsContRazao->setDado('entidades', $stEntidades); $obTTBAConsContRazao->setDado('unidade_gestora', $inCodUnidadeGestora); - $obTTBAConsContRazao->setDado('exercicio_ant', (Sessao::getExercicio()-1)); $obTTBAConsContRazao->recuperaDados($rs); $obExportador->roUltimoArquivo->addBloco($rs); @@ -61,19 +58,19 @@ $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("CARACTER_ESPACOS_DIR"); $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(34); - $obExportador->roUltimoArquivo->roUltimoBloco->addColuna("deb_ant"); + $obExportador->roUltimoArquivo->roUltimoBloco->addColuna("deb_ex_ant"); $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("VALOR_ZEROS_ESQ"); $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(16); - $obExportador->roUltimoArquivo->roUltimoBloco->addColuna("cred_ant"); + $obExportador->roUltimoArquivo->roUltimoBloco->addColuna("cred_ex_ant"); $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("VALOR_ZEROS_ESQ"); $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(16); - $obExportador->roUltimoArquivo->roUltimoBloco->addColuna("deb_mes_ant"); + $obExportador->roUltimoArquivo->roUltimoBloco->addColuna("deb_mov_ant"); $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("VALOR_ZEROS_ESQ"); $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(16); - $obExportador->roUltimoArquivo->roUltimoBloco->addColuna("cred_mes_ant"); + $obExportador->roUltimoArquivo->roUltimoBloco->addColuna("cred_mov_ant"); $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("VALOR_ZEROS_ESQ"); $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(16); @@ -85,19 +82,19 @@ $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("VALOR_ZEROS_ESQ"); $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(16); - $obExportador->roUltimoArquivo->roUltimoBloco->addColuna("deb_ate_mes"); + $obExportador->roUltimoArquivo->roUltimoBloco->addColuna("deb_mov"); $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("VALOR_ZEROS_ESQ"); $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(16); - $obExportador->roUltimoArquivo->roUltimoBloco->addColuna("cred_ate_mes"); + $obExportador->roUltimoArquivo->roUltimoBloco->addColuna("cred_mov"); $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("VALOR_ZEROS_ESQ"); $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(16); - $obExportador->roUltimoArquivo->roUltimoBloco->addColuna("deb_exercicio"); + $obExportador->roUltimoArquivo->roUltimoBloco->addColuna("deb_ex"); $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("VALOR_ZEROS_ESQ"); $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(16); - $obExportador->roUltimoArquivo->roUltimoBloco->addColuna("cred_exercicio"); + $obExportador->roUltimoArquivo->roUltimoBloco->addColuna("cred_ex"); $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("VALOR_ZEROS_ESQ"); $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(16); diff --git a/gestaoPrestacaoContas/fontes/PHP/TCMBA/instancias/layout_arquivos/2015/ConsRecOrc.inc.php b/gestaoPrestacaoContas/fontes/PHP/TCMBA/instancias/layout_arquivos/2015/ConsRecOrc.inc.php index d7a904c..58cc5d8 100644 --- a/gestaoPrestacaoContas/fontes/PHP/TCMBA/instancias/layout_arquivos/2015/ConsRecOrc.inc.php +++ b/gestaoPrestacaoContas/fontes/PHP/TCMBA/instancias/layout_arquivos/2015/ConsRecOrc.inc.php @@ -67,6 +67,10 @@ $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("VALOR_ZEROS_ESQ"); $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(16); + $obExportador->roUltimoArquivo->roUltimoBloco->addColuna("valor_previsto"); + $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("VALOR_ZEROS_ESQ"); + $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(16); + $obExportador->roUltimoArquivo->roUltimoBloco->addColuna("arrecadado_mes"); $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("VALOR_ZEROS_ESQ"); $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(16); diff --git a/gestaoPrestacaoContas/fontes/PHP/TCMBA/instancias/layout_arquivos/2015/Contrato2.inc.php b/gestaoPrestacaoContas/fontes/PHP/TCMBA/instancias/layout_arquivos/2015/Contrato2.inc.php index 677f2f3..0a93521 100644 --- a/gestaoPrestacaoContas/fontes/PHP/TCMBA/instancias/layout_arquivos/2015/Contrato2.inc.php +++ b/gestaoPrestacaoContas/fontes/PHP/TCMBA/instancias/layout_arquivos/2015/Contrato2.inc.php @@ -46,7 +46,6 @@ $obTTCMBAContrato2->setDado('dt_final',$stDataFinal); $obTTCMBAContrato2->setDado('exercicio',Sessao::getExercicio()); $obTTCMBAContrato2->recuperaDadosTribunal($rsArquivo); - $obExportador->roUltimoArquivo->addBloco($rsArquivo); $obExportador->roUltimoArquivo->roUltimoBloco->addColuna("tipo_registro"); $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("NUMERICO_ZEROS_ESQ"); @@ -60,7 +59,7 @@ $obExportador->roUltimoArquivo->roUltimoBloco->addColuna("num_processo"); $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("ALFANUMERICO_ESPACOS_DIR"); $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(36); -$obExportador->roUltimoArquivo->roUltimoBloco->addColuna("num_contrato"); +$obExportador->roUltimoArquivo->roUltimoBloco->addColuna("numero_contrato"); $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("ALFANUMERICO_ESPACOS_DIR"); $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(16); diff --git a/gestaoPrestacaoContas/fontes/PHP/TCMBA/instancias/layout_arquivos/2015/DocDiver.inc.php b/gestaoPrestacaoContas/fontes/PHP/TCMBA/instancias/layout_arquivos/2015/DocDiver.inc.php index 7cd7837..1aa7f64 100644 --- a/gestaoPrestacaoContas/fontes/PHP/TCMBA/instancias/layout_arquivos/2015/DocDiver.inc.php +++ b/gestaoPrestacaoContas/fontes/PHP/TCMBA/instancias/layout_arquivos/2015/DocDiver.inc.php @@ -56,15 +56,15 @@ $obExportador->roUltimoArquivo->roUltimoBloco->addColuna("tipo_registro"); $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("NUMERICO_ESPACOS_ESQ"); $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(1); -$obExportador->roUltimoArquivo->roUltimoBloco->addColuna("cd_unidade"); //PK +$obExportador->roUltimoArquivo->roUltimoBloco->addColuna("unidade_gestora"); $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("NUMERICO_ESPACOS_ESQ"); $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(4); -$obExportador->roUltimoArquivo->roUltimoBloco->addColuna("unidade_gestora"); //PK +$obExportador->roUltimoArquivo->roUltimoBloco->addColuna("unidade_orcamentaria"); $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("NUMERICO_ESPACOS_ESQ"); $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(4); -$obExportador->roUltimoArquivo->roUltimoBloco->addColuna("nu_empenho"); +$obExportador->roUltimoArquivo->roUltimoBloco->addColuna("num_empenho"); $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("NUMERICO_ESPACOS_ESQ"); $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(10); @@ -80,7 +80,7 @@ $obExportador->roUltimoArquivo->roUltimoBloco->addColuna("dt_ano"); $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("NUMERICO_ESPACOS_ESQ"); $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(4); -$obExportador->roUltimoArquivo->roUltimoBloco->addColuna("tp_pessoa"); +$obExportador->roUltimoArquivo->roUltimoBloco->addColuna("tipo_pessoa"); $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("NUMERICO_ESPACOS_ESQ"); $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(1); @@ -88,11 +88,23 @@ $obExportador->roUltimoArquivo->roUltimoBloco->addColuna("documento"); $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("ALFANUMERICO_ESPACOS_DIR"); $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(14); +$obExportador->roUltimoArquivo->roUltimoBloco->addColuna("emitente"); +$obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("ALFANUMERICO_ESPACOS_DIR"); +$obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(100); + +$obExportador->roUltimoArquivo->roUltimoBloco->addColuna("objeto"); +$obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("ALFANUMERICO_ESPACOS_DIR"); +$obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(200); + +$obExportador->roUltimoArquivo->roUltimoBloco->addColuna("tipo_documento"); +$obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("ALFANUMERICO_ESPACOS_DIR"); +$obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(50); + $obExportador->roUltimoArquivo->roUltimoBloco->addColuna("data_emissao"); $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("DATA_DDMMYYYY"); $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(8); -$obExportador->roUltimoArquivo->roUltimoBloco->addColuna("vl_pago"); +$obExportador->roUltimoArquivo->roUltimoBloco->addColuna("vl_doc"); $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("VALOR_ZEROS_ESQ"); $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(16); @@ -104,7 +116,7 @@ $obExportador->roUltimoArquivo->roUltimoBloco->addColuna("cod_orgao"); $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("NUMERICO_ESPACOS_ESQ"); $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(4); -$obExportador->roUltimoArquivo->roUltimoBloco->addColuna("nu_empenho"); +$obExportador->roUltimoArquivo->roUltimoBloco->addColuna("subempenho"); $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("NUMERICO_ESPACOS_ESQ"); $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(10); diff --git a/gestaoPrestacaoContas/fontes/PHP/TCMBA/instancias/layout_arquivos/2015/EditPregaoElet.inc.php b/gestaoPrestacaoContas/fontes/PHP/TCMBA/instancias/layout_arquivos/2015/EditPregaoElet.inc.php new file mode 100755 index 0000000..05b36a8 --- /dev/null +++ b/gestaoPrestacaoContas/fontes/PHP/TCMBA/instancias/layout_arquivos/2015/EditPregaoElet.inc.php @@ -0,0 +1,95 @@ + +setDado('exercicio' , Sessao::getExercicio() ); + $obTTCMBAEditPregaoElet->setDado('entidades' , $stEntidades ); + $obTTCMBAEditPregaoElet->setDado('unidade_gestora', $inCodUnidadeGestora ); + $obTTCMBAEditPregaoElet->setDado('dt_inicial' , $stDataInicial ); + $obTTCMBAEditPregaoElet->setDado('dt_final' , $stDataFinal ); + $obTTCMBAEditPregaoElet->recuperaDadosTribunal($rsEditalPregao); + + $obExportador->roUltimoArquivo->addBloco($rsEditalPregao); + + $obExportador->roUltimoArquivo->roUltimoBloco->addColuna("tipo_registro"); + $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("NUMERICO_ESPACOS_ESQ"); + $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(1); + + $obExportador->roUltimoArquivo->roUltimoBloco->addColuna("unidade_gestora"); + $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("NUMERICO_ZEROS_ESQ"); + $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(4); + + $obExportador->roUltimoArquivo->roUltimoBloco->addColuna("nu_edital"); + $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("ALFANUMERICO_ESPACOS_DIR"); + $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(16); + + $obExportador->roUltimoArquivo->roUltimoBloco->addColuna("edital_modalidade"); + $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("NUMERICO_ESPACOS_ESQ"); + $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(3); + + $obExportador->roUltimoArquivo->roUltimoBloco->addColuna("data_recebimento_proposta"); + $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("DATA_DDMMYYYY"); + $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(8); + + $obExportador->roUltimoArquivo->roUltimoBloco->addColuna("hora_recebimento_proposta"); + $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("NUMERICO_ZEROS_ESQ"); + $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(4); + + $obExportador->roUltimoArquivo->roUltimoBloco->addColuna("data_final_entrega"); + $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("DATA_DDMMYYYY"); + $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(8); + + $obExportador->roUltimoArquivo->roUltimoBloco->addColuna("hora_final_entrega"); + $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("NUMERICO_ZEROS_ESQ"); + $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(4); + + $obExportador->roUltimoArquivo->roUltimoBloco->addColuna("data_sessao_disputa"); + $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("DATA_DDMMYYYY"); + $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(8); + + $obExportador->roUltimoArquivo->roUltimoBloco->addColuna("hora_inicio_disputa"); + $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("NUMERICO_ZEROS_ESQ"); + $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(4); + + $obExportador->roUltimoArquivo->roUltimoBloco->addColuna("competencia"); + $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("ALFANUMERICO_ESPACOS_DIR"); + $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(6); + + unset($obTTCMBAEditPregaoElet); + unset($rsEditalPregao); +?> \ No newline at end of file diff --git a/gestaoPrestacaoContas/fontes/PHP/TCMBA/instancias/layout_arquivos/2015/EditalCadastro.inc.php b/gestaoPrestacaoContas/fontes/PHP/TCMBA/instancias/layout_arquivos/2015/EditalCadastro.inc.php index 733464b..68b9c6e 100644 --- a/gestaoPrestacaoContas/fontes/PHP/TCMBA/instancias/layout_arquivos/2015/EditalCadastro.inc.php +++ b/gestaoPrestacaoContas/fontes/PHP/TCMBA/instancias/layout_arquivos/2015/EditalCadastro.inc.php @@ -68,7 +68,7 @@ $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("NUMERICO_ESPACOS_ESQ"); $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(3); - $obExportador->roUltimoArquivo->roUltimoBloco->addColuna("cod_processo"); + $obExportador->roUltimoArquivo->roUltimoBloco->addColuna("cod_administrativo"); $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("ALFANUMERICO_ESPACOS_DIR"); $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(20); diff --git a/gestaoPrestacaoContas/fontes/PHP/TCMBA/instancias/layout_arquivos/2015/EditalDotacao.inc.php b/gestaoPrestacaoContas/fontes/PHP/TCMBA/instancias/layout_arquivos/2015/EditalDotacao.inc.php new file mode 100644 index 0000000..f539ad3 --- /dev/null +++ b/gestaoPrestacaoContas/fontes/PHP/TCMBA/instancias/layout_arquivos/2015/EditalDotacao.inc.php @@ -0,0 +1,106 @@ + +setDado('exercicio' , Sessao::getExercicio() ); + $obTTCMBAEditalDotacao->setDado('entidades' , $stEntidades ); + $obTTCMBAEditalDotacao->setDado('unidade_gestora', $inCodUnidadeGestora ); + $obTTCMBAEditalDotacao->setDado('dt_inicial' , $stDataInicial ); + $obTTCMBAEditalDotacao->setDado('dt_final' , $stDataFinal ); + $obTTCMBAEditalDotacao->recuperaDadosTribunal($rsEditalDotacao); + + $obExportador->roUltimoArquivo->addBloco($rsEditalDotacao); + $obExportador->roUltimoArquivo->roUltimoBloco->addColuna("tipo_registro"); + $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("NUMERICO_ESPACOS_ESQ"); + $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(1); + + $obExportador->roUltimoArquivo->roUltimoBloco->addColuna("unidade_gestora"); + $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("NUMERICO_ZEROS_ESQ"); + $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(4); + + $obExportador->roUltimoArquivo->roUltimoBloco->addColuna("nu_edital"); + $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("ALFANUMERICO_ESPACOS_DIR"); + $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(16); + + $obExportador->roUltimoArquivo->roUltimoBloco->addColuna("edital_modalidade"); + $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("NUMERICO_ESPACOS_ESQ"); + $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(3); + + $obExportador->roUltimoArquivo->roUltimoBloco->addColuna("num_orgao"); + $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("NUMERICO_ESPACOS_ESQ"); + $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(4); + + $obExportador->roUltimoArquivo->roUltimoBloco->addColuna("num_unidade"); + $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("NUMERICO_ESPACOS_ESQ"); + $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(4); + + $obExportador->roUltimoArquivo->roUltimoBloco->addColuna("cod_funcao"); + $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("NUMERICO_ESPACOS_ESQ"); + $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(2); + + $obExportador->roUltimoArquivo->roUltimoBloco->addColuna("cod_subfuncao"); + $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("NUMERICO_ESPACOS_ESQ"); + $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(4); + + $obExportador->roUltimoArquivo->roUltimoBloco->addColuna("cod_programa"); + $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("NUMERICO_ESPACOS_ESQ"); + $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(4); + + $obExportador->roUltimoArquivo->roUltimoBloco->addColuna("tipo_projeto"); + $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("NUMERICO_ESPACOS_ESQ"); + $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(1); + + $obExportador->roUltimoArquivo->roUltimoBloco->addColuna("num_projeto"); + $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("NUMERICO_ESPACOS_ESQ"); + $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(4); + + $obExportador->roUltimoArquivo->roUltimoBloco->addColuna("elemento_despesa"); + $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("NUMERICO_ESPACOS_ESQ"); + $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(8); + + $obExportador->roUltimoArquivo->roUltimoBloco->addColuna("fonte_recurso"); + $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("NUMERICO_ESPACOS_ESQ"); + $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(4); + + $obExportador->roUltimoArquivo->roUltimoBloco->addColuna("competencia"); + $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("ALFANUMERICO_ESPACOS_DIR"); + $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(6); + + unset($obTTCMBAEditalDotacao); + unset($rsEditalDotacao); +?> \ No newline at end of file diff --git a/gestaoPrestacaoContas/fontes/PHP/TCMBA/instancias/layout_arquivos/2015/FiscalCadastro.inc.php b/gestaoPrestacaoContas/fontes/PHP/TCMBA/instancias/layout_arquivos/2015/FiscalCadastro.inc.php index 25bfd88..0e4ba4b 100644 --- a/gestaoPrestacaoContas/fontes/PHP/TCMBA/instancias/layout_arquivos/2015/FiscalCadastro.inc.php +++ b/gestaoPrestacaoContas/fontes/PHP/TCMBA/instancias/layout_arquivos/2015/FiscalCadastro.inc.php @@ -26,10 +26,10 @@ /** * Página de Include Oculta - Exportação Arquivos GF - * Data de Criação : 19/10/2007 + * Data de Criação: 02/10/2015 - * @author Analista: Gelson Wolvowski Gonçalves - * @author Desenvolvedor: Henrique Girardi dos Santos + * @author Analista: Valtair Santos + * @author Desenvolvedor: Carlos Adriano * @ignore @@ -44,9 +44,9 @@ $obTTBAFiscalCadastro = new TTBAFiscalCadastro(); $obTTBAFiscalCadastro->setDado('mes' , $inMes); $obTTBAFiscalCadastro->setDado('entidades' , $stEntidades); $obTTBAFiscalCadastro->setDado('unidade_gestora', $inCodUnidadeGestora); -$obTTBAFiscalCadastro->setDado('exercicio' , Sessao::getExercicio()); +$obTTBAFiscalCadastro->setDado('exercicio' , Sessao::getExercicio()); $obTTBAFiscalCadastro->setDado('dt_inicial' , $stDataInicial); -$obTTBAFiscalCadastro->setDado('dt_final' , $stDataFinal); +$obTTBAFiscalCadastro->setDado('dt_final' , $stDataFinal); $obTTBAFiscalCadastro->recuperaDadosTribunal($rsFiscalCadastro); $obExportador->roUltimoArquivo->addBloco($rsFiscalCadastro); @@ -78,6 +78,7 @@ $obExportador->roUltimoArquivo->roUltimoBloco->addColuna("competencia"); $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("NUMERICO_ESPACOS_ESQ"); $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(6); - unset($obTTBAFiscalCadastro); -unset($rsFiscalCadastro); \ No newline at end of file +unset($rsFiscalCadastro); + +?> \ No newline at end of file diff --git a/gestaoPrestacaoContas/fontes/PHP/TCMBA/instancias/layout_arquivos/2015/FolhaPgt.inc.php b/gestaoPrestacaoContas/fontes/PHP/TCMBA/instancias/layout_arquivos/2015/FolhaPgt.inc.php new file mode 100644 index 0000000..364a981 --- /dev/null +++ b/gestaoPrestacaoContas/fontes/PHP/TCMBA/instancias/layout_arquivos/2015/FolhaPgt.inc.php @@ -0,0 +1,96 @@ +setDado('unidade_gestora' , $inCodUnidadeGestora); + $obTTCMBAFolhaPgt->setDado('data_inicial' , $stDataInicial ); + $obTTCMBAFolhaPgt->setDado('data_final' , $stDataFinal ); + $obTTCMBAFolhaPgt->setDado('entidades' , $stEntidades ); + + $obTTCMBAFolhaPgt->recuperaTribunal( $rsArquivo ); + + $obExportador->roUltimoArquivo->addBloco( $rsArquivo ); + + $obExportador->roUltimoArquivo->roUltimoBloco->addColuna("tipo_registro"); + $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("NUMERICO_ESPACOS_ESQ"); + $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(1); + + $obExportador->roUltimoArquivo->roUltimoBloco->addColuna("unidade_gestora"); + $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("NUMERICO_ESPACOS_ESQ"); + $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(4); + + $obExportador->roUltimoArquivo->roUltimoBloco->addColuna("unidade_orcamentaria"); + $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("NUMERICO_ESPACOS_ESQ"); + $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(4); + + $obExportador->roUltimoArquivo->roUltimoBloco->addColuna("num_empenho"); + $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("NUMERICO_ESPACOS_ESQ"); + $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(10); + + $obExportador->roUltimoArquivo->roUltimoBloco->addColuna("dt_pagamento_empenho"); + $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("DATA_DDMMYYYY"); + $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(8); + + $obExportador->roUltimoArquivo->roUltimoBloco->addColuna("ano_referencia"); + $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("NUMERICO_ESPACOS_ESQ"); + $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(4); + + $obExportador->roUltimoArquivo->roUltimoBloco->addColuna("mes_referencia"); + $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("NUMERICO_ESPACOS_ESQ"); + $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(2); + + $obExportador->roUltimoArquivo->roUltimoBloco->addColuna("exercicio"); + $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("NUMERICO_ESPACOS_ESQ"); + $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(4); + + $obExportador->roUltimoArquivo->roUltimoBloco->addColuna("objeto"); + $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("ALFANUMERICO_ESPACOS_DIR"); + $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(120); + + $obExportador->roUltimoArquivo->roUltimoBloco->addColuna("vl_pago"); + $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("VALOR_ZEROS_ESQ"); + $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(16); + + $obExportador->roUltimoArquivo->roUltimoBloco->addColuna("competencia"); + $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("NUMERICO_ESPACOS_ESQ"); + $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(6); + + $obExportador->roUltimoArquivo->roUltimoBloco->addColuna("cod_orgao"); + $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("NUMERICO_ESPACOS_ESQ"); + $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(4); + + $obExportador->roUltimoArquivo->roUltimoBloco->addColuna("subempenho"); + $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("NUMERICO_ESPACOS_ESQ"); + $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(10); + +unset($obTTCMBAFolhaPgt); +unset($rsArquivo); + +?> diff --git a/gestaoPrestacaoContas/fontes/PHP/TCMBA/instancias/layout_arquivos/2015/ObraMedicao.inc.php b/gestaoPrestacaoContas/fontes/PHP/TCMBA/instancias/layout_arquivos/2015/ObraMedicao.inc.php index 04fc15f..6ffb35f 100644 --- a/gestaoPrestacaoContas/fontes/PHP/TCMBA/instancias/layout_arquivos/2015/ObraMedicao.inc.php +++ b/gestaoPrestacaoContas/fontes/PHP/TCMBA/instancias/layout_arquivos/2015/ObraMedicao.inc.php @@ -61,6 +61,10 @@ $obExportador->roUltimoArquivo->roUltimoBloco->addColuna("dt_final_medicao"); $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("DATA_DDMMYYYY"); $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(8); + + $obExportador->roUltimoArquivo->roUltimoBloco->addColuna("data_medicao"); + $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("DATA_DDMMYYYY"); + $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(8); $obExportador->roUltimoArquivo->roUltimoBloco->addColuna("vl_medicao"); $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("VALOR_ZEROS_ESQ"); @@ -96,7 +100,11 @@ $obExportador->roUltimoArquivo->roUltimoBloco->addColuna("cpf_cnpj_resp_2"); $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("ALFANUMERICO_ESPACOS_DIR"); - $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(16); + $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(16); + + $obExportador->roUltimoArquivo->roUltimoBloco->addColuna("registro_classe_2"); + $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("ALFANUMERICO_ESPACOS_DIR"); + $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(16); $obExportador->roUltimoArquivo->roUltimoBloco->addColuna("matricula_fiscal_2"); $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("ALFANUMERICO_ESPACOS_DIR"); diff --git a/gestaoPrestacaoContas/fontes/PHP/TCMBA/instancias/layout_arquivos/2015/PagEmp2.inc.php b/gestaoPrestacaoContas/fontes/PHP/TCMBA/instancias/layout_arquivos/2015/PagEmp2.inc.php index 586d5d6..97a2990 100644 --- a/gestaoPrestacaoContas/fontes/PHP/TCMBA/instancias/layout_arquivos/2015/PagEmp2.inc.php +++ b/gestaoPrestacaoContas/fontes/PHP/TCMBA/instancias/layout_arquivos/2015/PagEmp2.inc.php @@ -36,81 +36,111 @@ $Revision:$ $Name$ $Author:$ - $Date: 2015-10-05 14:43:17 -0300 (Seg, 05 Out 2015) $ + $Date: 2015-11-13 15:59:02 -0200 (Sex, 13 Nov 2015) $ $Id:$ */ - include_once( CAM_GPC_TCMBA_MAPEAMENTO.Sessao::getExercicio()."/TTBAPagamento.class.php" ); - $obTTBAPagamento = new TTBAPagamento(); - $obTTBAPagamento->setDado('inMes' , $inMes ); - $obTTBAPagamento->setDado('stEntidades' , $stEntidades ); - $obTTBAPagamento->setDado('dt_inicial' , $stDataInicial ); - $obTTBAPagamento->setDado('dt_final' , $stDataFinal ); - $obTTBAPagamento->setDado('inCodGestora' , $inCodUnidadeGestora ); - - $obTTBAPagamento->recuperaDadosTribunal($rsPagamentos ,"","",$boTransacao); - - $obExportador->roUltimoArquivo->addBloco($rsPagamentos); - - $obExportador->roUltimoArquivo->roUltimoBloco->addColuna("tp_registro"); - $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("NUMERICO_ESPACOS_ESQ"); - $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(1); - - $obExportador->roUltimoArquivo->roUltimoBloco->addColuna("unidade_gestora"); //unidade_gestora - $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("NUMERICO_ESPACOS_ESQ"); - $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(4); - - $obExportador->roUltimoArquivo->roUltimoBloco->addColuna("cod_unidade");// num_unidade gestora - $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("NUMERICO_ESPACOS_ESQ"); - $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(4); - - $obExportador->roUltimoArquivo->roUltimoBloco->addColuna("cod_empenho"); - $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("CARACTER_ESPACOS_ESQ"); - $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(10); - - $obExportador->roUltimoArquivo->roUltimoBloco->addColuna("data_pagamento"); - $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("DATA_DDMMYYYY"); - $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(8); - - $obExportador->roUltimoArquivo->roUltimoBloco->addColuna("exercicio"); - $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("NUMERICO_ESPACOS_ESQ"); - $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(4); - - $obExportador->roUltimoArquivo->roUltimoBloco->addColuna("vl_pago"); - $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("VALOR_ZEROS_ESQ"); - $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(16); - - $obExportador->roUltimoArquivo->roUltimoBloco->addColuna("cod_estrutural"); - $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("CARACTER_ESPACOS_DIR"); - $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(34); - - $obExportador->roUltimoArquivo->roUltimoBloco->addColuna("cod_tipo_documento"); - $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("NUMERICO_ESPACOS_ESQ"); - $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(1); - - $obExportador->roUltimoArquivo->roUltimoBloco->addColuna("num_documento"); - $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("NUMERICO_ESPACOS_ESQ"); - $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(8); - - $obExportador->roUltimoArquivo->roUltimoBloco->addColuna("nu_processo"); - $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("NUMERICO_ESPACOS_ESQ"); - $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(20); - - $obExportador->roUltimoArquivo->roUltimoBloco->addColuna("competencia"); - $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("NUMERICO_ESPACOS_ESQ"); - $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(6); - - $obExportador->roUltimoArquivo->roUltimoBloco->addColuna("cod_orgao"); //num_orgao - $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("NUMERICO_ESPACOS_ESQ"); - $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(4); - - $obExportador->roUltimoArquivo->roUltimoBloco->addColuna("cod_empenho"); - $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("NUMERICO_ESPACOS_ESQ"); - $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(10); - - $obExportador->roUltimoArquivo->roUltimoBloco->addColuna("resto"); - $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("CARACTER_ESPACOS_ESQ"); - $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(1); +include_once CAM_GPC_TCMBA_MAPEAMENTO.Sessao::getExercicio().'/TTBAPagamento.class.php'; +$obTTBAPagamento = new TTBAPagamento(); +$obTTBAPagamento->setDado('inMes' , $inMes ); +$obTTBAPagamento->setDado('stEntidades' , $stEntidades ); +$obTTBAPagamento->setDado('dt_inicial' , $stDataInicial ); +$obTTBAPagamento->setDado('dt_final' , $stDataFinal ); +$obTTBAPagamento->setDado('inCodGestora' , $inCodUnidadeGestora ); + +#Teste de Erro +if($arFiltro['stInformativoErro']=='Sim'){ + $obTTBAPagamento->recuperaLogErro($rsLogErro); + + //Variável $boLogErro para se houver algum erro que impeça a geração do arquivo + $boLogErro = false; + if( !$rsLogErro->eof() ){ + $arLogErrosTemp = array(); + $inRegistros = $rsLogErro->getCampo("registros"); + $inObrigatorio = $rsLogErro->getCampo("obrigatorio"); + + if( $inRegistros > 0 && ( $inObrigatorio == 0 || $inObrigatorio <> $inRegistros ) ){ + $arLogErrosTemp['nome_arquivo'] = $stArquivo; + if( $inObrigatorio==0 ){ + $arLogErrosTemp['erro'] = 'Obrigatório informar o Tipo de Pagamento TCM-BA em: Gestão Financeira :: Tesouraria :: Pagamentos :: Orçamentária - Pagamentos'; + }elseif( $inObrigatorio <> $inRegistros ){ + $arLogErrosTemp['erro'] = 'Foram realizados pagamentos sem informar o Tipo de Pagamento TCM-BA(Obrigatório) em: Gestão Financeira :: Tesouraria :: Pagamentos :: Orçamentária - Pagamentos'; + } + + $arLogErros[] = $arLogErrosTemp; + } + + unset($arLogErrosTemp); + } + unset($rsLogErro); +} +#Fim Teste de Erro + +$rsPagamentos = new RecordSet(); +if( !$boLogErro ) + $obTTBAPagamento->recuperaDadosTribunal($rsPagamentos ,"","",$boTransacao); + +$obExportador->roUltimoArquivo->addBloco($rsPagamentos); + +$obExportador->roUltimoArquivo->roUltimoBloco->addColuna("tp_registro"); +$obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("NUMERICO_ESPACOS_ESQ"); +$obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(1); + +$obExportador->roUltimoArquivo->roUltimoBloco->addColuna("unidade_gestora"); //unidade_gestora +$obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("NUMERICO_ESPACOS_ESQ"); +$obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(4); + +$obExportador->roUltimoArquivo->roUltimoBloco->addColuna("cod_unidade");// num_unidade gestora +$obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("NUMERICO_ESPACOS_ESQ"); +$obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(4); + +$obExportador->roUltimoArquivo->roUltimoBloco->addColuna("cod_empenho"); +$obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("CARACTER_ESPACOS_ESQ"); +$obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(10); + +$obExportador->roUltimoArquivo->roUltimoBloco->addColuna("data_pagamento"); +$obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("DATA_DDMMYYYY"); +$obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(8); + +$obExportador->roUltimoArquivo->roUltimoBloco->addColuna("exercicio"); +$obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("NUMERICO_ESPACOS_ESQ"); +$obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(4); + +$obExportador->roUltimoArquivo->roUltimoBloco->addColuna("vl_pago"); +$obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("VALOR_ZEROS_ESQ"); +$obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(16); + +$obExportador->roUltimoArquivo->roUltimoBloco->addColuna("cod_estrutural"); +$obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("CARACTER_ESPACOS_DIR"); +$obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(34); + +$obExportador->roUltimoArquivo->roUltimoBloco->addColuna("cod_tipo"); +$obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("NUMERICO_ESPACOS_ESQ"); +$obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(1); + +$obExportador->roUltimoArquivo->roUltimoBloco->addColuna("num_documento"); +$obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("NUMERICO_ESPACOS_ESQ"); +$obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(8); + +$obExportador->roUltimoArquivo->roUltimoBloco->addColuna("nu_processo"); +$obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("NUMERICO_ESPACOS_ESQ"); +$obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(20); + +$obExportador->roUltimoArquivo->roUltimoBloco->addColuna("competencia"); +$obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("NUMERICO_ESPACOS_ESQ"); +$obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(6); + +$obExportador->roUltimoArquivo->roUltimoBloco->addColuna("cod_orgao"); //num_orgao +$obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("NUMERICO_ESPACOS_ESQ"); +$obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(4); + +$obExportador->roUltimoArquivo->roUltimoBloco->addColuna("cod_empenho"); +$obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("NUMERICO_ESPACOS_ESQ"); +$obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(10); + +$obExportador->roUltimoArquivo->roUltimoBloco->addColuna("resto"); +$obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("CARACTER_ESPACOS_ESQ"); +$obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(1); unset($obTTBAPagamento); unset($rsPagamentos); diff --git a/gestaoPrestacaoContas/fontes/PHP/TCMBA/instancias/layout_arquivos/2015/PagRetEmpres.inc.php b/gestaoPrestacaoContas/fontes/PHP/TCMBA/instancias/layout_arquivos/2015/PagRetEmpres.inc.php index 6120a05..a8a3cca 100644 --- a/gestaoPrestacaoContas/fontes/PHP/TCMBA/instancias/layout_arquivos/2015/PagRetEmpres.inc.php +++ b/gestaoPrestacaoContas/fontes/PHP/TCMBA/instancias/layout_arquivos/2015/PagRetEmpres.inc.php @@ -33,109 +33,140 @@ * @ignore - $Id: PagRetencao.inc.php 63484 2015-09-01 17:16:10Z michel $ + $Id: PagRetEmpres.inc.php 64046 2015-11-23 18:41:29Z lisiane $ */ include_once CAM_GPC_TCMBA_MAPEAMENTO.Sessao::getExercicio().'/TTBAPagamentoRetencaoEmpresa.class.php'; - $obTTBAPagamentoRetencaoEmpresa = new TTBAPagamentoRetencaoEmpresa(); - $obTTBAPagamentoRetencaoEmpresa->setDado('stEntidade' , $stEntidades ); - $obTTBAPagamentoRetencaoEmpresa->setDado('stExercicio' , Sessao::getExercicio() ); - $obTTBAPagamentoRetencaoEmpresa->setDado('inMes' , $inMes ); - $obTTBAPagamentoRetencaoEmpresa->setDado('dtInicio' , $stDataInicial ); - $obTTBAPagamentoRetencaoEmpresa->setDado('dtFim' , $stDataFinal ); - $obTTBAPagamentoRetencaoEmpresa->setDado('inCodGestora', $inCodUnidadeGestora ); +$obTTBAPagamentoRetencaoEmpresa = new TTBAPagamentoRetencaoEmpresa(); +$obTTBAPagamentoRetencaoEmpresa->setDado('stEntidade' , $stEntidades ); +$obTTBAPagamentoRetencaoEmpresa->setDado('stExercicio' , Sessao::getExercicio() ); +$obTTBAPagamentoRetencaoEmpresa->setDado('inMes' , $inMes ); +$obTTBAPagamentoRetencaoEmpresa->setDado('dtInicio' , $stDataInicial ); +$obTTBAPagamentoRetencaoEmpresa->setDado('dtFim' , $stDataFinal ); +$obTTBAPagamentoRetencaoEmpresa->setDado('inCodGestora', $inCodUnidadeGestora ); + +#Teste de Erro +if($arFiltro['stInformativoErro']=='Sim'){ + $obTTBAPagamentoRetencaoEmpresa->recuperaLogErro($rsLogErro); + + //Variável $boLogErro para se houver algum erro que impeça a geração do arquivo + $boLogErro = false; + if( !$rsLogErro->eof( )){ + $arLogErrosTemp = array(); + $inRegistros = $rsLogErro->getCampo("registros"); + $inObrigatorio = $rsLogErro->getCampo("obrigatorio"); + + if( $inRegistros > 0 && ( $inObrigatorio == 0 || $inObrigatorio <> $inRegistros ) ){ + $arLogErrosTemp['nome_arquivo'] = $stArquivo; + if( $inObrigatorio==0 ){ + $arLogErrosTemp['erro'] = 'Obrigatório informar o Tipo de Pagamento TCM-BA em: Gestão Financeira :: Tesouraria :: Pagamentos :: Orçamentária - Pagamentos'; + }elseif( $inObrigatorio <> $inRegistros ){ + $arLogErrosTemp['erro'] = 'Foram realizados pagamentos sem informar o Tipo de Pagamento TCM-BA(Obrigatório) em: Gestão Financeira :: Tesouraria :: Pagamentos :: Orçamentária - Pagamentos'; + } + + $arLogErros[] = $arLogErrosTemp; + } + + unset($arLogErrosTemp); + } + unset($rsLogErro); +} +#Fim Teste de Erro + +$rsPagamentoRetencaoEmpresa = new RecordSet(); +if( !$boLogErro ) $obTTBAPagamentoRetencaoEmpresa->recuperaDadosTribunal($rsPagamentoRetencaoEmpresa); - - $obExportador->roUltimoArquivo->addBloco($rsPagamentoRetencaoEmpresa); - $obExportador->roUltimoArquivo->roUltimoBloco->addColuna("tipo_registro"); - $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("NUMERICO_ESPACOS_ESQ"); - $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(1); - - $obExportador->roUltimoArquivo->roUltimoBloco->addColuna("unidade_gestora"); - $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("NUMERICO_ZEROS_ESQ"); - $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(4); - - $obExportador->roUltimoArquivo->roUltimoBloco->addColuna("espaco_branco"); - $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("NUMERICO_ZEROS_ESQ"); - $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(4); - - $obExportador->roUltimoArquivo->roUltimoBloco->addColuna("espaco_branco"); - $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("NUMERICO_ZEROS_ESQ"); - $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(4); - - $obExportador->roUltimoArquivo->roUltimoBloco->addColuna("num_pagamento"); - $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("NUMERICO_ESPACOS_ESQ"); - $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(4); - - $obExportador->roUltimoArquivo->roUltimoBloco->addColuna("conta_contabil"); - $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("CARACTER_ESPACOS_DIR"); - $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(34); - - $obExportador->roUltimoArquivo->roUltimoBloco->addColuna("vl_pagamento_retencao"); - $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("VALOR_ZEROS_ESQ"); - $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(16); - - $obExportador->roUltimoArquivo->roUltimoBloco->addColuna("competencia"); - $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("NUMERICO_ESPACOS_ESQ"); - $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(6); - - $obExportador->roUltimoArquivo->roUltimoBloco->addColuna("dt_pagamento_retencao"); - $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("DATA_DDMMYYYY"); - $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(8); - - $obExportador->roUltimoArquivo->roUltimoBloco->addColuna("conta_contabil_pagadora_1"); - $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("CARACTER_ESPACOS_DIR"); - $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(34); - - $obExportador->roUltimoArquivo->roUltimoBloco->addColuna("conta_contabil_pagadora_2"); - $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("CARACTER_ESPACOS_DIR"); - $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(34); - - $obExportador->roUltimoArquivo->roUltimoBloco->addColuna("conta_contabil_pagadora_3"); - $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("CARACTER_ESPACOS_DIR"); - $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(34); - - $obExportador->roUltimoArquivo->roUltimoBloco->addColuna("tipo_pagamento_1"); - $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("NUMERICO_ESPACOS_ESQ"); - $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(1); - - $obExportador->roUltimoArquivo->roUltimoBloco->addColuna("tipo_pagamento_2"); - $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("NUMERICO_ESPACOS_ESQ"); - $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(1); - - $obExportador->roUltimoArquivo->roUltimoBloco->addColuna("tipo_pagamento_3"); - $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("NUMERICO_ESPACOS_ESQ"); - $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(1); - - $obExportador->roUltimoArquivo->roUltimoBloco->addColuna("detalhe_tipo_pagamento_1"); - $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("NUMERICO_ESPACOS_ESQ"); - $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(8); - - $obExportador->roUltimoArquivo->roUltimoBloco->addColuna("detalhe_tipo_pagamento_2"); - $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("NUMERICO_ESPACOS_ESQ"); - $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(8); - - $obExportador->roUltimoArquivo->roUltimoBloco->addColuna("detalhe_tipo_pagamento_3"); - $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("NUMERICO_ESPACOS_ESQ"); - $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(8); - - $obExportador->roUltimoArquivo->roUltimoBloco->addColuna("vl_pagamento_retencao_1"); - $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("VALOR_ZEROS_ESQ"); - $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(16); - - $obExportador->roUltimoArquivo->roUltimoBloco->addColuna("vl_pagamento_retencao_2"); - $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("VALOR_ZEROS_ESQ"); - $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(16); - - $obExportador->roUltimoArquivo->roUltimoBloco->addColuna("vl_pagamento_retencao_3"); - $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("VALOR_ZEROS_ESQ"); - $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(16); - - $obExportador->roUltimoArquivo->roUltimoBloco->addColuna("ano_criacao"); - $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("NUMERICO_ESPACOS_ESQ"); - $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(4); - - unset($obTTBAPagamentoRetencaoEmpresa); - unset($rsPagamentoRetencaoEmpresa); + +$obExportador->roUltimoArquivo->addBloco($rsPagamentoRetencaoEmpresa); +$obExportador->roUltimoArquivo->roUltimoBloco->addColuna("tipo_registro"); +$obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("NUMERICO_ESPACOS_ESQ"); +$obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(1); + +$obExportador->roUltimoArquivo->roUltimoBloco->addColuna("unidade_gestora"); +$obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("NUMERICO_ZEROS_ESQ"); +$obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(4); + +$obExportador->roUltimoArquivo->roUltimoBloco->addColuna("espaco_branco"); +$obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("ALFANUMERICO_ESPACOS_DIR"); +$obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(4); + +$obExportador->roUltimoArquivo->roUltimoBloco->addColuna("espaco_branco"); +$obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("ALFANUMERICO_ESPACOS_DIR"); +$obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(4); + +$obExportador->roUltimoArquivo->roUltimoBloco->addColuna("num_pagamento"); +$obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("NUMERICO_ESPACOS_ESQ"); +$obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(10); + +$obExportador->roUltimoArquivo->roUltimoBloco->addColuna("conta_contabil"); +$obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("ALFANUMERICO_ESPACOS_DIR"); +$obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(34); + +$obExportador->roUltimoArquivo->roUltimoBloco->addColuna("vl_pagamento_retencao"); +$obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("VALOR_ZEROS_ESQ"); +$obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(16); + +$obExportador->roUltimoArquivo->roUltimoBloco->addColuna("competencia"); +$obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("NUMERICO_ESPACOS_ESQ"); +$obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(6); + +$obExportador->roUltimoArquivo->roUltimoBloco->addColuna("dt_pagamento_retencao"); +$obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("DATA_DDMMYYYY"); +$obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(8); + +$obExportador->roUltimoArquivo->roUltimoBloco->addColuna("conta_contabil_pagadora"); +$obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("ALFANUMERICO_ESPACOS_DIR"); +$obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(34); + +$obExportador->roUltimoArquivo->roUltimoBloco->addColuna("conta_contabil_pagadora_2"); +$obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("CARACTER_ESPACOS_DIR"); +$obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(34); + +$obExportador->roUltimoArquivo->roUltimoBloco->addColuna("conta_contabil_pagadora_3"); +$obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("CARACTER_ESPACOS_DIR"); +$obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(34); + +$obExportador->roUltimoArquivo->roUltimoBloco->addColuna("tipo_pagamento"); +$obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("ALFANUMERICO_ESPACOS_DIR"); +$obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(1); + +$obExportador->roUltimoArquivo->roUltimoBloco->addColuna("tipo_pagamento_2"); +$obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("NUMERICO_ESPACOS_ESQ"); +$obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(1); + +$obExportador->roUltimoArquivo->roUltimoBloco->addColuna("tipo_pagamento_3"); +$obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("NUMERICO_ESPACOS_ESQ"); +$obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(1); + +$obExportador->roUltimoArquivo->roUltimoBloco->addColuna("detalhe_tipo_pagamento"); +$obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("NUMERICO_ESPACOS_ESQ"); +$obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(8); + +$obExportador->roUltimoArquivo->roUltimoBloco->addColuna("detalhe_tipo_pagamento_2"); +$obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("NUMERICO_ESPACOS_ESQ"); +$obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(8); + +$obExportador->roUltimoArquivo->roUltimoBloco->addColuna("detalhe_tipo_pagamento_3"); +$obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("NUMERICO_ESPACOS_ESQ"); +$obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(8); + +$obExportador->roUltimoArquivo->roUltimoBloco->addColuna("vl_pagamento_retencao_1"); +$obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("VALOR_ZEROS_ESQ"); +$obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(16); + +$obExportador->roUltimoArquivo->roUltimoBloco->addColuna("vl_pagamento_retencao_2"); +$obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("VALOR_ZEROS_ESQ"); +$obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(16); + +$obExportador->roUltimoArquivo->roUltimoBloco->addColuna("vl_pagamento_retencao_3"); +$obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("VALOR_ZEROS_ESQ"); +$obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(16); + +$obExportador->roUltimoArquivo->roUltimoBloco->addColuna("ano_criacao"); +$obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("NUMERICO_ESPACOS_ESQ"); +$obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(4); + +unset($obTTBAPagamentoRetencaoEmpresa); +unset($rsPagamentoRetencaoEmpresa); ?> \ No newline at end of file diff --git a/gestaoPrestacaoContas/fontes/PHP/TCMBA/instancias/layout_arquivos/2015/PagRetencao.inc.php b/gestaoPrestacaoContas/fontes/PHP/TCMBA/instancias/layout_arquivos/2015/PagRetencao.inc.php index 799e84f..4fafa22 100644 --- a/gestaoPrestacaoContas/fontes/PHP/TCMBA/instancias/layout_arquivos/2015/PagRetencao.inc.php +++ b/gestaoPrestacaoContas/fontes/PHP/TCMBA/instancias/layout_arquivos/2015/PagRetencao.inc.php @@ -33,18 +33,49 @@ * @ignore - $Id: PagRetencao.inc.php 63484 2015-09-01 17:16:10Z michel $ + $Id: PagRetencao.inc.php 63895 2015-11-03 18:27:25Z lisiane $ */ include_once CAM_GPC_TCMBA_MAPEAMENTO.Sessao::getExercicio().'/TTBAPagamentoRetencao.class.php'; $obTTBAPagamentoRetencao = new TTBAPagamentoRetencao(); $obTTBAPagamentoRetencao->setDado('inMes' , $inMes ); -$obTTBAPagamentoRetencao->setDado('stEntidades' , $stEntidades ); +$obTTBAPagamentoRetencao->setDado('entidades' , $stEntidades ); $obTTBAPagamentoRetencao->setDado('unidade_gestora' , $inCodUnidadeGestora ); -$obTTBAPagamentoRetencao->setDado('dt_inicial' , $stDataInicial ); -$obTTBAPagamentoRetencao->setDado('dt_final' , $stDataFinal ); -$obTTBAPagamentoRetencao->recuperaDadosTribunal($rsArquivo); +$obTTBAPagamentoRetencao->setDado('data_inicial' , $stDataInicial ); +$obTTBAPagamentoRetencao->setDado('data_final' , $stDataFinal ); + +#Teste de Erro +if($arFiltro['stInformativoErro']=='Sim'){ + $obTTBAPagamentoRetencao->recuperaLogErro($rsLogErro); + + //Variável $boLogErro para se houver algum erro que impeça a geração do arquivo + $boLogErro = false; + if( !$rsLogErro->eof( )){ + $arLogErrosTemp = array(); + $inRegistros = $rsLogErro->getCampo("registros"); + $inObrigatorio = $rsLogErro->getCampo("obrigatorio"); + + if( $inRegistros > 0 && ( $inObrigatorio == 0 || $inObrigatorio <> $inRegistros ) ){ + $arLogErrosTemp['nome_arquivo'] = $stArquivo; + if( $inObrigatorio==0 ){ + $arLogErrosTemp['erro'] = 'Obrigatório informar o Tipo de Pagamento TCM-BA em: Gestão Financeira :: Tesouraria :: Pagamentos :: Orçamentária - Pagamentos'; + }elseif( $inObrigatorio <> $inRegistros ){ + $arLogErrosTemp['erro'] = 'Foram realizados pagamentos sem informar o Tipo de Pagamento TCM-BA(Obrigatório) em: Gestão Financeira :: Tesouraria :: Pagamentos :: Orçamentária - Pagamentos'; + } + + $arLogErros[] = $arLogErrosTemp; + } + + unset($arLogErrosTemp); + } + unset($rsLogErro); +} +#Fim Teste de Erro + +$rsArquivo = new RecordSet(); +if( !$boLogErro ) + $obTTBAPagamentoRetencao->recuperaDadosTribunal($rsArquivo); $obExportador->roUltimoArquivo->addBloco($rsArquivo); $obExportador->roUltimoArquivo->roUltimoBloco->addColuna("tipo_registro"); @@ -64,18 +95,18 @@ $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("NUME $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(4); $obExportador->roUltimoArquivo->roUltimoBloco->addColuna("num_empenho"); -$obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("CARACTER_ESPACOS_ESQ"); +$obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("NUMERICO_ESPACOS_ESQ"); $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(10); $obExportador->roUltimoArquivo->roUltimoBloco->addColuna("num_sub_empenho"); -$obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("CARACTER_ESPACOS_ESQ"); +$obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("NUMERICO_ESPACOS_ESQ"); $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(10); $obExportador->roUltimoArquivo->roUltimoBloco->addColuna("conta_contabil"); -$obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("CARACTER_ESPACOS_DIR"); +$obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("ALFANUMERICO_ESPACOS_DIR"); $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(34); -$obExportador->roUltimoArquivo->roUltimoBloco->addColuna("vl_pagamento_retencao"); +$obExportador->roUltimoArquivo->roUltimoBloco->addColuna("vl_total_retencao"); $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("VALOR_ZEROS_ESQ"); $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(16); @@ -83,20 +114,20 @@ $obExportador->roUltimoArquivo->roUltimoBloco->addColuna("competencia"); $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("NUMERICO_ESPACOS_ESQ"); $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(6); -$obExportador->roUltimoArquivo->roUltimoBloco->addColuna("dt_pagamento_retencao"); +$obExportador->roUltimoArquivo->roUltimoBloco->addColuna("dt_pagamento"); $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("DATA_DDMMYYYY"); $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(8); -$obExportador->roUltimoArquivo->roUltimoBloco->addColuna("conta_contabil_pagadora"); -$obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("CARACTER_ESPACOS_DIR"); +$obExportador->roUltimoArquivo->roUltimoBloco->addColuna("conta_pagadora"); +$obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("ALFANUMERICO_ESPACOS_DIR"); $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(34); -$obExportador->roUltimoArquivo->roUltimoBloco->addColuna("conta_contabil_pagadora2"); -$obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("CARACTER_ESPACOS_DIR"); +$obExportador->roUltimoArquivo->roUltimoBloco->addColuna("conta_pagadora2"); +$obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("ALFANUMERICO_ESPACOS_DIR"); $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(34); -$obExportador->roUltimoArquivo->roUltimoBloco->addColuna("conta_contabil_pagadora3"); -$obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("CARACTER_ESPACOS_DIR"); +$obExportador->roUltimoArquivo->roUltimoBloco->addColuna("conta_pagadora3"); +$obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("ALFANUMERICO_ESPACOS_DIR"); $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(34); $obExportador->roUltimoArquivo->roUltimoBloco->addColuna("tipo_pagamento"); @@ -135,6 +166,6 @@ $obExportador->roUltimoArquivo->roUltimoBloco->addColuna("vl_pagamento_retencao3 $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("VALOR_ZEROS_ESQ"); $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(16); -$obExportador->roUltimoArquivo->roUltimoBloco->addColuna("ano_criacao"); +$obExportador->roUltimoArquivo->roUltimoBloco->addColuna("exercicio"); $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("NUMERICO_ESPACOS_ESQ"); $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(4); diff --git a/gestaoPrestacaoContas/fontes/PHP/TCMBA/instancias/layout_arquivos/2015/Patrimonio.inc.php b/gestaoPrestacaoContas/fontes/PHP/TCMBA/instancias/layout_arquivos/2015/Patrimonio.inc.php index 5404466..6f85d1f 100644 --- a/gestaoPrestacaoContas/fontes/PHP/TCMBA/instancias/layout_arquivos/2015/Patrimonio.inc.php +++ b/gestaoPrestacaoContas/fontes/PHP/TCMBA/instancias/layout_arquivos/2015/Patrimonio.inc.php @@ -33,7 +33,7 @@ * @ignore - $Revision: 62965 $ + $Revision: 64083 $ $Name$ $Author: hboaventura $ $Date: 2008-08-21 11:36:17 -0300 (Qui, 21 Ago 2008) $ @@ -49,7 +49,12 @@ $obTTCMBAPatrimonio->setDado('dt_inicio', $arFiltro['stDataInicial']); $obTTCMBAPatrimonio->setDado('dt_fim' , $arFiltro['stDataFinal']); $obTTCMBAPatrimonio->setDado('inCodGestora', $inCodUnidadeGestora ); - + + if ($stTipoPeriodicidade == "aquisicao" || $stTipoPeriodicidade == "") { + $obTTCMBAPatrimonio->setDado('tipoPeriodo', "dt_aquisicao" ); + } else { + $obTTCMBAPatrimonio->setDado('tipoPeriodo', "dt_incorporacao" ); + } $obTTCMBAPatrimonio->recuperaDadosTribunal($rsPatrimonio); $inCount = 1; diff --git a/gestaoPrestacaoContas/fontes/PHP/TCMBA/instancias/layout_arquivos/2015/Pessoal.inc.php b/gestaoPrestacaoContas/fontes/PHP/TCMBA/instancias/layout_arquivos/2015/Pessoal.inc.php new file mode 100644 index 0000000..fcf7a6e --- /dev/null +++ b/gestaoPrestacaoContas/fontes/PHP/TCMBA/instancias/layout_arquivos/2015/Pessoal.inc.php @@ -0,0 +1,231 @@ + +recuperaPeriodoMovimentacao($rsPeriodoMovimentacao,$stFiltroPeriodo,"",$boTransacao,"folhapagamento"); +$inCodPeriodoMovimentacao = $rsPeriodoMovimentacao->getCampo('cod_periodo_movimentacao'); + +$obTTCMBAPessoal = new TTCMBAPessoal(); +$obTTCMBAPessoal->setDado("data_inicial" , $stDataInicial ); +$obTTCMBAPessoal->setDado("data_final" , $stDataFinal ); +$obTTCMBAPessoal->setDado("unidade_gestora" , $inCodUnidadeGestora ); +$obTTCMBAPessoal->setDado("entidades" , $stEntidadeRH ); +$obTTCMBAPessoal->setDado("periodo_movimentacao" , $inCodPeriodoMovimentacao ); +$obTTCMBAPessoal->setDado("competencia" , Sessao::getExercicio().$inMes ); + +$obTTCMBAPessoal->recuperaPessoal( $rsPessoal ,"","",$boTransacao); + +$obExportador->roUltimoArquivo->addBloco( $rsPessoal ); + +$obExportador->roUltimoArquivo->roUltimoBloco->addColuna("tipo_registro"); +$obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("NUMERICO_ESPACOS_ESQ"); +$obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(1); + +$obExportador->roUltimoArquivo->roUltimoBloco->addColuna("unidade_gestora"); +$obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("NUMERICO_ESPACOS_ESQ"); +$obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(4); + +$obExportador->roUltimoArquivo->roUltimoBloco->addColuna("cod_cargo"); +$obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("ALFANUMERICO_ESPACOS_DIR"); +$obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(10); + +$obExportador->roUltimoArquivo->roUltimoBloco->addColuna("tipo_ato"); +$obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("NUMERICO_ESPACOS_ESQ"); +$obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(2); + +$obExportador->roUltimoArquivo->roUltimoBloco->addColuna("matricula"); +$obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("ALFANUMERICO_ESPACOS_DIR"); +$obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(10); + +$obExportador->roUltimoArquivo->roUltimoBloco->addColuna("dt_admissao"); +$obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("DATA_DDMMYYYY"); +$obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(8); + +$obExportador->roUltimoArquivo->roUltimoBloco->addColuna("nome_servidor"); +$obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("ALFANUMERICO_ESPACOS_DIR"); +$obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(50); + +$obExportador->roUltimoArquivo->roUltimoBloco->addColuna("cpf"); +$obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("ALFANUMERICO_ESPACOS_DIR"); +$obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(11); + +$obExportador->roUltimoArquivo->roUltimoBloco->addColuna("dt_nascimento"); +$obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("DATA_DDMMYYYY"); +$obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(8); + +$obExportador->roUltimoArquivo->roUltimoBloco->addColuna("numero_ato"); +$obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("ALFANUMERICO_ESPACOS_DIR"); +$obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(12); + +$obExportador->roUltimoArquivo->roUltimoBloco->addColuna("data_ato"); +$obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("DATA_DDMMYYYY"); +$obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(8); + +$obExportador->roUltimoArquivo->roUltimoBloco->addColuna("imprensa_oficial"); +$obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("ALFANUMERICO_ESPACOS_DIR"); +$obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(30); + +$obExportador->roUltimoArquivo->roUltimoBloco->addColuna("numero_concurso"); +$obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("ALFANUMERICO_ESPACOS_DIR"); +$obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(16); + +$obExportador->roUltimoArquivo->roUltimoBloco->addColuna("numero_ato"); +$obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("ALFANUMERICO_ESPACOS_DIR"); +$obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(12); + +$obExportador->roUltimoArquivo->roUltimoBloco->addColuna("reservado_tcm"); +$obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("ALFANUMERICO_ESPACOS_DIR"); +$obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(8); + +$obExportador->roUltimoArquivo->roUltimoBloco->addColuna("imprensa_oficial_ato"); +$obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("ALFANUMERICO_ESPACOS_DIR"); +$obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(30); + +$obExportador->roUltimoArquivo->roUltimoBloco->addColuna("cargo_efetivo"); +$obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("ALFANUMERICO_ESPACOS_DIR"); +$obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(1); + +$obExportador->roUltimoArquivo->roUltimoBloco->addColuna("competencia"); +$obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("NUMERICO_ESPACOS_ESQ"); +$obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(6); + +$obExportador->roUltimoArquivo->roUltimoBloco->addColuna("fundamentacao_legal"); +$obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("ALFANUMERICO_ESPACOS_DIR"); +$obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(75); + +$obExportador->roUltimoArquivo->roUltimoBloco->addColuna("reservado_tcm2"); +$obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("ALFANUMERICO_ESPACOS_DIR"); +$obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(1); + +$obExportador->roUltimoArquivo->roUltimoBloco->addColuna("tipo_regime"); +$obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("NUMERICO_ESPACOS_ESQ"); +$obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(1); + +$obExportador->roUltimoArquivo->roUltimoBloco->addColuna("data_efetivacao"); +$obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("DATA_DDMMYYYY"); +$obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(8); + +$obExportador->roUltimoArquivo->roUltimoBloco->addColuna("indicador_acumulo_cargo"); +$obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("ALFANUMERICO_ESPACOS_DIR"); +$obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(1); + +$obExportador->roUltimoArquivo->roUltimoBloco->addColuna("orgao_entidade"); +$obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("ALFANUMERICO_ESPACOS_DIR"); +$obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(40); + +$obExportador->roUltimoArquivo->roUltimoBloco->addColuna("funcao_servidor_temporario"); +$obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("NUMERICO_ESPACOS_ESQ"); +$obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(8); + +$obExportador->roUltimoArquivo->roUltimoBloco->addColuna("reservado_tcm3"); +$obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("ALFANUMERICO_ESPACOS_DIR"); +$obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(32); + +$obExportador->roUltimoArquivo->roUltimoBloco->addColuna("funcao_desempenhada"); +$obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("ALFANUMERICO_ESPACOS_DIR"); +$obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(40); + +$obExportador->roUltimoArquivo->roUltimoBloco->addColuna("descricao");//lotacao +$obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("ALFANUMERICO_ESPACOS_DIR"); +$obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(40); + +$obExportador->roUltimoArquivo->roUltimoBloco->addColuna("onus_cedente"); +$obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("ALFANUMERICO_ESPACOS_DIR"); +$obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(1); + +$obExportador->roUltimoArquivo->roUltimoBloco->addColuna("nome_cedente");//Órgão/Entidade +$obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("ALFANUMERICO_ESPACOS_DIR"); +$obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(40); + +$obExportador->roUltimoArquivo->roUltimoBloco->addColuna("numero_processo"); +$obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("ALFANUMERICO_ESPACOS_DIR"); +$obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(16); + +$obExportador->roUltimoArquivo->roUltimoBloco->addColuna("nome_cargo_acumulado"); +$obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("ALFANUMERICO_ESPACOS_DIR"); +$obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(40); + +$obExportador->roUltimoArquivo->roUltimoBloco->addColuna("data_publicacao"); +$obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("DATA_DDMMYYYY"); +$obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(8); + +$obExportador->roUltimoArquivo->roUltimoBloco->addColuna("data_publicacao_afastamento"); +$obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("DATA_DDMMYYYY"); +$obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(8); + +$obExportador->roUltimoArquivo->roUltimoBloco->addColuna("justificativa_contratacao"); +$obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("ALFANUMERICO_ESPACOS_DIR"); +$obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(255); + +$obExportador->roUltimoArquivo->roUltimoBloco->addColuna("data_termino_contrato"); +$obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("DATA_DDMMYYYY"); +$obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(8); + +$obExportador->roUltimoArquivo->roUltimoBloco->addColuna("cargo_anterior"); +$obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("ALFANUMERICO_ESPACOS_DIR"); +$obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(10); + +$obExportador->roUltimoArquivo->roUltimoBloco->addColuna("processo_numero_tcm"); +$obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("NUMERICO_ESPACOS_ESQ"); +$obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(6); + +$obExportador->roUltimoArquivo->roUltimoBloco->addColuna("processo_digito_tcm"); +$obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("NUMERICO_ESPACOS_ESQ"); +$obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(1); + +$obExportador->roUltimoArquivo->roUltimoBloco->addColuna("processo_ano_tcm"); +$obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("NUMERICO_ESPACOS_ESQ"); +$obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(4); + +$obExportador->roUltimoArquivo->roUltimoBloco->addColuna("cargo_origem_destino_cessao"); +$obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("ALFANUMERICO_ESPACOS_DIR"); +$obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(40); + +$obExportador->roUltimoArquivo->roUltimoBloco->addColuna("status_concurso"); +$obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("ALFANUMERICO_ESPACOS_DIR"); +$obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(1); + +$obExportador->roUltimoArquivo->roUltimoBloco->addColuna("anterior_siga"); +$obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("NUMERICO_ESPACOS_ESQ"); +$obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(1); + +unset($obTTCMBAPessoal); +unset($rsPessoal); + +?> \ No newline at end of file diff --git a/gestaoPrestacaoContas/fontes/PHP/TCMBA/instancias/layout_arquivos/2015/Salario2.inc.php b/gestaoPrestacaoContas/fontes/PHP/TCMBA/instancias/layout_arquivos/2015/Salario2.inc.php new file mode 100644 index 0000000..8724562 --- /dev/null +++ b/gestaoPrestacaoContas/fontes/PHP/TCMBA/instancias/layout_arquivos/2015/Salario2.inc.php @@ -0,0 +1,316 @@ +setDado('entidades' , $stEntidades ); +$obTTCMBASalario2->setDado('entidade_rh' , $stEntidadeRH ); +$obTTCMBASalario2->setDado('competencia' , Sessao::getExercicio().$inMes ); +$obTTCMBASalario2->setDado('unidade_gestora', $inCodUnidadeGestora ); +$obTTCMBASalario2->setDado('mes_ano' , $inMes.Sessao::getExercicio() ); +$obTTCMBASalario2->setDado('exercicio' , Sessao::getExercicio() ); + +#Teste de Erro +if($arFiltro['stInformativoErro']=='Sim'){ + $obTTCMBASalario2->recuperaLogErro($rsLogErro); + + //Variável $boLogErro para se houver algum erro que impeça a geração do arquivo + $boLogErro = false; + if( !$rsLogErro->eof( )){ + $arLogErrosTemp = array(); + $inRegistros = $rsLogErro->getCampo("registros"); + $inObrigatorio1 = $rsLogErro->getCampo("obrigatorio1"); + $inObrigatorio2 = $rsLogErro->getCampo("obrigatorio2"); + $inObrigatorio3 = $rsLogErro->getCampo("obrigatorio3"); + $inObrigatorio4 = $rsLogErro->getCampo("obrigatorio4"); + $inObrigatorio5 = $rsLogErro->getCampo("obrigatorio5"); + $inObrigatorio6 = $rsLogErro->getCampo("obrigatorio6"); + $inObrigatorio7 = $rsLogErro->getCampo("obrigatorio7"); + $inObrigatorio8 = $rsLogErro->getCampo("obrigatorio8"); + $inObrigatorio9 = $rsLogErro->getCampo("obrigatorio9"); + $inObrigatorio10 = $rsLogErro->getCampo("obrigatorio10"); + $inObrigatorio11 = $rsLogErro->getCampo("obrigatorio11"); + $inObrigatorio12 = $rsLogErro->getCampo("obrigatorio12"); + + if( $inRegistros > 0 ){ + if( $inObrigatorio1 == 0 ){ + $arLogErrosTemp['nome_arquivo'] = $stArquivo; + $arLogErrosTemp['erro'] = 'Obrigatório informar o Salário Base TCM-BA em: Gestão Prestação de Contas :: TCM - BA :: Configuração :: Configurar Tipos de Salários'; + + $arLogErros[] = $arLogErrosTemp; + } + if( $inObrigatorio2 == 0 ){ + $arLogErrosTemp['nome_arquivo'] = $stArquivo; + $arLogErrosTemp['erro'] = 'Obrigatório informar as Demais Vantagens Salariais TCM-BA em: Gestão Prestação de Contas :: TCM - BA :: Configuração :: Configurar Tipos de Salários'; + + $arLogErros[] = $arLogErrosTemp; + } + if( $inObrigatorio3 == 0 ){ + $arLogErrosTemp['nome_arquivo'] = $stArquivo; + $arLogErrosTemp['erro'] = 'Obrigatório informar a Gratificação de Função TCM-BA em: Gestão Prestação de Contas :: TCM - BA :: Configuração :: Configurar Tipos de Salários'; + + $arLogErros[] = $arLogErrosTemp; + } + if( $inObrigatorio4 == 0 ){ + $arLogErrosTemp['nome_arquivo'] = $stArquivo; + $arLogErrosTemp['erro'] = 'Obrigatório informar o Salário Família TCM-BA em: Gestão Prestação de Contas :: TCM - BA :: Configuração :: Configurar Tipos de Salários'; + + $arLogErros[] = $arLogErrosTemp; + } + if( $inObrigatorio5 == 0 ){ + $arLogErrosTemp['nome_arquivo'] = $stArquivo; + $arLogErrosTemp['erro'] = 'Obrigatório informar as Horas Extras TCM-BA em: Gestão Prestação de Contas :: TCM - BA :: Configuração :: Configurar Tipos de Salários'; + + $arLogErros[] = $arLogErrosTemp; + } + if( $inObrigatorio6 == 0 ){ + $arLogErrosTemp['nome_arquivo'] = $stArquivo; + $arLogErrosTemp['erro'] = 'Obrigatório informar os Demais Descontos TCM-BA em: Gestão Prestação de Contas :: TCM - BA :: Configuração :: Configurar Tipos de Salários'; + + $arLogErros[] = $arLogErrosTemp; + } + if( $inObrigatorio7 == 0 ){ + $arLogErrosTemp['nome_arquivo'] = $stArquivo; + $arLogErrosTemp['erro'] = 'Obrigatório informar o Plano de Saúde/Odontológico TCM-BA em: Gestão Prestação de Contas :: TCM - BA :: Configuração :: Configurar Tipos de Salários'; + + $arLogErros[] = $arLogErrosTemp; + } + if( $inObrigatorio8 <> $inRegistros ){ + $arLogErrosTemp['nome_arquivo'] = $stArquivo; + $arLogErrosTemp['erro'] = 'Obrigatório configurar a Lotação do Servidor com Órgão Orçamentário TCM-BA em: Gestão Prestação de Contas :: TCM - BA :: Configuração :: Relacionar Lotações/Orgãos'; + + $arLogErros[] = $arLogErrosTemp; + } + if( $inObrigatorio9 <> $inRegistros ){ + $arLogErrosTemp['nome_arquivo'] = $stArquivo; + $arLogErrosTemp['erro'] = 'Obrigatório configurar o Tipo de Cargo TCM-BA em: Gestão Prestação de Contas :: TCM - BA :: Configuração :: Relacionar Tipo de Cargo'; + + $arLogErros[] = $arLogErrosTemp; + } + if( $inObrigatorio10 <> $inRegistros ){ + $arLogErrosTemp['nome_arquivo'] = $stArquivo; + $arLogErrosTemp['erro'] = 'Obrigatório configurar o Tipo Função do Servidor TCM-BA em: Gestão Prestação de Contas :: TCM - BA :: Configuração :: Configurar Tipos de Salários'; + + $arLogErros[] = $arLogErrosTemp; + } + if( $inObrigatorio11 <> $inRegistros ){ + $arLogErrosTemp['nome_arquivo'] = $stArquivo; + $arLogErrosTemp['erro'] = 'Obrigatório configurar a Classe/Aplicação do Salário do Servidor TCM-BA em: Gestão Prestação de Contas :: TCM - BA :: Configuração :: Configurar Tipos de Salários'; + + $arLogErros[] = $arLogErrosTemp; + } + if( $inObrigatorio12 <> $inRegistros ){ + $arLogErrosTemp['nome_arquivo'] = $stArquivo; + $arLogErrosTemp['erro'] = 'Obrigatório configurar a Função Servidor Temporário TCM-BA em: Gestão Prestação de Contas :: TCM - BA :: Configuração :: Configurar Tipos de Salários'; + + $arLogErros[] = $arLogErrosTemp; + } + } + + unset($arLogErrosTemp); + } + unset($rsLogErro); +} +#Fim Teste de Erro + +$rsSalario2 = new RecordSet(); +if( !$boLogErro ) + $obTTCMBASalario2->recuperaDados($rsSalario2,"","",$boTransacao); + +$obExportador->roUltimoArquivo->addBloco($rsSalario2); + +$obExportador->roUltimoArquivo->roUltimoBloco->addColuna("tipo_registro"); +$obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("NUMERICO_ESPACOS_ESQ"); +$obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(1); + +$obExportador->roUltimoArquivo->roUltimoBloco->addColuna("unidade_gestora"); +$obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("NUMERICO_ESPACOS_ESQ"); +$obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(4); + +$obExportador->roUltimoArquivo->roUltimoBloco->addColuna("num_orgao"); +$obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("NUMERICO_ESPACOS_ESQ"); +$obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(4); + +$obExportador->roUltimoArquivo->roUltimoBloco->addColuna("cod_tipo_cargo"); +$obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("NUMERICO_ESPACOS_ESQ"); +$obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(1); + +$obExportador->roUltimoArquivo->roUltimoBloco->addColuna("funcao_atual"); +$obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("NUMERICO_ESPACOS_ESQ"); +$obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(2); + +$obExportador->roUltimoArquivo->roUltimoBloco->addColuna("classe"); +$obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("NUMERICO_ESPACOS_ESQ"); +$obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(1); + +$obExportador->roUltimoArquivo->roUltimoBloco->addColuna("nom_cgm"); +$obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("ALFANUMERICO_ESPACOS_DIR"); +$obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(50); + +$obExportador->roUltimoArquivo->roUltimoBloco->addColuna("cpf"); +$obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("ALFANUMERICO_ESPACOS_DIR"); +$obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(11); + +$obExportador->roUltimoArquivo->roUltimoBloco->addColuna("matricula"); +$obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("ALFANUMERICO_ESPACOS_DIR"); +$obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(10); + +$obExportador->roUltimoArquivo->roUltimoBloco->addColuna("cod_cargo"); +$obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("ALFANUMERICO_ESPACOS_DIR"); +$obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(10); + +$obExportador->roUltimoArquivo->roUltimoBloco->addColuna("salario_base"); +$obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("VALOR_ZEROS_ESQ"); +$obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(16); + +$obExportador->roUltimoArquivo->roUltimoBloco->addColuna("salario_vantagens"); +$obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("VALOR_ZEROS_ESQ"); +$obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(16); + +$obExportador->roUltimoArquivo->roUltimoBloco->addColuna("salario_gratificacao"); +$obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("VALOR_ZEROS_ESQ"); +$obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(16); + +$obExportador->roUltimoArquivo->roUltimoBloco->addColuna("salario_familia"); +$obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("VALOR_ZEROS_ESQ"); +$obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(16); + +$obExportador->roUltimoArquivo->roUltimoBloco->addColuna("salario_ferias"); +$obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("VALOR_ZEROS_ESQ"); +$obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(16); + +$obExportador->roUltimoArquivo->roUltimoBloco->addColuna("salario_horas_extra"); +$obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("VALOR_ZEROS_ESQ"); +$obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(16); + +$obExportador->roUltimoArquivo->roUltimoBloco->addColuna("salario_decimo"); +$obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("VALOR_ZEROS_ESQ"); +$obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(16); + +$obExportador->roUltimoArquivo->roUltimoBloco->addColuna("salario_descontos"); +$obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("VALOR_ZEROS_ESQ"); +$obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(16); + +$obExportador->roUltimoArquivo->roUltimoBloco->addColuna("desconto_irrf"); +$obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("VALOR_ZEROS_ESQ"); +$obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(16); + +$obExportador->roUltimoArquivo->roUltimoBloco->addColuna("desconto_irrf_decimo"); +$obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("VALOR_ZEROS_ESQ"); +$obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(16); + +$obExportador->roUltimoArquivo->roUltimoBloco->addColuna("desconto_consignado_1"); +$obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("VALOR_ZEROS_ESQ"); +$obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(16); + +$obExportador->roUltimoArquivo->roUltimoBloco->addColuna("desconto_consignado_2"); +$obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("VALOR_ZEROS_ESQ"); +$obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(16); + +$obExportador->roUltimoArquivo->roUltimoBloco->addColuna("desconto_consignado_3"); +$obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("VALOR_ZEROS_ESQ"); +$obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(16); + +$obExportador->roUltimoArquivo->roUltimoBloco->addColuna("desconto_previdencia"); +$obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("VALOR_ZEROS_ESQ"); +$obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(16); + +$obExportador->roUltimoArquivo->roUltimoBloco->addColuna("desconto_irrf_ferias"); +$obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("VALOR_ZEROS_ESQ"); +$obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(16); + +$obExportador->roUltimoArquivo->roUltimoBloco->addColuna("desconto_previdencia_decimo"); +$obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("VALOR_ZEROS_ESQ"); +$obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(16); + +$obExportador->roUltimoArquivo->roUltimoBloco->addColuna("desconto_previdencia_ferias"); +$obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("VALOR_ZEROS_ESQ"); +$obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(16); + +$obExportador->roUltimoArquivo->roUltimoBloco->addColuna("desconto_pensao"); +$obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("VALOR_ZEROS_ESQ"); +$obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(16); + +$obExportador->roUltimoArquivo->roUltimoBloco->addColuna("desconto_plano_saude"); +$obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("VALOR_ZEROS_ESQ"); +$obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(16); + +$obExportador->roUltimoArquivo->roUltimoBloco->addColuna("salario_liquido"); +$obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("VALOR_ZEROS_ESQ"); +$obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(16); + +$obExportador->roUltimoArquivo->roUltimoBloco->addColuna("nro_dias"); +$obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("NUMERICO_ESPACOS_ESQ"); +$obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(2); + +$obExportador->roUltimoArquivo->roUltimoBloco->addColuna("horas_mensais"); +$obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("NUMERICO_ESPACOS_ESQ"); +$obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(3); + +$obExportador->roUltimoArquivo->roUltimoBloco->addColuna("horas_mensais"); +$obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("NUMERICO_ESPACOS_ESQ"); +$obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(3); + +$obExportador->roUltimoArquivo->roUltimoBloco->addColuna("cod_banco_1"); +$obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("NUMERICO_ESPACOS_ESQ"); +$obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(4); + +$obExportador->roUltimoArquivo->roUltimoBloco->addColuna("cod_banco_2"); +$obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("NUMERICO_ESPACOS_ESQ"); +$obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(4); + +$obExportador->roUltimoArquivo->roUltimoBloco->addColuna("cod_banco_3"); +$obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("NUMERICO_ESPACOS_ESQ"); +$obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(4); + +$obExportador->roUltimoArquivo->roUltimoBloco->addColuna("competencia"); +$obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("NUMERICO_ESPACOS_ESQ"); +$obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(6); + +$obExportador->roUltimoArquivo->roUltimoBloco->addColuna("folha"); +$obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("NUMERICO_ESPACOS_ESQ"); +$obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(1); + +$obExportador->roUltimoArquivo->roUltimoBloco->addColuna("cod_funcao_temporario"); +$obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("NUMERICO_ESPACOS_ESQ"); +$obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(8); + +unset($obTTCMBASalario2); +unset($rsSalario2); + +?> diff --git a/gestaoPrestacaoContas/fontes/PHP/TCMGO/classes/mapeamento/TTGOALQ.class.php b/gestaoPrestacaoContas/fontes/PHP/TCMGO/classes/mapeamento/TTGOALQ.class.php index 5d76f60..9f2cf78 100644 --- a/gestaoPrestacaoContas/fontes/PHP/TCMGO/classes/mapeamento/TTGOALQ.class.php +++ b/gestaoPrestacaoContas/fontes/PHP/TCMGO/classes/mapeamento/TTGOALQ.class.php @@ -33,10 +33,10 @@ * @package URBEM * @subpackage Mapeamento - $Revision: 62658 $ + $Revision: 63835 $ $Name$ - $Author: evandro $ - $Date: 2015-05-29 15:52:16 -0300 (Sex, 29 Mai 2015) $ + $Author: franver $ + $Date: 2015-10-22 11:53:31 -0200 (Qui, 22 Out 2015) $ * Casos de uso: uc-06.04.00 */ @@ -232,8 +232,7 @@ class TTGOALQ extends Persistente --ORDER BY nota_liquidacao_item_anulado.timestamp ORDER BY nota_liquidacao.exercicio, nota_liquidacao.cod_entidade, nota_liquidacao.cod_nota; "; - //sistemaLegado::mostravar($stSql); - //die('Fim'); + return $stSql; } @@ -397,8 +396,7 @@ class TTGOALQ extends Persistente --ORDER BY nota_liquidacao_item_anulado.timestamp ORDER BY nota_liquidacao.exercicio, nota_liquidacao.cod_entidade, nota_liquidacao.cod_nota; "; - //sistemaLegado::mostravar($stSql); - //die('Fim'); + return $stSql; } @@ -610,8 +608,7 @@ class TTGOALQ extends Persistente --ORDER BY nota_liquidacao_item_anulado.timestamp ORDER BY nota_liquidacao.exercicio, nota_liquidacao.cod_entidade, nota_liquidacao.cod_nota; "; - //sistemaLegado::mostravar($stSql); - //die('Fim'); + return $stSql; } } diff --git a/gestaoPrestacaoContas/fontes/PHP/TCMGO/classes/mapeamento/TTGOTFR.class.php b/gestaoPrestacaoContas/fontes/PHP/TCMGO/classes/mapeamento/TTGOTFR.class.php index 5155d78..62d9c33 100644 --- a/gestaoPrestacaoContas/fontes/PHP/TCMGO/classes/mapeamento/TTGOTFR.class.php +++ b/gestaoPrestacaoContas/fontes/PHP/TCMGO/classes/mapeamento/TTGOTFR.class.php @@ -194,8 +194,7 @@ class TTGOTFR extends Persistente , c.tipo_conta , c.fonte_origem "; - //sistemaLegado::mostravar($stSql); - //die('Fim'); + return $stSql; } @@ -351,8 +350,7 @@ class TTGOTFR extends Persistente , c. fonte_destino , c. tipo_conta "; - //sistemaLegado::mostravar($stSql); - //die('Fim'); + return $stSql; } } diff --git a/gestaoPrestacaoContas/fontes/PHP/TCMGO/classes/mapeamento/TTGOTRB.class.php b/gestaoPrestacaoContas/fontes/PHP/TCMGO/classes/mapeamento/TTGOTRB.class.php index b89c3e5..9d9b6f9 100644 --- a/gestaoPrestacaoContas/fontes/PHP/TCMGO/classes/mapeamento/TTGOTRB.class.php +++ b/gestaoPrestacaoContas/fontes/PHP/TCMGO/classes/mapeamento/TTGOTRB.class.php @@ -165,8 +165,6 @@ class TTGOTRB extends PERSISTENTE transferencia.exercicio, recurso_credito.cod_fonte";*/ // $stSql .= " AND LTRIM(split_part(num_conta_corrente,'-',1),'0') <> LTRIM(split_part(conta_corrente_debito.num_conta_corrente_debito,'-',1),'0') \n"; - //sistemaLegado::mostravar($stSql); - //die('Fim'); return $stSql; } @@ -382,8 +380,6 @@ class TTGOTRB extends PERSISTENTE transferencia.exercicio, recurso_debito.cod_fonte";*/ // $stSql .= " AND LTRIM(split_part(num_conta_corrente,'-',1),'0') <> LTRIM(split_part(conta_corrente_credito.num_conta_corrente_credito,'-',1),'0') \n"; - //sistemaLegado::mostravar($stSql); - //die('Fim'); return $stSql; } } diff --git a/gestaoPrestacaoContas/fontes/PHP/TCMGO/instancias/configuracao/OCManterObra.php b/gestaoPrestacaoContas/fontes/PHP/TCMGO/instancias/configuracao/OCManterObra.php index 4a45785..5b939cb 100644 --- a/gestaoPrestacaoContas/fontes/PHP/TCMGO/instancias/configuracao/OCManterObra.php +++ b/gestaoPrestacaoContas/fontes/PHP/TCMGO/instancias/configuracao/OCManterObra.php @@ -35,7 +35,7 @@ * @ignore - $Id: OCManterObra.php 61522 2015-01-29 18:33:35Z carlos.silva $ + $Id: OCManterObra.php 63835 2015-10-22 13:53:31Z franver $ */ include_once '../../../../../../gestaoAdministrativa/fontes/PHP/pacotes/FrameworkHTML.inc.php'; @@ -185,8 +185,6 @@ switch ($stCtrl) { case 'incluirEmpenho' : - //SistemaLegado::mostravar($_REQUEST); - $arRequest = array(); $arRequest = explode('/', $_REQUEST['inCodEmpenho']); $inReqCodEmpenho = $arRequest[0]; diff --git a/gestaoPrestacaoContas/fontes/PHP/TCMGO/instancias/configuracao/OCManterOrgao.php b/gestaoPrestacaoContas/fontes/PHP/TCMGO/instancias/configuracao/OCManterOrgao.php index 8f4d63a..d46b985 100644 --- a/gestaoPrestacaoContas/fontes/PHP/TCMGO/instancias/configuracao/OCManterOrgao.php +++ b/gestaoPrestacaoContas/fontes/PHP/TCMGO/instancias/configuracao/OCManterOrgao.php @@ -31,7 +31,7 @@ * @ignore - * $Id: OCManterOrgao.php 59612 2014-09-02 12:00:51Z gelson $ + * $Id: OCManterOrgao.php 63835 2015-10-22 13:53:31Z franver $ * Casos de uso : uc-06.04.00 */ @@ -99,7 +99,6 @@ function retornaData($stData) $arGestor = Sessao::read('arGestor'); -//sistemaLegado::mostraVar($_REQUEST); switch ($stCtrl) { case 'incluiGestor' : if ($_REQUEST['inCGMGestor'] == '') { diff --git a/gestaoPrestacaoContas/fontes/PHP/TCMGO/instancias/configuracao/PRManterContrato.php b/gestaoPrestacaoContas/fontes/PHP/TCMGO/instancias/configuracao/PRManterContrato.php index 16b31f6..899c4ee 100644 --- a/gestaoPrestacaoContas/fontes/PHP/TCMGO/instancias/configuracao/PRManterContrato.php +++ b/gestaoPrestacaoContas/fontes/PHP/TCMGO/instancias/configuracao/PRManterContrato.php @@ -160,8 +160,6 @@ switch ($_REQUEST['stAcao']) { $stFiltro .= " AND nro_contrato = ".$_REQUEST['inNumContrato']; $stFiltro .= " AND cod_contrato <> ".$_REQUEST['inCodContrato']; - //sistemaLegado::mostraVar($_REQUEST); - $obTTCMGOContrato->recuperaTodos($rsRecordSet, $stFiltro); if ($rsRecordSet->getNumLinhas() == -1) { $obTTCMGOContrato->setDado('cod_contrato' , $_REQUEST['inCodContrato'] ); diff --git a/gestaoPrestacaoContas/fontes/PHP/TCMGO/instancias/exportacao/CONArq.inc.php b/gestaoPrestacaoContas/fontes/PHP/TCMGO/instancias/exportacao/CONArq.inc.php index 37fe4e0..3283352 100755 --- a/gestaoPrestacaoContas/fontes/PHP/TCMGO/instancias/exportacao/CONArq.inc.php +++ b/gestaoPrestacaoContas/fontes/PHP/TCMGO/instancias/exportacao/CONArq.inc.php @@ -328,7 +328,7 @@ if (Sessao::getExercicio() <= '2008') { //deixar == geracao do arquivo exercicio $obTTCMGOContrato->recuperaRescisaoContratual ( $rsRescisaoContratual , $stFiltro); $inCount = 0; - // SistemaLegado::mostraVar($arRecordSet);die; + foreach ($arRecordSet[$stArquivo]->arElementos as $arContrato) { $arContrato['nro_sequencial'] = ++$inCount; $stChave = $arContrato['cod_programa'].$arContrato['num_orgao'].$arContrato['num_unidade']. @@ -603,7 +603,6 @@ if (Sessao::getExercicio() <= '2008') { //deixar == geracao do arquivo exercicio $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(06); // tipo registro 21 --Termos Aditivos de Prorrogacao de Prazos - // SistemaLegado::mostraVar($rsProrrogacaoPrazo);die; foreach ($rsProrrogacaoPrazo->arElementos as $arTempProrrogacao) { $stChaveProrrogacao = $arTempProrrogacao['cod_programa'].$arTempProrrogacao['num_orgao']. $arTempProrrogacao['num_unidade'].$arTempProrrogacao['cod_funcao'].$arTempProrrogacao['cod_subfuncao']. @@ -833,7 +832,6 @@ if (Sessao::getExercicio() <= '2008') { //deixar == geracao do arquivo exercicio } // tipo registro 23 --Rescisao contratual - // SistemaLegado::mostraVar($rsRescisaoContratual);die; foreach ($rsRescisaoContratual->arElementos as $arRescisao) { $stChaveRescisao = $arRescisao['cod_programa'].$arRescisao['num_orgao']. $arRescisao['num_unidade'].$arRescisao['cod_funcao'].$arRescisao['cod_subfuncao']. diff --git a/gestaoPrestacaoContas/fontes/PHP/TCMGO/instancias/exportacao/EMP.inc.php b/gestaoPrestacaoContas/fontes/PHP/TCMGO/instancias/exportacao/EMP.inc.php index 44079d6..9a3db99 100644 --- a/gestaoPrestacaoContas/fontes/PHP/TCMGO/instancias/exportacao/EMP.inc.php +++ b/gestaoPrestacaoContas/fontes/PHP/TCMGO/instancias/exportacao/EMP.inc.php @@ -33,7 +33,7 @@ * @ignore - $Id: EMP.inc.php 62759 2015-06-16 18:00:15Z jean $ + $Id: EMP.inc.php 63835 2015-10-22 13:53:31Z franver $ * Casos de uso: uc-06.04.00 */ @@ -415,8 +415,6 @@ foreach ($rsEmpenhoContrato->arElementos as $arEmpenhoContrato) { // deixar comentado a linha abaixo caso seja necessário usar a string abaixo para apresentar os registros $stKeyContrato = $arEmpenhoContrato['num_programa'].$arEmpenhoContrato['num_orgao'].$arEmpenhoContrato['num_unidade'].$arEmpenhoContrato['cod_funcao'].$arEmpenhoContrato['cod_subfuncao'].$arEmpenhoContrato['cod_natureza'].$arEmpenhoContrato['numero_pao'].$arEmpenhoContrato['elemento_despesa'].$arEmpenhoContrato['subelemento_despesa'].$arEmpenhoContrato['cod_empenho']; - //sistemaLegado::mostravar(" kei: ".$stKey); - //sistemaLegado::mostravar(" contrato: ".$stKeyContrato); if ($stKeyContrato === $stKey) { $arEmpenhoContrato['numero_sequencial'] = ++$inCount; diff --git a/gestaoPrestacaoContas/fontes/PHP/TCMPA/classes/mapeamento/bkp_configuraCargoSituacaoFuncional.php b/gestaoPrestacaoContas/fontes/PHP/TCMPA/classes/mapeamento/bkp_configuraCargoSituacaoFuncional.php index 9a4952a..9a1b877 100644 --- a/gestaoPrestacaoContas/fontes/PHP/TCMPA/classes/mapeamento/bkp_configuraCargoSituacaoFuncional.php +++ b/gestaoPrestacaoContas/fontes/PHP/TCMPA/classes/mapeamento/bkp_configuraCargoSituacaoFuncional.php @@ -78,7 +78,6 @@ foreach ($sessao->transf['lotacao'] as $key =>$valores) { } if (!$boErro->ocorreu()) { - //sistemaLegado::mostraVar($sessao->transf['lotacao']); foreach ($sessao->transf['lotacao'] as $chave =>$valor) { $obTTPALotacao->setDado( 'cod_situacao' , $valor['inCodSituacao']); $obTTPALotacao->setDado( 'cod_tipo', $valor['inCodTipoCargo']); diff --git a/gestaoPrestacaoContas/fontes/PLPGSQL/TCEMG/FNTCEMGSiaceDespesaTotalPessoal.plsql b/gestaoPrestacaoContas/fontes/PLPGSQL/TCEMG/FNTCEMGSiaceDespesaTotalPessoal.plsql new file mode 100644 index 0000000..c47cdb9 --- /dev/null +++ b/gestaoPrestacaoContas/fontes/PLPGSQL/TCEMG/FNTCEMGSiaceDespesaTotalPessoal.plsql @@ -0,0 +1,188 @@ +/* + ********************************************************************************** + * * + * @package URBEM CNM - Soluções em Gestão Pública * + * @copyright (c) 2013 Confederação Nacional de Municípos * + * @author Confederação Nacional de Municípios * + * * + * O URBEM CNM é um software livre; você pode redistribuí-lo e/ou modificá-lo sob * + * os termos da Licença Pública Geral GNU conforme publicada pela Fundação do * + * Software Livre (FSF - Free Software Foundation); na versão 2 da Licença. * + * * + * Este programa é distribuído na expectativa de que seja útil, porém, * + * SEM NENHUMA GARANTIA; nem mesmo a garantia implícita de COMERCIABILIDADE OU * + * ADEQUAÇÃO A UMA FINALIDADE ESPECÍFICA. Consulte a Licença Pública Geral do GNU * + * para mais detalhes. * + * * + * Você deve ter recebido uma cópia da Licença Pública Geral do GNU "LICENCA.txt" * + * com este programa; se não, escreva para a Free Software Foundation Inc., * + * no endereço 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA. * + * * + ********************************************************************************** +*/ + +/* + +CREATE TYPE tcemg.siace_despesa_total_pessoal AS ( + cod_conta VARCHAR, + descricao VARCHAR, + cod_estrutural VARCHAR, + valor NUMERIC +); + +*/ + +CREATE OR REPLACE FUNCTION tcemg.siace_despesa_total_pessoal(varchar, varchar, varchar, varchar, varchar, integer, varchar) RETURNS SETOF tcemg.siace_despesa_total_pessoal AS $$ +DECLARE + dtInicial ALIAS FOR $1; + dtFinal ALIAS FOR $2; + stExercicio ALIAS FOR $3; + stEntidades ALIAS FOR $4; + cod_estrutural ALIAS FOR $5; + inNivel ALIAS FOR $6; + stTipoSituacao ALIAS FOR $7; + + inEntidades integer[]; + stSql VARCHAR :=''; + inAno INTEGER; + inMes INTEGER; + reRegistro RECORD; + +BEGIN + --Pl base RCL + inAno := substr(dtFinal, 7, 4 ) ; + inMes := substr(dtFinal, 4, 2 ) ; + + inEntidades := regexp_split_to_array(stEntidades,','); + + IF ( stTipoSituacao = 'liquidado' ) THEN + + stSql := ' + CREATE TEMPORARY TABLE tmp_despesa_pessoal_mensal AS ( + + SELECT + cast ( conta_despesa.cod_conta as varchar ) as cod_conta, + cast ( coalesce( stn.tituloRCL( publico.fn_mascarareduzida(conta_despesa.cod_estrutural)) , conta_despesa.descricao ) as varchar ) as descricao, + cast ( conta_despesa.cod_estrutural as varchar ) as cod_estrutural + '; + + IF inNivel = 3 AND cod_estrutural = '3.3.1' THEN + IF (SELECT COUNT(*) FROM stn.despesa_pessoal WHERE mes = inMes::INTEGER AND ano = ''||inAno||'' AND cod_entidade IN ( inEntidades[0],inEntidades[1] ) ) >= 1 THEN + stSql := stSql||' ,(SELECT COALESCE(SUM(valor), 0.00) + FROM stn.despesa_pessoal + WHERE mes = '||inMes::INTEGER||' + AND ano = '''||inAno||''' + AND cod_entidade IN ('||stEntidades||')) as mes'; + ELSE + stSql := stSql||' + , COALESCE((select * from tcemg.fn_relatorio_demostrativo_rcl_despesa_liquidada('||quote_literal(dtInicial)||' + ,'||quote_literal(dtFinal)||' + ,'||quote_literal(stEntidades) ||' + ,'||quote_literal('(conta_despesa.cod_estrutural like ''' ||substr( cod_estrutural, 3,16)||'%'' )') || ' + )), 0.00) as valor'; + END IF; + ELSE + stSql := stSql||' + , COALESCE((select * from tcemg.fn_relatorio_demostrativo_rcl_despesa_liquidada('||quote_literal(dtInicial)||' + ,'||quote_literal(dtFinal)||' + ,'||quote_literal(stEntidades) ||' + ,'||quote_literal('(conta_despesa.cod_estrutural like ''' ||substr( cod_estrutural, 3,16)||'%'' )') || ' + )), 0.00) as valor'; + END IF; + + stSql := stSql||' + + FROM orcamento.conta_despesa + WHERE conta_despesa.cod_estrutural LIKE ''' ||substr( cod_estrutural, 3,16)||'%'' + AND publico.fn_nivel(conta_despesa.cod_estrutural) = ''' || inNivel-1 || ''' + AND conta_despesa.exercicio = '''|| stExercicio ||''' + )'; + + EXECUTE stSql; + + END IF; + + IF ( stTipoSituacao = 'empenhado' ) THEN + + stSql := ' + CREATE TEMPORARY TABLE tmp_despesa_pessoal_mensal AS ( + + SELECT + cast ( conta_despesa.cod_conta as varchar ) as cod_conta, + cast ( coalesce( stn.tituloRCL( publico.fn_mascarareduzida(conta_despesa.cod_estrutural)) , conta_despesa.descricao ) as varchar ) as descricao, + cast ( conta_despesa.cod_estrutural as varchar ) as cod_estrutural + '; + + stSql := stSql||' + , COALESCE((select * from tcemg.fn_despesa_total_pessoal_empenhada('||quote_literal(dtInicial)||' + ,'||quote_literal(dtFinal)||' + ,'||quote_literal(stEntidades) ||' + ,'||quote_literal('(conta_despesa.cod_estrutural like ''' ||substr( cod_estrutural, 3,16)||'%'' )') || ' + )), 0.00) as valor'; + + stSql := stSql||' + + FROM orcamento.conta_despesa + WHERE conta_despesa.cod_estrutural LIKE ''' ||substr( cod_estrutural, 3,16)||'%'' + AND publico.fn_nivel(conta_despesa.cod_estrutural) = ''' || inNivel-1 || ''' + AND conta_despesa.exercicio = '''|| stExercicio ||''' + )'; + + EXECUTE stSql; + + END IF; + + IF ( stTipoSituacao = 'pago' ) THEN + + stSql := ' + CREATE TEMPORARY TABLE tmp_despesa_pessoal_mensal AS ( + + SELECT + cast ( conta_despesa.cod_conta as varchar ) as cod_conta, + cast ( coalesce( stn.tituloRCL( publico.fn_mascarareduzida(conta_despesa.cod_estrutural)) , conta_despesa.descricao ) as varchar ) as descricao, + cast ( conta_despesa.cod_estrutural as varchar ) as cod_estrutural + '; + + stSql := stSql||' + , COALESCE((select * from tcemg.fn_despesa_total_pessoal_paga('||quote_literal(dtInicial)||' + , '|| quote_literal(dtFinal)||' + , '|| quote_literal(stEntidades) ||' + , '|| quote_literal(stExercicio) ||' + , '|| quote_literal( substr( cod_estrutural, 3,16))|| ' + , false + )), 0.00) as valor'; + + stSql := stSql||' + + FROM orcamento.conta_despesa + LEFT JOIN orcamento.despesa + ON despesa.exercicio = conta_despesa.exercicio + AND despesa.cod_conta = conta_despesa.cod_conta + WHERE conta_despesa.cod_estrutural LIKE ''' ||substr( cod_estrutural, 3,16)||'%'' + AND publico.fn_nivel(conta_despesa.cod_estrutural) = ''' || inNivel-1 || ''' + AND conta_despesa.exercicio = '''|| stExercicio ||''' + )'; + + EXECUTE stSql; + + END IF; + + + stSql := 'SELECT cod_conta, + descricao, + cod_estrutural, + valor + FROM tmp_despesa_pessoal_mensal'; + + FOR reRegistro IN EXECUTE stSql + LOOP + RETURN next reRegistro; + END LOOP; + + DROP TABLE tmp_despesa_pessoal_mensal ; + + RETURN; + +END; + +$$ language 'plpgsql'; diff --git a/gestaoPrestacaoContas/fontes/PLPGSQL/TCEMG/FTCEMGArquivoEXTRegistro20.plsql b/gestaoPrestacaoContas/fontes/PLPGSQL/TCEMG/FTCEMGArquivoEXTRegistro20.plsql index 38a0ffe..762db73 100644 --- a/gestaoPrestacaoContas/fontes/PLPGSQL/TCEMG/FTCEMGArquivoEXTRegistro20.plsql +++ b/gestaoPrestacaoContas/fontes/PLPGSQL/TCEMG/FTCEMGArquivoEXTRegistro20.plsql @@ -25,11 +25,11 @@ * * URBEM Soluções de Gestão Pública Ltda * www.urbem.cnm.org.br -* $Id: FTCEMGArquivoEXTRegistro20.plsql 63691 2015-09-30 13:12:31Z franver $ -* $Revision: 63691 $ +* $Id: FTCEMGArquivoEXTRegistro20.plsql 64096 2015-12-02 15:56:02Z franver $ +* $Revision: 64096 $ * $Name$ * $Author: franver $ -* $Date: 2015-09-30 10:12:31 -0300 (Qua, 30 Set 2015) $ +* $Date: 2015-12-02 13:56:02 -0200 (Qua, 02 Dez 2015) $ * */ @@ -249,8 +249,18 @@ BEGIN , 0.00::NUMERIC as vl_saldo_debitos , 0.00::NUMERIC as vl_saldo_creditos , 0.00::NUMERIC as vl_saldo_atual - , '' ''::CHAR AS nat_saldo_anterior_fonte - , '' ''::CHAR AS nat_saldo_atual_fonte + , CASE WHEN substr(cod_estrutural,1,3) = ''3.5'' --D + THEN ''D''::CHAR + WHEN substr(cod_estrutural,1,3) = ''4.5'' --C + THEN ''C''::CHAR + ELSE '' ''::CHAR + END AS nat_saldo_anterior_fonte + , CASE WHEN substr(cod_estrutural,1,3) = ''3.5'' --D + THEN ''D''::CHAR + WHEN substr(cod_estrutural,1,3) = ''4.5'' --C + THEN ''C''::CHAR + ELSE '' ''::CHAR + END AS nat_saldo_atual_fonte FROM ( SELECT pc.cod_estrutural , 20 AS tipo_registro , LPAD(configuracao_entidade.valor::VARCHAR,2,''0'')::VARCHAR AS cod_orgao @@ -258,25 +268,25 @@ BEGIN , LPAD(t_be.tipo_lancamento::VARCHAR,2,''0'') as tipo_lancamento , LPAD(t_be.sub_tipo_lancamento::VARCHAR,4,''0'') AS sub_tipo , CASE WHEN (t_be.tipo_lancamento = 1) - THEN CASE WHEN t_be.sub_tipo_lancamento = 1 - THEN LPAD(t_be.sub_tipo_lancamento::VARCHAR,4,''0'') - WHEN t_be.sub_tipo_lancamento = 2 - THEN LPAD(t_be.sub_tipo_lancamento::VARCHAR,4,''0'') - WHEN t_be.sub_tipo_lancamento = 3 - THEN LPAD(t_be.sub_tipo_lancamento::VARCHAR,4,''0'') - WHEN t_be.sub_tipo_lancamento = 4 - THEN LPAD(t_be.sub_tipo_lancamento::VARCHAR,4,''0'') - ELSE '''' - END - WHEN (t_be.tipo_lancamento = 4) - THEN CASE WHEN t_be.sub_tipo_lancamento = 1 - THEN LPAD(t_be.sub_tipo_lancamento::VARCHAR,4,''0'') - WHEN t_be.sub_tipo_lancamento = 2 - THEN LPAD(t_be.sub_tipo_lancamento::VARCHAR,4,''0'') - ELSE '''' - END - ELSE '''' - END AS desdobra_sub_tipo + THEN CASE WHEN t_be.sub_tipo_lancamento = 1 + THEN LPAD(t_be.sub_tipo_lancamento::VARCHAR,4,''0'') + WHEN t_be.sub_tipo_lancamento = 2 + THEN LPAD(t_be.sub_tipo_lancamento::VARCHAR,4,''0'') + WHEN t_be.sub_tipo_lancamento = 3 + THEN LPAD(t_be.sub_tipo_lancamento::VARCHAR,4,''0'') + WHEN t_be.sub_tipo_lancamento = 4 + THEN LPAD(t_be.sub_tipo_lancamento::VARCHAR,4,''0'') + ELSE '''' + END + WHEN (t_be.tipo_lancamento = 4) + THEN CASE WHEN t_be.sub_tipo_lancamento = 1 + THEN LPAD(t_be.sub_tipo_lancamento::VARCHAR,4,''0'') + WHEN t_be.sub_tipo_lancamento = 2 + THEN LPAD(t_be.sub_tipo_lancamento::VARCHAR,4,''0'') + ELSE '''' + END + ELSE '''' + END AS desdobra_sub_tipo , CASE WHEN (t_be.tipo_lancamento = 1) THEN CASE WHEN t_be.sub_tipo_lancamento = 1 THEN LPAD(t_be.tipo_lancamento::VARCHAR,2,''0'')||LPAD(t_be.sub_tipo_lancamento::VARCHAR,4,''0'') diff --git a/gestaoPrestacaoContas/fontes/PLPGSQL/TCEMG/FTCEMGBalanceteContabil12.plsql b/gestaoPrestacaoContas/fontes/PLPGSQL/TCEMG/FTCEMGBalanceteContabil12.plsql index 37fa268..ca92948 100644 --- a/gestaoPrestacaoContas/fontes/PLPGSQL/TCEMG/FTCEMGBalanceteContabil12.plsql +++ b/gestaoPrestacaoContas/fontes/PLPGSQL/TCEMG/FTCEMGBalanceteContabil12.plsql @@ -26,12 +26,12 @@ * URBEM Soluções de Gestão Pública Ltda * www.urbem.cnm.org.br - $Id: FTCEMGBalanceteContabil12.plsql 62872 2015-07-01 20:16:55Z franver $ + $Id: FTCEMGBalanceteContabil12.plsql 64050 2015-11-24 17:11:25Z franver $ -* $Revision: 62872 $ +* $Revision: 64050 $ * $Name$ * $Author: franver $ -* $Date: 2015-07-01 17:16:55 -0300 (Qua, 01 Jul 2015) $ +* $Date: 2015-11-24 15:11:25 -0200 (Ter, 24 Nov 2015) $ * * Casos de uso: uc-02.02.22 */ @@ -79,6 +79,7 @@ BEGIN , vl.oid as oid_temp , plano_conta.escrituracao , plano_conta.indicador_superavit + , plano_conta.atributo_tcemg FROM orcamento.receita as ore INNER JOIN orcamento.conta_receita as ocr ON ocr.cod_conta = ore.cod_conta @@ -119,6 +120,24 @@ BEGIN AND plano_conta.cod_conta = plano_analitica.cod_conta WHERE ore.exercicio = '''||stExercicio||''' AND vl.tipo_valor = ''D'' + AND plano_conta.cod_conta IN (SELECT plano_conta.cod_conta + FROM contabilidade.plano_conta + INNER JOIN (SELECT publico.fn_mascarareduzida(plano_conta.cod_estrutural)||''%'' AS cod_estrutural_reduzido + , plano_conta.atributo_tcemg + , plano_conta.exercicio + FROM contabilidade.plano_conta + WHERE plano_conta.escrituracao_pcasp = ''S'' + AND plano_conta.atributo_tcemg = 12 + AND plano_conta.exercicio = '''||stExercicio||''' + GROUP BY cod_estrutural_reduzido + , plano_conta.atributo_tcemg + , plano_conta.exercicio + ) AS plano_conta_reduzido + ON plano_conta.cod_estrutural ILIKE plano_conta_reduzido.cod_estrutural_reduzido + AND plano_conta.atributo_tcemg = plano_conta_reduzido.atributo_tcemg + AND plano_conta.exercicio = plano_conta_reduzido.exercicio + WHERE plano_conta.exercicio = '''||stExercicio||''') + GROUP BY plano_conta.cod_estrutural , plano_analitica.cod_plano , natureza_receita @@ -134,6 +153,7 @@ BEGIN , oid_temp , plano_conta.escrituracao , plano_conta.indicador_superavit + , plano_conta.atributo_tcemg ORDER BY plano_conta.cod_estrutural ) as tabela WHERE ' || stFiltro ; @@ -158,6 +178,7 @@ BEGIN , vl.oid as oid_temp , plano_conta.escrituracao , plano_conta.indicador_superavit + , plano_conta.atributo_tcemg FROM orcamento.receita as ore INNER JOIN orcamento.conta_receita as ocr ON ocr.cod_conta = ore.cod_conta @@ -198,6 +219,24 @@ BEGIN AND plano_conta.cod_conta = plano_analitica.cod_conta WHERE ore.exercicio = '''||stExercicio||''' AND vl.tipo_valor = ''C'' + AND plano_conta.cod_conta IN (SELECT plano_conta.cod_conta + FROM contabilidade.plano_conta + INNER JOIN (SELECT publico.fn_mascarareduzida(plano_conta.cod_estrutural)||''%'' AS cod_estrutural_reduzido + , plano_conta.atributo_tcemg + , plano_conta.exercicio + FROM contabilidade.plano_conta + WHERE plano_conta.escrituracao_pcasp = ''S'' + AND plano_conta.atributo_tcemg = 12 + AND plano_conta.exercicio = '''||stExercicio||''' + GROUP BY cod_estrutural_reduzido + , plano_conta.atributo_tcemg + , plano_conta.exercicio + ) AS plano_conta_reduzido + ON plano_conta.cod_estrutural ILIKE plano_conta_reduzido.cod_estrutural_reduzido + AND plano_conta.atributo_tcemg = plano_conta_reduzido.atributo_tcemg + AND plano_conta.exercicio = plano_conta_reduzido.exercicio + WHERE plano_conta.exercicio = '''||stExercicio||''') + GROUP BY plano_conta.cod_estrutural , plano_analitica.cod_plano , natureza_receita @@ -213,6 +252,7 @@ BEGIN , oid_temp , plano_conta.escrituracao , plano_conta.indicador_superavit + , plano_conta.atributo_tcemg ORDER BY plano_conta.cod_estrutural ) as tabela WHERE ' || stFiltro ; @@ -275,7 +315,7 @@ BEGIN CREATE UNIQUE INDEX unq_contas_utilizadas ON tmp_contas_utilizadas (cod_estrutural varchar_pattern_ops, cod_recurso, natureza_receita, oid_temp); stSql := ' - SELECT 12::INTEGER AS tipo_regostro + SELECT 12::INTEGER AS tipo_registro , plano_conta.cod_estrutural_contabil AS conta_contabil , RPAD(COALESCE(tmp_contas_utilizadas.natureza_receita, ''0'')::VARCHAR, 8, ''0'')::VARCHAR AS natureza_receita_reduzida , COALESCE(tmp_contas_utilizadas.cod_recurso, 0) AS cod_recurso @@ -295,6 +335,7 @@ BEGIN ) AS plano_conta LEFT JOIN tmp_contas_utilizadas ON tmp_contas_utilizadas.cod_estrutural ILIKE plano_conta.cod_estrutural_reduzido + --AND tmp_contas_utilizadas.atributo_tcemg = plano_conta.atributo_tcemg GROUP BY conta_contabil , natureza_receita_reduzida , tmp_contas_utilizadas.cod_recurso diff --git a/gestaoPrestacaoContas/fontes/PLPGSQL/TCEMG/TCEMGContasCTB.plsql b/gestaoPrestacaoContas/fontes/PLPGSQL/TCEMG/TCEMGContasCTB.plsql index 1e51f5d..3e52914 100644 --- a/gestaoPrestacaoContas/fontes/PLPGSQL/TCEMG/TCEMGContasCTB.plsql +++ b/gestaoPrestacaoContas/fontes/PLPGSQL/TCEMG/TCEMGContasCTB.plsql @@ -40,26 +40,37 @@ DECLARE reRegistro RECORD; BEGIN - ---TIPO DE CONTA: CONTA-CORRENTE - stSql := 'CREATE TEMPORARY TABLE tmp_corrente AS + -- ALTERACOES NO NUM_CONTA_CORRENTE, CONTA_CORRENTE E digito_verificador_conta_bancaria, conta, desc_conta_bancaria PARA ATENDER TICKET 22877 #34 + stSql := 'CREATE TEMPORARY TABLE tmp_contas AS SELECT conta_bancaria.cod_conta , ''''::VARCHAR AS cod_tipo_aplicacao , CASE WHEN cod_ctb_anterior IS NULL THEN plano_banco.cod_plano ELSE cod_ctb_anterior END AS cod_ctb_anterior - , 1 AS tipo_conta , conta_bancaria.exercicio - , (banco.num_banco || agencia.num_agencia || plano_banco.conta_corrente) AS conta + , CASE WHEN plano_banco.cod_plano = 3720 OR plano_banco.cod_plano = 3495 + THEN banco.num_banco || agencia.num_agencia || ''1324106-0'' + ELSE (banco.num_banco || agencia.num_agencia || plano_banco.conta_corrente) + END AS conta , CASE WHEN LTRIM(replace(num_agencia,''-'',''''),''9'') = '''' AND num_banco = ''999'' THEN ''999999999999'' + WHEN plano_banco.cod_plano = 3720 OR plano_banco.cod_plano = 3495 THEN ''1324106'' ELSE LTRIM( REPLACE(split_part(plano_banco.conta_corrente,''-'',1),''.'',''''),''0'') END as num_conta_corrente - , REPLACE(plano_banco.conta_corrente,''.'','''') AS conta_corrente + , CASE WHEN plano_banco.cod_plano = 3720 OR plano_banco.cod_plano = 3495 THEN ''1324106-0'' + ELSE REPLACE(plano_banco.conta_corrente,''.'','''') + END AS conta_corrente , plano_banco.cod_entidade AS cod_orgao , num_banco::VARCHAR as banco , split_part(num_agencia,''-'',1) AS agencia , SPLIT_PART(num_agencia,''-'',2) AS digito_verificador_agencia - , SPLIT_PART(plano_banco.conta_corrente,''-'',2) AS digito_verificador_conta_bancaria - , (''Banco:''||banco.num_banco || '' Agencia:'' ||agencia.num_agencia || '' Conta Corrente:'' || REPLACE(plano_banco.conta_corrente,''.'','''') )::VARCHAR as desc_conta_bancaria + , CASE WHEN plano_banco.cod_plano = 3720 OR plano_banco.cod_plano = 3495 THEN ''0'' + ELSE SPLIT_PART(plano_banco.conta_corrente,''-'',2) + END AS digito_verificador_conta_bancaria + , CASE WHEN plano_banco.cod_plano = 3720 OR plano_banco.cod_plano = 3495 + THEN (''Banco:''||banco.num_banco || '' Agencia:'' ||agencia.num_agencia || '' Conta Corrente:'' || ''1324106-0'' )::VARCHAR + ELSE (''Banco:''||banco.num_banco || '' Agencia:'' ||agencia.num_agencia || '' Conta Corrente:'' || REPLACE(plano_banco.conta_corrente,''.'','''') )::VARCHAR + END AS desc_conta_bancaria + , plano_conta.cod_estrutural FROM tcemg.conta_bancaria INNER JOIN contabilidade.plano_conta ON plano_conta.cod_conta = conta_bancaria.cod_conta @@ -77,86 +88,59 @@ BEGIN ON banco.cod_banco = plano_banco.cod_banco WHERE conta_bancaria.exercicio = ' || quote_literal(stExercicio) || ' AND conta_bancaria.cod_entidade = (' || stCodEntidades || ') - AND plano_conta.cod_estrutural LIKE ''1.1.1.1.1.19%'' '; EXECUTE stSql; - + + ---TIPO DE CONTA: CONTA-CORRENTE + stSql := ' CREATE TEMPORARY TABLE tmp_corrente AS + SELECT DISTINCT cod_conta + , ''''::VARCHAR AS cod_tipo_aplicacao + , cod_ctb_anterior + , 1 AS tipo_conta + , exercicio + , conta + , num_conta_corrente + , conta_corrente + , cod_orgao + , banco + , agencia + , digito_verificador_agencia + , digito_verificador_conta_bancaria + , desc_conta_bancaria + FROM tmp_contas + WHERE cod_estrutural LIKE ''1.1.1.1.1.19%'' + '; + EXECUTE stSql; + + ---TIPO DE CONTA: CONTAS UNICAS, QUE SAO CORRENTE E APLICACAO EM UMA UNICA CONTA stSql := 'CREATE TEMPORARY TABLE tmp_conta_unica AS - SELECT DISTINCT cod_conta_aplicacao AS cod_conta, - ''''::VARCHAR AS cod_tipo_aplicacao, - cod_ctb_anterior_aplicacao AS cod_ctb_anterior, - 1 AS tipo_conta, - exercicio_aplicacao AS exercicio, - conta, - num_conta_corrente, - conta_corrente, - cod_orgao, - banco, - agencia, - digito_verificador_agencia, - digito_verificador_conta_bancaria, - desc_conta_bancaria - FROM ( - (SELECT conta_bancaria.cod_conta - , CASE WHEN cod_ctb_anterior IS NULL then plano_banco.cod_plano - ELSE cod_ctb_anterior - END AS cod_ctb_anterior - , conta_bancaria.exercicio - , (banco.num_banco || agencia.num_agencia || plano_banco.conta_corrente) AS conta - , CASE WHEN LTRIM(replace(num_agencia,''-'',''''),''9'') = '''' AND num_banco = ''999'' THEN ''999999999999'' - ELSE LTRIM( REPLACE(split_part(plano_banco.conta_corrente,''-'',1),''.'',''''),''0'') - END as num_conta_corrente - , REPLACE(plano_banco.conta_corrente,''.'','''') AS conta_corrente - , plano_banco.cod_entidade AS cod_orgao - , num_banco ::VARCHAR as banco - , split_part(num_agencia,''-'',1) AS agencia - , SPLIT_PART(num_agencia,''-'',2) AS digito_verificador_agencia - , SPLIT_PART(plano_banco.conta_corrente,''-'',2) AS digito_verificador_conta_bancaria - , (''Banco:''||banco.num_banco || '' Agencia:'' ||agencia.num_agencia || '' Conta Corrente:'' || REPLACE(plano_banco.conta_corrente,''.'','''') )::VARCHAR as desc_conta_bancaria - FROM tcemg.conta_bancaria - INNER JOIN contabilidade.plano_conta - ON plano_conta.cod_conta = conta_bancaria.cod_conta - AND plano_conta.exercicio = conta_bancaria.exercicio - INNER JOIN contabilidade.plano_analitica - ON plano_conta.cod_conta = plano_analitica.cod_conta - AND plano_conta.exercicio = plano_analitica.exercicio - INNER JOIN contabilidade.plano_banco - ON plano_analitica.cod_plano = plano_banco.cod_plano - AND plano_analitica.exercicio = plano_banco.exercicio - INNER JOIN monetario.agencia - ON agencia.cod_banco = plano_banco.cod_banco - AND agencia.cod_agencia = plano_banco.cod_agencia - INNER JOIN monetario.banco - ON banco.cod_banco = plano_banco.cod_banco - WHERE conta_bancaria.exercicio = '|| quote_literal(stExercicio) ||' - AND conta_bancaria.cod_entidade = ' || stCodEntidades || ' - AND plano_conta.cod_estrutural LIKE ''1.1.1.1.1.19%'' - ) as corrente - INNER JOIN(SELECT conta_bancaria.cod_conta AS cod_conta_aplicacao - , CASE WHEN cod_ctb_anterior IS NULL THEN plano_banco.cod_plano - ELSE cod_ctb_anterior - END AS cod_ctb_anterior_aplicacao - , conta_bancaria.exercicio AS exercicio_aplicacao - FROM tcemg.conta_bancaria - INNER JOIN contabilidade.plano_conta - ON plano_conta.cod_conta = conta_bancaria.cod_conta - AND plano_conta.exercicio = conta_bancaria.exercicio - INNER JOIN contabilidade.plano_analitica - ON plano_conta.cod_conta = plano_analitica.cod_conta - AND plano_conta.exercicio = plano_analitica.exercicio - INNER JOIN contabilidade.plano_banco - ON plano_analitica.cod_plano = plano_banco.cod_plano - AND plano_analitica.exercicio = plano_banco.exercicio - WHERE conta_bancaria.exercicio = '|| quote_literal(stExercicio) ||' - AND conta_bancaria.cod_entidade = ' || stCodEntidades || ' - AND plano_conta.cod_estrutural LIKE ''1.1.1.1.1.50%'' OR plano_conta.cod_estrutural LIKE ''1.1.4%'' - ) as aplicacao - ON corrente.exercicio = aplicacao.exercicio_aplicacao - AND corrente.cod_ctb_anterior = aplicacao.cod_ctb_anterior_aplicacao - )conta - ORDER BY cod_ctb_anterior '; - EXECUTE stSql; + SELECT DISTINCT cod_conta_aplicacao AS cod_conta + , ''''::VARCHAR AS cod_tipo_aplicacao + , cod_ctb_anterior_aplicacao AS cod_ctb_anterior + , 1 AS tipo_conta + , exercicio_aplicacao AS exercicio + , conta + , num_conta_corrente + , conta_corrente + , cod_orgao + , banco + , agencia + , digito_verificador_agencia + , digito_verificador_conta_bancaria + , desc_conta_bancaria + FROM tmp_corrente as corrente + INNER JOIN ( SELECT tmp_contas.cod_conta AS cod_conta_aplicacao + , cod_ctb_anterior AS cod_ctb_anterior_aplicacao + , tmp_contas.exercicio AS exercicio_aplicacao + FROM tmp_contas + WHERE tmp_contas.cod_estrutural LIKE ''1.1.1.1.1.50%'' OR tmp_contas.cod_estrutural LIKE ''1.1.4%'' + ) as aplicacao + ON corrente.exercicio = aplicacao.exercicio_aplicacao + AND corrente.cod_ctb_anterior = aplicacao.cod_ctb_anterior_aplicacao + ORDER BY cod_ctb_anterior + '; + EXECUTE stSql; CREATE UNIQUE INDEX unq_corrente ON tmp_corrente (exercicio, cod_conta); CREATE UNIQUE INDEX unq_conta_unica ON tmp_conta_unica (exercicio, cod_conta); @@ -164,49 +148,29 @@ BEGIN ---TIPO DE CONTA: APLICACAO stSql := 'CREATE TEMPORARY TABLE tmp_aplicacao AS - SELECT conta_bancaria.cod_conta - , LPAD(cod_tipo_aplicacao::VARCHAR,2,''0'') AS cod_tipo_aplicacao - , CASE WHEN cod_ctb_anterior IS NULL THEN plano_banco.cod_plano - ELSE cod_ctb_anterior - END AS cod_ctb_anterior - , 2 AS tipo_conta - , conta_bancaria.exercicio - , (banco.num_banco || agencia.num_agencia || plano_banco.conta_corrente) AS conta - , CASE WHEN LTRIM(replace(num_agencia,''-'',''''),''9'') = '''' AND num_banco = ''999'' THEN ''999999999999'' - ELSE LTRIM( REPLACE(split_part(plano_banco.conta_corrente,''-'',1),''.'',''''),''0'') - END as num_conta_corrente - , REPLACE(plano_banco.conta_corrente,''.'','''') AS conta_corrente - , plano_banco.cod_entidade AS cod_orgao - , num_banco ::VARCHAR as banco - , split_part(num_agencia,''-'',1) AS agencia - , SPLIT_PART(num_agencia,''-'',2) AS digito_verificador_agencia - , SPLIT_PART(plano_banco.conta_corrente,''-'',2) AS digito_verificador_conta_bancaria - , (''Banco:''||banco.num_banco || '' Agencia:'' ||agencia.num_agencia || '' Conta Corrente:'' || REPLACE(plano_banco.conta_corrente,''.'','''') )::VARCHAR as desc_conta_bancaria - FROM tcemg.conta_bancaria - INNER JOIN contabilidade.plano_conta - ON plano_conta.cod_conta = conta_bancaria.cod_conta - AND plano_conta.exercicio = conta_bancaria.exercicio - INNER JOIN contabilidade.plano_analitica - ON plano_conta.cod_conta = plano_analitica.cod_conta - AND plano_conta.exercicio = plano_analitica.exercicio - INNER JOIN contabilidade.plano_banco - ON plano_analitica.cod_plano = plano_banco.cod_plano - AND plano_analitica.exercicio = plano_banco.exercicio - INNER JOIN monetario.agencia - ON agencia.cod_banco = plano_banco.cod_banco - AND agencia.cod_agencia = plano_banco.cod_agencia - INNER JOIN monetario.banco - ON banco.cod_banco = plano_banco.cod_banco - WHERE conta_bancaria.exercicio = ' || quote_literal(stExercicio) || ' - AND conta_bancaria.cod_entidade = (' || stCodEntidades || ') - AND ( plano_conta.cod_estrutural LIKE ''1.1.1.1.1.50%'' OR plano_conta.cod_estrutural LIKE ''1.1.4%'' ) + SELECT DISTINCT cod_conta + , ''''::VARCHAR AS cod_tipo_aplicacao + , cod_ctb_anterior + , 2 AS tipo_conta + , exercicio + , conta + , num_conta_corrente + , conta_corrente + , cod_orgao + , banco + , agencia + , digito_verificador_agencia + , digito_verificador_conta_bancaria + , desc_conta_bancaria + FROM tmp_contas + WHERE ( cod_estrutural LIKE ''1.1.1.1.1.50%'' OR cod_estrutural LIKE ''1.1.4%'' ) AND NOT EXISTS ( SELECT 1 FROM tmp_conta_unica - WHERE tmp_conta_unica.cod_conta = conta_bancaria.cod_conta + WHERE tmp_conta_unica.cod_conta = tmp_contas.cod_conta ) - UNION ALL - SELECT * - FROM tmp_conta_unica + UNION ALL + SELECT * + FROM tmp_conta_unica '; EXECUTE stSql; @@ -228,6 +192,7 @@ stSql := 'SELECT * DROP INDEX unq_aplicacao; DROP INDEX unq_conta_unica; + DROP TABLE tmp_contas; DROP TABLE tmp_corrente; DROP TABLE tmp_aplicacao; DROP TABLE tmp_conta_unica; diff --git a/gestaoPrestacaoContas/fontes/PLPGSQL/TCEMG/TCEMGRelatorioDividaFlutuanteDepositos.plsql b/gestaoPrestacaoContas/fontes/PLPGSQL/TCEMG/TCEMGRelatorioDividaFlutuanteDepositos.plsql index 4cddfab..6b933a8 100644 --- a/gestaoPrestacaoContas/fontes/PLPGSQL/TCEMG/TCEMGRelatorioDividaFlutuanteDepositos.plsql +++ b/gestaoPrestacaoContas/fontes/PLPGSQL/TCEMG/TCEMGRelatorioDividaFlutuanteDepositos.plsql @@ -197,6 +197,7 @@ BEGIN SELECT * FROM ( SELECT tmp_totaliza.cod_estrutural + ,tmp_totaliza.cod_plano ,publico.fn_nivel(tmp_totaliza.cod_estrutural) as nivel ,tmp_totaliza.nom_conta ,sw_cgm.nom_cgm @@ -214,7 +215,7 @@ BEGIN WHERE tmp_totaliza.exercicio = ' || quote_literal(stExercicio) || ' )as retorno WHERE nivel >= 5 - AND cod_estrutural BETWEEN ''2.1.8.9.2%'' AND ''2.1.8.9.5%'' + AND cod_estrutural ILIKE ''2.1.8.8%'' ORDER BY cod_estrutural '; diff --git a/gestaoPrestacaoContas/fontes/PLPGSQL/TCMBA/FTCMBADemonstrativoConsolidadoReceita.plsql b/gestaoPrestacaoContas/fontes/PLPGSQL/TCMBA/FTCMBADemonstrativoConsolidadoReceita.plsql index 414df3f..9b8eb2f 100644 --- a/gestaoPrestacaoContas/fontes/PLPGSQL/TCMBA/FTCMBADemonstrativoConsolidadoReceita.plsql +++ b/gestaoPrestacaoContas/fontes/PLPGSQL/TCMBA/FTCMBADemonstrativoConsolidadoReceita.plsql @@ -170,11 +170,11 @@ BEGIN , tabela.recurso , tabela.descricao , coalesce(sum(tabela.valor_previsto),0.00) - , coalesce(sum(tabela.arrecadado_mes),0.00) - , coalesce(sum(tabela.arrecadado_ate_periodo),0.00) + , coalesce(sum(tabela.arrecadado_mes + tabela.anulado_mes ),0.00) + , coalesce(sum(tabela.arrecadado_ate_periodo + tabela.anulado_ate_periodo),0.00) , coalesce(sum(tabela.anulado_mes),0.00) , coalesce(sum(tabela.anulado_ate_periodo),0.00) - , coalesce(sum(tabela.valor_previsto),0.00) + coalesce(sum(tabela.arrecadado_ate_periodo),0.00) AS valor_diferenca + , coalesce(sum(tabela.valor_previsto),0.00) + coalesce(sum(tabela.arrecadado_ate_periodo + tabela.anulado_ate_periodo),0.00) AS valor_diferenca FROM ( SELECT conta_receita.cod_estrutural AS cod_estrutural , receita.cod_receita AS receita @@ -226,7 +226,6 @@ BEGIN , tabela.receita , tabela.recurso , tabela.descricao '; - FOR reRegistro IN EXECUTE stSql LOOP RETURN next reRegistro; diff --git a/gestaoPrestacaoContas/fontes/PLPGSQL/TCMBA/FTCMBARecuperaAtosDePessoalTCMBA.plsql b/gestaoPrestacaoContas/fontes/PLPGSQL/TCMBA/FTCMBARecuperaAtosDePessoalTCMBA.plsql new file mode 100644 index 0000000..03424e7 --- /dev/null +++ b/gestaoPrestacaoContas/fontes/PLPGSQL/TCMBA/FTCMBARecuperaAtosDePessoalTCMBA.plsql @@ -0,0 +1,382 @@ +/* + ********************************************************************************** + * * + * @package URBEM CNM - Soluções em Gestão Pública * + * @copyright (c) 2013 Confederação Nacional de Municípos * + * @author Confederação Nacional de Municípios * + * * + * O URBEM CNM é um software livre; você pode redistribuí-lo e/ou modificá-lo sob * + * os termos da Licença Pública Geral GNU conforme publicada pela Fundação do * + * Software Livre (FSF - Free Software Foundation); na versão 2 da Licença. * + * * + * Este programa é distribuído na expectativa de que seja útil, porém, * + * SEM NENHUMA GARANTIA; nem mesmo a garantia implícita de COMERCIABILIDADE OU * + * ADEQUAÇÃO A UMA FINALIDADE ESPECÍFICA. Consulte a Licença Pública Geral do GNU * + * para mais detalhes. * + * * + * Você deve ter recebido uma cópia da Licença Pública Geral do GNU "LICENCA.txt" * + * com este programa; se não, escreva para a Free Software Foundation Inc., * + * no endereço 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA. * + * * + ********************************************************************************** +*/ +/* recuperaAtosDePessoalTCMBA + * Data de Criação : 07/10/2015 + * @author Analista : Dagiane Vieira + * @author Desenvolvedor : Evandro Melos + * $Id:$ +*/ + +CREATE OR REPLACE FUNCTION tcmba.recuperaAtosDePessoalTCMBA(INTEGER, VARCHAR, VARCHAR) RETURNS SETOF RECORD as $$ +DECLARE + inCodPeriodoMovimentacao ALIAS FOR $1; + stCompetencia ALIAS FOR $2; + stEntidade ALIAS FOR $3; + stSQL VARCHAR:=''; + reRecord RECORD; +BEGIN + + --REGRA TAMBEM PODE SER CONFERIDA NO TICKET #22976 + --TCMBA - Exportação - Informes Mensais - Pessoal.txt + + /* + 1) Para tipos de atos de Pessoal referente a admissão - Cadastro de servidor / admissões + Buscar pessoal.contrato_servidor_nomeacao_posse.dt_admissao compreendidas no mes do filtro + e pessoal.contrato_servidor.cod_regime e cod_sub_divisao cfe tipos abaixo: + Preencher com Tipo de Ato de Pessoal: + 1 - Admissão para cargo efetivo => TCM - BA :: Configuração :: Relacionar Tipo de Cargo como "tipo de cargo"="cargo efetivo" e "Tipo de Regime" = Estatutario + 2 - Nomeação para cargo comissionado => TCM - BA :: Configuração :: Relacionar Tipo de Cargo como "tipo de cargo"="cargo comissionado" e "tipo de cargo=Agente político" + 3 - Admissão para emprego público => TCM - BA :: Configuração :: Relacionar Tipo de Cargo como "tipo de cargo"="cargo efetivo" e "Tipo de Regime" = C.L.T + 8 - Contratação por prazo determinado (Inicial) => TCM - BA :: Configuração :: Relacionar Tipo de Cargo como "tipo de cargo"="temporário" + */ + stSQL := 'CREATE TEMPORARY TABLE tmp_atos_admissao AS + SELECT * FROM( + SELECT + contrato_servidor.cod_contrato + ,CASE WHEN tipo_cargo_tce.cod_tipo_cargo_tce = 2 AND tipo_regime_tce.cod_tipo_regime_tce = 2 + THEN 1 + ELSE + CASE WHEN tipo_cargo_tce.cod_tipo_cargo_tce = 1 AND tipo_regime_tce.cod_tipo_regime_tce = 4 + THEN 2 + ELSE + CASE WHEN tipo_cargo_tce.cod_tipo_cargo_tce = 2 AND tipo_regime_tce.cod_tipo_regime_tce = 1 + THEN 3 + ELSE + CASE WHEN tipo_cargo_tce.cod_tipo_cargo_tce = 4 + THEN 8 + END -- END 8 + END -- END 3 + END -- END 2 + END AS tipo_ato + FROM pessoal'||stEntidade||'.contrato_servidor + + INNER JOIN pessoal'||stEntidade||'.contrato + ON contrato.cod_contrato = contrato_servidor.cod_contrato + + INNER JOIN pessoal'||stEntidade||'.contrato_servidor_nomeacao_posse + ON contrato_servidor_nomeacao_posse.cod_contrato = contrato_servidor.cod_contrato + AND TO_CHAR(contrato_servidor_nomeacao_posse.dt_admissao,''yyyymm'') = '''||stCompetencia||''' + + INNER JOIN (SELECT contrato_servidor_nomeacao_posse.cod_contrato + , max(contrato_servidor_nomeacao_posse.timestamp) as timestamp + FROM pessoal'||stEntidade||'.contrato_servidor_nomeacao_posse + WHERE contrato_servidor_nomeacao_posse.timestamp <= (ultimoTimestampPeriodoMovimentacao('||inCodPeriodoMovimentacao||','''||stEntidade||'''))::timestamp + GROUP BY contrato_servidor_nomeacao_posse.cod_contrato + ) as max_contrato_servidor_nomeacao_posse + ON max_contrato_servidor_nomeacao_posse.cod_contrato = contrato_servidor_nomeacao_posse.cod_contrato + AND max_contrato_servidor_nomeacao_posse.timestamp = contrato_servidor_nomeacao_posse.timestamp + + INNER JOIN pessoal'||stEntidade||'.sub_divisao + ON sub_divisao.cod_sub_divisao = contrato_servidor.cod_sub_divisao + + LEFT JOIN pessoal'||stEntidade||'.de_para_tipo_cargo_tcmba + ON de_para_tipo_cargo_tcmba.cod_sub_divisao = sub_divisao.cod_sub_divisao + + LEFT JOIN tcmba.tipo_cargo_tce + ON tipo_cargo_tce.cod_tipo_cargo_tce = de_para_tipo_cargo_tcmba.cod_tipo_cargo_tce + + LEFT JOIN tcmba.tipo_regime_tce + ON tipo_regime_tce.cod_tipo_regime_tce = de_para_tipo_cargo_tcmba.cod_tipo_regime_tce + ) as foo + WHERE tipo_ato IS NOT NULL + ORDER BY cod_contrato + '; + + EXECUTE stSQL; + + /* + 2) Para tipos de atos de Pessoal referente a Rescisões: + => Buscar pessoal.contrato_servidor_caso_causa.dt_rescisao compreendidos no mes do filtro e relacionando cod_caso_causa a pessoal.caso_causa e quando pessoal.causa_rescisao.num_causa for: + Preencher com Tipo de Ato de Pessoal: + 4 - Aposentadoria - RGPS (somente para num_causa => 70 a 79 e regime previdencia = rgps folhapagamento.previdencia.cod_regime_previdencia = 1 relacionado a pessoal.contrato_servidor_previdencia) + 36 - Aposentadoria - RPPS (somente para num_causa => 70 a 79 e regime previdencia = rpps folhapagamento.previdencia.cod_regime_previdencia = 2 relacionado a pessoal.contrato_servidor_previdencia) + 13 - Exoneração/Demissão de cargo ou emprego público (somente para num_causa in 10,11,20,21) + 14 - Falecimento (somente para num_causa in 60,62,64) + 24 - Contratação por prazo determinado (Término Contrato) => somente para num_causa = 12 + */ + stSQL :=' CREATE TEMPORARY TABLE tmp_atos_rescisao AS + SELECT * FROM( + SELECT + contrato_servidor.cod_contrato + ,CASE WHEN (causa_rescisao.num_causa BETWEEN 70 AND 79) AND previdencia.cod_regime_previdencia = 1 + THEN + 4 + ELSE + CASE WHEN (causa_rescisao.num_causa BETWEEN 70 AND 79) AND previdencia.cod_regime_previdencia = 2 + THEN + 36 + ELSE + CASE WHEN (causa_rescisao.num_causa=10) + OR (causa_rescisao.num_causa=11) + OR (causa_rescisao.num_causa=20) + OR (causa_rescisao.num_causa=21) + THEN + 13 + ELSE + CASE WHEN (causa_rescisao.num_causa=60) + OR (causa_rescisao.num_causa=62) + OR (causa_rescisao.num_causa=64) + THEN + 14 + ELSE + CASE WHEN causa_rescisao.num_causa = 12 + THEN + 24 + END --24 + END -- 14 + END -- 13 + END -- END 36 + END AS tipo_ato + FROM pessoal'||stEntidade||'.contrato_servidor + + INNER JOIN(SELECT contrato_servidor_previdencia.* + FROM pessoal'||stEntidade||'.contrato_servidor_previdencia + INNER JOIN(SELECT max.cod_contrato + ,max.cod_previdencia + ,MAX(timestamp) as timestamp + FROM pessoal'||stEntidade||'.contrato_servidor_previdencia as max + WHERE max.timestamp <= (ultimoTimestampPeriodoMovimentacao('||inCodPeriodoMovimentacao||','''||stEntidade||'''))::timestamp + GROUP BY 1,2 + ) AS max_contratro_servidor_previdencia + ON max_contratro_servidor_previdencia.cod_contrato = contrato_servidor_previdencia.cod_contrato + AND max_contratro_servidor_previdencia.cod_previdencia = contrato_servidor_previdencia.cod_previdencia + AND max_contratro_servidor_previdencia.timestamp = contrato_servidor_previdencia.timestamp + ) AS contrato_servidor_previdencia + ON contrato_servidor_previdencia.cod_contrato = contrato_servidor.cod_contrato + AND contrato_servidor_previdencia.timestamp <= (ultimoTimestampPeriodoMovimentacao('||inCodPeriodoMovimentacao||','''||stEntidade||'''))::timestamp + + INNER JOIN folhapagamento'||stEntidade||'.previdencia + ON previdencia.cod_previdencia = contrato_servidor_previdencia.cod_previdencia + + LEFT JOIN pessoal'||stEntidade||'.contrato_servidor_caso_causa + ON contrato_servidor_caso_causa.cod_contrato = contrato_servidor_previdencia.cod_contrato + + LEFT JOIN pessoal'||stEntidade||'.caso_causa + ON caso_causa.cod_caso_causa = contrato_servidor_caso_causa.cod_caso_causa + + LEFT JOIN pessoal'||stEntidade||'.causa_rescisao + ON causa_rescisao.cod_causa_rescisao = caso_causa.cod_causa_rescisao + + WHERE contrato_servidor_caso_causa.timestamp <= (ultimoTimestampPeriodoMovimentacao('||inCodPeriodoMovimentacao||','''||stEntidade||'''))::timestamp + AND TO_CHAR(contrato_servidor_caso_causa.dt_rescisao,''yyyymm'') = '''||stCompetencia||''' + ) as foo + WHERE tipo_ato IS NOT NULL + ORDER BY cod_contrato + '; + + EXECUTE stSQL; + + /* + 3) Para tipos de atos de Pessoal referente a Pensões: + => Buscar pessoal.contrato_pensionista.dt_inicio_beneficio e dt_fim_beneficio estiver compreendido no mes do filtro + Preencher com Tipo de Ato de Pessoal: + 15 - Pensão - RGPS => folhapagamento.previdencia.cod_regime_previdencia = 1 relacionado a pessoal.contrato_servidor_previdencia do pessoal.contrato_pensionista.cod_contrato_cedente + 35 - Pensão - RPPS => folhapagamento.previdencia.cod_regime_previdencia = 2 relacionado a pessoal.contrato_servidor_previdencia do pessoal.contrato_pensionista.cod_contrato_cedente + 41 - Término de Pensão => quando pessoal.contrato_pensionista.dt_encerramento ocorrer no mes do filtro + */ + stSQL := ' CREATE TEMPORARY TABLE tmp_atos_pensao AS + SELECT * FROM ( + SELECT + contrato_pensionista.cod_contrato + ,CASE previdencia.cod_regime_previdencia + WHEN 1 THEN 15 + WHEN 2 THEN 35 + ELSE + CASE WHEN TO_CHAR(contrato_pensionista.dt_encerramento,''yyyymm'') = '''||stCompetencia||''' + THEN + 41 + END + END AS tipo_ato + FROM pessoal'||stEntidade||'.contrato_pensionista + INNER JOIN (SELECT contrato_pensionista_previdencia.* + FROM pessoal'||stEntidade||'.contrato_pensionista_previdencia + INNER JOIN(SELECT max.cod_contrato + ,max.cod_previdencia + ,MAX(timestamp) as timestamp + FROM pessoal'||stEntidade||'.contrato_pensionista_previdencia as max + WHERE max.timestamp <= (ultimoTimestampPeriodoMovimentacao('||inCodPeriodoMovimentacao||','''||stEntidade||'''))::timestamp + GROUP BY 1,2 + ) AS max_contrato_pensionista_previdencia + ON max_contrato_pensionista_previdencia.cod_contrato = contrato_pensionista_previdencia.cod_contrato + AND max_contrato_pensionista_previdencia.cod_previdencia = contrato_pensionista_previdencia.cod_previdencia + AND max_contrato_pensionista_previdencia.timestamp = contrato_pensionista_previdencia.timestamp + ) AS contrato_pensionista_previdencia + ON contrato_pensionista_previdencia.cod_contrato = contrato_pensionista.cod_contrato + AND contrato_pensionista_previdencia.timestamp <= (ultimoTimestampPeriodoMovimentacao('||inCodPeriodoMovimentacao||','''||stEntidade||'''))::timestamp + + INNER JOIN folhapagamento'||stEntidade||'.previdencia + ON previdencia.cod_previdencia = contrato_pensionista_previdencia.cod_previdencia + + WHERE TO_CHAR(contrato_pensionista.dt_inicio_beneficio,''yyyymm'') = '''||stCompetencia||''' + OR TO_CHAR(contrato_pensionista.dt_encerramento,''yyyymm'') = '''||stCompetencia||''' + ) as foo + WHERE tipo_ato IS NOT NULL + ORDER BY cod_contrato + '; + + EXECUTE stSQL; + + /* + 4) Para tipos de atos de Pessoal referente a Cedidos/Adidos: + => pessoal.adido_cedido.dt_inicial e dt_final estiver compreendido no mes do filtro + Preencher com Tipo de Ato de Pessoal: + 22 Cessão de outro Órgão/Entidade => e pessoal.adido_cedido.tipo_cedencia in (1,2) + 7 Cessão para outro Órgão/Entidade => e pessoal.adido_cedido.tipo_cedencia in (3,4) + 26 Retorno / Devolução de Servidor Cedido => pessoal.adido_cedido.dt_final estiver no mes do filtro + */ + stSQL := ' CREATE TEMPORARY TABLE tmp_atos_cedidos AS + SELECT * FROM( + SELECT + adido_cedido.cod_contrato + ,CASE adido_cedido.tipo_cedencia + WHEN ''a'' THEN 22 + WHEN ''c'' THEN 7 + ELSE + CASE WHEN TO_CHAR(adido_cedido.dt_final,''yyyymm'') = '''||stCompetencia||''' + THEN + 26 + END + END AS tipo_ato + FROM (SELECT adido_cedido.* + FROM pessoal'||stEntidade||'.adido_cedido + INNER JOIN (SELECT max.cod_contrato + , max.cod_norma + ,MAX(max.timestamp) as timestamp + FROM pessoal'||stEntidade||'.adido_cedido as max + WHERE max.timestamp <= (ultimoTimestampPeriodoMovimentacao('||inCodPeriodoMovimentacao||','''||stEntidade||'''))::timestamp + GROUP BY 1,2 + ) as max_adido_cedido + ON max_adido_cedido.cod_contrato = adido_cedido.cod_contrato + AND max_adido_cedido.cod_norma = adido_cedido.cod_norma + AND max_adido_cedido.timestamp = adido_cedido.timestamp + ) as adido_cedido + + WHERE TO_CHAR(adido_cedido.dt_inicial,''yyyymm'') = '''||stCompetencia||''' + OR TO_CHAR(adido_cedido.dt_final,''yyyymm'') = '''||stCompetencia||''' + + ) as foo + WHERE tipo_ato IS NOT NULL + ORDER BY cod_contrato + '; + + EXECUTE stSQL; + + /* + 5) Para tipos de atos de Pessoal referente a assentamentos de afastamento: + => Se "periodo_inicial" (de pessoal.assentamento_gerado) estiver compreendido no mes/ano do filtro e cod_assentamento (de pessoal.assentamento_gerado e + pessoal.assentamento_gerado_contrato_servidor) relacionar-se o cod_assentamento com motivo e : + Preencher com Tipo de Ato de Pessoal: + 51 - Auxílio Doença - previdência própria (para assentamento.cod_motivo = 5 e regime previd = rpps ) + 50 - Auxílio Doença - RGPS (para assentamento.cod_motivo = 5 e regime_previd = rgps) + 54 - Licença Maternidade - RGPS (para assentamento.cod_motivo = 7 e regime_previd = rgps) + 55 - Licença maternindade - Previdência Própria (para assentamento.cod_motivo = 7 e regime_previd = rpps) + 53 - Licença Prêmio (para assentamento.cod_motivo = 9 ) + */ + stSQL := ' CREATE TEMPORARY TABLE tmp_ato_afastamento AS + SELECT * FROM( + SELECT + assentamento_gerado_contrato_servidor.cod_contrato + ,CASE WHEN assentamento_assentamento.cod_motivo = 5 AND assentamento_assentamento.cod_regime_previdencia = 2 + THEN + 51 + ELSE + CASE WHEN assentamento_assentamento.cod_motivo = 5 AND assentamento_assentamento.cod_regime_previdencia = 1 + THEN + 50 + ELSE + CASE WHEN assentamento_assentamento.cod_motivo = 7 AND assentamento_assentamento.cod_regime_previdencia = 1 + THEN + 54 + ELSE + CASE WHEN assentamento_assentamento.cod_motivo = 7 AND assentamento_assentamento.cod_regime_previdencia = 2 + THEN + 55 + ELSE + CASE WHEN assentamento_assentamento.cod_motivo = 9 + THEN + 59 + END -- 59 + END -- 55 + END -- 54 + END -- 50 + END AS tipo_ato + FROM (SELECT assentamento_gerado.* + FROM pessoal'||stEntidade||'.assentamento_gerado + INNER JOIN(SELECT MAX(max_assentamento_gerado.timestamp) as timestamp + , max_assentamento_gerado.cod_assentamento_gerado + FROM pessoal'||stEntidade||'.assentamento_gerado as max_assentamento_gerado + WHERE max_assentamento_gerado.timestamp <= (ultimoTimestampPeriodoMovimentacao('||inCodPeriodoMovimentacao||','''||stEntidade||'''))::timestamp + GROUP BY max_assentamento_gerado.cod_assentamento_gerado + ) as max_assentamento_gerado + ON max_assentamento_gerado.cod_assentamento_gerado = assentamento_gerado.cod_assentamento_gerado + AND max_assentamento_gerado.timestamp = assentamento_gerado.timestamp + )as assentamento_gerado + + INNER JOIN pessoal'||stEntidade||'.assentamento_assentamento + ON assentamento_assentamento.cod_assentamento = assentamento_gerado.cod_assentamento + + INNER JOIN pessoal'||stEntidade||'.assentamento_gerado_contrato_servidor + ON assentamento_gerado_contrato_servidor.cod_assentamento_gerado = assentamento_gerado.cod_assentamento_gerado + + WHERE TO_CHAR(assentamento_gerado.periodo_inicial,''yyyymm'') <= '''||stCompetencia||''' + AND ((TO_CHAR(assentamento_gerado.periodo_final,''yyyymm'') >= '''||stCompetencia||''') OR assentamento_gerado.periodo_final is null) + ) as resultado + WHERE tipo_ato is not null + ORDER BY cod_contrato + '; + + EXECUTE stSQL; + + stSQL := ' + SELECT * FROM tmp_atos_admissao + + UNION + + SELECT * FROM tmp_atos_rescisao + + UNION + + SELECT * FROM tmp_atos_pensao + + UNION + + SELECT * FROM tmp_atos_cedidos + + UNION + + SELECT * FROM tmp_ato_afastamento + '; + + FOR reRecord IN EXECUTE stSQL + LOOP + RETURN NEXT reRecord; + END LOOP; + + DROP TABLE tmp_atos_admissao; + DROP TABLE tmp_atos_rescisao; + DROP TABLE tmp_atos_pensao; + DROP TABLE tmp_atos_cedidos; + DROP TABLE tmp_ato_afastamento; + +END; +$$ LANGUAGE 'plpgsql'; \ No newline at end of file diff --git a/gestaoPrestacaoContas/fontes/PLPGSQL/TCMBA/FTCMBARecuperaSalario2.plsql b/gestaoPrestacaoContas/fontes/PLPGSQL/TCMBA/FTCMBARecuperaSalario2.plsql new file mode 100644 index 0000000..02149bd --- /dev/null +++ b/gestaoPrestacaoContas/fontes/PLPGSQL/TCMBA/FTCMBARecuperaSalario2.plsql @@ -0,0 +1,958 @@ +/* + ********************************************************************************** + * * + * @package URBEM CNM - Soluções em Gestão Pública * + * @copyright (c) 2013 Confederação Nacional de Municípos * + * @author Confederação Nacional de Municípios * + * * + * O URBEM CNM é um software livre; você pode redistribuí-lo e/ou modificá-lo sob * + * os termos da Licença Pública Geral GNU conforme publicada pela Fundação do * + * Software Livre (FSF - Free Software Foundation); na versão 2 da Licença. * + * * + * Este programa é distribuído na expectativa de que seja útil, porém, * + * SEM NENHUMA GARANTIA; nem mesmo a garantia implícita de COMERCIABILIDADE OU * + * ADEQUAÇÃO A UMA FINALIDADE ESPECÍFICA. Consulte a Licença Pública Geral do GNU * + * para mais detalhes. * + * * + * Você deve ter recebido uma cópia da Licença Pública Geral do GNU "LICENCA.txt" * + * com este programa; se não, escreva para a Free Software Foundation Inc., * + * no endereço 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA. * + * * + ********************************************************************************** +*/ +/* recuperaServidorSalario2 + * Data de Criação : 09/11/2015 + * @author Analista : Dagiane Vieira + * @author Desenvolvedor : Michel Teixeira + * $Id: FTCMBARecuperaSalario2.plsql 63946 2015-11-10 21:10:32Z michel $ +*/ + +/* +CREATE TYPE tcmba_servidor_salario2 AS ( + cod_periodo_movimentacao INTEGER + , cod_servidor_pensionista INTEGER + , tipo INTEGER + , cod_contrato INTEGER + , num_orgao INTEGER + , cod_tipo_cargo INTEGER + , funcao_atual INTEGER + , classe INTEGER + , numcgm INTEGER + , nom_cgm VARCHAR + , cpf VARCHAR + , matricula INTEGER + , cod_cargo INTEGER + , nro_dias INTEGER + , horas_mensais INTEGER + , cod_funcao_temporario INTEGER + , folha INTEGER + , cod_previdencia INTEGER + , salario_base NUMERIC + , salario_vantagens NUMERIC + , salario_gratificacao NUMERIC + , salario_familia NUMERIC + , salario_ferias NUMERIC + , salario_horas_extra NUMERIC + , salario_decimo NUMERIC + , salario_descontos NUMERIC + , desconto_irrf NUMERIC + , desconto_irrf_decimo NUMERIC + , desconto_consignado_1 NUMERIC + , cod_banco_1 VARCHAR + , desconto_consignado_2 NUMERIC + , cod_banco_2 VARCHAR + , desconto_consignado_3 NUMERIC + , cod_banco_3 VARCHAR + , desconto_previdencia NUMERIC + , desconto_irrf_ferias NUMERIC + , desconto_previdencia_decimo NUMERIC + , desconto_previdencia_ferias NUMERIC + , desconto_pensao NUMERIC + , desconto_plano_saude NUMERIC + , salario_liquido NUMERIC +); +*/ + +CREATE OR REPLACE FUNCTION tcmba.recuperaServidorSalario2(VARCHAR, VARCHAR, VARCHAR, VARCHAR) RETURNS SETOF tcmba_servidor_salario2 AS $$ +DECLARE + stExercicio ALIAS FOR $1; + stEntidade ALIAS FOR $2; + stEntidadeRh ALIAS FOR $3; + stCompetencia ALIAS FOR $4; + + stSQL VARCHAR :=''; + inCodPeridoMovimentacao INTEGER := 0; + timestampPeridoMovimentacao TIMESTAMP; + + inCodContrato INTEGER := 0; + stContratos TEXT :=''; + stEventos TEXT :=''; + stSQLEventos VARCHAR :=''; + + crCursor REFCURSOR; + reRecord RECORD; + reRecordEventos RECORD; +BEGIN + stSQL := ' + SELECT cod_periodo_movimentacao + FROM folhapagamento'||stEntidadeRh||'.periodo_movimentacao + WHERE TO_CHAR(periodo_movimentacao.dt_inicial,''mmyyyy'') = '''||stCompetencia||''' '; + + OPEN crCursor FOR EXECUTE stSql; + FETCH crCursor INTO inCodPeridoMovimentacao; + CLOSE crCursor; + + SELECT ultimoTimestampPeriodoMovimentacao( inCodPeridoMovimentacao, ''||stEntidadeRh||'')::timestamp + INTO timestampPeridoMovimentacao; + + stSQL := 'CREATE TEMPORARY TABLE tmp_servidor_salario2 as + SELECT '||inCodPeridoMovimentacao||' AS cod_periodo_movimentacao + , contrato_servidor.cod_servidor_pensionista + , contrato_servidor.tipo + , contrato.cod_contrato + , de_para_lotacao_orgao.num_orgao + , de_para_tipo_cargo_tcmba.cod_tipo_cargo_tce AS cod_tipo_cargo + , tcmba_cargo_servidor.cod_tipo_funcao AS funcao_atual + , fonte_recurso_lotacao.cod_tipo_fonte AS classe + , contrato_servidor.numcgm + , sem_acentos(sw_cgm.nom_cgm) AS nom_cgm + , sw_cgm_pessoa_fisica.cpf + , contrato.registro AS matricula + , CASE WHEN de_para_tipo_cargo_tcmba.cod_tipo_cargo_tce NOT IN (4) THEN + contrato_servidor.cod_cargo + END AS cod_cargo + , 30 AS nro_dias + , COALESCE(padrao.horas_mensais::integer, 0) AS horas_mensais + , CASE WHEN de_para_tipo_cargo_tcmba.cod_tipo_cargo_tce IN (4) THEN + tcmba_cargo_servidor_temporario.cod_tipo_funcao + END AS cod_funcao_temporario + , contrato_servidor_periodo.folha + , servidor_previdencia.cod_previdencia + + FROM pessoal'||stEntidadeRh||'.contrato + + INNER JOIN ( SELECT servidor.numcgm + , servidor.cod_servidor AS cod_servidor_pensionista + , 1 as tipo + , servidor_contrato_servidor.cod_contrato + , contrato_servidor.cod_cargo + , contrato_servidor.cod_sub_divisao + , contrato_servidor_orgao.cod_orgao + FROM pessoal'||stEntidadeRh||'.servidor + INNER JOIN pessoal'||stEntidadeRh||'.servidor_contrato_servidor + ON servidor_contrato_servidor.cod_servidor = servidor.cod_servidor + INNER JOIN pessoal'||stEntidadeRh||'.contrato_servidor + ON contrato_servidor.cod_contrato = servidor_contrato_servidor.cod_contrato + INNER JOIN (SELECT contrato_servidor_orgao.cod_contrato + , contrato_servidor_orgao.cod_orgao + , contrato_servidor_orgao.timestamp + FROM pessoal'||stEntidadeRh||'.contrato_servidor_orgao + WHERE contrato_servidor_orgao.timestamp = ( + SELECT max(CSO.timestamp) AS timestamp + FROM pessoal'||stEntidadeRh||'.contrato_servidor_orgao AS CSO + WHERE CSO.cod_contrato = contrato_servidor_orgao.cod_contrato + AND CSO.timestamp <= ('''||timestampPeridoMovimentacao||''')::TIMESTAMP + ) + ) AS contrato_servidor_orgao + ON contrato_servidor_orgao.cod_contrato = contrato_servidor.cod_contrato + + UNION + + SELECT pensionista.numcgm + , pensionista.cod_pensionista AS cod_servidor_pensionista + , 2 as tipo + , contrato_pensionista.cod_contrato + , contrato_servidor.cod_cargo + , contrato_servidor.cod_sub_divisao + , contrato_pensionista_orgao.cod_orgao + FROM pessoal'||stEntidadeRh||'.pensionista + INNER JOIN pessoal'||stEntidadeRh||'.contrato_pensionista + ON contrato_pensionista.cod_pensionista = pensionista.cod_pensionista + AND contrato_pensionista.cod_contrato_cedente = pensionista.cod_contrato_cedente + INNER JOIN pessoal'||stEntidadeRh||'.contrato_servidor + ON contrato_servidor.cod_contrato = contrato_pensionista.cod_contrato_cedente + INNER JOIN (SELECT contrato_pensionista_orgao.* + FROM pessoal'||stEntidadeRh||'.contrato_pensionista_orgao + WHERE contrato_pensionista_orgao.timestamp = ( + SELECT max(CPO.timestamp) AS timestamp + FROM pessoal'||stEntidadeRh||'.contrato_pensionista_orgao AS CPO + WHERE CPO.cod_contrato = contrato_pensionista_orgao.cod_contrato + AND CPO.timestamp <= ('''||timestampPeridoMovimentacao||''')::TIMESTAMP + ) + ) AS contrato_pensionista_orgao + ON contrato_pensionista_orgao.cod_contrato = contrato_pensionista.cod_contrato + ) AS contrato_servidor + ON contrato.cod_contrato = contrato_servidor.cod_contrato + + LEFT JOIN pessoal'||stEntidadeRh||'.de_para_lotacao_orgao + ON de_para_lotacao_orgao.cod_orgao = contrato_servidor.cod_orgao + AND de_para_lotacao_orgao.exercicio = '''||stExercicio||''' + + LEFT JOIN pessoal'||stEntidadeRh||'.de_para_tipo_cargo_tcmba + ON de_para_tipo_cargo_tcmba.cod_sub_divisao = contrato_servidor.cod_sub_divisao + + LEFT JOIN folhapagamento'||stEntidadeRh||'.tcmba_cargo_servidor + ON tcmba_cargo_servidor.cod_cargo = contrato_servidor.cod_cargo + AND tcmba_cargo_servidor.cod_entidade IN ('||stEntidade||') + AND tcmba_cargo_servidor.exercicio = '''||stExercicio||''' + + LEFT JOIN tcmba.fonte_recurso_lotacao + ON fonte_recurso_lotacao.cod_orgao = contrato_servidor.cod_orgao + AND fonte_recurso_lotacao.cod_entidade IN ('||stEntidade||') + AND fonte_recurso_lotacao.exercicio = '''||stExercicio||''' + + INNER JOIN sw_cgm + ON sw_cgm.numcgm = contrato_servidor.numcgm + + INNER JOIN sw_cgm_pessoa_fisica + ON sw_cgm_pessoa_fisica.numcgm = sw_cgm.numcgm + + INNER JOIN folhapagamento'||stEntidadeRh||'.periodo_movimentacao + ON periodo_movimentacao.cod_periodo_movimentacao = '||inCodPeridoMovimentacao||' + + INNER JOIN ( SELECT periodo_movimentacao.cod_periodo_movimentacao + , contrato.cod_contrato + , CASE WHEN registro_evento_periodo.cod_contrato IS NOT NULL THEN + 0 + WHEN registro_evento_complementar.cod_contrato IS NOT NULL THEN + registro_evento_complementar.cod_complementar + ELSE + 0 + END + AS folha + FROM pessoal'||stEntidadeRh||'.contrato + + INNER JOIN folhapagamento'||stEntidadeRh||'.periodo_movimentacao + ON periodo_movimentacao.cod_periodo_movimentacao = '||inCodPeridoMovimentacao||' + + LEFT JOIN folhapagamento'||stEntidadeRh||'.registro_evento_periodo + ON periodo_movimentacao.cod_periodo_movimentacao = registro_evento_periodo.cod_periodo_movimentacao + AND contrato.cod_contrato = registro_evento_periodo.cod_contrato + + LEFT JOIN ( select max(cod_complementar) as cod_complementar + , cod_contrato + from folhapagamento'||stEntidadeRh||'.registro_evento_complementar + where registro_evento_complementar.cod_periodo_movimentacao = '||inCodPeridoMovimentacao||' + group by registro_evento_complementar.cod_contrato + ) AS registro_evento_complementar + ON contrato.cod_contrato = registro_evento_complementar.cod_contrato + + LEFT JOIN folhapagamento'||stEntidadeRh||'.registro_evento_ferias + ON periodo_movimentacao.cod_periodo_movimentacao = registro_evento_ferias.cod_periodo_movimentacao + AND contrato.cod_contrato = registro_evento_ferias.cod_contrato + + LEFT JOIN folhapagamento'||stEntidadeRh||'.registro_evento_decimo + ON periodo_movimentacao.cod_periodo_movimentacao = registro_evento_decimo.cod_periodo_movimentacao + AND contrato.cod_contrato = registro_evento_decimo.cod_contrato + + WHERE registro_evento_periodo.cod_contrato IS NOT NULL + OR registro_evento_complementar.cod_contrato IS NOT NULL + OR registro_evento_decimo.cod_contrato IS NOT NULL + OR registro_evento_ferias.cod_contrato IS NOT NULL + + GROUP BY periodo_movimentacao.cod_periodo_movimentacao + , contrato.cod_contrato + , folha + ) AS contrato_servidor_periodo + ON contrato_servidor_periodo.cod_contrato = contrato.cod_contrato + AND contrato_servidor_periodo.cod_periodo_movimentacao = periodo_movimentacao.cod_periodo_movimentacao + + LEFT JOIN ( SELECT ultimo_contrato_servidor_previdencia.cod_contrato + , ultimo_contrato_servidor_previdencia.cod_previdencia + FROM ultimo_contrato_servidor_previdencia( '''||stEntidadeRh||''' + , '||inCodPeridoMovimentacao||' + ) + + INNER JOIN folhapagamento'||stEntidadeRh||'.previdencia + ON previdencia.cod_previdencia = ultimo_contrato_servidor_previdencia.cod_previdencia + AND previdencia.cod_regime_previdencia = 1 + + GROUP BY ultimo_contrato_servidor_previdencia.cod_contrato + , ultimo_contrato_servidor_previdencia.cod_previdencia + ) AS servidor_previdencia + ON servidor_previdencia.cod_contrato = contrato_servidor_periodo.cod_contrato + + LEFT JOIN pessoal'||stEntidadeRh||'.cargo_padrao + ON cargo_padrao.cod_cargo = contrato_servidor.cod_cargo + AND cargo_padrao.timestamp = ( + select max(cp.timestamp) as timestamp + from pessoal'||stEntidadeRh||'.cargo_padrao as cp + where cp.cod_cargo = cargo_padrao.cod_cargo + and cp.timestamp <= ('''||timestampPeridoMovimentacao||''')::TIMESTAMP + ) + + LEFT JOIN folhapagamento'||stEntidadeRh||'.padrao + ON padrao.cod_padrao = cargo_padrao.cod_padrao + + LEFT JOIN folhapagamento'||stEntidadeRh||'.tcmba_cargo_servidor_temporario + ON tcmba_cargo_servidor_temporario.exercicio = '''||stExercicio||''' + AND tcmba_cargo_servidor_temporario.cod_entidade IN ('||stEntidade||') + AND tcmba_cargo_servidor_temporario.cod_cargo = contrato_servidor.cod_cargo + + GROUP BY contrato_servidor.cod_servidor_pensionista + , contrato_servidor.tipo + , contrato.cod_contrato + , de_para_lotacao_orgao.num_orgao + , de_para_tipo_cargo_tcmba.cod_tipo_cargo_tce + , tcmba_cargo_servidor.cod_tipo_funcao + , fonte_recurso_lotacao.cod_tipo_fonte + , contrato_servidor.numcgm + , sw_cgm.nom_cgm + , sw_cgm_pessoa_fisica.cpf + , contrato.registro + , contrato_servidor.cod_cargo + , padrao.horas_mensais + , cod_funcao_temporario + , contrato_servidor_periodo.folha + , servidor_previdencia.cod_previdencia + + ORDER BY sw_cgm.nom_cgm + , contrato.cod_contrato '; + EXECUTE stSql; + + --LISTA DE CONTRATOS + stSQL := ' SELECT COALESCE(array_to_string( publico.concatenar_array( cod_contrato ), '','' ), ''0'') AS contratos + FROM ( SELECT cod_contrato + FROM tmp_servidor_salario2 + GROUP BY cod_contrato + ORDER BY cod_contrato + ) AS contratos '; + + OPEN crCursor FOR EXECUTE stSql; + FETCH crCursor INTO stContratos; + CLOSE crCursor; + + --SALARIO BASE + stSQL := ' SELECT COALESCE(array_to_string( publico.concatenar_array( cod_evento ), '','' ), ''0'') AS eventos + FROM folhapagamento'||stEntidadeRh||'.tcmba_salario_base + WHERE cod_entidade IN ('||stEntidade||') + AND exercicio = '''||stExercicio||''' + GROUP BY exercicio + , cod_entidade '; + + OPEN crCursor FOR EXECUTE stSql; + FETCH crCursor INTO stEventos; + CLOSE crCursor; + IF stEventos IS NULL THEN + stEventos := '0'; + END IF; + + stSQLEventos := 'CREATE TEMPORARY TABLE tmp_tcmba_salario_base as + SELECT * + FROM tcmba.recuperaServidorValoresPorEvento( '||inCodPeridoMovimentacao||' + , '''||stEntidadeRh||''' + , '''||stEventos||''' + ) AS salario_base + ( cod_periodo_movimentacao INTEGER + , cod_contrato INTEGER + , valor NUMERIC + ) + WHERE cod_contrato IN ( '||stContratos||' )'; + EXECUTE stSQLEventos; + + --SALARIO VANTAGENS + stSQL := ' SELECT array_to_string( publico.concatenar_array( cod_evento ), '','' ) AS eventos + FROM folhapagamento'||stEntidadeRh||'.tcmba_vantagens_salariais + WHERE cod_entidade IN ('||stEntidade||') + AND exercicio = '''||stExercicio||''' + GROUP BY exercicio + , cod_entidade '; + + OPEN crCursor FOR EXECUTE stSql; + FETCH crCursor INTO stEventos; + CLOSE crCursor; + IF stEventos IS NULL THEN + stEventos := '0'; + END IF; + + stSQLEventos := 'CREATE TEMPORARY TABLE tmp_tcmba_salario_vantagens as + SELECT * + FROM tcmba.recuperaServidorValoresPorEvento( '||inCodPeridoMovimentacao||' + , '''||stEntidadeRh||''' + , '''||stEventos||''' + ) AS salario_base + ( cod_periodo_movimentacao INTEGER + , cod_contrato INTEGER + , valor NUMERIC + ) + WHERE cod_contrato IN ( '||stContratos||' )'; + EXECUTE stSQLEventos; + + --SALARIO GRATIFICAÇÃO + stSQL := ' SELECT array_to_string( publico.concatenar_array( cod_evento ), '','' ) AS eventos + FROM folhapagamento'||stEntidadeRh||'.tcmba_gratificacao_funcao + WHERE cod_entidade IN ('||stEntidade||') + AND exercicio = '''||stExercicio||''' + GROUP BY exercicio + , cod_entidade '; + + OPEN crCursor FOR EXECUTE stSql; + FETCH crCursor INTO stEventos; + CLOSE crCursor; + IF stEventos IS NULL THEN + stEventos := '0'; + END IF; + + stSQLEventos := 'CREATE TEMPORARY TABLE tmp_tcmba_salario_gratificacao as + SELECT * + FROM tcmba.recuperaServidorValoresPorEvento( '||inCodPeridoMovimentacao||' + , '''||stEntidadeRh||''' + , '''||stEventos||''' + ) AS salario_base + ( cod_periodo_movimentacao INTEGER + , cod_contrato INTEGER + , valor NUMERIC + ) + WHERE cod_contrato IN ( '||stContratos||' )'; + EXECUTE stSQLEventos; + + --SALARIO FAMILIA + stSQL := ' SELECT array_to_string( publico.concatenar_array( cod_evento ), '','' ) AS eventos + FROM folhapagamento'||stEntidadeRh||'.tcmba_salario_familia + WHERE cod_entidade IN ('||stEntidade||') + AND exercicio = '''||stExercicio||''' + GROUP BY exercicio + , cod_entidade '; + + OPEN crCursor FOR EXECUTE stSql; + FETCH crCursor INTO stEventos; + CLOSE crCursor; + IF stEventos IS NULL THEN + stEventos := '0'; + END IF; + + stSQLEventos := 'CREATE TEMPORARY TABLE tmp_tcmba_salario_familia as + SELECT * + FROM tcmba.recuperaServidorValoresPorEvento( '||inCodPeridoMovimentacao||' + , '''||stEntidadeRh||''' + , '''||stEventos||''' + ) AS salario_base + ( cod_periodo_movimentacao INTEGER + , cod_contrato INTEGER + , valor NUMERIC + ) + WHERE cod_contrato IN ( '||stContratos||' )'; + EXECUTE stSQLEventos; + + --SALARIO FERIAS + stSQLEventos := 'CREATE TEMPORARY TABLE tmp_tcmba_salario_ferias as + SELECT * + FROM tcmba.recuperaServidorValoresPorEventoFerias( '||inCodPeridoMovimentacao||' + , '''||stEntidadeRh||''' + , '''' + , TRUE + , FALSE + ) AS salario_ferias + ( cod_periodo_movimentacao INTEGER + , cod_contrato INTEGER + , valor NUMERIC + ) + WHERE cod_contrato IN ( '||stContratos||' )'; + EXECUTE stSQLEventos; + + --SALARIO HORAS EXTRA + stSQL := ' SELECT array_to_string( publico.concatenar_array( cod_evento ), '','' ) AS eventos + FROM folhapagamento'||stEntidadeRh||'.tcmba_salario_horas_extras + WHERE cod_entidade IN ('||stEntidade||') + AND exercicio = '''||stExercicio||''' + GROUP BY exercicio + , cod_entidade '; + + OPEN crCursor FOR EXECUTE stSql; + FETCH crCursor INTO stEventos; + CLOSE crCursor; + IF stEventos IS NULL THEN + stEventos := '0'; + END IF; + + stSQLEventos := 'CREATE TEMPORARY TABLE tmp_tcmba_salario_horas_extra as + SELECT * + FROM tcmba.recuperaServidorValoresPorEvento( '||inCodPeridoMovimentacao||' + , '''||stEntidadeRh||''' + , '''||stEventos||''' + ) AS salario_horas_extra + ( cod_periodo_movimentacao INTEGER + , cod_contrato INTEGER + , valor NUMERIC + ) + WHERE cod_contrato IN ( '||stContratos||' )'; + EXECUTE stSQLEventos; + + --SALARIO DECIMO + stSQLEventos := 'CREATE TEMPORARY TABLE tmp_tcmba_salario_decimo as + SELECT * + FROM tcmba.recuperaServidorValoresPorEventoDecimo( '||inCodPeridoMovimentacao||' + , '''||stEntidadeRh||''' + , '''' + , TRUE + , FALSE + ) AS salario_decimo + ( cod_periodo_movimentacao INTEGER + , cod_contrato INTEGER + , valor NUMERIC + ) + WHERE cod_contrato IN ( '||stContratos||' )'; + EXECUTE stSQLEventos; + + --SALARIO DESCONTOS + stSQL := ' SELECT array_to_string( publico.concatenar_array( cod_evento ), '','' ) AS eventos + FROM folhapagamento'||stEntidadeRh||'.tcmba_salario_descontos + WHERE cod_entidade IN ('||stEntidade||') + AND exercicio = '''||stExercicio||''' + GROUP BY exercicio + , cod_entidade '; + + OPEN crCursor FOR EXECUTE stSql; + FETCH crCursor INTO stEventos; + CLOSE crCursor; + IF stEventos IS NULL THEN + stEventos := '0'; + END IF; + + stSQLEventos := 'CREATE TEMPORARY TABLE tmp_tcmba_salario_descontos as + SELECT * + FROM tcmba.recuperaServidorValoresPorEvento( '||inCodPeridoMovimentacao||' + , '''||stEntidadeRh||''' + , '''||stEventos||''' + ) AS salario_descontos + ( cod_periodo_movimentacao INTEGER + , cod_contrato INTEGER + , valor NUMERIC + ) + WHERE cod_contrato IN ( '||stContratos||' )'; + EXECUTE stSQLEventos; + + --DESCONTOS IRRF + stSQL := ' SELECT array_to_string( publico.concatenar_array( cod_evento ), '','' ) AS eventos + FROM folhapagamento'||stEntidadeRh||'.tabela_irrf_evento + WHERE tabela_irrf_evento.cod_tipo IN (4, 5) + AND tabela_irrf_evento.timestamp = ( + select max(irrf.timestamp) as timestamp + from folhapagamento'||stEntidadeRh||'.tabela_irrf_evento as irrf + where irrf.cod_tabela = tabela_irrf_evento.cod_tabela + and irrf.cod_tipo = tabela_irrf_evento.cod_tipo + and irrf.cod_evento = tabela_irrf_evento.cod_evento + and irrf.timestamp <= ('''||timestampPeridoMovimentacao||''')::TIMESTAMP + ) '; + + OPEN crCursor FOR EXECUTE stSql; + FETCH crCursor INTO stEventos; + CLOSE crCursor; + IF stEventos IS NULL THEN + stEventos := '0'; + END IF; + + stSQLEventos := 'CREATE TEMPORARY TABLE tmp_tcmba_descontos_irrf as + SELECT * + FROM tcmba.recuperaServidorValoresPorEvento( '||inCodPeridoMovimentacao||' + , '''||stEntidadeRh||''' + , '''||stEventos||''' + ) AS desconto_irrf + ( cod_periodo_movimentacao INTEGER + , cod_contrato INTEGER + , valor NUMERIC + ) + WHERE cod_contrato IN ( '||stContratos||' )'; + EXECUTE stSQLEventos; + + --DESCONTOS IRRF DECIMO + stSQLEventos := 'CREATE TEMPORARY TABLE tmp_tcmba_desconto_irrf_decimo as + SELECT * + FROM tcmba.recuperaServidorValoresPorEventoDecimo( '||inCodPeridoMovimentacao||' + , '''||stEntidadeRh||''' + , '''||stEventos||''' + , FALSE + , TRUE + ) AS desconto_irrf_decimo + ( cod_periodo_movimentacao INTEGER + , cod_contrato INTEGER + , valor NUMERIC + ) + WHERE cod_contrato IN ( '||stContratos||' )'; + EXECUTE stSQLEventos; + + --DESCONTOS IRRF FERIAS + stSQLEventos := 'CREATE TEMPORARY TABLE tmp_tcmba_desconto_irrf_ferias as + SELECT * + FROM tcmba.recuperaServidorValoresPorEventoFerias( '||inCodPeridoMovimentacao||' + , '''||stEntidadeRh||''' + , '''||stEventos||''' + , FALSE + , TRUE + ) AS salario_ferias + ( cod_periodo_movimentacao INTEGER + , cod_contrato INTEGER + , valor NUMERIC + ) + WHERE cod_contrato IN ( '||stContratos||' )'; + EXECUTE stSQLEventos; + + --DESCONTOS CONSIGNADO + stSQLEventos := 'CREATE TEMPORARY TABLE tmp_tcmba_descontos_consignado as + SELECT * + FROM tcmba.recuperaServidorConsignado( '||inCodPeridoMovimentacao||' + , '''||stEntidadeRh||''' + , '''||stExercicio||''' + , '''||stEntidade||''' + ) AS emprestimos_contrato + ( cod_banco_1 VARCHAR + , vl_banco_1 NUMERIC + , cod_banco_2 VARCHAR + , vl_banco_2 NUMERIC + , cod_banco_3 VARCHAR + , vl_banco_3 NUMERIC + , cod_contrato INTEGER + , cod_periodo_movimentacao INTEGER + ) + WHERE cod_contrato IN ( '||stContratos||' )'; + EXECUTE stSQLEventos; + + --PREVIDENCIA + CREATE TEMPORARY TABLE tmp_tcmba_descontos_previdencia + ( cod_periodo_movimentacao INTEGER + , cod_contrato INTEGER + , valor NUMERIC + , cod_previdencia INTEGER + ); + + CREATE TEMPORARY TABLE tmp_tcmba_descontos_previdencia_decimo + ( cod_periodo_movimentacao INTEGER + , cod_contrato INTEGER + , valor NUMERIC + , cod_previdencia INTEGER + ); + + CREATE TEMPORARY TABLE tmp_tcmba_descontos_previdencia_ferias + ( cod_periodo_movimentacao INTEGER + , cod_contrato INTEGER + , valor NUMERIC + , cod_previdencia INTEGER + ); + + stSQL := 'CREATE TEMPORARY TABLE tmp_eventos_previdencia as + SELECT previdencia_evento.cod_previdencia + , array_to_string( publico.concatenar_array( previdencia_evento.cod_evento ), '','' ) AS eventos + FROM folhapagamento'||stEntidadeRh||'.previdencia_evento + + INNER JOIN folhapagamento'||stEntidadeRh||'.previdencia + ON previdencia.cod_previdencia = previdencia_evento.cod_previdencia + AND previdencia.cod_regime_previdencia = 1 + + WHERE previdencia_evento.timestamp = ( select max(timestamp) as timestamp + from folhapagamento'||stEntidadeRh||'.previdencia_previdencia + where previdencia_previdencia.cod_previdencia = previdencia_evento.cod_previdencia + and previdencia_previdencia.timestamp <= ('''||timestampPeridoMovimentacao||''')::TIMESTAMP ) + + GROUP BY previdencia_evento.cod_previdencia'; + EXECUTE stSql; + + stSQL := 'SELECT COALESCE(tmp_servidor_salario2.cod_previdencia, 0) AS cod_previdencia + FROM tmp_servidor_salario2 + GROUP BY cod_previdencia'; + + FOR reRecord IN EXECUTE stSQL + LOOP + + stSQLEventos := 'SELECT tmp_eventos_previdencia.eventos + FROM tmp_eventos_previdencia + WHERE tmp_eventos_previdencia.cod_previdencia = '||reRecord.cod_previdencia||' '; + + OPEN crCursor FOR EXECUTE stSQLEventos; + FETCH crCursor INTO stEventos; + CLOSE crCursor; + IF stEventos IS NULL THEN + stEventos := '0'; + END IF; + + --DESCONTOS PREVIDENCIA + stSQLEventos := 'SELECT * + FROM tcmba.recuperaServidorValoresPorEvento( '||inCodPeridoMovimentacao||' + , '''||stEntidadeRh||''' + , '''||stEventos||''' + ) AS desconto_previdencia + ( cod_periodo_movimentacao INTEGER + , cod_contrato INTEGER + , valor NUMERIC + ) + WHERE cod_contrato IN ( '||stContratos||' )'; + + FOR reRecordEventos IN EXECUTE stSQLEventos + LOOP + INSERT INTO tmp_tcmba_descontos_previdencia + VALUES ( reRecordEventos.cod_periodo_movimentacao + , reRecordEventos.cod_contrato + , reRecordEventos.valor + , reRecord.cod_previdencia + ); + END LOOP; + + --DESCONTOS PREVIDENCIA DECIMO + stSQLEventos := 'SELECT * + FROM tcmba.recuperaServidorValoresPorEventoDecimo( '||inCodPeridoMovimentacao||' + , '''||stEntidadeRh||''' + , '''||stEventos||''' + , FALSE + , TRUE + ) AS desconto_previdencia_decimo + ( cod_periodo_movimentacao INTEGER + , cod_contrato INTEGER + , valor NUMERIC + ) + WHERE cod_contrato IN ( '||stContratos||' )'; + + FOR reRecordEventos IN EXECUTE stSQLEventos + LOOP + INSERT INTO tmp_tcmba_descontos_previdencia_decimo + VALUES ( reRecordEventos.cod_periodo_movimentacao + , reRecordEventos.cod_contrato + , reRecordEventos.valor + , reRecord.cod_previdencia + ); + END LOOP; + + --DESCONTOS PREVIDENCIA FERIAS + stSQLEventos := 'SELECT * + FROM tcmba.recuperaServidorValoresPorEventoFerias( '||inCodPeridoMovimentacao||' + , '''||stEntidadeRh||''' + , '''||stEventos||''' + , FALSE + , TRUE + ) AS desconto_previdencia_ferias + ( cod_periodo_movimentacao INTEGER + , cod_contrato INTEGER + , valor NUMERIC + ) + WHERE cod_contrato IN ( '||stContratos||' )'; + FOR reRecordEventos IN EXECUTE stSQLEventos + LOOP + INSERT INTO tmp_tcmba_descontos_previdencia_ferias + VALUES ( reRecordEventos.cod_periodo_movimentacao + , reRecordEventos.cod_contrato + , reRecordEventos.valor + , reRecord.cod_previdencia + ); + END LOOP; + + END LOOP; + + --DESCONTO PENSAO + stSQL := ' SELECT array_to_string( publico.concatenar_array( cod_evento ), '','' ) AS eventos + FROM folhapagamento'||stEntidadeRh||'.pensao_evento + WHERE pensao_evento.timestamp = ( + select max(pe.timestamp) as timestamp + from folhapagamento'||stEntidadeRh||'.pensao_evento as pe + where pe.cod_tipo = pensao_evento.cod_tipo + and pe.cod_configuracao_pensao = pensao_evento.cod_configuracao_pensao + and pe.timestamp <= ('''||timestampPeridoMovimentacao||''')::TIMESTAMP + )'; + + OPEN crCursor FOR EXECUTE stSql; + FETCH crCursor INTO stEventos; + CLOSE crCursor; + IF stEventos IS NULL THEN + stEventos := '0'; + END IF; + + stSQLEventos := 'CREATE TEMPORARY TABLE tmp_tcmba_descontos_pensao as + SELECT * + FROM tcmba.recuperaServidorValoresPorEventoPensao( '||inCodPeridoMovimentacao||' + , '''||stEntidadeRh||''' + , '''||stEventos||''' + ) AS descontos_pensao + ( cod_periodo_movimentacao INTEGER + , cod_contrato INTEGER + , valor NUMERIC + ) + WHERE cod_contrato IN ( '||stContratos||' )'; + EXECUTE stSQLEventos; + + --DESCONTO PLANO DE SAUDE + stSQL := ' SELECT array_to_string( publico.concatenar_array( cod_evento ), '','' ) AS eventos + FROM folhapagamento'||stEntidadeRh||'.tcmba_plano_saude + WHERE cod_entidade IN ('||stEntidade||') + AND exercicio = '''||stExercicio||''' + GROUP BY exercicio + , cod_entidade'; + + OPEN crCursor FOR EXECUTE stSql; + FETCH crCursor INTO stEventos; + CLOSE crCursor; + IF stEventos IS NULL THEN + stEventos := '0'; + END IF; + + stSQLEventos := 'CREATE TEMPORARY TABLE tmp_tcmba_descontos_plano_saude as + SELECT * + FROM tcmba.recuperaServidorValoresPorEvento( '||inCodPeridoMovimentacao||' + , '''||stEntidadeRh||''' + , '''||stEventos||''' + ) AS descontos_plano_saude + ( cod_periodo_movimentacao INTEGER + , cod_contrato INTEGER + , valor NUMERIC + ) + WHERE cod_contrato IN ( '||stContratos||' )'; + EXECUTE stSQLEventos; + + --SALARIO LIQUIDO + stSQLEventos := 'CREATE TEMPORARY TABLE tmp_tcmba_salario_liquido as + SELECT SUM(valor) AS valor + , cod_contrato + , '||inCodPeridoMovimentacao||' AS cod_periodo_movimentacao + FROM ( + SELECT CASE WHEN natureza = ''P'' THEN + SUM(valor) + ELSE + SUM(valor)*(-1) + END as valor + , cod_contrato + FROM recuperarEventosCalculados( 1 + , '||inCodPeridoMovimentacao||' + , 0 + , 0 + , '''||stEntidadeRh||''' + , '''' + ) + WHERE natureza in (''P'', ''D'') + GROUP BY natureza + , cod_contrato + ) AS salario_liquido + WHERE salario_liquido.cod_contrato IN ( '||stContratos||' ) + GROUP BY cod_contrato'; + EXECUTE stSQLEventos; + + --CONSULTA SALARIO2; RETORNO + stSQL := ' SELECT tmp_servidor_salario2.* + , COALESCE(tmp_tcmba_salario_base.valor , 0.00 ) AS salario_base + , COALESCE(tmp_tcmba_salario_vantagens.valor , 0.00 ) AS salario_vantagens + , COALESCE(tmp_tcmba_salario_gratificacao.valor , 0.00 ) AS salario_gratificacao + , COALESCE(tmp_tcmba_salario_familia.valor , 0.00 ) AS salario_familia + , COALESCE(tmp_tcmba_salario_ferias.valor , 0.00 ) AS salario_ferias + , COALESCE(tmp_tcmba_salario_horas_extra.valor , 0.00 ) AS salario_horas_extra + , COALESCE(tmp_tcmba_salario_decimo.valor , 0.00 ) AS salario_decimo + , COALESCE(tmp_tcmba_salario_descontos.valor , 0.00 ) AS salario_descontos + , COALESCE(tmp_tcmba_descontos_irrf.valor , 0.00 ) AS desconto_irrf + , COALESCE(tmp_tcmba_desconto_irrf_decimo.valor , 0.00 ) AS desconto_irrf_decimo + , COALESCE(tmp_tcmba_descontos_consignado.vl_banco_1 , 0.00 ) AS desconto_consignado_1 + , COALESCE(tmp_tcmba_descontos_consignado.cod_banco_1 , ''0'' ) AS cod_banco_1 + , COALESCE(tmp_tcmba_descontos_consignado.vl_banco_2 , 0.00 ) AS desconto_consignado_2 + , COALESCE(tmp_tcmba_descontos_consignado.cod_banco_2 , ''0'' ) AS cod_banco_2 + , COALESCE(tmp_tcmba_descontos_consignado.vl_banco_3 , 0.00 ) AS desconto_consignado_3 + , COALESCE(tmp_tcmba_descontos_consignado.cod_banco_3 , ''0'' ) AS cod_banco_3 + , COALESCE(tmp_tcmba_descontos_previdencia.valor , 0.00 ) AS desconto_previdencia + , COALESCE(tmp_tcmba_desconto_irrf_ferias.valor , 0.00 ) AS desconto_irrf_ferias + , COALESCE(tmp_tcmba_descontos_previdencia_decimo.valor , 0.00 ) AS desconto_previdencia_decimo + , COALESCE(tmp_tcmba_descontos_previdencia_ferias.valor , 0.00 ) AS desconto_previdencia_ferias + , COALESCE(tmp_tcmba_descontos_pensao.valor , 0.00 ) AS desconto_pensao + , COALESCE(tmp_tcmba_descontos_plano_saude.valor , 0.00 ) AS desconto_plano_saude + , COALESCE(tmp_tcmba_salario_liquido.valor , 0.00 ) AS salario_liquido + + FROM tmp_servidor_salario2 + + LEFT JOIN tmp_tcmba_salario_base + ON tmp_tcmba_salario_base.cod_periodo_movimentacao = tmp_servidor_salario2.cod_periodo_movimentacao + AND tmp_tcmba_salario_base.cod_contrato = tmp_servidor_salario2.cod_contrato + + LEFT JOIN tmp_tcmba_salario_vantagens + ON tmp_tcmba_salario_vantagens.cod_periodo_movimentacao = tmp_servidor_salario2.cod_periodo_movimentacao + AND tmp_tcmba_salario_vantagens.cod_contrato = tmp_servidor_salario2.cod_contrato + + LEFT JOIN tmp_tcmba_salario_gratificacao + ON tmp_tcmba_salario_gratificacao.cod_periodo_movimentacao = tmp_servidor_salario2.cod_periodo_movimentacao + AND tmp_tcmba_salario_gratificacao.cod_contrato = tmp_servidor_salario2.cod_contrato + + LEFT JOIN tmp_tcmba_salario_familia + ON tmp_tcmba_salario_familia.cod_periodo_movimentacao = tmp_servidor_salario2.cod_periodo_movimentacao + AND tmp_tcmba_salario_familia.cod_contrato = tmp_servidor_salario2.cod_contrato + + LEFT JOIN tmp_tcmba_salario_ferias + ON tmp_tcmba_salario_ferias.cod_periodo_movimentacao = tmp_servidor_salario2.cod_periodo_movimentacao + AND tmp_tcmba_salario_ferias.cod_contrato = tmp_servidor_salario2.cod_contrato + + LEFT JOIN tmp_tcmba_salario_horas_extra + ON tmp_tcmba_salario_horas_extra.cod_periodo_movimentacao = tmp_servidor_salario2.cod_periodo_movimentacao + AND tmp_tcmba_salario_horas_extra.cod_contrato = tmp_servidor_salario2.cod_contrato + + LEFT JOIN tmp_tcmba_salario_decimo + ON tmp_tcmba_salario_decimo.cod_periodo_movimentacao = tmp_servidor_salario2.cod_periodo_movimentacao + AND tmp_tcmba_salario_decimo.cod_contrato = tmp_servidor_salario2.cod_contrato + + LEFT JOIN tmp_tcmba_salario_descontos + ON tmp_tcmba_salario_descontos.cod_periodo_movimentacao = tmp_servidor_salario2.cod_periodo_movimentacao + AND tmp_tcmba_salario_descontos.cod_contrato = tmp_servidor_salario2.cod_contrato + + LEFT JOIN tmp_tcmba_descontos_irrf + ON tmp_tcmba_descontos_irrf.cod_periodo_movimentacao = tmp_servidor_salario2.cod_periodo_movimentacao + AND tmp_tcmba_descontos_irrf.cod_contrato = tmp_servidor_salario2.cod_contrato + + LEFT JOIN tmp_tcmba_desconto_irrf_decimo + ON tmp_tcmba_desconto_irrf_decimo.cod_periodo_movimentacao = tmp_servidor_salario2.cod_periodo_movimentacao + AND tmp_tcmba_desconto_irrf_decimo.cod_contrato = tmp_servidor_salario2.cod_contrato + + LEFT JOIN tmp_tcmba_descontos_consignado + ON tmp_tcmba_descontos_consignado.cod_periodo_movimentacao = tmp_servidor_salario2.cod_periodo_movimentacao + AND tmp_tcmba_descontos_consignado.cod_contrato = tmp_servidor_salario2.cod_contrato + + LEFT JOIN tmp_tcmba_descontos_previdencia + ON tmp_tcmba_descontos_previdencia.cod_periodo_movimentacao = tmp_servidor_salario2.cod_periodo_movimentacao + AND tmp_tcmba_descontos_previdencia.cod_contrato = tmp_servidor_salario2.cod_contrato + AND tmp_tcmba_descontos_previdencia.cod_previdencia = tmp_servidor_salario2.cod_previdencia + + LEFT JOIN tmp_tcmba_desconto_irrf_ferias + ON tmp_tcmba_desconto_irrf_ferias.cod_periodo_movimentacao = tmp_servidor_salario2.cod_periodo_movimentacao + AND tmp_tcmba_desconto_irrf_ferias.cod_contrato = tmp_servidor_salario2.cod_contrato + + LEFT JOIN tmp_tcmba_descontos_previdencia_decimo + ON tmp_tcmba_descontos_previdencia_decimo.cod_periodo_movimentacao = tmp_servidor_salario2.cod_periodo_movimentacao + AND tmp_tcmba_descontos_previdencia_decimo.cod_contrato = tmp_servidor_salario2.cod_contrato + AND tmp_tcmba_descontos_previdencia_decimo.cod_previdencia = tmp_servidor_salario2.cod_previdencia + + LEFT JOIN tmp_tcmba_descontos_previdencia_ferias + ON tmp_tcmba_descontos_previdencia_ferias.cod_periodo_movimentacao = tmp_servidor_salario2.cod_periodo_movimentacao + AND tmp_tcmba_descontos_previdencia_ferias.cod_contrato = tmp_servidor_salario2.cod_contrato + AND tmp_tcmba_descontos_previdencia_ferias.cod_previdencia = tmp_servidor_salario2.cod_previdencia + + LEFT JOIN tmp_tcmba_descontos_pensao + ON tmp_tcmba_descontos_pensao.cod_periodo_movimentacao = tmp_servidor_salario2.cod_periodo_movimentacao + AND tmp_tcmba_descontos_pensao.cod_contrato = tmp_servidor_salario2.cod_contrato + + LEFT JOIN tmp_tcmba_descontos_plano_saude + ON tmp_tcmba_descontos_plano_saude.cod_periodo_movimentacao = tmp_servidor_salario2.cod_periodo_movimentacao + AND tmp_tcmba_descontos_plano_saude.cod_contrato = tmp_servidor_salario2.cod_contrato + + LEFT JOIN tmp_tcmba_salario_liquido + ON tmp_tcmba_salario_liquido.cod_periodo_movimentacao = tmp_servidor_salario2.cod_periodo_movimentacao + AND tmp_tcmba_salario_liquido.cod_contrato = tmp_servidor_salario2.cod_contrato + + ORDER BY tmp_servidor_salario2.nom_cgm + , tmp_servidor_salario2.cod_contrato '; + + FOR reRecord IN EXECUTE stSQL + LOOP + RETURN NEXT reRecord; + END LOOP; + + --DROP TABLE TMP + DROP TABLE tmp_tcmba_salario_liquido; + DROP TABLE tmp_tcmba_descontos_plano_saude; + DROP TABLE tmp_tcmba_descontos_pensao; + DROP TABLE tmp_tcmba_descontos_previdencia_ferias; + DROP TABLE tmp_tcmba_descontos_previdencia_decimo; + DROP TABLE tmp_tcmba_desconto_irrf_ferias; + DROP TABLE tmp_eventos_previdencia; + DROP TABLE tmp_tcmba_descontos_previdencia; + DROP TABLE tmp_tcmba_descontos_consignado; + DROP TABLE tmp_tcmba_desconto_irrf_decimo; + DROP TABLE tmp_tcmba_descontos_irrf; + DROP TABLE tmp_tcmba_salario_descontos; + DROP TABLE tmp_tcmba_salario_decimo; + DROP TABLE tmp_tcmba_salario_horas_extra; + DROP TABLE tmp_tcmba_salario_ferias; + DROP TABLE tmp_tcmba_salario_familia; + DROP TABLE tmp_tcmba_salario_gratificacao; + DROP TABLE tmp_tcmba_salario_vantagens; + DROP TABLE tmp_tcmba_salario_base; + DROP TABLE tmp_servidor_salario2; + +END; +$$ LANGUAGE 'plpgsql'; \ No newline at end of file diff --git a/gestaoPrestacaoContas/fontes/PLPGSQL/TCMBA/FTCMBARecuperaServidorConsignado.plsql b/gestaoPrestacaoContas/fontes/PLPGSQL/TCMBA/FTCMBARecuperaServidorConsignado.plsql new file mode 100644 index 0000000..1678ead --- /dev/null +++ b/gestaoPrestacaoContas/fontes/PLPGSQL/TCMBA/FTCMBARecuperaServidorConsignado.plsql @@ -0,0 +1,306 @@ +/* + ********************************************************************************** + * * + * @package URBEM CNM - Soluções em Gestão Pública * + * @copyright (c) 2013 Confederação Nacional de Municípos * + * @author Confederação Nacional de Municípios * + * * + * O URBEM CNM é um software livre; você pode redistribuí-lo e/ou modificá-lo sob * + * os termos da Licença Pública Geral GNU conforme publicada pela Fundação do * + * Software Livre (FSF - Free Software Foundation); na versão 2 da Licença. * + * * + * Este programa é distribuído na expectativa de que seja útil, porém, * + * SEM NENHUMA GARANTIA; nem mesmo a garantia implícita de COMERCIABILIDADE OU * + * ADEQUAÇÃO A UMA FINALIDADE ESPECÍFICA. Consulte a Licença Pública Geral do GNU * + * para mais detalhes. * + * * + * Você deve ter recebido uma cópia da Licença Pública Geral do GNU "LICENCA.txt" * + * com este programa; se não, escreva para a Free Software Foundation Inc., * + * no endereço 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA. * + * * + ********************************************************************************** +*/ +/* recuperaServidorConsignado + * Data de Criação : 26/10/2015 + * @author Analista : Dagiane Vieira + * @author Desenvolvedor : Michel Teixeira + * $Id: FTCMBARecuperaServidorConsignado.plsql 63946 2015-11-10 21:10:32Z michel $ +*/ + +CREATE OR REPLACE FUNCTION tcmba.recuperaServidorConsignado(INTEGER, VARCHAR, VARCHAR, VARCHAR) RETURNS SETOF RECORD as $$ +DECLARE + inCodPeriodoMovimentacao ALIAS FOR $1; + stEntidadeRh ALIAS FOR $2; + stExercicio ALIAS FOR $3; + inEntidade ALIAS FOR $4; + stSQL VARCHAR :=''; + stSQLTemp VARCHAR :=''; + inCodContrato INTEGER := 0; + inCountBanco INTEGER := 0; + inBanco1 INTEGER := 0; + numBanco1 VARCHAR :='0'; + vlBanco1 NUMERIC := 0.00; + inBanco2 INTEGER := 0; + numBanco2 VARCHAR :='0'; + vlBanco2 NUMERIC := 0.00; + inBanco3 INTEGER := 0; + numBanco3 VARCHAR :='0'; + vlBanco3 NUMERIC := 0.00; + reRecord RECORD; + reRecordTemp RECORD; +BEGIN + CREATE TEMPORARY TABLE tmp_consignado_banco_contrato_final + ( cod_banco_1 VARCHAR + , vl_banco_1 NUMERIC + , cod_banco_2 VARCHAR + , vl_banco_2 NUMERIC + , cod_banco_3 VARCHAR + , vl_banco_3 NUMERIC + , cod_contrato INTEGER + , cod_periodo_movimentacao INTEGER + ); + + stSQL := 'CREATE TEMPORARY TABLE tmp_consignado_banco_contrato AS + SELECT eventos.cod_periodo_movimentacao + , eventos.cod_contrato + , tcmba_emprestimo_consignado.cod_banco + , banco.num_banco + , sum(eventos.valor) as valor + + FROM ( + SELECT valor_evento.cod_periodo_movimentacao + , valor_evento.cod_contrato + , sum(valor_evento.valor) as valor + , valor_evento.cod_evento + FROM ( + SELECT registro_evento_periodo.cod_periodo_movimentacao + , registro_evento_periodo.cod_contrato + , sum(evento_calculado.valor) as valor + , ultimo_registro_evento.cod_evento + FROM folhapagamento'||stEntidadeRh||'.registro_evento_periodo + + INNER JOIN folhapagamento'||stEntidadeRh||'.registro_evento + ON registro_evento.cod_registro = registro_evento_periodo.cod_registro + + INNER JOIN folhapagamento'||stEntidadeRh||'.ultimo_registro_evento + ON ultimo_registro_evento.cod_registro = registro_evento.cod_registro + AND ultimo_registro_evento.timestamp = registro_evento.timestamp + AND ultimo_registro_evento.cod_evento = registro_evento.cod_evento + + INNER JOIN folhapagamento'||stEntidadeRh||'.evento_calculado + ON evento_calculado.timestamp_registro = ultimo_registro_evento.timestamp + AND evento_calculado.cod_registro = ultimo_registro_evento.cod_registro + AND evento_calculado.cod_evento = ultimo_registro_evento.cod_evento + + WHERE registro_evento_periodo.cod_periodo_movimentacao = '||inCodPeriodoMovimentacao||' + + GROUP BY registro_evento_periodo.cod_periodo_movimentacao + , registro_evento_periodo.cod_contrato + , ultimo_registro_evento.cod_evento + + UNION + + SELECT contrato_servidor_complementar.cod_periodo_movimentacao + , contrato_servidor_complementar.cod_contrato + , sum(evento_complementar_calculado.valor) as valor + , ultimo_registro_evento_complementar.cod_evento + FROM folhapagamento'||stEntidadeRh||'.contrato_servidor_complementar + + INNER JOIN folhapagamento'||stEntidadeRh||'.registro_evento_complementar + ON registro_evento_complementar.cod_periodo_movimentacao = contrato_servidor_complementar.cod_periodo_movimentacao + AND registro_evento_complementar.cod_complementar = contrato_servidor_complementar.cod_complementar + AND registro_evento_complementar.cod_contrato = contrato_servidor_complementar.cod_contrato + + INNER JOIN folhapagamento'||stEntidadeRh||'.ultimo_registro_evento_complementar + ON ultimo_registro_evento_complementar.cod_registro = registro_evento_complementar.cod_registro + AND ultimo_registro_evento_complementar.timestamp = registro_evento_complementar.timestamp + AND ultimo_registro_evento_complementar.cod_evento = registro_evento_complementar.cod_evento + AND ultimo_registro_evento_complementar.cod_configuracao = registro_evento_complementar.cod_configuracao + + INNER JOIN folhapagamento'||stEntidadeRh||'.evento_complementar_calculado + ON evento_complementar_calculado.timestamp_registro = ultimo_registro_evento_complementar.timestamp + AND evento_complementar_calculado.cod_registro = ultimo_registro_evento_complementar.cod_registro + AND evento_complementar_calculado.cod_evento = ultimo_registro_evento_complementar.cod_evento + AND evento_complementar_calculado.cod_configuracao = ultimo_registro_evento_complementar.cod_configuracao + + WHERE contrato_servidor_complementar.cod_periodo_movimentacao = '||inCodPeriodoMovimentacao||' + + GROUP BY contrato_servidor_complementar.cod_periodo_movimentacao + , contrato_servidor_complementar.cod_contrato + , ultimo_registro_evento_complementar.cod_evento + ) AS valor_evento + + GROUP BY valor_evento.cod_periodo_movimentacao + , valor_evento.cod_contrato + , valor_evento.cod_evento + ) AS eventos + INNER JOIN folhapagamento'||stEntidadeRh||'.tcmba_emprestimo_consignado + ON tcmba_emprestimo_consignado.cod_evento = eventos.cod_evento + AND tcmba_emprestimo_consignado.cod_entidade IN ('||inEntidade||') + AND tcmba_emprestimo_consignado.exercicio = '''||stExercicio||''' + + INNER JOIN monetario.banco + ON banco.cod_banco = tcmba_emprestimo_consignado.cod_banco + + GROUP BY eventos.cod_periodo_movimentacao + , eventos.cod_contrato + , tcmba_emprestimo_consignado.cod_banco + , banco.num_banco '; + EXECUTE stSQL; + + stSQLTemp := ' SELECT cod_periodo_movimentacao + , cod_contrato + FROM tmp_consignado_banco_contrato + GROUP BY cod_periodo_movimentacao + , cod_contrato '; + + FOR reRecordTemp IN EXECUTE stSQLTemp + LOOP + + inCountBanco := 0; + inBanco1 := 0; + numBanco1 :='0'; + vlBanco1 := 0.00; + inBanco2 := 0; + numBanco2 :='0'; + vlBanco2 := 0.00; + inBanco3 := 0; + numBanco3 :='0'; + vlBanco3 := 0.00; + inCodContrato := reRecordTemp.cod_contrato; + + SELECT count(cod_banco)::integer + INTO inCountBanco + FROM tmp_consignado_banco_contrato + WHERE tmp_consignado_banco_contrato.cod_contrato = inCodContrato + AND tmp_consignado_banco_contrato.cod_periodo_movimentacao = inCodPeriodoMovimentacao; + + IF inCountBanco > 0 THEN + + SELECT cod_banco + , num_banco + INTO inBanco1 + , numBanco1 + FROM tmp_consignado_banco_contrato + WHERE tmp_consignado_banco_contrato.cod_contrato = inCodContrato + AND tmp_consignado_banco_contrato.cod_periodo_movimentacao = inCodPeriodoMovimentacao + ORDER BY valor DESC + LIMIT 1; + + SELECT valor + INTO vlBanco1 + FROM tmp_consignado_banco_contrato + WHERE cod_banco = inBanco1 + AND tmp_consignado_banco_contrato.cod_contrato = inCodContrato + AND tmp_consignado_banco_contrato.cod_periodo_movimentacao = inCodPeriodoMovimentacao; + + END IF; + + IF inCountBanco > 1 THEN + + SELECT cod_banco + , num_banco + INTO inBanco2 + , numBanco2 + FROM tmp_consignado_banco_contrato + WHERE cod_banco NOT IN ( inBanco1 ) + AND tmp_consignado_banco_contrato.cod_contrato = inCodContrato + AND tmp_consignado_banco_contrato.cod_periodo_movimentacao = inCodPeriodoMovimentacao + ORDER BY valor DESC + LIMIT 1; + + SELECT valor + INTO vlBanco2 + FROM tmp_consignado_banco_contrato + WHERE cod_banco = inBanco2 + AND tmp_consignado_banco_contrato.cod_contrato = inCodContrato + AND tmp_consignado_banco_contrato.cod_periodo_movimentacao = inCodPeriodoMovimentacao; + + END IF; + + IF inCountBanco = 3 THEN + + SELECT cod_banco + , num_banco + INTO inBanco3 + , numBanco3 + FROM tmp_consignado_banco_contrato + WHERE cod_banco NOT IN ( inBanco1, inBanco2 ) + AND tmp_consignado_banco_contrato.cod_contrato = inCodContrato + AND tmp_consignado_banco_contrato.cod_periodo_movimentacao = inCodPeriodoMovimentacao + ORDER BY valor DESC + LIMIT 1; + + SELECT valor + INTO vlBanco3 + FROM tmp_consignado_banco_contrato + WHERE cod_banco = inBanco3 + AND tmp_consignado_banco_contrato.cod_contrato = inCodContrato + AND tmp_consignado_banco_contrato.cod_periodo_movimentacao = inCodPeriodoMovimentacao; + + END IF; + + IF inCountBanco > 3 THEN + + SELECT 9999 AS cod_banco + , '9999'::VARCHAR AS num_banco + INTO inBanco3 + , numBanco3 + FROM tmp_consignado_banco_contrato + WHERE cod_banco NOT IN ( inBanco1, inBanco2 ) + AND tmp_consignado_banco_contrato.cod_contrato = inCodContrato + AND tmp_consignado_banco_contrato.cod_periodo_movimentacao = inCodPeriodoMovimentacao + ORDER BY valor DESC + LIMIT 1; + + SELECT SUM(valor) AS valor + INTO vlBanco3 + FROM tmp_consignado_banco_contrato + WHERE cod_banco NOT IN ( inBanco1, inBanco2 ) + AND tmp_consignado_banco_contrato.cod_contrato = inCodContrato + AND tmp_consignado_banco_contrato.cod_periodo_movimentacao = inCodPeriodoMovimentacao; + + END IF; + + stSQL := 'SELECT '''||numBanco1||'''::VARCHAR AS cod_banco_1 + , '||vlBanco1||' AS vl_banco_1 + , '''||numBanco2||'''::VARCHAR AS cod_banco_2 + , '||vlBanco2||' AS vl_banco_2 + , '''||numBanco3||'''::VARCHAR AS cod_banco_3 + , '||vlBanco3||' AS vl_banco_3 + , cod_periodo_movimentacao + , cod_contrato + FROM tmp_consignado_banco_contrato + WHERE tmp_consignado_banco_contrato.cod_contrato = '||inCodContrato||' + AND tmp_consignado_banco_contrato.cod_periodo_movimentacao = '||inCodPeriodoMovimentacao||' + GROUP BY cod_periodo_movimentacao + , cod_contrato '; + + FOR reRecord IN EXECUTE stSQL + LOOP + INSERT INTO tmp_consignado_banco_contrato_final + VALUES ( ''||reRecord.cod_banco_1||'' + , reRecord.vl_banco_1 + , ''||reRecord.cod_banco_2||'' + , reRecord.vl_banco_2 + , ''||reRecord.cod_banco_3||'' + , reRecord.vl_banco_3 + , reRecord.cod_contrato + , reRecord.cod_periodo_movimentacao + ); + END LOOP; + + END LOOP; + + stSQL := ' SELECT * + FROM tmp_consignado_banco_contrato_final '; + + FOR reRecord IN EXECUTE stSQL + LOOP + RETURN NEXT reRecord; + END LOOP; + + DROP TABLE tmp_consignado_banco_contrato; + DROP TABLE tmp_consignado_banco_contrato_final; +END; +$$ LANGUAGE 'plpgsql'; \ No newline at end of file diff --git a/gestaoPrestacaoContas/fontes/PLPGSQL/TCMBA/FTCMBARecuperaServidorValoresPorEvento.plsql b/gestaoPrestacaoContas/fontes/PLPGSQL/TCMBA/FTCMBARecuperaServidorValoresPorEvento.plsql new file mode 100644 index 0000000..648392c --- /dev/null +++ b/gestaoPrestacaoContas/fontes/PLPGSQL/TCMBA/FTCMBARecuperaServidorValoresPorEvento.plsql @@ -0,0 +1,106 @@ +/* + ********************************************************************************** + * * + * @package URBEM CNM - Soluções em Gestão Pública * + * @copyright (c) 2013 Confederação Nacional de Municípos * + * @author Confederação Nacional de Municípios * + * * + * O URBEM CNM é um software livre; você pode redistribuí-lo e/ou modificá-lo sob * + * os termos da Licença Pública Geral GNU conforme publicada pela Fundação do * + * Software Livre (FSF - Free Software Foundation); na versão 2 da Licença. * + * * + * Este programa é distribuído na expectativa de que seja útil, porém, * + * SEM NENHUMA GARANTIA; nem mesmo a garantia implícita de COMERCIABILIDADE OU * + * ADEQUAÇÃO A UMA FINALIDADE ESPECÍFICA. Consulte a Licença Pública Geral do GNU * + * para mais detalhes. * + * * + * Você deve ter recebido uma cópia da Licença Pública Geral do GNU "LICENCA.txt" * + * com este programa; se não, escreva para a Free Software Foundation Inc., * + * no endereço 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA. * + * * + ********************************************************************************** +*/ +/* recuperaServidorValoresPorEvento + * Data de Criação : 26/10/2015 + * @author Analista : Dagiane Vieira + * @author Desenvolvedor : Michel Teixeira + * $Id: FTCMBARecuperaServidorValoresPorEvento.plsql 63946 2015-11-10 21:10:32Z michel $ +*/ + +CREATE OR REPLACE FUNCTION tcmba.recuperaServidorValoresPorEvento(INTEGER, VARCHAR, VARCHAR) RETURNS SETOF RECORD as $$ +DECLARE + inCodPeriodoMovimentacao ALIAS FOR $1; + stEntidade ALIAS FOR $2; + stEvento ALIAS FOR $3; + stSQL VARCHAR :=''; + reRecord RECORD; +BEGIN + stSQL := 'SELECT valor_evento.cod_periodo_movimentacao + , valor_evento.cod_contrato + , COALESCE(sum(valor_evento.valor), 0.00) AS valor + FROM ( + SELECT registro_evento_periodo.cod_periodo_movimentacao + , registro_evento_periodo.cod_contrato + , sum(evento_calculado.valor) as valor + FROM folhapagamento'||stEntidade||'.registro_evento_periodo + + INNER JOIN folhapagamento'||stEntidade||'.registro_evento + ON registro_evento.cod_registro = registro_evento_periodo.cod_registro + + INNER JOIN folhapagamento'||stEntidade||'.ultimo_registro_evento + ON ultimo_registro_evento.cod_registro = registro_evento.cod_registro + AND ultimo_registro_evento.timestamp = registro_evento.timestamp + AND ultimo_registro_evento.cod_evento = registro_evento.cod_evento + AND ultimo_registro_evento.cod_evento IN ('||stEvento||') -- #23322 + + INNER JOIN folhapagamento'||stEntidade||'.evento_calculado + ON evento_calculado.timestamp_registro = ultimo_registro_evento.timestamp + AND evento_calculado.cod_registro = ultimo_registro_evento.cod_registro + AND evento_calculado.cod_evento = ultimo_registro_evento.cod_evento + + WHERE registro_evento_periodo.cod_periodo_movimentacao = '||inCodPeriodoMovimentacao||' + + GROUP BY registro_evento_periodo.cod_periodo_movimentacao + , registro_evento_periodo.cod_contrato + + UNION + + SELECT contrato_servidor_complementar.cod_periodo_movimentacao + , contrato_servidor_complementar.cod_contrato + , sum(evento_complementar_calculado.valor) as valor + FROM folhapagamento'||stEntidade||'.contrato_servidor_complementar + + INNER JOIN folhapagamento'||stEntidade||'.registro_evento_complementar + ON registro_evento_complementar.cod_periodo_movimentacao = contrato_servidor_complementar.cod_periodo_movimentacao + AND registro_evento_complementar.cod_complementar = contrato_servidor_complementar.cod_complementar + AND registro_evento_complementar.cod_contrato = contrato_servidor_complementar.cod_contrato + + INNER JOIN folhapagamento'||stEntidade||'.ultimo_registro_evento_complementar + ON ultimo_registro_evento_complementar.cod_registro = registro_evento_complementar.cod_registro + AND ultimo_registro_evento_complementar.timestamp = registro_evento_complementar.timestamp + AND ultimo_registro_evento_complementar.cod_evento = registro_evento_complementar.cod_evento + AND ultimo_registro_evento_complementar.cod_configuracao = registro_evento_complementar.cod_configuracao + AND ultimo_registro_evento_complementar.cod_evento IN ('||stEvento||') --#23322 + + INNER JOIN folhapagamento'||stEntidade||'.evento_complementar_calculado + ON evento_complementar_calculado.timestamp_registro = ultimo_registro_evento_complementar.timestamp + AND evento_complementar_calculado.cod_registro = ultimo_registro_evento_complementar.cod_registro + AND evento_complementar_calculado.cod_evento = ultimo_registro_evento_complementar.cod_evento + AND evento_complementar_calculado.cod_configuracao = ultimo_registro_evento_complementar.cod_configuracao + + WHERE contrato_servidor_complementar.cod_periodo_movimentacao = '||inCodPeriodoMovimentacao||' + + GROUP BY contrato_servidor_complementar.cod_periodo_movimentacao + , contrato_servidor_complementar.cod_contrato + ) AS valor_evento + + GROUP BY valor_evento.cod_periodo_movimentacao + , valor_evento.cod_contrato '; + + FOR reRecord IN EXECUTE stSQL + LOOP + RETURN NEXT reRecord; + END LOOP; + +END; +$$ LANGUAGE 'plpgsql'; \ No newline at end of file diff --git a/gestaoPrestacaoContas/fontes/PLPGSQL/TCMBA/FTCMBARecuperaServidorValoresPorEventoDecimo.plsql b/gestaoPrestacaoContas/fontes/PLPGSQL/TCMBA/FTCMBARecuperaServidorValoresPorEventoDecimo.plsql new file mode 100644 index 0000000..6de2001 --- /dev/null +++ b/gestaoPrestacaoContas/fontes/PLPGSQL/TCMBA/FTCMBARecuperaServidorValoresPorEventoDecimo.plsql @@ -0,0 +1,169 @@ +/* + ********************************************************************************** + * * + * @package URBEM CNM - Soluções em Gestão Pública * + * @copyright (c) 2013 Confederação Nacional de Municípos * + * @author Confederação Nacional de Municípios * + * * + * O URBEM CNM é um software livre; você pode redistribuí-lo e/ou modificá-lo sob * + * os termos da Licença Pública Geral GNU conforme publicada pela Fundação do * + * Software Livre (FSF - Free Software Foundation); na versão 2 da Licença. * + * * + * Este programa é distribuído na expectativa de que seja útil, porém, * + * SEM NENHUMA GARANTIA; nem mesmo a garantia implícita de COMERCIABILIDADE OU * + * ADEQUAÇÃO A UMA FINALIDADE ESPECÍFICA. Consulte a Licença Pública Geral do GNU * + * para mais detalhes. * + * * + * Você deve ter recebido uma cópia da Licença Pública Geral do GNU "LICENCA.txt" * + * com este programa; se não, escreva para a Free Software Foundation Inc., * + * no endereço 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA. * + * * + ********************************************************************************** +*/ +/* recuperaServidorValoresPorEventoDecimo + * Data de Criação : 28/10/2015 + * @author Analista : Dagiane Vieira + * @author Desenvolvedor : Michel Teixeira + * $Id: FTCMBARecuperaServidorValoresPorEventoDecimo.plsql 63946 2015-11-10 21:10:32Z michel $ +*/ + +CREATE OR REPLACE FUNCTION tcmba.recuperaServidorValoresPorEventoDecimo(INTEGER, VARCHAR, VARCHAR, BOOLEAN, BOOLEAN) RETURNS SETOF RECORD as $$ +DECLARE + inCodPeriodoMovimentacao ALIAS FOR $1; + stEntidade ALIAS FOR $2; + stEvento ALIAS FOR $3; + boDecimo ALIAS FOR $4; + boEventos ALIAS FOR $5; + stSQL VARCHAR :=''; + stFiltroDecimo VARCHAR :=''; + stFiltroEvento VARCHAR :=''; + reRecord RECORD; +BEGIN + IF boDecimo IS TRUE THEN + stFiltroDecimo := ' AND evento.natureza = ''P'' '; + END IF; + + IF boEventos IS TRUE THEN + stFiltroEvento := ' AND evento.cod_evento IN ('||stEvento||') '; + END IF; + + stSQL := ' SELECT salario_decimo.cod_periodo_movimentacao + , salario_decimo.cod_contrato + , sum(salario_decimo.valor) AS valor + FROM ( + SELECT registro_evento_periodo.cod_periodo_movimentacao + , registro_evento_periodo.cod_contrato + , sum(evento_calculado.valor) AS valor + + FROM folhapagamento'||stEntidade||'.registro_evento_periodo + + INNER JOIN folhapagamento'||stEntidade||'.periodo_movimentacao + ON registro_evento_periodo.cod_periodo_movimentacao = periodo_movimentacao.cod_periodo_movimentacao + + INNER JOIN folhapagamento'||stEntidade||'.registro_evento + ON registro_evento.cod_registro = registro_evento_periodo.cod_registro + + INNER JOIN folhapagamento'||stEntidade||'.ultimo_registro_evento + ON ultimo_registro_evento.cod_registro = registro_evento.cod_registro + AND ultimo_registro_evento.timestamp = registro_evento.timestamp + AND ultimo_registro_evento.cod_evento = registro_evento.cod_evento + + INNER JOIN folhapagamento'||stEntidade||'.evento + ON evento.cod_evento = ultimo_registro_evento.cod_evento + '||stFiltroDecimo||' + + INNER JOIN folhapagamento'||stEntidade||'.evento_calculado + ON evento_calculado.timestamp_registro = ultimo_registro_evento.timestamp + AND evento_calculado.cod_registro = ultimo_registro_evento.cod_registro + AND evento_calculado.cod_evento = ultimo_registro_evento.cod_evento + AND evento_calculado.desdobramento IN (''I'') + + WHERE registro_evento_periodo.cod_periodo_movimentacao = '||inCodPeriodoMovimentacao||' + '||stFiltroEvento||' + + GROUP BY registro_evento_periodo.cod_periodo_movimentacao + , registro_evento_periodo.cod_contrato + + UNION + + SELECT registro_evento_decimo.cod_periodo_movimentacao + , registro_evento_decimo.cod_contrato + , sum(evento_decimo_calculado.valor) AS valor + + FROM folhapagamento'||stEntidade||'.registro_evento_decimo + + INNER JOIN folhapagamento'||stEntidade||'.periodo_movimentacao + ON registro_evento_decimo.cod_periodo_movimentacao = periodo_movimentacao.cod_periodo_movimentacao + + INNER JOIN folhapagamento'||stEntidade||'.ultimo_registro_evento_decimo + ON ultimo_registro_evento_decimo.cod_registro = registro_evento_decimo.cod_registro + AND ultimo_registro_evento_decimo.timestamp = registro_evento_decimo.timestamp + AND ultimo_registro_evento_decimo.cod_evento = registro_evento_decimo.cod_evento + AND ultimo_registro_evento_decimo.desdobramento = registro_evento_decimo.desdobramento + + INNER JOIN folhapagamento'||stEntidade||'.evento + ON evento.cod_evento = ultimo_registro_evento_decimo.cod_evento + '||stFiltroDecimo||' + + INNER JOIN folhapagamento'||stEntidade||'.evento_decimo_calculado + ON evento_decimo_calculado.timestamp_registro = ultimo_registro_evento_decimo.timestamp + AND evento_decimo_calculado.cod_registro = ultimo_registro_evento_decimo.cod_registro + AND evento_decimo_calculado.cod_evento = ultimo_registro_evento_decimo.cod_evento + AND evento_decimo_calculado.desdobramento = ultimo_registro_evento_decimo.desdobramento + + WHERE registro_evento_decimo.cod_periodo_movimentacao = '||inCodPeriodoMovimentacao||' + '||stFiltroEvento||' + + GROUP BY registro_evento_decimo.cod_periodo_movimentacao + , registro_evento_decimo.cod_contrato + + UNION + + SELECT contrato_servidor_complementar.cod_periodo_movimentacao + , contrato_servidor_complementar.cod_contrato + , sum(evento_complementar_calculado.valor) AS valor + + FROM folhapagamento'||stEntidade||'.contrato_servidor_complementar + + INNER JOIN folhapagamento'||stEntidade||'.registro_evento_complementar + ON registro_evento_complementar.cod_periodo_movimentacao = contrato_servidor_complementar.cod_periodo_movimentacao + AND registro_evento_complementar.cod_complementar = contrato_servidor_complementar.cod_complementar + AND registro_evento_complementar.cod_contrato = contrato_servidor_complementar.cod_contrato + + INNER JOIN folhapagamento'||stEntidade||'.periodo_movimentacao + ON registro_evento_complementar.cod_periodo_movimentacao = periodo_movimentacao.cod_periodo_movimentacao + + INNER JOIN folhapagamento'||stEntidade||'.ultimo_registro_evento_complementar + ON ultimo_registro_evento_complementar.cod_registro = registro_evento_complementar.cod_registro + AND ultimo_registro_evento_complementar.timestamp = registro_evento_complementar.timestamp + AND ultimo_registro_evento_complementar.cod_evento = registro_evento_complementar.cod_evento + AND ultimo_registro_evento_complementar.cod_configuracao = registro_evento_complementar.cod_configuracao + + INNER JOIN folhapagamento'||stEntidade||'.evento + ON evento.cod_evento = ultimo_registro_evento_complementar.cod_evento + '||stFiltroDecimo||' + + INNER JOIN folhapagamento'||stEntidade||'.evento_complementar_calculado + ON evento_complementar_calculado.timestamp_registro = ultimo_registro_evento_complementar.timestamp + AND evento_complementar_calculado.cod_registro = ultimo_registro_evento_complementar.cod_registro + AND evento_complementar_calculado.cod_evento = ultimo_registro_evento_complementar.cod_evento + AND evento_complementar_calculado.cod_configuracao = ultimo_registro_evento_complementar.cod_configuracao + AND evento_complementar_calculado.cod_configuracao = 3 + + WHERE registro_evento_complementar.cod_periodo_movimentacao = '||inCodPeriodoMovimentacao||' + '||stFiltroEvento||' + + GROUP BY contrato_servidor_complementar.cod_periodo_movimentacao + , contrato_servidor_complementar.cod_contrato + ) AS salario_decimo + + GROUP BY salario_decimo.cod_periodo_movimentacao + , salario_decimo.cod_contrato '; + + FOR reRecord IN EXECUTE stSQL + LOOP + RETURN NEXT reRecord; + END LOOP; + +END; +$$ LANGUAGE 'plpgsql'; \ No newline at end of file diff --git a/gestaoPrestacaoContas/fontes/PLPGSQL/TCMBA/FTCMBARecuperaServidorValoresPorEventoFerias.plsql b/gestaoPrestacaoContas/fontes/PLPGSQL/TCMBA/FTCMBARecuperaServidorValoresPorEventoFerias.plsql new file mode 100644 index 0000000..a8cbd75 --- /dev/null +++ b/gestaoPrestacaoContas/fontes/PLPGSQL/TCMBA/FTCMBARecuperaServidorValoresPorEventoFerias.plsql @@ -0,0 +1,159 @@ +/* + ********************************************************************************** + * * + * @package URBEM CNM - Soluções em Gestão Pública * + * @copyright (c) 2013 Confederação Nacional de Municípos * + * @author Confederação Nacional de Municípios * + * * + * O URBEM CNM é um software livre; você pode redistribuí-lo e/ou modificá-lo sob * + * os termos da Licença Pública Geral GNU conforme publicada pela Fundação do * + * Software Livre (FSF - Free Software Foundation); na versão 2 da Licença. * + * * + * Este programa é distribuído na expectativa de que seja útil, porém, * + * SEM NENHUMA GARANTIA; nem mesmo a garantia implícita de COMERCIABILIDADE OU * + * ADEQUAÇÃO A UMA FINALIDADE ESPECÍFICA. Consulte a Licença Pública Geral do GNU * + * para mais detalhes. * + * * + * Você deve ter recebido uma cópia da Licença Pública Geral do GNU "LICENCA.txt" * + * com este programa; se não, escreva para a Free Software Foundation Inc., * + * no endereço 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA. * + * * + ********************************************************************************** +*/ +/* recuperaServidorValoresPorEventoFerias + * Data de Criação : 28/10/2015 + * @author Analista : Dagiane Vieira + * @author Desenvolvedor : Michel Teixeira + * $Id: FTCMBARecuperaServidorValoresPorEventoFerias.plsql 63946 2015-11-10 21:10:32Z michel $ +*/ + +CREATE OR REPLACE FUNCTION tcmba.recuperaServidorValoresPorEventoFerias(INTEGER, VARCHAR, VARCHAR, BOOLEAN, BOOLEAN) RETURNS SETOF RECORD as $$ +DECLARE + inCodPeriodoMovimentacao ALIAS FOR $1; + stEntidade ALIAS FOR $2; + stEvento ALIAS FOR $3; + boSalario ALIAS FOR $4; + boEventos ALIAS FOR $5; + stSQL VARCHAR :=''; + stFiltroSalario VARCHAR :=''; + stFiltroEvento VARCHAR :=''; + reRecord RECORD; +BEGIN + IF boSalario IS TRUE THEN + stFiltroSalario := ' AND evento.natureza = ''P'' '; + END IF; + + IF boEventos IS TRUE THEN + stFiltroEvento := ' AND evento.cod_evento IN ('||stEvento||') '; + END IF; + + stSQL := ' SELECT salario_ferias.cod_periodo_movimentacao + , salario_ferias.cod_contrato + , sum(salario_ferias.valor) AS valor + FROM ( + SELECT registro_evento_periodo.cod_periodo_movimentacao + , registro_evento_periodo.cod_contrato + , sum(evento_calculado.valor) AS valor + + FROM folhapagamento'||stEntidade||'.registro_evento_periodo + + INNER JOIN folhapagamento'||stEntidade||'.registro_evento + ON registro_evento.cod_registro = registro_evento_periodo.cod_registro + + INNER JOIN folhapagamento'||stEntidade||'.ultimo_registro_evento + ON ultimo_registro_evento.cod_registro = registro_evento.cod_registro + AND ultimo_registro_evento.timestamp = registro_evento.timestamp + AND ultimo_registro_evento.cod_evento = registro_evento.cod_evento + + INNER JOIN folhapagamento'||stEntidade||'.evento + ON evento.cod_evento = ultimo_registro_evento.cod_evento + '||stFiltroSalario||' + + INNER JOIN folhapagamento'||stEntidade||'.evento_calculado + ON evento_calculado.timestamp_registro = ultimo_registro_evento.timestamp + AND evento_calculado.cod_registro = ultimo_registro_evento.cod_registro + AND evento_calculado.cod_evento = ultimo_registro_evento.cod_evento + AND evento_calculado.desdobramento IN (''F'', ''D'', ''A'') + + WHERE registro_evento_periodo.cod_periodo_movimentacao = '||inCodPeriodoMovimentacao||' + '||stFiltroEvento||' + + GROUP BY registro_evento_periodo.cod_periodo_movimentacao + , registro_evento_periodo.cod_contrato + + UNION + + SELECT registro_evento_ferias.cod_periodo_movimentacao + , registro_evento_ferias.cod_contrato + , sum(evento_ferias_calculado.valor) AS valor + + FROM folhapagamento'||stEntidade||'.registro_evento_ferias + + INNER JOIN folhapagamento'||stEntidade||'.ultimo_registro_evento_ferias + ON ultimo_registro_evento_ferias.cod_registro = registro_evento_ferias.cod_registro + AND ultimo_registro_evento_ferias.timestamp = registro_evento_ferias.timestamp + AND ultimo_registro_evento_ferias.cod_evento = registro_evento_ferias.cod_evento + AND ultimo_registro_evento_ferias.desdobramento = registro_evento_ferias.desdobramento + + INNER JOIN folhapagamento'||stEntidade||'.evento + ON evento.cod_evento = ultimo_registro_evento_ferias.cod_evento + '||stFiltroSalario||' + + INNER JOIN folhapagamento'||stEntidade||'.evento_ferias_calculado + ON evento_ferias_calculado.timestamp_registro = ultimo_registro_evento_ferias.timestamp + AND evento_ferias_calculado.cod_registro = ultimo_registro_evento_ferias.cod_registro + AND evento_ferias_calculado.cod_evento = ultimo_registro_evento_ferias.cod_evento + AND evento_ferias_calculado.desdobramento = ultimo_registro_evento_ferias.desdobramento + + WHERE registro_evento_ferias.cod_periodo_movimentacao = '||inCodPeriodoMovimentacao||' + '||stFiltroEvento||' + + GROUP BY registro_evento_ferias.cod_periodo_movimentacao + , registro_evento_ferias.cod_contrato + + UNION + + SELECT contrato_servidor_complementar.cod_periodo_movimentacao + , contrato_servidor_complementar.cod_contrato + , sum(evento_complementar_calculado.valor) AS valor + FROM folhapagamento'||stEntidade||'.contrato_servidor_complementar + + INNER JOIN folhapagamento'||stEntidade||'.registro_evento_complementar + ON registro_evento_complementar.cod_periodo_movimentacao = contrato_servidor_complementar.cod_periodo_movimentacao + AND registro_evento_complementar.cod_complementar = contrato_servidor_complementar.cod_complementar + AND registro_evento_complementar.cod_contrato = contrato_servidor_complementar.cod_contrato + + INNER JOIN folhapagamento'||stEntidade||'.ultimo_registro_evento_complementar + ON ultimo_registro_evento_complementar.cod_registro = registro_evento_complementar.cod_registro + AND ultimo_registro_evento_complementar.timestamp = registro_evento_complementar.timestamp + AND ultimo_registro_evento_complementar.cod_evento = registro_evento_complementar.cod_evento + AND ultimo_registro_evento_complementar.cod_configuracao = registro_evento_complementar.cod_configuracao + + INNER JOIN folhapagamento'||stEntidade||'.evento + ON evento.cod_evento = ultimo_registro_evento_complementar.cod_evento + '||stFiltroSalario||' + + INNER JOIN folhapagamento'||stEntidade||'.evento_complementar_calculado + ON evento_complementar_calculado.timestamp_registro = ultimo_registro_evento_complementar.timestamp + AND evento_complementar_calculado.cod_registro = ultimo_registro_evento_complementar.cod_registro + AND evento_complementar_calculado.cod_evento = ultimo_registro_evento_complementar.cod_evento + AND evento_complementar_calculado.cod_configuracao = ultimo_registro_evento_complementar.cod_configuracao + AND evento_complementar_calculado.cod_configuracao = 2 + + WHERE registro_evento_complementar.cod_periodo_movimentacao = '||inCodPeriodoMovimentacao||' + '||stFiltroEvento||' + + GROUP BY contrato_servidor_complementar.cod_periodo_movimentacao + , contrato_servidor_complementar.cod_contrato + ) AS salario_ferias + + GROUP BY salario_ferias.cod_periodo_movimentacao + , salario_ferias.cod_contrato '; + + FOR reRecord IN EXECUTE stSQL + LOOP + RETURN NEXT reRecord; + END LOOP; + +END; +$$ LANGUAGE 'plpgsql'; \ No newline at end of file diff --git a/gestaoPrestacaoContas/fontes/PLPGSQL/TCMBA/FTCMBARecuperaServidorValoresPorEventoPensao.plsql b/gestaoPrestacaoContas/fontes/PLPGSQL/TCMBA/FTCMBARecuperaServidorValoresPorEventoPensao.plsql new file mode 100644 index 0000000..1e6085a --- /dev/null +++ b/gestaoPrestacaoContas/fontes/PLPGSQL/TCMBA/FTCMBARecuperaServidorValoresPorEventoPensao.plsql @@ -0,0 +1,161 @@ +/* + ********************************************************************************** + * * + * @package URBEM CNM - Soluções em Gestão Pública * + * @copyright (c) 2013 Confederação Nacional de Municípos * + * @author Confederação Nacional de Municípios * + * * + * O URBEM CNM é um software livre; você pode redistribuí-lo e/ou modificá-lo sob * + * os termos da Licença Pública Geral GNU conforme publicada pela Fundação do * + * Software Livre (FSF - Free Software Foundation); na versão 2 da Licença. * + * * + * Este programa é distribuído na expectativa de que seja útil, porém, * + * SEM NENHUMA GARANTIA; nem mesmo a garantia implícita de COMERCIABILIDADE OU * + * ADEQUAÇÃO A UMA FINALIDADE ESPECÍFICA. Consulte a Licença Pública Geral do GNU * + * para mais detalhes. * + * * + * Você deve ter recebido uma cópia da Licença Pública Geral do GNU "LICENCA.txt" * + * com este programa; se não, escreva para a Free Software Foundation Inc., * + * no endereço 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA. * + * * + ********************************************************************************** +*/ +/* recuperaServidorValoresPorEventoPensao + * Data de Criação : 26/10/2015 + * @author Analista : Dagiane Vieira + * @author Desenvolvedor : Michel Teixeira + * $Id: FTCMBARecuperaServidorValoresPorEventoPensao.plsql 63946 2015-11-10 21:10:32Z michel $ +*/ + +CREATE OR REPLACE FUNCTION tcmba.recuperaServidorValoresPorEventoPensao(INTEGER, VARCHAR, VARCHAR) RETURNS SETOF RECORD as $$ +DECLARE + inCodPeriodoMovimentacao ALIAS FOR $1; + stEntidade ALIAS FOR $2; + stEvento ALIAS FOR $3; + stSQL VARCHAR :=''; + reRecord RECORD; +BEGIN + stSQL := 'SELECT valor_evento.cod_periodo_movimentacao + , valor_evento.cod_contrato + , sum(valor_evento.valor) + FROM ( + SELECT registro_evento_periodo.cod_periodo_movimentacao + , registro_evento_periodo.cod_contrato + , sum(evento_calculado.valor) as valor + FROM folhapagamento'||stEntidade||'.registro_evento_periodo + + INNER JOIN folhapagamento'||stEntidade||'.registro_evento + ON registro_evento.cod_registro = registro_evento_periodo.cod_registro + + INNER JOIN folhapagamento'||stEntidade||'.ultimo_registro_evento + ON ultimo_registro_evento.cod_registro = registro_evento.cod_registro + AND ultimo_registro_evento.timestamp = registro_evento.timestamp + AND ultimo_registro_evento.cod_evento = registro_evento.cod_evento + AND ultimo_registro_evento.cod_evento IN ('||stEvento||') + + INNER JOIN folhapagamento'||stEntidade||'.evento_calculado + ON evento_calculado.timestamp_registro = ultimo_registro_evento.timestamp + AND evento_calculado.cod_registro = ultimo_registro_evento.cod_registro + AND evento_calculado.cod_evento = ultimo_registro_evento.cod_evento + + WHERE registro_evento_periodo.cod_periodo_movimentacao = '||inCodPeriodoMovimentacao||' + + GROUP BY registro_evento_periodo.cod_periodo_movimentacao + , registro_evento_periodo.cod_contrato + + UNION + + SELECT contrato_servidor_complementar.cod_periodo_movimentacao + , contrato_servidor_complementar.cod_contrato + , sum(evento_complementar_calculado.valor) as valor + FROM folhapagamento'||stEntidade||'.contrato_servidor_complementar + + INNER JOIN folhapagamento'||stEntidade||'.registro_evento_complementar + ON registro_evento_complementar.cod_periodo_movimentacao = contrato_servidor_complementar.cod_periodo_movimentacao + AND registro_evento_complementar.cod_complementar = contrato_servidor_complementar.cod_complementar + AND registro_evento_complementar.cod_contrato = contrato_servidor_complementar.cod_contrato + + INNER JOIN folhapagamento'||stEntidade||'.ultimo_registro_evento_complementar + ON ultimo_registro_evento_complementar.cod_registro = registro_evento_complementar.cod_registro + AND ultimo_registro_evento_complementar.timestamp = registro_evento_complementar.timestamp + AND ultimo_registro_evento_complementar.cod_evento = registro_evento_complementar.cod_evento + AND ultimo_registro_evento_complementar.cod_configuracao = registro_evento_complementar.cod_configuracao + AND ultimo_registro_evento_complementar.cod_evento IN ('||stEvento||') + + INNER JOIN folhapagamento'||stEntidade||'.evento_complementar_calculado + ON evento_complementar_calculado.timestamp_registro = ultimo_registro_evento_complementar.timestamp + AND evento_complementar_calculado.cod_registro = ultimo_registro_evento_complementar.cod_registro + AND evento_complementar_calculado.cod_evento = ultimo_registro_evento_complementar.cod_evento + AND evento_complementar_calculado.cod_configuracao = ultimo_registro_evento_complementar.cod_configuracao + + WHERE contrato_servidor_complementar.cod_periodo_movimentacao = '||inCodPeriodoMovimentacao||' + + GROUP BY contrato_servidor_complementar.cod_periodo_movimentacao + , contrato_servidor_complementar.cod_contrato + + UNION + + SELECT registro_evento_ferias.cod_periodo_movimentacao + , registro_evento_ferias.cod_contrato + , sum(evento_ferias_calculado.valor) AS valor + + FROM folhapagamento'||stEntidade||'.registro_evento_ferias + + INNER JOIN folhapagamento'||stEntidade||'.ultimo_registro_evento_ferias + ON ultimo_registro_evento_ferias.cod_registro = registro_evento_ferias.cod_registro + AND ultimo_registro_evento_ferias.timestamp = registro_evento_ferias.timestamp + AND ultimo_registro_evento_ferias.cod_evento = registro_evento_ferias.cod_evento + AND ultimo_registro_evento_ferias.desdobramento = registro_evento_ferias.desdobramento + + INNER JOIN folhapagamento'||stEntidade||'.evento_ferias_calculado + ON evento_ferias_calculado.timestamp_registro = ultimo_registro_evento_ferias.timestamp + AND evento_ferias_calculado.cod_registro = ultimo_registro_evento_ferias.cod_registro + AND evento_ferias_calculado.cod_evento = ultimo_registro_evento_ferias.cod_evento + AND evento_ferias_calculado.desdobramento = ultimo_registro_evento_ferias.desdobramento + + WHERE registro_evento_ferias.cod_periodo_movimentacao = '||inCodPeriodoMovimentacao||' + AND registro_evento_ferias.cod_evento IN ('||stEvento||') + + GROUP BY registro_evento_ferias.cod_periodo_movimentacao + , registro_evento_ferias.cod_contrato + + UNION + + SELECT registro_evento_decimo.cod_periodo_movimentacao + , registro_evento_decimo.cod_contrato + , sum(evento_decimo_calculado.valor) AS valor + + FROM folhapagamento'||stEntidade||'.registro_evento_decimo + + INNER JOIN folhapagamento'||stEntidade||'.periodo_movimentacao + ON registro_evento_decimo.cod_periodo_movimentacao = periodo_movimentacao.cod_periodo_movimentacao + + INNER JOIN folhapagamento'||stEntidade||'.ultimo_registro_evento_decimo + ON ultimo_registro_evento_decimo.cod_registro = registro_evento_decimo.cod_registro + AND ultimo_registro_evento_decimo.timestamp = registro_evento_decimo.timestamp + AND ultimo_registro_evento_decimo.cod_evento = registro_evento_decimo.cod_evento + AND ultimo_registro_evento_decimo.desdobramento = registro_evento_decimo.desdobramento + + INNER JOIN folhapagamento'||stEntidade||'.evento_decimo_calculado + ON evento_decimo_calculado.timestamp_registro = ultimo_registro_evento_decimo.timestamp + AND evento_decimo_calculado.cod_registro = ultimo_registro_evento_decimo.cod_registro + AND evento_decimo_calculado.cod_evento = ultimo_registro_evento_decimo.cod_evento + AND evento_decimo_calculado.desdobramento = ultimo_registro_evento_decimo.desdobramento + + WHERE registro_evento_decimo.cod_periodo_movimentacao = '||inCodPeriodoMovimentacao||' + AND registro_evento_decimo.cod_evento IN ('||stEvento||') + + GROUP BY registro_evento_decimo.cod_periodo_movimentacao + , registro_evento_decimo.cod_contrato + ) AS valor_evento + + GROUP BY valor_evento.cod_periodo_movimentacao + , valor_evento.cod_contrato '; + + FOR reRecord IN EXECUTE stSQL + LOOP + RETURN NEXT reRecord; + END LOOP; + +END; +$$ LANGUAGE 'plpgsql'; \ No newline at end of file diff --git a/gestaoPrestacaoContas/fontes/PLPGSQL/TCMBA/TCMBAConsContRazao.plsql b/gestaoPrestacaoContas/fontes/PLPGSQL/TCMBA/TCMBAConsContRazao.plsql new file mode 100644 index 0000000..bb451cf --- /dev/null +++ b/gestaoPrestacaoContas/fontes/PLPGSQL/TCMBA/TCMBAConsContRazao.plsql @@ -0,0 +1,229 @@ +/* + ********************************************************************************** + * * + * @package URBEM CNM - Soluções em Gestão Pública * + * @copyright (c) 2013 Confederação Nacional de Municípos * + * @author Confederação Nacional de Municípios * + * * + * O URBEM CNM é um software livre; você pode redistribuí-lo e/ou modificá-lo sob * + * os termos da Licença Pública Geral GNU conforme publicada pela Fundação do * + * Software Livre (FSF - Free Software Foundation); na versão 2 da Licença. * + * * + * Este programa é distribuído na expectativa de que seja útil, porém, * + * SEM NENHUMA GARANTIA; nem mesmo a garantia implícita de COMERCIABILIDADE OU * + * ADEQUAÇÃO A UMA FINALIDADE ESPECÍFICA. Consulte a Licença Pública Geral do GNU * + * para mais detalhes. * + * * + * Você deve ter recebido uma cópia da Licença Pública Geral do GNU "LICENCA.txt" * + * com este programa; se não, escreva para a Free Software Foundation Inc., * + * no endereço 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA. * + * * + ********************************************************************************** +*/ +/* +* Script de função PLPGSQL +* +* URBEM Soluções de Gestão Pública Ltda +* www.urbem.cnm.org.br +* +* $Revision: 17524 $ +* $Name$ +* $Author: cako $ +* $Date: 2006-11-09 13:34:45 -0200 (Qui, 09 Nov 2006) $ +* +* Casos de uso: uc-02.02.22 + uc-02.08.07 +*/ + +/* +$Log$ +Revision 1.14 2006/11/09 15:34:45 cako +Bug #6787# + +Revision 1.13 2006/10/27 17:28:23 cako +Bug #6787# + +Revision 1.12 2006/07/18 20:02:10 eduardo +Bug #6556# + +Revision 1.11 2006/07/14 17:58:30 andre.almeida +Bug #6556# + +Alterado scripts de NOT IN para NOT EXISTS. + +Revision 1.10 2006/07/05 20:37:31 cleisson +Adicionada tag Log aos arquivos + +*/ + +/* +CREATE TYPE tcmba.type_conscontrazao AS ( + cod_estrutural VARCHAR, + deb_ex_ant NUMERIC, + deb_mov_ant NUMERIC, + deb_mes NUMERIC, + deb_mov NUMERIC, + cred_ex_ant NUMERIC, + cred_mov_ant NUMERIC, + cred_mes NUMERIC, + cred_mov NUMERIC, + deb_ex NUMERIC, + cred_ex NUMERIC +); +*/ + +CREATE OR REPLACE FUNCTION tcmba.fn_conscontrazao(VARCHAR, VARCHAR, VARCHAR, VARCHAR, VARCHAR) RETURNS SETOF tcmba.type_conscontrazao AS $$ +DECLARE + stExercicio ALIAS FOR $1; + stEntidades ALIAS FOR $2; + stDtInicial ALIAS FOR $3; + stDtFinal ALIAS FOR $4; + stDtFinalMesAnt ALIAS FOR $5; + stExercicioAnt VARCHAR := ''; + stSql VARCHAR := ''; + reRegistro RECORD; + reRegistroAux RECORD; + +BEGIN + + stExercicioAnt := stExercicio::INTEGER - 1; + + -- PEGA OS DADOS NO MÊS DO ARQUIVO + stSql := ' + CREATE TEMPORARY TABLE tmp_balancete_mes AS ( + + SELECT * + + FROM contabilidade.fn_rl_balancete_verificacao(' || quote_literal(stExercicio) || ', + '' cod_entidade IN (' || stEntidades || ') '', + ' || quote_literal(stDtInicial) || ', + ' || quote_literal(stDtFinal) || ', + ''A'' + ) AS retorno + ( + cod_estrutural VARCHAR + , nivel INTEGER + , nom_conta VARCHAR + , cod_sistema INTEGER + , indicador_superavit CHAR(12) + , saldo_anterior NUMERIC + , saldo_debitos NUMERIC + , saldo_creditos NUMERIC + , saldo_atual NUMERIC + ) + + ORDER BY retorno.cod_estrutural + ) + '; + + EXECUTE stSql; + + -- PEGA OS DADOS DO INÍCIO DO ANO ATÉ O MES ANTERIOR DO MÊS DO ARQUIVO + stSql := ' + CREATE TEMPORARY TABLE tmp_balancete_mes_ant AS ( + + SELECT * + + FROM contabilidade.fn_rl_balancete_verificacao(' || quote_literal(stExercicio) || ', + '' cod_entidade IN (' || stEntidades || ') '', + ''01/01/' || stExercicio || ''', + ' || quote_literal(stDtFinalMesAnt) || ', + ''A'' + ) AS retorno + ( + cod_estrutural VARCHAR + , nivel INTEGER + , nom_conta VARCHAR + , cod_sistema INTEGER + , indicador_superavit CHAR(12) + , saldo_anterior NUMERIC + , saldo_debitos NUMERIC + , saldo_creditos NUMERIC + , saldo_atual NUMERIC + ) + + ORDER BY retorno.cod_estrutural + ) + '; + + EXECUTE stSql; + + stSql := ' + SELECT + cod_estrutural + , CASE WHEN saldo_ex_ant > 0.00 THEN saldo_ex_ant + ELSE 0.00 + END AS deb_ex_ant + , deb_mov_ant + , deb_mes + , deb_mov + , CASE WHEN saldo_ex_ant < 0.00 THEN saldo_ex_ant + ELSE 0.00 + END AS cred_ex_ant + , cred_mov_ant + , cred_mes + , cred_mov + , CASE WHEN (saldo_ex) > 0.00 THEN saldo_ex + ELSE 0.00 + END AS deb_ex + , CASE WHEN (saldo_ex) < 0.00 THEN saldo_ex + ELSE 0.00 + END AS cred_ex + + FROM + ( + SELECT + cod_estrutural + , SUM(saldo_ex_ant) AS saldo_ex_ant + , SUM(deb_mov_ant) AS deb_mov_ant + , SUM(deb_mes) AS deb_mes + , (SUM(deb_mov_ant) + SUM(deb_mes)) AS deb_mov + , SUM(cred_mov_ant) AS cred_mov_ant + , SUM(cred_mes) AS cred_mes + , (SUM(cred_mov_ant) + SUM(cred_mes)) AS cred_mov + , SUM(saldo_ex) AS saldo_ex + + FROM + ( + SELECT + cod_estrutural + , saldo_anterior AS saldo_ex_ant + , 0.00 AS deb_mov_ant + , COALESCE(saldo_debitos,0.00) AS deb_mes + , 0.00 AS cred_mov_ant + , COALESCE(saldo_creditos,0.00) AS cred_mes + , saldo_atual AS saldo_ex + + FROM tmp_balancete_mes + + UNION ALL + + SELECT + cod_estrutural + , 0.00 AS saldo_ex_ant + , COALESCE(saldo_debitos,0.00) AS deb_mov_ant + , 0.00 AS deb_mes + , COALESCE(saldo_creditos,0.00) AS cred_mov_ant + , 0.00 AS cred_mes + , 0.00 AS saldo_ex + + FROM tmp_balancete_mes_ant + + ORDER BY cod_estrutural + ) AS retorno + GROUP BY cod_estrutural + ORDER BY cod_estrutural + ) AS tabela + '; + + FOR reRegistro IN EXECUTE stSql + LOOP + RETURN NEXT reRegistro; + END LOOP; + + DROP TABLE tmp_balancete_mes; + DROP TABLE tmp_balancete_mes_ant; + + RETURN; +END; +$$ LANGUAGE 'plpgsql'; diff --git a/gestaoPrestacaoContas/fontes/SQL/GPC_2043.sql b/gestaoPrestacaoContas/fontes/SQL/GPC_2043.sql index d2c24e3..f7569f2 100644 --- a/gestaoPrestacaoContas/fontes/SQL/GPC_2043.sql +++ b/gestaoPrestacaoContas/fontes/SQL/GPC_2043.sql @@ -346,6 +346,7 @@ CREATE TABLE tcmba.obra_medicao( nro_nota_fiscal VARCHAR(20) NOT NULL, data_nota_fiscal DATE NOT NULL, numcgm INTEGER NOT NULL, + data_medicao DATE NOT NULL, CONSTRAINT pk_tcmba_obra_medicao PRIMARY KEY (cod_obra, cod_entidade, exercicio, cod_tipo, cod_medicao), CONSTRAINT fk_tcmba_obra_medicao_1 FOREIGN KEY (cod_obra, cod_entidade, exercicio, cod_tipo) REFERENCES tcmba.obra (cod_obra, cod_entidade, exercicio, cod_tipo), @@ -544,7 +545,7 @@ INSERT VALUES ( 3089 , 390 - , 'FMManterConfiguracaoParcSubvOSCIP.php' + , 'FLManterConfiguracaoParcSubvOSCIP.php' , 'configurar' , 17 , 'Parceria/Subvenção/OSCIP.' @@ -563,12 +564,14 @@ CREATE TABLE tcmba.termo_parceria ( dt_inicio DATE NOT NULL, dt_termino DATE NOT NULL, numcgm INTEGER NOT NULL, - processo_licitatorio VARCHAR(36), - processo_dispensa VARCHAR(16), + processo_licitatorio VARCHAR(36) , + processo_dispensa VARCHAR(16) , objeto VARCHAR(400) NOT NULL, - nro_processo_mj VARCHAR(36), - dt_processo_mj DATE, - dt_publicacao_mj DATE, + nro_processo_mj VARCHAR(36) , + dt_processo_mj DATE , + dt_publicacao_mj DATE , + vl_parceiro_publico NUMERIC(14,2) , + vl_termo_parceria NUMERIC(14,2) , CONSTRAINT pk_tcmba_termo_parceria PRIMARY KEY (exercicio,cod_entidade,nro_processo), CONSTRAINT fk_tcmba_termo_parceria_1 FOREIGN KEY (exercicio, cod_entidade) REFERENCES orcamento.entidade (exercicio, cod_entidade), @@ -584,14 +587,14 @@ CREATE TABLE tcmba.termo_parceria_dotacao ( nro_processo VARCHAR(16) NOT NULL, exercicio_despesa VARCHAR(4) NOT NULL, cod_despesa INTEGER NOT NULL, - CONSTRAINT pk_tcmba_termo_parceria_dotacao PRIMARY KEY (exercicio, cod_entidade, nro_processo), + CONSTRAINT pk_tcmba_termo_parceria_dotacao PRIMARY KEY (exercicio, cod_entidade, nro_processo, exercicio_despesa, cod_despesa), CONSTRAINT fk_tcmba_termo_parceria_dotacao_1 FOREIGN KEY (exercicio, cod_entidade, nro_processo) REFERENCES tcmba.termo_parceria (exercicio, cod_entidade, nro_processo), CONSTRAINT fk_tcmba_termo_parceria_dotacao_2 FOREIGN KEY (exercicio_despesa, cod_despesa) REFERENCES orcamento.despesa (exercicio, cod_despesa) ); -GRANT ALL ON tcmba.termo_parceria TO urbem; +GRANT ALL ON tcmba.termo_parceria_dotacao TO urbem; CREATE TABLE tcmba.termo_parceria_prorrogacao ( exercicio VARCHAR(4) NOT NULL, diff --git a/gestaoPrestacaoContas/fontes/SQL/GPC_2044.sql b/gestaoPrestacaoContas/fontes/SQL/GPC_2044.sql new file mode 100644 index 0000000..410059b --- /dev/null +++ b/gestaoPrestacaoContas/fontes/SQL/GPC_2044.sql @@ -0,0 +1,503 @@ +/* + ********************************************************************************** + * * + * @package URBEM CNM - Soluções em Gestão Pública * + * @copyright (c) 2013 Confederação Nacional de Municípos * + * @author Confederação Nacional de Municípios * + * * + * O URBEM CNM é um software livre; você pode redistribuí-lo e/ou modificá-lo sob * + * os termos da Licença Pública Geral GNU conforme publicada pela Fundação do * + * Software Livre (FSF - Free Software Foundation); na versão 2 da Licença. * + * * + * Este programa é distribuído na expectativa de que seja útil, porém, * + * SEM NENHUMA GARANTIA; nem mesmo a garantia implícita de COMERCIABILIDADE OU * + * ADEQUAÇÃO A UMA FINALIDADE ESPECÍFICA. Consulte a Licença Pública Geral do GNU * + * para mais detalhes. * + * * + * Você deve ter recebido uma cópia da Licença Pública Geral do GNU "LICENCA.txt" * + * com este programa; se não, escreva para a Free Software Foundation Inc., * + * no endereço 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA. * + * * + ********************************************************************************** +*/ +/* +* +* Script de DDL e DML +* +* Versao 2.04.4 +* +* Fabio Bertoldi - 20151023 +* +*/ + +---------------- +-- Ticket #23324 +---------------- + +INSERT + INTO administracao.acao + ( cod_acao + , cod_funcionalidade + , nom_arquivo + , parametro + , ordem + , complemento_acao + , nom_acao + , ativo + ) + VALUES + ( 3090 + , 390 + , 'FLRelacionarLotacoesOrgaos.php' + , 'configurar' + , 18 + , '' + , 'Relacionar Lotações/Orgãos' + , TRUE + ); + +SELECT atualizarbanco(' +CREATE TABLE pessoal.de_para_lotacao_orgao( + cod_orgao INTEGER NOT NULL, + num_orgao INTEGER NOT NULL, + exercicio CHAR(4) NOT NULL, + CONSTRAINT pk_de_para_lotacao_orgao PRIMARY KEY (cod_orgao, num_orgao, exercicio), + CONSTRAINT fk_de_para_lotacao_orgao_1 FOREIGN KEY (cod_orgao) + REFERENCES organograma.orgao (cod_orgao), + CONSTRAINT fk_de_para_lotacao_orgao_2 FOREIGN KEY (num_orgao, exercicio) + REFERENCES orcamento.orgao (num_orgao, exercicio) +); +'); + +SELECT atualizarbanco('GRANT ALL ON pessoal.de_para_lotacao_orgao TO urbem;'); + + +---------------- +-- Ticket #23254 +---------------- + +INSERT + INTO administracao.acao + ( cod_acao + , cod_funcionalidade + , nom_arquivo + , parametro + , ordem + , complemento_acao + , nom_acao + , ativo + ) + VALUES + ( 3091 + , 390 + , 'FLManterConfiguracaoProrrogacaoTermo.php' + , 'configurar' + , 19 + , 'Prorrogação de Termos de Parceria/Subvenção/OSCIP.' + , 'Configurar Prorrogação de Termos' + , TRUE + ); + +---------------- +-- Ticket #23322 +---------------- + +CREATE TABLE tcmba.tipo_funcao_servidor ( + cod_tipo_funcao INTEGER NOT NULL, + descricao VARCHAR(100) NOT NULL, + CONSTRAINT pk_tipo_funcao_servidor PRIMARY KEY (cod_tipo_funcao) +); +GRANT ALL ON tcmba.tipo_funcao_servidor TO urbem; + +INSERT INTO tcmba.tipo_funcao_servidor (cod_tipo_funcao, descricao) VALUES ( 1, 'Diretor' ); +INSERT INTO tcmba.tipo_funcao_servidor (cod_tipo_funcao, descricao) VALUES ( 2, 'Planejamento Escolar' ); +INSERT INTO tcmba.tipo_funcao_servidor (cod_tipo_funcao, descricao) VALUES ( 3, 'Inspeção Escolar' ); +INSERT INTO tcmba.tipo_funcao_servidor (cod_tipo_funcao, descricao) VALUES ( 4, 'Supervisão Escolar' ); +INSERT INTO tcmba.tipo_funcao_servidor (cod_tipo_funcao, descricao) VALUES ( 5, 'Orientação Educacional' ); +INSERT INTO tcmba.tipo_funcao_servidor (cod_tipo_funcao, descricao) VALUES ( 6, 'Coordenação Pedagógica' ); +INSERT INTO tcmba.tipo_funcao_servidor (cod_tipo_funcao, descricao) VALUES ( 7, 'Professor' ); +INSERT INTO tcmba.tipo_funcao_servidor (cod_tipo_funcao, descricao) VALUES ( 8, 'Outra função ligada à Educação' ); +INSERT INTO tcmba.tipo_funcao_servidor (cod_tipo_funcao, descricao) VALUES ( 9, 'Vice - Diretor' ); +INSERT INTO tcmba.tipo_funcao_servidor (cod_tipo_funcao, descricao) VALUES ( 21, 'Profissional ligado a Saúde' ); +INSERT INTO tcmba.tipo_funcao_servidor (cod_tipo_funcao, descricao) VALUES ( 92, 'Agente Político' ); +INSERT INTO tcmba.tipo_funcao_servidor (cod_tipo_funcao, descricao) VALUES ( 93, 'Outros Benefí­cios' ); +INSERT INTO tcmba.tipo_funcao_servidor (cod_tipo_funcao, descricao) VALUES ( 97, 'Guarda Municipal/Assistência Militar'); +INSERT INTO tcmba.tipo_funcao_servidor (cod_tipo_funcao, descricao) VALUES ( 98, 'Conselheiros' ); + + +SELECT atualizarbanco(' +CREATE TABLE folhapagamento.tcmba_cargo_servidor ( + exercicio CHAR(4) NOT NULL, + cod_entidade INTEGER NOT NULL, + cod_tipo_funcao INTEGER NOT NULL, + cod_cargo INTEGER NOT NULL, + CONSTRAINT pk_tcmba_cargo_servidor PRIMARY KEY (exercicio, cod_entidade, cod_tipo_funcao, cod_cargo), + CONSTRAINT fk_tcmba_cargo_servidor_1 FOREIGN KEY (cod_tipo_funcao) + REFERENCES tcmba.tipo_funcao_servidor (cod_tipo_funcao), + CONSTRAINT fk_tcmba_cargo_servidor_2 FOREIGN KEY (cod_cargo) + REFERENCES pessoal.cargo (cod_cargo), + CONSTRAINT fk_tcmba_cargo_servidor_3 FOREIGN KEY (exercicio, cod_entidade) + REFERENCES orcamento.entidade (exercicio, cod_entidade) +);'); +SELECT atualizarbanco('GRANT ALL ON folhapagamento.tcmba_cargo_servidor TO urbem;'); + +CREATE TABLE tcmba.tipo_funcao_servidor_temporario ( + cod_tipo_funcao INTEGER NOT NULL, + descricao VARCHAR(100) NOT NULL, + CONSTRAINT pk_tipo_funcao_servidor_temporario PRIMARY KEY (cod_tipo_funcao) +); +GRANT ALL ON tcmba.tipo_funcao_servidor_temporario TO urbem; + +INSERT INTO tcmba.tipo_funcao_servidor_temporario ( cod_tipo_funcao, descricao ) VALUES ( 1, 'Técnico/Auxiliar da Área de Educação' ); +INSERT INTO tcmba.tipo_funcao_servidor_temporario ( cod_tipo_funcao, descricao ) VALUES ( 2, 'Acupunturista' ); +INSERT INTO tcmba.tipo_funcao_servidor_temporario ( cod_tipo_funcao, descricao ) VALUES ( 3, 'Administrador' ); +INSERT INTO tcmba.tipo_funcao_servidor_temporario ( cod_tipo_funcao, descricao ) VALUES ( 4, 'Profissional da Área Jurí­dica' ); +INSERT INTO tcmba.tipo_funcao_servidor_temporario ( cod_tipo_funcao, descricao ) VALUES ( 5, 'Agente Administrativo' ); +INSERT INTO tcmba.tipo_funcao_servidor_temporario ( cod_tipo_funcao, descricao ) VALUES ( 6, 'Agente Comunitário de Saúde' ); +INSERT INTO tcmba.tipo_funcao_servidor_temporario ( cod_tipo_funcao, descricao ) VALUES ( 8, 'Analista de Sistemas' ); +INSERT INTO tcmba.tipo_funcao_servidor_temporario ( cod_tipo_funcao, descricao ) VALUES ( 9, 'Arquiteto' ); +INSERT INTO tcmba.tipo_funcao_servidor_temporario ( cod_tipo_funcao, descricao ) VALUES ( 10, 'Ascensorista' ); +INSERT INTO tcmba.tipo_funcao_servidor_temporario ( cod_tipo_funcao, descricao ) VALUES ( 15, 'Assistente Social' ); +INSERT INTO tcmba.tipo_funcao_servidor_temporario ( cod_tipo_funcao, descricao ) VALUES ( 16, 'Técnico/Auxiliar da Área de Saúde' ); +INSERT INTO tcmba.tipo_funcao_servidor_temporario ( cod_tipo_funcao, descricao ) VALUES ( 17, 'Carpinteiro/Marceneiro' ); +INSERT INTO tcmba.tipo_funcao_servidor_temporario ( cod_tipo_funcao, descricao ) VALUES ( 19, 'Censor(a)' ); +INSERT INTO tcmba.tipo_funcao_servidor_temporario ( cod_tipo_funcao, descricao ) VALUES ( 20, 'Chapista' ); +INSERT INTO tcmba.tipo_funcao_servidor_temporario ( cod_tipo_funcao, descricao ) VALUES ( 28, 'Técnico/Auxiliar de Eletricista' ); +INSERT INTO tcmba.tipo_funcao_servidor_temporario ( cod_tipo_funcao, descricao ) VALUES ( 29, 'Técnico/Auxiliar de Encanador' ); +INSERT INTO tcmba.tipo_funcao_servidor_temporario ( cod_tipo_funcao, descricao ) VALUES ( 30, 'Engenheiro Agrônomo' ); +INSERT INTO tcmba.tipo_funcao_servidor_temporario ( cod_tipo_funcao, descricao ) VALUES ( 31, 'Engenheiro Civil' ); +INSERT INTO tcmba.tipo_funcao_servidor_temporario ( cod_tipo_funcao, descricao ) VALUES ( 32, 'Entrevistador(a)' ); +INSERT INTO tcmba.tipo_funcao_servidor_temporario ( cod_tipo_funcao, descricao ) VALUES ( 34, 'Merendeira' ); +INSERT INTO tcmba.tipo_funcao_servidor_temporario ( cod_tipo_funcao, descricao ) VALUES ( 35, 'Motorista' ); +INSERT INTO tcmba.tipo_funcao_servidor_temporario ( cod_tipo_funcao, descricao ) VALUES ( 36, 'Psicólogo(a)' ); +INSERT INTO tcmba.tipo_funcao_servidor_temporario ( cod_tipo_funcao, descricao ) VALUES ( 37, 'Psicopedagogo(a)' ); +INSERT INTO tcmba.tipo_funcao_servidor_temporario ( cod_tipo_funcao, descricao ) VALUES ( 38, 'Psiquiatra' ); +INSERT INTO tcmba.tipo_funcao_servidor_temporario ( cod_tipo_funcao, descricao ) VALUES ( 39, 'Químico(a)' ); +INSERT INTO tcmba.tipo_funcao_servidor_temporario ( cod_tipo_funcao, descricao ) VALUES ( 40, 'Recepcionista' ); +INSERT INTO tcmba.tipo_funcao_servidor_temporario ( cod_tipo_funcao, descricao ) VALUES ( 41, 'Recreador' ); +INSERT INTO tcmba.tipo_funcao_servidor_temporario ( cod_tipo_funcao, descricao ) VALUES ( 42, 'Regente de Fanfarra' ); +INSERT INTO tcmba.tipo_funcao_servidor_temporario ( cod_tipo_funcao, descricao ) VALUES ( 43, 'Salva-Vidas' ); +INSERT INTO tcmba.tipo_funcao_servidor_temporario ( cod_tipo_funcao, descricao ) VALUES ( 44, 'Sanitarista' ); +INSERT INTO tcmba.tipo_funcao_servidor_temporario ( cod_tipo_funcao, descricao ) VALUES ( 45, 'Servente' ); +INSERT INTO tcmba.tipo_funcao_servidor_temporario ( cod_tipo_funcao, descricao ) VALUES ( 47, 'Técnico/Auxiliar da Área Financeira/Contábil'); +INSERT INTO tcmba.tipo_funcao_servidor_temporario ( cod_tipo_funcao, descricao ) VALUES ( 48, 'Telefonista' ); +INSERT INTO tcmba.tipo_funcao_servidor_temporario ( cod_tipo_funcao, descricao ) VALUES ( 49, 'Terapeuta Ocupacional' ); +INSERT INTO tcmba.tipo_funcao_servidor_temporario ( cod_tipo_funcao, descricao ) VALUES ( 50, 'Tesoureiro(a)' ); +INSERT INTO tcmba.tipo_funcao_servidor_temporario ( cod_tipo_funcao, descricao ) VALUES ( 51, 'Topógrafo' ); +INSERT INTO tcmba.tipo_funcao_servidor_temporario ( cod_tipo_funcao, descricao ) VALUES ( 52, 'Veterinário(a)' ); +INSERT INTO tcmba.tipo_funcao_servidor_temporario ( cod_tipo_funcao, descricao ) VALUES ( 59, 'Vigilante' ); +INSERT INTO tcmba.tipo_funcao_servidor_temporario ( cod_tipo_funcao, descricao ) VALUES ( 60, 'Zelador(a)' ); +INSERT INTO tcmba.tipo_funcao_servidor_temporario ( cod_tipo_funcao, descricao ) VALUES ( 61, 'Zootecnista' ); +INSERT INTO tcmba.tipo_funcao_servidor_temporario ( cod_tipo_funcao, descricao ) VALUES ( 62, 'Professor(a)' ); +INSERT INTO tcmba.tipo_funcao_servidor_temporario ( cod_tipo_funcao, descricao ) VALUES ( 63, 'Médico' ); +INSERT INTO tcmba.tipo_funcao_servidor_temporario ( cod_tipo_funcao, descricao ) VALUES ( 64, 'Odontólogo(a)' ); +INSERT INTO tcmba.tipo_funcao_servidor_temporario ( cod_tipo_funcao, descricao ) VALUES ( 65, 'Enfermeiro(a)' ); +INSERT INTO tcmba.tipo_funcao_servidor_temporario ( cod_tipo_funcao, descricao ) VALUES ( 66, 'Profissional da Área de Contabilidade' ); +INSERT INTO tcmba.tipo_funcao_servidor_temporario ( cod_tipo_funcao, descricao ) VALUES ( 67, 'Engenheiro Sanitarista' ); +INSERT INTO tcmba.tipo_funcao_servidor_temporario ( cod_tipo_funcao, descricao ) VALUES ( 68, 'Pedagogo(a)' ); +INSERT INTO tcmba.tipo_funcao_servidor_temporario ( cod_tipo_funcao, descricao ) VALUES ( 70, 'Serviços Gerais' ); +INSERT INTO tcmba.tipo_funcao_servidor_temporario ( cod_tipo_funcao, descricao ) VALUES ( 71, 'Gari' ); +INSERT INTO tcmba.tipo_funcao_servidor_temporario ( cod_tipo_funcao, descricao ) VALUES ( 72, 'Técnico/Auxiliar da Área Administrativa' ); +INSERT INTO tcmba.tipo_funcao_servidor_temporario ( cod_tipo_funcao, descricao ) VALUES ( 73, 'Fisioterapeuta' ); +INSERT INTO tcmba.tipo_funcao_servidor_temporario ( cod_tipo_funcao, descricao ) VALUES ( 74, 'Bibliotecário(a)' ); +INSERT INTO tcmba.tipo_funcao_servidor_temporario ( cod_tipo_funcao, descricao ) VALUES ( 75, 'Biólogo(a)' ); +INSERT INTO tcmba.tipo_funcao_servidor_temporario ( cod_tipo_funcao, descricao ) VALUES ( 76, 'Farmacêutico(a)' ); +INSERT INTO tcmba.tipo_funcao_servidor_temporario ( cod_tipo_funcao, descricao ) VALUES ( 78, 'Abatedor de Animais' ); +INSERT INTO tcmba.tipo_funcao_servidor_temporario ( cod_tipo_funcao, descricao ) VALUES ( 79, 'Bombeiro' ); +INSERT INTO tcmba.tipo_funcao_servidor_temporario ( cod_tipo_funcao, descricao ) VALUES ( 81, 'Biomédico(a)' ); +INSERT INTO tcmba.tipo_funcao_servidor_temporario ( cod_tipo_funcao, descricao ) VALUES ( 82, 'Bioquímico(a)' ); +INSERT INTO tcmba.tipo_funcao_servidor_temporario ( cod_tipo_funcao, descricao ) VALUES ( 91, 'Pedreiro' ); +INSERT INTO tcmba.tipo_funcao_servidor_temporario ( cod_tipo_funcao, descricao ) VALUES ( 92, 'Pintor' ); +INSERT INTO tcmba.tipo_funcao_servidor_temporario ( cod_tipo_funcao, descricao ) VALUES ( 93, 'Soldador' ); +INSERT INTO tcmba.tipo_funcao_servidor_temporario ( cod_tipo_funcao, descricao ) VALUES ( 94, 'Borracheiro' ); +INSERT INTO tcmba.tipo_funcao_servidor_temporario ( cod_tipo_funcao, descricao ) VALUES ( 95, 'Brigadista' ); +INSERT INTO tcmba.tipo_funcao_servidor_temporario ( cod_tipo_funcao, descricao ) VALUES ( 96, 'Mecânico' ); +INSERT INTO tcmba.tipo_funcao_servidor_temporario ( cod_tipo_funcao, descricao ) VALUES ( 98, 'Coveiro' ); +INSERT INTO tcmba.tipo_funcao_servidor_temporario ( cod_tipo_funcao, descricao ) VALUES ( 99, 'Desenhista/Projetista' ); +INSERT INTO tcmba.tipo_funcao_servidor_temporario ( cod_tipo_funcao, descricao ) VALUES ( 101, 'Instrutor' ); +INSERT INTO tcmba.tipo_funcao_servidor_temporario ( cod_tipo_funcao, descricao ) VALUES ( 102, 'Mestre/Técnico de Obras' ); +INSERT INTO tcmba.tipo_funcao_servidor_temporario ( cod_tipo_funcao, descricao ) VALUES ( 104, 'Nutricionista' ); +INSERT INTO tcmba.tipo_funcao_servidor_temporario ( cod_tipo_funcao, descricao ) VALUES ( 105, 'Profissional da Área de Comunicação' ); +INSERT INTO tcmba.tipo_funcao_servidor_temporario ( cod_tipo_funcao, descricao ) VALUES ( 106, 'Operador de Máquinas e Equipamentos' ); +INSERT INTO tcmba.tipo_funcao_servidor_temporario ( cod_tipo_funcao, descricao ) VALUES ( 108, 'Técnico/Auxiliar da Área Ambiental' ); +INSERT INTO tcmba.tipo_funcao_servidor_temporario ( cod_tipo_funcao, descricao ) VALUES ( 109, 'Técnico/Auxiliar da Área Agrí­cola' ); +INSERT INTO tcmba.tipo_funcao_servidor_temporario ( cod_tipo_funcao, descricao ) VALUES ( 110, 'Técnico/Auxiliar em Agrimensura' ); +INSERT INTO tcmba.tipo_funcao_servidor_temporario ( cod_tipo_funcao, descricao ) VALUES ( 111, 'Técnico/Auxiliar da Área de Informática' ); +INSERT INTO tcmba.tipo_funcao_servidor_temporario ( cod_tipo_funcao, descricao ) VALUES ( 112, 'Técnico/Auxiliar da Área Sanitária' ); +INSERT INTO tcmba.tipo_funcao_servidor_temporario ( cod_tipo_funcao, descricao ) VALUES ( 113, 'Técnico/Auxiliar da Área Social e Desporto' ); +INSERT INTO tcmba.tipo_funcao_servidor_temporario ( cod_tipo_funcao, descricao ) VALUES ( 114, 'Técnico/Auxiliar da Área Tributária' ); +INSERT INTO tcmba.tipo_funcao_servidor_temporario ( cod_tipo_funcao, descricao ) VALUES ( 115, 'Fonoaudiólogo(a)' ); + + +SELECT atualizarbanco(' +CREATE TABLE folhapagamento.tcmba_cargo_servidor_temporario ( + exercicio CHAR(4) NOT NULL, + cod_entidade INTEGER NOT NULL, + cod_tipo_funcao INTEGER NOT NULL, + cod_cargo INTEGER NOT NULL, + CONSTRAINT pk_tcmba_cargo_servidor_temporario PRIMARY KEY (exercicio, cod_entidade, cod_tipo_funcao, cod_cargo), + CONSTRAINT fk_tcmba_cargo_servidor_temporario_1 FOREIGN KEY (cod_tipo_funcao) + REFERENCES tcmba.tipo_funcao_servidor_temporario (cod_tipo_funcao), + CONSTRAINT fk_tcmba_cargo_servidor_temporario_2 FOREIGN KEY (cod_cargo) + REFERENCES pessoal.cargo (cod_cargo), + CONSTRAINT fk_tcmba_cargo_servidor_temporario_3 FOREIGN KEY (exercicio, cod_entidade) + REFERENCES orcamento.entidade (exercicio, cod_entidade) +);'); +SELECT atualizarbanco('GRANT ALL ON folhapagamento.tcmba_cargo_servidor_temporario TO urbem;'); + + +CREATE TABLE tcmba.tipo_fonte_recurso_servidor( + cod_tipo_fonte INTEGER NOT NULL, + descricao VARCHAR(100) NOT NULL, + CONSTRAINT pk_tipo_fonte_recurso_servidor PRIMARY KEY (cod_tipo_fonte) +); +GRANT ALL ON tcmba.tipo_fonte_recurso_servidor TO urbem; + +INSERT INTO tcmba.tipo_fonte_recurso_servidor VALUES(1, 'Educação - Aplicação direta 60% do Fundeb' ); +INSERT INTO tcmba.tipo_fonte_recurso_servidor VALUES(2, 'Saúde - Ligado diretamente a saúde' ); +INSERT INTO tcmba.tipo_fonte_recurso_servidor VALUES(3, 'Educação - Aplicação direta 40% do Fundeb' ); +INSERT INTO tcmba.tipo_fonte_recurso_servidor VALUES(5, 'Educação - Pago com recurso próprio' ); + + +CREATE TABLE tcmba.fonte_recurso_lotacao( + cod_tipo_fonte INTEGER NOT NULL, + exercicio CHAR(4) NOT NULL, + cod_entidade INTEGER NOT NULL, + cod_orgao INTEGER NOT NULL, + CONSTRAINT pk_fonte_recurso_lotacao PRIMARY KEY (cod_tipo_fonte, exercicio, cod_entidade, cod_orgao), + CONSTRAINT fk_fonte_recurso_lotacao_1 FOREIGN KEY (cod_tipo_fonte) + REFERENCES tcmba.tipo_fonte_recurso_servidor (cod_tipo_fonte), + CONSTRAINT fk_fonte_recurso_lotacao_2 FOREIGN KEY (exercicio, cod_entidade) + REFERENCES orcamento.entidade (exercicio, cod_entidade), + CONSTRAINT fk_fonte_recurso_lotacao_3 FOREIGN KEY (cod_orgao) + REFERENCES organograma.orgao (cod_orgao) +); +GRANT ALL ON tcmba.fonte_recurso_lotacao TO urbem; + +CREATE TABLE tcmba.fonte_recurso_local( + cod_tipo_fonte INTEGER NOT NULL, + exercicio CHAR(4) NOT NULL, + cod_entidade INTEGER NOT NULL, + cod_local INTEGER NOT NULL, + CONSTRAINT pk_fonte_recurso_local PRIMARY KEY (cod_tipo_fonte, exercicio, cod_entidade, cod_local), + CONSTRAINT fk_fonte_recurso_local_1 FOREIGN KEY (cod_tipo_fonte) + REFERENCES tcmba.tipo_fonte_recurso_servidor (cod_tipo_fonte), + CONSTRAINT fk_fonte_recurso_local_2 FOREIGN KEY (exercicio, cod_entidade) + REFERENCES orcamento.entidade (exercicio, cod_entidade), + CONSTRAINT fk_fonte_recurso_local_3 FOREIGN KEY (cod_local) + REFERENCES organograma.local (cod_local) +); +GRANT ALL ON tcmba.fonte_recurso_local TO urbem; + +SELECT atualizarbanco(' +CREATE TABLE folhapagamento.tcmba_salario_base ( + exercicio CHAR(4) NOT NULL, + cod_entidade INTEGER NOT NULL, + cod_evento INTEGER NOT NULL, + CONSTRAINT pk_tcmba_salario_base PRIMARY KEY (exercicio, cod_entidade, cod_evento), + CONSTRAINT fk_tcmba_salario_base_1 FOREIGN KEY (exercicio, cod_entidade) + REFERENCES orcamento.entidade (exercicio, cod_entidade), + CONSTRAINT fk_tcmba_salario_base_2 FOREIGN KEY (cod_evento) + REFERENCES folhapagamento.evento (cod_evento) +);'); +SELECT atualizarbanco('GRANT ALL ON folhapagamento.tcmba_salario_base TO urbem;'); + +SELECT atualizarbanco(' +CREATE TABLE folhapagamento.tcmba_vantagens_salariais ( + exercicio CHAR(4) NOT NULL, + cod_entidade INTEGER NOT NULL, + cod_evento INTEGER NOT NULL, + CONSTRAINT pk_tcmba_vantagens_salariais PRIMARY KEY (exercicio, cod_entidade, cod_evento), + CONSTRAINT fk_tcmba_vantagens_salariais_1 FOREIGN KEY (exercicio, cod_entidade) + REFERENCES orcamento.entidade (exercicio, cod_entidade), + CONSTRAINT fk_tcmba_vantagens_salariais_2 FOREIGN KEY (cod_evento) + REFERENCES folhapagamento.evento (cod_evento) +);'); +SELECT atualizarbanco('GRANT ALL ON folhapagamento.tcmba_vantagens_salariais TO urbem;'); + +SELECT atualizarbanco(' +CREATE TABLE folhapagamento.tcmba_gratificacao_funcao ( + exercicio CHAR(4) NOT NULL, + cod_entidade INTEGER NOT NULL, + cod_evento INTEGER NOT NULL, + CONSTRAINT pk_tcmba_gratificacao_funcao PRIMARY KEY (exercicio, cod_entidade, cod_evento), + CONSTRAINT fk_tcmba_gratificacao_funcao_1 FOREIGN KEY (exercicio, cod_entidade) + REFERENCES orcamento.entidade (exercicio, cod_entidade), + CONSTRAINT fk_tcmba_gratificacao_funcao_2 FOREIGN KEY (cod_evento) + REFERENCES folhapagamento.evento (cod_evento) +);'); +SELECT atualizarbanco('GRANT ALL ON folhapagamento.tcmba_gratificacao_funcao TO urbem;'); + +SELECT atualizarbanco(' +CREATE TABLE folhapagamento.tcmba_salario_familia ( + exercicio CHAR(4) NOT NULL, + cod_entidade INTEGER NOT NULL, + cod_evento INTEGER NOT NULL, + CONSTRAINT pk_tcmba_salario_familia PRIMARY KEY (exercicio, cod_entidade, cod_evento), + CONSTRAINT fk_tcmba_salario_familia_1 FOREIGN KEY (exercicio, cod_entidade) + REFERENCES orcamento.entidade (exercicio, cod_entidade), + CONSTRAINT fk_tcmba_salario_familia_2 FOREIGN KEY (cod_evento) + REFERENCES folhapagamento.evento (cod_evento) +);'); +SELECT atualizarbanco('GRANT ALL ON folhapagamento.tcmba_salario_familia TO urbem;'); + +SELECT atualizarbanco(' +CREATE TABLE folhapagamento.tcmba_salario_horas_extras ( + exercicio CHAR(4) NOT NULL, + cod_entidade INTEGER NOT NULL, + cod_evento INTEGER NOT NULL, + CONSTRAINT pk_tcmba_salario_horas_extras PRIMARY KEY (exercicio, cod_entidade, cod_evento), + CONSTRAINT fk_tcmba_salario_horas_extras_1 FOREIGN KEY (exercicio, cod_entidade) + REFERENCES orcamento.entidade (exercicio, cod_entidade), + CONSTRAINT fk_tcmba_salario_horas_extras_2 FOREIGN KEY (cod_evento) + REFERENCES folhapagamento.evento (cod_evento) +);'); +SELECT atualizarbanco('GRANT ALL ON folhapagamento.tcmba_salario_horas_extras TO urbem;'); + +SELECT atualizarbanco(' +CREATE TABLE folhapagamento.tcmba_salario_descontos ( + exercicio CHAR(4) NOT NULL, + cod_entidade INTEGER NOT NULL, + cod_evento INTEGER NOT NULL, + CONSTRAINT pk_tcmba_salario_descontos PRIMARY KEY (exercicio, cod_entidade, cod_evento), + CONSTRAINT fk_tcmba_salario_descontos_1 FOREIGN KEY (exercicio, cod_entidade) + REFERENCES orcamento.entidade (exercicio, cod_entidade), + CONSTRAINT fk_tcmba_salario_descontos_2 FOREIGN KEY (cod_evento) + REFERENCES folhapagamento.evento (cod_evento) +);'); +SELECT atualizarbanco('GRANT ALL ON folhapagamento.tcmba_salario_descontos TO urbem;'); + +SELECT atualizarbanco(' +CREATE TABLE folhapagamento.tcmba_plano_saude ( + exercicio CHAR(4) NOT NULL, + cod_entidade INTEGER NOT NULL, + cod_evento INTEGER NOT NULL, + CONSTRAINT pk_tcmba_plano_saude PRIMARY KEY (exercicio, cod_entidade, cod_evento), + CONSTRAINT fk_tcmba_plano_saude_1 FOREIGN KEY (exercicio, cod_entidade) + REFERENCES orcamento.entidade (exercicio, cod_entidade), + CONSTRAINT fk_tcmba_plano_saude_2 FOREIGN KEY (cod_evento) + REFERENCES folhapagamento.evento (cod_evento) +);'); +SELECT atualizarbanco('GRANT ALL ON folhapagamento.tcmba_plano_saude TO urbem;'); + +SELECT atualizarbanco(' +CREATE TABLE folhapagamento.tcmba_emprestimo_consignado ( + exercicio CHAR(4) NOT NULL, + cod_entidade INTEGER NOT NULL, + cod_banco INTEGER NOT NULL, + cod_evento INTEGER NOT NULL, + CONSTRAINT pk_tcmba_emprestimo_consignado PRIMARY KEY (exercicio, cod_entidade, cod_banco, cod_evento), + CONSTRAINT fk_tcmba_emprestimo_consignado_1 FOREIGN KEY (exercicio, cod_entidade) + REFERENCES orcamento.entidade (exercicio, cod_entidade), + CONSTRAINT fk_tcmba_emprestimo_consignado_2 FOREIGN KEY (cod_banco) + REFERENCES monetario.banco (cod_banco), + CONSTRAINT fk_tcmba_emprestimo_consignado_3 FOREIGN KEY (cod_evento) + REFERENCES folhapagamento.evento (cod_evento) +);'); +SELECT atualizarbanco('GRANT ALL ON folhapagamento.tcmba_emprestimo_consignado TO urbem;'); + +INSERT + INTO administracao.acao + ( cod_acao + , cod_funcionalidade + , nom_arquivo + , parametro + , ordem + , complemento_acao + , nom_acao + , ativo + ) +VALUES + ( 391 + , 390 + , 'FMManterConfiguracaoTipoSalario.php' + , 'configurar' + , 20 + , '' + , 'Configurar Tipos de Salários' + , TRUE + ); + + +---------------- +-- Ticket #22981 +---------------- + +CREATE OR REPLACE FUNCTION manutencao() RETURNS VOID AS $$ +DECLARE + +BEGIN + PERFORM 1 + FROM pg_type + WHERE typname = 'tcmba.type_conscontrazao' + ; + IF NOT FOUND THEN + CREATE TYPE tcmba.type_conscontrazao AS ( + cod_estrutural VARCHAR, + deb_ex_ant NUMERIC, + deb_mov_ant NUMERIC, + deb_mes NUMERIC, + deb_mov NUMERIC, + cred_ex_ant NUMERIC, + cred_mov_ant NUMERIC, + cred_mes NUMERIC, + cred_mov NUMERIC, + deb_ex NUMERIC, + cred_ex NUMERIC + ); + END IF; +END; +$$ LANGUAGE 'plpgsql'; + +SELECT manutencao(); +DROP FUNCTION manutencao(); + + +---------------- +-- Ticket #22979 +---------------- + +CREATE TYPE tcmba_servidor_salario2 AS ( + cod_periodo_movimentacao INTEGER + , cod_servidor_pensionista INTEGER + , tipo INTEGER + , cod_contrato INTEGER + , num_orgao INTEGER + , cod_tipo_cargo INTEGER + , funcao_atual INTEGER + , classe INTEGER + , numcgm INTEGER + , nom_cgm VARCHAR + , cpf VARCHAR + , matricula INTEGER + , cod_cargo INTEGER + , nro_dias INTEGER + , horas_mensais INTEGER + , cod_funcao_temporario INTEGER + , folha INTEGER + , cod_previdencia INTEGER + , salario_base NUMERIC + , salario_vantagens NUMERIC + , salario_gratificacao NUMERIC + , salario_familia NUMERIC + , salario_ferias NUMERIC + , salario_horas_extra NUMERIC + , salario_decimo NUMERIC + , salario_descontos NUMERIC + , desconto_irrf NUMERIC + , desconto_irrf_decimo NUMERIC + , desconto_consignado_1 NUMERIC + , cod_banco_1 VARCHAR + , desconto_consignado_2 NUMERIC + , cod_banco_2 VARCHAR + , desconto_consignado_3 NUMERIC + , cod_banco_3 VARCHAR + , desconto_previdencia NUMERIC + , desconto_irrf_ferias NUMERIC + , desconto_previdencia_decimo NUMERIC + , desconto_previdencia_ferias NUMERIC + , desconto_pensao NUMERIC + , desconto_plano_saude NUMERIC + , salario_liquido NUMERIC +); + diff --git a/gestaoRH/fontes/PHP/IMA/classes/mapeamento/TIMAConfiguracaoConvenioCaixaEconomicaFederal.class.php b/gestaoRH/fontes/PHP/IMA/classes/mapeamento/TIMAConfiguracaoConvenioCaixaEconomicaFederal.class.php index 2849914..58bd843 100644 --- a/gestaoRH/fontes/PHP/IMA/classes/mapeamento/TIMAConfiguracaoConvenioCaixaEconomicaFederal.class.php +++ b/gestaoRH/fontes/PHP/IMA/classes/mapeamento/TIMAConfiguracaoConvenioCaixaEconomicaFederal.class.php @@ -68,6 +68,7 @@ function TIMAConfiguracaoConvenioCaixaEconomicaFederal() $this->AddCampo('cod_banco' ,'integer' ,true ,'' ,false,'TMONContaCorrente'); $this->AddCampo('cod_agencia' ,'integer' ,true ,'' ,false,'TMONContaCorrente'); $this->AddCampo('cod_conta_corrente','integer' ,true ,'' ,false,'TMONContaCorrente'); + $this->AddCampo('cod_tipo' ,'integer' ,true ,'' ,false,false); } diff --git a/gestaoRH/fontes/PHP/IMA/instancias/configuracao/FMExportacaoBancoCaixaEconomicaFederal.php b/gestaoRH/fontes/PHP/IMA/instancias/configuracao/FMExportacaoBancoCaixaEconomicaFederal.php index dfd7464..29eb71b 100644 --- a/gestaoRH/fontes/PHP/IMA/instancias/configuracao/FMExportacaoBancoCaixaEconomicaFederal.php +++ b/gestaoRH/fontes/PHP/IMA/instancias/configuracao/FMExportacaoBancoCaixaEconomicaFederal.php @@ -58,8 +58,9 @@ $jsOnload = "executaFuncaoAjax('preencherDadosAgencia');"; //**************************************************************************************************************************// //Define a função do arquivo, ex: incluir, excluir, alterar, consultar, etc -$stAcao = $_GET['stAcao'] ? $_GET['stAcao'] : $_POST['stAcao']; +$stAcao = $request->get('stAcao'); + $obHdnAcao = new Hidden; $obHdnAcao->setName( "stAcao"); $obHdnAcao->setValue( $stAcao ); @@ -77,7 +78,8 @@ $obForm->setTarget ( "oculto" ); $obTxtCodigoConvenio = new TextBox; $obTxtCodigoConvenio->setRotulo ( "Código Convênio com Banco" ); $obTxtCodigoConvenio->setName ( "stCodConvenio" ); -$obTxtCodigoConvenio->setValue ( $stCodConvenio ); +$obTxtCodigoConvenio->setID ( "stCodConvenio" ); +$obTxtCodigoConvenio->setValue ( $stCodConvenio ); $obTxtCodigoConvenio->setTitle ( "Informe o Código do Convênio firmado entre a Prefeitura e o Banco." ); $obTxtCodigoConvenio->setSize ( 12 ); $obTxtCodigoConvenio->setMaxLength ( 10 ); @@ -106,6 +108,7 @@ $obIMontaAgencia->obTextBoxSelectAgencia->setNull(false); $obCmbContaCorrente = new Select; $obCmbContaCorrente->setRotulo ( "Conta-Corrente" ); $obCmbContaCorrente->setName ( "inTxtContaCorrente" ); +$obCmbContaCorrente->setID ( "inTxtContaCorrente" ); $obCmbContaCorrente->setStyle ( "width: 200px" ); $obCmbContaCorrente->setTitle ( "Selecione a Conta-Corrente do Convênio (conta para débito)." ); $obCmbContaCorrente->setCampoID ( "cod_conta" ); @@ -114,6 +117,20 @@ $obCmbContaCorrente->addOption ( "", "Selecione" ); $obCmbContaCorrente->setValue ( $inCodConta ); $obCmbContaCorrente->setNull ( false ); +//*Tipo de convênio/Layout +$obCmbConvenioLayout = new Select; +$obCmbConvenioLayout->setRotulo ( "Tipo de convênio/Layout" ); +$obCmbConvenioLayout->setName ( "inTipoConvenioLayout" ); +$obCmbConvenioLayout->setID ( "inTipoConvenioLayout" ); +$obCmbConvenioLayout->setStyle ( "width: 200px" ); +$obCmbConvenioLayout->setTitle ( "Selecione o tipo de Convênio para o Layout" ); +$obCmbConvenioLayout->setCampoID ( "cod_convenio_Layout" ); +$obCmbConvenioLayout->setCampoDesc ( "nom_convenio_Layout" ); +$obCmbConvenioLayout->addOption ( "", "Selecione" ); +$obCmbConvenioLayout->addOption ( 1 , "SIACC 150" ); +$obCmbConvenioLayout->addOption ( 2 , "SICOV 150 - PADRAO 150 FEBRABAN" ); +$obCmbConvenioLayout->setNull ( false ); + //Envia codigo do banco para processamento Sessao::write('BANCO', $inCodBanco); @@ -126,8 +143,9 @@ $obFormulario->addHidden ( $obHdnAcao $obFormulario->addHidden ( $obHdnCtrl ); $obFormulario->addTitulo ( $obRFolhaPagamentoFolhaSituacao->consultarCompetencia() , "right" ); $obFormulario->addTitulo ( "Configuração da Exportação Bancária" ); -$obFormulario->addTitulo ( "Caixa Econômica Federal" ); +$obFormulario->addTitulo ( "Caixa Econômica Federal" ); $obFormulario->addComponente ( $obTxtCodigoConvenio ); +$obFormulario->addComponente ( $obCmbConvenioLayout ); $obIMontaAgencia->geraFormulario ( $obFormulario ); $obFormulario->addComponente ( $obCmbContaCorrente ); diff --git a/gestaoRH/fontes/PHP/IMA/instancias/configuracao/OCConfiguracaoBradesco.php b/gestaoRH/fontes/PHP/IMA/instancias/configuracao/OCConfiguracaoBradesco.php index 3d803f4..a4a96f9 100644 --- a/gestaoRH/fontes/PHP/IMA/instancias/configuracao/OCConfiguracaoBradesco.php +++ b/gestaoRH/fontes/PHP/IMA/instancias/configuracao/OCConfiguracaoBradesco.php @@ -31,7 +31,7 @@ * Casos de uso: uc-04.08.24 - $Id: OCConfiguracaoBradesco.php 59612 2014-09-02 12:00:51Z gelson $ + $Id: OCConfiguracaoBradesco.php 64131 2015-12-04 21:03:54Z jean $ */ include_once '../../../../../../gestaoAdministrativa/fontes/PHP/pacotes/FrameworkHTML.inc.php'; @@ -45,14 +45,14 @@ $pgOcul = "OC".$stPrograma.".php"; $pgProc = "PR".$stPrograma.".php"; $pgJS = "JS".$stPrograma.".js"; -function preencherDados() +function preencherDados(Request $request) { include_once(CAM_GRH_IMA_MAPEAMENTO."TIMAConfiguracaoConvenioBradesco.class.php"); $obTIMAConfiguracaoConvenioBradesco = new TIMAConfiguracaoConvenioBradesco; $obTIMAConfiguracaoConvenioBradesco->recuperaRelacionamento($rsDados); if ($rsDados->getNumLinhas() > 0 ) { - $_GET['stNumAgenciaTxt'] = $rsDados->getCampo("num_agencia"); - $stJs .= preencheDadosConta(); + $request->set('stNumAgenciaTxt', $rsDados->getCampo("num_agencia")); + $stJs .= preencheDadosConta($request); $stJs .= "f.stCodEmpresa.value = '".$rsDados->getCampo("cod_empresa")."';\n"; $stJs .= "f.stNumAgencia.value = '".$rsDados->getCampo("num_agencia")."';\n"; $stJs .= "f.stNumAgenciaTxt.value = '".$rsDados->getCampo("num_agencia")."';\n"; @@ -62,21 +62,21 @@ function preencherDados() return $stJs; } -function preencherDadosAgencia() +function preencherDadosAgencia(Request $request) { include_once(CAM_GT_MON_INSTANCIAS."agenciaBancaria/OCMontaAgencia.php"); - $_GET['stNumBanco'] = Sessao::read("stNumBanco"); - $stJs = PreencheAgencia(); + $request->set('stNumBanco', Sessao::read("stNumBanco")); + $stJs = PreencheAgencia($request); return $stJs; } -function preencheDadosConta() +function preencheDadosConta(Request $request) { include_once ( CAM_GT_MON_MAPEAMENTO."TMONAgencia.class.php" ); $obTMONAgencia = new TMONAgencia; $stFiltro = " where num_banco = '".Sessao::read("stNumBanco")."'"; - $stFiltro .= " and num_agencia = '".$_GET["stNumAgenciaTxt"]."'"; + $stFiltro .= " and num_agencia = '".$request->get("stNumAgenciaTxt")."'"; $obTMONAgencia->recuperaRelacionamento($rsAgencia, $stFiltro); $rsConta = new RecordSet(); if ($rsAgencia->getCampo('cod_agencia')) { @@ -100,13 +100,13 @@ function preencheDadosConta() return $stJs; } -switch ($_GET['stCtrl']) { +switch ($request->get('stCtrl')) { case "preencherDadosAgencia": - $stJs .= preencherDadosAgencia(); - $stJs .= preencherDados(); + $stJs .= preencherDadosAgencia($request); + $stJs .= preencherDados($request); break; case "preencheDadosConta"; - $stJs .= preencheDadosConta(); + $stJs .= preencheDadosConta($request); break; } if ($stJs) { diff --git a/gestaoRH/fontes/PHP/IMA/instancias/configuracao/OCConfiguracaoPASEP.php b/gestaoRH/fontes/PHP/IMA/instancias/configuracao/OCConfiguracaoPASEP.php index ce6342e..c34e91f 100755 --- a/gestaoRH/fontes/PHP/IMA/instancias/configuracao/OCConfiguracaoPASEP.php +++ b/gestaoRH/fontes/PHP/IMA/instancias/configuracao/OCConfiguracaoPASEP.php @@ -31,7 +31,7 @@ * Casos de uso: uc-04.08.22 - $Id: OCConfiguracaoPASEP.php 59612 2014-09-02 12:00:51Z gelson $ + $Id: OCConfiguracaoPASEP.php 64131 2015-12-04 21:03:54Z jean $ */ include_once '../../../../../../gestaoAdministrativa/fontes/PHP/pacotes/FrameworkHTML.inc.php'; @@ -45,9 +45,9 @@ $pgOcul = "OC".$stPrograma.".php"; $pgProc = "PR".$stPrograma.".php"; $pgJS = "JS".$stPrograma.".js"; -function preencherInnerEvento() +function preencherInnerEvento(Request $request) { - $nuCodigoEvento = trim($_GET['nuCodigoEvento']); + $nuCodigoEvento = trim($request->get('nuCodigoEvento')); if ( !empty($nuCodigoEvento) ) { include_once( CAM_GRH_FOL_NEGOCIO."RFolhaPagamentoEvento.class.php" ); @@ -78,14 +78,14 @@ function preencherInnerEvento() return $stJs; } -function preencherDados() +function preencherDados(Request $request) { include_once(CAM_GRH_IMA_MAPEAMENTO."TIMAConfiguracaoPasep.class.php"); $obTIMAConfiguracaoPasep = new TIMAConfiguracaoPasep; $obTIMAConfiguracaoPasep->recuperaRelacionamento($rsDados); if ($rsDados->getNumLinhas() > 0 ) { - $_GET['stNumAgenciaTxt'] = $rsDados->getCampo("num_agencia"); - $stJs .= preencheDadosConta(); + $request->set('stNumAgenciaTxt', $rsDados->getCampo("num_agencia")); + $stJs .= preencheDadosConta($request); $stJs .= "f.stCodEmpresa.value = '".$rsDados->getCampo("num_convenio")."';\n"; $stJs .= "f.stNumAgencia.value = '".$rsDados->getCampo("num_agencia")."';\n"; $stJs .= "f.stNumAgenciaTxt.value = '".$rsDados->getCampo("num_agencia")."';\n"; @@ -98,21 +98,21 @@ function preencherDados() return $stJs; } -function preencherDadosAgencia() +function preencherDadosAgencia(Request $request) { include_once(CAM_GT_MON_INSTANCIAS."agenciaBancaria/OCMontaAgencia.php"); - $_GET['stNumBanco'] = Sessao::read("stNumBanco"); - $stJs = PreencheAgencia(); + $request->set('stNumBanco', Sessao::read("stNumBanco")); + $stJs = PreencheAgencia($request); return $stJs; } -function preencheDadosConta() +function preencheDadosConta(Request $request) { include_once ( CAM_GT_MON_MAPEAMENTO."TMONAgencia.class.php" ); $obTMONAgencia = new TMONAgencia; $stFiltro = " where num_banco = '".Sessao::read("stNumBanco")."'"; - $stFiltro .= " and num_agencia = '".$_GET["stNumAgenciaTxt"]."'"; + $stFiltro .= " and num_agencia = '".$request->get("stNumAgenciaTxt")."'"; $obTMONAgencia->recuperaRelacionamento($rsAgencia, $stFiltro); $rsConta = new RecordSet(); if ($rsAgencia->getCampo('cod_agencia')) { @@ -136,16 +136,16 @@ function preencheDadosConta() return $stJs; } -switch ($_GET['stCtrl']) { +switch ($request->get('stCtrl')) { case "preencherDadosAgencia": - $stJs .= preencherDadosAgencia(); - $stJs .= preencherDados(); + $stJs .= preencherDadosAgencia($request); + $stJs .= preencherDados($request); break; case "preencheDadosConta"; - $stJs .= preencheDadosConta(); + $stJs .= preencheDadosConta($request); break; case "preencherInnerEvento": - $stJs = preencherInnerEvento(); + $stJs = preencherInnerEvento($request); break; } if ($stJs) { diff --git a/gestaoRH/fontes/PHP/IMA/instancias/configuracao/OCExportacaoBancoCaixaEconomicaFederal.php b/gestaoRH/fontes/PHP/IMA/instancias/configuracao/OCExportacaoBancoCaixaEconomicaFederal.php index 9d0dab2..857b2c9 100644 --- a/gestaoRH/fontes/PHP/IMA/instancias/configuracao/OCExportacaoBancoCaixaEconomicaFederal.php +++ b/gestaoRH/fontes/PHP/IMA/instancias/configuracao/OCExportacaoBancoCaixaEconomicaFederal.php @@ -46,69 +46,74 @@ $pgOcul = "OC".$stPrograma.".php"; $pgProc = "PR".$stPrograma.".php"; $pgJS = "JS".$stPrograma.".js"; -function preencherDados() +function preencherDados(Request $request) { include_once(CAM_GRH_IMA_MAPEAMENTO."TIMAConfiguracaoConvenioCaixaEconomicaFederal.class.php"); $obTIMAConfiguracaoConvenioCaixaEconomicaFederal = new TIMAConfiguracaoConvenioCaixaEconomicaFederal; $obTIMAConfiguracaoConvenioCaixaEconomicaFederal->recuperaRelacionamento($rsDados); + if ($rsDados->getNumLinhas() > 0 ) { - $_GET['stNumAgenciaTxt'] = $rsDados->getCampo("num_agencia"); - $stJs .= preencheDadosConta(); - $stJs .= "f.stCodConvenio.value = '".$rsDados->getCampo("cod_convenio_banco")."';\n"; - $stJs .= "f.stNumAgencia.value = '".$rsDados->getCampo("num_agencia")."';\n"; - $stJs .= "f.stNumAgenciaTxt.value = '".$rsDados->getCampo("num_agencia")."';\n"; - $stJs .= "f.inTxtContaCorrente.value = '".$rsDados->getCampo("cod_conta_corrente")."';\n"; + $request->set('stNumAgenciaTxt', $rsDados->getCampo("num_agencia")); + + $stJs .= preencheDadosConta($request); + $stJs .= "jq('#stCodConvenio').val('".$rsDados->getCampo("cod_convenio_banco")."'); \n"; + $stJs .= "jq('#stNumAgencia').val('".$rsDados->getCampo("num_agencia")."'); \n"; + $stJs .= "jq('#stNumAgenciaTxt').val('".$rsDados->getCampo("num_agencia")."'); \n"; + $stJs .= "jq('#inTxtContaCorrente').val('".$rsDados->getCampo("cod_conta_corrente")."'); \n"; + $stJs .= "jq('#inTipoConvenioLayout').val('".$rsDados->getCampo("cod_tipo")."'); \n"; } return $stJs; } -function preencherDadosAgencia() +function preencherDadosAgencia(Request $request) { include_once(CAM_GT_MON_INSTANCIAS."agenciaBancaria/OCMontaAgencia.php"); - $_GET['stNumBanco'] = Sessao::read("stNumBanco"); - $stJs .= PreencheAgencia(); + $request->set('stNumBanco', Sessao::read("stNumBanco")); + $stJs .= PreencheAgencia($request); return $stJs; } -function preencheDadosConta() +function preencheDadosConta(Request $request) { - ; include_once ( CAM_GT_MON_MAPEAMENTO."TMONAgencia.class.php" ); $obTMONAgencia = new TMONAgencia; - $stFiltro = " where num_banco = '104'"; - $stFiltro .= " and num_agencia = '".$_GET["stNumAgenciaTxt"]."'"; + $stFiltro = " WHERE num_banco = '104'"; + $stFiltro .= " AND num_agencia = '".$request->get("stNumAgenciaTxt")."'"; $obTMONAgencia->recuperaRelacionamento($rsAgencia, $stFiltro); $rsConta = new RecordSet(); + if ($rsAgencia->getCampo('cod_agencia')) { include_once ( CAM_GT_MON_MAPEAMENTO."TMONContaCorrente.class.php" ); $obTMONContaCorrente = new TMONContaCorrente; - $stFiltro = " where num_banco = '104'"; - $stFiltro .= " and Ag.cod_agencia =".$rsAgencia->getCampo('cod_agencia'); + $stFiltro = " WHERE num_banco = '104'"; + $stFiltro .= " AND Ag.cod_agencia = ".$rsAgencia->getCampo('cod_agencia'); $obTMONContaCorrente->recuperaRelacionamento($rsConta, $stFiltro); } $inCount = 1; $stJs .= "limpaSelect(f.inTxtContaCorrente,0); \n"; - $stJs .= "f.inTxtContaCorrente.options[0] = new Option('Selecione','', 'selected');\n"; + $stJs .= "jq('#inTxtContaCorrente').append(new Option('Selecione','', 'selected'));\n"; + while (!$rsConta->eof()) { $inId = $rsConta->getCampo("cod_conta_corrente"); $stDesc = $rsConta->getCampo("num_conta_corrente"); - $stJs .= "f.inTxtContaCorrente.options[$inCount] = new Option('".$stDesc."','".$inId."','".$stSelected."'); \n"; + $stJs .= "jq('#inTxtContaCorrente').append(new Option('".$stDesc."','".$inId."','".$stSelected."'));\n"; $rsConta->proximo(); $inCount++; } return $stJs; } -switch ($_GET['stCtrl']) { + +switch ($request->get('stCtrl')) { case "preencherDadosAgencia": - $stJs .= preencherDadosAgencia(); - $stJs .= preencherDados(); + $stJs .= preencherDadosAgencia($request); + $stJs .= preencherDados($request); break; case "preencheDadosConta"; - $stJs .= preencheDadosConta(); + $stJs .= preencheDadosConta($request); break; } if ($stJs) { diff --git a/gestaoRH/fontes/PHP/IMA/instancias/configuracao/PRExportacaoBancoCaixaEconomicaFederal.php b/gestaoRH/fontes/PHP/IMA/instancias/configuracao/PRExportacaoBancoCaixaEconomicaFederal.php index c15c870..c33f1f8 100644 --- a/gestaoRH/fontes/PHP/IMA/instancias/configuracao/PRExportacaoBancoCaixaEconomicaFederal.php +++ b/gestaoRH/fontes/PHP/IMA/instancias/configuracao/PRExportacaoBancoCaixaEconomicaFederal.php @@ -42,45 +42,57 @@ include_once( CAM_GT_MON_MAPEAMENTO."TMONAgencia.class.php" ); //Define o nome dos arquivos PHP $stPrograma = "ExportacaoBancoCaixaEconomicaFederal"; -$pgFilt = "FL".$stPrograma.".php?".Sessao::getId()."&stAcao=$stAcao$stLink"; -$pgForm = "FM".$stPrograma.".php?".Sessao::getId()."&stAcao=$stAcao$stLink"; -$pgList = "LS".$stPrograma.".php?".Sessao::getId()."&stAcao=$stAcao$stLink"; -$pgOcul = "OC".$stPrograma.".php?".Sessao::getId()."&stAcao=$stAcao$stLink"; -$pgProc = "PR".$stPrograma.".php?".Sessao::getId()."&stAcao=$stAcao$stLink"; +$pgFilt = "FL".$stPrograma.".php"; +$pgForm = "FM".$stPrograma.".php"; +$pgList = "LS".$stPrograma.".php"; +$pgOcul = "OC".$stPrograma.".php"; +$pgProc = "PR".$stPrograma.".php"; $pgJS = "JS".$stPrograma.".js"; -$stAcao = $_POST["stAcao"] ? $_POST["stAcao"] : $_GET["stAcao"]; +$stAcao = $request->get("stAcao"); +$obErro = new Erro; +$obTransacao = new Transacao(); switch ($stAcao) { case "configurar": - Sessao::setTrataExcecao(true); + $obErro = $obTransacao->abreTransacao( $boFlagTransacao, $boTransacao ); - $obTIMAConfiguracaoConvenioCaixaEconomicaFederal = new TIMAConfiguracaoConvenioCaixaEconomicaFederal; - $obTIMAConfiguracaoConvenioCaixaEconomicaFederal->recuperaRelacionamento($rsDados); + if (!$obErro->ocorreu()) { + $obTIMAConfiguracaoConvenioCaixaEconomicaFederal = new TIMAConfiguracaoConvenioCaixaEconomicaFederal; + $obErro = $obTIMAConfiguracaoConvenioCaixaEconomicaFederal->recuperaRelacionamento($rsDados,"","",$boTransacao); - if ($_POST['stNumAgenciaTxt']) { - $obTMONAgencia = new TMONAgencia; - $stFiltro = " where num_agencia = '".$_POST['stNumAgenciaTxt']."'"; - $obTMONAgencia->recuperaTodos($rsAgencia, $stFiltro); - $cod_agencia = $rsAgencia->getCampo('cod_agencia'); - } + if (!$obErro->ocorreu()) { - $obTIMAConfiguracaoConvenioCaixaEconomicaFederal->setDado("cod_convenio_banco", $_POST['stCodConvenio']); - $obTIMAConfiguracaoConvenioCaixaEconomicaFederal->setDado("cod_banco", Sessao::read('BANCO')); - $obTIMAConfiguracaoConvenioCaixaEconomicaFederal->setDado("cod_agencia", $cod_agencia ); - $obTIMAConfiguracaoConvenioCaixaEconomicaFederal->setDado("cod_conta_corrente", $_POST['inTxtContaCorrente']); + if ($request->get('stNumAgenciaTxt')) { + $obTMONAgencia = new TMONAgencia; + $stFiltro = " WHERE num_agencia = '".$request->get('stNumAgenciaTxt')."'"; + $obTMONAgencia->recuperaTodos($rsAgencia, $stFiltro); + $cod_agencia = $rsAgencia->getCampo('cod_agencia'); + } - if ($rsDados->getNumLinhas() > 0) { - $obTIMAConfiguracaoConvenioCaixaEconomicaFederal->setDado("cod_convenio", $rsDados->getCampo('cod_convenio')); - $obTIMAConfiguracaoConvenioCaixaEconomicaFederal->alteracao(); - } else { - $obTIMAConfiguracaoConvenioCaixaEconomicaFederal->inclusao(); - } + $obTIMAConfiguracaoConvenioCaixaEconomicaFederal->setDado("cod_convenio_banco", $request->get('stCodConvenio')); + $obTIMAConfiguracaoConvenioCaixaEconomicaFederal->setDado("cod_banco", Sessao::read('BANCO')); + $obTIMAConfiguracaoConvenioCaixaEconomicaFederal->setDado("cod_agencia", $cod_agencia ); + $obTIMAConfiguracaoConvenioCaixaEconomicaFederal->setDado("cod_conta_corrente", $request->get('inTxtContaCorrente')); + $obTIMAConfiguracaoConvenioCaixaEconomicaFederal->setDado("cod_tipo", $request->get('inTipoConvenioLayout')); - Sessao::encerraExcecao(); - sistemaLegado::alertaAviso($pgForm,"Configuração da exportação bancária concluída com sucesso!","incluir","aviso", Sessao::getId(), "../"); + if ($rsDados->getNumLinhas() > 0) { + $obTIMAConfiguracaoConvenioCaixaEconomicaFederal->setDado("cod_convenio", $rsDados->getCampo('cod_convenio')); + $obErro = $obTIMAConfiguracaoConvenioCaixaEconomicaFederal->alteracao($boTransacao); + } else { + $obErro = $obTIMAConfiguracaoConvenioCaixaEconomicaFederal->inclusao($boTransacao); + } + + $obTransacao->fechaTransacao($boFlagTransacao, $boTransacao,$obErro,$obTIMAConfiguracaoConvenioCaixaEconomicaFederal); + if (!$obErro->ocorreu()) { + SistemaLegado::alertaAviso($pgForm.'?'.Sessao::getId()."&stAcao=".$stAcao,"Configuração da exportação bancária concluída com sucesso!","incluir","aviso", Sessao::getId(), "../"); + } else { + SistemaLegado::exibeAviso(urlencode($obErro->getDescricao()),"n_".$stAcao,"erro"); + } + } + } break; } -include_once '../../../../../../gestaoAdministrativa/fontes/PHP/framework/include/rodape.inc.php'; -?> + +?> \ No newline at end of file diff --git a/gestaoRH/fontes/PHP/IMA/instancias/consignacao/OCCreditoBanrisul.php b/gestaoRH/fontes/PHP/IMA/instancias/consignacao/OCCreditoBanrisul.php index a6e7e96..ad5a5a4 100644 --- a/gestaoRH/fontes/PHP/IMA/instancias/consignacao/OCCreditoBanrisul.php +++ b/gestaoRH/fontes/PHP/IMA/instancias/consignacao/OCCreditoBanrisul.php @@ -259,7 +259,6 @@ function limparForm() return $stJs; } -//SistemaLegado::mostraVar($_REQUEST); switch ($_GET['stCtrl']) { case "gerarSpan": $stJs .= gerarSpan(); diff --git a/gestaoRH/fontes/PHP/IMA/instancias/exportarPagamentos/FLExportarRemessaCaixaEconomicaFederal.php b/gestaoRH/fontes/PHP/IMA/instancias/exportarPagamentos/FLExportarRemessaCaixaEconomicaFederal.php index 375ad45..1295f95 100644 --- a/gestaoRH/fontes/PHP/IMA/instancias/exportarPagamentos/FLExportarRemessaCaixaEconomicaFederal.php +++ b/gestaoRH/fontes/PHP/IMA/instancias/exportarPagamentos/FLExportarRemessaCaixaEconomicaFederal.php @@ -32,7 +32,7 @@ * @ignore - $Id: FLExportarRemessaCaixaEconomicaFederal.php 59612 2014-09-02 12:00:51Z gelson $ + $Id: FLExportarRemessaCaixaEconomicaFederal.php 64088 2015-12-01 17:45:02Z evandro $ * Casos de uso: uc-04.08.11 */ @@ -55,16 +55,16 @@ $jsOnload = "montaParametrosGET('gerarSpan','stSituacao');"; $obRFolhaPagamentoPeriodoMovimentacao = new RFolhaPagamentoPeriodoMovimentacao; $obRFolhaPagamentoFolhaSituacao = new RFolhaPagamentoFolhaSituacao($obRFolhaPagamentoPeriodoMovimentacao); -$stAcao = $_POST["stAcao"] ? $_POST["stAcao"] : $_GET["stAcao"]; +$stAcao = $request->get('stAcao'); //DEFINICAO DOS COMPONENTES $obHdnAcao = new Hidden; -$obHdnAcao->setName ( "stAcao" ); -$obHdnAcao->setValue ( $stAcao ); +$obHdnAcao->setName ( "stAcao" ); +$obHdnAcao->setValue ( $stAcao ); $obHdnCtrl = new Hidden; -$obHdnCtrl->setName ( "stCtrl" ); -$obHdnCtrl->setValue ( $stCtrl ); +$obHdnCtrl->setName ( "stCtrl" ); +$obHdnCtrl->setValue( $stCtrl ); $obHdnTipoFiltroExtra = new hiddenEval(); $obHdnTipoFiltroExtra->setName("hdnTipoFiltroExtra"); @@ -72,8 +72,8 @@ $obHdnTipoFiltroExtra->setValue("eval(document.frm.hdnTipoFiltro.value);"); //DEFINICAO DO FORM $obForm = new Form; -$obForm->setAction ( $pgProc ); -$obForm->setTarget ( "oculto" ); +$obForm->setAction( $pgProc ); +$obForm->setTarget( "oculto" ); $obBtnOk = new Ok(); $obBtnOk->obEvento->setOnClick("montaParametrosGET('submeter','',true);"); @@ -82,20 +82,20 @@ $obBtnLimpar = new Limpar(); $obBtnLimpar->obEvento->setOnClick("executaFuncaoAjax('limparForm');"); $obComboCadastro = new Select; -$obComboCadastro->setRotulo ( "Cadastro" ); -$obComboCadastro->setTitle ( "Selecione o cadastro para filtro." ); -$obComboCadastro->setName ( "stSituacao" ); -$obComboCadastro->setValue ( "ativos" ); -$obComboCadastro->setStyle ( "width: 200px" ); -$obComboCadastro->addOption ( "", "Selecione" ); -$obComboCadastro->addOption ( "ativos", "Ativos" ); -$obComboCadastro->addOption ( "aposentados", "Aposentados" ); -$obComboCadastro->addOption ( "pensionistas", "Pensionistas" ); -$obComboCadastro->addOption ( "estagiarios", "Estagiários" ); -$obComboCadastro->addOption ( "resdincidos", "Rescindidos" ); -$obComboCadastro->addOption ( "pensao_judicial", "Pensão Judicial" ); -$obComboCadastro->addOption ( "todos", "Todos" ); -$obComboCadastro->setNull ( false ); +$obComboCadastro->setRotulo( "Cadastro" ); +$obComboCadastro->setTitle ( "Selecione o cadastro para filtro." ); +$obComboCadastro->setName ( "stSituacao" ); +$obComboCadastro->setValue ( "ativos" ); +$obComboCadastro->setStyle ( "width: 200px" ); +$obComboCadastro->addOption( "", "Selecione" ); +$obComboCadastro->addOption( "ativos", "Ativos" ); +$obComboCadastro->addOption( "aposentados", "Aposentados" ); +$obComboCadastro->addOption( "pensionistas", "Pensionistas" ); +$obComboCadastro->addOption( "estagiarios", "Estagiários" ); +$obComboCadastro->addOption( "resdincidos", "Rescindidos" ); +$obComboCadastro->addOption( "pensao_judicial", "Pensão Judicial"); +$obComboCadastro->addOption( "todos", "Todos" ); +$obComboCadastro->setNull ( false ); $obComboCadastro->obEvento->setOnChange("montaParametrosGET('gerarSpan','stSituacao');"); $obSpnCadastro = new Span(); @@ -106,16 +106,16 @@ $obSpnAtivosAposentadosPensionistas->setId("spnAtivosAposentadosPensionistas"); $obMonValorLiquidoInicial = new Moeda(); $obMonValorLiquidoInicial->setRotulo("Filtrar Valores Líquidos de:"); -$obMonValorLiquidoInicial->setName("nuValorLiquidoInicial"); -$obMonValorLiquidoInicial->setTitle("Informe a faixa de salários líquidos que deverão ser considerados no arquivo."); -$obMonValorLiquidoInicial->setValue("0,00"); +$obMonValorLiquidoInicial->setName ("nuValorLiquidoInicial"); +$obMonValorLiquidoInicial->setTitle ("Informe a faixa de salários líquidos que deverão ser considerados no arquivo."); +$obMonValorLiquidoInicial->setValue ("0,00"); $obMonValorLiquidoInicial->obEvento->setOnChange("montaParametrosGET('validarValores','nuValorLiquidoInicial,nuValorLiquidoFinal');"); $obLblAte = new Label(); $obLblAte->setValue("Até"); $obMonValorLiquidoFinal = new Moeda(); -$obMonValorLiquidoFinal->setName("nuValorLiquidoFinal"); +$obMonValorLiquidoFinal->setName ("nuValorLiquidoFinal"); $obMonValorLiquidoFinal->setValue("99.999.999,99"); $obMonValorLiquidoFinal->obEvento->setOnChange("montaParametrosGET('validarValores','nuValorLiquidoInicial,nuValorLiquidoFinal');"); @@ -123,9 +123,9 @@ $arFiltrarValores = array($obMonValorLiquidoInicial,$obLblAte,$obMonValorLiquido $obPercentual = new Numerico(); $obPercentual->setRotulo("Percentual à Pagar do Líquido:"); -$obPercentual->setName("nuPercentualPagar"); -$obPercentual->setTitle("Informe o percentual à pagar do salário líquido de cada servidor."); -$obPercentual->setSize(10); +$obPercentual->setName ("nuPercentualPagar"); +$obPercentual->setTitle ("Informe o percentual à pagar do salário líquido de cada servidor."); +$obPercentual->setSize (10); $obPercentual->setMaxLength(6); $obPercentual->setValue("100,00"); @@ -162,19 +162,19 @@ $obDtGeracaoArquivo->setValue(date('d/m/Y')); $obDtPagamento = new Data(); $obDtPagamento->setRotulo("Data do Pagamento"); -$obDtPagamento->setName("dtPagamento"); -$obDtPagamento->setTitle("Informar a data provável de pagamento (informar a data com previsão de no mínimo 3 dias úteis)."); -$obDtPagamento->setNull(false); -$obDtPagamento->setValue(date('d/m/Y')); +$obDtPagamento->setName ("dtPagamento"); +$obDtPagamento->setTitle ("Informar a data provável de pagamento (informar a data com previsão de no mínimo 3 dias úteis)."); +$obDtPagamento->setNull (false); +$obDtPagamento->setValue (date('d/m/Y')); $obDtPagamento->obEvento->setOnChange("montaParametrosGET('validarDataPagamento','dtPagamento,dtGeracaoArquivo')"); $obCmbTipoMovimento = new Select(); -$obCmbTipoMovimento->setName("inTipoMovimento"); +$obCmbTipoMovimento->setName ("inTipoMovimento"); $obCmbTipoMovimento->setRotulo("Tipo de Movimento"); -$obCmbTipoMovimento->setTitle("Selecionar o tipo de movimento do arquivo. Para inclusão de lançamento novo, informar no campo Sequencial do arquivo um número novo, para Alteração de Lançamento, utilizar mesmo número de Sequencial do arquivo gerado anteriormente."); -$obCmbTipoMovimento->setNull(false); -$obCmbTipoMovimento->setStyle( "width: 250px" ); -$obCmbTipoMovimento->setValue("0"); +$obCmbTipoMovimento->setTitle ("Selecionar o tipo de movimento do arquivo. Para inclusão de lançamento novo, informar no campo Sequencial do arquivo um número novo, para Alteração de Lançamento, utilizar mesmo número de Sequencial do arquivo gerado anteriormente."); +$obCmbTipoMovimento->setNull (false); +$obCmbTipoMovimento->setStyle ( "width: 250px" ); +$obCmbTipoMovimento->setValue ("0"); $obCmbTipoMovimento->addOption("","Selecione"); $obCmbTipoMovimento->addOption("0","0 - Débito/Crédito Normal"); $obCmbTipoMovimento->addOption("1","1 - Cancelamento"); @@ -187,31 +187,31 @@ $obTAdministracaoConfiguracao->pegaConfiguracao($stValor,"num_sequencial_arquivo $obIntNumeroSequencial = new Inteiro(); $obIntNumeroSequencial->setRotulo("Número Seqüencial Arquivo"); -$obIntNumeroSequencial->setTitle("Informar o número da remessa. Deve ser seqüencial e maior que zero. Deve repetir-se somente quando o tipo de movimento for Alteração de Lançamento. Para Inclusões de Lançamentos Novos, o número deverá ser crescente (sequencial anterior + 1)."); -$obIntNumeroSequencial->setName("inNumeroSequencial"); -$obIntNumeroSequencial->setValue($stValor); +$obIntNumeroSequencial->setTitle ("Informar o número da remessa. Deve ser seqüencial e maior que zero. Deve repetir-se somente quando o tipo de movimento for Alteração de Lançamento. Para Inclusões de Lançamentos Novos, o número deverá ser crescente (sequencial anterior + 1)."); +$obIntNumeroSequencial->setName ("inNumeroSequencial"); +$obIntNumeroSequencial->setValue ($stValor); //DEFINICAO DO FORMULARIO $obFormulario = new Formulario(); -$obFormulario->addForm ( $obForm ); -$obFormulario->addTitulo ( $obRFolhaPagamentoFolhaSituacao->consultarCompetencia() ,"right" ); -$obFormulario->addHidden ( $obHdnAcao ); -$obFormulario->addHidden ( $obHdnCtrl ); -$obFormulario->addHidden ( $obHdnTipoFiltroExtra,true ); -$obFormulario->addComponente($obComboCadastro); -$obFormulario->addSpan($obSpnCadastro); -$obFormulario->addSpan($obSpnAtivosAposentadosPensionistas); -$obFormulario->addTitulo( "Informações Gerais para emissão do arquivo" ,"left"); +$obFormulario->addForm ($obForm ); +$obFormulario->addTitulo ($obRFolhaPagamentoFolhaSituacao->consultarCompetencia() ,"right" ); +$obFormulario->addHidden ($obHdnAcao ); +$obFormulario->addHidden ($obHdnCtrl ); +$obFormulario->addHidden ($obHdnTipoFiltroExtra,true ); +$obFormulario->addComponente ($obComboCadastro); +$obFormulario->addSpan ($obSpnCadastro); +$obFormulario->addSpan ($obSpnAtivosAposentadosPensionistas); +$obFormulario->addTitulo ("Informações Gerais para emissão do arquivo" ,"left"); $obFormulario->agrupaComponentes($arFiltrarValores); $obFormulario->agrupaComponentes($arPercentual); -$obFormulario->addComponente($obLblCodigoConvenio); -$obFormulario->addComponente($obLblAgenciaConvenio); -$obFormulario->addComponente($obLblContaConvenio); -$obFormulario->addComponente($obDtGeracaoArquivo); -$obFormulario->addComponente($obDtPagamento); -$obFormulario->addComponente($obCmbTipoMovimento); -$obFormulario->addComponente($obIntNumeroSequencial); -$obFormulario->defineBarra ( array($obBtnOk,$obBtnLimpar) ); +$obFormulario->addComponente ($obLblCodigoConvenio); +$obFormulario->addComponente ($obLblAgenciaConvenio); +$obFormulario->addComponente ($obLblContaConvenio); +$obFormulario->addComponente ($obDtGeracaoArquivo); +$obFormulario->addComponente ($obDtPagamento); +$obFormulario->addComponente ($obCmbTipoMovimento); +$obFormulario->addComponente ($obIntNumeroSequencial); +$obFormulario->defineBarra (array($obBtnOk,$obBtnLimpar) ); $obFormulario->show(); include_once '../../../../../../gestaoAdministrativa/fontes/PHP/framework/include/rodape.inc.php'; diff --git a/gestaoRH/fontes/PHP/IMA/instancias/exportarPagamentos/OCExportarBradesco.php b/gestaoRH/fontes/PHP/IMA/instancias/exportarPagamentos/OCExportarBradesco.php index b860e01..44f676a 100644 --- a/gestaoRH/fontes/PHP/IMA/instancias/exportarPagamentos/OCExportarBradesco.php +++ b/gestaoRH/fontes/PHP/IMA/instancias/exportarPagamentos/OCExportarBradesco.php @@ -409,7 +409,6 @@ function validarDataPagamento() return $stJs; } -//SistemaLegado::mostraVar($_REQUEST); switch ($_GET['stCtrl']) { case "gerarSpan": $stJs .= gerarSpan(); diff --git a/gestaoRH/fontes/PHP/IMA/instancias/exportarPagamentos/OCExportarRemessaBanrisul.php b/gestaoRH/fontes/PHP/IMA/instancias/exportarPagamentos/OCExportarRemessaBanrisul.php index cb714ba..018062a 100644 --- a/gestaoRH/fontes/PHP/IMA/instancias/exportarPagamentos/OCExportarRemessaBanrisul.php +++ b/gestaoRH/fontes/PHP/IMA/instancias/exportarPagamentos/OCExportarRemessaBanrisul.php @@ -32,7 +32,7 @@ * @ignore - $Id: OCExportarRemessaBanrisul.php 59612 2014-09-02 12:00:51Z gelson $ + $Id: OCExportarRemessaBanrisul.php 63836 2015-10-22 14:06:51Z franver $ * Casos de uso: uc-04.08.17 */ @@ -506,16 +506,6 @@ function atualizarGrupoConta() return $stJs; } -/*function atualizarSessaoConta() { - include_once(CAM_GRH_IMA_MAPEAMENTO."TIMAConfiguracaoBanrisulConta.class.php"); - $obTIMAConfiguracaoBanrisulConta = new TIMAConfiguracaoBanrisulConta(); - sistemaLegado::mostravar($_REQUEST); - die('Fim'); - $obTIMAConfiguracaoBanrisulConta->recuperaRelacionamento($rsConfiguracaoBanrisulConta); - - return $stJs; -}*/ - function atualizaCompetencia($inAno, $inMes){ if($inAno!=''&&$inMes!=''){ $arDados['inAno'] = $inAno; diff --git a/gestaoRH/fontes/PHP/IMA/instancias/exportarPagamentos/OCExportarRemessaCaixaEconomicaFederal.php b/gestaoRH/fontes/PHP/IMA/instancias/exportarPagamentos/OCExportarRemessaCaixaEconomicaFederal.php index 531ccc1..827f062 100644 --- a/gestaoRH/fontes/PHP/IMA/instancias/exportarPagamentos/OCExportarRemessaCaixaEconomicaFederal.php +++ b/gestaoRH/fontes/PHP/IMA/instancias/exportarPagamentos/OCExportarRemessaCaixaEconomicaFederal.php @@ -32,7 +32,7 @@ * @ignore - $Id: OCExportarRemessaCaixaEconomicaFederal.php 59612 2014-09-02 12:00:51Z gelson $ + $Id: OCExportarRemessaCaixaEconomicaFederal.php 64088 2015-12-01 17:45:02Z evandro $ * Casos de uso: uc-04.08.11 */ @@ -59,7 +59,7 @@ $pgJS = "JS".$stPrograma.".js"; function limparSpans() { #Cadastro - $stJs .= "d.getElementById('spnCadastro').innerHTML = '';\n"; + $stJs .= "jq('#spnCadastro').html('');\n"; #Ativos / Aposentados / Pensionistas $stJs .= gerarSpanAtivosAposentadosPensionistas(false); @@ -69,10 +69,8 @@ function limparSpans() ###########################ATIVOS / APOSENTADOS##################################### -function gerarSpanAtivosAposentados() +function gerarSpanAtivosAposentados($stSituacao) { - $stSituacao = $_GET["stSituacao"]; - $stJs .= limparSpans(); include_once(CAM_GRH_PES_COMPONENTES."IFiltroComponentes.class.php"); @@ -112,7 +110,7 @@ function gerarSpanAtivosAposentados() $obIFiltroComponentes->geraFormulario($obFormulario); $obFormulario->montaInnerHTML(); $stHtml = $obFormulario->getHTML(); - $stJs .= "d.getElementById('spnCadastro').innerHTML = '$stHtml';\n"; + $stJs .= "jq('#spnCadastro').html('".$stHtml."'); \n"; $stJs .= gerarSpanAtivosAposentadosPensionistas(true); return $stJs; @@ -122,8 +120,6 @@ function gerarSpanAtivosAposentados() function gerarSpanPensionistas() { - $stSituacao = $_GET["stSituacao"]; - $stJs .= limparSpans(); include_once(CAM_GRH_PES_COMPONENTES."IFiltroComponentes.class.php"); @@ -140,7 +136,7 @@ function gerarSpanPensionistas() $obIFiltroComponentes->geraFormulario($obFormulario); $obFormulario->montaInnerHTML(); $stHtml = $obFormulario->getHTML(); - $stJs .= "d.getElementById('spnCadastro').innerHTML = '$stHtml';\n"; + $stJs .= "jq('#spnCadastro').html('".$stHtml."'); \n"; $stJs .= gerarSpanAtivosAposentadosPensionistas(true); return $stJs; @@ -150,8 +146,6 @@ function gerarSpanPensionistas() function gerarSpanEstagiarios() { - $stSituacao = $_GET["stSituacao"]; - $stJs .= limparSpans(); include_once(CAM_GRH_PES_COMPONENTES."IFiltroComponentes.class.php"); @@ -167,7 +161,7 @@ function gerarSpanEstagiarios() $obIFiltroComponentes->geraFormulario($obFormulario); $obFormulario->montaInnerHTML(); $stHtml = $obFormulario->getHTML(); - $stJs .= "d.getElementById('spnCadastro').innerHTML = '$stHtml';\n"; + $stJs .= "jq('#spnCadastro').html('".$stHtml."'); \n"; return $stJs; } @@ -191,111 +185,112 @@ function gerarSpanAtivosAposentadosPensionistas($boGerar = true) $obFormulario->montaInnerHTML(); $stHtml = $obFormulario->getHTML(); } - $stJs .= "d.getElementById('spnAtivosAposentadosPensionistas').innerHTML = '$stHtml';\n"; + $stJs .= "jq('#spnAtivosAposentadosPensionistas').html('".$stHtml."'); \n"; return $stJs; } ###########################UTILS########################## -function submeter() +function submeter(Request $request) { $obErro = new Erro(); - if ($_GET["stSituacao"] == "") { + if ($request->get('stSituacao') == "") { $obErro->setDescricao($obErro->getDescricao()."@Campo Cadastro inválido!()"); } - if ($_GET["inTipoMovimento"] == "") { + if ($request->get('inTipoMovimento') == "") { $obErro->setDescricao($obErro->getDescricao()."@Campo Tipo de movimento inválido!()"); } - if ($_GET['stSituacao'] == 'ativos' or - $_GET['stSituacao'] == 'aposentados' or - $_GET["stSituacao"] == 'pensionistas' or - $_GET["stSituacao"] == 'todos' or - $_GET["stSituacao"] == 'pensao_judicial' or - $_GET['stSituacao'] == 'rescindidos') { - if ( empty($_GET["inCodMes"]) ) { - $obErro->setDescricao($obErro->getDescricao()."@Campo Mês da Competência inválido!()"); - } else { - if ( empty($_GET["inAno"]) ) { - $obErro->setDescricao($obErro->getDescricao()."@Campo Ano da Competência inválido!()"); + if ($request->get('stSituacao') == 'ativos' or + $request->get('stSituacao') == 'aposentados' or + $request->get('stSituacao') == 'pensionistas' or + $request->get('stSituacao') == 'todos' or + $request->get('stSituacao') == 'pensao_judicial' or + $request->get('stSituacao') == 'rescindidos') { + + if ( $request->get('inCodMes') == '' ) { + $obErro->setDescricao($obErro->getDescricao()."@Campo Mês da Competência inválido!()"); + } else { + if ( $request->get('inAno') == '' ) { + $obErro->setDescricao($obErro->getDescricao()."@Campo Ano da Competência inválido!()"); + } } - } - //Tipo Folha - if ($_GET["inCodConfiguracao"] == '') { - $obErro->setDescricao($obErro->getDescricao()."@Campo Tipo de Cálculo inválido!()"); - } else { - if ($_GET["inCodConfiguracao"] == 0) { - if ( empty($_GET["inCodComplementar"]) ) { - $obErro->setDescricao($obErro->getDescricao()."@Campo Folha Complementar inválido!()"); - } - } elseif ($_GET["inCodConfiguracao"] == 3) { - if ( empty($_GET["stDesdobramento"]) ) { - $obErro->setDescricao($obErro->getDescricao()."@Campo Desdobramento inválido!()"); + //Tipo Folha + if ($request->get('inCodConfiguracao') == '') { + $obErro->setDescricao($obErro->getDescricao()."@Campo Tipo de Cálculo inválido!()"); + } else { + if ($request->get('inCodConfiguracao') == 0) { + if ( $request->get('inCodComplementar') == '' ) { + $obErro->setDescricao($obErro->getDescricao()."@Campo Folha Complementar inválido!()"); + } + } elseif ($request->get('inCodConfiguracao') == 3) { + if ( $request->get('stDesdobramento') == '' ) { + $obErro->setDescricao($obErro->getDescricao()."@Campo Desdobramento inválido!()"); + } + } } - } - } } - if ($_GET["stSituacao"] == "pensao_judicial" or $_GET["stSituacao"] == "todos") { - if (trim($_GET["stTipoFiltro"])=="") { + if ( ($request->get('stSituacao') == 'pensao_judicial') || ($request->get('stSituacao') == 'todos') ) { + if ( trim($request->get('stTipoFiltro')) == '' ) { $obErro->setDescricao($obErro->getDescricao()."@Campo Tipo de Filtro inválido!()"); } - if ( trim($_GET["inCodConfiguracao"]) == "" ) { + if ( trim($request->get('inCodConfiguracao')) == '' ) { $obErro->setDescricao($obErro->getDescricao()."@Campo Tipo de Cálculo inválido!()"); } } - if ($_GET["stSituacao"] == 'ativos' or - $_GET["stSituacao"] == 'aposentados' or - $_GET["stSituacao"] == 'pensionistas' or - $_GET["stSituacao"] == 'rescindidos') { - switch ($_GET["stTipoFiltro"]) { - case "": + if ($request->get('stSituacao') == 'ativos' or + $request->get('stSituacao') == 'aposentados' or + $request->get('stSituacao') == 'pensionistas' or + $request->get('stSituacao') == 'rescindidos') { + switch ($request->get('stTipoFiltro')) { + case '': $obErro->setDescricao($obErro->getDescricao()."@Campo Tipo de Filtro do Ativos/Aposentados inválido!()"); break; - case "contrato": - case "contrato_rescisao": - case "cgm_contrato": - case "cgm_contrato_rescisao": + case 'contrato': + case 'contrato_rescisao': + case 'cgm_contrato': + case 'cgm_contrato_rescisao': if ( count(Sessao::read("arContratos")) == 0 ) { $obErro->setDescricao($obErro->getDescricao()."@A lista de contratos deve possuir pelo menos um contrato!()"); } break; - case "contrato_pensionista": - case "cgm_contrato_pensionista": + case 'contrato_pensionista': + case 'cgm_contrato_pensionista': if ( count(Sessao::read("arPensionistas")) == 0 ) { $obErro->setDescricao($obErro->getDescricao()."@A lista de contratos deve possuir pelo menos um contrato!()"); } break; - case "atributo_servidor": - if ($_GET["inCodAtributo"] == "") { + case 'atributo_servidor': + if ($request->get('inCodAtributo') == '') { $obErro->setDescricao($obErro->getDescricao()."@Campo Atributo Dinâmico do Ativos/Aposentados inválido!()"); } break; - case "atributo_pensionista": - if ($_GET["inCodAtributo"] == "") { + case 'atributo_pensionista': + if ($request->get('inCodAtributo') == '') { $obErro->setDescricao($obErro->getDescricao()."@Campo Atributo Dinâmico do Pensionista inválido!()"); } break; } } - if ($_GET["stSituacao"] == 'estagiarios') { - switch ($_GET["stTipoFiltro"]) { - case "": + if ($request->get('stSituacao') == 'estagiarios') { + switch ($request->get('stTipoFiltro')) { + case '': $obErro->setDescricao($obErro->getDescricao()."@Campo Tipo de Filtro do Estagiário inválido!()"); break; - case "cgm_codigo_estagio": + case 'cgm_codigo_estagio': if ( count(Sessao::read("arEstagios")) == 0 ) { $obErro->setDescricao($obErro->getDescricao()."@A lista de estagiários deve possuir pelo menos um estágio!()"); } break; - case "atributo_estagiario": - if ($_GET["inCodAtributo"] == "") { + case 'atributo_estagiario': + if ($request->get('inCodAtributo') == '') { $obErro->setDescricao($obErro->getDescricao()."@Campo Atributo Dinâmico do Estagiário inválido!()"); } break; @@ -325,25 +320,25 @@ function limparForm() return $stJs; } -function validarValores() +function validarValores(Request $request) { - if ( !($_GET['nuValorLiquidoInicial'] === 0 and $_GET['nuValorLiquidoFinal'] === 0) ) { - if ($_GET['nuValorLiquidoFinal'] === 0) { - $_GET['nuValorLiquidoFinal'] = ""; - $stJs .= "f.nuValorLiquidoFinal.value = '';\n"; - if ($_GET['nuValorLiquidoInicial'] >= 0) { + if ( !( ($request->get('nuValorLiquidoInicial') === 0) && ($request->get('nuValorLiquidoFinal') === 0) ) ) { + if ($request->get('nuValorLiquidoFinal') === 0) { + $request->set('nuValorLiquidoFinal',''); + $stJs .= "jq('#nuValorLiquidoFinal').val(''); \n"; + if ($request->get('nuValorLiquidoInicial') >= 0) { $stJs .= "alertaAviso('@O valor líquido final deve ser maior que o valor líquido inicial!()','form','aviso','".Sessao::getId()."');"; } } - if ($_GET['nuValorLiquidoInicial'] != "" and $_GET['nuValorLiquidoFinal'] != "") { - $nuValorLiquidoInicial = str_replace('.','',$_GET['nuValorLiquidoInicial']); + if ( ($request->get('nuValorLiquidoInicial') != '') && ($request->get('nuValorLiquidoFinal') != '') ) { + $nuValorLiquidoInicial = str_replace('.','',$request->get('nuValorLiquidoInicial')); $nuValorLiquidoInicial = str_replace(',','.',$nuValorLiquidoInicial); - $nuValorLiquidoFinal = str_replace('.','',$_GET['nuValorLiquidoFinal']); + $nuValorLiquidoFinal = str_replace('.','',$request->get('nuValorLiquidoFinal')); $nuValorLiquidoFinal = str_replace(',','.',$nuValorLiquidoFinal); if ($nuValorLiquidoInicial > $nuValorLiquidoFinal) { - $stJs .= "f.nuValorLiquidoInicial.value = '';\n"; - $stJs .= "f.nuValorLiquidoFinal.value = '';\n"; + $stJs .= "jq('#nuValorLiquidoInicial').val(''); \n"; + $stJs .= "jq('#nuValorLiquidoFinal.val(''); \n"; $stJs .= "alertaAviso('@O valor líquido inicial deve ser menos que o valor líquido final!()','form','aviso','".Sessao::getId()."');"; } } @@ -352,11 +347,11 @@ function validarValores() return $stJs; } -function validarDataPagamento() +function validarDataPagamento($stDtPagamento,$stDtGeracaoArquivo) { $obErro = new Erro(); - $arDtPagamento = explode("/",$_GET["dtPagamento"]); - $arDtGeracaoArquivo = explode("/",$_GET["dtGeracaoArquivo"]); + $arDtPagamento = explode("/",$stDtPagamento); + $arDtGeracaoArquivo = explode("/",$stDtGeracaoArquivo); $dtPagamento = $arDtPagamento[2]."-".$arDtPagamento[1]."-".$arDtPagamento[0]; $dtGeracaoArquivo = $arDtGeracaoArquivo[2]."-".$arDtGeracaoArquivo[1]."-".$arDtGeracaoArquivo[0]; if ($dtPagamento<$dtGeracaoArquivo) { @@ -364,15 +359,14 @@ function validarDataPagamento() } if ($obErro->ocorreu()) { $stJs = "alertaAviso('@".$obErro->getDescricao()."!()','form','aviso','".Sessao::getId()."');"; - $stJs .= "f.dtPagamento.value = '';\n"; + $stJs .= "jq('#dtPagamento').val(''); \n"; } return $stJs; } function gerarSpanPensaoJudicial() -{ - $stSituacao = $_GET["stSituacao"]; +{ $stJs .= limparSpans(); include_once(CAM_GRH_PES_COMPONENTES."IFiltroComponentesDependentes.class.php"); @@ -387,7 +381,7 @@ function gerarSpanPensaoJudicial() $obIFiltroComponentesDependentes->geraFormulario($obFormulario); $obFormulario->montaInnerHTML(); $stHtml = $obFormulario->getHTML(); - $stJs .= "d.getElementById('spnCadastro').innerHTML = '$stHtml';\n"; + $stJs .= "jq('#spnCadastro').html('".$stHtml."'); \n"; $stJs .= gerarSpanComplementar(true); return $stJs; @@ -410,27 +404,27 @@ function gerarSpanComplementar($boGerar = true) $obFormulario->montaInnerHTML(); $stHtml = $obFormulario->getHTML(); } - $stJs .= "d.getElementById('spnAtivosAposentadosPensionistas').innerHTML = '$stHtml';\n"; + $stJs .= "jq('#spnAtivosAposentadosPensionistas').html('".$stHtml."'); \n"; return $stJs; } -function gerarSpan() +function gerarSpan(Request $request) { - switch ($_REQUEST['stSituacao']) { - case "ativos": - case "aposentados": - case "rescindidos": - case "todos": - $stJs .= gerarSpanAtivosAposentados(); + switch ($request->get('stSituacao')) { + case 'ativos': + case 'aposentados': + case 'rescindidos': + case 'todos': + $stJs .= gerarSpanAtivosAposentados($request->get('stSituacao')); break; - case "pensionistas": + case 'pensionistas': $stJs .= gerarSpanPensionistas(); break; - case "estagiarios": + case 'estagiarios': $stJs .= gerarSpanEstagiarios(); break; - case "pensao_judicial": + case 'pensao_judicial': $stJs .= gerarSpanPensaoJudicial(); break; } @@ -438,27 +432,27 @@ function gerarSpan() return $stJs; } -switch ($_GET['stCtrl']) { - case "gerarSpan": - $stJs .= gerarSpan(); +switch ( $request->get('stCtrl') ) { + case 'gerarSpan': + $stJs .= gerarSpan($request); break; - case "gerarSpanAtivosAposentadosPensionistas": - $stJs .= gerarSpanAtivosAposentadosPensionistas(); + case 'gerarSpanAtivosAposentadosPensionistas': + $stJs .= gerarSpanAtivosAposentadosPensionistas($boGerar); break; - case "limparSpans": + case 'limparSpans': $stJs .= limparSpans(); break; - case "limparForm": + case 'limparForm': $stJs .= limparForm(); break; - case "submeter": - $stJs .= submeter(); + case 'submeter': + $stJs .= submeter($request); break; - case "validarValores": - $stJs .= validarValores(); + case 'validarValores': + $stJs .= validarValores($request); break; - case "validarDataPagamento": - $stJs .= validarDataPagamento(); + case 'validarDataPagamento': + $stJs .= validarDataPagamento($request->get('dtPagamento'),$request->get('dtGeracaoArquivo')); break; } diff --git a/gestaoRH/fontes/PHP/IMA/instancias/exportarPagamentos/PRExportarRemessaBanrisul.php b/gestaoRH/fontes/PHP/IMA/instancias/exportarPagamentos/PRExportarRemessaBanrisul.php index 1db5d33..bb1a57a 100644 --- a/gestaoRH/fontes/PHP/IMA/instancias/exportarPagamentos/PRExportarRemessaBanrisul.php +++ b/gestaoRH/fontes/PHP/IMA/instancias/exportarPagamentos/PRExportarRemessaBanrisul.php @@ -32,7 +32,7 @@ * @ignore - $Id: PRExportarRemessaBanrisul.php 59612 2014-09-02 12:00:51Z gelson $ + $Id: PRExportarRemessaBanrisul.php 63836 2015-10-22 14:06:51Z franver $ * Casos de uso: uc-04.08.17 */ @@ -105,7 +105,6 @@ while (!$rsContasConvenio->eof()) { $stCodOrgaos .= $rsOrgaos->getCampo("cod_orgao").","; $rsOrgaos->proximo(); } - //sistemaLegado::mostraVar(); $stCodOrgaos = substr($stCodOrgaos,0,strlen($stCodOrgaos)-1); $obTIMAConfiguracaoBanrisulLocal->setDado("cod_convenio" , $rsContasConvenio->getCampo("cod_convenio")); diff --git a/gestaoRH/fontes/PHP/IMA/instancias/exportarPagamentos/PRExportarRemessaCaixaEconomicaFederal.php b/gestaoRH/fontes/PHP/IMA/instancias/exportarPagamentos/PRExportarRemessaCaixaEconomicaFederal.php index 5738f52..9950c0b 100644 --- a/gestaoRH/fontes/PHP/IMA/instancias/exportarPagamentos/PRExportarRemessaCaixaEconomicaFederal.php +++ b/gestaoRH/fontes/PHP/IMA/instancias/exportarPagamentos/PRExportarRemessaCaixaEconomicaFederal.php @@ -31,18 +31,18 @@ * Casos de uso: uc-04.08.11 - $Id: PRExportarRemessaCaixaEconomicaFederal.php 59612 2014-09-02 12:00:51Z gelson $ + $Id: PRExportarRemessaCaixaEconomicaFederal.php 64152 2015-12-09 17:32:21Z evandro $ */ include_once '../../../../../../gestaoAdministrativa/fontes/PHP/pacotes/FrameworkHTML.inc.php'; include_once '../../../../../../gestaoAdministrativa/fontes/PHP/framework/include/cabecalho.inc.php'; include_once ( CLA_EXPORTADOR ); -$stAcao = $_REQUEST["stAcao"] ? $_REQUEST["stAcao"] : $_GET["stAcao"]; +$stAcao = $request->get('stAcao'); $arSessaoLink = Sessao::read('link'); $stLink = "&pg=".$arSessaoLink["pg"]."&pos=".$arSessaoLink["pos"]; -foreach ($_POST as $key=>$value) { +foreach ($request->getAll() as $key=>$value) { $stLink .= $key."=".$value."&"; } @@ -58,7 +58,64 @@ $pgJS = "JS".$stPrograma.".js"; switch ($stAcao) { case "exportar": Sessao::setTrataExcecao(true); + + //Busca codigo do tipo de arquivo que deve ser exportado de acordo com a configuracao + //Gestão Recursos Humanos :: Informações Mensais e Anuais :: Configuração :: Exportação Banco Caixa + $inCodTIpoArquivo = SistemaLegado::pegaDado('cod_tipo','ima.configuracao_convenio_caixa_economica_federal',''); + $obExportador = new Exportador(); + if ( $inCodTIpoArquivo == 1) { + //SIACC 150 + $obExportador = montaArquivoSIACC150($request); + }else{ + //SICOV 150 - PADRAO 150 FEBRABAN + //cod_tipo = 2 + $obExportador = montaArquivoSICOV150($request); + } + $obExportador->setRetorno($pgForm); + ########################UPDATE CONFIGURACAO######################################################## + include_once(CAM_GA_ADM_MAPEAMENTO."TAdministracaoConfiguracao.class.php"); + $obTAdministracaoConfiguracao = new TAdministracaoConfiguracao(); + $obTAdministracaoConfiguracao->setDado("exercicio",Sessao::getExercicio()); + $obTAdministracaoConfiguracao->setDado("cod_modulo",40); + $obTAdministracaoConfiguracao->setDado("parametro","dt_num_sequencial_arquivo_caixa".Sessao::getEntidade()); + $obTAdministracaoConfiguracao->recuperaPorChave($rsConfiguracao); + + $arCompetencia = explode("-",$rsConfiguracao->getCampo('valor')); + $dtCompetencia = $arCompetencia[0]."-".$arCompetencia[1]; + + if ( $dtCompetencia == date("Y-m") ) { + $obTAdministracaoConfiguracao->setDado("parametro","num_sequencial_arquivo_caixa".Sessao::getEntidade()); + $obTAdministracaoConfiguracao->recuperaPorChave($rsConfiguracao); + $inSequencial = $rsConfiguracao->getCampo("valor") + 1; + } else { + $inSequencial = 1; + $dtSequencial = date("Y-m-d"); + $obTAdministracaoConfiguracao->setDado("parametro","dt_num_sequencial_arquivo_caixa".Sessao::getEntidade()); + $obTAdministracaoConfiguracao->setDado("valor",$dtSequencial); + $obTAdministracaoConfiguracao->alteracao(); + } + $obTAdministracaoConfiguracao->setDado("parametro","num_sequencial_arquivo_caixa".Sessao::getEntidade()); + $obTAdministracaoConfiguracao->setDado("valor",$inSequencial); + $obTAdministracaoConfiguracao->alteracao(); + + $obExportador->show(); + Sessao::encerraExcecao(); + break; +} + +function separarDigito($stString) +{ + $inNumero = preg_replace( "/[^0-9a-zA-Z]/i","",$stString); + $inDigito = $inNumero[strlen($inNumero)-1]; + if(strlen($inNumero) > 4) + $inNumero = substr($inNumero,0,strlen($inNumero)-1); + + return array($inNumero,$inDigito); +} + +function montaArquivoSIACC150(Request $request) +{ ################################## BANCO CONVENIO ################################# include_once(CAM_GRH_IMA_MAPEAMENTO."TIMAConfiguracaoConvenioCaixaEconomicaFederal.class.php"); @@ -70,7 +127,7 @@ switch ($stAcao) { $arAgenciaConvenio = separarDigito($rsConfiguracaoConvenio->getCampo("num_agencia")); $inDigitoVerificadorAgencia = $arAgenciaConvenio[1]; $inAgenciaConvenio = $arAgenciaConvenio[0]; - $arContaConvenio = separarDigito($rsConfiguracaoConvenio->getCampo("num_conta_corrente")); + $arContaConvenio = separarDigito($rsConfiguracaoConvenio->getCampo("num_conta_corrente")); $inDigitoVerificadorContaConvenio = $arContaConvenio[1]; $inCodigoOperacaoContaConvenio = substr($arContaConvenio[0],0,3); $inNumeroContaConvenio = substr($arContaConvenio[0],3); @@ -80,7 +137,7 @@ switch ($stAcao) { include_once(CAM_GT_MON_MAPEAMENTO."TMONBanco.class.php"); $obTMONBanco = new TMONBanco(); $obTMONBanco->setDado("cod_banco", $inCodBanco); - $obTMONBanco->recuperaPorChave(&$rsBanco); + $obTMONBanco->recuperaPorChave($rsBanco); $stNomBanco = $rsBanco->getCampo('nom_banco'); @@ -89,65 +146,65 @@ switch ($stAcao) { ///////// COMPETENCIA SELECIONADA include_once(CAM_GRH_FOL_MAPEAMENTO."TFolhaPagamentoPeriodoMovimentacao.class.php"); $obTFolhaPagamentoPeriodoMovimentacao = new TFolhaPagamentoPeriodoMovimentacao(); - $stCompetencia = ( $_POST["inCodMes"] < 10 ) ? "0".$_POST["inCodMes"] : $_POST["inCodMes"]; - $stCompetencia .= $_POST["inAno"]; + $stCompetencia = ( $request->get('inCodMes') < 10 ) ? "0".$request->get('inCodMes') : $request->get('inCodMes'); + $stCompetencia .= $request->get('inAno'); $stFiltroCompetencia = " WHERE to_char(dt_final,'mmyyyy') = '".$stCompetencia."'"; $obTFolhaPagamentoPeriodoMovimentacao->recuperaTodos($rsPeriodoMovimentacao,$stFiltroCompetencia); - $arInicialCompetenciaSelecionada = explode("/",$rsPeriodoMovimentacao->getCampo("dt_inicial")); - $arFinalCompetenciaSelecionada = explode("/",$rsPeriodoMovimentacao->getCampo("dt_final")); + $arInicialCompetenciaSelecionada = explode('/',$rsPeriodoMovimentacao->getCampo('dt_inicial')); + $arFinalCompetenciaSelecionada = explode('/',$rsPeriodoMovimentacao->getCampo('dt_final')); - $dtInicialCompetenciaSelecionada = $arInicialCompetenciaSelecionada[2]."-".$arInicialCompetenciaSelecionada[1]."-".$arInicialCompetenciaSelecionada[0]; - $dtFinalCompetenciaSelecionada = $arFinalCompetenciaSelecionada[2]."-".$arFinalCompetenciaSelecionada[1]."-".$arFinalCompetenciaSelecionada[0]; + $dtInicialCompetenciaSelecionada = $arInicialCompetenciaSelecionada[2].'-'.$arInicialCompetenciaSelecionada[1].'-'.$arInicialCompetenciaSelecionada[0]; + $dtFinalCompetenciaSelecionada = $arFinalCompetenciaSelecionada[2].'-'.$arFinalCompetenciaSelecionada[1].'-'.$arFinalCompetenciaSelecionada[0]; ///////// COMPETENCIA ANTERIOR SELECIONADA $inCodMovimentacaoAnteriorSelecionada = $rsPeriodoMovimentacao->getCampo('cod_periodo_movimentacao') - 1; $obTFolhaPagamentoPeriodoMovimentacao->recuperaPeriodoMovimentacao($rsPenultimaMovimentacao, " AND FPM.cod_periodo_movimentacao = ".$inCodMovimentacaoAnteriorSelecionada); - if ($rsPenultimaMovimentacao->getCampo('dt_inicial') != "") { - $arInicialCompetenciaAnteriorSelecionada = explode("/",$rsPenultimaMovimentacao->getCampo('dt_inicial')); - $arFinalCompetenciaAnteriorSelecionada = explode("/",$rsPenultimaMovimentacao->getCampo('dt_final')); + if ($rsPenultimaMovimentacao->getCampo('dt_inicial') != '') { + $arInicialCompetenciaAnteriorSelecionada = explode('/',$rsPenultimaMovimentacao->getCampo('dt_inicial')); + $arFinalCompetenciaAnteriorSelecionada = explode('/',$rsPenultimaMovimentacao->getCampo('dt_final')); } else { $arInicialCompetenciaAnteriorSelecionada = $arInicialCompetenciaSelecionada; $arFinalCompetenciaAnteriorSelecionada = $arFinalCompetenciaSelecionada; } - $dtInicialCompetenciaAnteriorSelecionada = $arInicialCompetenciaAnteriorSelecionada[2]."-".$arInicialCompetenciaAnteriorSelecionada[1]."-".$arInicialCompetenciaAnteriorSelecionada[0]; - $dtFinalCompetenciaAnteriorSelecionada = $arFinalCompetenciaAnteriorSelecionada[2]."-".$arFinalCompetenciaAnteriorSelecionada[1]."-".$arFinalCompetenciaAnteriorSelecionada[0]; + $dtInicialCompetenciaAnteriorSelecionada = $arInicialCompetenciaAnteriorSelecionada[2].'-'.$arInicialCompetenciaAnteriorSelecionada[1]."-".$arInicialCompetenciaAnteriorSelecionada[0]; + $dtFinalCompetenciaAnteriorSelecionada = $arFinalCompetenciaAnteriorSelecionada[2].'-'.$arFinalCompetenciaAnteriorSelecionada[1]."-".$arFinalCompetenciaAnteriorSelecionada[0]; ///////// COMPETENCIA ATUAL $obTFolhaPagamentoPeriodoMovimentacao->recuperaUltimaMovimentacao($rsUltimaMovimentacao); - $arInicialCompetenciaAtual = explode("/",$rsUltimaMovimentacao->getCampo('dt_inicial')); - $arFinalCompetenciaAtual = explode("/",$rsUltimaMovimentacao->getCampo('dt_final')); - - $dtInicialCompetenciaAtual = $arInicialCompetenciaAtual[2]."-".$arInicialCompetenciaAtual[1]."-".$arInicialCompetenciaAtual[0]; - $dtFinalCompetenciaAtual = $arFinalCompetenciaAtual[2]."-".$arFinalCompetenciaAtual[1]."-".$arFinalCompetenciaAtual[0]; + $arInicialCompetenciaAtual = explode('/',$rsUltimaMovimentacao->getCampo('dt_inicial')); + $arFinalCompetenciaAtual = explode('/',$rsUltimaMovimentacao->getCampo('dt_final')); + $dtInicialCompetenciaAtual = $arInicialCompetenciaAtual[2].'-'.$arInicialCompetenciaAtual[1].'-'.$arInicialCompetenciaAtual[0]; + $dtFinalCompetenciaAtual = $arFinalCompetenciaAtual[2].'-'.$arFinalCompetenciaAtual[1].'-'.$arFinalCompetenciaAtual[0]; + ################################## EXPORTADOR ################################### $obExportador = new Exportador(); - $obExportador->setRetorno($pgForm); - if($_POST['stSituacao'] == "aposentados" || $_POST['stSituacao'] == "pensionistas") + if( ($request->get('stSituacao') == 'aposentados') || ($request->get('stSituacao') == 'pensionistas') ){ $obExportador->addArquivo("ACC".$arFinalCompetenciaSelecionada[1]."01.txt"); - else + }else{ $obExportador->addArquivo("ACC".$arFinalCompetenciaAtual[1]."01.txt"); + } - $obExportador->roUltimoArquivo->setTipoDocumento("RemessaCaixaEconomicaFederal"); + $obExportador->roUltimoArquivo->setTipoDocumento('RemessaCaixaEconomicaFederal'); ############################################################################# - if ($_POST['nuValorLiquidoInicial'] != "" && $_POST['nuValorLiquidoFinal'] != "") { - $nuValorLiquidoFinal = str_replace(".","",$_POST["nuValorLiquidoFinal"]); + if ( ($request->get('nuValorLiquidoInicial') != '') && ($request->get('nuValorLiquidoFinal') != '') ) { + $nuValorLiquidoFinal = str_replace(".","",$request->get('nuValorLiquidoFinal')); $nuValorLiquidoFinal = str_replace(",",".",$nuValorLiquidoFinal); - $nuValorLiquidoInicial = str_replace(".","",$_POST["nuValorLiquidoInicial"]); + $nuValorLiquidoInicial = str_replace(".","",$request->get('nuValorLiquidoInicial')); $nuValorLiquidoInicial = str_replace(",",".",$nuValorLiquidoInicial); } - if ($_POST["nuPercentualPagar"] != "") { - $nuPercentualPagar = str_replace(".", "", $_POST["nuPercentualPagar"]); + if ($request->get('nuPercentualPagar') != "") { + $nuPercentualPagar = str_replace(".", "", $request->get('nuPercentualPagar')); $nuPercentualPagar = str_replace(",", ".", $nuPercentualPagar); } else { $nuPercentualPagar = 0; @@ -156,65 +213,65 @@ switch ($stAcao) { ################################## ATIVOS/APOSENTADOS/PENSIONISTA ################################### $stFiltroContrato = ""; - if ($_POST['stSituacao'] == 'ativos' || - $_POST['stSituacao'] == 'aposentados' || - $_POST['stSituacao'] == 'rescindidos' || - $_POST['stSituacao'] == 'pensionistas' || - $_POST['stSituacao'] == 'todos') { + if ($request->get('stSituacao') == 'ativos' || + $request->get('stSituacao') == 'aposentados' || + $request->get('stSituacao') == 'rescindidos' || + $request->get('stSituacao') == 'pensionistas' || + $request->get('stSituacao') == 'todos') { $stValoresFiltro = ""; - switch ($_POST['stTipoFiltro']) { - case "contrato": - case "contrato_rescisao": - case "contrato_aposentado": - case "contrato_todos": - case "cgm_contrato": - case "cgm_contrato_rescisao": - case "cgm_contrato_aposentado": - case "cgm_contrato_todos": - $arContratos = Sessao::read("arContratos"); + switch ($request->get('stTipoFiltro')) { + case 'contrato': + case 'contrato_rescisao': + case 'contrato_aposentado': + case 'contrato_todos': + case 'cgm_contrato': + case 'cgm_contrato_rescisao': + case 'cgm_contrato_aposentado': + case 'cgm_contrato_todos': + $arContratos = Sessao::read('arContratos'); foreach ($arContratos as $arContrato) { - $stValoresFiltro .= $arContrato["cod_contrato"].","; + $stValoresFiltro .= $arContrato['cod_contrato'].","; } $stValoresFiltro = substr($stValoresFiltro,0,strlen($stValoresFiltro)-1); break; - case "contrato_pensionista": - case "cgm_contrato_pensionista": - $arPensionistas = Sessao::read("arPensionistas"); + case 'contrato_pensionista': + case 'cgm_contrato_pensionista': + $arPensionistas = Sessao::read('arPensionistas'); foreach ($arPensionistas as $arPensionista) { - $stValoresFiltro .= $arPensionista["cod_contrato"].","; + $stValoresFiltro .= $arPensionista['cod_contrato'].","; } $stValoresFiltro = substr($stValoresFiltro,0,strlen($stValoresFiltro)-1); break; - case "lotacao": - $stValoresFiltro = implode(",",$_REQUEST["inCodLotacaoSelecionados"]); + case 'lotacao': + $stValoresFiltro = implode(",",$request->get('inCodLotacaoSelecionados')); break; - case "local": - $stValoresFiltro = implode(",",$_REQUEST["inCodLocalSelecionados"]); + case 'local': + $stValoresFiltro = implode(",",$request->get('inCodLocalSelecionados')); break; - case "atributo_servidor": - $inCodAtributo = $_REQUEST["inCodAtributo"]; - $inCodCadastro = $_REQUEST["inCodCadastro"]; + case 'atributo_servidor': + $inCodAtributo = $request->get('inCodAtributo'); + $inCodCadastro = $request->get('inCodCadastro'); $stNomeAtributo = "Atributo_".$inCodAtributo."_".$inCodCadastro; - if (is_array($_REQUEST[$stNomeAtributo."_Selecionados"])) { + if (is_array($request->get($stNomeAtributo."_Selecionados"))) { $inArray = 1; - $stValores = implode(",",$_REQUEST[$stNomeAtributo."_Selecionados"]); + $stValores = implode(",",$request->get($stNomeAtributo."_Selecionados")); } else { $inArray = 0; - $stValores = $_REQUEST[$stNomeAtributo]; + $stValores = $request->get($stNomeAtributo); } $stValoresFiltro = $inArray."#".$inCodAtributo."#".$stValores; break; - case "atributo_pensionista": - $inCodAtributo = $_REQUEST["inCodAtributo"]; - $inCodCadastro = $_REQUEST["inCodCadastro"]; + case 'atributo_pensionista': + $inCodAtributo = $request->get('inCodAtributo'); + $inCodCadastro = $request->get('inCodCadastro'); $stNomeAtributo = "Atributo_".$inCodAtributo."_".$inCodCadastro; - if (is_array($_REQUEST[$stNomeAtributo."_Selecionados"])) { + if (is_array($request->get($stNomeAtributo."_Selecionados"))) { $inArray = 1; - $stValores = implode(",",$_REQUEST[$stNomeAtributo."_Selecionados"]); + $stValores = implode(",",$request->get($stNomeAtributo."_Selecionados")); } else { $inArray = 0; - $stValores = $_REQUEST[$stNomeAtributo]; + $stValores = $request->get($stNomeAtributo); } $stValoresFiltro = $inArray."#".$inCodAtributo."#".$stValores; break; @@ -224,34 +281,34 @@ switch ($stAcao) { ################################## ESTAGIARIOS ################################### $stFiltroEstagiario = ""; - if ($_POST['stSituacao'] == 'estagiarios' || - $_POST['stSituacao'] == 'todos') { - switch ($_POST['stTipoFiltro']) { - case "cgm_codigo_estagio": + if ($request->get('stSituacao') == 'estagiarios' || + $request->get('stSituacao') == 'todos') { + switch ($request->get('stTipoFiltro')) { + case 'cgm_codigo_estagio': foreach (Sessao::read('arEstagios') as $arEstagio) { - $stCodEstagio .= $arEstagio["inCodigoEstagio"].","; + $stCodEstagio .= $arEstagio['inCodigoEstagio'].","; } $stCodEstagio = substr($stCodEstagio,0,strlen($stCodEstagio)-1); $stFiltroEstagiario .= " AND numero_estagio IN (".$stCodEstagio.")"; break; - case "lotacao": - $stCodOrgao = implode(",",$_REQUEST["inCodLotacaoSelecionados"]); + case 'lotacao': + $stCodOrgao = implode(",",$request->get('inCodLotacaoSelecionados')); $stFiltroEstagiario .= " AND cod_orgao in (".$stCodOrgao.")"; break; - case "local": + case 'local': $stCodLocal = implode(",",$_POST['inCodLocalSelecionados']); $stFiltroEstagiario .= " AND cod_local in (".$stCodLocal.")"; break; - case "atributo_estagiario": - $inCodAtributo = $_REQUEST["inCodAtributo"]; - $inCodCadastro = $_REQUEST["inCodCadastro"]; + case 'atributo_estagiario': + $inCodAtributo = $request->get('inCodAtributo'); + $inCodCadastro = $request->get('inCodCadastro'); $stNomeAtributo = "Atributo_".$inCodAtributo."_".$inCodCadastro; - if (is_array($_REQUEST[$stNomeAtributo."_Selecionados"])) { + if (is_array($request->get($stNomeAtributo."_Selecionados"))) { $inArray = 1; - $stValores = implode(",",$_REQUEST[$stNomeAtributo."_Selecionados"]); + $stValores = implode(",",$request->get($stNomeAtributo."_Selecionados")); } else { $inArray = 0; - $stValores = $_REQUEST[$stNomeAtributo]; + $stValores = $request->get($stNomeAtributo); } $stValoresFiltro = $inArray."#".$inCodAtributo."#".$stValores; break; @@ -262,27 +319,27 @@ switch ($stAcao) { $stFiltroPensaoJudicial = ""; //Tipo de Cadastro - if ($_POST['stSituacao'] == 'todos' || - $_POST['stSituacao'] == 'pensao_judicial') { + if ($request->get('stSituacao') == 'todos' || + $request->get('stSituacao') == 'pensao_judicial') { - switch ($_POST['stTipoFiltro']) { - case "cgm_dependente": //IFiltroComponentesDependentes + switch ($request->get('stTipoFiltro')) { + case 'cgm_dependente': //IFiltroComponentesDependentes foreach (Sessao::read('arCGMDependentes') as $arCGMDependente) { - $stCGMDependente .= "'".addslashes($arCGMDependente["numcgm"])."',"; + $stCGMDependente .= "'".addslashes($arCGMDependente['numcgm'])."',"; } $stCGMDependente = substr($stCGMDependente,0,strlen($stCGMDependente)-1); $stFiltroPensaoJudicial .= " AND contrato.numcgm_dependente IN (".$stCGMDependente.")"; break; - case "cgm_servidor_dependente": //IFiltroComponentesDependentes + case 'cgm_servidor_dependente': //IFiltroComponentesDependentes foreach (Sessao::read('arContratos') as $arContrato) { - $stCodContrato .= $arContrato["cod_contrato"].","; + $stCodContrato .= $arContrato['cod_contrato'].","; } $stCodContrato = substr($stCodContrato,0,strlen($stCodContrato)-1); $stFiltroPensaoJudicial .= " AND cod_contrato IN (".$stCodContrato.")"; break; - case "lotacao": - $stCodOrgao = implode(",",$_REQUEST["inCodLotacaoSelecionados"]); + case 'lotacao': + $stCodOrgao = implode(",",$request->get('inCodLotacaoSelecionados')); $stFiltroPensaoJudicial .= " AND cod_orgao in (".$stCodOrgao.")"; break; } @@ -290,58 +347,60 @@ switch ($stAcao) { ############################################################################# $rsContrato = new RecordSet(); - if ($_POST["stSituacao"] == 'ativos' || - $_POST["stSituacao"] == 'aposentados' || - $_POST["stSituacao"] == 'rescindidos' || - $_POST["stSituacao"] == 'pensionistas' || - $_POST["stSituacao"] == 'todos') { + if ($request->get('stSituacao') == 'ativos' || + $request->get('stSituacao') == 'aposentados' || + $request->get('stSituacao') == 'rescindidos' || + $request->get('stSituacao') == 'pensionistas' || + $request->get('stSituacao') == 'todos') { include_once ( CAM_GRH_FOL_MAPEAMENTO."TFolhaPagamentoEventoCalculado.class.php" ); $obRecuperaEventoCalculado = new TFolhaPagamentoEventoCalculado(); - $obRecuperaEventoCalculado->setDado("inCodPeriodoMovimentacao", $rsPeriodoMovimentacao->getCampo("cod_periodo_movimentacao")); - $obRecuperaEventoCalculado->setDado("stSituacao" , $_POST["stSituacao"]); - $obRecuperaEventoCalculado->setDado("inCodConfiguracao" , $_POST["inCodConfiguracao"]); - $obRecuperaEventoCalculado->setDado("inCodComplementar" , ($_POST["inCodComplementar"]==""?0:$_POST["inCodComplementar"])); - $obRecuperaEventoCalculado->setDado("stTipoFiltro" , $_POST["stTipoFiltro"]); - $obRecuperaEventoCalculado->setDado("stValoresFiltro" , $stValoresFiltro); - $obRecuperaEventoCalculado->setDado("stDesdobramento" , $_POST["stDesdobramento"]); - $obRecuperaEventoCalculado->setDado("inCodBanco" , $rsConfiguracaoConvenio->getCampo("cod_banco")); - $obRecuperaEventoCalculado->setDado("nuLiquidoMinimo" , $nuValorLiquidoInicial); - $obRecuperaEventoCalculado->setDado("nuLiquidoMaximo" , $nuValorLiquidoFinal); - $obRecuperaEventoCalculado->setDado("nuPercentualPagar" , $nuPercentualPagar); + $inCodConfiguracao = ($request->get('inCodComplementar') == '') ? 0 : $request->get('inCodComplementar'); + $obRecuperaEventoCalculado->setDado('inCodPeriodoMovimentacao', $rsPeriodoMovimentacao->getCampo('cod_periodo_movimentacao')); + $obRecuperaEventoCalculado->setDado('stSituacao' , $request->get('stSituacao') ); + $obRecuperaEventoCalculado->setDado('inCodConfiguracao' , $request->get('inCodConfiguracao') ); + $obRecuperaEventoCalculado->setDado('inCodComplementar' , $inCodConfiguracao ); + $obRecuperaEventoCalculado->setDado('stTipoFiltro' , $request->get('stTipoFiltro')); + $obRecuperaEventoCalculado->setDado('stValoresFiltro' , $stValoresFiltro); + $obRecuperaEventoCalculado->setDado('stDesdobramento' , $request->get('stDesdobramento')); + $obRecuperaEventoCalculado->setDado('inCodBanco' , $rsConfiguracaoConvenio->getCampo('cod_banco')); + $obRecuperaEventoCalculado->setDado('nuLiquidoMinimo' , $nuValorLiquidoInicial); + $obRecuperaEventoCalculado->setDado('nuLiquidoMaximo' , $nuValorLiquidoFinal); + $obRecuperaEventoCalculado->setDado('nuPercentualPagar' , $nuPercentualPagar); $obRecuperaEventoCalculado->recuperaContratosCalculadosRemessaBancos($rsContrato,$stFiltroContrato); } + $rsEstagio = new RecordSet(); - if ($_POST["stSituacao"] == 'estagiarios' || - $_POST["stSituacao"] == 'todos') { + if ($request->get('stSituacao') == 'estagiarios' || + $request->get('stSituacao') == 'todos') { include_once(CAM_GRH_EST_MAPEAMENTO."TEstagioEstagiarioEstagio.class.php"); $obTEstagioEstagiorioEstagio = new TEstagioEstagiarioEstagio(); - $obTEstagioEstagiorioEstagio->setDado("inCodPeriodoMovimentacao", $rsUltimaMovimentacao->getCampo("cod_periodo_movimentacao")); - $obTEstagioEstagiorioEstagio->setDado("inCodBanco" , $rsConfiguracaoConvenio->getCampo("cod_banco")); - $obTEstagioEstagiorioEstagio->setDado("stTipoFiltro" , $_POST["stTipoFiltro"]); - $obTEstagioEstagiorioEstagio->setDado("stValoresFiltro" , $stValoresFiltro); - $obTEstagioEstagiorioEstagio->setDado("nuLiquidoMinimo" , $nuValorLiquidoInicial); - $obTEstagioEstagiorioEstagio->setDado("nuLiquidoMaximo" , $nuValorLiquidoFinal); - $obTEstagioEstagiorioEstagio->setDado("nuPercentualPagar" , $nuPercentualPagar); + $obTEstagioEstagiorioEstagio->setDado('inCodPeriodoMovimentacao', $rsUltimaMovimentacao->getCampo('cod_periodo_movimentacao')); + $obTEstagioEstagiorioEstagio->setDado('inCodBanco' , $rsConfiguracaoConvenio->getCampo('cod_banco')); + $obTEstagioEstagiorioEstagio->setDado('stTipoFiltro' , $request->get('stTipoFiltro')); + $obTEstagioEstagiorioEstagio->setDado('stValoresFiltro' , $stValoresFiltro); + $obTEstagioEstagiorioEstagio->setDado('nuLiquidoMinimo' , $nuValorLiquidoInicial); + $obTEstagioEstagiorioEstagio->setDado('nuLiquidoMaximo' , $nuValorLiquidoFinal); + $obTEstagioEstagiorioEstagio->setDado('nuPercentualPagar' , $nuPercentualPagar); $obTEstagioEstagiorioEstagio->recuperaRemessaBancos($rsEstagio,$stFiltroEstagiario); } $rsPensaoJudicial = new RecordSet(); - if ($_POST["stSituacao"] == 'todos' || - $_POST["stSituacao"] == 'pensao_judicial') { + if ($request->get('stSituacao') == 'todos' || + $request->get('stSituacao') == 'pensao_judicial') { include_once ( CAM_GRH_FOL_MAPEAMENTO."TFolhaPagamentoEventoCalculadoDependente.class.php" ); $obTFolhaPagamentoEventoCalculadoDependente = new TFolhaPagamentoEventoCalculadoDependente(); - $obTFolhaPagamentoEventoCalculadoDependente->setDado("inCodPeriodoMovimentacao", $rsPeriodoMovimentacao->getCampo("cod_periodo_movimentacao")); - $obTFolhaPagamentoEventoCalculadoDependente->setDado("inCodConfiguracao" , $_POST["inCodConfiguracao"]); - $obTFolhaPagamentoEventoCalculadoDependente->setDado("inCodComplementar" , ($_POST["inCodComplementar"]==""?0:$_POST["inCodComplementar"])); - $obTFolhaPagamentoEventoCalculadoDependente->setDado("stDesdobramento" , $_POST["stDesdobramento"]); - $obTFolhaPagamentoEventoCalculadoDependente->setDado("inCodBanco" , $rsConfiguracaoConvenio->getCampo("cod_banco")); - $obTFolhaPagamentoEventoCalculadoDependente->setDado("nuLiquidoMinimo" , $nuValorLiquidoInicial); - $obTFolhaPagamentoEventoCalculadoDependente->setDado("nuLiquidoMaximo" , $nuValorLiquidoFinal); - $obTFolhaPagamentoEventoCalculadoDependente->setDado("nuPercentualPagar" , $nuPercentualPagar); + $obTFolhaPagamentoEventoCalculadoDependente->setDado('inCodPeriodoMovimentacao', $rsPeriodoMovimentacao->getCampo('cod_periodo_movimentacao')); + $obTFolhaPagamentoEventoCalculadoDependente->setDado('inCodConfiguracao' , $request->get('inCodConfiguracao')); + $obTFolhaPagamentoEventoCalculadoDependente->setDado('inCodComplementar' , ($request->get('inCodComplementar') == '')?0:$request->get('inCodComplementar')); + $obTFolhaPagamentoEventoCalculadoDependente->setDado('stDesdobramento' , $_POST["stDesdobramento"]); + $obTFolhaPagamentoEventoCalculadoDependente->setDado('inCodBanco' , $rsConfiguracaoConvenio->getCampo("cod_banco")); + $obTFolhaPagamentoEventoCalculadoDependente->setDado('nuLiquidoMinimo' , $nuValorLiquidoInicial); + $obTFolhaPagamentoEventoCalculadoDependente->setDado('nuLiquidoMaximo' , $nuValorLiquidoFinal); + $obTFolhaPagamentoEventoCalculadoDependente->setDado('nuPercentualPagar' , $nuPercentualPagar); $obTFolhaPagamentoEventoCalculadoDependente->recuperaContratosCalculadosRemessaBancos($rsPensaoJudicial,$stFiltroPensaoJudicial); } @@ -351,96 +410,96 @@ switch ($stAcao) { $nuVlrLancamentoTotal = 0; while (!$rsContrato->eof()) { - $arExportador[$inIndex]['codigo_registro'] = "E"; - $arExportador[$inIndex]['identificacao_cliente_empresa'] = $rsContrato->getCampo("registro");//matricula servidor + $arExportador[$inIndex]['codigo_registro'] = "E"; + $arExportador[$inIndex]['identificacao_cliente_empresa'] = $rsContrato->getCampo("registro");//matricula servidor $arAgencia = separarDigito($rsContrato->getCampo("num_agencia")); - $arExportador[$inIndex]['agencia_debito_credito'] = $arAgencia[0]; + $arExportador[$inIndex]['agencia_debito_credito'] = $arAgencia[0]; $arConta = separarDigito($rsContrato->getCampo("nr_conta")); $inCodOperacao = substr($arConta[0],0,3); $inNumeroConta = substr($arConta[0],3); $arExportador[$inIndex]['identificacao_cliente_codigo_operacao'] = $inCodOperacao; - $arExportador[$inIndex]['identificacao_cliente_numero_conta'] = $inNumeroConta; - $arExportador[$inIndex]['identificacao_cliente_dv_conta'] = $arConta[1]; + $arExportador[$inIndex]['identificacao_cliente_numero_conta'] = $inNumeroConta; + $arExportador[$inIndex]['identificacao_cliente_dv_conta'] = $arConta[1]; - $arDataVencimento = explode("/",$_POST['dtPagamento']); - $arExportador[$inIndex]['data_vencimento'] = $arDataVencimento[2].$arDataVencimento[1].$arDataVencimento[0]; + $arDataVencimento = explode("/",$request->get('dtPagamento')); + $arExportador[$inIndex]['data_vencimento'] = $arDataVencimento[2].$arDataVencimento[1].$arDataVencimento[0]; $nuVlrLancamento = number_format($rsContrato->getCampo("liquido"), 2, ".", ""); $nuVlrLancamentoTotal += $nuVlrLancamento; $nuVlrLancamento = number_format($nuVlrLancamento, 2, "", ""); - $arExportador[$inIndex]['valor_debito_credito'] = $nuVlrLancamento; - $arExportador[$inIndex]['codigo_moeda'] = "03"; - $arExportador[$inIndex]['uso_empresa'] = $rsContrato->getCampo("nom_cgm");//nome servidor - $arExportador[$inIndex]['numero_agendamento_cliente'] = $inIndex+1; - $arExportador[$inIndex]['reservado_futuro'] = ""; - $arExportador[$inIndex]['numero_sequencial_registro'] = $inIndex+1; - $arExportador[$inIndex]['codigo_movimento'] = $_POST["inTipoMovimento"]; + $arExportador[$inIndex]['valor_debito_credito'] = $nuVlrLancamento; + $arExportador[$inIndex]['codigo_moeda'] = "03"; + $arExportador[$inIndex]['uso_empresa'] = $rsContrato->getCampo("nom_cgm");//nome servidor + $arExportador[$inIndex]['numero_agendamento_cliente'] = $inIndex+1; + $arExportador[$inIndex]['reservado_futuro'] = ""; + $arExportador[$inIndex]['numero_sequencial_registro'] = $inIndex+1; + $arExportador[$inIndex]['codigo_movimento'] = $request->get('inTipoMovimento'); $inIndex++; $rsContrato->proximo(); } while (!$rsEstagio->eof()) { - $arExportador[$inIndex]['codigo_registro'] = "E"; - $arExportador[$inIndex]['identificacao_cliente_empresa'] = $rsEstagio->getCampo("numero_estagio");//codigo do estagio + $arExportador[$inIndex]['codigo_registro'] = "E"; + $arExportador[$inIndex]['identificacao_cliente_empresa'] = $rsEstagio->getCampo("numero_estagio");//codigo do estagio $arAgencia = separarDigito($rsEstagio->getCampo("num_agencia")); - $arExportador[$inIndex]['agencia_debito_credito'] = $arAgencia[0]; + $arExportador[$inIndex]['agencia_debito_credito'] = $arAgencia[0]; $arConta = separarDigito($rsEstagio->getCampo("num_conta")); $inCodOperacao = substr($arConta[0],0,3); $inNumeroConta = substr($arConta[0],3); $arExportador[$inIndex]['identificacao_cliente_codigo_operacao'] = $inCodOperacao; - $arExportador[$inIndex]['identificacao_cliente_numero_conta'] = $inNumeroConta; - $arExportador[$inIndex]['identificacao_cliente_dv_conta'] = $arConta[1]; + $arExportador[$inIndex]['identificacao_cliente_numero_conta'] = $inNumeroConta; + $arExportador[$inIndex]['identificacao_cliente_dv_conta'] = $arConta[1]; $nuVlrLancamento = number_format($rsEstagio->getCampo("liquido"), 2, ".", ""); $nuVlrLancamentoTotal += $nuVlrLancamento; $nuVlrLancamento = number_format($nuVlrLancamento, 2, "", ""); $arExportador[$inIndex]['valor_debito_credito'] = $nuVlrLancamento; - $arExportador[$inIndex]['codigo_moeda'] = "03"; - $arExportador[$inIndex]['uso_empresa'] = $rsEstagio->getCampo("nom_cgm");//nome servidor - $arExportador[$inIndex]['numero_agendamento_cliente'] = $inIndex+1; - $arExportador[$inIndex]['reservado_futuro'] = ""; - $arExportador[$inIndex]['numero_sequencial_registro'] = $inIndex+1; - $arExportador[$inIndex]['codigo_movimento'] = $_POST["inTipoMovimento"]; + $arExportador[$inIndex]['codigo_moeda'] = "03"; + $arExportador[$inIndex]['uso_empresa'] = $rsEstagio->getCampo("nom_cgm");//nome servidor + $arExportador[$inIndex]['numero_agendamento_cliente'] = $inIndex+1; + $arExportador[$inIndex]['reservado_futuro'] = ""; + $arExportador[$inIndex]['numero_sequencial_registro'] = $inIndex+1; + $arExportador[$inIndex]['codigo_movimento'] = $request->get('inTipoMovimento'); $inIndex++; $rsEstagio->proximo(); } while (!$rsPensaoJudicial->eof()) { - $arExportador[$inIndex]['codigo_registro'] = "E"; - $arExportador[$inIndex]['identificacao_cliente_empresa'] = $rsPensaoJudicial->getCampo("registro");//matricula servidor + $arExportador[$inIndex]['codigo_registro'] = "E"; + $arExportador[$inIndex]['identificacao_cliente_empresa'] = $rsPensaoJudicial->getCampo("registro");//matricula servidor $arAgencia = separarDigito($rsPensaoJudicial->getCampo("num_agencia")); - $arExportador[$inIndex]['agencia_debito_credito'] = $arAgencia[0]; + $arExportador[$inIndex]['agencia_debito_credito'] = $arAgencia[0]; $arConta = separarDigito($rsPensaoJudicial->getCampo("nr_conta")); $inCodOperacao = substr($arConta[0],0,3); $inNumeroConta = substr($arConta[0],3); $arExportador[$inIndex]['identificacao_cliente_codigo_operacao'] = $inCodOperacao; - $arExportador[$inIndex]['identificacao_cliente_numero_conta'] = $inNumeroConta; - $arExportador[$inIndex]['identificacao_cliente_dv_conta'] = $arConta[1]; + $arExportador[$inIndex]['identificacao_cliente_numero_conta'] = $inNumeroConta; + $arExportador[$inIndex]['identificacao_cliente_dv_conta'] = $arConta[1]; $arDataVencimento = explode("/",$_POST['dtPagamento']); - $arExportador[$inIndex]['data_vencimento'] = $arDataVencimento[2].$arDataVencimento[1].$arDataVencimento[0]; + $arExportador[$inIndex]['data_vencimento'] = $arDataVencimento[2].$arDataVencimento[1].$arDataVencimento[0]; $nuVlrLancamento = number_format($rsPensaoJudicial->getCampo("liquido"), 2, ".", ""); $nuVlrLancamentoTotal += $nuVlrLancamento; $nuVlrLancamento = number_format($nuVlrLancamento, 2, "", ""); $arExportador[$inIndex]['valor_debito_credito'] = $nuVlrLancamento; - $arExportador[$inIndex]['codigo_moeda'] = "03"; - $arExportador[$inIndex]['uso_empresa'] = $rsPensaoJudicial->getCampo("nom_cgm");//nome servidor - $arExportador[$inIndex]['numero_agendamento_cliente'] = $inIndex+1; - $arExportador[$inIndex]['reservado_futuro'] = ""; - $arExportador[$inIndex]['numero_sequencial_registro'] = $inIndex+1; - $arExportador[$inIndex]['codigo_movimento'] = $_POST["inTipoMovimento"]; + $arExportador[$inIndex]['codigo_moeda'] = "03"; + $arExportador[$inIndex]['uso_empresa'] = $rsPensaoJudicial->getCampo("nom_cgm");//nome servidor + $arExportador[$inIndex]['numero_agendamento_cliente'] = $inIndex+1; + $arExportador[$inIndex]['reservado_futuro'] = ""; + $arExportador[$inIndex]['numero_sequencial_registro'] = $inIndex+1; + $arExportador[$inIndex]['codigo_movimento'] = $request->get('inTipoMovimento'); $inIndex++; $rsPensaoJudicial->proximo(); @@ -449,23 +508,23 @@ switch ($stAcao) { ##################################### REGISTRO A #################################### $arCabecalhoArquivo = array(); - $arCabecalhoArquivo[0]['codigo_registro'] = "A"; - $arCabecalhoArquivo[0]['codigo_remessa'] = 1; - $arCabecalhoArquivo[0]['codigo_convenio'] = $rsConfiguracaoConvenio->getCampo("cod_convenio_banco"); - $arCabecalhoArquivo[0]['nome_empresa'] = SistemaLegado::pegaConfiguracao("nom_prefeitura",2,Sessao::getExercicio()); - $arCabecalhoArquivo[0]['codigo_banco'] = 104; - $arCabecalhoArquivo[0]['nome_banco'] = $stNomBanco; - - $arDataMovimento = explode("/",$_POST['dtGeracaoArquivo']); - $arCabecalhoArquivo[0]['data_movimento'] = $arDataMovimento[2].$arDataMovimento[1].$arDataMovimento[0]; - - $arCabecalhoArquivo[0]['numero_sequencial'] = $_POST["inNumeroSequencial"]; - $arCabecalhoArquivo[0]['numero_versao_layout'] = 4; - $arCabecalhoArquivo[0]['servico'] = "FOLHA PAGAMENTO"; - $arCabecalhoArquivo[0]['conta_compromisso_agencia'] = $inAgenciaConvenio; + $arCabecalhoArquivo[0]['codigo_registro'] = "A"; + $arCabecalhoArquivo[0]['codigo_remessa'] = 1; + $arCabecalhoArquivo[0]['codigo_convenio'] = $rsConfiguracaoConvenio->getCampo('cod_convenio_banco'); + $arCabecalhoArquivo[0]['nome_empresa'] = SistemaLegado::pegaConfiguracao('nom_prefeitura',2,Sessao::getExercicio()); + $arCabecalhoArquivo[0]['codigo_banco'] = 104; + $arCabecalhoArquivo[0]['nome_banco'] = $stNomBanco; + + $arDataMovimento = explode("/",$request->get('dtGeracaoArquivo')); + $arCabecalhoArquivo[0]['data_movimento'] = $arDataMovimento[2].$arDataMovimento[1].$arDataMovimento[0]; + + $arCabecalhoArquivo[0]['numero_sequencial'] = $request->get('inNumeroSequencial'); + $arCabecalhoArquivo[0]['numero_versao_layout'] = 4; + $arCabecalhoArquivo[0]['servico'] = "FOLHA PAGAMENTO"; + $arCabecalhoArquivo[0]['conta_compromisso_agencia'] = $inAgenciaConvenio; $arCabecalhoArquivo[0]['conta_compromisso_codigo_operacao'] = $inCodigoOperacaoContaConvenio; - $arCabecalhoArquivo[0]['conta_compromisso_numero_conta'] = $inNumeroContaConvenio; - $arCabecalhoArquivo[0]['conta_compromisso_dv_conta'] = $inDigitoVerificadorContaConvenio; + $arCabecalhoArquivo[0]['conta_compromisso_numero_conta'] = $inNumeroContaConvenio; + $arCabecalhoArquivo[0]['conta_compromisso_dv_conta'] = $inDigitoVerificadorContaConvenio; $arCabecalhoArquivo[0]['identificacao_ambiente_cliente'] = "P"; $arCabecalhoArquivo[0]['identificacao_ambiente_caixa'] = "P"; $arCabecalhoArquivo[0]['reservado_futuro'] = ""; @@ -591,7 +650,7 @@ switch ($stAcao) { $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(8); $obExportador->roUltimoArquivo->roUltimoBloco->addColuna("valor_debito_credito"); - $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("NUMERICO_ZEROS_ESQ"); + $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("VALOR_ZEROS_ESQ"); $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(15); $obExportador->roUltimoArquivo->roUltimoBloco->addColuna("codigo_moeda"); @@ -620,12 +679,12 @@ switch ($stAcao) { ##########################################RODAPÉ ARQUIVO######################################### - $arRodapeArquivo[0]['codigo_registro'] = "Z"; - $arRodapeArquivo[0]["quant_registros"] = $inIndex+2; - $arRodapeArquivo[0]["soma_registros"] = $nuVlrLancamentoTotal; + $arRodapeArquivo[0]['codigo_registro'] = "Z"; + $arRodapeArquivo[0]["quant_registros"] = $inIndex+2; + $arRodapeArquivo[0]["soma_registros"] = number_format($nuVlrLancamentoTotal,2,'','');//garantido a formatacao dos zeros $arRodapeArquivo[0]["numero_sequencial_registro"] = $inIndex+1; - $arRodapeArquivo[0]["reservado_futuro"] = ""; - $arRodapeArquivo[0]["reservado_futuro_num"] = 0; + $arRodapeArquivo[0]["reservado_futuro"] = ""; + $arRodapeArquivo[0]["reservado_futuro_num"] = 0; $rsRodapeArquivo = new RecordSet(); $rsRodapeArquivo->preenche($arRodapeArquivo); @@ -639,7 +698,7 @@ switch ($stAcao) { $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(6); $obExportador->roUltimoArquivo->roUltimoBloco->addColuna("soma_registros"); - $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("NUMERICO_ZEROS_ESQ"); + $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("VALOR_ZEROS_ESQ"); $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(17); $obExportador->roUltimoArquivo->roUltimoBloco->addColuna("reservado_futuro"); @@ -654,42 +713,542 @@ switch ($stAcao) { $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("CARACTER_ESPACOS_DIR"); $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(1); - ########################UPDATE CONFIGURACAO######################################################## - include_once(CAM_GA_ADM_MAPEAMENTO."TAdministracaoConfiguracao.class.php"); - $obTAdministracaoConfiguracao = new TAdministracaoConfiguracao(); - $obTAdministracaoConfiguracao->setDado("exercicio",Sessao::getExercicio()); - $obTAdministracaoConfiguracao->setDado("cod_modulo",40); - $obTAdministracaoConfiguracao->setDado("parametro","dt_num_sequencial_arquivo_caixa".Sessao::getEntidade()); - $obTAdministracaoConfiguracao->recuperaPorChave($rsConfiguracao); - $arCompetencia = explode("-",$rsConfiguracao->getCampo("valor")); - $dtCompetencia = $arCompetencia[0]."-".$arCompetencia[1]; - if ( $dtCompetencia == date("Y-m") ) { - $obTAdministracaoConfiguracao->setDado("parametro","num_sequencial_arquivo_caixa".Sessao::getEntidade()); - $obTAdministracaoConfiguracao->recuperaPorChave($rsConfiguracao); - $inSequencial = $rsConfiguracao->getCampo("valor") + 1; + return $obExportador; +} + +function montaArquivoSICOV150(Request $request) +{ + ################################## BANCO CONVENIO ################################# + + include_once(CAM_GRH_IMA_MAPEAMENTO."TIMAConfiguracaoConvenioCaixaEconomicaFederal.class.php"); + $obTIMAConfiguracaoConvenioCaixaEconomicaFederal = new TIMAConfiguracaoConvenioCaixaEconomicaFederal(); + $obTIMAConfiguracaoConvenioCaixaEconomicaFederal->recuperaRelacionamento($rsConfiguracaoConvenio); + + $inCodBanco = $rsConfiguracaoConvenio->getCampo("cod_banco"); + + $arAgenciaConvenio = separarDigito($rsConfiguracaoConvenio->getCampo("num_agencia")); + $inDigitoVerificadorAgencia = $arAgenciaConvenio[1]; + $inAgenciaConvenio = $arAgenciaConvenio[0]; + $arContaConvenio = separarDigito($rsConfiguracaoConvenio->getCampo("num_conta_corrente")); + $inDigitoVerificadorContaConvenio = $arContaConvenio[1]; + $inCodigoOperacaoContaConvenio = substr($arContaConvenio[0],0,3); + $inNumeroContaConvenio = substr($arContaConvenio[0],3); + + ################################## BANCO CONVENIO ################################# + + include_once(CAM_GT_MON_MAPEAMENTO."TMONBanco.class.php"); + $obTMONBanco = new TMONBanco(); + $obTMONBanco->setDado("cod_banco", $inCodBanco); + $obTMONBanco->recuperaPorChave($rsBanco); + + $stNomBanco = $rsBanco->getCampo('nom_banco'); + + ################################## COMPETENCIA ################################### + + ///////// COMPETENCIA SELECIONADA + include_once(CAM_GRH_FOL_MAPEAMENTO."TFolhaPagamentoPeriodoMovimentacao.class.php"); + $obTFolhaPagamentoPeriodoMovimentacao = new TFolhaPagamentoPeriodoMovimentacao(); + $stCompetencia = ( $request->get('inCodMes') < 10 ) ? "0".$request->get('inCodMes') : $request->get('inCodMes'); + $stCompetencia .= $request->get('inAno'); + $stFiltroCompetencia = " WHERE to_char(dt_final,'mmyyyy') = '".$stCompetencia."'"; + $obTFolhaPagamentoPeriodoMovimentacao->recuperaTodos($rsPeriodoMovimentacao,$stFiltroCompetencia); + + $arInicialCompetenciaSelecionada = explode('/',$rsPeriodoMovimentacao->getCampo('dt_inicial')); + $arFinalCompetenciaSelecionada = explode('/',$rsPeriodoMovimentacao->getCampo('dt_final')); + + $dtInicialCompetenciaSelecionada = $arInicialCompetenciaSelecionada[2].'-'.$arInicialCompetenciaSelecionada[1].'-'.$arInicialCompetenciaSelecionada[0]; + $dtFinalCompetenciaSelecionada = $arFinalCompetenciaSelecionada[2].'-'.$arFinalCompetenciaSelecionada[1].'-'.$arFinalCompetenciaSelecionada[0]; + + ///////// COMPETENCIA ANTERIOR SELECIONADA + $inCodMovimentacaoAnteriorSelecionada = $rsPeriodoMovimentacao->getCampo('cod_periodo_movimentacao') - 1; + $obTFolhaPagamentoPeriodoMovimentacao->recuperaPeriodoMovimentacao($rsPenultimaMovimentacao, " AND FPM.cod_periodo_movimentacao = ".$inCodMovimentacaoAnteriorSelecionada); + + if ($rsPenultimaMovimentacao->getCampo('dt_inicial') != '') { + $arInicialCompetenciaAnteriorSelecionada = explode('/',$rsPenultimaMovimentacao->getCampo('dt_inicial')); + $arFinalCompetenciaAnteriorSelecionada = explode('/',$rsPenultimaMovimentacao->getCampo('dt_final')); } else { - $inSequencial = 1; - $dtSequencial = date("Y-m-d"); - $obTAdministracaoConfiguracao->setDado("parametro","dt_num_sequencial_arquivo_caixa".Sessao::getEntidade()); - $obTAdministracaoConfiguracao->setDado("valor",$dtSequencial); - $obTAdministracaoConfiguracao->alteracao(); + $arInicialCompetenciaAnteriorSelecionada = $arInicialCompetenciaSelecionada; + $arFinalCompetenciaAnteriorSelecionada = $arFinalCompetenciaSelecionada; } - $obTAdministracaoConfiguracao->setDado("parametro","num_sequencial_arquivo_caixa".Sessao::getEntidade()); - $obTAdministracaoConfiguracao->setDado("valor",$inSequencial); - $obTAdministracaoConfiguracao->alteracao(); - $obExportador->Show(); - Sessao::encerraExcecao(); - break; -} + $dtInicialCompetenciaAnteriorSelecionada = $arInicialCompetenciaAnteriorSelecionada[2].'-'.$arInicialCompetenciaAnteriorSelecionada[1]."-".$arInicialCompetenciaAnteriorSelecionada[0]; + $dtFinalCompetenciaAnteriorSelecionada = $arFinalCompetenciaAnteriorSelecionada[2].'-'.$arFinalCompetenciaAnteriorSelecionada[1]."-".$arFinalCompetenciaAnteriorSelecionada[0]; -function separarDigito($stString) -{ - $inNumero = preg_replace( "/[^0-9a-zA-Z]/i","",$stString); - $inDigito = $inNumero[strlen($inNumero)-1]; - if(strlen($inNumero) > 4) - $inNumero = substr($inNumero,0,strlen($inNumero)-1); + ///////// COMPETENCIA ATUAL + $obTFolhaPagamentoPeriodoMovimentacao->recuperaUltimaMovimentacao($rsUltimaMovimentacao); - return array($inNumero,$inDigito); + $arInicialCompetenciaAtual = explode('/',$rsUltimaMovimentacao->getCampo('dt_inicial')); + $arFinalCompetenciaAtual = explode('/',$rsUltimaMovimentacao->getCampo('dt_final')); + + $dtInicialCompetenciaAtual = $arInicialCompetenciaAtual[2].'-'.$arInicialCompetenciaAtual[1].'-'.$arInicialCompetenciaAtual[0]; + $dtFinalCompetenciaAtual = $arFinalCompetenciaAtual[2].'-'.$arFinalCompetenciaAtual[1].'-'.$arFinalCompetenciaAtual[0]; + + ################################## EXPORTADOR ################################### + + $obExportador = new Exportador(); + + if( ($request->get('stSituacao') == 'aposentados') || ($request->get('stSituacao') == 'pensionistas') ){ + $obExportador->addArquivo("ACC".$arFinalCompetenciaSelecionada[1]."01.txt"); + }else{ + $obExportador->addArquivo("ACC".$arFinalCompetenciaAtual[1]."01.txt"); + } + + $obExportador->roUltimoArquivo->setTipoDocumento('RemessaCaixaEconomicaFederal'); + + ############################################################################# + + if ( ($request->get('nuValorLiquidoInicial') != '') && ($request->get('nuValorLiquidoFinal') != '') ) { + $nuValorLiquidoFinal = str_replace(".","",$request->get('nuValorLiquidoFinal')); + $nuValorLiquidoFinal = str_replace(",",".",$nuValorLiquidoFinal); + + $nuValorLiquidoInicial = str_replace(".","",$request->get('nuValorLiquidoInicial')); + $nuValorLiquidoInicial = str_replace(",",".",$nuValorLiquidoInicial); + } + + if ($request->get('nuPercentualPagar') != "") { + $nuPercentualPagar = str_replace(".", "", $request->get('nuPercentualPagar')); + $nuPercentualPagar = str_replace(",", ".", $nuPercentualPagar); + } else { + $nuPercentualPagar = 0; + } + + ################################## ATIVOS/APOSENTADOS/PENSIONISTA ################################### + $stFiltroContrato = ""; + + if ($request->get('stSituacao') == 'ativos' || + $request->get('stSituacao') == 'aposentados' || + $request->get('stSituacao') == 'rescindidos' || + $request->get('stSituacao') == 'pensionistas' || + $request->get('stSituacao') == 'todos') { + + $stValoresFiltro = ""; + switch ($request->get('stTipoFiltro')) { + case 'contrato': + case 'contrato_rescisao': + case 'contrato_aposentado': + case 'contrato_todos': + case 'cgm_contrato': + case 'cgm_contrato_rescisao': + case 'cgm_contrato_aposentado': + case 'cgm_contrato_todos': + $arContratos = Sessao::read('arContratos'); + foreach ($arContratos as $arContrato) { + $stValoresFiltro .= $arContrato['cod_contrato'].","; + } + $stValoresFiltro = substr($stValoresFiltro,0,strlen($stValoresFiltro)-1); + break; + case 'contrato_pensionista': + case 'cgm_contrato_pensionista': + $arPensionistas = Sessao::read('arPensionistas'); + foreach ($arPensionistas as $arPensionista) { + $stValoresFiltro .= $arPensionista['cod_contrato'].","; + } + $stValoresFiltro = substr($stValoresFiltro,0,strlen($stValoresFiltro)-1); + break; + case 'lotacao': + $stValoresFiltro = implode(",",$request->get('inCodLotacaoSelecionados')); + break; + case 'local': + $stValoresFiltro = implode(",",$request->get('inCodLocalSelecionados')); + break; + case 'atributo_servidor': + $inCodAtributo = $request->get('inCodAtributo'); + $inCodCadastro = $request->get('inCodCadastro'); + $stNomeAtributo = "Atributo_".$inCodAtributo."_".$inCodCadastro; + if (is_array($request->get($stNomeAtributo."_Selecionados"))) { + $inArray = 1; + $stValores = implode(",",$request->get($stNomeAtributo."_Selecionados")); + } else { + $inArray = 0; + $stValores = $request->get($stNomeAtributo); + } + $stValoresFiltro = $inArray."#".$inCodAtributo."#".$stValores; + break; + case 'atributo_pensionista': + $inCodAtributo = $request->get('inCodAtributo'); + $inCodCadastro = $request->get('inCodCadastro'); + $stNomeAtributo = "Atributo_".$inCodAtributo."_".$inCodCadastro; + if (is_array($request->get($stNomeAtributo."_Selecionados"))) { + $inArray = 1; + $stValores = implode(",",$request->get($stNomeAtributo."_Selecionados")); + } else { + $inArray = 0; + $stValores = $request->get($stNomeAtributo); + } + $stValoresFiltro = $inArray."#".$inCodAtributo."#".$stValores; + break; + } + } + + ################################## ESTAGIARIOS ################################### + $stFiltroEstagiario = ""; + + if ($request->get('stSituacao') == 'estagiarios' || + $request->get('stSituacao') == 'todos') { + switch ($request->get('stTipoFiltro')) { + case 'cgm_codigo_estagio': + foreach (Sessao::read('arEstagios') as $arEstagio) { + $stCodEstagio .= $arEstagio['inCodigoEstagio'].","; + } + $stCodEstagio = substr($stCodEstagio,0,strlen($stCodEstagio)-1); + $stFiltroEstagiario .= " AND numero_estagio IN (".$stCodEstagio.")"; + break; + case 'lotacao': + $stCodOrgao = implode(",",$request->get('inCodLotacaoSelecionados')); + $stFiltroEstagiario .= " AND cod_orgao in (".$stCodOrgao.")"; + break; + case 'local': + $stCodLocal = implode(",",$_POST['inCodLocalSelecionados']); + $stFiltroEstagiario .= " AND cod_local in (".$stCodLocal.")"; + break; + case 'atributo_estagiario': + $inCodAtributo = $request->get('inCodAtributo'); + $inCodCadastro = $request->get('inCodCadastro'); + $stNomeAtributo = "Atributo_".$inCodAtributo."_".$inCodCadastro; + if (is_array($request->get($stNomeAtributo."_Selecionados"))) { + $inArray = 1; + $stValores = implode(",",$request->get($stNomeAtributo."_Selecionados")); + } else { + $inArray = 0; + $stValores = $request->get($stNomeAtributo); + } + $stValoresFiltro = $inArray."#".$inCodAtributo."#".$stValores; + break; + } + } + + ################################## PENSAO JUDICIAL ################################### + $stFiltroPensaoJudicial = ""; + + //Tipo de Cadastro + if ($request->get('stSituacao') == 'todos' || + $request->get('stSituacao') == 'pensao_judicial') { + + switch ($request->get('stTipoFiltro')) { + case 'cgm_dependente': //IFiltroComponentesDependentes + foreach (Sessao::read('arCGMDependentes') as $arCGMDependente) { + $stCGMDependente .= "'".addslashes($arCGMDependente['numcgm'])."',"; + } + $stCGMDependente = substr($stCGMDependente,0,strlen($stCGMDependente)-1); + + $stFiltroPensaoJudicial .= " AND contrato.numcgm_dependente IN (".$stCGMDependente.")"; + break; + case 'cgm_servidor_dependente': //IFiltroComponentesDependentes + foreach (Sessao::read('arContratos') as $arContrato) { + $stCodContrato .= $arContrato['cod_contrato'].","; + } + $stCodContrato = substr($stCodContrato,0,strlen($stCodContrato)-1); + $stFiltroPensaoJudicial .= " AND cod_contrato IN (".$stCodContrato.")"; + break; + case 'lotacao': + $stCodOrgao = implode(",",$request->get('inCodLotacaoSelecionados')); + $stFiltroPensaoJudicial .= " AND cod_orgao in (".$stCodOrgao.")"; + break; + } + }// + ############################################################################# + + $rsContrato = new RecordSet(); + if ($request->get('stSituacao') == 'ativos' || + $request->get('stSituacao') == 'aposentados' || + $request->get('stSituacao') == 'rescindidos' || + $request->get('stSituacao') == 'pensionistas' || + $request->get('stSituacao') == 'todos') { + + include_once ( CAM_GRH_FOL_MAPEAMENTO."TFolhaPagamentoEventoCalculado.class.php" ); + $obRecuperaEventoCalculado = new TFolhaPagamentoEventoCalculado(); + + $inCodConfiguracao = ($request->get('inCodComplementar') == '') ? 0 : $request->get('inCodComplementar'); + $obRecuperaEventoCalculado->setDado('inCodPeriodoMovimentacao', $rsPeriodoMovimentacao->getCampo('cod_periodo_movimentacao')); + $obRecuperaEventoCalculado->setDado('stSituacao' , $request->get('stSituacao') ); + $obRecuperaEventoCalculado->setDado('inCodConfiguracao' , $request->get('inCodConfiguracao') ); + $obRecuperaEventoCalculado->setDado('inCodComplementar' , $inCodConfiguracao ); + $obRecuperaEventoCalculado->setDado('stTipoFiltro' , $request->get('stTipoFiltro')); + $obRecuperaEventoCalculado->setDado('stValoresFiltro' , $stValoresFiltro); + $obRecuperaEventoCalculado->setDado('stDesdobramento' , $request->get('stDesdobramento')); + $obRecuperaEventoCalculado->setDado('inCodBanco' , $rsConfiguracaoConvenio->getCampo('cod_banco')); + $obRecuperaEventoCalculado->setDado('nuLiquidoMinimo' , $nuValorLiquidoInicial); + $obRecuperaEventoCalculado->setDado('nuLiquidoMaximo' , $nuValorLiquidoFinal); + $obRecuperaEventoCalculado->setDado('nuPercentualPagar' , $nuPercentualPagar); + $obRecuperaEventoCalculado->recuperaContratosCalculadosRemessaBancos($rsContrato,$stFiltroContrato); + } + + + $rsEstagio = new RecordSet(); + if ($request->get('stSituacao') == 'estagiarios' || + $request->get('stSituacao') == 'todos') { + include_once(CAM_GRH_EST_MAPEAMENTO."TEstagioEstagiarioEstagio.class.php"); + $obTEstagioEstagiorioEstagio = new TEstagioEstagiarioEstagio(); + $obTEstagioEstagiorioEstagio->setDado('inCodPeriodoMovimentacao', $rsUltimaMovimentacao->getCampo('cod_periodo_movimentacao')); + $obTEstagioEstagiorioEstagio->setDado('inCodBanco' , $rsConfiguracaoConvenio->getCampo('cod_banco')); + $obTEstagioEstagiorioEstagio->setDado('stTipoFiltro' , $request->get('stTipoFiltro')); + $obTEstagioEstagiorioEstagio->setDado('stValoresFiltro' , $stValoresFiltro); + $obTEstagioEstagiorioEstagio->setDado('nuLiquidoMinimo' , $nuValorLiquidoInicial); + $obTEstagioEstagiorioEstagio->setDado('nuLiquidoMaximo' , $nuValorLiquidoFinal); + $obTEstagioEstagiorioEstagio->setDado('nuPercentualPagar' , $nuPercentualPagar); + $obTEstagioEstagiorioEstagio->recuperaRemessaBancos($rsEstagio,$stFiltroEstagiario); + } + + $rsPensaoJudicial = new RecordSet(); + if ($request->get('stSituacao') == 'todos' || + $request->get('stSituacao') == 'pensao_judicial') { + + include_once ( CAM_GRH_FOL_MAPEAMENTO."TFolhaPagamentoEventoCalculadoDependente.class.php" ); + $obTFolhaPagamentoEventoCalculadoDependente = new TFolhaPagamentoEventoCalculadoDependente(); + $obTFolhaPagamentoEventoCalculadoDependente->setDado('inCodPeriodoMovimentacao', $rsPeriodoMovimentacao->getCampo('cod_periodo_movimentacao')); + $obTFolhaPagamentoEventoCalculadoDependente->setDado('inCodConfiguracao' , $request->get('inCodConfiguracao')); + $obTFolhaPagamentoEventoCalculadoDependente->setDado('inCodComplementar' , ($request->get('inCodComplementar') == '')?0:$request->get('inCodComplementar')); + $obTFolhaPagamentoEventoCalculadoDependente->setDado('stDesdobramento' , $_POST["stDesdobramento"]); + $obTFolhaPagamentoEventoCalculadoDependente->setDado('inCodBanco' , $rsConfiguracaoConvenio->getCampo("cod_banco")); + $obTFolhaPagamentoEventoCalculadoDependente->setDado('nuLiquidoMinimo' , $nuValorLiquidoInicial); + $obTFolhaPagamentoEventoCalculadoDependente->setDado('nuLiquidoMaximo' , $nuValorLiquidoFinal); + $obTFolhaPagamentoEventoCalculadoDependente->setDado('nuPercentualPagar' , $nuPercentualPagar); + $obTFolhaPagamentoEventoCalculadoDependente->recuperaContratosCalculadosRemessaBancos($rsPensaoJudicial,$stFiltroPensaoJudicial); + } + + ##################################Começa a montar o arquivo########################################### + $arExportador = array(); + $inIndex = 0; + $nuVlrLancamentoTotal = 0; + + while (!$rsContrato->eof()) { + #################### REGISTRO E #################### + $arAgencia = separarDigito($rsContrato->getCampo("num_agencia")); + $arConta = separarDigito($rsContrato->getCampo("nr_conta")); + $inCodOperacao = substr($arConta[0],0,3); + $inNumeroConta = substr($arConta[0],3); + $arDataVencimento = explode("/",$request->get('dtPagamento')); + $nuVlrLancamento = number_format($rsContrato->getCampo("liquido"), 2, ".", ""); + $nuVlrLancamentoTotal += $nuVlrLancamento; + $nuVlrLancamento = number_format($nuVlrLancamento, 2, "", ""); + + $arExportador[$inIndex]['codigo_registro'] = "E"; + $arExportador[$inIndex]['identificacao_cliente_empresa'] = $rsContrato->getCampo("registro");//matricula servidor + $arExportador[$inIndex]['agencia_debito_credito'] = $arAgencia[0]; + $arExportador[$inIndex]['identificacao_cliente_codigo_operacao'] = $inCodOperacao; + $arExportador[$inIndex]['identificacao_cliente_numero_conta'] = $inNumeroConta; + $arExportador[$inIndex]['identificacao_cliente_dv_conta'] = $arConta[1]; + $arExportador[$inIndex]['data_vencimento'] = $arDataVencimento[2].$arDataVencimento[1].$arDataVencimento[0]; + $arExportador[$inIndex]['valor_debito_credito'] = $nuVlrLancamento; + $arExportador[$inIndex]['codigo_moeda'] = "03"; + $arExportador[$inIndex]['uso_empresa'] = $rsContrato->getCampo("nom_cgm");//nome servidor + $arExportador[$inIndex]['reservado_futuro'] = ""; + $arExportador[$inIndex]['codigo_movimento'] = 2; + + $inIndex++; + $rsContrato->proximo(); + } + + while (!$rsEstagio->eof()) { + $arAgencia = separarDigito($rsEstagio->getCampo("num_agencia")); + $arConta = separarDigito($rsEstagio->getCampo("num_conta")); + $inCodOperacao = substr($arConta[0],0,3); + $inNumeroConta = substr($arConta[0],3); + $nuVlrLancamento = number_format($rsEstagio->getCampo("liquido"), 2, ".", ""); + $nuVlrLancamentoTotal += $nuVlrLancamento; + $nuVlrLancamento = number_format($nuVlrLancamento, 2, "", ""); + + $arExportador[$inIndex]['codigo_registro'] = "E"; + $arExportador[$inIndex]['identificacao_cliente_empresa'] = $rsEstagio->getCampo("numero_estagio");//codigo do estagio + $arExportador[$inIndex]['agencia_debito_credito'] = $arAgencia[0]; + $arExportador[$inIndex]['identificacao_cliente_codigo_operacao'] = $inCodOperacao; + $arExportador[$inIndex]['identificacao_cliente_numero_conta'] = $inNumeroConta; + $arExportador[$inIndex]['identificacao_cliente_dv_conta'] = $arConta[1]; + $arExportador[$inIndex]['valor_debito_credito'] = $nuVlrLancamento; + $arExportador[$inIndex]['codigo_moeda'] = "03"; + $arExportador[$inIndex]['uso_empresa'] = $rsEstagio->getCampo("nom_cgm");//nome servidor + $arExportador[$inIndex]['reservado_futuro'] = ""; + $arExportador[$inIndex]['codigo_movimento'] = 2; + + $inIndex++; + $rsEstagio->proximo(); + } + + while (!$rsPensaoJudicial->eof()) { + $arAgencia = separarDigito($rsPensaoJudicial->getCampo("num_agencia")); + $arConta = separarDigito($rsPensaoJudicial->getCampo("nr_conta")); + $inCodOperacao = substr($arConta[0],0,3); + $inNumeroConta = substr($arConta[0],3); + $arDataVencimento = explode("/",$_POST['dtPagamento']); + $nuVlrLancamento = number_format($rsPensaoJudicial->getCampo("liquido"), 2, ".", ""); + $nuVlrLancamentoTotal += $nuVlrLancamento; + $nuVlrLancamento = number_format($nuVlrLancamento, 2, "", ""); + + $arExportador[$inIndex]['codigo_registro'] = "E"; + $arExportador[$inIndex]['identificacao_cliente_empresa'] = $rsPensaoJudicial->getCampo("registro");//matricula servidor + $arExportador[$inIndex]['agencia_debito_credito'] = $arAgencia[0]; + $arExportador[$inIndex]['identificacao_cliente_codigo_operacao'] = $inCodOperacao; + $arExportador[$inIndex]['identificacao_cliente_numero_conta'] = $inNumeroConta; + $arExportador[$inIndex]['identificacao_cliente_dv_conta'] = $arConta[1]; + $arExportador[$inIndex]['data_vencimento'] = $arDataVencimento[2].$arDataVencimento[1].$arDataVencimento[0]; + $arExportador[$inIndex]['valor_debito_credito'] = $nuVlrLancamento; + $arExportador[$inIndex]['codigo_moeda'] = "03"; + $arExportador[$inIndex]['uso_empresa'] = $rsPensaoJudicial->getCampo("nom_cgm");//nome servidor + $arExportador[$inIndex]['reservado_futuro'] = ""; + $arExportador[$inIndex]['codigo_movimento'] = 2; + + $inIndex++; + $rsPensaoJudicial->proximo(); + } + + ##################################### REGISTRO A #################################### + + $arCabecalhoArquivo = array(); + $arDataMovimento = explode("/",$request->get('dtGeracaoArquivo')); + + $arCabecalhoArquivo[0]['codigo_registro'] = "A"; + $arCabecalhoArquivo[0]['codigo_remessa'] = 1; + $arCabecalhoArquivo[0]['codigo_convenio'] = $rsConfiguracaoConvenio->getCampo('cod_convenio_banco'); + $arCabecalhoArquivo[0]['nome_empresa'] = SistemaLegado::pegaConfiguracao('nom_prefeitura',2,Sessao::getExercicio()); + $arCabecalhoArquivo[0]['codigo_banco'] = 104; + $arCabecalhoArquivo[0]['nome_banco'] = $stNomBanco; + $arCabecalhoArquivo[0]['data_movimento'] = $arDataMovimento[2].$arDataMovimento[1].$arDataMovimento[0]; + $arCabecalhoArquivo[0]['numero_sequencial'] = $request->get('inNumeroSequencial'); + $arCabecalhoArquivo[0]['numero_versao_layout'] = '04'; + $arCabecalhoArquivo[0]['servico'] = "FOLHA PAGAMENTO"; + $arCabecalhoArquivo[0]['reservado_futuro'] = ""; + + $rsCabecalhoArquivo = new RecordSet(); + $rsCabecalhoArquivo->preenche($arCabecalhoArquivo); + $obExportador->roUltimoArquivo->addBloco($rsCabecalhoArquivo); + + $obExportador->roUltimoArquivo->roUltimoBloco->addColuna("codigo_registro"); + $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("CARACTER_ESPACOS_DIR"); + $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(1); + + $obExportador->roUltimoArquivo->roUltimoBloco->addColuna("codigo_remessa"); + $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("NUMERICO_ZEROS_ESQ"); + $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(1); + + $obExportador->roUltimoArquivo->roUltimoBloco->addColuna("codigo_convenio"); + $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("CARACTER_ESPACOS_DIR"); + $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(20); + + $obExportador->roUltimoArquivo->roUltimoBloco->addColuna("nome_empresa"); + $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("CARACTER_ESPACOS_DIR"); + $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(20); + + $obExportador->roUltimoArquivo->roUltimoBloco->addColuna("codigo_banco"); + $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("NUMERICO_ZEROS_ESQ"); + $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(3); + + $obExportador->roUltimoArquivo->roUltimoBloco->addColuna("nome_banco"); + $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("CARACTER_ESPACOS_DIR"); + $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(20); + + $obExportador->roUltimoArquivo->roUltimoBloco->addColuna("data_movimento"); + $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("NUMERICO_ZEROS_ESQ"); + $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(8); + + $obExportador->roUltimoArquivo->roUltimoBloco->addColuna("numero_sequencial"); + $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("NUMERICO_ZEROS_ESQ"); + $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(6); + + $obExportador->roUltimoArquivo->roUltimoBloco->addColuna("numero_versao_layout"); + $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("CARACTER_ESPACOS_DIR"); + $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(2); + + $obExportador->roUltimoArquivo->roUltimoBloco->addColuna("servico"); + $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("CARACTER_ESPACOS_DIR"); + $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(17); + + $obExportador->roUltimoArquivo->roUltimoBloco->addColuna("reservado_futuro"); + $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("CARACTER_ESPACOS_DIR"); + $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(52); + + ####################################### REGISTRO E ###################################### + + $rsExportador = new RecordSet(); + $rsExportador->preenche($arExportador); + Sessao::write('inQuantRegistros', ($rsExportador->getNumLinhas() == -1) ? 0 : $rsExportador->getNumLinhas()); + Sessao::write('nuLiquidoTotal', number_format($nuVlrLancamentoTotal,2,",",".")); + + $obExportador->roUltimoArquivo->addBloco($rsExportador); + + $obExportador->roUltimoArquivo->roUltimoBloco->addColuna("codigo_registro"); + $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("CARACTER_ESPACOS_DIR"); + $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(1); + + $obExportador->roUltimoArquivo->roUltimoBloco->addColuna("identificacao_cliente_empresa"); + $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("CARACTER_ESPACOS_DIR"); + $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(25); + + $obExportador->roUltimoArquivo->roUltimoBloco->addColuna("agencia_debito_credito"); + $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("NUMERICO_ZEROS_ESQ"); + $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(4); + + $obExportador->roUltimoArquivo->roUltimoBloco->addColuna("identificacao_cliente_codigo_operacao"); + $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("CARACTER_ESPACOS_DIR"); + $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(3); + + $obExportador->roUltimoArquivo->roUltimoBloco->addColuna("identificacao_cliente_numero_conta"); + $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("NUMERICO_ZEROS_ESQ"); + $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(8); + + $obExportador->roUltimoArquivo->roUltimoBloco->addColuna("identificacao_cliente_dv_conta"); + $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("CARACTER_ESPACOS_DIR"); + $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(1); + + $obExportador->roUltimoArquivo->roUltimoBloco->addColuna("reservado_futuro");//espaco em branco + $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("CARACTER_ESPACOS_DIR"); + $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(2); + + $obExportador->roUltimoArquivo->roUltimoBloco->addColuna("data_vencimento"); + $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("NUMERICO_ZEROS_ESQ"); + $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(8); + + $obExportador->roUltimoArquivo->roUltimoBloco->addColuna("valor_debito_credito"); + $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("VALOR_ZEROS_ESQ"); + $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(15); + + $obExportador->roUltimoArquivo->roUltimoBloco->addColuna("codigo_moeda"); + $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("CARACTER_ESPACOS_DIR"); + $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(2); + + $obExportador->roUltimoArquivo->roUltimoBloco->addColuna("uso_empresa"); + $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("CARACTER_ESPACOS_DIR"); + $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(60); + + $obExportador->roUltimoArquivo->roUltimoBloco->addColuna("reservado_futuro"); + $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("CARACTER_ESPACOS_DIR"); + $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(20); + + $obExportador->roUltimoArquivo->roUltimoBloco->addColuna("codigo_movimento"); + $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("NUMERICO_ZEROS_ESQ"); + $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(1); + + ##########################################RODAPÉ ARQUIVO######################################### + + $arRodapeArquivo[0]['codigo_registro'] = "Z"; + $arRodapeArquivo[0]["quant_registros"] = $inIndex+2; + $arRodapeArquivo[0]["soma_registros"] = number_format($nuVlrLancamentoTotal,2,'','');//garantido a formatacao dos zeros + $arRodapeArquivo[0]["reservado_futuro"] = ""; + + $rsRodapeArquivo = new RecordSet(); + $rsRodapeArquivo->preenche($arRodapeArquivo); + $obExportador->roUltimoArquivo->addBloco($rsRodapeArquivo); + + $obExportador->roUltimoArquivo->roUltimoBloco->addColuna("codigo_registro"); + $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("CARACTER_ESPACOS_DIR"); + $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(1); + + $obExportador->roUltimoArquivo->roUltimoBloco->addColuna("quant_registros"); + $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("NUMERICO_ZEROS_ESQ"); + $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(6); + + $obExportador->roUltimoArquivo->roUltimoBloco->addColuna("reservado_futuro_num"); + $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("VALOR_ZEROS_ESQ"); + $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(17); + + $obExportador->roUltimoArquivo->roUltimoBloco->addColuna("soma_registros"); + $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("VALOR_ZEROS_ESQ"); + $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(17); + + $obExportador->roUltimoArquivo->roUltimoBloco->addColuna("reservado_futuro"); + $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTipoDado("CARACTER_ESPACOS_DIR"); + $obExportador->roUltimoArquivo->roUltimoBloco->roUltimaColuna->setTamanhoFixo(109); + + return $obExportador; } + ?> diff --git a/gestaoRH/fontes/PHP/IMA/instancias/pasep/PRExportarPASEP.php b/gestaoRH/fontes/PHP/IMA/instancias/pasep/PRExportarPASEP.php index 8231630..127e974 100755 --- a/gestaoRH/fontes/PHP/IMA/instancias/pasep/PRExportarPASEP.php +++ b/gestaoRH/fontes/PHP/IMA/instancias/pasep/PRExportarPASEP.php @@ -31,7 +31,7 @@ * Casos de uso: uc-04.08.23 - $Id: PRExportarPASEP.php 59612 2014-09-02 12:00:51Z gelson $ + $Id: PRExportarPASEP.php 63836 2015-10-22 14:06:51Z franver $ */ include_once '../../../../../../gestaoAdministrativa/fontes/PHP/pacotes/FrameworkHTML.inc.php'; @@ -606,7 +606,6 @@ switch ($_POST["inEtapaProcessamento"]) { } $arquivoImportacaoAux->Fechar(); if ($inContaRepeticaoes < 1) { - //SistemaLegado::mostraVar($arLinhas); $stFiltro = " AND trim(translate(sw_cgm_pessoa_fisica.servidor_pis_pasep,'.,-','')) = trim('".$inPisPasep."')"; $obTIMAOcorrenciaDetalhe910->recuperaDadosServidor($rsServidor,$stFiltro); diff --git a/gestaoRH/fontes/PHP/calendario/instancias/calendario/PRManterCalendario.php b/gestaoRH/fontes/PHP/calendario/instancias/calendario/PRManterCalendario.php index 1c99a55..f231607 100755 --- a/gestaoRH/fontes/PHP/calendario/instancias/calendario/PRManterCalendario.php +++ b/gestaoRH/fontes/PHP/calendario/instancias/calendario/PRManterCalendario.php @@ -86,9 +86,6 @@ switch ($stAcao) { } } - //SistemaLegado::mostravar($obRegra->getDescricao()); - //die; - $obErro = $obRegra->Salvar(); if ( !$obErro->ocorreu() ) { sistemaLegado::alertaAviso($pgForm,"Calendário inserido com sucesso!".$request->get('inCodFeriado'),"inserir","aviso", Sessao::getId(), "../"); diff --git a/gestaoRH/fontes/PHP/diarias/instancias/concessao/OCConcederDiarias.php b/gestaoRH/fontes/PHP/diarias/instancias/concessao/OCConcederDiarias.php index 773fa04..93e58bf 100644 --- a/gestaoRH/fontes/PHP/diarias/instancias/concessao/OCConcederDiarias.php +++ b/gestaoRH/fontes/PHP/diarias/instancias/concessao/OCConcederDiarias.php @@ -32,7 +32,7 @@ * @ignore - $Id: OCConcederDiarias.php 59612 2014-09-02 12:00:51Z gelson $ + $Id: OCConcederDiarias.php 63836 2015-10-22 14:06:51Z franver $ * Casos de uso: uc-04.09.02 */ @@ -365,7 +365,6 @@ function incluirConcessao() $arConcessoes[] = $arConcessao; Sessao::write('arConcessoes', $arConcessoes); - //SistemaLegado::mostraVar($arConcessoes); $stJs .= "parent.frames[2].limpaFormularioConcessao();"; $stJs .= montaListaConcessoes($arConcessoes); } else { @@ -458,8 +457,6 @@ function alterarConcessao() $arConcessoes[$arConcessaoKey] = $arConcessao; Sessao::write('arConcessoes', $arConcessoes); - //SistemaLegado::mostraVar($arConcessoes); - $stJs .= "parent.frames[2].limpaFormularioConcessao();"; $stJs .= montaListaConcessoes($arConcessoes); break; diff --git a/gestaoRH/fontes/PHP/diarias/instancias/configuracao/OCTipoDiarias.php b/gestaoRH/fontes/PHP/diarias/instancias/configuracao/OCTipoDiarias.php index ea2e39d..fad2abd 100644 --- a/gestaoRH/fontes/PHP/diarias/instancias/configuracao/OCTipoDiarias.php +++ b/gestaoRH/fontes/PHP/diarias/instancias/configuracao/OCTipoDiarias.php @@ -32,7 +32,7 @@ * @ignore - $Id: OCTipoDiarias.php 59612 2014-09-02 12:00:51Z gelson $ + $Id: OCTipoDiarias.php 63836 2015-10-22 14:06:51Z franver $ * Casos de uso: uc-04.09.01 */ @@ -437,7 +437,6 @@ function submeter() return $stJs; } -//SistemaLegado::mostraVar($_REQUEST); switch ($_REQUEST['stCtrl']) { case "gerarListaTipoDiaria": $stJs .= gerarListaTipoDiaria(); diff --git a/gestaoRH/fontes/PHP/estagio/instancias/relatorios/PRReciboPagamento.php b/gestaoRH/fontes/PHP/estagio/instancias/relatorios/PRReciboPagamento.php index e31733e..2be9f2a 100644 --- a/gestaoRH/fontes/PHP/estagio/instancias/relatorios/PRReciboPagamento.php +++ b/gestaoRH/fontes/PHP/estagio/instancias/relatorios/PRReciboPagamento.php @@ -31,7 +31,7 @@ * Casos de uso: uc-04.07.04 - $Id: PRReciboPagamento.php 59612 2014-09-02 12:00:51Z gelson $ + $Id: PRReciboPagamento.php 63836 2015-10-22 14:06:51Z franver $ */ include_once '../../../../../../gestaoAdministrativa/fontes/PHP/framework/include/valida.inc.php'; @@ -93,8 +93,6 @@ $stCompetencia = $inMes."/".$inAno; $stFiltro = " AND to_char(FPM.dt_final,'mm/yyyy') = '".$stCompetencia."'"; $obTFolhaPagamentoPeriodoMovimentacao->recuperaPeriodoMovimentacao($rsPeriodoMovimentacao,$stFiltro); ### -//sistemaLegado::mostravar($rsPeriodoMovimentacao->getCampo("cod_periodo_movimentacao")); -//die('Fim!'); ### $preview = new PreviewBirt(4,39,1); $preview->setVersaoBirt("2.5.0"); diff --git a/gestaoRH/fontes/PHP/folhaPagamento/classes/componentes/IBscEvento.class.php b/gestaoRH/fontes/PHP/folhaPagamento/classes/componentes/IBscEvento.class.php index 8f472fd..b60eb28 100644 --- a/gestaoRH/fontes/PHP/folhaPagamento/classes/componentes/IBscEvento.class.php +++ b/gestaoRH/fontes/PHP/folhaPagamento/classes/componentes/IBscEvento.class.php @@ -245,6 +245,7 @@ class IBscEvento $this->obBscInnerEvento->obCampoCod->setPreencheComZeros ( "E" ); $this->obBscInnerEvento->obCampoCod->setMascara ( $stMascaraEvento ); $this->obBscInnerEvento->obCampoDescrHidden->setName( "hdnDescEvento" ); + $this->obBscInnerEvento->obCampoDescrHidden->setId ( "hdnDescEvento" ); $this->obTxtValor = new Numerico; $this->obTxtValor->setName ( "nuValorEvento" ); diff --git a/gestaoRH/fontes/PHP/folhaPagamento/classes/mapeamento/TFolhaPagamentoConcessaoDecimo.class.php b/gestaoRH/fontes/PHP/folhaPagamento/classes/mapeamento/TFolhaPagamentoConcessaoDecimo.class.php index e6ce214..4e0b091 100644 --- a/gestaoRH/fontes/PHP/folhaPagamento/classes/mapeamento/TFolhaPagamentoConcessaoDecimo.class.php +++ b/gestaoRH/fontes/PHP/folhaPagamento/classes/mapeamento/TFolhaPagamentoConcessaoDecimo.class.php @@ -436,4 +436,71 @@ function montaRecuperaContratosParaConcessaoDecimoFuncao() return $stSql; } + +function recuperaContratosAdiantamentoDecidoMesAniversario(&$rsRecordSet,$stFiltro="",$stOrder="",$boTransacao="") +{ + $obErro = new Erro; + $obConexao = new Conexao; + $rsRecordSet = new RecordSet; + $stOrdem = ( $stOrdem != "" ) ? " ORDER BY ".$stOrdem : " ORDER BY cod_contrato"; + $stSql = $this->montaRecuperaContratosAdiantamentoDecidoMesAniversario().$stFiltro.$stOrdem; + $this->setDebug($stSql); + $obErro = $obConexao->executaSQL( $rsRecordSet, $stSql, $boTransacao ); + + return $obErro; } + +function montaRecuperaContratosAdiantamentoDecidoMesAniversario() +{ + $stSql = " + SELECT contrato.* + , servidor.numcgm + , sw_cgm.nom_cgm + , TO_CHAR(sw_cgm_pessoa_fisica.dt_nascimento,'mm') as mes_nascimento + FROM pessoal.contrato + INNER JOIN pessoal.servidor_contrato_servidor + ON servidor_contrato_servidor.cod_contrato = contrato.cod_contrato + INNER JOIN pessoal.servidor + ON servidor.cod_servidor = servidor_contrato_servidor.cod_servidor + INNER JOIN sw_cgm + ON sw_cgm.numcgm = servidor.numcgm + INNER JOIN sw_cgm_pessoa_fisica + ON sw_cgm_pessoa_fisica.numcgm = sw_cgm.numcgm + AND TO_CHAR(sw_cgm_pessoa_fisica.dt_nascimento,'mm') = '".$this->getDado('mes_aniversario')."' + INNER JOIN ultimo_contrato_servidor_orgao('".Sessao::getEntidade()."', ".$this->getDado("cod_periodo_movimentacao")." ) as contrato_servidor_orgao + ON contrato_servidor_orgao.cod_contrato = contrato.cod_contrato + + WHERE NOT EXISTS ( SELECT 1 + FROM pessoal.contrato_servidor_caso_causa + WHERE contrato_servidor_caso_causa.cod_contrato = contrato.cod_contrato + ) + + UNION + + SELECT contrato.* + , pensionista.numcgm + , sw_cgm.nom_cgm + , TO_CHAR(sw_cgm_pessoa_fisica.dt_nascimento,'mm') as mes_nascimento + FROM pessoal.contrato + INNER JOIN pessoal.contrato_pensionista + ON contrato_pensionista.cod_contrato = contrato.cod_contrato + INNER JOIN pessoal.pensionista + ON pensionista.cod_pensionista = contrato_pensionista.cod_pensionista + AND pensionista.cod_contrato_cedente = contrato_pensionista.cod_contrato_cedente + INNER JOIN sw_cgm + ON sw_cgm.numcgm = pensionista.numcgm + INNER JOIN sw_cgm_pessoa_fisica + ON sw_cgm_pessoa_fisica.numcgm = sw_cgm.numcgm + AND TO_CHAR(sw_cgm_pessoa_fisica.dt_nascimento,'mm') = '".$this->getDado('mes_aniversario')."' + INNER JOIN ultimo_contrato_pensionista_orgao('".Sessao::getEntidade()."', ".$this->getDado("cod_periodo_movimentacao")." ) as contrato_servidor_orgao + ON contrato_servidor_orgao.cod_contrato = contrato.cod_contrato + + "; + + + return $stSql; +} + + + +}//END OF CLASS diff --git a/gestaoRH/fontes/PHP/folhaPagamento/classes/negocio/RFolhaPagamentoCalcularFolhas.class.php b/gestaoRH/fontes/PHP/folhaPagamento/classes/negocio/RFolhaPagamentoCalcularFolhas.class.php index df4dd91..59a4098 100644 --- a/gestaoRH/fontes/PHP/folhaPagamento/classes/negocio/RFolhaPagamentoCalcularFolhas.class.php +++ b/gestaoRH/fontes/PHP/folhaPagamento/classes/negocio/RFolhaPagamentoCalcularFolhas.class.php @@ -282,6 +282,8 @@ public function calcularFolha($boRecisaoContrato = false) if (!$boRecisaoContrato) { $pgList = "LS".$this->getNameProgram().".php?".Sessao::getId(); SistemaLegado::alertaAviso($pgList,"Cálculo concluído","incluir","aviso", Sessao::getId(), "../"); + }else{ + SistemaLegado::LiberaFrames(); } } else { SistemaLegado::LiberaFrames(); @@ -844,5 +846,303 @@ public function gerarSpanErroCalculo() return $stJs; } +public function processarRegistroEvento() +{ + include_once ( CAM_GRH_FOL_MAPEAMENTO."TFolhaPagamentoEvento.class.php" ); + include_once ( CAM_GRH_FOL_MAPEAMENTO."TFolhaPagamentoEventoCalculado.class.php" ); + include_once ( CAM_GRH_FOL_MAPEAMENTO."TFolhaPagamentoEventoCalculadoDependente.class.php" ); + include_once ( CAM_GRH_FOL_MAPEAMENTO."TFolhaPagamentoLogErroCalculo.class.php" ); + include_once ( CAM_GRH_FOL_MAPEAMENTO."TFolhaPagamentoContratoServidorPeriodo.class.php" ); + + Sessao::setTrataExcecao(true); + $obTPessoalContrato = new TPessoalContrato; + $stFiltro = " WHERE registro = ".Sessao::read('inContrato'); + $obTPessoalContrato->recuperaTodos($rsContrato,$stFiltro); + $obTFolhaPagamentoPeriodoMovimentacao = new TFolhaPagamentoPeriodoMovimentacao; + $obTFolhaPagamentoPeriodoMovimentacao->recuperaUltimaMovimentacao($rsUltimaMovimentacao); + + $obTFolhaPagamentoContratoServidorPeriodo = new TFolhaPagamentoContratoServidorPeriodo; + $obTFolhaPagamentoRegistroEventoPeriodo = new TFolhaPagamentoRegistroEventoPeriodo; + $obTFolhaPagamentoRegistroEventoPeriodo->obTFolhaPagamentoContratoServidorPeriodo = &$obTFolhaPagamentoContratoServidorPeriodo; + $obTFolhaPagamentoRegistroEvento = new TFolhaPagamentoRegistroEvento; + $obTFolhaPagamentoRegistroEvento->obTFolhaPagamentoRegistroEventoPeriodo = &$obTFolhaPagamentoRegistroEventoPeriodo; + $obTFolhaPagamentoUltimoRegistroEvento = new TFolhaPagamentoUltimoRegistroEvento; + $obTFolhaPagamentoUltimoRegistroEvento->obTFolhaPagamentoRegistroEvento = &$obTFolhaPagamentoRegistroEvento; + $obTFolhaPagamentoRegistroEventoParcela = new TFolhaPagamentoRegistroEventoParcela; + $obTFolhaPagamentoRegistroEventoParcela->obTFolhaPagamentoUltimoRegistroEvento = &$obTFolhaPagamentoUltimoRegistroEvento; + $obTFolhaPagamentoLogErroCalculo = new TFolhaPagamentoLogErroCalculo; + $obTFolhaPagamentoLogErroCalculo->obTFolhaPagamentoUltimoRegistroEvento = &$obTFolhaPagamentoUltimoRegistroEvento; + $obTFolhaPagamentoEventoCalculado = new TFolhaPagamentoEventoCalculado; + $obTFolhaPagamentoEventoCalculado->obTFolhaPagamentoUltimoRegistroEvento = &$obTFolhaPagamentoUltimoRegistroEvento; + $obTFolhaPagamentoEventoCalculadoDependente = new TFolhaPagamentoEventoCalculadoDependente; + $obTFolhaPagamentoEventoCalculadoDependente->obTFolhaPagamentoEventoCalculado = &$obTFolhaPagamentoEventoCalculado; + + $stFiltro = " AND cod_contrato = ".$rsContrato->getCampo("cod_contrato"); + $stFiltro .= " AND cod_periodo_movimentacao = ".$rsUltimaMovimentacao->getCampo("cod_periodo_movimentacao"); + $obTFolhaPagamentoUltimoRegistroEvento->recuperaRelacionamento($rsRegistroEventoPeriodo,$stFiltro); + while (!$rsRegistroEventoPeriodo->eof()) { + $obTFolhaPagamentoUltimoRegistroEvento->setDado("cod_registro",$rsRegistroEventoPeriodo->getCampo("cod_registro")); + $obTFolhaPagamentoUltimoRegistroEvento->setDado("cod_evento",$rsRegistroEventoPeriodo->getCampo("cod_evento")); + $obTFolhaPagamentoUltimoRegistroEvento->setDado("desdobramento",$rsRegistroEventoPeriodo->getCampo("desdobramento")); + $obTFolhaPagamentoUltimoRegistroEvento->setDado("timestamp",$rsRegistroEventoPeriodo->getCampo("timestamp")); + $obTFolhaPagamentoUltimoRegistroEvento->deletarUltimoRegistroEvento(); + $rsRegistroEventoPeriodo->proximo(); + } + $obTFolhaPagamentoRegistroEventoPeriodo->setDado("cod_registro",""); + + $obTFolhaPagamentoContratoServidorPeriodo->setDado("cod_contrato",$rsContrato->getCampo("cod_contrato")); + $obTFolhaPagamentoContratoServidorPeriodo->setDado("cod_periodo_movimentacao",$rsUltimaMovimentacao->getCampo("cod_periodo_movimentacao")); + $obTFolhaPagamentoContratoServidorPeriodo->recuperaPorChave($rsContratoServidorPeriodo); + if ( $rsContratoServidorPeriodo->getNumLinhas() < 0 ) { + $obTFolhaPagamentoContratoServidorPeriodo->inclusao(); + } + + //Inclusão de eventos fixos + $arEventosFixos = Sessao::read("eventosFixos"); + if (is_array($arEventosFixos)) { + foreach ($arEventosFixos as $arEvento) { + $stFiltro = " WHERE codigo = '".$arEvento["inCodigo"]."'"; + $obTFolhaPagamentoEvento = new TFolhaPagamentoEvento; + $obTFolhaPagamentoEvento->recuperaTodos($rsEvento,$stFiltro); + + $nuValor = ( $arEvento['nuValor'] != "" ) ? $arEvento['nuValor'] : 0; + $nuQuantidade = ( $arEvento['nuQuantidade'] != "" ) ? $arEvento['nuQuantidade'] : 0; + + $obTFolhaPagamentoRegistroEvento->setDado("cod_evento" ,$rsEvento->getCampo("cod_evento")); + $obTFolhaPagamentoRegistroEvento->setDado("valor" ,$nuValor); + $obTFolhaPagamentoRegistroEvento->setDado("quantidade" ,$nuQuantidade); + $obTFolhaPagamentoRegistroEvento->setDado("proporcional",false); + $obTFolhaPagamentoRegistroEventoPeriodo->inclusao(); + $obTFolhaPagamentoRegistroEvento->inclusao(); + $obTFolhaPagamentoUltimoRegistroEvento->inclusao(); + $obTFolhaPagamentoRegistroEventoPeriodo->setDado("cod_registro",""); + } + } + + //Inclusão de eventos variáveis + $arEventosVariaveis = Sessao::read("eventosVariaveis"); + if (is_array($arEventosVariaveis)) { + foreach ($arEventosVariaveis as $arEvento) { + $stFiltro = " WHERE codigo = '".$arEvento["inCodigo"]."'"; + $obTFolhaPagamentoEvento = new TFolhaPagamentoEvento; + $obTFolhaPagamentoEvento->recuperaTodos($rsEvento,$stFiltro); + + $nuValor = ( $arEvento['nuValor'] != "" ) ? $arEvento['nuValor'] : 0; + $nuQuantidade = ( $arEvento['nuQuantidade'] != "" ) ? $arEvento['nuQuantidade'] : 0; + + $obTFolhaPagamentoRegistroEvento->setDado("cod_evento" ,$rsEvento->getCampo("cod_evento")); + $obTFolhaPagamentoRegistroEvento->setDado("valor" ,$nuValor); + $obTFolhaPagamentoRegistroEvento->setDado("quantidade" ,$nuQuantidade); + $obTFolhaPagamentoRegistroEvento->setDado("proporcional",false); + $obTFolhaPagamentoRegistroEventoPeriodo->inclusao(); + $obTFolhaPagamentoRegistroEvento->inclusao(); + $obTFolhaPagamentoUltimoRegistroEvento->inclusao(); + if ($arEvento['inQuantidadeParc'] != "") { + $inMesCarencia = ( $arEvento['inMesCarencia'] != "" ) ? $arEvento['inMesCarencia'] : 0; + + $obTFolhaPagamentoRegistroEventoParcela->setDado("parcela" , $arEvento['inQuantidadeParc']); + $obTFolhaPagamentoRegistroEventoParcela->setDado("mes_carencia" , $inMesCarencia); + $obTFolhaPagamentoRegistroEventoParcela->inclusao(); + } + $obTFolhaPagamentoRegistroEventoPeriodo->setDado("cod_registro",""); + } + } + + //Inclusão de eventos proporcionais + $arEventosProporcionais = Sessao::read("eventosProporcionais"); + if (is_array($arEventosProporcionais)) { + foreach ($arEventosProporcionais as $arEvento) { + $stFiltro = " WHERE codigo = '".$arEvento["inCodigo"]."'"; + $obTFolhaPagamentoEvento = new TFolhaPagamentoEvento; + $obTFolhaPagamentoEvento->recuperaTodos($rsEvento,$stFiltro); + + $nuValor = ( $arEvento['nuValor'] != "" ) ? $arEvento['nuValor'] : 0; + $nuQuantidade = ( $arEvento['nuQuantidade'] != "" ) ? $arEvento['nuQuantidade'] : 0; + + $obTFolhaPagamentoRegistroEvento->setDado("cod_evento" ,$rsEvento->getCampo("cod_evento")); + $obTFolhaPagamentoRegistroEvento->setDado("valor" ,$nuValor); + $obTFolhaPagamentoRegistroEvento->setDado("quantidade" ,$nuQuantidade); + $obTFolhaPagamentoRegistroEvento->setDado("proporcional",true); + $obTFolhaPagamentoRegistroEventoPeriodo->inclusao(); + $obTFolhaPagamentoRegistroEvento->inclusao(); + $obTFolhaPagamentoUltimoRegistroEvento->inclusao(); + + if ($arEvento['inQuantidadeParc'] != "") { + $inMesCarencia = ( $arEvento['inMesCarencia'] != "" ) ? $arEvento['inMesCarencia'] : 0; + + $obTFolhaPagamentoRegistroEventoParcela->setDado("parcela" ,$arEvento['inQuantidadeParc']); + $obTFolhaPagamentoRegistroEventoParcela->setDado("mes_carencia" , $inMesCarencia); + $obTFolhaPagamentoRegistroEventoParcela->inclusao(); + } + $obTFolhaPagamentoRegistroEventoPeriodo->setDado("cod_registro",""); + } + } + + //Para funcionamento correto dessa PL, foi inserido no registro de evento uma verificação + //que identifica se o contrato possui registros de eventos, caso não possua, é excluído + //o dado da tabela folhapagamento.deducao_dependente que identifica a utilização de valor + //de dedução de dependente. + if (count($arEventosFixos) == 0 AND count($arEventosVariaveis) == 0 AND count($arEventosProporcionais) == 0) { + $stFiltro = " AND contrato.registro = ".Sessao::read('inContrato'); + $obTPessoalContrato->recuperaCgmDoRegistro($rsCGM,$stFiltro); + + include_once(CAM_GRH_FOL_MAPEAMENTO."TFolhaPagamentoDeducaoDependente.class.php"); + $obTFolhaPagamentoDeducaoDependente = new TFolhaPagamentoDeducaoDependente(); + $obTFolhaPagamentoDeducaoDependente->setDado("numcgm",$rsCGM->getCampo("numcgm")); + $obTFolhaPagamentoDeducaoDependente->setDado("cod_periodo_movimentacao",$rsUltimaMovimentacao->getCampo("cod_periodo_movimentacao")); + $obTFolhaPagamentoDeducaoDependente->setDado("cod_tipo",2); + $obTFolhaPagamentoDeducaoDependente->exclusao(); + } + + Sessao::encerraExcecao(); + } + +public function processarPreviaCalculoSalario($arNumCGM,$stTipoFiltro) +{ + include_once '../../../../../../gestaoAdministrativa/fontes/PHP/framework/include/cabecalho.inc.php'; + $this->setTipoFiltro( $stTipoFiltro ); + $this->setCodigos( $arNumCGM ); + //Verificação de configuração de tabelas. + //Caso exista uma que não esteja configurada estoura erro. + //BUSCA COMPETENCIA + include_once(CAM_GRH_FOL_NEGOCIO."RFolhaPagamentoPeriodoMovimentacao.class.php"); + $obPeriodoMovimentacao = new RFolhaPagamentoPeriodoMovimentacao; + $obPeriodoMovimentacao->listarUltimaMovimentacao($rsUltimaMovimentacao); + $stCompetencia = $rsUltimaMovimentacao->getCampo('dt_final'); + //VERIFICA SE EXISTE CÁLCULO DE PENSÃO ALIMENTÍCIA CONFIGURADA + include_once ( CAM_GRH_FOL_MAPEAMENTO.'TFolhaPagamentoPensaoEvento.class.php' ); + $obTFolhaPagamentoPensaoEvento = new TFolhaPagamentoPensaoEvento; + $obTFolhaPagamentoPensaoEvento->recuperaTodos($rsPensaoEvento); + if ($rsPensaoEvento->getNumLinhas() < 0) { + SistemaLegado::exibeAviso(urlencode("Configuração do Cálculo de Pensão Alimentícia inexistente!"),"n_incluir","erro"); + SistemaLegado::LiberaFrames(); + exit(); + } + //VERIFICA SE EXISTE CÁLCULO DE FÉRIAS + include_once ( CAM_GRH_FOL_MAPEAMENTO."TFolhaPagamentoFeriasEvento.class.php" ); + $obTFolhaPagamentoFeriasEvento = new TFolhaPagamentoFeriasEvento; + $obTFolhaPagamentoFeriasEvento->recuperaTodos($rsFeriasEvento); + if ($rsFeriasEvento->getNumLinhas() < 0) { + SistemaLegado::exibeAviso(urlencode("Configuração do Cálculo de Férias inexistente!"),"n_incluir","erro"); + SistemaLegado::LiberaFrames(); + exit(); + } + //VERIFICA SE EXISTE CÁLCULO DE 13º + include_once ( CAM_GRH_FOL_MAPEAMENTO."TFolhaPagamentoDecimoEvento.class.php" ); + $obTFolhaPagamentoDecimoEvento = new TFolhaPagamentoDecimoEvento; + $obTFolhaPagamentoDecimoEvento->recuperaTodos($rsDecimoEvento); + if ($rsDecimoEvento->getNumLinhas() < 0) { + SistemaLegado::exibeAviso(urlencode("Configuração Cálculo de 13º Salário inexistente!"),"n_incluir","erro"); + SistemaLegado::LiberaFrames(); + exit(); + } + //VERIFICA SE O CÁLCULO PREVIDÊNCIA ESTÁ EM VIGÊNCIA + include_once ( CAM_GRH_FOL_MAPEAMENTO."TFolhaPagamentoPrevidenciaPrevidencia.class.php" ); + $obTFolhaPagamentoPrevidenciaPrevidencia = new TFolhaPagamentoPrevidenciaPrevidencia; + $obTFolhaPagamentoPrevidenciaPrevidencia->recuperaTodos($rsPrevidenciaPrevidencia); + $rsPrevidenciaPrevidencia->setUltimoElemento(); + if ($rsPrevidenciaPrevidencia->getCampo("vigencia") > $stCompetencia || $rsPrevidenciaPrevidencia->getCampo("vigencia") == "") { + SistemaLegado::exibeAviso(urlencode("Configuração da Previdência inexistente ou não está em vigor para competência!"),"n_incluir","erro"); + SistemaLegado::LiberaFrames(); + exit(); + } + //VERIFICA SE O CÁLCULO SALÁRIO FAMÍLIA ESTÁ EM VIGOR + include_once ( CAM_GRH_FOL_MAPEAMENTO."TFolhaPagamentoSalarioFamilia.class.php" ); + $obTFolhaPagamentoSalarioFamilia = new TFolhaPagamentoSalarioFamilia; + $obTFolhaPagamentoSalarioFamilia->recuperaTodos($rsSalarioFamilia); + $rsSalarioFamilia->setUltimoElemento(); + if ($rsSalarioFamilia->getCampo("vigencia") > $stCompetencia || $rsSalarioFamilia->getCampo("vigencia") == "") { + SistemaLegado::exibeAviso(urlencode("Configuração do Salário Família inexistente ou não está em vigor para competência!"),"n_incluir","erro"); + SistemaLegado::LiberaFrames(); + exit(); + } + //VERIFICA SE O CÁLCULO IRRF ESTÁ EM VIGOR + include_once ( CAM_GRH_FOL_MAPEAMENTO."TFolhaPagamentoTabelaIrrf.class.php" ); + $obTFolhaPagamentoTabelaIRRF = new TFolhaPagamentoTabelaIrrf; + $obTFolhaPagamentoTabelaIRRF->recuperaUltimaVigencia($rsRecordset); + if (SistemaLegado::dataToBr($rsRecordset->getCampo("vigencia")) > $stCompetencia || $rsRecordset->getCampo("vigencia") == "") { + SistemaLegado::exibeAviso(urlencode("Configuração da Tabela IRRF inexistente ou não está em vigor para competência!"),"n_incluir","erro"); + SistemaLegado::LiberaFrames(); + exit(); + } + //VERIFICA SE O CÁLCULO DO FGTS ESTÁ EM VIGOR + include_once ( CAM_GRH_FOL_MAPEAMENTO."TFolhaPagamentoFgts.class.php" ); + $obTFolhaPagamentoFgts = new TFolhaPagamentoFgts; + $obTFolhaPagamentoFgts->recuperaTodos($rsRecordSet); + $rsRecordSet->setUltimoElemento(); + if ($rsRecordSet->getCampo("vigencia") > $stCompetencia || $rsRecordSet->getCampo("vigencia") == "") { + SistemaLegado::exibeAviso(urlencode("Configuração do FGTS inexistente ou não está em vigor para competência!"),"n_incluir","erro"); + SistemaLegado::LiberaFrames(); + exit(); + } + $this->setRecalcular(Sessao::read("rsRecalcular")); + $this->setCalcularSalario(); + //Evitando o redirecionamento da pagina + $this->calcularFolhaPreviaFolha(); +} + +public function calcularFolhaPreviaFolha() +{ + $obErro = new erro; + $obTransacao = new Transacao; + $rsContratos = $this->getCodContratosFiltro(); + if ($this->getExcluirCalculados()) { + $obErro = $this->detetarInformacoesDoCalculo($rsContratos); + $rsContratos->setPrimeiroElemento(); + } + + if ($rsContratos->getNumLinhas() < 0) { + $obErro->setDescricao("Não há contratos a serem calculados."); + } + foreach ($this->getDesdobramentos() as $stDesdobramento) { + while (!$rsContratos->eof() && !$obErro->ocorreu()) { + $boFlagTransacao = false; + $boTransacao = ""; + $obErro = $obTransacao->abreTransacao( $boFlagTransacao, $boTransacao ); + if ( !$obErro->ocorreu() ) { + $inCodContrato = $rsContratos->getCampo("cod_contrato"); + + include_once(CAM_GRH_FOL_MAPEAMENTO."FFolhaPagamentoCalculaFolha.class.php"); + $obFFolhaPagamentoCalculaFolha = new FFolhaPagamentoCalculaFolha(); + $obFFolhaPagamentoCalculaFolha->setDado('cod_contrato',$inCodContrato); + $obFFolhaPagamentoCalculaFolha->setDado('boErro',($this->getTipoFiltro()=="recalcular")?'t':'f'); + $obErro = $obFFolhaPagamentoCalculaFolha->calculaFolha($rsCalcula,$boTransacao); + + //Se isso ocorreu deverá ser atualizado a tabela como o erro que ocorreu + if ($this->getTipoFiltro() == "recalcular" and $rsCalcula->getNumLinhas() == -1) { + $stErro = $obErro->getDescricao(); + $obTransacao->fechaTransacao( $boFlagTransacao, $boTransacao, $obErro ); + $boFlagTransacao = false; + $boTransacao = ""; + $obErro = $obTransacao->abreTransacao( $boFlagTransacao, $boTransacao ); + include_once(CAM_GRH_FOL_MAPEAMENTO."TFolhaPagamentoLogErroCalculo.class.php"); + $obTFolhaPagamentoLogErroCalculo = new TFolhaPagamentoLogErroCalculo; + $stFiltro = " AND registro_evento_periodo.cod_contrato = ".$inCodContrato; + $obErro = $obTFolhaPagamentoLogErroCalculo->recuperaLogErroCalculo($rsLogErro,$stFiltro,"",$boTransacao); + if ( !$obErro->ocorreu() ) { + $obTFolhaPagamentoLogErroCalculo->setDado('cod_evento',$rsLogErro->getCampo('cod_evento')); + $obTFolhaPagamentoLogErroCalculo->setDado('cod_registro',$rsLogErro->getCampo('cod_registro')); + $obTFolhaPagamentoLogErroCalculo->setDado('cod_configuracao',$rsLogErro->getCampo('cod_configuracao')); + $obTFolhaPagamentoLogErroCalculo->setDado('desdobramento',$rsLogErro->getCampo('desdobramento')); + $obTFolhaPagamentoLogErroCalculo->setDado('erro',substr($stErro,0,2000)); + $obErro = $obTFolhaPagamentoLogErroCalculo->alteracao($boTransacao); + } + } + } + $obTransacao->fechaTransacao( $boFlagTransacao, $boTransacao, $obErro ); + $rsContratos->proximo(); + } + } + + if ( $obErro->ocorreu() ) { + SistemaLegado::LiberaFrames(); + SistemaLegado::exibeAviso(urlencode($obErro->getDescricao()),"n_incluir","erro"); + } else { + SistemaLegado::LiberaFrames(); + } +} + + +}//End Of Class ?> diff --git a/gestaoRH/fontes/PHP/folhaPagamento/classes/negocio/RFolhaPagamentoPeriodoMovimentacao.class.php b/gestaoRH/fontes/PHP/folhaPagamento/classes/negocio/RFolhaPagamentoPeriodoMovimentacao.class.php index 09de7b5..d7c6942 100644 --- a/gestaoRH/fontes/PHP/folhaPagamento/classes/negocio/RFolhaPagamentoPeriodoMovimentacao.class.php +++ b/gestaoRH/fontes/PHP/folhaPagamento/classes/negocio/RFolhaPagamentoPeriodoMovimentacao.class.php @@ -271,12 +271,23 @@ class RFolhaPagamentoPeriodoMovimentacao public function abrirPeriodoMovimentacao($boTransacao = "") { + $boFlagTransacao = false; $obErro = $this->obTransacao->abreTransacao( $boFlagTransacao, $boTransacao ); $this->obTFolhaPagamentoPeriodoMovimentacao->setDado( "dt_inicial" , $this->getDtInicial() ); $this->obTFolhaPagamentoPeriodoMovimentacao->setDado( "dt_final" , $this->getDtFinal() ); $this->obTFolhaPagamentoPeriodoMovimentacao->setDado( "exercicio" , Sessao::getExercicio() ); $this->obTFolhaPagamentoPeriodoMovimentacao->setDado( "cod_entidade" , Sessao::getEntidade() ); $obErro = $this->obTFolhaPagamentoPeriodoMovimentacao->abrirPeriodoMovimentacao($boTransacao); + + //Validar configuracao se deve realizar o adiatamento do 13 no mes do aniversario do servidor + //Gestão Recursos Humanos :: Folha de Pagamento :: Configuração :: Configurar Cálculo de 13º Salário + if ( !$obErro->ocorreu() ) { + $boAdiantamenteMesAniversario = SistemaLegado::pegaConfiguracao('adiantamento_13_salario'.Sessao::getEntidade(),27,Sessao::getExercicio(), $boTransacao ); + if ( $boAdiantamenteMesAniversario == 'true') { + $obErro = $this->gerarAdiantamento13MesAniversario($boTransacao); + } + } + $this->obTransacao->fechaTransacao( $boFlagTransacao, $boTransacao, $obErro, $this->obTFolhaPagamentoPeriodoMovimentacao ); return $obErro; @@ -299,6 +310,14 @@ class RFolhaPagamentoPeriodoMovimentacao public function cancelarPeriodoMovimentacao($boTransacao = "") { $obErro = $this->obTransacao->abreTransacao( $boFlagTransacao, $boTransacao ); + //Validar configuracao se deve realizar o adiatamento do 13 no mes do aniversario do servidor + //Gestão Recursos Humanos :: Folha de Pagamento :: Configuração :: Configurar Cálculo de 13º Salário + if ( !$obErro->ocorreu() ) { + $boAdiantamenteMesAniversario = SistemaLegado::pegaConfiguracao('adiantamento_13_salario'.Sessao::getEntidade(),27,Sessao::getExercicio(), $boTransacao ); + if ( $boAdiantamenteMesAniversario == 'true') { + $obErro = $this->cancelarAdiantamento13MesAniversario($boTransacao); + } + } $this->obTFolhaPagamentoPeriodoMovimentacao->setDado( "cod_entidade", Sessao::getEntidade() ); $obErro = $this->obTFolhaPagamentoPeriodoMovimentacao->cancelarPeriodoMovimentacao($boTransacao); $this->obTransacao->fechaTransacao( $boFlagTransacao, $boTransacao, $obErro, $this->obTFolhaPagamentoPeriodoMovimentacao ); @@ -333,4 +352,274 @@ class RFolhaPagamentoPeriodoMovimentacao return $obErro; } -} + public function gerarAdiantamento13MesAniversario($boTransacao = '') + { + $obErro = new Erro(); + $obErro = $this->obTFolhaPagamentoPeriodoMovimentacao->recuperaUltimaMovimentacao($rsUltimaMovimentacao,"","",$boTransacao); + $arDtFinal = explode("/",$rsUltimaMovimentacao->getCampo("dt_final")); + if($obErro->ocorreu()) return $obErro; + + //Valida configuracao e datas do mes para executar esta rotina + $boValida = $this->validaAdiantamento13MesAniversario($arDtFinal,$boTransacao); + if(!$boValida) return $obErro; + + include_once(CAM_GRH_FOL_MAPEAMENTO."TFolhaPagamentoConcessaoDecimo.class.php"); + include_once(CAM_GRH_FOL_MAPEAMENTO."FFolhaPagamentoGeraRegistroDecimo.class.php"); + include_once(CAM_GRH_FOL_MAPEAMENTO."TFolhaPagamentoConfiguracaoAdiantamento.class.php"); + include_once(CAM_GRH_PES_MAPEAMENTO."TPessoalContrato.class.php"); + + $obTPessoalContrato = new TPessoalContrato(); + $obTFolhaPagamentoConcessaoDecimo = new TFolhaPagamentoConcessaoDecimo(); + $obTFolhaPagamentoConcessaoDecimo->setDado( "cod_periodo_movimentacao", $rsUltimaMovimentacao->getCampo("cod_periodo_movimentacao") ); + $obTFolhaPagamentoConcessaoDecimo->setDado( "mes_aniversario", $arDtFinal[1]); + $obErro = $obTFolhaPagamentoConcessaoDecimo->recuperaContratosAdiantamentoDecidoMesAniversario($rsContratos,"","",$boTransacao); + + if($obErro->ocorreu()) return $obErro; + + $stFiltro = " WHERE to_char(dt_final,'yyyy') = '".$arDtFinal[2]."'"; + $stOrdem = " cod_periodo_movimentacao LIMIT 1"; + $this->obTFolhaPagamentoPeriodoMovimentacao->recuperaTodos($rsTodosPeriodos,$stFiltro,$stOrdem,$boTransacao); + $obFFolhaPagamentoGeraRegistroDecimo = new FFolhaPagamentoGeraRegistroDecimo(); + $obTFolhaPagamentoConcessaoDecimo = new TFolhaPagamentoConcessaoDecimo(); + $obTFolhaPagamentoConfiguracaoAdiantamento = new TFolhaPagamentoConfiguracaoAdiantamento(); + $obTFolhaPagamentoConfiguracaoAdiantamento->obTFolhaPagamentoConcessaoDecimo = &$obTFolhaPagamentoConcessaoDecimo; + $arContratos = array(); + $arContratosErro = array(); + + while (!$rsContratos->eof()) { + if($obErro->ocorreu()) return $obErro; + + $stFiltro = " AND contrato.cod_contrato = ".$rsContratos->getCampo("cod_contrato"); + $obErro = $obTPessoalContrato->recuperaCgmDoRegistro($rsContrato,$stFiltro,'',$boTransacao); + if($obErro->ocorreu()) return $obErro; + + $obTFolhaPagamentoConcessaoDecimo->setDado("cod_contrato",$rsContratos->getCampo("cod_contrato")); + $obTFolhaPagamentoConcessaoDecimo->setDado("desdobramento",'A'); + $obTFolhaPagamentoConcessaoDecimo->setDado("cod_periodo_movimentacao",$rsUltimaMovimentacao->getCampo("cod_periodo_movimentacao")); + $obTFolhaPagamentoConcessaoDecimo->setDado("folha_salario",false); + + $stFiltro = " WHERE cod_contrato = ".$rsContratos->getCampo("cod_contrato"); + $stFiltro .= " AND cod_periodo_movimentacao <= ".$rsUltimaMovimentacao->getCampo("cod_periodo_movimentacao"); + $stFiltro .= " AND cod_periodo_movimentacao >=".$rsTodosPeriodos->getCampo("cod_periodo_movimentacao"); + $stFiltro .= " AND desdobramento = 'A' "; + $obErro = $obTFolhaPagamentoConcessaoDecimo->recuperaTodos($rsConcessao,$stFiltro,'',$boTransacao); + if($obErro->ocorreu()) return $obErro; + + if ( $rsConcessao->getNumLinhas() < 0 ) { + $obTFolhaPagamentoConfiguracaoAdiantamento->setDado("percentual" ,50.00); + $obTFolhaPagamentoConfiguracaoAdiantamento->setDado("vantagens_fixas" ,false); + $obTFolhaPagamentoConfiguracaoAdiantamento->setDado("desdobramento" ,'A'); + $obTFolhaPagamentoConfiguracaoAdiantamento->setDado("cod_contrato" ,$rsContratos->getCampo("cod_contrato")); + $obTFolhaPagamentoConfiguracaoAdiantamento->setDado("cod_periodo_movimentacao" ,$rsUltimaMovimentacao->getCampo("cod_periodo_movimentacao")); + + $obErro = $obTFolhaPagamentoConcessaoDecimo->inclusao($boTransacao); + if($obErro->ocorreu()) return $obErro; + + $obErro = $obTFolhaPagamentoConfiguracaoAdiantamento->inclusao($boTransacao); + if($obErro->ocorreu()) return $obErro; + + $inIndex = count($arContratos); + $arContratos[$inIndex]['registro'] = $rsContrato->getCampo("registro"); + $arContratos[$inIndex]['numcgm'] = $rsContrato->getCampo("numcgm"); + $arContratos[$inIndex]['nom_cgm'] = $rsContrato->getCampo("nom_cgm"); + + $obFFolhaPagamentoGeraRegistroDecimo->setDado("cod_contrato" ,$rsContratos->getCampo("cod_contrato")); + $obFFolhaPagamentoGeraRegistroDecimo->setDado("cod_periodo_movimentacao",$rsUltimaMovimentacao->getCampo("cod_periodo_movimentacao")); + $obFFolhaPagamentoGeraRegistroDecimo->setDado("desdobramento" ,'A'); + $obErro = $obFFolhaPagamentoGeraRegistroDecimo->geraRegistroDecimo($rsGerar,$boTransacao); + if($obErro->ocorreu()) return $obErro; + + } else { + $inIndex = count($arContratosErro); + $arContratosErro[$inIndex]['registro'] = $rsContrato->getCampo("registro"); + $arContratosErro[$inIndex]['numcgm'] = $rsContrato->getCampo("numcgm"); + $arContratosErro[$inIndex]['nom_cgm'] = $rsContrato->getCampo("nom_cgm"); + $arContratosErro[$inIndex]['motivo'] = "A matrícula já possui concessão de adiantamento de 13º, no exercício"; + } + + $rsContratos->proximo(); + } + + return $obErro; + + } + + public function cancelarAdiantamento13MesAniversario($boTransacao = '') + { + $obErro = new Erro(); + + $obErro = $this->obTFolhaPagamentoPeriodoMovimentacao->recuperaUltimaMovimentacao($rsUltimaMovimentacao,"","",$boTransacao); + $arDtFinal = explode("/",$rsUltimaMovimentacao->getCampo("dt_final")); + if($obErro->ocorreu()) return $obErro; + + //Valida configuracao e datas do mes para executar esta rotina + $boValida = $this->validaAdiantamento13MesAniversario($arDtFinal,$boTransacao); + if(!$boValida) return $obErro; + + include_once(CAM_GRH_PES_MAPEAMENTO."TPessoalContrato.class.php"); + include_once(CAM_GRH_FOL_MAPEAMENTO."TFolhaPagamentoConcessaoDecimo.class.php"); + $obTPessoalContrato = new TPessoalContrato(); + //Busca todos os contratos que foram configurados com adiantamento do 13 no mes do aniversario + $obTFolhaPagamentoConcessaoDecimo = new TFolhaPagamentoConcessaoDecimo(); + $obTFolhaPagamentoConcessaoDecimo->setDado( "cod_periodo_movimentacao", $rsUltimaMovimentacao->getCampo("cod_periodo_movimentacao") ); + $obTFolhaPagamentoConcessaoDecimo->setDado( "mes_aniversario", $arDtFinal[1]); + $obErro = $obTFolhaPagamentoConcessaoDecimo->recuperaContratosAdiantamentoDecidoMesAniversario($rsContratos,"","",$boTransacao); + + if($obErro->ocorreu()) return $obErro; + + include_once(CAM_GRH_FOL_MAPEAMENTO."TFolhaPagamentoDeducaoDependente.class.php"); + $obTFolhaPagamentoDeducaoDependente = new TFolhaPagamentoDeducaoDependente(); + $arCodContratos = array(); + + while (!$rsContratos->eof()) { + $obTPessoalContrato = new TPessoalContrato; + $stFiltro = " AND contrato.cod_contrato = ".$rsContratos->getCampo("cod_contrato"); + $obErro = $obTPessoalContrato->recuperaCgmDoRegistro($rsContrato,$stFiltro,'',$boTransacao); + + if($obErro->ocorreu()) return $obErro; + + $stFiltro = " WHERE deducao_dependente.cod_contrato = ".$rsContratos->getCampo("cod_contrato"); + $stFiltro .= " AND deducao_dependente.cod_periodo_movimentacao = ".$rsUltimaMovimentacao->getCampo("cod_periodo_movimentacao"); + $stFiltro .= " AND deducao_dependente.cod_tipo = 4"; + $obTFolhaPagamentoDeducaoDependente->recuperaTodos($rsDeducaoDependente,$stFiltro,'',$boTransacao); + if ($rsDeducaoDependente->getNumLinhas() == 1) { + $arCodContratos[] = array("cod_contrato"=>$rsContratos->getCampo("cod_contrato")); + } + $obErro = $this->deletarConcessaoDecimo($rsContratos->getCampo("cod_contrato"),$rsUltimaMovimentacao->getCampo("cod_periodo_movimentacao"),$boTransacao); + if($obErro->ocorreu()) return $obErro; + + $rsContratos->proximo(); + } + + if (!$obErro->ocorreu()) { + //Recalculo do contrato + $rsContratos = new recordset; + $rsContratos->preenche($arCodContratos); + $obErro = $this->recalcularSalario($rsContratos,$boTransacao); + } + + return $obErro; + } + + + function deletarConcessaoDecimo($inCodContrato,$inCodPeriodoMovimentacao,$boTransacao) + { + $obErro = new Erro(); + + include_once(CAM_GRH_FOL_MAPEAMENTO."TFolhaPagamentoUltimoRegistroEventoDecimo.class.php"); + $obTFolhaPagamentoUltimoRegistroEventoDecimo = new TFolhaPagamentoUltimoRegistroEventoDecimo; + $stFiltro = " AND cod_contrato = ".$inCodContrato; + $stFiltro .= " AND cod_periodo_movimentacao = ".$inCodPeriodoMovimentacao; + $obErro = $obTFolhaPagamentoUltimoRegistroEventoDecimo->recuperaRegistrosEventoDecimoDoContrato($rsRegistros,$stFiltro,'',$boTransacao); + if($obErro->ocorreu()) return $obErro; + + while (!$rsRegistros->eof()) { + $obTFolhaPagamentoUltimoRegistroEventoDecimo->setDado("cod_registro",$rsRegistros->getCampo("cod_registro")); + $obTFolhaPagamentoUltimoRegistroEventoDecimo->setDado("cod_evento",$rsRegistros->getCampo("cod_evento")); + $obTFolhaPagamentoUltimoRegistroEventoDecimo->setDado("desdobramento",$rsRegistros->getCampo("desdobramento")); + $obTFolhaPagamentoUltimoRegistroEventoDecimo->setDado("timestamp",$rsRegistros->getCampo("timestamp")); + $obErro = $obTFolhaPagamentoUltimoRegistroEventoDecimo->deletarUltimoRegistroEvento($boTransacao); + if($obErro->ocorreu()) return $obErro; + + $rsRegistros->proximo(); + } + + //Exclusão dos contratos com pagamento de décimo em salário + include_once(CAM_GRH_FOL_MAPEAMENTO."TFolhaPagamentoConcessaoDecimo.class.php"); + include_once(CAM_GRH_FOL_MAPEAMENTO."TFolhaPagamentoConfiguracaoAdiantamento.class.php"); + $obTFolhaPagamentoConcessaoDecimo = new TFolhaPagamentoConcessaoDecimo(); + $obTFolhaPagamentoConfiguracaoAdiantamento = new TFolhaPagamentoConfiguracaoAdiantamento(); + $obTFolhaPagamentoConfiguracaoAdiantamento->obTFolhaPagamentoConcessaoDecimo = &$obTFolhaPagamentoConcessaoDecimo; + + $stFiltro = " WHERE cod_contrato = ".$inCodContrato; + $stFiltro .= " AND cod_periodo_movimentacao = ".$inCodPeriodoMovimentacao; + $stFiltro .= " AND desdobramento = 'A' "; + $stFiltro .= " AND folha_salario IS TRUE "; + $obErro = $obTFolhaPagamentoConcessaoDecimo->recuperaTodos($rsConcessoDecimo,$stFiltro,'',$boTransacao); + if($obErro->ocorreu()) return $obErro; + + include_once(CAM_GRH_FOL_MAPEAMENTO."TFolhaPagamentoUltimoRegistroEvento.class.php"); + $obTFolhaPagamentoUltimoRegistroEvento = new TFolhaPagamentoUltimoRegistroEvento(); + include_once(CAM_GRH_FOL_MAPEAMENTO."TFolhaPagamentoEventoCalculado.class.php"); + $obTFolhaPagamentoEventoCalculado = new TFolhaPagamentoEventoCalculado(); + while (!$rsConcessoDecimo->eof()) { + $stFiltro = " AND cod_contrato =".$inCodContrato; + $stFiltro .= " AND cod_periodo_movimentacao = ".$inCodPeriodoMovimentacao; + $stFiltro .= " AND desdobramento = 'I'"; + $obErro = $obTFolhaPagamentoEventoCalculado->recuperaEventosCalculados($rsEventosCalculados,$stFiltro,'',$boTransacao); + if($obErro->ocorreu()) return $obErro; + + while (!$rsEventosCalculados->eof()) { + $obTFolhaPagamentoUltimoRegistroEvento->setDado("cod_registro" , $rsEventosCalculados->getCampo("cod_registro")); + $obTFolhaPagamentoUltimoRegistroEvento->setDado("cod_evento" , $rsEventosCalculados->getCampo("cod_evento")); + $obTFolhaPagamentoUltimoRegistroEvento->setDado("desdobramento", $rsEventosCalculados->getCampo("desdobramento")); + $obTFolhaPagamentoUltimoRegistroEvento->setDado("timestamp" , $rsEventosCalculados->getCampo("timestamp")); + $obErro = $obTFolhaPagamentoUltimoRegistroEvento->deletarUltimoRegistroEvento($boTransacao); + if($obErro->ocorreu()) return $obErro; + + $rsEventosCalculados->proximo(); + } + $rsConcessoDecimo->proximo(); + } + + $obTFolhaPagamentoConcessaoDecimo->setDado("cod_contrato",$inCodContrato); + $obTFolhaPagamentoConcessaoDecimo->setDado("cod_periodo_movimentacao",$inCodPeriodoMovimentacao); + $obErro = $obTFolhaPagamentoConfiguracaoAdiantamento->exclusao($boTransacao); + if($obErro->ocorreu()) return $obErro; + + $obErro = $obTFolhaPagamentoConcessaoDecimo->exclusao($boTransacao); + + return $obErro; + } + + public function validaAdiantamento13MesAniversario($arDtFinal,$boTransacao = '') + { + $boValida = true; + $inMesSaldo13 = SistemaLegado::pegaConfiguracao('mes_calculo_decimo'.Sessao::getEntidade(),27,Sessao::getExercicio(), $boTransacao ); + //Não deve ser executada essa ação nos meses de dezembro e novembro + //só se a configuracao do saldo estiver em dezembro + if ( $arDtFinal[1] == 12 ){ + return false; + }elseif( ($arDtFinal[1] == 11) && ($arDtFinal[1] == $inMesSaldo13) ){ + return false; + } + return $boValida; + } + + function recalcularSalario($rsContratos,$boTransacao) + { + $obErro = new Erro(); + //Recalcula folha salário de contratos com dependente + //isso serve para no caso do cancelamento de um décimo onde está + //sendo incorporado a dedução de dependente, essa dedução passe para + //a folha salário do contrato + $stCodContratos = ""; + while (!$rsContratos->eof()) { + $stCodContratos .= $rsContratos->getCampo("cod_contrato").","; + $rsContratos->proximo(); + } + $stCodContratos = substr($stCodContratos,0,strlen($stCodContratos)-1); + + include_once(CAM_GRH_FOL_MAPEAMENTO."FFolhaPagamentoDeletarInformacoesCalculo.class.php"); + $obFFolhaPagamentoDeletarInformacoesCalculo = new FFolhaPagamentoDeletarInformacoesCalculo(); + $obFFolhaPagamentoDeletarInformacoesCalculo->setDado("stTipoFolha" ,"S" ); + $obFFolhaPagamentoDeletarInformacoesCalculo->setDado("inCodComplementar" ,0 ); + $obFFolhaPagamentoDeletarInformacoesCalculo->setDado("stCodContratos" ,$stCodContratos ); + $obErro = $obFFolhaPagamentoDeletarInformacoesCalculo->deletarInformacoesCalculo($rsDeletar, $boTransacao); + if($obErro->ocorreu()) return $obErro; + + include_once(CAM_GRH_FOL_MAPEAMENTO."FFolhaPagamentoCalculaFolha.class.php"); + $obFFolhaPagamentoCalculaFolha = new FFolhaPagamentoCalculaFolha(); + $rsContratos->setPrimeiroElemento(); + while ( !$rsContratos->eof() ) { + $obFFolhaPagamentoCalculaFolha->setDado('cod_contrato',$rsContratos->getCampo("cod_contrato")); + $obFFolhaPagamentoCalculaFolha->setDado('boErro','f'); + $obErro = $obFFolhaPagamentoCalculaFolha->calculaFolha($rsCalcula, $boTransacao); + if($obErro->ocorreu()) return $obErro; + $rsContratos->proximo(); + } + + return $obErro; + } + +}//END OF CLASS diff --git a/gestaoRH/fontes/PHP/folhaPagamento/instancias/IRRF/OCManterTabelaIRRF.php b/gestaoRH/fontes/PHP/folhaPagamento/instancias/IRRF/OCManterTabelaIRRF.php index 9d13042..f793e96 100755 --- a/gestaoRH/fontes/PHP/folhaPagamento/instancias/IRRF/OCManterTabelaIRRF.php +++ b/gestaoRH/fontes/PHP/folhaPagamento/instancias/IRRF/OCManterTabelaIRRF.php @@ -872,7 +872,6 @@ function limparEventoAjudaCusto($boExecuta=false) } } -//SistemaLegado::mostraVar($stCtrl); switch ($stCtrl) { case 'preencherEvento': $stJs .= preencherEvento(); diff --git a/gestaoRH/fontes/PHP/folhaPagamento/instancias/configuracao/FMManterConfiguracaoDecimo.php b/gestaoRH/fontes/PHP/folhaPagamento/instancias/configuracao/FMManterConfiguracaoDecimo.php index 6a47ba4..0f3dd02 100755 --- a/gestaoRH/fontes/PHP/folhaPagamento/instancias/configuracao/FMManterConfiguracaoDecimo.php +++ b/gestaoRH/fontes/PHP/folhaPagamento/instancias/configuracao/FMManterConfiguracaoDecimo.php @@ -109,6 +109,48 @@ $obRFolhaPagamentoConfiguracao = new RFolhaPagamentoConfiguracao; $obRFolhaPagamentoConfiguracao->consultar(); $inMesCalculoDecimo = $obRFolhaPagamentoConfiguracao->getMesCalculoDecimo(); +$obRdnTodos = new Radio; +$obRdnTodos->setRotulo ( "Numeração" ); +$obRdnTodos->setName ( "boNumeracao" ); +$obRdnTodos->setId ( "boNumeracao" ); +$obRdnTodos->setLabel ( "Todos" ); +$obRdnTodos->setValue ( "Todos" ); +$obRdnTodos->setChecked ( true ); + +$obRdnPares = new Radio; +$obRdnPares->setRotulo ( "Numeração" ); +$obRdnPares->setName ( "boNumeracao" ); +$obRdnPares->setId ( "boNumeracao" ); +$obRdnPares->setLabel ( "Pares" ); +$obRdnPares->setValue ( "Pares" ); +$obRdnPares->setChecked ( false ); + +$obRdAdiantamento13MesSalarioSim = new Radio(); +$obRdAdiantamento13MesSalarioSim->setRotulo ('Gera Adiant. de 13º Salário no mês de aniversário'); +$obRdAdiantamento13MesSalarioSim->setName ('boRdGerarAdiantamento13'); +$obRdAdiantamento13MesSalarioSim->setId ('boRdGerarAdiantamento13'); +$obRdAdiantamento13MesSalarioSim->setLabel ('Sim'); +$obRdAdiantamento13MesSalarioSim->setValue ('true'); + +$obRdAdiantamento13MesSalarioNao = new Radio(); +$obRdAdiantamento13MesSalarioNao->setRotulo ('Gera Adiant. de 13º Salário no mês de aniversário'); +$obRdAdiantamento13MesSalarioNao->setName ('boRdGerarAdiantamento13'); +$obRdAdiantamento13MesSalarioNao->setId ('boRdGerarAdiantamento13'); +$obRdAdiantamento13MesSalarioNao->setLabel ('Não'); +$obRdAdiantamento13MesSalarioNao->setValue ('false'); + +//busca configuracao ja realizada +$boAdiantamentoDecimo = SistemaLegado::pegaConfiguracao('adiantamento_13_salario'.Sessao::getEntidade(),27,Sessao::getExercicio(), $boTransacao); +if ( $boAdiantamentoDecimo == 'true' ) { + $obRdAdiantamento13MesSalarioSim->setChecked(true); + $obRdAdiantamento13MesSalarioNao->setChecked(false); +}else{ + $obRdAdiantamento13MesSalarioSim->setChecked(false); + $obRdAdiantamento13MesSalarioNao->setChecked(true); +} + +$arRadAdiantamento13 = array($obRdAdiantamento13MesSalarioSim, $obRdAdiantamento13MesSalarioNao); + $obRdbDecimoNovembro = new Radio; $obRdbDecimoNovembro->setRotulo ( "Saldo de 13º Salário" ); $obRdbDecimoNovembro->setName ( "inMesCalculoDecimo" ); @@ -135,13 +177,14 @@ $obFormulario->addTitulo("Eventos" ); foreach ($arCompEventos as $componente) { $obFormulario->addComponente( $componente ); } + +$obFormulario->agrupaComponentes ( $arRadAdiantamento13 ); $obFormulario->addTitulo("Competência de Pagamento" ); $obFormulario->agrupaComponentes(array($obRdbDecimoNovembro,$obRdbDecimoDezembro)); $obFormulario->Ok(); $obFormulario->show(); preencherInnerEventos( true ); -//preencheFuncao ( true ); include_once '../../../../../../gestaoAdministrativa/fontes/PHP/framework/include/rodape.inc.php'; diff --git a/gestaoRH/fontes/PHP/folhaPagamento/instancias/configuracao/FMManterConfiguracaoEventosAutomaticos.php b/gestaoRH/fontes/PHP/folhaPagamento/instancias/configuracao/FMManterConfiguracaoEventosAutomaticos.php new file mode 100644 index 0000000..c069b6c --- /dev/null +++ b/gestaoRH/fontes/PHP/folhaPagamento/instancias/configuracao/FMManterConfiguracaoEventosAutomaticos.php @@ -0,0 +1,104 @@ + +get("stAcao"); + +//DEFINICAO DO FORM +$obForm = new Form; +$obForm->setAction( $pgProc ); +$obForm->setTarget( "oculto" ); + +$obRFolhaPagamentoFolhaSituacao = new RFolhaPagamentoFolhaSituacao(new RFolhaPagamentoPeriodoMovimentacao); + +//DEFINICAO DOS COMPONENTES +$obHdnAcao = new Hidden; +$obHdnAcao->setName ( "stAcao" ); +$obHdnAcao->setValue( $stAcao ); + +$obHdnCtrl = new Hidden; +$obHdnCtrl->setName ( "stCtrl" ); +$obHdnCtrl->setValue( $stCtrl ); + +$obIBscEvento = new IBscEvento("inCodigoEvento","stEvento"); +$obIBscEvento->obBscInnerEvento->setRotulo( "*Evento a lançar" ); +$obIBscEvento->setEventoSistema ( true ); + +//Botão para Incluir / Limpar +$obBtnIncluir = new Button; +$obBtnIncluir->setId('btnIncluir'); +$obBtnIncluir->setValue('Incluir'); +$obBtnIncluir->obEvento->setOnClick("montaParametrosGET('incluirEvento', 'inCodigoEvento,stEvento');"); + +$obBtnLimpar = new Button; +$obBtnLimpar->setValue('Limpar'); +$obBtnLimpar->obEvento->setOnClick("executaFuncaoAjax('limparEvento');"); + +$obSpnLista = new Span; +$obSpnLista->setId('spnLista'); +$obSpnLista->setValue($stHTML); + +//DEFINICAO DO FORMULARIO +$obFormulario = new Formulario; +$obFormulario->addForm ( $obForm ); +$obFormulario->addTitulo( $obRFolhaPagamentoFolhaSituacao->consultarCompetencia() ,"right" ); +$obFormulario->addHidden( $obHdnAcao ); +$obFormulario->addHidden( $obHdnCtrl ); +$obFormulario->addTitulo( "Configuração de Eventos para Lançamento Automático" ); +$obIBscEvento->geraFormulario( $obFormulario ); + + +$obFormulario->agrupaComponentes(array($obBtnIncluir, $obBtnLimpar)); +$obFormulario->addSpan($obSpnLista); + +$obFormulario->Ok(); +$obFormulario->show(); + +$jsOnLoad = "executaFuncaoAjax('carregaEventos');"; + +include_once '../../../../../../gestaoAdministrativa/fontes/PHP/framework/include/rodape.inc.php'; diff --git a/gestaoRH/fontes/PHP/folhaPagamento/instancias/configuracao/OCManterConfiguracaoEventosAutomaticos.php b/gestaoRH/fontes/PHP/folhaPagamento/instancias/configuracao/OCManterConfiguracaoEventosAutomaticos.php new file mode 100644 index 0000000..7e991e8 --- /dev/null +++ b/gestaoRH/fontes/PHP/folhaPagamento/instancias/configuracao/OCManterConfiguracaoEventosAutomaticos.php @@ -0,0 +1,191 @@ + +get('stCtrl'); + +function listaEventos() { + + $obLista = new Lista; + $rsEventos = new RecordSet; + $rsEventos->preenche ( Sessao::read('arEventos') ); + + $obLista->setMostraPaginacao(false); + $obLista->setRecordset( $rsEventos ); + $obLista->setTitulo ( 'Lista de Eventos para Lançamento Automático' ); + + $obLista->addCabecalho(); + $obLista->ultimoCabecalho->addConteudo(" "); + $obLista->ultimoCabecalho->setWidth( 5 ); + $obLista->commitCabecalho(); + + $obLista->addCabecalho(); + $obLista->ultimoCabecalho->addConteudo("Evento"); + $obLista->ultimoCabecalho->setWidth( 15 ); + $obLista->commitCabecalho(); + + $obLista->addCabecalho(); + $obLista->ultimoCabecalho->addConteudo("Ação"); + $obLista->ultimoCabecalho->setWidth( 5 ); + $obLista->commitCabecalho(); + + $obLista->addDado(); + $obLista->ultimoDado->setCampo( "[codigo] - [descricao]" ); + $obLista->ultimoDado->setAlinhamento( 'ESQUERDA' ); + $obLista->commitDado(); + + $obLista->addAcao(); + $obLista->ultimaAcao->setAcao( "EXCLUIR" ); + $obLista->ultimaAcao->setFuncao( true ); + $obLista->ultimaAcao->setLink( "javascript: executaFuncaoAjax('deletarEvento');" ); + $obLista->ultimaAcao->addCampo("","&codigo=[codigo]&cod_evento=[cod_evento]"); + $obLista->commitAcao(); + + $obLista->montaHTML(); + + $html = $obLista->getHTML(); + $html = str_replace("\n","",$html); + $html = str_replace(" ","",$html); + $html = str_replace("'","\\'",$html); + + $stJs .= "d.getElementById('spnLista').innerHTML = '';\n"; + $stJs .= "d.getElementById('spnLista').innerHTML = '".$html."';\n"; + + $stJs .= "d.getElementById('inCodigoEvento').value = '';\n"; + $stJs .= "d.getElementById('stEvento').innerHTML = ' ';\n"; + $stJs .= "d.getElementById('stTextoComplementar').innerHTML = ' ';\n"; + + return $stJs; +} + +$arEventos = Sessao::read('arEventos'); +$arListaEventos = array(); +$stJs = ''; + +switch ($stCtrl) { + case 'incluirEvento': + $stMensagem = ''; + if(is_array($arEventos)) { + foreach($arEventos as $registro) { + if($registro['codigo'] == $request->get('inCodigoEvento')) { + $stMensagem = 'Este evento já foi inserido'; + break; + } + } + } + + if ($stMensagem != '') { + $stJs.= "alertaAviso('$stMensagem','form','erro','".Sessao::getId()."');\n"; + } else { + $obRFolhaPagamentoEvento = new RFolhaPagamentoEvento(); + $obRFolhaPagamentoEvento->setCodigo($request->get('inCodigoEvento')); + $obRFolhaPagamentoEvento->listarEvento($rsEventos); + + $arListaEventos['cod_evento'] = $rsEventos->getCampo('cod_evento'); + $arListaEventos['codigo'] = $rsEventos->getCampo('codigo'); + $arListaEventos['descricao'] = $rsEventos->getCampo('descricao'); + $arEventos[] = $arListaEventos; + + Sessao::write('arEventos', $arEventos); + $stJs = listaEventos(); + } + break; + + case 'carregaEventos': + $rsEventosAutomaticos = new RecordSet; + $arEventosAutomaticos = array(); + $arRegistro = array(); + $arRegistroSessao = array(); + + $stResultado = SistemaLegado::pegaConfiguracao("evento_automatico", 27, Sessao::getExercicio()); + + if ($stResultado != "") { + $arEventosAutomaticos = explode(",", $stResultado); + + $obRFolhaPagamentoEvento = new RFolhaPagamentoEvento(); + + foreach ($arEventosAutomaticos as $registro) { + $obRFolhaPagamentoEvento->setCodigo($registro); + $obRFolhaPagamentoEvento->listarEvento($rsRegistro); + + $arRegistro['codigo'] = $rsRegistro->getCampo('codigo'); + $arRegistro['cod_evento'] = $rsRegistro->getCampo('cod_evento'); + $arRegistro['descricao'] = $rsRegistro->getCampo('descricao'); + $arRegistroSessao[] = $arRegistro; + } + + Sessao::write("arEventos", $arRegistroSessao); + } + + $stJs = listaEventos(); + + break; + + case 'deletarEvento': + foreach ($arEventos as $registro) { + if ($registro['codigo'].$registro['cod_evento'] != $request->get('codigo').$request->get('cod_evento')) { + $arTempEvento[] = $registro; + } + } + + Sessao::write('arEventos', $arTempEvento); + $stJs = listaEventos(); + break; + +} + +if ($stJs) { + echo $stJs; +} diff --git a/gestaoRH/fontes/PHP/folhaPagamento/instancias/configuracao/PRManterConfiguracaoDecimo.php b/gestaoRH/fontes/PHP/folhaPagamento/instancias/configuracao/PRManterConfiguracaoDecimo.php index 62d9742..ac5d35d 100755 --- a/gestaoRH/fontes/PHP/folhaPagamento/instancias/configuracao/PRManterConfiguracaoDecimo.php +++ b/gestaoRH/fontes/PHP/folhaPagamento/instancias/configuracao/PRManterConfiguracaoDecimo.php @@ -38,10 +38,11 @@ include_once '../../../../../../gestaoAdministrativa/fontes/PHP/pacotes/FrameworkHTML.inc.php'; include_once '../../../../../../gestaoAdministrativa/fontes/PHP/framework/include/cabecalho.inc.php'; -include_once ( CAM_GA_ADM_MAPEAMENTO."TAdministracaoConfiguracao.class.php" ); -include_once ( CAM_GRH_FOL_MAPEAMENTO .'TFolhaPagamentoTipoEventoDecimo.class.php' ); -include_once ( CAM_GRH_FOL_MAPEAMENTO .'TFolhaPagamentoDecimoEvento.class.php' ); -include_once ( CAM_GRH_FOL_MAPEAMENTO .'TFolhaPagamentoEvento.class.php' ); +include_once CAM_GA_ADM_MAPEAMENTO.'TAdministracaoConfiguracao.class.php'; +include_once CAM_GA_ADM_MAPEAMENTO.'TAdministracaoConfiguracaoEntidade.class.php'; +include_once CAM_GRH_FOL_MAPEAMENTO.'TFolhaPagamentoTipoEventoDecimo.class.php'; +include_once CAM_GRH_FOL_MAPEAMENTO.'TFolhaPagamentoDecimoEvento.class.php'; +include_once CAM_GRH_FOL_MAPEAMENTO.'TFolhaPagamentoEvento.class.php'; $stPrograma = 'ManterConfiguracaoDecimo'; $pgFilt = "FL".$stPrograma.".php"; @@ -53,39 +54,53 @@ $pgJs = "JS".$stPrograma.".js"; Sessao::setTrataExcecao( true ); -$obTAdministracaoConfiguracao = new TAdministracaoConfiguracao; -$obTFolhaPagamentoDecimoEvento = new TFolhaPagamentoDecimoEvento; -$obTFolhaPagamentoTipoEventoDecimo = new TFolhaPagamentoTipoEventoDecimo; -$obTFolhaPagamentoEvento = new TFolhaPagamentoEvento; +$obTAdministracaoConfiguracao = new TAdministracaoConfiguracao(); +$obTFolhaPagamentoDecimoEvento = new TFolhaPagamentoDecimoEvento(); +$obTFolhaPagamentoTipoEventoDecimo = new TFolhaPagamentoTipoEventoDecimo(); +$obTFolhaPagamentoEvento = new TFolhaPagamentoEvento(); Sessao::getTransacao()->setMapeamento( $obTFolhaPagamentoDecimoEvento ); $rsTipoEventoDecimo = new RecordSet; -$obTFolhaPagamentoTipoEventoDecimo->recuperaTodos( $rsTipoEventoDecimo ); +$obTFolhaPagamentoTipoEventoDecimo->recuperaTodos( $rsTipoEventoDecimo, $boTransacao ); $obTAdministracaoConfiguracao->setDado( "cod_modulo", "27"); $obTAdministracaoConfiguracao->setDado( "exercicio" , Sessao::getExercicio()); $obTAdministracaoConfiguracao->setDado( "parametro" , "mes_calculo_decimo".Sessao::getEntidade()); -$obTAdministracaoConfiguracao->setDado( "valor" , $_POST["inMesCalculoDecimo"] ); -$obTAdministracaoConfiguracao->recuperaPorChave( $rsConfiguracao ); +$obTAdministracaoConfiguracao->setDado( "valor" , $request->get("inMesCalculoDecimo") ); +$obTAdministracaoConfiguracao->recuperaPorChave( $rsConfiguracao, $boTransacao ); +$obTAdministracaoConfiguracao->alteracao($boTransacao); -if ($rsConfiguracao->getNumLinhas() == -1) { - $obTAdministracaoConfiguracao->inclusao(); -} else { - $obTAdministracaoConfiguracao->alteracao(); +//Inclusao do radio box Gera Adiant. de 13º Salário no mês de aniversário +$obTAdministracaoConfiguracao->setDado( "cod_modulo", "27"); +$obTAdministracaoConfiguracao->setDado( "exercicio" , Sessao::getExercicio()); +$obTAdministracaoConfiguracao->setDado( "parametro" , "adiantamento_13_salario".Sessao::getEntidade()); +$obTAdministracaoConfiguracao->setDado( "valor" , $request->get('boRdGerarAdiantamento13') ); +$obTAdministracaoConfiguracao->recuperaPorChave( $rsConfiguracao, $boTransacao ); +$obTAdministracaoConfiguracao->alteracao($boTransacao); + +//Caso entidade seja diferente de PREFEITURA +if ( Sessao::getEntidade() != '' ) { + $obTAdministracaoConfiguracaoEntidade = new TAdministracaoConfiguracaoEntidade(); + $obTAdministracaoConfiguracaoEntidade->setDado( 'exercicio' , Sessao::getExercicio() ); + $obTAdministracaoConfiguracaoEntidade->setDado( 'cod_entidade' , Sessao::getCodEntidade() ); + $obTAdministracaoConfiguracaoEntidade->setDado( 'cod_modulo' , '27'); + $obTAdministracaoConfiguracaoEntidade->setDado( 'parametro' , 'adiantamento_13_salario'.Sessao::getEntidade()); + $obTAdministracaoConfiguracaoEntidade->setDado( 'valor' , $request->get('boRdGerarAdiantamento13') ); + $obTAdministracaoConfiguracaoEntidade->recuperaPorChave( $rsConfiguracaoEntidade, $boTransacao ); + $obTAdministracaoConfiguracaoEntidade->alteracao($boTransacao); } while ( !$rsTipoEventoDecimo->eof() ) { - $stFiltro = " WHERE codigo = '".$_POST['stInner_Cod_'.$rsTipoEventoDecimo->getCampo('cod_tipo')]."'"; - $obTFolhaPagamentoEvento->recuperaTodos($rsEvento,$stFiltro); - + $stFiltro = " WHERE codigo = '".$request->get('stInner_Cod_'.$rsTipoEventoDecimo->getCampo('cod_tipo'))."'"; + $obTFolhaPagamentoEvento->recuperaTodos($rsEvento,$stFiltro,"",$boTransacao); $obTFolhaPagamentoDecimoEvento->setDado( 'cod_tipo' , $rsTipoEventoDecimo->getCampo('cod_tipo') ); $obTFolhaPagamentoDecimoEvento->setDado( 'cod_evento' , $rsEvento->getCampo('cod_evento') ); - $obTFolhaPagamentoDecimoEvento->inclusao(); + $obTFolhaPagamentoDecimoEvento->inclusao($boTransacao); $rsTipoEventoDecimo->proximo(); } $stMensagem = "Configuração atualizada."; -sistemaLegado::alertaAviso($pgForm,$stMensagem,"incluir","aviso", Sessao::getId(), "../"); +SistemaLegado::alertaAviso($pgForm,$stMensagem,"incluir","aviso", Sessao::getId(), "../"); Sessao::encerraExcecao(); ?> diff --git a/gestaoRH/fontes/PHP/folhaPagamento/instancias/configuracao/PRManterConfiguracaoEventosAutomaticos.php b/gestaoRH/fontes/PHP/folhaPagamento/instancias/configuracao/PRManterConfiguracaoEventosAutomaticos.php new file mode 100644 index 0000000..0348351 --- /dev/null +++ b/gestaoRH/fontes/PHP/folhaPagamento/instancias/configuracao/PRManterConfiguracaoEventosAutomaticos.php @@ -0,0 +1,85 @@ + +get("stAcao"); +//Define o nome dos arquivos PHP +$stPrograma = "ManterConfiguracaoEventosAutomaticos"; +$pgFilt = "FL".$stPrograma.".php?".Sessao::getId()."&stAcao=$stAcao"; +$pgForm = "FM".$stPrograma.".php?".Sessao::getId()."&stAcao=$stAcao"; +$pgList = "LS".$stPrograma.".php?".Sessao::getId()."&stAcao=$stAcao"; +$pgOcul = "OC".$stPrograma.".php?".Sessao::getId()."&stAcao=$stAcao"; +$pgProc = "PR".$stPrograma.".php?".Sessao::getId()."&stAcao=$stAcao"; +$pgJS = "JS".$stPrograma.".js"; + +$obErro = new Erro; +$obTransacao = new Transacao; +$boFlagTransacao = false; +$obErro = $obTransacao->abreTransacao( $boFlagTransacao, $boTransacao ); + +switch ($stAcao) { + case "configurar": + if (!$obErro->ocorreu()) { + $arEventos = Sessao::read('arEventos'); + + foreach ($arEventos as $registro) { + $stEventos .= $registro["cod_evento"].","; + } + $stEventos = substr($stEventos, 0, strlen($stEventos)-1); + + $obTAdministracaoConfiguracao = new TAdministracaoConfiguracao; + $obTAdministracaoConfiguracao->setDado("cod_modulo", 27); + $obTAdministracaoConfiguracao->setDado("exercicio", Sessao::getExercicio()); + $obTAdministracaoConfiguracao->setDado("parametro", "evento_automatico"); + $obTAdministracaoConfiguracao->setDado("valor",$stEventos); + + $obErro = $obTAdministracaoConfiguracao->alteracao($boTransacao); + } + + if ( !$obErro->ocorreu() ) { + SistemaLegado::alertaAviso($pgForm,"Configurar lançamentos de eventos automáticos concluído com sucesso." ,"incluir","aviso", Sessao::getId(), "../"); + } else { + sistemaLegado::alertaAviso($pgForm.Sessao::read('link')."&stErro=".urlencode($obErro->getDescricao()),"" ,"n_excluir","aviso", Sessao::getId(), "../"); + } + break; +} + +$obTransacao->fechaTransacao( $boFlagTransacao, $boTransacao, $obErro, $obTAdministracaoConfiguracao ); + +?> \ No newline at end of file diff --git a/gestaoRH/fontes/PHP/folhaPagamento/instancias/decimo/FMManterRegistroEventoDecimo.php b/gestaoRH/fontes/PHP/folhaPagamento/instancias/decimo/FMManterRegistroEventoDecimo.php index d3b07d8..a060bc2 100644 --- a/gestaoRH/fontes/PHP/folhaPagamento/instancias/decimo/FMManterRegistroEventoDecimo.php +++ b/gestaoRH/fontes/PHP/folhaPagamento/instancias/decimo/FMManterRegistroEventoDecimo.php @@ -162,10 +162,11 @@ if( ($rsAdidoCedido->getCampo("tipo_cedencia") == "a" and $rsAdidoCedido->getCam $obIBscEvento = new IBscEvento; $obIBscEvento->obBscInnerEvento->setNullBarra ( false ); - //$obIBscEvento->obTxtValor->setNullBarra ( false ); $obIBscEvento->setInformarValorQuantidade ( true ); $obIBscEvento->setInformarQuantidadeParcelas ( true ); - + $obIBscEvento->obBscInnerEvento->obCampoCod->obEvento->setOnChange(""); + $obIBscEvento->obBscInnerEvento->obCampoCod->obEvento->setOnBlur("ajaxJavaScript( '".CAM_GRH_FOL_PROCESSAMENTO."OCBscEvento.php?".Sessao::getId()."&inCodigoEvento='+this.value+'&stCampoNomEvento=stEvento&stCampoCodEvento=inCodigoEvento', 'preencheDescEvento' ); " ); + $obTxtDesdobramento = new TextBox; $obTxtDesdobramento->setRotulo ( "Desdobramento" ); $obTxtDesdobramento->setName ( "stDesdobramento" ); diff --git a/gestaoRH/fontes/PHP/folhaPagamento/instancias/decimo/OCManterRegistroEventoDecimo.php b/gestaoRH/fontes/PHP/folhaPagamento/instancias/decimo/OCManterRegistroEventoDecimo.php index cb56f97..d5c7101 100644 --- a/gestaoRH/fontes/PHP/folhaPagamento/instancias/decimo/OCManterRegistroEventoDecimo.php +++ b/gestaoRH/fontes/PHP/folhaPagamento/instancias/decimo/OCManterRegistroEventoDecimo.php @@ -335,6 +335,7 @@ function montaListaEventos($arEventos) $obLista->ultimaAcao->setLink( "JavaScript:executaFuncaoAjax('montaAlterarEvento');"); $obLista->ultimaAcao->addCampo("1","inId"); $obLista->ultimaAcao->addCampo("2","inCodigoEvento"); + $obLista->commitAcao(); $obLista->addAcao(); @@ -453,9 +454,9 @@ function montaListaEventosBase($arEventos) $stHtml = str_replace(" ","",$stHtml); $stHtml = str_replace("'","\\'",$stHtml); - $stJs .= "d.getElementById('spnEventosBase').innerHTML = '".$stHtml."'; \n"; + $stJs .= "jq('#spnEventosBase').html('".$stHtml."'); \n"; } else { - $stJs .= "d.getElementById('spnEventosBase').innerHTML = ''; \n"; + $stJs .= "jq('#spnEventosBase').html(''); \n"; } return $stJs; @@ -513,25 +514,25 @@ function incluirEvento() return $stJs; } -function alterarEvento() +function alterarEvento(Request $request) { include_once(CAM_GRH_FOL_MAPEAMENTO."TFolhaPagamentoRegistroEvento.class.php"); $obErro = new erro; $arEventos = ( is_array(Sessao::read('arEventos')) ? Sessao::read('arEventos') : array()); $obTFolhaPagamentoRegistroEvento = new TFolhaPagamentoRegistroEvento; - $stFiltro = " AND evento.codigo = '".$_GET['inCodigoEvento']."'"; - $stFiltro .= " AND sub_divisao.cod_sub_divisao = ".$_GET['inCodSubDivisao']; - $stFiltro .= " AND cargo.cod_cargo = ".$_GET['inCodCargo']; - $stFiltro .= ( $_GET['inCodEspecialidade'] ) ? " AND especialidade.cod_especialidade = ".$_GET['inCodEspecialidade'] : ""; + $stFiltro = " AND evento.codigo = '".$request->get('inCodigoEvento')."'"; + $stFiltro .= " AND sub_divisao.cod_sub_divisao = ".$request->get('inCodSubDivisao'); + $stFiltro .= " AND cargo.cod_cargo = ".$request->get('inCodCargo'); + $stFiltro .= ( $request->get('inCodEspecialidade') ) ? " AND especialidade.cod_especialidade = ".$request->get('inCodEspecialidade') : ""; $obTFolhaPagamentoRegistroEvento->recuperaRelacionamentoConfiguracao($rsConfiguracao,$stFiltro); if ( $rsConfiguracao->getNumLinhas() < 0 ) { $obErro->setDescricao("O evento informado não possui configuração para a subdivisão/cargo e/ou especialidade do contrato em manutenção."); } if ( !$obErro->ocorreu() ) { foreach ($arEventos as $arEvento) { - if($arEvento['inCodigoEvento'] == $_GET['inCodigoEvento'] and $arEvento['stDesdobramento'] == $_GET['stDesdobramento'] + if($arEvento['inCodigoEvento'] == $request->get('inCodigoEvento') and $arEvento['stDesdobramento'] == $request->get('stDesdobramento') and $arEvento['inId'] != Sessao::read('inIdEditar')){ - switch ($_GET['stDesdobramento']) { + switch ($request->get('stDesdobramento')) { case 'A': $stDesd = "Abono"; break; @@ -542,27 +543,27 @@ function alterarEvento() $stDesd = "Adiantamento"; break; } - $obErro->setDescricao("O Evento ".$_GET['inCodigoEvento']."-".$_GET['hdnDescEvento']."(".$stDesd.") já está incluído na lista."); + $obErro->setDescricao("O Evento ".$request->get('inCodigoEvento')."-".$request->get('hdnDescEvento')."(".$stDesd.") já está incluído na lista."); } } } if ( !$obErro->ocorreu() ) { $arEventos = Sessao::read("arEventos"); $arEvento['inId'] = Sessao::read('inIdEditar'); - $arEvento['inCodigoEvento'] = $_GET['inCodigoEvento']; - $arEvento['stDescricao'] = $_GET['hdnDescEvento']; - $arEvento['nuValorEvento'] = ($_GET['nuValorEvento'] != "")?$_GET['nuValorEvento']:'0,00'; - $arEvento['nuQuantidadeEvento'] = ($_GET['nuQuantidadeEvento'] != "")?$_GET['nuQuantidadeEvento']:'0,00'; - $arEvento['nuQuantidadeParcelasEvento'] = $_GET['nuQuantidadeParcelasEvento']; - $arEvento['stDesdobramento'] = $_GET['stDesdobramento']; + $arEvento['inCodigoEvento'] = $request->get('inCodigoEvento'); + $arEvento['stDescricao'] = $request->get('hdnDescEvento'); + $arEvento['nuValorEvento'] = ($request->get('nuValorEvento') != "")?$request->get('nuValorEvento'):'0,00'; + $arEvento['nuQuantidadeEvento'] = ($request->get('nuQuantidadeEvento') != "")?$request->get('nuQuantidadeEvento'):'0,00'; + $arEvento['nuQuantidadeParcelasEvento'] = $request->get('nuQuantidadeParcelasEvento'); + $arEvento['stDesdobramento'] = $request->get('stDesdobramento'); $arEvento['inCodRegistro'] = Sessao::read('inCodRegistro'); - $arEventos[Sessao::read('inIdEditar')] = $arEvento; + $arEventos[Sessao::read('inIdEditar')] = $arEvento; Sessao::write("arEventos",$arEventos); $stJs .= montaListaEventos($arEventos); Sessao::write('inIdEditar',""); Sessao::write('inCodRegistro',""); - $stJs .= "f.btAlterarEvento.disabled = true; \n"; - $stJs .= "f.btIncluirEvento.disabled = false; \n"; + $stJs .= "jq('#btAlterarEvento').prop('disabled',true); \n"; + $stJs .= "jq('#btIncluirEvento').removeProp('disabled'); \n"; } else { $stJs .= "alertaAviso('".$obErro->getDescricao()."','form','erro','".Sessao::getId()."');\n"; } @@ -586,38 +587,99 @@ function excluirEvento() return $stJs; } -function montaAlterarEvento() +function preencheAlterarEvento(Request $request) +{ + include_once( CAM_GRH_FOL_NEGOCIO."RFolhaPagamentoEvento.class.php" ); + include_once( CAM_GRH_FOL_PROCESSAMENTO."OCBscEvento.php" ); + include_once( CAM_GRH_FOL_COMPONENTES."IBscEvento.class.php" ); + + $obIBscEvento = Sessao::read('IBscEvento'); + $inCodigoEvento = $request->get('inCodigoEvento'); + $boInformaValorQuantidade = $obIBscEvento->getInformarValorQuantidade(); + $boInformaQuantidadeParcelas = $obIBscEvento->getInformarQuantidadeParcelas(); + $stNaturezasAceitas = $obIBscEvento->getNaturezasAceitas(); + $stEventoSistema = ""; + if ( $obIBscEvento->getEventoSistema() ) { + $stEventoSistema = "true"; + } + if ( $obIBscEvento->getEventoSistema() === false ) { + $stEventoSistema = "false"; + } + if ($request->get('boPopUp')) { + $stJs = "d = window.opener.parent.frames['telaPrincipal'].document; \n"; + } + + $stJs .= "jq('#stEvento').html(' ');\n"; + if ($inCodigoEvento) { + $obRFolhaPagamentoEvento = new RFolhaPagamentoEvento; + $obRFolhaPagamentoEvento->setCodigo( $inCodigoEvento ); + $arNaturezasAceitas = explode( "-", $stNaturezasAceitas ); + for ( $i=0; $isetNaturezas( $arNaturezasAceitas[$i] ); + } + $obRFolhaPagamentoEvento->setEventoSistema( $stEventoSistema ); + $obRFolhaPagamentoEvento->listarEvento( $rsEvento ); + $rsEvento->addFormatacao('valor_quantidade','NUMERIC_BR'); + + if ( $rsEvento->getNumLinhas() > 0 ) { + $stJs .= "jq('#stEvento').html('".$rsEvento->getCampo('descricao')."');\n"; + $stJs .= "jq('#hdnDescEvento').val('".$rsEvento->getCampo('descricao')."');\n"; + $stJs .= "jq('#HdninCodigoEvento').val('".$rsEvento->getCampo('cod_evento')."');\n"; + $stJs .= "jq('#stHdnFixado').val('".$rsEvento->getCampo('fixado')."');\n"; + $stJs .= "jq('#stHdnApresentaParcela').val('".$rsEvento->getCampo('apresenta_parcela')."');\n"; + $stJs .= "jq('#stTextoComplementar').html('".$rsEvento->getCampo('observacao')."');\n"; + + if ($boInformaValorQuantidade || $boInformaQuantidadeParcelas) { + $stJs .= preencheValorQuantidade( $rsEvento->getCampo("fixado"), $rsEvento->getCampo("valor_quantidade"), $rsEvento->getCampo("limite_calculo") ); + } + } else { + $stJs .= "jq('#inCodigoEvento').val('');\n"; + $stJs .= "jq('#inCodigoEvento').focus();\n"; + $stJs .= "jq('#spnDadosEvento').html('');\n"; + $stJs .= "jq('#hdnDescEvento').val('');\n"; + $stJs .= "jq('#stTextoComplementar').html(' ');\n"; + $stJs .= "alertaAviso('Código de evento inválido. (".$inCodigoEvento.") ','form','erro','".Sessao::getId()."');\n"; + } + } else { + $stJs .= "jq('#spnDadosEvento').html('');\n"; + } + + return $stJs; +} + +function montaAlterarEvento(Request $request) { - include_once(CAM_GRH_FOL_PROCESSAMENTO."OCBscEvento.php"); + //include_once( CAM_GRH_FOL_PROCESSAMENTO."OCBscEvento.php" ); include_once(CAM_GRH_FOL_NEGOCIO."RFolhaPagamentoEvento.class.php"); $arEventos = ( is_array(Sessao::read("arEventos")) ? Sessao::read("arEventos") : array()); - $arEvento = $arEventos[$_GET['inId']]; + $arEvento = $arEventos[$request->get('inId')]; $obRFolhaPagamentoEvento = new RFolhaPagamentoEvento; $obRFolhaPagamentoEvento->setCodigo( $arEvento['inCodigoEvento'] ); - $obRFolhaPagamentoEvento->listarEvento( $rsEvento ); - $stJs .= preencheDescEvento(); - $stJs .= "f.inCodigoEvento.value = '".$arEvento['inCodigoEvento']."'; \n"; - $stJs .= "f.hdnDescEvento.value = '".$arEvento['stDescricao']."'; \n"; - $stJs .= "d.getElementById('stEvento').innerHTML = '".$arEvento['stDescricao']."'; \n"; + $obRFolhaPagamentoEvento->listarEvento( $rsEvento ); + $stJs .= preencheAlterarEvento($request); + $stJs .= "jq('#inCodigoEvento').val('".$arEvento['inCodigoEvento']."'); \n"; + $stJs .= "jq('#hdnDescEvento').val('".$arEvento['stDescricao']."'); \n"; + $stJs .= "jq('#stEvento').html('".$arEvento['stDescricao']."'); \n"; if ($rsEvento->getCampo('fixado') == 'V') { - $stJs .= "f.nuValorEvento.value = '".$arEvento['nuValorEvento']."'; \n"; - $stJs .= "f.nuQuantidadeEvento.value = '".$arEvento['nuQuantidadeEvento']."'; \n"; + $stJs .= "jq('#nuValorEvento').val('".$arEvento['nuValorEvento']."'); \n"; + $stJs .= "jq('#nuQuantidadeEvento').val('".$arEvento['nuQuantidadeEvento']."'); \n"; if ($rsEvento->getCampo('apresenta_parcela') != 'f') { - $stJs .= "f.nuQuantidadeParcelasEvento.value = '".$arEvento['nuQuantidadeParcelasEvento']."'; \n"; + $stJs .= "jq('#nuQuantidadeParcelasEvento').val('".$arEvento['nuQuantidadeParcelasEvento']."'); \n"; } } if ($rsEvento->getCampo('fixado') == 'Q') { - $stJs .= "f.nuQuantidadeEvento.value = '".$arEvento['nuQuantidadeEvento']."'; \n"; + $stJs .= "jq('#nuQuantidadeEvento').val('".$arEvento['nuQuantidadeEvento']."'); \n"; if ($rsEvento->getCampo('apresenta_parcela') != 'f') { - $stJs .= "f.nuQuantidadeParcelasEvento.value = '".$arEvento['nuQuantidadeParcelasEvento']."'; \n"; + $stJs .= "jq('#nuQuantidadeParcelasEvento').val('".$arEvento['nuQuantidadeParcelasEvento']."'); \n"; } } - Sessao::write('inIdEditar',$_GET['inId']); + Sessao::write('inIdEditar',$request->get('inId')); Sessao::write('inCodRegistro',$arEvento['inCodRegistro']); - $stJs .= "f.stDesdobramento.value = '".$arEvento['stDesdobramento']."'; \n"; - $stJs .= "f.stCmbDesdobramento.value = '".$arEvento['stDesdobramento']."'; \n"; - $stJs .= "f.btAlterarEvento.disabled = false; \n"; - $stJs .= "f.btIncluirEvento.disabled = true; \n"; + $stJs .= "jq('#stDesdobramento').val('".$arEvento['stDesdobramento']."'); \n"; + $stJs .= "jq('#stCmbDesdobramento').val('".$arEvento['stDesdobramento']."');\n"; + $stJs .= "jq('#stDesdobramento').focus();\n"; + $stJs .= "jq('#btAlterarEvento').removeProp('disabled'); \n"; + $stJs .= "jq('#btIncluirEvento').prop('disabled',true); \n"; return $stJs; } @@ -646,14 +708,14 @@ switch ($_GET['stCtrl']) { case "incluirEvento": $stJs .= incluirEvento(); break; - case "alterarEvento": - $stJs .= alterarEvento(); + case "alterarEvento": + $stJs .= alterarEvento($request); break; case "excluirEvento": $stJs .= excluirEvento(); break; case "montaAlterarEvento": - $stJs .= montaAlterarEvento(); + $stJs .= montaAlterarEvento($request); break; case "mostraMensagem": $stJs .= mostraMensagem(); diff --git a/gestaoRH/fontes/PHP/folhaPagamento/instancias/evento/FMManterEventoAbaSalario.php b/gestaoRH/fontes/PHP/folhaPagamento/instancias/evento/FMManterEventoAbaSalario.php index d737097..59518c1 100755 --- a/gestaoRH/fontes/PHP/folhaPagamento/instancias/evento/FMManterEventoAbaSalario.php +++ b/gestaoRH/fontes/PHP/folhaPagamento/instancias/evento/FMManterEventoAbaSalario.php @@ -66,32 +66,9 @@ $obTxtDescricaoSal->setMaxLength ( 80 $obTxtDescricaoSal->setCaracteresAceitos ( "[0-9a-zA-Z áàãââÁÀÃÂéêÉÊíÍóõôÓÔÕúüÚÜçÇ%--/*+%]" ); $obTxtDescricaoSal->setEspacosExtras ( false ); -//$obCmbRegimeSubDivisaoSal = new SelectMultiplo(); -//$obCmbRegimeSubDivisaoSal->setName ( 'inCodSubDivisaoSal' ); -//$obCmbRegimeSubDivisaoSal->setRotulo ( "*Regime/subdivisões" ); -//$obCmbRegimeSubDivisaoSal->setTitle ( "Selecione os regimes/subdivisões associados ao evento de salário" ); -//$obCmbRegimeSubDivisaoSal->SetNomeLista1 ( 'inCodSubDivisaoDisponiveisSal' ); -//$obCmbRegimeSubDivisaoSal->setCampoId1 ( '[cod_sub_divisao]/[nom_regime]/[nom_sub_divisao]' ); -//$obCmbRegimeSubDivisaoSal->setCampoDesc1 ( '[nom_regime]/[nom_sub_divisao]' ); -//$obCmbRegimeSubDivisaoSal->setStyle1 ( "width: 300px" ); -//$obCmbRegimeSubDivisaoSal->SetRecord1 ( $rsSubDivisaoDisponiveisSal ); -//$obCmbRegimeSubDivisaoSal->SetNomeLista2 ( 'inCodSubDivisaoSelecionadosSal' ); -//$obCmbRegimeSubDivisaoSal->setCampoId2 ( '[cod_sub_divisao]/[nom_regime]/[nom_sub_divisao]' ); -//$obCmbRegimeSubDivisaoSal->setCampoDesc2 ( '[nom_regime]/[nom_sub_divisao]' ); -//$obCmbRegimeSubDivisaoSal->setStyle2 ( "width: 300px" ); -//$obCmbRegimeSubDivisaoSal->SetRecord2 ( $rsSubDivisaoSelecionadosSal ); -//$stOnClick = "selecionaSubDivisao('Sal',true);buscaValor('preencheCargoEspecialidadeSal');selecionaSubDivisao('Sal',false);"; -//$obCmbRegimeSubDivisaoSal->obGerenciaSelects->obBotao1->obEvento->setOnClick( $stOnClick ); -//$obCmbRegimeSubDivisaoSal->obGerenciaSelects->obBotao2->obEvento->setOnClick( $stOnClick ); -//$obCmbRegimeSubDivisaoSal->obGerenciaSelects->obBotao3->obEvento->setOnClick( $stOnClick ); -//$obCmbRegimeSubDivisaoSal->obGerenciaSelects->obBotao4->obEvento->setOnClick( $stOnClick ); -//$obCmbRegimeSubDivisaoSal->obSelect1->obEvento->setOnDblClick( $stOnClick ); -//$obCmbRegimeSubDivisaoSal->obSelect2->obEvento->setOnDblClick( $stOnClick ); - $obCmbCargoSal = new SelectMultiplo(); $obCmbCargoSal->setName ( 'inCodCargoSal' ); $obCmbCargoSal->setRotulo ( "*Cargos vinculados" ); -//$obCmbCargoSal->setTitle ( "Selecione os cargos/especialidades associados ao evento de salário" ); $obCmbCargoSal->SetNomeLista1 ( 'inCodCargoDisponiveisSal' ); $obCmbCargoSal->setCampoId1 ( '[cod_cargo]' ); $obCmbCargoSal->setCampoDesc1 ( '[descr_cargo]/[descr_espec]' ); diff --git a/gestaoRH/fontes/PHP/folhaPagamento/instancias/movimentacaoFinanceira/FLConsultarRegistroEvento.php b/gestaoRH/fontes/PHP/folhaPagamento/instancias/movimentacaoFinanceira/FLConsultarRegistroEvento.php index 7b9ee2e..d38e7ea 100644 --- a/gestaoRH/fontes/PHP/folhaPagamento/instancias/movimentacaoFinanceira/FLConsultarRegistroEvento.php +++ b/gestaoRH/fontes/PHP/folhaPagamento/instancias/movimentacaoFinanceira/FLConsultarRegistroEvento.php @@ -59,12 +59,12 @@ $obRFolhaPagamentoFolhaSituacao = new RFolhaPagamentoFolhaSituacao(new RFolhaPag //DEFINICAO DO FORM $obForm = new Form; -$obForm->setAction ( $pgProc ); -$obForm->setTarget ( "telaPrincipal" ); +$obForm->setAction( $pgProc ); +$obForm->setTarget( "telaPrincipal" ); $obHdnCtrl = new Hidden; -$obHdnCtrl->setName ( "stCtrl" ); -$obHdnCtrl->setValue ( $stCtrl ); +$obHdnCtrl->setName ( "stCtrl" ); +$obHdnCtrl->setValue( $stCtrl ); $obIFiltroCompetencia = new IFiltroCompetencia; @@ -78,13 +78,13 @@ $obIFiltroComponentes->setEvento(); //DEFINICAO DO FORMULARIO $obFormulario = new Formulario; -$obFormulario->addForm ( $obForm ); -$obFormulario->addTitulo ( $obRFolhaPagamentoFolhaSituacao->consultarCompetencia() ,"right" ); -$obFormulario->addTitulo ( "Parâmetros para Emissão do Relatório" ); -$obFormulario->addHidden ( $obHdnCtrl ); -$obIFiltroCompetencia->geraFormulario ( $obFormulario ); -$obIFiltroComponentes->geraFormulario ( $obFormulario ); -//$obIFiltroTipoFolha->geraFormulario ( $obFormulario ); +$obFormulario->addForm ( $obForm ); +$obFormulario->addTitulo ( $obRFolhaPagamentoFolhaSituacao->consultarCompetencia() ,"right" ); +$obFormulario->addTitulo ( "Parâmetros para Emissão do Relatório" ); +$obFormulario->addHidden ( $obHdnCtrl ); +$obIFiltroCompetencia->geraFormulario( $obFormulario ); +$obIFiltroComponentes->geraFormulario( $obFormulario ); + $obFormulario->ok(); $obFormulario->show(); diff --git a/gestaoRH/fontes/PHP/folhaPagamento/instancias/movimentacaoFinanceira/OCConsultarFichaFinanceira.php b/gestaoRH/fontes/PHP/folhaPagamento/instancias/movimentacaoFinanceira/OCConsultarFichaFinanceira.php index 2c61f8f..676b4d8 100755 --- a/gestaoRH/fontes/PHP/folhaPagamento/instancias/movimentacaoFinanceira/OCConsultarFichaFinanceira.php +++ b/gestaoRH/fontes/PHP/folhaPagamento/instancias/movimentacaoFinanceira/OCConsultarFichaFinanceira.php @@ -31,7 +31,7 @@ * Casos de uso: uc-04.05.41 - $Id: OCConsultarFichaFinanceira.php 59612 2014-09-02 12:00:51Z gelson $ + $Id: OCConsultarFichaFinanceira.php 63871 2015-10-27 20:24:26Z jean $ */ include_once '../../../../../../gestaoAdministrativa/fontes/PHP/pacotes/FrameworkHTML.inc.php'; @@ -742,7 +742,7 @@ function montaListaContratosxEvento() $obLista->Foot->addSoma ( 'quantidade', 'D' ); $obLista->Foot->addSoma ( 'valor', 'D' ); - $obLista->Body->addAcao("consultar","executaFuncaoAjax('%s','&inCodContrato=%s&inMatricula=%s&stNomeCGM=%s&inNumCGM=%s&inCodPeriodoMovimentacao=%s&inCodComplementar=".$_REQUEST["inCodComplementar"]."&inCodConfiguracao=".$_REQUEST["inCodConfiguracao"]."')",array('processarPopUp','cod_contrato','matricula','nom_cgm','numcgm','cod_periodo_movimentacao','inCodComplementar','inCodConfiguracao')); + $obLista->Body->addAcao("consultar","executaFuncaoAjax('%s','&inCodContrato=%s&inMatricula=%s&stNomeCGM=%s&inNumCGM=%s&inCodPeriodoMovimentacao=%s&inCodComplementar=".$_REQUEST["inCodComplementar"]."&inCodConfiguracao=".$_REQUEST["inCodConfiguracao"]."&inCodMes=".$_REQUEST["inCodMes"]."&inAno=".$_REQUEST["inAno"]."')",array('processarPopUp','cod_contrato','matricula','nom_cgm','numcgm','cod_periodo_movimentacao','inCodComplementar','inCodConfiguracao','inCodMes','inAno')); $obLista->montaHTML(true); $stJs = "d.getElementById('spnSpan5').innerHTML = '".$obLista->getHtml()."'; \n"; @@ -752,10 +752,9 @@ function montaListaContratosxEvento() function processarPopUp() { - $stFiltros = "&inCodContrato=".$_GET["inCodContrato"]."&inRegistro=".$_GET["inMatricula"]."&inCodConfiguracao=".$_GET['inCodConfiguracao']."&nom_cgm=".$_GET["stNomeCGM"]."&numcgm=".$_GET["inNumCGM"]."&inCodPeriodoMovimentacao=".$_GET["inCodPeriodoMovimentacao"]."&inCodComplementar=".$_REQUEST["inCodComplementar"]; + $stFiltros = "&inCodContrato=".$_GET["inCodContrato"]."&inRegistro=".$_GET["inMatricula"]."&inCodConfiguracao=".$_GET['inCodConfiguracao']."&nom_cgm=".$_GET["stNomeCGM"]."&numcgm=".$_GET["inNumCGM"]."&inCodPeriodoMovimentacao=".$_GET["inCodPeriodoMovimentacao"]."&inCodComplementar=".$_REQUEST["inCodComplementar"]."&inCodMes=".$_REQUEST["inCodMes"]."&inAno=".$_REQUEST["inAno"].""; $stUrlFrame = CAM_GRH_FOL_POPUPS."movimentacaoFinanceira/FRConsultarFichaFinanceira.php?sUrlConsulta=FMConsultarFichaFinanceira.php?".Sessao::getId().$stFiltros; $stJs .= "window.open('".$stUrlFrame."', 'popUpConsultaFichaFinanceira', 'width=800,height=550,resizable=1,scrollbars=1,left=0,top=0');"; - return $stJs; } diff --git a/gestaoRH/fontes/PHP/folhaPagamento/instancias/movimentacaoFinanceira/OCManterRegistroEvento.php b/gestaoRH/fontes/PHP/folhaPagamento/instancias/movimentacaoFinanceira/OCManterRegistroEvento.php index e39375b..d79cd92 100755 --- a/gestaoRH/fontes/PHP/folhaPagamento/instancias/movimentacaoFinanceira/OCManterRegistroEvento.php +++ b/gestaoRH/fontes/PHP/folhaPagamento/instancias/movimentacaoFinanceira/OCManterRegistroEvento.php @@ -74,7 +74,7 @@ function processarFiltro($boExecuta=false,$boMensagem="") function processarFormInclusao($boExecuta=false,$obErro="") { $obErro = ( is_object( $obErro ) ) ? $obErro : new erro; - $stTipo = ( $_GET['stTipo'] != '' ) ? $_GET['stTipo'] : Sessao::read('stTipo'); + $stTipo = ( $_REQUEST['stTipo'] != '' ) ? $_REQUEST['stTipo'] : Sessao::read('stTipo'); //Código para habilitar a aba onde o usuário estava quando iniciou o processo de procura do evento //e posteriormente acionou o botão cancelar em qualquer momento deste processo. $inNumAba = Sessao::read('numAba'); @@ -102,7 +102,7 @@ function processarFormInclusao($boExecuta=false,$obErro="") $stJs .= "d.links['id_layer_1'].href = \"javascript:buscaValor('habilitaLayer_1');HabilitaLayer('layer_1');\"; \n"; $stJs .= "d.links['id_layer_2'].href = \"javascript:buscaValor('habilitaLayer_2');HabilitaLayer('layer_2');\"; \n"; $stJs .= "d.links['id_layer_3'].href = \"javascript:buscaValor('habilitaLayer_3');HabilitaLayer('layer_3');\"; \n"; - $stJs .= "d.links['id_layer_4'].href = \"javascript:buscaValor('habilitaLayer_4');HabilitaLayer('layer_4');\"; \n"; + $stJs .= "d.links['id_layer_4'].href = \"javascript:buscaValor('habilitaLayer_4');HabilitaLayer('layer_4');BloqueiaFrames(true,false);\"; \n"; if ( Sessao::read('boBase') ) { $stJs .= "d.links['id_layer_5'].href = \"javascript:buscaValor('habilitaLayer_5');HabilitaLayer('layer_5');\"; \n"; } @@ -117,8 +117,8 @@ function processarFormInclusao($boExecuta=false,$obErro="") $stJs.= gerarSpan2Form(); } if ( isset($stTipo) and $stTipo != "" ) { - $stJs .= "d.getElementById('inCampoInner').innerHTML = '".$_GET['stDescricao']."'; \n"; - $stJs .= "f.inCampoInner.value = '".$_GET['stDescricao']."'; \n"; + $stJs .= "d.getElementById('inCampoInner').innerHTML = '".$_REQUEST['stDescricao']."'; \n"; + $stJs .= "f.inCampoInner.value = '".$_REQUEST['stDescricao']."'; \n"; if ($stTipo != 'F' and $inNumAba == 1) { $obErro->setDescricao("O evento informado não é um evento fixo, nesta aba devem ser informados apenas eventos fixos."); $stJs .= "f.inCodigo.value = ''; \n"; @@ -179,6 +179,328 @@ function bloqueiaAbasForm($boExecuta=false) } } +function montaPreviaSalario() +{ + $inNumCGM = Sessao::read("inNumCGM"); + $inCodConfiguracao = '1'; + //Buscando o calculo realizado para mostra na ABA PREVIA + $obErro = new erro; + $obRFolhaPagamentoPeriodoMovimentacao = new RFolhaPagamentoPeriodoMovimentacao(); + $obErro = $obRFolhaPagamentoPeriodoMovimentacao->listarUltimaMovimentacao($rsUltimaMovimentacao, "", "", $boTransacao); + + if ( !$obErro->ocorreu() ) { + include_once(CAM_GRH_PES_MAPEAMENTO."TPessoalContrato.class.php"); + $obTPessoalContrato = new TPessoalContrato(); + $stFiltro = " AND numcgm = ".$inNumCGM; + $obErro = $obTPessoalContrato->recuperaCgmDoRegistro($rsCgm,$stFiltro,"",$boTransacao); + + if ( !$obErro->ocorreu() ) { + include_once(CAM_GRH_FOL_MAPEAMENTO."TFolhaPagamentoEventoCalculado.class.php"); + $obTFolhaPagamentoEventoCalculado = new TFolhaPagamentoEventoCalculado(); + $obTFolhaPagamentoEventoCalculado->setDado("cod_periodo_movimentacao",$rsUltimaMovimentacao->getCampo("cod_periodo_movimentacao")); + $obTFolhaPagamentoEventoCalculado->setDado("cod_contrato" ,$rsCgm->getCampo("cod_contrato")); + $obTFolhaPagamentoEventoCalculado->setDado("cod_configuracao" ,$inCodConfiguracao); + $obTFolhaPagamentoEventoCalculado->setDado("cod_complementar" ,'0'); + $obTFolhaPagamentoEventoCalculado->setDado("ordem" ,'codigo'); + $obErro = $obTFolhaPagamentoEventoCalculado->recuperaEventosCalculadosFichaFinanceira($rsEventoCalculado,"","",$boTransacao); + + if ( !$obErro->ocorreu() ) { + $obTFolhaPagamentoEventoCalculado->setDado("cod_contrato" ,$rsCgm->getCampo("cod_contrato")); + $obTFolhaPagamentoEventoCalculado->setDado("numcgm" ,$rsCgm->getCampo("numcgm")); + $obTFolhaPagamentoEventoCalculado->setDado("cod_periodo_movimentacao",$rsUltimaMovimentacao->getCampo("cod_periodo_movimentacao")); + $obTFolhaPagamentoEventoCalculado->setDado("natureza" ,'B'); + $obErro = $obTFolhaPagamentoEventoCalculado->recuperaValoresAcumuladosCalculo($rsValoresAcumuladosBase,'',' order by codigo',$boTransacao); + + if ( !$obErro->ocorreu() ) + $obErro = $obTFolhaPagamentoEventoCalculado->recuperaValoresAcumuladosCalculoSalarioFamilia($rsValoresAcumuladosBaseSalarioFamilia,'',' order by codigo',$boTransacao); + + if ( !$obErro->ocorreu() ) + $obErro = $obTFolhaPagamentoEventoCalculado->recuperaRotuloValoresAcumuladosCalculo($rsRotuloValoresAcumuladosBase,"","",$boTransacao); + + if ( !$obErro->ocorreu() ) + $obErro = $obTFolhaPagamentoEventoCalculado->recuperaRotuloValoresAcumuladosCalculoSalarioFamilia($rsRotuloValoresAcumuladosBaseSalarioFamilia,"","",$boTransacao); + + if ( !$obErro->ocorreu() ){ + $obTFolhaPagamentoEventoCalculado->setDado("natureza",'D'); + $obErro = $obTFolhaPagamentoEventoCalculado->recuperaValoresAcumuladosCalculo($rsValoresAcumuladosDesconto,'',' order by codigo',$boTransacao); + } + + if ( !$obErro->ocorreu() ) + $obErro = $obTFolhaPagamentoEventoCalculado->recuperaRotuloValoresAcumuladosCalculo($rsRotuloValoresAcumuladosDesconto,"","",$boTransacao); + } + } + + $rsEventos = processarEventos($rsEventoCalculado,1); + $inCount1 = $rsEventos->getNumLinhas(); + $stTabela1 .= "
    "; + $stTabela1 .= ""; + $stTabela1 .= ""; + $stTabela1 .= ""; + $stTabela1 .= ""; + $stTabela1 .= ""; + $stTabela1 .= ""; + $stTabela1 .= ""; + while ( !$rsEventos->eof() ) { + $stTabela1 .= ""; + $stTabela1 .= ""; + $stTabela1 .= ""; + if ($rsEventos->getCampo('apresenta_parcela') == 't') { + $stQuantidadeParc = '/'.$rsEventos->getCampo('quantidade_total_parcela'); + $stTabela1 .= ""; + $stTabela1 .= ""; + $stTabela1 .= ""; + + } else { + $stTabela1 .= ""; + $stTabela1 .= ""; + $stTabela1 .= ""; + } + + $rsEventos->proximo(); + } + + $stTabela1 .= "
    EventoDescriçãoDesdobramentoQuantidadeProventosDescontos
    ".$rsEventos->getCampo('codigo')."".$rsEventos->getCampo('descricao')."".$rsEventos->getCampo('desdobramento_texto')."".$rsEventos->getCampo('quantidade_parcelas').$stQuantidadeParc."".$rsEventos->getCampo('proventos')."".$rsEventos->getCampo('descontos')."
    ".$rsEventos->getCampo('quantidade')."".$rsEventos->getCampo('proventos')."".$rsEventos->getCampo('descontos')."
    "; + $stTabela1 .= "
    "; + + $rsEventos = processarEventos($rsEventoCalculado,2); + $inCount2 = $rsEventos->getNumLinhas(); + $stTabela2 = "
    "; + $stTabela2 .= ""; + $stTabela2 .= ""; + $stTabela2 .= ""; + $stTabela2 .= ""; + $stTabela2 .= ""; + $stTabela2 .= ""; + while ( !$rsEventos->eof() ) { + $stTabela2 .= ""; + $stTabela2 .= ""; + $stTabela2 .= ""; + $stTabela2 .= ""; + $stTabela2 .= ""; + $rsEventos->proximo(); + } + $stTabela2 .= "
    EventoDescriçãoDesdobramentoQuantidadeValor
    ".$rsEventos->getCampo('codigo')."".$rsEventos->getCampo('descricao')."".$rsEventos->getCampo('desdobramento_texto')."".$rsEventos->getCampo('quantidade')."".$rsEventos->getCampo('descontos')."
    "; + $stTabela2 .= "
    "; + + $rsEventos = processarEventos($rsEventoCalculado,3); + $inCount3 = $rsEventos->getNumLinhas(); + $stTabela3 = "
    "; + $stTabela3 .= ""; + $stTabela3 .= ""; + $stTabela3 .= ""; + $stTabela3 .= ""; + $stTabela3 .= ""; + $stTabela3 .= ""; + while ( !$rsEventos->eof() ) { + $stTabela3 .= ""; + $stTabela3 .= ""; + $stTabela3 .= ""; + $stTabela3 .= ""; + $stTabela3 .= ""; + $rsEventos->proximo(); + } + $stTabela3 .= "
    EventoDescriçãoDesdobramentoQuantidadeValor
    ".$rsEventos->getCampo('codigo')."".$rsEventos->getCampo('descricao')."".$rsEventos->getCampo('desdobramento_texto')."".$rsEventos->getCampo('quantidade')."".$rsEventos->getCampo('descontos')."
    "; + $stTabela3 .= "
    "; + + $rsEventos = processarEventos($rsEventoCalculado,4); + $stTabela4 = "
    "; + $stTabela4 .= ""; + + while ( !$rsEventos->eof() ) { + $stTabela4 .= ""; + $rsEventos->proximo(); + } + $stTabela4 .= "
    ".$rsEventos->getCampo('descricao')."".$rsEventos->getCampo('proventos')."".$rsEventos->getCampo('descontos')."
    "; + $stTabela4 .= "
    "; + + $stTabela5 = "
    "; + $stTabela5 .= ""; + $stTabela5 .= ""; + if ($inCount1 == -1 and $inCount2 == -1 and $inCount3 == -1) { + $rsValoresAcumuladosBase = new RecordSet; + $rsRotuloValoresAcumuladosBase = new RecordSet; + } + while (!$rsValoresAcumuladosBase->eof()) { + $stTabela5 .= ""; + $rsValoresAcumuladosBase->proximo(); + } + $stTabela5 .= "
    EventoDescriçãoValor
    ".$rsValoresAcumuladosBase->getCampo('codigo')."".$rsValoresAcumuladosBase->getCampo('descricao')."".number_format($rsValoresAcumuladosBase->getCampo('valor'),2,',','.')."
    "; + $stTabela5 .= "
    "; + + $stTabelaSalarioFamilia = "
    "; + $stTabelaSalarioFamilia .= ""; + $stTabelaSalarioFamilia .= ""; + + while (!$rsValoresAcumuladosBaseSalarioFamilia->eof()) { + $stTabelaSalarioFamilia .= ""; + $rsValoresAcumuladosBaseSalarioFamilia->proximo(); + } + $stTabelaSalarioFamilia .= "
    EventoDescriçãoValor
    ".$rsValoresAcumuladosBaseSalarioFamilia->getCampo('codigo')."".$rsValoresAcumuladosBaseSalarioFamilia->getCampo('descricao')."".number_format($rsValoresAcumuladosBaseSalarioFamilia->getCampo('valor'),2,',','.')."
    "; + $stTabelaSalarioFamilia .= "
    "; + + $stTabela6 = "
    "; + $stTabela6 .= ""; + $stTabela6 .= ""; + if ($inCount1 == -1 and $inCount2 == -1 and $inCount3 == -1) { + $rsValoresAcumuladosDesconto = new RecordSet; + $rsRotuloValoresAcumuladosDesconto = new RecordSet; + } + while (!$rsValoresAcumuladosDesconto->eof()) { + $stTabela6 .= ""; + $rsValoresAcumuladosDesconto->proximo(); + } + $stTabela6 .= "
    EventoDescriçãoValor
    ".$rsValoresAcumuladosDesconto->getCampo('codigo')."".$rsValoresAcumuladosDesconto->getCampo('descricao')."".number_format($rsValoresAcumuladosDesconto->getCampo('valor'),2,',','.')."
    "; + $stTabela6 .= "
    "; + + $stTabela7 = "
    "; + $stTabela7 .= ""; + $stTabela7 .= ""; + $stTabela7 .= ""; + $stTabela7 .= ""; + $stTabela7 .= "
    (S)Folha Salário
    (C)Folha Complementar
    (F)Folha Férias
    "; + $stTabela7 .= "
    "; + + $obSpnSpan5_1 = new Span; + $obSpnSpan5_1->setId ( "spnSpan5_1" ); + + $obSpnSpan5_2 = new Span; + $obSpnSpan5_2->setId ( "spnSpan5_2" ); + + $obSpnSpan5_3 = new Span; + $obSpnSpan5_3->setId ( "spnSpan5_3" ); + + $obSpnSpan5_4 = new Span; + $obSpnSpan5_4->setId ( "spnSpan5_4" ); + + $obSpnSpan5_5 = new Span; + $obSpnSpan5_5->setId ( "spnSpan5_5" ); + + $obSpnSpan5_6 = new Span; + $obSpnSpan5_6->setId ( "spnSpan5_6" ); + + $obSpnSpan5_7 = new Span; + $obSpnSpan5_7->setId ( "spnSpan5_7" ); + + $obSpnSalarioFamilia1 = new Span(); + $obSpnSalarioFamilia1->setId("spnSalarioFamilia"); + $obSpnSalarioFamilia1->setValue($stTabelaSalarioFamilia); + + $obFormulario = new Formulario; + $obFormulario->addTitulo ( "Ficha Financeira" ); + $obFormulario->addTitulo ( "Eventos Calculados" ); + $obFormulario->addSpan ( $obSpnSpan5_1 ); + $obFormulario->addTitulo ( "Bases de Cálculo" ); + $obFormulario->addSpan ( $obSpnSpan5_2 ); + $obFormulario->addTitulo ( "Eventos Informativos"); + $obFormulario->addSpan ( $obSpnSpan5_3 ); + $obFormulario->addTitulo ( "Totais Calculados" ); + $obFormulario->addSpan ( $obSpnSpan5_4 ); + + $obFormulario->addTitulo( "Valores Acumulados com o Cálculo da Matrícula","center" ); + $obFormulario->addTitulo( "Matrícula(s): ".$rsRotuloValoresAcumuladosBase->getCampo("rotulo"),"center" ); + $obFormulario->addSpan ( $obSpnSpan5_5 ); + + $obFormulario->addTitulo( "Valores Acumulados para Cálculo do Salário Família","center" ); + $obFormulario->addTitulo( "Matrícula(s): ".$rsRotuloValoresAcumuladosBaseSalarioFamilia->getCampo("rotulo") ,"center" ); + $obFormulario->addSpan ( $obSpnSalarioFamilia1 ); + + $obFormulario->addTitulo( "Valores Acumulados até o Cálculo da Matrícula","center" ); + $obFormulario->addTitulo( "Matrícula(s): ".$rsRotuloValoresAcumuladosDesconto->getCampo("rotulo"),"center" ); + $obFormulario->addSpan ( $obSpnSpan5_6 ); + $obFormulario->addSpan ( $obSpnSpan5_7 ); + + $obFormulario->montaInnerHtml(); + $sthtml = $obFormulario->getHTML(); + $sthtml = str_replace("\n","" ,$sthtml); + $sthtml = str_replace(" ","" ,$sthtml); + $sthtml = str_replace("\"","" ,$sthtml); + + $stJs = "jq_(\"#spnSpan1\").html(\"".$sthtml."\"); \n"; + $stJs .= "jq_(\"#spnSpan5_1\").html(\"".$stTabela1."\"); \n"; + $stJs .= "jq_(\"#spnSpan5_2\").html(\"".$stTabela2."\"); \n"; + $stJs .= "jq_(\"#spnSpan5_3\").html(\"".$stTabela3."\"); \n"; + $stJs .= "jq_(\"#spnSpan5_4\").html(\"".$stTabela4."\"); \n"; + $stJs .= "jq_(\"#spnSpan5_5\").html(\"".$stTabela5."\"); \n"; + $stJs .= "jq_(\"#spnSpan5_6\").html(\"".$stTabela6."\"); \n"; + $stJs .= "jq_(\"#spnSpan5_7\").html(\"".$stTabela7."\"); \n"; + $stJs .= " LiberaFrames(true, true); \n"; + + } else { + $stJs .= "alertaAviso('@".$obErro->getDescricao()."','form','erro','".Sessao::getId()."'); \n"; + } + + return $stJs; +} + +function processarEventos($rsEventos,$inNatureza) +{ + $arEventos = ( $rsEventos->getNumLinhas() > 0 ) ? $rsEventos->getElementos() : array(); + $arTemp = array(); + switch ($inNatureza) { + case 1: + $stNatureza1 = 'P'; + $stNatureza2 = 'D'; + break; + case 2: + $stNatureza1 = 'B'; + $stNatureza2 = 'B'; + break; + case 3: + $stNatureza1 = 'I'; + $stNatureza2 = 'I'; + break; + case 4: + $boTodos = true; + $nuTotalProventos = 0; + $nuTotalDescontos = 0; + break; + } + + foreach ($arEventos as $arEvento) { + if( ($arEvento['natureza'] == $stNatureza1 or $arEvento['natureza'] == $stNatureza2) + and ($arEvento['cod_evento'] != $inCodEvento or $arEvento['desdobramento'] != $stDesdobramento) ){ + if ($arEvento['natureza'] == 'P') { + $arEvento['proventos'] = $arEvento['valor']; + } else { + $arEvento['proventos'] = "0,00"; + } + if ($arEvento['natureza'] == 'D' or $arEvento['natureza'] == 'B' or $arEvento['natureza'] == 'I') { + $arEvento['descontos'] = $arEvento['valor']; + } else { + $arEvento['descontos'] = "0,00"; + } + $arTemp[] = $arEvento; + $stTimestamp = $arEvento['timestamp_registro']; + $inCodEvento = $arEvento['cod_evento']; + $stDesdobramento = $arEvento['desdobramento'] ; + } + if ($boTodos) { + if ($arEvento['natureza'] == 'P') { + $nuTotalProventos += $arEvento['valor']; + } + if ($arEvento['natureza'] == 'D') { + $nuTotalDescontos += $arEvento['valor']; + } + } + } + + if ($boTodos) { + $arTemp[] = array("descricao"=>"Soma dos Proventos","proventos"=>$nuTotalProventos); + $arTemp[] = array("descricao"=>"Soma dos Descontos","descontos"=>$nuTotalDescontos); + $arTemp[] = array("descricao"=>"Líquido","proventos"=>$nuTotalProventos-$nuTotalDescontos); + + } + $rsEventos = new recordset; + $rsEventos->preenche($arTemp); + if (!$boTodos) { + $rsEventos->addFormatacao("quantidade","NUMERIC_BR"); + } + $rsEventos->addFormatacao("proventos","NUMERIC_BR"); + $rsEventos->addFormatacao("descontos","NUMERIC_BR"); + + return $rsEventos; +} + function gerarSpan1Form($boExecuta=false) { $obRFolhaPagamentoConfiguracao = new RFolhaPagamentoConfiguracao; @@ -202,101 +524,16 @@ function gerarSpan1Form($boExecuta=false) switch ($inNumAba) { case 4: - $obLista = new Lista; - $obLista->setTitulo("Dados dos Eventos"); - $obLista->setRecordSet( processarPrevia() ); - $obLista->setMostraPaginacao( false ); - - $obLista->addCabecalho(); - $obLista->ultimoCabecalho->addConteudo(" "); - $obLista->ultimoCabecalho->setWidth( 5 ); - $obLista->commitCabecalho(); - - $obLista->addCabecalho(); - $obLista->ultimoCabecalho->addConteudo("Código"); - $obLista->ultimoCabecalho->setWidth( 10 ); - $obLista->commitCabecalho(); - - $obLista->addCabecalho(); - $obLista->ultimoCabecalho->addConteudo("Evento"); - $obLista->ultimoCabecalho->setWidth( 20 ); - $obLista->commitCabecalho(); - - $obLista->addCabecalho(); - $obLista->ultimoCabecalho->addConteudo("Valor"); - $obLista->ultimoCabecalho->setWidth( 15 ); - $obLista->commitCabecalho(); - - $obLista->addCabecalho(); - $obLista->ultimoCabecalho->addConteudo("Quantidade"); - $obLista->ultimoCabecalho->setWidth( 15 ); - $obLista->commitCabecalho(); - - $obLista->addCabecalho(); - $obLista->ultimoCabecalho->addConteudo("Tipo"); - $obLista->ultimoCabecalho->setWidth( 5 ); - $obLista->commitCabecalho(); - - $obLista->addCabecalho(); - $obLista->ultimoCabecalho->addConteudo("Parcelas"); - $obLista->ultimoCabecalho->setWidth( 10 ); - $obLista->commitCabecalho(); - - $obLista->addCabecalho(); - $obLista->ultimoCabecalho->addConteudo("Automático"); - $obLista->ultimoCabecalho->setWidth( 15 ); - $obLista->commitCabecalho(); - - $obLista->addCabecalho(); - $obLista->ultimoCabecalho->addConteudo("Proventos/Descontos"); - $obLista->ultimoCabecalho->setWidth( 15 ); - $obLista->commitCabecalho(); - - $obLista->addDado(); - $obLista->ultimoDado->setAlinhamento("RIGHT"); - $obLista->ultimoDado->setCampo( "inCodigo" ); - $obLista->commitDado(); - - $obLista->addDado(); - $obLista->ultimoDado->setAlinhamento("LEFT"); - $obLista->ultimoDado->setCampo( "stDescricao" ); - $obLista->commitDado(); - - $obLista->addDado(); - $obLista->ultimoDado->setAlinhamento("RIGHT"); - $obLista->ultimoDado->setCampo( "nuValor" ); - $obLista->commitDado(); - - $obLista->addDado(); - $obLista->ultimoDado->setAlinhamento("RIGHT"); - $obLista->ultimoDado->setCampo( "nuQuantidade" ); - $obLista->commitDado(); - - $obLista->addDado(); - $obLista->ultimoDado->setAlinhamento("LEFT"); - $obLista->ultimoDado->setCampo( "stTipo" ); - $obLista->commitDado(); - - $obLista->addDado(); - $obLista->ultimoDado->setAlinhamento("RIGHT"); - $obLista->ultimoDado->setCampo( "inQuantidadeParc" ); - $obLista->commitDado(); - - $obLista->addDado(); - $obLista->ultimoDado->setAlinhamento("CENTRO"); - $obLista->ultimoDado->setCampo( "boAutomatico" ); - $obLista->commitDado(); + include_once(CAM_GRH_FOL_NEGOCIO."RFolhaPagamentoCalcularFolhas.class.php"); + $obRFolhaPagamentoCalcularFolhas = new RFolhaPagamentoCalcularFolhas(); + $obRFolhaPagamentoCalcularFolhas->processarRegistroEvento(); + + $arNumCGM = array("numcgm"=>Sessao::read('inNumCGM')); + $arNumCGM = array($arNumCGM); + $obRFolhaPagamentoCalcularFolhas->processarPreviaCalculoSalario($arNumCGM,"contrato"); - $obLista->addDado(); - $obLista->ultimoDado->setAlinhamento("LEFT"); - $obLista->ultimoDado->setCampo( "stProventosDescontos" ); - $obLista->commitDado(); + $stSpan1 = montaPreviaSalario(); - $obLista->montaHTML(); - $stSpan1 = $obLista->getHTML(); - $stSpan1 = str_replace("\n","",$stSpan1); - $stSpan1 = str_replace(" ","",$stSpan1); - $stSpan1 = str_replace("'","\\'",$stSpan1); break; case 5: $obLista = new Lista; @@ -466,14 +703,20 @@ function gerarSpan1Form($boExecuta=false) $stEval = str_replace("\n","",$stEval); $obFormulario->montaInnerHtml(); $stSpan1 = $obFormulario->getHTML(); + $stSpan1 = str_replace("\"", "\\\"", $stSpan1); break; } - $stJs .= "d.getElementById('spnSpan1').innerHTML = '".$stSpan1."'; \n"; + if($inNumAba != 4){ + $stJs .= "jq_(\"#spnSpan1\").html(\"".$stSpan1."\"); \n"; + }else{ + $stJs .= $stSpan1; + } + if ($boExecuta) { sistemaLegado::executaFrameOculto( $stJs ); } else { return $stJs; - } + } } function gerarSpan2Form($boExecuta=false) @@ -955,7 +1198,7 @@ function limparEvento($boExecuta=false) $stJs .= "d.links['id_layer_1'].href = \"javascript:buscaValor('habilitaLayer_1');HabilitaLayer('layer_1');\"; \n"; $stJs .= "d.links['id_layer_2'].href = \"javascript:buscaValor('habilitaLayer_2');HabilitaLayer('layer_2');\"; \n"; $stJs .= "d.links['id_layer_3'].href = \"javascript:buscaValor('habilitaLayer_3');HabilitaLayer('layer_3');\"; \n"; - $stJs .= "d.links['id_layer_4'].href = \"javascript:buscaValor('habilitaLayer_4');HabilitaLayer('layer_4');\"; \n"; + $stJs .= "d.links['id_layer_4'].href = \"javascript:buscaValor('habilitaLayer_4');HabilitaLayer('layer_4');BloqueiaFrames(true,false); \"; \n"; if ( Sessao::read('boBase') ) { $stJs .= "d.links['id_layer_5'].href = \"javascript:buscaValor('habilitaLayer_5');HabilitaLayer('layer_5');\"; \n"; } @@ -1758,7 +2001,7 @@ function preenchePrevisaoMesAno($inQuantidadeParc="",$nuQuantidade="",$inMesCare } } } -switch ($_POST["stCtrl"]) { +switch ($_REQUEST["stCtrl"]) { case "habilitaSpanFiltro": $stJs.= habilitaSpanFiltro(); break; diff --git a/gestaoRH/fontes/PHP/folhaPagamento/instancias/movimentacaoFinanceira/PRConsultarRegistroEvento.php b/gestaoRH/fontes/PHP/folhaPagamento/instancias/movimentacaoFinanceira/PRConsultarRegistroEvento.php index c0340bf..95622c5 100644 --- a/gestaoRH/fontes/PHP/folhaPagamento/instancias/movimentacaoFinanceira/PRConsultarRegistroEvento.php +++ b/gestaoRH/fontes/PHP/folhaPagamento/instancias/movimentacaoFinanceira/PRConsultarRegistroEvento.php @@ -46,19 +46,19 @@ $pgOcul = "OC".$stPrograma.".php"; $pgJS = "JS".$stPrograma.".js"; //periodo de movimentação -$inMesFinal =( $_POST["inCodMes"]<10 ) ? "0".$_POST["inCodMes"]:$_POST["inCodMes"]; -$dtCompetenciaFinal = $inMesFinal."/".$_POST["inAno"]; +$inMesFinal =( $request->get("inCodMes")<10 ) ? "0".$request->get("inCodMes"):$request->get("inCodMes"); +$dtCompetenciaFinal = $inMesFinal."/".$request->get("inAno"); $stFiltro = " AND to_char(dt_final,'mm/yyyy') = '".$dtCompetenciaFinal."'"; $obTFolhaPagamentoPeriodoMovimentacao = new TFolhaPagamentoPeriodoMovimentacao(); $obTFolhaPagamentoPeriodoMovimentacao->recuperaPeriodoMovimentacao($rsPeriodoMovimentaco,$stFiltro); $stCodigos = ""; -switch ($_POST["stTipoFiltro"]) { +switch ($request->get("stTipoFiltro")) { case "lotacao": - $stCodigos = trim(implode(",",$_POST["inCodLotacaoSelecionados"])); + $stCodigos = trim(implode(",",$request->get("inCodLotacaoSelecionados"))); break; case "local": - $stCodigos = trim(implode(",",$_POST["inCodLocalSelecionados"])); + $stCodigos = trim(implode(",",$request->get("inCodLocalSelecionados"))); break; case "contrato_todos": case "contrato": @@ -72,10 +72,13 @@ switch ($_POST["stTipoFiltro"]) { $stCodigos .= $arEvento["inCodEvento"].","; } $stCodigos = substr($stCodigos,0,strlen($stCodigos)-1); + $request->set("inCodConfiguracao",1); break; } $stCodigos = ($stCodigos == "")?"0":$stCodigos; - +//Zerando o array de eventos +Sessao::write("arEventos",array()); +//gestaoRH/fontes/RPT/folhaPagamento/report/design/consultarRegistroEvento.rptdesign $preview = new PreviewBirt(4,27,30); $preview->setVersaoBirt( '2.5.0' ); $preview->setReturnURL( CAM_GRH_FOL_INSTANCIAS."movimentacaoFinanceira/FLConsultarRegistroEvento.php"); @@ -84,10 +87,10 @@ $preview->setNomeArquivo('consultarRegistroEvento'); $preview->addParametro("entidade" , Sessao::getCodEntidade()); $preview->addParametro("stEntidade" , Sessao::getEntidade()); $preview->addParametro("inCodPeriodoMovimentacao", $rsPeriodoMovimentaco->getCampo("cod_periodo_movimentacao")); -$preview->addParametro("stTipoFiltro" , $_POST["stTipoFiltro"]); +$preview->addParametro("stTipoFiltro" , $request->get("stTipoFiltro")); $preview->addParametro("stCodigos" , $stCodigos); -$preview->addParametro("inCodConfiguracao" , $_POST["inCodConfiguracao"]); -$preview->addParametro("inCodComplementar" , $_POST["inCodComplementar"]); +$preview->addParametro("inCodConfiguracao" , $request->get("inCodConfiguracao")); +$preview->addParametro("inCodComplementar" , $request->get("inCodComplementar")); $preview->preview(); ?> diff --git a/gestaoRH/fontes/PHP/folhaPagamento/instancias/relatorio/PREmitirTermoRescisao.php b/gestaoRH/fontes/PHP/folhaPagamento/instancias/relatorio/PREmitirTermoRescisao.php index ecabf77..1b5bf22 100644 --- a/gestaoRH/fontes/PHP/folhaPagamento/instancias/relatorio/PREmitirTermoRescisao.php +++ b/gestaoRH/fontes/PHP/folhaPagamento/instancias/relatorio/PREmitirTermoRescisao.php @@ -358,7 +358,7 @@ function preencheTermoRescisao(&$obPDF,$arDados,$arEventos,$boPageBreak) $obPDF->Text ( 18,88+$inIncremento, $arDados["num_causa"]."-".substr($arDados["descricao"],0,45) ); $obPDF->Text ( 101,88+$inIncremento, $arDados["num_sefip"] ); $obTPessoalPensao = new TPessoalPensao(); - //SistemaLegado::mostraVar($arDados["registro"]); + $rsPensao = new RecordSet(); $stFiltroPensao = " WHERE cod_servidor = ".$arDados["cod_servidor"]; $obTPessoalPensao->recuperaRelacionamento($rsPensao,$stFiltroPensao); diff --git a/gestaoRH/fontes/PHP/folhaPagamento/instancias/relatorio/PRRelatorioAuditoriaFolha.php b/gestaoRH/fontes/PHP/folhaPagamento/instancias/relatorio/PRRelatorioAuditoriaFolha.php index aa62a0a..4fa052f 100644 --- a/gestaoRH/fontes/PHP/folhaPagamento/instancias/relatorio/PRRelatorioAuditoriaFolha.php +++ b/gestaoRH/fontes/PHP/folhaPagamento/instancias/relatorio/PRRelatorioAuditoriaFolha.php @@ -45,7 +45,6 @@ include_once '../../../../../../gestaoAdministrativa/fontes/PHP/framework/includ include_once '../../../../../../gestaoAdministrativa/fontes/PHP/pacotes/FrameworkBirt.inc.php'; include_once(CAM_GRH_FOL_MAPEAMENTO."TFolhaPagamentoPeriodoMovimentacao.class.php"); -// SistemaLegado::mostravar($_POST); exit; switch ($_POST['stTipoFiltro']) { case "contrato_todos": case "cgm_contrato_todos": diff --git a/gestaoRH/fontes/PHP/folhaPagamento/instancias/relatorio/PRRelatorioCreditosBanco.php b/gestaoRH/fontes/PHP/folhaPagamento/instancias/relatorio/PRRelatorioCreditosBanco.php index 687c273..74f546c 100644 --- a/gestaoRH/fontes/PHP/folhaPagamento/instancias/relatorio/PRRelatorioCreditosBanco.php +++ b/gestaoRH/fontes/PHP/folhaPagamento/instancias/relatorio/PRRelatorioCreditosBanco.php @@ -154,8 +154,6 @@ include_once '../../../../../../gestaoAdministrativa/fontes/PHP/framework/URBEM/ $dbCriaTabela->limpaSelecao(); $dbCriaTabela->fechaBd(); -//SistemaLegado::mostravar($stNomeTabela); - //$preview->addParametro( "stSituacao" , $_POST["stSituacao"]); $preview->addParametro( "codLocal" , $stLocalSelecionados); $preview->addParametro( "codLotacao" , $stLotacaoSelecionados); diff --git a/gestaoRH/fontes/PHP/folhaPagamento/instancias/rotinaMensal/FMManterPeriodoMovimentacao.php b/gestaoRH/fontes/PHP/folhaPagamento/instancias/rotinaMensal/FMManterPeriodoMovimentacao.php index 5c26fd5..c715935 100644 --- a/gestaoRH/fontes/PHP/folhaPagamento/instancias/rotinaMensal/FMManterPeriodoMovimentacao.php +++ b/gestaoRH/fontes/PHP/folhaPagamento/instancias/rotinaMensal/FMManterPeriodoMovimentacao.php @@ -52,14 +52,14 @@ $obHdnCtrl->setName ( "stCtrl" $obHdnCtrl->setValue ( $stStrl ); //Define o nome dos arquivos PHP -$stAcao = $_REQUEST['stAcao']; +$stAcao = $request->get('stAcao'); $stPrograma = "ManterPeriodoMovimentacao"; $pgForm = "FM".$stPrograma.".php"; $pgProc = "PR".$stPrograma.".php"; $pgJS = "JS".$stPrograma.".js"; $pgJS = "OC".$stPrograma.".php"; -$obErro = new Erro();; +$obErro = new Erro(); $obRFolhaPagamentoFolhaSituacao = new RFolhaPagamentoFolhaSituacao(new RFolhaPagamentoPeriodoMovimentacao); if ($stAcao != "mensagemincluir") { @@ -67,24 +67,24 @@ if ($stAcao != "mensagemincluir") { $obRFolhaPagamentoPeriodoMovimentacao->listarUltimaMovimentacao($rsUltimaMovimentacao); $obRFolhaPagamentoPeriodoMovimentacao->setCodPeriodoMovimentacao( $rsUltimaMovimentacao->getCampo('cod_periodo_movimentacao') ); $obRFolhaPagamentoFolhaSituacao = new RFolhaPagamentoFolhaSituacao( $obRFolhaPagamentoPeriodoMovimentacao ); - $obRFolhaPagamentoFolhaSituacao->consultarFolha(); - if ($obRFolhaPagamentoFolhaSituacao->getSituacao() == 'Aberto' and $stAcao != "mensagemincluir") { + $obRFolhaPagamentoFolhaSituacao->consultarFolha(); + if (($obRFolhaPagamentoFolhaSituacao->getSituacao() == 'Aberto') and ($stAcao != "mensagemincluir") ) { $obErro->setDescricao("  - Folha salário aberta. Feche a folha salário para abrir um novo período de movimentação;
    "); } $obRFolhaPagamentoFolhaComplementar = new RFolhaPagamentoFolhaComplementar( $obRFolhaPagamentoPeriodoMovimentacao ); $obRFolhaPagamentoFolhaComplementar->listarFolhaComplementar($rsFolhaComplementar); - if ($rsFolhaComplementar->getCampo('situacao') == "a" and $stAcao != "mensagemincluir") { + if (($rsFolhaComplementar->getCampo('situacao') == "a") and ($stAcao != "mensagemincluir")) { $obErro->setDescricao($obErro->getDescricao()."  - Folha complementar aberta. Feche a folha complementar para abrir um novo período de movimentação;
    "); } include_once(CAM_GRH_FOL_MAPEAMENTO."TFolhaPagamentoLogErroCalculo.class.php"); $obTFolhaPagamentoLogErroCalculo = new TFolhaPagamentoLogErroCalculo(); - $obTFolhaPagamentoLogErroCalculo->recuperaTodos($rsErroCalculo); + $obTFolhaPagamentoLogErroCalculo->recuperaTodos($rsErroCalculo); if ($rsErroCalculo->getNumLinhas() > 0) { $obErro->setDescricao($obErro->getDescricao()."  - Folha salário com erros, resolva os erros ocorridos para poder abrir um novo período de movimentação;
    "); } include_once(CAM_GRH_FOL_MAPEAMENTO."TFolhaPagamentoLogErroCalculoComplementar.class.php"); $obTFolhaPagamentoLogErroCalculoComplementar = new TFolhaPagamentoLogErroCalculoComplementar(); - $obTFolhaPagamentoLogErroCalculoComplementar->recuperaTodos($rsErroCalculoComplementar); + $obTFolhaPagamentoLogErroCalculoComplementar->recuperaTodos($rsErroCalculoComplementar); if ($rsErroCalculoComplementar->getNumLinhas() > 0) { $obErro->setDescricao($obErro->getDescricao()."  - Folha complementar com erros, resolva os erros ocorridos para poder abrir um novo período de movimentação;
    "); } @@ -96,7 +96,7 @@ if ($stAcao != "mensagemincluir") { } include_once(CAM_GRH_FOL_MAPEAMENTO."TFolhaPagamentoLogErroCalculoDecimo.class.php"); $obTFolhaPagamentoLogErroCalculoDecimo = new TFolhaPagamentoLogErroCalculoDecimo(); - $obTFolhaPagamentoLogErroCalculoDecimo->recuperaTodos($rsErroCalculoDecimo); + $obTFolhaPagamentoLogErroCalculoDecimo->recuperaTodos($rsErroCalculoDecimo); if ($rsErroCalculoDecimo->getNumLinhas() > 0) { $obErro->setDescricao($obErro->getDescricao()."  - Folha décimo com erros, resolva os erros ocorridos para poder abrir um novo período de movimentação;
    "); } @@ -113,7 +113,6 @@ if ($obErro->ocorreu()) { $obLblObs = new Label; $obLblObs->setRotulo ( "Observação" ); $obLblObs->setValue ( "Não é possível abrir um novo período de movimentação pois existe(m) o(s) seguinte(s) problema(s):
    ".$obErro->getDescricao() ); - //$obLblObs->setValue ( "Não é possível abrir um novo período de movimentação pois existe uma folha salário e/ou uma folha complementar aberta(s). Feche a folha salário e/ou a folha complementar para abrir um novo período de movimentação." ); $obFormulario = new Formulario; $obFormulario->addComponente( $obLblObs ); @@ -121,7 +120,7 @@ if ($obErro->ocorreu()) { } else { include_once ($pgJS); - $stAcao = $_POST["stAcao"] ? $_POST["stAcao"] : $_GET["stAcao"]; + $stAcao = $request->get("stAcao"); $obRPeriodoMovimentacao = new RFolhaPagamentoPeriodoMovimentacao; $obRPeriodoMovimentacao->listarUltimaMovimentacao($rsLista); diff --git a/gestaoRH/fontes/PHP/folhaPagamento/instancias/rotinaMensal/FMReajustesSalariais.php b/gestaoRH/fontes/PHP/folhaPagamento/instancias/rotinaMensal/FMReajustesSalariais.php index 39fa2c2..28c164e 100644 --- a/gestaoRH/fontes/PHP/folhaPagamento/instancias/rotinaMensal/FMReajustesSalariais.php +++ b/gestaoRH/fontes/PHP/folhaPagamento/instancias/rotinaMensal/FMReajustesSalariais.php @@ -68,7 +68,7 @@ $stTitulo = $obRFolhaPagamentoFolhaSituacao->consultarCompetencia(); //**************************************************************************************************************************// $obHdnAcao = new Hidden; $obHdnAcao->setName ( "stAcao" ); -$obHdnAcao->setValue ( $_REQUEST["stAcao"] ); +$obHdnAcao->setValue ( $request->get('stAcao') ); $obHdnCtrl = new Hidden; $obHdnCtrl->setName ( "stCtrl" ); @@ -199,7 +199,6 @@ if (trim($stAcao) == "incluir") { $obCmbTipoNorma = new Select; $obCmbTipoNorma->setRotulo ( "Tipo de Norma" ); $obCmbTipoNorma->setName ( "inCodTipoNorma" ); -// $obCmbTipoNorma->setValue ( $inCodTipoNorma ); $obCmbTipoNorma->setCampoID ( "cod_tipo_norma" ); $obCmbTipoNorma->setCampoDesc ( "nom_tipo_norma" ); $obCmbTipoNorma->addOption ( "", "Selecione" ); @@ -210,7 +209,6 @@ if (trim($stAcao) == "incluir") { $obCmbNorma = new Select; $obCmbNorma->setRotulo ( "Norma" ); $obCmbNorma->setName ( "inCodNorma" ); -// $obCmbNorma->setValue ( $inCodNorma ); $obCmbNorma->setCampoID ( "cod_norma" ); $obCmbNorma->setCampoDesc ( "nom_norma" ); $obCmbNorma->addOption ( "", "Selecione" ); @@ -253,10 +251,11 @@ if (trim($stAcao) == "incluir") { $obBtnOk = new Ok; $obBtnOk->setValue ( "Listar" ); - $obBtnOk->setName ( "btnListar" ); - $obBtnOk->setTitle ( "Clique para listar os contratos para exclusão de reajuste." ); - $obBtnOk->obEvento->setOnClick ( "montaParametrosGET('submeter', '', true);" ); + $obBtnOk->setName ( "btnListar" ); + $obBtnOk->setTitle ( "Clique para listar os contratos para exclusão de reajuste." ); + $obBtnOk->obEvento->setOnClick ( "montaParametrosGET('submeter', '', true);" ); } + include_once(CAM_GRH_PES_MAPEAMENTO."TPessoalAssentamentoAssentamento.class.php"); $obTPessoalAssentamentoAssentamento = new TPessoalAssentamentoAssentamento(); $stFiltro = " AND classificacao_assentamento.cod_tipo = 1"; @@ -266,7 +265,7 @@ $obTPessoalAssentamentoAssentamento->recuperaAssentamento($rsAssentamentoAssenta $obFormulario = new Formulario; $obFormulario->addHidden ( $obHdnAcao ); $obFormulario->addHidden ( $obHdnCtrl ); -$obFormulario->addTitulo ( $stTitulo , "right" ); +$obFormulario->addTitulo ( $stTitulo , "right" ); if (trim($stAcao) == "incluir") { if ($rsAssentamentoAssentamento->getNumLinhas() <= 0) { $obFormulario->addComponente($obLblMensagem); @@ -302,4 +301,5 @@ if (trim($stAcao) == "incluir") { $obFormulario->show(); include_once '../../../../../../gestaoAdministrativa/fontes/PHP/framework/include/rodape.inc.php'; -?> + +?> \ No newline at end of file diff --git a/gestaoRH/fontes/PHP/folhaPagamento/instancias/rotinaMensal/LSReajustesSalariais.php b/gestaoRH/fontes/PHP/folhaPagamento/instancias/rotinaMensal/LSReajustesSalariais.php index a9147fb..3db7896 100644 --- a/gestaoRH/fontes/PHP/folhaPagamento/instancias/rotinaMensal/LSReajustesSalariais.php +++ b/gestaoRH/fontes/PHP/folhaPagamento/instancias/rotinaMensal/LSReajustesSalariais.php @@ -92,12 +92,12 @@ if (trim($stAcao)=="excluir") { } //MANTEM FILTRO E PAGINACAO -$stLink .= "&stAcao=".$stAcao."&inAba=".$_REQUEST['inAba']."&inNumCGM=".$_REQUEST["inNumCGM"]; +$stLink .= "&stAcao=".$stAcao."&inAba=".$request->get('inAba')."&inNumCGM=".$request->get('inNumCGM'); $link = Sessao::read("link"); -if ($_GET["pg"] and $_GET["pos"]) { - $stLink.= "&pg=".$_GET["pg"]."&pos=".$_GET["pos"]; - $link["pg"] = $_GET["pg"]; - $link["pos"] = $_GET["pos"]; +if ($request->get('pg') and $request->get('pos')) { + $stLink.= "&pg=".$request->get('pg')."&pos=".$request->get('pos'); + $link["pg"] = $request->get('pg'); + $link["pos"] = $request->get('pos'); Sessao::write("link",$link); } @@ -106,12 +106,12 @@ if ($_GET["pg"] and $_GET["pos"]) { if ( is_array($link) ) { $_REQUEST = $link; } else { - foreach ($_REQUEST as $key => $valor) { + foreach ($request->getAll() as $key => $valor) { $link[$key] = $valor; } Sessao::write("link",$link); } -foreach ($_REQUEST as $key => $valor) { +foreach ($request->getAll() as $key => $valor) { Sessao::write($key,$valor); } @@ -225,4 +225,5 @@ if (trim($stAcao)=="incluir") { $obFormulario->show(); include_once '../../../../../../gestaoAdministrativa/fontes/PHP/framework/include/rodape.inc.php'; -?> + +?> \ No newline at end of file diff --git a/gestaoRH/fontes/PHP/folhaPagamento/instancias/rotinaMensal/PRManterPeriodoMovimentacao.php b/gestaoRH/fontes/PHP/folhaPagamento/instancias/rotinaMensal/PRManterPeriodoMovimentacao.php index 2115029..325ca5d 100644 --- a/gestaoRH/fontes/PHP/folhaPagamento/instancias/rotinaMensal/PRManterPeriodoMovimentacao.php +++ b/gestaoRH/fontes/PHP/folhaPagamento/instancias/rotinaMensal/PRManterPeriodoMovimentacao.php @@ -45,7 +45,7 @@ include_once '../../../../../../gestaoAdministrativa/fontes/PHP/framework/includ include_once ( CAM_GRH_FOL_NEGOCIO."RFolhaPagamentoPeriodoMovimentacao.class.php" ); include_once ( CAM_GRH_FOL_NEGOCIO."RFolhaPagamentoCalculoFolhaPagamento.class.php" ); -$stAcao = $_POST["stAcao"] ? $_POST["stAcao"] : $_GET["stAcao"]; +$stAcao = $request->get("stAcao"); //Define o nome dos arquivos PHP $stPrograma = "ManterPeriodoMovimentacao"; @@ -56,16 +56,17 @@ $pgOcul = "OC".$stPrograma.".php"; $obRFolhaPagamentoPeriodoMovimentacao = new RFolhaPagamentoPeriodoMovimentacao; $obRFolhaPagamentoCalculoFolhaPagamento = new RFolhaPagamentoCalculoFolhaPagamento; -$obErro = new Erro; - +$obErro = new Erro(); switch ($stAcao) { case "incluir": - if ($_POST['hdnNovaDataInicial'] != '') { - $dataInicial = $_POST['hdnNovaDataInicial']; + + if ($request->get('hdnNovaDataInicial') != '') { + $dataInicial = $request->get('hdnNovaDataInicial'); } else { - $dataInicial = $_POST['stNovaDataInicial']; + $dataInicial = $request->get('stNovaDataInicial'); } - if ( SistemaLegado::comparaDatas($dataInicial,$_POST['stNovaDataFinal']) ) { + + if ( SistemaLegado::comparaDatas($dataInicial,$request->get('stNovaDataFinal')) ) { $obErro->setDescricao("A data final deve ser posterior a data inicial."); } if ( !$obErro->ocorreu() ) { @@ -75,30 +76,26 @@ switch ($stAcao) { } } if ( !$obErro->ocorreu() ) { - if ($_POST['hdnNovaDataInicial'] != '') { - $obRFolhaPagamentoPeriodoMovimentacao->setDtInicial($dataInicial); - } else { - $obRFolhaPagamentoPeriodoMovimentacao->setDtInicial($dataInicial); - } - $obRFolhaPagamentoPeriodoMovimentacao->setDtFinal($_POST['stNovaDataFinal']); - $obErro = $obRFolhaPagamentoPeriodoMovimentacao->abrirPeriodoMovimentacao(); + $obRFolhaPagamentoPeriodoMovimentacao->setDtInicial($dataInicial); + $obRFolhaPagamentoPeriodoMovimentacao->setDtFinal($request->get('stNovaDataFinal')); + $obErro = $obRFolhaPagamentoPeriodoMovimentacao->abrirPeriodoMovimentacao($boTransacao); if ( !$obErro->ocorreu() ) { - sistemaLegado::alertaAviso($pgForm,"Data Inicial: ".$dataInicial." e Data Final: ".$_POST['stNovaDataFinal'],"incluir","aviso", Sessao::getId(), "../"); + SistemaLegado::alertaAviso($pgForm,"Data Inicial: ".$dataInicial." e Data Final: ".$request->get('stNovaDataFinal'),"incluir","aviso", Sessao::getId(), "../"); } else { - sistemaLegado::exibeAviso(urlencode($obErro->getDescricao()),"n_incluir","erro"); + SistemaLegado::exibeAviso(urlencode($obErro->getDescricao()),"n_incluir","erro"); } } else { - - sistemaLegado::exibeAviso(urlencode($obErro->getDescricao()),"n_incluir","erro"); + SistemaLegado::exibeAviso(urlencode($obErro->getDescricao()),"n_incluir","erro"); } break; + case "excluir": - $obErro = $obRFolhaPagamentoPeriodoMovimentacao->cancelarPeriodoMovimentacao(); + $obErro = $obRFolhaPagamentoPeriodoMovimentacao->cancelarPeriodoMovimentacao($boTransacao); if ( !$obErro->ocorreu() ) { - sistemaLegado::alertaAviso($pgForm,"Periodo Movimentação: ".$_GET["inCodPeriodoMovimentacao"],"excluir","aviso", Sessao::getId(), "../"); + sistemaLegado::alertaAviso($pgForm,"Periodo Movimentação: ".$request->get("inCodPeriodoMovimentacao"),"excluir","aviso", Sessao::getId(), "../"); } else { sistemaLegado::alertaAviso($pgList,urlencode($obErro->getDescricao()),"n_excluir","erro",Sessao::getId(), "../"); } diff --git a/gestaoRH/fontes/PHP/folhaPagamento/instancias/rotinaMensal/PRReajustesSalariais.php b/gestaoRH/fontes/PHP/folhaPagamento/instancias/rotinaMensal/PRReajustesSalariais.php index ffaf001..730e915 100644 --- a/gestaoRH/fontes/PHP/folhaPagamento/instancias/rotinaMensal/PRReajustesSalariais.php +++ b/gestaoRH/fontes/PHP/folhaPagamento/instancias/rotinaMensal/PRReajustesSalariais.php @@ -44,7 +44,7 @@ include_once '../../../../../../gestaoAdministrativa/fontes/PHP/pacotes/Framewor include_once '../../../../../../gestaoAdministrativa/fontes/PHP/framework/include/cabecalho.inc.php'; $link = Sessao::read("link"); -$stAcao = $_REQUEST["stAcao"] ? $_REQUEST["stAcao"] : $_GET["stAcao"]; +$stAcao = $request->get('stAcao'); $stLink = "&pg=".$link["pg"]."&pos=".$link["pos"]; //Define o nome dos arquivos PHP @@ -1132,4 +1132,4 @@ if (trim($stAcao) == "incluir") { } Sessao::encerraExcecao(); sistemaLegado::alertaAviso($pgRetorno,$stMensagem,$stAcao,"aviso",Sessao::getId(),"../"); -?> +?> \ No newline at end of file diff --git a/gestaoRH/fontes/PHP/folhaPagamento/popups/movimentacaoFinanceira/FRConsultarFichaFinanceira.php b/gestaoRH/fontes/PHP/folhaPagamento/popups/movimentacaoFinanceira/FRConsultarFichaFinanceira.php index 630f4da..d8f6e3d 100644 --- a/gestaoRH/fontes/PHP/folhaPagamento/popups/movimentacaoFinanceira/FRConsultarFichaFinanceira.php +++ b/gestaoRH/fontes/PHP/folhaPagamento/popups/movimentacaoFinanceira/FRConsultarFichaFinanceira.php @@ -51,8 +51,11 @@ $Date: 2008-01-28 12:57:53 -0200 (Seg, 28 Jan 2008) $ - - " marginwidth="0" marginheight="0" scrolling="yes" frameborder="0" noresize > + + " marginwidth="0" marginheight="0" scrolling="yes" frameborder="0" noresize > diff --git a/gestaoRH/fontes/PHP/folhaPagamento/popups/movimentacaoFinanceira/OCConsultarFichaFinanceira.php b/gestaoRH/fontes/PHP/folhaPagamento/popups/movimentacaoFinanceira/OCConsultarFichaFinanceira.php index 9ecabbd..1e6054d 100644 --- a/gestaoRH/fontes/PHP/folhaPagamento/popups/movimentacaoFinanceira/OCConsultarFichaFinanceira.php +++ b/gestaoRH/fontes/PHP/folhaPagamento/popups/movimentacaoFinanceira/OCConsultarFichaFinanceira.php @@ -67,10 +67,13 @@ function gerarSpan1($boExecuta=false) global $request; $arLink = Sessao::read("link"); + $inCodContrato = $arLink["inCodContrato"]; $inCodConfiguracao = ($arLink["inCodConfiguracao"] != "")?$arLink["inCodConfiguracao"]:0; $inCodComplementar = ($arLink["inCodComplementar"]) ? $arLink["inCodComplementar"] : 0; $inCodPeriodoMovimentacao = $arLink["inCodPeriodoMovimentacao"]; + $inCodMes = $arLink["inCodMes"]; + $inAno = $arLink["inAno"]; if (trim($inCodPeriodoMovimentacao)=="") { include_once(CAM_GRH_FOL_MAPEAMENTO."TFolhaPagamentoPeriodoMovimentacao.class.php"); @@ -185,12 +188,10 @@ function gerarSpan1($boExecuta=false) break; } - $dtPeriodoConsultadoMes = Sessao::read("inCodMes"); - $dtPeriodoConsultadoAno = Sessao::read("inAno"); $stTabela0 = "
    "; $stTabela0 .= ""; $stTabela0 .= ""; - $stTabela0 .= ""; + $stTabela0 .= ""; $stTabela0 .= "
    Período Consultado".$dtPeriodoConsultadoMes."/".$dtPeriodoConsultadoAno.""."     ".SistemaLegado::mesExtensoBR($inCodMes)." / ".$inAno."
    "; $stTabela0 .= "
    "; diff --git a/gestaoRH/fontes/PHP/pessoal/classes/componentes/IContratoDigitoVerificador.class.php b/gestaoRH/fontes/PHP/pessoal/classes/componentes/IContratoDigitoVerificador.class.php index f21420c..c314d54 100644 --- a/gestaoRH/fontes/PHP/pessoal/classes/componentes/IContratoDigitoVerificador.class.php +++ b/gestaoRH/fontes/PHP/pessoal/classes/componentes/IContratoDigitoVerificador.class.php @@ -524,6 +524,10 @@ function IContratoDigitoVerificador($inContrato="",$stSituacao=false, $boRegistr $this->obILinkConsultaServidor->setRotulo("Link"); $this->obILinkConsultaServidor->setValue("Consultar Cadastro"); + $boValidaAtivos = Sessao::read('valida_ativos_cgm'); + if ($boValidaAtivos == 'true') { + $this->setTipo('contrato_ativos'); + } $this->geraFuncaoBuscaFiltro(); } diff --git a/gestaoRH/fontes/PHP/pessoal/classes/mapeamento/TPessoalAssentamentoGerado.class.php b/gestaoRH/fontes/PHP/pessoal/classes/mapeamento/TPessoalAssentamentoGerado.class.php index 6b641a2..7ccbdce 100644 --- a/gestaoRH/fontes/PHP/pessoal/classes/mapeamento/TPessoalAssentamentoGerado.class.php +++ b/gestaoRH/fontes/PHP/pessoal/classes/mapeamento/TPessoalAssentamentoGerado.class.php @@ -51,7 +51,7 @@ class TPessoalAssentamentoGerado extends Persistente * Método Construtor * @access Private */ -function TPessoalAssentamentoGerado() +function __construct() { parent::Persistente(); $this->setTabela('pessoal.assentamento_gerado'); @@ -59,13 +59,13 @@ function TPessoalAssentamentoGerado() $this->setCampoCod(''); $this->setComplementoChave('cod_assentamento_gerado, timestamp'); - $this->AddCampo('cod_assentamento_gerado' , 'integer' , true, '', true, true); + $this->AddCampo('cod_assentamento_gerado' , 'integer' , true, '', true, true); $this->AddCampo('timestamp' , 'timestamp_now' , true, '', true, false); - $this->AddCampo('cod_assentamento' , 'integer' , true, '', false, true); - $this->AddCampo('observacao' , 'char' , false, '200', false, false); - $this->AddCampo('automatico' , 'boolean' , true, '', false, false); - $this->AddCampo('periodo_inicial' , 'date' , true, '', false, false); - $this->AddCampo('periodo_final' , 'date' , false, '', false, false); + $this->AddCampo('cod_assentamento' , 'integer' , true, '', false, true); + $this->AddCampo('observacao' , 'char' , false, '200', false, false); + $this->AddCampo('automatico' , 'boolean' , true, '', false, false); + $this->AddCampo('periodo_inicial' , 'date' , true, '', false, false); + $this->AddCampo('periodo_final' , 'date' , false, '', false, false); } function montaRecuperaRelacionamento() diff --git a/gestaoRH/fontes/PHP/pessoal/classes/mapeamento/TPessoalAssentamentoGeradoNorma.class.php b/gestaoRH/fontes/PHP/pessoal/classes/mapeamento/TPessoalAssentamentoGeradoNorma.class.php index 83973f7..2a42b55 100755 --- a/gestaoRH/fontes/PHP/pessoal/classes/mapeamento/TPessoalAssentamentoGeradoNorma.class.php +++ b/gestaoRH/fontes/PHP/pessoal/classes/mapeamento/TPessoalAssentamentoGeradoNorma.class.php @@ -31,28 +31,19 @@ * Casos de uso: uc-04.04.14 - $Id: TPessoalAssentamentoGeradoNorma.class.php 60896 2014-11-21 13:59:00Z franver $ + $Id: TPessoalAssentamentoGeradoNorma.class.php 63789 2015-10-13 19:21:18Z arthur $ */ include_once '../../../../../../gestaoAdministrativa/fontes/PHP/framework/include/valida.inc.php'; include_once ( CLA_PERSISTENTE ); -/** - * Efetua conexão com a tabela pessoal.assentamento_gerado_norma - * Data de Criação: 10/01/2008 - - * @author Desenvolvedor: Diego Lemos de Souza - - * @package URBEM - * @subpackage Mapeamento -*/ class TPessoalAssentamentoGeradoNorma extends Persistente { /** * Método Construtor * @access Private */ -function TPessoalAssentamentoGeradoNorma() +function __construct() { parent::Persistente(); $this->setTabela("pessoal.assentamento_gerado_norma"); @@ -60,9 +51,9 @@ function TPessoalAssentamentoGeradoNorma() $this->setCampoCod(''); $this->setComplementoChave('cod_assentamento_gerado,timestamp'); - $this->AddCampo('cod_assentamento_gerado','integer' ,true ,'' ,true,'TPessoalAssentamentoGerado'); - $this->AddCampo('timestamp' ,'timestamp' ,true ,'' ,true,'TPessoalAssentamentoGerado'); - $this->AddCampo('cod_norma' ,'integer' ,true ,'' ,false,'TNormasNorma'); + $this->AddCampo('cod_assentamento_gerado','integer' ,true ,'' ,true ,'TPessoalAssentamentoGerado'); + $this->AddCampo('timestamp' ,'timestamp_now' ,true ,'' ,true ,'TPessoalAssentamentoGerado'); + $this->AddCampo('cod_norma' ,'integer' ,true ,'' ,false ,'TNormasNorma'); } function montaRecuperaRelacionamento() @@ -101,4 +92,5 @@ function montaExcluirAssentamentoGeradoNorma($stFiltro) } } -?> + +?> \ No newline at end of file diff --git a/gestaoRH/fontes/PHP/pessoal/classes/mapeamento/TPessoalAtributoContratoServidorValor.class.php b/gestaoRH/fontes/PHP/pessoal/classes/mapeamento/TPessoalAtributoContratoServidorValor.class.php index 58ea705..c90c5a7 100755 --- a/gestaoRH/fontes/PHP/pessoal/classes/mapeamento/TPessoalAtributoContratoServidorValor.class.php +++ b/gestaoRH/fontes/PHP/pessoal/classes/mapeamento/TPessoalAtributoContratoServidorValor.class.php @@ -62,12 +62,12 @@ function TPessoalAtributoContratoServidorValor() $this->setCampoCod(''); $this->setComplementoChave('cod_contrato,cod_modulo,cod_atributo,cod_cadastro,timestamp'); - $this->AddCampo('cod_contrato','integer' ,true ,'' ,true ,true ); - $this->AddCampo('cod_atributo','integer' ,true ,'' ,true ,true ); - $this->AddCampo('cod_cadastro','integer' ,true ,'' ,true ,true ); - $this->AddCampo('valor' ,'text' ,true ,'' ,false ,true ); - $this->AddCampo('timestamp' ,'timestamp' ,false ,'' ,false ,false ); - $this->AddCampo('cod_modulo' ,'integer' ,true ,'' ,true ,true ); + $this->AddCampo('cod_contrato','integer' ,true, '', true,true ); + $this->AddCampo('cod_atributo','integer' ,true, '', true,true ); + $this->AddCampo('cod_cadastro','integer' ,true, '', true,true ); + $this->AddCampo('valor' ,'text' ,true, '',false,false ); + $this->AddCampo('timestamp' ,'timestamp_now' ,true, '', true,false ); + $this->AddCampo('cod_modulo' ,'integer' ,true, '', true,true ); } function montaRecuperaRelacionamento() diff --git a/gestaoRH/fontes/PHP/pessoal/classes/mapeamento/TPessoalClassificacaoAssentamento.class.php b/gestaoRH/fontes/PHP/pessoal/classes/mapeamento/TPessoalClassificacaoAssentamento.class.php index ce457f6..64bf8dd 100755 --- a/gestaoRH/fontes/PHP/pessoal/classes/mapeamento/TPessoalClassificacaoAssentamento.class.php +++ b/gestaoRH/fontes/PHP/pessoal/classes/mapeamento/TPessoalClassificacaoAssentamento.class.php @@ -96,7 +96,6 @@ class TPessoalClassificacaoAssentamento extends Persistente $stOrdem = $stOrdem ? $stOrdem : " ORDER BY ca.descricao "; $stFiltro = $stFiltro ? " WHERE ".substr($stFiltro, 4) : ""; $stSql = $this->montaRecuperaPorContrato($comboType).$stFiltro.$stGroup.$stOrdem; - // SistemaLegado::mostravar($stSql); exit; $this->setDebug( $stSql ); $obErro = $obConexao->executaSQL( $rsRecordSet, $stSql, $boTransacao ); diff --git a/gestaoRH/fontes/PHP/pessoal/classes/mapeamento/TPessoalDeParaLotacaoOrgaoTCMBA.class.php b/gestaoRH/fontes/PHP/pessoal/classes/mapeamento/TPessoalDeParaLotacaoOrgaoTCMBA.class.php new file mode 100644 index 0000000..22f0535 --- /dev/null +++ b/gestaoRH/fontes/PHP/pessoal/classes/mapeamento/TPessoalDeParaLotacaoOrgaoTCMBA.class.php @@ -0,0 +1,57 @@ + +setTabela('pessoal.de_para_lotacao_orgao'); + + $this->setCampoCod('cod_orgao'); + $this->setComplementoChave('num_orgao, exercicio'); + + $this->AddCampo('cod_orgao' , 'integer', true, '' , true , true); + $this->AddCampo('num_orgao' , 'integer', true, '' , false, true); + $this->AddCampo('exercicio' , 'char' , true, '4', false, true); + } + +} diff --git a/gestaoRH/fontes/PHP/pessoal/classes/mapeamento/TPessoalServidor.class.php b/gestaoRH/fontes/PHP/pessoal/classes/mapeamento/TPessoalServidor.class.php index 1b4130c..0059e3a 100755 --- a/gestaoRH/fontes/PHP/pessoal/classes/mapeamento/TPessoalServidor.class.php +++ b/gestaoRH/fontes/PHP/pessoal/classes/mapeamento/TPessoalServidor.class.php @@ -408,19 +408,19 @@ function recuperaRegistrosServidor(&$rsRecordSet, $stFiltro = "", $stOrdem = "" function montaConsultaRegistrosServidor() { - $stSql = " SELECT \n"; - $stSql .= " ps.cod_servidor, \n"; - $stSql .= " pc.registro, \n"; - $stSql .= " pc.cod_contrato \n"; - $stSql .= " FROM \n"; - $stSql .= " pessoal.servidor as ps, \n"; - $stSql .= " pessoal.servidor_contrato_servidor as sc, \n"; - $stSql .= " pessoal.contrato_servidor as cs, \n"; - $stSql .= " pessoal.contrato as pc \n"; - $stSql .= " WHERE \n"; - $stSql .= " ps.cod_servidor = sc.cod_servidor \n"; - $stSql .= " AND sc.cod_contrato = cs.cod_contrato \n"; - $stSql .= " AND cs.cod_contrato = pc.cod_contrato \n"; + $stSql = " SELECT + ps.cod_servidor, + pc.registro, + pc.cod_contrato + FROM + pessoal.servidor as ps, + pessoal.servidor_contrato_servidor as sc, + pessoal.contrato_servidor as cs, + pessoal.contrato as pc + WHERE + ps.cod_servidor = sc.cod_servidor + AND sc.cod_contrato = cs.cod_contrato + AND cs.cod_contrato = pc.cod_contrato "; return $stSql; } diff --git a/gestaoRH/fontes/PHP/pessoal/classes/negocio/RPessoalCargo.class.php b/gestaoRH/fontes/PHP/pessoal/classes/negocio/RPessoalCargo.class.php index 4afe970..f867d07 100755 --- a/gestaoRH/fontes/PHP/pessoal/classes/negocio/RPessoalCargo.class.php +++ b/gestaoRH/fontes/PHP/pessoal/classes/negocio/RPessoalCargo.class.php @@ -648,10 +648,10 @@ function listarCargosPorSubDivisaoServidor(&$rsRecordSet , $boTransacao = "") $stFiltro .= " AND EXTRACT(MONTH FROM dt_inicial) = ".$this->getCodMes()." "; } - $obRFolhaPagamentoPeriodoMovimentacao->recuperaAnosPeriodoMovimentacao($rsUltimoPeriodoMovimentacao, $stFiltro); + $obRFolhaPagamentoPeriodoMovimentacao->recuperaAnosPeriodoMovimentacao($rsUltimoPeriodoMovimentacao, $stFiltro, $boTransacao); $stFiltro = " AND FPM.cod_periodo_movimentacao = ".$rsUltimoPeriodoMovimentacao->getCampo('cod_periodo_movimentacao'); - $obRFolhaPagamentoPeriodoMovimentacao->listarPeriodoMovimentacao($rsPeriodoMovimentacao, $stFiltro); + $obRFolhaPagamentoPeriodoMovimentacao->listarPeriodoMovimentacao($rsPeriodoMovimentacao, $stFiltro, "", $boTransacao); $stFiltro = " AND ( dt_publicacao <= to_date('".$rsPeriodoMovimentacao->getCampo('dt_final')."', 'dd/mm/yyyy') \n"; $stFiltro .= " AND ( dt_termino IS NULL \n"; diff --git a/gestaoRH/fontes/PHP/pessoal/classes/negocio/RPessoalDependente.class.php b/gestaoRH/fontes/PHP/pessoal/classes/negocio/RPessoalDependente.class.php index 6e719a6..35f2e16 100755 --- a/gestaoRH/fontes/PHP/pessoal/classes/negocio/RPessoalDependente.class.php +++ b/gestaoRH/fontes/PHP/pessoal/classes/negocio/RPessoalDependente.class.php @@ -498,7 +498,7 @@ function getTPessoalDependenteExcluido() { return $this->obTPessoalDependenteExc if ( !$obErro->ocorreu() and $this->obRCGMPessoaFisica->getDataNascimento() ) { include_once ( CAM_GA_CGM_MAPEAMENTO."TCGMPessoaFisica.class.php"); - $obTCGMPessoaFisica = new TCGMPessoaFisica; + $obTCGMPessoaFisica = new TCGMPessoaFisica; $stFiltro = " WHERE numcgm = ".$this->obRCGMPessoaFisica->getNumCgm(); $obTCGMPessoaFisica->recuperaTodos($rsCGM,$stFiltro,$stOrdem, $boTransacao ); @@ -507,6 +507,7 @@ function getTPessoalDependenteExcluido() { return $this->obTPessoalDependenteExc $obTCGMPessoaFisica->setDado("numcgm", $this->obRCGMPessoaFisica->getNumCgm()); $obTCGMPessoaFisica->setDado("cod_categoria_cnh", $rsCGM->getCampo('cod_categoria_cnh')); $obTCGMPessoaFisica->setDado("orgao_emissor", $rsCGM->getCampo('orgao_emissor')); + if ( $rsCGM->getCampo('cpf') ) { $obTCGMPessoaFisica->setDado("cpf", $rsCGM->getCampo('cpf')); } @@ -520,7 +521,7 @@ function getTPessoalDependenteExcluido() { return $this->obTPessoalDependenteExc $this->obTPessoalDependente->proximoCod( $inCodDependente , $boTransacao ); $this->setCodDependente( $inCodDependente ); $this->obTPessoalDependente->setDado("cod_dependente" , $this->getCodDependente() ); - $this->obTPessoalDependente->setDado("numcgm" , $this->obRCGMPessoaFisica->getNumCgm() ); + $this->obTPessoalDependente->setDado("numcgm" , $this->obRCGMPessoaFisica->getNumCgm() ); $this->obTPessoalDependente->setDado("cod_grau" , $this->getCodGrau() ); $this->obTPessoalDependente->setDado("dependente_invalido" , $this->getDependenteInvalido() ); $this->obTPessoalDependente->setDado("carteira_vacinacao" , $this->getCarteiraVacinacao() ); @@ -531,7 +532,7 @@ function getTPessoalDependenteExcluido() { return $this->obTPessoalDependenteExc $obErro = $this->obTPessoalDependente->inclusao( $boTransacao ); if ( !$obErro->ocorreu() ) { $this->obTPessoalServidorDependente->setDado("cod_servidor" , $this->roPessoalServidor->getCodServidor() ); - $this->obTPessoalServidorDependente->setDado("cod_dependente", $this->getCodDependente() ); + $this->obTPessoalServidorDependente->setDado("cod_dependente", $this->getCodDependente() ); $this->obTPessoalServidorDependente->setDado("dt_inicio", date('y-m-d')); $obErro = $this->obTPessoalServidorDependente->inclusao( $boTransacao ); } @@ -608,11 +609,13 @@ function getTPessoalDependenteExcluido() { return $this->obTPessoalDependenteExc { $boFlagTransacao = false; $obErro = $this->obTransacao->abreTransacao( $boFlagTransacao, $boTransacao ); + if ( !$obErro->ocorreu() and $this->obRCGMPessoaFisica->getDataNascimento() ) { include_once ( CAM_GA_CGM_MAPEAMENTO."TCGMPessoaFisica.class.php"); - $obTCGMPessoaFisica = new TCGMPessoaFisica; + $obTCGMPessoaFisica = new TCGMPessoaFisica; $stFiltro = " WHERE numcgm = ".$this->obRCGMPessoaFisica->getNumCgm(); - $obTCGMPessoaFisica->recuperaTodos($rsCGM,$stFiltro,$stOrdem); + $obTCGMPessoaFisica->recuperaTodos($rsCGM,$stFiltro,$stOrdem,$boTransacao); + $obTCGMPessoaFisica->setDado("dt_nascimento", $this->obRCGMPessoaFisica->getDataNascimento()); $obTCGMPessoaFisica->setDado("numcgm", $this->obRCGMPessoaFisica->getNumCgm()); $obTCGMPessoaFisica->setDado("cod_categoria_cnh", $rsCGM->getCampo('cod_categoria_cnh')); @@ -624,7 +627,7 @@ function getTPessoalDependenteExcluido() { return $this->obTPessoalDependenteExc } if ( !$obErro->ocorreu() ) { $this->obTPessoalDependente->setDado("cod_dependente" , $this->getCodDependente() ); - $this->obTPessoalDependente->setDado("numcgm" , $this->obRCGMPessoaFisica->getNumCgm() ); + $this->obTPessoalDependente->setDado("numcgm" , $this->obRCGMPessoaFisica->getNumCgm() ); $this->obTPessoalDependente->setDado("cod_grau" , $this->getCodGrau() ); $this->obTPessoalDependente->setDado("dependente_invalido" , $this->getDependenteInvalido() ); $this->obTPessoalDependente->setDado("carteira_vacinacao" , $this->getCarteiraVacinacao() ); diff --git a/gestaoRH/fontes/PHP/pessoal/classes/negocio/RPessoalServidor.class.php b/gestaoRH/fontes/PHP/pessoal/classes/negocio/RPessoalServidor.class.php index b9a1d1f..def0463 100755 --- a/gestaoRH/fontes/PHP/pessoal/classes/negocio/RPessoalServidor.class.php +++ b/gestaoRH/fontes/PHP/pessoal/classes/negocio/RPessoalServidor.class.php @@ -31,7 +31,7 @@ * Caso de uso: uc-04.04.07 - $Id: RPessoalServidor.class.php 61570 2015-02-09 13:24:30Z franver $ + $Id: RPessoalServidor.class.php 63818 2015-10-19 20:02:07Z evandro $ */ include_once '../../../../../../gestaoAdministrativa/fontes/PHP/framework/include/valida.inc.php'; @@ -1434,4 +1434,14 @@ function getRPessoalConselho() { return $this->obRPessoalConselho; } return $obErro; } + public function recuperaCgmDoRegistro(&$rsRecordset , $stFiltro = '', $stOrdem = '', $boTransacao = '') + { + include_once(CAM_GRH_PES_MAPEAMENTO."TPessoalContrato.class.php"); + $obTPessoalContrato = new TPessoalContrato(); + $stFiltro = " AND numcgm = ".$this->obRCGMPessoaFisica->getNumCGM(); + $stFiltro .= " AND situacao = 'Ativo' "; + $obErro = $obTPessoalContrato->recuperaCgmDoRegistro($rsRecordset,$stFiltro, $stOrdem,$boTransacao); + return $obErro; + } + } diff --git a/gestaoRH/fontes/PHP/pessoal/instancias/adidosCedidos/FLManterAdidoCedido.php b/gestaoRH/fontes/PHP/pessoal/instancias/adidosCedidos/FLManterAdidoCedido.php index f4cfc59..ab701a4 100644 --- a/gestaoRH/fontes/PHP/pessoal/instancias/adidosCedidos/FLManterAdidoCedido.php +++ b/gestaoRH/fontes/PHP/pessoal/instancias/adidosCedidos/FLManterAdidoCedido.php @@ -53,7 +53,7 @@ $pgProc = "PR".$stPrograma.".php"; $pgJS = "JS".$stPrograma.".js"; Sessao::remove('link'); $stAcao = $_POST["stAcao"] ? $_POST["stAcao"] : $_GET["stAcao"]; -$jsOnload = "montaParametrosGET('preencherSpanFiltro','stOpcao');"; +$jsOnload = "montaParametrosGET('preencherSpanFiltro','stOpcao,stAcao');"; include_once( CAM_GRH_FOL_NEGOCIO."RFolhaPagamentoPeriodoMovimentacao.class.php" ); $obRFolhaPagamentoFolhaSituacao = new RFolhaPagamentoFolhaSituacao(new RFolhaPagamentoPeriodoMovimentacao); @@ -78,7 +78,7 @@ $obRdoContrato->setTitle ( "Selecione o tipo de filtro a $obRdoContrato->setRotulo ( "Opções" ); $obRdoContrato->setLabel ( "Matrícula" ); $obRdoContrato->setValue ( "contrato" ); -$obRdoContrato->obEvento->setOnChange ( "montaParametrosGET('preencherSpanFiltro','stOpcao');" ); +$obRdoContrato->obEvento->setOnChange ( "montaParametrosGET('preencherSpanFiltro','stOpcao,stAcao');" ); $obRdoContrato->setChecked ( $stOpcao == 'contrato' || !$stOpcao ); $obRdoContrato->setNull(false); @@ -88,7 +88,7 @@ $obRdoCgmContrato->setTitle ( "Selecione o tipo de filtro a $obRdoCgmContrato->setRotulo ( "Opções" ); $obRdoCgmContrato->setLabel ( "CGM/Matrícula" ); $obRdoCgmContrato->setValue ( "cgm_contrato" ); -$obRdoCgmContrato->obEvento->setOnChange ( "montaParametrosGET('preencherSpanFiltro','stOpcao');" ); +$obRdoCgmContrato->obEvento->setOnChange ( "montaParametrosGET('preencherSpanFiltro','stOpcao,stAcao');" ); $obRdoCgmContrato->setChecked ( $stOpcao == 'cgm_contrato' ); $obRdoCgmContrato->setNull(false); diff --git a/gestaoRH/fontes/PHP/pessoal/instancias/adidosCedidos/FMManterAdidoCedido.php b/gestaoRH/fontes/PHP/pessoal/instancias/adidosCedidos/FMManterAdidoCedido.php index 4f89434..da0fa01 100644 --- a/gestaoRH/fontes/PHP/pessoal/instancias/adidosCedidos/FMManterAdidoCedido.php +++ b/gestaoRH/fontes/PHP/pessoal/instancias/adidosCedidos/FMManterAdidoCedido.php @@ -112,37 +112,42 @@ switch ($stAcao) { break; } -$stLocation = $pgList.'?'.Sessao::getId()."&stAcao=".$stAcao."&stTipoFiltro=".$_REQUEST['stTipoFiltro']; +$stLocation = $pgList.'?'.Sessao::getId()."&stAcao=".$stAcao."&stTipoFiltro=".$_REQUEST['stTipoFiltro']; //DEFINICAO DOS COMPONENTES -$obHdnAcao = new Hidden; -$obHdnAcao->setName ( "stAcao" ); -$obHdnAcao->setValue ( $stAcao ); +$obHdnAcao = new Hidden; +$obHdnAcao->setName ( "stAcao" ); +$obHdnAcao->setValue ( $stAcao ); -$obHdnCtrl = new Hidden; -$obHdnCtrl->setName ( "stCtrl" ); -$obHdnCtrl->setValue ( $stCtrl ); +$obHdnCtrl = new Hidden; +$obHdnCtrl->setName ( "stCtrl" ); +$obHdnCtrl->setValue ( $stCtrl ); -$obHdnContrato = new Hidden; -$obHdnContrato->setName ( "inCodContrato" ); -$obHdnContrato->setValue ( $_GET['inCodContrato'] ); +$obHdnContrato = new Hidden; +$obHdnContrato->setName ( "inCodContrato" ); +$obHdnContrato->setValue ( $_GET['inCodContrato'] ); -$obHdnRegistro = new Hidden; -$obHdnRegistro->setName ( "inRegistro" ); -$obHdnRegistro->setValue ( $_GET['inRegistro'] ); +$obHdnRegistro = new Hidden; +$obHdnRegistro->setName ( "inRegistro" ); +$obHdnRegistro->setValue ( $_GET['inRegistro'] ); -$obHdnCGMOrgaoEntidade = new Hidden; -$obHdnCGMOrgaoEntidade->setName ( "inCGMOrgaoEntidade" ); -$obHdnCGMOrgaoEntidade->setValue ( $inCGMOrgao ); +$obHdnCGMOrgaoEntidade = new Hidden; +$obHdnCGMOrgaoEntidade->setName ( "inCGMOrgaoEntidade" ); +$obHdnCGMOrgaoEntidade->setValue ( $inCGMOrgao ); //DEFINICAO DO FORM $obForm = new Form; -$obForm->setAction ( $pgProc ); -$obForm->setTarget ( "oculto" ); +if ($stAcao == "consultar") { + $obForm->setAction ( $pgFilt ); + $obForm->setTarget ( "telaPrincipal" ); +} else { + $obForm->setAction ( $pgProc ); + $obForm->setTarget ( "oculto" ); +} Sessao::write('obForm', $obForm); -$obIFiltroContrato = new IFiltroContrato; +$obIFiltroContrato = new IFiltroContrato(false,false); $obIFiltroContrato->setTituloFormulario(""); $obIFiltroContrato->obIContratoDigitoVerificador->setNull(false); $stOnChange = $obIFiltroContrato->obIContratoDigitoVerificador->obTxtRegistroContrato->obEvento->getOnChange(); @@ -153,6 +158,9 @@ if ($stAcao == "alterar" or $stAcao == "consultar") { $obIFiltroContrato->obIContratoDigitoVerificador->setPagFiltro(false); $obIFiltroContrato->obIContratoDigitoVerificador->setAutomatico(true); } +if ($stAcao != 'consultar') { + $obIFiltroContrato->obIContratoDigitoVerificador->setTipo('contrato_ativos'); +} $obRConfiguracaoPessoal = new RConfiguracaoPessoal(); include_once(CAM_GA_NORMAS_NEGOCIO."RTipoNorma.class.php"); @@ -323,24 +331,25 @@ $obLblLocal->setValue($stLocal); $obBtnOk = new OK; $obBtnOk->obEvento->setOnClick("montaParametrosGET('submeter', '', true);"); -$obBtnVoltar = new OK; -$obBtnVoltar->setValue("Voltar"); -$obBtnVoltar->obEvento->setOnClick("back();"); +$obBtnVoltar = new Voltar; if ($stAcao == "incluir") { $obBtnLimpar = new Limpar(); $obBtnLimpar->obEvento->setOnClick("montaParametrosGET('limparForm');"); -} -if ($stAcao == "alterar") { + $arBotaoAcao = array( $obBtnOk, $obBtnLimpar ); +} else if ($stAcao == "consultar") { + $arBotaoAcao = array( $obBtnVoltar ); +} else { $obBtnLimpar = new Ok(); $obBtnLimpar->setValue("Limpar"); $obBtnLimpar->obEvento->setOnClick("montaParametrosGET('limparFormAlterar');"); + $arBotaoAcao = array( $obBtnOk, $obBtnLimpar ); } //DEFINICAO DO FORMULARIO $obFormulario = new Formulario; $obFormulario->addForm ( $obForm ); -$obFormulario->addTitulo ( $obRFolhaPagamentoFolhaSituacao->consultarCompetencia() ,"right" ); +$obFormulario->addTitulo ( $obRFolhaPagamentoFolhaSituacao->consultarCompetencia() ,"right" ); $obFormulario->addHidden ( $obHdnAcao ); $obFormulario->addHidden ( $obHdnCtrl ); switch ($stAcao) { @@ -357,7 +366,7 @@ switch ($stAcao) { $obFormulario->agrupaComponentes ( array($obRdoIndicativoAdido,$obRdoIndicativoCedido) ); $obFormulario->addComponente ( $obTxtNroConvenio ); $obIBuscaInnerLocal->geraFormulario ( $obFormulario ); - $obFormulario->defineBarra ( array($obBtnOk,$obBtnLimpar) ); + $obFormulario->defineBarra ( $arBotaoAcao ); break; case "alterar": $obFormulario->addTitulo ( "Dados para Alteração de Movimentação" ); @@ -371,13 +380,13 @@ switch ($stAcao) { $obFormulario->addComponente ( $obTxtDataInicialAto ); $obFormulario->addComponente ( $obTxtDataFinalAto ); $obFormulario->addComponente ( $obLblTipoCedencia ); - $obFormulario->addHidden($obHdnTipoCedencia); + $obFormulario->addHidden ( $obHdnTipoCedencia ); $obFormulario->addComponente ( $obLblCgmOrgaoEntidade ); $obFormulario->addComponente ( $obLblIndicativoOnus ); - $obFormulario->addHidden($obHdnIndicativoOnus); + $obFormulario->addHidden ( $obHdnIndicativoOnus ); $obFormulario->addComponente ( $obTxtNroConvenio ); $obIBuscaInnerLocal->geraFormulario ( $obFormulario ); - $obFormulario->defineBarra ( array($obBtnOk,$obBtnLimpar) ); + $obFormulario->defineBarra ( $arBotaoAcao ); break; case "consultar": $obFormulario->addTitulo ( "Dados para Alteração de Movimentação" ); @@ -392,7 +401,7 @@ switch ($stAcao) { $obFormulario->addComponente ( $obLblIndicativoOnus ); $obFormulario->addComponente ( $obLblNroConvenio ); $obFormulario->addComponente ( $obLblLocal ); - $obFormulario->defineBarra ( array($obBtnVoltar),"","" ); + $obFormulario->defineBarra ( $arBotaoAcao ); break; } $obFormulario->show(); diff --git a/gestaoRH/fontes/PHP/pessoal/instancias/adidosCedidos/OCManterAdidoCedido.php b/gestaoRH/fontes/PHP/pessoal/instancias/adidosCedidos/OCManterAdidoCedido.php index dfa7bea..34b004a 100644 --- a/gestaoRH/fontes/PHP/pessoal/instancias/adidosCedidos/OCManterAdidoCedido.php +++ b/gestaoRH/fontes/PHP/pessoal/instancias/adidosCedidos/OCManterAdidoCedido.php @@ -173,18 +173,31 @@ function validaMatricula() function preencherSpanFiltro() { - include_once( CAM_GRH_PES_COMPONENTES."IFiltroContrato.class.php" ); - include_once( CAM_GRH_PES_COMPONENTES."IFiltroCGMContrato.class.php" ); + include_once( CAM_GRH_PES_COMPONENTES."IFiltroContrato.class.php" ); + include_once( CAM_GRH_PES_COMPONENTES."IFiltroCGMContrato.class.php"); $stHtml = ""; $obFormulario = new Formulario; - if ($_GET['stOpcao'] == "cgm_contrato") { + if ($_GET['stOpcao'] == 'cgm_contrato') { $obIFiltroCGMContrato = new IFiltroCGMContrato; $obIFiltroCGMContrato->obBscCGM->setNull(false); $obIFiltroCGMContrato->obCmbContrato->setNull(false); + + if ( $_REQUEST['stAcao'] != 'consultar' ) { + Sessao::write('valida_ativos_cgm','true'); + }else{ + Sessao::write('valida_ativos_cgm','false'); + } + $obIFiltroCGMContrato->geraFormulario($obFormulario); } else { - $obIFiltroContrato = new IFiltroContrato; + $obIFiltroContrato = new IFiltroContrato(); $obIFiltroContrato->obIContratoDigitoVerificador->setNull(false); + if ( $_REQUEST['stAcao'] == 'consultar' ) { + $obIFiltroContrato->setSituacao('todos'); + $obIFiltroContrato->obIContratoDigitoVerificador->setSituacao('todos'); + }else{ + $obIFiltroContrato->obIContratoDigitoVerificador->setTipo('contrato_ativos'); + } $obIFiltroContrato->geraFormulario($obFormulario); } $obFormulario->montaInnerHTML(); @@ -288,8 +301,6 @@ function submeter() $obErro->setDescricao($obErro->getDescricao()."@$msg!()"); } - // sistemaLegado::mostraVar($_REQUEST); - if ( $obErro->ocorreu() ) { $stJs .= "alertaAviso('".$obErro->getDescricao()."','form','aviso','".Sessao::getId()."');"; } else { @@ -335,7 +346,7 @@ switch ($_GET['stCtrl']) { break; case "submeter": $stJs .= submeter(); - break; + break; } if ($stJs) { diff --git a/gestaoRH/fontes/PHP/pessoal/instancias/adidosCedidos/PRManterAdidoCedido.php b/gestaoRH/fontes/PHP/pessoal/instancias/adidosCedidos/PRManterAdidoCedido.php index b5709a3..4dfac37 100644 --- a/gestaoRH/fontes/PHP/pessoal/instancias/adidosCedidos/PRManterAdidoCedido.php +++ b/gestaoRH/fontes/PHP/pessoal/instancias/adidosCedidos/PRManterAdidoCedido.php @@ -129,7 +129,7 @@ switch ($stAcao) { $obTPessoalAdidoCedidoLocal->inclusao(); } Sessao::encerraExcecao(); - sistemaLegado::alertaAviso($pgList,"Alteração da movimentação para o contrato ".$_POST['inRegistro'],"alterar","aviso", Sessao::getId(), "../"); + sistemaLegado::alertaAviso($pgList."&inContrato=".$_POST['inRegistro'],"Alteração da movimentação para o contrato ".$_POST['inRegistro'],"alterar","aviso", Sessao::getId(), "../"); break; case "excluir": Sessao::setTrataExcecao(true); diff --git a/gestaoRH/fontes/PHP/pessoal/instancias/cargo/OCManterCargo.php b/gestaoRH/fontes/PHP/pessoal/instancias/cargo/OCManterCargo.php index cadb8a8..e21abfb 100755 --- a/gestaoRH/fontes/PHP/pessoal/instancias/cargo/OCManterCargo.php +++ b/gestaoRH/fontes/PHP/pessoal/instancias/cargo/OCManterCargo.php @@ -617,8 +617,6 @@ function montaListaEspecialidades() function limparQuantidades($arVagas) { - #SistemaLegado::mostraVar($arVagas);exit; - foreach ($arVagas as $stCampo=>$inValor) { $stCampo = preg_replace('/([A-z]+_[\d]+_[\d]+)/', '$1', $stCampo); $stJs .= "jQuery('input[name^=\'".substr($stCampo,0,strlen($stCampo)-3)."\']').val('');\n"; @@ -711,7 +709,6 @@ function montaAlterarEspecialidade() function validaEspecialidade($arEspecialidade,$stJs) { -// SistemaLegado::mostravar($arEspecialidade); $inVagas = 0; $inCodRegime = 0; $inCodSubDivisao = 0; diff --git a/gestaoRH/fontes/PHP/pessoal/instancias/ferias/FLEmitirAvisoFerias.php b/gestaoRH/fontes/PHP/pessoal/instancias/ferias/FLEmitirAvisoFerias.php index 7c4a8f2..93b5cc9 100644 --- a/gestaoRH/fontes/PHP/pessoal/instancias/ferias/FLEmitirAvisoFerias.php +++ b/gestaoRH/fontes/PHP/pessoal/instancias/ferias/FLEmitirAvisoFerias.php @@ -50,6 +50,7 @@ $pgProc = "PR".$stPrograma.".php"; $arContratos = array(); Sessao::write('arContratos', $arContratos); +Sessao::write('valida_ativos_cgm', 'false'); $obRFolhaPagamentoFolhaSituacao = new RFolhaPagamentoFolhaSituacao(new RFolhaPagamentoPeriodoMovimentacao); //DEFINICAO DO FORM diff --git a/gestaoRH/fontes/PHP/pessoal/instancias/ferias/FLManterCadastroFerias.php b/gestaoRH/fontes/PHP/pessoal/instancias/ferias/FLManterCadastroFerias.php index 3ae4b02..a79b449 100644 --- a/gestaoRH/fontes/PHP/pessoal/instancias/ferias/FLManterCadastroFerias.php +++ b/gestaoRH/fontes/PHP/pessoal/instancias/ferias/FLManterCadastroFerias.php @@ -31,7 +31,7 @@ * Casos de uso: uc-04.04.22 - $Id: FLManterCadastroFerias.php 59816 2014-09-12 17:30:42Z michel $ + $Id: FLManterCadastroFerias.php 63818 2015-10-19 20:02:07Z evandro $ */ include_once '../../../../../../gestaoAdministrativa/fontes/PHP/pacotes/FrameworkHTML.inc.php'; @@ -103,10 +103,10 @@ $obIFiltroComponentes->setCgmMatricula(); $obIFiltroComponentes->setLotacao(); $obIFiltroComponentes->setLocal(); $obIFiltroComponentes->setFuncao(); - +Sessao::write('valida_ativos_cgm', 'true'); if ($stAcao == "consultar") { $obIFiltroComponentes->setTodos(); - $obIFiltroComponentes->setFiltroPadrao( "contrato_todos" ); + Sessao::write('valida_ativos_cgm', 'false'); } //DEFINICAO DO FORM diff --git a/gestaoRH/fontes/PHP/pessoal/instancias/ferias/FMManterCadastroFerias.php b/gestaoRH/fontes/PHP/pessoal/instancias/ferias/FMManterCadastroFerias.php index 118fb4c..1184810 100644 --- a/gestaoRH/fontes/PHP/pessoal/instancias/ferias/FMManterCadastroFerias.php +++ b/gestaoRH/fontes/PHP/pessoal/instancias/ferias/FMManterCadastroFerias.php @@ -31,7 +31,7 @@ * Casos de uso: uc-04.04.22 - $Id: FMManterCadastroFerias.php 62873 2015-07-01 20:29:22Z evandro $ + $Id: FMManterCadastroFerias.php 64078 2015-11-30 13:14:45Z evandro $ */ include_once '../../../../../../gestaoAdministrativa/fontes/PHP/pacotes/FrameworkHTML.inc.php'; @@ -54,16 +54,17 @@ $pgProc = "PR".$stPrograma.".php"; $pgJS = "JS".$stPrograma.".js"; include_once($pgJS); -$stAcao = $_POST["stAcao"] ? $_POST["stAcao"] : $_GET["stAcao"]; +$stAcao = $request->get("stAcao"); + $obRFolhaPagamentoFolhaSituacao = new RFolhaPagamentoFolhaSituacao(new RFolhaPagamentoPeriodoMovimentacao); -if (!$_POST["boConcederFeriasLote"]) { +if (!$request->get("boConcederFeriasLote")) { if ($stAcao == "consultar") { $obTPessoalFerias = new TPessoalFerias; - $obTPessoalFerias->setDado("cod_ferias",$_REQUEST['inCodFerias']); + $obTPessoalFerias->setDado("cod_ferias",$request->get('inCodFerias')); $obTPessoalFerias->recuperaPorChave($rsFerias); $obTPessoalLancamentoFerias = new TPessoalLancamentoFerias; - $obTPessoalLancamentoFerias->setDado("cod_ferias",$_REQUEST['inCodFerias']); + $obTPessoalLancamentoFerias->setDado("cod_ferias",$request->get('inCodFerias')); $obTPessoalLancamentoFerias->recuperaPorChave($rsLancamentoFerias); $obTPessoalFormaPagamentoFerias = new TPessoalFormaPagamentoFerias; @@ -95,8 +96,8 @@ if (!$_POST["boConcederFeriasLote"]) { $stPagamento13 = ( $rsLancamentoFerias->getCampo("pagar_13") == "t" ) ? "Sim" : "Não"; $stFormaPagamento = $rsFormaPagamento->getCampo("codigo") ." - ".$rsFormaPagamento->getCampo("dias")." dia(s) de férias / ".$rsFormaPagamento->getCampo("abono")." dia(s) de abono"; $stFolhaPago = $rsTipoFolha->getCampo("descricao"); - $stLink = "&inCodContrato=".$_REQUEST['inCodContrato']; - $stLink .= "&inCodFerias=".$_REQUEST['inCodFerias']; + $stLink = "&inCodContrato=".$request->get('inCodContrato'); + $stLink .= "&inCodFerias=".$request->get('inCodFerias'); $stLink .= "&dtInicialFerias=".$dtInicialFerias; $stLink .= "&dtFinalFerias=".$dtFinalFerias; $stLink .= "&dtRetornoFerias=".$dtRetornoFerias; @@ -105,17 +106,17 @@ if (!$_POST["boConcederFeriasLote"]) { $stLink .= "&stPagamento13=".$stPagamento13; $jsOnload = "executaFuncaoAjax('processarConsulta','$stLink');"; } else { - Sessao::write('dtInicial', $_REQUEST["dtInicial"]); - $dtFinal = $_REQUEST["dtFinal"]; + Sessao::write('dtInicial', $request->get("dtInicial")); + $dtFinal = $request->get("dtFinal"); Sessao::write('dtFinal', $dtFinal); - Sessao::write('dtCompetencia', $_REQUEST["inCodMes"]."/".$_REQUEST["inAno"]); + Sessao::write('dtCompetencia', $request->get("inCodMes")."/".$request->get("inAno")); include_once(CAM_GRH_PES_MAPEAMENTO."TPessoalAssentamentoGeradoContratoServidor.class.php"); $obTPessoalAssentamentoGeradoContratoServidor = new TPessoalAssentamentoGeradoContratoServidor(); - $stFiltro = " AND assentamento_gerado_contrato_servidor.cod_contrato = ".$_GET["inCodContrato"]." \n"; + $stFiltro = " AND assentamento_gerado_contrato_servidor.cod_contrato = ".$request->get("inCodContrato")." \n"; $stFiltro .= " AND assentamento_assentamento.cod_motivo = 10 \n"; - $stFiltro .= " AND (assentamento_gerado.periodo_inicial BETWEEN to_date('".$_REQUEST["dtInicial"]."','dd/mm/yyyy') AND to_date('".$_REQUEST["dtFinal"]."','dd/mm/yyyy') \n"; - $stFiltro .= " OR assentamento_gerado.periodo_final BETWEEN to_date('".$_REQUEST["dtInicial"]."','dd/mm/yyyy') AND to_date('".$_REQUEST["dtFinal"]."','dd/mm/yyyy')) \n"; + $stFiltro .= " AND (assentamento_gerado.periodo_inicial BETWEEN to_date('".$request->get("dtInicial")."','dd/mm/yyyy') AND to_date('".$request->get("dtFinal")."','dd/mm/yyyy') \n"; + $stFiltro .= " OR assentamento_gerado.periodo_final BETWEEN to_date('".$request->get("dtInicial")."','dd/mm/yyyy') AND to_date('".$request->get("dtFinal")."','dd/mm/yyyy')) \n"; $obTPessoalAssentamentoGeradoContratoServidor->recuperaRelacionamento($rsAssentamentoGerado,$stFiltro); $inQuantFaltas = 0; while (!$rsAssentamentoGerado->eof()) { @@ -146,33 +147,33 @@ $obLblContrato = new Label ; $obLblContrato->setRotulo ( "Matrícula" ); $obLblContrato->setName ( "inRegistro" ); $obLblContrato->setId ( "inRegistro" ); -$obLblContrato->setValue ( $_REQUEST["inRegistro"] ); +$obLblContrato->setValue ( $request->get("inRegistro") ); $obHdnCodContrato = new Hidden; $obHdnCodContrato->setName ( "inCodContrato" ); -$obHdnCodContrato->setValue ( $_REQUEST["inCodContrato"] ); +$obHdnCodContrato->setValue ( $request->get("inCodContrato") ); $obHdnContrato = new Hidden; $obHdnContrato->setName ( "inContrato" ); -$obHdnContrato->setValue ( $_REQUEST["inRegistro"] ); +$obHdnContrato->setValue ( $request->get("inRegistro") ); $obLblCGM = new Label; $obLblCGM->setRotulo ( "CGM" ); $obLblCGM->setName ( "inCGM" ); $obLblCGM->setId ( "inCGM" ); -$obLblCGM->setValue ( $_REQUEST["inNumCGM"] ."-". str_replace("\\","",$_REQUEST["stNomCGM"]) ); +$obLblCGM->setValue ( $request->get("inNumCGM") ."-". str_replace("\\","",$request->get("stNomCGM")) ); $obLblLotacao = new Label; $obLblLotacao->setRotulo ( "Lotação" ); $obLblLotacao->setName ( "inLotacao" ); $obLblLotacao->setId ( "inLotacao" ); -$obLblLotacao->setValue ( $_REQUEST["inCodEstrutural"] ."-". $_REQUEST["stDescLotacao"] ); +$obLblLotacao->setValue ( $request->get("inCodEstrutural") ."-". $request->get("stDescLotacao") ); $obLblFuncao = new Label; $obLblFuncao->setRotulo ( "Regime-Função" ); $obLblFuncao->setName ( "stDescFuncao" ); $obLblFuncao->setId ( "stDescFuncao" ); -$obLblFuncao->setValue ( $_REQUEST["stDescRegime"] ."-". $_REQUEST["stDescFuncao"] ); +$obLblFuncao->setValue ( $request->get("stDescRegime") ."-". $request->get("stDescFuncao") ); $obSpn1 = new Span; $obSpn1->setid ( "spnSpan1" ); @@ -182,7 +183,7 @@ $obDtaDataInicial = new Data; $obDtaDataInicial->setRotulo ( "Data Inicial" ); $obDtaDataInicial->setName ( "dtInicial" ); $obDtaDataInicial->setId ( "dtInicial" ); -$obDtaDataInicial->setValue ( $_REQUEST["dtInicial"] ); +$obDtaDataInicial->setValue ( $request->get("dtInicial") ); $obDtaDataInicial->setNull ( false ); $obDtaDataInicial->setTitle ( "Informe a data inicial do período aquisitivo." ); $obDtaDataInicial->obEvento->setOnBlur ( "executaFuncaoAjax('preencherDataFinal','&dtInicial='+this.value+'&inCodContrato='+document.frm.inCodContrato.value); if ( !verificaData( this ) ) { this.value = '';} montaParametrosGET('preencherQuantidadeFaltas','dtInicial,dtFinal,inCodContrato');"); @@ -201,7 +202,7 @@ $obDtaDataFinal = new Data; $obDtaDataFinal->setRotulo ( "Data Final" ); $obDtaDataFinal->setName ( "dtFinal" ); $obDtaDataFinal->setId ( "dtFinal" ); -$obDtaDataFinal->setValue ( $_REQUEST["dtFinal"] ); +$obDtaDataFinal->setValue ( $request->get("dtFinal") ); $obDtaDataFinal->setNull ( false ); $obDtaDataFinal->setTitle ( "Informe a data final do período aquisitivo." ); $obDtaDataFinal->obEvento->setOnChange ( "montaParametrosGET('preencherQuantDiasGozo');" ); @@ -221,12 +222,30 @@ $rsFormasPagamento = new recordset(); if ( $request->get('inCodRegime') != "") { + // Necessário carregar da sessão e testar se existe no request, pois quando vai Conceder Férias não usa o request + $arContratos = Sessao::read("arContratos"); $obTPessoalFormaPagamentoFerias = new TPessoalFormaPagamentoFerias; - $stFiltro = " AND cod_regime = ".$request->get('inCodRegime')." - AND ferias.cod_contrato = ".$request->get('inCodContrato')." - AND dt_inicial_aquisitivo = TO_DATE('".$request->get('dtInicial')."','dd/mm/yyyy') - AND dt_final_aquisitivo = TO_DATE('".$request->get('dtFinal')."','dd/mm/yyyy') - "; + + $stFiltro = " AND cod_regime = ".$request->get('inCodRegime')." \n"; + $stFiltroAux = ""; + + if (!empty($arContratos)){ + foreach ($arContratos as $campo) { + if ($campo["cod_contrato"] != "") { + $stFiltroAux .= "".$campo["cod_contrato"].","; + } + } + } + + if ($stFiltroAux != "") { + $stFiltro .= " AND ferias.cod_contrato IN (".substr($stFiltroAux,0,-1).") \n"; + } + + if (($request->get('dtInicial') != "") && ($request->get('dtFinal') != "")) { + $stFiltro .= " AND dt_inicial_aquisitivo = TO_DATE('".$request->get('dtInicial')."','dd/mm/yyyy') + AND dt_final_aquisitivo = TO_DATE('".$request->get('dtFinal')."','dd/mm/yyyy') "; + } + $obTPessoalFormaPagamentoFerias->recuperaDiasFeriasRestantes($rsFormasPagamento,$stFiltro,"",$boTransacao); if ($rsFormasPagamento->getNumLinhas() < 0) { @@ -241,7 +260,7 @@ if ( $request->get('inCodRegime') != "") { $obHdnRegime = new Hidden; $obHdnRegime->setName ( "inCodRegime" ); - $obHdnRegime->setValue ( $_REQUEST['inCodRegime'] ); + $obHdnRegime->setValue ( $request->get('inCodRegime') ); } $obCmbFormasPagamento = new Select; @@ -315,23 +334,23 @@ $obLinDadosInformativos3->setRotulo ( "Dados Informativos" $obLinDadosInformativos3->setHref ( "javascript:abrePopUpRegistrosEventosFerias();" ); $obLinDadosInformativos3->setValue ( "Consultar Registro de Evento Ferias" ); -if ($_POST["boConcederFeriasLote"]) { +if ($request->get("boConcederFeriasLote")) { $stNomeLote = "Férias em lote"; $obHdnTipoFiltro = new Hidden(); $obHdnTipoFiltro->setName("stTipoFiltro"); - $obHdnTipoFiltro->setValue($_POST["stTipoFiltro"]); + $obHdnTipoFiltro->setValue($request->get("stTipoFiltro")); $obHdnCodigos = new Hidden(); $obHdnCodigos->setName("stCodigos"); include_once(CAM_GRH_PES_MAPEAMENTO."TPessoalRegime.class.php"); $obTPessoalRegime = new TPessoalRegime(); - $obTPessoalRegime->setDado('cod_regime', $_REQUEST['inCodRegime']); + $obTPessoalRegime->setDado('cod_regime', $request->get('inCodRegime')); $obTPessoalRegime->recuperaPorChave($rsRegime); $stDescricaoRegime = " - ".$rsRegime->getCampo('descricao'); - switch ($_POST["stTipoFiltro"]) { + switch ($request->get("stTipoFiltro")) { case "contrato": case "cgm_contrato": $stCodigos = ""; @@ -341,7 +360,7 @@ if ($_POST["boConcederFeriasLote"]) { } $stCodigos = substr($stCodigos,0,-1); - $stFiltro = " AND contrato_servidor_regime_funcao.cod_regime = ".$_POST['inCodRegime']; + $stFiltro = " AND contrato_servidor_regime_funcao.cod_regime = ".$request->get('inCodRegime'); $stFiltro .= " AND contrato.cod_contrato IN (".$stCodigos.")"; include_once(CAM_GRH_PES_MAPEAMENTO."TPessoalContrato.class.php"); @@ -362,24 +381,24 @@ if ($_POST["boConcederFeriasLote"]) { break; case "lotacao": $stNomeLote .= " para Lotação"; - $stCodigosLote = "(".implode(",",$_POST["inCodLotacaoSelecionados"]).")"; - $obHdnCodigos->setValue(implode(",",$_POST["inCodLotacaoSelecionados"])); + $stCodigosLote = "(".implode(",",$request->get("inCodLotacaoSelecionados")).")"; + $obHdnCodigos->setValue(implode(",",$request->get("inCodLotacaoSelecionados"))); $stTipoFiltroLote = 'O'; break; case "local": $stNomeLote .= " para Local"; - $stCodigosLote = "(".implode(",",$_POST["inCodLocalSelecionados"]).")"; - $obHdnCodigos->setValue(implode(",",$_POST["inCodLocalSelecionados"])); + $stCodigosLote = "(".implode(",",$request->get("inCodLocalSelecionados")).")"; + $obHdnCodigos->setValue(implode(",",$request->get("inCodLocalSelecionados"))); $stTipoFiltroLote = 'L'; break; case "funcao": $stNomeLote .= " para Função"; - $stCodigosLote = "(".implode(",",$_POST["inCodFuncaoSelecionados"]).")"; - $obHdnCodigos->setValue(implode(",",$_POST["inCodFuncaoSelecionados"])); + $stCodigosLote = "(".implode(",",$request->get("inCodFuncaoSelecionados")).")"; + $obHdnCodigos->setValue(implode(",",$request->get("inCodFuncaoSelecionados"))); $stTipoFiltroLote = 'F'; break; case "geral": - $stFiltro = " AND contrato_servidor_regime_funcao.cod_regime = ".$_POST['inCodRegime']; + $stFiltro = " AND contrato_servidor_regime_funcao.cod_regime = ".$request->get('inCodRegime'); include_once(CAM_GRH_PES_MAPEAMENTO."TPessoalContrato.class.php"); $obTPessoalContrato = new TPessoalContrato(); $obTPessoalContrato->recuperaContratosFerias($rsContratos,$stFiltro); @@ -419,7 +438,7 @@ if ($_POST["boConcederFeriasLote"]) { $obHdnCodLote = new Hidden(); $obHdnCodLote->setName("inCodLote"); - $obHdnCodLote->setValue($_POST["inCodLote"]); + $obHdnCodLote->setValue($request->get("inCodLote")); $obHdnTipoFiltroLote = new Hidden(); $obHdnTipoFiltroLote->setName("stTipoFiltroLote"); @@ -427,7 +446,7 @@ if ($_POST["boConcederFeriasLote"]) { $obHdnVencidas = new Hidden(); $obHdnVencidas->setName("boApresentarSomenteFerias"); - $obHdnVencidas->setValue($_POST["boApresentarSomenteFerias"]); + $obHdnVencidas->setValue($request->get("boApresentarSomenteFerias")); } $obSpn2 = new Span; @@ -461,7 +480,7 @@ $obBtnVoltar->obEvento->setOnClick ( "javascript: window.close();" //DEFINICAO DO FORM $obForm = new Form; -if ($_POST["boConcederFeriasLote"]) { +if ($request->get("boConcederFeriasLote")) { $obForm->setAction($pgListLote); $obForm->setTarget("telaPrincipal"); } else { @@ -469,11 +488,11 @@ if ($_POST["boConcederFeriasLote"]) { $obForm->setTarget("oculto"); } -if ($_POST["boConcederFeriasLote"] and $_POST["stAcao"] == "excluir") { +if ($request->get("boConcederFeriasLote") and $request->get("stAcao") == "excluir") { $obBtnOk->obEvento->setOnClick("montaParametrosGET('excluirLote','',true)"); $obTPessoalLoteFerias = new TPessoalLoteFerias(); - $stFiltro = " WHERE cod_lote = ".$_REQUEST["inCodLote"]; + $stFiltro = " WHERE cod_lote = ".$request->get("inCodLote"); $obTPessoalLoteFerias->recuperaTodos($rsLoteFeriasContrato,$stFiltro); $stLote = $rsLoteFeriasContrato->getCampo("nome"); @@ -506,7 +525,7 @@ if ($_POST["boConcederFeriasLote"] and $_POST["stAcao"] == "excluir") { $obFormulario->addHidden ( $obHdnCtrl ); $obFormulario->addHidden ( $obHdnEval,true ); $obFormulario->addHidden ( $obHdnEval2,true ); - if (!$_POST["boConcederFeriasLote"]) { + if (!$request->get("boConcederFeriasLote")) { Sessao::write("boConcederFeriasLote", false); $obFormulario->addHidden ( $obHdnCodContrato ); $obFormulario->addTitulo ( "Dados da Matrícula" ); @@ -542,7 +561,7 @@ if ($_POST["boConcederFeriasLote"] and $_POST["stAcao"] == "excluir") { } $obFormulario->addTitulo ( "Pagamento" ); - if (!$_POST["boConcederFeriasLote"]) { + if (!$request->get("boConcederFeriasLote")) { $obFormulario->addComponente ( ( $stAcao == "consultar" ) ? $obLblQuantFaltas : $obIntQuantFaltas ); } $obFormulario->addComponente ( ( $stAcao == "consultar" ) ? $obLblFormasPagamento : $obCmbFormasPagamento ); diff --git a/gestaoRH/fontes/PHP/pessoal/instancias/ferias/LSManterCadastroFeriasLote.php b/gestaoRH/fontes/PHP/pessoal/instancias/ferias/LSManterCadastroFeriasLote.php index 92eff59..47f48c7 100644 --- a/gestaoRH/fontes/PHP/pessoal/instancias/ferias/LSManterCadastroFeriasLote.php +++ b/gestaoRH/fontes/PHP/pessoal/instancias/ferias/LSManterCadastroFeriasLote.php @@ -112,17 +112,35 @@ if ($_REQUEST["inAno"] != "" and $_REQUEST["inCodMes"] != "") { $obTFolhaPagamentoPeriodoMovimentacao->recuperaUltimaMovimentacao($rsPeriodoMovimentacao); } +// Necessário carregar da sessão e testar se existe no request, pois quando vai Conceder Férias não usa o request +if ($_REQUEST["stCodigos"] == "") { + $arContratos = Sessao::read("arContratos"); + $stFiltroAux = ""; + foreach ($arContratos as $campo) { + if ($campo['cod_contrato'] != "") { + $stFiltroAux .= $campo['cod_contrato'].","; + } + } +} + +if ($stFiltroAux != "") { + $stValoresFiltro = substr($stFiltroAux,0,-1); +} else { + $stValoresFiltro = $_REQUEST["stCodigos"]; +} + include_once(CAM_GRH_PES_MAPEAMENTO."TPessoalFerias.class.php"); $obTPessoalFerias = new TPessoalFerias(); $obTPessoalFerias->setDado("stAcao" ,$_REQUEST["stAcao"]); $obTPessoalFerias->setDado("stTipoFiltro" ,$_REQUEST["stTipoFiltro"]); -$obTPessoalFerias->setDado("stValoresFiltro" ,$_REQUEST["stCodigos"]); +$obTPessoalFerias->setDado("stValoresFiltro" ,$stValoresFiltro); $obTPessoalFerias->setDado("inCodPeriodoMovimentacao" ,$rsPeriodoMovimentacao->getCampo("cod_periodo_movimentacao")); $obTPessoalFerias->setDado("boFeriasVencidas" ,(trim($_REQUEST['boApresentarSomenteFerias']) != "") ? 'true' : 'false'); $obTPessoalFerias->setDado("inCodLote" ,(trim($_REQUEST["inCodLote"]) != "") ? $_REQUEST["inCodLote"] : 0); $obTPessoalFerias->setDado("inCodRegime" ,$_REQUEST["inCodRegime"]); $obTPessoalFerias->concederFerias($rsLista,$stFiltro," ORDER BY nom_cgm, dt_inicial_aquisitivo, dt_final_aquisitivo"); + include_once(CAM_GRH_PES_MAPEAMENTO."TPessoalAssentamentoGeradoContratoServidor.class.php"); $obTPessoalAssentamentoGeradoContratoServidor = new TPessoalAssentamentoGeradoContratoServidor(); while (!$rsLista->eof()) { diff --git a/gestaoRH/fontes/PHP/pessoal/instancias/ferias/OCManterCadastroFerias.php b/gestaoRH/fontes/PHP/pessoal/instancias/ferias/OCManterCadastroFerias.php index d9cf5e4..ed94b3a 100644 --- a/gestaoRH/fontes/PHP/pessoal/instancias/ferias/OCManterCadastroFerias.php +++ b/gestaoRH/fontes/PHP/pessoal/instancias/ferias/OCManterCadastroFerias.php @@ -31,7 +31,7 @@ * Casos de uso: uc-04.04.22 - $Id: OCManterCadastroFerias.php 63555 2015-09-10 17:00:04Z franver $ + $Id: OCManterCadastroFerias.php 64078 2015-11-30 13:14:45Z evandro $ */ include_once '../../../../../../gestaoAdministrativa/fontes/PHP/pacotes/FrameworkHTML.inc.php'; @@ -600,14 +600,14 @@ function preencherQuantDiasGozo() } if (!$obErro->ocorreu()) { - if ($_GET['inCodFormaPagamento'] != "") { - if ($_GET['inQuantFaltas']=="") { + if ($_REQUEST['inCodFormaPagamento'] != "") { + if ($_REQUEST['inQuantFaltas']=="") { $inQuantFaltas=0; } else { - $inQuantFaltas = $_GET['inQuantFaltas']; + $inQuantFaltas = $_REQUEST['inQuantFaltas']; } if (Sessao::read("boConcederFeriasLote") == FALSE) { - $inFeriasProporcionais = recuperaQtdDiasParaGozoFerias($_GET["dtInicial"], $_GET["dtFinal"]); + $inFeriasProporcionais = recuperaQtdDiasParaGozoFerias($_REQUEST["dtInicial"], $_REQUEST["dtFinal"]); } include_once(CAM_GRH_PES_MAPEAMENTO."TPessoalFormaPagamentoFerias.class.php"); @@ -616,7 +616,7 @@ function preencherQuantDiasGozo() $obTPessoalFerias = new TPessoalFerias; $obTPessoalFormaPagamentoFerias = new TPessoalFormaPagamentoFerias; $obTPessoalConfiguracaoFerias = new TPessoalConfiguracaoFerias; - $obTPessoalFormaPagamentoFerias->setDado("cod_forma",$_GET['inCodFormaPagamento']); + $obTPessoalFormaPagamentoFerias->setDado("cod_forma",$_REQUEST['inCodFormaPagamento']); $obTPessoalFormaPagamentoFerias->recuperaPorChave($rsFormas); if (Sessao::read("boConcederFeriasLote") == FALSE) { @@ -652,10 +652,29 @@ function preencherQuantDiasGozo() ou cod_forma 4 (2 periodos de 15 dias) */ - $stFiltroFerias = " AND cod_contrato = ".$_GET['inCodContrato']; - $stFiltroFerias .= "\n AND ferias.cod_forma = ".$_GET['inCodFormaPagamento']." "; - $stFiltroFerias .= "\n AND ferias.dt_inicial_aquisitivo = TO_DATE('".$_GET['dtInicial']."','dd/mm/yyyy') "; - $stFiltroFerias .= "\n AND ferias.dt_final_aquisitivo = TO_DATE('".$_GET['dtFinal']."','dd/mm/yyyy') "; + + // Necessário carregar da sessão e testar se existe no request, pois quando vai Conceder Férias não usa o request + $arContratos = Sessao::read("arContratos"); + + $stFiltroAux = ""; + if (!empty($arContratos)){ + foreach ($arContratos as $campo) { + if ($campo['cod_contrato'] != "") { + $stFiltroAux .= "".$campo["cod_contrato"].","; + } + } + } + + if ($stFiltroAux != "") { + $stFiltroFerias .= " AND cod_contrato IN (".substr($stFiltroAux,0,-1).") \n"; + } + + if (($_REQUEST['dtInicial'] != "") && ($_REQUEST['dtFinal'] != "")) { + $stFiltroFerias .= " AND ferias.dt_inicial_aquisitivo = TO_DATE('".$_REQUEST['dtInicial']."','dd/mm/yyyy') \n"; + $stFiltroFerias .= " AND ferias.dt_final_aquisitivo = TO_DATE('".$_REQUEST['dtFinal']."','dd/mm/yyyy') \n"; + } + + $stFiltroFerias .= "AND ferias.cod_forma = ".$_REQUEST['inCodFormaPagamento']." \n"; $obTPessoalFerias->recuperaRelacionamento($rsLancamentoFerias,$stFiltroFerias," ORDER BY ferias.cod_ferias",$boTransacao); if ($rsLancamentoFerias->getNumLinhas() > 0){ $stJs .= gerarSpan2Form(false,"",false); @@ -670,7 +689,7 @@ function preencherQuantDiasGozo() $stJs .= gerarSpan2Form(false,"",true); } - if ($_GET['dtInicialFerias'] != "") { + if ($_REQUEST['dtInicialFerias'] != "") { $stJs .= validarDataInicioFerias($inQuantDiasGozo); } @@ -741,12 +760,10 @@ function validarDataInicioFerias($inQuantDiasGozo="") $boInicioFeriasFimDeSemana = false; if ( $dtInicioFerias != "" and date('D',mktime(0,0,0,$arInicioFerias[1],$arInicioFerias[0],$arInicioFerias[2])) == "Sun" ) { $stJs .= "confirmPopUp('Atenção!','A data ".$dtInicioFerias." é um Domingo! Deseja continuar a cadastrar as ferias?','');"; - //$obErro->setDescricao("@Campo Data de Início das Férias inválido!("."a data ".$dtInicioFerias." é um Domingo)"); $boInicioFeriasFimDeSemana = true; } if ( $dtInicioFerias != "" and date('D',mktime(0,0,0,$arInicioFerias[1],$arInicioFerias[0],$arInicioFerias[2])) == "Sat" ) { $stJs .= "confirmPopUp('Atenção!','A data ".$dtInicioFerias." é um Sábado! Deseja continuar a cadastrar as ferias?','');"; - //$obErro->setDescricao("@Campo Data de Início das Férias inválido!("."a data ".$dtInicioFerias." é um Sábado)"); $boInicioFeriasFimDeSemana = true; } diff --git a/gestaoRH/fontes/PHP/pessoal/instancias/processamento/OCFiltroCGM.php b/gestaoRH/fontes/PHP/pessoal/instancias/processamento/OCFiltroCGM.php index bd981ba..d0a20c1 100644 --- a/gestaoRH/fontes/PHP/pessoal/instancias/processamento/OCFiltroCGM.php +++ b/gestaoRH/fontes/PHP/pessoal/instancias/processamento/OCFiltroCGM.php @@ -31,7 +31,7 @@ * Casos de uso: uc-04.04.00 - $Id: OCFiltroCGM.php 60995 2014-11-27 18:34:36Z carlos.silva $ + $Id: OCFiltroCGM.php 63818 2015-10-19 20:02:07Z evandro $ */ include_once '../../../../../../gestaoAdministrativa/fontes/PHP/pacotes/FrameworkHTML.inc.php'; @@ -46,6 +46,7 @@ function buscaCGM() $obRPessoalServidor = new RPessoalServidor; $stJs = ""; $boTransacao = ""; + $boValidaCgmAtivos = Sessao::read('valida_ativos_cgm'); $campoNum = (isset($_GET['campoNum']))?$_GET['campoNum']:"inNumCGM"; $campoNom = (isset($_GET['campoNom']))?$_GET['campoNom']:"inCampoInner"; @@ -62,11 +63,13 @@ function buscaCGM() $boErro = true; } if ( $obRCGMPessoaFisica->getNumCGM() and !$boErro ) { - $obRPessoalServidor->obRCGMPessoaFisica->setNumCGM( $_GET['inNumCGM'] ); $obRPessoalServidor->addContratoServidor(); - $obRPessoalServidor->consultaCGMServidor( $rsServidor, "", $boTransacao ); - + if ($boValidaCgmAtivos == 'true') { + $obRPessoalServidor->recuperaCgmDoRegistro( $rsServidor, '','', $boTransacao ); + }else{ + $obRPessoalServidor->consultaCGMServidor( $rsServidor, "", $boTransacao ); + } include_once(CAM_GRH_PES_MAPEAMENTO."TPessoalPensionista.class.php"); $obTPessoalPensionista = new TPessoalPensionista(); $stFiltro = " WHERE numcgm = ".trim($_GET['inNumCGM']); @@ -138,6 +141,7 @@ function montaContrato($boRescindido) $obRPessoalServidor = new RPessoalServidor; $stJs = ""; $boTransacao = ""; + $boValidaCgmAtivos = Sessao::read('valida_ativos_cgm'); if ($_GET['inNumCGM'] != '') { $obRCGMPessoaFisica->setNumCGM( $_GET['inNumCGM'] ); @@ -151,7 +155,11 @@ function montaContrato($boRescindido) if ( $obRCGMPessoaFisica->getNumCGM() and !$boErro ) { $obRPessoalServidor->obRCGMPessoaFisica->setNumCGM( $_GET['inNumCGM'] ); $obRPessoalServidor->addContratoServidor(); - $obRPessoalServidor->consultaCGMServidor( $rsServidor, "", $boTransacao ); + if ($boValidaCgmAtivos == 'true') { + $obRPessoalServidor->recuperaCgmDoRegistro( $rsServidor, '','', $boTransacao ); + }else{ + $obRPessoalServidor->consultaCGMServidor( $rsServidor, "", $boTransacao ); + } include_once(CAM_GRH_PES_MAPEAMENTO."TPessoalPensionista.class.php"); $obTPessoalPensionista = new TPessoalPensionista(); @@ -173,7 +181,10 @@ function montaContrato($boRescindido) $stFiltro .= " FROM \n"; $stFiltro .= " pessoal.contrato_servidor_caso_causa ) \n"; } - $obErro = $obTPessoalServidor->recuperaRegistrosServidor( $rsRegistros, $stFiltro ); + if($boValidaCgmAtivos == 'true'){ + $stFiltro .= " AND recuperarSituacaoDoContratoLiteral(pc.cod_contrato, 0, '".Sessao::getEntidade()."') = 'Ativo' "; + } + $obErro = $obTPessoalServidor->recuperaRegistrosServidor( $rsRegistros, $stFiltro ); $stJs .= "limpaSelect(f.inContrato,0);\n"; $stJs .= "f.inContrato[0] = new Option('Selecione','','selected');\n"; $inIndex = 1; diff --git a/gestaoRH/fontes/PHP/pessoal/instancias/processamento/OCIFiltroAtributoDinamico.php b/gestaoRH/fontes/PHP/pessoal/instancias/processamento/OCIFiltroAtributoDinamico.php index bb2ebb2..8d3e764 100644 --- a/gestaoRH/fontes/PHP/pessoal/instancias/processamento/OCIFiltroAtributoDinamico.php +++ b/gestaoRH/fontes/PHP/pessoal/instancias/processamento/OCIFiltroAtributoDinamico.php @@ -43,16 +43,16 @@ include_once '../../../../../../gestaoAdministrativa/fontes/PHP/pacotes/FrameworkHTML.inc.php'; include_once '../../../../../../gestaoAdministrativa/fontes/PHP/framework/include/valida.inc.php'; -function gerarSpanAtributo() +function gerarSpanAtributo(Request $request) { $rsAtributos = new RecordSet(); - if (trim($_GET['inCodAtributo']) != '') { + if (trim($request->get('inCodAtributo')) != '') { include_once ( CAM_GA_ADM_NEGOCIO."RCadastroDinamico.class.php"); $obRCadastroDinamico = new RCadastroDinamico(); - $obRCadastroDinamico->setCodCadastro($_REQUEST['cod_cadastro']); - $obRCadastroDinamico->obRModulo->setCodModulo($_REQUEST['cod_modulo']); - $obRCadastroDinamico->setChavePersistenteValores( array('cod_atributo'=>$_GET['inCodAtributo']) ); + $obRCadastroDinamico->setCodCadastro($request->get('cod_cadastro')); + $obRCadastroDinamico->obRModulo->setCodModulo($request->get('cod_modulo')); + $obRCadastroDinamico->setChavePersistenteValores( array('cod_atributo'=>$request->get('inCodAtributo')) ); $obRCadastroDinamico->recuperaAtributosSelecionados($rsAtributos); } @@ -77,16 +77,19 @@ function gerarSpanAtributo() $obFormulario->montaInnerHTML(); $obFormulario->obJavaScript->montaJavaScript(); $stEval = $obFormulario->obJavaScript->getInnerJavaScript(); - $stHtml = $obFormulario->getHTML(); - $stJs .= "d.getElementById('spnAtributo').innerHTML = '$stHtml'; \n"; - $stJs .= "f.hdnTipoFiltro.value += '$stEval'; \n"; + //linha comentada para verificar o erro que está vindo de alguma configuracao que foi setada errada pelo usuario + //Provavel parametros do usuario estão errados, mas nao conseguimos reproduzir o erro em desenvolvimento + //$stEval = str_replace("\"", "'", $stEval); + $stHtml = $obFormulario->getHTML(); + $stJs .= "jq('#spnAtributo').html('".$stHtml."'); \n"; + $stJs .= "jq('#hdnTipoFiltro').val('".$stEval."'); \n"; return $stJs; } -switch ($_GET["stCtrl"]) { +switch ( $request->get('stCtrl') ) { case "gerarSpanAtributo": - $stJs = gerarSpanAtributo(); + $stJs = gerarSpanAtributo($request); break; } if ($stJs) { diff --git a/gestaoRH/fontes/PHP/pessoal/instancias/processamento/OCIFiltroComponentes.php b/gestaoRH/fontes/PHP/pessoal/instancias/processamento/OCIFiltroComponentes.php index 6cda6c6..bc2ab5b 100755 --- a/gestaoRH/fontes/PHP/pessoal/instancias/processamento/OCIFiltroComponentes.php +++ b/gestaoRH/fontes/PHP/pessoal/instancias/processamento/OCIFiltroComponentes.php @@ -32,7 +32,7 @@ * @ignore - $Id: OCIFiltroComponentes.php 61047 2014-12-02 18:01:27Z jean $ + $Id: OCIFiltroComponentes.php 63818 2015-10-19 20:02:07Z evandro $ $Revision: 32866 $ $Name$ @@ -1236,8 +1236,12 @@ function preencheCGMContrato() } switch ($_GET["stTipo"]) { case "contrato": + $boValidaAtivos = Sessao::read('valida_ativos_cgm'); $stFiltro = " AND registro = ".$_GET["inContrato"]; $stFiltro .= " AND NOT EXISTS (SELECT 1 FROM pessoal.contrato_servidor_caso_causa WHERE contrato_servidor_caso_causa.cod_contrato = contrato.cod_contrato ".$stSubFiltro.")"; + if ($boValidaAtivos == 'true') { + $stFiltro .= " AND situacao = 'Ativo' "; + } include_once(CAM_GRH_PES_MAPEAMENTO."TPessoalContrato.class.php"); $obTPessoalContrato = new TPessoalContrato(); $obTPessoalContrato->recuperaCgmDoRegistro($rsCGM,$stFiltro); @@ -1269,13 +1273,13 @@ function preencheCGMContrato() case "contrato_rescisao": $stFiltro = " AND registro = ".$_GET["inContrato"]; - $stFiltro .= " - AND EXISTS (SELECT 1 FROM pessoal.contrato_servidor_caso_causa WHERE contrato_servidor_caso_causa.cod_contrato = contrato.cod_contrato ".$stSubFiltro." + $stFiltro .= " + AND EXISTS (SELECT 1 FROM pessoal.contrato_servidor_caso_causa WHERE contrato_servidor_caso_causa.cod_contrato = contrato.cod_contrato ".$stSubFiltro." UNION ALL SELECT 1 FROM pessoal.contrato_pensionista_caso_causa WHERE contrato_pensionista_caso_causa.cod_contrato = contrato.cod_contrato ".$stSubFiltro." ) "; - include_once(CAM_GRH_PES_MAPEAMENTO."TPessoalContrato.class.php"); - $obTPessoalContrato = new TPessoalContrato(); + include_once(CAM_GRH_PES_MAPEAMENTO."TPessoalContrato.class.php"); + $obTPessoalContrato = new TPessoalContrato(); $obTPessoalContrato->recuperaCgmDoRegistro($rsCGM,$stFiltro); if ($rsCGM->getNumLinhas() == 1) { diff --git a/gestaoRH/fontes/PHP/pessoal/instancias/relatorio/OCDefinivelServidor.php b/gestaoRH/fontes/PHP/pessoal/instancias/relatorio/OCDefinivelServidor.php index 4b80650..b0e3aae 100644 --- a/gestaoRH/fontes/PHP/pessoal/instancias/relatorio/OCDefinivelServidor.php +++ b/gestaoRH/fontes/PHP/pessoal/instancias/relatorio/OCDefinivelServidor.php @@ -388,7 +388,7 @@ function incluirCampo() if (!$obErro->ocorreu()) { if (count($arCampos) > 0) { foreach ($arCampos as $arCampo) { - if (ereg('evento', strtolower($arCampo['campo'])) || in_array($stCampo, $arCamposValores)) { + if (preg_match('/evento/', strtolower($arCampo['campo'])) || in_array($stCampo, $arCamposValores)) { $inCodCampoEventoUltimo = substr($arCampo['campo'], 6, 1); // Vai substituindo até o último elemento $inCodCampoEventoProximo = $inCodCampoEventoUltimo + 1; @@ -402,7 +402,7 @@ function incluirCampo() } } - if (ereg('evento', strtolower($stCampo))) { + if (preg_match('/evento/', strtolower($stCampo))) { if ($_GET['inCodigoEvento'] == '') { $obErro->setDescricao('Informe qual o evento a ser demonstrado no relatório.'); } @@ -418,11 +418,27 @@ function incluirCampo() $arCampo['nom_evento'] = $_GET['hdnDescEvento']; } - if (ereg('data', strtolower($stCampo))) { - $stCampoDescricao = $stCampo.' (' .$_REQUEST['stDataInicial']. ' - '. $_REQUEST['stDataFinal']. ') '; - if ($_GET['stDataInicial'] != '' || $_GET['stDataFinal'] != '') { - $arCampo['stDataInicial'] = $_GET['stDataInicial']; - $arCampo['stDataFinal'] = $_GET['stDataFinal']; + if (preg_match('/data/', strtolower($stCampo))) { + $pattern = "((1[0-2])|(0[1-9]))"; //Expressão regular para pegar o mês exato entre 01-09 ou 10-12 + + /* + O IF tem que verificar exatamente se os campos inicial e final são o mesmo para garantir que foi adicionado corretamente + e ainda testar se ambos inicial e final estão dentro da expressão regular determinada anteriormente + */ + if (($_REQUEST['stDataInicial'] == $_REQUEST['stDataFinal']) && + (preg_match($pattern,$_REQUEST['stDataInicial']) == 1) && + (preg_match($pattern,$_REQUEST['stDataFinal']) == 1) + ) { + $inMes = (int)$_REQUEST['stDataInicial']; //convertendo o string do mês para garantir que irá corretamente + $stCampoDescricao = $stCampo.' ('.SistemaLegado::mesExtensoBR($inMes).') '; + $arCampo['stMes'] = $_GET['stDataInicial']; + } else { + $stCampoDescricao = $stCampo.' (' .$_REQUEST['stDataInicial']. ' - '. $_REQUEST['stDataFinal']. ') '; + + if ($_GET['stDataInicial'] != '' || $_GET['stDataFinal'] != '') { + $arCampo['stDataInicial'] = $_GET['stDataInicial']; + $arCampo['stDataFinal'] = $_GET['stDataFinal']; + } } } @@ -458,7 +474,7 @@ function incluirCampo() $arPontos += $arListaCampos[$stCampo]; Sessao::write('pontos', $arPontos); - if (ereg('evento', strtolower($stCampo)) && !$boTipoFolha) { + if (preg_match('/evento/', strtolower($stCampo)) && !$boTipoFolha) { $obIFiltroTipoFolha = new IFiltroTipoFolha(); $obIFiltroTipoFolha->setValorPadrao('1'); @@ -507,7 +523,7 @@ function excluirCampo() $arTemp[] = $arCampo; $stCampoTMP = $arCampo['campo']; $arCamposTMP = array('Salário Bruto', 'Salário Líquido', 'Descontos da Folha Salário'); - if (ereg('evento', strtolower($stCampoTMP)) || in_array($stCampoTMP, $arCamposTMP)) { + if (preg_match('/evento/', strtolower($stCampoTMP)) || in_array($stCampoTMP, $arCamposTMP)) { $boTipoFolha = true; } } else { @@ -609,7 +625,7 @@ function submeter() function verificarCampo() { $stCampo = $_REQUEST['stCampo']; - if (ereg('evento', strtolower($stCampo))) { + if (preg_match('/evento/', strtolower($stCampo))) { $obIBscEvento = new IBscEvento(); $obIBscEvento->setTodosEventos(true); $obIBscEvento->obBscInnerEvento->setObrigatorio(true); @@ -623,12 +639,13 @@ function verificarCampo() $stJs = "d.getElementById('spnCampos').innerHTML = '".$stHtml."'; "; } else - if (ereg('data', strtolower($stCampo))) { + if (preg_match('/data/', strtolower($stCampo))) { $obPeriodicidade = new Periodicidade(); $obPeriodicidade->setRotulo("Periodicidade"); - $obPeriodicidade->setTitle("Informe a Periodicidade"); + $obPeriodicidade->setTitle("Informe a Periodicidade."); $obPeriodicidade->setExercicio(Sessao::getExercicio()); + $obPeriodicidade->setAnoVazio(true); //Necessário para poder usar o parâmetro do mês sem informar o exercicío $obPeriodicidade->setValue(4); $obFormulario = new Formulario(); diff --git a/gestaoRH/fontes/PHP/pessoal/instancias/relatorio/PRDefinivelServidor.php b/gestaoRH/fontes/PHP/pessoal/instancias/relatorio/PRDefinivelServidor.php index bbf52d4..430faaa 100644 --- a/gestaoRH/fontes/PHP/pessoal/instancias/relatorio/PRDefinivelServidor.php +++ b/gestaoRH/fontes/PHP/pessoal/instancias/relatorio/PRDefinivelServidor.php @@ -200,49 +200,53 @@ if ((isset($arCampos)) && (count($arCampos)>0)) { $colunasVisiveis .= $arReferenciaSQL[$dados['campo']].','; $totalLarguraColunas += $dados['tamanho']; - if (ereg('evento', strtolower($dados['campo'])) + if (preg_match('/evento/', strtolower($dados['campo'])) || $dados['campo'] == 'Salário Bruto' || $dados['campo'] == 'Salário Líquido' || $dados['campo'] == 'Descontos da Folha' ) { $boHideTotais = 'false'; $boAgrupar = 'true'; } - if (ereg('data admissão', strtolower($dados['campo']))) { + if (preg_match('/data admissão/', strtolower($dados['campo']))) { $stDataAdmInicial = $dados['stDataInicial']; $stDataAdmFinal = $dados['stDataFinal']; } - if (ereg('data nascimento', strtolower($dados['campo']))) { - $stDataNascInicial = $dados['stDataInicial']; - $stDataNascFinal = $dados['stDataFinal']; + if (preg_match('/data nascimento/', strtolower($dados['campo']))) { + if ($dados['stMes'] != '') { + $inMes = $dados['stMes']; + } else { + $stDataNascInicial = $dados['stDataInicial']; + $stDataNascFinal = $dados['stDataFinal']; + } } - if (ereg('data nomeação', strtolower($dados['campo']))) { + if (preg_match('/data nomeação/', strtolower($dados['campo']))) { $stDataNomInicial = $dados['stDataInicial']; $stDataNomFinal = $dados['stDataFinal']; } - if (ereg('data opção fgts', strtolower($dados['campo']))) { + if (preg_match('/data opção fgts/', strtolower($dados['campo']))) { $stDataFgtsInicial = $dados['stDataInicial']; $stDataFgtsFinal = $dados['stDataFinal']; } - if (ereg('data posse', strtolower($dados['campo']))) { + if (preg_match('/data posse/', strtolower($dados['campo']))) { $stDataPosseInicial = $dados['stDataInicial']; $stDataPosseFinal = $dados['stDataFinal']; } - if (ereg('data rescisão', strtolower($dados['campo']))) { + if (preg_match('/data rescisão/', strtolower($dados['campo']))) { $stDataResInicial = $dados['stDataInicial']; $stDataResFinal = $dados['stDataFinal']; } - if (ereg('evento', strtolower($dados['campo']))) { + if (preg_match('/evento/', strtolower($dados['campo']))) { $stEvento = $dados['cod_evento'].' - '.$dados['nom_evento']; $inCodCampoEvento = substr($dados['campo'], 6, 1); - if (ereg('quantidade', strtolower($dados['campo']))) { + if (preg_match('/quantidade/', strtolower($dados['campo']))) { $arCodEventos['Quantidade'][$inCodCampoEvento] = $dados['cod_evento']; $preview->addParametro('legenda_evento'.$inCodCampoEvento.'_qte', $stEvento); $contadorEventoQte++; @@ -368,16 +372,16 @@ $stOrdenacao = substr($stOrdenacao, 0, -1); if (isset($_POST['inCodComplementar'])) { $str2 = (int) $_POST['inCodComplementar']; - $insert .= "insert into $stNomeTabela (campo, valor, parametrosPL, tipo, ordem) values('inCodComplementar', '$str2', 'true', 'integer', 8 );"; + $insert .= "insert into $stNomeTabela (campo, valor, parametrosPL, tipo, ordem) values('inCodComplementar', '$str2', 'true', 'integer', 8 );\n"; } else { - $insert .= "insert into $stNomeTabela (campo, valor, parametrosPL, tipo, ordem) values('inCodComplementar', '0', 'true', 'integer', 8 );"; + $insert .= "insert into $stNomeTabela (campo, valor, parametrosPL, tipo, ordem) values('inCodComplementar', '0', 'true', 'integer', 8 );\n"; } if (isset($_POST['inCodConfiguracao'])) { $str3 = (int) $_POST['inCodConfiguracao']; - $insert .= "insert into $stNomeTabela (campo, valor, parametrosPL, tipo, ordem) values('inCodConfiguracao', '$str3', 'true', 'integer', 10 );"; + $insert .= "insert into $stNomeTabela (campo, valor, parametrosPL, tipo, ordem) values('inCodConfiguracao', '$str3', 'true', 'integer', 10 );\n"; } else { - $insert .= "insert into $stNomeTabela (campo, valor, parametrosPL, tipo, ordem) values('inCodConfiguracao', '0', 'true', 'integer', 10 );"; + $insert .= "insert into $stNomeTabela (campo, valor, parametrosPL, tipo, ordem) values('inCodConfiguracao', '0', 'true', 'integer', 10 );\n"; } $preview->addParametro('entidade' , trim(Sessao::getCodEntidade())); @@ -393,61 +397,65 @@ $str4 = trim($_POST['stSituacao']); $str5 = trim($_POST['stTipoFiltro']); if ($stDataAdmInicial) { - $insert .= "insert into $stNomeTabela (campo, valor, parametrosPL, tipo, ordem) values( 'dtDataAdmIni', 'data_admissao >= to_date(''$stDataAdmInicial'', ''dd/mm/yyyy'')', 'false', 'date', 99);"; + $insert .= "insert into $stNomeTabela (campo, valor, parametrosPL, tipo, ordem) values( 'dtDataAdmIni', 'data_admissao >= to_date(''$stDataAdmInicial'', ''dd/mm/yyyy'')', 'false', 'date', 99);\n"; } if ($stDataAdmFinal) { - $insert .= "insert into $stNomeTabela (campo, valor, parametrosPL, tipo, ordem) values('dtDataAdmFin', 'data_admissao <= to_date(''$stDataAdmFinal'', ''dd/mm/yyyy'')', 'false', 'date', 99);"; + $insert .= "insert into $stNomeTabela (campo, valor, parametrosPL, tipo, ordem) values('dtDataAdmFin', 'data_admissao <= to_date(''$stDataAdmFinal'', ''dd/mm/yyyy'')', 'false', 'date', 99);\n"; + } + + if ($inMes) { + $insert .= "insert into $stNomeTabela (campo, valor, parametrosPL, tipo, ordem) values('inMes', 'EXTRACT(month from data_nascimento)::INTEGER = ''$inMes''::INTEGER', 'false', 'date', 99);\n"; } if ($stDataNascInicial) { - $insert .= "insert into $stNomeTabela (campo, valor, parametrosPL, tipo, ordem) values('dtDataNascIni', 'data_nascimento >= to_date(''$stDataNascInicial'', ''dd/mm/yyyy'')', 'false', 'date', 99);"; + $insert .= "insert into $stNomeTabela (campo, valor, parametrosPL, tipo, ordem) values('dtDataNascIni', 'data_nascimento >= to_date(''$stDataNascInicial'', ''dd/mm/yyyy'')', 'false', 'date', 99);\n"; } if ($stDataNascFinal) { - $insert .= "insert into $stNomeTabela (campo, valor, parametrosPL, tipo, ordem) values('dtDataNascFin', 'data_nascimento <= to_date(''$stDataNascFinal'', ''dd/mm/yyyy'')', 'false', 'date', 99);"; + $insert .= "insert into $stNomeTabela (campo, valor, parametrosPL, tipo, ordem) values('dtDataNascFin', 'data_nascimento <= to_date(''$stDataNascFinal'', ''dd/mm/yyyy'')', 'false', 'date', 99);\n"; } if ($stDataNomInicial) { - $insert .= "insert into $stNomeTabela (campo, valor, parametrosPL, tipo, ordem) values('dtDataNomIni', 'data_nomeacao >= to_date(''$stDataNomInicial'', ''dd/mm/yyyy'')', 'false', 'date', 99);"; + $insert .= "insert into $stNomeTabela (campo, valor, parametrosPL, tipo, ordem) values('dtDataNomIni', 'data_nomeacao >= to_date(''$stDataNomInicial'', ''dd/mm/yyyy'')', 'false', 'date', 99);\n"; } if ($stDataNomFinal) { - $insert .= "insert into $stNomeTabela (campo, valor, parametrosPL, tipo, ordem) values('dtDataNomFin', 'data_nomeacao <= to_date(''$stDataNomFinal'', ''dd/mm/yyyy'')', 'false', 'date', 99);"; + $insert .= "insert into $stNomeTabela (campo, valor, parametrosPL, tipo, ordem) values('dtDataNomFin', 'data_nomeacao <= to_date(''$stDataNomFinal'', ''dd/mm/yyyy'')', 'false', 'date', 99);\n"; } if ($stDataFgtsInicial) { - $insert .= "insert into $stNomeTabela (campo, valor, parametrosPL, tipo, ordem) values('dtDataFgtsIni', 'data_opcao_fgts >= to_date('$stDataFgtsInicial'', ''dd/mm/yyyy'')', 'false', 'date', 99);"; + $insert .= "insert into $stNomeTabela (campo, valor, parametrosPL, tipo, ordem) values('dtDataFgtsIni', 'data_opcao_fgts >= to_date('$stDataFgtsInicial'', ''dd/mm/yyyy'')', 'false', 'date', 99);\n"; } if ($stDataFgtsFinal) { - $insert .= "insert into $stNomeTabela (campo, valor, parametrosPL, tipo, ordem) values('dtDataFgtsFin', 'data_opcao_fgts <= to_date(''$stDataFgtsFinal'', ''dd/mm/yyyy'')', 'false', 'date', 99);"; + $insert .= "insert into $stNomeTabela (campo, valor, parametrosPL, tipo, ordem) values('dtDataFgtsFin', 'data_opcao_fgts <= to_date(''$stDataFgtsFinal'', ''dd/mm/yyyy'')', 'false', 'date', 99);\n"; } if ($stDataResInicial) { - $insert .= "insert into $stNomeTabela (campo, valor, parametrosPL, tipo, ordem) values('dtDataResIni', 'data_rescisao >= to_date(''$stDataResInicial'', ''dd/mm/yyyy'')', 'false', 'date', 99);"; + $insert .= "insert into $stNomeTabela (campo, valor, parametrosPL, tipo, ordem) values('dtDataResIni', 'data_rescisao >= to_date(''$stDataResInicial'', ''dd/mm/yyyy'')', 'false', 'date', 99);\n"; } if ($stDataResFinal) { - $insert .= "insert into $stNomeTabela (campo, valor, parametrosPL, tipo, ordem) values('dtDataResFin', 'data_rescisao <= to_date(''$stDataResFinal'', ''dd/mm/yyyy'')', 'false', 'date', 99);"; + $insert .= "insert into $stNomeTabela (campo, valor, parametrosPL, tipo, ordem) values('dtDataResFin', 'data_rescisao <= to_date(''$stDataResFinal'', ''dd/mm/yyyy'')', 'false', 'date', 99);\n"; } if ($stDataPosseInicial) { - $insert .= "insert into $stNomeTabela (campo, valor, parametrosPL, tipo, ordem) values('dtDataPosseIni', 'data_posse >= to_date(''$stDataPosseInicial'', ''dd/mm/yyyy'')', 'false', 'date', 99);"; + $insert .= "insert into $stNomeTabela (campo, valor, parametrosPL, tipo, ordem) values('dtDataPosseIni', 'data_posse >= to_date(''$stDataPosseInicial'', ''dd/mm/yyyy'')', 'false', 'date', 99);\n"; } if ($stDataPosseFinal) { - $insert .= "insert into $stNomeTabela (campo, valor, parametrosPL, tipo, ordem) values('dtDataPosseFin', 'data_posse <= to_date(''$stDataPosseFinal'', ''dd/mm/yyyy'')', 'false', 'date', 99);"; + $insert .= "insert into $stNomeTabela (campo, valor, parametrosPL, tipo, ordem) values('dtDataPosseFin', 'data_posse <= to_date(''$stDataPosseFinal'', ''dd/mm/yyyy'')', 'false', 'date', 99);\n"; } -$insert .= "insert into $stNomeTabela (campo, valor, parametrosPL, tipo, ordem) values('inCodPeriodoMovimentacao', '$inCodPeriodoMovimentacao', 'true', 'integer', 9 );"; -$insert .= "insert into $stNomeTabela (campo, valor, parametrosPL, tipo, ordem) values('stEntidade', '$str7', 'true', 'varchar', 6 );"; -$insert .= "insert into $stNomeTabela (campo, valor, parametrosPL, tipo, ordem) values('stSituacao', '$str4', 'true', 'varchar', 1 );"; -$insert .= "insert into $stNomeTabela (campo, valor, parametrosPL, tipo, ordem) values('stTipoFiltro', '$str5', 'true', 'varchar', 2 );"; -$insert .= "insert into $stNomeTabela (campo, valor, parametrosPL, tipo, ordem) values('stCodigos', '$stCodigos', 'true', 'varchar', 3 );"; -$insert .= "insert into $stNomeTabela (campo, valor, parametrosPL, tipo, ordem) values('stCodEventosValor', '$stCodEventosValor', 'true', 'varchar', 12 );"; -$insert .= "insert into $stNomeTabela (campo, valor, parametrosPL, tipo, ordem) values('stCodEventosQte', '$stCodEventosQte', 'true', 'varchar', 11 );"; -$insert .= "insert into $stNomeTabela (campo, valor, parametrosPL, tipo, ordem) values('inCodAtributo', '$inCodAtributo', 'true', 'integer', 4 );"; -$insert .= "insert into $stNomeTabela (campo, valor, parametrosPL, tipo, ordem) values('boArray', '$boArray', 'true', 'boolean', 5 );"; -$insert .= "insert into $stNomeTabela (campo, valor, parametrosPL, tipo, ordem) values('stCodAtributos', '$stCodAtributos', 'true', 'varchar', 7 );"; +$insert .= "insert into $stNomeTabela (campo, valor, parametrosPL, tipo, ordem) values('inCodPeriodoMovimentacao', '$inCodPeriodoMovimentacao', 'true', 'integer', 9 );\n"; +$insert .= "insert into $stNomeTabela (campo, valor, parametrosPL, tipo, ordem) values('stEntidade', '$str7', 'true', 'varchar', 6 );\n"; +$insert .= "insert into $stNomeTabela (campo, valor, parametrosPL, tipo, ordem) values('stSituacao', '$str4', 'true', 'varchar', 1 );\n"; +$insert .= "insert into $stNomeTabela (campo, valor, parametrosPL, tipo, ordem) values('stTipoFiltro', '$str5', 'true', 'varchar', 2 );\n"; +$insert .= "insert into $stNomeTabela (campo, valor, parametrosPL, tipo, ordem) values('stCodigos', '$stCodigos', 'true', 'varchar', 3 );\n"; +$insert .= "insert into $stNomeTabela (campo, valor, parametrosPL, tipo, ordem) values('stCodEventosValor', '$stCodEventosValor', 'true', 'varchar', 12 );\n"; +$insert .= "insert into $stNomeTabela (campo, valor, parametrosPL, tipo, ordem) values('stCodEventosQte', '$stCodEventosQte', 'true', 'varchar', 11 );\n"; +$insert .= "insert into $stNomeTabela (campo, valor, parametrosPL, tipo, ordem) values('inCodAtributo', '$inCodAtributo', 'true', 'integer', 4 );\n"; +$insert .= "insert into $stNomeTabela (campo, valor, parametrosPL, tipo, ordem) values('boArray', '$boArray', 'true', 'boolean', 5 );\n"; +$insert .= "insert into $stNomeTabela (campo, valor, parametrosPL, tipo, ordem) values('stCodAtributos', '$stCodAtributos', 'true', 'varchar', 7 );\n"; if ( !$dbCriaTabela->executaSql($insert) ) { $stJs .= "alertaAviso('Erro ao criar tabela temporária','form','aviso','".Sessao::getId()."');"; diff --git a/gestaoRH/fontes/PHP/pessoal/instancias/servidor/FMManterServidor.php b/gestaoRH/fontes/PHP/pessoal/instancias/servidor/FMManterServidor.php index ba2421c..7539930 100755 --- a/gestaoRH/fontes/PHP/pessoal/instancias/servidor/FMManterServidor.php +++ b/gestaoRH/fontes/PHP/pessoal/instancias/servidor/FMManterServidor.php @@ -31,7 +31,7 @@ * Casos de uso: uc-04.04.07 - $Id: FMManterServidor.php 61695 2015-02-26 12:13:37Z franver $ + $Id: FMManterServidor.php 63792 2015-10-13 19:59:22Z jean $ */ include_once '../../../../../../gestaoAdministrativa/fontes/PHP/pacotes/FrameworkHTML.inc.php'; @@ -68,7 +68,7 @@ $inPaginacaoPos = $request->get('pos'); unset($_GET['pg']); unset($_GET['pos']); -//SistemaLegado::executaFramePrincipal("BloqueiaFrames(true,false);"); +SistemaLegado::executaFramePrincipal("BloqueiaFrames(true,false);"); SistemaLegado::BloqueiaFrames(); $obRPessoalServidor = new RPessoalServidor; @@ -181,6 +181,9 @@ if ($stAcao == "incluir" or $stAcao == "alterar_servidor") { $arExcluirTotal[] = $inIndexExcluir; } } + + $stValorPadrao = ""; + $stValorDescPadrao = ""; } $arTemp = array (); foreach ($arAtributos as $inIndex=>$arAtributo) { diff --git a/gestaoRH/fontes/PHP/pessoal/instancias/servidor/PRManterServidor.php b/gestaoRH/fontes/PHP/pessoal/instancias/servidor/PRManterServidor.php index ee2e779..0ebb3c0 100755 --- a/gestaoRH/fontes/PHP/pessoal/instancias/servidor/PRManterServidor.php +++ b/gestaoRH/fontes/PHP/pessoal/instancias/servidor/PRManterServidor.php @@ -170,7 +170,7 @@ switch ($stAcao) { $inContrato = explode("-",$inContratoAutomatico); } else { - $inContrato = explode("-",$_POST[inContrato]); + $inContrato = explode("-",$_POST["inContrato"]); } //Verifica Norma @@ -187,69 +187,69 @@ switch ($stAcao) { $stCodNorma = $rsNorma->getCampo('cod_norma'); } - $obRPessoalServidor->roUltimoContratoServidor->setRegistro ( $inContrato[0] ); - $obRPessoalServidor->roUltimoContratoServidor->setNroCartaoPonto ( $_POST[inCartaoPonto] ); - $obRPessoalServidor->roUltimoContratoServidor->setAtivo ( "true" ); - $obRPessoalServidor->roUltimoContratoServidor->setNomeacao ( $_POST[dtDataNomeacao] ); - $obRPessoalServidor->roUltimoContratoServidor->obRNorma->setCodNorma ( $stCodNorma ); - $obRPessoalServidor->roUltimoContratoServidor->setPosse ( $_POST[dtDataPosse] ); - $obRPessoalServidor->roUltimoContratoServidor->setAdmissao ( $_POST['dtAdmissao'] ); - $obRPessoalServidor->roUltimoContratoServidor->setValidadeExameMedico ( $_POST[dtValidadeExameMedico] ); - $obRPessoalServidor->roUltimoContratoServidor->obRPessoalTipoAdmissao->setCodTipoAdmissao ( $_POST[inCodTipoAdmissao] ); - $obRPessoalServidor->roUltimoContratoServidor->obRPessoalVinculoEmpregaticio->setCodVinculoEmpregaticio( $_POST[inCodVinculoEmpregaticio] ); - $obRPessoalServidor->roUltimoContratoServidor->obRPessoalCategoria->setCodCategoria ( $_POST[inCodCategoria] ); - $obRPessoalServidor->roUltimoContratoServidor->setCodConselho ( $_POST['inCodConselho'] ); - $obRPessoalServidor->roUltimoContratoServidor->setNroConselho ( $_POST['inNumeroConselho'] ); - $obRPessoalServidor->roUltimoContratoServidor->setValidadeConselho ( $_POST['dtDataValidadeConselho'] ); - $obRPessoalServidor->roUltimoContratoServidor->obRPessoalOcorrencia->setCodOcorrencia ( $_POST[stNumClassificacao] ); - $obRPessoalServidor->roUltimoContratoServidor->obRPessoalGradeHorario->setCodGrade ( $_POST['inCodGradeHorario'] ); - $obRPessoalServidor->roUltimoContratoServidor->setVigenciaSalario ( $_POST['dtVigenciaSalario'] ); + $obRPessoalServidor->roUltimoContratoServidor->setRegistro ( $inContrato[0] ); + $obRPessoalServidor->roUltimoContratoServidor->setNroCartaoPonto ( $_POST['inCartaoPonto'] ); + $obRPessoalServidor->roUltimoContratoServidor->setAtivo ( "true" ); + $obRPessoalServidor->roUltimoContratoServidor->setNomeacao ( $_POST['dtDataNomeacao'] ); + $obRPessoalServidor->roUltimoContratoServidor->obRNorma->setCodNorma ( $stCodNorma ); + $obRPessoalServidor->roUltimoContratoServidor->setPosse ( $_POST['dtDataPosse'] ); + $obRPessoalServidor->roUltimoContratoServidor->setAdmissao ( $_POST['dtAdmissao'] ); + $obRPessoalServidor->roUltimoContratoServidor->setValidadeExameMedico ( $_POST['dtValidadeExameMedico'] ); + $obRPessoalServidor->roUltimoContratoServidor->obRPessoalTipoAdmissao->setCodTipoAdmissao ( $_POST['inCodTipoAdmissao'] ); + $obRPessoalServidor->roUltimoContratoServidor->obRPessoalVinculoEmpregaticio->setCodVinculoEmpregaticio ( $_POST['inCodVinculoEmpregaticio'] ); + $obRPessoalServidor->roUltimoContratoServidor->obRPessoalCategoria->setCodCategoria ( $_POST['inCodCategoria'] ); + $obRPessoalServidor->roUltimoContratoServidor->setCodConselho ( $_POST['inCodConselho'] ); + $obRPessoalServidor->roUltimoContratoServidor->setNroConselho ( $_POST['inNumeroConselho'] ); + $obRPessoalServidor->roUltimoContratoServidor->setValidadeConselho ( $_POST['dtDataValidadeConselho'] ); + $obRPessoalServidor->roUltimoContratoServidor->obRPessoalOcorrencia->setCodOcorrencia ( $_POST['stNumClassificacao'] ); + $obRPessoalServidor->roUltimoContratoServidor->obRPessoalGradeHorario->setCodGrade ( $_POST['inCodGradeHorario'] ); + $obRPessoalServidor->roUltimoContratoServidor->setVigenciaSalario ( $_POST['dtVigenciaSalario'] ); //Informações do cargo - $obRPessoalServidor->roUltimoContratoServidor->obRPessoalRegime->setCodRegime ( $_POST[inCodRegime] ); + $obRPessoalServidor->roUltimoContratoServidor->obRPessoalRegime->setCodRegime ( $_POST['inCodRegime'] ); $obRPessoalServidor->roUltimoContratoServidor->obRPessoalCargo->addCargoSubDivisao(); - $obRPessoalServidor->roUltimoContratoServidor->obRPessoalCargo->roUltimoCargoSubDivisao->obRPessoalSubDivisao->setCodSubDivisao( $_POST[inCodSubDivisao]); - $obRPessoalServidor->roUltimoContratoServidor->obRPessoalCargo->setCodCargo ( $_POST[inCodCargo] ); + $obRPessoalServidor->roUltimoContratoServidor->obRPessoalCargo->roUltimoCargoSubDivisao->obRPessoalSubDivisao->setCodSubDivisao( $_POST['inCodSubDivisao']); + $obRPessoalServidor->roUltimoContratoServidor->obRPessoalCargo->setCodCargo ( $_POST['inCodCargo'] ); $obRPessoalServidor->roUltimoContratoServidor->obRPessoalCargo->addEspecialidade(); $obRPessoalServidor->roUltimoContratoServidor->obRPessoalCargo->roUltimoEspecialidade->addEspecialidadeSubDivisao(); - $obRPessoalServidor->roUltimoContratoServidor->obRPessoalCargo->roUltimoEspecialidade->setCodEspecialidade( $_POST[inCodEspecialidadeCargo] ); + $obRPessoalServidor->roUltimoContratoServidor->obRPessoalCargo->roUltimoEspecialidade->setCodEspecialidade( $_POST['inCodEspecialidadeCargo'] ); //Informações da Função - $obRPessoalServidor->roUltimoContratoServidor->obRPessoalRegimeFuncao->setCodRegime ( $_POST[inCodRegimeFuncao] ); - $obRPessoalServidor->roUltimoContratoServidor->obRPessoalCargoFuncao->setCodCargo ( $_POST[inCodFuncao] ); + $obRPessoalServidor->roUltimoContratoServidor->obRPessoalRegimeFuncao->setCodRegime ( $_POST['inCodRegimeFuncao'] ); + $obRPessoalServidor->roUltimoContratoServidor->obRPessoalCargoFuncao->setCodCargo ( $_POST['inCodFuncao'] ); $obRPessoalServidor->roUltimoContratoServidor->obRPessoalCargoFuncao->addEspecialidade(); $obRPessoalServidor->roUltimoContratoServidor->obRPessoalCargoFuncao->roUltimoEspecialidade->addEspecialidadeSubDivisao(); - $obRPessoalServidor->roUltimoContratoServidor->obRPessoalCargoFuncao->roUltimoEspecialidade->setCodEspecialidade( $_POST[inCodEspecialidadeFuncao] ); + $obRPessoalServidor->roUltimoContratoServidor->obRPessoalCargoFuncao->roUltimoEspecialidade->setCodEspecialidade( $_POST['inCodEspecialidadeFuncao'] ); $obRPessoalServidor->roUltimoContratoServidor->obRPessoalCargoFuncao->addCargoSubDivisao(); - $obRPessoalServidor->roUltimoContratoServidor->obRPessoalCargoFuncao->roUltimoCargoSubDivisao->obRPessoalSubDivisao->setCodSubDivisao( $_POST[inCodSubDivisaoFuncao]); + $obRPessoalServidor->roUltimoContratoServidor->obRPessoalCargoFuncao->roUltimoCargoSubDivisao->obRPessoalSubDivisao->setCodSubDivisao( $_POST['inCodSubDivisaoFuncao']); - $obRPessoalServidor->roUltimoContratoServidor->obRMonetarioBancoSalario->setNumBanco ( $_POST[inCodBancoSalario] ); - $obRPessoalServidor->roUltimoContratoServidor->obRMonetarioAgenciaSalario->setCodAgencia ( $_POST[inCodAgenciaSalario] ); + $obRPessoalServidor->roUltimoContratoServidor->obRMonetarioBancoSalario->setNumBanco ( $_POST['inCodBancoSalario'] ); + $obRPessoalServidor->roUltimoContratoServidor->obRMonetarioAgenciaSalario->setCodAgencia ( $_POST['inCodAgenciaSalario'] ); - $obRPessoalServidor->roUltimoContratoServidor->obRMonetarioBancoFGTS->setNumBanco ( $_POST[inCodBancoFGTS] ); - $obRPessoalServidor->roUltimoContratoServidor->obRMonetarioAgenciaFGTS->setCodAgencia ( $_POST[inCodAgenciaFGTS] ); + $obRPessoalServidor->roUltimoContratoServidor->obRMonetarioBancoFGTS->setNumBanco ( $_POST['inCodBancoFGTS'] ); + $obRPessoalServidor->roUltimoContratoServidor->obRMonetarioAgenciaFGTS->setCodAgencia ( $_POST['inCodAgenciaFGTS'] ); $obRPessoalServidor->roUltimoContratoServidor->obRFolhaPagamentoSindicato->obRCGM->setNumCGM( $_POST['inNumCGMSindicato'] ); $obRPessoalServidor->roUltimoContratoServidor->obROrganogramaOrgao->setCodOrgao ( $_POST["hdnUltimoOrgaoSelecionado"] ); - $obRPessoalServidor->roUltimoContratoServidor->obROrganogramaLocal->setCodLocal ( $_POST[inCodLocal] ); - $obRPessoalServidor->roUltimoContratoServidor->obRPessoalFormaPagamento->setCodFormaPagamento ( $_POST[inCodFormaPagamento] ); - $obRPessoalServidor->roUltimoContratoServidor->obRPessoalTipoPagamento->setCodTipoPagamento ( $_POST[inCodTipoPagamento] ); - $obRPessoalServidor->roUltimoContratoServidor->obRPessoalTipoSalario->setCodTipoSalario ( $_POST[inCodTipoSalario] ); - $obRPessoalServidor->roUltimoContratoServidor->setDataBase ( $_POST[dtDataBase] ); - $obRPessoalServidor->roUltimoContratoServidor->setOpcaoFgts ( $_POST[dtDataFGTS] ); - $obRPessoalServidor->roUltimoContratoServidor->setContaCorrenteFgts ( $_POST[inContaCreditoFGTS] ); - $obRPessoalServidor->roUltimoContratoServidor->obRPessoalCargo->obRFolhaPagamentoPadrao->setCodPadrao( $_POST[inCodPadrao]); + $obRPessoalServidor->roUltimoContratoServidor->obROrganogramaLocal->setCodLocal ( $_POST['inCodLocal'] ); + $obRPessoalServidor->roUltimoContratoServidor->obRPessoalFormaPagamento->setCodFormaPagamento ( $_POST['inCodFormaPagamento'] ); + $obRPessoalServidor->roUltimoContratoServidor->obRPessoalTipoPagamento->setCodTipoPagamento ( $_POST['inCodTipoPagamento'] ); + $obRPessoalServidor->roUltimoContratoServidor->obRPessoalTipoSalario->setCodTipoSalario ( $_POST['inCodTipoSalario'] ); + $obRPessoalServidor->roUltimoContratoServidor->setDataBase ( $_POST['dtDataBase'] ); + $obRPessoalServidor->roUltimoContratoServidor->setOpcaoFgts ( $_POST['dtDataFGTS'] ); + $obRPessoalServidor->roUltimoContratoServidor->setContaCorrenteFgts ( $_POST['inContaCreditoFGTS'] ); + $obRPessoalServidor->roUltimoContratoServidor->obRPessoalCargo->obRFolhaPagamentoPadrao->setCodPadrao( $_POST['inCodPadrao']); $obRPessoalServidor->roUltimoContratoServidor->obRPessoalCargo->obRFolhaPagamentoPadrao->addNivelPadrao(); - $obRPessoalServidor->roUltimoContratoServidor->obRPessoalCargo->obRFolhaPagamentoPadrao->roUltimoNivelPadrao->setCodNivelPadrao( $_POST[inCodProgressao] ); - $obRPessoalServidor->roUltimoContratoServidor->setSalario ( $_POST[inSalario] ); - $obRPessoalServidor->roUltimoContratoServidor->setHrMensal ( $_POST[stHorasMensais] ); - $obRPessoalServidor->roUltimoContratoServidor->setHrSemanal ( $_POST[stHorasSemanais] ); - $obRPessoalServidor->roUltimoContratoServidor->setInicioProgressao ( $_POST[dtDataProgressao] ); - $obRPessoalServidor->roUltimoContratoServidor->setContaCorrenteSalario ( $_POST[inContaSalario] ); - $obRPessoalServidor->roUltimoContratoServidor->setAdiantamento ( $_POST[boAdiantamento] ); - $obRPessoalServidor->roUltimoContratoServidor->setAdiantamento ( $_POST[boAdiantamento] ); + $obRPessoalServidor->roUltimoContratoServidor->obRPessoalCargo->obRFolhaPagamentoPadrao->roUltimoNivelPadrao->setCodNivelPadrao( $_POST['inCodProgressao'] ); + $obRPessoalServidor->roUltimoContratoServidor->setSalario ( $_POST['inSalario'] ); + $obRPessoalServidor->roUltimoContratoServidor->setHrMensal ( $_POST['stHorasMensais'] ); + $obRPessoalServidor->roUltimoContratoServidor->setHrSemanal ( $_POST['stHorasSemanais'] ); + $obRPessoalServidor->roUltimoContratoServidor->setInicioProgressao ( $_POST['dtDataProgressao'] ); + $obRPessoalServidor->roUltimoContratoServidor->setContaCorrenteSalario ( $_POST['inContaSalario'] ); + $obRPessoalServidor->roUltimoContratoServidor->setAdiantamento ( $_POST['boAdiantamento'] ); + $obRPessoalServidor->roUltimoContratoServidor->setAdiantamento ( $_POST['boAdiantamento'] ); //dados aba dependente $arDependentes = Sessao::read('DEPENDENTE'); @@ -334,36 +334,36 @@ switch ($stAcao) { } } - $obRPessoalServidor->setCodServidor ( $_REQUEST['inCodServidor']); - $obRPessoalServidor->setCodUF ( $_POST['inCodUF']); - $obRPessoalServidor->setCodMunicipio ( $_POST['inCodMunicipio'] ); - $obRPessoalServidor->setCodEstadoCivil ( $_POST['inCodEstadoCivil']); - $obRPessoalServidor->setCodRais ( $_POST['inCodRaca']); - $obRPessoalServidor->recuperaTodosRaca( $rsRaca ); - $obRPessoalServidor->setCodRaca ( $rsRaca->getCampo('cod_raca') ); - $obRPessoalServidor->obRPessoalCID->setCodCID ( $_POST['inCodCID']); - $obRPessoalServidor->setCodEdital ( '0' ); - $obRPessoalServidor->obRCGMPessoaFisica->setNumCGM ( $_POST['inNumCGM'] ); - $obRPessoalServidor->obRCGMPessoaFisica->setCPF ( $_POST['stCPF'] ); - $obRPessoalServidor->setNomePai ( $_POST['stNomePai'] ); - $obRPessoalServidor->setNomeMae ( $_POST['stNomeMae'] ); - $obRPessoalServidor->obRCGMPessoaFisicaConjuge->setNumCgm( $_POST['inCGMConjuge'] ); - $obRPessoalServidor->setDataNascimento ( $_POST['stDataNascimento'] ); - $obRPessoalServidor->setDataLaudo ( $_POST['dtDataLaudo'] ); + $obRPessoalServidor->setCodServidor ( $_REQUEST['inCodServidor']); + $obRPessoalServidor->setCodUF ( $_POST['inCodUF']); + $obRPessoalServidor->setCodMunicipio ( $_POST['inCodMunicipio'] ); + $obRPessoalServidor->setCodEstadoCivil ( $_POST['inCodEstadoCivil']); + $obRPessoalServidor->setCodRais ( $_POST['inCodRaca']); + $obRPessoalServidor->recuperaTodosRaca ( $rsRaca, $boTransacao ); + $obRPessoalServidor->setCodRaca ( $rsRaca->getCampo('cod_raca') ); + $obRPessoalServidor->obRPessoalCID->setCodCID ( $_POST['inCodCID']); + $obRPessoalServidor->setCodEdital ( '0' ); + $obRPessoalServidor->obRCGMPessoaFisica->setNumCGM ( $_POST['inNumCGM'] ); + $obRPessoalServidor->obRCGMPessoaFisica->setCPF ( $_POST['stCPF'] ); + $obRPessoalServidor->setNomePai ( $_POST['stNomePai'] ); + $obRPessoalServidor->setNomeMae ( $_POST['stNomeMae'] ); + $obRPessoalServidor->obRCGMPessoaFisicaConjuge->setNumCgm ( $_POST['inCGMConjuge'] ); + $obRPessoalServidor->setDataNascimento ( $_POST['stDataNascimento'] ); + $obRPessoalServidor->setDataLaudo ( $_POST['dtDataLaudo'] ); //dados aba documentacao if (!$obErro->ocorreu() && isset($_POST['stPisPasep']) && !checkPIS($_POST['stPisPasep'], false)) { $obErro->setDescricao("Campo PIS/PASEP da guia Documentação é inválido(".$_POST['stPisPasep'].")."); } - $obRPessoalServidor->setPisPasep ( $_POST['stPisPasep'] ); - $obRPessoalServidor->setDataPisPasep ( $_POST['dtCadastroPis'] ); - $obRPessoalServidor->setCarteiraReservista ( $_POST['stCertificadoReservista'] ); - $obRPessoalServidor->setCategoriaReservista ( $_POST['inCategoriaCertificado'] ); - $obRPessoalServidor->setOrigemReservista ( $_POST['inOrgaoExpedidorCertificado'] ); - $obRPessoalServidor->setNrTituloEleitor ( $_POST['inTituloEleitor'] ); - $obRPessoalServidor->setZonaTitulo ( $_POST['inZonaTitulo'] ); - $obRPessoalServidor->setSecaoTitulo ( $_POST['inSecaoTitulo'] ); - $obRPessoalServidor->setCaminhoFoto ( $nome_foto ); + $obRPessoalServidor->setPisPasep ( $_POST['stPisPasep'] ); + $obRPessoalServidor->setDataPisPasep ( $_POST['dtCadastroPis'] ); + $obRPessoalServidor->setCarteiraReservista ( $_POST['stCertificadoReservista'] ); + $obRPessoalServidor->setCategoriaReservista ( $_POST['inCategoriaCertificado'] ); + $obRPessoalServidor->setOrigemReservista ( $_POST['inOrgaoExpedidorCertificado'] ); + $obRPessoalServidor->setNrTituloEleitor ( $_POST['inTituloEleitor'] ); + $obRPessoalServidor->setZonaTitulo ( $_POST['inZonaTitulo'] ); + $obRPessoalServidor->setSecaoTitulo ( $_POST['inSecaoTitulo'] ); + $obRPessoalServidor->setCaminhoFoto ( $nome_foto ); $arrCTPS = Sessao::read('CTPS'); if (is_array($arrCTPS) ) { @@ -414,18 +414,19 @@ switch ($stAcao) { if ( !$obErro->ocorreu() ) { //dados aba contrato $obRPessoalServidor->addContratoServidor(); - $obRPessoalServidor->roUltimoContratoServidor->setCodContrato ( $_REQUEST["inCodContrato"] ); - $obRPessoalServidor->roUltimoContratoServidor->setAlteracaoFuncao ( $dtDataAlteracaoFuncao ); - $obRPessoalServidor->roUltimoContratoServidor->obRMonetarioBancoSalario->setNumBanco ( $_POST[inCodBancoSalario] ); - $obRPessoalServidor->roUltimoContratoServidor->obRMonetarioAgenciaSalario->setCodAgencia ( $_POST[inCodAgenciaSalario] ); - $obRPessoalServidor->roUltimoContratoServidor->obRPessoalVinculoEmpregaticio->setCodVinculoEmpregaticio( $_POST[inCodVinculoEmpregaticio] ); - $obRPessoalServidor->roUltimoContratoServidor->obRMonetarioBancoFGTS->setNumBanco ( $_POST[inCodBancoFGTS] ); - $obRPessoalServidor->roUltimoContratoServidor->obRMonetarioAgenciaFGTS->setCodAgencia ( $_POST[inCodAgenciaFGTS] ); - $obRPessoalServidor->roUltimoContratoServidor->obRFolhaPagamentoSindicato->obRCGM->setNumCGM( $_POST['inNumCGMSindicato'] ); - $obRPessoalServidor->roUltimoContratoServidor->obRPessoalOcorrencia->setCodOcorrencia ( $_POST[stNumClassificacao] ); - $obRPessoalServidor->roUltimoContratoServidor->setCodConselho ( $_POST['inCodConselho'] ); - $obRPessoalServidor->roUltimoContratoServidor->setNroConselho ( $_POST['inNumeroConselho'] ); - $obRPessoalServidor->roUltimoContratoServidor->setValidadeConselho ( $_POST['dtDataValidadeConselho'] ); + $obRPessoalServidor->roUltimoContratoServidor->setCodContrato ( $_REQUEST["inCodContrato"] ); + $obRPessoalServidor->roUltimoContratoServidor->setAlteracaoFuncao ( $dtDataAlteracaoFuncao ); + $obRPessoalServidor->roUltimoContratoServidor->obRMonetarioBancoSalario->setNumBanco ( $_POST['inCodBancoSalario'] ); + $obRPessoalServidor->roUltimoContratoServidor->obRMonetarioAgenciaSalario->setCodAgencia ( $_POST['inCodAgenciaSalario'] ); + $obRPessoalServidor->roUltimoContratoServidor->obRPessoalVinculoEmpregaticio->setCodVinculoEmpregaticio ( $_POST['inCodVinculoEmpregaticio'] ); + $obRPessoalServidor->roUltimoContratoServidor->obRMonetarioBancoFGTS->setNumBanco ( $_POST['inCodBancoFGTS'] ); + $obRPessoalServidor->roUltimoContratoServidor->obRMonetarioAgenciaFGTS->setCodAgencia ( $_POST['inCodAgenciaFGTS'] ); + $obRPessoalServidor->roUltimoContratoServidor->obRFolhaPagamentoSindicato->obRCGM->setNumCGM ( $_POST['inNumCGMSindicato'] ); + $obRPessoalServidor->roUltimoContratoServidor->obRPessoalOcorrencia->setCodOcorrencia ( $_POST['stNumClassificacao'] ); + $obRPessoalServidor->roUltimoContratoServidor->setCodConselho ( $_POST['inCodConselho'] ); + $obRPessoalServidor->roUltimoContratoServidor->setNroConselho ( $_POST['inNumeroConselho'] ); + $obRPessoalServidor->roUltimoContratoServidor->setValidadeConselho ( $_POST['dtDataValidadeConselho'] ); + if ($_POST["inCodCargo"]) { $inCodCargoTMP = $_POST['inCodCargo']; } else { @@ -435,29 +436,30 @@ switch ($stAcao) { $obRPessoalServidor->roUltimoContratoServidor->obRPessoalCargo->addEspecialidade(); $obRPessoalServidor->roUltimoContratoServidor->obRPessoalCargo->roUltimoEspecialidade->addEspecialidadeSubDivisao(); - $obRPessoalServidor->roUltimoContratoServidor->obRPessoalCargo->roUltimoEspecialidade->setCodEspecialidade( $_POST[inCodEspecialidadeCargo] ); + $obRPessoalServidor->roUltimoContratoServidor->obRPessoalCargo->roUltimoEspecialidade->setCodEspecialidade( $_POST['inCodEspecialidadeCargo'] ); $obRPessoalServidor->roUltimoContratoServidor->obRPessoalCargo->addCargoSubDivisao(); - if ($_POST[inHdnCodSubDivisao] != "") { - $inCodSubDivisao = $_POST[inHdnCodSubDivisao]; + + if ($_POST['inHdnCodSubDivisao'] != "") { + $inCodSubDivisao = $_POST['inHdnCodSubDivisao']; } else { - $inCodSubDivisao = $_POST[inCodSubDivisao]; + $inCodSubDivisao = $_POST['inCodSubDivisao']; } $obRPessoalServidor->roUltimoContratoServidor->obRPessoalCargo->roUltimoCargoSubDivisao->obRPessoalSubDivisao->setCodSubDivisao( $inCodSubDivisao ); $obRPessoalServidor->roUltimoContratoServidor->obRPessoalCargo->setBuscarCargosNormasVencidas(false); - $obRPessoalServidor->roUltimoContratoServidor->obRPessoalCargo->listarCargosPorSubDivisaoServidor($rsCargo); + $obRPessoalServidor->roUltimoContratoServidor->obRPessoalCargo->listarCargosPorSubDivisaoServidor($rsCargo, $boTransacao); if ($rsCargo->getNumLinhas() < 1) { sistemaLegado::exibeAviso('Cargo Inválido. Norma não está mais em vigor.', 'n_alterar', 'erro'); exit; } - $obRPessoalServidor->roUltimoContratoServidor->obRPessoalRegimeFuncao->setCodRegime ( $_POST[inCodRegimeFuncao] ); - $obRPessoalServidor->roUltimoContratoServidor->obRPessoalCargoFuncao->setCodCargo ( $_POST[inCodFuncao] ); + $obRPessoalServidor->roUltimoContratoServidor->obRPessoalRegimeFuncao->setCodRegime ( $_POST['inCodRegimeFuncao'] ); + $obRPessoalServidor->roUltimoContratoServidor->obRPessoalCargoFuncao->setCodCargo ( $_POST['inCodFuncao'] ); $obRPessoalServidor->roUltimoContratoServidor->obRPessoalCargo->setCodCargo($_POST['inCodFuncao']); $obRPessoalServidor->roUltimoContratoServidor->obRPessoalCargo->setBuscarCargosNormasVencidas(false); - $obRPessoalServidor->roUltimoContratoServidor->obRPessoalCargo->listarCargosPorSubDivisaoServidor($rsFuncao); + $obRPessoalServidor->roUltimoContratoServidor->obRPessoalCargo->listarCargosPorSubDivisaoServidor($rsFuncao, $boTransacao); if ($rsFuncao->getNumLinhas() < 1) { sistemaLegado::exibeAviso('Função Inválida. Norma não está mais em vigor.', 'n_alterar', 'erro'); @@ -468,15 +470,16 @@ switch ($stAcao) { $obRPessoalServidor->roUltimoContratoServidor->obRPessoalCargoFuncao->addEspecialidade(); $obRPessoalServidor->roUltimoContratoServidor->obRPessoalCargoFuncao->roUltimoEspecialidade->addEspecialidadeSubDivisao(); - $obRPessoalServidor->roUltimoContratoServidor->obRPessoalCargoFuncao->roUltimoEspecialidade->setCodEspecialidade( $_POST[inCodEspecialidadeFuncao] ); + $obRPessoalServidor->roUltimoContratoServidor->obRPessoalCargoFuncao->roUltimoEspecialidade->setCodEspecialidade( $_POST['inCodEspecialidadeFuncao'] ); $obRPessoalServidor->roUltimoContratoServidor->obRPessoalCargoFuncao->addCargoSubDivisao(); - $obRPessoalServidor->roUltimoContratoServidor->obRPessoalCargoFuncao->roUltimoCargoSubDivisao->obRPessoalSubDivisao->setCodSubDivisao( $_POST[inCodSubDivisaoFuncao]); - if ($_POST[inHdnCodRegime] != "") { - $inCodRegime = $_POST[inHdnCodRegime]; + $obRPessoalServidor->roUltimoContratoServidor->obRPessoalCargoFuncao->roUltimoCargoSubDivisao->obRPessoalSubDivisao->setCodSubDivisao( $_POST['inCodSubDivisaoFuncao']); + + if ($_POST['inHdnCodRegime'] != "") { + $inCodRegime = $_POST['inHdnCodRegime']; } else { - $inCodRegime = $_POST[inCodRegime]; + $inCodRegime = $_POST['inCodRegime']; } - $obRPessoalServidor->roUltimoContratoServidor->obRPessoalRegime->setCodRegime ( $inCodRegime ); + $obRPessoalServidor->roUltimoContratoServidor->obRPessoalRegime->setCodRegime ( $inCodRegime ); //Verifica Norma $arCodNorma = explode("/",$_POST['stCodNorma']); @@ -488,39 +491,39 @@ switch ($stAcao) { $obRNorma = new RNorma(); $obRNorma->setNumNorma( $stNumNorma ); $obRNorma->setExercicio( $arCodNorma[1] ); - $obRNorma->listar($rsNorma); + $obRNorma->listar($rsNorma, $boTransacao); $stCodNorma = $rsNorma->getCampo('cod_norma'); } - $obRPessoalServidor->roUltimoContratoServidor->obROrganogramaOrgao->setCodOrgao ( $_POST["hdnUltimoOrgaoSelecionado"] ); - $obRPessoalServidor->roUltimoContratoServidor->obROrganogramaLocal->setCodLocal ( $_POST[inCodLocal] ); - $obRPessoalServidor->roUltimoContratoServidor->obRNorma->setCodNorma ( $stCodNorma ); - $obRPessoalServidor->roUltimoContratoServidor->obRPessoalTipoAdmissao->setCodTipoAdmissao ( $_POST[inCodTipoAdmissao] ); - $obRPessoalServidor->roUltimoContratoServidor->obRPessoalFormaPagamento->setCodFormaPagamento ( $_POST[inCodFormaPagamento] ); - $obRPessoalServidor->roUltimoContratoServidor->obRPessoalTipoPagamento->setCodTipoPagamento ( $_POST[inCodTipoPagamento] ); - $obRPessoalServidor->roUltimoContratoServidor->obRPessoalTipoSalario->setCodTipoSalario ( $_POST[inCodTipoSalario] ); - $obRPessoalServidor->roUltimoContratoServidor->setRegistro ( $_POST[inContrato] ); - $obRPessoalServidor->roUltimoContratoServidor->setNroCartaoPonto ( $_POST[inCartaoPonto] ); - $obRPessoalServidor->roUltimoContratoServidor->setAtivo ( ( $_POST['stSituacao'] == 1 ) ? true : false ); - $obRPessoalServidor->roUltimoContratoServidor->setNomeacao ( $_POST[dtDataNomeacao] ); - $obRPessoalServidor->roUltimoContratoServidor->setPosse ( $_POST[dtDataPosse] ); - $obRPessoalServidor->roUltimoContratoServidor->setAdmissao ( $_POST[dtAdmissao] ); - $obRPessoalServidor->roUltimoContratoServidor->setDataBase ( $_POST[dtDataBase] ); - $obRPessoalServidor->roUltimoContratoServidor->setValidadeExameMedico ( $_POST[dtValidadeExameMedico] ); - $obRPessoalServidor->roUltimoContratoServidor->setOpcaoFgts ( $_POST[dtDataFGTS] ); - $obRPessoalServidor->roUltimoContratoServidor->setContaCorrenteFgts ( $_POST[inContaCreditoFGTS] ); - $obRPessoalServidor->roUltimoContratoServidor->obRPessoalCargo->obRFolhaPagamentoPadrao->setCodPadrao( $_POST[inCodPadrao]); + $obRPessoalServidor->roUltimoContratoServidor->obROrganogramaOrgao->setCodOrgao ( $_POST["hdnUltimoOrgaoSelecionado"] ); + $obRPessoalServidor->roUltimoContratoServidor->obROrganogramaLocal->setCodLocal ( $_POST['inCodLocal'] ); + $obRPessoalServidor->roUltimoContratoServidor->obRNorma->setCodNorma ( $stCodNorma ); + $obRPessoalServidor->roUltimoContratoServidor->obRPessoalTipoAdmissao->setCodTipoAdmissao ( $_POST['inCodTipoAdmissao'] ); + $obRPessoalServidor->roUltimoContratoServidor->obRPessoalFormaPagamento->setCodFormaPagamento ( $_POST['inCodFormaPagamento'] ); + $obRPessoalServidor->roUltimoContratoServidor->obRPessoalTipoPagamento->setCodTipoPagamento ( $_POST['inCodTipoPagamento'] ); + $obRPessoalServidor->roUltimoContratoServidor->obRPessoalTipoSalario->setCodTipoSalario ( $_POST['inCodTipoSalario'] ); + $obRPessoalServidor->roUltimoContratoServidor->setRegistro ( $_POST['inContrato'] ); + $obRPessoalServidor->roUltimoContratoServidor->setNroCartaoPonto ( $_POST['inCartaoPonto'] ); + $obRPessoalServidor->roUltimoContratoServidor->setAtivo ( ( $_POST['stSituacao'] == 1 ) ? true : false ); + $obRPessoalServidor->roUltimoContratoServidor->setNomeacao ( $_POST['dtDataNomeacao'] ); + $obRPessoalServidor->roUltimoContratoServidor->setPosse ( $_POST['dtDataPosse'] ); + $obRPessoalServidor->roUltimoContratoServidor->setAdmissao ( $_POST['dtAdmissao'] ); + $obRPessoalServidor->roUltimoContratoServidor->setDataBase ( $_POST['dtDataBase'] ); + $obRPessoalServidor->roUltimoContratoServidor->setValidadeExameMedico ( $_POST['dtValidadeExameMedico'] ); + $obRPessoalServidor->roUltimoContratoServidor->setOpcaoFgts ( $_POST['dtDataFGTS'] ); + $obRPessoalServidor->roUltimoContratoServidor->setContaCorrenteFgts ( $_POST['inContaCreditoFGTS'] ); + $obRPessoalServidor->roUltimoContratoServidor->obRPessoalCargo->obRFolhaPagamentoPadrao->setCodPadrao ( $_POST['inCodPadrao'] ); $obRPessoalServidor->roUltimoContratoServidor->obRPessoalCargo->obRFolhaPagamentoPadrao->addNivelPadrao(); - $obRPessoalServidor->roUltimoContratoServidor->obRPessoalCargo->obRFolhaPagamentoPadrao->roUltimoNivelPadrao->setCodNivelPadrao( $_POST[inCodProgressao] ); - $obRPessoalServidor->roUltimoContratoServidor->setSalario ( $_POST[inSalario] ); - $obRPessoalServidor->roUltimoContratoServidor->setHrMensal ( $_POST[stHorasMensais] ); - $obRPessoalServidor->roUltimoContratoServidor->setHrSemanal ( $_POST[stHorasSemanais] ); - $obRPessoalServidor->roUltimoContratoServidor->setInicioProgressao ( $_POST[dtDataProgressao] ); - $obRPessoalServidor->roUltimoContratoServidor->setContaCorrenteSalario ( $_POST[inContaSalario] ); - $obRPessoalServidor->roUltimoContratoServidor->setAdiantamento ( $_POST[boAdiantamento] ); - $obRPessoalServidor->roUltimoContratoServidor->obRPessoalCategoria->setCodCategoria ( $_POST[inCodCategoria] ); - $obRPessoalServidor->roUltimoContratoServidor->obRPessoalGradeHorario->setCodGrade ( $_POST['inCodGradeHorario'] ); - $obRPessoalServidor->roUltimoContratoServidor->setVigenciaSalario ( $_POST['dtVigenciaSalario'] ); + $obRPessoalServidor->roUltimoContratoServidor->obRPessoalCargo->obRFolhaPagamentoPadrao->roUltimoNivelPadrao->setCodNivelPadrao ( $_POST['inCodProgressao'] ); + $obRPessoalServidor->roUltimoContratoServidor->setSalario ( $_POST['inSalario'] ); + $obRPessoalServidor->roUltimoContratoServidor->setHrMensal ( $_POST['stHorasMensais'] ); + $obRPessoalServidor->roUltimoContratoServidor->setHrSemanal ( $_POST['stHorasSemanais'] ); + $obRPessoalServidor->roUltimoContratoServidor->setInicioProgressao ( $_POST['dtDataProgressao'] ); + $obRPessoalServidor->roUltimoContratoServidor->setContaCorrenteSalario ( $_POST['inContaSalario'] ); + $obRPessoalServidor->roUltimoContratoServidor->setAdiantamento ( $_POST['boAdiantamento'] ); + $obRPessoalServidor->roUltimoContratoServidor->obRPessoalCategoria->setCodCategoria ( $_POST['inCodCategoria'] ); + $obRPessoalServidor->roUltimoContratoServidor->obRPessoalGradeHorario->setCodGrade ( $_POST['inCodGradeHorario'] ); + $obRPessoalServidor->roUltimoContratoServidor->setVigenciaSalario ( $_POST['dtVigenciaSalario'] ); //dados aba dependente $arDependentes = Sessao::read('DEPENDENTE'); @@ -528,18 +531,18 @@ switch ($stAcao) { for ($inCount=0; $inCountaddRPessoalDependente(); - $obRPessoalServidor->roRPessoalDependente->setCodDependente ( $arDependente['inCodDependente'] ); - $obRPessoalServidor->roRPessoalDependente->obRCGMPessoaFisica->setNumCgm( $arDependente['inCGMDependente'] ); - $obRPessoalServidor->roRPessoalDependente->setCodGrau ( $arDependente['stGrauParentesco'] ); - $obRPessoalServidor->roRPessoalDependente->setDependenteInvalido ( ($arDependente['boFilhoEquiparado'] == 't') ? true : false ); - $obRPessoalServidor->roRPessoalDependente->setCarteiraVacinacao ( ($arDependente['boCarteiraVacinacao'] == 't') ? true : false ); - $obRPessoalServidor->roRPessoalDependente->setComprovanteMatricula ( ($arDependente['boComprovanteMatricula'] == 't') ? true : false ); - $obRPessoalServidor->roRPessoalDependente->setDependentePrev ( ($arDependente['boDependentePrev'] == 't') ? true : false ); - - $obRPessoalServidor->roRPessoalDependente->setCodVinculo ( $arDependente['inCodDependenteIR'] ); - $obRPessoalServidor->roRPessoalDependente->setDataInicioSalarioFamilia ( $arDependente['dtInicioSalarioFamilia'] ); - $obRPessoalServidor->roRPessoalDependente->setDependenteSalarioFamilia ( ($arDependente['boDependenteSalarioFamilia'] == 't') ? true : false ); - $obRPessoalServidor->roRPessoalDependente->obRPessoalCID->setCodCid ( $arDependente['inCodCIDDependente'] ); + $obRPessoalServidor->roRPessoalDependente->setCodDependente ( $arDependente['inCodDependente'] ); + $obRPessoalServidor->roRPessoalDependente->obRCGMPessoaFisica->setNumCgm ( $arDependente['inCGMDependente'] ); + $obRPessoalServidor->roRPessoalDependente->setCodGrau ( $arDependente['stGrauParentesco'] ); + $obRPessoalServidor->roRPessoalDependente->setDependenteInvalido ( ($arDependente['boFilhoEquiparado'] == 't') ? true : false ); + $obRPessoalServidor->roRPessoalDependente->setCarteiraVacinacao ( ($arDependente['boCarteiraVacinacao'] == 't') ? true : false ); + $obRPessoalServidor->roRPessoalDependente->setComprovanteMatricula ( ($arDependente['boComprovanteMatricula'] == 't') ? true : false ); + $obRPessoalServidor->roRPessoalDependente->setDependentePrev ( ($arDependente['boDependentePrev'] == 't') ? true : false ); + + $obRPessoalServidor->roRPessoalDependente->setCodVinculo ( $arDependente['inCodDependenteIR'] ); + $obRPessoalServidor->roRPessoalDependente->setDataInicioSalarioFamilia ( $arDependente['dtInicioSalarioFamilia'] ); + $obRPessoalServidor->roRPessoalDependente->setDependenteSalarioFamilia ( ($arDependente['boDependenteSalarioFamilia'] == 't') ? true : false ); + $obRPessoalServidor->roRPessoalDependente->obRPessoalCID->setCodCid ( $arDependente['inCodCIDDependente'] ); if ($arDependente['boincluirDataNascimentoDespendente']) { $obRPessoalServidor->roRPessoalDependente->obRCGMPessoaFisica->setDataNascimento( $arDependente['stDataNascimentoDependente'] ); @@ -549,36 +552,34 @@ switch ($stAcao) { for ($inCounter=0; $inCounterroRPessoalDependente->addRPessoalCarteiraVacinacao(); - $obRPessoalServidor->roRPessoalDependente->roRPessoalCarteiraVacinacao->setDataApresentacao( $arVacinacao['dtApresentacaoCarteiraVacinacao'] ); - $obRPessoalServidor->roRPessoalDependente->roRPessoalCarteiraVacinacao->setApresentada ( $arVacinacao['boApresentadaVacinacao'] ); + $obRPessoalServidor->roRPessoalDependente->roRPessoalCarteiraVacinacao->setDataApresentacao ( $arVacinacao['dtApresentacaoCarteiraVacinacao'] ); + $obRPessoalServidor->roRPessoalDependente->roRPessoalCarteiraVacinacao->setApresentada ( $arVacinacao['boApresentadaVacinacao'] ); } $arMatriculas = $arDependente['MATRICULA']; for ($inCounter=0; $inCounterroRPessoalDependente->addRPessoalComprovanteMatricula(); - $obRPessoalServidor->roRPessoalDependente->roRPessoalComprovanteMatricula->setDataApresentacao( $arMatricula['dtApresentacaoComprovanteMatricula']); - $obRPessoalServidor->roRPessoalDependente->roRPessoalComprovanteMatricula->setApresentada ( $arMatricula['boApresentadaMatricula']); + $obRPessoalServidor->roRPessoalDependente->roRPessoalComprovanteMatricula->setDataApresentacao ( $arMatricula['dtApresentacaoComprovanteMatricula']); + $obRPessoalServidor->roRPessoalDependente->roRPessoalComprovanteMatricula->setApresentada ( $arMatricula['boApresentadaMatricula']); } } } + //monta array de atributos dinamicos foreach ($arChave as $key => $value) { $arChaves = preg_split( "/[^a-zA-Z0-9]/" , $key ); $inCodAtributo = $arChaves[0]; if ( is_array($value) ) { - - foreach ($value as $inCodValor) { - $obRPessoalServidor->roUltimoContratoServidor->obRCadastroDinamico->addAtributosDinamicos( $inCodAtributo , $inCodValor ); - } + $Newvalue = implode(",",$value); + $obRPessoalServidor->roUltimoContratoServidor->obRCadastroDinamico->addAtributosDinamicos( $inCodAtributo , $Newvalue ); } else { - $obRPessoalServidor->roUltimoContratoServidor->obRCadastroDinamico->addAtributosDinamicos( $inCodAtributo , $value ); } } - $obErro = $obRPessoalServidor->alterarServidor(); + $obErro = $obRPessoalServidor->alterarServidor($boTransacao); } if ( !$obErro->ocorreu() ) @@ -587,7 +588,6 @@ switch ($stAcao) { // pra onde o sistema deve retornar se ela estiver vazia o sistema retorno para // a listagem de servidores sistemaLegado::alertaAviso($_POST['actVoltar'] . '?inNumCGM='.$_POST['inNumCGM'].'&inContrato='. $obRPessoalServidor->roUltimoContratoServidor->getRegistro(), "Matrícula: ".$_REQUEST['inContratoAlterar']." - ".$rsCGM->getCampo("nom_cgm"),"incluir","aviso", Sessao::getId(), "../"); - } else { sistemaLegado::alertaAviso($pgList .'&inContrato='. $obRPessoalServidor->roUltimoContratoServidor->getRegistro(), "Matrícula: ".$_REQUEST['inContratoAlterar']." - ".$rsCGM->getCampo("nom_cgm"),"alterar","aviso", Sessao::getId(), "../"); } else diff --git a/gestaoRH/fontes/PHP/pessoal/popups/cargo/PRInserirCBO.php b/gestaoRH/fontes/PHP/pessoal/popups/cargo/PRInserirCBO.php index f3f37cb..d4428ca 100644 --- a/gestaoRH/fontes/PHP/pessoal/popups/cargo/PRInserirCBO.php +++ b/gestaoRH/fontes/PHP/pessoal/popups/cargo/PRInserirCBO.php @@ -27,11 +27,12 @@ * Arquivo instância para popup para inserir CBO * Data de Criação: 13/06/2013 * @author Desenvolvedor: Evandro Melos +* $Id: PRInserirCBO.php 63966 2015-11-11 20:22:59Z michel $ */ include_once '../../../../../../gestaoAdministrativa/fontes/PHP/pacotes/FrameworkHTML.inc.php'; include_once '../../../../../../gestaoAdministrativa/fontes/PHP/framework/include/cabecalho.inc.php'; -include_once(CAM_GRH_PES_MAPEAMENTO."TPessoalCbo.class.php"); +include_once CAM_GRH_PES_MAPEAMENTO.'TPessoalCbo.class.php'; //Define o nome dos arquivos PHP $stPrograma = "InserirCBO"; @@ -42,30 +43,44 @@ $pgProc = "PR".$stPrograma.".php"; $pgOcul = "OC".$stPrograma.".php"; $pgJS = "JS".$stPrograma.".js"; -$obTPessoalCBO = new TPessoalCbo; -$obErro = new Erro; +$obTPessoalCBO = new TPessoalCbo(); +$obErro = new Erro(); +$obTransacao = new Transacao(); +$obErro = $obTransacao->abreTransacao($boFlagTransacao, $boTransacao); -$obTPessoalCBO->setDado('codigo',$_POST['stNumCbo']); -$obTPessoalCBO->setDado('descricao',$_POST['stNomeCbo']); -$obTPessoalCBO->setDado('dt_inicial',$_POST['dtInicial']); -$obTPessoalCBO->setDado('dt_final',$_POST['dtFinal']); +$stOrder = ''; -$obErro = $obTPessoalCBO->recuperaTodos($rsRecord, " WHERE codigo = ".$_POST['stNumCbo']." and descricao ilike '".$_POST['stNomeCbo']."'"); +$obTPessoalCBO->setDado('codigo' ,$request->get('stNumCbo') ); +$obTPessoalCBO->setDado('descricao' ,$request->get('stNomeCbo') ); +$obTPessoalCBO->setDado('dt_inicial',$request->get('dtInicial') ); +$obTPessoalCBO->setDado('dt_final' ,$request->get('dtFinal') ); -if ($rsRecord->getNumLinhas() < 1) { - $obErro = $obTPessoalCBO->inclusao(); - if ($obErro->ocorreu()) { - SistemaLegado::alertaAviso($pgForm,$obErro->getDescricao(),'form','erro', Sessao::getId(),''); - } else { - $stJs = " - window.parent.window.opener.document.frm.inNumCBO.value = '".$_POST['stNumCbo']."'; - window.parent.window.opener.document.getElementById('inNomCBO').innerHTML = '".$_POST['stNomeCbo']."'; - window.parent.close(); - "; - SistemaLegado::executaFrameOculto($stJs); +$stFiltro = " WHERE codigo = ".$request->get('stNumCbo')." and descricao ilike '".$request->get('stNomeCbo')."'"; +$obErro = $obTPessoalCBO->recuperaTodos($rsRecord, $stFiltro, $stOrder, $boTransacao); + +if ( $rsRecord->getNumLinhas() < 1 && !$obErro->ocorreu() ) { + $obErro = $obTPessoalCBO->inclusao($boTransacao); + + if ( !$obErro->ocorreu() ) { + $stFiltro = " WHERE codigo = ".trim($request->get('stNumCbo')); + $obErro = $obTPessoalCBO->recuperaTodos($rsCBO, $stFiltro, $stOrder, $boTransacao); + + if( !$obErro->ocorreu() ){ + $stJs = "window.parent.window.opener.document.frm.inNumCBO.value = \"".$request->get('stNumCbo')."\"; \n"; + $stJs .= "window.parent.window.opener.document.getElementById('inNomCBO').innerHTML = \"".$request->get('stNomeCbo')."\"; \n"; + $stJs .= "window.parent.window.opener.document.frm.inCodCBO.value = \"".$rsCBO->getCampo('cod_cbo')."\"; \n"; + $stJs .= "window.parent.close(); \n"; + + SistemaLegado::executaFrameOculto($stJs); + } } -} else { - SistemaLegado::alertaAviso($pgForm,"Registro já cadastrado!",'form','erro', Sessao::getId(),''); } +elseif( !$obErro->ocorreu() ) + SistemaLegado::alertaAviso($pgForm,"Registro já cadastrado!",'form','erro', Sessao::getId(),''); + +if( $obErro->ocorreu() ) + SistemaLegado::alertaAviso($pgForm,$obErro->getDescricao(),'form','erro', Sessao::getId(),''); + +$obTransacao->fechaTransacao( $boFlagTransacao, $boTransacao, $obErro, $obTPessoalCBO ); include_once '../../../../../../gestaoAdministrativa/fontes/PHP/framework/include/rodape.inc.php'; diff --git a/gestaoRH/fontes/PHP/pessoal/popups/servidor/FLProcurarCgm.php b/gestaoRH/fontes/PHP/pessoal/popups/servidor/FLProcurarCgm.php index 7ca1fec..78fb554 100755 --- a/gestaoRH/fontes/PHP/pessoal/popups/servidor/FLProcurarCgm.php +++ b/gestaoRH/fontes/PHP/pessoal/popups/servidor/FLProcurarCgm.php @@ -152,7 +152,12 @@ switch ( $request->get('inFiltro') ) { $obLblContrato->setValue ( "Pensionista" ); break; default: - $obLblContrato->setValue ( "Todos" ); + $boValidaCgmAtivo = Sessao::read('valida_ativos_cgm'); + if ($boValidaCgmAtivo == 'true') { + $obLblContrato->setValue ( "Vigente" ); + }else{ + $obLblContrato->setValue ( "Todos" ); + } break; } diff --git a/gestaoRH/fontes/PHP/pessoal/popups/servidor/LSProcurarCgm.php b/gestaoRH/fontes/PHP/pessoal/popups/servidor/LSProcurarCgm.php index a279ad3..56be958 100755 --- a/gestaoRH/fontes/PHP/pessoal/popups/servidor/LSProcurarCgm.php +++ b/gestaoRH/fontes/PHP/pessoal/popups/servidor/LSProcurarCgm.php @@ -56,10 +56,10 @@ $stFncJavaScript .= " var sNum; \n"; $stFncJavaScript .= " var sNom; \n"; $stFncJavaScript .= " sNum = num; \n"; $stFncJavaScript .= " sNom = nom; \n"; -$stFncJavaScript .= " if ( window.opener.parent.frames['telaPrincipal'].document.getElementById('".$_REQUEST["campoNom"]."') ) { window.opener.parent.frames['telaPrincipal'].document.getElementById('".$_REQUEST["campoNom"]."').innerHTML = sNom; } \n"; -$stFncJavaScript .= " window.opener.parent.frames['telaPrincipal'].document.".$_REQUEST["nomForm"].".".$_REQUEST["campoNum"].".value = sNum; \n"; -$stFncJavaScript .= " window.opener.parent.frames['telaPrincipal'].document.".$_REQUEST["nomForm"].".".$_REQUEST["campoNum"].".focus(); \n"; -//$stFncJavaScript .= " window.opener.parent.frames['telaPrincipal'].document.".$_REQUEST["nomForm"].".".$_REQUEST["campoNom"].".value = sNom; \n"; +$stFncJavaScript .= " if ( window.opener.parent.frames['telaPrincipal'].document.getElementById('".$request->get("campoNom")."') ) { window.opener.parent.frames['telaPrincipal'].document.getElementById('".$request->get("campoNom")."').innerHTML = sNom; } \n"; +$stFncJavaScript .= " window.opener.parent.frames['telaPrincipal'].document.".$request->get("nomForm").".".$request->get("campoNum").".value = sNum; \n"; +$stFncJavaScript .= " window.opener.parent.frames['telaPrincipal'].document.".$request->get("nomForm").".".$request->get("campoNum").".focus(); \n"; +//$stFncJavaScript .= " window.opener.parent.frames['telaPrincipal'].document.".$request->get("nomForm").".".$request->get("campoNom").".value = sNom; \n"; $stFncJavaScript .= " window.close(); \n"; $stFncJavaScript .= " } \n"; @@ -69,46 +69,54 @@ $stFiltro = ""; $stLink = ""; //Definição do filtro de acordo com os valores informados no FL -$stLink .= "&stTipoPessoa=".$_REQUEST["stTipoPessoa"]; +$stLink .= "&stTipoPessoa=".$request->get("stTipoPessoa"); -if ($_REQUEST["campoNom"]) { - $stLink .= '&campoNom='.$_REQUEST['campoNom']; +if ($request->get("campoNom")) { + $stLink .= '&campoNom='.$request->get('campoNom'); } -if ($_REQUEST["nomForm"]) { - $stLink .= '&nomForm='.$_REQUEST['nomForm']; +if ($request->get("nomForm")) { + $stLink .= '&nomForm='.$request->get('nomForm'); } -if ($_REQUEST["campoNum"]) { - $stLink .= '&campoNum='.$_REQUEST['campoNum']; +if ($request->get("campoNum")) { + $stLink .= '&campoNum='.$request->get('campoNum'); } -if ($_REQUEST["stTipoPessoa"] == "F") { +if ($request->get("stTipoPessoa") == "F") { $stFiltro .= " AND CGM.numcgm IN (select numcgm from sw_cgm_pessoa_fisica ) "; } -if ($_REQUEST["stTipoPessoa"] == "J") { +if ($request->get("stTipoPessoa") == "J") { $stFiltro .= " AND CGM.numcgm IN (select numcgm from sw_cgm_pessoa_juridica ) "; } if ( $request->get("stNomeCgm") ) { -// $stFiltro .= " AND lower(nom_cgm) like lower('".$_REQUEST["stNomeCgm"]."%') "; - $stFiltro .= " AND lower(nom_cgm) like lower('".$_REQUEST["stNomeCgm"]."%')||'%' "; - $stLink .= "&stNomeCgm=".$_REQUEST["stNomeCgm"]; +// $stFiltro .= " AND lower(nom_cgm) like lower('".$request->get("stNomeCgm")."%') "; + $stFiltro .= " AND lower(nom_cgm) like lower('".$request->get("stNomeCgm")."%')||'%' "; + $stLink .= "&stNomeCgm=".$request->get("stNomeCgm"); } if ( $request->get("stCPF") ) { - $inCPF = $_REQUEST["stCPF"]; + $inCPF = $request->get("stCPF"); $obMascara->desmascaraDado( $inCPF ); $stFiltro .= " AND CGM.numcgm in ( select numcgm from sw_cgm_pessoa_fisica where cpf = '".$inCPF."') "; - $stLink .= "&stCPF=".$_REQUEST["stCPF"]; + $stLink .= "&stCPF=".$request->get("stCPF"); } +$boValidaCgmAtivo = Sessao::read('valida_ativos_cgm'); + // SQL Comum ao case 1 e case 2, filtra servidores com contrato. $stSQL = " AND cgm.numcgm IN ( \n"; $stSQL .= "SELECT ps.numcgm \n"; $stSQL .= " FROM pessoal.servidor ps \n"; $stSQL .= " , pessoal.servidor_contrato_servidor pscs \n"; -$stSQL .= " WHERE ps.cod_servidor = pscs.cod_servidor) \n"; +$stSQL .= " WHERE ps.cod_servidor = pscs.cod_servidor \n"; +if ($boValidaCgmAtivo == 'true') { + $stSQL .= " AND recuperarSituacaoDoContratoLiteral(pscs.cod_contrato, 0, '".Sessao::getEntidade()."') = 'Ativo' \n"; + $stSQL .= " ) \n"; +}else{ + $stSQL .= " ) \n"; +} //Filtro setado na pagina que abre a popup -$stLink .= "&inFiltro=".$_REQUEST['inFiltro']; -switch ($_REQUEST['inFiltro']) { +$stLink .= "&inFiltro=".$request->get('inFiltro'); +switch ($request->get('inFiltro')) { //CGMs de contratos case 1: $stFiltro .= $stSQL; @@ -154,23 +162,9 @@ switch ($_REQUEST['inFiltro']) { $stFiltro .= " FROM \n"; $stFiltro .= " pessoal.pensionista ) \n"; break; -}//end switch -/*if ($_REQUEST["stCNPJ"]) { - $inCNPJ = $_REQUEST["stCNPJ"]; - $obMascara->desmascaraDado( $inCNPJ ); - $stFiltro .= " AND CGM.numcgm in ( select numcgm from ".CGM_PESSOA_JURIDICA." where cnpj = '".$inCNPJ."') "; - $stLink .= "&stCNPJ=".$_REQUEST["stCNPJ"]; -}*/ -/* -if ($_REQUEST["stNomeFantasia"]) { - $stFiltro .= " AND CGM.numcgm in ( select numcgm from ".CGM_PESSOA_JURIDICA." where lower(nom_fantasia) like lower('%".$_REQUEST["stNomeFantasia"]."%') ) "; - $stLink .= "&stNomeFantasia=".$_REQUEST["stNomeFantasia"]; -} -*/ -/*if ($stFiltro) { - $stFiltro = substr( $stFiltro, 0, strlen( $stFiltro ) - 4 ); -}*/ + +}//end switch //faz busca dos CGM's utilizando o filtro setado $stAcao = isset($stAcao) ? $stAcao : ""; diff --git a/gestaoRH/fontes/PHP/pessoal/popups/servidor/LSProcurarMatricula.php b/gestaoRH/fontes/PHP/pessoal/popups/servidor/LSProcurarMatricula.php index 078ea23..066f969 100644 --- a/gestaoRH/fontes/PHP/pessoal/popups/servidor/LSProcurarMatricula.php +++ b/gestaoRH/fontes/PHP/pessoal/popups/servidor/LSProcurarMatricula.php @@ -89,7 +89,6 @@ if(Sessao::read('stTipoListagem') == 'geral' and //Filtros da sessão $arFiltro = Sessao::read('filtroRelatorio'); - //Define qual listagem deverá ser feita switch ($_REQUEST["stTipo"]) { case "pensionista": @@ -197,6 +196,21 @@ switch ($_REQUEST["stTipo"]) { $stFiltro .= " ) \n"; $obTPessoalContrato->recuperaCgmDoRegistro($rsLista,$stFiltro,$stiOrdem,""); break; + case 'contrato_ativos': + if ( !empty($stFiltro) ) { + Sessao::write('filtroRelatorio', $stFiltro); + } else { + $stFiltro = Sessao::read('filtroRelatorio'); + } + if ($_REQUEST['stSituacao'] == "ativos") { + $stFiltro .= " AND NOT EXISTS (SELECT 1 + FROM pessoal.contrato_servidor_caso_causa + WHERE contrato.cod_contrato = contrato_servidor_caso_causa.cod_contrato + ) + AND situacao = 'Ativo' \n"; + } + $obTPessoalContrato->recuperaCgmDoRegistro($rsLista,$stFiltro,$stOrdem,""); + break; default: if ( !empty($stFiltro) ) { Sessao::write('filtroRelatorio', $stFiltro); @@ -209,11 +223,6 @@ switch ($_REQUEST["stTipo"]) { $stFiltro .= " WHERE contrato.cod_contrato = contrato_servidor_caso_causa.cod_contrato ) \n"; } - /*if ($_REQUEST['stSituacao'] == "ativos") { - $stFiltro .= " AND NOT EXISTS (SELECT 1 \n"; - $stFiltro .= " FROM pessoal.contrato_servidor_caso_causa \n"; - $stFiltro .= " WHERE contrato.cod_contrato = contrato_servidor_caso_causa.cod_contrato ) \n"; - }*/ $obTPessoalContrato->recuperaCgmDoRegistro($rsLista,$stFiltro,$stOrdem,""); break; diff --git a/gestaoRH/fontes/PHP/ponto/instancias/manutencao/LSManterPonto.php b/gestaoRH/fontes/PHP/ponto/instancias/manutencao/LSManterPonto.php index aac3e36..0ede1c8 100644 --- a/gestaoRH/fontes/PHP/ponto/instancias/manutencao/LSManterPonto.php +++ b/gestaoRH/fontes/PHP/ponto/instancias/manutencao/LSManterPonto.php @@ -60,7 +60,6 @@ if ( empty( $stAcao ) ) { } //MANTEM FILTRO E PAGINACAO -//sistemalegado::mostravar($_REQUEST); $arLink = Sessao::read("link"); $stLink = Sessao::getId()."&stAcao=".$stAcao; if ($_GET["pg"] and $_GET["pos"]) { diff --git a/gestaoRH/fontes/PHP/ponto/instancias/manutencao/PRManterPonto.php b/gestaoRH/fontes/PHP/ponto/instancias/manutencao/PRManterPonto.php index c86855b..8f42120 100644 --- a/gestaoRH/fontes/PHP/ponto/instancias/manutencao/PRManterPonto.php +++ b/gestaoRH/fontes/PHP/ponto/instancias/manutencao/PRManterPonto.php @@ -125,8 +125,7 @@ $obTPontoRelogioPontoHorario->obTPontoRelogioPontoDias = &$obTPontoRelogi $arHorarios = montaHorarios(); $arJustificativas = Sessao::read("arJustificativas"); -//sistemalegado::mostravar($arHorarios); -//exit; + if (count($arHorarios) > 0) { if (trim($_REQUEST["boTipoManutencao"]) == "LOTE_DIARIO") { foreach ($arHorarios as $inCodContrato => $arDatas) { diff --git a/gestaoRH/fontes/PLPGSQL/folhaPagamento/FolhaRescisao/processarSomatorioDeducoesRescisao.plsql b/gestaoRH/fontes/PLPGSQL/folhaPagamento/FolhaRescisao/processarSomatorioDeducoesRescisao.plsql index 3d02d5d..0178734 100755 --- a/gestaoRH/fontes/PLPGSQL/folhaPagamento/FolhaRescisao/processarSomatorioDeducoesRescisao.plsql +++ b/gestaoRH/fontes/PLPGSQL/folhaPagamento/FolhaRescisao/processarSomatorioDeducoesRescisao.plsql @@ -159,7 +159,7 @@ BEGIN END IF; - IF stSituacaoFolhaSalario = 'f' THEN + IF stSituacaoFolhaSalario = 'f' AND trim(stDesdobramento) IN ('A','S') THEN stSql := 'SELECT sum(evento_calculado.valor) as valor FROM folhapagamento'||stEntidade||'.tabela_irrf_evento INNER JOIN ( SELECT cod_tabela diff --git a/gestaoRH/fontes/PLPGSQL/folhaPagamento/RotinaMensal/abrirPeriodoMovimentacao.plsql b/gestaoRH/fontes/PLPGSQL/folhaPagamento/RotinaMensal/abrirPeriodoMovimentacao.plsql index a1d9b81..7df4e79 100644 --- a/gestaoRH/fontes/PLPGSQL/folhaPagamento/RotinaMensal/abrirPeriodoMovimentacao.plsql +++ b/gestaoRH/fontes/PLPGSQL/folhaPagamento/RotinaMensal/abrirPeriodoMovimentacao.plsql @@ -64,10 +64,13 @@ DECLARE stDataFinal VARCHAR; stDataInicial VARCHAR; stFormula VARCHAR; + stSqlEventoFixos VARCHAR; + stSqlAux VARCHAR; stTimestamp TIMESTAMP; reRegistro RECORD; reSalario RECORD; reFerias RECORD; + reEventosConfigurados RECORD; nuQuantidade NUMERIC; nuHorasMensais NUMERIC; nuHorasMensaisPadrao NUMERIC; @@ -83,6 +86,7 @@ DECLARE boParcelaFerias BOOLEAN; boProporcional BOOLEAN; inMesCarencia INTEGER; + inCodContrato INTEGER; crCursor REFCURSOR; BEGIN boRetorno := removerTodosBuffers(); @@ -108,12 +112,15 @@ BEGIN --FIM###################################### --INÍCIO################################### + + --Processo de cópia dos eventos para o novo periodo de movimentacao inCodRegistro := selectIntoInteger('SELECT max(cod_registro)+1 FROM folhapagamento'|| stEntidade ||'.registro_evento_periodo'); stSql := ' SELECT registro_evento.* , registro_evento_periodo.cod_contrato , registro_evento_parcela.parcela , registro_evento_parcela.mes_carencia + , evento.fixado FROM folhapagamento'|| stEntidade ||'.registro_evento , folhapagamento'|| stEntidade ||'.registro_evento_periodo , folhapagamento'|| stEntidade ||'.ultimo_registro_evento @@ -130,8 +137,10 @@ BEGIN AND (parcela is null or pega0MaiorParcela(registro_evento.quantidade,registro_evento_periodo.cod_contrato,registro_evento_periodo.cod_periodo_movimentacao,registro_evento.cod_evento) < registro_evento_parcela.parcela) AND NOT EXISTS (SELECT 1 FROM pessoal'|| stEntidade ||'.contrato_servidor_caso_causa - WHERE registro_evento_periodo.cod_contrato = contrato_servidor_caso_causa.cod_contrato)'; + WHERE registro_evento_periodo.cod_contrato = contrato_servidor_caso_causa.cod_contrato) + ORDER BY registro_evento_periodo.cod_contrato'; stTimestamp := now()::text::timestamp(3); + inCodContrato := 0; FOR reRegistro IN EXECUTE stSql LOOP inMesCarencia := reRegistro.mes_carencia; @@ -306,7 +315,191 @@ BEGIN EXECUTE stSql; inCodRegistro := inCodRegistro + 1; END IF; - END LOOP; + + + --Valida contrato para inserir apenas 1 vez em cada contrado os eventos automaticos + --Busca dados na configuracao de eventos automaticos + --Gestão Recursos Humanos :: Folha de Pagamento :: Configuração :: Configurar Eventos Automáticos + IF inCodContrato != reRegistro.cod_contrato THEN + stSqlEventoFixos := ' + SELECT evento_evento.cod_evento + ,evento_evento.valor_quantidade + FROM( SELECT evento_evento.* + FROM folhapagamento.evento_evento + INNER JOIN( SELECT cod_evento + ,MAX(timestamp) as timestamp + FROM folhapagamento.evento_evento as max + GROUP BY cod_evento + ) as max + ON evento_evento.cod_evento = max.cod_evento + AND evento_evento.timestamp = max.timestamp + ) as evento_evento + + INNER JOIN (SELECT regexp_split_to_table(valor,'','')::integer as cod_evento + FROM administracao.configuracao + WHERE cod_modulo = 27 + AND exercicio = '''||stExercicio||''' + AND parametro = ''evento_automatico'' + ) as evento_fixo_configurado + ON evento_evento.cod_evento = evento_fixo_configurado.cod_evento'; + FOR reEventosConfigurados IN EXECUTE stSqlEventoFixos + LOOP + /* + INSERE OS EVENTOS AUTOMATICOS CONFIGURADOS + SE folhapagamento.evento.fixado = Q ENTAO + Gravar na coluna registro_evento.quantidade com o valor de folhapagamento.evento_evento.valor_quantidade + SENAO folhapagamento.evento.fixado = V + Gravar na coluna registro_evento.valor com o valor de folhapagamento.evento_evento.valor_quantidade + */ + + IF reRegistro.fixado = 'Q' THEN + stSqlAux := 'INSERT INTO folhapagamento'|| stEntidade ||'.registro_evento_periodo + ( + cod_registro + ,cod_periodo_movimentacao + ,cod_contrato + ) + VALUES + ( + '|| inCodRegistro ||' + ,'|| inCodPeriodoMovimentacaoAberta ||' + ,'|| reRegistro.cod_contrato ||' + )'; + EXECUTE stSqlAux; + stSqlAux := 'INSERT INTO folhapagamento'|| stEntidade ||'.registro_evento + ( + cod_registro + ,cod_evento + ,timestamp + ,valor + ,quantidade + ,proporcional + ,automatico + ) + VALUES + ( + '|| inCodRegistro ||' + ,'|| reEventosConfigurados.cod_evento ||' + ,'|| quote_literal(stTimestamp) ||' + , 0.00 + ,'|| reEventosConfigurados.valor_quantidade ||' + ,false + ,false + )'; + EXECUTE stSqlAux; + stSqlAux := 'INSERT INTO folhapagamento'|| stEntidade ||'.ultimo_registro_evento + ( + cod_registro + ,cod_evento + ,timestamp + ) + VALUES + ( + '|| inCodRegistro ||' + ,'|| reEventosConfigurados.cod_evento ||' + ,'|| quote_literal(stTimestamp) ||' + )'; + EXECUTE stSqlAux; + + IF reRegistro.parcela IS NOT NULL THEN + stSqlAux := 'INSERT INTO folhapagamento'|| stEntidade ||'.registro_evento_parcela + (cod_registro + ,cod_evento + ,timestamp + ,parcela + ,mes_carencia + ) + VALUES + ( + '|| inCodRegistro ||' + ,'|| reEventosConfigurados.cod_evento ||' + ,'|| quote_literal(stTimestamp) ||' + ,'|| reRegistro.parcela ||' + ,'|| inMesCarencia ||' + )'; + EXECUTE stSqlAux; + END IF; + + ELSEIF reRegistro.fixado = 'V' THEN + + stSqlAux := 'INSERT INTO folhapagamento'|| stEntidade ||'.registro_evento_periodo + ( + cod_registro + ,cod_periodo_movimentacao + ,cod_contrato + ) + VALUES + ( + '|| inCodRegistro ||' + ,'|| inCodPeriodoMovimentacaoAberta ||' + ,'|| reRegistro.cod_contrato ||' + )'; + EXECUTE stSqlAux; + stSqlAux := 'INSERT INTO folhapagamento'|| stEntidade ||'.registro_evento + ( + cod_registro + ,cod_evento + ,timestamp + ,valor + ,quantidade + ,proporcional + ,automatico + ) + VALUES + ( + '|| inCodRegistro ||' + ,'|| reEventosConfigurados.cod_evento ||' + ,'|| quote_literal(stTimestamp) ||' + ,'|| reEventosConfigurados.valor_quantidade ||' + , 0.00 + ,false + ,false + )'; + EXECUTE stSqlAux; + stSqlAux := 'INSERT INTO folhapagamento'|| stEntidade ||'.ultimo_registro_evento + ( + cod_registro + ,cod_evento + ,timestamp + ) + VALUES + ( + '|| inCodRegistro ||' + ,'|| reEventosConfigurados.cod_evento ||' + ,'|| quote_literal(stTimestamp) ||' + )'; + EXECUTE stSqlAux; + + IF reRegistro.parcela IS NOT NULL THEN + stSqlAux := 'INSERT INTO folhapagamento'|| stEntidade ||'.registro_evento_parcela + (cod_registro + ,cod_evento + ,timestamp + ,parcela + ,mes_carencia + ) + VALUES + ( + '|| inCodRegistro ||' + ,'|| reEventosConfigurados.cod_evento ||' + ,'|| quote_literal(stTimestamp) ||' + ,'|| reRegistro.parcela ||' + ,'|| inMesCarencia ||' + )'; + EXECUTE stSqlAux; + END IF; + + END IF; + + inCodRegistro := inCodRegistro + 1; + + END LOOP; --END LOOP EVENTOS AUTOMATICOS CONFIGURADOS + END IF; --IF cod contrato + + --Atribuindo o contrato para a validacao dos eventos automaticos + inCodContrato := reRegistro.cod_contrato; + + END LOOP;-- END LOOP FINAL --FIM###################################### --INÍCIO################################### diff --git a/gestaoRH/fontes/PLPGSQL/pessoal/cargo/recuperaCargoAcumuladoServidor.plsql b/gestaoRH/fontes/PLPGSQL/pessoal/cargo/recuperaCargoAcumuladoServidor.plsql new file mode 100644 index 0000000..68b3af0 --- /dev/null +++ b/gestaoRH/fontes/PLPGSQL/pessoal/cargo/recuperaCargoAcumuladoServidor.plsql @@ -0,0 +1,91 @@ +/* + ********************************************************************************** + * * + * @package URBEM CNM - Soluções em Gestão Pública * + * @copyright (c) 2013 Confederação Nacional de Municípos * + * @author Confederação Nacional de Municípios * + * * + * O URBEM CNM é um software livre; você pode redistribuí-lo e/ou modificá-lo sob * + * os termos da Licença Pública Geral GNU conforme publicada pela Fundação do * + * Software Livre (FSF - Free Software Foundation); na versão 2 da Licença. * + * * + * Este programa é distribuído na expectativa de que seja útil, porém, * + * SEM NENHUMA GARANTIA; nem mesmo a garantia implícita de COMERCIABILIDADE OU * + * ADEQUAÇÃO A UMA FINALIDADE ESPECÍFICA. Consulte a Licença Pública Geral do GNU * + * para mais detalhes. * + * * + * Você deve ter recebido uma cópia da Licença Pública Geral do GNU "LICENCA.txt" * + * com este programa; se não, escreva para a Free Software Foundation Inc., * + * no endereço 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA. * + * * + ********************************************************************************** +*/ +/* recuperarCargoAcumuladoServidor + * Data de Criação : 07/10/2015 + * @author Analista : Dagiane Vieira + * @author Desenvolvedor : Evandro Melos + * $Id:$ +*/ + +CREATE OR REPLACE FUNCTION recuperaCargoAcumuladoServidor(INTEGER, INTEGER, INTEGER, VARCHAR) RETURNS VARCHAR as $$ +DECLARE + inCodContrato ALIAS FOR $1; + inCodServidor ALIAS FOR $2; + inCodPeriodoMovimentacao ALIAS FOR $3; + stEntidade ALIAS FOR $4; + stSQL VARCHAR:=''; + stRetorno VARCHAR:=''; + stFiltro VARCHAR:=''; + reRecord RECORD; +BEGIN + + stSQL := ' + SELECT cargo.cod_cargo||'' - ''||cargo.descricao AS nome_cargo_acumulado + FROM pessoal'||stEntidade||'.contrato_servidor_funcao + INNER JOIN (SELECT contrato_servidor_funcao.cod_contrato + , max(contrato_servidor_funcao.timestamp) as timestamp + FROM pessoal'||stEntidade||'.contrato_servidor_funcao + WHERE contrato_servidor_funcao.timestamp <= (ultimoTimestampPeriodoMovimentacao('||inCodPeriodoMovimentacao||','''||stEntidade||'''))::timestamp + GROUP BY contrato_servidor_funcao.cod_contrato + ) as max_contrato_servidor_funcao + ON max_contrato_servidor_funcao.cod_contrato = contrato_servidor_funcao.cod_contrato + AND max_contrato_servidor_funcao.timestamp = contrato_servidor_funcao.timestamp + AND contrato_servidor_funcao.cod_contrato <> '||inCodContrato||' + INNER JOIN pessoal'||stEntidade||'.servidor_contrato_servidor + ON servidor_contrato_servidor.cod_contrato = contrato_servidor_funcao.cod_contrato + AND servidor_contrato_servidor.cod_servidor = '||inCodServidor||' + INNER JOIN pessoal'||stEntidade||'.cargo + ON cargo.cod_cargo = contrato_servidor_funcao.cod_cargo + INNER JOIN ( SELECT contrato_servidor_situacao.* + FROM pessoal'||stEntidade||'.contrato_servidor_situacao + INNER JOIN (SELECT max.cod_contrato + ,MAX(max.timestamp) as timestamp + FROM pessoal'||stEntidade||'.contrato_servidor_situacao as max + INNER JOIN pessoal'||stEntidade||'.servidor_contrato_servidor + ON servidor_contrato_servidor.cod_servidor = '||inCodServidor||' + AND servidor_contrato_servidor.cod_contrato = max.cod_contrato + WHERE max.timestamp <= (ultimoTimestampPeriodoMovimentacao('||inCodPeriodoMovimentacao||','''||stEntidade||'''))::timestamp + GROUP BY max.cod_contrato + ) as max_servidor_situacao + ON max_servidor_situacao.timestamp = contrato_servidor_situacao.timestamp + AND max_servidor_situacao.cod_contrato = contrato_servidor_situacao.cod_contrato + AND contrato_servidor_situacao.situacao = ''A'' + + ) as contrato_servidor_situacao + ON contrato_servidor_situacao.cod_contrato = contrato_servidor_funcao.cod_contrato + AND contrato_servidor_situacao.cod_periodo_movimentacao <= '||inCodPeriodoMovimentacao||' + + WHERE contrato_servidor_situacao.situacao = ''A'' + AND servidor_contrato_servidor.cod_servidor = '||inCodServidor||'; + + '; + + FOR reRecord IN EXECUTE stSQL + LOOP + stRetorno := reRecord.nome_cargo_acumulado; + END LOOP; + + RETURN stRetorno; + +END; +$$ LANGUAGE 'plpgsql'; \ No newline at end of file diff --git a/gestaoRH/fontes/PLPGSQL/pessoal/relatorio/definivelServidor.plsql b/gestaoRH/fontes/PLPGSQL/pessoal/relatorio/definivelServidor.plsql index 1a65ce5..34fab25 100755 --- a/gestaoRH/fontes/PLPGSQL/pessoal/relatorio/definivelServidor.plsql +++ b/gestaoRH/fontes/PLPGSQL/pessoal/relatorio/definivelServidor.plsql @@ -43,7 +43,7 @@ CREATE TYPE colunasDefinivelServidor AS ( uf VARCHAR, fone VARCHAR, escolaridade VARCHAR, - data_nascimento VARCHAR, + data_nascimento DATE, cpf VARCHAR, rg VARCHAR, processo VARCHAR, @@ -281,7 +281,7 @@ BEGIN , CAST((SELECT sigla_uf FROM sw_uf WHERE sw_uf.cod_uf = sw_cgm.cod_uf) AS VARCHAR) as uf , CAST(sw_cgm.fone_residencial AS VARCHAR) as fone , CAST((SELECT descricao FROM sw_escolaridade WHERE cod_escolaridade = sw_cgm_pessoa_fisica.cod_escolaridade) AS VARCHAR) as escolaridade - , CAST(sw_cgm_pessoa_fisica.dt_nascimento AS VARCHAR) as data_nascimento + , sw_cgm_pessoa_fisica.dt_nascimento as data_nascimento , CAST(sw_cgm_pessoa_fisica.cpf AS VARCHAR) AS cpf , CAST(sw_cgm_pessoa_fisica.rg AS VARCHAR) AS rg , CAST(sw_processo.cod_processo AS VARCHAR) as processo @@ -467,7 +467,7 @@ BEGIN , CAST((SELECT sigla_uf FROM sw_uf WHERE sw_uf.cod_uf = sw_cgm.cod_uf) AS VARCHAR) as uf , CAST(sw_cgm.fone_residencial AS VARCHAR) as fone , CAST((SELECT descricao FROM sw_escolaridade WHERE cod_escolaridade = sw_cgm_pessoa_fisica.cod_escolaridade) AS VARCHAR) as escolaridade - , CAST(sw_cgm_pessoa_fisica.dt_nascimento AS VARCHAR) as data_nascimento + , sw_cgm_pessoa_fisica.dt_nascimento as data_nascimento , CAST(sw_cgm_pessoa_fisica.cpf AS VARCHAR) AS cpf , CAST(sw_cgm_pessoa_fisica.rg AS VARCHAR) AS rg , CAST(sw_cgm_pessoa_fisica.servidor_pis_pasep AS VARCHAR) as PIS_PASEP diff --git a/gestaoRH/fontes/PLPGSQL/pessoal/servidor/recuperarContratoServidor.plsql b/gestaoRH/fontes/PLPGSQL/pessoal/servidor/recuperarContratoServidor.plsql index 56b5eec..4b1a02b 100644 --- a/gestaoRH/fontes/PLPGSQL/pessoal/servidor/recuperarContratoServidor.plsql +++ b/gestaoRH/fontes/PLPGSQL/pessoal/servidor/recuperarContratoServidor.plsql @@ -209,7 +209,7 @@ BEGIN ON atributo_valor_padrao.cod_modulo = atributo_contrato_servidor_valor.cod_modulo AND atributo_valor_padrao.cod_cadastro = atributo_contrato_servidor_valor.cod_cadastro AND atributo_valor_padrao.cod_atributo = atributo_contrato_servidor_valor.cod_atributo - AND atributo_valor_padrao.cod_valor = atributo_contrato_servidor_valor.valor'; + AND atributo_valor_padrao.cod_valor::INTEGER = atributo_contrato_servidor_valor.valor::INTEGER '; END IF; stSql := stSql || ' diff --git a/gestaoRH/fontes/RPT/pessoal/report/design/definivelServidor.rptdesign b/gestaoRH/fontes/RPT/pessoal/report/design/definivelServidor.rptdesign index 3cee5ac..1ec7d52 100644 --- a/gestaoRH/fontes/RPT/pessoal/report/design/definivelServidor.rptdesign +++ b/gestaoRH/fontes/RPT/pessoal/report/design/definivelServidor.rptdesign @@ -587,23 +587,100 @@ function visibilidadeEspacamento() - - + - - - stNomeTabela - stNomeTabela - string - 1 - true - false - - + + - 0 OR evento1_qte > 0) OR "; @@ -634,90 +711,8 @@ this.queryText += ";"; params['query'] = this.queryText;]]> postgres - + + diff --git a/gestaoRH/fontes/SQL/GRH_2044.sql b/gestaoRH/fontes/SQL/GRH_2044.sql new file mode 100644 index 0000000..bd52500 --- /dev/null +++ b/gestaoRH/fontes/SQL/GRH_2044.sql @@ -0,0 +1,52 @@ +/* + ********************************************************************************** + * * + * @package URBEM CNM - Soluções em Gestão Pública * + * @copyright (c) 2013 Confederação Nacional de Municípos * + * @author Confederação Nacional de Municípios * + * * + * O URBEM CNM é um software livre; você pode redistribuí-lo e/ou modificá-lo sob * + * os termos da Licença Pública Geral GNU conforme publicada pela Fundação do * + * Software Livre (FSF - Free Software Foundation); na versão 2 da Licença. * + * * + * Este programa é distribuído na expectativa de que seja útil, porém, * + * SEM NENHUMA GARANTIA; nem mesmo a garantia implícita de COMERCIABILIDADE OU * + * ADEQUAÇÃO A UMA FINALIDADE ESPECÍFICA. Consulte a Licença Pública Geral do GNU * + * para mais detalhes. * + * * + * Você deve ter recebido uma cópia da Licença Pública Geral do GNU "LICENCA.txt" * + * com este programa; se não, escreva para a Free Software Foundation Inc., * + * no endereço 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA. * + * * + ********************************************************************************** +*/ +/* +* +* Script de DDL e DML +* +* Versao 2.04.4 +* +* Fabio Bertoldi - 20151204 +* +*/ + +---------------- +-- Ticket #23429 +---------------- + +SELECT atualizarbanco(' +CREATE TABLE ima.tipo_convenio_caixa( + cod_tipo INTEGER NOT NULL, + descricao VARCHAR(50) NOT NULL, + CONSTRAINT pk_tipo_convenio_caixa PRIMARY KEY (cod_tipo) +); +GRANT ALL ON ima.tipo_convenio_caixa TO urbem; +'); + +SELECT atualizarbanco('INSERT INTO ima.tipo_convenio_caixa VALUES (1, ''SIACC 150'' );'); +SELECT atualizarbanco('INSERT INTO ima.tipo_convenio_caixa VALUES (2, ''SICOV 150 - PADRAO 150 FEBRABAN'');'); + +SELECT atualizarbanco('ALTER TABLE ima.configuracao_convenio_caixa_economica_federal ADD COLUMN cod_tipo INTEGER;' ); +SELECT atualizarbanco('UPDATE ima.configuracao_convenio_caixa_economica_federal SET cod_tipo = 1;' ); +SELECT atualizarbanco('ALTER TABLE ima.configuracao_convenio_caixa_economica_federal ALTER COLUMN cod_tipo SET NOT NULL;'); + diff --git a/gestaoRH/fontes/SQL/GRH_2045.sql b/gestaoRH/fontes/SQL/GRH_2045.sql new file mode 100644 index 0000000..5c8093d --- /dev/null +++ b/gestaoRH/fontes/SQL/GRH_2045.sql @@ -0,0 +1,79 @@ +/* + ********************************************************************************** + * * + * @package URBEM CNM - Soluções em Gestão Pública * + * @copyright (c) 2013 Confederação Nacional de Municípos * + * @author Confederação Nacional de Municípios * + * * + * O URBEM CNM é um software livre; você pode redistribuí-lo e/ou modificá-lo sob * + * os termos da Licença Pública Geral GNU conforme publicada pela Fundação do * + * Software Livre (FSF - Free Software Foundation); na versão 2 da Licença. * + * * + * Este programa é distribuído na expectativa de que seja útil, porém, * + * SEM NENHUMA GARANTIA; nem mesmo a garantia implícita de COMERCIABILIDADE OU * + * ADEQUAÇÃO A UMA FINALIDADE ESPECÍFICA. Consulte a Licença Pública Geral do GNU * + * para mais detalhes. * + * * + * Você deve ter recebido uma cópia da Licença Pública Geral do GNU "LICENCA.txt" * + * com este programa; se não, escreva para a Free Software Foundation Inc., * + * no endereço 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA. * + * * + ********************************************************************************** +*/ +/* +* +* Script de DDL e DML +* +* Versao 2.04.5 +* +* Fabio Bertoldi - 20151110 +* +*/ + +---------------- +-- Ticket #23357 +---------------- + +INSERT + INTO administracao.acao + ( cod_acao + , cod_funcionalidade + , nom_arquivo + , parametro + , ordem + , complemento_acao + , nom_acao + , ativo + ) +VALUES + ( 3094 + , 240 + , 'FMManterConfiguracaoEventosAutomaticos.php' + , 'configurar' + , 20 + , '' + , 'Configurar Eventos Automáticos' + , TRUE + ); + +INSERT + INTO administracao.configuracao + ( cod_modulo + , exercicio + , parametro + , valor + ) +VALUES + ( 27 + , '2015' + , 'evento_automatico' + , '' + ); + + +---------------- +-- Ticket #23355 +---------------- + +SELECT atualizarConfiguracao(27, 'adiantamento_13_salario', 'false'); + diff --git a/gestaoTributaria/fontes/PHP/arrecadacao/classes/boletos/RCarneDiversosCanaa.class.php b/gestaoTributaria/fontes/PHP/arrecadacao/classes/boletos/RCarneDiversosCanaa.class.php index e0df2fe..1d9cfc6 100644 --- a/gestaoTributaria/fontes/PHP/arrecadacao/classes/boletos/RCarneDiversosCanaa.class.php +++ b/gestaoTributaria/fontes/PHP/arrecadacao/classes/boletos/RCarneDiversosCanaa.class.php @@ -32,7 +32,7 @@ * @package URBEM - * $Id: RCarneDiversosCanaa.class.php 59612 2014-09-02 12:00:51Z gelson $ + * $Id: RCarneDiversosCanaa.class.php 63839 2015-10-22 18:08:07Z franver $ Caso de uso: uc-05.03.11 */ @@ -1649,17 +1649,6 @@ function imprimirCarne($diffBaixa = FALSE) $flValorTotalCorrecao = 0.00; $flValorTotalGeral = 0.00; -/* -echo "total geral = ".$flValorTotalGeral."
    "; -echo "total correcao = ".$flValorTotalCorrecao."
    "; -echo "total multa = ".$flValorTotalMulta."
    "; -echo "total juros = ".$flValorTotalJuros."
    "; -echo "total = ".$flValorTotal."
    "; - -sistemaLegado::mostravar( $rsGeraCarneCabecalho ); -sistemaLegado::mostravar( $rsListaDetalheCreditos );exit; -*/ - if ( $obErro->ocorreu() ) { break; } diff --git a/gestaoTributaria/fontes/PHP/arrecadacao/classes/boletos/RCarneDiversosMarianaPimentel.class.php b/gestaoTributaria/fontes/PHP/arrecadacao/classes/boletos/RCarneDiversosMarianaPimentel.class.php index f9b16e7..a6ab88a 100644 --- a/gestaoTributaria/fontes/PHP/arrecadacao/classes/boletos/RCarneDiversosMarianaPimentel.class.php +++ b/gestaoTributaria/fontes/PHP/arrecadacao/classes/boletos/RCarneDiversosMarianaPimentel.class.php @@ -32,7 +32,7 @@ * @package URBEM - * $Id: RCarneDiversosMarianaPimentel.class.php 61620 2015-02-18 12:14:10Z franver $ + * $Id: RCarneDiversosMarianaPimentel.class.php 64141 2015-12-08 16:23:59Z evandro $ Caso de uso: uc-05.03.11 */ @@ -1665,7 +1665,14 @@ function imprimirCarne($diffBaixa = FALSE) $stParametro1 = $stParametro.$dtVencimento."'"; // valor atualizado - $obErro = $obCalculaParcelas->executaCalculaValoresParcelasReemissao($rsTmp,$stParametro1); + $rsTmp = new RecordSet(); + if ( $parcela['boApenasReemitir'] == false){ + $obErro = $obCalculaParcelas->executaCalculaValoresParcelasReemissao($rsTmp,$stParametro1); + }else{ + $stValorParcela = $rsParcela->getCampo('valor').'§'.$rsParcela->getCampo('valor'); + $stValorParcela .= '§'.'0.00'.'§'.'0.00'.'§'.'0.00'.'§'.'0.00'; + $rsTmp->setCampo('valor',$stValorParcela); + } unset( $obTARRCarne ); $obTARRCarne = new TARRCarne; @@ -1677,6 +1684,7 @@ function imprimirCarne($diffBaixa = FALSE) $nuValorNormal = $arValorNormal[1]; $stJuroNormal = $arValorNormal[3]; $stMultaNormal = $arValorNormal[2]; + $nuValorCorrecaoMonetaria = $arValorNormal[5]; $flTotal = 0; while ( !$rsListaCreditos->Eof() ) { @@ -1843,7 +1851,7 @@ function imprimirCarne($diffBaixa = FALSE) //----------------------------------------------------------------------- // valor, % de juro, % de multa para valor vencimento 3 do carne -------------- - // valor + // valor if ($boVenc3 == true) { $obErro = $obCalculaParcelas->executaFuncao($rsTmp1,$stParametro4); $nuValor3 = $rsTmp1->getCampo('valor'); @@ -1865,13 +1873,17 @@ function imprimirCarne($diffBaixa = FALSE) // repassa valores para pdf $this->obRCarneMarianaPimentel->setValor (number_format(round($nuValorNormal,2),2,',','.')); - if ($boVenc1 == true) { + if ($boVenc1 == true) { $this->obRCarneMarianaPimentel->setValor1 (number_format(round($nuValor1,2),2,',','.')) ; - if ($boVenc2 == true) { + if ($boVenc2 == true) { $this->obRCarneMarianaPimentel->setValor2 (number_format(round($nuValor2,2),2,',','.')) ; if ($boVenc3 == true) { - $this->obRCarneMarianaPimentel->setValor3 (number_format(round($nuValor3,2),2,',','.')) ; + $this->obRCarneMarianaPimentel->setValor3 (number_format(round($nuValor3,2),2,',','.')); } + //Corrigindo correcao monetaria quando for a 1º emissao do carne quando não houver vencimento 3 do carne + }else if($nuValor3 == ''){ + $this->obRCarneMarianaPimentel->setValor3 (number_format($nuValorCorrecaoMonetaria,2,',','.')); + $this->obRCarneMarianaPimentel->setValorOutros(number_format($nuValorCorrecaoMonetaria,2,',','.')); } } } else { diff --git a/gestaoTributaria/fontes/PHP/arrecadacao/classes/boletos/RCarneDiversosMataSaoJoao2010.class.php b/gestaoTributaria/fontes/PHP/arrecadacao/classes/boletos/RCarneDiversosMataSaoJoao2010.class.php index 499c454..2d5a497 100755 --- a/gestaoTributaria/fontes/PHP/arrecadacao/classes/boletos/RCarneDiversosMataSaoJoao2010.class.php +++ b/gestaoTributaria/fontes/PHP/arrecadacao/classes/boletos/RCarneDiversosMataSaoJoao2010.class.php @@ -1820,7 +1820,7 @@ function imprimirCarne($diffBaixa = FALSE) // % de multa $this->obRCarneMata->flValorMulta = number_format($stMultaNormal,2,',','.'); - SistemaLegado::mostraVar($stMultaNormal, '$stMultaNormal'); + $this->obRCarneMata->flValorMultaJuros = ( number_format(bcadd($stJuroNormal, $stMultaNormal, 2),2,',','')); $this->obRCarneMata->flValorOutros = number_format(round($stCorrecaoNormal,2),2,',','.'); //----------------------------------------------------------------------- diff --git a/gestaoTributaria/fontes/PHP/arrecadacao/classes/boletos/RCarneDiversosMataSaoJoao2011.class.php b/gestaoTributaria/fontes/PHP/arrecadacao/classes/boletos/RCarneDiversosMataSaoJoao2011.class.php index f6778c3..153c477 100644 --- a/gestaoTributaria/fontes/PHP/arrecadacao/classes/boletos/RCarneDiversosMataSaoJoao2011.class.php +++ b/gestaoTributaria/fontes/PHP/arrecadacao/classes/boletos/RCarneDiversosMataSaoJoao2011.class.php @@ -1821,7 +1821,7 @@ function imprimirCarne($diffBaixa = FALSE) // % de multa $this->obRCarneMata->flValorMulta = number_format($stMultaNormal,2,',','.'); - SistemaLegado::mostraVar($stMultaNormal, '$stMultaNormal'); + $this->obRCarneMata->flValorMultaJuros = ( number_format(bcadd($stJuroNormal, $stMultaNormal, 2),2,',','')); $this->obRCarneMata->flValorOutros = number_format(round($stCorrecaoNormal,2),2,',','.'); //----------------------------------------------------------------------- diff --git a/gestaoTributaria/fontes/PHP/arrecadacao/classes/boletos/RCarneDiversosUrbem.class.php b/gestaoTributaria/fontes/PHP/arrecadacao/classes/boletos/RCarneDiversosUrbem.class.php index ea773f9..af28665 100644 --- a/gestaoTributaria/fontes/PHP/arrecadacao/classes/boletos/RCarneDiversosUrbem.class.php +++ b/gestaoTributaria/fontes/PHP/arrecadacao/classes/boletos/RCarneDiversosUrbem.class.php @@ -1657,17 +1657,6 @@ function imprimirCarne($diffBaixa = FALSE) $flValorTotalCorrecao = 0.00; $flValorTotalGeral = 0.00; -/* -echo "total geral = ".$flValorTotalGeral."
    "; -echo "total correcao = ".$flValorTotalCorrecao."
    "; -echo "total multa = ".$flValorTotalMulta."
    "; -echo "total juros = ".$flValorTotalJuros."
    "; -echo "total = ".$flValorTotal."
    "; - -sistemaLegado::mostravar( $rsGeraCarneCabecalho ); -sistemaLegado::mostravar( $rsListaDetalheCreditos );exit; -*/ - if ( $obErro->ocorreu() ) { break; } diff --git a/gestaoTributaria/fontes/PHP/arrecadacao/classes/boletos/RCarneDividaMataSaoJoao.class.php b/gestaoTributaria/fontes/PHP/arrecadacao/classes/boletos/RCarneDividaMataSaoJoao.class.php index 8a77ca7..7c8392a 100644 --- a/gestaoTributaria/fontes/PHP/arrecadacao/classes/boletos/RCarneDividaMataSaoJoao.class.php +++ b/gestaoTributaria/fontes/PHP/arrecadacao/classes/boletos/RCarneDividaMataSaoJoao.class.php @@ -1258,7 +1258,7 @@ $stComposicao = /* imposto/taxa */ $arTMP = explode( ";", $this->stImpostoTaxa ); //teste aqui -//sistemaLegado::mostravar( $arTMP );exit; + if ( count($arTMP)-1 >= 0 ) { $this->Text( $x+156, $y+(92*$inTamY) , $arTMP[count($arTMP)-1] ); for ( $inX=count($arTMP)-2; $inX>=0; $inX-- ) @@ -1473,7 +1473,6 @@ function imprimirCarne($diffBaixa = FALSE) foreach ($this->arEmissao as $valor => $chave) { /* imprimir duas folhas com dados cadastrais */ /* buscar informações para dados cadastrais*/ - //sistemaLegado::mostravar( $chave );exit; $stFiltro = " ddc.numcgm = ".$chave[0]['numcgm']." AND ap.cod_parcela = ".$chave[0]['cod_parcela']." \n"; $obTDATDividaAtiva = new TDATDividaAtiva; @@ -1484,8 +1483,6 @@ function imprimirCarne($diffBaixa = FALSE) $obTDATDividaAtiva->RecuperaCapaCarneDividaMataSaoJoao( $rsListaCarne, $stFiltro ); //$rsListaCarne = new RecordSet; - //$obTDATDividaAtiva->debug();exit; - //sistemaLegado::mostravar( $rsListaCarne );exit; // $rsListaCarne->addFormatacao ('total_reducao','NUMERIC_BR'); $rsListaCarne->ordena( "exercicio_original" ); @@ -1574,11 +1571,6 @@ function imprimirCarne($diffBaixa = FALSE) } } //comentei aqui -//echo "total de parcelas = ".$inTotalParcelas."
    "; -//echo "total de inscricoes = ".$inTotalInscricoes."
    "; -// sistemaLegado::mostravar( $this->obRCarnePetropolis->arDemonstrativoParcelas ); -//sistemaLegado::mostravar( $this->obRCarnePetropolis->arVencimentosDemonstrativos ); -//exit; $rsListaCarne->setPrimeiroElemento(); /* setar todos os dados necessarios */ @@ -1601,7 +1593,6 @@ function imprimirCarne($diffBaixa = FALSE) $this->obRCarnePetropolis->stCondominio = (string) $rsListaCarne2->getCampo("condominio"); $this->obRCarnePetropolis->stInscricaoImobiliaria = (string) $rsListaCarne->getCampo("inscricao_municipal"); $this->obRCarnePetropolis->stInscricaoEconomica = (string) $rsListaCarne->getCampo("inscricao_economica"); -//sistemaLegado::mostravar( $rsListaCarne2->getCampo("imposto_taxa") );exit; //$arTMP = explode( "/", $rsListaCarne2->getCampo("imposto_taxa") ); $this->obRCarnePetropolis->stImpostoTaxa = $stImpostos;//(string) $arTMP[0]; $this->obRCarnePetropolis->stNroCobrancaDA = (string) $rsListaCarne->getCampo("numero_parcelamento")."/".$rsListaCarne->getCampo("exercicio_cobranca"); @@ -1624,7 +1615,7 @@ function imprimirCarne($diffBaixa = FALSE) } $this->obRCarnePetropolis->setObservacaoL1 ('Créditos: '); $arEndereco = explode( "§", $rsGeraCarneCabecalho->getCampo( 'nom_logradouro' ) ); -//sistemaLegado::mostravar( $rsGeraCarneCabecalho );exit; + while ( !$rsGeraCarneCabecalho->eof() ) { /* montagem cabecalho (protocolo) */ $this->obRCarnePetropolis->setCt ( $rsGeraCarneCabecalho->getCampo( 'ano_aquisicao' ) ); diff --git a/gestaoTributaria/fontes/PHP/arrecadacao/classes/boletos/RCarneDividaMataSaoJoao2010.class.php b/gestaoTributaria/fontes/PHP/arrecadacao/classes/boletos/RCarneDividaMataSaoJoao2010.class.php index 0bcec7b..3ea45b0 100644 --- a/gestaoTributaria/fontes/PHP/arrecadacao/classes/boletos/RCarneDividaMataSaoJoao2010.class.php +++ b/gestaoTributaria/fontes/PHP/arrecadacao/classes/boletos/RCarneDividaMataSaoJoao2010.class.php @@ -1640,7 +1640,6 @@ $stComposição = // /* imposto/taxa */ // $arTMP = explode( ";", $this->stImpostoTaxa); //teste aqui // /* -// sistemaLegado::mostravar( $arTMP );exit; // */ // $inContImpostTaxa = 0; // $stImpostoTaxaTmp = ''; diff --git a/gestaoTributaria/fontes/PHP/arrecadacao/classes/boletos/RCarneDividaRefis2009MataSaoJoao.class.php b/gestaoTributaria/fontes/PHP/arrecadacao/classes/boletos/RCarneDividaRefis2009MataSaoJoao.class.php index a1bdf27..455ee6b 100644 --- a/gestaoTributaria/fontes/PHP/arrecadacao/classes/boletos/RCarneDividaRefis2009MataSaoJoao.class.php +++ b/gestaoTributaria/fontes/PHP/arrecadacao/classes/boletos/RCarneDividaRefis2009MataSaoJoao.class.php @@ -1256,7 +1256,7 @@ $stComposição = /* imposto/taxa */ $arTMP = explode( ";", $this->stImpostoTaxa ); //teste aqui -//sistemaLegado::mostravar( $arTMP );exit; + if ( count($arTMP)-1 >= 0 ) { $this->Text( $x+156, $y+(92*$inTamY) , $arTMP[count($arTMP)-1] ); for ( $inX=count($arTMP)-2; $inX>=0; $inX-- ) @@ -1471,7 +1471,6 @@ function imprimirCarne($diffBaixa = FALSE) foreach ($this->arEmissao as $valor => $chave) { /* imprimir duas folhas com dados cadastrais */ /* buscar informações para dados cadastrais*/ - //sistemaLegado::mostravar( $chave );exit; $stFiltro = " ddc.numcgm = ".$chave[0]['numcgm']." AND ap.cod_parcela = ".$chave[0]['cod_parcela']." \n"; $obTDATDividaAtiva = new TDATDividaAtiva; @@ -1483,7 +1482,6 @@ function imprimirCarne($diffBaixa = FALSE) //$rsListaCarne = new RecordSet; //$obTDATDividaAtiva->debug();exit; - //sistemaLegado::mostravar( $rsListaCarne );exit; // $rsListaCarne->addFormatacao ('total_reducao','NUMERIC_BR'); $rsListaCarne->ordena( "exercicio_original" ); @@ -1569,11 +1567,6 @@ function imprimirCarne($diffBaixa = FALSE) } } //comentei aqui -//echo "total de parcelas = ".$inTotalParcelas."
    "; -//echo "total de inscricoes = ".$inTotalInscricoes."
    "; -// sistemaLegado::mostravar( $this->obRCarnePetropolis->arDemonstrativoParcelas ); -//sistemaLegado::mostravar( $this->obRCarnePetropolis->arVencimentosDemonstrativos ); -//exit; $rsListaCarne->setPrimeiroElemento(); /* setar todos os dados necessarios */ @@ -1596,7 +1589,6 @@ function imprimirCarne($diffBaixa = FALSE) $this->obRCarnePetropolis->stCondominio = (string) $rsListaCarne2->getCampo("condominio"); $this->obRCarnePetropolis->stInscricaoImobiliaria = (string) $rsListaCarne->getCampo("inscricao_municipal"); $this->obRCarnePetropolis->stInscricaoEconomica = (string) $rsListaCarne->getCampo("inscricao_economica"); -//sistemaLegado::mostravar( $rsListaCarne2->getCampo("imposto_taxa") );exit; //$arTMP = explode( "/", $rsListaCarne2->getCampo("imposto_taxa") ); $this->obRCarnePetropolis->stImpostoTaxa = $stImpostos;//(string) $arTMP[0]; $this->obRCarnePetropolis->stNroCobrancaDA = (string) $rsListaCarne->getCampo("numero_parcelamento")."/".$rsListaCarne->getCampo("exercicio_cobranca"); @@ -1618,7 +1610,6 @@ function imprimirCarne($diffBaixa = FALSE) break; } $this->obRCarnePetropolis->setObservacaoL1 ('Créditos: '); -//sistemaLegado::mostravar( $rsGeraCarneCabecalho );exit; $arEndereco = explode( "§", $rsGeraCarneCabecalho->getCampo( 'nom_logradouro' ) ); while ( !$rsGeraCarneCabecalho->eof() ) { diff --git a/gestaoTributaria/fontes/PHP/arrecadacao/classes/boletos/RCarneIPTUMataSaoJoao2016.class.php b/gestaoTributaria/fontes/PHP/arrecadacao/classes/boletos/RCarneIPTUMataSaoJoao2016.class.php new file mode 100644 index 0000000..58e7317 --- /dev/null +++ b/gestaoTributaria/fontes/PHP/arrecadacao/classes/boletos/RCarneIPTUMataSaoJoao2016.class.php @@ -0,0 +1,2937 @@ + +Imagem = $valor; } + public function setNomCgm($valor) { $this->stNomCgm = $valor; } + public function setRua($valor) { $this->stRua = $valor; } + public function setNumero($valor) { $this->stNumero = $valor; } + public function setComplemento($valor) { $this->stComplemento = $valor; } + public function setCidade($valor) { $this->stCidade = $valor; } + public function setUf($valor) { $this->stUf = $valor; } + public function setCep($valor) { $this->stCep = $valor; } + public function setInscricao($valor) { $this->inInscricao = $valor; } + public function setCtmDci($valor) { $this->inCtmDci = $valor; } + public function setCodLogradouro($valor) { $this->inCodLogradouro = $valor; } + public function setDistrito($valor) { $this->inDistrito = $valor; } + public function setCt($valor) { $this->inCt = $valor; } + public function setCa($valor) { $this->inCa = $valor; } + public function setProcessamento($valor) { $this->dtProcessamento = $valor; } + public function setAreaTerreno($valor) { $this->flAreaTerreno = $valor; } + public function setAreaEdificada($valor) { $this->flAreaEdificada = $valor; } + public function setUtilizacaoImovel($valor) { $this->stUtilizacaoImovel = $valor; } + public function setTributo($valor) { $this->stTributo = $valor; } + public function setTributo2($valor) { $this->stTributo2 = $valor; } + public function setTributo3($valor) { $this->stTributo3 = $valor; } + public function setValorTributoReal($valor) { $this->flValorTributoReal = $valor; } + public function setImpostoAnualReal($valor) { $this->flImpostoAnualReal = $valor; } + public function setObservacao($valor) { $this->stObservacao = $valor; } + public function setTaxaLimpezaAnual($valor) { $this->flTaxaLimpezaAnual = $valor; } + public function setValorAnualReal($valor) { $this->flValorAnualReal = $valor; } + public function setReferencia($valor) { $this->inReferencia = $valor; } + public function setNumeroPlanta($valor) { $this->inNumeroPlanta = $valor; } + public function setQuadro1($valor) { $this->stQuadro1 = $valor; } + public function setQuadro2($valor) { $this->stQuadro2 = $valor; } + public function setQuadro3($valor) { $this->stQuadro3 = $valor; } + public function setExercicio($valor) { $this->stExercicio = $valor; } + public function setNomBairro($valor) { $this->stNomBairro = $valor; } + public function setLoginUsuario($valor) { $this->stLoginUsuario = $valor; } + public function setCodUsuario($valor) { $this->stCodUsuario = $valor; } + public function setEndEntrega($valor) { $this->stEnderecoEntrega = $valor; } + public function setTotalLancado($valor) { $this->flTotalLancado = $valor; } + + /* getters */ + public function getImagem() { return $this->Imagem ; } + public function getNomCgm() { return $this->stNomCgm ; } + public function getRua() { return $this->stRua ; } + public function getNumero() { return $this->stNumero ; } + public function getComplemento() { return $this->stComplemento ; } + public function getCidade() { return $this->stCidade ; } + public function getUf() { return $this->stUf ; } + public function getCep() { return $this->stCep ; } + public function getInscricao() { return $this->inInscricao ; } + public function getCtmDci() { return $this->inCtmDci ; } + public function getCodLogradouro() { return $this->inCodLogradouro ; } + public function getDistrito() { return $this->inDistrito ; } + public function getCt() { return $this->inCt ; } + public function getCa() { return $this->inCa ; } + public function getProcessamento() { return $this->dtProcessamento ; } + public function getAreaTerreno() { return $this->flAreaTerreno ; } + public function getAreaEdificada() { return $this->flAreaEdificada ; } + public function getUtilizacaoImovel() { return $this->stUtilizacaoImovel ; } + public function getTributo() { return $this->stTributo ; } + public function getValorTributoReal() { return $this->flValorTributoReal ; } + public function getImpostoAnualReal() { return $this->flImpostoAnualReal ; } + public function getObservacao() { return $this->stObservacao ; } + public function getTaxaLimpezaAnual() { return $this->flTaxaLimpezaAnual ; } + public function getValorAnualReal() { return $this->flValorAnualReal ; } + public function getReferencia() { return $this->inReferencia ; } + public function getNumeroPlanta() { return $this->inNumeroPlanta ; } + public function getQuadro1() { return $this->stQuadro1 ; } + public function getQuadro2() { return $this->stQuadro2 ; } + public function getQuadro3() { return $this->stQuadro3 ; } + public function getExercicio() { return $this->stExercicio ; } + public function getNomBairro() { return $this->stNomBairro ; } + public function getLoginUsuario() { return $this->stLoginUsuario ; } + public function getCodUsuario() { return $this->stCodUsuario ; } + public function getEndEntrega() { return $this->stEnderecoEntrega ; } + public function getTotalLancado() { return $this->flTotalLancado ; } + + public function defineCodigoBarras($xpos, $ypos, $code, $basewidth = 0.7, $height = 12) + { + //global $pdf; + $wide = $basewidth; + $narrow = $basewidth / 2 ; + + // wide/narrow codes for the digits + $barChar['0'] = 'nnwwn'; + $barChar['1'] = 'wnnnw'; + $barChar['2'] = 'nwnnw'; + $barChar['3'] = 'wwnnn'; + $barChar['4'] = 'nnwnw'; + $barChar['5'] = 'wnwnn'; + $barChar['6'] = 'nwwnn'; + $barChar['7'] = 'nnnww'; + $barChar['8'] = 'wnnwn'; + $barChar['9'] = 'nwnwn'; + $barChar['A'] = 'nn'; + $barChar['Z'] = 'wn'; + + // add leading zero if code-length is odd + if (strlen($code) % 2 != 0) { + $code = '0' . $code; + } + + $this->SetFont('Arial','',10); + $this->SetFillColor(0); + + // add start and stop codes + $code = 'AA'.strtolower($code).'ZA'; + + for ($i=0; $iError('Invalid character in barcode: '.$charBar); + } + if (!isset($barChar[$charSpace])) { + $this->Error('Invalid character in barcode: '.$charSpace); + } + // create a wide/narrow-sequence (first digit=bars, second digit=spaces) + $seq = ''; + for ($s=0; $sRect($xpos, $ypos, $lineWidth, $height, 'F'); + } + $xpos += $lineWidth; + } + } + } + + /* configura a pagina de carne */ + public function configuraProtocolo() + { + $this->open(); + $this->setTextColor(0); + $this->addPage(); + $this->setLeftMargin(0); + $this->setTopMargin(0); + $this->SetLineWidth(0.01); + } + + /* layout do protocolo */ + public function drawProtocolo() + { + if ( Sessao::read( 'itbi_observacao' ) == 'sim') { + $this->lblVlTribReal = 'VALOR TRIBUTÁVEL'; + //$this->lblImpAnualReal = 'IMPOSTO ANUAL'; + $this->lblImpAnualReal = 'IMPOSTO - REAL'; + //$this->lblTotalAnualRl = 'TOTAL ANUAL'; + $this->lblTotalAnualRl = 'TOTAL - REAL'; + + } + + $this->setLoginUsuario ( Sessao::read( 'nomCgm' ) ); + $this->setCodUsuario ( Sessao::read('numCgm') ); + + $this->setFont('Arial','',10); + + //thisfineCodigoBarras(10,50,'816100000016143532732003601232006101100000000016'); + + /* retangula mais externo */ + $this->Rect( 7, 8+$this->inTamY, 196, 82); + + /* linhas horizontais maiores */ + $this->Line( 7, 27+$this->inTamY, 203, 27+$this->inTamY ); + $this->Line( 7, 47+$this->inTamY, 203, 47+$this->inTamY ); + $this->Line( 7, 62+$this->inTamY, 203, 62+$this->inTamY ); + $this->Line( 7, 71+$this->inTamY, 203, 71+$this->inTamY ); + + /* lisinhas horizontais menores */ + $this->Line( 115, 33.65+$this->inTamY, 203, 33.65+$this->inTamY ); + $this->Line( 115, 40.3+$this->inTamY , 203, 40.3+$this->inTamY ); + $this->Line( 115, 54.5+$this->inTamY, 203, 54.5+$this->inTamY ); + $this->Line( 115, 80+$this->inTamY, 203, 80+$this->inTamY ); + + /* lisinhas verticais */ + $this->Line( 33 , 62+$this->inTamY , 33 , 71+$this->inTamY ); + $this->Line( 58 , 62+$this->inTamY , 58 , 71+$this->inTamY ); + $this->Line( 85 , 62+$this->inTamY , 85 , 71+$this->inTamY ); + $this->Line( 115, 27+$this->inTamY , 115, 90+$this->inTamY ); + $this->Line( 162, 40.3+$this->inTamY , 162, 90+$this->inTamY ); + $this->Line( 152, 40.3+$this->inTamY , 152, 47+$this->inTamY ); + $this->Line( 142, 40.3+$this->inTamY , 142, 47+$this->inTamY ); + $this->Line( 172, 40.3+$this->inTamY , 172, 47+$this->inTamY ); + + /* brazao */ + if ($this->Imagem) { + $stExt = substr( $this->Imagem, strlen($this->Imagem)-3, strlen($this->Imagem) ); + $this->Image( $this->Imagem, 8, 9+$this->inTamY, 25, 16.5, $stExt ); + } + + /* labels fixos */ + $this->setFont('Arial','B',13); // fonte do primeiro titulo + $this->Text ( 60, 17+$this->inTamY, $this->Titulo1 ); + + $this->setFont('Arial','B',11); // fonte do titulo menor + $this->Text ( 65, 22+$this->inTamY, $this->Titulo2 ); + + $this->setFont('Arial','B',6); // fonte dos labels dos dados + if ( Sessao::read( 'itbi_observacao' ) == 'sim') { + $this->Text ( 8 , 29.5+$this->inTamY, 'ADQUIRENTE' ); + $this->setFont('Arial','B',10); + $this->Text ( 95 , 26+$this->inTamY , 'ITIV' ); + $this->setFont('Arial','B',6); + } else { + $this->Text ( 8 , 29.5, $this->lblContribuinte ); + } + $this->Text ( 115.5, 29.5+$this->inTamY, $this->lblInscricao ); + $this->Text ( 115.5, 36+$this->inTamY , $this->lblCtmDci ); + $this->Text ( 115.5, 42.5+$this->inTamY, $this->lblLogradouro ); + $this->Text ( 143 , 42.5+$this->inTamY, $this->lblDistrito ); + $this->Text ( 153 , 42.5+$this->inTamY, $this->lblCt ); + $this->Text ( 163 , 42.5+$this->inTamY, $this->lblCa ); + $this->Text ( 173 , 42.5+$this->inTamY, $this->lblDtProcesso ); + + $this->Text ( 8 , 49.5+$this->inTamY, $this->lblLocalizacao ); + $this->Text ( 115.5, 49.5+$this->inTamY, $this->lblTerreno ); + $this->Text ( 163 , 49.5+$this->inTamY, $this->lblEdificada ); + $this->Text ( 115.5, 57+$this->inTamY , $this->lblUtilizacaoIm ); + $this->Text ( 163 , 57+$this->inTamY , $this->lblTributo ); + + $this->Text ( 8 , 64+$this->inTamY , $this->lblNroPlanta ); + $this->Text ( 86 , 64+$this->inTamY , $this->lblExercicio ); + $this->Text ( 115.5, 64+$this->inTamY , $this->lblVlTribReal ); + $this->Text ( 163 , 64+$this->inTamY , $this->lblImpAnualReal ); + + if ( Sessao::read( 'itbi_observacao' ) == 'sim') { + $this->Text ( 8 , 73+$this->inTamY ,"REQUERIMENTO DE I.T.I.V." ); + } else { + $this->Text ( 8 , 73 , $this->lblObservacao ); + } + if ( Sessao::read( 'itbi_observacao' ) == 'sim') { + $this->Text ( 115.5, 73+$this->inTamY , "TAXA DE EXPEDIENTE" ); + } else { + $this->Text ( 115.5, 73 , $this->lblLimpAnualRl ); + } + if ( Sessao::read( 'itbi_observacao' ) == 'sim') { + $this->Text ( 163 , 73+$this->inTamY , $this->lblTxAverbacao ); + $this->Text ( 163 , 82+$this->inTamY , $this->lblTotalAnualRl ); + } else { + $this->Text ( 163 , 73 , $this->lblTotalAnualRl ); + $this->Text ( 163 , 82 , $this->lblTotalLancado ); + } + + if ( Sessao::read( 'itbi_observacao' ) == 'sim') { + //$this->Text ( 115.5, 82+$this->inTamY , 'MULTA DE MORA' ); + } else { + $this->Text ( 115.5, 82 , $this->lblReferencia ); + } + + $this->setFont('Arial','' , 5 ); + $this->Text ( 8 , 92+$this->inTamY , $this->lblUrbem ); + + if ($this->stLoginUsuario != "" && $this->stCodUsuario != "") { + $this->Text ( 115.5, 92+$this->inTamY , $this->stCodUsuario." - ".$this->stLoginUsuario ); + } + + /* Fim do layout do quadrado superior */ + } + + /* Posicionamento das variáveis */ + public function posicionaVariaveisProtocolo() + { + $this->setFont('Arial', 'b', 7 ); + if ( !Sessao::read( 'itbi_observacao' ) ) { + $this->Text ( 8 , 34+$this->inTamY , strtoupper($this->stNomCgm) ); + } else { + require_once(CAM_GT_ARR_MAPEAMENTO."TARRImovelVVenal.class.php"); + $obImovelVVenal = new TARRImovelVVenal; + $filtro = "and inscricao_municipal = ".$this->inInscricao; + $obImovelVVenal->recuperaMensagemItbi($rsItbi,$filtro); + $this->stAdquirente = $rsItbi->getCampo('adquirinte'); + + $this->Text ( 8 , 34+$this->inTamY , strtoupper($this->stAdquirente) ); + } + // array com dados do endereço; + $arEnd = explode('|*|',$this->stEnderecoEntrega); + + $this->Text ( 8 , 37.5+$this->inTamY , strtoupper($arEnd[0].' '.$arEnd[1])); + $this->Text ( 8 , 41+$this->inTamY , strtoupper($arEnd[2]." - ".$arEnd[3]) ); + $this->Text ( 8 , 44.5+$this->inTamY , strtoupper($arEnd[6].' '.$arEnd[5].' CEP:'.$arEnd[4]) ); + + $this->Text ( 156 , 32+$this->inTamY , strtoupper($this->inInscricao) ); + $this->Text ( 145 , 37.5+$this->inTamY , strtoupper($this->inCtmDci) ); + $this->Text ( 122 , 46+$this->inTamY , strtoupper($this->inCodLogradouro) ); + $this->Text ( 145 , 46+$this->inTamY , strtoupper($this->inDistrito) ); + $this->Text ( 155 , 46+$this->inTamY , strtoupper($this->inCt) ); + $this->Text ( 165 , 46+$this->inTamY , strtoupper($this->inCa) ); + $this->Text ( 180 , 46+$this->inTamY , strtoupper($this->dtProcessamento) ); + + $this->Text ( 8 , 54+$this->inTamY , strtoupper($this->stRua.' '.$this->stNumero) ); + $this->Text ( 8 , 58+$this->inTamY , strtoupper($this->stComplemento." - ".$this->stNomBairro) ); + $this->Text ( 145 , 52.5+$this->inTamY , strtoupper($this->flAreaTerreno) ); + $this->Text ( 185 , 52.5+$this->inTamY , strtoupper($this->flAreaEdificada) ); + + $this->Text ( 130 , 60.5+$this->inTamY , strtoupper($this->stUtilizacaoImovel) ); + $this->setFont('Arial', 'b' , 6 ); + $this->Text ( 165 , 60.5+$this->inTamY , strtoupper(substr($this->stTributo,0,28)) ); + $this->Text ( 165 , 68.5+$this->inTamY , strtoupper(substr($this->stTributo2,0,28)) ); + $this->setFont('Arial', 'b', 7 ); + $this->Text ( 90 , 68+$this->inTamY , strtoupper($this->stExercicio) ); +// $this->Text ( 8 , 76.5 , strtoupper($this->stObservacao)); + + // Observacao + // 3 linhas de observacao + if ( Sessao::read( 'itbi_observacao' ) == 'sim') { + require_once(CAM_GT_ARR_MAPEAMENTO."TARRImovelVVenal.class.php"); + $obImovelVVenal = new TARRImovelVVenal; + $filtro = "and inscricao_municipal = ".$this->inInscricao; + $obImovelVVenal->recuperaMensagemItbi($rsItbi,$filtro); + $rsItbi->addFormatacao ('base_calculo','NUMERIC_BR'); + $rsItbi->addFormatacao ('valor_financiado','NUMERIC_BR'); + $rsItbi->addFormatacao ('valor_pactuado','NUMERIC_BR'); + //$stObsL1 = "Adquirinte : ".$rsItbi->getCampo('adquirinte'); + //$stObsL2 = "Transmitente : ".$rsItbi->getCampo('transmitente'); + $stObsL3 = "Base de Calculo : ".$rsItbi->getCampo('base_calculo')." ITIV: ".$this->flImpostoAnualReal; + $stObsL4 = "Valor Financiado : ".$rsItbi->getCampo('valor_financiado'); + //$stObsL5 = "Valor Pactuado : ".$rsItbi->getCampo('valor_pactuado'); + $stObsL5 = "Natureza de Transferência: ".$rsItbi->getCampo('cod_natureza')." - ".$rsItbi->getCampo('descricao'); + if ( $rsItbi->getCampo('cod_processo') ) + $stObsL7 = "Processo : ".$rsItbi->getCampo('cod_processo')."/".$rsItbi->getCampo('exercicio'); + + $this->Text ( 8 , 75.5+$this->inTamY , $stObsL3 ); + $this->Text ( 8 , 78+$this->inTamY , $stObsL4 ); + $this->Text ( 8 , 80.5+$this->inTamY , $stObsL5 ); + $this->Text ( 8 , 83+$this->inTamY , $stObsL6 ); + $this->Text ( 8 , 85.5 +$this->inTamY, $stObsL7 ); +// $this->Text ( 8 , 88 , $stObsL6 ); +// $this->Text ( 70 , 73 , $stObsL7 ); + // coloca atributo TRANSMITENTE no cabeçaho + $this->Text ( 8 , 34+$this->inTamY , strtoupper($rsItbi->getCampo('transmitente') )); + + } else { + $stObs = str_replace("\n"," ",$this->stObservacao); + $this->Text ( 8 , 76.5+$this->inTamY , substr($stObs,0 ,70 )); + $this->Text ( 8 , 79+$this->inTamY , substr($stObs,70 ,70 )); + $this->Text ( 8 , 81.5+$this->inTamY , substr($stObs,140 ,70 )); + $this->Text ( 8 , 84+$this->inTamY , substr($stObs,210 ,70 )); + $this->Text ( 8 , 86.5+$this->inTamY , substr($stObs,280 ,70 )); + } + // caso seja itbi, mostra o valor de base da calculo como valor tributavel + if ( Sessao::read( 'itbi_observacao' ) == 'sim') + $this->Text ( 145 , 68+$this->inTamY , $rsItbi->getCampo('base_calculo')); + else + $this->Text ( 145 , 68 , strtoupper($this->flValorTributoReal) ); + + $this->Text ( 183 , 68+$this->inTamY , strtoupper($this->flImpostoAnualReal ) ); + if ( Sessao::read( 'itbi_observacao' ) == 'sim') { + $this->Text ( 145 , 76.5+$this->inTamY , $rsItbi->getCampo('taxa') ); + $this->Text ( 145 , 85.5+$this->inTamY , $rsItbi->getCampo('multa') ); + $this->Text ( 183 , 76.5+$this->inTamY , $this->flTxAverbacao ); + } else { + $this->Text ( 145 , 76.5 , strtoupper($this->flTaxaLimpezaAnual) ); + } + if ( Sessao::read( 'itbi_observacao' ) == 'sim') { + $vlrTaxa = str_replace(',','.',str_replace('.','',$rsItbi->getCampo('taxa'))); + $vlrImp = str_replace(',','.',str_replace('.','',$this->flValorAnualReal)); + $vlrAnual = $vlrImp+$vlrTaxa; + + //$this->Text ( 183 , 85.5+$this->inTamY , number_format($vlrAnual,2,',','.') ); + $this->Text ( 183 , 85.5+$this->inTamY , $this->flImpostoAnualReal); //number_format($this->flImpostoAnualReal,2,',','.') ); + } else { + $this->Text ( 183 , 76.5 , strtoupper($this->flValorAnualReal) ); + $this->Text ( 183 , 85.5 , number_format($this->flTotalLancado,2,',','.') ); + } + $this->Text ( 115.5 , 85.5+$this->inTamY , strtoupper($this->inReferencia) ); + //limpar memoria + unset($rsItbi,$obImovelVVenal); + } + /* Fim do posicionamento das variáveis */ + + /* gera o PDF */ + public function show() + { + $this->output('Carne.pdf','D'); + } + + /* adiciona nova pagina */ + public function novaPagina() + { + $this->addPage(); + } + /* + * Desenha informações complementares + */ + public function drawComplemento($x,$y) + { + ; + $this->setFont('Arial','',10); + + /* retangulos */ + $this->Rect( $x, $y, 92, 74 ); + $this->Rect( ($x+95), $y, 102, 74 ); + + $this->setFont('Arial','BU',8); + /* Cada nova linha sao mais 3.5 */ + /* esquerda */ + $this->Text ( ($x+5) , ($y+3.5) , strtoupper('REDE AUTORIZADA PARA ARRECADAÇÃO VENCIMENTO DO') ); + $this->Text ( ($x+40) , ($y+7) , strtoupper('IPTU-2016') ); + + $this->setFont('Arial','',8); + $this->Text ( ($x+7) , ($y+12) , strtoupper('BRADESCO - BANCO DO BRASIL - BANESPA - BCN -') ); + $this->Text ( ($x+6) , ($y+15.5) , strtoupper('BANERJ - CAIXA ECONOMICA - HSBC - ITAU -REAL -') ); + $this->Text ( ($x+5) , ($y+19) , strtoupper('UNIBANCO - CASAS LOTÉRICAS - SUPERMERCADOS') ); + $this->Text ( ($x+25) , ($y+22.5), strtoupper('CREDENCIADOS - BANCO POSTAL') ); + + $this->setFont('Arial','BU',8); + $this->Text ( ($x+30) , ($y+26) , strtoupper('FORMA DE PAGAMENTO') ); + + $this->setFont('Arial','',8); + $this->Text ( ($x+9) , ($y+31) , strtoupper('AGÊNCIA BANCÁRIA INTERNET TELEFONE REDE AUTO') ); + $this->Text ( ($x+32) , ($y+34.5) , strtoupper('ATENDIMENTO(24h)') ); + $this->setFont('Arial','',6); + $this->Text ( ($x+2) , ($y+38) , 'Dependendo dos serviços disponibilizados pelo Banco escolhido para efetuar o pagamento' ) ; +// $this->Text ( ($x+35) , ($y+41.5), 'efetuar o pagamento') ; + + // direita + $this->setFont('Arial','BU',8); + $x +=92; + $this->Text ( ($x+12) , ($y+3.5) , strtoupper('FATORES DE ATUALIZAÇÃO APÓS O VENCIMENTO') ); + $this->setFont('Arial','',8); + $this->Text ( ($x+5) , ($y+12) , 'MULTA: 5% no primeiro mês ou fração' ); + $this->Text ( ($x+5) , ($y+15.5) , ' 10% no segundo mês ou fração' ); + $this->Text ( ($x+5) , ($y+19) , ' 15% no terceiro mês ou fração' ); + $this->Text ( ($x+5) , ($y+22.5) , ' 20% a partir do quarto mês ou fração' ); + $this->Text ( ($x+5) , ($y+26) , 'JUROS: ' ); + $this->Text ( ($x+5) , ($y+29.5) , ' 1% ao mês ou fração, a partir do mês' ); + $this->Text ( ($x+5) , ($y+33) , ' subsequente ao Vencimento ' ); + + $this->setFont('Arial','BU',8); + $this->Text ( ($x+26) , ($y+38) , strtoupper('INFORMAÇÕES COMPLEMENTARES') ); + $this->setFont('Arial','',8); + $this->Text ( ($x+5) , ($y+45) , '- A segunda via do carnê poderá ser obtida via internet,ou na') ; + $this->Text ( ($x+5) , ($y+48.5), ' Secretaria de fazenda, Rua 16 de Março, 183 - Centro.') ; + $this->Text ( ($x+5) , ($y+52) , '- Quando o pagamento ultrapassar o dia de vencimento previsto ') ; + $this->Text ( ($x+5) , ($y+55.5), 'no carnê, o IPTU será devido com os acréscimos legais') ; + $this->Text ( ($x+5) , ($y+59) , '- Ao receber o carnê do IPTU o contribuinte deverá verificar ') ; + $this->Text ( ($x+5) , ($y+63) , ' se os dados estão corretos, e em caso de alguma divergência,') ; + $this->Text ( ($x+5) , ($y+66.5), ' apresentar sua reclamação antes do vencimento da primeira') ; + $this->Text ( ($x+5) , ($y+70) , ' Cota Única, garantindo seus direitos') ; + + } +} + +class RCarneDiversosPetropolis extends RProtocolo +{ + /* labels */ + public $lblTitulo1 = 'MATA DE SÃO JOÃO - Sec. de Adm. e Fin.'; + public $lblTitulo2 = 'IPTU'; + public $lblExercicio = 'EXERCÍCIO'; + public $lblInscricao = 'INSCRIÇÃO'; + public $lblCodDivida = 'CÓD. DÍVIDA'; + public $lblTributo = 'TRIBUTO'; + public $lblParcela = 'PARCELA'; + public $lblReferencia = 'REFERÊNCIA'; + public $lblDataProcessamento = 'DATA PROCESSAMENTO'; + public $lblVencimento = 'VENCIMENTO'; + public $lblValorCotaUnica = 'VALOR COTA ÚNICA'; + public $lblContribuinte = 'CONTRIBUINTE'; + public $lblData = 'DATA'; + public $lblCorrecao = 'CORREÇÃO'; + public $lblMonetaria = 'MONET(%)'; + public $lblObs = 'OBSERVAÇÃO'; + + public $lblMulta = '(+) MULTA DE MORA'; + public $lblJuros = '(+) JUROS DE MORA'; + public $lblOutros = '(+) ATUALIZAÇÃO MONETÁRIA'; + + public $lblValorParcela = 'VALOR PARCELA'; + public $lblReal = '(REAL)'; + public $lblNumeracao = 'NOSSO NÚMERO'; + + public $lblValorPrincipal = "(=) VALOR PRINCIPAL"; + public $lblValorTotal = "(=) TOTAL"; + + /* variaveis */ + public $ImagemCarne; + public $stExercicio; + public $inInscricao; + public $inCodDivida; + public $stTributo; + public $stTributoAbrev; + public $stTributoAbrev2; + public $stTributoAbrev3; + public $stParcela; + public $inReferencia; + public $dtProcessamento; + public $dtVencimento; + public $dtVencimentof1; + public $dtVencimentof2; + public $dtVencimentof3; + public $flValorCotaUnica; + public $flValor; + public $flValorf1; + public $flValorf2; + public $flValorf3; + public $stNomCgm; + public $stBarCode; + public $boParcelaUnica; + public $stObservacaoL1; + public $stObservacaoL2; + public $stObservacaoL3; + public $stObsVencimento; // = "Não receber após o vencimento."; + public $stNumeracao; + public $flValorMulta = '0,00'; + public $flValorJuros = '0,00'; + public $flValorMultaJuros = '0,00'; + public $flValorOutros = '0,00'; + public $flValorTotal = '0,00'; + public $stCarteira = '000/000'; + public $stEspecieDoc = 'OU(Outros)'; + public $stEspecie = 'REAL'; + public $stAceite = 'N'; + public $stDataProcessamento = '01/10/2009'; + public $stAgenciaCodCedente = '001-1/001'; + public $stLocalPagamento = 'Pagável em qualquer banco até o vencimento'; + public $stCedente = 'Prefeitura Municipal de Mata de São João'; + public $stDataDocumento = '01/10/2009'; + public $stQuantidade = "200"; + public $tamY = 0.93; + + /* Variável utilizada para verificação se cliente é isento/desonerado*/ + public $boIsento = FALSE; + + /* setters */ + public function setImagemCarne($valor) { $this->ImagemCarne = $valor; } + public function setExercicio($valor) { $this->stExercicio = $valor; } + public function setInscricao($valor) { $this->inInscricao = $valor; } + public function setCodDivida($valor) { $this->inCodDivida = $valor; } + public function setTributo($valor) { $this->stTributo = $valor; } + public function setTributoAbrev($valor) { $this->stTributoAbrev = $valor; } + public function setTributoAbrev2($valor) { $this->stTributoAbrev2 = $valor; } + public function setTributoAbrev3($valor) { $this->stTributoAbrev3 = $valor; } + public function setParcela($valor) { $this->stParcela = $valor; } + public function setReferencia($valor) { $this->inReferencia = $valor; } + public function setProcessamento($valor) { $this->dtProcessamento = $valor; } + public function setVencimento($valor) { $this->dtVencimento = $valor; } + public function setVencimento1($valor) { $this->dtVencimentof1 = $valor; } + public function setVencimento2($valor) { $this->dtVencimentof2 = $valor; } + public function setVencimento3($valor) { $this->dtVencimentof3 = $valor; } + public function setValorCotaUnica($valor) { $this->flValorCotaUnica = $valor; } + public function setValor($valor) { $this->flValor = $valor; } + public function setValor1($valor) { $this->flValorf1 = $valor; } + public function setValor2($valor) { $this->flValorf2 = $valor; } + public function setValor3($valor) { $this->flValorf3 = $valor; } + public function setNomCgm($valor) { $this->stNomCgm = $valor; } + public function setBarCode($valor) { $this->stBarCode = $valor; } + public function setLinhaCode($valor) { $this->stLinhaCode = $valor; } + public function setParcelaUnica($valor) { $this->boParcelaUnica = $valor; } + public function setObservacaoL1($valor) { $this->stObservacaoL1 = $valor; } + public function setObservacaoL2($valor) { $this->stObservacaoL2 = $valor; } + public function setObservacaoL3($valor) { $this->stObservacaoL3 = $valor; } + public function setObsVencimento($valor) { $this->stObsVencimento = $valor; } + public function setNumeracao($valor) { $this->stNumeracao = $valor; } + public function setValorTotal($valor) { $this->flValorTotal = $valor; } + + /* getters */ + public function getImagemCarne() { return $this->ImagemCarne ; } + public function getExercicio() { return $this->stExercicio ; } + public function getInscricao() { return $this->inInscricao ; } + public function getCodDivida() { return $this->inCodDivida ; } + public function getTributo() { return $this->stTributo ; } + public function getTributoAbrev() { return $this->stTributoAbrev ; } + public function getParcela() { return $this->stParcela ; } + public function getReferencia() { return $this->inReferencia ; } + public function getProcessamento() { return $this->dtProcessamento ; } + public function getVencimento() { return $this->dtVencimento ; } + public function getVencimento1() { return $this->dtVencimentof1 ; } + public function getVencimento2() { return $this->dtVencimentof2 ; } + public function getVencimento3() { return $this->dtVencimentof3 ; } + public function getValorCotaUnica() { return $this->flValorCotaUnica ; } + public function getValor() { return $this->flValor ; } + public function getValor1() { return $this->flValorf1 ; } + public function getValor2() { return $this->flValorf2 ; } + public function getValor3() { return $this->flValorf3 ; } + public function getNomCgm() { return $this->stNomCgm ; } + public function getBarCode() { return $this->stBarCode ; } + public function getLinhaCode() { return $this->stLinhaCode ; } + public function getParcelaUnica() { return $this->boParcelaUnica ; } + public function getObservacaoL1() { return $this->stObservacaoL1 ; } + public function getObservacaoL2() { return $this->stObservacaoL2 ; } + public function getObservacaoL3() { return $this->stObservacaoL3 ; } + public function getObsVencimento() { return $this->stObsVencimento ; } + public function getNumeracao() { return $this->stNumeracao ; } + + /* configura carne */ + public function configuraCarne() + { + $this->open(); + $this->setTextColor(0); + $this->addPage(); + $this->setLeftMargin(0); + $this->setTopMargin(0); + $this->SetLineWidth(0.01); + } + + /* layout do carne */ + public function drawCarne($x, $y) + { + // truncar tributo + if ( !$this->stTributoAbrev ) + $this->stTributoAbrev = substr($this->stTributo,0,25); + + $this->stNomCgm = substr($this->stNomCgm ,0,80); + $this->setFont( 'Arial','',10 ); + + $inAlteracaoMata = 48; + + $stBB = "../../../../../../gestaoAdministrativa/fontes/PHP/framework/temas/padrao/imagens/bb.jpg"; + $stExt = substr( $stBB, strlen($stBB)-3, strlen($stBB) ); + $this->Image( $stBB, $x+28+$inAlteracaoMata, $y+(6*$this->tamY)+0.5, 35, 4, $stExt ); + + if ($this->ImagemCarne) { + $stExt = substr( $this->ImagemCarne, strlen($this->ImagemCarne)-3, strlen($this->ImagemCarne) ); + $this->Image( $this->ImagemCarne, $x, $y+6, 16, 9, $stExt ); + } + $this->setFillColor( 240 ); + $this->Rect( $x, $y+(41*$this->tamY), 48, 5*$this->tamY, 'DF' ); + // linhas horizontais + $this->Line( $x+27+$inAlteracaoMata, ($y+(11*$this->tamY)), (197+$x), ($y+(11*$this->tamY)) ); + + $this->Line( $x, ($y+(17*$this->tamY)), (25+$x)+$inAlteracaoMata, ($y+(17*$this->tamY)) ); + $this->Line( $x+27+$inAlteracaoMata, ($y+(17*$this->tamY)), (197+$x), ($y+(17*$this->tamY)) ); + + $this->Line( $x, ($y+(23*$this->tamY)), (25+$x)+$inAlteracaoMata, ($y+(23*$this->tamY)) ); + $this->Line( $x+27+$inAlteracaoMata, ($y+(23*$this->tamY)), (197+$x), ($y+(23*$this->tamY)) ); + + $this->Line( $x, ($y+(29*$this->tamY)), (25+$x)+$inAlteracaoMata, ($y+(29*$this->tamY)) ); + $this->Line( $x+27+$inAlteracaoMata, ($y+(29*$this->tamY)), (197+$x), ($y+(29*$this->tamY)) ); + + $this->Line( $x+48, ($y+(35*$this->tamY)), (25+$x)+$inAlteracaoMata, ($y+(35*$this->tamY)) ); + $this->Line( $x+27+$inAlteracaoMata, ($y+(35*$this->tamY)), (197+$x), ($y+(35*$this->tamY)) ); + + $this->Line( $x, ($y+(41*$this->tamY)), (25+$x)+$inAlteracaoMata, ($y+(41*$this->tamY)) ); + $this->Line( $x+158, ($y+(41*$this->tamY)), (197+$x), ($y+(41*$this->tamY)) ); + + $this->Line( $x, ($y+(46*$this->tamY)), (25+$x)+$inAlteracaoMata, ($y+(46*$this->tamY)) ); + $this->Line( $x+158, ($y+(46*$this->tamY)), (197+$x), ($y+(46*$this->tamY)) ); + + $this->Line( $x, ($y+(51*$this->tamY)), (25+$x)+$inAlteracaoMata, ($y+(51*$this->tamY)) ); + $this->Line( $x+158, ($y+(51*$this->tamY)), (197+$x), ($y+(51*$this->tamY)) ); + + $this->Line( $x, ($y+(56*$this->tamY)), (25+$x)+$inAlteracaoMata, ($y+(56*$this->tamY)) ); + $this->Line( $x+158, ($y+(57*$this->tamY)), (197+$x), ($y+(57*$this->tamY)) ); + + $this->Line( $x, ($y+(61*$this->tamY)), (25+$x)+$inAlteracaoMata, ($y+(61*$this->tamY)) ); + $this->Line( $x+27+$inAlteracaoMata, ($y+(63*$this->tamY)), (197+$x), ($y+(63*$this->tamY)) ); + + $this->Line( $x+27+$inAlteracaoMata, ($y+(75*$this->tamY)), (197+$x), ($y+(75*$this->tamY)) ); + + // linhas verticais + $this->Line( $x+48, $y+(17*$this->tamY), $x+48, $y+(46*$this->tamY) ); //nova do canhotinho + + $this->Line( $x+66+$inAlteracaoMata, $y+(6*$this->tamY), 66+$x+$inAlteracaoMata, $y+(11*$this->tamY) ); + + $this->Line( $x+42+$inAlteracaoMata, $y+(23*$this->tamY), 42+$x+$inAlteracaoMata, $y+(35*$this->tamY) ); + $this->Line( $x+65+$inAlteracaoMata, $y+(23*$this->tamY), 65+$x+$inAlteracaoMata, $y+(35*$this->tamY) ); + $this->Line( $x+80+$inAlteracaoMata, $y+(23*$this->tamY), 80+$x+$inAlteracaoMata, $y+(35*$this->tamY) ); + $this->Line( $x+94+$inAlteracaoMata, $y+(23*$this->tamY), 94+$x+$inAlteracaoMata, $y+(35*$this->tamY) ); + + $this->Line( $x+20, $y+(23*$this->tamY), 20+$x, $y+(29*$this->tamY) ); + + $this->Line( $x+158, $y+(11*$this->tamY), 158+$x, $y+(63*$this->tamY) ); + + $this->setFont ( 'Arial', 'B', 7 ); + $this->Text ( $x+38, $y+(11*$this->tamY), "MATA DE SÃO JOÃO" ); + $this->Text ( $x+38, $y+(13*$this->tamY)+0.5, "Sec. de Adm. e Fin." ); + $this->Text ( $x+38, $y+(16*$this->tamY), "EXERCÍCIO 2016" ); + + $this->setFont ( 'Arial', '', 6 ); + $this->Text ( $x+20.5, $y+(25*$this->tamY), "Inscrição" ); + $this->Text ( $x+20.5, $y+(28*$this->tamY), $this->inInscricao ); + + $this->Text ( $x, $y+(19*$this->tamY), "Nosso Número" ); + $this->Text ( $x, $y+(22*$this->tamY), $this->stNumeracao ); + + $this->Text ( $x, $y+(25*$this->tamY), "Parcela" ); + $this->Text ( $x, $y+(28*$this->tamY), $this->stParcela ); + + $this->Text ( $x, $y+(43*$this->tamY), "Vencimento" ); + + if ($this->boIsento) { + $this->setFont ( 'Arial', 'B', 6 ); + } + + $this->Text ( $x, $y+(45*$this->tamY)+0.5, $this->stObsVencimento ); + + if ($this->boIsento) { + $this->setFont ( 'Arial', '', 6 ); + } + + $this->Text ( $x+30, $y+(43*$this->tamY), $this->dtVencimento ); + + if (!$this->boIsento) { + $this->setFont ( 'Arial', '', 5 ); + $this->Text ( $x, $y+(48*$this->tamY), "MULTA 5% ATÉ 30 DIAS. 10% DE 30 A 60 DIAS E 15% SUPERIOR A 60 DIAS." ); + $this->Text ( $x, $y+(50*$this->tamY), "JUROS DE 1% AO MÊS = 0,003%" ); + } + + $this->setFont ( 'Arial', '', 6 ); + $this->Text ( $x, $y+(31*$this->tamY), "Tributo" ); + $this->Text ( $x, $y+(33*$this->tamY), $this->stTributo ); + + $this->Text ( $x+48.5, $y+(19*$this->tamY), "(=) Valor Principal" ); + $this->Text ( $x+48.5, $y+(22*$this->tamY), $this->flValor ); + + $this->Text ( $x+48.5, $y+(25*$this->tamY), "(+) Multa de Mora" ); + $this->Text ( $x+48.5, $y+(28*$this->tamY), $this->flValorMulta ); + + $this->Text ( $x+48.5, $y+(31*$this->tamY), "(+) Juros de Mora" ); + $this->Text ( $x+48.5, $y+(34*$this->tamY), $this->flValorJuros ); + + $this->Text ( $x+48.5, $y+(37*$this->tamY), "(+) At. Monet." ); + $this->Text ( $x+48.5, $y+(40*$this->tamY), $this->flValorOutros ); + + $this->Text ( $x+48.5, $y+(43*$this->tamY), "(=) Total" ); + $this->Text ( $x+48.5, $y+(45*$this->tamY)+0.5, $this->flValorTotal ); + + $this->Text ( $x, $y+(63*$this->tamY), "Observação" ); + $this->Text ( $x+38, $y+(63*$this->tamY), "Via Contribuinte" ); + + $stObs = str_replace( "\n\r", " ", $this->stObsVencimento.$this->stObservacao ); + + if ($this->boIsento) { + $this->setFont ( 'Arial', 'B', 7 ); + } + + $this->Text ( $x, $y+(65*$this->tamY), substr( $stObs, 0, 70 ) ); + $this->Text ( $x, $y+(67*$this->tamY), substr( $stObs, 70, 70 ) ); + $this->Text ( $x, $y+(69*$this->tamY), substr( $stObs, 140, 70 ) ); + $this->Text ( $x, $y+(71*$this->tamY), substr( $stObs, 210, 70 ) ); + $this->Text ( $x, $y+(73*$this->tamY), substr( $stObs, 280, 70 ) ); + $this->Text ( $x, $y+(75*$this->tamY), substr( $stObs, 350, 70 ) ); + $this->Text ( $x, $y+(77*$this->tamY), substr( $stObs, 420, 70 ) ); + $this->Text ( $x, $y+(79*$this->tamY), substr( $stObs, 490, 70 ) ); + + if ($this->boIsento) { + $this->setFont ( 'Arial', '', 6 ); + } + + $this->Text ( $x, $y+(53*$this->tamY), "Contribuinte" ); + $this->Text ( $x, $y+(55*$this->tamY), substr( $this->getNomCgm(), 0, 70 ) ); + + $this->Text ( $x, $y+(58*$this->tamY), "Endereço do Imóvel" ); + $this->Text ( $x, $y+(60*$this->tamY), substr( $this->getRua(), 0, 70 ) ); + + $this->setFont ( 'Arial', '', 6 ); + $this->Text ( $x+27+$inAlteracaoMata, $y+(13*$this->tamY), "Local de Pagamento" ); + $this->Text ( $x+27+$inAlteracaoMata, $y+(16*$this->tamY), $this->stLocalPagamento ); + + $this->Text ( $x+27+$inAlteracaoMata, $y+(19*$this->tamY), "Cedente" ); + $this->Text ( $x+27+$inAlteracaoMata, $y+(22*$this->tamY), $this->stCedente ); + + $this->Text ( $x+27+$inAlteracaoMata, $y+(25*$this->tamY), "Data do Doc." ); + $this->Text ( $x+27+$inAlteracaoMata, $y+(28*$this->tamY), $this->stDataDocumento ); + + $this->Text ( $x+27+$inAlteracaoMata, $y+(31*$this->tamY), "Uso do Banco" ); + + $this->Text ( $x+27+$inAlteracaoMata, $y+(37*$this->tamY), "Instruções" ); + + if ($this->boIsento) { + $this->setFont ( 'Arial', 'B', 7 ); + } + + $this->Text ( $x+27+$inAlteracaoMata, $y+(40*$this->tamY), substr( $stObs, 0, 75 ) ); + $this->Text ( $x+27+$inAlteracaoMata, $y+(42*$this->tamY), substr( $stObs, 150, 75 ) ); + $this->Text ( $x+27+$inAlteracaoMata, $y+(44*$this->tamY), substr( $stObs, 225, 75 ) ); + $this->Text ( $x+27+$inAlteracaoMata, $y+(46*$this->tamY), substr( $stObs, 300, 75 ) ); + $this->Text ( $x+27+$inAlteracaoMata, $y+(48*$this->tamY), substr( $stObs, 375, 75 ) ); + $this->Text ( $x+27+$inAlteracaoMata, $y+(50*$this->tamY), substr( $stObs, 450, 75 ) ); + $this->Text ( $x+27+$inAlteracaoMata, $y+(52*$this->tamY), substr( $stObs, 525, 75 ) ); + $this->Text ( $x+27+$inAlteracaoMata, $y+(54*$this->tamY), substr( $stObs, 600, 75 ) ); + $this->Text ( $x+27+$inAlteracaoMata, $y+(56*$this->tamY), substr( $stObs, 675, 75 ) ); + $this->Text ( $x+27+$inAlteracaoMata, $y+(58*$this->tamY), substr( $stObs, 750, 75 ) ); + + if ($this->boIsento) { + $this->setFont ( 'Arial', '', 6 ); + } + + $this->Text ( $x+27+$inAlteracaoMata, $y+(65*$this->tamY), "Sacado" ); + $this->Text ( $x+27+$inAlteracaoMata, $y+(67*$this->tamY), substr( $this->getNomCgm(), 0, 120 ) ); + $this->Text ( $x+27+$inAlteracaoMata, $y+(69*$this->tamY), substr($this->getRua(), 0, 120) ); + $this->Text ( $x+27+$inAlteracaoMata, $y+(71*$this->tamY), substr($this->getRua(), 120, 120) ); + $this->Text ( $x+27+$inAlteracaoMata, $y+(73*$this->tamY), substr($this->getRua(), 240, 120) ); + + $this->Text ( $x+27+$inAlteracaoMata, $y+(74*$this->tamY)+0.5, "Sacador/Avalista" ); + + $this->Text ( $x+42.5+$inAlteracaoMata, $y+(25*$this->tamY), "Nosso Número" ); + $this->Text ( $x+42.5+$inAlteracaoMata, $y+(28*$this->tamY), $this->stNumeracao ); + + $this->Text ( $x+42.5+$inAlteracaoMata, $y+(31*$this->tamY), "Carteira" ); + $this->Text ( $x+42.5+$inAlteracaoMata, $y+(34*$this->tamY), $this->stCarteira ); + + $this->Text ( $x+65.5+$inAlteracaoMata, $y+(25*$this->tamY), "Espécie DOC" ); + $this->Text ( $x+65.5+$inAlteracaoMata, $y+(28*$this->tamY), $this->stEspecieDoc ); + + $this->Text ( $x+65.5+$inAlteracaoMata, $y+(31*$this->tamY), "Espécie" ); + $this->Text ( $x+65.5+$inAlteracaoMata, $y+(34*$this->tamY), $this->stEspecie ); + + $this->Text ( $x+80.5+$inAlteracaoMata, $y+(25*$this->tamY), "Aceite" ); + $this->Text ( $x+80.5+$inAlteracaoMata, $y+(28*$this->tamY), $this->stAceite ); + + $this->Text ( $x+80.5+$inAlteracaoMata, $y+(31*$this->tamY), "Quantidade" ); + $this->Text ( $x+80.5+$inAlteracaoMata, $y+(34*$this->tamY), $this->stQuantidade ); + + $this->Text ( $x+94.5+$inAlteracaoMata, $y+(25*$this->tamY), "Data de Proc." ); + $this->Text ( $x+94.5+$inAlteracaoMata, $y+(28*$this->tamY), $this->stDataProcessamento ); + + $this->Text ( $x+94.5+$inAlteracaoMata, $y+(31*$this->tamY), "Valor" ); + + $this->Text ( $x+158.5, $y+(13*$this->tamY), "Vencimento" ); + $this->Text ( $x+158.5, $y+(16*$this->tamY), $this->dtVencimento ); + + $this->Text ( $x+158.5, $y+(19*$this->tamY), "Agência/Código do Cedente" ); + $this->Text ( $x+158.5, $y+(22*$this->tamY), $this->stAgenciaCodCedente ); + + $this->Text ( $x+158.5, $y+(25*$this->tamY), "Nosso Número" ); + $this->Text ( $x+158.5, $y+(28*$this->tamY), $this->stNumeracao ); + + $this->Text ( $x+158.5, $y+(31*$this->tamY), "(=) Valor do Documento" ); + $this->Text ( $x+158.5, $y+(34*$this->tamY), $this->flValor ); + + $this->Text ( $x+158.5, $y+(37*$this->tamY), "(-) Desconto" ); + $this->Text ( $x+158.5, $y+(43*$this->tamY), "(-) Outras Deduções/Abatimento" ); + + $this->Text ( $x+158.5, $y+(48*$this->tamY), "(+) Mora/Multa/Juros" ); + $this->Text ( $x+158.5, $y+(50*$this->tamY)+0.5, $this->flValorMultaJuros ); + + $this->Text ( $x+158.5, $y+(53*$this->tamY), "(+) Outros Acréscimos" ); + $this->Text ( $x+158.5, $y+(56*$this->tamY), $this->flValorOutros ); + + $this->Text ( $x+158.5, $y+(59*$this->tamY), "(=) Valor Cobrado" ); + $this->Text ( $x+158.5, $y+(62*$this->tamY), $this->flValorTotal ); + + if (!$this->boIsento) { + $this->Text ( $x+85.5+$inAlteracaoMata, $y+(79*$this->tamY), "Autenticação Mecânica - Ficha de Compensação . . . . . . . . . . . . . . ." ); + + $this->setFont ( 'Arial', 'B', 7 ); + $this->Text ( $x+68+$inAlteracaoMata, $y+(10*$this->tamY), "|001-9|" ); + + $this->Text ( $x+78+$inAlteracaoMata, $y+(10*$this->tamY), $this->stLinhaCode ); + $this->defineCodigoBarras( $x+31+$inAlteracaoMata, $y+(83*$this->tamY), $this->stBarCode ); + } + } + + /* adiciona nova pagina */ + public function novaPagina() + { + $this->addPage(); + } + + /* habilita e desabilita a quebra de pagina automatica */ + public function setQuebraPagina($valor) + { + $this->setAutoPageBreak( $valor, 1 ); + } + + /* picote entre os carnes */ + public function setPicote($x, $y, $firstPage = false) + { + for ($i=0;$i<=196;($i+=2)) { + $this->Line( ($x+$i), ($y+(102*$this->tamY)), ($x+$i+1), ($y+(102*$this->tamY)) ); + } + + for (($i=-3);$i<=106;($i+=2)) { + $this->Line( ($x+74), ($y+($i*$this->tamY)), ($x+74), ($y+(($i+1)*$this->tamY)) ); + } + } + + /* mostra o pdf */ + public function show($stNome = "Carne.pdf", $stOpcao="D") + { + $this->output($stNome,$stOpcao); + } +} + +class RCarneDadosCadastraisMataSaoJoao extends RCarneDiversosPetropolis +{ + /** + * @access public + * @var String Texto de Composição do Calculo + */ + public $stComposicaoCalculo ; + /** + * @access public + * @var String + */ + public $stNomePrefeitura ; + /** + * @access public + * @var String + */ + public $stSubTitulo ; + /** + * @access public + * @var String + */ + public $stExercicio ; + /** + * @access public + * @var String + */ + public $stContribuinte ; + /** + * @access public + * @var String + */ + public $stInscricaoCadastral ; + /** + * @access public + * @var String + */ + public $stCategoriaUtilizacao ; + /** + * @access public + * @var String + */ + public $stTipoTributo ; + /** + * @access public + * @var String + */ + public $stCodigoLogradouro ; + /** + * @access public + * @var String + */ + public $stNomeLogradouro ; + /** + * @access public + * @var String + */ + public $stComplemento ; + /** + * @access public + * @var String + */ + public $stQuadra ; + /** + * @access public + * @var String + */ + public $stLote ; + /** + * @access public + * @var String + */ + public $stDistrito ; + /** + * @access public + * @var String + */ + public $stRegiao ; + /** + * @access public + * @var String + */ + public $stCep ; + /** + * @access public + * @var String + */ + public $stCidade ; + /** + * @access public + * @var String + */ + public $stEstado ; + /** + * @access public + * @var String + */ + public $stAreaUsoPrivativoTerreno ; + /** + * @access public + * @var String + */ + public $stVupt ; + /** + * @access public + * @var String + */ + public $stVupc; + public $stVupcd; + /** + * @access public + * @var String + */ + public $stValorVenalTerreno; + /** + * @access public + * @var String + */ + public $stImpostoTerritorial; + /** + * @access public + * @var String + */ + public $stAreaUsoPrivativoCoberta; + public $stAreaUsoPrivativoDescoberta; + public $stAreaConstruidaTotal; + /** + * @access public + * @var String + */ + public $stValorVenalConstrucaoCoberta; + public $stValorVenalConstrucaoDesoberta; + public $stValorVenalConstrucaoTotal; + /** + * @access public + * @var String + */ + public $stImpostoPredial; + /** + * @access public + * @var String + */ + public $stAliquota; + /** + * @access public + * @var String + */ + public $stValorVenalImovel; + /** + * @access public + * @var String + */ + public $stValorImposto; + + /** + * @access public + * @var String + */ + public $stCondominio; + + /** + * @access public + * @var String + */ + public $stTipoUnidade; + /** + * @access public + * @var String + */ + public $stZona; + /** + * @access public + * @var String + */ + public $stAreaM2; + /** + * @access public + * @var String + */ + public $stValorM2; + /** + * @access public + * @var String + */ + public $stValorTaxa; + /** + * @access public + * @var String + */ + public $stValorTotalTributos; + /** + * @access public + * @var String + */ + public $stContribIlumPublica; + /** + * @access public + * @var String + */ + public $arDemonstrativoParcelas; + /** + * @access public + * @var String + */ + public $arVencimentosDemonstrativos; + + public $stCamLogo; + + public function RCarneDadosCadastraisMataSaoJoao() + { + parent::RCarneDiversosPetropolis(); + /** + * Seta Informações Basicas da Prefeitura + */ + $this->stNomePrefeitura = 'PREFEITURA MUNICIPAL DE MATA DE SÃO JOÃO'; + $this->stSubTitulo = 'Secretaria de Administração e Finanças'; + $this->lblMulta = '(+) MULTA DE MORA'; + $this->lblJuros = '(+) JUROS DE MORA'; + $this->lblOutros = '(+) ATUALIZAÇÃO MONETÁRIA'; + + /** + * Seta Configuração do PDF + */ + $this->open(); + $this->setTextColor(0); + $this->addPage(); + $this->setLeftMargin(0); + $this->setTopMargin(0); + $this->SetLineWidth(0.01); + include_once ( CAM_GA_ADM_MAPEAMENTO."TAdministracaoConfiguracao.class.php" ); + $obTAdministracaoConfiguracao = new TAdministracaoConfiguracao; + $stFiltro = " WHERE exercicio = '".Sessao::getExercicio()."' AND parametro = 'logotipo' "; + $obTAdministracaoConfiguracao->recuperaTodos( $rsListaImagens, $stFiltro ); + + $stNomeImagem = $rsListaImagens->getCampo("valor"); + $this->stCamLogo = '../../../../../../gestaoAdministrativa/fontes/PHP/framework/temas/padrao/imagens/'.$stNomeImagem; + + } + + public function desenhaCarne($x , $y) + { + $inTamY = 1.14; + + //pagina 1 + /** + * Retangulos + */ + /* Retangulo da Capa */ + $this->Rect( $x, $y, 189, 88*$inTamY ); //o valor do y era 93 + /* Retangulo Mata Feliz */ + + $this->Rect( $x+10, $y+(14*$inTamY), 130, 42*$inTamY ); //retangulo do endereco de entrega + $this->Rect( $x+10, $y+(60*$inTamY), 170, 25*$inTamY ); //retangulo de uso dos correios + + $this->Rect( $x+134, $y+(62*$inTamY), 42, 22*$inTamY ); //retangulo dentro do retangulo de uso dos correios + $this->Line( $x+134, $y+(68*$inTamY), $x+176, $y+(68*$inTamY) ); + $this->Line( $x+134, $y+(76*$inTamY), $x+176, $y+(76*$inTamY) ); + + $stCorreio = "../../../../../../gestaoAdministrativa/fontes/PHP/framework/temas/padrao/imagens/correiomata.jpg"; + $stExt = substr( $stCorreio, strlen($stCorreio)-3, strlen($stCorreio) ); + $this->Image( $stCorreio, $x+142 , $y+(18*$inTamY) , 34 , 34 , $stExt); + + $this->setFont( 'Arial','B',10 ); + $this->Text( $x+32, $y+(4*$inTamY), 'P R E F E I T U R A M U N I C I P A L D E M A T A D E S Ã O J O Ã O' ); + $this->setFont( 'Arial','B',16 ); + $this->Text( $x+62, $y+(10*$inTamY), 'IPTU/TLP/CIP 2016' ); + + $this->setFont( 'Arial','B',10 ); + $this->Text( $x+32, $y+(22*$inTamY), 'ENDEREÇO DE ENTREGA DESTE CARNÊ' ); + $this->Text( $x+14, $y+(32*$inTamY), 'INSCRIÇÃO:' ); + $this->Text( $x+14, $y+(36*$inTamY), 'CONTRIBUINTE:' ); + $this->Text( $x+14, $y+(42*$inTamY), 'ENDEREÇO:' ); + + $this->setFont( 'Arial','',10 ); + $this->Text( $x+48, $y+(32*$inTamY), $this->stInscricaoCadastral ); + $this->Text( $x+48, $y+(36*$inTamY), substr($this->stContribuinte, 0, 50) ); + + $arEnd = explode('|*|',$this->stEnderecoEntrega); + + $this->Text( $x+36, $y+(42*$inTamY), $arEnd[0].', nº '.$arEnd[1].' '.$arEnd[2]); + $this->Text( $x+36, $y+(46*$inTamY), $arEnd[3].' - '.sistemaLegado::strtoupper_ptBR($arEnd[6]).' / '.sistemaLegado::strtoupper_ptBR($arEnd[5])); + $this->Text( $x+36, $y+(50*$inTamY), 'CEP: '.$arEnd[4] ); + + $this->setFont( 'Arial','',16 ); + $this->Text( $x+12, $y+(66*$inTamY), 'PARA USO DOS CORREIOS' ); + + $this->setFont( 'Arial','B',9 ); + $this->Text( $x+20, $y+(70*$inTamY), '[ ] ENDEREÇO INSUFICIENTE [ ] RECUSADO' ); + $this->Text( $x+20, $y+(74*$inTamY), '[ ] NÃO EXISTE Nº INDICADO [ ] NÃO PROCURADO' ); + $this->Text( $x+20, $y+(78*$inTamY), '[ ] DESCONHECIDO [ ] INF. ESCRITA POR TERCEIROS' ); + $this->Text( $x+20, $y+(82*$inTamY), '[ ] OUTRO: ___________________________________________________' ); + + $this->setFont( 'Arial','B',8 ); + $this->Text( $x+136, $y+(65*$inTamY), 'DATA:' ); + $this->Text( $x+136, $y+(71*$inTamY), 'ENDEREÇO:' ); + $this->Text( $x+136, $y+(79*$inTamY), 'REINTEGRAÇÃO POSTAL' ); + $this->Text( $x+136, $y+(83*$inTamY), 'EM: / /' ); + + $this->addPage(); + //pagina 2 + + // Retangulo telefones uteis + $this->Rect( $x, $y, 189, 88*$inTamY ); + // Retangulo instrucoes de pagamento + $this->Rect( $x, $y + (100*$inTamY) , 189, 88*$inTamY ); + + $this->setFont( 'Arial', 'B', 18 ); + $this->SetFillColor(240, 240, 240); + $this->Rect( $x, $y, 189, 12*$inTamY, 'DF'); + $this->Text( $x+45, $y+(8*$inTamY), 'T E L E F O N E S Ú T E I S' ); + + $this->setFont( 'Arial', '', 12 ); + $this->Text( $x+22, $y+(18*$inTamY), 'Prefeitura de Mata de São João: (71) 3635-1669/1310' ); + $this->Text( $x+22, $y+(22*$inTamY), 'Site: www.pmsj.ba.gov.br' ); + + $this->Rect( $x+2, $y+(25*$inTamY), 90, 62*$inTamY ); + + $this->setFont( 'Arial', 'B', 8 ); + $this->SetFillColor(240, 240, 240); + $this->Rect( $x+2, $y+(25*$inTamY), 90, 4*$inTamY, 'DF'); + $this->Text( $x+14, $y+(28*$inTamY), 'SECRETARIAS/SETORES DA PREFEITURA' ); + + $this->setFont( 'Arial', '', 8 ); + + $this->Text( $x+3, $y+(32*$inTamY), 'Secretaria de Administração e Finanças' ); + $this->Text( $x+64, $y+(32*$inTamY), '(71) 3635-1310' ); + $this->Line( $x+2, $y+(33*$inTamY), $x+92, $y+(33*$inTamY) ); + + $this->Text( $x+3, $y+(40*$inTamY), 'Secretaria de Planejamento, Desenvolvi-' ); + $this->Text( $x+3, $y+(42*$inTamY), 'mento e Meio Ambiente' ); + $this->Text( $x+64, $y+(40*$inTamY), '(71) 3635-1310' ); + $this->Line( $x+2, $y+(43*$inTamY), $x+92, $y+(43*$inTamY) ); + + $this->Text( $x+3, $y+(46*$inTamY), 'Secretaria de Cultura e Turismo' ); + $this->Text( $x+64, $y+(46*$inTamY), '(71) 3635-1310' ); + $this->Line( $x+2, $y+(47*$inTamY), $x+92, $y+(47*$inTamY) ); + + $this->Text( $x+3, $y+(50*$inTamY), 'Secretaria de Saúde' ); + $this->Text( $x+64, $y+(50*$inTamY), '(71) 3635-1005' ); + $this->Line( $x+2, $y+(51*$inTamY), $x+92, $y+(51*$inTamY) ); + + $this->Text( $x+3, $y+(54*$inTamY), 'Secretaria de Educação' ); + $this->Text( $x+64, $y+(54*$inTamY), '(71) 3635-1310' ); + $this->Line( $x+2, $y+(55*$inTamY), $x+92, $y+(55*$inTamY) ); + + $this->Text( $x+3, $y+(58*$inTamY), 'Secretaria de Trabalho e Ação Social' ); + $this->Text( $x+64, $y+(58*$inTamY), '(71) 3635-1666' ); + $this->Line( $x+2, $y+(59*$inTamY), $x+92, $y+(59*$inTamY) ); + + $this->Text( $x+3, $y+(62*$inTamY), 'Secretaria de Agricultura' ); + $this->Text( $x+64, $y+(62*$inTamY), '(71) 3635-1310' ); + $this->Line( $x+2, $y+(63*$inTamY), $x+92, $y+(63*$inTamY) ); + + $this->Text( $x+3, $y+(66*$inTamY), 'Procuradoria Geral do Município' ); + $this->Text( $x+64, $y+(66*$inTamY), '(71) 3635-1129' ); + $this->Line( $x+2, $y+(67*$inTamY), $x+92, $y+(67*$inTamY) ); + + $this->Text( $x+3, $y+(70*$inTamY), 'Setor de Tributos e Fiscalização' ); + $this->Text( $x+64, $y+(70*$inTamY), '(71) 3635-1669' ); + $this->Text( $x+64, $y+(73*$inTamY), '(71) 3635-1310' ); + + $this->Text( $x+3, $y+(73*$inTamY), '(Coordenadoria Fazendária do Município)' ); + + $this->Line( $x+2, $y+(74*$inTamY), $x+92, $y+(74*$inTamY) ); + + $this->Text( $x+3, $y+(77*$inTamY), 'Posto Tributário Imbassaí (71) 99617-7254' ); + $this->Text( $x+64, $y+(77*$inTamY), '(71) 99951-0463' ); + + $this->Line( $x+62, $y+(29*$inTamY), $x+62, $y+(77*$inTamY) ); + + $this->setFont( 'Arial', '', 8 ); + $this->Rect( $x+2, $y+(78*$inTamY), 90, 4*$inTamY, ''); + $this->Text( $x+3, $y+(81*$inTamY), 'Hospital Municipal Dr. Eurico Goulart de Freitas (71) 3635-1005' ); + + //$this->Text( $x+20, $y+(85*$inTamY), '(71) 3635-1005' ); + //$this->Text( $x+45, $y+(85*$inTamY), '(71) 3635-3850' ); + + $this->Rect( $x+94, $y+(25*$inTamY), 90, 62*$inTamY ); //lado b + + $this->setFont( 'Arial', 'B', 8 ); + $this->SetFillColor(240, 240, 240); + $this->Rect( $x+94, $y+(25*$inTamY), 90, 4*$inTamY, 'DF'); + $this->Text( $x+108, $y+(28*$inTamY), 'OUTROS TELEFONES ÚTEIS' ); + + $this->setFont( 'Arial', '', 8 ); + + $this->Text( $x+95, $y+(32*$inTamY), 'Câmara Municipal de Vereadores' ); + $this->Text( $x+156, $y+(32*$inTamY), '(71) 3635-1247' ); + $this->Line( $x+94, $y+(33*$inTamY), $x+184, $y+(33*$inTamY) ); + + $this->Text( $x+95, $y+(36*$inTamY), 'Fórum Desembargador Francisco Ponde' ); + $this->Text( $x+95, $y+(38*$inTamY), 'Sobrinho' ); + $this->Text( $x+156, $y+(36*$inTamY), '(71) 3635-1303' ); + $this->Line( $x+94, $y+(39*$inTamY), $x+184, $y+(39*$inTamY) ); + + $this->Text( $x+95, $y+(42*$inTamY), 'Juizado de Menores' ); + $this->Text( $x+156, $y+(42*$inTamY), '(71) 3635-1303' ); + $this->Line( $x+94, $y+(43*$inTamY), $x+184, $y+(43*$inTamY) ); + + $this->Text( $x+95, $y+(46*$inTamY), 'Conselho Tutelar' ); + $this->Text( $x+156, $y+(46*$inTamY), '(71) 99617-7232' ); + $this->Line( $x+94, $y+(47*$inTamY), $x+184, $y+(47*$inTamY) ); + + $this->Text( $x+95, $y+(50*$inTamY), 'Delegacia de Polícia Civil' ); + $this->Text( $x+156, $y+(50*$inTamY), '(71) 3635-1090' ); + $this->Line( $x+94, $y+(51*$inTamY), $x+184, $y+(51*$inTamY) ); + + $this->Text( $x+95, $y+(54*$inTamY), 'ILUMITEC (Iluminação Pública)' ); + $this->Text( $x+156, $y+(54*$inTamY), '0800 28 08 8000' ); + $this->Text( $x+156, $y+(56*$inTamY), '(71) 3635-3295' ); + $this->Line( $x+94, $y+(57*$inTamY), $x+184, $y+(57*$inTamY) ); + + $this->Text( $x+95, $y+(60*$inTamY), 'Banco do Brasil' ); + $this->Text( $x+156, $y+(60*$inTamY), '(71) 3635-1098' ); + $this->Line( $x+94, $y+(61*$inTamY), $x+184, $y+(61*$inTamY) ); + + $this->Text( $x+95, $y+(64*$inTamY), 'Correios' ); + $this->Text( $x+156, $y+(64*$inTamY), '(71) 3635-1059' ); + $this->Line( $x+94, $y+(65*$inTamY), $x+184, $y+(65*$inTamY) ); + + $this->Text( $x+95, $y+(68*$inTamY), 'Previdência Social' ); + $this->Text( $x+156, $y+(68*$inTamY), '(71) 3635-1605' ); + $this->Line( $x+94, $y+(69*$inTamY), $x+184, $y+(69*$inTamY) ); + + $this->Text( $x+95, $y+(76*$inTamY), 'COELBA' ); + $this->Text( $x+156, $y+(76*$inTamY), '(71) 3621-7803' ); + $this->Line( $x+94, $y+(77*$inTamY), $x+184, $y+(77*$inTamY) ); + + $this->Text( $x+95, $y+(80*$inTamY), 'EMBASA' ); + $this->Text( $x+156, $y+(80*$inTamY), '(71) 3635-1158' ); + $this->Line( $x+94, $y+(81*$inTamY), $x+184, $y+(81*$inTamY) ); + + $this->Text( $x+95, $y+(84*$inTamY), 'RETRAN' ); + $this->Text( $x+156, $y+(84*$inTamY), '(71) 3635-1210' ); + + //instrucoes de pagamento + $this->setFont( 'Arial', 'B', 18 ); + $this->SetFillColor(240, 240, 240); + $this->Rect( $x, $y+(100*$inTamY), 189, 12*$inTamY, 'DF'); + $this->Text( $x+26, $y+(108*$inTamY), 'I N S T R U Ç Õ E S D E P A G A M E N T O' ); + + $this->setFont( 'Arial', 'B', 14 ); + $this->Text( $x+8, $y+(117*$inTamY), '"Pague o seu IPTU em dia e ajude a Prefeitura a promover mais educação, '); + $this->Text( $x+8, $y+(123*$inTamY), 'mais saúde e outras ações, visando ao desenvolvimento do município".' ); + + $this->setFont( 'Arial', '', 10 ); + $this->Text( $x+8, $y+(132*$inTamY), 'Prezado(a) Contribuinte,' ); + $this->Text( $x+8, $y+(136*$inTamY), 'O pagamento deste carnê não quita débitos anteriores. As parcelas vencidas estão sujeitas a multa e juros' ); + $this->Text( $x+8, $y+(139*$inTamY), 'moratórios. O prazo para reclamação do lançamento será de até 30 (trinta) dias, contados a partir da data de' ); + $this->Text( $x+8, $y+(142*$inTamY), 'entrega do carnê. Os valores do demonstrativo estão expressos em Reais (R$). Caso o vencimento ocorra' ); + $this->Text( $x+8, $y+(145*$inTamY), 'em dia não útil, o pagamento deverá ser realizado no primeiro dia útil imediato. O IPTU não implica em reco-' ); + $this->Text( $x+8, $y+(148*$inTamY), 'nhecimento de direitos sobre o imóvel ou na sua regularização. Este carnê não poderá ser utilizado, para' ); + $this->Text( $x+8, $y+(151*$inTamY), 'pagamento, após o dia 31 de dezembro de 2016.' ); + + $this->Rect( $x+8, $y+(158*$inTamY), 171, 10*$inTamY ); //lado b + + $this->setFont( 'Arial', 'B', 8 ); + $this->Text( $x+12, $y+(162*$inTamY), 'A legislação municipal pertinente aos tributos pode ser encontrada no site da Prefeitura Municipal de Mata de São João,' ); + $this->Text( $x+22, $y+(165*$inTamY), 'no endereço www.pmsj.ba.gov.br .' ); + + $this->setFont( 'Arial', 'B', 10 ); + $this->Text( $x+26, $y+(171*$inTamY), 'PAGÁVEL EM QUALQUER AGÊNCIA BANCÁRIA ATÉ O VENCIMENTO.' ); + + $this->setFont( 'Arial', 'B', 8 ); + $this->Text( $x+8, $y+(175*$inTamY), 'Qualquer dúvida, consulte o Setor de Tributos e Fiscalização, no Centro Administrativo situado à Rua Luiz Antônio Garcez,' ); + $this->Text( $x+8, $y+(178*$inTamY), '140 - Centro - CEP: 48.280-000 - Mata de São João/BA. Tel: (71) 3635-1669 / (71) 3635-1310 / (71) 9957-6813.' ); + $this->Text( $x+8, $y+(181*$inTamY), 'Postos de Apoio Tributário no Litoral: Praia do Forte (Av. do Farol, Shopping Armazém da Vila, sala 44 - Praia do Forte) '); + $this->Text( $x+8, $y+(184*$inTamY), 'ou Imbassaí (Alameda das Amendoeiras, s/n, Posto de Atendimento - Imbassaí)'); + + $this->addPage(); + + //pagina 3 + $this->stComposicaoCalculo = $stComposição; + $this->SetXY($x+10,$y+5); + /* Inicializa Fonte*/ + $this->setFont( 'Arial','',10 ); + + /** + * Retangulos + */ + /* Retangulo da Composicação */ + $this->Rect( $x, $y, 189, 88*$inTamY ); + /* Retangulo Dados Cadastrais */ + $this->Rect( $x, $y + (100*$inTamY) , 189, 88*$inTamY ); + + /* Composição do Calculo */ + $this->setFont( 'Arial', 'BU', 8 ); + $this->Text( $x+70, $y+(6*$inTamY), 'COMPOSIÇÃO DO CÁLCULO' ); + $this->setFont( 'Arial', 'B', 8 ); + $this->Text( $x+5, $y+(9*$inTamY), 'I - Imposto Sobre a Propriedade Predial e Territorial Urbana (IPTU) => Valor Venal do Imposto = Valor Venal x Alíquota' ); + $this->setFont( 'Arial', '', 8 ); + $this->Text( $x+9, $y+(12*$inTamY), 'Valor Venal do Imóvel = Valor Venal do Terreno (VUPt x área m²) + Valor da Edificação (VUPcc x área m² + VUPcd x área m²).' ); + $this->setFont( 'Arial', 'B', 8 ); + $this->Text( $x+5, $y+(16*$inTamY), 'II - Taxa de Limpeza Pública => Valor da Taxa = Área (do terreno ou da construção total) x valor p/m²' ); + $this->Text( $x+5, $y+(20*$inTamY), 'III - Contribuição de Iluminação Pública => Área do Terreno x R$0,05' ); + $this->setFont( 'Arial', '', 8 ); + $this->Text( $x+101, $y+(20*$inTamY), '(cobrada no carnê de IPTU apenas para os imóveis sem edificação)' ); + $this->setFont( 'Arial', 'B', 8 ); + $this->Text( $x+5, $y+(24*$inTamY), 'Observações:' ); + $this->setFont( 'Arial', '', 8 ); + $this->Text( $x+5, $y+(27*$inTamY), '1)' ); + $this->setFont( 'Arial', 'B', 8 ); + $this->Text( $x+9, $y+(27*$inTamY), 'VUPt' ); + $this->setFont( 'Arial', '', 8 ); + $this->Text( $x+17, $y+(27*$inTamY), ' é o Valor do metro quadrado do terreno e' ); + $this->setFont( 'Arial', 'B', 8 ); + $this->Text( $x+84, $y+(27*$inTamY), 'VUPc' ); + $this->setFont( 'Arial', '', 8 ); + $this->Text( $x+95, $y+(27*$inTamY), 'o valor do metro quadrado da construção;' ); + $this->Text( $x+9, $y+(30*$inTamY), '(estes valores estão definidos na Planta Genérica de Valores do Município, Lei nº 564/2014, alterada pela Lei nº 599/2015' ); + $this->Text( $x+5, $y+(34*$inTamY), '2) O recolhimento fora do prazo enseja a cobrança dos seguintes acréscimos, calculados sobre o valor original, atualizado monetariamente:' ); + $this->setFont( 'Arial', 'B', 8 ); + $this->Text( $x+9, $y+(38*$inTamY), '- Multa de mora' ); + $this->setFont( 'Arial', '', 8 ); + $this->Text( $x+32, $y+(38*$inTamY), 'de 5 % (cinco por cento), se o tributo for pago no prazo de 30 (trinta) dias, após o vencimento; 10% (dez por cento), se' ); + $this->Text( $x+9, $y+(41*$inTamY), 'o atraso for superior a 30 (trinta), e até 60 (sessenta) dias; 15% (quinze por cento), se o atraso for superior a 60 (sessenta) dias.' ); + $this->Text( $x+10, $y+(44*$inTamY), '(Fundamentação Legal: Art 60, da Lei nº 280/2006);' ); + $this->setFont( 'Arial', 'B', 8 ); + $this->Text( $x+9, $y+(48*$inTamY), '- Juros de mora' ); + $this->setFont( 'Arial', '', 8 ); + $this->Text( $x+32, $y+(48*$inTamY), 'de 1% (um por cento) ao mês calendário ou fração, à razão de 0,033% ao dia, limitado ao máximo de 1%, calculado à' ); + $this->Text( $x+9, $y+(51*$inTamY), 'data do seu pagamento. (Fundamentação Legal: Art 60, da Lei nº 280/2006);' ); + $this->setFont( 'Arial', 'B', 8 ); + $this->Text( $x+9, $y+(55*$inTamY), '- Multa de Infração' ); + $this->setFont( 'Arial', '', 8 ); + $this->Text( $x+34, $y+(55*$inTamY), ', quando for o caso. (Fundamentação Legal: Art 60, da Lei nº 280/2006).' ); + $this->Text( $x+5, $y+(59*$inTamY), '3)' ); + $this->setFont( 'Arial', 'B', 8 ); + $this->Text( $x+9, $y+(59*$inTamY), 'Os tributos poderão ser pagos em até 11 parcelas, com valor mínimo de R$ 10,00 cada' ); + $this->setFont( 'Arial', '', 8 ); + $this->Text( $x+142, $y+(59*$inTamY), '(Fundamentação Legal: Calendário' ); + $this->Text( $x+9, $y+(63*$inTamY), 'Fiscal/2016)' ); + $this->Text( $x+5, $y+(66*$inTamY), '4)' ); + $this->setFont( 'Arial', 'B', 8 ); + $this->Text( $x+9, $y+(66*$inTamY), 'Necessitando alterar os dados cadastrais, compareça, munido de documentos comprobatórios, à Coordenadoria Fazendária, ' ); + $this->Text( $x+9, $y+(69*$inTamY), 'órgão da Secretaria Municipal de Administração e Finanças, situada no Centro Administrativo, Rua Luiz Antônio' ); + $this->Text( $x+9, $y+(72*$inTamY), 'Garcez, 140 - Centro - CEP: 48.280-000 - Mata de São João/BA. Poderá comparecer também ao Posto de Apoio Tributário,' ); + $this->Text( $x+9, $y+(75*$inTamY), 'situado na Alameda das Amendoeiras, s/nº - Imbassaí - Mata de São João/BA. ' ); + $this->Text( $x+9, $y+(78*$inTamY), 'Telefones: (71) 3635-1669/1310 / (71) 9617-7254 / (71) 9957-6798 / (71) 9630-1106.' ); + $this->setFont( 'Arial','BU', 8); + $this->Text( $x+9, $y+(81*$inTamY), 'Horário para atendimento: de 08h às 11h - de 13h às 14:30min. '); + $this->Text( $x+9, $y+(84*$inTamY), 'E-mails: atendimento.tributacao@pmsj.ba.gov.br / arrecadacao.tributacao@pmsj.ba.gov.br.' ); + +//fim do novo texto + + $y += 26; + /** + * Montar Estrutura dos Dados Cadastrais + */ + + /* Linhas Horizontais */ + $this->Line( $x , $y + (90*$inTamY) , $x +189, $y + (90*$inTamY) ); + $this->Line( $x , $y + (98*$inTamY) , $x +189, $y + (98*$inTamY) ); + $this->Line( $x , $y + (102*$inTamY) , $x +189, $y + (102*$inTamY) ); + $this->Line( $x , $y + (107*$inTamY) , $x +189, $y + (107*$inTamY) ); + $this->Line( $x , $y + (113*$inTamY) , $x +189, $y + (113*$inTamY) ); + $this->Line( $x , $y + (116*$inTamY) , $x +134, $y + (116*$inTamY) ); + $this->Line( $x , $y + (121*$inTamY) , $x +189, $y + (121*$inTamY) ); + + $this->Line( $x+25 , $y + (127*$inTamY) , $x+108, $y + (127*$inTamY) ); + $this->Line( $x+25 , $y + (133*$inTamY) , $x+108, $y + (133*$inTamY) ); + $this->Line( $x , $y + (138*$inTamY) , $x+134, $y + (138*$inTamY) ); + + $this->Line( $x , $y + (143*$inTamY) , $x +134, $y + (143*$inTamY) ); + $this->Line( $x , $y + (146*$inTamY) , $x +134, $y + (146*$inTamY) ); + $this->Line( $x , $y + (151*$inTamY) , $x +134, $y + (151*$inTamY) ); + + /* Linhas Verticais */ + /* Linha Ao lado do demonstrativo, aquela maior */ + $this->Line( $x + 134 , $y + (113*$inTamY), $x + 134 , $y + (165*$inTamY)); + + /* Linha 1*/ + $this->Line( $x + 88 , $y + (77.5*$inTamY) , $x + 88 , $y + (90*$inTamY)); + /* Linha 2*/ + $this->Line( $x + 64 , $y + (90*$inTamY) , $x + 64 , $y + (98*$inTamY)); + $this->Line( $x + 91 , $y + (90*$inTamY) , $x + 91 , $y + (98*$inTamY)); + $this->Line( $x + 136 , $y + (90*$inTamY) , $x + 136 , $y + (98*$inTamY)); + /* Linha 3*/ + /* Linha 4*/ + $this->Line( $x + 34 , $y + (102*$inTamY) , $x + 34 , $y + (107*$inTamY)); + $this->Line( $x + 92 , $y + (102*$inTamY) , $x + 92 , $y + (107*$inTamY)); + $this->Line( $x + 136 , $y + (102*$inTamY) , $x + 136 , $y + (107*$inTamY)); //linha do condominio + + /* Linha 5*/ + $this->Line( $x + 25 , $y + (107*$inTamY) , $x + 25 , $y + (113*$inTamY)); + $this->Line( $x + 44 , $y + (107*$inTamY) , $x + 44 , $y + (113*$inTamY)); + $this->Line( $x + 81 , $y + (107*$inTamY) , $x + 81 , $y + (113*$inTamY)); + $this->Line( $x + 105 , $y + (107*$inTamY) , $x + 105 , $y + (113*$inTamY)); + $this->Line( $x + 127 , $y + (107*$inTamY) , $x + 127 , $y + (113*$inTamY)); + $this->Line( $x + 163 , $y + (107*$inTamY) , $x + 163 , $y + (113*$inTamY)); + /* Linha 7*/ + $this->Line( $x + 25 , $y + (115*$inTamY) , $x + 25 , $y + (138*$inTamY)); + $this->Line( $x + 64 , $y + (115*$inTamY) , $x + 64 , $y + (138*$inTamY)); + $this->Line( $x + 76 , $y + (115*$inTamY) , $x + 76 , $y + (133*$inTamY)); + $this->Line( $x + 108 , $y + (115*$inTamY) , $x + 108 , $y + (138*$inTamY)); + + /* Linha 8*/ + //$this->Line( $x + 25 , $y + (121*$inTamY) , $x + 25 , $y + (128*$inTamY)); + //$this->Line( $x + 64 , $y + (121*$inTamY) , $x + 64 , $y + (128*$inTamY)); + //$this->Line( $x + 76 , $y + (121*$inTamY) , $x + 76 , $y + (128*$inTamY)); + //$this->Line( $x + 110 , $y + (121*$inTamY) , $x + 110 , $y + (128*$inTamY)); + + // Linha 9 + $this->Line( $x + 25 , $y + (138*$inTamY) , $x + 25 , $y + (143*$inTamY) ); + $this->Line( $x + 52 , $y + (138*$inTamY) , $x + 52 , $y + (143*$inTamY) ); + $this->Line( $x + 98 , $y + (138*$inTamY) , $x + 98 , $y + (143*$inTamY) ); + + // Linha 11 + $this->Line( $x + 21 , $y + (146*$inTamY) , $x + 21 , $y + (151*$inTamY) ); + $this->Line( $x + 39 , $y + (146*$inTamY) , $x + 39 , $y + (151*$inTamY) ); + $this->Line( $x + 56 , $y + (146*$inTamY) , $x + 56 , $y + (151*$inTamY) ); + $this->Line( $x + 71 , $y + (146*$inTamY) , $x + 71 , $y + (151*$inTamY) ); + $this->Line( $x + 92 , $y + (146*$inTamY) , $x + 92 , $y + (165*$inTamY) ); + + /** + * Titulos dos Dados + */ + /* imagem*/ + $stExt = substr( $this->stCamLogo, strlen($this->stCamLogo)-3, strlen($this->stCamLogo) ); + $this->Image( $this->stCamLogo , $x+1 , $y+(79*$inTamY) , 10 , 10 , $stExt); + /* dados */ + $this->setFont( 'Arial','',14 ); + $this->Text( $x+112 , $y+(84*$inTamY) , 'DADOS CADASTRAIS' ); + /* exercicio */ + $this->setFont( 'Arial','',10 ); + //$this->Text( $x+122 , $y+(88*$inTamY) , 'EXERCÍCIO DE '.$this->stExercicio ); + $this->Text( $x+122 , $y+(88*$inTamY) , 'EXERCÍCIO DE 2016'); + + $this->setFont( 'Arial','',5 ); + $this->Text( $x+ 1 , $y+(92*$inTamY) , 'CONTRIBUINTE:' ); + $this->Text( $x+ 65 , $y+(92*$inTamY) , 'INSCRIÇÃO CADASTRAL:' ); + $this->Text( $x+ 92 , $y+(92*$inTamY) , 'CATEGORIA DE UTILIZAÇÃO DO IMÓVEL:' ); + $this->Text( $x+137 , $y+(92*$inTamY) , 'TIPO DE TRIBUTO(ESPECIFICAÇÃO):' ); + + $this->setFont( 'Arial','',8 ); + $this->SetFillColor(240,240,240); + $this->Rect( $x, $y+(98*$inTamY) , 189 , 4*$inTamY , 'DF'); + $this->Text( $x+ 72 , $y+(101*$inTamY) , 'E N D E R E Ç O D O I M Ó V E L' ); + + $this->setFont( 'Arial','',5 ); + + $this->Text( $x+ 1 , $y+(104*$inTamY) , 'CÓDIGO DO LOGRADOURO:' ); + $this->Text( $x+ 35 , $y+(104*$inTamY) , 'NOME DO LOGRADOURO:' ); + $this->Text( $x+ 93 , $y+(104*$inTamY) , 'COMPLEMENTO:' ); + $this->Text( $x+ 138 , $y+(104*$inTamY) , 'CONDOMÍNIO:' ); + + $this->Text( $x+ 1 , $y+(109*$inTamY) , 'QUADRA:' ); + $this->Text( $x+ 26 , $y+(109*$inTamY) , 'LOTE:' ); + $this->Text( $x+ 45 , $y+(109*$inTamY) , 'DISTRITO:' ); + $this->Text( $x+ 82 , $y+(109*$inTamY) , 'REGIÃO:' ); + $this->Text( $x+ 106 , $y+(109*$inTamY) , 'CEP:' ); + $this->Text( $x+ 128 , $y+(109*$inTamY) , 'CIDADE:' ); + $this->Text( $x+ 164 , $y+(109*$inTamY) , 'ESTADO:' ); + + $this->setFont( 'Arial','',5 ); + $this->SetFillColor(240,240,240); + $this->Rect( $x, $y+(113*$inTamY) , 134 , 3*$inTamY , 'DF'); + $this->Text( $x+1 , $y+(115.2*$inTamY) , ' D A D O S D O I P T U - I M P O S T O S O B R E A P R O P R I E D A D E P R E D I A L E T E R R I T O R I A L U R B A N A' ); + + $this->setFont( 'Arial','B',5 ); + $this->Text( $x+ 4 , $y+(118*$inTamY) , 'DADOS SOBRE O' ); + $this->Text( $x+ 1 , $y+(120*$inTamY) , 'TERRENO OU ÁREA UTIL' ); + + $this->setFont( 'Arial','',4 ); + $this->Text( $x+ 26 , $y+(118*$inTamY) , 'ÁREA DE USO Privativo + Fração Ideal (m²):' ); + $this->Text( $x+ 65 , $y+(118*$inTamY) , 'VUPt(R$/m²):' ); + $this->Text( $x+ 78 , $y+(118*$inTamY) , 'VALOR VENAL DO TERRENO(R$):' ); + $this->Text( $x+ 109 , $y+(118*$inTamY) , 'IMPOSTO TERRITORIAL(R$):' ); + + $this->setFont( 'Arial','',4 ); + $this->Text( $x+ 135 , $y+(115*$inTamY) , 'DESCONTO PARA PAGAMENTO DE COTA ÚNICA:' ); + $this->Text( $x+ 135 , $y+(117*$inTamY) , 'DO IPTU: 15,00%' ); + $this->Text( $x+ 135 , $y+(119*$inTamY) , 'DA TAXA LIMPEZA PÚBLICA: 15,00%' ); + + $this->setFont( 'Arial','B',5 ); + $this->Text( $x+ 4 , $y+(128*$inTamY) , 'DADOS SOBRE A' ); + $this->Text( $x+ 5 , $y+(130*$inTamY) , 'EDIFICAÇÃO' ); + + $this->setFont( 'Arial','',4 ); + $this->Text( $x+ 26 , $y+(123*$inTamY) , 'ÁREA DE USO Privativo Coberta + Fração Ideal (m²):' ); + $this->Text( $x+ 65 , $y+(123*$inTamY) , 'VUPc(R$/m²):' ); + $this->Text( $x+ 78 , $y+(123*$inTamY) , 'VALOR VENAL DA CONSTRUÇÃO' ); + $this->Text( $x+ 78 , $y+(125*$inTamY) , 'COBERTA (R$):' ); + $this->Text( $x+ 111 , $y+(128*$inTamY) , 'IMPOSTO PREDIAL(R$):' ); + + //carne 2015 + $this->setFont( 'Arial','B',5 ); + $this->Text( $x+ 4.5 , $y+(140*$inTamY) , 'COMPOSIÇÃO' ); + $this->Text( $x+ 5 , $y+(142*$inTamY) , 'DO IMPOSTO' ); + + $this->setFont( 'Arial','',4 ); + $this->Text( $x+ 26 , $y+(129*$inTamY) , 'ÁREA DE USO Privativo Descoberta + Fração Ideal (m²):' ); + $this->Text( $x+ 65 , $y+(129*$inTamY) , 'VUPcd (R$):' ); + $this->Text( $x+ 78 , $y+(129*$inTamY) , 'VALOR VENAL DA CONSTRUÇÃO' ); + $this->Text( $x+ 78 , $y+(131*$inTamY) , 'DESCOBERTA (R$):' ); + + $this->Text( $x+ 26 , $y+(135*$inTamY) , 'ÁREA CONSTRUÍDA TOTAL (m²):' ); + $this->Text( $x+ 65 , $y+(135*$inTamY) , 'VALOR VENAL DA CONSTRUÇÃO TOTAL (R$):' ); + + $this->Text( $x+ 26 , $y+(140*$inTamY) , 'ALIQUOTA:' ); + $this->Text( $x+ 53 , $y+(140*$inTamY) , 'VALOR VENAL DO IMÓVEL:' ); + $this->Text( $x+ 99 , $y+(140*$inTamY) , 'VALOR DO IMPOSTO:' ); + + $this->setFont( 'Arial','',5 ); + $this->SetFillColor(240,240,240); + $this->Rect( $x, $y+(143*$inTamY) , 92 , 4 , 'DF'); + $this->Rect( $x+92, $y+(143*$inTamY) , 42 , 4 , 'DF'); + $this->Text( $x+18 , $y+(145*$inTamY) , ' D A D O S D A T A X A D E L I M P E Z A P Ú B L I C A ' ); + $this->Text( $x+93 , $y+(145*$inTamY) , 'CONTRIBUIÇÃO DE ILUMINAÇÃO PÚBLICA (R$):' ); + + $this->setFont( 'Arial','',4 ); + $this->Text( $x+ 1 , $y+(148*$inTamY) , 'TIPO DE UNIDADE:' ); + $this->Text( $x+ 22 , $y+(148*$inTamY) , 'ZONA:' ); + $this->Text( $x+ 40 , $y+(148*$inTamY) , 'ÁREA (m²):' ); + $this->Text( $x+ 57 , $y+(148*$inTamY) , 'VALOR (R$/m²):' ); + $this->Text( $x+ 72 , $y+(148*$inTamY) , 'VALOR DA TAXA(R$):' ); + + $this->setFont( 'Arial','B',5 ); + $this->SetFillColor(240,240,240); + $this->Rect( $x+134, $y+(121*$inTamY) , 55 , 3*$inTamY , 'DF'); + $this->Text( $x+148 , $y+(123*$inTamY) , ' DEMONSTRATIVO DAS PARCELAS' ); + + $this->setFont( 'Arial','B',7 ); + $this->Text( $x+141 , $y+(128*$inTamY) , ' Cota única: ' . $this->arVencimentosDemonstrativos[0] . ', R$ ' . $this->arDemonstrativoParcelas[0]); + + $this->setFont( 'Arial','B',5 ); + $this->SetFillColor(240,240,240); + $this->Rect( $x+134, $y+(131*$inTamY) , 55 , 3*$inTamY , 'DF'); + $this->Text( $x+148 , $y+(133*$inTamY) , ' PARCELAS:' ); + + /* parcelas */ + $this->setFont( 'Arial', '', 5 ); + $this->Text( $x+135 , $y+(139*$inTamY) , '01) ' . $this->arVencimentosDemonstrativos[1] . ', R$' . $this->arDemonstrativoParcelas[1] ); + $this->Text( $x+135 , $y+(144*$inTamY) , '02) ' . $this->arVencimentosDemonstrativos[2] . ', R$' . $this->arDemonstrativoParcelas[2] ); + $this->Text( $x+135 , $y+(149*$inTamY) , '03) ' . $this->arVencimentosDemonstrativos[3] . ', R$' . $this->arDemonstrativoParcelas[3] ); + $this->Text( $x+135 , $y+(154*$inTamY) , '04) ' . $this->arVencimentosDemonstrativos[4] . ', R$' . $this->arDemonstrativoParcelas[4] ); + $this->Text( $x+135 , $y+(159*$inTamY) , '05) ' . $this->arVencimentosDemonstrativos[5] . ', R$' . $this->arDemonstrativoParcelas[5] ); + + $this->Text( $x+135 , $y+(164*$inTamY) , '06) ' . $this->arVencimentosDemonstrativos[6] . ', R$' . $this->arDemonstrativoParcelas[6] ); + + $this->Text( $x+162 , $y+(139*$inTamY) , '07) ' . $this->arVencimentosDemonstrativos[7] . ', R$' . $this->arDemonstrativoParcelas[7] ); + $this->Text( $x+162 , $y+(144*$inTamY) , '08) ' . $this->arVencimentosDemonstrativos[8] . ', R$' . $this->arDemonstrativoParcelas[8] ); + $this->Text( $x+162 , $y+(149*$inTamY) , '09) ' . $this->arVencimentosDemonstrativos[9] . ', R$' . $this->arDemonstrativoParcelas[9] ); + $this->Text( $x+162 , $y+(154*$inTamY) , '10) ' . $this->arVencimentosDemonstrativos[10] . ', R$' . $this->arDemonstrativoParcelas[10] ); + + $this->Text( $x+162 , $y+(159*$inTamY) , '11) ' . $this->arVencimentosDemonstrativos[11] . ', R$' . $this->arDemonstrativoParcelas[11] ); + + //$this->Text( $x+161 , $y+(165*$inTamY) , '12) ' . $this->arVencimentosDemonstrativos[12] . ', R$' . $this->arDemonstrativoParcelas[12] ); + + $this->setFont( 'Arial','B',6 ); + $this->Text( $x+96 , $y+(154*$inTamY) , 'VALOR TOTAL DOS TRIBUTOS (R$):' ); + + $this->setFont( 'Arial','', 5 ); + $this->Text( $x+3 , $y+(154*$inTamY) , 'A identificação dos campos e a forma de cálculo dos tributos constam nas folhas anteriores. Qualquer dúvida,' ); + $this->Text( $x+6 , $y+(157*$inTamY) , 'consulte o Setor de Tributos e Fiscalização, no Centro Administrativo, situado à Rua Luiz Antônio Garcez,' ); + $this->Text( $x+6 , $y+(160*$inTamY) , '140, Centro - CEP: 48.280-000 - Mata de São João/BA.' ); + $this->Text( $x+6 , $y+(163*$inTamY) , 'Tel/Fax: (71) 3635-1669 / (71) 3635-1310 / (71) 9957-6813.' ); + + /* mostrar dados */ + + $this->setFont( 'Arial','B',7 ); + $this->Text( $x+14 , $y+(85*$inTamY) , $this->stNomePrefeitura ); + $this->setFont( 'Arial','',6 ); + $this->Text( $x+14 , $y+(88*$inTamY) , $this->stSubTitulo ); + + $this->setFont( 'Arial','',5 ); + /* contribuibte */ + $this->Text( $x+ 2 , $y+(96*$inTamY) , substr($this->stContribuinte, 0, 72) ); + /* inscricao */ + $this->Text( $x+74 , $y+(96*$inTamY) , $this->stInscricaoCadastral ); + /* categoria */ + $this->Text( $x+107 , $y+(96*$inTamY) , $this->stCategoriaUtilizacao ); + /* tipo tributo */ + $this->Text( $x+138 , $y+(96*$inTamY) , $this->stTipoTributo ); + + /* logradouro */ + $this->Text( $x+14 , $y+(106*$inTamY) , $this->stCodigoLogradouro ); + /* nome logradouro */ + $this->Text( $x+35 , $y+(106*$inTamY) , $this->stNomeLogradouro ); + + $this->Text( $x+94 , $y+(106*$inTamY) , $this->stComplemento ); + + $this->Text( $x+140 , $y+(106*$inTamY) , $this->stCondominio ); + + /* quadra*/ + $this->Text( $x+ 14 , $y+(112*$inTamY) , $this->stQuadra ); + /* lote */ + $this->Text( $x+ 29 , $y+(112*$inTamY) , $this->stLote); + /* distrito */ + $this->Text( $x+ 45 , $y+(112*$inTamY) , $this->stDistrito ); + /* regiao */ + $this->Text( $x+ 89 , $y+(112*$inTamY) , $this->stRegiao); + /* cep */ + $this->Text( $x+108 , $y+(112*$inTamY) , $this->stCep); + /* cidade */ + $this->Text( $x+129 , $y+(112*$inTamY) , $this->stCidade ); + /* estado */ + $this->Text( $x+170 , $y+(112*$inTamY) , $this->stEstado ); + + /* uso privativo terreno */ + $this->Text( $x+ 43 , $y+(120*$inTamY) , $this->stAreaUsoPrivativoTerreno ); + /* vupt */ + $this->Text( $x+ 67 , $y+(120*$inTamY) , $this->stVupt); + /* venal terreno */ + $this->Text( $x+ 96 , $y+(120*$inTamY) , $this->stValorVenalTerreno ); + /* imposto terre */ + $this->Text( $x+ 115, $y+(120*$inTamY) , $this->stImpostoTerritorial); + /* uso privativo edificaoca */ + $this->Text( $x+ 43 , $y+(126*$inTamY) , $this->stAreaUsoPrivativoCoberta); + + $this->Text( $x+ 43 , $y+(132*$inTamY) , $this->stAreaUsoPrivativoDescoberta ); + + $this->Text( $x+ 43 , $y+(137*$inTamY) , $this->stAreaConstruidaTotal ); + + $this->Text( $x+ 67 , $y+(137*$inTamY) , $this->stValorVenalConstrucaoTotal ); + + /* vupc */ + $this->Text( $x+ 67 , $y+(126*$inTamY) , $this->stVupc ); + + $this->Text( $x+ 67 , $y+(132*$inTamY) , $this->stVupcd ); + /* venal construcao coberta */ + $this->Text( $x+ 96 , $y+(126*$inTamY) , $this->stValorVenalConstrucaoCoberta ); + + $this->Text( $x+ 96 , $y+(132*$inTamY) , $this->stValorVenalConstrucaoDescoberta ); + /* impostto predial */ + $this->Text( $x+115 , $y+(130*$inTamY) , $this->stImpostoPredial ); + + // aliquota + $this->Text( $x+ 36 , $y+(142*$inTamY) , $this->stAliquota ); + // venal imovel + $this->Text( $x+ 71, $y+(142*$inTamY) , $this->stValorVenalImovel); //valor venal do imovel + // imposto + $this->Text( $x+ 111 , $y+(142*$inTamY) , $this->stValorImposto); + + // tipo + $this->Text( $x+ 5 , $y+(149.5*$inTamY) , $this->stTipoUnidade ); + // zona + $this->Text( $x+ 23 , $y+(149.5*$inTamY) , $this->stZona ); + // area + $this->Text( $x+ 42 , $y+(149.5*$inTamY) , $this->stAreaM2 ); + // balor area + $this->Text( $x+ 58 , $y+(149.5*$inTamY) , $this->stValorM2); + // taxa + $this->Text( $x+ 75 , $y+(149.5*$inTamY) , $this->stValorTaxa ); + // ilu + $this->Text( $x+ 108 , $y+(149*$inTamY) , $this->stContribIlumPublica ); + + // total + $this->setFont( 'Arial','B',7 ); + $this->Text( $x+ 110 , $y+(160*$inTamY) , $this->stValorTotalTributos ); + + $this->setFont('Arial','',4); + $this->Text ( $x+2, $y+(167*$inTamY), 'Data de emissão: '.date("d/m/Y h:i:s")); + } +// function novaPagina() { +// $this->addPage(); +// } +// + public function show($stNome = "Carne.pdf", $stOpcao="D") + { + $this->output($stNome,$stOpcao); + } +} + +class RCarneIPTUMataSaoJoao2016 +{ +/* + * @var Integer + * @access Private +*/ +var $inHorizontal; +/* + * @var Integer + * @access Private +*/ +var $inVertical; +/* + * @var Array + * @access Private +*/ +var $arEmissao; +/* + * @var Object + * @access Private +*/ +var $obBarra; +/* + * @var Array + * @access Private +*/ +var $arBarra; +/* + * @var Boolean; + * @access Private +*/ +var $boPulaPagina; +/* + * @var Object + * @access Private +*/ +var $obRARRCarne; +var $obRCarneDadosCadastrais; +var $stLocal; +var $boConsolidacao; +var $stNumeracaoConsolidacao; +var $dtVencimentoConsolidacao; + +/* setters */ +function setHorizontal($valor) { $this->inHorizontal = $valor; } +function setVertical($valor) { $this->inVertical = $valor; } +function setEmissao($valor) { $this->arEmissao = $valor; } +function setBarra($valor) { $this->obBarra = $valor; } +function setArBarra($valor) { $this->arBarra = $valor; } +function setPulaPagina($valor) { $this->boPulaPagina = $valor; } +function setConsolidacao($valor) { $this->boConsolidacao = $valor; } +function setVencimentoConsolidacao($valor) { $this->dtVencimentoConsolidacao = $valor; } +function setNumeracaoConsolidacao($valor) { $this->stNumeracaoConsolidacao = $valor; } + +/* getters */ +function getHorizontal() { return $this->inHorizontal; } +function getVertical() { return $this->inVertical; } +function getEmissao() { return $this->arEmissao; } +function getBarra() { return $this->obBarra; } +function getArBarra() { return $this->arBarra; } +function getPulaPagina() { return $this->boPulaPagina; } +function getConsolidacao() { return $this->boConsolidacao; } +function getNumeracaoConsolidacao() { return $this->stNumeracaoConsolidacao; } +function getVencimentoConsolidacao() { return $this->dtVencimentoConsolidacao; } + +/* + * Metodo Construtor + * @access Private +*/ +function RCarneIPTUMataSaoJoao2016($arEmissao, $horizontal = 7, $vertical = 95) +{ + $this->obRARRCarne = new RARRCarne; + $this->arEmissao = $arEmissao; + $this->inHorizontal = $horizontal; + $this->inVertical = $vertical; + $this->boConsolidacao = false; + //$obRProtocolo = new RProtocolo; + //$obRCarnePetropolis = new RCarnePetropolis; +} + +function imprimirCarne($diffBaixa = FALSE) +{ + global $inCodFebraban; + //--------------------- + $this->obRARRConfiguracao = new RARRConfiguracao; + $this->obRARRConfiguracao->setCodModulo ( 2 ); + $this->obRARRConfiguracao->consultar(); + $inCodFebraban = $this->obRARRConfiguracao->getCodFebraban(); + unset($this->obRARRConfiguracao); + + $obTAdministracaoConfiguracao = new TAdministracaoConfiguracao; + $stFiltro = " WHERE exercicio = '".Sessao::getExercicio()."' AND parametro = 'logotipo' "; + $obTAdministracaoConfiguracao->recuperaTodos( $rsListaImagens, $stFiltro ); + $stNomeImagem = $rsListaImagens->getCampo("valor"); + + $inSaltaPagina = ""; + $this->obRCarnePetropolis = new RCarneDadosCadastraisMataSaoJoao(); + $this->obRCarnePetropolis->stCamLogo = CAM_FW_TEMAS."imagens/".$stNomeImagem; + $this->obRCarnePetropolis->lblTitulo1 = "MATA DE SÃO JOÃO - Sec. de Adm. e Fin."; + + //$this->obRCarnePetropolis->configuraCarne(); + $nuValorTotal = $nuValorNormal = $nuValorJuroNormal = $nuValorMultaNormal = 0.00; + //$this->obRCarnePetropolis->configuraProtocolo(); + foreach ($this->arEmissao as $valor => $chave) { + /* imprimir duas folhas com dados cadastrais */ + /* buscar informações para dados cadastrais*/ + + include_once ( CAM_GT_ARR_MAPEAMENTO."TARRCarne.class.php" ); + + $stFiltro = " WHERE aivv.inscricao_municipal = ".$chave[0]['inscricao']; + + $obTARRCarne = new TARRCarne; + + $obTARRCarne->recuperaDadosIPTUMata( $rsListaCarne, $stFiltro, $chave[0]['cod_parcela'] ); + + $rsListaCarne->addFormatacao ('area_lote','NUMERIC_BR'); + $rsListaCarne->addFormatacao ('vupt','NUMERIC_BR'); + $rsListaCarne->addFormatacao ('vupc','NUMERIC_BR'); + $rsListaCarne->addFormatacao ('venal_territorial_calculado','NUMERIC_BR'); + $rsListaCarne->addFormatacao ('imposto_territorial','NUMERIC_BR'); + $rsListaCarne->addFormatacao ('imposto_predial','NUMERIC_BR'); + $rsListaCarne->addFormatacao ('area_imovel','NUMERIC_BR'); + $rsListaCarne->addFormatacao ('venal_predial_calculado','NUMERIC_BR'); + $rsListaCarne->addFormatacao ('aliquota','NUMERIC_BR'); + $rsListaCarne->addFormatacao ('venal_total_calculado','NUMERIC_BR'); + $rsListaCarne->addFormatacao ('valor_imposto','NUMERIC_BR'); + $rsListaCarne->addFormatacao ('area_m2_limpeza_publica','NUMERIC_BR'); + $rsListaCarne->addFormatacao ('valor_m2_limpeza_publica','NUMERIC_BR'); + $rsListaCarne->addFormatacao ('taxa_limpeza_publica','NUMERIC_BR'); + $rsListaCarne->addFormatacao ('valor_total_tributos','NUMERIC_BR'); + $rsListaCarne->addFormatacao ('taxa_luz','NUMERIC_BR'); + $rsListaCarne->addFormatacao ('valor_parcela','NUMERIC_BR'); + $rsListaCarne->addFormatacao ('vupcd','NUMERIC_BR'); + $rsListaCarne->addFormatacao ('area_total','NUMERIC_BR'); + $rsListaCarne->addFormatacao ('valor_venal_construcao_descoberta','NUMERIC_BR'); + $rsListaCarne->addFormatacao ('valor_venal_construcao_coberta','NUMERIC_BR'); + $rsListaCarne->addFormatacao ('area_descoberta','NUMERIC_BR'); + + $arDadosParcelas = array(); + $inTotalParcelas = 0; + if ( !$rsListaCarne->Eof() ) { + $rsListaCarne->setPrimeiroElemento(); + //$inCodCalculo = $rsListaCarne->getCampo("cod_calculo"); + while ( !$rsListaCarne->Eof() ) { + if ( $rsListaCarne->getCampo("nro_parcela") != "única" ) { + $arDadosParcelas[$rsListaCarne->getCampo("nro_parcela")]["data"] = $rsListaCarne->getCampo("vencimento_parcela"); + + $arDadosParcelas[$rsListaCarne->getCampo("nro_parcela")]["valor"] = $rsListaCarne->getCampo("valor_parcela"); + } else { + $arDadosParcelas[0]["data"] = $rsListaCarne->getCampo("vencimento_parcela"); + $arDadosParcelas[0]["valor"] = $rsListaCarne->getCampo("valor_parcela"); + } + + $inTotalParcelas++; + if ( $inTotalParcelas > 11 ) + break; + + $rsListaCarne->proximo(); + } + + } + + $rsListaCarne->setPrimeiroElemento(); + + /* setar todos os dados necessarios */ + $this->obRCarnePetropolis->stVupcd = $rsListaCarne->getCampo("vupcd"); + $this->obRCarnePetropolis->stValorVenalConstrucaoDescoberta = $rsListaCarne->getCampo("valor_venal_construcao_descoberta"); + $this->obRCarnePetropolis->stValorVenalConstrucaoCoberta = $rsListaCarne->getCampo("valor_venal_construcao_coberta"); + $this->obRCarnePetropolis->stValorVenalConstrucaoTotal = $rsListaCarne->getCampo("venal_predial_calculado"); //'10.800,00' ; + $this->obRCarnePetropolis->stAreaConstruidaTotal = $rsListaCarne->getCampo("area_total"); + $this->obRCarnePetropolis->stAreaUsoPrivativoDescoberta = $rsListaCarne->getCampo("area_descoberta"); + $this->obRCarnePetropolis->stNomePrefeitura = 'PREFEITURA MUNICIPAL DE MATA DE SÃO JOÃO'; + $this->obRCarnePetropolis->stSubTitulo = 'Secretaria de Administração e Finanças'; + $this->obRCarnePetropolis->stExercicio = (string) $rsListaCarne->getCampo("exercicio"); //'2006'; + $this->obRCarnePetropolis->stContribuinte = (string) $rsListaCarne->getCampo("nom_proprietario"); //'WELLIGNTON LAZARO BARRETO DE OLIVEIRA' ; + $this->obRCarnePetropolis->stInscricaoCadastral = (string) $rsListaCarne->getCampo("inscricao_municipal"); //'015041' ; + $this->obRCarnePetropolis->stCategoriaUtilizacao = (string) $rsListaCarne->getCampo("categoria_utilizacao_imovel"); //'RESIDENCIAL' ; + $this->obRCarnePetropolis->stTipoTributo = 'IPTU / TAXA DE LIMPEZA / CONTRB. DE ILUM. PÚBLICA' ; + $this->obRCarnePetropolis->stCodigoLogradouro = (string) $rsListaCarne->getCampo("cod_logradouro"); //'50.003' ; + $this->obRCarnePetropolis->stEnderecoEntrega = str_replace ( "'", " ",$rsListaCarne->getCampo("endereco_entrega") ); + $this->obRCarnePetropolis->stNomeLogradouro = (string) str_replace ( "Não Informado ", "", $rsListaCarne->getCampo("endereco_logradouro") ); //'AV DO FAROL 50.003' ; + $this->obRCarnePetropolis->stComplemento = (string) $rsListaCarne->getCampo("endereco_complemento"); //'CONDOMINIO SOLAR DOS ARCOS' ; + $this->obRCarnePetropolis->stQuadra = (string) $rsListaCarne->getCampo("numero_quadra"); //'02' ; + $this->obRCarnePetropolis->stLote = (string) $rsListaCarne->getCampo("numero_lote"); //'02' ; + $this->obRCarnePetropolis->stDistrito = (string) $rsListaCarne->getCampo("distrito"); //'PRAIA DO FORTE' ; + $this->obRCarnePetropolis->stCondominio = (string) $rsListaCarne->getCampo("condominio"); + $this->obRCarnePetropolis->stRegiao = (string) $rsListaCarne->getCampo("regiao"); //'LITORAL' ; + $this->obRCarnePetropolis->stCep = (string) $rsListaCarne->getCampo("cep"); //'48.820-000' ; + $this->obRCarnePetropolis->stCidade = 'MATA DE SÃO JOÃO' ; + $this->obRCarnePetropolis->stEstado = 'BAHIA' ; + $this->obRCarnePetropolis->stAreaUsoPrivativoTerreno = (string) $rsListaCarne->getCampo("area_lote"); //'114,52' ; + $this->obRCarnePetropolis->stVupt = (string) $rsListaCarne->getCampo("vupt"); //'4,5' ; + $this->obRCarnePetropolis->stVupc = (string) $rsListaCarne->getCampo("vupc"); //'180,00' ; + $this->obRCarnePetropolis->stValorVenalTerreno = (string) $rsListaCarne->getCampo("venal_territorial_calculado"); //'526,50' ; + $this->obRCarnePetropolis->stImpostoTerritorial = (string) $rsListaCarne->getCampo("imposto_territorial"); //'5,27' ; + $this->obRCarnePetropolis->stAreaUsoPrivativoCoberta = (string) $rsListaCarne->getCampo("area_imovel"); //'50,00' ; + $this->obRCarnePetropolis->stImpostoPredial = (string) $rsListaCarne->getCampo("imposto_predial"); //'108,00' ; + $this->obRCarnePetropolis->stAliquota = (string) $rsListaCarne->getCampo("aliquota"); //'1,00 %' ; + $this->obRCarnePetropolis->stValorVenalImovel = (string) $rsListaCarne->getCampo("venal_total_calculado"); //'11.326,50' ; + $this->obRCarnePetropolis->stValorImposto = (string) $rsListaCarne->getCampo("valor_imposto"); //'113,27' ; + $this->obRCarnePetropolis->stTipoUnidade = (string) $rsListaCarne->getCampo("categoria_utilizacao_imovel"); //'RESIDENCIAL'; + $this->obRCarnePetropolis->stZona = (string) $rsListaCarne->getCampo("zona"); //'POPULAR' ; + $this->obRCarnePetropolis->stAreaM2 = (string) $rsListaCarne->getCampo("area_m2_limpeza_publica"); //'11.656.220,00' ; + $this->obRCarnePetropolis->stValorM2 = (string) $rsListaCarne->getCampo("valor_m2_limpeza_publica"); //'1,01' ; + $this->obRCarnePetropolis->stValorTaxa = (string) $rsListaCarne->getCampo("taxa_limpeza_publica"); //'28,93' ; + $this->obRCarnePetropolis->stValorTotalTributos = (string) $rsListaCarne->getCampo("valor_total_tributos"); //'162,20' ; + $this->obRCarnePetropolis->stContribIlumPublica = (string) $rsListaCarne->getCampo("taxa_luz"); //'20,00'; + $this->obRCarnePetropolis->arDemonstrativoParcelas = array ( + 0 => $arDadosParcelas[0]["valor"], //'140,87', + 1 => $arDadosParcelas[1]["valor"], //'16,22' , + 2 => $arDadosParcelas[2]["valor"], //'16,22' , + 3 => $arDadosParcelas[3]["valor"], //'16,22' , + 4 => $arDadosParcelas[4]["valor"], //'16,22' , + 5 => $arDadosParcelas[5]["valor"], //'16,22' , + 6 => $arDadosParcelas[6]["valor"], //'16,22' , + 7 => $arDadosParcelas[7]["valor"], //'16,22' , + 8 => $arDadosParcelas[8]["valor"], //'16,22' , + 9 => $arDadosParcelas[9]["valor"], //'16,22' , + 10 => $arDadosParcelas[10]["valor"], //'16,22' + 11 => $arDadosParcelas[11]["valor"], //'16,22' + 12 => $arDadosParcelas[12]["valor"] //'16,22' + ) ; + $this->obRCarnePetropolis->arVencimentosDemonstrativos = array ( + 0 => $arDadosParcelas[0]["data"], //'05/02/2007', + 1 => $arDadosParcelas[1]["data"], //'05/02/2007' , + 2 => $arDadosParcelas[2]["data"], //'05/03/2007' , + 3 => $arDadosParcelas[3]["data"], //'05/04/2007' , + 4 => $arDadosParcelas[4]["data"], //'05/05/2007' , + 5 => $arDadosParcelas[5]["data"], //'05/06/2007' , + 6 => $arDadosParcelas[6]["data"], //'05/07/2007' , + 7 => $arDadosParcelas[7]["data"], //'05/08/2007' , + 8 => $arDadosParcelas[8]["data"], //'05/09/2007' , + 9 => $arDadosParcelas[9]["data"], //'05/10/2007' , + 10 => $arDadosParcelas[10]["data"], //'05/11/2007' + 11 => $arDadosParcelas[11]["data"], //'05/11/2007' + 12 => $arDadosParcelas[12]["data"] //'05/11/2007' + ) ; + + $this->obRCarnePetropolis->desenhaCarne(10,20); + $this->obRCarnePetropolis->novaPagina(); + + $inSaltaPagina++; + + $this->obRCarnePetropolis->setImagem(CAM_FW_TEMAS."imagens/".$stNomeImagem ); //logoCarne.png" ); + $this->obRARRCarne->obRARRParcela->roRARRLancamento->setCodLancamento( $valor ); +// $this->obRARRCarne->inCodContribuinteInicial = $chave[0]["numcgm"]; + $this->obRARRCarne->stCodContribuinteConjunto = str_replace('/', ',', $chave[0]["numcgm"]); + $obErro = $this->obRARRCarne->reemitirCarneDiverso( $rsGeraCarneCabecalho ); + $this->stExercicio = $rsGeraCarneCabecalho->getCampo( 'descricao' ); + $this->obRARRCarne->stExercicio = $chave[0]["exercicio"]; + if ( $obErro->ocorreu() ) { + break; + } + $this->obRCarnePetropolis->setObservacaoL1 ('Créditos: '); + + $stFiltroComp = " WHERE credito_grupo.cod_grupo = ".$rsGeraCarneCabecalho->getCampo( "cod_grupo" )." AND credito_grupo.ano_exercicio = '".$rsGeraCarneCabecalho->getCampo( "ano_exercicio" )."'"; + $obTARRCarne->retornaDadosCompensacao( $rsDadosCompensacao, $stFiltroComp ); + + $this->obRCarnePetropolis->stCarteira = $rsDadosCompensacao->getCampo("carteira"); + $this->obRCarnePetropolis->stEspecieDoc = $rsDadosCompensacao->getCampo("especie_doc"); + $this->obRCarnePetropolis->stEspecie = $rsDadosCompensacao->getCampo("especie"); + $this->obRCarnePetropolis->stAceite = $rsDadosCompensacao->getCampo("aceite"); + $this->obRCarnePetropolis->stDataDocumento = date("d/m/Y"); + $this->obRCarnePetropolis->stDataProcessamento = date("d/m/Y"); + $this->obRCarnePetropolis->stAgenciaCodCedente = $rsDadosCompensacao->getCampo("agencia")."/".$rsDadosCompensacao->getCampo("codigo_cedente"); + $this->obRCarnePetropolis->stLocalPagamento = $rsDadosCompensacao->getCampo("local_pagamento"); + //$this->obRCarnePetropolis->stCedente = 'Prefeitura Municipal de Mata de São João'; + $this->obRCarnePetropolis->stQuantidade = $rsDadosCompensacao->getCampo("quantidade"); + + while ( !$rsGeraCarneCabecalho->eof() ) { + /* montagem cabecalho (protocolo) */ + $this->obRCarnePetropolis->setCt ( $rsGeraCarneCabecalho->getCampo( 'ano_aquisicao' ) ); + $this->obRCarnePetropolis->setCa ( $rsGeraCarneCabecalho->getCampo( 'ca' ) ); + $this->obRCarnePetropolis->setCep ( $rsGeraCarneCabecalho->getCampo( 'cep') ); + $this->obRCarnePetropolis->setExercicio ( $rsGeraCarneCabecalho->getCampo( 'exercicio' ) ); + $this->obRCarnePetropolis->setNomCgm ( $rsGeraCarneCabecalho->getCampo( 'nom_cgm' ) ); + $this->obRCarnePetropolis->setRua ( str_replace ( "Não Informado ", "", $rsGeraCarneCabecalho->getCampo( 'nom_logradouro' ) ) ); + $this->obRCarnePetropolis->setNumero ( $rsGeraCarneCabecalho->getCampo( 'numero' ) ); + $this->obRCarnePetropolis->setComplemento ( $rsGeraCarneCabecalho->getCampo( 'complemento' ) ); + $this->obRCarnePetropolis->setCidade ( $rsGeraCarneCabecalho->getCampo( 'nom_municipio' ) ); + $this->obRCarnePetropolis->setUf ( $rsGeraCarneCabecalho->getCampo( 'sigla_uf' ) ); + $this->obRCarnePetropolis->setInscricao ( str_pad($rsGeraCarneCabecalho->getCampo( 'inscricao_municipal' ),strlen( $stMascaraInscricao ), '0', STR_PAD_LEFT) ); + $this->obRCarnePetropolis->setCtmDci ( $rsGeraCarneCabecalho->getCampo( 'ctm_dci' ) ); + $this->obRCarnePetropolis->setCodLogradouro ( $rsGeraCarneCabecalho->getCampo( 'cod_logradouro' ) ); + $this->obRCarnePetropolis->setDistrito ( $rsGeraCarneCabecalho->getCampo( 'distrito' ) ); + $this->obRCarnePetropolis->setProcessamento ( $rsGeraCarneCabecalho->getCampo( 'data_processamento' ) ); + $this->obRCarnePetropolis->setAreaTerreno ( $rsGeraCarneCabecalho->getCampo( 'area_real' ) ); + $this->obRCarnePetropolis->setAreaEdificada ( $rsGeraCarneCabecalho->getCampo( 'area_edificada' ) ); + $this->obRCarnePetropolis->setUtilizacaoImovel ( $rsGeraCarneCabecalho->getCampo( 'utilizacao' ) ); + $this->obRCarnePetropolis->setTributo ( $rsGeraCarneCabecalho->getCampo( 'cod_grupo')." - ".$rsGeraCarneCabecalho->getCampo( 'descricao' ) ); + $this->obRCarnePetropolis->setValorTributoReal ( $rsGeraCarneCabecalho->getCampo( 'valor_venal_total' ) ); + $this->obRCarnePetropolis->setObservacao ( wordwrap($rsGeraCarneCabecalho->getCampo('observacao' ),40,chr(13)) ); + $this->obRCarnePetropolis->setNomBairro ( $rsGeraCarneCabecalho->getCampo( 'nom_bairro' ) ); + $this->obRCarnePetropolis->setCodDivida ( $rsGeraCarneCabecalho->getCampo( 'cod_grupo' ) ); + if (preg_match('/LIMPEZA.*/i',$rsGeraCarneCabecalho->getCampo( 'descricao_credito' ) ) ) { + $this->obRCarnePetropolis->setTaxaLimpezaAnual ( $rsGeraCarneCabecalho->getCampo( 'valor' ) ); + } else { + $flImpostoAnualReal = $rsGeraCarneCabecalho->getCampo( 'valor' ); + $this->obRCarnePetropolis->setImpostoAnualReal ( $flImpostoAnualReal ); + } + $this->obRCarnePetropolis->setReferencia ( "" ); + $this->obRCarnePetropolis->setNumeroPlanta ( "" ); + + // capturar creditos + $this->obRCarnePetropolis->setObservacaoL1 ( $this->obRCarnePetropolis->getObservacaoL1().$rsGeraCarneCabecalho->getCampo( 'descricao_credito').": ".$rsGeraCarneCabecalho->getCampo( 'valor' )." "); + + $rsGeraCarneCabecalho->proximo(); + + } //fim do loop de reemitirCarne + $this->obRCarnePetropolis->setValorAnualReal ( $flImpostoAnualReal + $this->obRCarnePetropolis->getTaxaLimpezaAnual() ); + // formatar + $this->obRCarnePetropolis->setValorAnualReal ( number_format($this->obRCarnePetropolis->getValorAnualReal(),2,',','.') ); + $this->obRCarnePetropolis->setTaxaLimpezaAnual ( number_format($this->obRCarnePetropolis->getTaxaLimpezaAnual(),2,',','.') ); + $this->obRCarnePetropolis->setImpostoAnualReal ( number_format($this->obRCarnePetropolis->getImpostoAnualReal(),2,',','.') ); + if ($this->obRCarnePetropolis->getValorTributoReal() != "") { + $this->obRCarnePetropolis->setValorTributoReal ( number_format($this->obRCarnePetropolis->getValorTributoReal(),2,',','.') ); + } +/* $this->obRCarnePetropolis->drawProtocolo(); + $this->obRCarnePetropolis->posicionaVariaveisProtocolo(); +*/ + $inParcela = $inCount = ""; + + $this->inHorizontal = 7; + $this->inVertical = 8; + + $this->obBarra = new RCodigoBarraFebrabanCompensacaoBB_Anexo5; + $this->arBarra = array(); + + /*********************** CONSOLIDACAO */ + if ( $this->getConsolidacao() ) { + + #echo '

    CONSOLIDACAO

    '; exit; + + + foreach ($chave as $parcela) { + + $inParcela++; + + $this->obRCarnePetropolis->setImagemCarne( CAM_FW_TEMAS."imagens/".$stNomeImagem ); + $this->obRCarnePetropolis->setImagem(""); + $this->obRARRCarne->obRARRParcela->setCodParcela( $parcela["cod_parcela"] ); + $obErro = $this->obRARRCarne->obRARRParcela->listarParcelaCarne( $rsParcela ); + + // instanciar mapeamento da função de calculo de juro e multa + require_once(CAM_GT_ARR_MAPEAMENTO.'FARRCalculaParcelasReemissao.class.php'); + require_once(CAM_GT_ARR_MAPEAMENTO.'FARRCalculaJuroOrMultaParcelasReemissao.class.php'); + // retorna parcela com juro e multa aplicados + $obCalculaParcelas = new FARRCalculaParcelasReemissao; + // retorna valores de juro e multa que foram aplicados + $obCalculaJM = new FARRCalculaJuroOrMultaParcelasReemissao; + + $arTmp = explode('/',$this->getVencimentoConsolidacao()); + $dtVencimento = $arTmp[2].'-'.$arTmp[1].'-'.$arTmp[0]; + + $stParametro = "'".$rsParcela->getCampo('numeracao')."',".$this->obRARRCarne->stExercicio; + $stParametro .= ",".$parcela["cod_parcela"].",'"; + + // monta paramentros com as datas + $stParametro1 = $stParametro.$dtVencimento."'"; + + // valor atualizado + $obErro = $obCalculaParcelas->executaCalculaValoresParcelasReemissao($rsTmp,$stParametro1); + $arValorNormal = explode ( "§", $rsTmp->getCampo('valor') ); + $this->arBarra['valor_documento'] = $nuValorNormal; + $this->arBarra['fator_vencimento'] = (string) $rsParcela->getCampo( 'fator_vencimento' ); + $this->arBarra['nosso_numero'] = (string) $this->getNumeracaoConsolidacao(); + $this->obRCarnePetropolis->stNumeracao = $this->getNumeracaoConsolidacao(); + $this->arBarra['convenio'] = 960663; + $this->arBarra['tipo_moeda'] = 9; + if ( !$obErro->ocorreu() ) { + $this->obRARRCarne->obRARRParcela->obTARRParcela->setDado ( "cod_parcela" , $rsParcela->getCampo('cod_parcela') ); + $this->obRARRCarne->obRARRParcela->obTARRParcela->setDado ( "cod_lancamento" , $rsParcela->getCampo('cod_lancamento')); + $this->obRARRCarne->obRARRParcela->obTARRParcela->setDado ( "nr_parcela" , $rsParcela->getCampo('nr_parcela') ); + $this->obRARRCarne->obRARRParcela->obTARRParcela->setDado ( "vencimento" , $this->getVencimentoConsolidacao() ); + $this->obRARRCarne->obRARRParcela->obTARRParcela->setDado ( "valor" ,$arValorNormal[0] ); + $obErro = $this->obRARRCarne->obRARRParcela->obTARRParcela->alteracao($boTransacao); + } + + $nuValorTotal += $arValorNormal[0]; + $nuValorNormal += $arValorNormal[1]; + $nuValorJuroNormal += $arValorNormal[3]; + $nuValorMultaNormal += $arValorNormal[2]; + $nuValorCorrecaoNormal += $arValorNormal[4]; + } + $this->arBarra['valor_documento'] = $nuValorTotal; + + $this->obRCarnePetropolis->setObservacaoL1 ( 'Não receber após o vencimento. ' ); + $this->obRCarnePetropolis->setParcela ( "1/1" ); + $this->obRCarnePetropolis->setVencimento ( $this->getVencimentoConsolidacao() ); + + $this->obRCarnePetropolis->flValorMultaJuros = ( number_format(round($nuValorCorrecaoNormal+$nuValorMultaNormal+$nuValorJuroNormal,2),2,',','')); + $this->obRCarnePetropolis->flValorJuros = ( number_format(round($nuValorJuroNormal,2),2,',','')); + $this->obRCarnePetropolis->flValorMulta = ( number_format(round($nuValorMultaNormal,2),2,',','')); + $this->obRCarnePetropolis->flValorOutros = ( number_format(round($nuValorCorrecaoNormal,2),2,',','')); + $this->obRCarnePetropolis->setValor ( number_format(round($nuValorNormal,2),2,',','')); + $this->obRCarnePetropolis->setValorTotal(number_format(round($nuValorTotal,2),2,',','')); + + $this->arCodigoBarra = $this->obBarra->geraFebraban( $this->arBarra ); + $this->obRCarnePetropolis->setBarCode( $this->arCodigoBarra['codigo_barras'] ); + $this->obRCarnePetropolis->setLinhaCode( $this->arCodigoBarra['linha_digitavel'] ); + + $this->obRCarnePetropolis->drawCarne( $this->inHorizontal, $this->inVertical ); + //$this->obRCarnePetropolis->posicionaVariaveis( $this->inHorizontal, $this->inVertical ); + $this->obRCarnePetropolis->setPicote( $this->inHorizontal, $this->inVertical ); + $this->inVertical += 96; + + + } else { + + foreach ($chave as $parcela) { // impressao das parcelas selecionadas para cada codigo de lancamento + $inParcela++; + + $this->obRCarnePetropolis->setImagemCarne( CAM_FW_TEMAS."imagens/".$stNomeImagem ); //logoCarne.png" ); //imagem mudar + $this->obRCarnePetropolis->setImagem(""); + $this->obRARRCarne->obRARRParcela->setCodParcela( $parcela["cod_parcela"] ); + $obErro = $this->obRARRCarne->obRARRParcela->listarParcelaCarne( $rsParcela ); + + // instanciar mapeamento da função de calculo de juro e multa + require_once(CAM_GT_ARR_MAPEAMENTO.'FARRCalculaParcelasReemissao.class.php'); + require_once(CAM_GT_ARR_MAPEAMENTO.'FARRCalculaJuroOrMultaParcelasReemissao.class.php'); + // retorna parcela com juro e multa aplicados + $obCalculaParcelas = new FARRCalculaParcelasReemissao; + // retorna valores de juro e multa que foram aplicados + $obCalculaJM = new FARRCalculaJuroOrMultaParcelasReemissao; + + // data da reemissao + $arTmp = explode('/',$rsParcela->getCampo( 'vencimento' )); + $dtVencimento = $arTmp[2].'-'.$arTmp[1].'-'.$arTmp[0]; + + // parametro padrao + $stParametro = "'".$rsParcela->getCampo('numeracao')."',".$this->obRARRCarne->stExercicio; + $stParametro .= ",".$parcela["cod_parcela"].",'"; + + // monta paramentros com as datas + $stParametro1 = $stParametro.$dtVencimento."'"; + + // valor atualizado + $obErro = $obCalculaParcelas->executaCalculaValoresParcelasReemissao($rsTmp,$stParametro1); + $arValorNormal = explode ( "§", $rsTmp->getCampo('valor') ); + $nuValorTotal = $arValorNormal[0]; + $nuValorNormal = $arValorNormal[1]; + $stJuroNormal = $arValorNormal[3]; + $stMultaNormal = $arValorNormal[2]; + $stCorrecaoNormal = $arValorNormal[5]; + + $this->obRARRCarne->obRARRParcela->obTARRParcela->setDado ( "cod_parcela" , $rsParcela->getCampo('cod_parcela') ); + $this->obRARRCarne->obRARRParcela->obTARRParcela->setDado ( "cod_lancamento" , $rsParcela->getCampo('cod_lancamento')); + $this->obRARRCarne->obRARRParcela->obTARRParcela->setDado ( "nr_parcela" , $rsParcela->getCampo('nr_parcela') ); + $this->obRARRCarne->obRARRParcela->obTARRParcela->setDado ( "vencimento" , $rsParcela->getCampo( 'vencimento' ) ); + $this->obRARRCarne->obRARRParcela->obTARRParcela->setDado ( "valor" ,$arValorNormal[0] ); + $obErro = $this->obRARRCarne->obRARRParcela->obTARRParcela->alteracao($boTransacao); + + $this->obRCarnePetropolis->setNumeracao( (string) $rsParcela->getCampo( 'numeracao' ) ); + $this->arBarra['valor_documento'] = $nuValorTotal ; + $this->arBarra['fator_vencimento'] = (string) $rsParcela->getCampo( 'fator_vencimento' ); + $this->arBarra['nosso_numero'] = (string) $rsParcela->getCampo( 'numeracao' ); + $this->obRCarnePetropolis->stNumeracao = $rsParcela->getCampo( 'numeracao' ); + $this->arBarra['convenio'] = 960663; + $this->arBarra['tipo_moeda'] = 9; + + if ( $obErro->ocorreu() ) { + break; + } + if ($diffBaixa) { + $this->obRCarnePetropolis->setParcelaUnica ( true ); + $this->obRCarnePetropolis->lblTitulo2 = ' '; + $this->obRCarnePetropolis->lblValorCotaUnica = 'VALOR TOTAL'; + $this->obRCarnePetropolis->setVencimento ( $rsParcela->getCampo( 'vencimento' ) ); + $this->obRCarnePetropolis->setValor ( number_format($nuValorNormal,2,',','.') ); + $this->obRCarnePetropolis->setParcela ( $rsParcela->getCampo( 'info' ) ); + } else { + if ( $rsParcela->getCampo( 'nr_parcela' ) == 0 ) { + $this->obRCarnePetropolis->setParcelaUnica ( true ); + $this->obRCarnePetropolis->setVencimento ( $rsParcela->getCampo( 'vencimento' ) ); + $this->obRCarnePetropolis->setValor ( number_format($nuValorNormal,2,',','.') ); + // Recuperar Desconto + include_once(CAM_GT_ARR_MAPEAMENTO."FARRParcentualDescontoParcela.class.php"); + $obPercentual = new FARRParcentualDescontoParcela; + $obPercentual->executaFuncao($rsPercentual,"".$parcela["cod_parcela"].",'".$dtVencimento."'"); + + $this->obRCarnePetropolis->stObsVencimento = "Não receber após o vencimento."; + $this->obRCarnePetropolis->setParcela ( 'ÚNICA' ); + } else { + $this->obRCarnePetropolis->stObsVencimento = "Receber até 31/12/2016."; + $arVencimentos = $this->geraParcelas($rsParcela->getCampo( 'vencimento' ),4); + $this->obRCarnePetropolis->setParcela( $rsParcela->getCampo( 'info' )); + $this->obRCarnePetropolis->setParcelaUnica( false ); + $this->obRCarnePetropolis->setVencimento ( $rsParcela->getCampo( 'vencimento' ) ); + + $arTmp = explode('/',$rsParcela->getCampo( 'vencimento' )); + $boVenc1 = false; + $boVenc2 = false; + $boVenc3 = false; + + if ($this->stLocal != "WEB") { + $stMes = $arTmp[1]; + $arTmp = explode('/',$arVencimentos[0]); + if ($arTmp[1] >= $stMes) { + $stMes = $arTmp[1]; + $boVenc1 = true; + $this->obRCarnePetropolis->setVencimento1 ( $arVencimentos[0] ); + $arTmp = explode('/',$arVencimentos[1]); + if ($arTmp[1] >= $stMes) { + $stMes = $arTmp[1]; + $boVenc2 = true; + $this->obRCarnePetropolis->setVencimento2 ( $arVencimentos[1] ); + $arTmp = explode('/',$arVencimentos[2]); + if ($arTmp[1] >= $stMes) { + $boVenc3 = true; + $this->obRCarnePetropolis->setVencimento3 ( $arVencimentos[2] ); + } + } + } + // converter vencimentos para formato americano + + $arTmp = explode('/',$arVencimentos[0]); + $dtVencimento1 = $arTmp[2].'-'.$arTmp[1].'-'.$arTmp[0]; + + $arTmp = explode('/',$arVencimentos[1]); + $dtVencimento2 = $arTmp[2].'-'.$arTmp[1].'-'.$arTmp[0]; + + $arTmp = explode('/',$arVencimentos[2]); + $dtVencimento3 = $arTmp[2].'-'.$arTmp[1].'-'.$arTmp[0]; + + $stParametro2 = $stParametro.$dtVencimento1."'"; + $stParametro3 = $stParametro.$dtVencimento2."'"; + $stParametro4 = $stParametro.$dtVencimento3."'"; + + // valor, % de juro, % de multa para valor normal do carne -------------- + // valor + // % de juro + //$obErro = $obCalculaJM->executaFuncao($rsTmp,$stParametro1.",'j'"); + //$stJuroNormal = $rsTmp->getCampo('valor'); + + $this->obRCarnePetropolis->flValorJuros = number_format(round($stJuroNormal,2),2,',',''); + + // % de multa + // $obErro = $obCalculaJM->executaFuncao($rsTmp,$stParametro1.",'m'"); + // $stMultaNormal = $rsTmp->getCampo('valor'); + $this->obRCarnePetropolis->flValorMulta = number_format(round($stMultaNormal,2),2,',',''); + + $this->obRCarnePetropolis->flValorOutros = number_format(round($stCorrecaoNormal,2),2,',',''); + //----------------------------------------------------------------------- + + // valor, % de juro, % de multa para valor vencimento 1 do carne -------------- + // valor + if ($boVenc1 == true) { + $obErro = $obCalculaParcelas->executaFuncao($rsTmp,$stParametro2); + $nuValor1 = $rsTmp->getCampo('valor'); + // % de juro + $obErro = $obCalculaJM->executaFuncao($rsTmp,$stParametro2.",'j'"); + $stJuro1 = $rsTmp->getCampo('valor'); + $this->obRCarnePetropolis->lblJuros2 = $stJuro1; + // % de multa + $obErro = $obCalculaJM->executaFuncao($rsTmp,$stParametro2.",'m'"); + + $stMulta1 = $rsTmp->getCampo('valor'); + $this->obRCarnePetropolis->lblMulta2 = $stMulta1; + } else { + $this->obRCarnePetropolis->lblJuros2 = ""; + $this->obRCarnePetropolis->lblMulta2 = ""; + } + //----------------------------------------------------------------------- + + // valor, % de juro, % de multa para valor vencimento 2 do carne -------------- + // valor + if ($boVenc2 == true) { + $obErro = $obCalculaParcelas->executaFuncao($rsTmp1,$stParametro3); + $nuValor2 = $rsTmp1->getCampo('valor'); + // % de juro + $obErro = $obCalculaJM->executaFuncao($rsTmp2,$stParametro3.",'j'"); + + $stJuro2 = $rsTmp2->getCampo('valor'); + + $this->obRCarnePetropolis->lblJuros3 = $stJuro2; + + // % de multa + $obErro = $obCalculaJM->executaFuncao($rsTmp3,$stParametro3.",'m'"); + $stMulta2 = $rsTmp3->getCampo('valor'); + $this->obRCarnePetropolis->lblMulta3 = $stMulta2; + } else { + $this->obRCarnePetropolis->lblJuros3 = ""; + $this->obRCarnePetropolis->lblMulta3 = ""; + } + //----------------------------------------------------------------------- + + // valor, % de juro, % de multa para valor vencimento 3 do carne -------------- + // valor + if ($boVenc3 == true) { + $obErro = $obCalculaParcelas->executaFuncao($rsTmp1,$stParametro4); + $nuValor3 = $rsTmp1->getCampo('valor'); + // % de juro + $obErro = $obCalculaJM->executaFuncao($rsTmp2,$stParametro4.",'j'"); + + $stJuro3 = $rsTmp2->getCampo('valor'); + $this->obRCarnePetropolis->lblJuros4 = $stJuro3; + // % de multa + $obErro = $obCalculaJM->executaFuncao($rsTmp3,$stParametro4.",'m'"); + $stMulta3 = $rsTmp3->getCampo('valor'); + + $this->obRCarnePetropolis->lblMulta4 = $stMulta3; + } else { + $this->obRCarnePetropolis->lblJuros4 = ""; + $this->obRCarnePetropolis->lblMulta4 = ""; + } + //----------------------------------------------------------------------- + + // repassa valores para pdf + $this->obRCarnePetropolis->setValor (number_format(round($nuValorNormal,2),2,',','.')); + if ($boVenc1 == true) { + $this->obRCarnePetropolis->setValor1 (number_format(round($nuValor1,2),2,',','.')) ; + if ($boVenc2 == true) { + $this->obRCarnePetropolis->setValor2 (number_format(round($nuValor2,2),2,',','.')) ; + if ($boVenc3 == true) { + $this->obRCarnePetropolis->setValor3 (number_format(round($nuValor3,2),2,',','.')) ; + } + } + } + } else { + $this->obRCarnePetropolis->setValor (number_format(round($nuValorNormal,2),2,',','.')); + + } + + } + } + + $this->obRCarnePetropolis->flValorMultaJuros = ( number_format(round($stJuroNormal+$stMultaNormal+$stCorrecaoNormal, 2 ),2,',','')); + $this->obRCarnePetropolis->setValorTotal( number_format(round($nuValorTotal,2),2,',','.') ); + $this->arCodigoBarra = $this->obBarra->geraFebraban( $this->arBarra ); + $this->obRCarnePetropolis->setBarCode( $this->arCodigoBarra['codigo_barras'] ); + $this->obRCarnePetropolis->setLinhaCode( $this->arCodigoBarra['linha_digitavel'] ); + + $this->obRCarnePetropolis->drawCarne( $this->inHorizontal, $this->inVertical ); + //$this->obRCarnePetropolis->posicionaVariaveis( $this->inHorizontal, $this->inVertical ); + $this->obRCarnePetropolis->setPicote( $this->inHorizontal, $this->inVertical ); + $this->inVertical += 96; + + if ($inCount == 2) { + $this->obRCarnePetropolis->novaPagina(); + $inCount = 0; + $this->inVertical = 7; + $this->boPulaPagina = false; + } else { + $this->boPulaPagina = true; + $inCount++; + } + + }// fim foreach parcelas + + } + + //if ( ( $inSaltaPagina != count($arEmissao) ) && ( ( count($chave) != 2 ) && ( count($chave) != 3 ) ) ) { + if (( $this->boPulaPagina ) && ( $inSaltaPagina != count($this->arEmissao) )) { + $this->obRCarnePetropolis->novaPagina(); + } + $arGruposValidos = explode(',','101,102,10120, 10121, 10122, 10123, 10124, 10125, 10198, 10199, 10220, 10221, 10222, 10223, 10224, 10225, 10298,10299'); + if( in_array($this->obRCarnePetropolis->getCodDivida(),$arGruposValidos)) + $this->obRCarnePetropolis->drawComplemento($this->inHorizontal, $this->inVertical); + + } // fim foreach $arEmissao + + if ( Sessao::read( 'stNomPdf' ) ) + $stNome = Sessao::read( 'stNomPdf' ); + else + $stNome = "Carne.pdf"; + + if ( Sessao::read( 'stParamPdf' ) ) + $stParam = Sessao::read( 'stParamPdf' ); + else + $stParam = "I"; + $this->obRCarnePetropolis->show($stNome,$stParam); // lanca o pdf +} + +function imprimirCarneDesonerado($diffBaixa = FALSE) +{ + global $inCodFebraban; + //--------------------- + $this->obRARRConfiguracao = new RARRConfiguracao; + $this->obRARRConfiguracao->setCodModulo ( 2 ); + $this->obRARRConfiguracao->consultar(); + $inCodFebraban = $this->obRARRConfiguracao->getCodFebraban(); + unset($this->obRARRConfiguracao); + + $obTAdministracaoConfiguracao = new TAdministracaoConfiguracao; + $stFiltro = " WHERE exercicio = '".Sessao::getExercicio()."' AND parametro = 'logotipo' "; + $obTAdministracaoConfiguracao->recuperaTodos( $rsListaImagens, $stFiltro ); + $stNomeImagem = $rsListaImagens->getCampo("valor"); + + $inSaltaPagina = ""; + $this->obRCarnePetropolis = new RCarneDadosCadastraisMataSaoJoao(); + $this->obRCarnePetropolis->stCamLogo = CAM_FW_TEMAS."imagens/".$stNomeImagem; + $this->obRCarnePetropolis->lblTitulo1 = "MATA DE SÃO JOÃO - Sec. de Adm. e Fin."; + $this->obRCarnePetropolis->boIsento = TRUE; + + //$this->obRCarnePetropolis->configuraCarne(); + $nuValorTotal = $nuValorNormal = $nuValorJuroNormal = $nuValorMultaNormal = 0.00; + //$this->obRCarnePetropolis->configuraProtocolo(); + foreach ($this->arEmissao as $valor => $chave) { + /* imprimir duas folhas com dados cadastrais */ + /* buscar informações para dados cadastrais*/ + + include_once ( CAM_GT_ARR_MAPEAMENTO."TARRCarne.class.php" ); + + $stFiltro = " WHERE aivv.inscricao_municipal = ".$chave[0]['inscricao']; + + $obTARRCarne = new TARRCarne; + $obTARRCarne->recuperaDadosIPTUMataDesonerado( $rsListaCarne, $stFiltro, $chave[0]['cod_lancamento'] ); + + $rsListaCarne->addFormatacao ('area_lote','NUMERIC_BR'); + $rsListaCarne->addFormatacao ('vupt','NUMERIC_BR'); + $rsListaCarne->addFormatacao ('vupc','NUMERIC_BR'); + $rsListaCarne->addFormatacao ('venal_territorial_calculado','NUMERIC_BR'); + $rsListaCarne->addFormatacao ('imposto_territorial','NUMERIC_BR'); + $rsListaCarne->addFormatacao ('imposto_predial','NUMERIC_BR'); + $rsListaCarne->addFormatacao ('area_imovel','NUMERIC_BR'); + $rsListaCarne->addFormatacao ('venal_predial_calculado','NUMERIC_BR'); + $rsListaCarne->addFormatacao ('aliquota','NUMERIC_BR'); + $rsListaCarne->addFormatacao ('venal_total_calculado','NUMERIC_BR'); + $rsListaCarne->addFormatacao ('valor_imposto','NUMERIC_BR'); + $rsListaCarne->addFormatacao ('area_m2_limpeza_publica','NUMERIC_BR'); + $rsListaCarne->addFormatacao ('valor_m2_limpeza_publica','NUMERIC_BR'); + $rsListaCarne->addFormatacao ('taxa_limpeza_publica','NUMERIC_BR'); + $rsListaCarne->addFormatacao ('valor_total_tributos','NUMERIC_BR'); + $rsListaCarne->addFormatacao ('taxa_luz','NUMERIC_BR'); + $rsListaCarne->addFormatacao ('valor_parcela','NUMERIC_BR'); + + $rsListaCarne->addFormatacao ('vupcd','NUMERIC_BR'); + $rsListaCarne->addFormatacao ('area_total','NUMERIC_BR'); + $rsListaCarne->addFormatacao ('valor_venal_construcao_descoberta','NUMERIC_BR'); + $rsListaCarne->addFormatacao ('valor_venal_construcao_coberta','NUMERIC_BR'); + $rsListaCarne->addFormatacao ('area_descoberta','NUMERIC_BR'); + + $arDadosParcelas = array(); + $inTotalParcelas = 0; + if ( !$rsListaCarne->Eof() ) { + $rsListaCarne->setPrimeiroElemento(); + //$inCodCalculo = $rsListaCarne->getCampo("cod_calculo"); + while ( !$rsListaCarne->Eof() ) { + if ( $rsListaCarne->getCampo("nro_parcela") != "única" ) { + $arDadosParcelas[$rsListaCarne->getCampo("nro_parcela")]["data"] = $rsListaCarne->getCampo("vencimento_parcela"); + + $arDadosParcelas[$rsListaCarne->getCampo("nro_parcela")]["valor"] = $rsListaCarne->getCampo("valor_parcela"); + } else { + $arDadosParcelas[0]["data"] = $rsListaCarne->getCampo("vencimento_parcela"); + $arDadosParcelas[0]["valor"] = $rsListaCarne->getCampo("valor_parcela"); + } + + $inTotalParcelas++; + if ( $inTotalParcelas > 11 ) + break; + + $rsListaCarne->proximo(); + } + + } + + $rsListaCarne->setPrimeiroElemento(); + + /* setar todos os dados necessarios */ + $this->obRCarnePetropolis->stVupcd = $rsListaCarne->getCampo("vupcd"); + $this->obRCarnePetropolis->stValorVenalConstrucaoDescoberta = $rsListaCarne->getCampo("valor_venal_construcao_descoberta"); + $this->obRCarnePetropolis->stValorVenalConstrucaoCoberta = $rsListaCarne->getCampo("valor_venal_construcao_coberta"); + $this->obRCarnePetropolis->stValorVenalConstrucaoTotal = $rsListaCarne->getCampo("venal_predial_calculado"); //'10.800,00' ; + $this->obRCarnePetropolis->stAreaConstruidaTotal = $rsListaCarne->getCampo("area_total"); + $this->obRCarnePetropolis->stAreaUsoPrivativoDescoberta = $rsListaCarne->getCampo("area_descoberta"); + + $this->obRCarnePetropolis->stNomePrefeitura = 'PREFEITURA MUNICIPAL DE MATA DE SÃO JOÃO'; + $this->obRCarnePetropolis->stSubTitulo = 'Secretaria de Administração e Finanças'; + $this->obRCarnePetropolis->stExercicio = (string) $rsListaCarne->getCampo("exercicio"); //'2006'; + $this->obRCarnePetropolis->stContribuinte = (string) $rsListaCarne->getCampo("nom_proprietario"); //'WELLIGNTON LAZARO BARRETO DE OLIVEIRA' ; + $this->obRCarnePetropolis->stInscricaoCadastral = (string) $rsListaCarne->getCampo("inscricao_municipal"); //'015041' ; + $this->obRCarnePetropolis->stCategoriaUtilizacao = (string) $rsListaCarne->getCampo("categoria_utilizacao_imovel"); //'RESIDENCIAL' ; + $this->obRCarnePetropolis->stTipoTributo = 'IPTU / TAXA DE LIMPEZA / CONTRB. DE ILUM. PÚBLICA' ; + $this->obRCarnePetropolis->stCodigoLogradouro = (string) $rsListaCarne->getCampo("cod_logradouro"); //'50.003' ; + + $this->obRCarnePetropolis->stNomeLogradouro = (string) str_replace ( "Não Informado ", "", $rsListaCarne->getCampo("endereco_logradouro") ); //'AV DO FAROL 50.003' ; + $this->obRCarnePetropolis->stComplemento = (string) $rsListaCarne->getCampo("endereco_complemento"); //'CONDOMINIO SOLAR DOS ARCOS' ; + $this->obRCarnePetropolis->stQuadra = (string) $rsListaCarne->getCampo("numero_quadra"); //'02' ; + $this->obRCarnePetropolis->stLote = (string) $rsListaCarne->getCampo("numero_lote"); //'02' ; + $this->obRCarnePetropolis->stDistrito = (string) $rsListaCarne->getCampo("distrito"); //'PRAIA DO FORTE' ; + $this->obRCarnePetropolis->stCondominio = (string) $rsListaCarne->getCampo("condominio"); + $this->obRCarnePetropolis->stRegiao = (string) $rsListaCarne->getCampo("regiao"); //'LITORAL' ; + $this->obRCarnePetropolis->stCep = (string) $rsListaCarne->getCampo("cep"); //'48.820-000' ; + $this->obRCarnePetropolis->stCidade = 'MATA DE SÃO JOÃO' ; + $this->obRCarnePetropolis->stEstado = 'BAHIA' ; + $this->obRCarnePetropolis->stAreaUsoPrivativoTerreno = (string) $rsListaCarne->getCampo("area_lote"); //'114,52' ; + $this->obRCarnePetropolis->stVupt = (string) $rsListaCarne->getCampo("vupt"); //'4,5' ; + $this->obRCarnePetropolis->stVupc = (string) $rsListaCarne->getCampo("vupc"); //'180,00' ; + $this->obRCarnePetropolis->stValorVenalTerreno = (string) $rsListaCarne->getCampo("venal_territorial_calculado"); //'526,50' ; + $this->obRCarnePetropolis->stImpostoTerritorial = (string) $rsListaCarne->getCampo("imposto_territorial"); //'5,27' ; + $this->obRCarnePetropolis->stAreaUsoPrivativoCoberta = (string) $rsListaCarne->getCampo("area_imovel"); //'50,00' ; + $this->obRCarnePetropolis->stImpostoPredial = (string) $rsListaCarne->getCampo("imposto_predial"); //'108,00' ; + $this->obRCarnePetropolis->stAliquota = (string) $rsListaCarne->getCampo("aliquota"); //'1,00 %' ; + $this->obRCarnePetropolis->stValorVenalImovel = (string) $rsListaCarne->getCampo("venal_total_calculado"); //'11.326,50' ; + $this->obRCarnePetropolis->stValorImposto = (string) $rsListaCarne->getCampo("valor_imposto"); //'113,27' ; + $this->obRCarnePetropolis->stTipoUnidade = (string) $rsListaCarne->getCampo("categoria_utilizacao_imovel"); //'RESIDENCIAL'; + $this->obRCarnePetropolis->stZona = (string) $rsListaCarne->getCampo("zona"); //'POPULAR' ; + $this->obRCarnePetropolis->stAreaM2 = (string) $rsListaCarne->getCampo("area_m2_limpeza_publica"); //'11.656.220,00' ; + $this->obRCarnePetropolis->stValorM2 = (string) $rsListaCarne->getCampo("valor_m2_limpeza_publica"); //'1,01' ; + $this->obRCarnePetropolis->stValorTaxa = (string) $rsListaCarne->getCampo("taxa_limpeza_publica"); //'28,93' ; + $this->obRCarnePetropolis->stValorTotalTributos = (string) $rsListaCarne->getCampo("valor_total_tributos"); //'162,20' ; + $this->obRCarnePetropolis->stContribIlumPublica = (string) $rsListaCarne->getCampo("taxa_luz"); //'20,00'; + $this->obRCarnePetropolis->arDemonstrativoParcelas = array ( + 0 => $arDadosParcelas[0]["valor"], //'140,87', + 1 => $arDadosParcelas[1]["valor"], //'16,22' , + 2 => $arDadosParcelas[2]["valor"], //'16,22' , + 3 => $arDadosParcelas[3]["valor"], //'16,22' , + 4 => $arDadosParcelas[4]["valor"], //'16,22' , + 5 => $arDadosParcelas[5]["valor"], //'16,22' , + 6 => $arDadosParcelas[6]["valor"], //'16,22' , + 7 => $arDadosParcelas[7]["valor"], //'16,22' , + 8 => $arDadosParcelas[8]["valor"], //'16,22' , + 9 => $arDadosParcelas[9]["valor"], //'16,22' , + 10 => $arDadosParcelas[10]["valor"], //'16,22' + 11 => $arDadosParcelas[11]["valor"], //'16,22' + 12 => $arDadosParcelas[12]["valor"] //'16,22' + ) ; + + $this->obRCarnePetropolis->arVencimentosDemonstrativos = array ( + 0 => $arDadosParcelas[0]["data"], //'05/02/2007', + 1 => $arDadosParcelas[1]["data"], //'05/02/2007' , + 2 => $arDadosParcelas[2]["data"], //'05/03/2007' , + 3 => $arDadosParcelas[3]["data"], //'05/04/2007' , + 4 => $arDadosParcelas[4]["data"], //'05/05/2007' , + 5 => $arDadosParcelas[5]["data"], //'05/06/2007' , + 6 => $arDadosParcelas[6]["data"], //'05/07/2007' , + 7 => $arDadosParcelas[7]["data"], //'05/08/2007' , + 8 => $arDadosParcelas[8]["data"], //'05/09/2007' , + 9 => $arDadosParcelas[9]["data"], //'05/10/2007' , + 10 => $arDadosParcelas[10]["data"], //'05/11/2007' + 11 => $arDadosParcelas[11]["data"], //'05/11/2007' + 12 => $arDadosParcelas[12]["data"] //'05/11/2007' + ) ; + + $this->obRCarnePetropolis->desenhaCarne(10,20); + + $this->obRCarnePetropolis->novaPagina(); + + $inSaltaPagina++; + + $this->obRCarnePetropolis->setImagem(CAM_FW_TEMAS."imagens/".$stNomeImagem ); //logoCarne.png" ); + $this->obRARRCarne->obRARRParcela->roRARRLancamento->setCodLancamento( $valor ); +// $this->obRARRCarne->inCodContribuinteInicial = $chave[0]["numcgm"]; + $this->obRARRCarne->stCodContribuinteConjunto = str_replace('/', ',', $chave[0]["numcgm"]); + $obErro = $this->obRARRCarne->reemitirCarneDiverso( $rsGeraCarneCabecalho ); + $this->stExercicio = $rsGeraCarneCabecalho->getCampo( 'descricao' ); + $this->obRARRCarne->stExercicio = $chave[0]["exercicio"]; + if ( $obErro->ocorreu() ) { + break; + } + $this->obRCarnePetropolis->setObservacaoL1 ('Créditos: '); + + $stFiltroComp = " WHERE credito_grupo.cod_grupo = ".$rsGeraCarneCabecalho->getCampo( "cod_grupo" )." AND credito_grupo.ano_exercicio = '".$rsGeraCarneCabecalho->getCampo( "ano_exercicio" )."'"; + $obTARRCarne->retornaDadosCompensacao( $rsDadosCompensacao, $stFiltroComp ); + + $this->obRCarnePetropolis->stCarteira = $rsDadosCompensacao->getCampo("carteira"); + $this->obRCarnePetropolis->stEspecieDoc = $rsDadosCompensacao->getCampo("especie_doc"); + $this->obRCarnePetropolis->stEspecie = $rsDadosCompensacao->getCampo("especie"); + $this->obRCarnePetropolis->stAceite = $rsDadosCompensacao->getCampo("aceite"); + $this->obRCarnePetropolis->stDataDocumento = date("d/m/Y"); + $this->obRCarnePetropolis->stDataProcessamento = date("d/m/Y"); + $this->obRCarnePetropolis->stAgenciaCodCedente = $rsDadosCompensacao->getCampo("agencia")."/".$rsDadosCompensacao->getCampo("codigo_cedente"); + $this->obRCarnePetropolis->stLocalPagamento = $rsDadosCompensacao->getCampo("local_pagamento"); + //$this->obRCarnePetropolis->stCedente = 'Prefeitura Municipal de Mata de São João'; + $this->obRCarnePetropolis->stQuantidade = $rsDadosCompensacao->getCampo("quantidade"); + + while ( !$rsGeraCarneCabecalho->eof() ) { + /* montagem cabecalho (protocolo) */ + $this->obRCarnePetropolis->setCt ( $rsGeraCarneCabecalho->getCampo( 'ano_aquisicao' ) ); + $this->obRCarnePetropolis->setCa ( $rsGeraCarneCabecalho->getCampo( 'ca' ) ); + $this->obRCarnePetropolis->setCep ( $rsGeraCarneCabecalho->getCampo( 'cep') ); + $this->obRCarnePetropolis->setExercicio ( $rsGeraCarneCabecalho->getCampo( 'exercicio' ) ); + $this->obRCarnePetropolis->setNomCgm ( $rsGeraCarneCabecalho->getCampo( 'nom_cgm' ) ); + $this->obRCarnePetropolis->setRua ( str_replace ( "Não Informado ", "", $rsGeraCarneCabecalho->getCampo( 'nom_logradouro' ) ) ); + $this->obRCarnePetropolis->setNumero ( $rsGeraCarneCabecalho->getCampo( 'numero' ) ); + $this->obRCarnePetropolis->setComplemento ( $rsGeraCarneCabecalho->getCampo( 'complemento' ) ); + $this->obRCarnePetropolis->setCidade ( $rsGeraCarneCabecalho->getCampo( 'nom_municipio' ) ); + $this->obRCarnePetropolis->setUf ( $rsGeraCarneCabecalho->getCampo( 'sigla_uf' ) ); + $this->obRCarnePetropolis->setInscricao ( str_pad($rsGeraCarneCabecalho->getCampo( 'inscricao_municipal' ),strlen( $stMascaraInscricao ), '0', STR_PAD_LEFT) ); + $this->obRCarnePetropolis->setCtmDci ( $rsGeraCarneCabecalho->getCampo( 'ctm_dci' ) ); + $this->obRCarnePetropolis->setCodLogradouro ( $rsGeraCarneCabecalho->getCampo( 'cod_logradouro' ) ); + $this->obRCarnePetropolis->setDistrito ( $rsGeraCarneCabecalho->getCampo( 'distrito' ) ); + $this->obRCarnePetropolis->setProcessamento ( $rsGeraCarneCabecalho->getCampo( 'data_processamento' ) ); + $this->obRCarnePetropolis->setAreaTerreno ( $rsGeraCarneCabecalho->getCampo( 'area_real' ) ); + $this->obRCarnePetropolis->setAreaEdificada ( $rsGeraCarneCabecalho->getCampo( 'area_edificada' ) ); + $this->obRCarnePetropolis->setUtilizacaoImovel ( $rsGeraCarneCabecalho->getCampo( 'utilizacao' ) ); + $this->obRCarnePetropolis->setTributo ( $rsGeraCarneCabecalho->getCampo( 'cod_grupo')." - ".$rsGeraCarneCabecalho->getCampo( 'descricao' ) ); + $this->obRCarnePetropolis->setValorTributoReal ( $rsGeraCarneCabecalho->getCampo( 'valor_venal_total' ) ); + $this->obRCarnePetropolis->setObservacao ( wordwrap($rsGeraCarneCabecalho->getCampo('observacao' ),40,chr(13)) ); + $this->obRCarnePetropolis->setNomBairro ( $rsGeraCarneCabecalho->getCampo( 'nom_bairro' ) ); + $this->obRCarnePetropolis->setCodDivida ( $rsGeraCarneCabecalho->getCampo( 'cod_grupo' ) ); + if ( preg_match('/LIMPEZA.*/i',$rsGeraCarneCabecalho->getCampo( 'descricao_credito' ) ) ) { + $this->obRCarnePetropolis->setTaxaLimpezaAnual ( $rsGeraCarneCabecalho->getCampo( 'valor' ) ); + } else { + $flImpostoAnualReal = $rsGeraCarneCabecalho->getCampo( 'valor' ); + $this->obRCarnePetropolis->setImpostoAnualReal ( $flImpostoAnualReal ); + } + $this->obRCarnePetropolis->setReferencia ( "" ); + $this->obRCarnePetropolis->setNumeroPlanta ( "" ); + + // capturar creditos + $this->obRCarnePetropolis->setObservacaoL1 ( $this->obRCarnePetropolis->getObservacaoL1().$rsGeraCarneCabecalho->getCampo( 'descricao_credito').": ".$rsGeraCarneCabecalho->getCampo( 'valor' )." "); + + $rsGeraCarneCabecalho->proximo(); + + } //fim do loop de reemitirCarne + $this->obRCarnePetropolis->setValorAnualReal ( $flImpostoAnualReal + $this->obRCarnePetropolis->getTaxaLimpezaAnual() ); + // formatar + $this->obRCarnePetropolis->setValorAnualReal ( number_format($this->obRCarnePetropolis->getValorAnualReal(),2,',','.') ); + $this->obRCarnePetropolis->setTaxaLimpezaAnual ( number_format($this->obRCarnePetropolis->getTaxaLimpezaAnual(),2,',','.') ); + $this->obRCarnePetropolis->setImpostoAnualReal ( number_format($this->obRCarnePetropolis->getImpostoAnualReal(),2,',','.') ); + if ($this->obRCarnePetropolis->getValorTributoReal() != "") { + $this->obRCarnePetropolis->setValorTributoReal ( number_format($this->obRCarnePetropolis->getValorTributoReal(),2,',','.') ); + } + + $inParcela = $inCount = ""; + + $this->inHorizontal = 7; + $this->inVertical = 8; + + $this->obBarra = new RCodigoBarraFebrabanCompensacaoBB_Anexo5; + $this->arBarra = array(); + + foreach ($chave as $parcela) { // impressao das parcelas selecionadas para cada codigo de lancamento + $inParcela++; + + $this->obRCarnePetropolis->setImagemCarne( CAM_FW_TEMAS."imagens/".$stNomeImagem ); //logoCarne.png" ); //imagem mudar + $this->obRCarnePetropolis->setImagem(""); + $this->obRARRCarne->obRARRParcela->setCodParcela( $parcela["cod_parcela"] ); + + // data da reemissao + $dtVencimento = '00-00-0000'; + + // parametro padrao + $stParametro = '0'; + + // monta paramentros com as datas + $stParametro1 = $stParametro.$dtVencimento."'"; + $stParametro1 = '0'; + + $nuValorTotal = 0; + $nuValorNormal = 0; + $stJuroNormal = 0; + $stMultaNormal = 0; + $stCorrecaoNormal = 0; + + $this->obRCarnePetropolis->setNumeracao( '0' ); + $this->arBarra['valor_documento'] = '0'; + $this->arBarra['fator_vencimento'] = '0'; + $this->arBarra['nosso_numero'] = '0'; + $this->obRCarnePetropolis->stNumeracao = '0'; + $this->arBarra['convenio'] = 960663; + $this->arBarra['tipo_moeda'] = 9; + + if ( $obErro->ocorreu() ) { + break; + } + + $this->obRCarnePetropolis->setParcelaUnica ( true ); + $this->obRCarnePetropolis->setVencimento ( '00/00/0000' ); + $this->obRCarnePetropolis->setValor ( number_format($nuValorNormal,2,',','.') ); + + include_once( CAM_GA_ADM_MAPEAMENTO."TAdministracaoConfiguracao.class.php" ); + $obTAdministracaoConfiguracao = new TAdministracaoConfiguracao; + $obTAdministracaoConfiguracao->setDado('parametro' , 'fundamentacao_legal' ); + $obTAdministracaoConfiguracao->setDado( 'exercicio ',"'".Sessao::read('inExercicio')."'" ); + $obErro = $obTAdministracaoConfiguracao->recuperaPorChave( $rsCodigoNorma ); + + include_once CAM_GA_NORMAS_MAPEAMENTO.'TNorma.class.php'; + $obTNorma = new TNorma; + $obTNorma->setDado('cod_norma',$rsCodigoNorma->getCampo('valor')); + $obTNorma->recuperaPorChave($rsNorma); + + if ( !$rsNorma->eof() ) { + $stNorma = $rsNorma->getCampo( "num_norma" )."/".$rsNorma->getCampo( "exercicio" ); + $rsNorma->proximo(); + } + + $this->obRCarnePetropolis->stObsVencimento = '[ Isento conforme Lei Municipal '.$stNorma.' ]' ; + $this->obRCarnePetropolis->setParcela ( 'ÚNICA' ); + + $this->obRCarnePetropolis->setValorTotal( number_format(round($nuValorTotal,2),2,',','.') ); + + $this->obRCarnePetropolis->drawCarne( $this->inHorizontal, $this->inVertical ); + //$this->obRCarnePetropolis->posicionaVariaveis( $this->inHorizontal, $this->inVertical ); + $this->obRCarnePetropolis->setPicote( $this->inHorizontal, $this->inVertical ); + $this->inVertical += 96; + + if ($inCount == 2) { + $this->obRCarnePetropolis->novaPagina(); + $inCount = 0; + $this->inVertical = 7; + $this->boPulaPagina = false; + } else { + $this->boPulaPagina = true; + $inCount++; + } + + }// fim foreach parcelas + + //if ( ( $inSaltaPagina != count($arEmissao) ) && ( ( count($chave) != 2 ) && ( count($chave) != 3 ) ) ) { + if (( $this->boPulaPagina ) && ( $inSaltaPagina != count($this->arEmissao) )) { + $this->obRCarnePetropolis->novaPagina(); + } + $arGruposValidos = explode(',','101,102,10120, 10121, 10122, 10123, 10124, 10125, 10198, 10199, 10220, 10221, 10222, 10223, 10224, 10225, 10298,10299'); + if( in_array($this->obRCarnePetropolis->getCodDivida(),$arGruposValidos)) + $this->obRCarnePetropolis->drawComplemento($this->inHorizontal, $this->inVertical); + + } // fim foreach $arEmissao + + if ( Sessao::read( 'stNomPdf' ) ) + $stNome = Sessao::read( 'stNomPdf' ); + else + $stNome = "Carne.pdf"; + + if ( Sessao::read( 'stParamPdf' ) ) + $stParam = Sessao::read( 'stParamPdf' ); + else + $stParam = "I"; + $this->obRCarnePetropolis->show($stNome,$stParam); // lanca o pdf +} + +function geraParcelas($data, $iteracao) +{ + $arDataResult = array(); + + for ($i=0;$i<$iteracao;$i++) { + $arData = explode('/',$data); + + $mes = $arData[1]; + $dia = $arData[0]; + $ano = $arData[2]; + + switch ( (int) $mes ) { + case 2 : + if ($ano % 4 == 0) { + $dia = 29; + } else { + $dia = 28; + } + break; + case 1 : + case 3 : + case 5 : + case 7 : + case 8 : + case 10: $dia = 31; + break; + + case 4 : + case 6 : + case 9 : + case 11: $dia = 30; + break; + } + + $data = str_pad($dia,2,'0',STR_PAD_LEFT).'/'.str_pad($mes,2,'0',STR_PAD_LEFT).'/'.$ano; + array_push($arDataResult,$data); + + $mes++; + if ($mes > 12) { + $mes = 1; + $ano++; + } + + $data = $dia.'/'.$mes.'/'.$ano; + } + + return $arDataResult; +} + +} diff --git a/gestaoTributaria/fontes/PHP/arrecadacao/classes/boletos/RCarneISSVariavelCanaa.class.php b/gestaoTributaria/fontes/PHP/arrecadacao/classes/boletos/RCarneISSVariavelCanaa.class.php index ad297cc..bc5b82e 100644 --- a/gestaoTributaria/fontes/PHP/arrecadacao/classes/boletos/RCarneISSVariavelCanaa.class.php +++ b/gestaoTributaria/fontes/PHP/arrecadacao/classes/boletos/RCarneISSVariavelCanaa.class.php @@ -32,7 +32,7 @@ * @package URBEM - * $Id: RCarneISSVariavelCanaa.class.php 59612 2014-09-02 12:00:51Z gelson $ + * $Id: RCarneISSVariavelCanaa.class.php 63839 2015-10-22 18:08:07Z franver $ Caso de uso: uc-05.03.11 */ @@ -1720,17 +1720,6 @@ function imprimirCarne($diffBaixa = FALSE) $flValorTotalCorrecao = 0.00; $flValorTotalGeral = 0.00; -/* -echo "total geral = ".$flValorTotalGeral."
    "; -echo "total correcao = ".$flValorTotalCorrecao."
    "; -echo "total multa = ".$flValorTotalMulta."
    "; -echo "total juros = ".$flValorTotalJuros."
    "; -echo "total = ".$flValorTotal."
    "; - -sistemaLegado::mostravar( $rsGeraCarneCabecalho ); -sistemaLegado::mostravar( $rsListaDetalheCreditos );exit; -*/ - if ( $obErro->ocorreu() ) { break; } @@ -1816,10 +1805,6 @@ sistemaLegado::mostravar( $rsListaDetalheCreditos );exit; $rsListaDetalheCreditos->setPrimeiroElemento(); $flValorTotalGeral += $flValorTotalCorrecao + $flValorTotalMulta + $flValorTotalJuros + ($flValorTotal-$flValorTotalDesc); - // while ( !$rsGeraCarneCabecalho->eof() ) { - /* montagem cabecalho (protocolo) */ -//sistemaLegado::mostravar( $rsGeraCarneCabecalho );exit; - $obTARRCarne->RetornaCPForCNPJ( $rsListaCPForCNPJ, $rsGeraCarneCabecalho->getCampo( 'numcgm' ) ); $this->obRCarneMata->stValorDeclarado = number_format( $flValorDeclarado, 2, ',', '.' ); diff --git a/gestaoTributaria/fontes/PHP/arrecadacao/classes/boletos/RCarneITBICanaa.class.php b/gestaoTributaria/fontes/PHP/arrecadacao/classes/boletos/RCarneITBICanaa.class.php index 2f5d0e8..9629993 100644 --- a/gestaoTributaria/fontes/PHP/arrecadacao/classes/boletos/RCarneITBICanaa.class.php +++ b/gestaoTributaria/fontes/PHP/arrecadacao/classes/boletos/RCarneITBICanaa.class.php @@ -32,7 +32,7 @@ * @package URBEM - * $Id: RCarneITBICanaa.class.php 59612 2014-09-02 12:00:51Z gelson $ + * $Id: RCarneITBICanaa.class.php 63839 2015-10-22 18:08:07Z franver $ Caso de uso: uc-05.03.11 */ @@ -1596,9 +1596,6 @@ function RCarneITBICanaa($arEmissao, $horizontal = 7, $vertical = 95) $this->inHorizontal = $horizontal; $this->inVertical = $vertical; -//sistemaLegado::mostravar( $arEmissao ); -//echo "destino raro
    "; -//exit; } function imprimirCarne($diffBaixa = FALSE) @@ -1669,7 +1666,7 @@ function imprimirCarne($diffBaixa = FALSE) $this->obRCarneMata->stNomeZoneamento = $stNivel; $obTARRCarne->recuperaDadosValorVenalITBIGenerico( $rsListaCarne, $chave[0]['inscricao'], $chave[0]['exercicio'], $chave[0]['cod_parcela'] ); -//sistemaLegado::mostravar( $rsListaCarne );exit; //aqui q deve descomentar + $rsListaCarne->addFormatacao ( 'venal_territorial_calculado', 'NUMERIC_BR' ); $rsListaCarne->addFormatacao ( 'venal_predial_calculado', 'NUMERIC_BR' ); $rsListaCarne->addFormatacao ( 'venal_total_calculado', 'NUMERIC_BR' ); @@ -1749,17 +1746,6 @@ function imprimirCarne($diffBaixa = FALSE) $flValorTotalCorrecao = 0.00; $flValorTotalGeral = 0.00; -/* -echo "total geral = ".$flValorTotalGeral."
    "; -echo "total correcao = ".$flValorTotalCorrecao."
    "; -echo "total multa = ".$flValorTotalMulta."
    "; -echo "total juros = ".$flValorTotalJuros."
    "; -echo "total = ".$flValorTotal."
    "; - -sistemaLegado::mostravar( $rsGeraCarneCabecalho ); -sistemaLegado::mostravar( $rsListaDetalheCreditos );exit; -*/ - if ( $obErro->ocorreu() ) { break; } diff --git a/gestaoTributaria/fontes/PHP/arrecadacao/classes/boletos/RCarneItbiUrbem.class.php b/gestaoTributaria/fontes/PHP/arrecadacao/classes/boletos/RCarneItbiUrbem.class.php index 7d76521..80584b9 100644 --- a/gestaoTributaria/fontes/PHP/arrecadacao/classes/boletos/RCarneItbiUrbem.class.php +++ b/gestaoTributaria/fontes/PHP/arrecadacao/classes/boletos/RCarneItbiUrbem.class.php @@ -1600,9 +1600,6 @@ function RCarneItbiUrbem($arEmissao, $horizontal = 7, $vertical = 95) $this->inHorizontal = $horizontal; $this->inVertical = $vertical; -//sistemaLegado::mostravar( $arEmissao ); -//echo "destino raro
    "; -//exit; } function imprimirCarne($diffBaixa = FALSE) @@ -1749,17 +1746,6 @@ function imprimirCarne($diffBaixa = FALSE) $flValorTotalCorrecao = 0.00; $flValorTotalGeral = 0.00; -/* -echo "total geral = ".$flValorTotalGeral."
    "; -echo "total correcao = ".$flValorTotalCorrecao."
    "; -echo "total multa = ".$flValorTotalMulta."
    "; -echo "total juros = ".$flValorTotalJuros."
    "; -echo "total = ".$flValorTotal."
    "; - -sistemaLegado::mostravar( $rsGeraCarneCabecalho ); -sistemaLegado::mostravar( $rsListaDetalheCreditos );exit; -*/ - if ( $obErro->ocorreu() ) { break; } diff --git a/gestaoTributaria/fontes/PHP/arrecadacao/classes/boletos/RCarneTFFMataSaoJoao2016.class.php b/gestaoTributaria/fontes/PHP/arrecadacao/classes/boletos/RCarneTFFMataSaoJoao2016.class.php new file mode 100644 index 0000000..e579e14 --- /dev/null +++ b/gestaoTributaria/fontes/PHP/arrecadacao/classes/boletos/RCarneTFFMataSaoJoao2016.class.php @@ -0,0 +1,1729 @@ + +Imagem = $valor; } + public function setNomCgm($valor) { $this->stNomCgm = $valor; } + public function setRua($valor) { $this->stRua = $valor; } + public function setNumero($valor) { $this->stNumero = $valor; } + public function setComplemento($valor) { $this->stComplemento = $valor; } + public function setCidade($valor) { $this->stCidade = $valor; } + public function setUf($valor) { $this->stUf = $valor; } + public function setCep($valor) { $this->stCep = $valor; } + public function setInscricao($valor) { $this->inInscricao = $valor; } + public function setCtmDci($valor) { $this->inCtmDci = $valor; } + public function setCodLogradouro($valor) { $this->inCodLogradouro = $valor; } + public function setDistrito($valor) { $this->inDistrito = $valor; } + public function setCt($valor) { $this->inCt = $valor; } + public function setCa($valor) { $this->inCa = $valor; } + public function setProcessamento($valor) { $this->dtProcessamento = $valor; } + public function setAreaTerreno($valor) { $this->flAreaTerreno = $valor; } + public function setAreaEdificada($valor) { $this->flAreaEdificada = $valor; } + public function setUtilizacaoImovel($valor) { $this->stUtilizacaoImovel = $valor; } + public function setTributo($valor) { $this->stTributo = $valor; } + public function setTributo2($valor) { $this->stTributo2 = $valor; } + public function setTributo3($valor) { $this->stTributo3 = $valor; } + public function setValorTributoReal($valor) { $this->flValorTributoReal = $valor; } + public function setImpostoAnualReal($valor) { $this->flImpostoAnualReal = $valor; } + public function setObservacao($valor) { $this->stObservacao = $valor; } + public function setTaxaLimpezaAnual($valor) { $this->flTaxaLimpezaAnual = $valor; } + public function setValorAnualReal($valor) { $this->flValorAnualReal = $valor; } + public function setReferencia($valor) { $this->inReferencia = $valor; } + public function setNumeroPlanta($valor) { $this->inNumeroPlanta = $valor; } + public function setQuadro1($valor) { $this->stQuadro1 = $valor; } + public function setQuadro2($valor) { $this->stQuadro2 = $valor; } + public function setQuadro3($valor) { $this->stQuadro3 = $valor; } + public function setExercicio($valor) { $this->stExercicio = $valor; } + public function setNomBairro($valor) { $this->stNomBairro = $valor; } + public function setLoginUsuario($valor) { $this->stLoginUsuario = $valor; } + public function setCodUsuario($valor) { $this->stCodUsuario = $valor; } + public function setEndEntrega($valor) { $this->stEnderecoEntrega = $valor; } + public function setTotalLancado($valor) { $this->flTotalLancado = $valor; } + + /* getters */ + public function getImagem() { return $this->Imagem ; } + public function getNomCgm() { return $this->stNomCgm ; } + public function getRua() { return $this->stRua ; } + public function getNumero() { return $this->stNumero ; } + public function getComplemento() { return $this->stComplemento ; } + public function getCidade() { return $this->stCidade ; } + public function getUf() { return $this->stUf ; } + public function getCep() { return $this->stCep ; } + public function getInscricao() { return $this->inInscricao ; } + public function getCtmDci() { return $this->inCtmDci ; } + public function getCodLogradouro() { return $this->inCodLogradouro ; } + public function getDistrito() { return $this->inDistrito ; } + public function getCt() { return $this->inCt ; } + public function getCa() { return $this->inCa ; } + public function getProcessamento() { return $this->dtProcessamento ; } + public function getAreaTerreno() { return $this->flAreaTerreno ; } + public function getAreaEdificada() { return $this->flAreaEdificada ; } + public function getUtilizacaoImovel() { return $this->stUtilizacaoImovel ; } + public function getTributo() { return $this->stTributo ; } + public function getValorTributoReal() { return $this->flValorTributoReal ; } + public function getImpostoAnualReal() { return $this->flImpostoAnualReal ; } + public function getObservacao() { return $this->stObservacao ; } + public function getTaxaLimpezaAnual() { return $this->flTaxaLimpezaAnual ; } + public function getValorAnualReal() { return $this->flValorAnualReal ; } + public function getReferencia() { return $this->inReferencia ; } + public function getNumeroPlanta() { return $this->inNumeroPlanta ; } + public function getQuadro1() { return $this->stQuadro1 ; } + public function getQuadro2() { return $this->stQuadro2 ; } + public function getQuadro3() { return $this->stQuadro3 ; } + public function getExercicio() { return $this->stExercicio ; } + public function getNomBairro() { return $this->stNomBairro ; } + public function getLoginUsuario() { return $this->stLoginUsuario ; } + public function getCodUsuario() { return $this->stCodUsuario ; } + public function getEndEntrega() { return $this->stEnderecoEntrega ; } + public function getTotalLancado() { return $this->flTotalLancado ; } + + public function defineCodigoBarras($xpos, $ypos, $code, $basewidth = 0.7, $height = 10) + { + //global $pdf; + $wide = $basewidth; + $narrow = $basewidth / 2 ; + + // wide/narrow codes for the digits + $barChar['0'] = 'nnwwn'; + $barChar['1'] = 'wnnnw'; + $barChar['2'] = 'nwnnw'; + $barChar['3'] = 'wwnnn'; + $barChar['4'] = 'nnwnw'; + $barChar['5'] = 'wnwnn'; + $barChar['6'] = 'nwwnn'; + $barChar['7'] = 'nnnww'; + $barChar['8'] = 'wnnwn'; + $barChar['9'] = 'nwnwn'; + $barChar['A'] = 'nn'; + $barChar['Z'] = 'wn'; + + // add leading zero if code-length is odd + if (strlen($code) % 2 != 0) { + $code = '0' . $code; + } + + $this->SetFont('Arial','',10); + $this->SetFillColor(0); + + // add start and stop codes + $code = 'AA'.strtolower($code).'ZA'; + + for ($i=0; $iError('Invalid character in barcode: '.$charBar); + } + if (!isset($barChar[$charSpace])) { + $this->Error('Invalid character in barcode: '.$charSpace); + } + // create a wide/narrow-sequence (first digit=bars, second digit=spaces) + $seq = ''; + for ($s=0; $sRect($xpos, $ypos, $lineWidth, $height, 'F'); + } + $xpos += $lineWidth; + } + } + } + + /* configura a pagina de carne */ + public function configuraProtocolo() + { + if ( Sessao::read( 'stNomPdf' ) ) + $stNome = Sessao::read( 'stNomPdf' ); + else + $stNome = "Carne.pdf"; + + $this->Open2File($stNome); + $this->setTextColor(0); + $this->addPage(); + $this->setLeftMargin(0); + $this->setTopMargin(0); + $this->SetLineWidth(0.01); + } + + /* layout do protocolo */ + public function drawProtocolo() + { + if ( Sessao::read( 'itbi_observacao' ) == 'sim') { + $this->lblVlTribReal = 'VALOR TRIBUTÁVEL'; + //$this->lblImpAnualReal = 'IMPOSTO ANUAL'; + $this->lblImpAnualReal = 'IMPOSTO - REAL'; + //$this->lblTotalAnualRl = 'TOTAL ANUAL'; + $this->lblTotalAnualRl = 'TOTAL - REAL'; + + } + + $this->setLoginUsuario ( Sessao::read( 'nomCgm' ) ); + $this->setCodUsuario ( Sessao::read('numCgm') ); + + $this->setFont('Arial','',10); + + /* retangula mais externo */ + $this->Rect( 7, 8+$this->inTamY, 196, 82); + + /* linhas horizontais maiores */ + $this->Line( 7, 27+$this->inTamY, 203, 27+$this->inTamY ); + $this->Line( 7, 47+$this->inTamY, 203, 47+$this->inTamY ); + $this->Line( 7, 62+$this->inTamY, 203, 62+$this->inTamY ); + $this->Line( 7, 71+$this->inTamY, 203, 71+$this->inTamY ); + + /* lisinhas horizontais menores */ + $this->Line( 115, 33.65+$this->inTamY, 203, 33.65+$this->inTamY ); + $this->Line( 115, 40.3+$this->inTamY , 203, 40.3+$this->inTamY ); + $this->Line( 115, 54.5+$this->inTamY, 203, 54.5+$this->inTamY ); + $this->Line( 115, 80+$this->inTamY, 203, 80+$this->inTamY ); + + /* lisinhas verticais */ + $this->Line( 33 , 62+$this->inTamY , 33 , 71+$this->inTamY ); + $this->Line( 58 , 62+$this->inTamY , 58 , 71+$this->inTamY ); + $this->Line( 85 , 62+$this->inTamY , 85 , 71+$this->inTamY ); + $this->Line( 115, 27+$this->inTamY , 115, 90+$this->inTamY ); + $this->Line( 162, 40.3+$this->inTamY , 162, 90+$this->inTamY ); + $this->Line( 152, 40.3+$this->inTamY , 152, 47+$this->inTamY ); + $this->Line( 142, 40.3+$this->inTamY , 142, 47+$this->inTamY ); + $this->Line( 172, 40.3+$this->inTamY , 172, 47+$this->inTamY ); + + /* brazao */ + if ($this->Imagem) { + $stExt = substr( $this->Imagem, strlen($this->Imagem)-3, strlen($this->Imagem) ); + $this->Image( $this->Imagem, 8, 9+$this->inTamY, 25, 16.5, $stExt ); + } + + /* labels fixos */ + $this->setFont('Arial','B',13); // fonte do primeiro titulo + $this->Text ( 60, 17+$this->inTamY, $this->Titulo1 ); + + $this->setFont('Arial','B',11); // fonte do titulo menor + $this->Text ( 65, 22+$this->inTamY, $this->Titulo2 ); + + $this->setFont('Arial','B',6); // fonte dos labels dos dados + if ( Sessao::read( 'itbi_observacao' ) == 'sim') { + $this->Text ( 8 , 29.5+$this->inTamY, 'ADQUIRENTE' ); + $this->setFont('Arial','B',10); + $this->Text ( 95 , 26+$this->inTamY , 'ITIV' ); + $this->setFont('Arial','B',6); + } else { + $this->Text ( 8 , 29.5, $this->lblContribuinte ); + } + $this->Text ( 115.5, 29.5+$this->inTamY, $this->lblInscricao ); + $this->Text ( 115.5, 36+$this->inTamY , $this->lblCtmDci ); + $this->Text ( 115.5, 42.5+$this->inTamY, $this->lblLogradouro ); + $this->Text ( 143 , 42.5+$this->inTamY, $this->lblDistrito ); + $this->Text ( 153 , 42.5+$this->inTamY, $this->lblCt ); + $this->Text ( 163 , 42.5+$this->inTamY, $this->lblCa ); + $this->Text ( 173 , 42.5+$this->inTamY, $this->lblDtProcesso ); + + $this->Text ( 8 , 49.5+$this->inTamY, $this->lblLocalizacao ); + $this->Text ( 115.5, 49.5+$this->inTamY, $this->lblTerreno ); + $this->Text ( 163 , 49.5+$this->inTamY, $this->lblEdificada ); + $this->Text ( 115.5, 57+$this->inTamY , $this->lblUtilizacaoIm ); + $this->Text ( 163 , 57+$this->inTamY , $this->lblTributo ); + + $this->Text ( 8 , 64+$this->inTamY , $this->lblNroPlanta ); + $this->Text ( 86 , 64+$this->inTamY , $this->lblExercicio ); + $this->Text ( 115.5, 64+$this->inTamY , $this->lblVlTribReal ); + $this->Text ( 163 , 64+$this->inTamY , $this->lblImpAnualReal ); + + if ( Sessao::read( 'itbi_observacao' ) == 'sim') { + $this->Text ( 8 , 73+$this->inTamY ,"REQUERIMENTO DE I.T.I.V." ); + } else { + $this->Text ( 8 , 73 , $this->lblObservacao ); + } + if ( Sessao::read( 'itbi_observacao' ) == 'sim') { + $this->Text ( 115.5, 73+$this->inTamY , "TAXA DE EXPEDIENTE" ); + } else { + $this->Text ( 115.5, 73 , $this->lblLimpAnualRl ); + } + if ( Sessao::read( 'itbi_observacao' ) == 'sim') { + $this->Text ( 163 , 73+$this->inTamY , $this->lblTxAverbacao ); + $this->Text ( 163 , 82+$this->inTamY , $this->lblTotalAnualRl ); + } else { + $this->Text ( 163 , 73 , $this->lblTotalAnualRl ); + $this->Text ( 163 , 82 , $this->lblTotalLancado ); + } + + if ( Sessao::read( 'itbi_observacao' ) == 'sim') { + //$this->Text ( 115.5, 82+$this->inTamY , 'MULTA DE MORA' ); + } else { + $this->Text ( 115.5, 82 , $this->lblReferencia ); + } + + $this->setFont('Arial','' , 5 ); + $this->Text ( 8 , 92+$this->inTamY , $this->lblUrbem ); + + if ($this->stLoginUsuario != "" && $this->stCodUsuario != "") { + $this->Text ( 115.5, 92+$this->inTamY , $this->stCodUsuario." - ".$this->stLoginUsuario ); + } + + /* Fim do layout do quadrado superior */ + } + + /* Posicionamento das variáveis */ + public function posicionaVariaveisProtocolo() + { + $this->setFont('Arial', 'b', 7 ); + if ( !Sessao::read( 'itbi_observacao' ) ) { + $this->Text ( 8 , 34+$this->inTamY , strtoupper($this->stNomCgm) ); + } else { + require_once(CAM_GT_ARR_MAPEAMENTO."TARRImovelVVenal.class.php"); + $obImovelVVenal = new TARRImovelVVenal; + $filtro = "and inscricao_municipal = ".$this->inInscricao; + $obImovelVVenal->recuperaMensagemItbi($rsItbi,$filtro); + $this->stAdquirente = $rsItbi->getCampo('adquirinte'); + + $this->Text ( 8 , 34+$this->inTamY , strtoupper($this->stAdquirente) ); + } + // array com dados do endereço; + $arEnd = explode('|*|',$this->stEnderecoEntrega); + $this->Text ( 8 , 37.5+$this->inTamY , strtoupper($arEnd[0].' '.$arEnd[1])); + $this->Text ( 8 , 41+$this->inTamY , strtoupper($arEnd[2]." - ".$arEnd[3]) ); + $this->Text ( 8 , 44.5+$this->inTamY , strtoupper($arEnd[6].' '.$arEnd[5].' CEP:'.$arEnd[4]) ); + + $this->Text ( 156 , 32+$this->inTamY , strtoupper($this->inInscricao) ); + $this->Text ( 145 , 37.5+$this->inTamY , strtoupper($this->inCtmDci) ); + $this->Text ( 122 , 46+$this->inTamY , strtoupper($this->inCodLogradouro) ); + $this->Text ( 145 , 46+$this->inTamY , strtoupper($this->inDistrito) ); + $this->Text ( 155 , 46+$this->inTamY , strtoupper($this->inCt) ); + $this->Text ( 165 , 46+$this->inTamY , strtoupper($this->inCa) ); + $this->Text ( 180 , 46+$this->inTamY , strtoupper($this->dtProcessamento) ); + + $this->Text ( 8 , 54+$this->inTamY , strtoupper($this->stRua.' '.$this->stNumero) ); + $this->Text ( 8 , 58+$this->inTamY , strtoupper($this->stComplemento." - ".$this->stNomBairro) ); + $this->Text ( 145 , 52.5+$this->inTamY , strtoupper($this->flAreaTerreno) ); + $this->Text ( 185 , 52.5+$this->inTamY , strtoupper($this->flAreaEdificada) ); + + $this->Text ( 130 , 60.5+$this->inTamY , strtoupper($this->stUtilizacaoImovel) ); + $this->setFont('Arial', 'b' , 6 ); + $this->Text ( 165 , 60.5+$this->inTamY , strtoupper(substr($this->stTributo,0,28)) ); + $this->Text ( 165 , 68.5+$this->inTamY , strtoupper(substr($this->stTributo2,0,28)) ); + $this->setFont('Arial', 'b', 7 ); + $this->Text ( 90 , 68+$this->inTamY , strtoupper($this->stExercicio) ); + + // Observacao + // 3 linhas de observacao + if ( Sessao::read( 'itbi_observacao' ) == 'sim') { + require_once(CAM_GT_ARR_MAPEAMENTO."TARRImovelVVenal.class.php"); + $obImovelVVenal = new TARRImovelVVenal; + $filtro = "and inscricao_municipal = ".$this->inInscricao; + $obImovelVVenal->recuperaMensagemItbi($rsItbi,$filtro); + $rsItbi->addFormatacao ('base_calculo','NUMERIC_BR'); + $rsItbi->addFormatacao ('valor_financiado','NUMERIC_BR'); + $rsItbi->addFormatacao ('valor_pactuado','NUMERIC_BR'); + //$stObsL1 = "Adquirinte : ".$rsItbi->getCampo('adquirinte'); + //$stObsL2 = "Transmitente : ".$rsItbi->getCampo('transmitente'); + $stObsL3 = "Base de Calculo : ".$rsItbi->getCampo('base_calculo')." ITIV: ".$this->flImpostoAnualReal; + $stObsL4 = "Valor Financiado : ".$rsItbi->getCampo('valor_financiado'); + //$stObsL5 = "Valor Pactuado : ".$rsItbi->getCampo('valor_pactuado'); + $stObsL5 = "Natureza de Transferência: ".$rsItbi->getCampo('cod_natureza')." - ".$rsItbi->getCampo('descricao'); + if ( $rsItbi->getCampo('cod_processo') ) + $stObsL7 = "Processo : ".$rsItbi->getCampo('cod_processo')."/".$rsItbi->getCampo('exercicio'); + + $this->Text ( 8 , 75.5+$this->inTamY , $stObsL3 ); + $this->Text ( 8 , 78+$this->inTamY , $stObsL4 ); + $this->Text ( 8 , 80.5+$this->inTamY , $stObsL5 ); + $this->Text ( 8 , 83+$this->inTamY , $stObsL6 ); + $this->Text ( 8 , 85.5 +$this->inTamY, $stObsL7 ); + + // coloca atributo TRANSMITENTE no cabeçaho + $this->Text ( 8 , 34+$this->inTamY , strtoupper($rsItbi->getCampo('transmitente') )); + + } else { + $stObs = str_replace("\n"," ",$this->stObservacao); + $this->Text ( 8 , 76.5+$this->inTamY , substr($stObs,0 ,70 )); + $this->Text ( 8 , 79+$this->inTamY , substr($stObs,70 ,70 )); + $this->Text ( 8 , 81.5+$this->inTamY , substr($stObs,140 ,70 )); + $this->Text ( 8 , 84+$this->inTamY , substr($stObs,210 ,70 )); + $this->Text ( 8 , 86.5+$this->inTamY , substr($stObs,280 ,70 )); + } + // caso seja itbi, mostra o valor de base da calculo como valor tributavel + if ( Sessao::read( 'itbi_observacao' ) == 'sim') + $this->Text ( 145 , 68+$this->inTamY , $rsItbi->getCampo('base_calculo')); + else + $this->Text ( 145 , 68 , strtoupper($this->flValorTributoReal) ); + + $this->Text ( 183 , 68+$this->inTamY , strtoupper($this->flImpostoAnualReal ) ); + if ( Sessao::read( 'itbi_observacao' ) == 'sim') { + $this->Text ( 145 , 76.5+$this->inTamY , $rsItbi->getCampo('taxa') ); + $this->Text ( 145 , 85.5+$this->inTamY , $rsItbi->getCampo('multa') ); + $this->Text ( 183 , 76.5+$this->inTamY , $this->flTxAverbacao ); + } else { + $this->Text ( 145 , 76.5 , strtoupper($this->flTaxaLimpezaAnual) ); + } + if ( Sessao::read( 'itbi_observacao' ) == 'sim') { + $vlrTaxa = str_replace(',','.',str_replace('.','',$rsItbi->getCampo('taxa'))); + $vlrImp = str_replace(',','.',str_replace('.','',$this->flValorAnualReal)); + $vlrAnual = $vlrImp+$vlrTaxa; + + //$this->Text ( 183 , 85.5+$this->inTamY , number_format($vlrAnual,2,',','.') ); + $this->Text ( 183 , 85.5+$this->inTamY , $this->flImpostoAnualReal); //number_format($this->flImpostoAnualReal,2,',','.') ); + } else { + $this->Text ( 183 , 76.5 , strtoupper($this->flValorAnualReal) ); + $this->Text ( 183 , 85.5 , number_format($this->flTotalLancado,2,',','.') ); + } + $this->Text ( 115.5 , 85.5+$this->inTamY , strtoupper($this->inReferencia) ); + //limpar memoria + unset($rsItbi,$obImovelVVenal); + } + /* Fim do posicionamento das variáveis */ + + /* gera o PDF */ + public function show() + { + $this->Output2File(); + } + + /* adiciona nova pagina */ + public function novaPagina() + { + $this->addPage(); + } + /* + * Desenha informações complementares + */ + public function drawComplemento($x,$y) + { + ; + $this->setFont('Arial','',10); + + /* retangulos */ + $this->Rect( $x, $y, 92, 74 ); + $this->Rect( ($x+95), $y, 102, 74 ); + + $this->setFont('Arial','BU',8); + /* Cada nova linha sao mais 3.5 */ + /* esquerda */ + $this->Text ( ($x+5) , ($y+3.5) , strtoupper('REDE AUTORIZADA PARA ARRECADAÇÃO VENCIMENTO DO') ); + $this->Text ( ($x+40) , ($y+7) , strtoupper('IPTU-2006') ); + + $this->setFont('Arial','',8); + $this->Text ( ($x+7) , ($y+12) , strtoupper('BRADESCO - BANCO DO BRASIL - BANESPA - BCN -') ); + $this->Text ( ($x+6) , ($y+15.5) , strtoupper('BANERJ - CAIXA ECONOMICA - HSBC - ITAU -REAL -') ); + $this->Text ( ($x+5) , ($y+19) , strtoupper('UNIBANCO - CASAS LOTÉRICAS - SUPERMERCADOS') ); + $this->Text ( ($x+25) , ($y+22.5), strtoupper('CREDENCIADOS - BANCO POSTAL') ); + + $this->setFont('Arial','BU',8); + $this->Text ( ($x+30) , ($y+26) , strtoupper('FORMA DE PAGAMENTO') ); + + $this->setFont('Arial','',8); + $this->Text ( ($x+9) , ($y+31) , strtoupper('AGÊNCIA BANCÁRIA INTERNET TELEFONE REDE AUTO') ); + $this->Text ( ($x+32) , ($y+34.5) , strtoupper('ATENDIMENTO(24h)') ); + $this->setFont('Arial','',6); + $this->Text ( ($x+2) , ($y+38) , 'Dependendo dos serviços disponibilizados pelo Banco escolhido para efetuar o pagamento' ) ; +// $this->Text ( ($x+35) , ($y+41.5), 'efetuar o pagamento') ; + + // direita + $this->setFont('Arial','BU',8); + $x +=92; + $this->Text ( ($x+12) , ($y+3.5) , strtoupper('FATORES DE ATUALIZAÇÃO APÓS O VENCIMENTO') ); + $this->setFont('Arial','',8); + $this->Text ( ($x+5) , ($y+12) , 'MULTA: 5% no primeiro mês ou fração' ); + $this->Text ( ($x+5) , ($y+15.5) , ' 10% no segundo mês ou fração' ); + $this->Text ( ($x+5) , ($y+19) , ' 15% no terceiro mês ou fração' ); + $this->Text ( ($x+5) , ($y+22.5) , ' 20% a partir do quarto mês ou fração' ); + $this->Text ( ($x+5) , ($y+26) , 'JUROS: ' ); + $this->Text ( ($x+5) , ($y+29.5) , ' 1% ao mês ou fração, a partir do mês' ); + $this->Text ( ($x+5) , ($y+33) , ' subsequente ao Vencimento ' ); + + $this->setFont('Arial','BU',8); + $this->Text ( ($x+26) , ($y+38) , strtoupper('INFORMAÇÕES COMPLEMENTARES') ); + $this->setFont('Arial','',8); + $this->Text ( ($x+5) , ($y+45) , '- A segunda via do carnê poderá ser obtida via internet,ou na') ; + $this->Text ( ($x+5) , ($y+48.5), ' Secretaria de fazenda, Rua 16 de Março, 183 - Centro.') ; + $this->Text ( ($x+5) , ($y+52) , '- Quando o pagamento ultrapassar o dia de vencimento previsto ') ; + $this->Text ( ($x+5) , ($y+55.5), 'no carnê, o IPTU será devido com os acréscimos legais') ; + $this->Text ( ($x+5) , ($y+59) , '- Ao receber o carnê do IPTU o contribuinte deverá verificar ') ; + $this->Text ( ($x+5) , ($y+63) , ' se os dados estão corretos, e em caso de alguma divergência,') ; + $this->Text ( ($x+5) , ($y+66.5), ' apresentar sua reclamação antes do vencimento da primeira') ; + $this->Text ( ($x+5) , ($y+70) , ' Cota Única, garantindo seus direitos') ; + + } +} + +class RCarneDiversosPetropolis extends RProtocolo +{ + /* labels */ + public $lblTitulo1 = 'MATA DE SÃO JOÃO - Sec. de Adm. e Fin.'; + public $lblTitulo2 = 'IPTU'; + public $lblExercicio = 'EXERCÍCIO'; + public $lblInscricao = 'INSCRIÇÃO'; + public $lblCodDivida = 'CÓD. DÍVIDA'; + public $lblTributo = 'TRIBUTO'; + public $lblParcela = 'PARCELA'; + public $lblReferencia = 'REFERÊNCIA'; + public $lblDataProcessamento = 'DATA PROCESSAMENTO'; + public $lblVencimento = 'VENCIMENTO'; + public $lblValorCotaUnica = 'VALOR COTA ÚNICA'; + public $lblContribuinte = 'CONTRIBUINTE'; + public $lblData = 'DATA'; + public $lblCorrecao = 'CORREÇÃO'; + public $lblMonetaria = 'MONET(%)'; + public $lblObs = 'OBSERVAÇÃO'; + + public $lblMulta = '(+) MULTA DE MORA'; + public $lblJuros = '(+) JUROS DE MORA'; + public $lblOutros = '(+) ATUALIZAÇÃO MONETÁRIA'; + + public $lblValorParcela = 'VALOR PARCELA'; + public $lblReal = '(REAL)'; + public $lblNumeracao = 'NOSSO NÚMERO'; + + public $lblValorPrincipal = "(=) VALOR PRINCIPAL"; + public $lblValorTotal = "(=) TOTAL"; + + /* variaveis */ + public $ImagemCarne; + public $stExercicio; + public $inInscricao; + public $inCodDivida; + public $stTributo; + public $stTributoAbrev; + public $stTributoAbrev2; + public $stTributoAbrev3; + public $stParcela; + public $inReferencia; + public $dtProcessamento; + public $dtVencimento; + public $dtVencimentof1; + public $dtVencimentof2; + public $dtVencimentof3; + public $flValorCotaUnica; + public $flValor; + public $flValorf1; + public $flValorf2; + public $flValorf3; + public $stNomCgm; + public $stBarCode; + public $boParcelaUnica; + public $stObservacaoL1; + public $stObservacaoL2; + public $stObservacaoL3; + public $stObsVencimento; // = "Não receber após o vencimento."; + public $stNumeracao; + public $flValorMulta = '0,00'; + public $flValorJuros = '0,00'; + public $flValorMultaJuros = '0,00'; + public $flValorOutros = '0,00'; + public $flValorTotal = '0,00'; + public $stCarteira = '000/000'; + public $stEspecieDoc = 'OU(Outros)'; + public $stEspecie = 'REAL'; + public $stAceite = 'N'; + public $stDataProcessamento = '01/10/2009'; + public $stAgenciaCodCedente = '001-1/001'; + public $stLocalPagamento = 'Pagável em qualquer banco até o vencimento'; + public $stCedente = 'Prefeitura Municipal de Mata de São João'; + public $stDataDocumento = '01/10/2009'; + public $stQuantidade = "200"; + public $tamY = 0.93; + + /* setters */ + public function setImagemCarne($valor) { $this->ImagemCarne = $valor; } + public function setExercicio($valor) { $this->stExercicio = $valor; } + public function setInscricao($valor) { $this->inInscricao = $valor; } + public function setCodDivida($valor) { $this->inCodDivida = $valor; } + public function setTributo($valor) { $this->stTributo = $valor; } + public function setTributoAbrev($valor) { $this->stTributoAbrev = $valor; } + public function setTributoAbrev2($valor) { $this->stTributoAbrev2 = $valor; } + public function setTributoAbrev3($valor) { $this->stTributoAbrev3 = $valor; } + public function setParcela($valor) { $this->stParcela = $valor; } + public function setReferencia($valor) { $this->inReferencia = $valor; } + public function setProcessamento($valor) { $this->dtProcessamento = $valor; } + public function setVencimento($valor) { $this->dtVencimento = $valor; } + public function setVencimento1($valor) { $this->dtVencimentof1 = $valor; } + public function setVencimento2($valor) { $this->dtVencimentof2 = $valor; } + public function setVencimento3($valor) { $this->dtVencimentof3 = $valor; } + public function setValorCotaUnica($valor) { $this->flValorCotaUnica = $valor; } + public function setValor($valor) { $this->flValor = $valor; } + public function setValor1($valor) { $this->flValorf1 = $valor; } + public function setValor2($valor) { $this->flValorf2 = $valor; } + public function setValor3($valor) { $this->flValorf3 = $valor; } + public function setNomCgm($valor) { $this->stNomCgm = $valor; } + public function setBarCode($valor) { $this->stBarCode = $valor; } + public function setLinhaCode($valor) { $this->stLinhaCode = $valor; } + public function setParcelaUnica($valor) { $this->boParcelaUnica = $valor; } + public function setObservacaoL1($valor) { $this->stObservacaoL1 = $valor; } + public function setObservacaoL2($valor) { $this->stObservacaoL2 = $valor; } + public function setObservacaoL3($valor) { $this->stObservacaoL3 = $valor; } + public function setObsVencimento($valor) { $this->stObsVencimento = $valor; } + public function setNumeracao($valor) { $this->stNumeracao = $valor; } + public function setValorTotal($valor) { $this->flValorTotal = $valor; } + + /* getters */ + public function getImagemCarne() { return $this->ImagemCarne ; } + public function getExercicio() { return $this->stExercicio ; } + public function getInscricao() { return $this->inInscricao ; } + public function getCodDivida() { return $this->inCodDivida ; } + public function getTributo() { return $this->stTributo ; } + public function getTributoAbrev() { return $this->stTributoAbrev ; } + public function getParcela() { return $this->stParcela ; } + public function getReferencia() { return $this->inReferencia ; } + public function getProcessamento() { return $this->dtProcessamento ; } + public function getVencimento() { return $this->dtVencimento ; } + public function getVencimento1() { return $this->dtVencimentof1 ; } + public function getVencimento2() { return $this->dtVencimentof2 ; } + public function getVencimento3() { return $this->dtVencimentof3 ; } + public function getValorCotaUnica() { return $this->flValorCotaUnica ; } + public function getValor() { return $this->flValor ; } + public function getValor1() { return $this->flValorf1 ; } + public function getValor2() { return $this->flValorf2 ; } + public function getValor3() { return $this->flValorf3 ; } + public function getNomCgm() { return $this->stNomCgm ; } + public function getBarCode() { return $this->stBarCode ; } + public function getLinhaCode() { return $this->stLinhaCode ; } + public function getParcelaUnica() { return $this->boParcelaUnica ; } + public function getObservacaoL1() { return $this->stObservacaoL1 ; } + public function getObservacaoL2() { return $this->stObservacaoL2 ; } + public function getObservacaoL3() { return $this->stObservacaoL3 ; } + public function getObsVencimento() { return $this->stObsVencimento ; } + public function getNumeracao() { return $this->stNumeracao ; } + + /* configura carne */ + public function configuraCarne() + { + if ( Sessao::read( 'stNomPdf' ) ) + $stNome = Sessao::read( 'stNomPdf' ); + else + $stNome = "Carne.pdf"; + + $this->Open2File($stNome); + $this->setTextColor(0); + $this->addPage(); + $this->setLeftMargin(0); + $this->setTopMargin(0); + $this->SetLineWidth(0.01); + } + + /* layout do carne */ + public function drawCarne($x, $y) + { + // truncar tributo + if ( !$this->stTributoAbrev ) + $this->stTributoAbrev = substr($this->stTributo,0,25); + + $this->stNomCgm = substr($this->stNomCgm ,0,80); + $this->setFont( 'Arial','',10 ); + + $inAlteracaoMata = 48; + + $stBB = "../../../../../../gestaoAdministrativa/fontes/PHP/framework/temas/padrao/imagens/bb.jpg"; + $stExt = substr( $stBB, strlen($stBB)-3, strlen($stBB) ); + $this->Image( $stBB, $x+28+$inAlteracaoMata, $y+(4*$this->tamY)+0.5, 35, 4, $stExt ); + + if ($this->ImagemCarne) { + $stExt = substr( $this->ImagemCarne, strlen($this->ImagemCarne)-3, strlen($this->ImagemCarne) ); + $this->Image( $this->ImagemCarne, $x, $y+4, 16, 9, $stExt ); + } + $this->setFillColor( 240 ); + $this->Rect( $x, $y+(37*$this->tamY), 48, 6*$this->tamY, 'DF' ); + // linhas horizontais + $this->Line( $x+27+$inAlteracaoMata, ($y+(9*$this->tamY)), (197+$x), ($y+(10*$this->tamY)) ); + + $this->Line( $x, ($y+(14*$this->tamY)), (25+$x)+$inAlteracaoMata, ($y+(14*$this->tamY)) ); + $this->Line( $x+27+$inAlteracaoMata, ($y+(14*$this->tamY)), (197+$x), ($y+(14*$this->tamY)) ); + + $this->Line( $x, ($y+(20*$this->tamY)), (25+$x)+$inAlteracaoMata, ($y+(20*$this->tamY)) ); + $this->Line( $x+27+$inAlteracaoMata, ($y+(20*$this->tamY)), (197+$x), ($y+(20*$this->tamY)) ); + + $this->Line( $x, ($y+(26*$this->tamY)), (25+$x)+$inAlteracaoMata, ($y+(26*$this->tamY)) ); + $this->Line( $x+27+$inAlteracaoMata, ($y+(26*$this->tamY)), (197+$x), ($y+(26*$this->tamY)) ); + + $this->Line( $x+48, ($y+(31*$this->tamY)), (25+$x)+$inAlteracaoMata, ($y+(31*$this->tamY)) ); + $this->Line( $x+27+$inAlteracaoMata, ($y+(31*$this->tamY)), (197+$x), ($y+(31*$this->tamY)) ); + + $this->Line( $x, ($y+(37*$this->tamY)), (25+$x)+$inAlteracaoMata, ($y+(37*$this->tamY)) ); + $this->Line( $x+158, ($y+(36*$this->tamY)), (197+$x), ($y+(36*$this->tamY)) ); + + $this->Line( $x, ($y+(43*$this->tamY)), (25+$x)+$inAlteracaoMata, ($y+(43*$this->tamY)) ); + $this->Line( $x+158, ($y+(41*$this->tamY)), (197+$x), ($y+(41*$this->tamY)) ); + + $this->Line( $x, ($y+(48*$this->tamY)), (25+$x)+$inAlteracaoMata, ($y+(48*$this->tamY)) ); + $this->Line( $x+158, ($y+(46*$this->tamY)), (197+$x), ($y+(46*$this->tamY)) ); + + $this->Line( $x, ($y+(53*$this->tamY)), (25+$x)+$inAlteracaoMata, ($y+(53*$this->tamY)) ); + $this->Line( $x+158, ($y+(51*$this->tamY)), (197+$x), ($y+(51*$this->tamY)) ); + + $this->Line( $x, ($y+(58*$this->tamY)), (25+$x)+$inAlteracaoMata, ($y+(58*$this->tamY)) ); + $this->Line( $x+27+$inAlteracaoMata, ($y+(56*$this->tamY)), (197+$x), ($y+(56*$this->tamY)) ); + + $this->Line( $x+27+$inAlteracaoMata, ($y+(66*$this->tamY)), (197+$x), ($y+(66*$this->tamY)) ); + + // linhas verticais + $this->Line( $x+48, $y+(16*$this->tamY), $x+48, $y+(45*$this->tamY) ); //nova do canhotinho + + $this->Line( $x+66+$inAlteracaoMata, $y+(5*$this->tamY), 66+$x+$inAlteracaoMata, $y+(10*$this->tamY) ); + + $this->Line( $x+42+$inAlteracaoMata, $y+(21*$this->tamY), 42+$x+$inAlteracaoMata, $y+(32*$this->tamY) ); + $this->Line( $x+65+$inAlteracaoMata, $y+(21*$this->tamY), 65+$x+$inAlteracaoMata, $y+(32*$this->tamY) ); + $this->Line( $x+80+$inAlteracaoMata, $y+(21*$this->tamY), 80+$x+$inAlteracaoMata, $y+(32*$this->tamY) ); + $this->Line( $x+94+$inAlteracaoMata, $y+(21*$this->tamY), 94+$x+$inAlteracaoMata, $y+(32*$this->tamY) ); + + $this->Line( $x+20, $y+(21*$this->tamY), 20+$x, $y+(27*$this->tamY) ); + + $this->Line( $x+158, $y+(10*$this->tamY), 158+$x, $y+(58*$this->tamY) ); + + $this->setFont ( 'Arial', 'B', 7 ); + $this->Text ( $x+38, $y+(8*$this->tamY), "MATA DE SÃO JOÃO" ); + $this->Text ( $x+38, $y+(10*$this->tamY)+0.5, "Sec. de Adm. e Fin." ); + $this->Text ( $x+38, $y+(13*$this->tamY), "EXERCÍCIO 2016" ); + + $this->setFont ( 'Arial', '', 6 ); + $this->Text ( $x+20.5, $y+(22*$this->tamY), "Inscrição" ); + $this->Text ( $x+20.5, $y+(25*$this->tamY), $this->inInscricao ); + + $this->Text ( $x, $y+(16*$this->tamY), "Nosso Número" ); + $this->Text ( $x, $y+(19*$this->tamY), $this->stNumeracao ); + + $this->Text ( $x, $y+(22*$this->tamY), "Parcela" ); + $this->Text ( $x, $y+(25*$this->tamY), $this->stParcela ); + + $this->Text ( $x, $y+(39*$this->tamY), "Vencimento" ); + $this->Text ( $x+30, $y+(39*$this->tamY), $this->dtVencimento ); + + $this->setFont ( 'Arial', '', 5 ); + $this->Text ( $x, $y+(45*$this->tamY), "MULTA 5% ATÉ 30 DIAS. 10% DE 30 A 60 DIAS E 15% SUPERIOR A 60 DIAS." ); + $this->Text ( $x, $y+(47*$this->tamY), "JUROS DE 1% AO MÊS = 0,003%" ); + + $this->setFont ( 'Arial', '', 6 ); + $this->Text ( $x, $y+(28*$this->tamY), "Tributo" ); + $this->Text ( $x, $y+(30*$this->tamY), $this->stTributo ); + + $this->Text ( $x+48.5, $y+(16*$this->tamY), "(=) Valor Principal" ); + $this->Text ( $x+48.5, $y+(19*$this->tamY), $this->flValor ); + + $this->Text ( $x+48.5, $y+(22*$this->tamY), "(+) Multa de Mora" ); + $this->Text ( $x+48.5, $y+(25*$this->tamY), $this->flValorMulta ); + + $this->Text ( $x+48.5, $y+(28*$this->tamY), "(+) Juros de Mora" ); + $this->Text ( $x+48.5, $y+(30*$this->tamY), $this->flValorJuros ); + + $this->Text ( $x+48.5, $y+(33*$this->tamY), "(+) At. Monet." ); + $this->Text ( $x+48.5, $y+(36*$this->tamY), $this->flValorOutros ); + + $this->Text ( $x+48.5, $y+(39*$this->tamY), "(=) Total" ); + $this->Text ( $x+48.5, $y+(41*$this->tamY)+0.5, $this->flValorTotal ); + + if ($this->stParcela == 'ÚNICA') { + $this->Text ( $x, $y+(60*$this->tamY), "Observação"); + $this->Text ( $x, $y+(63*$this->tamY), "NÃO RECEBER APÓS VENCIMENTO." ); + //$this->Text ( $x, $y+(66*$this->tamY), "TFF - proporcional a quatro meses." ); + } else { + $this->Text ( $x, $y+(60*$this->tamY), "Observação:" ); + $this->Text ( $x, $y+(63*$this->tamY), "RECEBER ATÉ 31/12/2016." ); + //$this->Text ( $x, $y+(66*$this->tamY), "TFF - proporcional a quatro meses." ); + } + $this->Text ( $x+38, $y+(60*$this->tamY), "Via Contribuinte" ); + + $stObs = str_replace( "\n\r", " ", $this->stObservacao ); + $this->Text ( $x, $y+(62*$this->tamY), substr( $stObs, 0, 70 ) ); + $this->Text ( $x, $y+(64*$this->tamY), substr( $stObs, 70, 70 ) ); + $this->Text ( $x, $y+(66*$this->tamY), substr( $stObs, 140, 70 ) ); + $this->Text ( $x, $y+(68*$this->tamY), substr( $stObs, 210, 70 ) ); + $this->Text ( $x, $y+(70*$this->tamY), substr( $stObs, 280, 70 ) ); + $this->Text ( $x, $y+(72*$this->tamY), substr( $stObs, 350, 70 ) ); + $this->Text ( $x, $y+(74*$this->tamY), substr( $stObs, 420, 70 ) ); + $this->Text ( $x, $y+(76*$this->tamY), substr( $stObs, 490, 70 ) ); + + $this->Text ( $x, $y+(50*$this->tamY), "Contribuinte" ); + $this->Text ( $x, $y+(52*$this->tamY), substr( $this->getNomCgm(), 0, 70 ) ); + + $this->Text ( $x, $y+(55*$this->tamY), "Endereço" ); + $this->Text ( $x, $y+(57*$this->tamY), substr( $this->getRua(), 0, 70 ) ); + + $this->setFont ( 'Arial', '', 6 ); + $this->Text ( $x+27+$inAlteracaoMata, $y+(11*$this->tamY), "Local de Pagamento" ); + $this->Text ( $x+27+$inAlteracaoMata, $y+(13*$this->tamY), $this->stLocalPagamento ); + + $this->Text ( $x+27+$inAlteracaoMata, $y+(17*$this->tamY), "Cedente" ); + $this->Text ( $x+27+$inAlteracaoMata, $y+(19*$this->tamY), $this->stCedente ); + + $this->Text ( $x+27+$inAlteracaoMata, $y+(23*$this->tamY), "Data do Doc." ); + $this->Text ( $x+27+$inAlteracaoMata, $y+(25*$this->tamY), date('d/m/Y') ); + + $this->Text ( $x+27+$inAlteracaoMata, $y+(28*$this->tamY), "Uso do Banco" ); + + if ($this->stParcela == 'ÚNICA') { + $this->Text ( $x+27+$inAlteracaoMata, $y+(34*$this->tamY), "Instruções" ); + $this->Text ( $x+27+$inAlteracaoMata, $y+(36.5*$this->tamY), "NÃO RECEBER APÓS VENCIMENTO." ); + //$this->Text ( $x+27+$inAlteracaoMata, $y+(39*$this->tamY), "TFF - proporcional a quatro meses." ); + } else { + $this->Text ( $x+27+$inAlteracaoMata, $y+(34*$this->tamY), "Instruções" ); + $this->Text ( $x+27+$inAlteracaoMata, $y+(36.5*$this->tamY), "RECEBER ATÉ 31/12/2016." ); + //$this->Text ( $x+27+$inAlteracaoMata, $y+(39*$this->tamY), "TFF - proporcional a quatro meses." ); + } + $this->Text ( $x+27+$inAlteracaoMata, $y+(38*$this->tamY), substr( $stObs, 0, 75 ) ); + $this->Text ( $x+27+$inAlteracaoMata, $y+(40*$this->tamY), substr( $stObs, 150, 75 ) ); + $this->Text ( $x+27+$inAlteracaoMata, $y+(42*$this->tamY), substr( $stObs, 225, 75 ) ); + $this->Text ( $x+27+$inAlteracaoMata, $y+(44*$this->tamY), substr( $stObs, 300, 75 ) ); + $this->Text ( $x+27+$inAlteracaoMata, $y+(46*$this->tamY), substr( $stObs, 375, 75 ) ); + $this->Text ( $x+27+$inAlteracaoMata, $y+(48*$this->tamY), substr( $stObs, 450, 75 ) ); + $this->Text ( $x+27+$inAlteracaoMata, $y+(50*$this->tamY), substr( $stObs, 525, 75 ) ); + $this->Text ( $x+27+$inAlteracaoMata, $y+(52*$this->tamY), substr( $stObs, 600, 75 ) ); + $this->Text ( $x+27+$inAlteracaoMata, $y+(54*$this->tamY), substr( $stObs, 675, 75 ) ); + $this->Text ( $x+27+$inAlteracaoMata, $y+(56*$this->tamY), substr( $stObs, 750, 75 ) ); + + $this->Text ( $x+27+$inAlteracaoMata, $y+(58*$this->tamY), "Sacado" ); + $this->Text ( $x+27+$inAlteracaoMata, $y+(60*$this->tamY), substr( $this->getNomCgm(), 0, 120 ) ); + $this->Text ( $x+27+$inAlteracaoMata, $y+(62*$this->tamY), substr($this->getRua(), 0, 120) ); + $this->Text ( $x+27+$inAlteracaoMata, $y+(64*$this->tamY), substr($this->getRua(), 120, 120) ); + $this->Text ( $x+27+$inAlteracaoMata, $y+(66*$this->tamY), substr($this->getRua(), 240, 120) ); + + $this->Text ( $x+27+$inAlteracaoMata, $y+(65*$this->tamY)+0.5, "Sacador/Avalista" ); + + $this->Text ( $x+42.5+$inAlteracaoMata, $y+(23*$this->tamY), "Nosso Número" ); + $this->Text ( $x+42.5+$inAlteracaoMata, $y+(25*$this->tamY), $this->stNumeracao ); + + $this->Text ( $x+42.5+$inAlteracaoMata, $y+(28*$this->tamY), "Carteira" ); + $this->Text ( $x+42.5+$inAlteracaoMata, $y+(30*$this->tamY), $this->stCarteira ); + + $this->Text ( $x+65.5+$inAlteracaoMata, $y+(23*$this->tamY), "Espécie DOC" ); + $this->Text ( $x+65.5+$inAlteracaoMata, $y+(25*$this->tamY), $this->stEspecieDoc ); + + $this->Text ( $x+65.5+$inAlteracaoMata, $y+(28*$this->tamY), "Espécie" ); + $this->Text ( $x+65.5+$inAlteracaoMata, $y+(30*$this->tamY), $this->stEspecie ); + + $this->Text ( $x+80.5+$inAlteracaoMata, $y+(23*$this->tamY), "Aceite" ); + $this->Text ( $x+80.5+$inAlteracaoMata, $y+(25*$this->tamY), $this->stAceite ); + + $this->Text ( $x+80.5+$inAlteracaoMata, $y+(28*$this->tamY), "Quantidade" ); + $this->Text ( $x+80.5+$inAlteracaoMata, $y+(30*$this->tamY), $this->stQuantidade ); + + $this->Text ( $x+94.5+$inAlteracaoMata, $y+(23*$this->tamY), "Data de Proc." ); + $this->Text ( $x+94.5+$inAlteracaoMata, $y+(25*$this->tamY), date('d/m/Y') ); + + $this->Text ( $x+94.5+$inAlteracaoMata, $y+(28*$this->tamY), "Valor" ); + + $this->Text ( $x+158.5, $y+(11*$this->tamY), "Vencimento" ); + $this->Text ( $x+158.5, $y+(13*$this->tamY), $this->dtVencimento ); + + $this->Text ( $x+158.5, $y+(17*$this->tamY), "Agência/Código do Cedente" ); + $this->Text ( $x+158.5, $y+(19*$this->tamY), $this->stAgenciaCodCedente ); + + $this->Text ( $x+158.5, $y+(23*$this->tamY), "Nosso Número" ); + $this->Text ( $x+158.5, $y+(25*$this->tamY), $this->stNumeracao ); + + $this->Text ( $x+158.5, $y+(28*$this->tamY), "(=) Valor do Documento" ); + $this->Text ( $x+158.5, $y+(30*$this->tamY), $this->flValor ); + + $this->Text ( $x+158.5, $y+(33*$this->tamY), "(-) Desconto" ); + $this->Text ( $x+158.5, $y+(38*$this->tamY), "(-) Outras Deduções/Abatimento" ); + + $this->Text ( $x+158.5, $y+(43*$this->tamY), "(+) Mora/Multa/Juros" ); + $this->Text ( $x+158.5, $y+(45*$this->tamY)+0.5, $this->flValorMultaJuros ); + + $this->Text ( $x+158.5, $y+(48*$this->tamY), "(+) Outros Acréscimos" ); + $this->Text ( $x+158.5, $y+(50*$this->tamY), $this->flValorOutros ); + + $this->Text ( $x+158.5, $y+(53*$this->tamY), "(=) Valor Cobrado" ); + $this->Text ( $x+158.5, $y+(56*$this->tamY), $this->flValorTotal ); + + $this->Text ( $x+85.5+$inAlteracaoMata, $y+(69*$this->tamY), "Autenticação Mecânica - Ficha de Compensação . . . . . . . . . . . . . . ." ); + + $this->setFont ( 'Arial', 'B', 6 ); + $this->Text ( $x+68+$inAlteracaoMata, $y+(8*$this->tamY), "|001-9|" ); + + $this->Text ( $x+78+$inAlteracaoMata, $y+(8*$this->tamY), $this->stLinhaCode ); + $this->defineCodigoBarras( $x+31+$inAlteracaoMata, $y+(71*$this->tamY), $this->stBarCode, 0.7, 8 ); + } + + /* adiciona nova pagina */ + public function novaPagina() + { + $this->addPage(); + } + + /* habilita e desabilita a quebra de pagina automatica */ + public function setQuebraPagina($valor) + { + $this->setAutoPageBreak( $valor, 1 ); + } + + /* picote entre os carnes */ + public function setPicote($x, $y, $firstPage = false) + { + for ($i=0;$i<=196;($i+=2)) { + $this->Line( ($x+$i), ($y+(85*$this->tamY)), ($x+$i+1), ($y+(85*$this->tamY)) ); + } + + for (($i=-3);$i<=106;($i+=2)) { + $this->Line( ($x+74), ($y+($i*$this->tamY)), ($x+74), ($y+(($i+1)*$this->tamY)) ); + } + } + + /* mostra o pdf */ + public function show($stNome = "Carne.pdf", $stOpcao="D") + { + $this->Output2File(); + } +} + +class RCarneDadosTFFMataSaoJoao extends RCarneDiversosPetropolis +{ + /** + * @access public + * @var String + */ + public $stComposicaoCalculo ; + public $stNomePrefeitura ; + public $stSubTitulo ; + public $stExercicio ; + public $stCodigoLogradouro ; + public $stNomeLogradouro ; + public $stComplemento ; + public $stQuadra ; + public $stLote ; + public $stDistrito ; + public $stRegiao ; + public $stCep ; + public $stCidade ; + public $stEstado ; + public $stCamLogo; + public $stInscricaoEconomica; + public $stInscricaoMunicipal; + public $stRazaoSocial; + public $stNomeFantasia; + public $stCNPJ; + public $stAtividade; + public $stResponsavel; + public $stParcelaUnica; + public $stValorParcelaUnica; + public $stDescontoParcelaUnica; + public $stParcelaUm; + public $stParcelaDois; + public $stParcelaTres; + public $stObservacao; + + public function RCarneDadosTFFMataSaoJoao() + { + parent::RCarneDiversosPetropolis(); + /** + * Seta Informações Basicas da Prefeitura + */ + $this->stNomePrefeitura = 'PREFEITURA MUNICIPAL DE MATA DE SÃO JOÃO'; + $this->stSubTitulo = 'Secretaria de Administração e Finanças'; + $this->lblMulta = '(+) MULTA DE MORA'; + $this->lblJuros = '(+) JUROS DE MORA'; + $this->lblOutros = '(+) ATUALIZAÇÃO MONETÁRIA'; + + /** + * Seta Configuração do PDF + */ + if ( Sessao::read( 'stNomPdf' ) ) + $stNome = Sessao::read( 'stNomPdf' ); + else + $stNome = "Carne.pdf"; + + $this->Open2File($stNome); + $this->setTextColor(0); + $this->addPage(); + $this->setLeftMargin(0); + $this->setTopMargin(0); + $this->SetLineWidth(0.01); + $this->stCamLogo = '../../../../../../gestaoAdministrativa/fontes/PHP/framework/temas/padrao/imagens/logoCarne.png'; + } + public function desenhaCarne($x , $y) + { + $stComposição = + " \n + Pela Lei Municipal nº 280/2006 e suas alterações, que institui o Código Tributário e de Rendas do Município a Taxa de Fiscalização do Funcionamento - TFF - dos estabelecimentos em geral tem como fato gerador a sua fiscalização quanto as normas constantes desta Lei, do Código de Polícia Administrativa e do Plano Diretor Urbano, relativas a higiene, poluição do meio ambiente, costumes, ordem, tranqüilidade e segurança pública e será calculada de acordo com a Tabela de receitas Correspondente, anexa a esta Lei.\n + A Tabela de Receitas da Lei citada acima traz os valores da Taxa de Fiscalização do Funcionamento dos estabelecimentos, de acordo com a atividade exercida. A Taxa de Fiscalização do Funcionamento terá vencimento estabelecido por Ato do Poder Executivo. Será realizado desconto de 5% (cinco por cento) do valor da Taxa, quando o contribuinte ou responsável efetuar o recolhimento integralmente, em cota única, no prazo estabelecido.\n + O contribuinte que não efetuar o recolhimento da taxa em quota única poderá fazê-lo em até 03 (três) parcelas mensais, na forma e prazos estabelecidos por Ato do Poder Executivo, fixado o vencimento da primeira parcela em 20 de janeiro de 2016.\n + Quando ocorrer o lançamento no curso do exercício, a Taxa de Fiscalização do Funcionamento será calculada proporcionalmente ao número de meses restantes, e o seu recolhimento será efetuado no prazo de 05 (cinco) dias após deferimento da solicitação do lançamento.\n + A expedição do alvará definitivo dar-se-á apenas mediante total quitação da respectiva taxa. Caso o contribuinte ou responsável pela taxa opte pelo pagamento parcelado, será expedida uma licença temporária com validade até o vencimento da parcela subseqüente, devendo o contribuinte ou responsável apresentar o pagamento da(s) parcela(s) no órgão responsável pela emissão do alvará, para solicitar a expedição de nova licença temporária, até que, mediante quitação total da taxa, possa receber o alvará definitivo.\n + Necessitando alterar os dados cadastrais, compareça munido de documentos comprobatórios ao Setor de Tributos e Fiscalização, órgão da Secretaria Municipal de Administração e Finanças, situado no Centro administrativo, Rua Luiz Antônio Garcez, nº 140 - Centro - CEP: 48.280-000 - Mata de São João/BA. Poderá comparecer também ao posto de Apoio Tributário, situado na Alameda das Amendoeiras, s/nº - Imbassaí e na Av. do Farol no Shopping Armazém da Vila - Sala 44 - Praia do Forte - Mata de São João/BA.\n + Telefones: (71) 3635-1310 / 3009 / 1669, (71)99957-6798, (71)99630-1106.\n + Horário para atendimento: de 8h às 11h - de 13h às 14:30 min\n + Emails: atendimento.tributacao@pmsj.ba.gov.br / arrecadacao.iss@pmsj.ba.gov.br\n"; + + //$inTamY = 1.15; + $inTamY = 1.0; + + $this->setFont( 'Arial', 'B', 7 ); + $this->Text( $x+70, $y+(4*$inTamY), 'COMPOSIÇÃO DO CÁLCULO' ); + + $this->stComposicaoCalculo = $stComposição; + $this->SetXY($x+10,$y); + /* Inicializa Fonte*/ + $this->setFont( 'Arial','',8 ); + + /** + * Retangulos + */ + /* Retangulo da Composicação */ + $this->Rect( $x, $y, 189, 75*$inTamY ); + + $y += 20; + /* Retangulo Dados Cadastrais */ + $this->Rect( $x, $y + (78*$inTamY) , 189, 75*$inTamY ); + + /* Composição do Calculo */ + $this->setFont( 'Arial','', 6 ); + $this->setLeftMargin(10); + $this->Write( 2.5 , $this->stComposicaoCalculo ); + $this->setLeftMargin(0); + + /** + * Montar Estrutura dos Dados Cadastrais + */ + + $this->SetFillColor(160,160,160); + $this->Rect( $x, $y+(89*$inTamY) , 189 , 4*$inTamY , 'DF'); + $this->Rect( $x, $y+(103*$inTamY) , 189 , 4*$inTamY , 'DF'); + $this->Rect( $x, $y+(117*$inTamY) , 189 , 4*$inTamY , 'DF'); + $this->Rect( $x, $y+(121*$inTamY), 189 , 4*$inTamY , 'DF'); + + /* Linhas Horizontais */ + $this->Line( $x , $y + (98*$inTamY) , $x +189, $y + (98*$inTamY) ); + + $this->Line( $x , $y + (103*$inTamY) , $x +189, $y + (103*$inTamY) ); //112 + $this->Line( $x , $y + (112*$inTamY) , $x +189, $y + (112*$inTamY) ); //117 + $this->Line( $x , $y + (117*$inTamY) , $x +189, $y + (117*$inTamY) ); //123 + + $this->Line( $x , $y + (125*$inTamY) , $x +189, $y + (125*$inTamY) ); //131 + $this->Line( $x , $y + (129*$inTamY) , $x +189, $y + (129*$inTamY) ); //135 + $this->Line( $x , $y + (133*$inTamY) , $x +189, $y + (133*$inTamY) ); //139 + $this->Line( $x , $y + (138*$inTamY) , $x +189, $y + (138*$inTamY) ); //143 linha acima da ultima frase + + /* Linhas Verticais */ + /* Linha 1*/ + $this->Line( $x + 88 , $y + (78*$inTamY) , $x + 88 , $y + (89*$inTamY)); //90 + + /* Linha 2*/ + $this->Line( $x + 44 , $y + (93*$inTamY) , $x + 44 , $y + (103*$inTamY));//90 + $this->Line( $x + 136 , $y + (93*$inTamY) , $x + 136 , $y + (103*$inTamY));//90 + + /* Linha 3*/ + /* Linha 4*/ + $this->Line( $x + 34 , $y + (107*$inTamY) , $x + 34 , $y + (112*$inTamY)); //112,117 + $this->Line( $x + 64 , $y + (107*$inTamY) , $x + 64 , $y + (112*$inTamY)); //112,117 + + /* Linha 5*/ + $this->Line( $x + 25 , $y + (112*$inTamY) , $x + 25 , $y + (117*$inTamY)); //117,123 + $this->Line( $x + 44 , $y + (112*$inTamY) , $x + 44 , $y + (117*$inTamY)); //117,123 + $this->Line( $x + 81 , $y + (112*$inTamY) , $x + 81 , $y + (117*$inTamY)); //117,123 + $this->Line( $x + 105 , $y + (112*$inTamY) , $x + 105 , $y + (117*$inTamY)); //117,123 + $this->Line( $x + 127 , $y + (112*$inTamY) , $x + 127 , $y + (117*$inTamY)); //117,123 + $this->Line( $x + 163 , $y + (112*$inTamY) , $x + 163 , $y + (117*$inTamY)); //117,123 + + $this->Line( $x + 85 , $y + (121*$inTamY) , $x + 85 , $y + (138*$inTamY)); //126,143 + + /** + * Titulos dos Dados + */ + /* imagem*/ + $stExt = substr( $this->stCamLogo, strlen($this->stCamLogo)-3, strlen($this->stCamLogo) ); + $this->Image( $this->stCamLogo , $x+1 , $y+(79*$inTamY) , 10 , 10 , $stExt ); + /* dados */ + $this->setFont( 'Arial','',5 ); + + $this->Text( $x+ 1 , $y+(95*$inTamY) , 'INSCRIÇÃO ECONÔMICA:' ); + $this->Text( $x+ 45 , $y+(95*$inTamY) , 'RAZÃO SOCIAL:' ); + $this->Text( $x+137 , $y+(95*$inTamY) , 'NOME FANTASIA:' ); + + $this->Text( $x+ 1 , $y+(100*$inTamY) , 'CNPJ/CPF:' ); + $this->Text( $x+ 45 , $y+(100*$inTamY) , 'ATIVIDADE:' ); + + $this->Text( $x+137 , $y+(100*$inTamY) , 'RESPONSÁVEL:' ); + + /* exercicio */ + $this->setFont( 'Arial','B',8 ); + $this->Text( $x+122 , $y+(81*$inTamY) , 'DADOS CADASTRAIS' ); + $this->Text( $x+116 , $y+(84*$inTamY) , '- Cadastro Geral de Atividades -' ); + + $this->setFont( 'Arial','B',10 ); + $this->Text( $x+122 , $y+(88*$inTamY) , 'EXERCÍCIO 2016'); + + $this->setFont( 'Arial','B',8 ); + $this->Text( $x+ 52 , $y+(92*$inTamY) , 'D A D O S D O C A D A S T R O E C O N Ô M I C O' ); + $this->Text( $x+ 52 , $y+(106*$inTamY) , 'E N D E R E Ç O D O L O C A L E S T A B E L E C I D O' ); //111 + $this->Text( $x+ 72 , $y+(120*$inTamY) , 'D A D O S D O L A N Ç A M E N T O' ); //126 + + $this->setFont( 'Arial','B',5 ); + $this->Text( $x+ 25 , $y+(124*$inTamY) , 'DEMONSTRATIVO PARA PAGAMENTO ÚNICO' ); //130 + $this->Text( $x+ 122 , $y+(124*$inTamY) , 'DEMONSTRATIVO PARA PAGAMENTO PARCELADO' ); //130 + + $this->setFont( 'Arial','',5 ); + $this->Text( $x+ 1 , $y+(109*$inTamY) , 'INSCRIÇÃO IMOBILIÁRIA:' ); //114 + + $this->Text( $x+ 35 , $y+(109*$inTamY) , 'CÓDIGO DO LOGRADOURO:' ); //114 + $this->Text( $x+ 65 , $y+(109*$inTamY) , 'NOME DO LOGRADOURO:' ); //114 + + $this->Text( $x+ 1 , $y+(114*$inTamY) , 'QUADRA:' ); //119 + $this->Text( $x+ 26 , $y+(114*$inTamY) , 'LOTE:' ); //119 + $this->Text( $x+ 45 , $y+(114*$inTamY) , 'DISTRITO:' ); //119 + $this->Text( $x+ 82 , $y+(114*$inTamY) , 'REGIÃO:' ); //119 + $this->Text( $x+ 106 , $y+(114*$inTamY) , 'CEP:' ); //119 + $this->Text( $x+ 128 , $y+(114*$inTamY) , 'CIDADE:' ); //119 + $this->Text( $x+ 164 , $y+(114*$inTamY) , 'ESTADO:' ); //119 + + $this->setFont( 'Arial','B',5 ); + $this->Text( $x+ 22 , $y+(128*$inTamY) , 'Valor total:' ); //130 + $this->Text( $x+ 132 , $y+(128*$inTamY) , '1º Parcela:' ); //133 + $this->Text( $x+ 132 , $y+(132*$inTamY) , '2º Parcela:' ); //137 + $this->Text( $x+ 132 , $y+(135*$inTamY) , '3º Parcela:' ); //142 + $this->Text( $x+ 22 , $y+(132*$inTamY) , 'DESCONTO NA COTA UNICA(%):' ); //138 + $this->Text( $x+ 22 , $y+(136*$inTamY) , 'Parcela única com desconto:' ); + + $this->setFont( 'Arial','B',6 ); + $this->Text( $x+1 , $y+(140*$inTamY) , 'Observações:' ); + $this->setFont( 'Arial','',6 ); + $this->Text( $x+3 , $y+(142*$inTamY) , substr( $this->stObservacao, 0, 180) ); + $this->Text( $x+3 , $y+(144*$inTamY) , substr( $this->stObservacao, 180, 180) ); + + $this->setFont( 'Arial','',5 ); + $this->Text( $x+3 , $y+(144*$inTamY) , 'Necessitando alterar os dados cadastrais compareça, munido de documentos comprobatórios, à Coordenadoria Fazendária do Município, situado na Rua Luiz Antônio Garcez, nº 140 - Centro Administrativo - Centro' ); + $this->Text( $x+3 , $y+(146*$inTamY) , 'CEP: 48.280-000 - Mata de São João/BA.' ); + /* mostrar dados */ + + $this->setFont( 'Arial','B',7 ); + $this->Text( $x+14 , $y+(85*$inTamY) , $this->stNomePrefeitura ); + $this->setFont( 'Arial','',6 ); + $this->Text( $x+14 , $y+(88*$inTamY) , $this->stSubTitulo ); + + $this->setFont( 'Arial','',5 ); + /* inscricao economica */ + $this->Text( $x+ 2 , $y+(97*$inTamY) , $this->stInscricaoEconomica ); + + /* razao social */ + $this->Text( $x+45 , $y+(97*$inTamY) , $this->stRazaoSocial ); + + /* nome fantasia */ + $this->Text( $x+137 , $y+(97*$inTamY) , $this->stNomeFantasia ); + + /* cnpj/cpf */ + $this->Text( $x+1 , $y+(102*$inTamY) , $this->stCNPJ ); + + /* atividade */ + $this->Text( $x+57 , $y+(100*$inTamY) , substr( $this->stAtividade, 0, 110) ); + $this->Text( $x+45 , $y+(102*$inTamY) , substr( $this->stAtividade, 110, 120) ); + + /* responsavel */ + $this->Text( $x+137 , $y+(102*$inTamY) , $this->stResponsavel ); + + /* inscricao municipal */ + $this->Text( $x+14 , $y+(111*$inTamY) , $this->stInscricaoMunicipal ); //116 + + /* logradouro */ + $this->Text( $x+35 , $y+(111*$inTamY) , $this->stCodigoLogradouro ); //116 + /* nome logradouro */ + $this->Text( $x+65 , $y+(111*$inTamY) , $this->stNomeLogradouro ); //116 + /* complemento */ + $this->Text( $x+107 , $y+(111*$inTamY) , $this->stComplemento ); //116 + + /* quadra*/ + $this->Text( $x+ 14 , $y+(116*$inTamY) , $this->stQuadra ); //122 + /* lote */ + $this->Text( $x+ 35 , $y+(116*$inTamY) , $this->stLote); //122 + /* distrito */ + $this->Text( $x+ 45 , $y+(116*$inTamY) , $this->stDistrito ); //122 + /* regiao */ + $this->Text( $x+ 89 , $y+(116*$inTamY) , $this->stRegiao); //122 + /* cep */ + $this->Text( $x+108 , $y+(116*$inTamY) , $this->stCep); //122 + /* cidade */ + $this->Text( $x+129 , $y+(116*$inTamY) , $this->stCidade ); //122 + /* estado */ + $this->Text( $x+170 , $y+(116*$inTamY) , $this->stEstado ); //122 + + /* Parcela Unica */ + $this->Text( $x+35 , $y+(128*$inTamY) , $this->stParcelaUnica ); + + /* Desconto Parcela Unica */ + $this->Text( $x+55 , $y+(132*$inTamY) , $this->stDescontoParcelaUnica ); + + $valor_1 = str_replace('.', '', $this->stValorParcelaUnica); + $valor_2 = str_replace(',', '.', $valor_1); + + /* Valor calculado com desconte */ + //$parcelaUnica = number_format($this->stValorParcelaUnica, 2, '.', ''); + //$percentualDesconto = number_format($this->stDescontoParcelaUnica, 2, '.', ''); + + $valorDesconto = $valor_2-($valor_2*($this->stDescontoParcelaUnica/100)); + $valorDescontoFormatado = number_format($valorDesconto, 2, ',', '.'); + + $this->Text( $x+55 , $y+(136*$inTamY) , $valorDescontoFormatado ); + + /* Parcela 1 */ + $this->Text( $x+142 , $y+(128*$inTamY) , $this->stParcelaUm ); + + /* Parcela 2 */ + $this->Text( $x+142 , $y+(132*$inTamY) , $this->stParcelaDois ); + + /* Parcela 3 */ + $this->Text( $x+142 , $y+(135*$inTamY) , $this->stParcelaTres ); + } + + public function show($stNome = "Carne.pdf", $stOpcao="") + { + $this->Output2File(); + } +} + +class RCarneTFFMataSaoJoao2016 +{ +/* + * @var Integer + * @access Private +*/ +var $inHorizontal; +/* + * @var Integer + * @access Private +*/ +var $inVertical; +/* + * @var Array + * @access Private +*/ +var $arEmissao; +/* + * @var Object + * @access Private +*/ +var $obBarra; +/* + * @var Array + * @access Private +*/ +var $arBarra; +/* + * @var Boolean; + * @access Private +*/ +var $boPulaPagina; +/* + * @var Object + * @access Private +*/ +var $obRARRCarne; +var $obRCarneDadosCadastrais; +var $stLocal; + +/* setters */ +function setHorizontal($valor) { $this->inHorizontal = $valor; } +function setVertical($valor) { $this->inVertical = $valor; } +function setEmissao($valor) { $this->arEmissao = $valor; } +function setBarra($valor) { $this->obBarra = $valor; } +function setArBarra($valor) { $this->arBarra = $valor; } +function setPulaPagina($valor) { $this->boPulaPagina = $valor; } + +/* getters */ +function getHorizontal() { return $this->inHorizontal; } +function getVertical() { return $this->inVertical; } +function getEmissao() { return $this->arEmissao; } +function getBarra() { return $this->obBarra; } +function getArBarra() { return $this->arBarra; } +function getPulaPagina() { return $this->boPulaPagina; } + +/* + * Metodo Construtor + * @access Private +*/ +function RCarneTFFMataSaoJoao2016($arEmissao, $horizontal = 7, $vertical = 95) +{ + $this->obRARRCarne = new RARRCarne; + $this->arEmissao = $arEmissao; + $this->inHorizontal = $horizontal; + $this->inVertical = $vertical; + //$obRProtocolo = new RProtocolo; + //$obRCarnePetropolis = new RCarnePetropolis; +} + +function percentageBar($nuPercentual,$stMensagem="") +{ + $stBarra = "
    "; + $stBarra .= $nuPercentual."%"; + $stBarra .= "
    "; + $stBarra .= "
    "; + $stBarra .= "
    "; + $stJs = ""; + echo $stJs; + flush(); +} + +function imprimirCarne($diffBaixa = FALSE) +{ + include_once ( CAM_GT_ARR_MAPEAMENTO."TARRCarne.class.php" ); + global $inCodFebraban; + //--------------------- + SistemaLegado::BloqueiaFrames(true, false); + + $this->obRARRConfiguracao = new RARRConfiguracao; + $this->obRARRConfiguracao->setCodModulo ( 2 ); + $this->obRARRConfiguracao->consultar(); + $inCodFebraban = $this->obRARRConfiguracao->getCodFebraban(); + unset($this->obRARRConfiguracao); + + $obTAdministracaoConfiguracao = new TAdministracaoConfiguracao; + $stFiltro = " WHERE exercicio = '".Sessao::getExercicio()."' AND parametro = 'logotipo' "; + $obTAdministracaoConfiguracao->recuperaTodos( $rsListaImagens, $stFiltro ); + $stNomeImagem = $rsListaImagens->getCampo("valor"); + + $inSaltaPagina = ""; + $this->obRCarnePetropolis = new RCarneDadosTFFMataSaoJoao(); + $this->obRCarnePetropolis->stCamLogo = CAM_FW_TEMAS."imagens/".$stNomeImagem; + $this->obRCarnePetropolis->lblTitulo1 = "MATA DE SÃO JOÃO - Sec. de Adm. e Fin."; + + $inTotalDeCarnes = count( $this->arEmissao ); + $inCarneAtual = 1; + foreach ($this->arEmissao as $valor => $chave) { + /* imprimir duas folhas com dados cadastrais */ + /* buscar informações para dados cadastrais*/ + $flTotalImpresso = round( ( $inCarneAtual * 100 ) / $inTotalDeCarnes, 2 ); + $this->percentageBar( $flTotalImpresso, "Processando..." ); + $inCarneAtual++; + + $stFiltro = " AND ece.inscricao_economica = ". $chave[0]['inscricao']." AND ap.cod_lancamento in ( SELECT cod_lancamento FROM arrecadacao.parcela WHERE cod_parcela = ".$chave[0]['cod_parcela']." ) \n"; + + unset( $obTARRCarne ); + unset( $rsListaCarne ); + $obTARRCarne = new TARRCarne; + $obTARRCarne->recuperaDadosTFFMata( $rsListaCarne, $stFiltro ); + + $rsListaCarne->addFormatacao ('valor','NUMERIC_BR'); + unset ( $arDadosParcelas ); + $arDadosParcelas = array(); + $inTotalParcelas = 0; + if ( !$rsListaCarne->Eof() ) { + $inCodCalculo = $rsListaCarne->getCampo("cod_calculo"); + while ( !$rsListaCarne->Eof() ) { + $arDadosParcelas[$rsListaCarne->getCampo("nr_parcela")]["data"] = $rsListaCarne->getCampo("vencimento"); + $arDadosParcelas[$rsListaCarne->getCampo("nr_parcela")]["valor"] = $rsListaCarne->getCampo("valor"); + $inTotalParcelas++; + + $rsListaCarne->proximo(); + } + } + + $rsListaCarne->setPrimeiroElemento(); + + $rsListaCarne->setCampo('observacao', $rsListaCarne->getCampo('observacao')); + + $this->obRCarnePetropolis->stObservacao = $rsListaCarne->getCampo("observacao"); + $this->obRCarnePetropolis->stParcelaUnica = $arDadosParcelas[0]["data"].' R$ '.$arDadosParcelas[0]["valor"]; //'05/02/2007 R$ 140,87'; + $this->obRCarnePetropolis->stValorParcelaUnica = $arDadosParcelas[0]["valor"]; + $this->obRCarnePetropolis->stDescontoParcelaUnica = '5,00'; + $this->obRCarnePetropolis->stParcelaUm = $arDadosParcelas[1]["data"].' R$ '.$arDadosParcelas[1]["valor"]; //'05/02/2007 R$ 140,87'; + $this->obRCarnePetropolis->stParcelaDois = $arDadosParcelas[2]["data"].' R$ '.$arDadosParcelas[2]["valor"]; //'05/03/2007 R$ 140,87'; + $this->obRCarnePetropolis->stParcelaTres = $arDadosParcelas[3]["data"].' R$ '.$arDadosParcelas[3]["valor"]; //'05/04/2007 R$ 140,87'; + + $this->obRCarnePetropolis->stInscricaoMunicipal = $rsListaCarne->getCampo("inscricao_municipal"); + $this->obRCarnePetropolis->stInscricaoEconomica = $rsListaCarne->getCampo("inscricao_economica"); //'540857'; + $this->obRCarnePetropolis->stRazaoSocial = $rsListaCarne->getCampo("razao_social"); //'JOSE DIONIZIO DOS SANTOS'; + $this->obRCarnePetropolis->stNomeFantasia = $rsListaCarne->getCampo("nome_fantasia"); //'DIONIZIO MATERIAIS DE CONSTRUCAO'; + $this->obRCarnePetropolis->stCNPJ = $rsListaCarne->getCampo("cpf_cnpj"); //'09.018.561/0001-80'; + $this->obRCarnePetropolis->stAtividade = $rsListaCarne->getCampo("atividade"); //'Ajudante de pedreiro'; + $this->obRCarnePetropolis->stResponsavel = $rsListaCarne->getCampo("resposavel"); //'Capitao Jonas Vasconcelus'; + + /* setar todos os dados necessarios */ + $this->obRCarnePetropolis->stNomePrefeitura = 'PREFEITURA MUNICIPAL DE MATA DE SÃO JOÃO'; + $this->obRCarnePetropolis->stSubTitulo = 'Secretaria de Administração e Finanças'; + $this->obRCarnePetropolis->stExercicio = Sessao::getExercicio(); + + $this->obRCarnePetropolis->setImagem(CAM_FW_TEMAS."imagens/".$stNomeImagem ); + $this->obRARRCarne->obRARRParcela->roRARRLancamento->setCodLancamento( $valor ); + $this->obRARRCarne->inCodContribuinteInicial = $chave[0]["numcgm"]; + unset( $rsGeraCarneCabecalho ); + $obErro = $this->obRARRCarne->reemitirCarneDiverso( $rsGeraCarneCabecalho ); + + $this->obRCarnePetropolis->stCodigoLogradouro = $rsListaCarne->getCampo("cod_logradouro"); + + $this->obRCarnePetropolis->stNomeLogradouro = $rsGeraCarneCabecalho->getCampo( 'nom_logradouro' ); //'AV DO FAROL 50.003' ; + $this->obRCarnePetropolis->stQuadra = $rsGeraCarneCabecalho->getCampo( "quadra" ); + $this->obRCarnePetropolis->stLote = $rsGeraCarneCabecalho->getCampo("lote"); //'02' ; + $this->obRCarnePetropolis->stDistrito = $rsListaCarne->getCampo("distrito"); //'PRAIA DO FORTE' ; + $this->obRCarnePetropolis->stRegiao = $rsListaCarne->getCampo("regiao"); //'LITORAL' ; + $this->obRCarnePetropolis->stCep = $rsGeraCarneCabecalho->getCampo( 'cep' ); //'48.820-000' ; + $this->obRCarnePetropolis->stCidade = 'MATA DE SÃO JOÃO' ; + $this->obRCarnePetropolis->stEstado = 'BAHIA' ; + + $this->obRCarnePetropolis->desenhaCarne(10,40); + $this->obRCarnePetropolis->novaPagina(); + $inSaltaPagina++; + + $this->obRARRCarne->stExercicio = $chave[0]["exercicio"]; + if ( $obErro->ocorreu() ) { + break; + } + $this->obRCarnePetropolis->setObservacaoL1 ('Créditos: '); + + while ( !$rsGeraCarneCabecalho->eof() ) { + // montagem cabecalho (protocolo) + $this->obRCarnePetropolis->setCt ( $rsGeraCarneCabecalho->getCampo( 'ano_aquisicao' ) ); + $this->obRCarnePetropolis->setCa ( $rsGeraCarneCabecalho->getCampo( 'ca' ) ); + $this->obRCarnePetropolis->setCep ( $rsGeraCarneCabecalho->getCampo( 'cep') ); + $this->obRCarnePetropolis->setExercicio ( $rsGeraCarneCabecalho->getCampo( 'exercicio' ) ); + $this->obRCarnePetropolis->setNomCgm ( $rsGeraCarneCabecalho->getCampo( 'nom_cgm' ) ); + + $arEndereco = explode( '§', $rsGeraCarneCabecalho->getCampo( 'nom_logradouro' ) ); + + $this->obRCarnePetropolis->setRua ( $arEndereco[0]." ".$arEndereco[2] ); + + $this->obRCarnePetropolis->setNumero ( $arEndereco[3] ); + $this->obRCarnePetropolis->setComplemento ( $arEndereco[4] ); + $this->obRCarnePetropolis->setCidade ( $arEndereco[8] ); + $this->obRCarnePetropolis->setUf ( $arEndereco[10] ); + $this->obRCarnePetropolis->setInscricao ( str_pad($rsGeraCarneCabecalho->getCampo( 'inscricao_municipal' ),strlen( $stMascaraInscricao ), '0', STR_PAD_LEFT) ); + $this->obRCarnePetropolis->setCtmDci ( $rsGeraCarneCabecalho->getCampo( 'ctm_dci' ) ); + $this->obRCarnePetropolis->setCodLogradouro ( $rsGeraCarneCabecalho->getCampo( 'cod_logradouro' ) ); + $this->obRCarnePetropolis->setDistrito ( $rsGeraCarneCabecalho->getCampo( 'distrito' ) ); + $this->obRCarnePetropolis->setProcessamento ( $rsGeraCarneCabecalho->getCampo( 'data_processamento' ) ); + $this->obRCarnePetropolis->setAreaTerreno ( $rsGeraCarneCabecalho->getCampo( 'area_real' ) ); + $this->obRCarnePetropolis->setAreaEdificada ( $rsGeraCarneCabecalho->getCampo( 'area_edificada' ) ); + $this->obRCarnePetropolis->setUtilizacaoImovel ( $rsGeraCarneCabecalho->getCampo( 'utilizacao' ) ); + $this->obRCarnePetropolis->setTributo ( $rsGeraCarneCabecalho->getCampo( 'cod_grupo')." - ".$rsGeraCarneCabecalho->getCampo( 'descricao' ) ); + $this->obRCarnePetropolis->setValorTributoReal ( $rsGeraCarneCabecalho->getCampo( 'valor_venal_total' ) ); + $this->obRCarnePetropolis->setObservacao ( wordwrap($rsGeraCarneCabecalho->getCampo('observacao' ),40,chr(13)) ); + $this->obRCarnePetropolis->setNomBairro ( $rsGeraCarneCabecalho->getCampo( 'nom_bairro' ) ); + $this->obRCarnePetropolis->setCodDivida ( $rsGeraCarneCabecalho->getCampo( 'cod_grupo' ) ); + if (preg_match('/LIMPEZA.*/i',$rsGeraCarneCabecalho->getCampo( 'descricao_credito' ) ) ) { + $this->obRCarnePetropolis->setTaxaLimpezaAnual ( $rsGeraCarneCabecalho->getCampo( 'valor' ) ); + } else { + $flImpostoAnualReal = $rsGeraCarneCabecalho->getCampo( 'valor' ); + $this->obRCarnePetropolis->setImpostoAnualReal ( $flImpostoAnualReal ); + } + $this->obRCarnePetropolis->setReferencia ( "" ); + $this->obRCarnePetropolis->setNumeroPlanta ( "" ); + + // capturar creditos + $this->obRCarnePetropolis->setObservacaoL1 ( $this->obRCarnePetropolis->getObservacaoL1().$rsGeraCarneCabecalho->getCampo( 'descricao_credito').": ".$rsGeraCarneCabecalho->getCampo( 'valor' )." "); + + $rsGeraCarneCabecalho->proximo(); + + } //fim do loop de reemitirCarne + $this->obRCarnePetropolis->setValorAnualReal ( $flImpostoAnualReal + $this->obRCarnePetropolis->getTaxaLimpezaAnual() ); + // formatar + $this->obRCarnePetropolis->setValorAnualReal ( number_format($this->obRCarnePetropolis->getValorAnualReal(),2,',','.') ); + $this->obRCarnePetropolis->setTaxaLimpezaAnual ( number_format($this->obRCarnePetropolis->getTaxaLimpezaAnual(),2,',','.') ); + $this->obRCarnePetropolis->setImpostoAnualReal ( number_format($this->obRCarnePetropolis->getImpostoAnualReal(),2,',','.') ); + if ($this->obRCarnePetropolis->getValorTributoReal() != "") { + $this->obRCarnePetropolis->setValorTributoReal ( number_format($this->obRCarnePetropolis->getValorTributoReal(),2,',','.') ); + } + + $inParcela = $inCount = ""; + + $this->inHorizontal = 7; + $this->inVertical = 20; + + unset( $this->obBarra ); + unset( $this->arBarra ); + $this->obBarra = new RCodigoBarraFebrabanCompensacaoBB_Anexo5; + $this->arBarra = array(); + foreach ($chave as $parcela) { // impressao das parcelas selecionadas para cada codigo de lancamento + $inParcela++; + + $this->obRCarnePetropolis->setImagemCarne( CAM_FW_TEMAS."imagens/".$stNomeImagem ); //logoCarne.png" ); //imagem mudar + $this->obRCarnePetropolis->setImagem(""); + $this->obRARRCarne->obRARRParcela->setCodParcela( $parcela["cod_parcela"] ); + unset( $rsParcela ); + $obErro = $this->obRARRCarne->obRARRParcela->listarParcelaCarne( $rsParcela ); + + // instanciar mapeamento da função de calculo de juro e multa + require_once(CAM_GT_ARR_MAPEAMENTO.'FARRCalculaParcelasReemissao.class.php'); + require_once(CAM_GT_ARR_MAPEAMENTO.'FARRCalculaJuroOrMultaParcelasReemissao.class.php'); + // retorna parcela com juro e multa aplicados + unset( $obCalculaParcelas ); + $obCalculaParcelas = new FARRCalculaParcelasReemissao; + // retorna valores de juro e multa que foram aplicados + unset( $obCalculaJM ); + $obCalculaJM = new FARRCalculaJuroOrMultaParcelasReemissao; + + // data da reemissao + $arTmp = explode('/',$rsParcela->getCampo( 'vencimento' )); + $dtVencimento = $arTmp[2].'-'.$arTmp[1].'-'.$arTmp[0]; + + // parametro padrao + $stParametro = "'".$rsParcela->getCampo('numeracao')."',".$this->obRARRCarne->stExercicio; + $stParametro .= ",".$parcela["cod_parcela"].",'"; + + // monta paramentros com as datas + $stParametro1 = $stParametro.$dtVencimento."'"; + + // valor atualizado + //$obErro = $obCalculaParcelas->executaFuncao($rsTmp,$stParametro1); + unset( $rsTmp ); + $obErro = $obCalculaParcelas->executaCalculaValoresParcelasReemissao($rsTmp,$stParametro1); + $arValorNormal = explode ( "§", $rsTmp->getCampo('valor') ); + $nuValorTotal = $arValorNormal[0]; + $nuValorNormal = $arValorNormal[1]; + $stJuroNormal = $arValorNormal[3]; + $stMultaNormal = $arValorNormal[2]; + $stCorrecaoNormal = $arValorNormal[5]; + + $this->obRCarnePetropolis->setNumeracao( (string) $rsParcela->getCampo( 'numeracao' ) ); + $this->arBarra['valor_documento'] = $nuValorTotal; + $this->arBarra['fator_vencimento'] = (string) $rsParcela->getCampo( 'fator_vencimento' ); + $this->arBarra['nosso_numero'] = (string) $rsParcela->getCampo( 'numeracao' ); + $this->obRCarnePetropolis->stNumeracao = $rsParcela->getCampo( 'numeracao' ); + $this->arBarra['convenio'] = 960663; + $this->arBarra['tipo_moeda'] = 9; + if ( $obErro->ocorreu() ) { + break; + } + + if ($diffBaixa) { + $this->obRCarnePetropolis->setParcelaUnica ( true ); + $this->obRCarnePetropolis->lblTitulo2 = ' '; + $this->obRCarnePetropolis->lblValorCotaUnica = 'VALOR TOTAL'; + $this->obRCarnePetropolis->setVencimento ( $rsParcela->getCampo( 'vencimento' ) ); + $this->obRCarnePetropolis->setValor ( number_format($nuValorNormal,2,',','.') ); + $this->obRCarnePetropolis->setParcela ( $rsParcela->getCampo( 'info' ) ); + $this->obRCarnePetropolis->stObsVencimento = ""; + } else { + if ( $rsParcela->getCampo( 'nr_parcela' ) == 0 ) { + $this->obRCarnePetropolis->setParcelaUnica ( true ); + $this->obRCarnePetropolis->setVencimento ( $rsParcela->getCampo( 'vencimento' ) ); + $this->obRCarnePetropolis->setValor ( number_format($nuValorNormal,2,',','.') ); + // Recuperar Desconto + + include_once(CAM_GT_ARR_MAPEAMENTO."FARRParcentualDescontoParcela.class.php"); + unset( $obPercentual ); + $obPercentual = new FARRParcentualDescontoParcela; + unset( $rsPercentual ); + $obPercentual->executaFuncao($rsPercentual,"".$parcela["cod_parcela"].",'".$dtVencimento."'"); + $this->obRCarnePetropolis->setObservacaoL1 ( 'Cota Única com '.$rsPercentual->getCampo('valor').'% de desconto.' ); ; + $this->obRCarnePetropolis->setObservacaoL2 ( 'Desconto não incide sobre a Taxa de Coleta de Lixo' ); + $this->obRCarnePetropolis->setObservacaoL3 ( 'Receber até 31/12/2016.' ); + $this->obRCarnePetropolis->setParcela ( 'ÚNICA' ); + $this->obRCarnePetropolis->stObsVencimento = "Receber até 31/12/2016."; + + $this->obRCarnePetropolis->flValorJuros = number_format(round($stJuroNormal,2),2,',','.'); + $this->obRCarnePetropolis->flValorMulta = number_format(round($stMultaNormal,2),2,',','.'); + $this->obRCarnePetropolis->flValorOutros = number_format(round($stCorrecaoNormal,2),2,',','.'); + } else { + $arVencimentos = $this->geraParcelas($rsParcela->getCampo( 'vencimento' ),4); + $this->obRCarnePetropolis->setParcela( $rsParcela->getCampo( 'info' )); + $this->obRCarnePetropolis->setParcelaUnica( false ); + $this->obRCarnePetropolis->setVencimento ( $rsParcela->getCampo( 'vencimento' ) ); + + $this->obRCarnePetropolis->flValorJuros = number_format(round($stJuroNormal,2),2,',','.'); + $this->obRCarnePetropolis->flValorMulta = number_format(round($stMultaNormal,2),2,',','.'); + $this->obRCarnePetropolis->flValorOutros = number_format(round($stCorrecaoNormal,2),2,',','.'); + $this->obRCarnePetropolis->setValor (number_format(round($nuValorNormal,2),2,',','.')); + } + } + + $this->obRCarnePetropolis->flValorMultaJuros = ( number_format(round($stJuroNormal+$stMultaNormal+$stCorrecaoNormal, 2 ),2,',','')); + $this->obRCarnePetropolis->setValorTotal( number_format(round($nuValorTotal,2),2,',','.') ); + + unset( $this->arCodigoBarra ); + $this->arCodigoBarra = $this->obBarra->geraFebraban( $this->arBarra ); + $this->obRCarnePetropolis->setBarCode( $this->arCodigoBarra['codigo_barras'] ); + $this->obRCarnePetropolis->setLinhaCode( $this->arCodigoBarra['linha_digitavel'] ); + + $this->obRCarnePetropolis->drawCarne( $this->inHorizontal, $this->inVertical ); + $this->obRCarnePetropolis->setPicote( $this->inHorizontal, $this->inVertical ); + $this->inVertical += 75; + if ( ( $inParcela == 3 ) || ( $inCount == 3 ) ) { + $this->obRCarnePetropolis->novaPagina(); + $inCount = 0; + $this->inVertical = 7; + $this->boPulaPagina = false; + } else { + $this->boPulaPagina = true; + } + $inCount++; + }// fim foreach parcelas + + if (( $this->boPulaPagina ) && ( $inSaltaPagina != count($this->arEmissao) )) { + $this->obRCarnePetropolis->novaPagina(); + } + + $arGruposValidos = explode(',','101,102,10120, 10121, 10122, 10123, 10124, 10125, 10198, 10199, 10220, 10221, 10222, 10223, 10224, 10225, 10298,10299'); + if( in_array($this->obRCarnePetropolis->getCodDivida(),$arGruposValidos)) + $this->obRCarnePetropolis->drawComplemento($this->inHorizontal, $this->inVertical); + + } // fim foreach $arEmissao + + SistemaLegado::LiberaFrames(); + if ( Sessao::read( 'stNomPdf' ) ) + $stNome = Sessao::read( 'stNomPdf' ); + else + $stNome = "Carne.pdf"; + + if ( Sessao::read( 'stParamPdf' ) ) + $stParam = Sessao::read( 'stParamPdf' ); + else + $stParam = "I"; + $this->obRCarnePetropolis->show($stNome,$stParam); // lanca o pdf +} + +function geraParcelas($data, $iteracao) +{ + $arDataResult = array(); + + for ($i=0;$i<$iteracao;$i++) { + $arData = explode('/',$data); + + $mes = $arData[1]; + $dia = $arData[0]; + $ano = $arData[2]; + + switch ( (int) $mes ) { + case 2 : + if ($ano % 4 == 0) { + $dia = 29; + } else { + $dia = 28; + } + break; + case 1 : + case 3 : + case 5 : + case 7 : + case 8 : + case 10: $dia = 31; + break; + + case 4 : + case 6 : + case 9 : + case 11: $dia = 30; + break; + } + + $data = str_pad($dia,2,'0',STR_PAD_LEFT).'/'.str_pad($mes,2,'0',STR_PAD_LEFT).'/'.$ano; + array_push($arDataResult,$data); + + $mes++; + if ($mes > 12) { + $mes = 1; + $ano++; + } + + $data = $dia.'/'.$mes.'/'.$ano; + } + + return $arDataResult; +} + +} diff --git a/gestaoTributaria/fontes/PHP/arrecadacao/classes/boletos/RCodigoBarraFichaCompensacaoCaixa.class.php b/gestaoTributaria/fontes/PHP/arrecadacao/classes/boletos/RCodigoBarraFichaCompensacaoCaixa.class.php index 7433728..01887e7 100644 --- a/gestaoTributaria/fontes/PHP/arrecadacao/classes/boletos/RCodigoBarraFichaCompensacaoCaixa.class.php +++ b/gestaoTributaria/fontes/PHP/arrecadacao/classes/boletos/RCodigoBarraFichaCompensacaoCaixa.class.php @@ -67,8 +67,6 @@ class RCodigoBarraFichaCompensacaoCaixa //$stDV = digito verificador das posicoes 1 ate 4 + 6 ate 44 $stDVModOnze = $this->_modulo11( '104'.$tipoMoeda.$stFator.$valor.$nNumero.$stAgCodCedente ); - // SistemaLegado::mostravar('104'."/".$tipoMoeda."/".$stDVModOnze."/".$stFator."/".$valor."/".$stCampoLivre); exit; - //$stFator vou fazer vir do banco, eh a data de vencimento - 07/10/1997 (para pagamentos que nao podem ser feitos apos vencimento tacar mais 15 dias) $barraFebraban = '104'.$tipoMoeda.$stDVModOnze.$stFator.$valor.$nNumero.$stAgCodCedente; diff --git a/gestaoTributaria/fontes/PHP/arrecadacao/classes/mapeamento/FARRListaEmissaoGrafica.class.php b/gestaoTributaria/fontes/PHP/arrecadacao/classes/mapeamento/FARRListaEmissaoGrafica.class.php index f6bc150..502cf06 100644 --- a/gestaoTributaria/fontes/PHP/arrecadacao/classes/mapeamento/FARRListaEmissaoGrafica.class.php +++ b/gestaoTributaria/fontes/PHP/arrecadacao/classes/mapeamento/FARRListaEmissaoGrafica.class.php @@ -32,7 +32,7 @@ * @package URBEM * @subpackage Mapeamento - * $Id: FARRListaEmissaoGrafica.class.php 59612 2014-09-02 12:00:51Z gelson $ + * $Id: FARRListaEmissaoGrafica.class.php 63867 2015-10-27 17:25:14Z evandro $ * Casos de uso: uc-05.03.11 */ @@ -67,6 +67,7 @@ class FARRListaEmissaoGrafica extends Persistente public $stTipoInscricao; public $stTipoEmissao; public $stOrdemEmissao; + public $stOrdemEmissaoFuncao; # Atributos da Inscr. Imobiliaria public $stOrdemLote; @@ -104,7 +105,8 @@ function FARRListaEmissaoGrafica() $this->stVinculo = null; $this->stOrdemEmissao = null; - + $this->stOrdemEmissaoFuncao = ''; + $this->stOrdemLote = null; $this->stOrdemImovel = null; $this->stOrdemEdificacao = null; @@ -703,7 +705,6 @@ function executaFuncao(&$rsRecordset, $stParametros,$boTransacao = "") $this->setDebug($stSql); $obErro = $obConexao->executaSQL($rsRecordset,$stSql, $boTransacao ); - //$this->debug(); return $obErro; } @@ -755,6 +756,7 @@ function montaExecutaFuncaoImobiliaria() nom_logradouro varchar, numero varchar, complemento varchar, + nome_condominio varchar, nom_bairro varchar, cep varchar, cod_municipio varchar, @@ -985,8 +987,8 @@ function montaExecutaFuncaoImobiliaria() , area_construida_total varchar , area_descoberta varchar , valor_venal_predial_coberto varchar - \r\n"; - $stSql .= " ) \r\n"; + \r\n"; + $stSql .= " ) ORDER BY ".$this->stOrdemEmissaoFuncao." \r\n"; return $stSql; @@ -1609,3 +1611,4 @@ function montaExecutaFuncaoEconomica() } ?> + diff --git a/gestaoTributaria/fontes/PHP/arrecadacao/classes/mapeamento/FARRMontaCarneGrafica.class.php b/gestaoTributaria/fontes/PHP/arrecadacao/classes/mapeamento/FARRMontaCarneGrafica.class.php index 85bfae4..14531c6 100644 --- a/gestaoTributaria/fontes/PHP/arrecadacao/classes/mapeamento/FARRMontaCarneGrafica.class.php +++ b/gestaoTributaria/fontes/PHP/arrecadacao/classes/mapeamento/FARRMontaCarneGrafica.class.php @@ -33,7 +33,7 @@ * @package URBEM * @subpackage Mapeamento - * $Id: FARRMontaCarneGrafica.class.php 59612 2014-09-02 12:00:51Z gelson $ + * $Id: FARRMontaCarneGrafica.class.php 63867 2015-10-27 17:25:14Z evandro $ * Casos de uso: uc-05.03.11 */ @@ -106,7 +106,7 @@ class FARRMontaCarneGrafica extends Persistente "6" => "c_numero-6", "7" => "c_nom_bairro-30", "8" => "c_nom_municipio-35", - "9" => "c_sigla_uf-2", + "9" => "c_sigla_uf-2", "10" => "c_cep-8", "11" => "c_complemento-160", "12" => "c_caixa_postal-160", @@ -121,188 +121,188 @@ class FARRMontaCarneGrafica extends Persistente "19" => "sigla_uf-2", "20" => "cep-8", "21" => "complemento-160", + "22" => "nome_condominio-160", //DADOS DO IMOVEL - "22" => "inscricao-7", - "23" => "area_lote-17", - "24" => "area_construida-17", - "25" => "codigo_composto-100", - "26" => "nom_localizacao-80", + "23" => "inscricao-7", + "24" => "area_lote-17", + "25" => "area_construida-17", + "26" => "codigo_composto-100", + "27" => "nom_localizacao-80", //DIVIDA - "27" => "cod_grupo-7", - "28" => "nom_grupo-80", - "29" => "exercicio-4", + "28" => "cod_grupo-7", + "29" => "nom_grupo-80", + "30" => "exercicio-4", //VALORES DOS CREDITOS - "30" => "cod_credito_1-7", - "31" => "descricao_1-80", - "32" => "valor_1-17", - "33" => "cod_credito_2-7", - "34" => "descricao_2-80", - "35" => "valor_2-17", - "36" => "cod_credito_3-7", - "37" => "descricao_3-80", - "38" => "valor_3-17", - "39" => "cod_credito_4-7", - "40" => "descricao_4-80", - "41" => "valor_4-17", - "42" => "cod_credito_5-7", - "43" => "descricao_5-80", - "44" => "valor_5-17", - "45" => "cod_credito_6-7", - "46" => "descricao_6-80", - "47" => "valor_6-17", - "48" => "cod_credito_7-7", - "49" => "descricao_7-80", - "50" => "valor_7-17", - "51" => "soma_creditos-17", + "31" => "cod_credito_1-7", + "32" => "descricao_1-80", + "33" => "valor_1-17", + "34" => "cod_credito_2-7", + "35" => "descricao_2-80", + "36" => "valor_2-17", + "37" => "cod_credito_3-7", + "38" => "descricao_3-80", + "39" => "valor_3-17", + "40" => "cod_credito_4-7", + "41" => "descricao_4-80", + "42" => "valor_4-17", + "43" => "cod_credito_5-7", + "44" => "descricao_5-80", + "45" => "valor_5-17", + "46" => "cod_credito_6-7", + "47" => "descricao_6-80", + "48" => "valor_6-17", + "49" => "cod_credito_7-7", + "50" => "descricao_7-80", + "51" => "valor_7-17", + "52" => "soma_creditos-17", //PARCELAS UNICAS - "52" => "valor_unica_1-17", - "53" => "vencimento_unica_1-10", - "54" => "desconto_unica_1-17", - "55" => "nosso_numero_unica_1-17", - "56" => "codigo_barra_unica_1-60", - "57" => "linha_digitavel_unica_1-120", - "58" => "valor_unica_2-17", - "59" => "vencimento_unica_2-10", - "60" => "desconto_unica_2-17", - "61" => "nosso_numero_unica_2-17", - "62" => "codigo_barra_unica_2-60", - "63" => "linha_digitavel_unica_2-120", - "64" => "valor_unica_3-17", - "65" => "vencimento_unica_3-10", - "66" => "desconto_unica_3-17", - "67" => "nosso_numero_unica_3-17", - "68" => "codigo_barra_unica_3-60", - "69" => "linha_digitavel_unica_3-120", - "70" => "valor_unica_4-17", - "71" => "vencimento_unica_4-10", - "72" => "desconto_unica_4-17", - "73" => "nosso_numero_unica_4-17", - "74" => "codigo_barra_unica_4-60", - "75" => "linha_digitavel_unica_4-120", - "76" => "valor_unica_5-17", - "77" => "vencimento_unica_5-10", - "78" => "desconto_unica_5-17", - "79" => "nosso_numero_unica_5-17", - "80" => "codigo_barra_unica_5-60", - "81" => "linha_digitavel_unica_5-120", + "53" => "valor_unica_1-17", + "54" => "vencimento_unica_1-10", + "55" => "desconto_unica_1-17", + "56" => "nosso_numero_unica_1-17", + "57" => "codigo_barra_unica_1-60", + "58" => "linha_digitavel_unica_1-120", + "59" => "valor_unica_2-17", + "60" => "vencimento_unica_2-10", + "61" => "desconto_unica_2-17", + "62" => "nosso_numero_unica_2-17", + "63" => "codigo_barra_unica_2-60", + "64" => "linha_digitavel_unica_2-120", + "65" => "valor_unica_3-17", + "66" => "vencimento_unica_3-10", + "67" => "desconto_unica_3-17", + "68" => "nosso_numero_unica_3-17", + "69" => "codigo_barra_unica_3-60", + "70" => "linha_digitavel_unica_3-120", + "71" => "valor_unica_4-17", + "72" => "vencimento_unica_4-10", + "73" => "desconto_unica_4-17", + "74" => "nosso_numero_unica_4-17", + "75" => "codigo_barra_unica_4-60", + "76" => "linha_digitavel_unica_4-120", + "77" => "valor_unica_5-17", + "78" => "vencimento_unica_5-10", + "79" => "desconto_unica_5-17", + "80" => "nosso_numero_unica_5-17", + "81" => "codigo_barra_unica_5-60", + "82" => "linha_digitavel_unica_5-120", //PARCELAS NORMAIS - "82" => "valor_normal_1-17", - "83" => "vencimento_normal_1-10", - "84" => "nosso_numero_normal_1-17", - "85" => "codigo_barra_normal_1-60", - "86" => "linha_digitavel_normal_1-120", - - "87" => "valor_normal_2-17", - "88" => "vencimento_normal_2-10", - "89" => "nosso_numero_normal_2-17", - "90" => "codigo_barra_normal_2-60", - "91" => "linha_digitavel_normal_2-120", - - "92" => "valor_normal_3-17", - "93" => "vencimento_normal_3-10", - "94" => "nosso_numero_normal_3-17", - "95" => "codigo_barra_normal_3-60", - "96" => "linha_digitavel_normal_3-120", - - "97" => "valor_normal_4-17", - "98" => "vencimento_normal_4-10", - "99" => "nosso_numero_normal_4-17", - "100" => "codigo_barra_normal_4-60", - "101" => "linha_digitavel_normal_4-120", - - "102" => "valor_normal_5-17", - "103" => "vencimento_normal_5-10", - "104" => "nosso_numero_normal_5-120", - "105" => "codigo_barra_normal_5-60", - "106" => "linha_digitavel_normal_5-120", - - "107" => "valor_normal_6-17", - "108" => "vencimento_normal_6-10", - "109" => "nosso_numero_normal_6-17", - "110" => "codigo_barra_normal_6-60", - "111" => "linha_digitavel_normal_6-120", - - "112" => "valor_normal_7-17", - "113" => "vencimento_normal_7-10", - "114" => "nosso_numero_normal_7-17", - "115" => "codigo_barra_normal_7-60", - "116" => "linha_digitavel_normal_7-120", - - "117" => "valor_normal_8-17", - "118" => "vencimento_normal_8-10", - "119" => "nosso_numero_normal_8-17", - "120" => "codigo_barra_normal_8-60", - "121" => "linha_digitavel_normal_8-120", - - "122" => "valor_normal_9-17", - "123" => "vencimento_normal_9-10", - "124" => "nosso_numero_normal_9-17", - "125" => "codigo_barra_normal_9-60", - "126" => "linha_digitavel_normal_9-120", - - "127" => "valor_normal_10-17", - "128" => "vencimento_normal_10-10", - "129" => "nosso_numero_normal_10-17", - "130" => "codigo_barra_normal_10-60", - "131" => "linha_digitavel_normal_10-120", - - "132" => "valor_normal_11-17", - "133" => "vencimento_normal_11-10", - "134" => "nosso_numero_normal_11-17", - "135" => "codigo_barra_normal_11-60", - "136" => "linha_digitavel_normal_11-120", - - "137" => "valor_normal_12-17", - "138" => "vencimento_normal_12-10", - "139" => "nosso_numero_normal_12-17", - "140" => "codigo_barra_normal_12-60", - "141" => "linha_digitavel_normal_12-120", + "83" => "valor_normal_1-17", + "84" => "vencimento_normal_1-10", + "85" => "nosso_numero_normal_1-17", + "86" => "codigo_barra_normal_1-60", + "87" => "linha_digitavel_normal_1-120", + + "88" => "valor_normal_2-17", + "89" => "vencimento_normal_2-10", + "90" => "nosso_numero_normal_2-17", + "91" => "codigo_barra_normal_2-60", + "92" => "linha_digitavel_normal_2-120", + + "93" => "valor_normal_3-17", + "94" => "vencimento_normal_3-10", + "95" => "nosso_numero_normal_3-17", + "96" => "codigo_barra_normal_3-60", + "97" => "linha_digitavel_normal_3-120", + + "98" => "valor_normal_4-17", + "99" => "vencimento_normal_4-10", + "100" => "nosso_numero_normal_4-17", + "101" => "codigo_barra_normal_4-60", + "102" => "linha_digitavel_normal_4-120", + + "103" => "valor_normal_5-17", + "104" => "vencimento_normal_5-10", + "105" => "nosso_numero_normal_5-120", + "106" => "codigo_barra_normal_5-60", + "107" => "linha_digitavel_normal_5-120", + + "108" => "valor_normal_6-17", + "109" => "vencimento_normal_6-10", + "110" => "nosso_numero_normal_6-17", + "111" => "codigo_barra_normal_6-60", + "112" => "linha_digitavel_normal_6-120", + + "113" => "valor_normal_7-17", + "114" => "vencimento_normal_7-10", + "115" => "nosso_numero_normal_7-17", + "116" => "codigo_barra_normal_7-60", + "117" => "linha_digitavel_normal_7-120", + + "118" => "valor_normal_8-17", + "119" => "vencimento_normal_8-10", + "120" => "nosso_numero_normal_8-17", + "121" => "codigo_barra_normal_8-60", + "122" => "linha_digitavel_normal_8-120", + + "123" => "valor_normal_9-17", + "124" => "vencimento_normal_9-10", + "125" => "nosso_numero_normal_9-17", + "126" => "codigo_barra_normal_9-60", + "127" => "linha_digitavel_normal_9-120", + + "128" => "valor_normal_10-17", + "129" => "vencimento_normal_10-10", + "130" => "nosso_numero_normal_10-17", + "131" => "codigo_barra_normal_10-60", + "132" => "linha_digitavel_normal_10-120", + + "133" => "valor_normal_11-17", + "134" => "vencimento_normal_11-10", + "135" => "nosso_numero_normal_11-17", + "136" => "codigo_barra_normal_11-60", + "137" => "linha_digitavel_normal_11-120", + + "138" => "valor_normal_12-17", + "139" => "vencimento_normal_12-10", + "140" => "nosso_numero_normal_12-17", + "141" => "codigo_barra_normal_12-60", + "142" => "linha_digitavel_normal_12-120", # VALORES VENAIS - "142" => "valor_venal_territorial-17", - "143" => "valor_venal_predial-17", - "144" => "valor_venal_total-17", + "143" => "valor_venal_territorial-17", + "144" => "valor_venal_predial-17", + "145" => "valor_venal_total-17", # VALORES VUP - "145" => "valor_m2_territorial-17", - "146" => "valor_m2_predial-17", + "146" => "valor_m2_territorial-17", + "147" => "valor_m2_predial-17", # NOME LOCALIZACAO PRIMEIRO NIVEL - "147" => "localizacao_primeiro_nivel-80", + "148" => "localizacao_primeiro_nivel-80", # VALOR IMPOSTO - "148" => "valor_imposto-17", - - "149" => "area_limpeza-17", - "150" => "aliquota_limpeza-8", - "151" => "aliquota_imposto-8", + "149" => "valor_imposto-17", + "150" => "area_limpeza-17", + "151" => "aliquota_limpeza-8", + "152" => "aliquota_imposto-8", # ATRIBUTOS DINAMICOS (MAXIMO 15) - "152" => "atributo_1-50", - "153" => "atributo_2-50", - "154" => "atributo_3-50", - "155" => "atributo_4-50", - "156" => "atributo_5-50", - "157" => "atributo_6-50", - "158" => "atributo_7-50", - "159" => "atributo_8-50", - "160" => "atributo_9-50", - "161" => "atributo_10-50", - "162" => "atributo_11-50", - "163" => "atributo_12-50", - "164" => "atributo_13-50", - "165" => "atributo_14-50", - "166" => "atributo_15-50", - "167" => "valor_m2_predial_descoberto-17", - "168" => "valor_venal_predial_descoberto-17", - "169" => "area_construida_total-17", - "170" => "area_descoberta-17", - "171" => "valor_venal_predial_coberto-17" + "153" => "atributo_1-50", + "154" => "atributo_2-50", + "155" => "atributo_3-50", + "156" => "atributo_4-50", + "157" => "atributo_5-50", + "158" => "atributo_6-50", + "159" => "atributo_7-50", + "160" => "atributo_8-50", + "161" => "atributo_9-50", + "162" => "atributo_10-50", + "163" => "atributo_11-50", + "164" => "atributo_12-50", + "165" => "atributo_13-50", + "166" => "atributo_14-50", + "167" => "atributo_15-50", + "168" => "valor_m2_predial_descoberto-17", + "169" => "valor_venal_predial_descoberto-17", + "170" => "area_construida_total-17", + "171" => "area_descoberta-17", + "172" => "valor_venal_predial_coberto-17" ); } else { # LAYOUT PARA CARNE DA INSCR. ECONÔMICA @@ -583,7 +583,7 @@ class FARRMontaCarneGrafica extends Persistente if ($this->stTipoEmissao == "IE") { $arRetorno[] = "numcgm§nom_cgm§c_nom_tipo_logradouro§c_cod_logradouro§c_nom_logradouro§c_numero§c_nom_bairro§c_nom_municipio§c_sigla_uf§c_cep§c_complemento§c_caixa_postal§inscricao_economica§data_abertura§numcgm_responsavel§nome_responsavel§cod_natureza§natureza_juridica§cod_categoria§categoria§cod_atividade_principal§descricao_atividade_principal§data_inicio§cnpj§nome_fantasia§inscricao_imobiliaria§numcgm_socio_1§nome_socio_1§quota_socio_1§numcgm_socio_2§nome_socio_2§quota_socio_2§numcgm_socio_3§nome_socio_3§quota_socio_3§numcgm_4§nome_socio_4§quota_socio_4§numcgm_5§nome_socio_5§quota_socio_5§cod_grupo§nom_grupo§Exercício§cod_credito_1§descricao_1§valor_1§cod_credito_2§descricao_2§valor_2§cod_credito_3§descricao_3§valor_3§cod_credito_4§descricao_4§valor_4§cod_credito_5§descricao_5§valor_5§cod_credito_6§descricao_6§valor_6§cod_credito_7§descricao_7§valor_7§soma_creditos§valor_unica_1§vencimento_unica_1§desconto_unica_1§nosso_numero_unica_1§codigo_barra_unica_1§linha_digitavel_unica_1§valor_unica_2§vencimento_unica_2§desconto_unica_2§nosso_numero_unica_2§codigo_barra_unica_2§linha_digitavel_unica_2§valor_unica_3§vencimento_unica_3§desconto_unica_3§nosso_numero_unica_3§codigo_barra_unica_3§linha_digitavel_unica_3§valor_unica_4§vencimento_unica_4§desconto_unica_4§nosso_numero_unica_4§codigo_barra_unica_4§linha_digitavel_unica_4§valor_unica_5§vencimento_unica_5§desconto_unica_5§nosso_numero_unica_5§codigo_barra_unica_5§linha_digitavel_unica_5§valor_normal_1§vencimento_normal_1§nosso_numero_normal_1§codigo_barra_normal_1§linha_digitavel_normal_1§valor_normal_2§vencimento_normal_2§nosso_numero_normal_2§codigo_barra_normal_2§linha_digitavel_normal_2§valor_normal_3§vencimento_normal_3§nosso_numero_normal_3§codigo_barra_normal_3§linha_digitavel_normal_3§valor_normal_4§vencimento_normal_4§nosso_numero_normal_4§codigo_barra_normal_4§linha_digitavel_normal_4§valor_normal_5§vencimento_normal_5§nosso_numero_normal_5§codigo_barra_normal_5§linha_digitavel_normal_5§valor_normal_6§vencimento_normal_6§nosso_numero_normal_6§codigo_barra_normal_6§linha_digitavel_normal_6§valor_normal_7§vencimento_normal_7§nosso_numero_normal_7§codigo_barra_normal_7§linha_digitavel_normal_7§valor_normal_8§vencimento_normal_8§nosso_numero_normal_8§codigo_barra_normal_8§linha_digitavel_normal_8§valor_normal_9§vencimento_normal_9§nosso_numero_normal_9§codigo_barra_normal_9§linha_digitavel_normal_9§valor_normal_10§vencimento_normal_10§nosso_numero_normal_10§codigo_barra_normal_10§linha_digitavel_normal_10§valor_normal_11§vencimento_normal_11§nosso_numero_normal_11§codigo_barra_normal_11§linha_digitavel_normal_11§valor_normal_12§vencimento_normal_12§nosso_numero_normal_12§codigo_barra_normal_12§linha_digitavel_normal_12§quadra§lote§distrito§regiao§atributo_1§atributo_2§atributo_3§atributo_4§atributo_5§atributo_6§atributo_7§atributo_8§atributo_9§atributo_10§atributo_11§atributo_12§atributo_13§atributo_14§atributo_15"; } elseif ($this->stTipoEmissao == "II") { - $arRetorno[] = "numcgm§nom_cgm§c_nom_tipo_logradouro§c_cod_logradouro§c_nom_logradouro§c_numero§c_nom_bairro§c_nom_municipio§c_sigla_uf§c_cep§c_complemento§c_caixa_postal§nom_tipo_logradouro§cod_logradouro§nom_logradouro§numero§bairro§nom_municipio§sigla_uf§cep§complemento§inscricao_municipal§area_lote§area_construida§codigo_composto§nom_localizacao§cod_grupo§nom_grupo§Exercício§cod_credito_1§descricao_1§valor_1§cod_credito_2§descricao_2§valor_2§cod_credito_3§descricao_3§valor_3§cod_credito_4§descricao_4§valor_4§cod_credito_5§descricao_5§valor_5§cod_credito_6§descricao_6§valor_6§cod_credito_7§descricao_7§valor_7§soma_creditos§valor_unica_1§vencimento_unica_1§desconto_unica_1§nosso_numero_unica_1§codigo_barra_unica_1§linha_digitavel_unica_1§valor_unica_2§vencimento_unica_2§desconto_unica_2§nosso_numero_unica_2§codigo_barra_unica_2§linha_digitavel_unica_2§valor_unica_3§vencimento_unica_3§desconto_unica_3§nosso_numero_unica_3§codigo_barra_unica_3§linha_digitavel_unica_3§valor_unica_4§vencimento_unica_4§desconto_unica_4§nosso_numero_unica_4§codigo_barra_unica_4§linha_digitavel_unica_4§valor_unica_5§vencimento_unica_5§desconto_unica_5§nosso_numero_unica_5§codigo_barra_unica_5§linha_digitavel_unica_5§valor_normal_1§vencimento_normal_1§nosso_numero_normal_1§codigo_barra_normal_1§linha_digitavel_normal_1§valor_normal_2§vencimento_normal_2§nosso_numero_normal_2§codigo_barra_normal_2§linha_digitavel_normal_2§valor_normal_3§vencimento_normal_3§nosso_numero_normal_3§codigo_barra_normal_3§linha_digitavel_normal_3§valor_normal_4§vencimento_normal_4§nosso_numero_normal_4§codigo_barra_normal_4§linha_digitavel_normal_4§valor_normal_5§vencimento_normal_5§nosso_numero_normal_5§codigo_barra_normal_5§linha_digitavel_normal_5§valor_normal_6§vencimento_normal_6§nosso_numero_normal_6§codigo_barra_normal_6§linha_digitavel_normal_6§valor_normal_7§vencimento_normal_7§nosso_numero_normal_7§codigo_barra_normal_7§linha_digitavel_normal_7§valor_normal_8§vencimento_normal_8§nosso_numero_normal_8§codigo_barra_normal_8§linha_digitavel_normal_8§valor_normal_9§vencimento_normal_9§nosso_numero_normal_9§codigo_barra_normal_9§linha_digitavel_normal_9§valor_normal_10§vencimento_normal_10§nosso_numero_normal_10§codigo_barra_normal_10§linha_digitavel_normal_10§valor_normal_11§vencimento_normal_11§nosso_numero_normal_11§codigo_barra_normal_11§linha_digitavel_normal_11§valor_normal_12§vencimento_normal_12§nosso_numero_normal_12§codigo_barra_normal_12§linha_digitavel_normal_12§valor_venal_territorial§valor_venal_predial§valor_venal_total§valor_m2_territorial§valor_m2_predial§localizacao_primeiro_nivel§valor_imposto§area_limpeza§aliquota_limpeza§aliquota_imposto§atributo_1§atributo_2§atributo_3§atributo_4§atributo_5§atributo_6§atributo_7§atributo_8§atributo_9§atributo_10§atributo_11§atributo_12§atributo_13§atributo_14§atributo_15§valor_m2_predial_descoberto§valor_venal_predial_descoberto§area_construida_total§area_descoberta§valor_venal_predial_coberto"; + $arRetorno[] = "numcgm§nom_cgm§c_nom_tipo_logradouro§c_cod_logradouro§c_nom_logradouro§c_numero§c_nom_bairro§c_nom_municipio§c_sigla_uf§c_cep§c_complemento§c_caixa_postal§nom_tipo_logradouro§cod_logradouro§nom_logradouro§numero§bairro§nom_municipio§sigla_uf§cep§complemento§nome_condominio§inscricao_municipal§area_lote§area_construida§codigo_composto§nom_localizacao§cod_grupo§nom_grupo§Exercício§cod_credito_1§descricao_1§valor_1§cod_credito_2§descricao_2§valor_2§cod_credito_3§descricao_3§valor_3§cod_credito_4§descricao_4§valor_4§cod_credito_5§descricao_5§valor_5§cod_credito_6§descricao_6§valor_6§cod_credito_7§descricao_7§valor_7§soma_creditos§valor_unica_1§vencimento_unica_1§desconto_unica_1§nosso_numero_unica_1§codigo_barra_unica_1§linha_digitavel_unica_1§valor_unica_2§vencimento_unica_2§desconto_unica_2§nosso_numero_unica_2§codigo_barra_unica_2§linha_digitavel_unica_2§valor_unica_3§vencimento_unica_3§desconto_unica_3§nosso_numero_unica_3§codigo_barra_unica_3§linha_digitavel_unica_3§valor_unica_4§vencimento_unica_4§desconto_unica_4§nosso_numero_unica_4§codigo_barra_unica_4§linha_digitavel_unica_4§valor_unica_5§vencimento_unica_5§desconto_unica_5§nosso_numero_unica_5§codigo_barra_unica_5§linha_digitavel_unica_5§valor_normal_1§vencimento_normal_1§nosso_numero_normal_1§codigo_barra_normal_1§linha_digitavel_normal_1§valor_normal_2§vencimento_normal_2§nosso_numero_normal_2§codigo_barra_normal_2§linha_digitavel_normal_2§valor_normal_3§vencimento_normal_3§nosso_numero_normal_3§codigo_barra_normal_3§linha_digitavel_normal_3§valor_normal_4§vencimento_normal_4§nosso_numero_normal_4§codigo_barra_normal_4§linha_digitavel_normal_4§valor_normal_5§vencimento_normal_5§nosso_numero_normal_5§codigo_barra_normal_5§linha_digitavel_normal_5§valor_normal_6§vencimento_normal_6§nosso_numero_normal_6§codigo_barra_normal_6§linha_digitavel_normal_6§valor_normal_7§vencimento_normal_7§nosso_numero_normal_7§codigo_barra_normal_7§linha_digitavel_normal_7§valor_normal_8§vencimento_normal_8§nosso_numero_normal_8§codigo_barra_normal_8§linha_digitavel_normal_8§valor_normal_9§vencimento_normal_9§nosso_numero_normal_9§codigo_barra_normal_9§linha_digitavel_normal_9§valor_normal_10§vencimento_normal_10§nosso_numero_normal_10§codigo_barra_normal_10§linha_digitavel_normal_10§valor_normal_11§vencimento_normal_11§nosso_numero_normal_11§codigo_barra_normal_11§linha_digitavel_normal_11§valor_normal_12§vencimento_normal_12§nosso_numero_normal_12§codigo_barra_normal_12§linha_digitavel_normal_12§valor_venal_territorial§valor_venal_predial§valor_venal_total§valor_m2_territorial§valor_m2_predial§localizacao_primeiro_nivel§valor_imposto§area_limpeza§aliquota_limpeza§aliquota_imposto§atributo_1§atributo_2§atributo_3§atributo_4§atributo_5§atributo_6§atributo_7§atributo_8§atributo_9§atributo_10§atributo_11§atributo_12§atributo_13§atributo_14§atributo_15§valor_m2_predial_descoberto§valor_venal_predial_descoberto§area_construida_total§area_descoberta§valor_venal_predial_coberto"; } # Percorre o RecordSet para preencher o arquivo com a consulta da PL. diff --git a/gestaoTributaria/fontes/PHP/arrecadacao/classes/mapeamento/TARRCadastroEconomicoCalculo.class.php b/gestaoTributaria/fontes/PHP/arrecadacao/classes/mapeamento/TARRCadastroEconomicoCalculo.class.php index e288eab..8b00f06 100755 --- a/gestaoTributaria/fontes/PHP/arrecadacao/classes/mapeamento/TARRCadastroEconomicoCalculo.class.php +++ b/gestaoTributaria/fontes/PHP/arrecadacao/classes/mapeamento/TARRCadastroEconomicoCalculo.class.php @@ -32,7 +32,7 @@ * @package URBEM * @subpackage Mapeamento - * $Id: TARRCadastroEconomicoCalculo.class.php 59612 2014-09-02 12:00:51Z gelson $ + * $Id: TARRCadastroEconomicoCalculo.class.php 63839 2015-10-22 18:08:07Z franver $ * Casos de uso: uc-05.03.05 */ @@ -119,7 +119,6 @@ function recuperaConsultaReqReceita(&$rsRecordSet, $stFiltro = "", $stOrdem = "" $stOrdem = ""; $stSql = $this->montaRecuperaConsultaReqReceita($stDataCorrente).$stFiltro.$stOrdem; $this->stDebug = $stSql; -//sistemaLegado::mostravar( $stSql );exit; $obErro = $obConexao->executaSQL( $rsRecordSet, $stSql, $boTransacao ); return $obErro; diff --git a/gestaoTributaria/fontes/PHP/arrecadacao/classes/mapeamento/TARRCarne.class.php b/gestaoTributaria/fontes/PHP/arrecadacao/classes/mapeamento/TARRCarne.class.php index 2369095..aa0d965 100755 --- a/gestaoTributaria/fontes/PHP/arrecadacao/classes/mapeamento/TARRCarne.class.php +++ b/gestaoTributaria/fontes/PHP/arrecadacao/classes/mapeamento/TARRCarne.class.php @@ -29,7 +29,7 @@ * @package URBEM * @subpackage Mapeamento - $Id: TARRCarne.class.php 63415 2015-08-25 21:17:03Z arthur $ + $Id: TARRCarne.class.php 63839 2015-10-22 18:08:07Z franver $ * Casos de uso: uc-05.03.11 */ @@ -6730,7 +6730,6 @@ function recuperaDadosISSEstimativaMata(&$rsRecordSet, $stFiltro = "", $inCodPar $rsRecordSet = new RecordSet; $stSql = $this->montaRecuperaDadosISSEstimativaMata( $stFiltro, $inCodParcela ); $this->stDebug = $stSql; -//sistemaLegado::mostravar($stSql);exit; $obErro = $obConexao->executaSQL( $rsRecordSet, $stSql, "", $boTransacao ); return $obErro; diff --git a/gestaoTributaria/fontes/PHP/arrecadacao/classes/negocio/RARRCalculo.class.php b/gestaoTributaria/fontes/PHP/arrecadacao/classes/negocio/RARRCalculo.class.php index abb4a78..ba03045 100755 --- a/gestaoTributaria/fontes/PHP/arrecadacao/classes/negocio/RARRCalculo.class.php +++ b/gestaoTributaria/fontes/PHP/arrecadacao/classes/negocio/RARRCalculo.class.php @@ -32,7 +32,7 @@ * @package URBEM * @subpackage Regra - * $Id: RARRCalculo.class.php 61457 2015-01-19 13:55:53Z carolina $ + * $Id: RARRCalculo.class.php 63839 2015-10-22 18:08:07Z franver $ * Casos de uso: uc-05.03.05 */ @@ -453,22 +453,15 @@ class RARRCalculo $obErro->setDescricao("Não foi possível criar arquivo necessário para realizar cálculo."); } else { - #echo '
    ABRE TRANSACAO'; $this->obCalculoTributario->setDado('inRegistro', $rsImoveis->getCampo('inscricao_municipal')); $this->obCalculoTributario->setDado('inExercicio', $this->getExercicio()); $this->obCalculoTributario->setDado('stGrupo', $this->obRARRGrupo->getCodGrupo()); $this->obCalculoTributario->setDado('stCredito', $this->getChaveCredito()); $this->obCalculoTributario->setDado('stModulo', 12); - #echo '
    executa'; $obErro = $this->obCalculoTributario->calculoTributario( $rsCalculo, $boTransacao); - #echo 'CALCULOS:'.$rsCalculo->getCampo('retorno').' '; -// sistemaLegado::mostravar ($rsCalculo); - #echo '
    CalcTributario'; - #echo " Memoria:".round((memory_get_usage()/1024)/1024)." MB"; // verifica erro na execução da consulta sql if ( $obErro->ocorreu() ) { - #echo '

    BREAK

    '; break; } else { @@ -873,12 +866,9 @@ class RARRCalculo } $boErroCalculo = true; } else { - #echo '
    CALCULO OK'; // listar calculos $this->buscarCalculos($rsCalculos, $boTransacao); - #sistemaLegado::mostravar ( $rsCalculos ); if ( $rsCalculos->getNumLinhas() < 1 ) { - #echo '

    ERRO!!!

    '; if ( Sessao::read( 'TipoCalculo' ) == "individual" ) { $this->buscarCalculosMensagem($rsCalculosMensagens, $boTransacao); diff --git a/gestaoTributaria/fontes/PHP/arrecadacao/classes/negocio/RARRRelatorioValoresLancados.class.php b/gestaoTributaria/fontes/PHP/arrecadacao/classes/negocio/RARRRelatorioValoresLancados.class.php index 241fd0e..45956f4 100644 --- a/gestaoTributaria/fontes/PHP/arrecadacao/classes/negocio/RARRRelatorioValoresLancados.class.php +++ b/gestaoTributaria/fontes/PHP/arrecadacao/classes/negocio/RARRRelatorioValoresLancados.class.php @@ -33,7 +33,7 @@ * @package URBEM * @subpackage Regra - * $Id: RARRRelatorioValoresLancados.class.php 59612 2014-09-02 12:00:51Z gelson $ + * $Id: RARRRelatorioValoresLancados.class.php 63839 2015-10-22 18:08:07Z franver $ * Casos de uso: uc-05.03.13 */ @@ -492,9 +492,7 @@ function geraRecordSetRelatorio(&$rsRecordSet, &$rsRecordSetSomas, &$arCabecalho if ( $this->getCodCreditoInicio() || $this->getCodCreditoTermino() ) { - #echo 'CREDITO: '.$this->getCodCreditoInicio(); $arDadosIniciais = explode( ".", $this->getCodCreditoInicio() ); - #sistemaLegado::mostravar( $arDadosIniciais ); $arDadosFinais = explode(".", $this->getCodCreditoTermino() ); $arTipos = array("cod_credito", "cod_especie", "cod_genero", "cod_natureza"); for ($inX=0; $inX<4; $inX++) { @@ -558,13 +556,11 @@ function geraRecordSetRelatorio(&$rsRecordSet, &$rsRecordSetSomas, &$arCabecalho } $stFiltro .= ", '".$this->getCodEstAtivInicial()."', '".$this->getCodEstAtivFinal()."' "; - #echo 'FILTRO:
    '.$stFiltro; if ( $this->getTipoRelatorio() == 'sintetico' ) { $obErro = $this->obFARRRelatorioValoresLancados->recuperaRelatorioSintetico ( $rsRecordSet, $stFiltro, $stOrdem, $boTransacao ); - #sistemaLegado::mostravar ( $rsRecordSet ); $arListaSintetico = array(); $arListaSomas = array(); @@ -633,8 +629,6 @@ function geraRecordSetRelatorio(&$rsRecordSet, &$rsRecordSetSomas, &$arCabecalho $rsRecordSet->setPrimeiroElemento(); $rsRecordSetSomas->setPrimeiroElemento(); - #sistemaLegado::mostravar( $rsRecordSet ); - #sistemaLegado::mostravar( $rsRecordSetSomas ); } else { $obErro = $this->obFARRRelatorioValoresLancados->recuperaRelatorioAnalitico ( $rsRecordSet, $stFiltro, $stOrdem, $boTransacao ); } @@ -683,9 +677,7 @@ function geraRecordSetPeriodico(&$rsRecordSet, &$rsRecordSetSomas, &$arCabecalho if ( $this->getCodCreditoInicio() || $this->getCodCreditoTermino() ) { - #echo 'CREDITO: '.$this->getCodCreditoInicio(); $arDadosIniciais = explode( ".", $this->getCodCreditoInicio() ); - #sistemaLegado::mostravar( $arDadosIniciais ); $arDadosFinais = explode(".", $this->getCodCreditoTermino() ); $arTipos = array("cod_credito", "cod_especie", "cod_genero", "cod_natureza"); for ($inX=0; $inX<4; $inX++) { diff --git a/gestaoTributaria/fontes/PHP/arrecadacao/instancias/baixaDebitos/FMManterBaixaManual.php b/gestaoTributaria/fontes/PHP/arrecadacao/instancias/baixaDebitos/FMManterBaixaManual.php index 7b9be1e..aaaadad 100644 --- a/gestaoTributaria/fontes/PHP/arrecadacao/instancias/baixaDebitos/FMManterBaixaManual.php +++ b/gestaoTributaria/fontes/PHP/arrecadacao/instancias/baixaDebitos/FMManterBaixaManual.php @@ -32,7 +32,7 @@ * @ignore - * $Id: FMManterBaixaManual.php 59612 2014-09-02 12:00:51Z gelson $ + * $Id: FMManterBaixaManual.php 63839 2015-10-22 18:08:07Z franver $ * Casos de uso: uc-05.03.11 */ @@ -69,7 +69,6 @@ include_once ( CAM_GT_ARR_NEGOCIO."RARRTipoPagamento.class.php" ); include_once ( CAM_GT_ARR_NEGOCIO."RARRConfiguracao.class.php" ); include_once ( CAM_GT_MON_NEGOCIO."RMONAgencia.class.php" ); -#SistemaLegado::mostravar( $_REQUEST ); //Define o nome dos arquivos PHP $stPrograma = "ManterBaixaManual"; $pgFilt = "FL".$stPrograma.".php"; diff --git a/gestaoTributaria/fontes/PHP/arrecadacao/instancias/baixaDebitos/FMResumoBaixaAutomatica.php b/gestaoTributaria/fontes/PHP/arrecadacao/instancias/baixaDebitos/FMResumoBaixaAutomatica.php index 8e48e0f..70a0bda 100755 --- a/gestaoTributaria/fontes/PHP/arrecadacao/instancias/baixaDebitos/FMResumoBaixaAutomatica.php +++ b/gestaoTributaria/fontes/PHP/arrecadacao/instancias/baixaDebitos/FMResumoBaixaAutomatica.php @@ -29,7 +29,7 @@ * @ignore - * $Id: FMResumoBaixaAutomatica.php 59612 2014-09-02 12:00:51Z gelson $ + * $Id: FMResumoBaixaAutomatica.php 63839 2015-10-22 18:08:07Z franver $ * Casos de uso: uc-05.03.19 */ @@ -205,7 +205,6 @@ for ( $inX=0; $inXListaParcelasVencerDividaAtiva( $rsListaVencerDA, $stFiltro ); -//sistemaLegado::mostravar( $rsListaPagas ); -//sistemaLegado::mostravar( $rsListaVencer ); $arTMP = $rsListaVencer->getElementos(); $arTMP2 = $rsListaVencerDA->getElementos(); for ( $inX=0; $inXtransf2); //Define o nome dos arquivos PHP $stPrograma = "ManterBaixaManual"; $pgFilt = "FL".$stPrograma.".php"; diff --git a/gestaoTributaria/fontes/PHP/arrecadacao/instancias/baixaDebitos/OCEstornarBaixaManual.php b/gestaoTributaria/fontes/PHP/arrecadacao/instancias/baixaDebitos/OCEstornarBaixaManual.php index a64e2e0..9edf1d3 100644 --- a/gestaoTributaria/fontes/PHP/arrecadacao/instancias/baixaDebitos/OCEstornarBaixaManual.php +++ b/gestaoTributaria/fontes/PHP/arrecadacao/instancias/baixaDebitos/OCEstornarBaixaManual.php @@ -32,7 +32,7 @@ * @ignore - * $Id: OCEstornarBaixaManual.php 59612 2014-09-02 12:00:51Z gelson $ + * $Id: OCEstornarBaixaManual.php 63839 2015-10-22 18:08:07Z franver $ * Casos de uso: uc-05.03.10 */ @@ -130,7 +130,6 @@ switch ($_REQUEST["stCtrl"]) { $js = "d.getElementById('stInscricaoEconomica').innerHTML= ' ';\n"; } -//sistemaLegado::mostravar( $js ); SistemaLegado::executaFrameOculto($js); break; @@ -142,7 +141,7 @@ switch ($_REQUEST["stCtrl"]) { if ($_REQUEST['inNumbanco']) { $obRMONAgencia->obRMONBanco->setNumBanco( $_REQUEST["inNumbanco"] ); $obRMONAgencia->listarAgencia( $rsAgencia ); - //sistemaLegado::mostravar($rsAgencia); + $inContador = 1; while ( !$rsAgencia->eof() ) { $inNumAgencia = $rsAgencia->getCampo( "num_agencia" ); diff --git a/gestaoTributaria/fontes/PHP/arrecadacao/instancias/baixaDebitos/OCGeraRelatorioResumoLote.php b/gestaoTributaria/fontes/PHP/arrecadacao/instancias/baixaDebitos/OCGeraRelatorioResumoLote.php index d3daf81..dde069a 100644 --- a/gestaoTributaria/fontes/PHP/arrecadacao/instancias/baixaDebitos/OCGeraRelatorioResumoLote.php +++ b/gestaoTributaria/fontes/PHP/arrecadacao/instancias/baixaDebitos/OCGeraRelatorioResumoLote.php @@ -32,7 +32,7 @@ * @ignore - * $Id: OCGeraRelatorioResumoLote.php 59612 2014-09-02 12:00:51Z gelson $ + * $Id: OCGeraRelatorioResumoLote.php 63839 2015-10-22 18:08:07Z franver $ * Casos de uso: uc-05.01.03 */ @@ -117,8 +117,6 @@ $arDados[0]["tipo"] = $stTipo; $rsResumoLote->preenche( $arDados ); $rsResumoLote->setPrimeiroElemento(); -#sistemaLegado::mostravar( $rsResumoLote ); - //titulo $arTitulo1 = array("tit" => "DADOS DO LOTE"); $rsTit1 = new Recordset; @@ -149,16 +147,13 @@ $obPDF->addCampo ( "registros" , 8 ); $obPDF->addCampo ( "[num_banco] - [nom_banco]" , 8 ); $obPDF->addCampo ( "[num_agencia] - [nom_agencia]" , 8 ); -#echo '
    '.$stTipo.''; exit; - if ($stTipo == "Pagamento") { $obRARRPagamento->listaResumoLoteOrigem ( $rsListaOrigem ); -// sistemaLegado::mostravar ( $rsListaOrigem );exit; $flSomaValorNormal = $flSomaValorJuros = $flSomaValorMulta = $flSomaValorDiff = 0.00; $flSomaValorTotal = $flSomaValorInconsistentes = 0.00; -//sistemaLegado::mostravar( $rsListaOrigem );exit; + while ( !$rsListaOrigem->eof() ) { if ( $rsListaOrigem->getCampo('tipo') == 'grupo' ) { @@ -194,10 +189,6 @@ if ($stTipo == "Pagamento") { $obRARRPagamento->listaResumoLote( $rsListaCreditos, NULL, $boDivida ); -// if ( $rsListaOrigem->getCampo("origem") == "003.001.01.1" ) { - // sistemaLegado::mostravar( $rsListaCreditos ); - // exit; - // } #SOMATORIO DAS PARCELAS NORMAIS $arSomatorios = null; $flOrigemValorNormalOK = $flOrigemValorJurosOK = $flOrigemValorMultaOK = $flOrigemValorDiffOK = $flOrigemValorTotalOK = 0.00; diff --git a/gestaoTributaria/fontes/PHP/arrecadacao/instancias/baixaDebitos/OCManterBaixaManual.php b/gestaoTributaria/fontes/PHP/arrecadacao/instancias/baixaDebitos/OCManterBaixaManual.php index 56d2af8..d2ef25b 100755 --- a/gestaoTributaria/fontes/PHP/arrecadacao/instancias/baixaDebitos/OCManterBaixaManual.php +++ b/gestaoTributaria/fontes/PHP/arrecadacao/instancias/baixaDebitos/OCManterBaixaManual.php @@ -32,7 +32,7 @@ * @ignore - * $Id: OCManterBaixaManual.php 59612 2014-09-02 12:00:51Z gelson $ + * $Id: OCManterBaixaManual.php 63839 2015-10-22 18:08:07Z franver $ * Casos de uso: uc-05.01.18 */ @@ -81,8 +81,6 @@ include_once ( CAM_GT_ARR_NEGOCIO."RARRCarne.class.php" ); include_once ( CAM_GT_DAT_COMPONENTES."IPopUpDivida.class.php" ); include_once ( CAM_GT_DAT_COMPONENTES."IPopUpCobranca.class.php" ); -#sistemaLegado::mostravar( $_REQUEST ); - function montaListaRegistroPagamento($rsLista) { if ( $rsLista->getNumLinhas() > 0 ) { @@ -518,7 +516,7 @@ switch ($_REQUEST["stCtrl"]) { if ($_REQUEST['inNumbanco']) { $obRMONAgencia->obRMONBanco->setNumBanco( $_REQUEST["inNumbanco"] ); $obRMONAgencia->listarAgencia( $rsAgencia ); - //sistemaLegado::mostravar($rsAgencia); + $inContador = 1; while ( !$rsAgencia->eof() ) { $inNumAgencia = $rsAgencia->getCampo( "num_agencia" ); diff --git a/gestaoTributaria/fontes/PHP/arrecadacao/instancias/baixaDebitos/OCManterCancelamento.php b/gestaoTributaria/fontes/PHP/arrecadacao/instancias/baixaDebitos/OCManterCancelamento.php index 7e6801c..55d5bf9 100644 --- a/gestaoTributaria/fontes/PHP/arrecadacao/instancias/baixaDebitos/OCManterCancelamento.php +++ b/gestaoTributaria/fontes/PHP/arrecadacao/instancias/baixaDebitos/OCManterCancelamento.php @@ -32,7 +32,7 @@ * @ignore - * $Id: OCManterCancelamento.php 59612 2014-09-02 12:00:51Z gelson $ + * $Id: OCManterCancelamento.php 63839 2015-10-22 18:08:07Z franver $ * Casos de uso: uc-05.03.10 */ @@ -48,8 +48,6 @@ include_once '../../../../../../gestaoAdministrativa/fontes/PHP/pacotes/Framewor include_once '../../../../../../gestaoAdministrativa/fontes/PHP/framework/include/valida.inc.php'; include_once ( CAM_GT_ARR_MAPEAMENTO."TARRPermissaoCancelamento.class.php" ); -//sistemaLegado::mostravar( $_REQUEST ); - function montaListaCGM($rsLista) { if ( $rsLista->getNumLinhas() > 0 ) { diff --git a/gestaoTributaria/fontes/PHP/arrecadacao/instancias/baixaDebitos/OCManterCompensacao.php b/gestaoTributaria/fontes/PHP/arrecadacao/instancias/baixaDebitos/OCManterCompensacao.php index c73300d..b612887 100644 --- a/gestaoTributaria/fontes/PHP/arrecadacao/instancias/baixaDebitos/OCManterCompensacao.php +++ b/gestaoTributaria/fontes/PHP/arrecadacao/instancias/baixaDebitos/OCManterCompensacao.php @@ -30,7 +30,7 @@ * @author Analista: Fábio Bertoldi * @author Programador: Fernando Piccini Cercato - * $Id: OCManterCompensacao.php 59612 2014-09-02 12:00:51Z gelson $ + * $Id: OCManterCompensacao.php 63839 2015-10-22 18:08:07Z franver $ Caso de uso: uc-05.03.10 **/ @@ -44,8 +44,6 @@ include_once '../../../../../../gestaoAdministrativa/fontes/PHP/framework/includ $stCtrl = $_REQUEST['stCtrl']; -//sistemaLegado::mostravar ( $_REQUEST );exit; - switch ($_REQUEST['stCtrl']) { case "SomaParcelasPagas": $flTotalPago = 0.00; diff --git a/gestaoTributaria/fontes/PHP/arrecadacao/instancias/calculo/FMEmitirNotaAvulsa.php b/gestaoTributaria/fontes/PHP/arrecadacao/instancias/calculo/FMEmitirNotaAvulsa.php index d3e2c7e..6ac989e 100644 --- a/gestaoTributaria/fontes/PHP/arrecadacao/instancias/calculo/FMEmitirNotaAvulsa.php +++ b/gestaoTributaria/fontes/PHP/arrecadacao/instancias/calculo/FMEmitirNotaAvulsa.php @@ -107,11 +107,9 @@ $arTempDados[0]["nom_usuario"] = Sessao::read( "numCgm" )." - ".Sessao::read( "n //$arTempDados[0]["iss"] = number_format( $flValorISS, 2, ',', '.' ); $arTempDados[0]["iss"] = number_format( $rsINSS->getCampo('valor'), 2, ',', '.' ); $arTempDados[0]["total_nf"] = number_format( $flTotalNF, 2, ',', '.' ); -//sistemaLegado::mostravar( $arTempDados );exit; /* $obRCEMInscricaoEconomica = new RCEMInscricaoEconomica; -sistemaLegado::mostravar($obRCEMInscricaoEconomica); die; $arChaveAtributoInscricao = array( "inscricao_economica" => $_REQUEST["inscricao_economica"] ); $obRCEMInscricaoEconomica->obRCadastroDinamico->setChavePersistenteValores( $arChaveAtributoInscricao ); $obRCEMInscricaoEconomica->obRCadastroDinamico->recuperaAtributosSelecionadosValores( $rsAtributos ); diff --git a/gestaoTributaria/fontes/PHP/arrecadacao/instancias/calculo/OCManterNotaAvulsa.php b/gestaoTributaria/fontes/PHP/arrecadacao/instancias/calculo/OCManterNotaAvulsa.php index b5dda41..5d01c94 100644 --- a/gestaoTributaria/fontes/PHP/arrecadacao/instancias/calculo/OCManterNotaAvulsa.php +++ b/gestaoTributaria/fontes/PHP/arrecadacao/instancias/calculo/OCManterNotaAvulsa.php @@ -179,8 +179,6 @@ $obMontaServico = new MontaServico; $obMontaServico->setCodigoAtividade( $_REQUEST["inCodAtividade"] ); $obMontaServico->setCodigoVigenciaServico ( $_REQUEST["inCodigoVigencia"] ); -#sistemaLegado::mostravar ( $_REQUEST ); #exit; - $boSetaData = false; switch ($_REQUEST['stCtrl']) { case "Download": @@ -465,16 +463,13 @@ switch ($_REQUEST['stCtrl']) { $obRCEMServico->setCodigoVigencia ( $_REQUEST["inCodigoVigencia"] ); $obRCEMServico->recuperaUltimoNivel( $rsListaNivel ); - #echo 'ListaNivel'; sistemaLegado::mostravar( $rsListaNivel ); $obRCEMServico->setCodigoNivel( 1 ); $obRCEMServico->setCodigoAtividade( $_REQUEST["inCodAtividade"] ); $obRCEMServico->listarServico( $rsListaServico ); - #echo 'ListaServiço'; sistemaLegado::mostravar( $rsListaServico ); if ( $rsListaServico->getNumLinhas() > 0 ) { - //echo '

    Dentro do IF

    '; exit; $obRCEMServico->setValorreduzido( $rsListaServico->getCampo("valor_reduzido") ); $obRCEMServico->setCodigoNivel( $rsListaNivel->getCampo("cod_nivel") ); $obRCEMServico->listarServico( $rsListaServicoTMP ); diff --git a/gestaoTributaria/fontes/PHP/arrecadacao/instancias/calculo/PRManterCalculo.php b/gestaoTributaria/fontes/PHP/arrecadacao/instancias/calculo/PRManterCalculo.php index 2613d4e..5ccfa5d 100755 --- a/gestaoTributaria/fontes/PHP/arrecadacao/instancias/calculo/PRManterCalculo.php +++ b/gestaoTributaria/fontes/PHP/arrecadacao/instancias/calculo/PRManterCalculo.php @@ -30,7 +30,7 @@ * @author Analista: Fabio Bertold Rodrigues * @author Programador: Lucas Teixeira Stephanou - * $Id: PRManterCalculo.php 60961 2014-11-26 15:57:45Z evandro $ + * $Id: PRManterCalculo.php 63868 2015-10-27 17:31:08Z evandro $ Caso de uso: uc-05.03.05 **/ @@ -85,6 +85,9 @@ switch ($stAcao) { case "simular": case "incluir": + $obTransacao = new Transacao(); + $boFlagTransacao = false; + $obErro = $obTransacao->abreTransacao( $boFlagTransacao, $boTransacao ); Sessao::remove('calculos'); /* validar formulario */ if (!$_REQUEST[ 'inCodGrupo' ] and !$_REQUEST["inCodCredito"]) { @@ -97,8 +100,7 @@ switch ($stAcao) { $rsRecordSet = new RecordSet; //--------------------------- list( $inCodGrupo , $inExercicio ) = explode( '/' , $_REQUEST[ 'inCodGrupo' ] ); - - SistemaLegado::BloqueiaFrames(); + if ( Sessao::read( 'calculados' ) == -1 ) { require_once ( CAM_GT_ARR_NEGOCIO."RARRGrupo.class.php"); diff --git a/gestaoTributaria/fontes/PHP/arrecadacao/instancias/calculo/PRManterNotaAvulsa.php b/gestaoTributaria/fontes/PHP/arrecadacao/instancias/calculo/PRManterNotaAvulsa.php index d9faf05..639cad6 100644 --- a/gestaoTributaria/fontes/PHP/arrecadacao/instancias/calculo/PRManterNotaAvulsa.php +++ b/gestaoTributaria/fontes/PHP/arrecadacao/instancias/calculo/PRManterNotaAvulsa.php @@ -297,7 +297,6 @@ switch ($stAcao) { "natureza" => $rsListaCreditos->getCampo("cod_natureza"), "genero" => $rsListaCreditos->getCampo("cod_genero"), "especie" => $rsListaCreditos->getCampo("cod_especie") ); - //sistemaLegado::mostravar( $rsListaCreditos );exit; $rsListaCreditos->proximo(); while ( !$rsListaCreditos->Eof() ) { @@ -555,8 +554,6 @@ switch ($stAcao) { }//fim do lancamneto do valor da nota_avulsa -//echo "finito
    irmaos watchovisk
    "; -//exit; if ( $_REQUEST['boEmissaoCarne'] == 0 ) SistemaLegado::alertaAviso($pgList, "Inscrição Econômica: ".$_REQUEST["inInscricaoEconomica"], "incluir", "aviso", Sessao::getId(), "../"); @@ -564,12 +561,7 @@ switch ($stAcao) { // imprimir carne //if ( ( $_REQUEST['boEmissaoCarne'] == 1 ) && ( ( $inCodParcelaNotaAvul > 0 ) || ( $inCodParcela > 0 ) ) ) { -/* sistemaLegado::mostravar($inCodParcela); - sistemaLegado::mostravar($inCodParcelaNotaAvul); die; - sistemaLegado::mostravar($inCodParcelaNotaAvul); - sistemaLegado::mostravar($inCodLancamento); die; - die; -*/ if ( ($_REQUEST['boEmissaoCarne'] == 1) && ($inCodParcelaNotaAvul != 0) || ($inCodParcela != 0)) { + if ( ($_REQUEST['boEmissaoCarne'] == 1) && ($inCodParcelaNotaAvul != 0) || ($inCodParcela != 0)) { $arArqMod = explode( "§", $_REQUEST["stArquivo"] ); $stArquivoModelo = $arArqMod[0]; diff --git a/gestaoTributaria/fontes/PHP/arrecadacao/instancias/calculo/PRReterFonte.php b/gestaoTributaria/fontes/PHP/arrecadacao/instancias/calculo/PRReterFonte.php index 565e7e1..65196c7 100644 --- a/gestaoTributaria/fontes/PHP/arrecadacao/instancias/calculo/PRReterFonte.php +++ b/gestaoTributaria/fontes/PHP/arrecadacao/instancias/calculo/PRReterFonte.php @@ -32,7 +32,7 @@ * @ignore - * $Id: PRReterFonte.php 62838 2015-06-26 13:02:49Z diogo.zarpelon $ + * $Id: PRReterFonte.php 63839 2015-10-22 18:08:07Z franver $ * Casos de uso: uc-05.03.22 */ @@ -80,10 +80,6 @@ $pgFilt = "FL".$stPrograma.".php?stAcao=$stAcao"; $pgList = "LS".$stPrograma.".php?stAcao=$stAcao"; $pgForm = "FM".$stPrograma.".php?stAcao=$stAcao"; -//[boEmissaoCarne] -//[stCodDocumentoTxt] - -//sistemalegado::mostravar($stAcao);die(); switch ($stAcao) { case "incluir": if ($_REQUEST["boEmissaoCarne"] && !$_REQUEST["cmbModelo"]) { diff --git a/gestaoTributaria/fontes/PHP/arrecadacao/instancias/calendarioFiscal/OCManterVencimentos.php b/gestaoTributaria/fontes/PHP/arrecadacao/instancias/calendarioFiscal/OCManterVencimentos.php index 8c94f09..89c4a50 100755 --- a/gestaoTributaria/fontes/PHP/arrecadacao/instancias/calendarioFiscal/OCManterVencimentos.php +++ b/gestaoTributaria/fontes/PHP/arrecadacao/instancias/calendarioFiscal/OCManterVencimentos.php @@ -32,7 +32,7 @@ * @ignore - * $Id: OCManterVencimentos.php 59612 2014-09-02 12:00:51Z gelson $ + * $Id: OCManterVencimentos.php 63839 2015-10-22 18:08:07Z franver $ * Casos de uso: uc-05.03.03 @@ -427,8 +427,6 @@ switch ($_REQUEST["stCtrl"]) { } } } else { -// sistemaLegado::mostravar($_REQUEST); -// sistemaLegado::mostravar($sessao->transf6["parcelamentos"]); if ($_REQUEST["stDtVencimentoDesc"] == "") { $stDtVencimentoDesc = "-"; @@ -557,4 +555,3 @@ switch ($_REQUEST["stCtrl"]) { SistemaLegado::executaFrameOculto($stJs); break; } -//SistemaLegado::mostravar( $sessao->transf6["parcelamentos"]); diff --git a/gestaoTributaria/fontes/PHP/arrecadacao/instancias/configuracao/OCManterLayoutCarne.php b/gestaoTributaria/fontes/PHP/arrecadacao/instancias/configuracao/OCManterLayoutCarne.php index 4e601a4..f3dc080 100644 --- a/gestaoTributaria/fontes/PHP/arrecadacao/instancias/configuracao/OCManterLayoutCarne.php +++ b/gestaoTributaria/fontes/PHP/arrecadacao/instancias/configuracao/OCManterLayoutCarne.php @@ -865,7 +865,6 @@ switch ($_REQUEST['stCtrl']) { break; case "carregaModulo": - //sistemaLegado::mostravar( $_REQUEST ); if ($_GET["inCodTipo"]) { $stOrdem = " ORDER BY cod_cadastro ASC "; if ($_GET["inCodTipo"] == 1) { diff --git a/gestaoTributaria/fontes/PHP/arrecadacao/instancias/consultas/FMConsultaArrecadacao.php b/gestaoTributaria/fontes/PHP/arrecadacao/instancias/consultas/FMConsultaArrecadacao.php index dd248f0..cd5555e 100755 --- a/gestaoTributaria/fontes/PHP/arrecadacao/instancias/consultas/FMConsultaArrecadacao.php +++ b/gestaoTributaria/fontes/PHP/arrecadacao/instancias/consultas/FMConsultaArrecadacao.php @@ -32,7 +32,7 @@ * @ignore - * $Id: FMConsultaArrecadacao.php 59612 2014-09-02 12:00:51Z gelson $ + * $Id: FMConsultaArrecadacao.php 63839 2015-10-22 18:08:07Z franver $ */ /* @@ -106,7 +106,6 @@ $stCompetencia = $_REQUEST['stCompetencia']; //DEFINICAO DOS COMPONENTES -#sistemaLegado::mostravar( $_REQUEST ); Sessao::remove('stIdCarregamento'); //* LISTAGEM DE PROPRIETARIOS include_once( CAM_GT_CIM_NEGOCIO . "RCIMImovel.class.php" ); @@ -257,8 +256,6 @@ $obLblTipoCalculo->setRotulo ( "Tipo Cálculo" ); $obLblTipoCalculo->setTitle ( "Tipo Cálculo"); $obLblTipoCalculo->setValue ( $_REQUEST["stTipoCalculo"] ); -#sistemaLegado::mostravar( $_REQUEST ); - $obLblGrupoCredito = new Label; $obLblGrupoCredito->setRotulo ( "Grupo de Créditos" ); $obLblGrupoCredito->setValue ( $inCodGrupo." - ".$stOrigem ); @@ -365,7 +362,6 @@ if ($inCodGrupo) { // caso seja grupo de credito Sessao::write( 'tipoLancamento', 'Grupo' ); $obRARRGrupo = new RARRGrupo; $rsCreditosDescontos->setPrimeiroElemento(); - #sistemaLegado::mostravar( $rsCreditosDescontos ); $cont = 0; while ( !$rsCreditosDescontos->eof() ) { @@ -391,7 +387,6 @@ $rsCreditos->addFormatacao("valor_calculado","NUMERIC_BR"); $rsCreditos->addFormatacao("valor","NUMERIC_BR"); $rsCreditos->setPrimeiroElemento(); ########################### TABELA DOM -#sistemaLegado::mostravar ( $rsCreditos ); $table = new Table(); $table->setRecordset( $rsCreditos ); $table->setSummary('Lista de Créditos'); @@ -421,7 +416,6 @@ echo $table->getHtml(); // listar parcelas $obRARRParcela->listarConsulta ( $rsListaParcelas ); -//sistemaLegado::mostravar( $rsListaParcelas ); $rsListaParcelas->ordena ("nr_parcela"); $rsListaParcelas->addFormatacao("valor","NUMERIC_BR"); ###################################### TABELA DOM @@ -441,7 +435,6 @@ $table = new TableTree(); $table->setMostrarTodos ( false ); $table->setRecordset( $rsListaParcelas ); $table->setSummary('Lista de Parcelas'); -#sistemaLegado::mostravar( $rsListaParcelas ); //$table->setArquivo( 'FMConsultaArrecadacaoDetalheParcela.php' ); $table->setArquivo('OCConsultaArrecadacao.php?&stCtrl=detalheParcela&'); diff --git a/gestaoTributaria/fontes/PHP/arrecadacao/instancias/consultas/FMConsultaArrecadacaoDetalheParcela.php b/gestaoTributaria/fontes/PHP/arrecadacao/instancias/consultas/FMConsultaArrecadacaoDetalheParcela.php index d8f97fb..7d012ed 100644 --- a/gestaoTributaria/fontes/PHP/arrecadacao/instancias/consultas/FMConsultaArrecadacaoDetalheParcela.php +++ b/gestaoTributaria/fontes/PHP/arrecadacao/instancias/consultas/FMConsultaArrecadacaoDetalheParcela.php @@ -31,7 +31,7 @@ * @author Analista: Fabio Bertoldi * @author Programador: Lucas Teixeira Stephanou - * $Id: FMConsultaArrecadacaoDetalheParcela.php 59612 2014-09-02 12:00:51Z gelson $ + * $Id: FMConsultaArrecadacaoDetalheParcela.php 63839 2015-10-22 18:08:07Z franver $ Caso de uso: uc-05.03.19 **/ @@ -79,15 +79,10 @@ include_once '../../classes/negocio/RARRCarne.class.php'; include_once '../../../../../../gestaoAdministrativa/fontes/PHP/pacotes/FrameworkHTML.inc.php'; include_once '../../../../../../gestaoAdministrativa/fontes/PHP/framework/componentes/Table/TableTree.class.php'; -#echo '

    DETALHE PARCELA

    '; -#print_r ( $_REQUEST ); - -#exit; // pegando variaveis no request #foreach ($_REQUEST as $key =>$value) { # $$key = $value; #} -//sistemaLegado::mostravar($_REQUEST); if ($_GET['stDescricao']) { $arTMP = explode ( '§', $_REQUEST['stDescricao'] ); @@ -141,19 +136,6 @@ if ($dtDataBaseBR && !$dtPagamento) { } */ -/* -echo '
    PAGMENT: ['.$dtPagamento.']'; -echo '
    Numeração: '.$inNumeracao; -echo '
    ID carregamento: '.$stIdCarregamento; -echo '
    COD PARCELA: '.$inCodParcela; -echo '
    DataUS: '.$dtDataUS; -echo '
    DataBase: '.$dtDataBase; -echo '
    dtVencimentoPR: '.$dtVencimentoPR; -echo '
    Pagamento: '.$dtPagamento; -echo '
    OCORRENCIA PAGTO:'.$inOcorrencia; -*/ -//exit; - //$dtVencimentoPR include_once ( CAM_GT_ARR_MAPEAMENTO."Ffn_situacao_carne.class.php" ); $obSituacao = new Ffn_situacao_carne; @@ -169,11 +151,6 @@ $obRARRCarne->obRARRParcela->setCodParcela ( $inCodParcela $obRARRCarne->setDataPagamento ( $dtPagamento ); $obRARRCarne->listarConsulta ( $rsDetalheParcela, '', $dtDataUS, $dtVencimentoPR ); -//sistemaLegado::mostravar ( $rsDetalheParcela ); -//exit; - -//echo "data us = ".$dtDataUS."
    "; -//echo "venc = ".$dtVencimentoPR."
    "; //$dtDataUS = $rsDetalheParcela->getCampo("parcela_vencimento_us"); //comentado 03_06 $obSpnQuebra = new Span; @@ -212,8 +189,6 @@ $obRARRParcela = new RARRParcela ( new RARRLancamento (new RARRCalculo) ); $obRARRParcela->setCodParcela ( $inCodParcela ); $obRARRParcela->listarReemissaoConsulta( $rsNumeracoes ); -#sistemaLegado::mostravar( $rsNumeracoes ); - $obCmbNumeracao = new Select; $obCmbNumeracao->setName ( "cmbNumeracao" ); $obCmbNumeracao->addOption ( "", "Vencimentos" ); @@ -358,7 +333,7 @@ $stTipoBaixa = $rsDetalheParcela->getCampo("cod_lote"); // antes de form , apresentar lista de pagamentos duplicados $obRARRCarne->listarPagamentosConsulta( $rsPagDuplicados ); $rsPagDuplicados->addFormatacao("valor","NUMERIC_BR"); -#sistemaLegado::mostravar( $rsPagDuplicados ); + $inContPagamentos = $rsPagDuplicados->getNumLinhas(); $arParcelasDuplicadas = array(); if ($inContPagamentos > 1) { @@ -384,7 +359,6 @@ if ($inContPagamentos > 1) { if ( $rsPagDuplicados->getNumLinhas() > 0 ) { ########################### TABELA DOM - #sistemaLegado::mostravar( $rsPagDuplicados ); $table = new Table(); $table->setRecordset( $rsPagDuplicados ); $table->setSummary('Pagamentos Duplicados'); @@ -616,7 +590,6 @@ $table = new Table(); $table->setRecordset( $rsListaDetalheCreditos ); $table->setSummary('Detalhamento por Crédio'); -#sistemaLegado::nmostravar( $rsListaDetalheCreditos ); // lista zebrada //$table->setConditional( true , "#efefef" ); diff --git a/gestaoTributaria/fontes/PHP/arrecadacao/instancias/consultas/OCConsultaArrecadacao.php b/gestaoTributaria/fontes/PHP/arrecadacao/instancias/consultas/OCConsultaArrecadacao.php index 841616a..dab369a 100755 --- a/gestaoTributaria/fontes/PHP/arrecadacao/instancias/consultas/OCConsultaArrecadacao.php +++ b/gestaoTributaria/fontes/PHP/arrecadacao/instancias/consultas/OCConsultaArrecadacao.php @@ -32,7 +32,7 @@ * @ignore - * $Id: OCConsultaArrecadacao.php 59612 2014-09-02 12:00:51Z gelson $ + * $Id: OCConsultaArrecadacao.php 63839 2015-10-22 18:08:07Z franver $ * Casos de uso: uc-05.01.18 */ @@ -176,11 +176,6 @@ $obRARRCarne->obRARRParcela->setCodParcela ( $inCodParcela $obRARRCarne->setDataPagamento ( $dtPagamento ); $obRARRCarne->listarConsulta ( $rsDetalheParcela, '', $dtDataUS, $dtVencimentoPR ); -//sistemaLegado::mostravar ( $rsDetalheParcela ); -//exit; - -//echo "data us = ".$dtDataUS."
    "; -//echo "venc = ".$dtVencimentoPR."
    "; //$dtDataUS = $rsDetalheParcela->getCampo("parcela_vencimento_us"); //comentado 03_06 $obSpnQuebra = new Span; @@ -200,7 +195,6 @@ $obButtonAtualizarData->setTitle ( "Atualizar" ); $obButtonAtualizarData->setNull ( true ); $obButtonAtualizarData->setCaminho (CAM_FW_TEMAS."/imagens/btnRefresh.png"); -//sistemaLegado::mostravar(Sessao::Read('stIdCarregamento')); //$stIdCarregamento = $_REQUEST['stIdCarregamento']; if ( $rsDetalheParcela->getCampo ('pagamento_data') ) { @@ -222,8 +216,6 @@ $obRARRParcela = new RARRParcela ( new RARRLancamento (new RARRCalculo) ); $obRARRParcela->setCodParcela ( $inCodParcela ); $obRARRParcela->listarReemissaoConsulta( $rsNumeracoes ); -#sistemaLegado::mostravar( $rsNumeracoes ); - $obCmbNumeracao = new Select; $obCmbNumeracao->setName ( "cmbNumeracao" ); $obCmbNumeracao->addOption ( "", "Vencimentos" ); @@ -398,7 +390,7 @@ $stTipoBaixa = $rsDetalheParcela->getCampo("cod_lote"); // antes de form , apresentar lista de pagamentos duplicados $obRARRCarne->listarPagamentosConsulta( $rsPagDuplicados ); $rsPagDuplicados->addFormatacao("valor","NUMERIC_BR"); -#sistemaLegado::mostravar( $rsPagDuplicados ); + $inContPagamentos = $rsPagDuplicados->getNumLinhas(); $arParcelasDuplicadas = array(); if ($inContPagamentos > 1) { @@ -424,7 +416,6 @@ if ($inContPagamentos > 1) { if ( $rsPagDuplicados->getNumLinhas() > 0 ) { ########################### TABELA DOM - #sistemaLegado::mostravar( $rsPagDuplicados ); $table = new Table(); $table->setRecordset( $rsPagDuplicados ); $table->setSummary('Pagamentos Duplicados'); @@ -661,7 +652,6 @@ $table = new Table(); $table->setRecordset( $rsListaDetalheCreditos ); $table->setSummary('Detalhamento por Crédio'); -#sistemaLegado::nmostravar( $rsListaDetalheCreditos ); // lista zebrada //$table->setConditional( true , "#efefef" ); diff --git a/gestaoTributaria/fontes/PHP/arrecadacao/instancias/consultas/OCConsultarLote.php b/gestaoTributaria/fontes/PHP/arrecadacao/instancias/consultas/OCConsultarLote.php index ef61d33..2c62ebb 100644 --- a/gestaoTributaria/fontes/PHP/arrecadacao/instancias/consultas/OCConsultarLote.php +++ b/gestaoTributaria/fontes/PHP/arrecadacao/instancias/consultas/OCConsultarLote.php @@ -32,7 +32,7 @@ * @ignore - * $Id: OCConsultarLote.php 59612 2014-09-02 12:00:51Z gelson $ + * $Id: OCConsultarLote.php 63839 2015-10-22 18:08:07Z franver $ * Casos de uso: uc-05.01.18 */ @@ -53,7 +53,6 @@ include_once ( CAM_GT_ARR_NEGOCIO."RARRPagamento.class.php" ); include_once ( CAM_GT_CIM_NEGOCIO."RCIMUnidadeAutonoma.class.php" ); include_once ( CAM_GT_MON_NEGOCIO."RMONAgencia.class.php" ); -//sistemaLegado::mostravar ( $_REQUEST ); switch ($_REQUEST["stCtrl"]) { case "buscaContribuinte": diff --git a/gestaoTributaria/fontes/PHP/arrecadacao/instancias/desoneracao/OCManterDesoneracao.php b/gestaoTributaria/fontes/PHP/arrecadacao/instancias/desoneracao/OCManterDesoneracao.php index cf5c791..86cd1f2 100755 --- a/gestaoTributaria/fontes/PHP/arrecadacao/instancias/desoneracao/OCManterDesoneracao.php +++ b/gestaoTributaria/fontes/PHP/arrecadacao/instancias/desoneracao/OCManterDesoneracao.php @@ -32,7 +32,7 @@ * @ignore - * $Id: OCManterDesoneracao.php 59612 2014-09-02 12:00:51Z gelson $ + * $Id: OCManterDesoneracao.php 63839 2015-10-22 18:08:07Z franver $ * Casos de uso: uc-05.03.04 */ @@ -102,8 +102,6 @@ switch ($_REQUEST['stCtrl']) { $obRFuncao->obRBiblioteca->roRModulo->setCodModulo ( $arCodFuncao[0] ); $obRFuncao->consultar(); - //sistemaLegado::mostravar ( $obRFuncao ); - $inCodFuncao = $obRFuncao->getCodFuncao () ; $stDescricao = " "; $stDescricao = $obRFuncao->getComentario() ; diff --git a/gestaoTributaria/fontes/PHP/arrecadacao/instancias/documentos/OCEmitirCarne.php b/gestaoTributaria/fontes/PHP/arrecadacao/instancias/documentos/OCEmitirCarne.php index 116df48..97d4b81 100644 --- a/gestaoTributaria/fontes/PHP/arrecadacao/instancias/documentos/OCEmitirCarne.php +++ b/gestaoTributaria/fontes/PHP/arrecadacao/instancias/documentos/OCEmitirCarne.php @@ -30,7 +30,7 @@ * @author Analista: Fábio Bertoldi * @author Programador: Tonismar R. Bernardo - * $Id: OCEmitirCarne.php 62838 2015-06-26 13:02:49Z diogo.zarpelon $ + * $Id: OCEmitirCarne.php 63867 2015-10-27 17:25:14Z evandro $ Caso de uso: uc-05.03.11 @@ -417,6 +417,7 @@ function montaAtributoImobiliario() $obCmbOrdemAtributoLote->setRotulo( "Ordem dos Atributos do Lote" ); $obCmbOrdemAtributoLote->setNull ( true ); $obCmbOrdemAtributoLote->setTitle ( 'Ordem para emissão dos dados.' ); + $obCmbOrdemAtributoLote->setOrdenacao('selecao'); $obRCIMConfiguracao = new RCIMConfiguracao; $obRCIMConfiguracao->setCodigoModulo( 12 ); @@ -457,6 +458,7 @@ function montaAtributoImobiliario() $obCmbOrdemAtributoImovel->setRotulo( "Ordem dos Atributos do Imovel" ); $obCmbOrdemAtributoImovel->setNull ( true ); $obCmbOrdemAtributoImovel->setTitle ( 'Ordem para emissão dos dados.' ); + $obCmbOrdemAtributoImovel->setOrdenacao('selecao'); $rsOrdemAtributoImovelS = new RecordSet; $obRRegra = new RCadastroDinamico ( $obRCIMConfiguracao ); @@ -493,6 +495,7 @@ function montaAtributoImobiliario() $obCmbOrdemAtributoEdificacao->setRotulo( "Ordem dos Atributos do Edificação" ); $obCmbOrdemAtributoEdificacao->setNull ( true ); $obCmbOrdemAtributoEdificacao->setTitle ( 'Ordem para emissão dos dados.' ); + $obCmbOrdemAtributoEdificacao->setOrdenacao('selecao'); $rsOrdemAtributoEdificacaoS = new RecordSet; $obRRegra = new RCadastroDinamico ( $obRCIMConfiguracao ); @@ -1083,6 +1086,7 @@ switch ($_REQUEST['stCtrl']) { $obCmbOrdemEmissao->setRotulo( "*Ordem de Emissão" ); $obCmbOrdemEmissao->setNull ( true ); $obCmbOrdemEmissao->setTitle ( 'Ordem para emissão dos dados.' ); + $obCmbOrdemEmissao->setOrdenacao('selecao'); $arOrdem = array( array("inTipoOrdem" => "aic2.exercicio", "stTipoOrdem" => 'Exercício'), diff --git a/gestaoTributaria/fontes/PHP/arrecadacao/instancias/documentos/OCEmitirCarneIPTUDesoneradoMata.php b/gestaoTributaria/fontes/PHP/arrecadacao/instancias/documentos/OCEmitirCarneIPTUDesoneradoMata.php index 3fb2332..7773f5d 100644 --- a/gestaoTributaria/fontes/PHP/arrecadacao/instancias/documentos/OCEmitirCarneIPTUDesoneradoMata.php +++ b/gestaoTributaria/fontes/PHP/arrecadacao/instancias/documentos/OCEmitirCarneIPTUDesoneradoMata.php @@ -821,7 +821,6 @@ switch ($_REQUEST['stCtrl']) { } $obRARRGrupo->listarCreditos( $rsCreditos ); - //sistemaLegado::mostravar($rsCreditos); break; diff --git a/gestaoTributaria/fontes/PHP/arrecadacao/instancias/documentos/OCEmitirDocumento.php b/gestaoTributaria/fontes/PHP/arrecadacao/instancias/documentos/OCEmitirDocumento.php index 81b8a97..d313330 100644 --- a/gestaoTributaria/fontes/PHP/arrecadacao/instancias/documentos/OCEmitirDocumento.php +++ b/gestaoTributaria/fontes/PHP/arrecadacao/instancias/documentos/OCEmitirDocumento.php @@ -30,7 +30,7 @@ * @author Analista: Fábio Bertoldi * @author Programador: Fernando Piccini Cercato - * $Id: OCEmitirDocumento.php 59612 2014-09-02 12:00:51Z gelson $ + * $Id: OCEmitirDocumento.php 63839 2015-10-22 18:08:07Z franver $ Caso de uso: uc-05.03.11 **/ @@ -101,8 +101,6 @@ function BuscarCredito($stParam1, $stParam2) return $stJs; } -//sistemaLegado::mostravar ( $_REQUEST ); //exit; - switch ($_REQUEST['stCtrl']) { case "montaFiltro": $arDados = explode( "§", $_REQUEST["cmbTipoDocumento"] ); @@ -215,7 +213,6 @@ switch ($_REQUEST['stCtrl']) { } $obRARRGrupo->listarCreditos( $rsCreditos ); - //sistemaLegado::mostravar($rsCreditos); break; case "buscaGrupo": diff --git a/gestaoTributaria/fontes/PHP/arrecadacao/instancias/documentos/PREmitirCarne.php b/gestaoTributaria/fontes/PHP/arrecadacao/instancias/documentos/PREmitirCarne.php index 742a94a..f36808d 100644 --- a/gestaoTributaria/fontes/PHP/arrecadacao/instancias/documentos/PREmitirCarne.php +++ b/gestaoTributaria/fontes/PHP/arrecadacao/instancias/documentos/PREmitirCarne.php @@ -27,7 +27,7 @@ * @author Analista: Fábio Bertoldi * @author Programador: tonismar R. Bernardo - * $Id: PREmitirCarne.php 62838 2015-06-26 13:02:49Z diogo.zarpelon $ + * $Id: PREmitirCarne.php 64141 2015-12-08 16:23:59Z evandro $ Caso de uso: uc-05.03.11 @@ -323,9 +323,17 @@ switch ($stAcao) { //pegar novo vencimento $arTmp = explode("_",$valor); $stTmp = "dtNovoVencimento_".$arTmp[1]; - - if ($_REQUEST[$stTmp] && preg_match("/vboReemitir_[0-9]/",$valor) ) { - $dtNovoVencimento = $_REQUEST[$stTmp]; + + //Caso usuario não passe data de vencimento + //e for marcada para reemissao será executada apenas a reemissao sem calculo de juros ou multa algum + $boApenasReemitir = false; + if ( preg_match("/vboReemitir_[0-9]/",$valor) ) { + if ( $_REQUEST[$stTmp] == '' ) { + $boApenasReemitir = true; + $dtNovoVencimento = $dtVencimento; + }else{ + $dtNovoVencimento = $_REQUEST[$stTmp]; + } } else { $dtNovoVencimento = $dtVencimento; @@ -407,16 +415,17 @@ switch ($stAcao) { $obRARRCarne->obRMONConvenio->setCodigoConvenio( $inCodConvenioAtual); $obRARRCarne->obRMONCarteira->setCodigoCarteira( $inCodCarteiraAtual ); - $arReemissao = array( "cod_convenio" => $inCodConvenio, - "cod_carteira" => $inCodCarteira, - "cod_lancamento" => $inLancamento, - "info_parcela" => $nrParcela, - "cod_parcela" => $inParcela, - "vencimento" => $dtVencimento, - "valor_anterior" => $flValorAnterior, - "valor" => $flValor, - "numeracao" => $numeracao, - "numcgm" => $inNumCgm ); + $arReemissao = array( "cod_convenio" => $inCodConvenio, + "cod_carteira" => $inCodCarteira, + "cod_lancamento" => $inLancamento, + "info_parcela" => $nrParcela, + "cod_parcela" => $inParcela, + "vencimento" => $dtVencimento, + "valor_anterior" => $flValorAnterior, + "valor" => $flValor, + "numeracao" => $numeracao, + "numcgm" => $inNumCgm, + ); $obErro = $obRARRCarne->efetuaReemitirCarne( $arReemissao, $boTransacao ); @@ -429,7 +438,8 @@ switch ($stAcao) { "exercicio" => $stExercicio, "numcgm" => $inNumCgm, "numeracao" => $inNumeracao, - "inscricao" => $inInscricao + "inscricao" => $inInscricao, + "boApenasReemitir" => $boApenasReemitir ); } } else { @@ -439,14 +449,16 @@ switch ($stAcao) { "exercicio" => $stExercicio, "numcgm" => $inNumCgm, "numeracao" => $numeracao, - "inscricao" => $inInscricao + "inscricao" => $inInscricao, + "boApenasReemitir" => $boApenasReemitir ); $arNaoImpressas[] = array( "numeracao" => $numeracao, "cod_convenio" => $inCodConvenio, "cod_parcela" => $inParcela, "exercicio" => $stExercicio, - "inscricao" => $inInscricao + "inscricao" => $inInscricao, + "boApenasReemitir" => $boApenasReemitir ); } @@ -787,7 +799,14 @@ switch ($stAcao) { SistemaLegado::LiberaFrames(); exit; } else { - $stOrdemEmissao = implode(",",$_REQUEST["inCodOrdemSelecionados"]); + if ($stVinculo == 'imobiliario') { + $arCodOrdem = $_REQUEST["inCodOrdemSelecionados"]; + foreach ( $arCodOrdem as $value) { + $arTmp[] = substr($value, 5); + } + $stOrdemEmissaoFuncao = implode(",",$arTmp); + } + $stOrdemEmissao = implode(",",$_REQUEST["inCodOrdemSelecionados"]); } $stPadraoCodBarra = $_REQUEST['stPadraoCodBarra']; @@ -868,8 +887,9 @@ switch ($stAcao) { Sessao::write('inscricoes_lista', $arTMP ); Sessao::write('total_listar', count($arTMP) ); - Sessao::write("TipoEmissao" , $stTipoEmissao ); - Sessao::write("OrdemEmissao" , $stOrdemEmissao ); + Sessao::write("TipoEmissao" , $stTipoEmissao ); + Sessao::write("OrdemEmissao" , $stOrdemEmissao ); + Sessao::write("OrdemEmissaoFuncao", $stOrdemEmissaoFuncao ); Sessao::write("OrdemLote" , $stCodOrdemLoteSelecionados ); Sessao::write("OrdemImovel" , $stCodOrdemImovelSelecionados ); @@ -919,8 +939,9 @@ switch ($stAcao) { $obListaEmissao->inCodGrupo = 0; } - $obListaEmissao->stTipoEmissao = Sessao::read("TipoEmissao"); - $obListaEmissao->stOrdemEmissao = Sessao::read("OrdemEmissao"); + $obListaEmissao->stTipoEmissao = Sessao::read("TipoEmissao"); + $obListaEmissao->stOrdemEmissao = Sessao::read("OrdemEmissao"); + $obListaEmissao->stOrdemEmissaoFuncao = Sessao::read("OrdemEmissaoFuncao"); if ($stVinculo == 'imobiliario') { $obListaEmissao->stOrdemLote = Sessao::read("OrdemLote"); @@ -1012,7 +1033,7 @@ switch ($stAcao) { $contArEmissao = $contInscricao = 0; $rsEmissaoCarne->setPrimeiroElemento(); - + while (!$rsEmissaoCarne->eof()) { $inInscricaoAtual = $rsEmissaoCarne->getCampo('inscricao'); $inCodLancamentoAtual = $rsEmissaoCarne->getCampo('cod_lancamento'); @@ -1037,14 +1058,15 @@ switch ($stAcao) { $obRCIMLote->obRCadastroDinamico->setCodCadastro (2); $contAtributo = 0; - while ($contAtributo < count($arOrdemLote) -1) { + while ($contAtributo < count($arOrdemLote) ) { $arChaveAtributoLote = array( "cod_lote" => $inCodLoteAtual, "cod_atributo" => $arOrdemLote[$contAtributo] ); $obRCIMLote->obRCadastroDinamico->setChavePersistenteValores($arChaveAtributoLote); - $obRCIMLote->obRCadastroDinamico->recuperaAtributosSelecionadosValores( $rsAtributos ); + $obRCIMLote->obRCadastroDinamico->recuperaAtributosSelecionadosValores( $rsAtributos,"","",$boTransacao ); + if ( $rsAtributos->getCampo('nom_tipo') == 'Lista' ) { $arValores = explode ('[][][]',$rsAtributos->getCampo('valor_padrao_desc')); $arValorPadrao = explode (',', $rsAtributos->getCampo('valor_padrao')); @@ -1063,7 +1085,23 @@ switch ($stAcao) { $valorDoAtributo = $rsAtributos->getCampo('valor'); } - $rsEmissaoCarne->setCampo ('atributo_'.$contagemAtributos, $valorDoAtributo ); + switch ( $rsAtributos->getCampo('cod_atributo') ) { + //Quadra + case 5: + $rsEmissaoCarne->setCampo ('atributo_1', $valorDoAtributo ); + break; + //Lote + case 7: + $rsEmissaoCarne->setCampo ('atributo_2', $valorDoAtributo ); + break; + default: + if ($contagemAtributos < 5) { + $contagemAtributos = 5; + } + $rsEmissaoCarne->setCampo ('atributo_'.$contagemAtributos, $valorDoAtributo ); + break; + } + $contagemAtributos++; $contAtributo++; } @@ -1073,7 +1111,7 @@ switch ($stAcao) { $obRCIMImovel->obRCadastroDinamico->obRModulo->setCodModulo( 12 ); $obRCIMImovel->obRCadastroDinamico->setCodCadastro ( 4 ); $contAtributo = 0; - while ( $contAtributo < count ( $arOrdemImovel ) -1 ) { + while ( $contAtributo < count ( $arOrdemImovel ) ) { $arChaveAtributoLote = array( "cod_lote" => $inCodLoteAtual, "inscricao_municipal" => $inInscricaoAtual, @@ -1081,7 +1119,7 @@ switch ($stAcao) { ); $obRCIMImovel->obRCadastroDinamico->setChavePersistenteValores( $arChaveAtributoLote ); - $obRCIMImovel->obRCadastroDinamico->recuperaAtributosSelecionadosValores( $rsAtributos ); + $obRCIMImovel->obRCadastroDinamico->recuperaAtributosSelecionadosValores( $rsAtributos,"","",$boTransacao ); #$arValores = $arValorPadrao = $valorDoAtributo = null; if ( $rsAtributos->getCampo('nom_tipo') == 'Lista' ) { @@ -1102,7 +1140,23 @@ switch ($stAcao) { $valorDoAtributo = $rsAtributos->getCampo('valor'); } - $rsEmissaoCarne->setCampo ('atributo_'.$contagemAtributos, $valorDoAtributo ); + switch ( $rsAtributos->getCampo('cod_atributo') ) { + //Zona + case 106: + $rsEmissaoCarne->setCampo ('atributo_3', $valorDoAtributo ); + break; + //Uso do solo + case 8: + $rsEmissaoCarne->setCampo ('atributo_4', $valorDoAtributo ); + break; + default: + if ($contagemAtributos < 5) { + $contagemAtributos = 5; + } + $rsEmissaoCarne->setCampo ('atributo_'.$contagemAtributos, $valorDoAtributo ); + break; + } + $contagemAtributos++; $contAtributo++; } @@ -1113,7 +1167,7 @@ switch ($stAcao) { $obRCIMEdificacao->obRCadastroDinamico->obRModulo->setCodModulo( 12 ); $obRCIMEdificacao->obRCadastroDinamico->setCodCadastro ( 5 ); $contAtributo = 0; - while ( $contAtributo < count ( $arOrdemEdificacao ) - 1 ) { + while ( $contAtributo < count ( $arOrdemEdificacao ) ) { $arChaveAtributoLote = array ( "cod_lote" => $inCodLoteAtual, "cod_construcao" => $inCodConstrucaoAtual, @@ -1122,7 +1176,7 @@ switch ($stAcao) { ); $obRCIMEdificacao->obRCadastroDinamico->setChavePersistenteValores( $arChaveAtributoLote ); - $obRCIMEdificacao->obRCadastroDinamico->recuperaAtributosSelecionadosValores( $rsAtributos ); + $obRCIMEdificacao->obRCadastroDinamico->recuperaAtributosSelecionadosValores( $rsAtributos,"","",$boTransacao ); if ( $rsAtributos->getCampo('nom_tipo') == 'Lista' ) { $arValores = explode ('[][][]', $rsAtributos->getCampo('valor_padrao_desc') ); @@ -1142,6 +1196,10 @@ switch ($stAcao) { $valorDoAtributo = $rsAtributos->getCampo('valor'); } + if ($contagemAtributos < 5) { + $contagemAtributos = 5; + } + $rsEmissaoCarne->setCampo ('atributo_'.$contagemAtributos, $valorDoAtributo ); $contagemAtributos++; diff --git a/gestaoTributaria/fontes/PHP/arrecadacao/instancias/grupoCreditos/OCManterGrupo.php b/gestaoTributaria/fontes/PHP/arrecadacao/instancias/grupoCreditos/OCManterGrupo.php index 65e9ad4..ebdb27c 100755 --- a/gestaoTributaria/fontes/PHP/arrecadacao/instancias/grupoCreditos/OCManterGrupo.php +++ b/gestaoTributaria/fontes/PHP/arrecadacao/instancias/grupoCreditos/OCManterGrupo.php @@ -30,7 +30,7 @@ * @author Analista: Fabio Bertoldi Rodrigues * @author Desenvolvedor: Lucas Teixeira Stephanou - * $Id: OCManterGrupo.php 62838 2015-06-26 13:02:49Z diogo.zarpelon $ + * $Id: OCManterGrupo.php 63839 2015-10-22 18:08:07Z franver $ * Casos de uso: uc-05.03.02 */ @@ -436,7 +436,6 @@ switch ($_REQUEST ["stCtrl"]) { $stJs .= excluirCredito($_REQUEST["inLinha"]); break; case "buscaAcrescimo": - //mostravar($_REQUEST); if ($_REQUEST["inCodAcrescimo"]) { $obRARRGrupo->obRMONAcrescimo->setCodAcrescimo($_REQUEST["inCodAcrescimo"]); $obRARRGrupo->obRMONAcrescimo->consultarAcrescimo( $rsAcrescimos ); diff --git a/gestaoTributaria/fontes/PHP/arrecadacao/instancias/grupoCreditos/OCManterPermissoes.php b/gestaoTributaria/fontes/PHP/arrecadacao/instancias/grupoCreditos/OCManterPermissoes.php index 9eb0e87..45d4cc8 100755 --- a/gestaoTributaria/fontes/PHP/arrecadacao/instancias/grupoCreditos/OCManterPermissoes.php +++ b/gestaoTributaria/fontes/PHP/arrecadacao/instancias/grupoCreditos/OCManterPermissoes.php @@ -30,7 +30,7 @@ * @author Analista: Fabio Bertoldi Rodrigues * @author Desenvolvedor: Lucas Teixeira Stephanou - * $Id: OCManterPermissoes.php 59612 2014-09-02 12:00:51Z gelson $ + * $Id: OCManterPermissoes.php 63839 2015-10-22 18:08:07Z franver $ * Casos de uso: uc-05.03.02 */ @@ -153,7 +153,7 @@ function excluirGrupo($inLinha) $inContLinha++; } } -// mostravar($arNovaListaGrupo); + Sessao::write( "grupos", $arNovaListaGrupo ); $rsListaGrupos = new RecordSet; @@ -286,7 +286,7 @@ switch ($_REQUEST ["stCtrl"]) { $arGrupos["inLinha"] = count( $arGruposSessao ); $arGruposSessao[] = $arGrupos; Sessao::write( "grupos", $arGruposSessao ); - // mostravar($sessao->transf4["grupos"]); + $rsGrupos->preenche( $arGruposSessao ); $stJs .= montaListaGrupos($rsGrupos ); } diff --git a/gestaoTributaria/fontes/PHP/arrecadacao/instancias/grupoCreditos/PRManterGrupo.php b/gestaoTributaria/fontes/PHP/arrecadacao/instancias/grupoCreditos/PRManterGrupo.php index 7afa852..a181320 100755 --- a/gestaoTributaria/fontes/PHP/arrecadacao/instancias/grupoCreditos/PRManterGrupo.php +++ b/gestaoTributaria/fontes/PHP/arrecadacao/instancias/grupoCreditos/PRManterGrupo.php @@ -29,7 +29,7 @@ * @author Analista: Fabio Bertoldi Rodrigues * @author Desenvolvedor: Lucas Texeira Stephanou - * $Id: PRManterGrupo.php 62838 2015-06-26 13:02:49Z diogo.zarpelon $ + * $Id: PRManterGrupo.php 63839 2015-10-22 18:08:07Z franver $ * Casos de uso: uc-05.03.02 */ @@ -85,7 +85,6 @@ $obRegra = new RARRGrupo; $inCodAtributosSelecionados = $_REQUEST["inCodAtributoSelecionados"]; -//SistemaLegado::mostravar($_REQUEST); switch ($stAcao) { case "incluir": diff --git a/gestaoTributaria/fontes/PHP/arrecadacao/instancias/movimentacoes/PRPermissaoAvaliarImovel.php b/gestaoTributaria/fontes/PHP/arrecadacao/instancias/movimentacoes/PRPermissaoAvaliarImovel.php index dae10f7..b2377d8 100755 --- a/gestaoTributaria/fontes/PHP/arrecadacao/instancias/movimentacoes/PRPermissaoAvaliarImovel.php +++ b/gestaoTributaria/fontes/PHP/arrecadacao/instancias/movimentacoes/PRPermissaoAvaliarImovel.php @@ -32,7 +32,7 @@ * @ignore - * $Id: PRPermissaoAvaliarImovel.php 59612 2014-09-02 12:00:51Z gelson $ + * $Id: PRPermissaoAvaliarImovel.php 63839 2015-10-22 18:08:07Z franver $ Caso de uso: uc-05.03.06 */ @@ -65,7 +65,6 @@ $pgJS = "JS".$stPrograma.".js"; include_once ( $pgJS ); -//SistemaLegado::mostravar($_REQUEST); switch ($stAcao) { case "incluir": $obErro = new Erro; diff --git a/gestaoTributaria/fontes/PHP/arrecadacao/instancias/parcelamento/FMParcelarCreditos.php b/gestaoTributaria/fontes/PHP/arrecadacao/instancias/parcelamento/FMParcelarCreditos.php index a01bef6..9e58d88 100644 --- a/gestaoTributaria/fontes/PHP/arrecadacao/instancias/parcelamento/FMParcelarCreditos.php +++ b/gestaoTributaria/fontes/PHP/arrecadacao/instancias/parcelamento/FMParcelarCreditos.php @@ -32,7 +32,7 @@ * @ignore - * $Id: FMParcelarCreditos.php 59612 2014-09-02 12:00:51Z gelson $ + * $Id: FMParcelarCreditos.php 63839 2015-10-22 18:08:07Z franver $ * Casos de uso: uc-05.03.20 */ @@ -63,8 +63,6 @@ $pgJS = "JS".$stPrograma.".js"; include_once( $pgJS ); -//SistemaLegado::mostravar($_REQUEST); -/*exit("sai");*/ // instancia regra de lancamento $obRARRParcelamento->obRCgm->setNumCgm( $_REQUEST["inCodContribuinte"] ); diff --git a/gestaoTributaria/fontes/PHP/arrecadacao/instancias/parcelamento/FMParcelarCreditosParcelamento.php b/gestaoTributaria/fontes/PHP/arrecadacao/instancias/parcelamento/FMParcelarCreditosParcelamento.php index e87cbdf..b056b6a 100644 --- a/gestaoTributaria/fontes/PHP/arrecadacao/instancias/parcelamento/FMParcelarCreditosParcelamento.php +++ b/gestaoTributaria/fontes/PHP/arrecadacao/instancias/parcelamento/FMParcelarCreditosParcelamento.php @@ -32,7 +32,7 @@ * @ignore - * $Id: FMParcelarCreditosParcelamento.php 59612 2014-09-02 12:00:51Z gelson $ + * $Id: FMParcelarCreditosParcelamento.php 63839 2015-10-22 18:08:07Z franver $ * Casos de uso: uc-05.03.20 */ @@ -65,8 +65,6 @@ include_once( $pgJS ); $stAcao = 'incluir'; -//sistemaLegado::mostravar ( $_REQUEST ); - $obHdnAcao = new Hidden; $obHdnAcao->setName ( "stAcao" ); $obHdnAcao->setValue( $stAcao ); diff --git a/gestaoTributaria/fontes/PHP/arrecadacao/instancias/parcelamento/OCParcelarCreditos.php b/gestaoTributaria/fontes/PHP/arrecadacao/instancias/parcelamento/OCParcelarCreditos.php index 2220399..07518f4 100644 --- a/gestaoTributaria/fontes/PHP/arrecadacao/instancias/parcelamento/OCParcelarCreditos.php +++ b/gestaoTributaria/fontes/PHP/arrecadacao/instancias/parcelamento/OCParcelarCreditos.php @@ -30,7 +30,7 @@ * @author Analista: Fabio Bertoldi Rodrigues * @author Desenvolvedor: Diego Bueno Coelho - * $Id: OCParcelarCreditos.php 59612 2014-09-02 12:00:51Z gelson $ + * $Id: OCParcelarCreditos.php 63839 2015-10-22 18:08:07Z franver $ * Casos de uso: uc-05.03.20 */ @@ -80,7 +80,6 @@ function montaParcelas($numParcelas, $primeiroVencimento, $valorParcelas) $rsListaParcelas = new RecordSet; $rsListaParcelas->preenche ( $arrParcelas); $rsListaParcelas->addFormatacao( "valor" , "NUMERIC_BR" ); -// sistemaLegado::mostravar ( $rsListaParcelas ); $obLista = new Lista; $obLista->setRecordSet ( $rsListaParcelas ); @@ -220,7 +219,7 @@ switch ($_REQUEST ["stCtrl"]) { if ($_REQUEST["inInscricaoImobiliaria"]) { $obRCIMUnidadeAutonoma->roRCIMImovel->setNumeroInscricao( $_REQUEST["inInscricaoImobiliaria"] ); $obRCIMUnidadeAutonoma->roRCIMImovel->listarImoveisConsulta( $rsImoveis ); - sistemaLegado::mostravar ( $rsImoveis ); + if ( $rsImoveis->eof() ) { //nao encontrada $stJs .= 'f.inInscricaoImobiliaria.value = "";'; diff --git a/gestaoTributaria/fontes/PHP/arrecadacao/instancias/parcelamento/PRParcelarCreditos.php b/gestaoTributaria/fontes/PHP/arrecadacao/instancias/parcelamento/PRParcelarCreditos.php index fbf8d4a..3f3e43e 100644 --- a/gestaoTributaria/fontes/PHP/arrecadacao/instancias/parcelamento/PRParcelarCreditos.php +++ b/gestaoTributaria/fontes/PHP/arrecadacao/instancias/parcelamento/PRParcelarCreditos.php @@ -30,7 +30,7 @@ * @author Analista: Fabio Bertold Rodrigues * @author Programador: Diego Bueno Coelho - * $Id: PRParcelarCreditos.php 59612 2014-09-02 12:00:51Z gelson $ + * $Id: PRParcelarCreditos.php 63839 2015-10-22 18:08:07Z franver $ Caso de uso: uc-05.03.20 **/ @@ -67,7 +67,6 @@ switch ($stAcao) { case "incluir": - //sistemaLegado::mostravar ( $sessao->transf5 ); //array das parcelas originais $cont = 0; $contParcelas = 0; foreach ($_REQUEST as $key => $valor) { @@ -77,7 +76,6 @@ switch ($stAcao) { $contParcelas++; } } - //sistemaLegado::mostravar ( $arrayNovasParcelas ); Sessao::write( 'arNovasParcelas', $arrayNovasParcelas ); diff --git a/gestaoTributaria/fontes/PHP/arrecadacao/instancias/relatorios/FMExtratoDebito.php b/gestaoTributaria/fontes/PHP/arrecadacao/instancias/relatorios/FMExtratoDebito.php index 6510632..9e94d6b 100644 --- a/gestaoTributaria/fontes/PHP/arrecadacao/instancias/relatorios/FMExtratoDebito.php +++ b/gestaoTributaria/fontes/PHP/arrecadacao/instancias/relatorios/FMExtratoDebito.php @@ -32,7 +32,7 @@ * @ignore - * $Id: FMExtratoDebito.php 59612 2014-09-02 12:00:51Z gelson $ + * $Id: FMExtratoDebito.php 63839 2015-10-22 18:08:07Z franver $ * Casos de uso: uc-05.03.19 */ @@ -183,7 +183,6 @@ if ( $request->get('inCodImovel') ) { $stFiltro = " AND CE.inscricao_economica = ".$_REQUEST["inInscricaoEconomica"]; $obTCEMCadastroEconomico->recuperaInscricao( $rsEmpresas, $stFiltro ); - #sistemaLegado::mostravar ( $rsEmpresas ); $stTituloInscricao = "Inscrição Econômica"; $stInscricao = $_REQUEST['inInscricaoEconomica'].' - '; diff --git a/gestaoTributaria/fontes/PHP/arrecadacao/instancias/relatorios/OCGeraRelatorioExtratoDebitos.php b/gestaoTributaria/fontes/PHP/arrecadacao/instancias/relatorios/OCGeraRelatorioExtratoDebitos.php index 2c60fbb..1784094 100644 --- a/gestaoTributaria/fontes/PHP/arrecadacao/instancias/relatorios/OCGeraRelatorioExtratoDebitos.php +++ b/gestaoTributaria/fontes/PHP/arrecadacao/instancias/relatorios/OCGeraRelatorioExtratoDebitos.php @@ -32,7 +32,7 @@ * @ignore - * $Id: OCGeraRelatorioExtratoDebitos.php 59612 2014-09-02 12:00:51Z gelson $ + * $Id: OCGeraRelatorioExtratoDebitos.php 63839 2015-10-22 18:08:07Z franver $ * Casos de uso: uc-05.03.23 */ @@ -323,7 +323,6 @@ if ($arFiltro['boTipoRelatorio'] == 'Detalhado') { } #******** TOTAL FIM - #sistemaLegado::mostravar( $rsListaRelatorio ); #******** FORMATANDO COLUNAS POR CAUSA DA DIVIDA $arRelatorio = array(); $rsListaRelatorio->setPrimeiroElemento(); diff --git a/gestaoTributaria/fontes/PHP/arrecadacao/instancias/relatorios/OCRelatorioLancamentoAutomatico.php b/gestaoTributaria/fontes/PHP/arrecadacao/instancias/relatorios/OCRelatorioLancamentoAutomatico.php index b23b680..94563d9 100755 --- a/gestaoTributaria/fontes/PHP/arrecadacao/instancias/relatorios/OCRelatorioLancamentoAutomatico.php +++ b/gestaoTributaria/fontes/PHP/arrecadacao/instancias/relatorios/OCRelatorioLancamentoAutomatico.php @@ -28,7 +28,7 @@ * @package URBEM * @subpackage Regra - * $Id: OCRelatorioLancamentoAutomatico.php 62330 2015-04-24 14:32:29Z lisiane $ + * $Id: OCRelatorioLancamentoAutomatico.php 63884 2015-10-29 12:01:23Z evandro $ * Casos de uso: @@ -51,6 +51,7 @@ $pgProc = "PR".$stPrograma.".php"; $pgOcul = "OC".$stPrograma.".php"; $pgJS = "JS".$stPrograma.".js"; +//relatorioDeLancamentosAutomatico.rptdesign $preview = new PreviewBirt(5,25,7); $preview->setTitulo('Relatório de Lançamentos Automáticos'); $preview->setVersaoBirt( '2.5.0' ); diff --git a/gestaoTributaria/fontes/PHP/arrecadacao/instancias/relatorios/OCRelatorioValoresLancados.php b/gestaoTributaria/fontes/PHP/arrecadacao/instancias/relatorios/OCRelatorioValoresLancados.php index 2937fd5..66c53dd 100644 --- a/gestaoTributaria/fontes/PHP/arrecadacao/instancias/relatorios/OCRelatorioValoresLancados.php +++ b/gestaoTributaria/fontes/PHP/arrecadacao/instancias/relatorios/OCRelatorioValoresLancados.php @@ -30,7 +30,7 @@ * @author Analista: Fabio Bertoldi Rodrigues * @author Desenvolvedor: Diego Bueno Coelho - * $Id: OCRelatorioValoresLancados.php 59612 2014-09-02 12:00:51Z gelson $ + * $Id: OCRelatorioValoresLancados.php 63839 2015-10-22 18:08:07Z franver $ * Casos de uso: uc-05.03.13 */ @@ -108,7 +108,6 @@ if (!$_REQUEST ["stCtrl"]) { $obRARRRelatorioValoresLancados->setSituacao ( $arFiltro['boSituacao'] ); - #sistemaLegado::mostravar( $sessao->filtro ); exit; if (!$stErro) { $obErro = $obRARRRelatorioValoresLancados->geraRecordSetRelatorio ( $rsRecordSet, $rsRecordSetSomas, $arCabecalho, $stOrder ); $stTipoRelatorio = Sessao::read( 'stTipoRelatorio' ); diff --git a/gestaoTributaria/fontes/PHP/arrecadacao/instancias/relatorios/OCResumoLotes.php b/gestaoTributaria/fontes/PHP/arrecadacao/instancias/relatorios/OCResumoLotes.php index cad7771..ebb2af5 100644 --- a/gestaoTributaria/fontes/PHP/arrecadacao/instancias/relatorios/OCResumoLotes.php +++ b/gestaoTributaria/fontes/PHP/arrecadacao/instancias/relatorios/OCResumoLotes.php @@ -32,7 +32,7 @@ * @ignore - * $Id: OCResumoLotes.php 59612 2014-09-02 12:00:51Z gelson $ + * $Id: OCResumoLotes.php 63839 2015-10-22 18:08:07Z franver $ * Casos de uso: uc-05.03.23 */ @@ -52,7 +52,6 @@ include_once ( CAM_GT_ARR_NEGOCIO."RARRPagamento.class.php" ); include_once ( CAM_GT_CIM_NEGOCIO."RCIMUnidadeAutonoma.class.php" ); include_once ( CAM_GT_MON_NEGOCIO."RMONAgencia.class.php" ); -//sistemaLegado::mostravar ( $_REQUEST ); switch ($stCtrl) { case "buscaContribuinte": $stNull = " "; diff --git a/gestaoTributaria/fontes/PHP/arrecadacao/instancias/suspensao/LSManterSuspencao.php b/gestaoTributaria/fontes/PHP/arrecadacao/instancias/suspensao/LSManterSuspencao.php index 6327e5e..bc20834 100755 --- a/gestaoTributaria/fontes/PHP/arrecadacao/instancias/suspensao/LSManterSuspencao.php +++ b/gestaoTributaria/fontes/PHP/arrecadacao/instancias/suspensao/LSManterSuspencao.php @@ -29,7 +29,7 @@ * @author Analista: Fabio Bertoldi Rodrigues * @author Desenvolvedor: Márson Luís Oliveira de Paula - * $Id: LSManterSuspencao.php 59612 2014-09-02 12:00:51Z gelson $ + * $Id: LSManterSuspencao.php 63839 2015-10-22 18:08:07Z franver $ * Casos de uso: uc-05.03.08 */ @@ -83,7 +83,6 @@ if ( is_array($link) ) { } Sessao::write( "link", $link ); -//sistemalegado::mostravar($_REQUEST); // CGM if( $_REQUEST["inCGM"] ) diff --git a/gestaoTributaria/fontes/PHP/arrecadacao/instancias/tipoBaixaManual/PRManterTipoPagamento.php b/gestaoTributaria/fontes/PHP/arrecadacao/instancias/tipoBaixaManual/PRManterTipoPagamento.php index b566a4d..d437f04 100755 --- a/gestaoTributaria/fontes/PHP/arrecadacao/instancias/tipoBaixaManual/PRManterTipoPagamento.php +++ b/gestaoTributaria/fontes/PHP/arrecadacao/instancias/tipoBaixaManual/PRManterTipoPagamento.php @@ -32,7 +32,7 @@ * @subpackage Regra * @ignore - * $Id: PRManterTipoPagamento.php 62838 2015-06-26 13:02:49Z diogo.zarpelon $ + * $Id: PRManterTipoPagamento.php 63839 2015-10-22 18:08:07Z franver $ * Casos de uso: uc-05.03.09 */ @@ -490,7 +490,6 @@ switch ($stAcao) { } break; case "reforma": - //mostravar($_REQUEST); $obErro = new Erro; if ($_REQUEST["hdnVinculoEdificacao"] == "Condomínio") { //ATRIBUTOS diff --git a/gestaoTributaria/fontes/PHP/arrecadacao/instancias/tipoSuspensao/FMManterTipoSuspensao.php b/gestaoTributaria/fontes/PHP/arrecadacao/instancias/tipoSuspensao/FMManterTipoSuspensao.php index 663c792..37ec425 100755 --- a/gestaoTributaria/fontes/PHP/arrecadacao/instancias/tipoSuspensao/FMManterTipoSuspensao.php +++ b/gestaoTributaria/fontes/PHP/arrecadacao/instancias/tipoSuspensao/FMManterTipoSuspensao.php @@ -29,7 +29,7 @@ * @author Analista: Fabio Bertoldi Rodrigues * @author Desenvolvedor: Lucas Texeira Stephanou - * $Id: FMManterTipoSuspensao.php 59612 2014-09-02 12:00:51Z gelson $ + * $Id: FMManterTipoSuspensao.php 63839 2015-10-22 18:08:07Z franver $ * Casos de uso: uc-05.03.07 */ @@ -65,7 +65,6 @@ Sessao::write( "link", "" ); // instancia regra //$obRARRTipoSuspensao = new RARRTipoSuspensao; -//mostravar($_REQUEST); //DEFINICAO DOS COMPONENTES $obHdnCtrl = new Hidden; $obHdnCtrl->setName ( "stCtrl" ); diff --git a/gestaoTributaria/fontes/PHP/arrecadacao/popups/desoneracao/LSProcurarDesoneracao.php b/gestaoTributaria/fontes/PHP/arrecadacao/popups/desoneracao/LSProcurarDesoneracao.php index b75c19c..84a46a3 100755 --- a/gestaoTributaria/fontes/PHP/arrecadacao/popups/desoneracao/LSProcurarDesoneracao.php +++ b/gestaoTributaria/fontes/PHP/arrecadacao/popups/desoneracao/LSProcurarDesoneracao.php @@ -32,7 +32,7 @@ * @ignore - * $Id: LSProcurarDesoneracao.php 59612 2014-09-02 12:00:51Z gelson $ + * $Id: LSProcurarDesoneracao.php 63839 2015-10-22 18:08:07Z franver $ Caso de uso: uc-05.03.04 **/ @@ -64,8 +64,6 @@ include_once($pgJs); $obRARRDesoneracao = new RARRDesoneracao; -//mostravar($_REQUEST); - $stFiltro = ""; $stLink .= "&stAcao=".$_REQUEST["stAcao"]; diff --git a/gestaoTributaria/fontes/PHP/cadastroEconomico/anexos/alvara/alvara_atividade_MARIANA.odt b/gestaoTributaria/fontes/PHP/cadastroEconomico/anexos/alvara/alvara_atividade_MARIANA.odt index d6b0238..5d7d45c 100644 Binary files a/gestaoTributaria/fontes/PHP/cadastroEconomico/anexos/alvara/alvara_atividade_MARIANA.odt and b/gestaoTributaria/fontes/PHP/cadastroEconomico/anexos/alvara/alvara_atividade_MARIANA.odt differ diff --git a/gestaoTributaria/fontes/PHP/cadastroEconomico/anexos/alvara/alvara_atividade_sanitario_MARIANA.odt b/gestaoTributaria/fontes/PHP/cadastroEconomico/anexos/alvara/alvara_atividade_sanitario_MARIANA.odt index 32955c0..0e20952 100755 Binary files a/gestaoTributaria/fontes/PHP/cadastroEconomico/anexos/alvara/alvara_atividade_sanitario_MARIANA.odt and b/gestaoTributaria/fontes/PHP/cadastroEconomico/anexos/alvara/alvara_atividade_sanitario_MARIANA.odt differ diff --git a/gestaoTributaria/fontes/PHP/cadastroEconomico/anexos/alvara/alvara_horario_especial_MARIANA.odt b/gestaoTributaria/fontes/PHP/cadastroEconomico/anexos/alvara/alvara_horario_especial_MARIANA.odt index 4e01e1b..2a2627f 100644 Binary files a/gestaoTributaria/fontes/PHP/cadastroEconomico/anexos/alvara/alvara_horario_especial_MARIANA.odt and b/gestaoTributaria/fontes/PHP/cadastroEconomico/anexos/alvara/alvara_horario_especial_MARIANA.odt differ diff --git a/gestaoTributaria/fontes/PHP/cadastroEconomico/anexos/alvara/alvara_horario_especial_sanitario_MARIANA.odt b/gestaoTributaria/fontes/PHP/cadastroEconomico/anexos/alvara/alvara_horario_especial_sanitario_MARIANA.odt index 8f16802..8d487bd 100755 Binary files a/gestaoTributaria/fontes/PHP/cadastroEconomico/anexos/alvara/alvara_horario_especial_sanitario_MARIANA.odt and b/gestaoTributaria/fontes/PHP/cadastroEconomico/anexos/alvara/alvara_horario_especial_sanitario_MARIANA.odt differ diff --git a/gestaoTributaria/fontes/PHP/cadastroEconomico/classes/componentes/ITextLicenca.class.php b/gestaoTributaria/fontes/PHP/cadastroEconomico/classes/componentes/ITextLicenca.class.php index 29f65e7..0856092 100644 --- a/gestaoTributaria/fontes/PHP/cadastroEconomico/classes/componentes/ITextLicenca.class.php +++ b/gestaoTributaria/fontes/PHP/cadastroEconomico/classes/componentes/ITextLicenca.class.php @@ -33,7 +33,7 @@ * @package URBEM * @subpackage - * $Id: ITextLicenca.class.php 59612 2014-09-02 12:00:51Z gelson $ + * $Id: ITextLicenca.class.php 63839 2015-10-22 18:08:07Z franver $ * Casos de uso: uc-05.02.12 @@ -97,7 +97,6 @@ class ITextLicenca extends Objeto $obTConfiguracao->setDado ( 'exercicio', Sessao::getExercicio() ); $obTConfiguracao->recuperaPorChave ( $rsNumeroLicenca ); $inNumeroLicenca = $rsNumeroLicenca->getCampo('valor'); - #sistemaLEgado::mostravar ( $rsNumeroLicenca ); # while ( !$rsNumeroLicenca->eof() ) { # if ( (int) $rsNumeroLicenca->getCampo('exercicio') == $this->obTxtLicenca->inExercicio ) { // $inNumeroLicenca = $rsNumeroLicenca->getCampo('valor'); diff --git a/gestaoTributaria/fontes/PHP/cadastroEconomico/classes/componentes/MontaAtividade.class.php b/gestaoTributaria/fontes/PHP/cadastroEconomico/classes/componentes/MontaAtividade.class.php index d1bdada..1d4ca58 100755 --- a/gestaoTributaria/fontes/PHP/cadastroEconomico/classes/componentes/MontaAtividade.class.php +++ b/gestaoTributaria/fontes/PHP/cadastroEconomico/classes/componentes/MontaAtividade.class.php @@ -33,7 +33,7 @@ * @package framework * @subpackage componentes -* $Id: MontaAtividade.class.php 59807 2014-09-12 12:31:14Z evandro $ +* $Id: MontaAtividade.class.php 63839 2015-10-22 18:08:07Z franver $ * Casos de uso: uc-05.02.07 */ @@ -511,7 +511,7 @@ function preencheProxComboCNAE($inPosCombo, $inNumCombos) $inContador = 1; if ($inPosCombo != $inNumCombos) { $this->stValorReduzido .= "."; -//sistemaLegado::mostravar( $rsListaCnae ); + while ( !$rsListaCnae->eof() ) { $stChaveCnae = $rsListaCnae->getCampo( "cod_nivel" )."§"; $stChaveCnae .= $rsListaCnae->getCampo( "cod_atividade")."§"; @@ -550,7 +550,6 @@ function preencheCombos2() $stValorReduzido = $this->stValorReduzido; $arValorReduzido = explode( ".", $stValorReduzido ); -//sistemaLegado::mostravar( $arValorReduzido ); /* $stTMP = $arValorReduzido[2]; $arValorReduzido[2] = substr( $stTMP, 0, 1 ); @@ -566,12 +565,10 @@ function preencheCombos2() $stValorSelecionar = $rsListaCnae->getCampo( "cod_atividade"); } -//sistemaLegado::mostravar( $arValorReduzido ); - $this->obRCEMAtividade->setCodigoNivel ( 1 ); $this->obRCEMAtividade->setValorReduzido( "" ); $obErro = $this->obRCEMAtividade->listarAtividadeComboCNAE( $rsListaCnae ); -//echo "teste1
    ";exit; + $inContador = 1; $inPosCombo = 1; while ( !$rsListaCnae->Eof() ) { @@ -806,7 +803,6 @@ function preencheCombosAtividade() $this->obRCEMAtividade->setCodigoNivel ( $this->inCodigoNivel ); // $this->obRCEMAtividade->setCodigoNivel ( 3 ); $obErro = $this->obRCEMAtividade->listarNiveisAnteriores( $rsListaNivel ); - //sistemaLegado::mostravar ( $rsListaNivel ); } else { $this->obRCEMAtividade->recuperaVigenciaAtual( $rsVigenciaAtual ); diff --git a/gestaoTributaria/fontes/PHP/cadastroEconomico/classes/mapeamento/TCEMCadastroEconomicoEmpresaDireito.class.php b/gestaoTributaria/fontes/PHP/cadastroEconomico/classes/mapeamento/TCEMCadastroEconomicoEmpresaDireito.class.php index 85df739..0856f4f 100755 --- a/gestaoTributaria/fontes/PHP/cadastroEconomico/classes/mapeamento/TCEMCadastroEconomicoEmpresaDireito.class.php +++ b/gestaoTributaria/fontes/PHP/cadastroEconomico/classes/mapeamento/TCEMCadastroEconomicoEmpresaDireito.class.php @@ -33,7 +33,7 @@ * @package URBEM * @subpackage Mapeamento - * $Id: TCEMCadastroEconomicoEmpresaDireito.class.php 59612 2014-09-02 12:00:51Z gelson $ + * $Id: TCEMCadastroEconomicoEmpresaDireito.class.php 63839 2015-10-22 18:08:07Z franver $ * Casos de uso: uc-05.02.10 */ @@ -86,7 +86,6 @@ function recuperaInscricao(&$rsRecordSet, $stFiltro = "", $stOrdem = "", $boTran $rsRecordSet = new RecordSet; $stSql = $this->montaRecuperaInscricao().$stFiltro.$stOrdem; $this->stDebug = $stSql; -//sistemaLegado::mostravar( $stSql );exit; $obErro = $obConexao->executaSQL( $rsRecordSet, $stSql, "", $boTransacao ); return $obErro; diff --git a/gestaoTributaria/fontes/PHP/cadastroEconomico/classes/negocio/RCEMLicencaDiversa.class.php b/gestaoTributaria/fontes/PHP/cadastroEconomico/classes/negocio/RCEMLicencaDiversa.class.php index a5e67dd..00cc164 100755 --- a/gestaoTributaria/fontes/PHP/cadastroEconomico/classes/negocio/RCEMLicencaDiversa.class.php +++ b/gestaoTributaria/fontes/PHP/cadastroEconomico/classes/negocio/RCEMLicencaDiversa.class.php @@ -33,7 +33,7 @@ * @package URBEM * @subpackage Regra - * $Id: RCEMLicencaDiversa.class.php 59612 2014-09-02 12:00:51Z gelson $ + * $Id: RCEMLicencaDiversa.class.php 63839 2015-10-22 18:08:07Z franver $ * Casos de uso: uc-05.02.12 */ @@ -192,8 +192,6 @@ function concederLicenca($boTransacao = "") if (!$obErro->ocorreu() ) { $arElementos = $this->arElementos; - #echo '

    ARRAY DE ELEMENTOS

    '; - #sistemaLegado::mostravar ( $arElementos ); #exit; for ($inCount=0;$inCount < count($arElementos);$inCount++) { $inCodElemento = $arElementos[$inCount]["inCodigoElemento"]; diff --git a/gestaoTributaria/fontes/PHP/cadastroEconomico/classes/negocio/RCEMTipoLicencaUsoSolo.class.php b/gestaoTributaria/fontes/PHP/cadastroEconomico/classes/negocio/RCEMTipoLicencaUsoSolo.class.php index a2e260d..88fa6d1 100755 --- a/gestaoTributaria/fontes/PHP/cadastroEconomico/classes/negocio/RCEMTipoLicencaUsoSolo.class.php +++ b/gestaoTributaria/fontes/PHP/cadastroEconomico/classes/negocio/RCEMTipoLicencaUsoSolo.class.php @@ -32,7 +32,7 @@ * @package URBEM * @subpackage Regra - * $Id: RCEMTipoLicencaUsoSolo.class.php 59612 2014-09-02 12:00:51Z gelson $ + * $Id: RCEMTipoLicencaUsoSolo.class.php 63839 2015-10-22 18:08:07Z franver $ * Casos de uso: uc-05.02.12 */ @@ -185,14 +185,12 @@ $obErro = $this->obTransacao->abreTransacao( $boFlagTransacao, $boTransacao ); } //CADASTRA OS REGISTROS NA TABELA ECONOMICO.TIPO_LICENCA_MODELO_DOCUMENTO -// sistemalegado::mostravar($sessao);die(); $arDocumentosSessao = Sessao::read( "documentos" ); $inRegistros = count ( $arDocumentosSessao ); if ( !$obErro->ocorreu() ) { $inX = 0; while ( $inX < $inRegistros && !$obErro->ocorreu() ) { -// sistemalegado::mostravar("entroiu no while");die(); $inCodTipoDocumentoAtual = $arDocumentosSessao[$inX]['cod_tipo_documento']; $inCodDocumentoAtual = $arDocumentosSessao[$inX]['cod_documento']; @@ -230,10 +228,8 @@ function alterarTipoLicencaDiversa($boTransacao = "") if ( !$obErro->ocorreu() ) { $this->obTCEMTipoLicencaDiversa->setDado( "cod_tipo" , $this->inCodigoTipoLicencaDiversa ); $this->obTCEMTipoLicencaDiversa->setDado( "nom_tipo" , $this->stNomeTipoLicencaDiversa ); -// sistemalegado::mostravar($sessao);die(); $this->inTipoUtilizacao = Sessao::read( 'inTipoUtilizacao' ); $this->obTCEMTipoLicencaDiversa->setDado( "cod_utilizacao", $this->inTipoUtilizacao); -// sistemalegado::mostravar("aqui".$this->inTipoUtilizacao);die(); // $this->obTCEMTipoLicencaDiversa->setDado( "cod_utilizacao", $this->inTipoUtilizacao ); $obErro = $this->validaNomeTipoLicencaDiversa ($boTransacao); @@ -250,7 +246,6 @@ function alterarTipoLicencaDiversa($boTransacao = "") if ( !$obErro->ocorreu() ) { if ( count( $this->arRCEMElemento ) ) { - // sistemalegado::mostravar($boTransacao); $obErro = $this->alterarTipoLicencaDiversaElemento( $boTransacao ); } else { $this->addTipoLicencaDiversaElemento(); @@ -355,7 +350,6 @@ function alterarTipoLicencaDiversaElemento($boFlagTransacao, $boTransacao = "") if ( !isset( $arElementoTipoLicencaDiversa[$obRCEMElemento->getCodigoElemento()] ) ) { $this->roUltimoElemento->obTCEMElementoTipoLicencaDiversa->setDado( "cod_tipo",$this->inCodigoTipoLicencaDiversa ); $this->roUltimoElemento->obTCEMElementoTipoLicencaDiversa->setDado( "cod_utilizacao", $this->inCodUtilizacao ); - // sistemalegado::mostravar($this->roUltimoElemento->obTCEMElementoTipoLicencaDiversa); $obRCEMElemento->referenciaTipoLicencaDiversa($this); $this->roUltimoElemento->obTCEMElementoTipoLicencaDiversa->setDado("cod_elemento", $obRCEMElemento->getCodigoElemento()); $this->roUltimoElemento->obTCEMElementoTipoLicencaDiversa->setDado("ativo", true ); @@ -417,7 +411,7 @@ function listarTipoLicencaDiversa(&$rsRecordSet, $boTransacao = "") $stOrdem = " ORDER BY etld.cod_tipo"; $obErro = $this->obTCEMTipoLicencaDiversa->recuperaTipoLicencaDiversa( $rsRecordSet, $stFiltro, $stOrdem, $boTransacao ); -/// $this->obTCEMTipoLicencaDiversa->debug(); #exit; + return $obErro; } @@ -440,7 +434,6 @@ function consultar(&$rsRecordSet, $boTransacao = "") if ( !$obErro->ocorreu() ) { $this->setNomeTipoLicencaDiversa( $rsRecordSet->getCampo("nom_tipo") ); $this->setTipoUtilizacao( $rsRecordSet->getCampo("cod_utilizacao") ); -// sistemalegado::mostravar( $rsRecordSet->getCampo("cod_utilizacao") ); } return $obErro; diff --git a/gestaoTributaria/fontes/PHP/cadastroEconomico/instancias/categoria/LSManterCategoria.php b/gestaoTributaria/fontes/PHP/cadastroEconomico/instancias/categoria/LSManterCategoria.php index 667899c..114969c 100644 --- a/gestaoTributaria/fontes/PHP/cadastroEconomico/instancias/categoria/LSManterCategoria.php +++ b/gestaoTributaria/fontes/PHP/cadastroEconomico/instancias/categoria/LSManterCategoria.php @@ -31,7 +31,7 @@ * @ignore - * $Id: LSManterCategoria.php 59612 2014-09-02 12:00:51Z gelson $ + * $Id: LSManterCategoria.php 63839 2015-10-22 18:08:07Z franver $ * Casos de uso: uc-05.02.09 @@ -72,7 +72,6 @@ switch ($stAcao) { case 'excluir' : $pgProx = $pgProc; break; DEFAULT : $pgProx = $pgForm; } -//mostravar($stAcao); //MANTEM FILTRO E PAGINACAO $link = Sessao::read( "link" ); $stLink .= "&stAcao=".$stAcao; @@ -139,7 +138,6 @@ $obLista->ultimaAcao->addCampo("&inCodigoCategoria", "cod_categoria" $obLista->ultimaAcao->addCampo("&stDescQuestao","[cod_categoria]-[nom_categoria]"); if ($stAcao == "excluir") { $obLista->ultimaAcao->setLink( $stCaminho.$pgProx."?".Sessao::getId().$stLink ); - // mostravar(Sessao::getId().$stLink); } else { $obLista->ultimaAcao->setLink( $pgProx."?".Sessao::getId().$stLink ); } diff --git a/gestaoTributaria/fontes/PHP/cadastroEconomico/instancias/categoria/PRManterCategoria.php b/gestaoTributaria/fontes/PHP/cadastroEconomico/instancias/categoria/PRManterCategoria.php index 552d4e4..7283b43 100755 --- a/gestaoTributaria/fontes/PHP/cadastroEconomico/instancias/categoria/PRManterCategoria.php +++ b/gestaoTributaria/fontes/PHP/cadastroEconomico/instancias/categoria/PRManterCategoria.php @@ -31,7 +31,7 @@ * @ignore - * $Id: PRManterCategoria.php 59612 2014-09-02 12:00:51Z gelson $ + * $Id: PRManterCategoria.php 63839 2015-10-22 18:08:07Z franver $ * Casos de uso: uc-05.02.09 @@ -70,7 +70,6 @@ $obErro = new Erro; switch ($stAcao) { case "incluir": - //mostravar($_REQUEST); //Seta a categoria $obRCEMCategoria->setCodigoCategoria ( $_REQUEST["inCodigoCategoria"] ); $obRCEMCategoria->setNomeCategoria ( trim( $_REQUEST["stNomeCategoria"] ) ); @@ -84,7 +83,6 @@ switch ($stAcao) { break; case "alterar": - //mostravar($_REQUEST); //seta a categoria $obRCEMCategoria->setCodigoCategoria ( $_REQUEST["inCodigoCategoria"] ); $obRCEMCategoria->setNomeCategoria ( trim( $_REQUEST["stNomeCategoria"] ) ); diff --git a/gestaoTributaria/fontes/PHP/cadastroEconomico/instancias/consultas/FMConsultarLicenca.php b/gestaoTributaria/fontes/PHP/cadastroEconomico/instancias/consultas/FMConsultarLicenca.php index ebe3cc7..4c021f2 100644 --- a/gestaoTributaria/fontes/PHP/cadastroEconomico/instancias/consultas/FMConsultarLicenca.php +++ b/gestaoTributaria/fontes/PHP/cadastroEconomico/instancias/consultas/FMConsultarLicenca.php @@ -31,7 +31,7 @@ * @ignore - * $Id: FMConsultarLicenca.php 59612 2014-09-02 12:00:51Z gelson $ + * $Id: FMConsultarLicenca.php 63839 2015-10-22 18:08:07Z franver $ * Casos de uso: uc-05.02.21 */ @@ -118,7 +118,6 @@ if ( count( $arLicencasSessao ) > 0) { $rsLicencaLista->preenche( $arLicencasSessao ); } -//sistemaLegado::mostravar( $rsLicenca ); $stJs = montaListaLicencas( $rsLicencaLista ); // RECUPERA OS DADOS DAS MODALIDADES RELACIONADAS A INSCRICAO ECONOMICA diff --git a/gestaoTributaria/fontes/PHP/cadastroEconomico/instancias/consultas/OCConsultarCadastroEconomico.php b/gestaoTributaria/fontes/PHP/cadastroEconomico/instancias/consultas/OCConsultarCadastroEconomico.php index 21ad562..7cc7c44 100644 --- a/gestaoTributaria/fontes/PHP/cadastroEconomico/instancias/consultas/OCConsultarCadastroEconomico.php +++ b/gestaoTributaria/fontes/PHP/cadastroEconomico/instancias/consultas/OCConsultarCadastroEconomico.php @@ -30,7 +30,7 @@ * @author Marcelo B. Paulino * @ignore - * $Id: OCConsultarCadastroEconomico.php 59612 2014-09-02 12:00:51Z gelson $ + * $Id: OCConsultarCadastroEconomico.php 63839 2015-10-22 18:08:07Z franver $ * Casos de uso: uc-05.02.21 */ @@ -612,8 +612,6 @@ function montaListaElementos($rsElementos) function montaListaLicencas($rsLicencas) { - #sistemaLegado::mostravar ( $rsLicencas ); - $table = new Table(); $table->setRecordset( $rsLicencas ); $table->setSummary('Lista de Licenças'); diff --git a/gestaoTributaria/fontes/PHP/cadastroEconomico/instancias/emissao/LSManterEmissaoImobiliaria.php b/gestaoTributaria/fontes/PHP/cadastroEconomico/instancias/emissao/LSManterEmissaoImobiliaria.php index 2deaaf9..61adc45 100755 --- a/gestaoTributaria/fontes/PHP/cadastroEconomico/instancias/emissao/LSManterEmissaoImobiliaria.php +++ b/gestaoTributaria/fontes/PHP/cadastroEconomico/instancias/emissao/LSManterEmissaoImobiliaria.php @@ -138,13 +138,9 @@ if ($_REQUEST['stCodDocumento']) { if ( $stFiltro ) $stFiltro = " WHERE ".substr( $stFiltro, 0, strlen($stFiltro) - 4 ); -#echo 'filtro: '.$stFiltro; - $obTCEMLicencaDocumento = new TCEMLicencaDocumento; $stOrdem = " limit 1 "; $obTCEMLicencaDocumento->recuperaListaDocumentoLS( $rsDocumentos, $stFiltro, $stOrdem ); -#$obTCEMLicencaDocumento->debug(); -#sistemaLegado::mostravar( $rsDocumentos ); $obForm = new Form; $obForm->setAction ( $pgForm ); diff --git a/gestaoTributaria/fontes/PHP/cadastroEconomico/instancias/inscreconomica/FMDefinirAtividades.php b/gestaoTributaria/fontes/PHP/cadastroEconomico/instancias/inscreconomica/FMDefinirAtividades.php index 15654f0..465d29b 100755 --- a/gestaoTributaria/fontes/PHP/cadastroEconomico/instancias/inscreconomica/FMDefinirAtividades.php +++ b/gestaoTributaria/fontes/PHP/cadastroEconomico/instancias/inscreconomica/FMDefinirAtividades.php @@ -31,7 +31,7 @@ * @ignore - * $Id: FMDefinirAtividades.php 59612 2014-09-02 12:00:51Z gelson $ + * $Id: FMDefinirAtividades.php 63839 2015-10-22 18:08:07Z franver $ * Casos de uso: uc-05.02.10 @@ -107,7 +107,6 @@ $obRCEMInscricaoAtividade->roRCEMInscricaoEconomica->setInscricaoEconomica( $_RE //MONTAGEM DA LISTA DE HORÁRIOS JÁ CADASTRADOS $obRCEMInscricaoAtividade->roRCEMInscricaoEconomica->listarInscricaoHorarios( $rsHorarios ); -//sistemaLegado::mostravar ( $rsHorarios ); $inCount=0; $arHorariosSessao = array(); while ( !$rsHorarios->eof() ) { diff --git a/gestaoTributaria/fontes/PHP/cadastroEconomico/instancias/inscreconomica/FMManterInscricao.php b/gestaoTributaria/fontes/PHP/cadastroEconomico/instancias/inscreconomica/FMManterInscricao.php index ba1609f..e0b4dad 100755 --- a/gestaoTributaria/fontes/PHP/cadastroEconomico/instancias/inscreconomica/FMManterInscricao.php +++ b/gestaoTributaria/fontes/PHP/cadastroEconomico/instancias/inscreconomica/FMManterInscricao.php @@ -31,7 +31,7 @@ * @ignore - * $Id: FMManterInscricao.php 59612 2014-09-02 12:00:51Z gelson $ + * $Id: FMManterInscricao.php 63839 2015-10-22 18:08:07Z franver $ * Casos de uso: uc-05.02.10 @@ -93,7 +93,6 @@ $obTxtCodigoEnquadramento->setInteiro ( true ); $rsEnquadramento = new RecordSet; $obRCEMInscricaoEconomica->listarCadastroAtributo( $rsEnquadramento ); -mostravar($rsEnquadramento); $obCmbEnquadramento = new Select; $obCmbEnquadramento->setName ( "stEnquadramento" ); diff --git a/gestaoTributaria/fontes/PHP/cadastroEconomico/instancias/inscreconomica/FMManterInscricaoConvFD.php b/gestaoTributaria/fontes/PHP/cadastroEconomico/instancias/inscreconomica/FMManterInscricaoConvFD.php index 463666d..de8a4fa 100644 --- a/gestaoTributaria/fontes/PHP/cadastroEconomico/instancias/inscreconomica/FMManterInscricaoConvFD.php +++ b/gestaoTributaria/fontes/PHP/cadastroEconomico/instancias/inscreconomica/FMManterInscricaoConvFD.php @@ -31,7 +31,7 @@ * @ignore - * $Id: FMManterInscricaoConvFD.php 59612 2014-09-02 12:00:51Z gelson $ + * $Id: FMManterInscricaoConvFD.php 63839 2015-10-22 18:08:07Z franver $ * Casos de uso: uc-05.02.10 @@ -373,8 +373,6 @@ $arChaveAtributoInscricao = array( "inscricao_economica" => $_REQUEST["inInscri $obRCEMInscricaoEconomica->obRCadastroDinamico->setChavePersistenteValores( $arChaveAtributoInscricao ); $obRCEMInscricaoEconomica->obRCadastroDinamico->recuperaAtributosSelecionadosValores( $rsAtributos ); -//sistemaLegado::mostravar ( $rsAtributos ); - $obMontaAtributos = new MontaAtributos; $obMontaAtributos->setTitulo ( "Atributos" ); $obMontaAtributos->setName ( "Atributo_" ); diff --git a/gestaoTributaria/fontes/PHP/cadastroEconomico/instancias/inscreconomica/OCDefinirAtividades.php b/gestaoTributaria/fontes/PHP/cadastroEconomico/instancias/inscreconomica/OCDefinirAtividades.php index b1d9189..4fb8c5f 100755 --- a/gestaoTributaria/fontes/PHP/cadastroEconomico/instancias/inscreconomica/OCDefinirAtividades.php +++ b/gestaoTributaria/fontes/PHP/cadastroEconomico/instancias/inscreconomica/OCDefinirAtividades.php @@ -30,7 +30,7 @@ * @author Tonismar Régis Bernardo * @ignore - * $Id: OCDefinirAtividades.php 59889 2014-09-18 14:57:20Z carlos.silva $ + * $Id: OCDefinirAtividades.php 63839 2015-10-22 18:08:07Z franver $ * Casos de uso: uc-05.02.10 @@ -273,7 +273,6 @@ function BuscaAtividade() return $stJs; } -//sistemaLegado::mostravar($_REQUEST["stCtrl"]); switch ($_REQUEST["stCtrl"]) { case "buscaAtividade": sistemaLegado::executaFrameOculto( BuscaAtividade() ); @@ -559,7 +558,6 @@ switch ($_REQUEST["stCtrl"]) { $obMontaAtividade->setValorReduzido ( $_REQUEST["stChaveAtividade"] ); $obMontaAtividade->preencheCombos2(); } else { - //sistemaLegado::mostravar($_REQUEST); $obMontaAtividade->setCodigoVigencia ( $inCodVigencia ); $obMontaAtividade->setCodigoNivel ( $_REQUEST["inCodigoNivel"] ); $obMontaAtividade->setValorReduzido ( $_REQUEST["stChaveAtividade"] ); diff --git a/gestaoTributaria/fontes/PHP/cadastroEconomico/instancias/inscreconomica/OCDefinirElementos.php b/gestaoTributaria/fontes/PHP/cadastroEconomico/instancias/inscreconomica/OCDefinirElementos.php index 5efd17f..d26adb9 100755 --- a/gestaoTributaria/fontes/PHP/cadastroEconomico/instancias/inscreconomica/OCDefinirElementos.php +++ b/gestaoTributaria/fontes/PHP/cadastroEconomico/instancias/inscreconomica/OCDefinirElementos.php @@ -31,7 +31,7 @@ * @ignore - * $Id: OCDefinirElementos.php 59612 2014-09-02 12:00:51Z gelson $ + * $Id: OCDefinirElementos.php 63839 2015-10-22 18:08:07Z franver $ * Casos de uso: uc-05.02.10 @@ -429,7 +429,6 @@ switch ($_REQUEST["stCtrl"]) { } $obMontaAtributosElemento->setRecordSet ( $rsAtributosElementos ); - //mostravar($rsAtributosElementos); $obMontaAtributosElemento->recuperaValores(); $obFormulario = new Formulario; @@ -507,7 +506,6 @@ switch ($_REQUEST["stCtrl"]) { } break; case "preencheCombosAtividade": - //sistemaLegado::mostravar($_REQUEST); $obMontaAtividade->setCodigoVigencia( $_REQUEST["inCodigoVigencia"] ); $obMontaAtividade->setCodigoNivel ( $_REQUEST["inCodigoNivel"] ); $obMontaAtividade->setValorReduzido ( $_REQUEST["stChaveAtividade"] ); diff --git a/gestaoTributaria/fontes/PHP/cadastroEconomico/instancias/inscreconomica/PRDefinirElementos.php b/gestaoTributaria/fontes/PHP/cadastroEconomico/instancias/inscreconomica/PRDefinirElementos.php index 928aa6c..c45aeb6 100755 --- a/gestaoTributaria/fontes/PHP/cadastroEconomico/instancias/inscreconomica/PRDefinirElementos.php +++ b/gestaoTributaria/fontes/PHP/cadastroEconomico/instancias/inscreconomica/PRDefinirElementos.php @@ -31,7 +31,7 @@ * @ignore - * $Id: PRDefinirElementos.php 59612 2014-09-02 12:00:51Z gelson $ + * $Id: PRDefinirElementos.php 63839 2015-10-22 18:08:07Z franver $ * Casos de uso: uc-05.02.10 @@ -71,9 +71,6 @@ $pgOcul = "OC".$stPrograma.".php"; $pgJS = "JS".$stPrograma.".js" ; //$pgDefResp = "FMDefinirResponsaveis.php"; -//sistemaLegado::mostravar($sessao->transf7["elementos"]); -//exit(); - $obErro = new Erro; $obRCEMInscricaoEconomica = new RCEMInscricaoEconomica; @@ -86,7 +83,6 @@ switch ($stAcao) { $obRCEMInscricaoEconomica->setInscricaoEconomica( $_REQUEST['inInscricaoEconomica'] ); $arElementosSessao = Sessao::read( "elementos" ); if ( count( $arElementosSessao ) > 0 ) { -// sistemaLegado::mostravar($sessao->transf7["elementos"]);exit; foreach ($arElementosSessao as $inChave => $arElementos) { $obRCEMInscricaoEconomica->addElementoAtividade(); $obRCEMInscricaoEconomica->roUltimoElemento->setCodigoElemento( $arElementos['inCodigoElemento'] ); @@ -98,8 +94,6 @@ switch ($stAcao) { } else { $obErro->setDescricao( "É necessário a inclusão de pelo menos um elemento." ); } -/* SistemaLegado::mostravar($arElementos['arElementos']); - exit(); */ if ( !$obErro->ocorreu() ) { $obErro = $obRCEMInscricaoEconomica->definirElementos(); diff --git a/gestaoTributaria/fontes/PHP/cadastroEconomico/instancias/licenca/FMAlterarLicencaGeralTipo.php b/gestaoTributaria/fontes/PHP/cadastroEconomico/instancias/licenca/FMAlterarLicencaGeralTipo.php index e98c53f..098ba56 100644 --- a/gestaoTributaria/fontes/PHP/cadastroEconomico/instancias/licenca/FMAlterarLicencaGeralTipo.php +++ b/gestaoTributaria/fontes/PHP/cadastroEconomico/instancias/licenca/FMAlterarLicencaGeralTipo.php @@ -31,7 +31,7 @@ * @package URBEM * @subpackage Regra - * $Id: FMAlterarLicencaGeralTipo.php 59612 2014-09-02 12:00:51Z gelson $ + * $Id: FMAlterarLicencaGeralTipo.php 63839 2015-10-22 18:08:07Z franver $ * Casos de uso: uc-05.02.12 @@ -74,7 +74,6 @@ if ( empty( $stAcao ) ) { Sessao::write( "lsElementos", array() ); Sessao::write( "inNumElementos", 0 ); -//sistemalegado::mostravar( $_REQUEST ); Sessao::write('acao', '462' ); $inCodAlvara = $_REQUEST["cod_documento"]; /* Atributos Dinamicos */ diff --git a/gestaoTributaria/fontes/PHP/cadastroEconomico/instancias/licenca/FMConcederLicencaGeralUsoSolo.php b/gestaoTributaria/fontes/PHP/cadastroEconomico/instancias/licenca/FMConcederLicencaGeralUsoSolo.php index a0acf89..8740002 100755 --- a/gestaoTributaria/fontes/PHP/cadastroEconomico/instancias/licenca/FMConcederLicencaGeralUsoSolo.php +++ b/gestaoTributaria/fontes/PHP/cadastroEconomico/instancias/licenca/FMConcederLicencaGeralUsoSolo.php @@ -31,7 +31,7 @@ * @package URBEM * @subpackage Regra - * $Id: FMConcederLicencaGeralUsoSolo.php 59612 2014-09-02 12:00:51Z gelson $ + * $Id: FMConcederLicencaGeralUsoSolo.php 63839 2015-10-22 18:08:07Z franver $ * Casos de uso: uc-05.02.12 @@ -66,7 +66,6 @@ if ( empty( $stAcao ) ) { $stAcao = "incluir"; } -//SistemaLegado::mostravar($_REQUEST); //$sessao->transf4["lsElementos"] = array(); //$sessao->transf4["inNumElementos"] = 0; Sessao::write('acao', '462'); diff --git a/gestaoTributaria/fontes/PHP/cadastroEconomico/instancias/licenca/LSLicencaGeral.php b/gestaoTributaria/fontes/PHP/cadastroEconomico/instancias/licenca/LSLicencaGeral.php index 97d6fa7..3405b6a 100755 --- a/gestaoTributaria/fontes/PHP/cadastroEconomico/instancias/licenca/LSLicencaGeral.php +++ b/gestaoTributaria/fontes/PHP/cadastroEconomico/instancias/licenca/LSLicencaGeral.php @@ -31,7 +31,7 @@ * @ignore - * $Id: LSLicencaGeral.php 59612 2014-09-02 12:00:51Z gelson $ + * $Id: LSLicencaGeral.php 63839 2015-10-22 18:08:07Z franver $ * Casos de uso: uc-05.02.12 @@ -71,7 +71,6 @@ $pgOcul = "OC".$stPrograma.".php"; //$stCaminho = "../modulos/cadastroEconomico/hierarqativ/"; //Define arquivos PHP para cada acao -// SistemaLegado::mostravar("aqui||".$_REQUEST["inCodigoTipo"]);die(); $stAcao = $request->get('stAcao'); switch ($stAcao) { case 'alterar' : $pgProx = $pgForm; break; @@ -106,7 +105,6 @@ $rsLista = new RecordSet; if ($_REQUEST["inCGM"]) { $obRegra->obRCGM->setNumCGM($_REQUEST["inCGM"]); } -//SistemaLegado::mostravar($_REQUEST); if ($_REQUEST["stLicenca"]) { $stTipoLicenca = $_REQUEST["stTipoLicenca"]; diff --git a/gestaoTributaria/fontes/PHP/cadastroEconomico/instancias/licenca/OCConcederLicencaGeral.php b/gestaoTributaria/fontes/PHP/cadastroEconomico/instancias/licenca/OCConcederLicencaGeral.php index aeceb05..e926765 100755 --- a/gestaoTributaria/fontes/PHP/cadastroEconomico/instancias/licenca/OCConcederLicencaGeral.php +++ b/gestaoTributaria/fontes/PHP/cadastroEconomico/instancias/licenca/OCConcederLicencaGeral.php @@ -31,7 +31,7 @@ * @ignore - * $Id: OCConcederLicencaGeral.php 62838 2015-06-26 13:02:49Z diogo.zarpelon $ + * $Id: OCConcederLicencaGeral.php 63839 2015-10-22 18:08:07Z franver $ * Casos de uso: uc-05.02.12 @@ -114,8 +114,6 @@ function excluirElemento($inLinha) function montaListaElementos(&$rsListaElementos) { - #sistemaLegado::mostravar ( $rsListaElementos ); - global $request; $stAcao = $request->get('stAcao'); $rsListaElementos->setPrimeiroElemento(); @@ -188,7 +186,6 @@ function montaListaElementos(&$rsListaElementos) return $stJs; } -//sistemaLegado::mostravar($stCtrl); switch ($stCtrl) { case "LimparSessao": Sessao::write( "lsElementos", array() ); @@ -309,8 +306,6 @@ switch ($stCtrl) { $arAtribElem = explode(",",$stNomAtribElem) ; $arAtribElemValor[$stCodElemento] = array() ; - #sistemaLegado::mostravar( $arAtribElemValor ); - #echo '
    '; // array de indice = a cod_elemento criado com valores dos atributos. for ( $inCount =0; $inCount < count($arAtribElem); $inCount++) { #$arAtribElemValor[$stCodElemento][substr( $arAtribElem[$inCount],-3,1)] = $_REQUEST[$arAtribElem[$inCount]] ; diff --git a/gestaoTributaria/fontes/PHP/cadastroEconomico/instancias/licenca/OCConcederLicencaGeralTipo.php b/gestaoTributaria/fontes/PHP/cadastroEconomico/instancias/licenca/OCConcederLicencaGeralTipo.php index ef896b7..4cb5275 100755 --- a/gestaoTributaria/fontes/PHP/cadastroEconomico/instancias/licenca/OCConcederLicencaGeralTipo.php +++ b/gestaoTributaria/fontes/PHP/cadastroEconomico/instancias/licenca/OCConcederLicencaGeralTipo.php @@ -31,7 +31,7 @@ * @ignore - * $Id: OCConcederLicencaGeralTipo.php 62838 2015-06-26 13:02:49Z diogo.zarpelon $ + * $Id: OCConcederLicencaGeralTipo.php 63839 2015-10-22 18:08:07Z franver $ * Casos de uso: uc-05.02.12 @@ -115,8 +115,6 @@ function excluirElemento($inLinha) function montaListaElementos(&$rsListaElementos) { - #sistemaLegado::mostravar ( $rsListaElementos ); - $stAcao = $request->get('stAcao'); $rsListaElementos->setPrimeiroElemento(); if ( !$rsListaElementos->eof() ) { @@ -188,14 +186,12 @@ function montaListaElementos(&$rsListaElementos) return $stJs; } -//sistemaLegado::mostravar($stCtrl);die(); switch ($stCtrl) { case "LimparSessao": Sessao::write( "lsElementos", array() ); break; case "montaAtributosElementos": -//sistemaLegado::mostravar($_sessao); $obRCEMLicencaDiversa = new RCEMLicencaDiversa; /* Atributos Dinamicos */ $obRCEMLicencaDiversa->obRCadastroDinamicoElemento->setChavePersistenteValores( array("cod_elemento"=>$_REQUEST["stCodigoElemento"]) ); @@ -256,7 +252,6 @@ switch ($stCtrl) { $stHTML = str_replace("\"","'",$stHTML); $stHTML = str_replace("'","\\'",$stHTML); -//sistemaLegado::mostravar($obMontaAtributosElemento->arNomeInput); $stJs .= 'd.getElementById("inNumAtributos").value = "'.$inNumeroAtributos.'"; '; // $stJs .= 'colocaValoresAtributos('.implode(",",$obMontaAtributosElemento->arNomeInput).'); '; // $stJs .= 'colocaValoresAtributos('.$obMontaAtributosElemento->arNomeInput.');'; @@ -313,8 +308,6 @@ echo $stJs; $arAtribElem = explode(",",$stNomAtribElem) ; $arAtribElemValor[$stCodElemento] = array() ; - #sistemaLegado::mostravar( $arAtribElemValor ); - #echo '
    '; // array de indice = a cod_elemento criado com valores dos atributos. for ( $inCount =0; $inCount < count($arAtribElem); $inCount++) { #$arAtribElemValor[$stCodElemento][substr( $arAtribElem[$inCount],-3,1)] = $_REQUEST[$arAtribElem[$inCount]] ; @@ -344,7 +337,7 @@ echo $stJs; break; } } -//sistemaLegado::mostravar($_REQUEST);die(); + if ($boErro) { $stJs .= "f.boElemento.value = '0';\n"; $stJs .= "alertaAviso('Elemento já informado!(".$_REQUEST["stCodigoElemento"].")','form','erro','".Sessao::getId()."', '../');"; diff --git a/gestaoTributaria/fontes/PHP/cadastroEconomico/instancias/licenca/OCConcederLicencaGeralUsoSolo.php b/gestaoTributaria/fontes/PHP/cadastroEconomico/instancias/licenca/OCConcederLicencaGeralUsoSolo.php index bfc629e..386b376 100755 --- a/gestaoTributaria/fontes/PHP/cadastroEconomico/instancias/licenca/OCConcederLicencaGeralUsoSolo.php +++ b/gestaoTributaria/fontes/PHP/cadastroEconomico/instancias/licenca/OCConcederLicencaGeralUsoSolo.php @@ -31,7 +31,7 @@ * @ignore - * $Id: OCConcederLicencaGeralUsoSolo.php 62838 2015-06-26 13:02:49Z diogo.zarpelon $ + * $Id: OCConcederLicencaGeralUsoSolo.php 63839 2015-10-22 18:08:07Z franver $ * Casos de uso: uc-05.02.12 @@ -112,8 +112,6 @@ function excluirElemento($inLinha) function montaListaElementos(&$rsListaElementos) { - #sistemaLegado::mostravar ( $rsListaElementos ); - $stAcao = $request->get('stAcao'); $rsListaElementos->setPrimeiroElemento(); if ( !$rsListaElementos->eof() ) { @@ -280,8 +278,6 @@ switch ($_REQUEST['stCtrl']) { break; case "buscaInscricao": -/// sistemaLegado::mostravar("qrarasdf");die(); - if ($_REQUEST["inInscricaoEconomica"] != "") { $obRCEMInscricaoEconomica = new RCEMInscricaoEconomica; $obRCEMInscricaoEconomica->setInscricaoEconomica( $_REQUEST["inInscricaoEconomica"] ); diff --git a/gestaoTributaria/fontes/PHP/cadastroEconomico/instancias/licenca/PRConcederLicencaGeral.php b/gestaoTributaria/fontes/PHP/cadastroEconomico/instancias/licenca/PRConcederLicencaGeral.php index 72c185c..f6ce5ff 100755 --- a/gestaoTributaria/fontes/PHP/cadastroEconomico/instancias/licenca/PRConcederLicencaGeral.php +++ b/gestaoTributaria/fontes/PHP/cadastroEconomico/instancias/licenca/PRConcederLicencaGeral.php @@ -31,7 +31,7 @@ * @package URBEM * @subpackage Regra - * $Id: PRConcederLicencaGeral.php 59612 2014-09-02 12:00:51Z gelson $ + * $Id: PRConcederLicencaGeral.php 63839 2015-10-22 18:08:07Z franver $ * Casos de uso: uc-05.02.12 @@ -76,7 +76,6 @@ $obAtributos->setName('AtributoLicenca_'); $obAtributos->recuperaVetor( $arChave ); $obErro = new Erro; -//sistemaLegado::mostravar($stAcao); switch ($stAcao) { case "incGeral": @@ -159,8 +158,6 @@ switch ($stAcao) { $obTModeloDocumento = new TAdministracaoModeloDocumento; $obTModeloDocumento->recuperaRelacionamento( $rsDocumentos, $stFiltro ); - #sistemaLegado::mostravar( $rsDocumentos ); exit; - while ( !$rsDocumentos->Eof() ) { $inCodTipoDocAtual = $rsDocumentos->getCampo( "cod_tipo_documento" ); $inCodDocAtual = $rsDocumentos->getCampo( "cod_documento" ); diff --git a/gestaoTributaria/fontes/PHP/cadastroEconomico/instancias/licenca/PRConcederLicencaGeral.php.bak b/gestaoTributaria/fontes/PHP/cadastroEconomico/instancias/licenca/PRConcederLicencaGeral.php.bak deleted file mode 100644 index 39e222b..0000000 --- a/gestaoTributaria/fontes/PHP/cadastroEconomico/instancias/licenca/PRConcederLicencaGeral.php.bak +++ /dev/null @@ -1,34 +0,0 @@ - - -get('stAcao'); -//Define o nome dos arquivos PHP -$stPrograma = "ConcederLicencaGeral" ; -$pgFilt = "FL".$stPrograma.".php" ; -$pgList = "LS".$stPrograma.".php".$stLink; -$pgListAlt = "LSLicencaGeral.php".$stLink; -$pgForm = "FM".$stPrograma.".php" ; -$pgProc = "PR".$stPrograma.".php" ; -$pgOcul = "OC".$stPrograma.".php" ; -$pgJs = "JS".$stPrograma.".js" ; - -$obAtributos = new MontaAtributos; -$obAtributos->setName('AtributoLicenca_'); -$obAtributos->recuperaVetor( $arChave ); - -sistemaLegado::mostravar($stAcao); -switch( $stAcao ){ - - - case "incGeral": - // INICIA INCLUINDO LICENCA DIVERSA NO BANCO - - $inCodigoDocumento = $_REQUEST['stCodDocumento']; - $inCodigoTipoDocumento = $_REQUEST['inCodTipoDocumento']; - - $obRCEMLicencaDiversa = new RCEMLicencaDiversa; - foreach( $arChave as $key=>$value ){ - $arChaves = preg_split( "/[^a-zA-Z0-9]/", $key ); - $inCodAtributo = $arChaves[0]; - if( is_array($value) ) - $value = implode(",",$value); - $obRCEMLicencaDiversa->obRCadastroDinamico->addAtributosDinamicos( $inCodAtributo , $value ); - } - if( $_REQUEST["inCodigoLicenca"] ){ - $obRCEMLicencaDiversa->setCodigoLicenca ( $_REQUEST["inCodigoLicenca"] ) ; - } - - $obRCEMLicencaDiversa->setExercicio ( date('Y') ); - $obRCEMLicencaDiversa->setDataInicio ( $_REQUEST["dtDataInicio" ] ); - if( $_REQUEST["dtDataTermino"] ){ - $obRCEMLicencaDiversa->setDataTermino ( $_REQUEST["dtDataTermino" ] ); - } - - $obRCEMLicencaDiversa->obRCEMTipoLicencaDiversa->setCodigoTipoLicencaDiversa( $_REQUEST["inCodigoTipoLicenca"] ); - $obRCEMLicencaDiversa->obRCGM->setNumCGM( $_REQUEST["inNumCGM" ] ); - $obRCEMLicencaDiversa->setArrayElementos($sessao->transf4["lsElementos"]); - #echo '

    CONCEDER LICENÇA

    '; - $obErro = $obRCEMLicencaDiversa->concederLicenca(true); - #echo '
    PR CONCEDER LICENCA GERAL :'.$this->inCodigoLicenca; - $inCodLicenca = $obRCEMLicencaDiversa->getCodigoLicenca(); - - $exercicio_divida = $obRCEMLicencaDiversa->getExercicio(); - - $boEmissaoDocumento = $_REQUEST['boEmissaoDocumento']; - - if ( !$obErro->ocorreu() ){ - #echo '

    LICENCA DOCUMENTO

    '; - #===================== INSERE NA TABELA EMISSAO DOCUMENTO - include_once ( CAM_GT_CEM_MAPEAMENTO."TCEMLicencaDocumento.class.php"); - $obTCEMLicencaDocumento = new TCEMLicencaDocumento; - - #$sessao->setTrataExcecao( true ); - #$sessao->obTransacao->setMapeamento( $obTCEMLicencaDocumento ); - - $obTCEMLicencaDocumento->buscaUltimoNumeroAlvara( $rsEmissao ); - #$obTCEMLicencaDocumento->debug(); - - $inNumEmissao = ( $rsEmissao->getCampo('valor') + 1 ); - #echo '
    NUMERO DESTA EMISSAO: '. $inNumEmissao .'
    '; - - if ( !$exercicio_divida ) $exercicio_divida = '0000'; - - # DEVE-SE TER O VALOR CORRESPONDENTE AO DIRETOR TRIBUTOS NA CONFIGURACAO - /* $obTConfiguracao = new TAdministracaoConfiguracao; - $obTConfiguracao->setDado ( 'cod_modulo', 14 ); - $obTConfiguracao->setDado ( 'parametro', 'diretor_tributos' ); - $obTConfiguracao->setDado ( 'exercicio', $sessao->exercicio ); - $obTConfiguracao->recuperaPorChave ( $rsConfiguracao ); - - $cgm_diretor_tributos = $rsConfiguracao->getCampo ('valor'); -*/ - - $obTCEMLicencaDocumento->setDado( "cod_licenca", $inCodLicenca ); - $obTCEMLicencaDocumento->setDado( "exercicio", $exercicio_divida ); - $obTCEMLicencaDocumento->setDado( "num_alvara", $inNumEmissao ); - $obTCEMLicencaDocumento->setDado( "cod_documento", $inCodigoDocumento ); - $obTCEMLicencaDocumento->setDado( "cod_tipo_documento", $inCodigoTipoDocumento ); - - $obTCEMLicencaDocumento->inclusao(); - #$obTCEMLicencaDocumento->debug(); #exit; - #$sessao->encerraExcecao(); - } -#exit; - if( !$obErro->ocorreu() ){ - - if ( $boEmissaoDocumento ){ //boEmissaoDocumento - - $inCodTipoDocumento = $_REQUEST['stCodDocumentoTxt']; - $stFiltro = "where a.cod_acao = ". $sessao->acao; - $stFiltro .="AND b.cod_documento = ". $_REQUEST['stCodDocumentoTxt']; - $obTModeloDocumento = new TAdministracaoModeloDocumento; - $obTModeloDocumento->recuperaRelacionamento( $rsDocumentos, $stFiltro ); - - #sistemaLegado::mostravar( $rsDocumentos ); exit; - - while ( !$rsDocumentos->Eof() ) { - $inCodTipoDocAtual = $rsDocumentos->getCampo( "cod_tipo_documento" ); - $inCodDocAtual = $rsDocumentos->getCampo( "cod_documento" ); - $stNomeArquivo = $rsDocumentos->getCampo( "nome_arquivo_agt" ); - $stNomeDocumento = $rsDocumentos->getCampo( 'nome_documento' ); - - $rsDocumentos->proximo(); - } - - $stCaminho = CAM_GT_CEM_INSTANCIAS."emissao/FMManterEmissao.php"; - $stInscricoes = $stParametros = null; - $stParametros .= "&inNumeroLicenca=".$inCodLicenca; - $stParametros .= "&inExercicio=".$exercicio_divida; - $stParametros .= "&stTipoModalidade=emissao"; - $stParametros .= "&stCodAcao=".$sessao->acao; - $stParametros .= "&stOrigemFormulario=conceder_licenca"; - - $stParametros .= "&inCodigoDocumento=".$inCodigoDocumento; - $stParametros .= "&inCodigoTipoDocumento=". $inCodigoTipoDocumento; - - $stParametros .= "&stNomeArquivo=".$stNomeArquivo; - $stParametros .= "&stNomeDocumento=".$stNomeDocumento; - - $stParametros .= "&inInscricaoEconomica=".$_REQUEST["inInscricaoEconomica"]; - $stParametros .= "&stCtrl=Download"; - - - #echo '
    VAI EMITIR:
    '.$stParametros; #exit; - - sistemaLegado::alertaAviso( $stCaminho."?".$sessao->id.$stParametros."&stAcao=incluir", "Conceder Licença", "alterar","aviso", $sessao->id, "../"); - - } else { - - sistemaLegado::alertaAviso( $pgForm, "Licenca Número: ".$inCodLicenca, "incluir", "aviso", $sessao->id, "../"); - - } - - }else{ - sistemaLegado::exibeAviso(urlencode($obErro->getDescricao()),"n_incluir","erro"); - } - break; - - - case "alterar": - // ALTERAÇÃO LICENCA DIVERSA NO BANCO - $obRCEMLicencaDiversa = new RCEMLicencaDiversa; - foreach($arChave as $key=>$value){ - $arChaves = preg_split( "/[^a-zA-Z0-9]/", $key ); - $inCodAtributo = $arChaves[0]; - if( is_array($value) ) - $value = implode(",",$value); - $obRCEMLicencaDiversa->obRCadastroDinamico->addAtributosDinamicos( $inCodAtributo , $value ); - } - - $obRCEMLicencaDiversa->setCodigoLicenca ($_REQUEST["inCodigoLicenca"]) ; - $obRCEMLicencaDiversa->setExercicio ( date('Y') ); - $obRCEMLicencaDiversa->setDataInicio ( $_REQUEST["dtDataInicio" ] ); - $obRCEMLicencaDiversa->setDataTermino ( $_REQUEST["dtDataTermino" ] ); - $obRCEMLicencaDiversa->obRCEMTipoLicencaDiversa->setCodigoTipoLicencaDiversa( $_REQUEST["inCodigoTipoLicenca"] ); - $obRCEMLicencaDiversa->obRCGM->setNumCGM( $_REQUEST["inNumCGM" ] ); - $obErro = $obRCEMLicencaDiversa->alterarLicenca(true); - - $tmpNumLicenca = $obRCEMLicencaDiversa->getCodigoLicenca(); - - - if( !$obErro->ocorreu() ) - { - if ( $boEmissaoDocumento ) - { - $inCodTipoDocumento = $_REQUEST['stCodDocumentoTxt']; - $stFiltro = "where a.cod_acao = ". $sessao->acao; - $stFiltro .="AND b.cod_documento = ". $_REQUEST['stCodDocumentoTxt']; - $obTModeloDocumento = new TAdministracaoModeloDocumento; - $obTModeloDocumento->recuperaRelacionamento( $rsDocumentos, $stFiltro ); - - while ( !$rsDocumentos->Eof() ) - { - $inCodTipoDocAtual = $rsDocumentos->getCampo( "cod_tipo_documento" ); - $inCodDocAtual = $rsDocumentos->getCampo( "cod_documento" ); - $stNomeArquivo = $rsDocumentos->getCampo( "nome_arquivo_agt" ); - $stNomeDocumento = $rsDocumentos->getCampo( 'nome_documento' ); - $rsDocumentos->proximo(); - } - - $stCaminho = CAM_GT_CEM_INSTANCIAS."emissao/LSManterEmissao.php"; - $stInscricoes = $stParametros = ''; - $stParametros .= "&inCodLicenca=".$_REQUEST["inCodigoLicenca"]; - $stParametros .= "&inExercicio=".date('Y'); - $stParametros .= "&stTipoModalidade=alteracao"; - $stParametros .= "&stCodAcao=".$sessao->acao; - $stParametros .= "&stOrigemFormulario=alterar"; - $stParametros .= "&stTipoLicenca=".$_REQUEST['inCodigoTipoLicenca']; - $stParametros .= "&inInscricaoEconomica=".$_REQUEST["inInscricaoEconomica"]; - $stParametros .= "&inCodTipoDocumento2=".$_REQUEST["inCodTipoDocumento"]; - $stParametros .= "&stCodDocumentoTxt2=".$_REQUEST["stCodDocumentoTxt"]; - $stParametros .= "&stCodDocumento2=".$_REQUEST["stCodDocumento"]; - $stParametros .= "&stNomeDocumento=".$stNomeDocumento; - $stParametros .= "&stNomeArquivo=".$stNomeArquivo; - $stParametros .= "&stCtrl=Download"; - - - sistemaLegado::alertaAviso( $stCaminho."?".$sessao->id.$stParametros."&stAcao=alterar", "Conceder Licença", "alterar","aviso", $sessao->id, "../"); - - } - else - { - sistemaLegado::alertaAviso($pgListAlt."?stAcao=".$stAcao,"Licenca Numero: ".$tmpNumLicenca,"alterar","aviso", $sessao->id, "../"); - } - } - else - { - sistemaLegado::exibeAviso(urlencode($obErro->getDescricao()),"n_alterar","erro"); - } - break; - - case "excluir": - $obRCEMRT = new RCEMResponsavelTecnico; - $obRCEMRT->setNumCgm ( $_REQUEST[ "inNumCGM" ] ) ; - $obRCEMRT->setCodigoProfissao ( $_REQUEST[ "inCodigoProfissao"] ) ; - $obErro = $obRCEMRT->excluirResponsavelTecnico(); - - if( !$obErro->ocorreu()) { - sistemaLegado::alertaAviso($pgList,"Registro: ".$_REQUEST["stRegistro"],"excluir","aviso", $sessao->id, "../"); - }else{ - sistemaLegado::exibeAviso(urlencode($obErro->getDescricao()),"n_excluir","erro"); - } - break; - case "elemento": - // ALTERAÇÃO LICENCA DIVERSA NO BANCO - $obRCEMLicencaDiversa = new RCEMLicencaDiversa; - - $obRCEMLicencaDiversa->setCodigoLicenca ( $_REQUEST["inCodigoLicenca"]) ; - $obRCEMLicencaDiversa->setExercicio ( $_REQUEST["stExercicio"] ); - $obRCEMLicencaDiversa->obRCEMTipoLicencaDiversa->setCodigoTipoLicencaDiversa( $_REQUEST["inCodigoTipoLicenca"] ); - $obRCEMLicencaDiversa->excluirAtributosElementoLicencaDiversa(true); - $arElementos = $sessao->transf4["lsElementos"]; - - for($inCount=0;$inCount < count($arElementos);$inCount++){ - $inCodElemento = $arElementos[$inCount]["inCodigoElemento"]; - $obRCEMLicencaDiversa->obRCEMElemento->setCodigoElemento($inCodElemento); - $obRCEMLicencaDiversa->setOcorrencia( $arElementos[$inCount]["stOcorrencia"]); - - foreach($arElementos[$inCount]["elementos"][$inCodElemento] as $chave => $valor){ - $obRCEMLicencaDiversa->obRCadastroDinamicoElemento->addAtributosDinamicos( $chave, $valor ); - } - $obErro = $obRCEMLicencaDiversa->salvarElementoLicencaDiversa($boTransacao); - $obRCEMLicencaDiversa->obRCadastroDinamicoElemento->setAtributosDinamicos( array() ); - } - - $tmpNumLicenca = $obRCEMLicencaDiversa->getCodigoLicenca(); - - - if( !$obErro->ocorreu() ){ - sistemaLegado::alertaAviso($pgListAlt."?stAcao=".$stAcao,"Licenca Numero: ".$tmpNumLicenca,"alterar","aviso", $sessao->id, "../"); - }else{ - sistemaLegado::exibeAviso(urlencode($obErro->getDescricao()),"n_alterar","erro"); - } - break; - - default: - include_once(CAM_GT_ECONOMICO."instancias/licenca/FMConcederLicencaGeralTipo.php"); -} - -?> diff --git a/gestaoTributaria/fontes/PHP/cadastroEconomico/instancias/natjuridica/LSManterNatureza.php b/gestaoTributaria/fontes/PHP/cadastroEconomico/instancias/natjuridica/LSManterNatureza.php index 6af2e68..889129a 100644 --- a/gestaoTributaria/fontes/PHP/cadastroEconomico/instancias/natjuridica/LSManterNatureza.php +++ b/gestaoTributaria/fontes/PHP/cadastroEconomico/instancias/natjuridica/LSManterNatureza.php @@ -33,7 +33,7 @@ * @author Desenvolvedor: Lizandro Kirst da Silva * @ignore - * $Id: LSManterNatureza.php 59612 2014-09-02 12:00:51Z gelson $ + * $Id: LSManterNatureza.php 63839 2015-10-22 18:08:07Z franver $ *Casos de uso: uc-05.02.08 @@ -153,7 +153,6 @@ $obLista->ultimaAcao->addCampo("&inCodigoNatureza", "cod_natureza" $obLista->ultimaAcao->addCampo("&stDescQuestao","[cod_natureza]-[nom_natureza]"); if ($stAcao == "excluir") { $obLista->ultimaAcao->setLink( $stCaminho.$pgProx."?".Sessao::getId().$stLink ); - // mostravar(Sessao::getId().$stLink); } else { $obLista->ultimaAcao->setLink( $pgProx."?".Sessao::getId().$stLink ); } diff --git a/gestaoTributaria/fontes/PHP/cadastroEconomico/instancias/relatorios/OCContadores.php b/gestaoTributaria/fontes/PHP/cadastroEconomico/instancias/relatorios/OCContadores.php index 247cbc1..ed3560e 100755 --- a/gestaoTributaria/fontes/PHP/cadastroEconomico/instancias/relatorios/OCContadores.php +++ b/gestaoTributaria/fontes/PHP/cadastroEconomico/instancias/relatorios/OCContadores.php @@ -32,7 +32,7 @@ * @ignore - * $Id: OCContadores.php 59612 2014-09-02 12:00:51Z gelson $ + * $Id: OCContadores.php 63839 2015-10-22 18:08:07Z franver $ *Casos de uso: uc-05.02.14 @@ -59,7 +59,6 @@ $obRRelatorio = new RRelatorio; $obRCEMRelatorioContadores = new RCEMRelatorioContadores; $arFiltroSessao = Sessao::read( "filtroRelatorio" ); -//sistemaLegado::mostravar( $arFiltroSessao );exit; // SETA ATRIBUTOS DA REGRA QUE IRA GERAR O FILTRO DO RELATORIO $obRCEMRelatorioContadores->setNomContador ( $arFiltroSessao['stNomCGM'] ); $obRCEMRelatorioContadores->setCodInicio ( $arFiltroSessao['inCodInicio'] ); diff --git a/gestaoTributaria/fontes/PHP/cadastroEconomico/instancias/relatorios/OCGeraRelatorioCadastroEconomico.php b/gestaoTributaria/fontes/PHP/cadastroEconomico/instancias/relatorios/OCGeraRelatorioCadastroEconomico.php index 786739f..616960a 100644 --- a/gestaoTributaria/fontes/PHP/cadastroEconomico/instancias/relatorios/OCGeraRelatorioCadastroEconomico.php +++ b/gestaoTributaria/fontes/PHP/cadastroEconomico/instancias/relatorios/OCGeraRelatorioCadastroEconomico.php @@ -32,7 +32,7 @@ * @ignore - * $Id: OCGeraRelatorioCadastroEconomico.php 59612 2014-09-02 12:00:51Z gelson $ + * $Id: OCGeraRelatorioCadastroEconomico.php 63839 2015-10-22 18:08:07Z franver $ *Casos de uso: uc-05.02.17 @@ -72,8 +72,6 @@ $arSessaoTransf6 = Sessao::read( "sessao_transf6" ); $rsResultados = new RecordSet; $rsResultados = $arSessaoTransf6->arElementos; -//sistemaLegado::mostravar( $arSessaoTransf7 ); - $inContRg = $arSessaoTransf7->getNumLinhas(); $inCont = 0; diff --git a/gestaoTributaria/fontes/PHP/cadastroEconomico/instancias/resptecnico/FMManterResponsavelAlteracao.php b/gestaoTributaria/fontes/PHP/cadastroEconomico/instancias/resptecnico/FMManterResponsavelAlteracao.php index 0bb52c7..209a8f5 100644 --- a/gestaoTributaria/fontes/PHP/cadastroEconomico/instancias/resptecnico/FMManterResponsavelAlteracao.php +++ b/gestaoTributaria/fontes/PHP/cadastroEconomico/instancias/resptecnico/FMManterResponsavelAlteracao.php @@ -33,7 +33,7 @@ * @author Desenvolvedor: Fernando Piccini Cercato * @ignore - * $Id: FMManterResponsavelAlteracao.php 59612 2014-09-02 12:00:51Z gelson $ + * $Id: FMManterResponsavelAlteracao.php 63839 2015-10-22 18:08:07Z franver $ *Casos de uso: uc-05.02.04 */ @@ -238,7 +238,6 @@ $obForm->setAction( $pgProc ); $obForm->setTarget( "oculto" ); //DEFINICAO DO FORMULARIO -//mostravar($_REQUEST); $obFormulario = new Formulario; $obFormulario->addForm ( $obForm ); $obFormulario->setAjuda ( "UC-05.02.04" ); diff --git a/gestaoTributaria/fontes/PHP/cadastroEconomico/instancias/resptecnico/FMManterResponsavelInclusao.php b/gestaoTributaria/fontes/PHP/cadastroEconomico/instancias/resptecnico/FMManterResponsavelInclusao.php index bf21b5d..d0aa39c 100644 --- a/gestaoTributaria/fontes/PHP/cadastroEconomico/instancias/resptecnico/FMManterResponsavelInclusao.php +++ b/gestaoTributaria/fontes/PHP/cadastroEconomico/instancias/resptecnico/FMManterResponsavelInclusao.php @@ -33,7 +33,7 @@ * @author Desenvolvedor: Fernando Piccini Cercato * @ignore - * $Id: FMManterResponsavelInclusao.php 59612 2014-09-02 12:00:51Z gelson $ + * $Id: FMManterResponsavelInclusao.php 63839 2015-10-22 18:08:07Z franver $ *Casos de uso: uc-05.02.04 */ @@ -287,7 +287,6 @@ $obForm->setAction( $pgProc ); $obForm->setTarget( "oculto" ); //DEFINICAO DO FORMULARIO -//mostravar($_REQUEST); $obFormulario = new Formulario; $obFormulario->addForm ( $obForm ); $obFormulario->setAjuda ( "UC-05.02.04" ); diff --git a/gestaoTributaria/fontes/PHP/cadastroEconomico/instancias/resptecnico/LSManterResponsavel.php b/gestaoTributaria/fontes/PHP/cadastroEconomico/instancias/resptecnico/LSManterResponsavel.php index 95ee358..d446f91 100755 --- a/gestaoTributaria/fontes/PHP/cadastroEconomico/instancias/resptecnico/LSManterResponsavel.php +++ b/gestaoTributaria/fontes/PHP/cadastroEconomico/instancias/resptecnico/LSManterResponsavel.php @@ -32,7 +32,7 @@ * @ignore - * $Id: LSManterResponsavel.php 59612 2014-09-02 12:00:51Z gelson $ + * $Id: LSManterResponsavel.php 63839 2015-10-22 18:08:07Z franver $ *Casos de uso: uc-05.02.04 */ @@ -122,7 +122,6 @@ $obRCEMResponsavelTecnico->listarResponsavelTecnico($rsRespTecnico); $stLink .= "&stAcao=".$stAcao; -//sistemaLegado::mostravar( $rsRespTecnico) ; //DEFINICAO DA LISTA $obLista = new Lista; diff --git a/gestaoTributaria/fontes/PHP/cadastroEconomico/instancias/servico/FMManterServicoNivel.php b/gestaoTributaria/fontes/PHP/cadastroEconomico/instancias/servico/FMManterServicoNivel.php index a5760f4..49b580c 100755 --- a/gestaoTributaria/fontes/PHP/cadastroEconomico/instancias/servico/FMManterServicoNivel.php +++ b/gestaoTributaria/fontes/PHP/cadastroEconomico/instancias/servico/FMManterServicoNivel.php @@ -31,7 +31,7 @@ * @ignore - * $Id: FMManterServicoNivel.php 59612 2014-09-02 12:00:51Z gelson $ + * $Id: FMManterServicoNivel.php 63839 2015-10-22 18:08:07Z franver $ *Casos de uso: uc-05.02.03 @@ -71,8 +71,6 @@ if ( empty( $stAcao ) ) { $stAcao = "incluir"; } -//sistemaLegado::mostravar ( $_REQUEST ); - //DEFINICAO DAS VERIFICACOES if ($stAcao == "incluir") { $arChaveNivel = preg_split( "/-/", $_REQUEST["stChaveNivel"] ); diff --git a/gestaoTributaria/fontes/PHP/cadastroEconomico/instancias/servico/PRManterServico.php b/gestaoTributaria/fontes/PHP/cadastroEconomico/instancias/servico/PRManterServico.php index bfbae6e..5775b06 100755 --- a/gestaoTributaria/fontes/PHP/cadastroEconomico/instancias/servico/PRManterServico.php +++ b/gestaoTributaria/fontes/PHP/cadastroEconomico/instancias/servico/PRManterServico.php @@ -31,7 +31,7 @@ * @ignore - * $Id: PRManterServico.php 59612 2014-09-02 12:00:51Z gelson $ + * $Id: PRManterServico.php 63839 2015-10-22 18:08:07Z franver $ *Casos de uso: uc-05.02.03 */ @@ -64,9 +64,6 @@ $pgJS = "JS".$stPrograma.".js"; $obRCEMServico = new RCEMServico; -//sistemaLegado::mostravar ( $_REQUEST ); -//echo 'ACAO: '. $stAcao; - switch ($stAcao) { case "incluir": diff --git a/gestaoTributaria/fontes/PHP/cadastroEconomico/instancias/tiplicenca/LSManterTipoLicenca.php b/gestaoTributaria/fontes/PHP/cadastroEconomico/instancias/tiplicenca/LSManterTipoLicenca.php index 5cbe2a1..7359e44 100644 --- a/gestaoTributaria/fontes/PHP/cadastroEconomico/instancias/tiplicenca/LSManterTipoLicenca.php +++ b/gestaoTributaria/fontes/PHP/cadastroEconomico/instancias/tiplicenca/LSManterTipoLicenca.php @@ -32,7 +32,7 @@ * @ignore - * $Id: LSManterTipoLicenca.php 59612 2014-09-02 12:00:51Z gelson $ + * $Id: LSManterTipoLicenca.php 63839 2015-10-22 18:08:07Z franver $ *Casos de uso: uc-05.02.11 */ @@ -65,7 +65,6 @@ switch ($stAcao) { case 'excluir' : $pgProx = $pgProc; break; DEFAULT : $pgProx = $pgForm; } -//mostravar($stAcao); //MANTEM FILTRO E PAGINACAO $stLink .= "&stAcao=".$stAcao; $link = Sessao::read( "link" ); diff --git a/gestaoTributaria/fontes/PHP/cadastroEconomico/popups/cnae/OCProcurarCnae.php b/gestaoTributaria/fontes/PHP/cadastroEconomico/popups/cnae/OCProcurarCnae.php index 779507a..93a2439 100755 --- a/gestaoTributaria/fontes/PHP/cadastroEconomico/popups/cnae/OCProcurarCnae.php +++ b/gestaoTributaria/fontes/PHP/cadastroEconomico/popups/cnae/OCProcurarCnae.php @@ -29,7 +29,7 @@ * @author Tonismar Régis Bernardo - * $Id: OCProcurarCnae.php 59612 2014-09-02 12:00:51Z gelson $ + * $Id: OCProcurarCnae.php 63839 2015-10-22 18:08:07Z franver $ * @ignore */ @@ -64,8 +64,6 @@ $obErro = new Erro; //$obMontaCnae = new MontaCnae; -mostravar( $_REQUEST ); - $obMontaCnae->setCodigoVigencia ( $_REQUEST["inCodigoVigencia"] ); switch ($_REQUEST["stCtrl"]) { diff --git a/gestaoTributaria/fontes/PHP/cadastroImobiliario/classes/componentes/MontaLocalizacao.class.php b/gestaoTributaria/fontes/PHP/cadastroImobiliario/classes/componentes/MontaLocalizacao.class.php index 19ee2a8..187b013 100755 --- a/gestaoTributaria/fontes/PHP/cadastroImobiliario/classes/componentes/MontaLocalizacao.class.php +++ b/gestaoTributaria/fontes/PHP/cadastroImobiliario/classes/componentes/MontaLocalizacao.class.php @@ -33,22 +33,11 @@ * @package URBEM * @subpackage Interface - * $Id: MontaLocalizacao.class.php 63638 2015-09-23 17:09:46Z jean $ + * $Id: MontaLocalizacao.class.php 63826 2015-10-21 16:39:23Z arthur $ * Casos de uso: uc-05.01.03 */ -/* -$Log$ -Revision 1.18 2006/11/17 12:08:25 dibueno -Adição da função setEscondeID, para não exibir o campo de nome da localização - -Revision 1.17 2006/09/18 09:12:58 fabio -correção do cabeçalho, -adicionado trecho de log do CVS - -*/ - class MontaLocalizacao extends Objeto { /** @@ -292,7 +281,6 @@ function geraFormulario(&$obFormulario, $boObrigatorio = true) if ($this->inNivelCorte) { $stTmpAcao = "buscaReduzido"; } -// $this->obBscChaveLocalizacao->setValoresBusca(CAM_GT_CIM_POPUPS."localizacao/OCBuscaLocalizacao.php?".Sessao::getId(),$obFormulario->obForm->getName(),$stTmpAcao); $this->obBscChaveLocalizacao->setFuncaoBusca("abrePopUp('".CAM_GT_CIM_POPUPS."localizacao/FLBuscaLocalizacao.php','frm','stChaveLocalizacao','stNomeChaveLocalizacao','buscaLocalizacaoInner','".Sessao::getId()."','800','550');"); if ( $this->getObrigatorio() ) { @@ -341,14 +329,12 @@ function geraFormulario2(&$obFormulario, $boObrigatorio = true, $inCodNvl) $this->obBscChaveLocalizacao->obCampoCod->setName ( "stChaveLocalizacao" ); $this->obBscChaveLocalizacao->obCampoCod->setAlign ("center"); -// $this->obBscChaveLocalizacao->obCampoCod->obEvento->setOnBlur("buscaDado('buscaLocalizacao');"); $this->obBscChaveLocalizacao->obCampoCod->obEvento->setOnChange("buscaDado('buscaLocalizacao');"); $this->obBscChaveLocalizacao->obCampoCod->obEvento->setOnKeyUp("mascaraDinamico('".$this->stMascara."', this, event);"); $stTmpAcao = "nomLocalizacao"; if ($this->inNivelCorte) { $stTmpAcao = "buscaReduzido"; } -// $this->obBscChaveLocalizacao->setValoresBusca(CAM_GT_CIM_POPUPS."localizacao/OCBuscaLocalizacao.php?".Sessao::getId(),$obFormulario->obForm->getName(),$stTmpAcao); $this->obBscChaveLocalizacao->setFuncaoBusca("abrePopUp('".CAM_GT_CIM_POPUPS."localizacao/FLBuscaLocalizacao.php','frm','stChaveLocalizacao&inCodNvl=".$inCodNvl."','stNomeChaveLocalizacao','buscaLocalizacaoInner','".Sessao::getId()."','800','550');"); if ( $this->getObrigatorio() ) { @@ -397,7 +383,6 @@ function geraFormularioPreenchido(&$obFormulario) //RECUPERA O VALOR DO CODIGO DA LOCALIZACAO EM RELACAO AO VALOR COMPOSTO while ( !$rsListaLocalizacao->eof() ) { - //echo $rsListaLocalizacao->getCampo("valor_reduzido")." == ".$stValorComposto."
    "; if ( $rsListaLocalizacao->getCampo("valor_reduzido") == $stValorComposto ) { $inCodigoLocalizacao = $rsListaLocalizacao->getCampo("cod_localizacao"); $stValor = $rsListaLocalizacao->getCampo("valor"); @@ -617,7 +602,5 @@ function preencheCombos() } } -/*--------------------------------------------------+ -|FIM DA CLASSE CLASSE | -+--------------------------------------------------*/ -?> + +?> \ No newline at end of file diff --git a/gestaoTributaria/fontes/PHP/cadastroImobiliario/classes/componentes/MontaLocalizacaoCombos.class.php b/gestaoTributaria/fontes/PHP/cadastroImobiliario/classes/componentes/MontaLocalizacaoCombos.class.php index 28dcdb5..f777013 100755 --- a/gestaoTributaria/fontes/PHP/cadastroImobiliario/classes/componentes/MontaLocalizacaoCombos.class.php +++ b/gestaoTributaria/fontes/PHP/cadastroImobiliario/classes/componentes/MontaLocalizacaoCombos.class.php @@ -33,7 +33,7 @@ * @package framework * @subpackage componentes - * $Id: MontaLocalizacaoCombos.class.php 59612 2014-09-02 12:00:51Z gelson $ + * $Id: MontaLocalizacaoCombos.class.php 63781 2015-10-09 20:50:07Z arthur $ * Casos de uso: uc-05.01.03 */ @@ -49,17 +49,6 @@ * @subpackage Interface */ -/* -$Log$ -Revision 1.8 2006/11/17 11:51:05 dibueno -Bug #7383# - -Revision 1.7 2006/09/18 09:12:58 fabio -correção do cabeçalho, -adicionado trecho de log do CVS - -*/ - class MontaLocalizacaoCombos extends Objeto { /** @@ -214,7 +203,7 @@ function getCadastroLoteamento() { return $this->boCadastroLoteamento; } * Método construtor * @access Private */ -function MontaLocalizacaoCombos() +function __construct() { include_once( CAM_GT_CIM_NEGOCIO."RCIMLocalizacao.class.php"); $this->obRCIMLocalizacao = new RCIMLocalizacao; @@ -246,7 +235,7 @@ function geraFormulario(&$obFormulario, $boObrigatorio = true) $this->obRCIMLocalizacao->setCodigoVigencia( $this->getCodigoVigencia() ); $obErro = $this->obRCIMLocalizacao->listarNiveis( $rsListaNivel ); } - + $arCombosLocalizacao = array(); $boFlagPrimeiroNivel = true; $inContNomeCombo = 1; @@ -277,9 +266,11 @@ function geraFormulario(&$obFormulario, $boObrigatorio = true) //PREENCHE APENAS O PRIMEIRO NIVEL if ($boFlagPrimeiroNivel) { + $rsListaLocalizacao = new RecordSet(); $boFlagPrimeiroNivel = false; - $this->obRCIMLocalizacao->setCodigoNivel ( $rsListaNivel->getCampo("cod_nivel") ); - $obErro = $this->obRCIMLocalizacao->listarLocalizacaoPrimeiroNivel( $rsListaLocalizacao ); + $this->obRCIMLocalizacao->setCodigoVigencia( $rsListaNivel->getCampo("cod_vigencia") ); + $this->obRCIMLocalizacao->setCodigoNivel ( $rsListaNivel->getCampo("cod_nivel") ); + $obErro = $this->obRCIMLocalizacao->listarLocalizacaoPrimeiroNivel( $rsListaLocalizacao ); $obCmbLocalizacao->preencheCombo( $rsListaLocalizacao ); } //MONTA A MASCARA PARA A FUNCAO MASCARADINAMICO @@ -493,22 +484,28 @@ function preencheCombos() $this->obRCIMLocalizacao->recuperaVigenciaAtual( $rsVigenciaAtual ); $this->setCodigoVigencia( $rsVigenciaAtual->getCampo( "cod_vigencia" ) ); } + $this->obRCIMLocalizacao->setCodigoVigencia ( $this->getCodigoVigencia() ); + if ($this->boCadastroLocalizacao) { $this->obRCIMLocalizacao->setCodigoNivel ( $this->inCodigoNivel ); $obErro = $this->obRCIMLocalizacao->listarNiveisAnteriores( $rsListaNivel ); } else { $obErro = $this->obRCIMLocalizacao->listarNiveis( $rsListaNivel ); } + if ( strrpos($this->stValorReduzido, ".") == strlen( $this->stValorReduzido ) ) { $stValorReduzido = substr( $this->stValorReduzido , 0, strlen( $this->stValorReduzido ) - 1 ); } else { $stValorReduzido = $this->stValorReduzido; } + $arValorReduzido = explode( ".", $stValorReduzido ); $stValorReduzido = ""; $inCont = 1;//CONTADOR DOS COMBOS DOS NIVEIS DE LOCALIZACAO + while ( !$rsListaNivel->eof() and key( $arValorReduzido ) < count( $arValorReduzido ) ) { + if ($inCont == 1) { $stValorReduzido .= current( $arValorReduzido ); $boMontaCombos = true; @@ -520,11 +517,13 @@ function preencheCombos() } $stValorReduzido .= ".".current( $arValorReduzido ); } + next( $arValorReduzido ); $stNomeCombo = "inCodLocalizacao_".$inCont++; $stSelecione = $rsListaNivel->getCampo("nom_nivel"); $js .= "limpaSelect(f.".$stNomeCombo.",0); \n"; $js .= "f.".$stNomeCombo.".options[0] = new Option('Selecione $stSelecione','', 'selected');\n"; + if ($boMontaCombos) { $this->obRCIMLocalizacao->setCodigoNivel ( $rsListaNivel->getCampo("cod_nivel") ); $obErro = $this->obRCIMLocalizacao->listarLocalizacao( $rsListaLocalizacao ); @@ -536,19 +535,20 @@ function preencheCombos() $stChaveLocalizacao .= $rsListaLocalizacao->getCampo( "valor")."-"; $stChaveLocalizacao .= $rsListaLocalizacao->getCampo( "valor_reduzido"); $stNomeLocalizacao = $rsListaLocalizacao->getCampo( "nom_localizacao" ); + if ( $rsListaLocalizacao->getCampo( "valor_reduzido") == $stValorReduzido ) { - $stSelected = "selected"; - } else { - $stSelected = ""; + $stValorSelecionado = $stChaveLocalizacao; } $js .= "f.".$stNomeCombo.".options[$inContador] = "; - $js .= "new Option('".$stNomeLocalizacao."','".$stChaveLocalizacao."','".$stSelected."'); \n"; + $js .= "new Option('".$stNomeLocalizacao."','".$stChaveLocalizacao."'); \n"; $inContador++; $rsListaLocalizacao->proximo(); } + $js .= "f.".$stNomeCombo.".value = '".$stValorSelecionado."';\n"; } $rsListaNivel->proximo(); } + if ($this->boPopUp) { SistemaLegado::executaIFrameOculto ( $js ); } else { @@ -561,7 +561,5 @@ function preencheCombos() } } -/*--------------------------------------------------+ -|FIM DA CLASSE CLASSE | -+--------------------------------------------------*/ -?> + +?> \ No newline at end of file diff --git a/gestaoTributaria/fontes/PHP/cadastroImobiliario/classes/mapeamento/VCIMLocalizacaoAtiva.class.php b/gestaoTributaria/fontes/PHP/cadastroImobiliario/classes/mapeamento/VCIMLocalizacaoAtiva.class.php index d366a24..9eeb8c8 100755 --- a/gestaoTributaria/fontes/PHP/cadastroImobiliario/classes/mapeamento/VCIMLocalizacaoAtiva.class.php +++ b/gestaoTributaria/fontes/PHP/cadastroImobiliario/classes/mapeamento/VCIMLocalizacaoAtiva.class.php @@ -33,7 +33,7 @@ * @package URBEM * @subpackage Mapeamento - * $Id: VCIMLocalizacaoAtiva.class.php 63688 2015-09-29 20:32:47Z arthur $ + * $Id: VCIMLocalizacaoAtiva.class.php 63826 2015-10-21 16:39:23Z arthur $ * Casos de uso: uc-05.01.03 */ @@ -72,9 +72,28 @@ function __construct() $this->AddCampo('nom_localizacao', 'string', true,'' ,true, false); $this->AddCampo('mascara', 'string', true,'' ,true, false); $this->AddCampo('nom_nivel', 'string', true,'' ,true, false); +} +function recuperaUltimoValorComposto(&$rsRecordSet, $stFiltro = "", $stOrdem = "", $boTransacao = ""){ + $obErro = new Erro; + $obConexao = new Conexao; + $rsRecordSet = new RecordSet; + $stSql = $this->montaRecuperaUltimoValorComposto().$stFiltro.$stOrdem; + $this->stDebug = $stSql; + $obErro = $obConexao->executaSQL( $rsRecordSet, $stSql, $boTransacao ); + return $obErro; +} + +function montaRecuperaUltimoValorComposto(){ + + $stSql = " SELECT (COALESCE( SPLIT_PART(MAX(valor_composto), '.', ".$this->getDado("cod_nivel").")::INTEGER, 0) + 1) AS codigo_localizacao + FROM imobiliario.vw_localizacao_ativa "; + + return $stSql; } +public function __destruct(){} + } ?> \ No newline at end of file diff --git a/gestaoTributaria/fontes/PHP/cadastroImobiliario/classes/negocio/RCIMLocalizacao.class.php b/gestaoTributaria/fontes/PHP/cadastroImobiliario/classes/negocio/RCIMLocalizacao.class.php index b5f386a..0dcc96b 100755 --- a/gestaoTributaria/fontes/PHP/cadastroImobiliario/classes/negocio/RCIMLocalizacao.class.php +++ b/gestaoTributaria/fontes/PHP/cadastroImobiliario/classes/negocio/RCIMLocalizacao.class.php @@ -33,7 +33,7 @@ * @package URBEM * @subpackage Regra - * $Id: RCIMLocalizacao.class.php 63688 2015-09-29 20:32:47Z arthur $ + * $Id: RCIMLocalizacao.class.php 64014 2015-11-18 17:13:21Z evandro $ * Casos de uso: uc-05.01.03 */ @@ -102,8 +102,14 @@ var $stValorComposto;//valor de todos os niveis da localizacao concateneados var $stValorReduzido;//valor de todos os niveis que possuem localizacao /** * @access Private + * @var boolean +*/ +var $boLocalizacaoAutomatica; +/** + * @access Private * @var Object */ + var $obTCIMLocalizacaoNivel; /** * @access Private @@ -176,7 +182,11 @@ function setValorComposto($valor) { $this->stValorComposto = $valor; } * @param String $valor */ function setValorReduzido($valor) { $this->stValorReduzido = $valor; } - +/** + * @access Public + * @param String $valor +*/ +function setLocalizacaoAutomatica($valor) { $this->boLocalizacaoAutomatica = $valor; } /** * @access Public * @return Integer @@ -219,8 +229,12 @@ function getValorComposto() { return $this->stValorComposto; } * @return String */ function getValorReduzido() { return $this->stValorReduzido; } - -/**? +/** + * @access Public + * @return boolean +*/ +function getLocalizacaoAutomatica() { return $this->boLocalizacaoAutomatica; } +/** * Método construtor * @access Private */ @@ -245,35 +259,42 @@ function incluirLocalizacao($boTransacao = "") $boFlagTransacao = false; $obErro = $this->obTransacao->abreTransacao( $boFlagTransacao, $boTransacao ); if ( !$obErro->ocorreu() ) { + $obErro = $this->obTCIMLocalizacao->proximoCod( $this->inCodigoLocalizacao, $boTransacao ); + if ( !$obErro->ocorreu() ) { //MONTA O CODIGO COMPOSTO $obErro = $this->recuperaMascaraNiveis( $rsMascaraNivel, $boTransacao ); $rsMascaraNivel->ordena("cod_nivel"); - $obErro = $this->consultarNivel( $boTransacao ); - $stCodigoMascara = $this->arChaveLocalizacao[ count($this->arChaveLocalizacao) - 1 ][3]."."; - $stCodigoMascara .= str_pad( $this->stValor, strlen($this->stMascara), "0", STR_PAD_LEFT ); + $obErro = $this->consultarNivel( $boTransacao ); + + if ( empty($this->arChaveLocalizacao) ) { + $stCodigoMascara = $this->stValor."."; + }else{ + $stCodigoMascara = $this->arChaveLocalizacao[ count($this->arChaveLocalizacao) - 1 ][3]."."; + $stCodigoMascara .= str_pad( $this->stValor, strlen($this->stMascara), "0", STR_PAD_LEFT ); + } + $stMascaraComposta = ''; $rsMascaraNivel->setPrimeiroElemento(); $i = 1; - $stCodigoComposto = ''; while ( !$rsMascaraNivel->eof() ) { - $stMascaraComposta .= $rsMascaraNivel->getCampo("mascara")."."; $stMascaraNivel = str_replace( "9", "0", $rsMascaraNivel->getCampo("mascara") ); $stMascaraNivel = preg_replace("/[A-Za-z]/","0",$stMascaraNivel); - $stCodigoComposto .= $rsMascaraNivel->getCampo("cod_nivel") == $this->getCodigoNivel() ? $stCodigoMascara."." : $stMascaraNivel."."; + $stCodigoComposto .= str_pad( $stMascaraNivel, strlen($stMascaraNivel), "0", STR_PAD_LEFT )."."; $rsMascaraNivel->proximo(); } - $stMascaraComposta = substr( $stMascaraComposta, 0, (-1*strlen($this->stMascara)) ); - $stCodigoComposto = substr( $stCodigoComposto, 0, (-1*strlen($this->stMascara)) ); - $corteMascara = strlen($stCodigoComposto) - strlen($stMascaraComposta); - $stCodigoComposto = substr( $stCodigoComposto, $corteMascara); + //Retira o '.' no final + $stCodigoComposto = substr( $stCodigoComposto , 0, -1 ); + $stCodigoComposto = substr( $stCodigoComposto , strlen($stCodigoMascara) ); + $stCodigoComposto = $stCodigoMascara.$stCodigoComposto; //EXECUTA A INCLUSAO NA TABELA LOCALIZACAO $this->setValorComposto ( $stCodigoComposto ); $obErro = $this->verificaNomeLocalizacao( $boTransacao ); + if ( !$obErro->ocorreu() ) $obErro = $this->verificaCodigoComposto ( $boTransacao ); @@ -282,6 +303,7 @@ function incluirLocalizacao($boTransacao = "") $this->obTCIMLocalizacao->setDado( "nom_localizacao", $this->stNomeLocalizacao ); $this->obTCIMLocalizacao->setDado( "codigo_composto", $stCodigoComposto ); $obErro = $this->obTCIMLocalizacao->inclusao( $boTransacao ); + if ( !$obErro->ocorreu() ) { if ($this->dtAliquotaVigencia) { $obTCIMLocalizacaoAliquota = new TCIMLocalizacaoAliquota; @@ -318,9 +340,9 @@ function incluirLocalizacao($boTransacao = "") //[0] = cod_nivel | [1] = cod_localizacao | [2] = valor $this->obTCIMLocalizacaoNivel->setDado( "cod_nivel" , $arChaveLocalizacao[0] ); $this->obTCIMLocalizacaoNivel->setDado( "cod_localizacao", $this->inCodigoLocalizacao ); - //MASCARA O VALOR CONFORME O MASCARA DO NIVEL - $stValor = $arChaveLocalizacao[2]; - $this->obTCIMLocalizacaoNivel->setDado( "valor" , $arChaveLocalizacao[2] ); + //Manda o valor sem mascara para o banco + $stValor = preg_replace( "/0/", "", trim( $arChaveLocalizacao[2] ) ); + $this->obTCIMLocalizacaoNivel->setDado( "valor" , $stValor ); $obErro = $this->obTCIMLocalizacaoNivel->inclusao( $boTransacao ); if ( $obErro->ocorreu() ) { break; @@ -364,12 +386,6 @@ function incluirLocalizacao($boTransacao = "") $this->obRCadastroDinamico->setChavePersistenteValores( $arChavePersistenteValores ); $obErro = $this->obRCadastroDinamico->salvarValores( $boTransacao ); } - //UPDATE PARA ATUALIZAR OS CÓDIGO COMPOSTOS -/* if ( !$obErro->ocorreu() ) { - $this->obTCIMLocalizacao->setDado( "valor" , $this->getValorComposto() ); - $obErro = $this->obTCIMLocalizacao->atualizaLocalizacao( $boTransacao ); - } -*/ } } } @@ -727,7 +743,7 @@ function listarLocalizacao(&$rsRecordSet , $boTransacao = "") } if ($stFiltro) { $stFiltro = " WHERE ".SUBSTR( $stFiltro, 0, STRLEN( $stFiltro ) - 4 ); } $stOrdem = " ORDER BY valor_composto"; - //$obErro = $this->obTCIMLocalizacao->recuperaLocalizacaoAtiva( $rsRecordSet, $stFiltro, $stOrdem, $boTransacao ); + $obErro = $this->obVCIMLocalizacaoAtiva->recuperaTodos( $rsRecordSet, $stFiltro, $stOrdem, $boTransacao ); return $obErro; @@ -903,7 +919,6 @@ function listarNomLocalizacao(&$rsRecordSet , $boTransacao = "") { $stFiltro = ""; if ($this->stValorReduzido) { -// $stFiltro .= " codigo_composto like '".$this->stValorReduzido."%' AND"; $stFiltro .= " publico.fn_mascarareduzida(codigo_composto)='".$this->stValorReduzido."' AND"; } if ($this->inCodigoNivel) { @@ -1033,12 +1048,13 @@ function verificaNomeLocalizacao($boTransacao = "", $inCodLocalizacao = "") //verifica se o codigo composto já existe; function verificaCodigoComposto($boTransacao = "") { + global $request; $obErro = new Erro; if ( $this->getValorComposto() ) { $obErro = $this->listarNomLocalizacao($rsLoc, $boTransacao); if ( $rsLoc->getNumLinhas() > 0 ) { - $obErro->setDescricao("Localização já existe com o código [ ".$_REQUEST['inValorLocalizacao']." ] para este nível!"); + $obErro->setDescricao("Localização já existe com o código [ ".$request->get("inValorLocalizacao")." ] para este nível!"); } } @@ -1046,5 +1062,38 @@ function verificaCodigoComposto($boTransacao = "") return $obErro; } +/** + * Retorna o valor do último codigo conforme filtros setados + * @access Public + * @param Object $rsRecordSet Objeto RecordSet preenchido com os dados selecionados + * @param Object $obTransacao Parâmetro Transação + * @return Object Objeto Erro +*/ +function ultimorValorComposto(&$rsRecordSet , $boTransacao = "") +{ + $stFiltro = ""; + $stOrdem = ""; + + if ($this->inCodigoVigencia) { + $stFiltro .= " cod_vigencia = ".$this->inCodigoVigencia." AND"; + } + + if ($this->inCodigoNivel) { + $this->obVCIMLocalizacaoAtiva->setDado("cod_nivel", $this->inCodigoNivel ); + $stFiltro .= " cod_nivel = ".$this->inCodigoNivel." AND"; + } + + if ($this->stValorReduzido && $this->inCodigoNivel != 1) { + $stFiltro .= " valor_reduzido like '".$this->stValorReduzido."%' AND"; + } + + if ($stFiltro) { $stFiltro = " WHERE ".SUBSTR( $stFiltro, 0, STRLEN( $stFiltro ) - 4 ); } + + $obErro = $this->obVCIMLocalizacaoAtiva->recuperaUltimoValorComposto( $rsRecordSet, $stFiltro, $stOrdem, $boTransacao ); + + return $obErro; } -?> + +} + +?> \ No newline at end of file diff --git a/gestaoTributaria/fontes/PHP/cadastroImobiliario/classes/negocio/RCIMLogradouro.class.php b/gestaoTributaria/fontes/PHP/cadastroImobiliario/classes/negocio/RCIMLogradouro.class.php index 437a850..888ed7f 100755 --- a/gestaoTributaria/fontes/PHP/cadastroImobiliario/classes/negocio/RCIMLogradouro.class.php +++ b/gestaoTributaria/fontes/PHP/cadastroImobiliario/classes/negocio/RCIMLogradouro.class.php @@ -34,7 +34,7 @@ * @package URBEM * @subpackage Regra - * $Id: RCIMLogradouro.class.php 63653 2015-09-24 13:52:31Z evandro $ + * $Id: RCIMLogradouro.class.php 63920 2015-11-09 12:18:49Z evandro $ * Casos de uso: uc-05.01.04 uc-04.04.07 @@ -326,6 +326,7 @@ function alterarLogradouro($boTransacao = "") $boFlagTransacao = false; $obErro = $this->obTransacao->abreTransacao( $boFlagTransacao, $boTransacao ); $arDadosHistorico = $this->getDadosHistorico(); + $arDadosHistorico = end($arDadosHistorico); if ( !$obErro->ocorreu() ) { if ( count( $this->arBairro ) < 1 ) { $obErro->setDescricao( "Deve ser informado ao menos um bairro!" ); @@ -335,14 +336,27 @@ function alterarLogradouro($boTransacao = "") $obErro = $this->validaNomeLogradouro( $boTransacao ); if ( !$obErro->ocorreu() ) { $arDados = $this->validaAlteracao($boTransacao); - foreach ($arDados as $key => $value) { + foreach ( $arDados as $key => $value) { $this->obTNomeLogradouro->setDado( "cod_logradouro", $this->inCodigoLogradouro ); $this->obTNomeLogradouro->setDado( "cod_tipo" , $this->inCodigoTipo ); $this->obTNomeLogradouro->setDado( "nom_logradouro", $value['nome_anterior'] ); $this->obTNomeLogradouro->setDado( "dt_inicio" , $value['dt_inicio'] ); $this->obTNomeLogradouro->setDado( "dt_fim" , $value['dt_fim'] ); - $this->obTNomeLogradouro->setDado( "cod_norma" , $value['cod_norma'] ); - + $this->obTNomeLogradouro->setDado( "cod_norma" , $value['cod_norma'] ); + + if ( $arDadosHistorico['sequencial'] == $value['sequencial'] ) { + $obErro = $this->obTNomeLogradouro->exclusao( $boTransacao ); + if ( !$obErro->ocorreu() ) { + $this->obTNomeLogradouro->setDado( "cod_logradouro", $this->inCodigoLogradouro ); + $this->obTNomeLogradouro->setDado( "cod_tipo" , $this->inCodigoTipo ); + $this->obTNomeLogradouro->setDado( "nom_logradouro", $_REQUEST['stNomeLogradouro'] ); + $this->obTNomeLogradouro->setDado( "dt_inicio" , $_REQUEST['stDataInicial'] ); + $this->obTNomeLogradouro->setDado( "dt_fim" , $_REQUEST['stDataFinal'] ); + $this->obTNomeLogradouro->setDado( "cod_norma" , $_REQUEST['inCodNorma'] ); + $obErro = $this->obTNomeLogradouro->inclusao ( $boTransacao ); + } + } + if ( $value['confirma_alterar'] == 'true' && array_key_exists("sequencial", $value)) { $obErro = $this->obTNomeLogradouro->alteracao( $boTransacao ); }else{ @@ -517,6 +531,9 @@ function listarLogradouros(&$rsRecordSet, $boTransacao = "") if ( $this->getCEP() ) { $stFiltro .= " AND imobiliario.fn_consulta_cep(L.cod_logradouro) = ".$this->getCEP()."::VARCHAR "; } + if ( $this->getBairro() ) { + $stFiltro .= " AND B.cod_bairro = ".$this->getBairro(); + } $stOrder = " ORDER BY NL.nom_logradouro "; $obErro = $this->obTLogradouro->recuperaRelacionamento( $rsRecordSet, $stFiltro, $stOrder, $boTransacao ); @@ -560,18 +577,12 @@ function listarHistoricoLogradouros(&$rsRecordSet, $boTransacao = "") function validaAlteracao($boTransacao = "") { $stFiltro = " WHERE sw_logradouro.cod_logradouro = ".$this->inCodigoLogradouro." "; - // $stFiltro .= " AND sw_nome_logradouro.timestamp = (SELECT max(timestamp) - // FROM sw_nome_logradouro as max - // WHERE max.cod_logradouro = sw_nome_logradouro.cod_logradouro) - // "; - //$stFiltro .= " AND UPPER( sw_nome_logradouro.nom_logradouro ) "; - //$stFiltro .= " LIKE UPPER( '".$this->stNomeLogradouro."' )"; $stFiltro .= " AND sw_logradouro.cod_uf = ".$this->getCodigoUF()." "; $stFiltro .= " AND sw_logradouro.cod_municipio = ".$this->inCodigoMunicipio." "; $stFiltro .= " AND sw_tipo_logradouro.cod_tipo = ".$this->inCodigoTipo; $stOrder = ""; $obErro = $this->obTLogradouro->recuperaHistoricoLogradouro( $rsRecordSet, $stFiltro, $stOrder, $boTransacao ); - + $arDadosHistorico = $this->getDadosHistorico(); $arDadosConsulta = $rsRecordSet->getElementos(); diff --git a/gestaoTributaria/fontes/PHP/cadastroImobiliario/classes/negocio/RCIMNivel.class.php b/gestaoTributaria/fontes/PHP/cadastroImobiliario/classes/negocio/RCIMNivel.class.php index 0a70e61..f4434a4 100755 --- a/gestaoTributaria/fontes/PHP/cadastroImobiliario/classes/negocio/RCIMNivel.class.php +++ b/gestaoTributaria/fontes/PHP/cadastroImobiliario/classes/negocio/RCIMNivel.class.php @@ -33,19 +33,11 @@ * @package URBEM * @subpackage Regra - * $Id: RCIMNivel.class.php 59612 2014-09-02 12:00:51Z gelson $ + * $Id: RCIMNivel.class.php 63826 2015-10-21 16:39:23Z arthur $ * Casos de uso: uc-05.01.02 */ -/* -$Log$ -Revision 1.8 2006/09/18 09:12:40 fabio -correção do cabeçalho, -adicionado trecho de log do CVS - -*/ - include_once '../../../../../../gestaoAdministrativa/fontes/PHP/framework/include/valida.inc.php'; include_once ( CAM_GT_CIM_MAPEAMENTO."TCIMVigencia.class.php" ); @@ -482,7 +474,7 @@ function recuperaMascaraNiveis(&$rsNivel , $boTransacao = "") $stFiltro= ""; } $obErro = $this->obTCIMNivel->recuperaTodos( $rsNivel, $stFiltro, $stOrdem, $boTransacao ); -// $this->obTCIMNivel->debug(); + return $obErro; } diff --git a/gestaoTributaria/fontes/PHP/cadastroImobiliario/classes/negocio/RCIMRelatorioBairros.class.php b/gestaoTributaria/fontes/PHP/cadastroImobiliario/classes/negocio/RCIMRelatorioBairros.class.php index 54d121c..2776dc4 100755 --- a/gestaoTributaria/fontes/PHP/cadastroImobiliario/classes/negocio/RCIMRelatorioBairros.class.php +++ b/gestaoTributaria/fontes/PHP/cadastroImobiliario/classes/negocio/RCIMRelatorioBairros.class.php @@ -33,7 +33,7 @@ * @package URBEM * @subpackage Regra - * $Id: RCIMRelatorioBairros.class.php 59612 2014-09-02 12:00:51Z gelson $ + * $Id: RCIMRelatorioBairros.class.php 63839 2015-10-22 18:08:07Z franver $ * Casos de uso: uc-05.01.19 */ @@ -180,7 +180,6 @@ function geraRecordSet(&$rsRecordSet , $stOrder = "") } $obErro = $this->obTBairro->recuperaRelacionamento( $rsRecordSet, $stFiltro, $stOrder ); -// $this->obTBairro->debug();die(); return $obErro; } @@ -191,7 +190,6 @@ function getRecordSetValor(&$rsRecordSet) $rsRecordSet = new RecordSet; $stSql = $this->montaRecordSetValor( $this->stOrder ); // $this->setDebug( $stSql ); -//SistemaLegado::mostravar($stSql);die(); $obErro = $obConexao->executaSQL( $rsRecordSet, $stSql, $boTransacao ); return $obErro; diff --git a/gestaoTributaria/fontes/PHP/cadastroImobiliario/classes/negocio/RCIMTransferencia.class.php b/gestaoTributaria/fontes/PHP/cadastroImobiliario/classes/negocio/RCIMTransferencia.class.php index 8a8a7bf..369463d 100755 --- a/gestaoTributaria/fontes/PHP/cadastroImobiliario/classes/negocio/RCIMTransferencia.class.php +++ b/gestaoTributaria/fontes/PHP/cadastroImobiliario/classes/negocio/RCIMTransferencia.class.php @@ -34,7 +34,7 @@ * @package URBEM * @subpackage Regra - * $Id: RCIMTransferencia.class.php 63503 2015-09-03 18:25:17Z jean $ + * $Id: RCIMTransferencia.class.php 63839 2015-10-22 18:08:07Z franver $ * Casos de uso: uc-05.01.17 */ @@ -499,13 +499,9 @@ function efetivarTransferencia($boTransacao = "", $boAbstracao = true) } - #echo 'CODIGO DA NATUREZA: ' .$this->getCodigoNatureza().'x'; - if ( !$obErro->ocorreu() && $this->getCodigoNatureza() == 1 ) { //repassa as dividas em aberto para os novos CGMs quando a natureza for COMPRA/VENDA #$arAdquirentes = $this->obRCIMAdquirente->getAdquirentes(); - #sistemaLegado::mostravar ( $this->arAdquirentes ); - #echo 'Inscricao: '.$this->getInscricaoMunicipal(); include_once( CAM_GT_ARR_NEGOCIO."RARRCalculo.class.php" ); include_once ( CAM_GT_DAT_MAPEAMENTO."TDATDividaImovel.class.php" ); include_once ( CAM_GT_DAT_MAPEAMENTO."TDATDividaCGM.class.php" ); diff --git a/gestaoTributaria/fontes/PHP/cadastroImobiliario/instancias/consultas/OCCadastroImobiliario.php b/gestaoTributaria/fontes/PHP/cadastroImobiliario/instancias/consultas/OCCadastroImobiliario.php index e50be96..bf3115b 100644 --- a/gestaoTributaria/fontes/PHP/cadastroImobiliario/instancias/consultas/OCCadastroImobiliario.php +++ b/gestaoTributaria/fontes/PHP/cadastroImobiliario/instancias/consultas/OCCadastroImobiliario.php @@ -32,7 +32,7 @@ * @ignore - * $Id: OCCadastroImobiliario.php 59612 2014-09-02 12:00:51Z gelson $ + * $Id: OCCadastroImobiliario.php 63839 2015-10-22 18:08:07Z franver $ * Casos de uso: uc-05.01.18 */ @@ -198,7 +198,6 @@ if ( $rsListaEdificacoes->getCampo('data_baixa') && ($rsListaEdificacoes->getCam $rsListaEdificacoes->preenche( $arTMP ); $rsListaEdificacoes->setPrimeiroElemento(); Sessao::write('rsEdificacoes', $rsListaEdificacoes); -//echo "lista edificacoes
    ";sistemaLegado::mostravar( $rsListaEdificacoes );exit; $obRCIMConstrucaoOutros = new RCIMConstrucaoOutros; if ( $rsCadastroImobiliario->getCampo("inscricao_municipal" ) && !$rsCadastroImobiliario->getCampo("cod_condominio") ) { @@ -211,8 +210,6 @@ if ( $rsCadastroImobiliario->getCampo("inscricao_municipal" ) && !$rsCadastroImo $obRCIMConstrucaoOutros->listarConstrucoes( $rsListaConstrucao ); Sessao::write('rsConstrucoes', $rsListaConstrucao); -//echo "lista construcoes
    ";sistemaLegado::mostravar( $rsListaConstrucao ); -//exit; if ( $rsCadastroImobiliario->getCampo("tipo_lote" ) == 'Urbano' ) { $obRCIMLote = new RCIMLoteUrbano; @@ -228,8 +225,6 @@ if ( $obRCIMLote->getTimestampLote() == $rsListaProcesso->getCampo( "timestamp" $stProcesso = $rsListaProcesso->getCampo( "cod_processo_ano" ); } -//echo "lista processos
    ";sistemaLegado::mostravar( $rsListaProcesso ); - $obRCIMConfrontacao = new RCIMConfrontacao( $obRCIMLote ); $obErro = $obRCIMConfrontacao->listarConfrontacoesPorLote( $rsListaConfrontacao ); $arConfrontacoesSessao = array(); @@ -294,14 +289,12 @@ $rsListaConfrontacao = new RecordSet; $rsListaConfrontacao->preenche( $arConfrontacoesSessao ); $arConfrontacoesSessao = $rsListaConfrontacao; Sessao::write('confrontacoes', $arConfrontacoesSessao); -//echo "lista confrontacao
    ";sistemaLegado::mostravar( $sessao->transf4["confrontacoes"] ); $arChaveAtributoLote = array( "cod_lote" => $rsCadastroImobiliario->getCampo("cod_lote") ); $obRCIMLote->obRCadastroDinamico->setChavePersistenteValores( $arChaveAtributoLote ); $obRCIMLote->obRCadastroDinamico->recuperaAtributosSelecionadosValores( $rsAtributosLote ); Sessao::write('atributos_lote', $rsAtributosLote); -//echo "atributos_lote";sistemaLegado::mostravar( $sessao->transf4["atributos_lote"] ); $arLoteSessao = array(); $arLoteSessao[0]["numero_lote"] = $obRCIMLote->getNumeroLote()." - ".$rsCadastroImobiliario->getCampo("tipo_lote" ); @@ -323,9 +316,5 @@ $rsListaLote = new RecordSet; $rsListaLote->preenche( $arLoteSessao ); Sessao::write('lote', $rsListaLote); -//echo "lista lote
    ";sistemaLegado::mostravar( $sessao->transf4["lote"] ); - -//exit; - $obRRelatorio->executaFrameOculto( "OCGeraRelatorioCadastroImobiliario.php" ); ?> diff --git a/gestaoTributaria/fontes/PHP/cadastroImobiliario/instancias/hierarquia/PRManterHierarquia.php b/gestaoTributaria/fontes/PHP/cadastroImobiliario/instancias/hierarquia/PRManterHierarquia.php index 1579fec..a8cf30d 100755 --- a/gestaoTributaria/fontes/PHP/cadastroImobiliario/instancias/hierarquia/PRManterHierarquia.php +++ b/gestaoTributaria/fontes/PHP/cadastroImobiliario/instancias/hierarquia/PRManterHierarquia.php @@ -32,7 +32,7 @@ * @ignore - * $Id: PRManterHierarquia.php 59612 2014-09-02 12:00:51Z gelson $ + * $Id: PRManterHierarquia.php 63839 2015-10-22 18:08:07Z franver $ * Casos de uso: uc-05.01.02 */ @@ -61,7 +61,6 @@ $pgProc = "PR".$stPrograma.".php?stAcao=$stAcao"; $pgOcul = "OC".$stPrograma.".php?stAcao=$stAcao"; $pgJS = "JS".$stPrograma.".js"; -//SistemaLegado::mostravar($pgList);die(); $obRCIMNivel = new RCIMNivel; $inCodAtributosSelecionados = $_REQUEST["inCodAtributoSelecionados"]; switch ($stAcao) { diff --git a/gestaoTributaria/fontes/PHP/cadastroImobiliario/instancias/licencas/OCManterEmissaoImobiliaria.php b/gestaoTributaria/fontes/PHP/cadastroImobiliario/instancias/licencas/OCManterEmissaoImobiliaria.php index 2c609c6..22a8b96 100755 --- a/gestaoTributaria/fontes/PHP/cadastroImobiliario/instancias/licencas/OCManterEmissaoImobiliaria.php +++ b/gestaoTributaria/fontes/PHP/cadastroImobiliario/instancias/licencas/OCManterEmissaoImobiliaria.php @@ -331,7 +331,6 @@ switch ($_REQUEST['stCtrl']) { $OOParser->LoadXmlFromDoc('styles.xml'); $OOParser->SaveXmlToDoc(); - //sistemaLegado::mostravar($OOParser->GetMimetypeDoc().'name='.$stNomeArquivoDownload ); $typefile = 'application/sxw'; header("Content-type: $typefile");//$OOParser->GetMimetypeDoc(). 'name='.$stNomeArquivoDownload ); header('Content-Length: '.filesize($OOParser->GetPathnameDoc())); diff --git a/gestaoTributaria/fontes/PHP/cadastroImobiliario/instancias/localizacao/FLManterLocalizacao.php b/gestaoTributaria/fontes/PHP/cadastroImobiliario/instancias/localizacao/FLManterLocalizacao.php index b5237e6..54a1288 100755 --- a/gestaoTributaria/fontes/PHP/cadastroImobiliario/instancias/localizacao/FLManterLocalizacao.php +++ b/gestaoTributaria/fontes/PHP/cadastroImobiliario/instancias/localizacao/FLManterLocalizacao.php @@ -32,21 +32,13 @@ * @ignore - * $Id: FLManterLocalizacao.php 59612 2014-09-02 12:00:51Z gelson $ + * $Id: FLManterLocalizacao.php 63826 2015-10-21 16:39:23Z arthur $ * Casos de uso: uc-05.01.03 */ -/* -$Log$ -Revision 1.10 2006/09/18 10:30:48 fabio -correção do cabeçalho, -adicionado trecho de log do CVS - -*/ include_once '../../../../../../gestaoAdministrativa/fontes/PHP/pacotes/FrameworkHTML.inc.php'; include_once '../../../../../../gestaoAdministrativa/fontes/PHP/framework/include/cabecalho.inc.php'; - include_once ( CAM_GT_CIM_NEGOCIO."RCIMNivel.class.php" ); //include_once ( CAM_GT_CIM_NEGOCIO."RCIMLocalizacao.class.php" ); @@ -64,7 +56,9 @@ $pgJS = "JS".$stPrograma.".js"; include_once ($pgJS); //Define a função do arquivo, ex: incluir, excluir, alterar, consultar, etc + $stAcao = $request->get('stAcao'); + if ( empty( $stAcao ) ) { $stAcao = "incluir"; } @@ -125,4 +119,4 @@ $obFormulario->show(); sistemaLegado::executaFrameOculto ( "buscaDado('SetarMascaraLocalizacao');" ); -?> +?> \ No newline at end of file diff --git a/gestaoTributaria/fontes/PHP/cadastroImobiliario/instancias/localizacao/FMManterLocalizacao.php b/gestaoTributaria/fontes/PHP/cadastroImobiliario/instancias/localizacao/FMManterLocalizacao.php index 1c55b1f..47fa5d5 100755 --- a/gestaoTributaria/fontes/PHP/cadastroImobiliario/instancias/localizacao/FMManterLocalizacao.php +++ b/gestaoTributaria/fontes/PHP/cadastroImobiliario/instancias/localizacao/FMManterLocalizacao.php @@ -32,7 +32,7 @@ * @ignore - * $Id: FMManterLocalizacao.php 59612 2014-09-02 12:00:51Z gelson $ + * $Id: FMManterLocalizacao.php 63826 2015-10-21 16:39:23Z arthur $ * Casos de uso: uc-05.01.03 */ @@ -54,9 +54,11 @@ $pgJS = "JS".$stPrograma.".js"; include_once ($pgJS); +$stAcao = $request->get('stAcao'); + //Define a função do arquivo, ex: incluir, excluir, alterar, consultar, etc -if ( empty( $_REQUEST['stAcao'] ) ) { - $_REQUEST['stAcao'] = "incluir"; +if ( empty( $stAcao ) ) { + $stAcao = "incluir"; } $obRCIMNivel = new RCIMNivel; @@ -74,7 +76,7 @@ $obRCIMLocalizacao->listarNiveis( $rsNivel ); //DEFINICAO DOS COMPONENTES $obHdnAcao = new Hidden; $obHdnAcao->setName ( "stAcao" ); -$obHdnAcao->setValue ( $_REQUEST['stAcao'] ); +$obHdnAcao->setValue ( $stAcao ); $obHdnCtrl = new Hidden; $obHdnCtrl->setName ( "stCtrl" ); @@ -117,4 +119,5 @@ $obFormulario->addComponente ( $obCmbNivel ); $obFormulario->OK(); $obFormulario->setFormFocus ( $obCmbNivel->getId() ); $obFormulario->show(); + ?> diff --git a/gestaoTributaria/fontes/PHP/cadastroImobiliario/instancias/localizacao/FMManterLocalizacaoNivel.php b/gestaoTributaria/fontes/PHP/cadastroImobiliario/instancias/localizacao/FMManterLocalizacaoNivel.php index 257247b..23df70f 100755 --- a/gestaoTributaria/fontes/PHP/cadastroImobiliario/instancias/localizacao/FMManterLocalizacaoNivel.php +++ b/gestaoTributaria/fontes/PHP/cadastroImobiliario/instancias/localizacao/FMManterLocalizacaoNivel.php @@ -32,7 +32,7 @@ * @ignore - * $Id: FMManterLocalizacaoNivel.php 63673 2015-09-28 19:31:03Z carlos.silva $ + * $Id: FMManterLocalizacaoNivel.php 63826 2015-10-21 16:39:23Z arthur $ * Casos de uso: uc-05.01.03 */ @@ -58,32 +58,38 @@ $pgJS = "JS".$stPrograma.".js"; include_once ($pgJS); //Define a função do arquivo, ex: incluir, excluir, alterar, consultar, etc -if ( empty( $_REQUEST['stAcao'] ) ) { - $_REQUEST['stAcao'] = "incluir"; +$stAcao = $request->get('stAcao'); + +if ( empty( $stAcao ) ) { + $stAcao = "alterar"; } -$obRCIMLocalizacao = new RCIMLocalizacao; -$obMontaLocalizacao = new MontaLocalizacao; -$obMontaAtributos = new MontaAtributos; -$rsAtributos = new RecordSet; -$obMascara = new Mascara; +$obRCIMConfiguracao = new RCIMConfiguracao(); +$obRCIMLocalizacao = new RCIMLocalizacao(); +$obMontaLocalizacao = new MontaLocalizacao(); +$obMontaAtributos = new MontaAtributos(); +$rsAtributos = new RecordSet(); +$obMascara = new Mascara(); $stNomePai = ''; $stCompostoPai = ''; -if ($_REQUEST['stAcao'] == "incluir") { - $inCodigoVigencia = $_REQUEST["inCodigoVigencia"]; - $inCodigoNivel = $_REQUEST["cmbNivel"]; - //Sessao::write('inCodigoNivel', $inCodigoNivel); - $_REQUEST['inCodigoNivel'] = $_REQUEST['cmbNivel']; - $inCodigoLocalizacao = $request->get('inCodigoLocalizacao'); +$obRCIMConfiguracao->buscaModulo(); +$boLocalizacaoAutomaitca = SistemaLegado::pegaConfiguracao( 'codigo_localizacao', $obRCIMConfiguracao->getCodigoModulo(), Sessao::getExercicio() ); + +if ( $boLocalizacaoAutomaitca != "true" && $boLocalizacaoAutomaitca != "false" ) + $boLocalizacaoAutomaitca = null; - $obMontaLocalizacao->setNivelCorte ( $inCodigoNivel - 1 ); +if ($request->get('stAcao') == "incluir") { + $inCodigoVigencia = $request->get('inCodigoVigencia'); + $inCodigoNivel = ($request->get('cmbNivel') == '') ? $request->get('inCodigoNivel') : $request->get('cmbNivel'); + $inCodigoLocalizacao = $request->get('inCodigoLocalizacao'); + $obMontaLocalizacao->setNivelCorte ( $inCodigoNivel - 1 ); $obRCIMLocalizacao->setCodigoVigencia ( $inCodigoVigencia ); $obRCIMLocalizacao->setCodigoNivel ( $inCodigoNivel ); $obMontaLocalizacao->setCodigoVigencia ( $inCodigoVigencia ); -$inCodigoNivelTemp = $inCodigoNivel - 1; + $inCodigoNivelTemp = $inCodigoNivel - 1; $obMontaLocalizacao->setCodigoNivel ( $inCodigoNivelTemp ); Sessao::write('inCodigoNivel', $inCodigoNivel); @@ -97,23 +103,23 @@ $inCodigoNivelTemp = $inCodigoNivel - 1; $obRCIMLocalizacao->obRCadastroDinamico->recuperaAtributosSelecionados( $rsAtributos ); } else { - $inCodigoVigencia = $_REQUEST["inCodigoVigencia"]; - $inCodigoNivel = $_REQUEST["inCodigoNivel"]; - $inCodigoLocalizacao = $_REQUEST['inCodigoLocalizacao']; + $inCodigoVigencia = $request->get('inCodigoVigencia'); + $inCodigoNivel = $request->get('inCodigoNivel'); + $inCodigoLocalizacao = $request->get('inCodigoLocalizacao'); - $obRCIMLocalizacao->setCodigoVigencia ( $_REQUEST["inCodigoVigencia"] ); - $obRCIMLocalizacao->setCodigoNivel ( $_REQUEST["inCodigoNivel"] ); - $obRCIMLocalizacao->setCodigoLocalizacao ( $_REQUEST["inCodigoLocalizacao"] ); + $obRCIMLocalizacao->setCodigoVigencia ( $request->get('inCodigoVigencia') ); + $obRCIMLocalizacao->setCodigoNivel ( $request->get('inCodigoNivel') ); + $obRCIMLocalizacao->setCodigoLocalizacao ( $request->get('inCodigoLocalizacao') ); - $obMontaLocalizacao->setCodigoVigencia ( $_REQUEST["inCodigoVigencia"] ); - $obMontaLocalizacao->setCodigoNivel ( $_REQUEST["inCodigoNivel"] ); - $obMontaLocalizacao->setCodigoLocalizacao ( $_REQUEST["inCodigoLocalizacao"] ); - $obMontaLocalizacao->setValorComposto ( $_REQUEST["stValorComposto"] ); + $obMontaLocalizacao->setCodigoVigencia ( $request->get('inCodigoVigencia') ); + $obMontaLocalizacao->setCodigoNivel ( $request->get('inCodigoNivel') ); + $obMontaLocalizacao->setCodigoLocalizacao ( $request->get('inCodigoLocalizacao') ); + $obMontaLocalizacao->setValorComposto ( $request->get('stValorComposto') ); $obRCIMLocalizacao->consultarLocalizacao(); //RECUPERA INFORMACOES DA LOCALIZACAO PAI - $stPaiComposto = substr( $_REQUEST["stValorComposto"], 0, strlen( $_REQUEST["stValorComposto"] ) - ( strlen($obRCIMLocalizacao->getMascara() +1 ))); + $stPaiComposto = substr( $request->get('stValorComposto'), 0, strlen( $request->get('stValorComposto') ) - ( strlen($obRCIMLocalizacao->getMascara() +1 ))); $stPaiComposto .= ".".str_pad( 0 , strlen($obRCIMLocalizacao->getMascara()) , 0 ); $obRCIMLocalizacao->setValorComposto( $stPaiComposto ); @@ -134,6 +140,7 @@ $obRCIMConfiguracao = new RCIMConfiguracao; $obRCIMConfiguracao->consultarConfiguracao(); $rsMDSelecionados = $obRCIMConfiguracao->getRSMD(); $boM2Ativo = false; + while ( !$rsMDSelecionados->Eof() ) { if ( $rsMDSelecionados->getCampo( "nome" ) == "Localização" ) { $boM2Ativo = true; @@ -156,8 +163,8 @@ while ( !$rsAliquotaSelecionados->Eof() ) { //valores m2------------------- if ($boM2Ativo) { $obTCIMLocalizacaoValorM2 = new TCIMLocalizacaoValorM2; - if ($_REQUEST["inCodigoLocalizacao"]) { - $stFiltro = " AND localizacao_valor_m2.cod_localizacao = ".$_REQUEST["inCodigoLocalizacao"]; + if ($request->get('inCodigoLocalizacao')) { + $stFiltro = " AND localizacao_valor_m2.cod_localizacao = ".$request->get('inCodigoLocalizacao'); $obTCIMLocalizacaoValorM2->listaLocalizacaoValorM2( $rsDadosM2, $stFiltro ); $rsDadosM2->addFormatacao ('valor_m2_territorial', 'NUMERIC_BR'); $rsDadosM2->addFormatacao ('valor_m2_predial', 'NUMERIC_BR'); @@ -204,8 +211,8 @@ if ($boM2Ativo) { if ($boAliquotaAtivo) { $obTCIMLocalizacaoAliquota = new TCIMLocalizacaoAliquota; - if ($_REQUEST["inCodigoLocalizacao"]) { - $stFiltro = " AND localizacao_aliquota.cod_localizacao = ".$_REQUEST["inCodigoLocalizacao"]; + if ($request->get('inCodigoLocalizacao')) { + $stFiltro = " AND localizacao_aliquota.cod_localizacao = ".$request->get('inCodigoLocalizacao'); $obTCIMLocalizacaoAliquota->listaLocalizacaoAliquota( $rsDadosM2, $stFiltro ); $rsDadosM2->addFormatacao ('aliquota_territorial', 'NUMERIC_BR'); $rsDadosM2->addFormatacao ('aliquota_predial', 'NUMERIC_BR'); @@ -273,7 +280,7 @@ $obMontaAtributos->recuperaValores(); //DEFINICAO DOS COMPONENTES $obHdnAcao = new Hidden; $obHdnAcao->setName ( "stAcao" ); -$obHdnAcao->setValue ( $_REQUEST['stAcao'] ); +$obHdnAcao->setValue ( $request->get('stAcao') ); $obHdnCtrl = new Hidden; $obHdnCtrl->setName ( "stCtrl" ); @@ -327,6 +334,10 @@ $obHdnValComposto = new Hidden; $obHdnValComposto->setName( "stValorComposto" ); $obHdnValComposto->setValue( $stValorComposto ); +$obHdnCodLocalAutomatico = new Hidden; +$obHdnCodLocalAutomatico->setName( "boCodLocalAutomatico" ); +$obHdnCodLocalAutomatico->setValue( $boLocalizacaoAutomaitca ); + //DEFINICAO DO FORM $obForm = new Form; $obForm->setAction( $pgProc ); @@ -334,9 +345,9 @@ $obForm->setTarget( "oculto" ); //DEFINICAO DO FORMULARIO $obFormulario = new Formulario; -$obFormulario->addForm ( $obForm ); -$obFormulario->setAjuda ( "UC-05.01.03" ); -$obFormulario->addTitulo ( "Dados para nível" ); +$obFormulario->addForm ( $obForm ); +$obFormulario->setAjuda ( "UC-05.01.03" ); +$obFormulario->addTitulo ( "Dados para nível" ); $obFormulario->addHidden ( $obHdnAcao ); $obFormulario->addHidden ( $obHdnCtrl ); $obFormulario->addHidden ( $obHdnAliquota ); @@ -344,22 +355,20 @@ $obFormulario->addHidden ( $obHdnMD ); $obFormulario->addHidden ( $obHdnCodigoNivel ); $obFormulario->addHidden ( $obHdnCodigoVigencia ); $obFormulario->addHidden ( $obHdnValorReduzido ); +$obFormulario->addHidden ( $obHdnCodLocalAutomatico ); -if ( $_REQUEST['stAcao'] == "alterar" ) +if ( $request->get('stAcao') == "alterar" ) $obFormulario->addHidden ( $obHdnValComposto ); $obFormulario->addComponente ( $obLbNomeNivel ); -if ($_REQUEST['stAcao'] == "incluir" && $inCodigoNivel != 1) { - if ($_GET["stValorComposto"]) { - $obMontaLocalizacao->setValorComposto( $_GET["stValorComposto"] ); +if ($request->get('stAcao') == "incluir" && $inCodigoNivel != 1) { + if ($request->get('stValorComposto')){ + $obMontaLocalizacao->setValorComposto( $request->get('stValorComposto') ); /* Enquanto nao for otimizada a combo de localizacao o formulario é carregado com a combo não preenchida*/ - - //$obMontaLocalizacao->geraFormularioPreenchido( $obFormulario ); - $obMontaLocalizacao->geraFormulario( $obFormulario ); } else { - $obMontaLocalizacao->setCodigoNivel ( 1 ); //$inCodigoNivelTemp ); + $obMontaLocalizacao->setCodigoNivel ( 1 ); $obMontaLocalizacao->geraFormulario( $obFormulario ); } } else { @@ -368,7 +377,10 @@ if ($_REQUEST['stAcao'] == "incluir" && $inCodigoNivel != 1) { $obFormulario->addComponente ( $obLblValorComposto ); } } -$obFormulario->addComponente ( $obTxtCodigoLocalizacao ); + +if ( $boLocalizacaoAutomaitca == null || $boLocalizacaoAutomaitca == "false" || $stAcao == 'alterar' ) + $obFormulario->addComponente ( $obTxtCodigoLocalizacao ); + $obFormulario->addComponente ( $obTxtNomeLocalizacao ); if ($boM2Ativo) { @@ -389,21 +401,22 @@ if ($boAliquotaAtivo) { $obMontaAtributos->geraFormulario( $obFormulario ); -if ($_REQUEST['stAcao'] == "incluir") { +if ($request->get('stAcao') == "incluir") { $obFormulario->OK(); } else { $obFormulario->Cancelar(); } -if ($_REQUEST['stAcao'] == "incluir") { +if ($request->get('stAcao') == "incluir") { if ($inCodigoNivel == 1) { $obFormulario->setFormFocus( $obTxtCodigoLocalizacao->getId() ); } else { SistemaLegado::executaFramePrincipal("f.stChaveLocalizacao.focus();"); } -} elseif ($_REQUEST['stAcao'] == "alterar") { +} elseif ($request->get('stAcao') == "alterar") { $obFormulario->setFormFocus( $obTxtCodigoLocalizacao->getId() ); } + $obFormulario->show(); -?> +?> \ No newline at end of file diff --git a/gestaoTributaria/fontes/PHP/cadastroImobiliario/instancias/localizacao/JSManterLocalizacao.js b/gestaoTributaria/fontes/PHP/cadastroImobiliario/instancias/localizacao/JSManterLocalizacao.js index d3c91ff..08f35b8 100755 --- a/gestaoTributaria/fontes/PHP/cadastroImobiliario/instancias/localizacao/JSManterLocalizacao.js +++ b/gestaoTributaria/fontes/PHP/cadastroImobiliario/instancias/localizacao/JSManterLocalizacao.js @@ -33,7 +33,7 @@ * @ignore - * $Id: JSManterLocalizacao.js 63673 2015-09-28 19:31:03Z carlos.silva $ + * $Id: JSManterLocalizacao.js 63887 2015-10-29 18:10:14Z evandro $ * Casos de uso: uc-05.01.03 */ @@ -91,17 +91,7 @@ function buscaDado( BuscaDado ){ } function submeteFiltro(){ - if (document.frm.stAcao.value != 'consultar') { - stLocalizacao = document.frm.stValorComposto.value; - if ( stLocalizacao == "" ){ - mensagem = "Campo Localização não foi preenchido!"; - alertaAviso(mensagem,'form','erro','', '../'); - } else { - document.frm.submit(); - } - } else { - document.frm.submit(); - } + document.frm.submit(); } function limparFiltro(){ diff --git a/gestaoTributaria/fontes/PHP/cadastroImobiliario/instancias/localizacao/LSManterLocalizacao.php b/gestaoTributaria/fontes/PHP/cadastroImobiliario/instancias/localizacao/LSManterLocalizacao.php index 3aee20a..9bb10d4 100755 --- a/gestaoTributaria/fontes/PHP/cadastroImobiliario/instancias/localizacao/LSManterLocalizacao.php +++ b/gestaoTributaria/fontes/PHP/cadastroImobiliario/instancias/localizacao/LSManterLocalizacao.php @@ -32,18 +32,10 @@ * @ignore - * $Id: LSManterLocalizacao.php 63673 2015-09-28 19:31:03Z carlos.silva $ + * $Id: LSManterLocalizacao.php 63826 2015-10-21 16:39:23Z arthur $ * Casos de uso: uc-05.01.03 */ - -/* -$Log$ -Revision 1.11 2006/09/18 10:30:48 fabio -correção do cabeçalho, -adicionado trecho de log do CVS - -*/ include_once '../../../../../../gestaoAdministrativa/fontes/PHP/pacotes/FrameworkHTML.inc.php'; include_once '../../../../../../gestaoAdministrativa/fontes/PHP/framework/include/cabecalho.inc.php'; include_once( CAM_GT_CIM_NEGOCIO."RCIMLocalizacao.class.php" ); @@ -62,17 +54,19 @@ $pgOcul = "OC".$stPrograma.".php"; $pgJS = "JS".$stPrograma.".js"; $stCaminho = CAM_GT_CIM_INSTANCIAS."localizacao/"; -//$stCaminho = CAM_GT_CIM_INSTANCIAS."lote/"; $obRCIMLocalizacao = new RCIMLocalizacao; $link = Sessao::read('link'); //Define a função do arquivo, ex: incluir, excluir, alterar, consultar, etc -if ( empty( $_REQUEST['stAcao'] ) ) { - $_REQUEST['stAcao'] = "alterar"; +$stAcao = $request->get('stAcao'); + +if ( empty( $stAcao ) ) { + $stAcao = "alterar"; } + //Define arquivos PHP para cada acao -switch ($_REQUEST['stAcao']) { +switch ($stAcao) { case 'consultar': $pgProx = $pgFormConsultar; break; case 'alterar' : $pgProx = $pgFormNivel; break; case 'reativar' : @@ -82,11 +76,12 @@ switch ($_REQUEST['stAcao']) { DEFAULT : $pgProx = $pgForm; } //MANTEM FILTRO E PAGINACAO -$stLink .= "&stAcao=".($_REQUEST['stAcao'] == 'consultar'); -if ($_GET["pg"] and $_GET["pos"]) { - $stLink.= "&pg=".$_GET["pg"]."&pos=".$_GET["pos"]; - $link["pg"] = $_GET["pg"]; - $link["pos"] = $_GET["pos"]; +$stLink .= "&stAcao=".$stAcao; + +if ($request->get('pg') && $request->get('pos')) { + $stLink.= "&pg=".$request->get('pg')."&pos=".$request->get('pos'); + $link["pg"] = $request->get('pg'); + $link["pos"] = $request->get('pos'); } //USADO QUANDO EXISTIR FILTRO @@ -94,7 +89,7 @@ if ($_GET["pg"] and $_GET["pos"]) { if ( is_array($link) ) { $_REQUEST = $link; } else { - foreach ($_REQUEST as $key => $valor) { + foreach ($request->getAll() as $key => $valor) { $link[$key] = $valor; } } @@ -102,24 +97,24 @@ if ( is_array($link) ) { Sessao::write('link', $link); Sessao::write('stLink', $stLink); -$obRCIMLocalizacao->setCodigoVigencia( $_REQUEST["inCodigoVigencia"] ); +$obRCIMLocalizacao->setCodigoVigencia( $request->get('inCodigoVigencia') ); //MONTA O FILTRO -if ($_REQUEST["stValorComposto"]) { +if ($request->get('stValorComposto')) { //RETIRA O PONTO FINAL DO VALOR COMPOSTO CASO EXISTA - $obRCIMLocalizacao->setValorComposto( $_REQUEST["stValorComposto"] ); + $obRCIMLocalizacao->setValorComposto( $request->get('stValorComposto') ); } -if ($_REQUEST["stNomeLocalizacao"]) { - $obRCIMLocalizacao->setNomeLocalizacao( $_REQUEST["stNomeLocalizacao"] ); +if ($request->get('stNomeLocalizacao')) { + $obRCIMLocalizacao->setNomeLocalizacao( $request->get('stNomeLocalizacao') ); } -if ($_REQUEST['stAcao'] == 'reativar') { +if ($stAcao == 'reativar') { $obRCIMLocalizacao->verificaBaixaLocalizacao( $rsListaLocalizacao ); } else { $obRCIMLocalizacao->listarLocalizacao( $rsListaLocalizacao ); - if ( $rsListaLocalizacao->eof() && $_REQUEST["stValorComposto"] ) { //nao encontrou nada, verificar se esta baixado + if ( $rsListaLocalizacao->eof() && $request->get('stValorComposto') ) { //nao encontrou nada, verificar se esta baixado $obRCIMLocalizacao->verificaBaixaLocalizacao( $rsListaLocalizacaoBaixa ); if ( !$rsListaLocalizacaoBaixa->eof()) { - $stJs = "alertaAviso('@Localização baixada. (".$_REQUEST["stValorComposto"].")','form','erro','".Sessao::getId()."');"; + $stJs = "alertaAviso('@Localização baixada. (".$request->get('stValorComposto').")','form','erro','".Sessao::getId()."');"; SistemaLegado::executaFrameOculto($stJs); } @@ -160,7 +155,7 @@ $obLista->addDado(); $obLista->ultimoDado->setCampo( "nom_localizacao" ); $obLista->commitDado(); $obLista->addAcao(); -$obLista->ultimaAcao->setAcao( $_REQUEST['stAcao'] ); +$obLista->ultimaAcao->setAcao( $stAcao ); $obLista->ultimaAcao->addCampo("&inCodigoVigencia", "cod_vigencia" ); $obLista->ultimaAcao->addCampo("&inCodigoNivel", "cod_nivel" ); $obLista->ultimaAcao->addCampo("&stNomeNivel", "nom_nivel" ); @@ -170,13 +165,13 @@ $obLista->ultimaAcao->addCampo("&stValorReduzido", "valor_reduzido" ); $obLista->ultimaAcao->addCampo("&stNomeLocalizacao", "nom_localizacao" ); $obLista->ultimaAcao->addCampo("&stDescQuestao", "[valor_composto]-[nom_localizacao]" ); -if ($_REQUEST['stAcao'] == "reativar") { +if ($stAcao == "reativar") { $obLista->ultimaAcao->addCampo("&stJustificativa", "justificativa" ); $obLista->ultimaAcao->addCampo("&stTimeStamp", "timestamp" ); $obLista->ultimaAcao->addCampo("&stDTInicio", "dt_inicio" ); } -if ($_REQUEST['stAcao'] == "excluir") { +if ($stAcao == "excluir") { $obLista->ultimaAcao->setLink( $stCaminho.$pgProx."?".Sessao::getId().$stLink ); } else { $obLista->ultimaAcao->setLink( $pgProx."?".Sessao::getId().$stLink ); @@ -188,4 +183,4 @@ $obFormulario = new Formulario; $obFormulario->setAjuda ( "UC-05.01.03" ); $obFormulario->show(); -?> +?> \ No newline at end of file diff --git a/gestaoTributaria/fontes/PHP/cadastroImobiliario/instancias/localizacao/OCManterLocalizacao.php b/gestaoTributaria/fontes/PHP/cadastroImobiliario/instancias/localizacao/OCManterLocalizacao.php index 663350e..07b3722 100755 --- a/gestaoTributaria/fontes/PHP/cadastroImobiliario/instancias/localizacao/OCManterLocalizacao.php +++ b/gestaoTributaria/fontes/PHP/cadastroImobiliario/instancias/localizacao/OCManterLocalizacao.php @@ -32,7 +32,7 @@ * @ignore - * $Id: OCManterLocalizacao.php 63673 2015-09-28 19:31:03Z carlos.silva $ + * $Id: OCManterLocalizacao.php 63887 2015-10-29 18:10:14Z evandro $ * Casos de uso: uc-05.01.03 */ @@ -76,9 +76,7 @@ switch ($_REQUEST["stCtrl"]) { $obTxtLocalizacao->setMinLength ( strlen( $stMascara ) ); $obTxtLocalizacao->setSize ( strlen( $stMascara ) ); $obTxtLocalizacao->obEvento->setOnKeyUp("mascaraDinamico('".$stMascara."', this, event);"); - if($request->get('stAcao') != 'consultar') { - $obTxtLocalizacao->setNull(false); - } + $obTxtLocalizacao->setNull(true); $obTxtNomeLocalizacao = new TextBox; $obTxtNomeLocalizacao->setName ( "stNomeLocalizacao" ); diff --git a/gestaoTributaria/fontes/PHP/cadastroImobiliario/instancias/localizacao/PRManterLocalizacao.php b/gestaoTributaria/fontes/PHP/cadastroImobiliario/instancias/localizacao/PRManterLocalizacao.php index 4859bb6..f7cca88 100755 --- a/gestaoTributaria/fontes/PHP/cadastroImobiliario/instancias/localizacao/PRManterLocalizacao.php +++ b/gestaoTributaria/fontes/PHP/cadastroImobiliario/instancias/localizacao/PRManterLocalizacao.php @@ -32,58 +32,67 @@ * @ignore - * $Id: PRManterLocalizacao.php 63673 2015-09-28 19:31:03Z carlos.silva $ + * $Id: PRManterLocalizacao.php 63826 2015-10-21 16:39:23Z arthur $ * Casos de uso: uc-05.01.03 */ -/* -$Log$ -Revision 1.14 2006/09/18 10:30:48 fabio -correção do cabeçalho, -adicionado trecho de log do CVS - -*/ include_once '../../../../../../gestaoAdministrativa/fontes/PHP/pacotes/FrameworkHTML.inc.php'; include_once '../../../../../../gestaoAdministrativa/fontes/PHP/framework/include/cabecalho.inc.php'; include_once ( CAM_GT_CIM_NEGOCIO."RCIMLocalizacao.class.php" ); $stAcao = $request->get('stAcao'); - $stLink = Sessao::read('stLink'); //Define o nome dos arquivos PHP $stPrograma = "ManterLocalizacao"; -$pgFilt = "FL".$stPrograma.".php?stAcao=$stAcao"; -$pgList = "LS".$stPrograma.".php?stAcao=$stAcao".$stLink; -$pgForm = "FM".$stPrograma.".php?stAcao=$stAcao"; -$pgFormNivel = "FM".$stPrograma."Nivel.php?stAcao=$stAcao"; -$pgProc = "PR".$stPrograma.".php?stAcao=$stAcao"; -$pgOcul = "OC".$stPrograma.".php?stAcao=$stAcao"; +$pgFilt = "FL".$stPrograma.".php?stAcao=".$stAcao; +$pgList = "LS".$stPrograma.".php?stAcao=".$stAcao.$stLink; +$pgForm = "FM".$stPrograma.".php?stAcao=".$stAcao; +$pgFormNivel = "FM".$stPrograma."Nivel.php?stAcao=".$stAcao; +$pgProc = "PR".$stPrograma.".php?stAcao=".$stAcao; +$pgOcul = "OC".$stPrograma.".php?stAcao=".$stAcao; $pgJS = "JS".$stPrograma.".js"; -$obRCIMLocalizacao = new RCIMLocalizacao; -$obAtributos = new MontaAtributos; +$obRCIMLocalizacao = new RCIMLocalizacao(); +$obAtributos = new MontaAtributos(); $obAtributos->setName('Atributo_'); $obAtributos->recuperaVetor( $arChave ); switch ($stAcao) { case "incluir": + + if ( $request->get('boCodLocalAutomatico') == 'true' ) { + $obRCIMLocalizacao->setLocalizacaoAutomatica ( $request->get('boCodLocalAutomatico') ); + $obRCIMLocalizacao->setCodigoVigencia ( $request->get('inCodigoVigencia') ); + $obRCIMLocalizacao->setCodigoNivel ( $request->get('inCodigoNivel') ); + + $stValorReduzido = $request->get('stChaveLocalizacao'); + if (isset($stValorReduzido)){ + $obRCIMLocalizacao->setValorReduzido ( $request->get('stChaveLocalizacao') ); + } + $obRCIMLocalizacao->ultimorValorComposto($rsCodLocalizacao); + $request->set("inValorLocalizacao", $rsCodLocalizacao->getCampo('codigo_localizacao')); + } $arValidaLocalizacao['cod_nivel'] = $request->get('inCodigoNivel'); $arValidaLocalizacao['cod_vigencia'] = $request->get('inCodigoVigencia'); $arValidaLocalizacao['valor'] = preg_replace( "/0/", "", trim( $request->get("inValorLocalizacao") ) ); $arValidaLocalizacao['codigo_composto'] = $request->get('stChaveLocalizacao')."."; - - $obRCIMLocalizacao->setCodigoVigencia ( $request->get("inCodigoVigencia") ); - $obRCIMLocalizacao->setCodigoNivel ( $request->get("inCodigoNivel") ); + + $obRCIMLocalizacao->setCodigoVigencia ( $request->get("inCodigoVigencia") ); + $obRCIMLocalizacao->setCodigoNivel ( $request->get("inCodigoNivel") ); $obRCIMLocalizacao->setNomeLocalizacao ( $request->get("stNomeLocalizacao") ); $obRCIMLocalizacao->setValor ( preg_replace( "/0/", "", trim( $request->get("inValorLocalizacao") ) ) ); $obRCIMLocalizacao->setValorComposto ( $request->get("stChaveLocalizacao") ); + //MONTAR UM LOOP PARA PEGAR O VALOR DOS COMBOS include_once ( CAM_GT_CIM_NEGOCIO."RCIMLocalizacao.class.php" ); + $obRCIMLocTmp = new RCIMLocalizacao; + $stMascara = $request->get("stChaveLocalizacao"); + if ($stMascara != "") { $stComposto = ""; $arMascara = explode(".",$stMascara); @@ -99,7 +108,7 @@ switch ($stAcao) { $i++; } } - + if ($_REQUEST["boAliquotaAtivo"]) { $obRCIMLocalizacao->setAliquotaVigencia( $request->get("dtVigenciaAliquota") ); $obRCIMLocalizacao->setAliquotaCodNorma( $request->get("inCodigoFundamentacaoAliquota") ); @@ -176,15 +185,12 @@ switch ($stAcao) { $obRCIMLocalizacao->setCodigoVigencia ( $_REQUEST["inCodigoVigencia"] ); $obRCIMLocalizacao->setCodigoLocalizacao ( $_REQUEST["inCodigoLocalizacao"] ); $obRCIMLocalizacao->setValorReduzido ( $_REQUEST["stValorReduzido"] ); -// $obRCIMLocalizacao->setValorComposto ( $_REQUEST["stChaveLocalizacao"] ); $obErro = $obRCIMLocalizacao->excluirLocalizacao(); if ( !$obErro->ocorreu() ) { - SistemaLegado::alertaAviso($pgList,"Nome Localização: ".$_REQUEST['stNomeLocalizacao'],"excluir","aviso", Sessao::getId(), "../"); - -sistemaLegado::executaFrameOculto ( "buscaDado('SetarMascaraLocalizacao');" ); + sistemaLegado::executaFrameOculto ( "buscaDado('SetarMascaraLocalizacao');" ); } else { SistemaLegado::alertaAviso($pgList,urlencode($obErro->getDescricao()),"n_excluir","erro",Sessao::getId(), "../"); } @@ -241,4 +247,5 @@ sistemaLegado::executaFrameOculto ( "buscaDado('SetarMascaraLocalizacao');" ); } break; } -?> + +?> \ No newline at end of file diff --git a/gestaoTributaria/fontes/PHP/cadastroImobiliario/instancias/parametros/FMManterConfiguracao.php b/gestaoTributaria/fontes/PHP/cadastroImobiliario/instancias/parametros/FMManterConfiguracao.php index 4e75627..72075e0 100755 --- a/gestaoTributaria/fontes/PHP/cadastroImobiliario/instancias/parametros/FMManterConfiguracao.php +++ b/gestaoTributaria/fontes/PHP/cadastroImobiliario/instancias/parametros/FMManterConfiguracao.php @@ -32,7 +32,7 @@ * @ignore - * $Id: FMManterConfiguracao.php 63672 2015-09-28 19:24:31Z arthur $ + * $Id: FMManterConfiguracao.php 63766 2015-10-07 19:09:57Z arthur $ * Casos de uso: uc-05.01.01 */ @@ -53,6 +53,9 @@ $pgOcul = "OC".$stPrograma.".php"; $obRCIMConfiguracao = new RCIMConfiguracao(); $obErro = $obRCIMConfiguracao->consultarConfiguracao(); +$boCodLocal = $obRCIMConfiguracao->getCodigoLocal(); +$boNumIM = $obRCIMConfiguracao->getNumeroIM(); + $stAcao = $request->get('stAcao'); //DEFINICAO DOS COMPONENTES @@ -70,7 +73,7 @@ $obRdbCodLocalAutomatico->setName ( "boCodigoLocal" ); $obRdbCodLocalAutomatico->setId ( "boCodigoLocal" ); $obRdbCodLocalAutomatico->setLabel ( "Automático" ); $obRdbCodLocalAutomatico->setValue ( "true" ); -$obRdbCodLocalAutomatico->setChecked ( ( $obRCIMConfiguracao->getCodigoLocal() == 'true' ) ); +$obRdbCodLocalAutomatico->setChecked ( ( $boCodLocal == 'true' ) ); $obRdbCodLocalAutomatico->setTitle ( "Define se o código de localização será informado ou gerado automaticamente." ); $obRdbCodLocalAutomatico->setNull ( false ); @@ -80,7 +83,7 @@ $obRdbCodLocalManual->setName ( "boCodigoLocal" ); $obRdbCodLocalManual->setiD ( "boCodigoLocal" ); $obRdbCodLocalManual->setLabel ( "Manual" ); $obRdbCodLocalManual->setValue ( "false" ); -$obRdbCodLocalManual->setChecked ( ( empty($obRCIMConfiguracao->getCodigoLocal()) || $obRCIMConfiguracao->getCodigoLocal() == 'false') ? 'false' : "" ); +$obRdbCodLocalManual->setChecked ( ( empty($boCodLocal) || $boCodLocal == 'false') ? 'false' : "" ); $obRdbCodLocalManual->setNull ( false ); $obTxtMascaraLote = new TextBox; @@ -97,7 +100,7 @@ $obRdbNumInscAutomatico->setRotulo ( "Número de Inscrição Imobiliária" ) $obRdbNumInscAutomatico->setName ( "boNumeroIM" ); $obRdbNumInscAutomatico->setLabel ( "Automático" ); $obRdbNumInscAutomatico->setValue ( "true" ); -$obRdbNumInscAutomatico->setChecked ( ( $obRCIMConfiguracao->getNumeroIM() == 'true' ) ); +$obRdbNumInscAutomatico->setChecked ( ( $boNumIM == 'true' ) ); $obRdbNumInscAutomatico->setTitle ( "Define se o número da inscrição imobiliária será informado ou gerado automaticamente." ); $obRdbNumInscAutomatico->setNull ( false ); @@ -106,7 +109,7 @@ $obRdbNumInscManual->setRotulo ( "Número de Inscrição Imobiliária" ); $obRdbNumInscManual->setName ( "boNumeroIM" ); $obRdbNumInscManual->setLabel ( "Manual" ); $obRdbNumInscManual->setValue ( "false" ); -$obRdbNumInscManual->setChecked ( ( empty($obRCIMConfiguracao->getNumeroIM()) || $obRCIMConfiguracao->getNumeroIM() == 'false') ? 'false' : "" ); +$obRdbNumInscManual->setChecked ( ( empty($boNumIM) || $boNumIM == 'false') ? 'false' : "" ); $obRdbNumInscManual->setNull ( false ); $obTxtMascaraInscImob = new TextBox; diff --git a/gestaoTributaria/fontes/PHP/cadastroImobiliario/instancias/relatorios/OCBairros.php b/gestaoTributaria/fontes/PHP/cadastroImobiliario/instancias/relatorios/OCBairros.php index 53a3df2..a52be43 100755 --- a/gestaoTributaria/fontes/PHP/cadastroImobiliario/instancias/relatorios/OCBairros.php +++ b/gestaoTributaria/fontes/PHP/cadastroImobiliario/instancias/relatorios/OCBairros.php @@ -32,7 +32,7 @@ * @ignore - * $Id: OCBairros.php 59612 2014-09-02 12:00:51Z gelson $ + * $Id: OCBairros.php 63839 2015-10-22 18:08:07Z franver $ * Casos de uso: uc-05.01.19 */ @@ -71,8 +71,6 @@ $obRCIMRelatorioBairros = new RCIMRelatorioBairros; $obRCIMConfiguracao = new RCIMConfiguracao; $obRCIMConfiguracao->consultarConfiguracao(); -//SistemaLegado::mostravar($obRCIMConfiguracao->getRSMD());die(); - $boRSMD = false; $rsRSMD = $obRCIMConfiguracao->getRSMD(); $rsRSMD->setPrimeiroElemento(); @@ -111,7 +109,6 @@ $obRCIMRelatorioBairros->setboAliquota ( $boAliquota ); // GERA RELATORIO ATRAVES DO FILTRO SETADO $obRCIMRelatorioBairros->getRecordSetValor( $rsBairros ); -//SistemaLegado::mostravar($rsBairros);die(); Sessao::write('sessao_transf5', $rsBairros); $obRRelatorio->executaFrameOculto( "OCGeraRelatorioBairros.php" ); diff --git a/gestaoTributaria/fontes/PHP/cadastroImobiliario/instancias/relatorios/OCCondominios.php b/gestaoTributaria/fontes/PHP/cadastroImobiliario/instancias/relatorios/OCCondominios.php index 27e250e..5e59f95 100644 --- a/gestaoTributaria/fontes/PHP/cadastroImobiliario/instancias/relatorios/OCCondominios.php +++ b/gestaoTributaria/fontes/PHP/cadastroImobiliario/instancias/relatorios/OCCondominios.php @@ -30,7 +30,7 @@ * @author Analista: Fabio Bertoldi * @author Desenvolvedor: Fernando Piccini Cercato - * $Id: OCCondominios.php 59612 2014-09-02 12:00:51Z gelson $ + * $Id: OCCondominios.php 63839 2015-10-22 18:08:07Z franver $ * Casos de uso: uc-05.01.27 */ @@ -48,7 +48,6 @@ include_once ( CAM_GT_CIM_MAPEAMENTO."TCIMCondominio.class.php" ); // INSTANCIA OBJETO $obRRelatorio = new RRelatorio; -//sistemaLegado::mostravar( $arFiltroSessao );exit; $arFiltroSessao = Sessao::read('filtroRelatorio'); $stFiltro = ""; if ( ( $arFiltroSessao["inCodCondominioInicial"] ) && ( $arFiltroSessao["inCodCondominioFinal"] ) ) { @@ -77,7 +76,6 @@ while ( !$rsCondominios->Eof() ) { $obTCIMCondominio->recuperaImoveisDoCondominio( $rsImoveisCondominio, $stFiltro ); $arDadosImoveis = $rsImoveisCondominio->getElementos(); -//sistemaLegado::mostravar($arDadosImoveis);//DIE(); for ( $inX=0; $inX $arDadosImoveis[$inX]['inscricao_municipal'] ); diff --git a/gestaoTributaria/fontes/PHP/cadastroImobiliario/instancias/relatorios/OCGeraRelatorioCadastroImobiliarioBoletim.php b/gestaoTributaria/fontes/PHP/cadastroImobiliario/instancias/relatorios/OCGeraRelatorioCadastroImobiliarioBoletim.php index 3f42123..64b8f6d 100644 --- a/gestaoTributaria/fontes/PHP/cadastroImobiliario/instancias/relatorios/OCGeraRelatorioCadastroImobiliarioBoletim.php +++ b/gestaoTributaria/fontes/PHP/cadastroImobiliario/instancias/relatorios/OCGeraRelatorioCadastroImobiliarioBoletim.php @@ -32,7 +32,7 @@ * @ignore - * $Id: OCGeraRelatorioCadastroImobiliarioBoletim.php 59612 2014-09-02 12:00:51Z gelson $ + * $Id: OCGeraRelatorioCadastroImobiliarioBoletim.php 63839 2015-10-22 18:08:07Z franver $ * Casos de uso: uc-05.01.26 */ @@ -116,7 +116,7 @@ $arAtributosConstrucaoValorModificado = array(); //valores padrao seguidos do se $inQtdAtributosConstrucao = 0; //quantidade de atributos existentes $arTamMaxAtributosConstrucao = array(); //guarda a quantidade maxima de caracteres dos atributos $arValPadAtributoConstrucao = array(); //guarda a posicao onde esta o valor padrao do atributo -//sistemaLegado::mostravar( $rsAtributosConstrucao );exit; + while ( !$rsAtributosConstrucao->Eof() ) { if ($rsAtributosConstrucao->getCampo("ativo") == 't') { $stTmp = $rsAtributosConstrucao->getCampo("valor_padrao_desc"); @@ -167,7 +167,7 @@ $arAtributosImovelValorModificado = array(); //valores padrao seguidos do seleci $inQtdAtributosImovel = 0; //quantidade de atributos existentes $arTamMaxAtributosImovel = array(); //guarda a quantidade maxima de caracteres dos atributos $arValPadAtributoImovel = array(); //guarda a posicao onde esta o valor padrao do atributo -//sistemaLegado::mostravar( $rsAtributosImovel );exit; + while ( !$rsAtributosImovel->Eof() ) { if ($rsAtributosImovel->getCampo("ativo") == 't') { $stTmp = $rsAtributosImovel->getCampo("valor_padrao_desc"); @@ -617,7 +617,7 @@ for ($inX=0; $inX<$inTotalDados; $inX++) { $obPDF->setAlinhamento( "L" ); $obPDF->addCampo ( "confrotac", 9, B ); -//sistemaLegado::mostravar($arDadosConfrontacoes);exit; + $inPosicaoLivre = $arDadosConfrontacoes[$arDados[$inX]["inscricao_municipal"]]["total_conf"]; for ($inZ=0; $inZ<3; $inZ++) { $arDadosConfrontacoes[$arDados[$inX]["inscricao_municipal"]][$inPosicaoLivre+$inZ]["conf_lot_ponto_cardeal"]= "[ ]"; diff --git a/gestaoTributaria/fontes/PHP/cadastroImobiliario/popups/bairroSistema/OCProcurarBairro.php b/gestaoTributaria/fontes/PHP/cadastroImobiliario/popups/bairroSistema/OCProcurarBairro.php index 0428bec..9cc0e1d 100755 --- a/gestaoTributaria/fontes/PHP/cadastroImobiliario/popups/bairroSistema/OCProcurarBairro.php +++ b/gestaoTributaria/fontes/PHP/cadastroImobiliario/popups/bairroSistema/OCProcurarBairro.php @@ -34,7 +34,7 @@ * @ignore - * $Id: OCProcurarBairro.php 59612 2014-09-02 12:00:51Z gelson $ + * $Id: OCProcurarBairro.php 63839 2015-10-22 18:08:07Z franver $ * Casos de uso: uc-05.01.05 @@ -57,8 +57,6 @@ include_once '../../../../../../gestaoAdministrativa/fontes/PHP/framework/includ $obRCIMBairro = new RCIMBairro; $rsMunicipios = new RecordSet; -mostravar($_REQUEST); - switch ($_REQUEST ["stCtrl"]) { case "preencheMunicipio": $js .= "f.inCodMunicipio.value = '';\n"; diff --git a/gestaoTributaria/fontes/PHP/cadastroImobiliario/popups/localizacao/FLBuscaLocalizacao.php b/gestaoTributaria/fontes/PHP/cadastroImobiliario/popups/localizacao/FLBuscaLocalizacao.php index 75d7f50..0ad25a2 100755 --- a/gestaoTributaria/fontes/PHP/cadastroImobiliario/popups/localizacao/FLBuscaLocalizacao.php +++ b/gestaoTributaria/fontes/PHP/cadastroImobiliario/popups/localizacao/FLBuscaLocalizacao.php @@ -32,25 +32,11 @@ * @ignore - * $Id: FLBuscaLocalizacao.php 59612 2014-09-02 12:00:51Z gelson $ + * $Id: FLBuscaLocalizacao.php 63781 2015-10-09 20:50:07Z arthur $ * Casos de uso: uc-05.01.03 */ -/* -$Log$ -Revision 1.10 2007/02/06 17:47:40 cercato -Bug #8220# - -Revision 1.9 2006/12/11 14:54:31 cercato -Bug #7780# - -Revision 1.8 2006/09/15 15:04:13 fabio -correção do cabeçalho, -adicionado trecho de log do CVS - -*/ - include_once '../../../../../../gestaoAdministrativa/fontes/PHP/pacotes/FrameworkHTML.inc.php'; include_once '../../../../../../gestaoAdministrativa/fontes/PHP/framework/include/cabecalho.inc.php'; include_once ( CAM_GT_CIM_COMPONENTES."MontaLocalizacaoCombos.class.php" ); @@ -143,8 +129,8 @@ $obFormulario->addHidden ( $obHdnTipoBusca ); $obFormulario->addHidden ( $obHdnCodigoVigencia ); $obFormulario->addComponente ( $obTxtNome ); $obMontaLocalizacaoCombos->geraFormulario ( $obFormulario ); -$obFormulario->OK (); -$obFormulario->show (); +$obFormulario->OK(); +$obFormulario->show(); $obIFrame->show(); -?> +?> \ No newline at end of file diff --git a/gestaoTributaria/fontes/PHP/cadastroImobiliario/popups/localizacao/JSBuscaLocalizacao.js b/gestaoTributaria/fontes/PHP/cadastroImobiliario/popups/localizacao/JSBuscaLocalizacao.js index 754f10c..0a3b0d8 100755 --- a/gestaoTributaria/fontes/PHP/cadastroImobiliario/popups/localizacao/JSBuscaLocalizacao.js +++ b/gestaoTributaria/fontes/PHP/cadastroImobiliario/popups/localizacao/JSBuscaLocalizacao.js @@ -33,7 +33,7 @@ * @ignore - * $Id: JSBuscaLocalizacao.js 63688 2015-09-29 20:32:47Z arthur $ + * $Id: JSBuscaLocalizacao.js 63760 2015-10-07 13:51:43Z evandro $ * Casos de uso: uc-05.01.03 */ @@ -43,7 +43,7 @@ function insere(inCodigo,stNome){ if( eval( window.opener.parent.frames['telaPrincipal'].document.getElementById('') != null ) ) { - window.opener.parent.frames['telaPrincipal'].document.getElementById('').innerHTML = inCodigo; + window.opener.parent.frames['telaPrincipal'].document.getElementById('').innerHTML = stNome; var campoHidden = eval( 'window.opener.parent.frames["telaPrincipal"].document.frm.' ); if( campoHidden != null ) campoHidden.value=inCodigo; } diff --git a/gestaoTributaria/fontes/PHP/cadastroImobiliario/popups/localizacao/LSBuscaLocalizacao.php b/gestaoTributaria/fontes/PHP/cadastroImobiliario/popups/localizacao/LSBuscaLocalizacao.php index d0a02d2..3e11e07 100755 --- a/gestaoTributaria/fontes/PHP/cadastroImobiliario/popups/localizacao/LSBuscaLocalizacao.php +++ b/gestaoTributaria/fontes/PHP/cadastroImobiliario/popups/localizacao/LSBuscaLocalizacao.php @@ -32,7 +32,7 @@ * @ignore - * $Id: LSBuscaLocalizacao.php 63688 2015-09-29 20:32:47Z arthur $ + * $Id: LSBuscaLocalizacao.php 63967 2015-11-12 16:42:16Z evandro $ * Casos de uso: uc-05.01.03 */ @@ -94,7 +94,8 @@ if ( $request->get('inCodigoVigencia') ) { $obRCIMLocalizacao->setCodigoVigencia ( $request->get('inCodigoVigencia') ); } -if ( Sessao::read('inCodigoNivel') > 0 ) { +$inCodigoNivel = Sessao::read('inCodigoNivel'); +if ( $inCodigoNivel > 0 ) { $obRCIMLocalizacao->setCodigoNivel ( Sessao::read('inCodigoNivel')-1 ); } else { $obRCIMLocalizacao->recuperaUltimoNivel( $rsListaNivel ); @@ -130,7 +131,12 @@ $obLista->ultimoCabecalho->setWidth( 5 ); $obLista->commitCabecalho(); $obLista->addDado(); -$obLista->ultimoDado->setCampo( "valor_composto" ); +if ( $inCodigoNivel > 0 ) { + $obLista->ultimoDado->setCampo( "valor_reduzido" ); +}else{ + $obLista->ultimoDado->setCampo( "valor_composto" ); +} + $obLista->ultimoDado->setAlinhamento( 'DIREITA' ); $obLista->commitDado(); $obLista->addDado(); diff --git a/gestaoTributaria/fontes/PHP/cadastroImobiliario/popups/localizacao/OCBuscaLocalizacao.php b/gestaoTributaria/fontes/PHP/cadastroImobiliario/popups/localizacao/OCBuscaLocalizacao.php index 250e0a8..49a63fd 100755 --- a/gestaoTributaria/fontes/PHP/cadastroImobiliario/popups/localizacao/OCBuscaLocalizacao.php +++ b/gestaoTributaria/fontes/PHP/cadastroImobiliario/popups/localizacao/OCBuscaLocalizacao.php @@ -32,65 +32,62 @@ * @ignore - * $Id: OCBuscaLocalizacao.php 59612 2014-09-02 12:00:51Z gelson $ + * $Id: OCBuscaLocalizacao.php 63781 2015-10-09 20:50:07Z arthur $ * Casos de uso: uc-05.01.03 */ -/* -$Log$ -Revision 1.7 2006/09/15 15:04:13 fabio -correção do cabeçalho, -adicionado trecho de log do CVS - -*/ include_once '../../../../../../gestaoAdministrativa/fontes/PHP/pacotes/FrameworkHTML.inc.php'; include_once '../../../../../../gestaoAdministrativa/fontes/PHP/framework/include/valida.inc.php'; include_once( CAM_GT_CIM_NEGOCIO."RCIMLocalizacao.class.php"); include_once ( CAM_GT_CIM_COMPONENTES."MontaLocalizacaoCombos.class.php" ); -if ($_REQUEST["stCtrl"]) { + +if ($request->get('stCtrl')) { $obMontaLocalizacao = new MontaLocalizacaoCombos; $obMontaLocalizacao->setCadastroLocalizacao( false ); $obMontaLocalizacao->setPopup( true ); - switch ($_REQUEST["stCtrl"]) { + + switch ($request->get('stCtrl')) { case "preencheProxCombo": - $stNomeComboLocalizacao = "inCodLocalizacao_".( $_REQUEST["inPosicao"] - 1); - $stChaveLocal = $_REQUEST[$stNomeComboLocalizacao]; - $inPosicao = $_REQUEST["inPosicao"]; - if ( empty( $stChaveLocal ) and $_REQUEST["inPosicao"] > 2 ) { - $stNomeComboLocalizacao = "inCodLocalizacao_".( $_REQUEST["inPosicao"] - 2); - $stChaveLocal = $_REQUEST[$stNomeComboLocalizacao]; - $inPosicao = $_REQUEST["inPosicao"] - 1; + $stNomeComboLocalizacao = "inCodLocalizacao_".( $request->get('inPosicao') - 1); + $stChaveLocal = $request->get($stNomeComboLocalizacao); + $inPosicao = $request->get('inPosicao'); + if ( empty( $stChaveLocal ) and $request->get('inPosicao') > 2 ) { + $stNomeComboLocalizacao = "inCodLocalizacao_".( $request->get('inPosicao') - 2); + $stChaveLocal = $request->get($stNomeComboLocalizacao); + $inPosicao = $request->get('inPosicao') - 1; } $arChaveLocal = explode("-" , $stChaveLocal ); - $obMontaLocalizacao->setCodigoVigencia ( $_REQUEST["inCodigoVigencia"] ); + $obMontaLocalizacao->setCodigoVigencia ( $request->get('inCodigoVigencia') ); $obMontaLocalizacao->setCodigoNivel ( $arChaveLocal[0] ); $obMontaLocalizacao->setCodigoLocalizacao ( $arChaveLocal[1] ); $obMontaLocalizacao->setValorReduzido ( $arChaveLocal[3] ); - $obMontaLocalizacao->preencheProxCombo( $inPosicao , $_REQUEST["inNumNiveis"] ); + $obMontaLocalizacao->preencheProxCombo( $inPosicao , $request->get('inNumNiveis') ); break; case "preencheCombos": - $obMontaLocalizacao->setCodigoVigencia( $_REQUEST["inCodigoVigencia"] ); - $obMontaLocalizacao->setCodigoNivel ( $_REQUEST["inCodigoNivel"] ); - $obMontaLocalizacao->setValorReduzido ( $_REQUEST["stChaveLocalizacao"] ); + $obMontaLocalizacao->setCodigoVigencia( $request->get('inCodigoVigencia') ); + $obMontaLocalizacao->setCodigoNivel ( $request->get('inCodigoNivel') ); + $obMontaLocalizacao->setValorReduzido ( $request->get('stChaveLocalizacao') ); $obMontaLocalizacao->preencheCombos(); break; } } - if ($_GET['stTipoBusca'] == "nomLocalizacao") { + if ($request->get('stTipoBusca') == "nomLocalizacao") { $obRCIMLocalizacao = new RCIMLocalizacao; - $obRCIMLocalizacao->setValorComposto( $_REQUEST['stChaveLocalizacao'] ); - if ( $_REQUEST['stChaveLocalizacaoLoteamento'] ) - $obRCIMLocalizacao->setValorComposto( $_REQUEST['stChaveLocalizacaoLoteamento'] ); + $obRCIMLocalizacao->setValorComposto( $request->get('stChaveLocalizacao') ); + if ( $request->get('stChaveLocalizacaoLoteamento') ) + $obRCIMLocalizacao->setValorComposto( $request->get('stChaveLocalizacaoLoteamento') ); $obRCIMLocalizacao->listarNomLocalizacao( $rsLocalizacao ); $stDescricao = $rsLocalizacao->getCampo("nom_localizacao"); $stCodigo = $rsLocalizacao->getCampo("cod_localizacao"); - SistemaLegado::executaFrameOculto("retornaValorBscInner( '".$_GET['stNomCampoCod']."', '".$_GET['stIdCampoDesc']."', '".$_GET['stNomForm']."', '".$stDescricao."')"); - } elseif ($_GET['stTipoBusca'] == "buscaReduzido") { + SistemaLegado::executaFrameOculto("retornaValorBscInner( '".$request->get('stNomCampoCod')."', '".$request->get('stIdCampoDesc')."', '".$request->get('stNomForm')."', '".$stDescricao."')"); + } elseif ($request->get('stTipoBusca') == "buscaReduzido") { $obRCIMLocalizacao = new RCIMLocalizacao; - $obRCIMLocalizacao->setValorReduzido( $_REQUEST['stChaveLocalizacao'] ); - $obRCIMLocalizacao->setCodigoNivel ( $_REQUEST["inCodigoNivel"]-1); + $obRCIMLocalizacao->setValorReduzido( $request->get('stChaveLocalizacao') ); + $obRCIMLocalizacao->setCodigoNivel ( $request->get('inCodigoNivel')-1); $obRCIMLocalizacao->listarNomLocalizacao( $rsLocalizacao ); $stDescricao = $rsLocalizacao->getCampo("nom_localizacao"); - SistemaLegado::executaFrameOculto("retornaValorBscInner( '".$_GET['stNomCampoCod']."', '".$_GET['stIdCampoDesc']."', '".$_GET['stNomForm']."', '".$stDescricao."')"); + SistemaLegado::executaFrameOculto("retornaValorBscInner( '".$request->get('stNomCampoCod')."', '".$request->get('stIdCampoDesc')."', '".$request->get('stNomForm')."', '".$stDescricao."')"); } + +?> \ No newline at end of file diff --git a/gestaoTributaria/fontes/PHP/cadastroImobiliario/popups/logradouro/FMManterLogradouro.php b/gestaoTributaria/fontes/PHP/cadastroImobiliario/popups/logradouro/FMManterLogradouro.php index 606a8d1..c847a2d 100755 --- a/gestaoTributaria/fontes/PHP/cadastroImobiliario/popups/logradouro/FMManterLogradouro.php +++ b/gestaoTributaria/fontes/PHP/cadastroImobiliario/popups/logradouro/FMManterLogradouro.php @@ -34,7 +34,7 @@ * @ignore - * $Id: FMManterLogradouro.php 62960 2015-07-13 14:00:58Z evandro $ + * $Id: FMManterLogradouro.php 63920 2015-11-09 12:18:49Z evandro $ * Casos de uso: uc-05.01.04 */ @@ -158,6 +158,24 @@ $obHdnCadastro = new Hidden; $obHdnCadastro->setName ( "stCadastro" ); $obHdnCadastro->setValue ( $_REQUEST["stCadastro"] ); +//HIDDENS para incluir dados da nova regra de logradouro mas que nao são pertinentes a essa popUp +//Setando valores padrões para os campos +$obHdninCodNorma = new Hidden; +$obHdninCodNorma->setName ( "inCodNorma" ); +$obHdninCodNorma->setValue ( 0 ); + +$obHdnstDataInicial = new Hidden; +$obHdnstDataInicial->setName ( "stDataInicial" ); +$obHdnstDataInicial->setValue ( date("d/m/Y") ); + +$obHdnstDataFinal = new Hidden; +$obHdnstDataFinal->setName ( "stDataFinal" ); +$obHdnstDataFinal->setValue ( "" ); + +$obHdnstDescricaoNorma = new Hidden; +$obHdnstDescricaoNorma->setName ( "stDescricaoNorma" ); +$obHdnstDescricaoNorma->setValue ( "Não informado" ); + if ($stAcao == 'renomear' || $stAcao == 'alterar') { $obHdnNomeAnterior = new Hidden; @@ -484,6 +502,9 @@ $obFormulario->addHidden ( $obHdnCampoNome ); $obFormulario->addHidden ( $obHdnCampoNum ); $obFormulario->addHidden ( $obHdnPais ); $obFormulario->addHidden ( $obHdnCadastro ); +$obFormulario->addHidden ( $obHdninCodNorma ); +$obFormulario->addHidden ( $obHdnstDataInicial ); +$obFormulario->addHidden ( $obHdnstDataFinal ); if ($stAcao == 'renomear') { @@ -539,7 +560,6 @@ $obFormulario->addSpan ( $obSpnListarCEP ); $obFormulario->defineBarra ( $arBotaoAcao ); -//$obFormulario->ok(); $obFormulario->show(); $obIFrame2->show(); $obIFrame->show(); diff --git a/gestaoTributaria/fontes/PHP/cadastroImobiliario/popups/logradouro/OCProcurarLogradouro.php b/gestaoTributaria/fontes/PHP/cadastroImobiliario/popups/logradouro/OCProcurarLogradouro.php index 24d290f..020e99f 100755 --- a/gestaoTributaria/fontes/PHP/cadastroImobiliario/popups/logradouro/OCProcurarLogradouro.php +++ b/gestaoTributaria/fontes/PHP/cadastroImobiliario/popups/logradouro/OCProcurarLogradouro.php @@ -34,15 +34,17 @@ * @ignore - * $Id: OCProcurarLogradouro.php 62960 2015-07-13 14:00:58Z evandro $ + * $Id: OCProcurarLogradouro.php 63963 2015-11-11 19:01:08Z evandro $ * Casos de uso: uc-05.01.04 */ include_once '../../../../../../gestaoAdministrativa/fontes/PHP/pacotes/FrameworkHTML.inc.php'; include_once '../../../../../../gestaoAdministrativa/fontes/PHP/framework/include/valida.inc.php'; -include_once( CAM_GT_CIM_NEGOCIO."RCIMBairro.class.php" ); -include_once CAM_GT_CIM_NEGOCIO.'RCIMLogradouro.class.php'; +include_once ( CAM_GT_CIM_NEGOCIO.'RCIMLogradouro.class.php'); +include_once ( CAM_GT_CIM_NEGOCIO."RCIMBairro.class.php" ); +include_once ( CAM_GT_CIM_NEGOCIO."RCIMConfiguracao.class.php" ); +include_once ( CAM_GT_CIM_MAPEAMENTO."TCIMTrecho.class.php" ); // Guarda a ação antiga para ser escrita ao final do script. $acao = Sessao::read('acao'); @@ -224,102 +226,372 @@ function montaListaCEP($arListaCEP, $boRetorna = false) } } -function montaListaHistorico() + +function carregaDados() { + GLOBAL $request; - $obRCIMLogradouro = new RCIMLogradouro; + $stAcao = $request->get('stAcao'); + // DEFINE OBJETOS DAS CLASSES + $obRCIMConfiguracao = new RCIMConfiguracao; + $obRCIMLogradouro = new RCIMLogradouro; + $obRCIMBairro = new RCIMBairro; + $rsTipos = new RecordSet; - $obRCIMLogradouro->setCodigoUF( $_REQUEST["inCodUF"] ); - $obRCIMLogradouro->setCodigoMunicipio( $_REQUEST["inCodMunicipio"] ); - $obRCIMLogradouro->setCodigoLogradouro( $_REQUEST["inCodigoLogradouro"] ); - - $obRCIMLogradouro->listarHistoricoLogradouros( $rsLista, $boTransacao, "" ); - - if ($rsLista->getNumLinhas() > 0) { - - $obLista = new Lista; - $obLista->setRecordSet ( $rsLista ); - $obLista->setTitulo ( "Histórico do Logradouro" ); - $obLista->setMostraPaginacao ( false ); - - $obLista->addCabecalho(); - $obLista->ultimoCabecalho->addConteudo(" "); - $obLista->ultimoCabecalho->setWidth( 5 ); - $obLista->commitCabecalho(); - - $obLista->addCabecalho(); - $obLista->ultimoCabecalho->addConteudo("Código "); - $obLista->ultimoCabecalho->setWidth( 10 ); - $obLista->commitCabecalho(); - - $obLista->addCabecalho(); - $obLista->ultimoCabecalho->addConteudo( "Nome do Logradouro" ); - $obLista->ultimoCabecalho->setWidth( 30 ); - $obLista->commitCabecalho(); + //Busca UF e Municipio que foi da configuracao + $obRCIMConfiguracao->consultarConfiguracao(); + $obRCIMConfiguracao->listaDadosMunicipio( $arConfiguracao ); + + //Busca todos os UFs + $obRCIMLogradouro->listarUF( $rsUF ); + //Busca os tipos de logradouros + $obRCIMLogradouro->listarTipoLogradouro( $rsTipos ); + //Busca os municipios de acordo com o estado + $obRCIMLogradouro->setCodigoUF( $arConfiguracao['cod_uf']); + $obRCIMLogradouro->listarMunicipios( $rsMunicipios ); + //Busca os Bairros de acordo com o estado e municipio + $obRCIMBairro->setCodigoUF( $arConfiguracao['cod_uf'] ); + $obRCIMBairro->setCodigoMunicipio( $arConfiguracao['cod_municipio'] ); + $obRCIMBairro->listarBairros( $rsBairros ); + + //Busca proximo codigo logradouro + $inProxCodLogradouro = null; + $obTLogradouro= new TLogradouro(); + $obTLogradouro->proximoCod($inProxCodLogradouro); + + //Preenche Tipo + if ( $rsTipos->getNumLinhas() > 0 ) { + foreach ($rsTipos->getElementos() as $key => $value) { + $stJs .= " jq_('#inCodTipo').append(new Option('".$value['nom_tipo']."','".$value['cod_tipo']."') ); "; + } + } - $obLista->addCabecalho(); - $obLista->ultimoCabecalho->addConteudo( "Nome do Bairro" ); - $obLista->ultimoCabecalho->setWidth( 10 ); - $obLista->commitCabecalho(); + //Preenche UF + if ( $rsUF->getNumLinhas() > 0 ) { + foreach ($rsUF->getElementos() as $key => $value) { + $value['nom_uf'] = addslashes($value['nom_uf']); + $stJs .= " jq_('#inCodUF').append(new Option('".$value['nom_uf']."','".$value['cod_uf']."') ); "; + } + } + + //Preenche Municipios + if ( $rsMunicipios->getNumLinhas() > 0 ) { + foreach ($rsMunicipios->getElementos() as $key => $value) { + $value['nom_municipio'] = addslashes($value['nom_municipio']); + $stJs .= " jq_('#inCodMunicipio').append(new Option('".$value['nom_municipio']."','".$value['cod_municipio']."') ); "; + } + } - $obLista->addCabecalho(); - $obLista->ultimoCabecalho->addConteudo( "Município" ); - $obLista->ultimoCabecalho->setWidth( 20 ); - $obLista->commitCabecalho(); + //Preenche Bairros + if ( $rsBairros->getNumLinhas() > 0 ) { + foreach ($rsBairros->getElementos() as $key => $value) { + $value['nom_bairro'] = addslashes($value['nom_bairro']); + $stJs .= " jq_('#inCodBairro').append(new Option('".$value['nom_bairro']."','".$value['cod_bairro']."') );"; + } + } - $obLista->addCabecalho(); - $obLista->ultimoCabecalho->addConteudo( "CEP" ); - $obLista->ultimoCabecalho->setWidth( 8 ); - $obLista->commitCabecalho(); + //De acordo com a acao preenche os campos + switch ($stAcao) { + case 'incluir': + $stJs .= " jq_('#inCodLogradouro').val(".$inProxCodLogradouro."); "; + $stJs .= " jq_('#inCodigoUF').val('".$arConfiguracao['cod_uf']."'); "; + $stJs .= " jq_('#inCodUF').val('".$arConfiguracao['cod_uf']."'); "; + $stJs .= " jq_('#inCodigoMunicipio').val('".$arConfiguracao['cod_municipio']."'); "; + $stJs .= " jq_('#inCodMunicipio').val('".$arConfiguracao['cod_municipio']."'); "; + break; + + case 'alterar': + $obRCIMLogradouro = new RCIMLogradouro; + $obRCIMLogradouro->setCodigoUF( $request->get("inCodUF") ); + $obRCIMLogradouro->setCodigoMunicipio( $request->get("inCodMunicipio") ); + $obRCIMLogradouro->setCodigoLogradouro( $request->get("inCodigoLogradouro") ); + $obRCIMLogradouro->listarHistoricoLogradouros( $rsLista, $boTransacao, "" ); + + $stJs .= " jq_('#inCodigoLogradouro').html(".$request->get('inCodigoLogradouro')."); "; + $stJs .= " jq_('#stNomeUF').html('".$request->get('stNomeUF')."'); "; + $stJs .= " jq_('#stNomeMunicipio').html('".$request->get('stNomeMunicipio')."'); "; + $stJs .= " jq_('#inCodTipo').val(".$request->get('inCodigoTipo')."); "; + //buscando o ultimo dado cadastrado de acordo com a data inicial e final + $rsLista->setUltimoElemento(); + $stJs .= " jq_('#inCodNorma').val(".$rsLista->getCampo('cod_norma')."); "; + $stJs .= " jq_('#stNorma').html('".$rsLista->getCampo('descricao_norma')."'); "; + $stJs .= " jq_('#stDataInicial').val('".$rsLista->getCampo('dt_inicio')."'); "; + $stJs .= " jq_('#stDataFinal').val('".$rsLista->getCampo('dt_fim')."'); "; + + foreach ($rsLista->getElementos() as $key => $value) { + $arDadosHistorico[$key]['inId'] = $key; + $arDadosHistorico[$key]['sequencial'] = $value['sequencial']; + $arDadosHistorico[$key]['descricao_norma'] = $value['descricao_norma']; + $arDadosHistorico[$key]['nome_anterior'] = $value['nome_anterior']; + $arDadosHistorico[$key]['dt_inicio'] = $value['dt_inicio']; + $arDadosHistorico[$key]['dt_fim'] = $value['dt_fim']; + $arDadosHistorico[$key]['exercicio'] = $value['exercicio']; + $arDadosHistorico[$key]['cod_norma'] = $value['cod_norma']; + } - $obLista->addCabecalho(); - $obLista->ultimoCabecalho->addConteudo( "Data Logradouro" ); - $obLista->ultimoCabecalho->setWidth( 10 ); - $obLista->commitCabecalho(); + Sessao::write('arDadosHistorico',$arDadosHistorico); + $stFiltro = ' WHERE cod_logradouro = '.$request->get('inCodigoLogradouro'); + $obTCIMTrecho = new TCIMTrecho(); + $obTCIMTrecho->retornaSomaExtensao($rsRecordSet, $stFiltro); + if ($rsRecordSet->getNumLinhas > 0) { + $stJs .= " jq_('#stExtensao').html(".$rsRecordSet->getCampo('extensao_total')."); "; + } + break; + case 'consultar': + $obRCIMLogradouro = new RCIMLogradouro; + $obRCIMLogradouro->setCodigoUF( $request->get("inCodUF") ); + $obRCIMLogradouro->setCodigoMunicipio( $request->get("inCodMunicipio") ); + $obRCIMLogradouro->setCodigoLogradouro( $request->get("inCodigoLogradouro") ); + $obRCIMLogradouro->listarHistoricoLogradouros( $rsLista, $boTransacao, "" ); + + foreach ($rsLista->getElementos() as $key => $value) { + $arDadosHistorico[$key]['inId'] = $key; + $arDadosHistorico[$key]['sequencial'] = $value['sequencial']; + $arDadosHistorico[$key]['descricao_norma'] = $value['descricao_norma']; + $arDadosHistorico[$key]['nome_anterior'] = $value['nome_anterior']; + $arDadosHistorico[$key]['dt_inicio'] = $value['dt_inicio']; + $arDadosHistorico[$key]['dt_fim'] = $value['dt_fim']; + $arDadosHistorico[$key]['exercicio'] = $value['exercicio']; + $arDadosHistorico[$key]['cod_norma'] = $value['cod_norma']; + } - $obLista->addDado(); - $obLista->ultimoDado->setAlinhamento("DIREITA"); - $obLista->ultimoDado->setCampo( "cod_logradouro" ); - $obLista->commitDado(); + Sessao::write('arDadosHistorico',$arDadosHistorico); + + $stFiltro = ' WHERE cod_logradouro = '.$request->get('inCodigoLogradouro'); + $obTCIMTrecho = new TCIMTrecho(); + $obTCIMTrecho->retornaSomaExtensao($rsRecordSet, $stFiltro); + if ($rsRecordSet->getNumLinhas > 0) { + $stJs .= " jq_('#stExtensao').html('".$rsRecordSet->getCampo('extensao_total')."'); "; + } + break; - $obLista->addDado(); - $obLista->ultimoDado->setCampo( "tipo_nome" ); - $obLista->commitDado(); + } - $obLista->addDado(); - $obLista->ultimoDado->setAlinhamento("CENTRO"); - $obLista->ultimoDado->setCampo( "nom_bairro" ); - $obLista->commitDado(); + return $stJs; +} - $obLista->addDado(); - $obLista->ultimoDado->setAlinhamento("CENTRO"); - $obLista->ultimoDado->setCampo( "[sigla_uf] - [nom_municipio]" ); - $obLista->commitDado(); - $obLista->addDado(); - $obLista->ultimoDado->setAlinhamento("CENTRO"); - $obLista->ultimoDado->setCampo( "cep" ); - $obLista->commitDado(); +function montaListaHistorico() +{ + if ($_REQUEST['stAcao'] != 'consultar') { + include_once '../../../../../../gestaoAdministrativa/fontes/PHP/normas/classes/componentes/IPopUpNorma.class.php'; + $obTxtNomeAnterior = new TextBox; + $obTxtNomeAnterior->setRotulo ( "*Nome Anterior" ); + $obTxtNomeAnterior->setTitle ( "Nome na qual o logradouro era chamado anteriormente" ); + $obTxtNomeAnterior->setName ( "stNomeLogradouroAnterior" ); + $obTxtNomeAnterior->setId ( "stNomeLogradouroAnterior" ); + $obTxtNomeAnterior->setSize ( 70 ); + $obTxtNomeAnterior->setMaxLength ( 60 ); + $obTxtNomeAnterior->setNull ( false ); + $obTxtNomeAnterior->setValue ( str_replace('\\', '', $_REQUEST["stNomeLogradouroAnterior"])); + + $obIPopUpNorma = new IPopUpNorma(); + $obIPopUpNorma->obInnerNorma->setRotulo ( "**Norma" ); + $obIPopUpNorma->obInnerNorma->setTitle ( "Informe a Norma que determinou o Nome do Logradouro." ); + $obIPopUpNorma->obInnerNorma->setId ( "stNormaHistorico" ); + $obIPopUpNorma->obInnerNorma->obCampoCod->setId ( "inCodNormaHistorico" ); + $obIPopUpNorma->obInnerNorma->obCampoCod->setName( "inCodNormaHistorico" ); + $obIPopUpNorma->obInnerNorma->setNull ( true ); + + $obDtInicial = new Data(); + $obDtInicial->setRotulo ( "**Data Inicial" ); + $obDtInicial->setTitle ( "Informe a Data Inicial do Nome do Logradouro." ); + $obDtInicial->setName ( "stDataInicialHistorico" ); + $obDtInicial->setId ( "stDataInicialHistorico" ); + $obDtInicial->setMaxLength ( 10 ); + $obDtInicial->setSize ( 10 ); + + $obDtFinal = new Data(); + $obDtFinal->setRotulo ( "**Data Final" ); + $obDtFinal->setTitle ( "Informe a Data Final do Nome do Logradouro." ); + $obDtFinal->setName ( "stDataFinalHistorico" ); + $obDtFinal->setId ( "stDataFinalHistorico" ); + $obDtFinal->setMaxLength ( 10 ); + $obDtFinal->setSize ( 10 ); + + //Botoes da lista + $obOkLista = new Ok(false); + $obOkLista->setRotulo('Incluir'); + $obOkLista->setValue ('Incluir'); + $obOkLista->setId ('btIncluir'); + $obOkLista->setName ('btIncluir'); + $obOkLista->obEvento->setOnClick(" if ( validaCamposLista() ){ manterHistorico('incluirHistoricoLista'); }"); + + $obLimparLista = new Button(); + $obLimparLista->setId ('btLimpaLista'); + $obLimparLista->setName ('btLimpaLista'); + $obLimparLista->setValue ('Limpar'); + $obLimparLista->obEvento->setOnClick(" manterHistorico('limparHistoricoLista'); "); + + $obFormulario = new Formulario(); + $obFormulario->addTitulo ( "Histórico de Nome do Logradouro" ); + $obFormulario->addComponente ( $obTxtNomeAnterior ); + $obIPopUpNorma->geraFormulario ( $obFormulario ); + $obFormulario->addComponente ( $obDtInicial ); + $obFormulario->addComponente ( $obDtFinal ); + $obFormulario->defineBarra ( array( $obOkLista, $obLimparLista ), 'center' ); + + $obFormulario->montaInnerHTML(); + $stHTMLHistorico = $obFormulario->getHTML(); + + $js .= "jq_(\"#spanListarHistorico\").html('".$stHTMLHistorico."'); \n"; + } - $obLista->addDado(); - $obLista->ultimoDado->setAlinhamento("CENTRO"); - $obLista->ultimoDado->setCampo( "data_logradouro" ); - $obLista->commitDado(); + $rsLista = new RecordSet(); + $rsLista->preenche($arDadosHistorico); + + $obLista = new Lista; + $obLista->setRecordSet ( $rsLista ); + $obLista->setTitulo ( "Histórico do Logradouro" ); + $obLista->setMostraPaginacao ( false ); + + $obLista->addCabecalho(); + $obLista->ultimoCabecalho->addConteudo(" "); + $obLista->ultimoCabecalho->setWidth( 2 ); + $obLista->commitCabecalho(); + + $obLista->addCabecalho(); + $obLista->ultimoCabecalho->addConteudo( "Nome do Logradouro" ); + $obLista->ultimoCabecalho->setWidth( 30 ); + $obLista->commitCabecalho(); + + $obLista->addCabecalho(); + $obLista->ultimoCabecalho->addConteudo( "Data Inicial" ); + $obLista->ultimoCabecalho->setWidth( 4 ); + $obLista->commitCabecalho(); + + $obLista->addCabecalho(); + $obLista->ultimoCabecalho->addConteudo( "Data Final" ); + $obLista->ultimoCabecalho->setWidth( 4 ); + $obLista->commitCabecalho(); + + $obLista->addCabecalho(); + $obLista->ultimoCabecalho->addConteudo( "Exercício" ); + $obLista->ultimoCabecalho->setWidth( 4 ); + $obLista->commitCabecalho(); + + $obLista->addCabecalho(); + $obLista->ultimoCabecalho->addConteudo( "Norma" ); + $obLista->ultimoCabecalho->setWidth( 25 ); + $obLista->commitCabecalho(); + + $obLista->addDado(); + $obLista->ultimoDado->setCampo( "nome_anterior" ); + $obLista->commitDado(); + + $obLista->addDado(); + $obLista->ultimoDado->setAlinhamento("CENTRO"); + $obLista->ultimoDado->setCampo( "dt_inicio" ); + $obLista->commitDado(); + + $obLista->addDado(); + $obLista->ultimoDado->setAlinhamento("CENTRO"); + $obLista->ultimoDado->setCampo( "dt_fim" ); + $obLista->commitDado(); + + $obLista->addDado(); + $obLista->ultimoDado->setAlinhamento("CENTRO"); + $obLista->ultimoDado->setCampo( "exercicio" ); + $obLista->commitDado(); + + $obLista->addDado(); + $obLista->ultimoDado->setAlinhamento("CENTRO"); + $obLista->ultimoDado->setCampo( "descricao_norma" ); + $obLista->commitDado(); + + if ($_REQUEST['stAcao'] != 'consultar') { + $obLista->addCabecalho(); + $obLista->ultimoCabecalho->addConteudo("Ação"); + $obLista->ultimoCabecalho->setWidth( 3 ); + $obLista->commitCabecalho(); + + $obLista->addAcao(); + $obLista->ultimaAcao->setAcao( "ALTERAR" ); + $obLista->ultimaAcao->setFuncao( true ); + $obLista->ultimaAcao->setLink( " JavaScript:modificaDado('alterarHistoricoLista'); " ); + $obLista->ultimaAcao->addCampo("1" , "inId"); + $obLista->commitAcao(); + + $obLista->addAcao(); + $obLista->ultimaAcao->setAcao( "EXCLUIR" ); + $obLista->ultimaAcao->setFuncao( true ); + $obLista->ultimaAcao->setLink( " JavaScript:modificaDado('excluirHistoricoLista'); " ); + $obLista->ultimaAcao->addCampo("1" , "inId"); + $obLista->commitAcao(); + } - $obLista->montaHTML ( ); - $stHTML = $obLista->getHtml ( ); - $stHTML = str_replace ( "\n","",$stHTML ); - $stHTML = str_replace ( " ","",$stHTML ); - $stHTML = str_replace ( "'","\\'",$stHTML); + $obLista->montaHTML(); + $stHTMLLista = $obLista->getHtml(); + $stHTMLLista = str_replace( "\n","",$stHTMLLista ); + $stHTMLLista = str_replace( " ","",$stHTMLLista ); + $stHTMLLista = str_replace( "'","\\'",$stHTMLLista ); - $js .= "d.getElementById('spanListarHistorico').innerHTML = '".$stHTML."';\n"; + $js .= "jq_('#spanListarHistorico').append('".$stHTMLLista."'); \n"; - return $js; - } + return $js; } +function validaInclusaoLista($arDados) +{ + $boValida = true; + foreach ($arDados as $key => $value) { + if ($boValida == true) { + if ( $_REQUEST['inCodNormaHistorico'] == $value['cod_norma'] && + $_REQUEST['stDataInicialHistorico'] == $value['dt_inicio'] && + $_REQUEST['stDataFinalHistorico'] == $value['dt_fim'] && + $_REQUEST['stNomeLogradouroAnterior'] == $value['nome_anterior'] + ) { + $boValida = false; + SistemaLegado::executaFrameOculto("alertaAviso('Não foi possível incluir porque o registro já existe na lista!','form','erro','".Sessao::getId()."','../');"); + }else{ + if ( $_REQUEST['stDataFinalHistorico'] == '' ) { + if($_REQUEST['stDataFinalHistorico'] == $value['dt_fim']) { + $stMensagem = "A data final deve ser preenchida."; + $boValida = false; + } + } else { + if ( $value['dt_fim'] != '') { + if (SistemaLegado::comparaDatas($_REQUEST['stDataFinalHistorico'],$value['dt_inicio'],false)) { + if (!SistemaLegado::comparaDatas($_REQUEST['stDataInicialHistorico'],$value['dt_fim'],false)) { + $stMensagem = "A data inicial deve ser maior que a data final dos registros cadastrados"; + $boValida = false; + } + }else{ + if (!SistemaLegado::comparaDatas($_REQUEST['stDataFinalHistorico'],$value['dt_inicio'],true)) { + $boValida = true; + }else{ + $stMensagem = "A data final deve ser menor que a data inicial dos registros cadastrados"; + $boValida = false; + } + } + } + } + } + }//end of IF + } + + SistemaLegado::executaFrameOculto("alertaAviso('".$stMensagem."','form','erro','".Sessao::getId()."','../');"); + return $boValida; +} + +function limparHistoricoLista() +{ + $stJs = "jq_('#stNomeLogradouroAnterior').val(''); \n"; + $stJs .= "jq_('#inCodNormaHistorico').val(''); \n"; + $stJs .= "jq_('#stNormaHistorico').html(' '); \n"; + $stJs .= "jq_('#stDataInicialHistorico').val(''); \n"; + $stJs .= "jq_('#stDataFinalHistorico').val(''); \n"; + return $stJs ; +} + +function ordenaArrayDados(&$arDadosHistorico) +{ + usort($arDadosHistorico, function ($a, $b){ + return strcmp(SistemaLegado::dataToSql($a['dt_inicio']), SistemaLegado::dataToSql($b['dt_inicio'])); + }); +} // SELECIONA ACAO switch ($_REQUEST ["stCtrl"]) { @@ -667,7 +939,9 @@ switch ($_REQUEST ["stCtrl"]) { $stJs .= montaListaCEP ( $arCepSessao, true); } - $stJs .= montaListaHistorico(); + $stJs .= carregaDados(); + + $stJs .= montaListaHistorico(Sessao::read("arDadosHistorico")); SistemaLegado::executaIFrameOculto($stJs); break; @@ -681,6 +955,8 @@ switch ($_REQUEST ["stCtrl"]) { $stJs = montaListaBairro ( $arBairrosSessao , true); $stJs .= montaListaCEP ( $arCepSessao , true); + $stJs .= montaListaHistorico( $arDadosHistorico ); + $stJs .= carregaDados(); SistemaLegado::executaIFrameOculto($stJs); break; @@ -709,6 +985,113 @@ switch ($_REQUEST ["stCtrl"]) { SistemaLegado::executaIFrameOculto($stJs); break; + case 'limparHistoricoLista': + $stJs = limparHistoricoLista(); + + SistemaLegado::executaFrameOculto($stJs); + break; + case 'incluirHistoricoLista': + $arDadosHistorico = Sessao::read('arDadosHistorico'); + $inProx = count($arDadosHistorico); + $boValida = true; + if( $inProx > 0 ){ + $boValida = validaInclusaoLista($arDadosHistorico); + } + + if ($boValida) { + $stDescricaoLei = $_REQUEST['inCodNormaHistorico'].' - '.$_REQUEST['stDescricaoNormaHistorico']; + + $arDadosHistorico[$inProx]['inId'] = $inProx; + $arDadosHistorico[$inProx]['sequencial'] = ''; + $arDadosHistorico[$inProx]['descricao_norma'] = $stDescricaoLei; + $arDadosHistorico[$inProx]['nome_anterior'] = $request->get('stNomeLogradouroAnterior'); + $arDadosHistorico[$inProx]['dt_inicio'] = $request->get('stDataInicialHistorico'); + $arDadosHistorico[$inProx]['dt_fim'] = $request->get('stDataFinalHistorico'); + $arDadosHistorico[$inProx]['exercicio'] = Sessao::getExercicio(); + $arDadosHistorico[$inProx]['cod_norma'] = $request->get('inCodNormaHistorico'); + + ordenaArrayDados($arDadosHistorico); + + Sessao::write('arDadosHistorico',$arDadosHistorico); + $stJs = montaListaHistorico($arDadosHistorico); + $stJs .= " jq_('#stNomeLogradouroAnterior').val(''); \n"; + $stJs .= " jq_('#inCodNormaHistorico').val(''); \n"; + $stJs .= " jq_('#stNormaHistorico').html(' '); \n"; + $stJs .= " jq_('#stDataInicialHistorico').val(''); \n"; + $stJs .= " jq_('#stDataFinalHistorico').val(''); \n"; + } + + SistemaLegado::executaFrameOculto($stJs); + break; + + case 'alterarHistoricoLista': + $arDadosHistorico = Sessao::read('arDadosHistorico'); + + foreach ($arDadosHistorico as $key => $value) { + if ($_REQUEST['inId'] == $value['inId']) { + $stJs = " jq_('#stNomeLogradouroAnterior').val('".$value['nome_anterior']."'); \n"; + $stJs .= " jq_('#inCodNormaHistorico').val('".$value['cod_norma']."'); \n"; + $stJs .= " jq_('#inCodNormaHistorico').blur(); \n"; + $stJs .= " jq_('#stDataInicialHistorico').val('".$value['dt_inicio']."'); \n"; + $stJs .= " jq_('#stDataFinalHistorico').val('".$value['dt_fim']."'); \n"; + $stJs .= " jq_('#btIncluir').val('Alterar'); \n"; + $stJs .= " jq_('#btIncluir').attr('onclick','if ( validaCamposLista() ){ manterHistorico(\'alterarListaHistorico\');}'); \n"; + } + } + + SistemaLegado::executaFrameOculto($stJs); + + break; + + case 'excluirHistoricoLista': + $arDadosHistorico = Sessao::read('arDadosHistorico'); + + foreach ($arDadosHistorico as $key => $value) { + if ($_REQUEST['inId'] != $value['inId']) { + $arTmp[] = $value; + } + } + + $arDadosHistorico = array(); + $arDadosHistorico[] = $arTmp; + + Sessao::write('arDadosHistorico',$arTmp); + + $stJs .= montaListaHistorico($arTmp); + $stJs .= limparHistoricoLista(); + + SistemaLegado::executaFrameOculto($stJs); + + break; + + case 'alterarListaHistorico': + //validação para os dados + $arDadosHistorico = Sessao::read('arDadosHistorico'); + + foreach ($arDadosHistorico as $key => $value) { + if ($_REQUEST['inId'] == $value['inId']) { + $stDescricaoLei = $_REQUEST['inCodNormaHistorico'].' - '.$_REQUEST['stDescricaoNormaHistorico']; + $arDadosHistorico[$key]['inId'] = $value['inId']; + $arDadosHistorico[$key]['descricao_norma'] = $stDescricaoLei; + $arDadosHistorico[$key]['nome_anterior'] = $request->get('stNomeLogradouroAnterior'); + $arDadosHistorico[$key]['dt_inicio'] = $request->get('stDataInicialHistorico'); + $arDadosHistorico[$key]['dt_fim'] = $request->get('stDataFinalHistorico'); + $arDadosHistorico[$key]['exercicio'] = Sessao::getExercicio(); + $arDadosHistorico[$key]['cod_norma'] = $request->get('inCodNormaHistorico'); + } + } + + ordenaArrayDados($arDadosHistorico); + + Sessao::write('arDadosHistorico',$arDadosHistorico); + + $stJs .= " jq_('#btIncluir').val('Incluir'); \n"; + $stJs .= " jq_('#btIncluir').attr('onclick','if ( validaCamposLista() ){ manterHistorico(\'incluirHistoricoLista\'); }'); \n"; + $stJs .= montaListaHistorico($arDadosHistorico); + $stJs .= limparHistoricoLista(); + + SistemaLegado::executaFrameOculto($stJs); + break; } // Escreve na sessão a última ação responsável por chamar a pop-up de logradouro. diff --git a/gestaoTributaria/fontes/PHP/cadastroImobiliario/popups/logradouro/PRProcurarLogradouro.php b/gestaoTributaria/fontes/PHP/cadastroImobiliario/popups/logradouro/PRProcurarLogradouro.php index 7088bff..c80f0aa 100755 --- a/gestaoTributaria/fontes/PHP/cadastroImobiliario/popups/logradouro/PRProcurarLogradouro.php +++ b/gestaoTributaria/fontes/PHP/cadastroImobiliario/popups/logradouro/PRProcurarLogradouro.php @@ -34,7 +34,7 @@ * @ignore - * $Id: PRProcurarLogradouro.php 59612 2014-09-02 12:00:51Z gelson $ + * $Id: PRProcurarLogradouro.php 63963 2015-11-11 19:01:08Z evandro $ * Casos de uso: uc-05.01.04 */ @@ -65,13 +65,13 @@ $modulo = Sessao::read('modulo'); Sessao::write('acao' , "783"); Sessao::write('modulo', "0"); -switch ($_REQUEST['stAcao']) { +switch ($request->get('stAcao')) { case "incluir": Sessao::write('acao' , "783"); Sessao::write('modulo', "0"); $obErro = new Erro; - $obRCIMLogradouro->setCodigoLogradouro( $_REQUEST["inCodLogradouro"] ); + $obRCIMLogradouro->setCodigoLogradouro( $request->get("inCodLogradouro") ); $obRCIMLogradouro->consultarLogradouro($rsLogradouro); if ($rsLogradouro->inNumLinhas > 0) { @@ -82,11 +82,25 @@ switch ($_REQUEST['stAcao']) { sistemaLegado::executaIFrameOculto($stJs); } - $obRCIMLogradouro->setCodigoUF ( $_REQUEST["inCodUF"] ); - $obRCIMLogradouro->setCodigoMunicipio ( $_REQUEST["inCodMunicipio"] ); - $obRCIMLogradouro->setCodigoTipo ( $_REQUEST["inCodTipo"] ); - $obRCIMLogradouro->setNomeLogradouro ( trim( $_REQUEST["stNomeLogradouro"] ) ); - + $arDadosHistorico = Sessao::read('arDadosHistorico'); + //Adicionar dados da inclusao do logradouro no array de historico geral + $arDadosIncluir['inId'] = count($arDadosHistorico); + $arDadosIncluir['sequencial'] = ''; + $arDadosIncluir['descricao_norma'] = $request->get('stDescricaoNorma'); + //adicionando nome da inclusao no campos de nome_anterior do historico pq faz parte de um todo + $arDadosIncluir['nome_anterior'] = $request->get('stNomeLogradouro'); + $arDadosIncluir['dt_inicio'] = $request->get('stDataInicial'); + $arDadosIncluir['dt_fim'] = $request->get('stDataFinal'); + $arDadosIncluir['exercicio'] = Sessao::getExercicio(); + $arDadosIncluir['cod_norma'] = $request->get('inCodNorma'); + $arDadosHistorico[] = $arDadosIncluir; + + $obRCIMLogradouro->setCodigoUF ( $request->get("inCodUF") ); + $obRCIMLogradouro->setCodigoMunicipio ( $request->get("inCodMunicipio") ); + $obRCIMLogradouro->setCodigoTipo ( $request->get("inCodTipo") ); + $obRCIMLogradouro->setNomeLogradouro ( trim( $request->get("stNomeLogradouro") ) ); + $obRCIMLogradouro->setDadosHistorico ( $arDadosHistorico ); + $arBairrosSessao = Sessao::read('bairros'); $arCepSessao = Sessao::read('cep'); @@ -103,19 +117,19 @@ switch ($_REQUEST['stAcao']) { $obErro = $obRCIMLogradouro->addBairro( $arBairrosSessao ); } - if (!$_REQUEST['inCodUF']) { + if (!$request->get('inCodUF')) { $obErro->setDescricao('Deve-se informar o Estado do novo Logradouro'); } - if (!$_REQUEST['inCodMunicipio']) { + if (!$request->get('inCodMunicipio')) { $obErro->setDescricao('Deve-se informar o Município do novo Logradouro'); } - if (!$_REQUEST['inCodTipo']) { + if (!$request->get('inCodTipo')) { $obErro->setDescricao('Deve-se informar o tipo do novo Logradouro'); } - if (!$_REQUEST['stNomeLogradouro']) { + if (!$request->get('stNomeLogradouro')) { $obErro->setDescricao('Deve-se informar o nome do novo Logradouro'); } @@ -123,17 +137,17 @@ switch ($_REQUEST['stAcao']) { $obErro = $obRCIMLogradouro->incluirLogradouro(); } - $link["campoNom"] = $_REQUEST["campoNom"]; - $link["campoNum"] = $_REQUEST["campoNum"]; - $link["inCodigoUF"] = $_REQUEST["inCodUF"]; - $link["inCodigoMunicipio"] = $_REQUEST["inCodMunicipio"]; - $link["inCodPais"] = $_REQUEST["inCodPais"]; - $link["stCadastro"] = $_REQUEST["stCadastro"]; + $link["campoNom"] = $request->get("campoNom"); + $link["campoNum"] = $request->get("campoNum"); + $link["inCodigoUF"] = $request->get("inCodUF"); + $link["inCodigoMunicipio"] = $request->get("inCodMunicipio"); + $link["inCodPais"] = $request->get("inCodPais"); + $link["stCadastro"] = $request->get("stCadastro"); if ( !$obErro->ocorreu() ) { $link["inCodigoLogradouro"] = $obRCIMLogradouro->getCodigoLogradouro(); Sessao::write('link', $link); - sistemaLegado::alertaAvisoPopUp($pgList,"Nome Logradouro: ".$_REQUEST["stNomeLogradouro"],"incluir","aviso",Sessao::getId(),"../"); + sistemaLegado::alertaAvisoPopUp($pgList,"Nome Logradouro: ".$request->get("stNomeLogradouro"),"incluir","aviso",Sessao::getId(),"../"); } else { Sessao::write('link', $link); sistemaLegado::exibeAviso(urlencode($obErro->getDescricao()),"n_incluir","erro"); @@ -143,12 +157,12 @@ switch ($_REQUEST['stAcao']) { Sessao::write('acao' , "783"); Sessao::write('modulo', "0"); - $obRCIMLogradouro->setCodigoLogradouro ( $_REQUEST["inCodigoLogradouro"] ); + $obRCIMLogradouro->setCodigoLogradouro ( $request->get("inCodigoLogradouro") ); $obRCIMLogradouro->setCodigoUF ( Sessao::read('cod_uf') ); $obRCIMLogradouro->setCodigoMunicipio ( Sessao::read('cod_municipio') ); - $obRCIMLogradouro->setNomeLogradouro ( $_REQUEST["stNomeLogradouro"] ); + $obRCIMLogradouro->setNomeLogradouro ( $request->get("stNomeLogradouro") ); $obRCIMLogradouro->setCEP ( Sessao::read('cep') ); - $obRCIMLogradouro->setCodigoTipo ( $_REQUEST["inCodigoTipo"] ); + $obRCIMLogradouro->setCodigoTipo ( $request->get("inCodigoTipo") ); $obErro = $obRCIMLogradouro->addBairro( Sessao::read('bairros') ); @@ -157,7 +171,7 @@ switch ($_REQUEST['stAcao']) { } if ( !$obErro->ocorreu() ) { - sistemaLegado::alertaAvisoPopUp ($pgList,"Nome Logradouro: ".$_REQUEST['stNomeLogradouro'],"alterar","aviso",Sessao::getId(),"../"); + sistemaLegado::alertaAvisoPopUp ($pgList,"Nome Logradouro: ".$request->get('stNomeLogradouro'),"alterar","aviso",Sessao::getId(),"../"); } else { sistemaLegado::exibeAviso(urlencode($obErro->getDescricao()),"n_renomear","erro"); } @@ -165,18 +179,30 @@ switch ($_REQUEST['stAcao']) { case "alterar": Sessao::write('acao' , "783"); Sessao::write('modulo', "0"); - $obErro = new Erro; - $obRCIMLogradouro->setCodigoLogradouro ( $_REQUEST["inCodigoLogradouro"] ); + $arDadosHistorico = Sessao::read('arDadosHistorico'); + $arDadosHistorico = ($arDadosHistorico == '') ? array() : $arDadosHistorico; + $arTmp = end($arDadosHistorico); + foreach ($arDadosHistorico as $key => $value) { + if ( $value['inId'] == $arTmp['inId']) { + $arDadosHistorico[$key]['descricao_norma'] = $request->get('stDescricaoNorma'); + $arDadosHistorico[$key]['nome_anterior'] = $request->get('stNomeLogradouro'); + $arDadosHistorico[$key]['dt_inicio'] = $request->get('stDataInicial'); + $arDadosHistorico[$key]['dt_fim'] = $request->get('stDataFinal'); + $arDadosHistorico[$key]['exercicio'] = Sessao::getExercicio(); + $arDadosHistorico[$key]['cod_norma'] = $request->get('inCodNorma'); + } + } + + $obRCIMLogradouro->setCodigoLogradouro ( $request->get("inCodigoLogradouro") ); $obRCIMLogradouro->setCodigoUF ( Sessao::read('cod_uf' ) ); $obRCIMLogradouro->setCodigoMunicipio ( Sessao::read('cod_municipio' ) ); - - $obRCIMLogradouro->setNomeLogradouro ( $_REQUEST["stNomeLogradouro"] ); - $obRCIMLogradouro->setCEP ( Sessao::read('cep') ); - //$obRCIMLogradouro->setBairro ( $sessao->transf4["bairros"] ); - $obRCIMLogradouro->setCodigoTipo ( $_REQUEST["inCodigoTipo"] ); - + $obRCIMLogradouro->setNomeLogradouro ( $request->get("stNomeLogradouro") ); + $obRCIMLogradouro->setCEP ( Sessao::read('cep') ); + $obRCIMLogradouro->setCodigoTipo ( $request->get("inCodigoTipo") ); + $obRCIMLogradouro->setDadosHistorico ( $arDadosHistorico ); + $obErro = $obRCIMLogradouro->addBairro( Sessao::read('bairros') ); if ( $obErro->ocorreu() ) { break; @@ -190,7 +216,7 @@ switch ($_REQUEST['stAcao']) { } if ( !$obErro->ocorreu() ) { - sistemaLegado::alertaAvisoPopUp($pgList,"Nome Logradouro: ".$_REQUEST['stNomeLogradouro'],"alterar","aviso",Sessao::getId(),"../"); + sistemaLegado::alertaAvisoPopUp($pgList,"Nome Logradouro: ".$request->get('stNomeLogradouro'),"alterar","aviso",Sessao::getId(),"../"); } else { sistemaLegado::exibeAviso(urlencode($obErro->getDescricao()),"n_alterar","erro"); } @@ -200,14 +226,14 @@ switch ($_REQUEST['stAcao']) { Sessao::write('acao' , "783"); Sessao::write('modulo', "0"); - $obRCIMLogradouro->setCodigoLogradouro ( $_REQUEST["inCodigoLogradouro"] ); - $obRCIMLogradouro->setCodigoMunicipio ( $_REQUEST["inCodigoMunicipio"] ); - $obRCIMLogradouro->setCodigoUF ( $_REQUEST["inCodigoUF"] ); + $obRCIMLogradouro->setCodigoLogradouro ( $request->get("inCodigoLogradouro") ); + $obRCIMLogradouro->setCodigoMunicipio ( $request->get("inCodigoMunicipio") ); + $obRCIMLogradouro->setCodigoUF ( $request->get("inCodigoUF") ); $obErro = $obRCIMLogradouro->excluirLogradouro(); if ( !$obErro->ocorreu() ) { - sistemaLegado::alertaAvisoPopUp($pgList,"Nome Logradouro: ".$_REQUEST["stNomeLogradouro"],"excluir","aviso",Sessao::getId(),"../"); + sistemaLegado::alertaAvisoPopUp($pgList,"Nome Logradouro: ".$request->get("stNomeLogradouro"),"excluir","aviso",Sessao::getId(),"../"); } else { sistemaLegado::alertaAvisoPopUp($pgList.Sessao::read('link')."&stErro=".urlencode($obErro->getDescricao()),"" ,"excluir","aviso", Sessao::getId(), "../"); } diff --git a/gestaoTributaria/fontes/PHP/cadastroImobiliario/popups/lote/LSBuscaLote.php b/gestaoTributaria/fontes/PHP/cadastroImobiliario/popups/lote/LSBuscaLote.php index 4cc3949..b8c2a0c 100755 --- a/gestaoTributaria/fontes/PHP/cadastroImobiliario/popups/lote/LSBuscaLote.php +++ b/gestaoTributaria/fontes/PHP/cadastroImobiliario/popups/lote/LSBuscaLote.php @@ -32,7 +32,7 @@ * @ignore - * $Id: LSBuscaLote.php 59612 2014-09-02 12:00:51Z gelson $ + * $Id: LSBuscaLote.php 63839 2015-10-22 18:08:07Z franver $ * Casos de uso: uc-05.01.08 */ @@ -107,7 +107,6 @@ if ( is_array($link) ) { } Sessao::write('link', $link); -//sistemalegado::mostravar($_REQUEST);exit; //MASCARA PROCESSO $obRCIMConfiguracao = new RCIMConfiguracao; $obRCIMConfiguracao->setCodigoModulo( 12 ); diff --git a/gestaoTributaria/fontes/PHP/cadastroMonetario/classes/mapeamento/TMONTipoConvenio.class.php b/gestaoTributaria/fontes/PHP/cadastroMonetario/classes/mapeamento/TMONTipoConvenio.class.php index 7818f50..612e457 100644 --- a/gestaoTributaria/fontes/PHP/cadastroMonetario/classes/mapeamento/TMONTipoConvenio.class.php +++ b/gestaoTributaria/fontes/PHP/cadastroMonetario/classes/mapeamento/TMONTipoConvenio.class.php @@ -33,7 +33,7 @@ * @package URBEM * @subpackage Mapeamento - * $Id: TMONTipoConvenio.class.php 59612 2014-09-02 12:00:51Z gelson $ + * $Id: TMONTipoConvenio.class.php 63839 2015-10-22 18:08:07Z franver $ Caso de uso: uc-05.05.04 */ @@ -85,7 +85,6 @@ class TMONTipoConvenio extends Persistente if ($this->getDado('cod_funcao') != '') { $stSql .= "cod_funcao = ".$this->getDado('cod_funcao')." AND "; } - SistemaLegado::mostravar($stSql); return substr($stSql,0,-6); diff --git a/gestaoTributaria/fontes/PHP/cadastroMonetario/instancias/acrescimo/FLManterAcrescimo.php b/gestaoTributaria/fontes/PHP/cadastroMonetario/instancias/acrescimo/FLManterAcrescimo.php index 282370a..4219a47 100644 --- a/gestaoTributaria/fontes/PHP/cadastroMonetario/instancias/acrescimo/FLManterAcrescimo.php +++ b/gestaoTributaria/fontes/PHP/cadastroMonetario/instancias/acrescimo/FLManterAcrescimo.php @@ -32,7 +32,7 @@ * @author Desenvolvedor: Diego Bueno Coelho * @ignore - * $Id: FLManterAcrescimo.php 59612 2014-09-02 12:00:51Z gelson $ + * $Id: FLManterAcrescimo.php 63839 2015-10-22 18:08:07Z franver $ *Casos de uso: uc-05.05.11 @@ -96,7 +96,6 @@ $obLblCodFuncao->setRotulo( 'Código da Função' ); $obLblCodFuncao->setValue ($_REQUEST['inCodFuncao'].' - '.$_REQUEST['stFuncao']); $obRMONAcrescimo->ListarTipo ( $rsTipo ); -//sistemaLegado::mostravar ($rsTipo); /* $obCmbTipo = new Select; $obCmbTipo->setRotulo ( "Tipo de Acréscimo" ); diff --git a/gestaoTributaria/fontes/PHP/cadastroMonetario/instancias/acrescimo/LSManterAcrescimo.php b/gestaoTributaria/fontes/PHP/cadastroMonetario/instancias/acrescimo/LSManterAcrescimo.php index 95b44f3..3834737 100644 --- a/gestaoTributaria/fontes/PHP/cadastroMonetario/instancias/acrescimo/LSManterAcrescimo.php +++ b/gestaoTributaria/fontes/PHP/cadastroMonetario/instancias/acrescimo/LSManterAcrescimo.php @@ -32,7 +32,7 @@ * @author Desenvolvedor: Diego Bueno Coelho * @ignore - * $Id: LSManterAcrescimo.php 59612 2014-09-02 12:00:51Z gelson $ + * $Id: LSManterAcrescimo.php 63839 2015-10-22 18:08:07Z franver $ *Casos de uso: uc-05.05.11 */ @@ -112,7 +112,7 @@ if ($_REQUEST['stDescAcrescimo']) { } $obRMONAcrescimo->ListarAcrescimos ( $rsLista ); -//sistemaLegado::mostraVar( $rsLista ); + $obLista = new Lista; $obLista->setRecordSet ( $rsLista ); @@ -176,7 +176,6 @@ $obLista->ultimaAcao->addCampo("&dtInicioVigencia", "inicio_vigencia" ); $obLista->ultimaAcao->addCampo("&stDescQuestao","[cod_acrescimo]-[descricao_acrescimo]"); if ($_REQUEST['stAcao'] == "excluir") { $obLista->ultimaAcao->setLink( $stCaminho.$pgProx."?".Sessao::getId().$stLink ); - // mostravar(Sessao::getId().$stLink); } else { $obLista->ultimaAcao->setLink( $pgProx."?".Sessao::getId().$stLink ); } diff --git a/gestaoTributaria/fontes/PHP/cadastroMonetario/instancias/acrescimo/OCManterAcrescimo.php b/gestaoTributaria/fontes/PHP/cadastroMonetario/instancias/acrescimo/OCManterAcrescimo.php index 7f13d35..9dacc88 100644 --- a/gestaoTributaria/fontes/PHP/cadastroMonetario/instancias/acrescimo/OCManterAcrescimo.php +++ b/gestaoTributaria/fontes/PHP/cadastroMonetario/instancias/acrescimo/OCManterAcrescimo.php @@ -30,7 +30,7 @@ * @author Analista: Fabio Bertoldi * @author Programador: Diego Bueno Coelho - * $Id: OCManterAcrescimo.php 59612 2014-09-02 12:00:51Z gelson $ + * $Id: OCManterAcrescimo.php 63839 2015-10-22 18:08:07Z franver $ Caso de uso: uc-05.05.11 **/ @@ -329,8 +329,6 @@ switch ($_REQUEST ["stCtrl"]) { $obRFuncao->obRBiblioteca->roRModulo->setCodModulo ( $arCodFuncao[0] ); $obRFuncao->consultar(); - //sistemaLegado::mostravar ( $obRFuncao ); - $inCodFuncao = $obRFuncao->getCodFuncao () ; $stDescricao = " "; $stDescricao = $obRFuncao->getComentario() ; diff --git a/gestaoTributaria/fontes/PHP/cadastroMonetario/instancias/agenciaBancaria/LSManterAgencia.php b/gestaoTributaria/fontes/PHP/cadastroMonetario/instancias/agenciaBancaria/LSManterAgencia.php index 9d8acf2..e06bf9d 100644 --- a/gestaoTributaria/fontes/PHP/cadastroMonetario/instancias/agenciaBancaria/LSManterAgencia.php +++ b/gestaoTributaria/fontes/PHP/cadastroMonetario/instancias/agenciaBancaria/LSManterAgencia.php @@ -32,7 +32,7 @@ * @author Desenvolvedor: Lizandro Kirst da Silva * @ignore - * $Id: LSManterAgencia.php 59612 2014-09-02 12:00:51Z gelson $ + * $Id: LSManterAgencia.php 63839 2015-10-22 18:08:07Z franver $ *Casos de uso: uc-05.05.02 @@ -164,7 +164,6 @@ $obLista->ultimaAcao->addCampo("&stContato", "nom_pessoa_contato" ); $obLista->ultimaAcao->addCampo("&stDescQuestao","[num_agencia] - [nom_agencia]"); if ($_REQUEST['stAcao'] == "excluir") { $obLista->ultimaAcao->setLink( $stCaminho.$pgProx."?".Sessao::getId().$stLink ); -// mostravar(Sessao::getId().$stLink); } else { $obLista->ultimaAcao->setLink( $pgProx."?".Sessao::getId().$stLink ); } diff --git a/gestaoTributaria/fontes/PHP/cadastroMonetario/instancias/agenciaBancaria/OCMontaAgencia.php b/gestaoTributaria/fontes/PHP/cadastroMonetario/instancias/agenciaBancaria/OCMontaAgencia.php index 9115510..5a66ebd 100644 --- a/gestaoTributaria/fontes/PHP/cadastroMonetario/instancias/agenciaBancaria/OCMontaAgencia.php +++ b/gestaoTributaria/fontes/PHP/cadastroMonetario/instancias/agenciaBancaria/OCMontaAgencia.php @@ -30,7 +30,7 @@ * @author Analista: Diego Victoria * @author Desenvolvedor: Leandro André Zis - * $Id: OCMontaAgencia.php 59612 2014-09-02 12:00:51Z gelson $ + * $Id: OCMontaAgencia.php 64131 2015-12-04 21:03:54Z jean $ * Casos de uso: uc-05.05.02 uc-03.03.05 @@ -64,19 +64,26 @@ Revision 1.2 2006/07/06 12:11:10 diego include_once '../../../../../../gestaoAdministrativa/fontes/PHP/pacotes/FrameworkHTML.inc.php'; include_once '../../../../../../gestaoAdministrativa/fontes/PHP/framework/include/valida.inc.php'; -function PreencheAgencia() +function PreencheAgencia(Request $request) { - ; + if ($request == "") { + $arRequest = $_REQUEST; + } else { + $arRequest = $request->getAll(); + } + $stJs .= "limpaSelect(f.stNumAgencia,1); \n"; $stJs .= "f.stNumAgenciaTxt.value = ''; \n"; $stJs .= ' d.getElementById(\'stNumAgencia\').value = \'\';'; - if ($_GET['stNumBanco']) { + + if ($arRequest['stNumBanco']) { $rsBanco = new RecordSet; $rsAgencia = new RecordSet; include_once ( CAM_GT_MON_MAPEAMENTO."TMONBanco.class.php" ); $obTMONBanco = new TMONBanco; - $stFiltro = ' where num_banco = \''.$_GET['stNumBanco'].'\''; + $stFiltro = ' where num_banco = \''.$arRequest['stNumBanco'].'\''; $obTMONBanco->recuperaTodos($rsBanco, $stFiltro); + if ($rsBanco->getCampo('cod_banco') ) { include_once ( CAM_GT_MON_MAPEAMENTO."TMONAgencia.class.php" ); $obTMONAgencia = new TMONAgencia; @@ -92,14 +99,8 @@ function PreencheAgencia() } $inCount = 1; - // if ($rsAgencia->getNumLinhas()>1) { $stJs .= "f.stNumAgencia.options[0] = new Option('Selecione','', 'selected');\n"; - // } - /* elseif ($rsAgencia->getNumLinhas()==1) { - $inCount--; - $stJs .= "f.stNumAgencia.value= '".$rsAgencia->getCampo('num_agencia')."';\n"; - $stJs .= "f.stNumAgenciaTxt.value= '".$rsAgencia->getCampo('num_agencia')."';\n"; - }*/ + while (!$rsAgencia->eof()) { $inId = $rsAgencia->getCampo("num_agencia"); $stDesc = $rsAgencia->getCampo("nom_agencia"); @@ -113,9 +114,9 @@ function PreencheAgencia() return $stJs; } -switch ($_REQUEST["stCtrl"]) { +switch ($request->get("stCtrl")) { case "PreencheAgencia": - $stJs .= PreencheAgencia(); + $stJs .= PreencheAgencia($request); break; } diff --git a/gestaoTributaria/fontes/PHP/cadastroMonetario/instancias/banco/LSManterBanco.php b/gestaoTributaria/fontes/PHP/cadastroMonetario/instancias/banco/LSManterBanco.php index cfe8209..400b859 100644 --- a/gestaoTributaria/fontes/PHP/cadastroMonetario/instancias/banco/LSManterBanco.php +++ b/gestaoTributaria/fontes/PHP/cadastroMonetario/instancias/banco/LSManterBanco.php @@ -32,7 +32,7 @@ * @author Desenvolvedor: Lizandro Kirst da Silva * @ignore - * $Id: LSManterBanco.php 59612 2014-09-02 12:00:51Z gelson $ + * $Id: LSManterBanco.php 63839 2015-10-22 18:08:07Z franver $ *Casos de uso: uc-05.05.01 @@ -107,7 +107,6 @@ if ($_REQUEST["stNomBanco"]) { $stLink .= "&stAcao=".$_REQUEST['stAcao']; $obRMONBanco->listarBanco($rsLista); -//sistemaLegado::mostravar($rsLista); $obLista = new Lista; $obLista->setRecordSet( $rsLista ); @@ -144,7 +143,6 @@ $obLista->ultimaAcao->addCampo("&inCodBanco", "cod_banco" ); $obLista->ultimaAcao->addCampo("&stDescQuestao","[num_banco]-[nom_banco]"); if ($_REQUEST['stAcao'] == "excluir") { $obLista->ultimaAcao->setLink( $stCaminho.$pgProx."?".Sessao::getId().$stLink ); - // mostravar(Sessao::getId().$stLink); } else { $obLista->ultimaAcao->setLink( $pgProx."?".Sessao::getId().$stLink ); } diff --git a/gestaoTributaria/fontes/PHP/cadastroMonetario/instancias/carteira/LSManterCarteira.php b/gestaoTributaria/fontes/PHP/cadastroMonetario/instancias/carteira/LSManterCarteira.php index 5e14e55..0d70ae7 100644 --- a/gestaoTributaria/fontes/PHP/cadastroMonetario/instancias/carteira/LSManterCarteira.php +++ b/gestaoTributaria/fontes/PHP/cadastroMonetario/instancias/carteira/LSManterCarteira.php @@ -32,7 +32,7 @@ * @author Desenvolvedor: Diego Bueno Coelho * @ignore - * $Id: LSManterCarteira.php 59612 2014-09-02 12:00:51Z gelson $ + * $Id: LSManterCarteira.php 63839 2015-10-22 18:08:07Z franver $ *Casos de uso: uc-05.05.05 @@ -158,7 +158,6 @@ $obLista->ultimaAcao->addCampo("&flVariacao", "variacao" ); $obLista->ultimaAcao->addCampo("&stDescQuestao","[num_carteira]"); if ($_REQUEST['stAcao'] == "excluir") { $obLista->ultimaAcao->setLink( $stCaminho.$pgProx."?".Sessao::getId().$stLink ); - // mostravar(Sessao::getId().$stLink); } else { $obLista->ultimaAcao->setLink( $pgProx."?".Sessao::getId().$stLink ); } diff --git a/gestaoTributaria/fontes/PHP/cadastroMonetario/instancias/convenio/LSManterConvenio.php b/gestaoTributaria/fontes/PHP/cadastroMonetario/instancias/convenio/LSManterConvenio.php index c79c8af..e6358dc 100644 --- a/gestaoTributaria/fontes/PHP/cadastroMonetario/instancias/convenio/LSManterConvenio.php +++ b/gestaoTributaria/fontes/PHP/cadastroMonetario/instancias/convenio/LSManterConvenio.php @@ -32,7 +32,7 @@ * @author Desenvolvedor: Diego Bueno Coelho * @ignore - * $Id: LSManterConvenio.php 59612 2014-09-02 12:00:51Z gelson $ + * $Id: LSManterConvenio.php 63839 2015-10-22 18:08:07Z franver $ *Casos de uso: uc-05.05.04 @@ -112,7 +112,6 @@ if ($_REQUEST["inCodBancoTxt"]) { $stLink .= "&stAcao=".$_REQUEST['stAcao']; $obRMONConvenio->listarConvenio($rsLista); -//sistemaLegado::mostravar($rsLista); $obLista = new Lista; $obLista->setRecordSet( $rsLista ); diff --git a/gestaoTributaria/fontes/PHP/cadastroMonetario/instancias/credito/FLManterCredito.php b/gestaoTributaria/fontes/PHP/cadastroMonetario/instancias/credito/FLManterCredito.php index 200461a..122c1d8 100644 --- a/gestaoTributaria/fontes/PHP/cadastroMonetario/instancias/credito/FLManterCredito.php +++ b/gestaoTributaria/fontes/PHP/cadastroMonetario/instancias/credito/FLManterCredito.php @@ -32,7 +32,7 @@ * @author Desenvolvedor: Diego Bueno Coelho * @ignore - * $Id: FLManterCredito.php 59612 2014-09-02 12:00:51Z gelson $ + * $Id: FLManterCredito.php 63839 2015-10-22 18:08:07Z franver $ *Casos de uso: uc-05.05.10 @@ -119,7 +119,6 @@ $obTxtCodEspecie->setNull ( true ); //------------------------------------------------- COMBOS $obRMONCredito->ListarEspecie ( $rsEspecie ); -//sistemaLegado::mostravar ($rsTipo); $obCmbEspecie = new Select; $obCmbEspecie->setRotulo ( "Espécie" ); diff --git a/gestaoTributaria/fontes/PHP/cadastroMonetario/instancias/credito/LSManterCredito.php b/gestaoTributaria/fontes/PHP/cadastroMonetario/instancias/credito/LSManterCredito.php index c6c3c9f..059c2e2 100644 --- a/gestaoTributaria/fontes/PHP/cadastroMonetario/instancias/credito/LSManterCredito.php +++ b/gestaoTributaria/fontes/PHP/cadastroMonetario/instancias/credito/LSManterCredito.php @@ -32,7 +32,7 @@ * @author Desenvolvedor: Diego Bueno Coelho * @ignore - * $Id: LSManterCredito.php 59612 2014-09-02 12:00:51Z gelson $ + * $Id: LSManterCredito.php 63839 2015-10-22 18:08:07Z franver $ *Casos de uso: uc-05.05.10 @@ -174,7 +174,6 @@ $obLista->ultimaAcao->addCampo("&stDescQuestao","[cod_credito]-[descricao_credit if ($_REQUEST['stAcao'] == "excluir") { $obLista->ultimaAcao->setLink( $stCaminho.$pgProx."?".Sessao::getId().$stLink ); - // mostravar(Sessao::getId().$stLink); } else { $obLista->ultimaAcao->setLink( $pgProx."?".Sessao::getId().$stLink ); } diff --git a/gestaoTributaria/fontes/PHP/cadastroMonetario/instancias/especie/LSManterEspecie.php b/gestaoTributaria/fontes/PHP/cadastroMonetario/instancias/especie/LSManterEspecie.php index 0eba1ce..759ff95 100644 --- a/gestaoTributaria/fontes/PHP/cadastroMonetario/instancias/especie/LSManterEspecie.php +++ b/gestaoTributaria/fontes/PHP/cadastroMonetario/instancias/especie/LSManterEspecie.php @@ -32,7 +32,7 @@ * @author Desenvolvedor: Diego Bueno Coelho * @ignore - * $Id: LSManterEspecie.php 59612 2014-09-02 12:00:51Z gelson $ + * $Id: LSManterEspecie.php 63839 2015-10-22 18:08:07Z franver $ *Casos de uso: uc-05.05.09 */ @@ -164,7 +164,6 @@ $obLista->ultimaAcao->addCampo("&inCodNatureza", "cod_natureza" ); $obLista->ultimaAcao->addCampo("&stDescQuestao","[cod_especie]-[nom_especie]"); if ($_REQUEST['stAcao'] == "excluir") { $obLista->ultimaAcao->setLink( $stCaminho.$pgProx."?".Sessao::getId().$stLink ); - // mostravar(Sessao::getId().$stLink); } else { $obLista->ultimaAcao->setLink( $pgProx."?".Sessao::getId().$stLink ); } diff --git a/gestaoTributaria/fontes/PHP/cadastroMonetario/instancias/indicadorEconomico/LSManterIndicador.php b/gestaoTributaria/fontes/PHP/cadastroMonetario/instancias/indicadorEconomico/LSManterIndicador.php index 9dd4cf6..1480a6a 100644 --- a/gestaoTributaria/fontes/PHP/cadastroMonetario/instancias/indicadorEconomico/LSManterIndicador.php +++ b/gestaoTributaria/fontes/PHP/cadastroMonetario/instancias/indicadorEconomico/LSManterIndicador.php @@ -32,7 +32,7 @@ * @author Desenvolvedor: Diego Bueno Coelho * @ignore - * $Id: LSManterIndicador.php 59612 2014-09-02 12:00:51Z gelson $ + * $Id: LSManterIndicador.php 63839 2015-10-22 18:08:07Z franver $ *Casos de uso: uc-05.05.07 */ @@ -168,7 +168,6 @@ $obLista->ultimaAcao->addCampo("&dtVigencia", "inicio_vigencia" ); $obLista->ultimaAcao->addCampo("&stDescQuestao","[cod_indicador]-[descricao]"); if ($_REQUEST['stAcao'] == "excluir") { $obLista->ultimaAcao->setLink( $stCaminho.$pgProx."?".Sessao::getId().$stLink ); - // mostravar(Sessao::getId().$stLink); } else { $obLista->ultimaAcao->setLink( $pgProx."?".Sessao::getId().$stLink ); } diff --git a/gestaoTributaria/fontes/PHP/cadastroMonetario/instancias/indicadorEconomico/OCManterIndicador.php b/gestaoTributaria/fontes/PHP/cadastroMonetario/instancias/indicadorEconomico/OCManterIndicador.php index 754dfea..84e0384 100644 --- a/gestaoTributaria/fontes/PHP/cadastroMonetario/instancias/indicadorEconomico/OCManterIndicador.php +++ b/gestaoTributaria/fontes/PHP/cadastroMonetario/instancias/indicadorEconomico/OCManterIndicador.php @@ -30,7 +30,7 @@ * @author Analista: Fabio Bertoldi * @author Programador: Diego Bueno Coelho - * $Id: OCManterIndicador.php 59612 2014-09-02 12:00:51Z gelson $ + * $Id: OCManterIndicador.php 63839 2015-10-22 18:08:07Z franver $ Caso de uso: uc-05.05.07 **/ @@ -86,8 +86,6 @@ switch ($_REQUEST ["stCtrl"]) { $obRFuncao->obRBiblioteca->roRModulo->setCodModulo ( $arCodFuncao[0] ); $obRFuncao->consultar(); - //sistemaLegado::mostravar ( $obRFuncao ); - $inCodFuncao = $obRFuncao->getCodFuncao () ; $stDescricao = " "; $stDescricao = $obRFuncao->getComentario() ; diff --git a/gestaoTributaria/fontes/PHP/cadastroMonetario/instancias/indicadorEconomico/OCManterValor.php b/gestaoTributaria/fontes/PHP/cadastroMonetario/instancias/indicadorEconomico/OCManterValor.php index 296f4cc..c748cbe 100644 --- a/gestaoTributaria/fontes/PHP/cadastroMonetario/instancias/indicadorEconomico/OCManterValor.php +++ b/gestaoTributaria/fontes/PHP/cadastroMonetario/instancias/indicadorEconomico/OCManterValor.php @@ -30,7 +30,7 @@ * @author Analista: Fabio Bertoldi * @author Programador: Diego Bueno Coelho - * $Id: OCManterValor.php 59612 2014-09-02 12:00:51Z gelson $ + * $Id: OCManterValor.php 63839 2015-10-22 18:08:07Z franver $ Caso de uso: uc-05.05.08 **/ @@ -270,8 +270,6 @@ switch ($_REQUEST ["stCtrl"]) { $obRFuncao->obRBiblioteca->roRModulo->setCodModulo ( $arCodFuncao[0] ); $obRFuncao->consultar(); - //sistemaLegado::mostravar ( $obRFuncao ); - $inCodFuncao = $obRFuncao->getCodFuncao () ; $stDescricao = " "; $stDescricao = $obRFuncao->getComentario() ; diff --git a/gestaoTributaria/fontes/PHP/cadastroMonetario/instancias/moeda/LSManterMoeda.php b/gestaoTributaria/fontes/PHP/cadastroMonetario/instancias/moeda/LSManterMoeda.php index bf260fd..19a5dca 100644 --- a/gestaoTributaria/fontes/PHP/cadastroMonetario/instancias/moeda/LSManterMoeda.php +++ b/gestaoTributaria/fontes/PHP/cadastroMonetario/instancias/moeda/LSManterMoeda.php @@ -32,7 +32,7 @@ * @author Desenvolvedor: Diego Bueno Coelho * @ignore - * $Id: LSManterMoeda.php 59612 2014-09-02 12:00:51Z gelson $ + * $Id: LSManterMoeda.php 63839 2015-10-22 18:08:07Z franver $ *Casos de uso: uc-05.05.06 */ @@ -108,7 +108,7 @@ if ($_REQUEST['stFracaoSingular']) { } $obRMONMoeda->ListarMoeda ( $rsLista ); -//sistemaLegado::mostraVar( $rsLista ); + $obLista = new Lista; $obLista->setRecordSet ( $rsLista ); @@ -183,7 +183,6 @@ $obLista->ultimaAcao->addCampo("&inCodFuncao", "cod_funcao" ); $obLista->ultimaAcao->addCampo("&stDescQuestao","[cod_moeda]-[descricao_singular]"); if ($_REQUEST['stAcao'] == "excluir") { $obLista->ultimaAcao->setLink( $stCaminho.$pgProx."?".Sessao::getId().$stLink ); - // mostravar(Sessao::getId().$stLink); } else { $obLista->ultimaAcao->setLink( $pgProx."?".Sessao::getId().$stLink ); } diff --git a/gestaoTributaria/fontes/PHP/cadastroMonetario/instancias/moeda/OCManterMoeda.php b/gestaoTributaria/fontes/PHP/cadastroMonetario/instancias/moeda/OCManterMoeda.php index fdc3d7b..0ba70d2 100644 --- a/gestaoTributaria/fontes/PHP/cadastroMonetario/instancias/moeda/OCManterMoeda.php +++ b/gestaoTributaria/fontes/PHP/cadastroMonetario/instancias/moeda/OCManterMoeda.php @@ -30,7 +30,7 @@ * @author Analista: Fabio Bertoldi * @author Programador: Diego Bueno Coelho - * $Id: OCManterMoeda.php 59612 2014-09-02 12:00:51Z gelson $ + * $Id: OCManterMoeda.php 63839 2015-10-22 18:08:07Z franver $ Caso de uso: uc-05.05.06 **/ @@ -87,8 +87,6 @@ switch ($_REQUEST ["stCtrl"]) { $obRFuncao->obRBiblioteca->roRModulo->setCodModulo ( $arCodFuncao[0] ); $obRFuncao->consultar(); - // sistemaLegado::mostravar ( $obRFuncao ); - $inCodFuncao = $obRFuncao->getCodFuncao () ; $stDescricao = " "; $stDescricao = $obRFuncao->getComentario() ; diff --git a/gestaoTributaria/fontes/PHP/cadastroMonetario/instancias/valor/LSManterValor.php b/gestaoTributaria/fontes/PHP/cadastroMonetario/instancias/valor/LSManterValor.php index 818ddfd..2a04e0d 100644 --- a/gestaoTributaria/fontes/PHP/cadastroMonetario/instancias/valor/LSManterValor.php +++ b/gestaoTributaria/fontes/PHP/cadastroMonetario/instancias/valor/LSManterValor.php @@ -32,7 +32,7 @@ * @author Desenvolvedor: Diego Bueno Coelho * @ignore - * $Id: LSManterValor.php 59612 2014-09-02 12:00:51Z gelson $ + * $Id: LSManterValor.php 63839 2015-10-22 18:08:07Z franver $ *Casos de uso: uc-05.05.08 */ @@ -175,7 +175,6 @@ $obLista->ultimaAcao->addCampo("&dtVigencia", "inicio_vigencia" ); $obLista->ultimaAcao->addCampo("&stDescQuestao","[cod_indicador]-[descricao]-[valor]"); if ($_REQUEST['stAcao'] == "excluir") { $obLista->ultimaAcao->setLink( $stCaminho.$pgProx."?".Sessao::getId().$stLink ); - // mostravar(Sessao::getId().$stLink); } else { $obLista->ultimaAcao->setLink( $pgProx."?".Sessao::getId().$stLink ); } diff --git a/gestaoTributaria/fontes/PHP/cadastroMonetario/instancias/valor/OCManterValor.php b/gestaoTributaria/fontes/PHP/cadastroMonetario/instancias/valor/OCManterValor.php index 206625b..14bb3c3 100644 --- a/gestaoTributaria/fontes/PHP/cadastroMonetario/instancias/valor/OCManterValor.php +++ b/gestaoTributaria/fontes/PHP/cadastroMonetario/instancias/valor/OCManterValor.php @@ -30,7 +30,7 @@ * @author Analista: Fabio Bertoldi * @author Programador: Diego Bueno Coelho - * $Id: OCManterValor.php 59612 2014-09-02 12:00:51Z gelson $ + * $Id: OCManterValor.php 63839 2015-10-22 18:08:07Z franver $ Caso de uso: uc-05.05.08 **/ @@ -82,8 +82,6 @@ switch ($_REQUEST ["stCtrl"]) { $obRFuncao->obRBiblioteca->roRModulo->setCodModulo ( $arCodFuncao[0] ); $obRFuncao->consultar(); - //sistemaLegado::mostravar ( $obRFuncao ); - $inCodFuncao = $obRFuncao->getCodFuncao () ; $stDescricao = " "; $stDescricao = $obRFuncao->getComentario() ; diff --git a/gestaoTributaria/fontes/PHP/cadastroMonetario/popups/contaCorrente/OCProcurarConta.php b/gestaoTributaria/fontes/PHP/cadastroMonetario/popups/contaCorrente/OCProcurarConta.php index 070b831..c529e41 100644 --- a/gestaoTributaria/fontes/PHP/cadastroMonetario/popups/contaCorrente/OCProcurarConta.php +++ b/gestaoTributaria/fontes/PHP/cadastroMonetario/popups/contaCorrente/OCProcurarConta.php @@ -30,7 +30,7 @@ * @author Analista: Fábio Bertoldi Rodrigues * @author Desenvolvedor: Lizandro Kirst da Silva - * $Id: OCProcurarConta.php 59612 2014-09-02 12:00:51Z gelson $ + * $Id: OCProcurarConta.php 63839 2015-10-22 18:08:07Z franver $ Casos de uso: uc-05.05.03 */ @@ -74,7 +74,7 @@ case "preencheAgencia": $obRMONAgencia->obRMONBanco->setNumBanco( $_REQUEST['cmbBanco'] ); $obRMONAgencia->listarAgencia( $rsAgencia ); - // sistemaLegado::mostravar($rsAgencia); + $inContador = 1; while ( !$rsAgencia->eof() ) { diff --git a/gestaoTributaria/fontes/PHP/cadastroMonetario/popups/convenio/OCProcurarConvenio.php b/gestaoTributaria/fontes/PHP/cadastroMonetario/popups/convenio/OCProcurarConvenio.php index a583bbb..ba5ac94 100644 --- a/gestaoTributaria/fontes/PHP/cadastroMonetario/popups/convenio/OCProcurarConvenio.php +++ b/gestaoTributaria/fontes/PHP/cadastroMonetario/popups/convenio/OCProcurarConvenio.php @@ -30,7 +30,7 @@ * @author Analista: Fábio Bertoldi Rodrigues * @author Desenvolvedor: Diego Bueno Coelho - * $Id: OCProcurarConvenio.php 59612 2014-09-02 12:00:51Z gelson $ + * $Id: OCProcurarConvenio.php 63839 2015-10-22 18:08:07Z franver $ Casos de uso: uc-05.05.04 */ @@ -76,7 +76,7 @@ case "preencheAgencia": $obRMONAgencia->obRMONBanco->setNumBanco( $_REQUEST['cmbBanco'] ); $obRMONAgencia->listarAgencia( $rsAgencia ); - // sistemaLegado::mostravar($rsAgencia); + $inContador = 1; while ( !$rsAgencia->eof() ) { diff --git a/gestaoTributaria/fontes/PHP/dividaAtiva/classes/componentes/IPopUpLivroIntervalo.class.php b/gestaoTributaria/fontes/PHP/dividaAtiva/classes/componentes/IPopUpLivroIntervalo.class.php index a0b011e..c786f3f 100755 --- a/gestaoTributaria/fontes/PHP/dividaAtiva/classes/componentes/IPopUpLivroIntervalo.class.php +++ b/gestaoTributaria/fontes/PHP/dividaAtiva/classes/componentes/IPopUpLivroIntervalo.class.php @@ -61,7 +61,7 @@ class IPopUpLivroIntervalo extends Objeto { $this->obTDATDividaAtiva = new TDATDividaAtiva; $this->obTDATDividaAtiva->recuperaLivroMax( $rsLivro ); -//sistemaLegado::mostravar( $rsLivro ); + if ( $rsLivro->Eof() ) { $this->stMascara = "9/9999"; } else { diff --git a/gestaoTributaria/fontes/PHP/dividaAtiva/classes/mapeamento/FDATInscricaoDivida.class.php b/gestaoTributaria/fontes/PHP/dividaAtiva/classes/mapeamento/FDATInscricaoDivida.class.php index f241637..09f7c22 100644 --- a/gestaoTributaria/fontes/PHP/dividaAtiva/classes/mapeamento/FDATInscricaoDivida.class.php +++ b/gestaoTributaria/fontes/PHP/dividaAtiva/classes/mapeamento/FDATInscricaoDivida.class.php @@ -70,7 +70,6 @@ class FDATInscricaoDivida extends Persistente $obConexao = new Conexao; $stSql = $this->montaInscricaoDivida($stFiltro).$stOrdem; $this->setDebug($stSql); - //SistemaLegado::mostravar ( $stSql ); $obErro = $obConexao->executaSQL( $rsRecordSet, $stSql, $boTransacao ); return $obErro; diff --git a/gestaoTributaria/fontes/PHP/dividaAtiva/classes/mapeamento/TARRRelatorioDevedores.class.php b/gestaoTributaria/fontes/PHP/dividaAtiva/classes/mapeamento/TARRRelatorioDevedores.class.php index 0d38fe2..55c0ad9 100644 --- a/gestaoTributaria/fontes/PHP/dividaAtiva/classes/mapeamento/TARRRelatorioDevedores.class.php +++ b/gestaoTributaria/fontes/PHP/dividaAtiva/classes/mapeamento/TARRRelatorioDevedores.class.php @@ -32,7 +32,7 @@ * @package URBEM * @subpackage Mapeamento - * $Id: TARRRelatorioDevedores.class.php 60480 2014-10-23 18:32:04Z carolina $ + * $Id: TARRRelatorioDevedores.class.php 63959 2015-11-11 17:07:46Z evandro $ * Casos de uso: uc-05.03.05 */ @@ -198,7 +198,7 @@ class TARRRelatorioDevedores extends Persistente { , divida_ativa.inscricao ) AS final - ORDER BY final.valor DESC"; + ORDER BY final.inscricao"; if($this->getDado('limite') != 0) { $stSql.= " LIMIT ".$this->getDado('limite'); @@ -356,7 +356,7 @@ class TARRRelatorioDevedores extends Persistente { , divida_ativa.inscricao ) AS final - ORDER BY final.valor DESC"; + ORDER BY final.inscricao DESC"; if($this->getDado('limite') != 0) { $stSql.= " LIMIT ".$this->getDado('limite'); diff --git a/gestaoTributaria/fontes/PHP/dividaAtiva/classes/mapeamento/TARRRelatorioPagadores.class.php b/gestaoTributaria/fontes/PHP/dividaAtiva/classes/mapeamento/TARRRelatorioPagadores.class.php new file mode 100644 index 0000000..28d3725 --- /dev/null +++ b/gestaoTributaria/fontes/PHP/dividaAtiva/classes/mapeamento/TARRRelatorioPagadores.class.php @@ -0,0 +1,283 @@ + +setTabela(''); + + $this->setCampoCod('cod_calculo'); + $this->setComplementoChave(''); + + $this->AddCampo('numcgm' , 'integer', true, '' , true, false); + $this->AddCampo('nom_cgm' , 'char' , true, '200' , false, true); + $this->AddCampo('divida_ativa' , 'integer', true, '' , false, true); + $this->AddCampo('ano_exercicio', 'char' , true, '4' , false, false); + $this->AddCampo('valor' , 'numeric', true, '14,2', false, false); + } + + function consultaPorGrupo(&$rsRecordSet, $stFiltro = "", $stOrdem = "", $boTransacao = "") + { + $obErro = new Erro; + $obConexao = new Conexao; + $rsRecordSet = new RecordSet; + $stSql = $this->montaConsultaPorGrupo().$stFiltro.$stOrdem; + $this->stDebug = $stSql; + $obErro = $obConexao->executaSQL( $rsRecordSet, $stSql, $boTransacao ); + + return $obErro; + } + + function montaConsultaPorGrupo() + { + $stSql = " + SELECT divida.numcgm + , divida.nom_cgm + , inscricao + , descricao + , codigo + , ano_exercicio + , SUM(parcela.vlr_parcela) as valor + FROM divida.parcela + INNER JOIN ( + SELECT + divida_parcelamento.num_parcelamento + , sw_cgm.numcgm + , sw_cgm.nom_cgm + , COALESCE( divida_imovel.inscricao_municipal, divida_empresa.inscricao_economica ) AS inscricao + , origem.descricao + , origem.ano_exercicio + , origem.cod_grupo||'/'||origem.ano_exercicio as codigo + FROM divida.divida_parcelamento + + INNER JOIN divida.divida_ativa + ON divida_ativa.cod_inscricao = divida_parcelamento.cod_inscricao + AND divida_ativa.exercicio = divida_parcelamento.exercicio + LEFT JOIN divida.divida_imovel + ON divida_imovel.cod_inscricao = divida_ativa.cod_inscricao + AND divida_imovel.exercicio = divida_ativa.exercicio + LEFT JOIN divida.divida_empresa + ON divida_empresa.cod_inscricao = divida_ativa.cod_inscricao + AND divida_empresa.exercicio = divida_ativa.exercicio + INNER JOIN divida.parcelamento + ON parcelamento.num_parcelamento = divida_parcelamento.num_parcelamento + INNER JOIN divida.parcela + ON parcela.num_parcelamento = parcelamento.num_parcelamento + INNER JOIN divida.divida_cgm + ON divida_cgm.cod_inscricao = divida_ativa.cod_inscricao + AND divida_cgm.exercicio = divida_ativa.exercicio + INNER JOIN sw_cgm + ON sw_cgm.numcgm = divida_cgm.numcgm + INNER JOIN divida.parcela_origem + ON parcela_origem.num_parcelamento = parcelamento.num_parcelamento + INNER JOIN ( SELECT parcela.cod_parcela + , grupo_credito.descricao + , grupo_credito.ano_exercicio + , grupo_credito.cod_grupo + FROM arrecadacao.parcela + + INNER JOIN arrecadacao.lancamento_calculo + ON lancamento_calculo.cod_lancamento = parcela.cod_lancamento + + INNER JOIN arrecadacao.calculo_grupo_credito + ON calculo_grupo_credito.cod_calculo = lancamento_calculo.cod_calculo + + INNER JOIN arrecadacao.grupo_credito + ON grupo_credito.cod_grupo = calculo_grupo_credito.cod_grupo + AND grupo_credito.ano_exercicio = calculo_grupo_credito.ano_exercicio + + WHERE calculo_grupo_credito.cod_grupo = ".$this->getDado('cod_grupo')." + AND calculo_grupo_credito.ano_exercicio = '".$this->getDado('exercicio')."' + + GROUP BY parcela.cod_parcela + ,grupo_credito.descricao + ,grupo_credito.ano_exercicio + ,grupo_credito.cod_grupo + ) AS origem + ON origem.cod_parcela = parcela_origem.cod_parcela + + WHERE parcela.paga = TRUE + + GROUP BY divida_parcelamento.num_parcelamento + , sw_cgm.numcgm + , sw_cgm.nom_cgm + , divida_imovel.inscricao_municipal + , divida_empresa.inscricao_economica + , origem.descricao + , origem.ano_exercicio + , origem.cod_grupo + ) AS divida + ON divida.num_parcelamento = parcela.num_parcelamento + + WHERE parcela.paga = TRUE + + GROUP BY divida.numcgm + , divida.nom_cgm + , descricao + , inscricao + , codigo + , ano_exercicio + ORDER BY inscricao + "; + + if($this->getDado('limite') != 0) { + $stSql.= " LIMIT ".$this->getDado('limite'); + } + + return $stSql; + } + + + + function consultaPorCredito(&$rsRecordSet, $stFiltro = "", $stOrdem = "", $boTransacao = "") + { + $obErro = new Erro; + $obConexao = new Conexao; + $rsRecordSet = new RecordSet; + $stSql = $this->montaConsultaPorCredito().$stFiltro.$stOrdem; + $this->stDebug = $stSql; + $obErro = $obConexao->executaSQL( $rsRecordSet, $stSql, $boTransacao ); + + return $obErro; + } + + + function montaConsultaPorCredito() + { + $stSql = " + SELECT divida.numcgm + , divida.nom_cgm + , inscricao + , descricao + , codigo + , ano_exercicio + , SUM(parcela.vlr_parcela) as valor + FROM divida.parcela + INNER JOIN ( + SELECT + divida_parcelamento.num_parcelamento + , sw_cgm.numcgm + , sw_cgm.nom_cgm + , COALESCE( divida_imovel.inscricao_municipal, divida_empresa.inscricao_economica ) AS inscricao + , origem.descricao + , origem.ano_exercicio + , origem.cod_grupo||'/'||origem.ano_exercicio as codigo + FROM divida.divida_parcelamento + + INNER JOIN divida.divida_ativa + ON divida_ativa.cod_inscricao = divida_parcelamento.cod_inscricao + AND divida_ativa.exercicio = divida_parcelamento.exercicio + LEFT JOIN divida.divida_imovel + ON divida_imovel.cod_inscricao = divida_ativa.cod_inscricao + AND divida_imovel.exercicio = divida_ativa.exercicio + LEFT JOIN divida.divida_empresa + ON divida_empresa.cod_inscricao = divida_ativa.cod_inscricao + AND divida_empresa.exercicio = divida_ativa.exercicio + INNER JOIN divida.parcelamento + ON parcelamento.num_parcelamento = divida_parcelamento.num_parcelamento + INNER JOIN divida.parcela + ON parcela.num_parcelamento = parcelamento.num_parcelamento + INNER JOIN divida.divida_cgm + ON divida_cgm.cod_inscricao = divida_ativa.cod_inscricao + AND divida_cgm.exercicio = divida_ativa.exercicio + INNER JOIN sw_cgm + ON sw_cgm.numcgm = divida_cgm.numcgm + INNER JOIN divida.parcela_origem + ON parcela_origem.num_parcelamento = parcelamento.num_parcelamento + INNER JOIN ( SELECT parcela.cod_parcela + , credito.descricao_credito AS descricao + , calculo_grupo_credito.ano_exercicio + , calculo_grupo_credito.cod_grupo + FROM arrecadacao.parcela + + INNER JOIN arrecadacao.lancamento_calculo + ON lancamento_calculo.cod_lancamento = parcela.cod_lancamento + + INNER JOIN arrecadacao.calculo_grupo_credito + ON calculo_grupo_credito.cod_calculo = lancamento_calculo.cod_calculo + + INNER JOIN arrecadacao.calculo + ON calculo.cod_calculo = lancamento_calculo.cod_calculo + + INNER JOIN monetario.credito + ON credito.cod_credito = calculo.cod_credito + AND credito.cod_especie = calculo.cod_especie + AND credito.cod_genero = calculo.cod_genero + AND credito.cod_natureza = calculo.cod_natureza + + WHERE calculo.cod_credito = '".$this->getDado('cod_credito')."' + AND calculo.cod_especie = '".$this->getDado('cod_especie')."' + AND calculo.cod_genero = '".$this->getDado('cod_genero')."' + AND calculo.cod_natureza = '".$this->getDado('cod_natureza')."' + AND calculo.exercicio = '".$this->getDado('exercicio')."' + ) AS origem + ON origem.cod_parcela = parcela_origem.cod_parcela + + WHERE parcela.paga = TRUE + + GROUP BY divida_parcelamento.num_parcelamento + , sw_cgm.numcgm + , sw_cgm.nom_cgm + , divida_imovel.inscricao_municipal + , divida_empresa.inscricao_economica + , origem.descricao + , origem.ano_exercicio + , origem.cod_grupo + ) AS divida + ON divida.num_parcelamento = parcela.num_parcelamento + + WHERE parcela.paga = TRUE + + GROUP BY divida.numcgm + , divida.nom_cgm + , descricao + , inscricao + , codigo + , ano_exercicio + ORDER BY inscricao + "; + + if($this->getDado('limite') != 0) { + $stSql.= " LIMIT ".$this->getDado('limite'); + } + + return $stSql; + } + +}//End of Class \ No newline at end of file diff --git a/gestaoTributaria/fontes/PHP/dividaAtiva/classes/mapeamento/TDATModalidade.class.php b/gestaoTributaria/fontes/PHP/dividaAtiva/classes/mapeamento/TDATModalidade.class.php index 800575b..aa06a2a 100644 --- a/gestaoTributaria/fontes/PHP/dividaAtiva/classes/mapeamento/TDATModalidade.class.php +++ b/gestaoTributaria/fontes/PHP/dividaAtiva/classes/mapeamento/TDATModalidade.class.php @@ -32,7 +32,7 @@ * @package URBEM * @subpackage Mapeamento - * $Id: TDATModalidade.class.php 59612 2014-09-02 12:00:51Z gelson $ + * $Id: TDATModalidade.class.php 63839 2015-10-22 18:08:07Z franver $ * Casos de uso: uc-05.04.07 */ @@ -149,8 +149,6 @@ class TDATModalidade extends Persistente $stSql = $this->montaRecuperaInfoModalidade().$stCondicao.$stOrdem; $this->setDebug( $stSql ); -//sistemaLegado::mostravar( $stSql ); exit; - //$this->debug(); $obErro = $obConexao->executaSQL( $rsRecordSet, $stSql, $boTransacao ); return $obErro; diff --git a/gestaoTributaria/fontes/PHP/dividaAtiva/instancias/cobranca/LSManterEstorno.php b/gestaoTributaria/fontes/PHP/dividaAtiva/instancias/cobranca/LSManterEstorno.php index 14322d0..3fb3016 100644 --- a/gestaoTributaria/fontes/PHP/dividaAtiva/instancias/cobranca/LSManterEstorno.php +++ b/gestaoTributaria/fontes/PHP/dividaAtiva/instancias/cobranca/LSManterEstorno.php @@ -32,7 +32,7 @@ * @ignore - * $Id: LSManterEstorno.php 59612 2014-09-02 12:00:51Z gelson $ + * $Id: LSManterEstorno.php 63839 2015-10-22 18:08:07Z franver $ * Casos de uso: uc-05.04.04 */ @@ -187,7 +187,6 @@ if ( !$rsListaDocumentos->Eof() ) { $rsListaDocumentos->preenche($arDocumentosTMP); $rsListaDocumentos->setPrimeiroElemento(); -//sistemaLegado::mostravar( $rsListaDocumentos );exit; $stCaminho = CAM_GT_DAT_INSTANCIAS."cobranca/"; diff --git a/gestaoTributaria/fontes/PHP/dividaAtiva/instancias/consultas/FMConsultaInscricao.php b/gestaoTributaria/fontes/PHP/dividaAtiva/instancias/consultas/FMConsultaInscricao.php index 3563536..cca414c 100644 --- a/gestaoTributaria/fontes/PHP/dividaAtiva/instancias/consultas/FMConsultaInscricao.php +++ b/gestaoTributaria/fontes/PHP/dividaAtiva/instancias/consultas/FMConsultaInscricao.php @@ -30,7 +30,7 @@ * @author Analista: Fábio Bertoldi * @author Programador: Fernando Piccini Cercato - * $Id: FMConsultaInscricao.php 59612 2014-09-02 12:00:51Z gelson $ + * $Id: FMConsultaInscricao.php 63911 2015-11-05 17:03:30Z carlos.silva $ Caso de uso: uc-05.04.09 **/ @@ -60,7 +60,6 @@ if ( empty( $stAcao ) ) { $stAcao = "incluir"; } -#sistemaLegado::mostravar( $_REQUEST); // EFETUA ALTERACAO DA DATA BASE CASO HAJA COBRANÇA #============================================================== @@ -123,7 +122,7 @@ $obTDATDividaAtiva->ListaConsultaCobrancas( $rsListaCobrancas, $stFiltro ); $rsListaCobrancas->addFormatacao("valor_parcelamento","NUMERIC_BR"); $rsListaCobrancas->setPrimeiroElemento(); -//sistemaLegado::mostravar( $rsListaCobrancas ); + $tableCobrancas = new TableTree(); $tableCobrancas->setRecordset ( $rsListaCobrancas ); $tableCobrancas->setSummary ('Lista de Cobranças'); @@ -166,10 +165,10 @@ $obLblContribuinte->setValue ( $_REQUEST['inNumCGMContrib']." - ".$_REQUEST[" $obLblContribuinte->setTitle ( "Contribuinte" ); $obLblInscricaoAno = new Label; -$obLblInscricaoAno->setRotulo ( "Inscrição / Ano" ); +$obLblInscricaoAno->setRotulo ( "Inscrição/Ano" ); $obLblInscricaoAno->setName ( "stInscricaoAno" ); -$obLblInscricaoAno->setValue ( $_REQUEST['inCodInscricao']." / ".$_REQUEST["inExercicio"] ); -$obLblInscricaoAno->setTitle ( "Inscrição / Ano" ); +$obLblInscricaoAno->setValue ( $_REQUEST['inCodInscricao']."/".$_REQUEST["inExercicio"] ); +$obLblInscricaoAno->setTitle ( "Inscrição/Ano" ); $obLblDataInscricao = new Label; $obLblDataInscricao->setRotulo ( "Data de Inscrição" ); @@ -235,7 +234,7 @@ $boBtnVoltar = new Voltar(); $boBtnVoltar->setName('btVoltar'); $boBtnVoltar->obEvento->setOnclick('Voltar()'); -$stLocation = CAM_GT_DAT_INSTANCIAS."consultas/OCGeraRelatorioConsultaDivida.php?"; +$stLocation = CAM_GT_DAT_INSTANCIAS."consultas/OCRelatorioConsultaDivida.php?"; $stLocation .= Sessao::getId().'&stAcao='.$stAcao; $stLocation .= '&inCodInscricao='.$inCodInscricao; $stLocation .= '&inExercicio='.$inExercicio; @@ -257,7 +256,6 @@ $stLocation .= "&"; $obButtonRelatorio = new Button; $obButtonRelatorio->setName ( "Relatorio" ); $obButtonRelatorio->setValue ( "Relatório" ); -#$obButtonRelatorio->obEvento->setOnClick( "window.parent.frames['oculto'].location='".$stLocation."';"); $obButtonRelatorio->obEvento->setOnClick( "document.frm.submit();" ); $obHdnCaminho = new Hidden; diff --git a/gestaoTributaria/fontes/PHP/dividaAtiva/instancias/consultas/FMConsultaInscricaoDetalheCobranca.php b/gestaoTributaria/fontes/PHP/dividaAtiva/instancias/consultas/FMConsultaInscricaoDetalheCobranca.php index dee81a6..340068c 100644 --- a/gestaoTributaria/fontes/PHP/dividaAtiva/instancias/consultas/FMConsultaInscricaoDetalheCobranca.php +++ b/gestaoTributaria/fontes/PHP/dividaAtiva/instancias/consultas/FMConsultaInscricaoDetalheCobranca.php @@ -30,7 +30,7 @@ * @author Analista: Fabio Bertoldi * @author Programador: Fernando Piccini Cercato - * $Id: FMConsultaInscricaoDetalheCobranca.php 59612 2014-09-02 12:00:51Z gelson $ + * $Id: FMConsultaInscricaoDetalheCobranca.php 63839 2015-10-22 18:08:07Z franver $ Caso de uso: uc-05.04.09 **/ @@ -42,7 +42,7 @@ include_once ( CAM_GT_DAT_MAPEAMENTO."TDATDividaParcela.class.php" ); $obTDATDividaParcela = new TDATDividaParcela; $obTDATDividaAtiva = new TDATDividaAtiva; -//SistemaLegado::mostravar($_REQUEST); + if ($_REQUEST['situacao'] == 'Cancelada') {// and $_REQUEST['motivo_cancelamento'] ) { $obLblMotivo = new Label; $obLblMotivo->setName ('stMotivo'); diff --git a/gestaoTributaria/fontes/PHP/dividaAtiva/instancias/consultas/FMConsultaInscricaoDetalheValor.php b/gestaoTributaria/fontes/PHP/dividaAtiva/instancias/consultas/FMConsultaInscricaoDetalheValor.php index 8fd1304..04678ec 100644 --- a/gestaoTributaria/fontes/PHP/dividaAtiva/instancias/consultas/FMConsultaInscricaoDetalheValor.php +++ b/gestaoTributaria/fontes/PHP/dividaAtiva/instancias/consultas/FMConsultaInscricaoDetalheValor.php @@ -31,7 +31,7 @@ * @author Analista: Fabio Bertoldi * @author Programador: Lucas Teixeira Stephanou - * $Id: FMConsultaInscricaoDetalheValor.php 59612 2014-09-02 12:00:51Z gelson $ + * $Id: FMConsultaInscricaoDetalheValor.php 63839 2015-10-22 18:08:07Z franver $ Caso de uso: uc-05.04.09 **/ @@ -129,8 +129,6 @@ $obTDATDividaAtiva->recuperaConsulta( $rsDetalheParcela, $stFiltro, $dtDataUS ); $stFiltroDetalhes = " ap.cod_lancamento = ".$inCodLancamento." AND ap.cod_parcela = ".$inCodParcela." AND dpc.num_parcelamento = ".$inNumParcelamento; $obTDATDividaAtiva->recuperaListaDetalhesAcrescimosConsultaDivida( $rsListaDetalheCreditos, $stFiltroDetalhes, $dtDataUS, $inNumeracao ); -//sistemaLegado::mostravar( $rsListaDetalheCreditos ); -//sistemaLegado::mostravar( $rsDetalheParcela ); $flTotalCreditos = 0; $inQuantidadeCreditos = 0; @@ -332,8 +330,6 @@ $obRARRParcela = new RARRParcela ( new RARRLancamento (new RARRCalculo) ); $obRARRParcela->setCodParcela ( $inCodParcela ); $obRARRParcela->listarReemissaoConsulta( $rsNumeracoes ); -#sistemaLegado::mostravar( $rsNumeracoes ); - $obCmbNumeracao = new Select; $obCmbNumeracao->setName ( "cmbNumeracao" ); $obCmbNumeracao->addOption ( "", "Vencimentos" ); @@ -468,7 +464,7 @@ $stTipoBaixa = $rsDetalheParcela->getCampo("cod_lote"); // antes de form , apresentar lista de pagamentos duplicados $obRARRCarne->listarPagamentosConsulta( $rsPagDuplicados ); $rsPagDuplicados->addFormatacao("valor","NUMERIC_BR"); -#sistemaLegado::mostravar( $rsPagDuplicados ); + $inContPagamentos = $rsPagDuplicados->getNumLinhas(); $arParcelasDuplicadas = array(); if ($inContPagamentos > 1) { @@ -494,7 +490,6 @@ if ($inContPagamentos > 1) { if ( $rsPagDuplicados->getNumLinhas() > 0 ) { ########################### TABELA DOM - #sistemaLegado::mostravar( $rsPagDuplicados ); $table = new Table(); $table->setRecordset( $rsPagDuplicados ); $table->setSummary('Pagamentos Duplicados'); @@ -661,7 +656,6 @@ $table = new Table(); $table->setRecordset( $rsListaDetalheCreditos ); $table->setSummary('Detalhamento por Crédito'); -#sistemaLegado::mostravar( $rsListaDetalheCreditos ); // lista zebrada //$table->setConditional( true , "#efefef" ); diff --git a/gestaoTributaria/fontes/PHP/dividaAtiva/instancias/consultas/FMConsultaInscricaoDocumento.php b/gestaoTributaria/fontes/PHP/dividaAtiva/instancias/consultas/FMConsultaInscricaoDocumento.php index 4b7ac23..dd8893d 100644 --- a/gestaoTributaria/fontes/PHP/dividaAtiva/instancias/consultas/FMConsultaInscricaoDocumento.php +++ b/gestaoTributaria/fontes/PHP/dividaAtiva/instancias/consultas/FMConsultaInscricaoDocumento.php @@ -30,7 +30,7 @@ * @author Analista: Fábio Bertoldi * @author Programador: Fernando Piccini Cercato - * $Id: FMConsultaInscricaoDocumento.php 59612 2014-09-02 12:00:51Z gelson $ + * $Id: FMConsultaInscricaoDocumento.php 63839 2015-10-22 18:08:07Z franver $ Caso de uso: uc-05.04.09 **/ @@ -71,7 +71,6 @@ if ( empty( $_REQUEST['stAcao']) ) { $_REQUEST['stAcao'] = "incluir"; } -#sistemaLegado::mostravar( $_REQUEST); // EFETUA ALTERACAO DA DATA BASE CASO HAJA COBRANÇA #============================================================== @@ -144,7 +143,7 @@ $obTDATDividaAtiva->ListaConsultaCobrancas( $rsListaCobrancas, $stFiltro ); $rsListaCobrancas->addFormatacao("valor_parcelamento","NUMERIC_BR"); $rsListaCobrancas->setPrimeiroElemento(); -#sistemaLegado::mostravar( $rsListaCobrancas ); + $tableCobrancas = new TableTree(); $tableCobrancas->setRecordset ( $rsListaCobrancas ); $tableCobrancas->setSummary ('Lista de Cobranças'); diff --git a/gestaoTributaria/fontes/PHP/dividaAtiva/instancias/consultas/OCGeraRelatorioConsultaDivida.php b/gestaoTributaria/fontes/PHP/dividaAtiva/instancias/consultas/OCGeraRelatorioConsultaDivida.php index c0329b7..5b6fc02 100644 --- a/gestaoTributaria/fontes/PHP/dividaAtiva/instancias/consultas/OCGeraRelatorioConsultaDivida.php +++ b/gestaoTributaria/fontes/PHP/dividaAtiva/instancias/consultas/OCGeraRelatorioConsultaDivida.php @@ -24,34 +24,24 @@ ?> setSubTitulo ( "Exercício - ".Sessao::getExercicio() ); $obPDF->setUsuario ( Sessao::getUsername() ); $obPDF->setEnderecoPrefeitura ( $arConfiguracao ); -$arrInformacoes = array(); - -/* RECEBE AS VARIAVEIS DE REQUEST */ -$arrInformacoes['inCodInscricao'] = $_REQUEST['inCodInscricao']; -$arrInformacoes['inExercicio'] = $_REQUEST['inExercicio']; -$arrInformacoes['dtDataBase_br'] = $_REQUEST['dtDataBase']; -$arDataBase = explode ( '/', $_REQUEST['dtDataBase'] ); -$arrInformacoes['dtDataBase'] = $arDataBase[2].'-'.$arDataBase[1].'-'.$arDataBase[0]; -$arrInformacoes['inNumCGMContrib'] = $_REQUEST['inNumCGMContrib']; -$arrInformacoes['inNomCGMContrib'] = $_REQUEST['inNomCGMContrib']; -$arrInformacoes['inNumCGMAutorid'] = $_REQUEST['inNumCGMAutorid']; -$arrInformacoes['inNomCGMAutorid'] = $_REQUEST['inNomCGMAutorid']; -$arrInformacoes['inInscMunic'] = $_REQUEST['inInscMunic']; -$arrInformacoes['inInscEcon'] = $_REQUEST['inInscEcon']; -$arrInformacoes['stSituacao'] = $_REQUEST['stSituacao']; -$arrInformacoes['dtCancelada'] = substr($_REQUEST['dtCancelada'],8,2).'/'.substr($_REQUEST['dtCancelada'],5,2).'/'.substr($_REQUEST['dtCancelada'],0, 4); -$arrInformacoes['stNomCgmCancelada'] = $_REQUEST['stNomCgmCancelada']; -$arrInformacoes['inNumCgmCancelada'] = $_REQUEST['inNumCgmCancelada']; +$arrInformacoes = Sessao::read('arrInformacoes'); +$rsListaLancamentos = Sessao::read('rsListaLancamentos'); +$rsListaCobrancas = Sessao::read('rsListaCobrancas'); +$rsListaParcelas = Sessao::read('rsListaParcelas'); +$rsListaInscricoesVinculadas = Sessao::read('rsListaInscricoesVinculadas'); -/* -$arrInformacoes['stOrigem'] = $_REQUEST['stOrigem']; -$arrInformacoes['inInscricao'] = $_REQUEST['inInscricao']; -$arrInformacoes['stDados'] = $_REQUEST['stDados']; -$arrInformacoes['stSituacao'] = $_REQUEST['stSituacao']; -$arrInformacoes['flValorVenal'] = $_REQUEST['flValorVenal']; -$arrInformacoes['inCodModulo'] = $_REQUEST['inCodModulo']; -*/ -#sistemaLegado::mostravar ( $arrInformacoes ); #========================== INICIO CABEÇALHO ======== @@ -103,7 +71,7 @@ $arCabecalho[] = Array ( ); $arCabecalho[] = Array ( "LabelTitulo" => "Inscrição/Ano:", - "LabelValor" => $arrInformacoes['inCodInscricao'].' - '. $arrInformacoes['inExercicio'] + "LabelValor" => $arrInformacoes['inCodInscricao'].'/'. $arrInformacoes['inExercicio'] ); $arCabecalho[] = Array ( "LabelTitulo" => "Data da Inscrição:", @@ -125,16 +93,6 @@ $arCabecalho[] = Array ( "LabelValor" => $arrInformacoes['stSituacao'] ); -/*if ($arrInformacoes['stSituacao'] == 'Cancelada') { - $arCabecalho[] = Array ( - "LabelTitulo" => "Data Cancelamento:", - "LabelValor" => $arrInformacoes['dtCancelada'] - ); - $arCabecalho[] = Array ( - "LabelTitulo" => "Usuário que Cancelou:", - "LabelValor" => $arrInformacoes['inNumCgmCancelada'] .' - '.$arrInformacoes['stNomCgmCancelada'] - ); -}*/ $arCabecalho[] = Array ( "LabelTitulo" => "Autoridade Competente:", "LabelValor" => $arrInformacoes['inNumCGMAutorid'].' - '. $arrInformacoes['inNomCGMAutorid'] @@ -143,7 +101,6 @@ $arCabecalho[] = Array ( $rsCabecalho = new RecordSet; $rsCabecalho->preenche ( $arCabecalho ); $obPDF->addRecordSet ( $rsCabecalho ); -#$obPDF->setQuebraPaginaLista( false ); $obPDF->setAlinhamento ( "R" ); $obPDF->addCabecalho ( "Dados da Consulta" ,20 , 14, "B" ); $obPDF->setAlinhamento ( "L" ); @@ -169,64 +126,55 @@ $obPDF->addCabecalho ( "" ,80, 11, "B" ); $obPDF->setAlinhamento ( "L" ); $obPDF->addCampo ( "LabelTitulo" , 14, "B"); -$obTDATDividaAtiva = new TDATDividaAtiva; -$dtDataBase = $_REQUEST['stDataInscDiv']; -$obTDATDividaAtiva->setDado('data_base', $arrInformacoes['dtDataBase_br'] ); - -$stFiltroLancamentos = "WHERE inscricao.cod_inscricao = ".$_REQUEST["inCodInscricao"]; -$stFiltroLancamentos .=" AND inscricao.exercicio = '".$_REQUEST["inExercicio"]."'"; -$obTDATDividaAtiva->listaConsultaLancamentosSimples( $rsListaLancamentos , $stFiltroLancamentos ); -//$obTDATDividaAtiva->debug(); - - $flTotalLancado = $flTotalAtualizado = 0.00; - while ( !$rsListaLancamentos->eof() ) { - $flTotalLancado += $rsListaLancamentos->getCampo ( "valor_lancado" ); - $flTotalAtualizado += $rsListaLancamentos->getCampo ( "valor_atualizado" ); - $rsListaLancamentos->proximo(); - } - $arTotaisLancamentos[] = array ( - "label" => "Totais:" - , "total_lancado" => $flTotalLancado - , "total_atualizado" => $flTotalAtualizado - ); - - $rsListaLancamentos->addFormatacao ('valor_lancado', 'NUMERIC_BR'); - $rsListaLancamentos->addFormatacao ('valor_atualizado', 'NUMERIC_BR'); - $rsListaLancamentos->setPrimeiroElemento(); - $obPDF->addRecordSet($rsListaLancamentos); +$flTotalLancado = $flTotalAtualizado = 0.00; +while ( !$rsListaLancamentos->eof() ) { + $flTotalLancado += $rsListaLancamentos->getCampo ( "valor_lancado" ); + $flTotalAtualizado += $rsListaLancamentos->getCampo ( "valor_atualizado" ); + $rsListaLancamentos->proximo(); +} +$arTotaisLancamentos[] = array ( + "label" => "Totais:" + , "total_lancado" => $flTotalLancado + , "total_atualizado" => $flTotalAtualizado +); - $obPDF->setQuebraPaginaLista( false ); - $obPDF->setAlinhamento ( "C" ); - $obPDF->addCabecalho ( "Exercício" ,8, 11, "B" ); - $obPDF->setAlinhamento ( "L" ); - $obPDF->addCabecalho ( "Crédito/Grupo de Crédito" ,28, 11, "B" ); - $obPDF->setAlinhamento ( "C" ); - $obPDF->addCabecalho ( "Parcelas" , 8, 11, "B" ); - $obPDF->addCabecalho ( "Valor Lançado (R$)" ,18, 11, "B" ); - $obPDF->addCabecalho ( "Valor Atualizado (R$)" ,18, 11, "B" ); +$rsListaLancamentos->addFormatacao ('valor_lancado', 'NUMERIC_BR'); +$rsListaLancamentos->addFormatacao ('valor_atualizado', 'NUMERIC_BR'); +$rsListaLancamentos->setPrimeiroElemento(); +$obPDF->addRecordSet($rsListaLancamentos); - $obPDF->setAlinhamento ( "C" ); - $obPDF->addCampo ( "exercicio_original" , 10); - $obPDF->setAlinhamento ( "L" ); - $obPDF->addCampo ( "nom_origem" , 10 );//origem - $obPDF->setAlinhamento ( "C" ); - $obPDF->addCampo ( "total_parcelas" , 10 ); - $obPDF->setAlinhamento ( "R" ); - $obPDF->addCampo ( "valor_lancado" , 10 ); - $obPDF->addCampo ( "valor_atualizado" , 10 ); +$obPDF->setQuebraPaginaLista( false ); +$obPDF->setAlinhamento ( "C" ); +$obPDF->addCabecalho ( "Exercício" ,9, 11, "B" ); +$obPDF->setAlinhamento ( "L" ); +$obPDF->addCabecalho ( "Crédito/Grupo de Crédito" ,27, 11, "B" ); +$obPDF->setAlinhamento ( "C" ); +$obPDF->addCabecalho ( "Parcelas" , 8, 11, "B" ); +$obPDF->addCabecalho ( "Valor Lançado (R$)" ,18, 11, "B" ); +$obPDF->addCabecalho ( "Valor Atualizado (R$)" ,18, 11, "B" ); + +$obPDF->setAlinhamento ( "C" ); +$obPDF->addCampo ( "exercicio_original" , 10); +$obPDF->setAlinhamento ( "L" ); +$obPDF->addCampo ( "nom_origem" , 10 );//origem +$obPDF->setAlinhamento ( "C" ); +$obPDF->addCampo ( "total_parcelas" , 10 ); +$obPDF->setAlinhamento ( "R" ); +$obPDF->addCampo ( "valor_lancado" , 10 ); +$obPDF->addCampo ( "valor_atualizado" , 10 ); - $rsTotais = new RecordSet; - $rsTotais->preenche ( $arTotaisLancamentos ); +$rsTotais = new RecordSet; +$rsTotais->preenche ( $arTotaisLancamentos ); - $obPDF->addRecordSet($rsTotais); - $obPDF->setQuebraPaginaLista( false ); - $obPDF->setAlinhamento ( "R" ); - $obPDF->addCabecalho ( $rsTotais->getCampo('label') ,44, 10, "B" ); - $obPDF->addCabecalho ( number_format($rsTotais->getCampo('total_lancado'),2,',','.'),18, 10, "B" ); - $obPDF->addCabecalho ( number_format($rsTotais->getCampo('total_atualizado'),2,',','.'),18,10,"B" ); - $obPDF->addCampo ( "" , 2, "B"); - $obPDF->addCampo ( "" , 2, "B"); - $obPDF->addCampo ( "" , 2, "B"); +$obPDF->addRecordSet($rsTotais); +$obPDF->setQuebraPaginaLista( false ); +$obPDF->setAlinhamento ( "R" ); +$obPDF->addCabecalho ( $rsTotais->getCampo('label') ,44, 10, "B" ); +$obPDF->addCabecalho ( number_format($rsTotais->getCampo('total_lancado'),2,',','.'),18, 10, "B" ); +$obPDF->addCabecalho ( number_format($rsTotais->getCampo('total_atualizado'),2,',','.'),18,10,"B" ); +$obPDF->addCampo ( "" , 2, "B"); +$obPDF->addCampo ( "" , 2, "B"); +$obPDF->addCampo ( "" , 2, "B"); #========================== FIM LISTA DE LANÇAMENTOS ======== #========================== INICIO LISTA DE COBRANÇAS ======== @@ -242,284 +190,263 @@ $obPDF->addCabecalho ( "" ,80, 11, "B" ); $obPDF->setAlinhamento ( "L" ); $obPDF->addCampo ( "LabelTitulo" , 14, "B"); -$stFiltro = ""; -if ($arrInformacoes["inCodInscricao"] && $arrInformacoes["inExercicio"]) { - $stFiltro = " WHERE ddp.cod_inscricao = ".$arrInformacoes["inCodInscricao"]." AND ddp.exercicio = '".$arrInformacoes["inExercicio"]."'"; -} - - $obTDATDividaAtiva->ListaConsultaCobrancas( $rsListaCobrancas, $stFiltro, $boTransacao ); - #$obTDATDividaAtiva->debug(); - #sistemaLegado::mostravar( $rsListaCobrancas );exit; - - $rsListaCobrancas->addFormatacao("valor_parcelamento","NUMERIC_BR"); - - $rsListaCobrancas->setPrimeiroElemento(); - while ( !$rsListaCobrancas->eof() ) { - - $arCobrancaAtual = array(); - $arCobrancaAtual[] = array ( - "numero_parcelamento" => $rsListaCobrancas->getCampo ( "numero_parcelamento" ) - , "cod_modalidade" => $rsListaCobrancas->getCampo ( "cod_modalidade" ) - , "descricao_modalidade" => substr($rsListaCobrancas->getCampo ( "descricao_modalidade"), 0, 40) -// , "desc2" => substr($rsListaCobrancas->getCampo ( "descricao_modalidade"), 40, strlen($rsListaCobrancas->getCampo("descricao_modalidade"))) - , "dt_parcelamento" => $rsListaCobrancas->getCampo ( "dt_parcelamento" ) - , "numcgm_usuario" => $rsListaCobrancas->getCampo ( "numcgm_usuario" ) - , "nomcgm_usuario" => substr($rsListaCobrancas->getCampo( "nomcgm_usuario"), 0, 22) -// , "nomcgm2" => substr($rsListaCobrancas->getCampo( "nomcgm_usuario"), 22, strlen($rsListaCobrancas->getCampo("descricao_modalidade"))) - , "qtd_parcelas" => $rsListaCobrancas->getCampo ( "qtd_parcelas" ) - , "situacao" => substr($rsListaCobrancas->getCampo ( "situacao" ), 0, 40) - , "valor_parcelamento" => $rsListaCobrancas->getCampo ( "valor_parcelamento" ) +$rsListaCobrancas->addFormatacao("valor_parcelamento","NUMERIC_BR"); +$rsListaCobrancas->setPrimeiroElemento(); +while ( !$rsListaCobrancas->eof() ) { + + $arCobrancaAtual = array(); + $arCobrancaAtual[] = array ( + "numero_parcelamento" => $rsListaCobrancas->getCampo ( "numero_parcelamento" ) + , "cod_modalidade" => $rsListaCobrancas->getCampo ( "cod_modalidade" ) + , "descricao_modalidade" => substr($rsListaCobrancas->getCampo ( "descricao_modalidade"), 0, 40) + , "dt_parcelamento" => $rsListaCobrancas->getCampo ( "dt_parcelamento" ) + , "numcgm_usuario" => $rsListaCobrancas->getCampo ( "numcgm_usuario" ) + , "nomcgm_usuario" => substr($rsListaCobrancas->getCampo( "nomcgm_usuario"), 0, 30) + , "qtd_parcelas" => $rsListaCobrancas->getCampo ( "qtd_parcelas" ) + , "situacao" => substr($rsListaCobrancas->getCampo ( "situacao" ), 0, 40) + , "valor_parcelamento" => $rsListaCobrancas->getCampo ( "valor_parcelamento" ) + ); + + $arCobrancaAtual[] = array( + "descricao_modalidade" => substr($rsListaCobrancas->getCampo ( "descricao_modalidade"), 40, strlen($rsListaCobrancas->getCampo("descricao_modalidade"))) + , "nomcgm_usuario" => substr($rsListaCobrancas->getCampo( "nomcgm_usuario"), 30, strlen($rsListaCobrancas->getCampo("descricao_modalidade"))) + ); + $rsCobrancaAtual = new RecordSet; + $rsCobrancaAtual->preenche ( $arCobrancaAtual ); + $obPDF->addRecordSet($rsCobrancaAtual); + + $obPDF->setQuebraPaginaLista( false ); + + $obPDF->setAlinhamento ( "C" ); + $obPDF->addCabecalho ( "Cobrança" ,9 , 11, "B" ); + $obPDF->setAlinhamento ( "L" ); + $obPDF->addCabecalho ( "Modalidade" ,27 , 11, "B" ); + $obPDF->setAlinhamento ( "C" ); + $obPDF->addCabecalho ( "Data" ,9 , 11, "B" ); + $obPDF->addCabecalho ( "Usuário" ,24, 11, "B" ); + $obPDF->addCabecalho ( "Parcelas" , 7, 11, "B" ); + $obPDF->addCabecalho ( "Situação" ,11, 11, "B" ); + $obPDF->addCabecalho ( "Valor (R$)" ,13, 11, "B" ); + + $obPDF->setAlinhamento ( "C" ); + $obPDF->addCampo ( "numero_parcelamento" , 10); + $obPDF->setAlinhamento ( "L" ); + $obPDF->addCampo ( "[cod_modalidade] - [descricao_modalidade]", 10 ); + $obPDF->setAlinhamento ( "C" ); + $obPDF->addCampo ( "dt_parcelamento" , 10 ); + + $obPDF->setAlinhamento ( "L" ); + $obPDF->addCampo ( "[numcgm_usuario] - [nomcgm_usuario]" , 10 ); + + $obPDF->setAlinhamento ( "C" ); + $obPDF->addCampo ( "qtd_parcelas" , 10 ); + $obPDF->addCampo ( "situacao" , 10 ); + $obPDF->setAlinhamento ( "R" ); + $obPDF->addCampo ( "valor_parcelamento" , 10 ); + + #===================================== Motivo cancelamento + if ( $rsListaCobrancas->getCampo("situacao") == 'Cancelada' ) { + + $arIVTotaisLancamentos[] = array ( + "label" => "Totais:" + , "total_lancado" => $flIVTotalLancado + , "total_atualizado" => $flIVTotalAtualizado ); - - $arCobrancaAtual[] = array( - "descricao_modalidade" => substr($rsListaCobrancas->getCampo ( "descricao_modalidade"), 40, strlen($rsListaCobrancas->getCampo("descricao_modalidade"))) - - , "nomcgm_usuario" => substr($rsListaCobrancas->getCampo( "nomcgm_usuario"), 22, strlen($rsListaCobrancas->getCampo("descricao_modalidade"))) + + $arCancelada = array(); + $arCancelada[] = array( + "usuario" => $rsListaCobrancas->getCampo("usuario_cancelamento"), + "data" => $rsListaCobrancas->getCampo("data_cancelamento"), + ); + + $rsCanceladas = new RecordSet; + $rsCanceladas->preenche( $arCancelada ); + + $obPDF->addRecordSet($rsCanceladas); + $obPDF->setQuebraPaginaLista( false ); + + $obPDF->setAlinhamento ( "L" ); + $obPDF->addCabecalho ( "Usuário Responsável" ,40 , 11, "B" ); + $obPDF->setAlinhamento ( "C" ); + $obPDF->addCabecalho ( "Data Cancelamento" ,30 , 11, "B" ); + + $obPDF->setAlinhamento ( "L" ); + $obPDF->addCampo ( "usuario", 10 ); + $obPDF->setAlinhamento ( "C" ); + $obPDF->addCampo ( "data" , 10 ); + + $arCancelada = array(); + $stTemp = $rsListaCobrancas->getCampo("motivo_cancelamento"); + + for ( $x=0; $x $stTemp2 + ); + } + + $rsCanceladas = new RecordSet; + $rsCanceladas->preenche( $arCancelada ); + + $obPDF->addRecordSet($rsCanceladas); + $obPDF->setQuebraPaginaLista( false ); + + $obPDF->setAlinhamento ( "L" ); + $obPDF->addCabecalho ( "Motivo" ,100 , 11, "B" ); + + $obPDF->setAlinhamento ( "L" ); + $obPDF->addCampo ( "motivo" , 10 ); + } + #======================== LISTA DE INSCRICOES VINCULADAS À CADA COBRANÇA ====== + $flValorFinal = $flValorFinalRed = 0.00; + + while ( !$rsListaInscricoesVinculadas->Eof() ) { + $flValorFinal += $rsListaInscricoesVinculadas->getCampo("valor_atualizado"); + $rsListaInscricoesVinculadas->proximo(); + } + + $rsListaInscricoesVinculadas->setPrimeiroElemento(); + $flValorFinalRed = $flValorFinal - $rsListaInscricoesVinculadas->getCampo("valor_reducao"); + + while ( !$rsListaInscricoesVinculadas->Eof() ) { + if ( $flValorFinal > 0 and $rsListaInscricoesVinculadas->getCampo('valor_reducao') > 0 ) { + $flValorTMP = ($rsListaInscricoesVinculadas->getCampo("valor_atualizado")*100) / $flValorFinal; + $flValorTMP = ($flValorTMP*$flValorFinalRed) / 100; + $rsListaInscricoesVinculadas->setCampo( "valor_atualizado", $flValorTMP ); + } + $rsListaInscricoesVinculadas->proximo(); + } + $rsListaInscricoesVinculadas->setPrimeiroElemento(); + + if ( $rsListaInscricoesVinculadas->getNumLinhas() > 0 ) { + + $flIVTotalLancado = $flIVTotalAtualizado = 0.00; + while ( !$rsListaInscricoesVinculadas->eof() ) { + $flIVTotalLancado += $rsListaInscricoesVinculadas->getCampo ( "valor_lancado" ); + $flIVTotalAtualizado += $rsListaInscricoesVinculadas->getCampo ( "valor_atualizado" ); + $rsListaInscricoesVinculadas->proximo(); + } + $arIVTotaisLancamentos[] = array ( + "label" => "Totais:" + , "total_lancado" => $flIVTotalLancado + , "total_atualizado" => $flIVTotalAtualizado ); - $rsCobrancaAtual = new RecordSet; - $rsCobrancaAtual->preenche ( $arCobrancaAtual ); - $obPDF->addRecordSet($rsCobrancaAtual); -//sistemaLegado::mostravar($rsCobrancaAtual);exit; + + $arTituloCabecalho = null; + $arTituloCabecalho[] = Array ( + "LabelTitulo" => "Lista de Inscrições Vinculadas" + ); + $rsTituloCabecalho = new RecordSet; + $rsTituloCabecalho->preenche ( $arTituloCabecalho ); + $obPDF->addRecordSet ( $rsTituloCabecalho ); $obPDF->setQuebraPaginaLista( false ); - - $obPDF->setAlinhamento ( "C" ); - $obPDF->addCabecalho ( "Cobrança" ,8 , 11, "B" ); + $obPDF->addCabecalho ( "" ,5, 11, "B" ); + $obPDF->addCabecalho ( "" ,80, 11, "B" ); $obPDF->setAlinhamento ( "L" ); - $obPDF->addCabecalho ( "Modalidade" ,28 , 11, "B" ); + $obPDF->addCampo ( "" ,12 ); + $obPDF->addCampo ( "LabelTitulo" , 12, "B"); + + $rsListaInscricoesVinculadas->addFormatacao ('valor_lancado', 'NUMERIC_BR'); + $rsListaInscricoesVinculadas->addFormatacao ('valor_atualizado', 'NUMERIC_BR'); + $rsListaInscricoesVinculadas->setPrimeiroElemento(); + + $rsListaInscricoesVinculadas->setPrimeiroElemento(); + $obPDF->addRecordSet($rsListaInscricoesVinculadas); + $obPDF->setQuebraPaginaLista( false ); $obPDF->setAlinhamento ( "C" ); - $obPDF->addCabecalho ( "Data" ,9 , 11, "B" ); - $obPDF->addCabecalho ( "Usuário" ,24, 11, "B" ); - $obPDF->addCabecalho ( "Parcelas" , 7, 11, "B" ); - $obPDF->addCabecalho ( "Situação" ,11, 11, "B" ); - $obPDF->addCabecalho ( "Valor (R$)" ,13, 11, "B" ); - + $obPDF->addCabecalho ( "" , 5 , 10, "B" ); $obPDF->setAlinhamento ( "C" ); - $obPDF->addCampo ( "numero_parcelamento" , 10); + $obPDF->addCabecalho ( "Inscrição Dívida" ,15 , 10, "B" ); $obPDF->setAlinhamento ( "L" ); - $obPDF->addCampo ( "[cod_modalidade] - [descricao_modalidade]", 10 ); + $obPDF->addCabecalho ( "Origem" ,15 , 10, "B" ); $obPDF->setAlinhamento ( "C" ); - $obPDF->addCampo ( "dt_parcelamento" , 10 ); - + $obPDF->addCabecalho ( "Parcelas" ,9 , 10, "B" ); + $obPDF->setAlinhamento ( "R" ); + $obPDF->addCabecalho ( "Valor Original (R$)" ,15 , 10, "B" ); + $obPDF->addCabecalho ( "Valor Cobrança (R$)" ,15 , 10, "B" ); + + $obPDF->setAlinhamento ( "C" ); + $obPDF->addCampo ( "", 9 ); + $obPDF->addCampo ( "[cod_inscricao] / [exercicio]" , 9); $obPDF->setAlinhamento ( "L" ); - $obPDF->addCampo ( "[numcgm_usuario] - [nomcgm_usuario]" , 10 ); - + $obPDF->addCampo ( "origem", 9 ); $obPDF->setAlinhamento ( "C" ); - $obPDF->addCampo ( "qtd_parcelas" , 10 ); - $obPDF->addCampo ( "situacao" , 10 ); + $obPDF->addCampo ( "total_parcelas" , 9 ); $obPDF->setAlinhamento ( "R" ); - $obPDF->addCampo ( "valor_parcelamento" , 10 ); - - #===================================== Motivo cancelamento - if ( $rsListaCobrancas->getCampo("situacao") == 'Cancelada' ) { - - $arIVTotaisLancamentos[] = array ( - "label" => "Totais:" - , "total_lancado" => $flIVTotalLancado - , "total_atualizado" => $flIVTotalAtualizado - ); - - $arCancelada = array(); - $arCancelada[] = array( - "usuario" => $rsListaCobrancas->getCampo("usuario_cancelamento"), - "data" => $rsListaCobrancas->getCampo("data_cancelamento"), - ); + $obPDF->addCampo ( "valor_lancado" , 9 ); + $obPDF->addCampo ( "valor_atualizado" , 9 ); + + $rsTotais = new RecordSet; + $rsTotais->preenche ( $arIVTotaisLancamentos ); + + $obPDF->addRecordSet( $rsTotais); + $obPDF->setQuebraPaginaLista( false ); + $obPDF->setAlinhamento ( "R" ); + $obPDF->addCabecalho ( $rsTotais->getCampo('label') ,44, 10, "B" ); + $obPDF->addCabecalho ( number_format($rsTotais->getCampo('total_lancado'),2,',','.'),15, 10, "B"); + $obPDF->addCabecalho (number_format($rsTotais->getCampo('total_atualizado'),2,',','.'),15,10,"B"); + $obPDF->addCampo ( "" , 10, "B"); + $obPDF->addCampo ( "" , 10, "B"); + $obPDF->addCampo ( "" , 10, "B"); + + } - $rsCanceladas = new RecordSet; - $rsCanceladas->preenche( $arCancelada ); +#======================== FIM LISTA DE INSCRICOES VINCULADAS À CADA COBRANÇA === + + if ( $rsListaParcelas->getNumLinhas() > 0 ) { - $obPDF->addRecordSet($rsCanceladas); + $arTituloCabecalho = null; + $arTituloCabecalho[] = Array ( + "LabelTitulo" => " Lista de Parcelas" + ); + $rsTituloCabecalho = new RecordSet; + $rsTituloCabecalho->preenche ( $arTituloCabecalho ); + $obPDF->addRecordSet ( $rsTituloCabecalho ); $obPDF->setQuebraPaginaLista( false ); - + $obPDF->addCabecalho ( "" ,5, 11, "B" ); + $obPDF->addCabecalho ( "" ,80, 11, "B" ); $obPDF->setAlinhamento ( "L" ); - $obPDF->addCabecalho ( "Usuário Responsável" ,40 , 11, "B" ); - $obPDF->setAlinhamento ( "C" ); - $obPDF->addCabecalho ( "Data Cancelamento" ,30 , 11, "B" ); + $obPDF->addCampo ( "" ,12 ); + $obPDF->addCampo ( "LabelTitulo" , 12, "B"); - $obPDF->setAlinhamento ( "L" ); - $obPDF->addCampo ( "usuario", 10 ); + $obPDF->addRecordSet($rsListaParcelas); + $obPDF->setQuebraPaginaLista( false ); $obPDF->setAlinhamento ( "C" ); - $obPDF->addCampo ( "data" , 10 ); - - $arCancelada = array(); - $stTemp = $rsListaCobrancas->getCampo("motivo_cancelamento"); - - for ( $x=0; $x $stTemp2 - ); - } - - $rsCanceladas = new RecordSet; - $rsCanceladas->preenche( $arCancelada ); + $obPDF->addCabecalho ( "" , 5 , 10, "B" ); + $obPDF->addCabecalho ( "Numeração" ,18 , 10, "B" ); + $obPDF->addCabecalho ( "Numeração Migrada" ,18 , 10, "B" ); + $obPDF->setAlinhamento ( "C" ); + $obPDF->addCabecalho ( "Parcela" ,8 , 10, "B" ); + $obPDF->setAlinhamento ( "C" ); + $obPDF->addCabecalho ( "Valor (R$)" ,15 , 10, "B" ); + $obPDF->addCabecalho ( "Vencimento" ,10 , 10, "B" ); + $obPDF->addCabecalho ( "Situação" ,15 , 10, "B" ); - $obPDF->addRecordSet($rsCanceladas); - $obPDF->setQuebraPaginaLista( false ); + $obPDF->setAlinhamento ( "C" ); + $obPDF->addCampo ( "", 9 ); + $obPDF->addCampo ( "[numeracao] / [exercicio]" , 9); + $obPDF->addCampo ( "[numeracao_migracao] / [prefixo]", 9 ); + $obPDF->addCampo ( "[num_parcela] / [total_de_parcelas]" , 9 ); + $obPDF->setAlinhamento ( "R" ); + $obPDF->addCampo ( "vlr_parcela" , 9 ); + $obPDF->setAlinhamento ( "C" ); + $obPDF->addCampo ( "vencimento" , 9 ); + $obPDF->addCampo ( "situacao" , 9 ); - $obPDF->setAlinhamento ( "L" ); - $obPDF->addCabecalho ( "Motivo" ,100 , 11, "B" ); + } - $obPDF->setAlinhamento ( "L" ); - $obPDF->addCampo ( "motivo" , 10 ); + $rsListaCobrancas->proximo(); } - #======================== LISTA DE INSCRICOES VINCULADAS À CADA COBRANÇA ====== - $stFiltro = ""; - $obTDATDividaAtiva->setDado( 'data_base', $arrInformacoes['dtDataBase_br'] ); - $stFiltro = " AND inscricao.num_parcelamento = ".$rsListaCobrancas->getCampo ("num_parcelamento"); - $obTDATDividaAtiva->listaConsultaInscricoesSimples( $rsListaInscricoesVinculadas, $stFiltro ); - - $flValorFinal = $flValorFinalRed = 0.00; - - while ( !$rsListaInscricoesVinculadas->Eof() ) { - $flValorFinal += $rsListaInscricoesVinculadas->getCampo("valor_atualizado"); - $rsListaInscricoesVinculadas->proximo(); - } - - $rsListaInscricoesVinculadas->setPrimeiroElemento(); - $flValorFinalRed = $flValorFinal - $rsListaInscricoesVinculadas->getCampo("valor_reducao"); - - while ( !$rsListaInscricoesVinculadas->Eof() ) { - if ( $flValorFinal > 0 and $rsListaInscricoesVinculadas->getCampo('valor_reducao') > 0 ) { - $flValorTMP = ($rsListaInscricoesVinculadas->getCampo("valor_atualizado")*100) / $flValorFinal; - $flValorTMP = ($flValorTMP*$flValorFinalRed) / 100; - $rsListaInscricoesVinculadas->setCampo( "valor_atualizado", $flValorTMP ); - } - $rsListaInscricoesVinculadas->proximo(); - } - $rsListaInscricoesVinculadas->setPrimeiroElemento(); - - if ( $rsListaInscricoesVinculadas->getNumLinhas() > 0 ) { - - $flIVTotalLancado = $flIVTotalAtualizado = 0.00; - while ( !$rsListaInscricoesVinculadas->eof() ) { - $flIVTotalLancado += $rsListaInscricoesVinculadas->getCampo ( "valor_lancado" ); - $flIVTotalAtualizado += $rsListaInscricoesVinculadas->getCampo ( "valor_atualizado" ); - $rsListaInscricoesVinculadas->proximo(); - } - $arIVTotaisLancamentos[] = array ( - "label" => "Totais:" - , "total_lancado" => $flIVTotalLancado - , "total_atualizado" => $flIVTotalAtualizado - ); - - $arTituloCabecalho = null; - $arTituloCabecalho[] = Array ( - "LabelTitulo" => "Lista de Inscrições Vinculadas" - ); - $rsTituloCabecalho = new RecordSet; - $rsTituloCabecalho->preenche ( $arTituloCabecalho ); - $obPDF->addRecordSet ( $rsTituloCabecalho ); - $obPDF->setQuebraPaginaLista( false ); - $obPDF->addCabecalho ( "" ,5, 11, "B" ); - $obPDF->addCabecalho ( "" ,80, 11, "B" ); - $obPDF->setAlinhamento ( "L" ); - $obPDF->addCampo ( "" ,12 ); - $obPDF->addCampo ( "LabelTitulo" , 12, "B"); - - $rsListaInscricoesVinculadas->addFormatacao ('valor_lancado', 'NUMERIC_BR'); - $rsListaInscricoesVinculadas->addFormatacao ('valor_atualizado', 'NUMERIC_BR'); - $rsListaInscricoesVinculadas->setPrimeiroElemento(); - - $rsListaInscricoesVinculadas->setPrimeiroElemento(); - $obPDF->addRecordSet($rsListaInscricoesVinculadas); - $obPDF->setQuebraPaginaLista( false ); - #$obPDF->setTitulo ( "ESTA EH A LISTA DO SONIC" ); - $obPDF->setAlinhamento ( "C" ); - $obPDF->addCabecalho ( "" , 5 , 10, "B" ); - $obPDF->setAlinhamento ( "C" ); - $obPDF->addCabecalho ( "Inscrição Dívida" ,15 , 10, "B" ); - $obPDF->setAlinhamento ( "L" ); - $obPDF->addCabecalho ( "Origem" ,15 , 10, "B" ); - $obPDF->setAlinhamento ( "C" ); - $obPDF->addCabecalho ( "Parcelas" ,9 , 10, "B" ); - $obPDF->setAlinhamento ( "R" ); - $obPDF->addCabecalho ( "Valor Original (R$)" ,15 , 10, "B" ); - $obPDF->addCabecalho ( "Valor Cobrança (R$)" ,15 , 10, "B" ); - - $obPDF->setAlinhamento ( "C" ); - $obPDF->addCampo ( "", 9 ); - $obPDF->addCampo ( "[cod_inscricao] / [exercicio]" , 9); - $obPDF->setAlinhamento ( "L" ); - $obPDF->addCampo ( "origem", 9 ); - $obPDF->setAlinhamento ( "C" ); - $obPDF->addCampo ( "total_parcelas" , 9 ); - $obPDF->setAlinhamento ( "R" ); - $obPDF->addCampo ( "valor_lancado" , 9 ); - $obPDF->addCampo ( "valor_atualizado" , 9 ); - - $rsTotais = new RecordSet; - $rsTotais->preenche ( $arIVTotaisLancamentos ); - - $obPDF->addRecordSet( $rsTotais); - $obPDF->setQuebraPaginaLista( false ); - $obPDF->setAlinhamento ( "R" ); - $obPDF->addCabecalho ( $rsTotais->getCampo('label') ,44, 10, "B" ); - $obPDF->addCabecalho ( number_format($rsTotais->getCampo('total_lancado'),2,',','.'),15, 10, "B"); - $obPDF->addCabecalho (number_format($rsTotais->getCampo('total_atualizado'),2,',','.'),15,10,"B"); - $obPDF->addCampo ( "" , 10, "B"); - $obPDF->addCampo ( "" , 10, "B"); - $obPDF->addCampo ( "" , 10, "B"); - - } - #======================== FIM LISTA DE INSCRICOES VINCULADAS À CADA COBRANÇA === - - $stFiltro = " AND dp.num_parcelamento = ".$rsListaCobrancas->getCampo ("num_parcelamento"); - $stFiltro .=" ORDER BY num_parcela ASC "; - $obTDATDividaAtiva->ListaConsultaParcelas( $rsListaParcelas, $stFiltro ); - if ( $rsListaParcelas->getNumLinhas() > 0 ) { - - $arTituloCabecalho = null; - $arTituloCabecalho[] = Array ( - "LabelTitulo" => " Lista de Parcelas" - ); - $rsTituloCabecalho = new RecordSet; - $rsTituloCabecalho->preenche ( $arTituloCabecalho ); - $obPDF->addRecordSet ( $rsTituloCabecalho ); - $obPDF->setQuebraPaginaLista( false ); - $obPDF->addCabecalho ( "" ,5, 11, "B" ); - $obPDF->addCabecalho ( "" ,80, 11, "B" ); - $obPDF->setAlinhamento ( "L" ); - $obPDF->addCampo ( "" ,12 ); - $obPDF->addCampo ( "LabelTitulo" , 12, "B"); - - $obPDF->addRecordSet($rsListaParcelas); - $obPDF->setQuebraPaginaLista( false ); - #$obPDF->setTitulo ( "ESTA EH A LISTA DO SONIC" ); - $obPDF->setAlinhamento ( "C" ); - $obPDF->addCabecalho ( "" , 5 , 10, "B" ); - $obPDF->addCabecalho ( "Numeração" ,18 , 10, "B" ); - $obPDF->addCabecalho ( "Numeração Migrada" ,18 , 10, "B" ); - $obPDF->setAlinhamento ( "C" ); - $obPDF->addCabecalho ( "Parcela" ,8 , 10, "B" ); - $obPDF->setAlinhamento ( "C" ); - $obPDF->addCabecalho ( "Valor (R$)" ,15 , 10, "B" ); - $obPDF->addCabecalho ( "Vencimento" ,10 , 10, "B" ); - $obPDF->addCabecalho ( "Situação" ,15 , 10, "B" ); - - $obPDF->setAlinhamento ( "C" ); - $obPDF->addCampo ( "", 9 ); - $obPDF->addCampo ( "[numeracao] / [exercicio]" , 9); - $obPDF->addCampo ( "[numeracao_migracao] / [prefixo]", 9 ); - $obPDF->addCampo ( "[num_parcela] / [total_de_parcelas]" , 9 ); - $obPDF->setAlinhamento ( "R" ); - $obPDF->addCampo ( "vlr_parcela" , 9 ); - $obPDF->setAlinhamento ( "C" ); - $obPDF->addCampo ( "vencimento" , 9 ); - $obPDF->addCampo ( "situacao" , 9 ); - - } - - $rsListaCobrancas->proximo(); - } #========================== FIM LISTA DE COBRANÇAS ======== $obPDF->show(); -?> + +?> \ No newline at end of file diff --git a/gestaoTributaria/fontes/PHP/dividaAtiva/instancias/consultas/OCRelatorioConsultaDivida.php b/gestaoTributaria/fontes/PHP/dividaAtiva/instancias/consultas/OCRelatorioConsultaDivida.php new file mode 100644 index 0000000..18cea37 --- /dev/null +++ b/gestaoTributaria/fontes/PHP/dividaAtiva/instancias/consultas/OCRelatorioConsultaDivida.php @@ -0,0 +1,108 @@ + +setDado('data_base', $arrInformacoes['dtDataBase_br'] ); + +$stFiltroLancamentos = "WHERE inscricao.cod_inscricao = ".$arrInformacoes["inCodInscricao"]; +$stFiltroLancamentos .=" AND inscricao.exercicio = '".$arrInformacoes["inExercicio"]."'"; +$obTDATDividaAtiva->listaConsultaLancamentosSimples( $rsListaLancamentos , $stFiltroLancamentos ); + +$stFiltro = ""; +if ($arrInformacoes["inCodInscricao"] && $arrInformacoes["inExercicio"]) { + $stFiltro = " WHERE ddp.cod_inscricao = ".$arrInformacoes["inCodInscricao"]." AND ddp.exercicio = '".$arrInformacoes["inExercicio"]."'"; +} +$obTDATDividaAtiva->ListaConsultaCobrancas( $rsListaCobrancas, $stFiltro, $boTransacao ); + +$rsListaParcelas = new Recordset; +if($rsListaCobrancas->getNumlinhas() > 0) { + $stFiltro = " AND dp.num_parcelamento = ".$rsListaCobrancas->getCampo("num_parcelamento"); + $stFiltro .=" ORDER BY num_parcela ASC "; + $obTDATDividaAtiva->ListaConsultaParcelas( $rsListaParcelas, $stFiltro ); +} + +$stFiltro = ""; +$obTDATDividaAtiva->setDado( 'data_base', $arrInformacoes['dtDataBase_br'] ); +$stFiltro = " AND inscricao.num_parcelamento = ".$rsListaCobrancas->getCampo ("num_parcelamento"); +$obTDATDividaAtiva->listaConsultaInscricoesSimples( $rsListaInscricoesVinculadas, $stFiltro ); + +Sessao::write('arrInformacoes', $arrInformacoes); +Sessao::write('rsListaLancamentos', $rsListaLancamentos); +Sessao::write('rsListaCobrancas', $rsListaCobrancas); +Sessao::write('rsListaParcelas', $rsListaParcelas); +Sessao::write('rsListaInscricoesVinculadas', $rsListaInscricoesVinculadas); + +$obRRelatorio = new RRelatorio; +$obRRelatorio->executaFrameOculto( "OCGeraRelatorioConsultaDivida.php" ); + +?> diff --git a/gestaoTributaria/fontes/PHP/dividaAtiva/instancias/inscricao/PREstornarInscricao.php b/gestaoTributaria/fontes/PHP/dividaAtiva/instancias/inscricao/PREstornarInscricao.php index a18b6c6..8eb4226 100644 --- a/gestaoTributaria/fontes/PHP/dividaAtiva/instancias/inscricao/PREstornarInscricao.php +++ b/gestaoTributaria/fontes/PHP/dividaAtiva/instancias/inscricao/PREstornarInscricao.php @@ -32,7 +32,7 @@ * @author Desenvolvedor: Fernando Piccini Cercato * @ignore - * $Id: PREstornarInscricao.php 59612 2014-09-02 12:00:51Z gelson $ + * $Id: PREstornarInscricao.php 63839 2015-10-22 18:08:07Z franver $ *Casos de uso: uc-05.04.02 @@ -78,7 +78,6 @@ if ( empty( $_REQUEST['stAcao'] ) ) { //Define o nome dos arquivos PHP $pgForm = "FMEstornarInscricao.php"; -#sistemaLegado::mostravar( $_REQUEST ); Sessao::remove('link'); Sessao::remove('stLink'); @@ -98,7 +97,6 @@ if ( !$rsInscricao->Eof() ) { SistemaLegado::alertaAviso( $pgForm."?".Sessao::getId()."&stAcao=".$_REQUEST['stAcao'], "Inscrição de Dívida Ativa (".$inCodInscricao.") já estava cancelada.", "n_erro", "erro", Sessao::getId(), "../" ); exit; } -#sistemaLegado::mostravar($rsInscricao); $obTDATDividaEstorno = new TDATDividaEstorno; $obTDATDividaEstorno->recuperaTodos( $rsInscricao, $stFiltro ); @@ -139,11 +137,9 @@ $stFiltro = " WHERE cod_inscricao = ".$inCodInscricao." AND exercicio = '".$inEx $obTDATDividaParcelamento = new TDATDividaParcelamento; $obTDATDividaParcelamento->recuperaTodos( $rsListaNumeracao, $stFiltro, " num_parcelamento ASC LIMIT 1 " ); $inNumeroParcelamento = $rsListaNumeracao->getCampo( "num_parcelamento" ); -#sistemaLegado::mostravar( $rsListaNumeracao); $obTDATDividaParcelamento->recuperaTodos( $rsListaNumeracao, $stFiltro, " num_parcelamento DESC LIMIT 1 " ); $inNumeroUltimoParcelamento = $rsListaNumeracao->getCampo( "num_parcelamento" ); -#sistemaLegado::mostravar( $rsListaNumeracao); $stFiltraParcelas = " WHERE num_parcelamento = ".$inNumeroUltimoParcelamento." AND paga = FALSE AND cancelada = FALSE "; $obTDATDividaParcela = new TDATDividaParcela; diff --git a/gestaoTributaria/fontes/PHP/dividaAtiva/instancias/relatorios/FLRelatorioPagadores.php b/gestaoTributaria/fontes/PHP/dividaAtiva/instancias/relatorios/FLRelatorioPagadores.php new file mode 100644 index 0000000..aad46a0 --- /dev/null +++ b/gestaoTributaria/fontes/PHP/dividaAtiva/instancias/relatorios/FLRelatorioPagadores.php @@ -0,0 +1,86 @@ + +get('stAcao'); +if ( empty( $stAcao ) ) { + $stAcao = "alterar"; +} +$obHdnAcao = new Hidden; +$obHdnAcao->setName ( "stAcao" ); +$obHdnAcao->setValue ( $stAcao ); + +$obRdbGrupo = new Radio; +$obRdbGrupo->setRotulo ( "Filtrar por" ); +$obRdbGrupo->setName ( "stFiltro" ); +$obRdbGrupo->setLabel ( "Grupo de Créditos" ); +$obRdbGrupo->setValue ( "grupo" ); +$obRdbGrupo->setNull ( false ); +$obRdbGrupo->setChecked ( false ); + +$obRdbCredito = new Radio; +$obRdbCredito->setTitle ( "Informe a forma de cálculo a ser utilizada." ); +$obRdbCredito->setRotulo ( "Filtrar por" ); +$obRdbCredito->setName ( "stFiltro" ); +$obRdbCredito->setLabel ( "Crédito" ); +$obRdbCredito->setValue ( "credito" ); +$obRdbCredito->setNull ( false ); +$obRdbCredito->setChecked ( true ); + +//DEFINICAO DOS COMPONENTES +$obForm = new Form; +$obForm->setAction ( $pgForm ); +$obForm->setTarget ( "telaPrincipal" ); + +//DEFINICAO DO FORMULARIO +$obFormulario = new Formulario; +$obFormulario->addForm ( $obForm ); +$obFormulario->addHidden ( $obHdnAcao ); +$obFormulario->addTitulo ( "Filtro para o Relatório" ); +$obFormulario->agrupaComponentes ( array( $obRdbCredito, $obRdbGrupo) ); + +$obFormulario->Ok(); +$obFormulario->show(); + +?> \ No newline at end of file diff --git a/gestaoTributaria/fontes/PHP/dividaAtiva/instancias/relatorios/FMRelatorioPagadores.php b/gestaoTributaria/fontes/PHP/dividaAtiva/instancias/relatorios/FMRelatorioPagadores.php new file mode 100644 index 0000000..71ded0c --- /dev/null +++ b/gestaoTributaria/fontes/PHP/dividaAtiva/instancias/relatorios/FMRelatorioPagadores.php @@ -0,0 +1,198 @@ + +setName ( "stAcao" ); +$obHdnAcao->setValue ( $_REQUEST['stAcao'] ); + +$obHdnCtrl = new Hidden; +$obHdnCtrl->setName ( "stCtrl" ); +$obHdnCtrl->setValue ( '' ); + +$obHdnFiltro = new Hidden; +$obHdnFiltro->setName ( "stFiltro" ); +$obHdnFiltro->setValue ( $_REQUEST['stFiltro'] ); + +if($_REQUEST['stFiltro'] == 'credito') { + $obRMONCredito = new RMONCredito; + $obRMONCredito->consultarMascaraCredito(); + $stMascaraCredito = $obRMONCredito->getMascaraCredito(); + $obRARRConfiguracao = new RARRConfiguracao; + $obRARRConfiguracao->setAnoExercicio ( Sessao::getExercicio() ); + $obRARRConfiguracao->consultarMascaraProcesso( $stMascaraProcesso ); + + //DEFINICAO DOS COMPONENTES + $obTxtExercicio = new TextBox; + $obTxtExercicio->setName ( "stExercicio" ); + $obTxtExercicio->setId ( "stExercicio" ); + $obTxtExercicio->setRotulo ( "Exercício" ); + $obTxtExercicio->setTitle ( "Informe o exercício para filtro" ); + $obTxtExercicio->setSize ( 4 ); + $obTxtExercicio->setMaxLength ( 4 ); + $obTxtExercicio->setNull ( true ); + + $obBscCredito = new BuscaInner; + $obBscCredito->setRotulo ( "Crédito" ); + $obBscCredito->setTitle ( "Crédito que será calculado." ); + $obBscCredito->setId ( "stCredito" ); + $obBscCredito->obCampoCod->setName ( "inCodCredito" ); + $obBscCredito->obCampoCod->setId ( "inCodCredito" ); + $obBscCredito->obCampoCod->setMaxLength ( strlen($stMascaraCredito) ); + $obBscCredito->obCampoCod->setMinLength ( strlen($stMascaraCredito) ); + $obBscCredito->obCampoCod->setMascara ( $stMascaraCredito ); + $obBscCredito->obCampoCod->obEvento->setOnChange("buscaValor('buscaCredito');"); + $obBscCredito->obCampoCod->obEvento->setOnBlur("validarCredito(this);"); + $obBscCredito->setFuncaoBusca( "abrePopUp('".CAM_GT_MON_POPUPS."credito/FLProcurarCredito.php','frm','inCodCredito','stCredito','todos','".Sessao::getId()."','800','550');" ); + + $obBtnIncluirCredito = new Button; + $obBtnIncluirCredito->setName ( "btnIncluirCredito" ); + $obBtnIncluirCredito->setValue ( "Incluir" ); + $obBtnIncluirCredito->setTipo ( "button" ); + $obBtnIncluirCredito->obEvento->setOnClick ( "montaParametrosGET('incluirCredito', 'inCodCredito,stExercicio', true);" ); + $obBtnIncluirCredito->setDisabled ( false ); + + $obBtnLimparCredito = new Button; + $obBtnLimparCredito->setName ( "btnLimparCredito" ); + $obBtnLimparCredito->setValue ( "Limpar" ); + $obBtnLimparCredito->setTipo ( "button" ); + $obBtnLimparCredito->obEvento->setOnClick ( "montaParametrosGET('limpaCredito');" ); + $obBtnLimparCredito->setDisabled ( false ); + $botoesCredito = array ( $obBtnIncluirCredito, $obBtnLimparCredito ); + + $obSpnListaCreditos = new Span; + $obSpnListaCreditos->setID("spnListaCreditos"); + +} else { + //DEFINICAO DOS COMPONENTES + $obIPopUpGrupoCredito = new MontaGrupoCredito; + $obIPopUpGrupoCredito->setRotulo ( "Grupo de Crédito" ); + $obIPopUpGrupoCredito->setTitulo ( "Informe o código do grupo de crédito." ); + + $obBtnIncluirGrupoCredito = new Button; + $obBtnIncluirGrupoCredito->setName ( "btnIncluirGrupoCredito" ); + $obBtnIncluirGrupoCredito->setValue ( "Incluir" ); + $obBtnIncluirGrupoCredito->setTipo ( "button" ); + $obBtnIncluirGrupoCredito->obEvento->setOnClick ( "montaParametrosGET('incluirGrupoCredito', 'inCodGrupo', true);" ); + $obBtnIncluirGrupoCredito->setDisabled ( false ); + + $obBtnLimparGrupoCredito = new Button; + $obBtnLimparGrupoCredito->setName ( "btnLimparGrupoCredito" ); + $obBtnLimparGrupoCredito->setValue ( "Limpar" ); + $obBtnLimparGrupoCredito->setTipo ( "button" ); + $obBtnLimparGrupoCredito->obEvento->setOnClick ( "montaParametrosGET('limpaGrupoCredito');" ); + $obBtnLimparGrupoCredito->setDisabled ( false ); + $botoesGrupoCredito = array ( $obBtnIncluirGrupoCredito, $obBtnLimparGrupoCredito ); + + $obSpnListaGrupos = new Span; + $obSpnListaGrupos->setID("spnListaGrupos"); +} + +//DEFINICAO DOS COMPONENTES +$obCmbLimite = new Select; +$obCmbLimite->setName ( "inLimite" ); +$obCmbLimite->setRotulo ( "N° de registros pagadores" ); +$obCmbLimite->setTitle ( "Informe o número máximo de registros por Crédito/Grupo selecionado" ); +$obCmbLimite->setOptions ( array('0' => 'Todos', + '10' => '10', + '20' => '20', + '30' => '30', + '40' => '40', + '50' => '50')); +$obCmbLimite->setValue ( '0' ); +$obCmbLimite->setNull ( true ); + +//DEFINICAO DO FORM +$obForm = new Form; +$obForm->setAction( "PRRelatorioPagadores.php" ); +$obForm->setTarget( "oculto" ); + +//DEFINICAO DO FORMULARIO +$obFormulario = new Formulario; +$obFormulario->addForm ( $obForm ); +$obFormulario->addHidden( $obHdnAcao ); +$obFormulario->addHidden( $obHdnCtrl ); +$obFormulario->addHidden( $obHdnFiltro ); + +if($_REQUEST['stFiltro'] == 'credito') { + $obFormulario->addTitulo("Dados para Filtro | Crédito"); + $obFormulario->addComponente( $obBscCredito ); + $obFormulario->addComponente($obTxtExercicio); + + $obFormulario->defineBarra ( $botoesCredito, 'left', '' ); + $obFormulario->addSpan( $obSpnListaCreditos ); + + $obFormulario->addTitulo("Limite de registros Pagadores"); + $obFormulario->addComponente($obCmbLimite); +} else { + $obFormulario->addTitulo("Dados para Filtro | Grupos de Crédito"); + + $obIPopUpGrupoCredito->geraFormulario ( $obFormulario, true, true ); + $obFormulario->defineBarra ( $botoesGrupoCredito, 'left', '' ); + $obFormulario->addSpan( $obSpnListaGrupos ); + + $obFormulario->addTitulo("Limite de registros Pagadores"); + $obFormulario->addComponente($obCmbLimite); +} + +$obBtnOK = new Ok(); +$obBtnOK->obEvento->setOnClick( "BloqueiaFrames(true, false); Salvar();" ); + +$onBtnLimpar = new Limpar; +$onBtnLimpar->obEvento->setOnClick( "Limpar();" ); + +$obFormulario->defineBarra( array( $obBtnOK , $onBtnLimpar ) ); +$obFormulario->show(); \ No newline at end of file diff --git a/gestaoTributaria/fontes/PHP/dividaAtiva/instancias/relatorios/JSRelatorioPagadores.js b/gestaoTributaria/fontes/PHP/dividaAtiva/instancias/relatorios/JSRelatorioPagadores.js new file mode 100644 index 0000000..f14ac50 --- /dev/null +++ b/gestaoTributaria/fontes/PHP/dividaAtiva/instancias/relatorios/JSRelatorioPagadores.js @@ -0,0 +1,199 @@ + + + + \ No newline at end of file diff --git a/gestaoTributaria/fontes/PHP/dividaAtiva/instancias/relatorios/OCGeraRelatorioPagadores.php b/gestaoTributaria/fontes/PHP/dividaAtiva/instancias/relatorios/OCGeraRelatorioPagadores.php new file mode 100644 index 0000000..9a6448f --- /dev/null +++ b/gestaoTributaria/fontes/PHP/dividaAtiva/instancias/relatorios/OCGeraRelatorioPagadores.php @@ -0,0 +1,51 @@ + +setDataInicio(date('d/m/Y')); +$obMPDF->setDataFinal(date('d/m/Y')); +$obMPDF->setNomeRelatorio("Relatorio de Pagadores"); + +$obMPDF->setConteudo($arDados); +$obMPDF->gerarRelatorio(); diff --git a/gestaoTributaria/fontes/PHP/dividaAtiva/instancias/relatorios/OCMonta2RelatorioDivida.php b/gestaoTributaria/fontes/PHP/dividaAtiva/instancias/relatorios/OCMonta2RelatorioDivida.php index 481ef2b..f0459f4 100644 --- a/gestaoTributaria/fontes/PHP/dividaAtiva/instancias/relatorios/OCMonta2RelatorioDivida.php +++ b/gestaoTributaria/fontes/PHP/dividaAtiva/instancias/relatorios/OCMonta2RelatorioDivida.php @@ -32,7 +32,7 @@ * @ignore - * $Id: OCMonta2RelatorioDivida.php 59612 2014-09-02 12:00:51Z gelson $ + * $Id: OCMonta2RelatorioDivida.php 63839 2015-10-22 18:08:07Z franver $ * Casos de uso: uc-05.04.10 */ @@ -114,7 +114,6 @@ while ( !$rsDadosRelatorio->eof() ) { break; } } -//sistemaLegado::mostravar($rsDadosRelatorio );exit; if ($boInserir) { for ( $inX=0; $inXgetCampo('num_parcelamento') ) { @@ -136,8 +135,6 @@ while ( !$rsDadosRelatorio->eof() ) { $inContNum++; $stFiltro = " WHERE dp.num_parcelamento = ". $rsDadosRelatorio->getCampo('num_parcelamento'); $obTDATDividaAtiva->recuperaListaDadosRelatorioDivida( $rsDadosCobranca, $stFiltro ); -//echo "num_parcelameto = ".$rsDadosRelatorio->getCampo('num_parcelamento'); -//sistemaLegado::mostravar( $rsDadosCobranca );exit; $arCobranca = array(); $nuTotalAberto = $nuTotalPago = $nuTotalCancelado = 0.00; diff --git a/gestaoTributaria/fontes/PHP/dividaAtiva/instancias/relatorios/OCRelatorioDivida.php b/gestaoTributaria/fontes/PHP/dividaAtiva/instancias/relatorios/OCRelatorioDivida.php index d24d4fa..d905b3e 100644 --- a/gestaoTributaria/fontes/PHP/dividaAtiva/instancias/relatorios/OCRelatorioDivida.php +++ b/gestaoTributaria/fontes/PHP/dividaAtiva/instancias/relatorios/OCRelatorioDivida.php @@ -29,7 +29,7 @@ * @ignore - * $Id: OCRelatorioDivida.php 60055 2014-09-26 16:08:49Z michel $ + * $Id: OCRelatorioDivida.php 63839 2015-10-22 18:08:07Z franver $ * Casos de uso: uc-05.04.10 */ @@ -195,7 +195,7 @@ function montaCredito(){ $stJs .= "d.getElementById('spnListaGrupos').innerHTML = '';"; return $stJs; } -//sistemaLegado::mostraVar($_REQUEST["stCtrl"]); + switch ($_REQUEST["stCtrl"]) { case "limpaGrupoCredito": $stJs = "f.inCodGrupo.value = '';"; diff --git a/gestaoTributaria/fontes/PHP/dividaAtiva/instancias/relatorios/OCRelatorioPagadores.php b/gestaoTributaria/fontes/PHP/dividaAtiva/instancias/relatorios/OCRelatorioPagadores.php new file mode 100644 index 0000000..e7fa8f8 --- /dev/null +++ b/gestaoTributaria/fontes/PHP/dividaAtiva/instancias/relatorios/OCRelatorioPagadores.php @@ -0,0 +1,347 @@ +setPrimeiroElemento(); + if ( !$rsLista->eof() ) { + $obLista = new Lista; + $obLista->setMostraPaginacao( false ); + $obLista->setRecordSet( $rsLista ); + + $obLista->setTitulo ("Lista de Créditos"); + + $obLista->addCabecalho(); + $obLista->ultimoCabecalho->addConteudo(" "); + $obLista->ultimoCabecalho->setWidth( 2 ); + $obLista->commitCabecalho(); + + $obLista->addCabecalho(); + $obLista->ultimoCabecalho->addConteudo("Código"); + $obLista->ultimoCabecalho->setWidth( 20 ); + $obLista->commitCabecalho(); + + $obLista->addCabecalho(); + $obLista->ultimoCabecalho->addConteudo("Exercício"); + $obLista->ultimoCabecalho->setWidth( 10 ); + $obLista->commitCabecalho(); + + $obLista->addCabecalho(); + $obLista->ultimoCabecalho->addConteudo( "Descrição" ); + $obLista->ultimoCabecalho->setWidth( 70 ); + $obLista->commitCabecalho(); + + $obLista->addCabecalho(); + $obLista->ultimoCabecalho->addConteudo(" "); + $obLista->ultimoCabecalho->setWidth( 2 ); + $obLista->commitCabecalho(); + + $obLista->addDado(); + $obLista->ultimoDado->setCampo( "stCodCredito" ); + $obLista->commitDado(); + + $obLista->addDado(); + $obLista->ultimoDado->setCampo( "stExercicio" ); + $obLista->commitDado(); + + $obLista->addDado(); + $obLista->ultimoDado->setCampo( "stCreditoDescricao" ); + $obLista->commitDado(); + + $obLista->addAcao(); + $obLista->ultimaAcao->setAcao( "EXCLUIR" ); + $obLista->ultimaAcao->setFuncao( true ); + $obLista->ultimaAcao->addCampo( "1", "stCodCredito" ); + $obLista->ultimaAcao->setLink( "javascript:excluirCredito();" ); + $obLista->commitAcao(); + + $obLista->montaHTML(); + $stHTML = $obLista->getHTML(); + $stHTML = str_replace("\n","",$stHTML); + $stHTML = str_replace(" ","",$stHTML); + $stHTML = str_replace("'","\\'",$stHTML); + } else { + $stHTML = " "; + } + + $stJs = "jq('#spnListaCreditos').html('".$stHTML."'); "; + + return $stJs; +} + + +function montaListaGrupoCredito(&$rsLista) +{ + $rsLista->setPrimeiroElemento(); + if ( !$rsLista->eof() ) { + $obLista = new Lista; + $obLista->setMostraPaginacao( false ); + $obLista->setRecordSet( $rsLista ); + + $obLista->setTitulo ("Lista de Grupos de Créditos"); + + $obLista->addCabecalho(); + $obLista->ultimoCabecalho->addConteudo(" "); + $obLista->ultimoCabecalho->setWidth( 2 ); + $obLista->commitCabecalho(); + + $obLista->addCabecalho(); + $obLista->ultimoCabecalho->addConteudo("Código"); + $obLista->ultimoCabecalho->setWidth( 20 ); + $obLista->commitCabecalho(); + + $obLista->addCabecalho(); + $obLista->ultimoCabecalho->addConteudo( "Descrição" ); + $obLista->ultimoCabecalho->setWidth( 80 ); + $obLista->commitCabecalho(); + + $obLista->addCabecalho(); + $obLista->ultimoCabecalho->addConteudo(" "); + $obLista->ultimoCabecalho->setWidth( 2 ); + $obLista->commitCabecalho(); + + $obLista->addDado(); + $obLista->ultimoDado->setCampo( "stCodGrupo" ); + $obLista->commitDado(); + + $obLista->addDado(); + $obLista->ultimoDado->setCampo( "stGrupoDescricao" ); + $obLista->commitDado(); + + $obLista->addAcao(); + $obLista->ultimaAcao->setAcao( "EXCLUIR" ); + $obLista->ultimaAcao->setFuncao( true ); + $obLista->ultimaAcao->addCampo( "1", "stCodGrupo" ); + $obLista->ultimaAcao->setLink( "javascript:excluirGrupoCredito();" ); + $obLista->commitAcao(); + + $obLista->montaHTML(); + $stHTML = $obLista->getHTML(); + $stHTML = str_replace("\n","",$stHTML); + $stHTML = str_replace(" ","",$stHTML); + $stHTML = str_replace("'","\\'",$stHTML); + } else { + $stHTML = " "; + } + + $stJs = "jq('#spnListaGrupos').html('".$stHTML."'); \n"; + + return $stJs; +} + +switch ($request->get("stCtrl")) { + case "limpaCredito": + $stJs = "jq('#stCredito').html(' '); \n"; + $stJs .= "jq('#inCodCredito').val(''); \n"; + $stJs .= "jq('#stExercicio').val(''); \n"; + echo $stJs; + break; + + case "limpaGrupoCredito": + $stJs = "jq('#inCodGrupo').val(''); \n"; + $stJs .= "jq('#stGrupo').html(' '); \n"; + $stJs .= "jq('#inCodGrupo').val(''); \n"; + echo $stJs; + break; + + case "limpaGeral": + Sessao::write( "arListaGrupoCredito", array()); + Sessao::write( "arListaCredito", array()); + break; + + case "excluirGrupoCredito": + if ($request->get("inIndice1")) { + $arListaGrupoCreditoSessao = Sessao::read( "arListaGrupoCredito" ); + $arListaGrupoCreditoTMP = array(); + $inTotalDados = count( $arListaGrupoCreditoSessao ); + for ($inX=0; $inX<$inTotalDados; $inX++) { + if ($arListaGrupoCreditoSessao[$inX]["stCodGrupo"] != $_GET["inIndice1"]) { + $arListaGrupoCreditoTMP[] = $arListaGrupoCreditoSessao[$inX]; + } + } + + Sessao::write( "arListaGrupoCredito", $arListaGrupoCreditoTMP ); + + $rsListaGrupoCredito = new RecordSet; + $rsListaGrupoCredito->preenche( $arListaGrupoCreditoTMP ); + + $stJs = montaListaGrupoCredito( $rsListaGrupoCredito ); + sistemaLegado::executaFrameOculto( $stJs ); + } + break; + + case "incluirGrupoCredito": + if ($_GET["inCodGrupo"]) { + $arListaGrupoCreditoSessao = Sessao::read( "arListaGrupoCredito" ); + $boIncluir = true; + $inTotalDados = count( $arListaGrupoCreditoSessao ); + for ($inX=0; $inX<$inTotalDados; $inX++) { + if ($arListaGrupoCreditoSessao[$inX]["stCodGrupo"] == $_GET["inCodGrupo"]) { + $boIncluir = false; + break; + } + } + + if ($boIncluir) { + $arDados = explode( "/", $_GET["inCodGrupo"] ); + $obRARRGrupo = new RARRGrupo; + $obRARRGrupo->setCodGrupo( $arDados[0] ); + $obRARRGrupo->setExercicio( $arDados[1] ); + $obRARRGrupo->consultarGrupo(); + $arListaGrupoCreditoSessao[$inTotalDados]["stCodGrupo"] = $_GET["inCodGrupo"]; + $arListaGrupoCreditoSessao[$inTotalDados]["stGrupoDescricao"] = $obRARRGrupo->getDescricao(); + + Sessao::write( "arListaGrupoCredito", $arListaGrupoCreditoSessao ); + + $rsListaGrupoCredito = new RecordSet; + $rsListaGrupoCredito->preenche( $arListaGrupoCreditoSessao ); + + $stJs = montaListaGrupoCredito( $rsListaGrupoCredito ); + $stJs .= "jq('#inCodGrupo').val('');"; + $stJs .= "jq('#stGrupo').html(' '); "; + } else { + $stJs = "alertaAviso('@Grupo de crédito já está na lista. (".$request->get('inCodGrupo').")','form','erro','".Sessao::getId()."');"; + $stJs .= "jq('#inCodGrupo').val('');"; + $stJs .= "jq('#stGrupo').html(' '); "; + } + echo $stJs; + } + break; + + case "buscaCredito": + $inCodCreditoComposto = explode('.',$request->get("inCodCredito")); + + $obRARRGrupo = new RARRGrupo; + $obRARRGrupo->obRMONCredito->setCodCredito ($inCodCreditoComposto[0]); + $obRARRGrupo->obRMONCredito->setCodEspecie ($inCodCreditoComposto[1]); + $obRARRGrupo->obRMONCredito->setCodGenero ($inCodCreditoComposto[2]); + $obRARRGrupo->obRMONCredito->setCodNatureza ($inCodCreditoComposto[3]); + $obRARRGrupo->obRMONCredito->consultarCredito(); + + $inCodCredito = $obRARRGrupo->obRMONCredito->getCodCredito(); + $stDescricao = $obRARRGrupo->obRMONCredito->getDescricao(); + + if ($stDescricao != '') { + $stJs .= "jq_('#stCredito').html('".$stDescricao."'); \n"; + + } else { + $stJs .= "jq_('#inCodCredito').val('');"; + $stJs .= "jq_('#inCodCredito').focus();"; + $stJs .= "jq_('#stCredito').html(' ''); \n"; + $stJs .= "alertaAviso('@Crédito informado não existe. (".$request->get("inCodCredito").")','form','erro','".Sessao::getId()."');"; + } + + SistemaLegado::executaFrameOculto( $stJs ); + break; + + case "incluirCredito": + if ($request->get("inCodCredito")) { + $arListaCreditoSessao = Sessao::read( "arListaCredito" ); + $boIncluir = true; + + $inTotalDados = count( $arListaCreditoSessao ); + for ($inX=0; $inX<$inTotalDados; $inX++) { + if (($arListaCreditoSessao[$inX]["stCodCredito"] == $request->get("inCodCredito")) && ($arListaCreditoSessao[$inX]["stExercicio"] == $request->get("stExercicio"))) { + $boIncluir = false; + break; + } + } + + if ($boIncluir) { + + $stExercicio = $request->get("stExercicio"); + + $inCodCreditoComposto = explode('.',$request->get("inCodCredito")); + + if ( $stExercicio == '' ) { + echo "alertaAviso('O campo Exercício não foi preenchido!','form','erro','".Sessao::getId()."');"; + break; + } + + $obRARRGrupo = new RARRGrupo; + $obRARRGrupo->obRMONCredito->setCodCredito ($inCodCreditoComposto[0]); + $obRARRGrupo->obRMONCredito->setCodEspecie ($inCodCreditoComposto[1]); + $obRARRGrupo->obRMONCredito->setCodGenero ($inCodCreditoComposto[2]); + $obRARRGrupo->obRMONCredito->setCodNatureza ($inCodCreditoComposto[3]); + $obRARRGrupo->obRMONCredito->consultarCredito(); + + $inCodCredito = $obRARRGrupo->obRMONCredito->getCodCredito(); + $stDescricao = $obRARRGrupo->obRMONCredito->getDescricao(); + $obRARRGrupo->consultarGrupo(); + $arListaCreditoSessao[$inTotalDados]["stCodCredito"] = $request->get("inCodCredito"); + $arListaCreditoSessao[$inTotalDados]["stCreditoDescricao"] = $obRARRGrupo->obRMONCredito->getDescricao()." / ".$request->get("stExercicio"); + $arListaCreditoSessao[$inTotalDados]["stExercicio"] = $stExercicio; + + Sessao::write( "arListaCredito", $arListaCreditoSessao ); + + $rsListaCredito = new RecordSet; + $rsListaCredito->preenche( $arListaCreditoSessao ); + + $stJs = montaListaCredito( $rsListaCredito ); + $stJs .= "jq('#inCodCredito').val('');"; + $stJs .= "jq('#stExercicio').val('');"; + $stJs .= "jq('#stCredito').html(' ');"; + } else { + $stJs = "alertaAviso('@Crédito já está na lista. (".$request->get("inCodCredito").")','form','erro','".Sessao::getId()."');"; + $stJs .= "jq('#inCodCredito').val('');"; + $stJs .= "jq('#stCredito').html(' ');"; + } + echo $stJs; + } + break; + + case "excluirCredito": + if ($request->get("inIndice1")) { + $arListaCreditoSessao = Sessao::read( "arListaCredito" ); + $arListaCreditoTMP = array(); + $inTotalDados = count( $arListaCreditoSessao ); + for ($inX=0; $inX<$inTotalDados; $inX++) { + if ($arListaCreditoSessao[$inX]["stCodCredito"] != $_GET["inIndice1"]) { + $arListaCreditoTMP[] = $arListaCreditoSessao[$inX]; + } + } + + Sessao::write( "arListaCredito", $arListaCreditoTMP ); + + $rsListaCredito = new RecordSet; + $rsListaCredito->preenche( $arListaCreditoTMP ); + + $stJs = montaListaCredito( $rsListaCredito ); + sistemaLegado::executaFrameOculto( $stJs ); + } + break; +} + +?> \ No newline at end of file diff --git a/gestaoTributaria/fontes/PHP/dividaAtiva/instancias/relatorios/PRRelatorioPagadores.php b/gestaoTributaria/fontes/PHP/dividaAtiva/instancias/relatorios/PRRelatorioPagadores.php new file mode 100644 index 0000000..231fc68 --- /dev/null +++ b/gestaoTributaria/fontes/PHP/dividaAtiva/instancias/relatorios/PRRelatorioPagadores.php @@ -0,0 +1,114 @@ + +get('stFiltro') == 'credito') { + if ( count($arListaCredito) != 0 ) { + foreach ( $arListaCredito as $arCredito) { + $credito = explode('.', $arCredito["stCodCredito"]); + + $obTARRRelatorioPagadores->setDado('cod_credito' , $credito[0]); + $obTARRRelatorioPagadores->setDado('cod_especie' , $credito[1]); + $obTARRRelatorioPagadores->setDado('cod_genero' , $credito[2]); + $obTARRRelatorioPagadores->setDado('cod_natureza', $credito[3]); + $obTARRRelatorioPagadores->setDado('exercicio' , $arCredito["stExercicio"]); + $obTARRRelatorioPagadores->setDado('limite' , $request->get('inLimite')); + $obTARRRelatorioPagadores->consultaPorCredito($rsRegistros); + + $registros = array( + 'codigo' => $arCredito["stCodCredito"], + 'descricao' => $arCredito["stCreditoDescricao"], + 'dados' => $rsRegistros->getElementos() + ); + + $arRecordSetRegistros[] = $registros; + } + }else{ + SistemaLegado::LiberaFrames(true,false); + SistemaLegado::alertaAviso($pgForm."?stFiltro=credito","Deve ser incluso pelo menos um Crédito","n_incluir","erro",Sessao::getId(),"../"); + exit(); + } +} else { + if ( count($arListaGrupoCredito) != 0 ) { + foreach ($arListaGrupoCredito as $arGrupo) { + $grupo = explode('/', $arGrupo["stCodGrupo"]); + + $obTARRRelatorioPagadores->setDado('cod_grupo', $grupo[0]); + $obTARRRelatorioPagadores->setDado('exercicio', $grupo[1]); + $obTARRRelatorioPagadores->setDado('limite' , $request->get('inLimite')); + $obTARRRelatorioPagadores->consultaPorGrupo($rsRegistros); + + $registros = array( + 'codigo' => $arGrupo["stCodGrupo"], + 'descricao' => $arGrupo["stGrupoDescricao"], + 'dados' => $rsRegistros->getElementos() + ); + + $arRecordSetRegistros[] = $registros; + } + }else{ + SistemaLegado::LiberaFrames(true,false); + SistemaLegado::alertaAviso($pgForm,"Deve ser incluso pelo menos um Grupo de Crédito","n_incluir","erro",Sessao::getId(),"../"); + exit(); + } +} + +Sessao::write('arRegistros', $arRecordSetRegistros); + +SistemaLegado::LiberaFrames(true,true); + +SistemaLegado::mudaFramePrincipal(CAM_GT_DAT_INSTANCIAS."relatorios/OCGeraRelatorioPagadores.php"); \ No newline at end of file diff --git a/gestaoTributaria/fontes/PHP/dividaAtiva/instancias/remissao/OCConcederRemissao.php b/gestaoTributaria/fontes/PHP/dividaAtiva/instancias/remissao/OCConcederRemissao.php index 8a4fd7a..54d9dc4 100644 --- a/gestaoTributaria/fontes/PHP/dividaAtiva/instancias/remissao/OCConcederRemissao.php +++ b/gestaoTributaria/fontes/PHP/dividaAtiva/instancias/remissao/OCConcederRemissao.php @@ -32,7 +32,7 @@ * @ignore - * $Id: OCConcederRemissao.php 59612 2014-09-02 12:00:51Z gelson $ + * $Id: OCConcederRemissao.php 63839 2015-10-22 18:08:07Z franver $ * Casos de uso: uc-05.04.11 */ @@ -47,7 +47,7 @@ include_once CAM_FW_COMPONENTES.'Table/TableTree.class.php'; function montaListaGrupoCredito(&$rsLista) { $rsLista->setPrimeiroElemento(); - // SistemaLegado::mostravar($rsLista); exit; + if ( !$rsLista->eof() ) { $obTableTree = new TableTree; $obTableTree->setRecordset ($rsLista); diff --git a/gestaoTributaria/fontes/PHP/dividaAtiva/popups/autoridade/LSProcurarAutoridade.php b/gestaoTributaria/fontes/PHP/dividaAtiva/popups/autoridade/LSProcurarAutoridade.php index 592762a..a3a15f2 100644 --- a/gestaoTributaria/fontes/PHP/dividaAtiva/popups/autoridade/LSProcurarAutoridade.php +++ b/gestaoTributaria/fontes/PHP/dividaAtiva/popups/autoridade/LSProcurarAutoridade.php @@ -30,7 +30,7 @@ * @author Analista: Fábio Bertoldi * @author Programador: Diego Bueno Coelho - * $Id: LSProcurarAutoridade.php 59612 2014-09-02 12:00:51Z gelson $ + * $Id: LSProcurarAutoridade.php 63839 2015-10-22 18:08:07Z franver $ Caso de uso: uc-05.04.08 **/ @@ -64,7 +64,6 @@ if ( empty( $_REQUEST['stAcao'] ) ) { $_REQUEST['stAcao'] = "incluir"; } -//sistemaLegado::mostravar ( $_REQUEST ); $stNomCGMServidor = $_REQUEST['stNomCGMServidor']; $inNumCGMServidor = $_REQUEST['inNumCGMServidor']; $stTipoAutoridade = $_REQUEST['stTipoAutoridade']; diff --git a/gestaoTributaria/fontes/PHP/fiscalizacao/classes/visao/VFISInfracao.class.php b/gestaoTributaria/fontes/PHP/fiscalizacao/classes/visao/VFISInfracao.class.php index b29a8f2..51537db 100644 --- a/gestaoTributaria/fontes/PHP/fiscalizacao/classes/visao/VFISInfracao.class.php +++ b/gestaoTributaria/fontes/PHP/fiscalizacao/classes/visao/VFISInfracao.class.php @@ -33,7 +33,7 @@ * @package URBEM * @subpackage Visao - $Id: VFISInfracao.class.php 59612 2014-09-02 12:00:51Z gelson $ + $Id: VFISInfracao.class.php 63839 2015-10-22 18:08:07Z franver $ * Casos de uso: */ @@ -118,8 +118,6 @@ class VFISInfracao public function montaPenalidade(array $arParametros) { - //sistemaLegado::mostravar( $arParametros ); - //echo "comanxinho!!";exit; if ($_REQUEST["cmbTipoFiscalizacao"]) { # Define dados das Penalidades $obFormulario = new Formulario(); diff --git a/gestaoTributaria/fontes/PHP/fiscalizacao/classes/visao/VFISManterNota.class.php b/gestaoTributaria/fontes/PHP/fiscalizacao/classes/visao/VFISManterNota.class.php index 5da8024..2081a3f 100644 --- a/gestaoTributaria/fontes/PHP/fiscalizacao/classes/visao/VFISManterNota.class.php +++ b/gestaoTributaria/fontes/PHP/fiscalizacao/classes/visao/VFISManterNota.class.php @@ -430,16 +430,13 @@ private $controller; $obRCEMServico->setCodigoVigencia ( $_REQUEST["inCodigoVigencia"] ); $obRCEMServico->recuperaUltimoNivel( $rsListaNivel ); - #echo 'ListaNivel'; sistemaLegado::mostravar( $rsListaNivel ); $obRCEMServico->setCodigoNivel( 1 ); $obRCEMServico->setCodigoAtividade( $_REQUEST["inCodAtividade"] ); $obRCEMServico->listarServico( $rsListaServico ); - #echo 'ListaServiço'; sistemaLegado::mostravar( $rsListaServico ); if ( $rsListaServico->getNumLinhas() > 0 ) { - //echo '

    Dentro do IF

    '; exit; $obRCEMServico->setValorreduzido( $rsListaServico->getCampo("valor_reduzido") ); $obRCEMServico->setCodigoNivel( $rsListaNivel->getCampo("cod_nivel") ); $obRCEMServico->listarServico( $rsListaServicoTMP ); diff --git a/gestaoTributaria/fontes/PHP/fiscalizacao/classes/visao/VFISManterServico.class.php b/gestaoTributaria/fontes/PHP/fiscalizacao/classes/visao/VFISManterServico.class.php index 2d5718f..b45519d 100644 --- a/gestaoTributaria/fontes/PHP/fiscalizacao/classes/visao/VFISManterServico.class.php +++ b/gestaoTributaria/fontes/PHP/fiscalizacao/classes/visao/VFISManterServico.class.php @@ -635,16 +635,13 @@ private $controller; $obRCEMServico->setCodigoVigencia ( $_REQUEST["inCodigoVigencia"] ); $obRCEMServico->recuperaUltimoNivel( $rsListaNivel ); - #echo 'ListaNivel'; sistemaLegado::mostravar( $rsListaNivel ); $obRCEMServico->setCodigoNivel( 1 ); $obRCEMServico->setCodigoAtividade( $_REQUEST["inCodAtividade"] ); $obRCEMServico->listarServico( $rsListaServico ); - #echo 'ListaServiço'; sistemaLegado::mostravar( $rsListaServico ); if ( $rsListaServico->getNumLinhas() > 0 ) { - //echo '

    Dentro do IF

    '; exit; $obRCEMServico->setValorreduzido( $rsListaServico->getCampo("valor_reduzido") ); $obRCEMServico->setCodigoNivel( $rsListaNivel->getCampo("cod_nivel") ); $obRCEMServico->listarServico( $rsListaServicoTMP ); diff --git a/gestaoTributaria/fontes/PHP/fiscalizacao/classes/visao/VFISManterVinculo.class.php b/gestaoTributaria/fontes/PHP/fiscalizacao/classes/visao/VFISManterVinculo.class.php index 966dd78..059c5ce 100644 --- a/gestaoTributaria/fontes/PHP/fiscalizacao/classes/visao/VFISManterVinculo.class.php +++ b/gestaoTributaria/fontes/PHP/fiscalizacao/classes/visao/VFISManterVinculo.class.php @@ -320,7 +320,6 @@ class VFISManterVinculo public function preencheCombosAtividade() { - //sistemaLegado::mostravar($_REQUEST); $this->obMontaAtividade->setCodigoVigencia($_REQUEST["inCodigoVigencia"]); $this->obMontaAtividade->setCodigoNivel($_REQUEST["inCodigoNivel"]); $this->obMontaAtividade->setValorReduzido($_REQUEST["stChaveAtividade"]); diff --git a/gestaoTributaria/fontes/PHP/fiscalizacao/classes/visao/VFISNotificarProcesso.class.php b/gestaoTributaria/fontes/PHP/fiscalizacao/classes/visao/VFISNotificarProcesso.class.php index 8eafe93..908e8ba 100644 --- a/gestaoTributaria/fontes/PHP/fiscalizacao/classes/visao/VFISNotificarProcesso.class.php +++ b/gestaoTributaria/fontes/PHP/fiscalizacao/classes/visao/VFISNotificarProcesso.class.php @@ -33,7 +33,7 @@ * @package URBEM * @subpackage Visao - $Id: VFISNotificarProcesso.class.php 59612 2014-09-02 12:00:51Z gelson $ + $Id: VFISNotificarProcesso.class.php 63839 2015-10-22 18:08:07Z franver $ * Casos de uso: */ @@ -380,7 +380,6 @@ class VFISNotificarProcesso } # Monta a lista propriamente dita. -//sistemaLegado::mostravar( $arPenalidades );echo "teje preso";exit; $rsPenalidades->preenche( $arPenalidades[$inCodInfracao] ); $stHTML = $this->montaListaPenalidades( $rsPenalidades ); diff --git a/gestaoTributaria/fontes/PLPGSQL/arrecadacao/calculaValoresParcelasReemissao.plsql b/gestaoTributaria/fontes/PLPGSQL/arrecadacao/calculaValoresParcelasReemissao.plsql index cc4fd91..d7846d9 100644 --- a/gestaoTributaria/fontes/PLPGSQL/arrecadacao/calculaValoresParcelasReemissao.plsql +++ b/gestaoTributaria/fontes/PLPGSQL/arrecadacao/calculaValoresParcelasReemissao.plsql @@ -25,7 +25,7 @@ * URBEM Soluções de Gestão Pública Ltda * www.urbem.cnm.org.br * -* $Id: calculaValoresParcelasReemissao.plsql 61622 2015-02-18 15:50:46Z evandro $ +* $Id: calculaValoresParcelasReemissao.plsql 64141 2015-12-08 16:23:59Z evandro $ * * Caso de uso: uc-05.03.00 */ @@ -79,37 +79,41 @@ begin else 0.00 end as desconto - into inNrParcela , nuValorParcela, nuDescontoParcela - FROM arrecadacao.parcela p - left join arrecadacao.parcela_desconto pd - on pd.cod_parcela = p.cod_parcela - LEFT JOIN - ( - select apr.cod_parcela, vencimento, valor - from arrecadacao.parcela_reemissao apr - inner join ( - select cod_parcela, min(timestamp) as timestamp - from arrecadacao.parcela_reemissao as x - group by cod_parcela - ) as apr2 - ON apr2.cod_parcela = apr.cod_parcela AND - apr2.timestamp = apr.timestamp - ) as apr + + INTO inNrParcela + , nuValorParcela + , nuDescontoParcela + + FROM arrecadacao.parcela p + + LEFT JOIN arrecadacao.parcela_desconto pd + ON pd.cod_parcela = p.cod_parcela + + LEFT JOIN( SELECT apr.cod_parcela, vencimento, valor + FROM arrecadacao.parcela_reemissao apr + INNER JOIN ( SELECT cod_parcela + , min(timestamp) as timestamp + FROM arrecadacao.parcela_reemissao as x + GROUP BY cod_parcela + ) as apr2 + ON apr2.cod_parcela = apr.cod_parcela + AND apr2.timestamp = apr.timestamp + ) as apr ON apr.cod_parcela = p.cod_parcela - WHERE p.cod_parcela = inCodParcela; + WHERE p.cod_parcela = inCodParcela; -- proporcao da parcela para lancamento - nuProporcao := arrecadacao.calculaProporcaoParcela(inCodParcela); + nuProporcao := COALESCE(arrecadacao.calculaProporcaoParcela(inCodParcela),0.00); -- juros - nuJuros := aplica_juro(stNumeracao,inExercicio,inCodParcela,dtDataBase); + nuJuros := COALESCE(aplica_juro(stNumeracao,inExercicio,inCodParcela,dtDataBase),0.00); -- multa - nuMulta := aplica_multa(stNumeracao,inExercicio,inCodParcela,dtDataBase); + nuMulta := COALESCE(aplica_multa(stNumeracao,inExercicio,inCodParcela,dtDataBase),0.00); -- correcao - nuCorrecao := aplica_correcao(stNumeracao,inExercicio,inCodParcela,dtDataBase); + nuCorrecao := COALESCE(aplica_correcao(stNumeracao,inExercicio,inCodParcela,dtDataBase),0.00); -- retorno - nuTotal := ( nuValorParcela + nuMulta + nuJuros + nuCorrecao )::numeric(14,2); + nuTotal := ( nuValorParcela + nuMulta + nuJuros + nuCorrecao ); nuRetorno := nuTotal||'§'||nuValorParcela||'§'||nuMulta||'§'||nuJuros||'§'||nuDescontoParcela||'§'||nuCorrecao; return nuRetorno::varchar; diff --git a/gestaoTributaria/fontes/PLPGSQL/arrecadacao/diff_datas_em_meses.plsql b/gestaoTributaria/fontes/PLPGSQL/arrecadacao/diff_datas_em_meses.plsql index 5caebb5..cd40047 100644 --- a/gestaoTributaria/fontes/PLPGSQL/arrecadacao/diff_datas_em_meses.plsql +++ b/gestaoTributaria/fontes/PLPGSQL/arrecadacao/diff_datas_em_meses.plsql @@ -25,39 +25,32 @@ * URBEM Soluções de Gestão Pública Ltda * www.urbem.cnm.org.br * -* $Id: diff_datas_em_meses.plsql 59612 2014-09-02 12:00:51Z gelson $ +* $Id: diff_datas_em_meses.plsql 64141 2015-12-08 16:23:59Z evandro $ * * Caso de uso: uc-05.03.00 */ -/* -$Log$ -Revision 1.2 2006/09/15 10:20:09 fabio -correção do cabeçalho, -adicionado trecho de log do CVS +CREATE OR REPLACE FUNCTION diff_datas_em_meses(date,date) RETURNS integer as $$ +DECLARE + dtInicio ALIAS FOR $1; + dtFim ALIAS FOR $2; + inAnoInicio INTEGER; + inAnoFim INTEGER; + inDiff INTEGER; -*/ +BEGIN -CREATE OR REPLACE FUNCTION diff_datas_em_meses(date,date) RETURNS integer as ' - DECLARE - dtInicio ALIAS FOR $1; - dtFim ALIAS FOR $2; - inAnoInicio INTEGER; - inAnoFim INTEGER; - inDiff INTEGER; + inDiff := (extract (month from dtFim)) - (extract (month from dtInicio)); + inAnoInicio := extract(year from dtInicio); + inAnoFim := extract(year from dtFim); + + IF ( inAnoFim > inAnoInicio ) THEN + inDiff := (inDiff * 1) + (inAnoFim - inAnoInicio) * 12; + ELSE + inDiff := inDiff; + END IF; - BEGIN - - inDiff := (extract (month from dtFim)) - (extract (month from dtInicio)); - inAnoInicio := extract(year from dtInicio); - inAnoFim := extract(year from dtFim); - if ( inAnoFim > inAnoInicio ) then - inDiff := (inDiff * 1) + (inAnoFim - inAnoInicio) * 12; - else - inDiff := inDiff; - end if; + RETURN inDiff; - RETURN inDiff; - END; -'language 'plpgsql'; - +END; +$$ LANGUAGE 'plpgsql'; diff --git a/gestaoTributaria/fontes/PLPGSQL/arrecadacao/fn_carne_parcela.plsql b/gestaoTributaria/fontes/PLPGSQL/arrecadacao/fn_carne_parcela.plsql index c929157..21704ca 100755 --- a/gestaoTributaria/fontes/PLPGSQL/arrecadacao/fn_carne_parcela.plsql +++ b/gestaoTributaria/fontes/PLPGSQL/arrecadacao/fn_carne_parcela.plsql @@ -24,41 +24,22 @@ * * URBEM Soluções de Gestão Pública Ltda * www.urbem.cnm.org.br -* -* $Id: fn_carne_parcela.plsql 59612 2014-09-02 12:00:51Z gelson $ -* -* Caso de uso: uc-5.3.19 -* Caso de uso: uc-05.03.19 +* $Id: fn_carne_parcela.plsql 63884 2015-10-29 12:01:23Z evandro $ */ -/* -$Log$ -Revision 1.2 2006/09/15 10:20:09 fabio -correção do cabeçalho, -adicionado trecho de log do CVS - -*/ - -CREATE OR REPLACE FUNCTION arrecadacao.fn_carne_parcela( INTEGER ) RETURNS SETOF RECORD AS ' +CREATE OR REPLACE FUNCTION arrecadacao.fn_carne_parcela( INTEGER ) RETURNS VARCHAR AS $$ DECLARE - inCodParcela ALIAS FOR $1; - inRetorno integer; - reRegistro RECORD; - stSql VARCHAR; + inCodParcela ALIAS FOR $1; + stRetorno VARCHAR:=''; BEGIN - stSql := '' SELECT - numeracao - FROM - arrecadacao.carne - WHERE - cod_parcela = ''||inCodParcela||'' - ORDER BY timestamp desc limit 1; - ''; - FOR reRegistro IN EXECUTE stSql LOOP - return next reRegistro; - END LOOP; - - return; + SELECT numeracao + INTO stRetorno + FROM arrecadacao.carne + WHERE cod_parcela = inCodParcela + ORDER BY timestamp DESC + LIMIT 1; + + RETURN stRetorno; END; -' LANGUAGE 'plpgsql'; +$$ LANGUAGE 'plpgsql'; diff --git a/gestaoTributaria/fontes/PLPGSQL/arrecadacao/fn_consulta_endereco_mata_saojoao.plsql b/gestaoTributaria/fontes/PLPGSQL/arrecadacao/fn_consulta_endereco_mata_saojoao.plsql index 33cb563..fe3a02e 100644 --- a/gestaoTributaria/fontes/PLPGSQL/arrecadacao/fn_consulta_endereco_mata_saojoao.plsql +++ b/gestaoTributaria/fontes/PLPGSQL/arrecadacao/fn_consulta_endereco_mata_saojoao.plsql @@ -25,50 +25,61 @@ * URBEM Soluções de Gestão Pública Ltda * www.urbem.cnm.org.br * -* $Id: fn_consulta_endereco_mata_saojoao.plsql 59612 2014-09-02 12:00:51Z gelson $ +* $Id: fn_consulta_endereco_mata_saojoao.plsql 63867 2015-10-27 17:25:14Z evandro $ * * Caso de uso: uc-05.03.11 */ -CREATE OR REPLACE FUNCTION arrecadacao.fn_consulta_endereco_mata_saojoao( INTEGER ) RETURNS varchar AS ' +CREATE OR REPLACE FUNCTION arrecadacao.fn_consulta_endereco_mata_saojoao( INTEGER , VARCHAR ) RETURNS varchar AS $$ DECLARE - inImovel ALIAS FOR $1; - stRetorno VARCHAR; + inImovel ALIAS FOR $1; + stExercicio ALIAS FOR $2; + stRetorno VARCHAR:=''; + arOrdemEntrega VARCHAR[]; + stCodOrdem VARCHAR:=''; + stEnderecoCorrespondenciaImovel VARCHAR:=''; + stEnderecoImovel VARCHAR:=''; + stEnderecoCgm VARCHAR:=''; BEGIN + --BUSCANDO A ORDEM E SEU CODIGO PARA DEFINIR QUAL CONSULTA SERA EXECUTADA + SELECT ordem as cod_ordem_entrega + + INTO arOrdemEntrega + + FROM ( SELECT string_to_array(REPLACE(regexp_replace(valor,'({|}|")','','gi'),',','~'),'~') as ordem + FROM administracao.configuracao + WHERE parametro = 'ordem_entrega' + AND exercicio = stExercicio + )as foo; + --imcc => endereco correspondencia do imovel --imv => endereco do imovel --ip => endereco do cgm - SELECT - CASE WHEN (ip.cod_municipio = 251 AND ip.cod_uf = 5) OR ( ip.cod_municipio = 0 AND ip.cod_uf = 0 ) THEN - CASE WHEN imcc.cod_municipio = 251 AND imcc.cod_uf = 5 THEN - imcc.endereco - ELSE - imv.endereco - END - ELSE - ip.endereco - END AS endereco - - INTO - stRetorno - + SELECT + imcc.endereco AS endereco_correspondencia_imovel + ,imv.endereco AS endereco_imovel + ,ip.endereco AS endereco_cgm + + INTO stEnderecoCorrespondenciaImovel + ,stEnderecoImovel + ,stEnderecoCgm FROM imobiliario.imovel AS ii LEFT JOIN ( SELECT IMC.inscricao_municipal, - TL.nom_tipo||''§''|| - IMC.cod_logradouro||''§''|| - LOGRN.nom_logradouro||''§''|| - IMC.numero||''§''|| - IMC.complemento||''§''|| - BAIRRO.nom_bairro||''§''|| - IMC.cep||''§''|| - MUN.cod_municipio||''§''|| - MUN.nom_municipio||''§''|| - UF.cod_uf||''§''|| + TL.nom_tipo||'§'|| + IMC.cod_logradouro||'§'|| + LOGRN.nom_logradouro||'§'|| + IMC.numero||'§'|| + IMC.complemento||'§'|| + BAIRRO.nom_bairro||'§'|| + IMC.cep||'§'|| + MUN.cod_municipio||'§'|| + MUN.nom_municipio||'§'|| + UF.cod_uf||'§'|| UF.sigla_uf AS endereco, MUN.cod_municipio, @@ -120,19 +131,18 @@ BEGIN LEFT JOIN ( SELECT i.inscricao_municipal, - TL.nom_tipo||''§''|| - l.cod_logradouro||''§''|| - nl.nom_logradouro||''§''|| - i.numero||''§''|| - i.complemento||''§''|| - bairro.nom_bairro||''§''|| - i.cep||''§''|| - mun.cod_municipio||''§''|| - mun.nom_municipio||''§''|| - uf.cod_uf||''§''|| + TL.nom_tipo||'§'|| + l.cod_logradouro||'§'|| + nl.nom_logradouro||'§'|| + i.numero||'§'|| + i.complemento||'§'|| + bairro.nom_bairro||'§'|| + i.cep||'§'|| + mun.cod_municipio||'§'|| + mun.nom_municipio||'§'|| + uf.cod_uf||'§'|| uf.sigla_uf AS endereco, - --TL.nom_tipo||''§''||l.cod_logradouro||''§''||nl.nom_logradouro||''§''||i.numero||''§''||i.complemento||''§''||i.cep||''§''||''''||''§''||bairro.nom_bairro||''§''||mun.cod_municipio||''§''||mun.nom_municipio||''§''||uf.cod_uf||''§''||uf.sigla_uf||''§''||i.inscricao_municipal AS endereco, uf.cod_uf, mun.cod_municipio @@ -202,16 +212,16 @@ BEGIN LEFT JOIN ( SELECT ip.inscricao_municipal, - cgm.tipo_logradouro_corresp||''§''|| - ''0''||''§''|| - cgm.logradouro_corresp||''§''|| - cgm.numero_corresp||''§''|| - cgm.complemento_corresp||''§''|| - cgm.bairro_corresp||''§''|| - cgm.cep_corresp||''§''|| - MUN.cod_municipio||''§''|| - MUN.nom_municipio||''§''|| - UF.cod_uf||''§''|| + cgm.tipo_logradouro_corresp||'§'|| + sw_cgm_logradouro_correspondencia.cod_logradouro||'§'|| + cgm.logradouro_corresp||'§'|| + cgm.numero_corresp||'§'|| + cgm.complemento_corresp||'§'|| + cgm.bairro_corresp||'§'|| + cgm.cep_corresp||'§'|| + MUN.cod_municipio||'§'|| + MUN.nom_municipio||'§'|| + UF.cod_uf||'§'|| UF.sigla_uf AS endereco, UF.cod_uf, @@ -236,7 +246,10 @@ BEGIN ON MUN.cod_uf = UF.cod_uf AND MUN.cod_municipio = cgm.cod_municipio_corresp - + + LEFT JOIN sw_cgm_logradouro_correspondencia + ON sw_cgm_logradouro_correspondencia.numcgm = cgm.numcgm + ) as ip ON ip.inscricao_municipal = ii.inscricao_municipal @@ -248,6 +261,18 @@ BEGIN imcc.timestamp desc LIMIT 1; + --Loop para atribuir o valor do endereco de acordo com a ordem setada na configuracao + FOREACH stCodOrdem IN ARRAY arOrdemEntrega + LOOP + CASE stCodOrdem + WHEN '4' THEN stRetorno:= stEnderecoCorrespondenciaImovel; + WHEN '3' THEN stRetorno:= stEnderecoImovel; + WHEN '2','1' THEN stRetorno:= stEnderecoCgm; + ELSE + END CASE; + EXIT WHEN stRetorno <> ''; + END LOOP; + RETURN stRetorno; END; -' LANGUAGE 'plpgsql'; +$$ LANGUAGE 'plpgsql'; diff --git a/gestaoTributaria/fontes/PLPGSQL/arrecadacao/fn_correcao_mariana.plsql b/gestaoTributaria/fontes/PLPGSQL/arrecadacao/fn_correcao_mariana.plsql index 40dc31a..7d7efda 100644 --- a/gestaoTributaria/fontes/PLPGSQL/arrecadacao/fn_correcao_mariana.plsql +++ b/gestaoTributaria/fontes/PLPGSQL/arrecadacao/fn_correcao_mariana.plsql @@ -50,26 +50,28 @@ CREATE OR REPLACE FUNCTION fn_correcao_mariana (date,date,numeric,integer,intege -- Calculo de Juros simples inDiff := diff_datas_em_meses(dtVencimento,dtDataCalculo); - SELECT MAX(inicio_vigencia) - INTO dtMinVigencia - FROM monetario.valor_acrescimo - WHERE cod_acrescimo = inCodAcrescimo - AND cod_tipo = inCodTipo - AND inicio_vigencia <= dtVencimento - ; + IF inDiff > 0 THEN + SELECT MAX(inicio_vigencia) + INTO dtMinVigencia + FROM monetario.valor_acrescimo + WHERE cod_acrescimo = inCodAcrescimo + AND cod_tipo = inCodTipo + AND inicio_vigencia <= dtVencimento + ; - SELECT SUM(valor) - INTO nuPercent - FROM monetario.valor_acrescimo - WHERE cod_acrescimo = inCodAcrescimo - AND cod_tipo = inCodTipo - AND inicio_vigencia >= dtMinVigencia - AND inicio_vigencia <= dtDataCalculo - interval '1 month' - ; + SELECT SUM(valor) + INTO nuPercent + FROM monetario.valor_acrescimo + WHERE cod_acrescimo = inCodAcrescimo + AND cod_tipo = inCodTipo + AND inicio_vigencia >= dtMinVigencia + AND inicio_vigencia <= dtDataCalculo - interval '1 month' + ; + + nuCorrecao := nuValor * (nuPercent / 100); - nuCorrecao := nuValor * (nuPercent / 100); - - nuRetorno := nuCorrecao::NUMERIC(14,2); + nuRetorno := nuCorrecao::NUMERIC(14,2); + END IF; RETURN nuRetorno::numeric(14,2); END; diff --git a/gestaoTributaria/fontes/PLPGSQL/arrecadacao/fn_honorarios_mata.plsql b/gestaoTributaria/fontes/PLPGSQL/arrecadacao/fn_honorarios_mata.plsql index 6e5e0e3..9578d39 100755 --- a/gestaoTributaria/fontes/PLPGSQL/arrecadacao/fn_honorarios_mata.plsql +++ b/gestaoTributaria/fontes/PLPGSQL/arrecadacao/fn_honorarios_mata.plsql @@ -25,7 +25,7 @@ * URBEM Soluções de Gestão Pública Ltda * www.urbem.cnm.org.br * -* $Id: fn_honorarios_mata.plsql 59612 2014-09-02 12:00:51Z gelson $ +* $Id: fn_honorarios_mata.plsql 63888 2015-10-30 15:35:08Z evandro $ * * Caso de uso: uc-05.03.00 */ @@ -44,7 +44,7 @@ funcao para calculo de honorarios advocaticios para cobrancas de divida ativa */ -CREATE OR REPLACE FUNCTION fn_honorarios(date,date,float,integer,integer) RETURNS numeric as ' +CREATE OR REPLACE FUNCTION fn_honorarios(date,date,float,integer,integer) RETURNS numeric as $$ DECLARE dtVencimento ALIAS FOR $1; @@ -89,28 +89,11 @@ CREATE OR REPLACE FUNCTION fn_honorarios(date,date,float,integer,integer) RETURN BEGIN --- -- RECUPERACAO DAS REDUCOES QUE INCIDEM EM CADA ACRESCIMO --- stSQL := '' SELECT cod_acrescimo --- , cod_tipo --- FROM divida.modalidade_reducao_acrescimo --- WHERE cod_modalidade = '' || inCodModalidade || '' --- AND timestamp = ( --- SELECT ultimo_timestamp --- FROM divida.modalidade --- WHERE cod_modalidade = '' || inCodModalidade || '' --- ) --- AND pagamento = false ''; --- --- FOR reRECORD IN EXECUTE stSQL LOOP --- nuReducao := aplica_reducao_modalidade_acrescimo( inCodModalidade, inRegistro, ); --- END LOOP; - - inCodInscricao := recuperarbufferinteiro( ''inCodInscricao'' ); - inExercicio := recuperarbufferinteiro( ''inExercicio'' ); - inCodModalidade := recuperarbufferinteiro( ''inCodModalidade'' ); - inRegistro := recuperarbufferinteiro( ''inRegistro'' ); --- inQtdParcelas := recuperarbufferinteiro( ''inQtdParcelas'' ); - boIncidencia := recuperarbuffertexto ( ''boIncidencia'' ); + inCodInscricao := recuperarbufferinteiro( 'inCodInscricao' ); + inExercicio := recuperarbufferinteiro( 'inExercicio' ); + inCodModalidade := recuperarbufferinteiro( 'inCodModalidade' ); + inRegistro := recuperarbufferinteiro( 'inRegistro' ); + boIncidencia := recuperarbuffertexto ( 'boIncidencia' ); SELECT qtd_parcela INTO inQtdParcelas @@ -122,29 +105,25 @@ CREATE OR REPLACE FUNCTION fn_honorarios(date,date,float,integer,integer) RETURN WHERE cod_modalidade = inCodModalidade ); - inJudicial := recuperarBufferInteiro(''judicial''); + inJudicial := recuperarBufferInteiro( 'judicial' ); -- RECUPERACAO DO VALOR DOS ACRESCIMOS QUE INCIDEM SOBRE O VALOR ORIGINAL stSplit1 := aplica_acrescimo_modalidade_honorarios_mata( inJudicial, inCodInscricao, inExercicio, inCodModalidade, 1, inRegistro, flCorrigido::numeric, dtVencimento, dtDataCalculo, boIncidencia ); stSplit2 := aplica_acrescimo_modalidade_honorarios_mata( inJudicial, inCodInscricao, inExercicio, inCodModalidade, 2, inRegistro, flCorrigido::numeric, dtVencimento, dtDataCalculo, boIncidencia ); stSplit3 := aplica_acrescimo_modalidade_honorarios_mata( inJudicial, inCodInscricao, inExercicio, inCodModalidade, 3, inRegistro, flCorrigido::numeric, dtVencimento, dtDataCalculo, boIncidencia ); --- nuSplit1 := split_part(stSplit1,'';'',1)::float; --- nuSplit2 := split_part(stSplit2,'';'',1)::float; --- nuSplit3 := split_part(stSplit3,'';'',1)::float; - -- RECUPERACAO DOS VALORES DO ACRESCIMO TIPO 1 lnSplit := length(stSplit1); - btSplit := replace(stSplit1,'';'',''''); + btSplit := replace(stSplit1,';',''); lnSplitRep := length(btSplit); wCount := ( lnSplit::integer - lnSplitRep::integer ) / 3; WHILE ( iLimite < wCount ) LOOP - nuAcrescimo := split_part(stSplit1,'';'',iCount); + nuAcrescimo := split_part(stSplit1,';',iCount); - inTmpAcrescimo := split_part(stSplit1,'';'',iCount+1)::integer; - inTmpTipo := split_part(stSplit1,'';'',iCount+2)::integer; + inTmpAcrescimo := split_part(stSplit1,';',iCount+1)::integer; + inTmpTipo := split_part(stSplit1,';',iCount+2)::integer; nuReducao := aplica_reducao_modalidade_acrescimo( inCodModalidade, inRegistro, nuAcrescimo::numeric, inTmpAcrescimo, inTmpTipo, dtVencimento, inQtdParcelas ); nuSplit1 := nuSplit1 + ( nuAcrescimo - nuReducao ); @@ -157,20 +136,19 @@ CREATE OR REPLACE FUNCTION fn_honorarios(date,date,float,integer,integer) RETURN iCount := 2; iLimite := 0; - -- RECUPERACAO DOS VALORES DO ACRESCIMO TIPO 2 lnSplit := length(stSplit2); - btSplit := replace(stSplit2,'';'',''''); + btSplit := replace(stSplit2,';',''); lnSplitRep := length(btSplit); wCount := ( lnSplit::integer - lnSplitRep::integer ) / 3; WHILE ( iLimite < wCount ) LOOP - nuAcrescimo := split_part(stSplit2,'';'',iCount); + nuAcrescimo := split_part(stSplit2,';',iCount); - inTmpAcrescimo := split_part(stSplit2,'';'',iCount+1)::integer; - inTmpTipo := split_part(stSplit2,'';'',iCount+2)::integer; + inTmpAcrescimo := split_part(stSplit2,';',iCount+1)::integer; + inTmpTipo := split_part(stSplit2,';',iCount+2)::integer; nuReducao := aplica_reducao_modalidade_acrescimo( inCodModalidade, inRegistro, nuAcrescimo::numeric, inTmpAcrescimo, inTmpTipo, dtVencimento, inQtdParcelas ); nuSplit2 := nuSplit2 + ( nuAcrescimo - nuReducao ); @@ -186,17 +164,17 @@ CREATE OR REPLACE FUNCTION fn_honorarios(date,date,float,integer,integer) RETURN -- RECUPERACAO DOS VALORES DO ACRESCIMO TIPO 3 lnSplit := length(stSplit3); - btSplit := replace(stSplit3,'';'',''''); + btSplit := replace(stSplit3,';',''); lnSplitRep := length(btSplit); wCount := ( lnSplit::integer - lnSplitRep::integer ) / 3; WHILE ( iLimite < wCount ) LOOP - nuAcrescimo := split_part(stSplit3,'';'',iCount); + nuAcrescimo := split_part(stSplit3,';',iCount); - inTmpAcrescimo := split_part(stSplit3,'';'',iCount+1)::integer; - inTmpTipo := split_part(stSplit3,'';'',iCount+2)::integer; + inTmpAcrescimo := split_part(stSplit3,';',iCount+1)::integer; + inTmpTipo := split_part(stSplit3,';',iCount+2)::integer; nuReducao := aplica_reducao_modalidade_acrescimo( inCodModalidade, inRegistro, nuAcrescimo::numeric, inTmpAcrescimo, inTmpTipo, dtVencimento, inQtdParcelas ); nuSplit3 := nuSplit3 + ( nuAcrescimo - nuReducao ); @@ -211,7 +189,7 @@ CREATE OR REPLACE FUNCTION fn_honorarios(date,date,float,integer,integer) RETURN flValorTotal := flCorrigido + nuSplit1 + nuSplit2 + nuSplit3; -- CALCULO DO VALOR DOS HONORARIOS - 10% OU 20% - inJudicial := recuperarBufferInteiro(''judicial''); + inJudicial := recuperarBufferInteiro( 'judicial' ); IF ( inJudicial = 1 ) THEN flHonorario := ( flValorTotal * 20) / 100 ; ELSE @@ -232,5 +210,5 @@ CREATE OR REPLACE FUNCTION fn_honorarios(date,date,float,integer,integer) RETURN RETURN flHonorario::numeric(14,2); END; -'language 'plpgsql'; +$$ language 'plpgsql'; diff --git a/gestaoTributaria/fontes/PLPGSQL/arrecadacao/fn_lista_creditos_lancamento.plsql b/gestaoTributaria/fontes/PLPGSQL/arrecadacao/fn_lista_creditos_lancamento.plsql index 6b472c4..f9f3530 100644 --- a/gestaoTributaria/fontes/PLPGSQL/arrecadacao/fn_lista_creditos_lancamento.plsql +++ b/gestaoTributaria/fontes/PLPGSQL/arrecadacao/fn_lista_creditos_lancamento.plsql @@ -27,7 +27,7 @@ * URBEM Soluções de Gestão Pública Ltda * www.urbem.cnm.org.br * -* $Id: fn_lista_creditos_lancamento.plsql 59612 2014-09-02 12:00:51Z gelson $ +* $Id: fn_lista_creditos_lancamento.plsql 63867 2015-10-27 17:25:14Z evandro $ * * Caso de uso: uc-05.03.11 * uc-05.03.19 @@ -44,11 +44,11 @@ correção da tag de caso de uso */ -CREATE OR REPLACE FUNCTION arrecadacao.fn_lista_creditos_lancamento( integer, integer, integer ) returns VARCHAR as ' +CREATE OR REPLACE FUNCTION arrecadacao.fn_lista_creditos_lancamento( integer, integer, integer ) returns VARCHAR as $$ declare - stSql varchar := ''''; - stRetorno varchar := ''''; - stAux varchar := ''''; + stSql varchar := ''; + stRetorno varchar := ''; + stAux varchar := ''; inCont integer := 0; nuSoma numeric; reRecord RECORD; @@ -59,7 +59,7 @@ declare BEGIN - stSql := '' + stSql := ' SELECT ac.cod_credito, mc.descricao_credito as descricao, @@ -88,20 +88,20 @@ BEGIN AND ac.cod_genero = mc.cod_genero AND ac.cod_natureza = mc.cod_natureza WHERE - alc.cod_lancamento = ''|| inCodLancamento ||'' - and acg.cod_grupo = ''|| inCodGrupo ||'' - and acg.ano_exercicio = ''''|| inExercicio ||'''' + alc.cod_lancamento = '|| inCodLancamento ||' + and acg.cod_grupo = '|| inCodGrupo ||' + and acg.ano_exercicio = '''|| inExercicio ||''' ORDER BY acg.ordem - ''; + '; nuSoma := 0.00; FOR reRecord IN EXECUTE stSql LOOP - stRetorno := stRetorno||''§''||reRecord.cod_credito||''§''||reRecord.descricao||''§''||reRecord.valor; + stRetorno := stRetorno||'§'||reRecord.cod_credito||'§'||reRecord.descricao||'§'||reRecord.valor; nuSoma := nuSoma + reRecord.valor; inCont := inCont + 1; END LOOP; return nuSoma||stRetorno; end; -'language 'plpgsql'; +$$ language 'plpgsql'; diff --git a/gestaoTributaria/fontes/PLPGSQL/arrecadacao/fn_urm_mariana.plsql b/gestaoTributaria/fontes/PLPGSQL/arrecadacao/fn_urm_mariana.plsql new file mode 100644 index 0000000..5250082 --- /dev/null +++ b/gestaoTributaria/fontes/PLPGSQL/arrecadacao/fn_urm_mariana.plsql @@ -0,0 +1,101 @@ +/* + ********************************************************************************** + * * + * @package URBEM CNM - Soluções em Gestão Pública * + * @copyright (c) 2013 Confederação Nacional de Municípos * + * @author Confederação Nacional de Municípios * + * * + * O URBEM CNM é um software livre; você pode redistribuí-lo e/ou modificá-lo sob * + * os termos da Licença Pública Geral GNU conforme publicada pela Fundação do * + * Software Livre (FSF - Free Software Foundation); na versão 2 da Licença. * + * * + * Este programa é distribuído na expectativa de que seja útil, porém, * + * SEM NENHUMA GARANTIA; nem mesmo a garantia implícita de COMERCIABILIDADE OU * + * ADEQUAÇÃO A UMA FINALIDADE ESPECÍFICA. Consulte a Licença Pública Geral do GNU * + * para mais detalhes. * + * * + * Você deve ter recebido uma cópia da Licença Pública Geral do GNU "LICENCA.txt" * + * com este programa; se não, escreva para a Free Software Foundation Inc., * + * no endereço 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA. * + * * + ********************************************************************************** +*/ +/* +* +* URBEM Soluções de Gestão Pública Ltda +* www.urbem.cnm.org.br +* +* $Id: fn_urm_mariana.plsql 64154 2015-12-10 13:31:39Z fabio $ +* +* Caso de uso: uc-05.03.00 +* Calculo Valor de Juros Especial (Mata) +*/ + +CREATE OR REPLACE FUNCTION fn_urm_mariana (date,date,numeric,integer,integer) RETURNS numeric as $$ + + DECLARE + dtVencimento ALIAS FOR $1; + dtDataCalculo ALIAS FOR $2; + nuValor ALIAS FOR $3; + inCodAcrescimo ALIAS FOR $4; + inCodTipo ALIAS FOR $5; + nuValorOrigem NUMERIC; + nuValorCalculo NUMERIC; + nuPercent NUMERIC = 0.00; + nuCorrecao NUMERIC = 0.00; + nuRetorno NUMERIC = 0.00; + inDiff INTEGER; + dtMinVigencia DATE; + dtMaxVigencia DATE; + + BEGIN + SELECT valor_acrescimo.valor + INTO nuValorOrigem + FROM monetario.valor_acrescimo + JOIN ( + SELECT MAX(inicio_vigencia) AS vigencia + , cod_acrescimo + , cod_tipo + FROM monetario.valor_acrescimo + WHERE cod_acrescimo = inCodAcrescimo + AND cod_tipo = inCodTipo + AND inicio_vigencia <= dtVencimento + GROUP BY cod_acrescimo + , cod_tipo + ) AS interna + ON interna.cod_acrescimo = valor_acrescimo.cod_acrescimo + AND interna.cod_tipo = valor_acrescimo.cod_tipo + AND interna.vigencia = valor_acrescimo.inicio_vigencia + WHERE valor_acrescimo.cod_acrescimo = inCodAcrescimo + AND valor_acrescimo.cod_tipo = inCodTipo + ; + + SELECT valor_acrescimo.valor + INTO nuValorCalculo + FROM monetario.valor_acrescimo + JOIN ( + SELECT MAX(inicio_vigencia) AS vigencia + , cod_acrescimo + , cod_tipo + FROM monetario.valor_acrescimo + WHERE cod_acrescimo = inCodAcrescimo + AND cod_tipo = inCodTipo + AND inicio_vigencia <= dtDataCalculo + GROUP BY cod_acrescimo + , cod_tipo + ) AS interna + ON interna.cod_acrescimo = valor_acrescimo.cod_acrescimo + AND interna.cod_tipo = valor_acrescimo.cod_tipo + AND interna.vigencia = valor_acrescimo.inicio_vigencia + WHERE valor_acrescimo.cod_acrescimo = inCodAcrescimo + AND valor_acrescimo.cod_tipo = inCodTipo + ; + + nuCorrecao := ((nuValor / nuValorOrigem) * nuValorCalculo) - nuValor; + + nuRetorno := nuCorrecao::NUMERIC(14,2); + + RETURN nuRetorno::numeric(14,2); + END; +$$ language 'plpgsql'; + diff --git a/gestaoTributaria/fontes/PLPGSQL/arrecadacao/listaEmissaoGraficaImobiliaria.plsql b/gestaoTributaria/fontes/PLPGSQL/arrecadacao/listaEmissaoGraficaImobiliaria.plsql index 677b2db..01eb367 100644 --- a/gestaoTributaria/fontes/PLPGSQL/arrecadacao/listaEmissaoGraficaImobiliaria.plsql +++ b/gestaoTributaria/fontes/PLPGSQL/arrecadacao/listaEmissaoGraficaImobiliaria.plsql @@ -25,7 +25,7 @@ * URBEM Soluções de Gestão Pública Ltda * www.urbem.cnm.org.br * -* $Id: listaEmissaoGraficaImobiliaria.plsql 59612 2014-09-02 12:00:51Z gelson $ +* $Id: listaEmissaoGraficaImobiliaria.plsql 63867 2015-10-27 17:25:14Z evandro $ * * Caso de uso: uc-05.03.11 * Caso de uso: uc-05.03.19 @@ -36,7 +36,7 @@ CREATE OR REPLACE FUNCTION arrecadacao.fn_lista_emissao_grafica_imobiliaria ( varchar,int,int,int,int ,int,int,varchar,int,varchar ,varchar,int,int,varchar,varchar ,varchar,varchar, varchar ) -RETURNS SETOF RECORD AS ' +RETURNS SETOF RECORD AS $$ DECLARE stTipoInscricao ALIAS FOR $1; @@ -66,22 +66,22 @@ DECLARE inRetorno integer; reRegistro RECORD; stSql VARCHAR; - stFiltro varchar := ''''; - stFiltroTipoInscricao varchar := ''''; - stJoins varchar := ''''; - stFrom varchar := ''''; - stOrdem varchar := ''''; - stFromOrigem varchar := ''''; - stFiltroCredito varchar := ''''; - stColunasOrigem varchar := ''''; - stGroupByOrigem varchar := ''''; + stFiltro varchar := ''; + stFiltroTipoInscricao varchar := ''; + stJoins varchar := ''; + stFrom varchar := ''; + stOrdem varchar := ''; + stFromOrigem varchar := ''; + stFiltroCredito varchar := ''; + stColunasOrigem varchar := ''; + stGroupByOrigem varchar := ''; inNumConvenio integer; inCodFebraban integer; BEGIN SELECT valor INTO inCodFebraban FROM administracao.configuracao - WHERE parametro = ''FEBRABAN'' + WHERE parametro = 'FEBRABAN' AND cod_modulo = 2 ORDER BY exercicio DESC LIMIT 1; @@ -121,26 +121,26 @@ END IF; -- ########################## Filtro para crédito ############# IF ( inCodCredito > 0 ) THEN - stColunasOrigem := '' + stColunasOrigem := ' , 0 as cod_grupo , split_part ( monetario.fn_busca_mascara_credito( - ac.cod_credito, ac.cod_genero, ac.cod_especie, ac.cod_natureza), ''''§'''', 6 + ac.cod_credito, ac.cod_genero, ac.cod_especie, ac.cod_natureza), ''§'', 6 )::varchar as descricao , ac.exercicio::int as exercicio - ''; + '; - stFiltroCredito := '' + stFiltroCredito := ' WHERE NOT EXISTS (select cod_calculo from arrecadacao.calculo_grupo_credito where cod_calculo = ac.cod_calculo) - and ac.cod_credito = ''||inCodCredito::varchar||'' - and ac.cod_especie = ''||inCodEspecie::varchar||'' - and ac.cod_genero = ''||inCodGenero::varchar||'' - and ac.cod_natureza = ''||inCodNatureza::varchar||'' - ''; + and ac.cod_credito = '||inCodCredito::varchar||' + and ac.cod_especie = '||inCodEspecie::varchar||' + and ac.cod_genero = '||inCodGenero::varchar||' + and ac.cod_natureza = '||inCodNatureza::varchar||' + '; - stGroupByOrigem := '' + stGroupByOrigem := ' , ac.cod_credito, ac.cod_genero, ac.cod_especie, ac.cod_natureza - ''; + '; END IF; @@ -148,15 +148,15 @@ END IF; -- ########################## Filtro para GRUPO ############# IF ( inCodGrupo > 0 ) THEN - stColunasOrigem := '' + stColunasOrigem := ' , acgc.cod_grupo , agc.descricao , ac.exercicio::int as exercicio - ''; + '; - stFiltro := stFiltro||'' and aic2.cod_grupo = ''||inCodGrupo; + stFiltro := stFiltro||' and aic2.cod_grupo = '||inCodGrupo; - stFromOrigem := stFrom || '' + stFromOrigem := stFrom || ' INNER JOIN arrecadacao.calculo_grupo_credito as acgc ON acgc.cod_calculo = aic.cod_calculo @@ -165,49 +165,49 @@ IF ( inCodGrupo > 0 ) THEN ON agc.cod_grupo = acgc.cod_grupo and agc.ano_exercicio = acgc.ano_exercicio - ''; + '; - stGroupByOrigem := '' + stGroupByOrigem := ' , agc.descricao, acgc.cod_grupo - ''; + '; END IF; IF ( inExercicio > 0 ) THEN - stFiltro := stFiltro||'' and aic2.exercicio = ''||quote_literal(inExercicio)||'' ''; + stFiltro := stFiltro||' and aic2.exercicio = '||quote_literal(inExercicio)||' '; END IF; -- ########################## TIPO DE INSCRICAO ############# -IF ( stTipoInscricao != '''') THEN - IF ( stTipoInscricao = ''prediais'') THEN - stFiltro := stFiltro||'' and exists ( select inscricao_municipal from imobiliario.unidade_autonoma as iau where iau.inscricao_municipal = aic2.inscricao ) ''; +IF ( stTipoInscricao != '') THEN + IF ( stTipoInscricao = 'prediais') THEN + stFiltro := stFiltro||' and exists ( select inscricao_municipal from imobiliario.unidade_autonoma as iau where iau.inscricao_municipal = aic2.inscricao ) '; ELSE - IF ( stTipoInscricao = ''territoriais'') THEN - stFiltro := stFiltro||'' and not exists ( select inscricao_municipal from imobiliario.unidade_autonoma as iau where iau.inscricao_municipal = aic2.inscricao ) ''; + IF ( stTipoInscricao = 'territoriais') THEN + stFiltro := stFiltro||' and not exists ( select inscricao_municipal from imobiliario.unidade_autonoma as iau where iau.inscricao_municipal = aic2.inscricao ) '; END IF; END IF; END IF; -- ########################## INSCRICAO IMOBILIARIA ######### -stFiltro := stFiltro||'' and aic2.inscricao in ( ''||inCodIIInicial||'' ) ''; +stFiltro := stFiltro||' and aic2.inscricao in ( '||inCodIIInicial||' ) '; -- ########################## COD LOTE ###################### IF ( inCodEnderecoInicial > 0 ) THEN IF ( inCodEnderecoFinal > 0 ) THEN - stFiltro := stFiltro||'' and ENDERECO.cod_lote between ''||inCodEnderecoInicial||'' and ''||inCodEnderecoFinal||'' ''; + stFiltro := stFiltro||' and ENDERECO.cod_lote between '||inCodEnderecoInicial||' and '||inCodEnderecoFinal||' '; ELSE - stFiltro := stFiltro||'' and ENDERECO.cod_lote = ''||inCodEnderecoInicial ; + stFiltro := stFiltro||' and ENDERECO.cod_lote = '||inCodEnderecoInicial ; END IF; END IF; -- ########################## LOCALIZACAO ################## -IF ( stLocalizacaoInicial != '''' ) THEN - IF ( stLocalizacaoFinal != '''' ) THEN - stFiltro := stFiltro||'' and ILOC.codigo_composto between ''''''||stLocalizacaoInicial||'''''' and '''''' ||stLocalizacaoFinal||'''''' ''; +IF ( stLocalizacaoInicial != '' ) THEN + IF ( stLocalizacaoFinal != '' ) THEN + stFiltro := stFiltro||' and ILOC.codigo_composto between '''||stLocalizacaoInicial||''' and ''' ||stLocalizacaoFinal||''' '; ELSE - stFiltro := stFiltro ||'' and ILOC.codigo_composto = ''''''|| stLocalizacaoInicial||'''''' '' ; + stFiltro := stFiltro ||' and ILOC.codigo_composto = '''|| stLocalizacaoInicial||''' ' ; END IF; END IF; @@ -217,12 +217,12 @@ END IF; -- ########################## ORDER BY ################## -IF ( stOrdemEmissao != '''' ) THEN +IF ( stOrdemEmissao != '' ) THEN stOrdem := stOrdemEmissao; END IF; -IF ( stOrdem != '''' ) THEN - stOrdem := '' ORDER BY ''|| stOrdem || '' ''; +IF ( stOrdem != '' ) THEN + stOrdem := ' ORDER BY '|| stOrdem || ' '; END IF; @@ -231,7 +231,7 @@ END IF; /* **********************************************************************************/ /* ******************************************************* CONSULTA PRINCIPAL */ /* **********************************************************************************/ - stSql := '' + stSql := ' SELECT DISTINCT @@ -254,1688 +254,1638 @@ SELECT DISTINCT , tudo.cod_construcao , tudo.cod_tipo_construcao - , split_part(tudo.endereco,''''§'''',1)::varchar as nom_tipo - , split_part(tudo.endereco,''''§'''',2)::int as cod_logradouro - , split_part(tudo.endereco,''''§'''',3)::varchar as nom_logradouro - , split_part(tudo.endereco,''''§'''',4)::varchar as numero - , split_part(tudo.endereco,''''§'''',5)::varchar as complemento - , split_part(tudo.endereco,''''§'''',6)::varchar as nom_bairro - , split_part(tudo.endereco,''''§'''',7)::varchar as cep - , split_part(tudo.endereco,''''§'''',8)::varchar as cod_municipio - , split_part(tudo.endereco,''''§'''',9)::varchar as nom_municipio - , split_part(tudo.endereco,''''§'''',10)::varchar as cod_uf - , split_part(tudo.endereco,''''§'''',11)::varchar as sigla_uf - + , split_part(tudo.endereco,''§'',1)::varchar as nom_tipo + , split_part(tudo.endereco,''§'',2)::int as cod_logradouro + , split_part(tudo.endereco,''§'',3)::varchar as nom_logradouro + , split_part(tudo.endereco,''§'',4)::varchar as numero + , split_part(tudo.endereco,''§'',5)::varchar as complemento + , COALESCE(tudo.nome_condominio,'''') as nome_condominio + , split_part(tudo.endereco,''§'',6)::varchar as nom_bairro + , split_part(tudo.endereco,''§'',7)::varchar as cep + , split_part(tudo.endereco,''§'',8)::varchar as cod_municipio + , split_part(tudo.endereco,''§'',9)::varchar as nom_municipio + , split_part(tudo.endereco,''§'',10)::varchar as cod_uf + , split_part(tudo.endereco,''§'',11)::varchar as sigla_uf , ( case when tudo.endereco_c is null then - split_part(tudo.endereco,''''§'''',1) - else split_part(tudo.endereco_c,''''§'''',1) + split_part(tudo.endereco,''§'',1) + else split_part(tudo.endereco_c,''§'',1) end )::varchar as c_nom_tipo_logradouro , ( case when tudo.endereco_c is null then - split_part(tudo.endereco,''''§'''',2)::int - else split_part(tudo.endereco_c,''''§'''',2)::int + split_part(tudo.endereco,''§'',2)::int + else split_part(tudo.endereco_c,''§'',2)::int end )::int as c_cod_logradouro , ( case when tudo.endereco_c is null then - split_part(tudo.endereco,''''§'''',3) - else split_part(tudo.endereco_c,''''§'''',3) + split_part(tudo.endereco,''§'',3) + else split_part(tudo.endereco_c,''§'',3) end )::varchar as c_nom_logradouro , ( case when tudo.endereco_c is null then - split_part(tudo.endereco,''''§'''',4) - else split_part(tudo.endereco_c,''''§'''',4) + split_part(tudo.endereco,''§'',4) + else split_part(tudo.endereco_c,''§'',4) end )::varchar as c_numero , ( case when tudo.endereco_c is null then - split_part(tudo.endereco,''''§'''',5) - else split_part(tudo.endereco_c,''''§'''',5) + split_part(tudo.endereco,''§'',5) + else split_part(tudo.endereco_c,''§'',5) end )::varchar as c_complemento , ( case when tudo.endereco_c is null then - split_part(tudo.endereco,''''§'''',6) - else split_part(tudo.endereco_c,''''§'''',6) + split_part(tudo.endereco,''§'',6) + else split_part(tudo.endereco_c,''§'',6) end )::varchar as c_nom_bairro , ( case when tudo.endereco_c is null then - split_part(tudo.endereco,''''§'''',7) - else split_part(tudo.endereco_c,''''§'''',7) + split_part(tudo.endereco,''§'',7) + else split_part(tudo.endereco_c,''§'',7) end )::varchar as c_cep , ( case when tudo.endereco_c is null then - split_part(tudo.endereco,''''§'''',8) - else split_part(tudo.endereco_c,''''§'''',8) + split_part(tudo.endereco,''§'',8) + else split_part(tudo.endereco_c,''§'',8) end )::varchar as c_cod_municipio , ( case when tudo.endereco_c is null then - split_part(tudo.endereco,''''§'''',9) - else split_part(tudo.endereco_c,''''§'''',9) + split_part(tudo.endereco,''§'',9) + else split_part(tudo.endereco_c,''§'',9) end )::varchar as c_nom_municipio , ( case when tudo.endereco_c is null then - split_part(tudo.endereco,''''§'''',10) - else split_part(tudo.endereco_c,''''§'''',10) + split_part(tudo.endereco,''§'',10) + else split_part(tudo.endereco_c,''§'',10) end )::varchar as c_cod_uf , ( case when tudo.endereco_c is null then - split_part(tudo.endereco,''''§'''',11) - else split_part(tudo.endereco_c,''''§'''',11) + split_part(tudo.endereco,''§'',11) + else split_part(tudo.endereco_c,''§'',11) end )::varchar as c_sigla_uf , ( case when tudo.endereco_c is null then null - else split_part(tudo.endereco_c,''''§'''',12) + else split_part(tudo.endereco_c,''§'',12) end )::varchar as c_caixa_postal - , split_part(lista_parcelas_unicas,''''§'''',1)::varchar as qtde_parcelas_unicas + , split_part(lista_parcelas_unicas,''§'',1)::varchar as qtde_parcelas_unicas - , ( case when ( split_part(lista_parcelas_unicas,''''§'''',1)::integer > 0 ) THEN - split_part(lista_parcelas_unicas,''''§'''',2) - ELSE '''''''' END + , ( case when ( split_part(lista_parcelas_unicas,''§'',1)::integer > 0 ) THEN + split_part(lista_parcelas_unicas,''§'',2) + ELSE '''' END )::varchar as cod_parcela_unica_1 - , ( case when ( split_part(lista_parcelas_unicas,''''§'''',1)::integer > 0 ) THEN - split_part(lista_parcelas_unicas,''''§'''',3) - ELSE '''''''' END + , ( case when ( split_part(lista_parcelas_unicas,''§'',1)::integer > 0 ) THEN + split_part(lista_parcelas_unicas,''§'',3) + ELSE '''' END )::varchar as valor_unica_1 - , ( case when ( split_part(lista_parcelas_unicas,''''§'''',1)::integer > 0 ) THEN - split_part(lista_parcelas_unicas,''''§'''',4) - ELSE '''''''' END + , ( case when ( split_part(lista_parcelas_unicas,''§'',1)::integer > 0 ) THEN + split_part(lista_parcelas_unicas,''§'',4) + ELSE '''' END )::varchar as vencimento_unica_1 - , ( case when ( split_part(lista_parcelas_unicas,''''§'''',1)::integer > 0 ) THEN - split_part(lista_parcelas_unicas,''''§'''',5) - ELSE '''''''' END + , ( case when ( split_part(lista_parcelas_unicas,''§'',1)::integer > 0 ) THEN + split_part(lista_parcelas_unicas,''§'',5) + ELSE '''' END )::varchar as desconto_unica_1 - , ( case when ( split_part(lista_parcelas_unicas,''''§'''',1)::integer > 0 ) THEN - split_part(lista_parcelas_unicas,''''§'''',6) - ELSE '''''''' END + , ( case when ( split_part(lista_parcelas_unicas,''§'',1)::integer > 0 ) THEN + split_part(lista_parcelas_unicas,''§'',6) + ELSE '''' END )::varchar as numeracao_unica_1 - , ( case when ( split_part(lista_parcelas_unicas,''''§'''',1)::integer > 0 ) THEN - split_part(lista_parcelas_unicas,''''§'''',6) - ELSE '''''''' END + , ( case when ( split_part(lista_parcelas_unicas,''§'',1)::integer > 0 ) THEN + split_part(lista_parcelas_unicas,''§'',6) + ELSE '''' END )::varchar as nosso_numero_unica_1 - , ( case when ( split_part(lista_parcelas_unicas,''''§'''',1)::integer > 0 ) THEN + , ( case when ( split_part(lista_parcelas_unicas,''§'',1)::integer > 0 ) THEN split_part ( -''; -IF ( stPadraoCodBarra = ''febrabanCompBBAnexo5'' ) THEN - stSql := stSql ||'' +'; +IF ( stPadraoCodBarra = 'febrabanCompBBAnexo5' ) THEN + stSql := stSql ||' arrecadacao.geraCodigoBarraFebrabanCompensacaoBBAnexo5 ( - split_part(lista_parcelas_unicas,''''§'''',8)::date, - split_part(lista_parcelas_unicas,''''§'''',5)::varchar, - split_part(lista_parcelas_unicas,''''§'''',6)::varchar, + split_part(lista_parcelas_unicas,''§'',8)::date, + split_part(lista_parcelas_unicas,''§'',5)::varchar, + split_part(lista_parcelas_unicas,''§'',6)::varchar, 9, - ''||inNumConvenio||'' + '||inNumConvenio||' )::varchar - ''; + '; ELSE - stSql := stSql ||'' + stSql := stSql ||' arrecadacao.geraCodigoBarraFebraban ( - split_part(lista_parcelas_unicas,''''§'''',8)::varchar, - split_part(lista_parcelas_unicas,''''§'''',5)::varchar, - split_part(lista_parcelas_unicas,''''§'''',6)::varchar, + split_part(lista_parcelas_unicas,''§'',8)::varchar, + split_part(lista_parcelas_unicas,''§'',5)::varchar, + split_part(lista_parcelas_unicas,''§'',6)::varchar, 6, - ''||inCodFebraban||'' + '||inCodFebraban||' )::varchar - ''; + '; END IF; -stSql := stSql ||'' +stSql := stSql ||' - , ''''§'''' + , ''§'' , 1 ) - ELSE '''''''' END + ELSE '''' END )::varchar as codigo_barra_unica_1 - , ( case when ( split_part(lista_parcelas_unicas,''''§'''',1)::integer > 0 ) THEN + , ( case when ( split_part(lista_parcelas_unicas,''§'',1)::integer > 0 ) THEN split_part ( -''; +'; -IF ( stPadraoCodBarra = ''febrabanCompBBAnexo5'' ) THEN - stSql := stSql ||'' +IF ( stPadraoCodBarra = 'febrabanCompBBAnexo5' ) THEN + stSql := stSql ||' arrecadacao.geraCodigoBarraFebrabanCompensacaoBBAnexo5 ( - split_part(lista_parcelas_unicas,''''§'''',8)::date, - split_part(lista_parcelas_unicas,''''§'''',5)::varchar, - split_part(lista_parcelas_unicas,''''§'''',6)::varchar, + split_part(lista_parcelas_unicas,''§'',8)::date, + split_part(lista_parcelas_unicas,''§'',5)::varchar, + split_part(lista_parcelas_unicas,''§'',6)::varchar, 9, - ''||inNumConvenio||'' + '||inNumConvenio||' )::varchar - ''; + '; ELSE - stSql := stSql ||'' + stSql := stSql ||' arrecadacao.geraCodigoBarraFebraban ( - split_part(lista_parcelas_unicas,''''§'''',8)::varchar, - split_part(lista_parcelas_unicas,''''§'''',5)::varchar, - split_part(lista_parcelas_unicas,''''§'''',6)::varchar, + split_part(lista_parcelas_unicas,''§'',8)::varchar, + split_part(lista_parcelas_unicas,''§'',5)::varchar, + split_part(lista_parcelas_unicas,''§'',6)::varchar, 6, - ''||inCodFebraban||'' + '||inCodFebraban||' )::varchar - ''; + '; END IF; -stSql := stSql ||'' +stSql := stSql ||' - , ''''§'''' + , ''§'' , 2 ) - ELSE '''''''' END + ELSE '''' END )::varchar as linha_digitavel_unica_1 - - - - , ( case when ( split_part(lista_parcelas_unicas,''''§'''',1)::integer > 1 ) THEN - split_part(lista_parcelas_unicas,''''§'''',9) - ELSE '''''''' END + , ( case when ( split_part(lista_parcelas_unicas,''§'',1)::integer > 1 ) THEN + split_part(lista_parcelas_unicas,''§'',9) + ELSE '''' END )::varchar as cod_parcela_unica_2 - , ( case when ( split_part(lista_parcelas_unicas,''''§'''',1)::integer > 1 ) THEN - split_part(lista_parcelas_unicas,''''§'''',10) - ELSE '''''''' END + , ( case when ( split_part(lista_parcelas_unicas,''§'',1)::integer > 1 ) THEN + split_part(lista_parcelas_unicas,''§'',10) + ELSE '''' END )::varchar as valor_unica_2 - , ( case when ( split_part(lista_parcelas_unicas,''''§'''',1)::integer > 1 ) THEN - split_part(lista_parcelas_unicas,''''§'''',11) - ELSE '''''''' END + , ( case when ( split_part(lista_parcelas_unicas,''§'',1)::integer > 1 ) THEN + split_part(lista_parcelas_unicas,''§'',11) + ELSE '''' END )::varchar as vencimento_unica_2 - , ( case when ( split_part(lista_parcelas_unicas,''''§'''',1)::integer > 1 ) THEN - split_part(lista_parcelas_unicas,''''§'''',12) - ELSE '''''''' END + , ( case when ( split_part(lista_parcelas_unicas,''§'',1)::integer > 1 ) THEN + split_part(lista_parcelas_unicas,''§'',12) + ELSE '''' END )::varchar as desconto_unica_2 - , ( case when ( split_part(lista_parcelas_unicas,''''§'''',1)::integer > 1 ) THEN - split_part(lista_parcelas_unicas,''''§'''',13) - ELSE '''''''' END + , ( case when ( split_part(lista_parcelas_unicas,''§'',1)::integer > 1 ) THEN + split_part(lista_parcelas_unicas,''§'',13) + ELSE '''' END )::varchar as numeracao_unica_2 - , ( case when ( split_part(lista_parcelas_unicas,''''§'''',1)::integer > 1 ) THEN - split_part(lista_parcelas_unicas,''''§'''',13) - ELSE '''''''' END + , ( case when ( split_part(lista_parcelas_unicas,''§'',1)::integer > 1 ) THEN + split_part(lista_parcelas_unicas,''§'',13) + ELSE '''' END )::varchar as nosso_numero_unica_2 - , ( case when ( split_part(lista_parcelas_unicas,''''§'''',1)::integer > 1 ) THEN - split_part ( ''; + , ( case when ( split_part(lista_parcelas_unicas,''§'',1)::integer > 1 ) THEN + split_part ( + '; -IF ( stPadraoCodBarra = ''febrabanCompBBAnexo5'' ) THEN - stSql := stSql ||'' +IF ( stPadraoCodBarra = 'febrabanCompBBAnexo5' ) THEN + stSql := stSql ||' arrecadacao.geraCodigoBarraFebrabanCompensacaoBBAnexo5 ( - split_part(lista_parcelas_unicas,''''§'''',15)::date, - split_part(lista_parcelas_unicas,''''§'''',12)::varchar, - split_part(lista_parcelas_unicas,''''§'''',13)::varchar, + split_part(lista_parcelas_unicas,''§'',15)::date, + split_part(lista_parcelas_unicas,''§'',12)::varchar, + split_part(lista_parcelas_unicas,''§'',13)::varchar, 9, - ''||inNumConvenio||'' + '||inNumConvenio||' )::varchar - ''; + '; ELSE - stSql := stSql ||'' + stSql := stSql ||' arrecadacao.geraCodigoBarraFebraban ( - split_part(lista_parcelas_unicas,''''§'''',15)::varchar, - split_part(lista_parcelas_unicas,''''§'''',12)::varchar, - split_part(lista_parcelas_unicas,''''§'''',13)::varchar, + split_part(lista_parcelas_unicas,''§'',15)::varchar, + split_part(lista_parcelas_unicas,''§'',12)::varchar, + split_part(lista_parcelas_unicas,''§'',13)::varchar, 6, - ''||inCodFebraban||'' + '||inCodFebraban||' )::varchar - ''; + '; END IF; -stSql := stSql ||'' +stSql := stSql ||' - , ''''§'''' + , ''§'' , 1 ) - ELSE '''''''' END + ELSE '''' END )::varchar as codigo_barra_unica_2 - , ( case when ( split_part(lista_parcelas_unicas,''''§'''',1)::integer > 1 ) THEN + , ( case when ( split_part(lista_parcelas_unicas,''§'',1)::integer > 1 ) THEN split_part ( + '; - -''; -IF ( stPadraoCodBarra = ''febrabanCompBBAnexo5'' ) THEN - stSql := stSql ||'' +IF ( stPadraoCodBarra = 'febrabanCompBBAnexo5' ) THEN + stSql := stSql ||' arrecadacao.geraCodigoBarraFebrabanCompensacaoBBAnexo5 ( - split_part(lista_parcelas_unicas,''''§'''',15)::date, - split_part(lista_parcelas_unicas,''''§'''',12)::varchar, - split_part(lista_parcelas_unicas,''''§'''',13)::varchar, + split_part(lista_parcelas_unicas,''§'',15)::date, + split_part(lista_parcelas_unicas,''§'',12)::varchar, + split_part(lista_parcelas_unicas,''§'',13)::varchar, 9, - ''||inNumConvenio||'' + '||inNumConvenio||' )::varchar - ''; + '; ELSE - stSql := stSql ||'' + stSql := stSql ||' arrecadacao.geraCodigoBarraFebraban ( - split_part(lista_parcelas_unicas,''''§'''',15)::varchar, - split_part(lista_parcelas_unicas,''''§'''',12)::varchar, - split_part(lista_parcelas_unicas,''''§'''',13)::varchar, + split_part(lista_parcelas_unicas,''§'',15)::varchar, + split_part(lista_parcelas_unicas,''§'',12)::varchar, + split_part(lista_parcelas_unicas,''§'',13)::varchar, 6, - ''||inCodFebraban||'' + '||inCodFebraban||' )::varchar - ''; + '; END IF; -stSql := stSql ||'' - , ''''§'''' +stSql := stSql ||' + , ''§'' , 2 ) - ELSE '''''''' END + ELSE '''' END )::varchar as linha_digitavel_unica_2 - - - - - - , ( case when ( split_part(lista_parcelas_unicas,''''§'''',1)::integer > 2 ) THEN - split_part(lista_parcelas_unicas,''''§'''',16) - ELSE '''''''' END + , ( case when ( split_part(lista_parcelas_unicas,''§'',1)::integer > 2 ) THEN + split_part(lista_parcelas_unicas,''§'',16) + ELSE '''' END )::varchar as cod_parcela_unica_3 - , ( case when ( split_part(lista_parcelas_unicas,''''§'''',1)::integer > 2 ) THEN - split_part(lista_parcelas_unicas,''''§'''',17) - ELSE '''''''' END + , ( case when ( split_part(lista_parcelas_unicas,''§'',1)::integer > 2 ) THEN + split_part(lista_parcelas_unicas,''§'',17) + ELSE '''' END )::varchar as valor_unica_3 - , ( case when ( split_part(lista_parcelas_unicas,''''§'''',1)::integer > 2 ) THEN - split_part(lista_parcelas_unicas,''''§'''',18) - ELSE '''''''' END + , ( case when ( split_part(lista_parcelas_unicas,''§'',1)::integer > 2 ) THEN + split_part(lista_parcelas_unicas,''§'',18) + ELSE '''' END )::varchar as vencimento_unica_3 - , ( case when ( split_part(lista_parcelas_unicas,''''§'''',1)::integer > 2 ) THEN - split_part(lista_parcelas_unicas,''''§'''',19) - ELSE '''''''' END + , ( case when ( split_part(lista_parcelas_unicas,''§'',1)::integer > 2 ) THEN + split_part(lista_parcelas_unicas,''§'',19) + ELSE '''' END )::varchar as desconto_unica_3 - , ( case when ( split_part(lista_parcelas_unicas,''''§'''',1)::integer > 2 ) THEN - split_part(lista_parcelas_unicas,''''§'''',20) - ELSE '''''''' END + , ( case when ( split_part(lista_parcelas_unicas,''§'',1)::integer > 2 ) THEN + split_part(lista_parcelas_unicas,''§'',20) + ELSE '''' END )::varchar as numeracao_unica_3 - , ( case when ( split_part(lista_parcelas_unicas,''''§'''',1)::integer > 2 ) THEN - split_part(lista_parcelas_unicas,''''§'''',20) - ELSE '''''''' END + , ( case when ( split_part(lista_parcelas_unicas,''§'',1)::integer > 2 ) THEN + split_part(lista_parcelas_unicas,''§'',20) + ELSE '''' END )::varchar as nosso_numero_unica_3 - , ( case when ( split_part(lista_parcelas_unicas,''''§'''',1)::integer > 2 ) THEN + , ( case when ( split_part(lista_parcelas_unicas,''§'',1)::integer > 2 ) THEN split_part ( + '; -''; -IF ( stPadraoCodBarra = ''febrabanCompBBAnexo5'' ) THEN - stSql := stSql ||'' +IF ( stPadraoCodBarra = 'febrabanCompBBAnexo5' ) THEN + stSql := stSql ||' arrecadacao.geraCodigoBarraFebrabanCompensacaoBBAnexo5 ( - split_part(lista_parcelas_unicas,''''§'''',22)::date, - split_part(lista_parcelas_unicas,''''§'''',19)::varchar, - split_part(lista_parcelas_unicas,''''§'''',20)::varchar, + split_part(lista_parcelas_unicas,''§'',22)::date, + split_part(lista_parcelas_unicas,''§'',19)::varchar, + split_part(lista_parcelas_unicas,''§'',20)::varchar, 9, - ''||inNumConvenio||'' + '||inNumConvenio||' )::varchar - ''; + '; ELSE - stSql := stSql ||'' + stSql := stSql ||' arrecadacao.geraCodigoBarraFebraban ( - split_part(lista_parcelas_unicas,''''§'''',22)::varchar, - split_part(lista_parcelas_unicas,''''§'''',19)::varchar, - split_part(lista_parcelas_unicas,''''§'''',20)::varchar, + split_part(lista_parcelas_unicas,''§'',22)::varchar, + split_part(lista_parcelas_unicas,''§'',19)::varchar, + split_part(lista_parcelas_unicas,''§'',20)::varchar, 6, - ''||inCodFebraban||'' + '||inCodFebraban||' )::varchar - ''; + '; END IF; -stSql := stSql ||'' - , ''''§'''' +stSql := stSql ||' + , ''§'' , 1 ) - ELSE '''''''' END + ELSE '''' END )::varchar as codigo_barra_unica_3 - , ( case when ( split_part(lista_parcelas_unicas,''''§'''',1)::integer > 2 ) THEN + , ( case when ( split_part(lista_parcelas_unicas,''§'',1)::integer > 2 ) THEN split_part ( -''; -IF ( stPadraoCodBarra = ''febrabanCompBBAnexo5'' ) THEN - stSql := stSql ||'' + '; + +IF ( stPadraoCodBarra = 'febrabanCompBBAnexo5' ) THEN + stSql := stSql ||' arrecadacao.geraCodigoBarraFebrabanCompensacaoBBAnexo5 ( - split_part(lista_parcelas_unicas,''''§'''',22)::date, - split_part(lista_parcelas_unicas,''''§'''',19)::varchar, - split_part(lista_parcelas_unicas,''''§'''',20)::varchar, + split_part(lista_parcelas_unicas,''§'',22)::date, + split_part(lista_parcelas_unicas,''§'',19)::varchar, + split_part(lista_parcelas_unicas,''§'',20)::varchar, 9, - ''||inNumConvenio||'' + '||inNumConvenio||' )::varchar - ''; + '; ELSE - stSql := stSql ||'' + stSql := stSql ||' arrecadacao.geraCodigoBarraFebraban ( - split_part(lista_parcelas_unicas,''''§'''',22)::varchar, - split_part(lista_parcelas_unicas,''''§'''',19)::varchar, - split_part(lista_parcelas_unicas,''''§'''',20)::varchar, + split_part(lista_parcelas_unicas,''§'',22)::varchar, + split_part(lista_parcelas_unicas,''§'',19)::varchar, + split_part(lista_parcelas_unicas,''§'',20)::varchar, 6, - ''||inCodFebraban||'' + '||inCodFebraban||' )::varchar - ''; + '; END IF; -stSql := stSql ||'' - , ''''§'''' +stSql := stSql ||' + , ''§'' , 2 ) - ELSE '''''''' END + ELSE '''' END )::varchar as linha_digitavel_unica_3 - - - - - , ( case when ( split_part(lista_parcelas_unicas,''''§'''',1)::integer > 3 ) THEN - split_part(lista_parcelas_unicas,''''§'''',23) - ELSE '''''''' END + , ( case when ( split_part(lista_parcelas_unicas,''§'',1)::integer > 3 ) THEN + split_part(lista_parcelas_unicas,''§'',23) + ELSE '''' END )::varchar as cod_parcela_unica_4 - , ( case when ( split_part(lista_parcelas_unicas,''''§'''',1)::integer > 3 ) THEN - split_part(lista_parcelas_unicas,''''§'''',24) - ELSE '''''''' END + , ( case when ( split_part(lista_parcelas_unicas,''§'',1)::integer > 3 ) THEN + split_part(lista_parcelas_unicas,''§'',24) + ELSE '''' END )::varchar as valor_unica_4 - , ( case when ( split_part(lista_parcelas_unicas,''''§'''',1)::integer > 3 ) THEN - split_part(lista_parcelas_unicas,''''§'''',25) - ELSE '''''''' END + , ( case when ( split_part(lista_parcelas_unicas,''§'',1)::integer > 3 ) THEN + split_part(lista_parcelas_unicas,''§'',25) + ELSE '''' END )::varchar as vencimento_unica_4 - , ( case when ( split_part(lista_parcelas_unicas,''''§'''',1)::integer > 3 ) THEN - split_part(lista_parcelas_unicas,''''§'''',26) - ELSE '''''''' END + , ( case when ( split_part(lista_parcelas_unicas,''§'',1)::integer > 3 ) THEN + split_part(lista_parcelas_unicas,''§'',26) + ELSE '''' END )::varchar as desconto_unica_4 - , ( case when ( split_part(lista_parcelas_unicas,''''§'''',1)::integer > 3 ) THEN - split_part(lista_parcelas_unicas,''''§'''',27) - ELSE '''''''' END + , ( case when ( split_part(lista_parcelas_unicas,''§'',1)::integer > 3 ) THEN + split_part(lista_parcelas_unicas,''§'',27) + ELSE '''' END )::varchar as numeracao_unica_4 - , ( case when ( split_part(lista_parcelas_unicas,''''§'''',1)::integer > 3 ) THEN - split_part(lista_parcelas_unicas,''''§'''',27) - ELSE '''''''' END + , ( case when ( split_part(lista_parcelas_unicas,''§'',1)::integer > 3 ) THEN + split_part(lista_parcelas_unicas,''§'',27) + ELSE '''' END )::varchar as nosso_numero_unica_4 - , ( case when ( split_part(lista_parcelas_unicas,''''§'''',1)::integer > 3 ) THEN + , ( case when ( split_part(lista_parcelas_unicas,''§'',1)::integer > 3 ) THEN split_part ( -''; -IF ( stPadraoCodBarra = ''febrabanCompBBAnexo5'' ) THEN - stSql := stSql ||'' + '; + +IF ( stPadraoCodBarra = 'febrabanCompBBAnexo5' ) THEN + stSql := stSql ||' arrecadacao.geraCodigoBarraFebrabanCompensacaoBBAnexo5 ( - split_part(lista_parcelas_unicas,''''§'''',29)::date, - split_part(lista_parcelas_unicas,''''§'''',26)::varchar, - split_part(lista_parcelas_unicas,''''§'''',27)::varchar, + split_part(lista_parcelas_unicas,''§'',29)::date, + split_part(lista_parcelas_unicas,''§'',26)::varchar, + split_part(lista_parcelas_unicas,''§'',27)::varchar, 9, - ''||inNumConvenio||'' + '||inNumConvenio||' )::varchar - ''; + '; ELSE - stSql := stSql ||'' + stSql := stSql ||' arrecadacao.geraCodigoBarraFebraban ( - split_part(lista_parcelas_unicas,''''§'''',29)::varchar, - split_part(lista_parcelas_unicas,''''§'''',26)::varchar, - split_part(lista_parcelas_unicas,''''§'''',27)::varchar, + split_part(lista_parcelas_unicas,''§'',29)::varchar, + split_part(lista_parcelas_unicas,''§'',26)::varchar, + split_part(lista_parcelas_unicas,''§'',27)::varchar, 6, - ''||inCodFebraban||'' + '||inCodFebraban||' )::varchar - ''; + '; END IF; -stSql := stSql ||'' - , ''''§'''' +stSql := stSql ||' + , ''§'' , 1 ) - ELSE '''''''' END + ELSE '''' END )::varchar as codigo_barra_unica_4 - , ( case when ( split_part(lista_parcelas_unicas,''''§'''',1)::integer > 3 ) THEN + , ( case when ( split_part(lista_parcelas_unicas,''§'',1)::integer > 3 ) THEN split_part ( -''; -IF ( stPadraoCodBarra = ''febrabanCompBBAnexo5'' ) THEN - stSql := stSql ||'' + '; + +IF ( stPadraoCodBarra = 'febrabanCompBBAnexo5' ) THEN + stSql := stSql ||' arrecadacao.geraCodigoBarraFebrabanCompensacaoBBAnexo5 ( - split_part(lista_parcelas_unicas,''''§'''',29)::date, - split_part(lista_parcelas_unicas,''''§'''',26)::varchar, - split_part(lista_parcelas_unicas,''''§'''',27)::varchar, + split_part(lista_parcelas_unicas,''§'',29)::date, + split_part(lista_parcelas_unicas,''§'',26)::varchar, + split_part(lista_parcelas_unicas,''§'',27)::varchar, 9, - ''||inNumConvenio||'' + '||inNumConvenio||' )::varchar - ''; + '; ELSE - stSql := stSql ||'' + stSql := stSql ||' arrecadacao.geraCodigoBarraFebraban ( - split_part(lista_parcelas_unicas,''''§'''',29)::varchar, - split_part(lista_parcelas_unicas,''''§'''',26)::varchar, - split_part(lista_parcelas_unicas,''''§'''',27)::varchar, + split_part(lista_parcelas_unicas,''§'',29)::varchar, + split_part(lista_parcelas_unicas,''§'',26)::varchar, + split_part(lista_parcelas_unicas,''§'',27)::varchar, 6, - ''||inCodFebraban||'' + '||inCodFebraban||' )::varchar - ''; + '; END IF; -stSql := stSql ||'' - , ''''§'''' +stSql := stSql ||' + , ''§'' , 2 ) - ELSE '''''''' END + ELSE '''' END )::varchar as linha_digitavel_unica_4 - - - - - , ( case when ( split_part(lista_parcelas_unicas,''''§'''',1)::integer > 3 ) THEN - split_part(lista_parcelas_unicas,''''§'''',30) - ELSE '''''''' END + , ( case when ( split_part(lista_parcelas_unicas,''§'',1)::integer > 3 ) THEN + split_part(lista_parcelas_unicas,''§'',30) + ELSE '''' END )::varchar as cod_parcela_unica_5 - , ( case when ( split_part(lista_parcelas_unicas,''''§'''',1)::integer > 3 ) THEN - split_part(lista_parcelas_unicas,''''§'''',31) - ELSE '''''''' END + , ( case when ( split_part(lista_parcelas_unicas,''§'',1)::integer > 3 ) THEN + split_part(lista_parcelas_unicas,''§'',31) + ELSE '''' END )::varchar as valor_unica_5 - , ( case when ( split_part(lista_parcelas_unicas,''''§'''',1)::integer > 3 ) THEN - split_part(lista_parcelas_unicas,''''§'''',32) - ELSE '''''''' END + , ( case when ( split_part(lista_parcelas_unicas,''§'',1)::integer > 3 ) THEN + split_part(lista_parcelas_unicas,''§'',32) + ELSE '''' END )::varchar as vencimento_unica_5 - , ( case when ( split_part(lista_parcelas_unicas,''''§'''',1)::integer > 3 ) THEN - split_part(lista_parcelas_unicas,''''§'''',33) - ELSE '''''''' END + , ( case when ( split_part(lista_parcelas_unicas,''§'',1)::integer > 3 ) THEN + split_part(lista_parcelas_unicas,''§'',33) + ELSE '''' END )::varchar as desconto_unica_5 - , ( case when ( split_part(lista_parcelas_unicas,''''§'''',1)::integer > 3 ) THEN - split_part(lista_parcelas_unicas,''''§'''',34) - ELSE '''''''' END + , ( case when ( split_part(lista_parcelas_unicas,''§'',1)::integer > 3 ) THEN + split_part(lista_parcelas_unicas,''§'',34) + ELSE '''' END )::varchar as numeracao_unica_5 - , ( case when ( split_part(lista_parcelas_unicas,''''§'''',1)::integer > 3 ) THEN - split_part(lista_parcelas_unicas,''''§'''',34) - ELSE '''''''' END + , ( case when ( split_part(lista_parcelas_unicas,''§'',1)::integer > 3 ) THEN + split_part(lista_parcelas_unicas,''§'',34) + ELSE '''' END )::varchar as nosso_numero_unica_5 - , ( case when ( split_part(lista_parcelas_unicas,''''§'''',1)::integer > 3 ) THEN + , ( case when ( split_part(lista_parcelas_unicas,''§'',1)::integer > 3 ) THEN split_part ( -''; -IF ( stPadraoCodBarra = ''febrabanCompBBAnexo5'' ) THEN - stSql := stSql ||'' + '; + +IF ( stPadraoCodBarra = 'febrabanCompBBAnexo5' ) THEN + stSql := stSql ||' arrecadacao.geraCodigoBarraFebrabanCompensacaoBBAnexo5 ( - split_part(lista_parcelas_unicas,''''§'''',36)::date, - split_part(lista_parcelas_unicas,''''§'''',33)::varchar, - split_part(lista_parcelas_unicas,''''§'''',34)::varchar, + split_part(lista_parcelas_unicas,''§'',36)::date, + split_part(lista_parcelas_unicas,''§'',33)::varchar, + split_part(lista_parcelas_unicas,''§'',34)::varchar, 9, - ''||inNumConvenio||'' + '||inNumConvenio||' )::varchar - ''; + '; ELSE - stSql := stSql ||'' + stSql := stSql ||' arrecadacao.geraCodigoBarraFebraban ( - split_part(lista_parcelas_unicas,''''§'''',36)::varchar, - split_part(lista_parcelas_unicas,''''§'''',33)::varchar, - split_part(lista_parcelas_unicas,''''§'''',34)::varchar, + split_part(lista_parcelas_unicas,''§'',36)::varchar, + split_part(lista_parcelas_unicas,''§'',33)::varchar, + split_part(lista_parcelas_unicas,''§'',34)::varchar, 6, - ''||inCodFebraban||'' + '||inCodFebraban||' )::varchar - ''; + '; END IF; -stSql := stSql ||'' - , ''''§'''' +stSql := stSql ||' + , ''§'' , 1 ) - ELSE '''''''' END + ELSE '''' END )::varchar as codigo_barra_unica_5 - , ( case when ( split_part(lista_parcelas_unicas,''''§'''',1)::integer > 3 ) THEN + , ( case when ( split_part(lista_parcelas_unicas,''§'',1)::integer > 3 ) THEN split_part ( -''; -IF ( stPadraoCodBarra = ''febrabanCompBBAnexo5'' ) THEN - stSql := stSql ||'' + '; + +IF ( stPadraoCodBarra = 'febrabanCompBBAnexo5' ) THEN + stSql := stSql ||' arrecadacao.geraCodigoBarraFebrabanCompensacaoBBAnexo5 ( - split_part(lista_parcelas_unicas,''''§'''',36)::date, - split_part(lista_parcelas_unicas,''''§'''',33)::varchar, - split_part(lista_parcelas_unicas,''''§'''',34)::varchar, + split_part(lista_parcelas_unicas,''§'',36)::date, + split_part(lista_parcelas_unicas,''§'',33)::varchar, + split_part(lista_parcelas_unicas,''§'',34)::varchar, 9, - ''||inNumConvenio||'' + '||inNumConvenio||' )::varchar - ''; + '; ELSE - stSql := stSql ||'' + stSql := stSql ||' arrecadacao.geraCodigoBarraFebraban ( - split_part(lista_parcelas_unicas,''''§'''',36)::varchar, - split_part(lista_parcelas_unicas,''''§'''',33)::varchar, - split_part(lista_parcelas_unicas,''''§'''',34)::varchar, + split_part(lista_parcelas_unicas,''§'',36)::varchar, + split_part(lista_parcelas_unicas,''§'',33)::varchar, + split_part(lista_parcelas_unicas,''§'',34)::varchar, 6, - ''||inCodFebraban||'' + '||inCodFebraban||' )::varchar - ''; + '; END IF; -stSql := stSql ||'' - , ''''§'''' +stSql := stSql ||' + , ''§'' , 2 ) - ELSE '''''''' END + ELSE '''' END )::varchar as linha_digitavel_unica_5 + , split_part(lista_parcelas_normais,''§'',1)::varchar as qtde_parcelas_normais - - - - , split_part(lista_parcelas_normais,''''§'''',1)::varchar as qtde_parcelas_normais - - - - , ( case when ( split_part(lista_parcelas_normais,''''§'''',1)::integer > 0 ) THEN - split_part(lista_parcelas_normais,''''§'''',2) - ELSE '''''''' END + , ( case when ( split_part(lista_parcelas_normais,''§'',1)::integer > 0 ) THEN + split_part(lista_parcelas_normais,''§'',2) + ELSE '''' END )::varchar as cod_parcela_normal_1 - , ( case when ( split_part(lista_parcelas_normais,''''§'''',1)::integer > 0 ) THEN - split_part(lista_parcelas_normais,''''§'''',3) - ELSE '''''''' END + , ( case when ( split_part(lista_parcelas_normais,''§'',1)::integer > 0 ) THEN + split_part(lista_parcelas_normais,''§'',3) + ELSE '''' END )::varchar as valor_normal_1 - , ( case when ( split_part(lista_parcelas_normais,''''§'''',1)::integer > 0 ) THEN - split_part(lista_parcelas_normais,''''§'''',4) - ELSE '''''''' END + , ( case when ( split_part(lista_parcelas_normais,''§'',1)::integer > 0 ) THEN + split_part(lista_parcelas_normais,''§'',4) + ELSE '''' END )::varchar as vencimento_normal_1 - , ( case when ( split_part(lista_parcelas_normais,''''§'''',1)::integer > 0 ) THEN - split_part(lista_parcelas_normais,''''§'''',5) - ELSE '''''''' END + , ( case when ( split_part(lista_parcelas_normais,''§'',1)::integer > 0 ) THEN + split_part(lista_parcelas_normais,''§'',5) + ELSE '''' END )::varchar as numeracao_normal_1 - , ( case when ( split_part(lista_parcelas_normais,''''§'''',1)::integer > 0 ) THEN - split_part(lista_parcelas_normais,''''§'''',5) - ELSE '''''''' END + , ( case when ( split_part(lista_parcelas_normais,''§'',1)::integer > 0 ) THEN + split_part(lista_parcelas_normais,''§'',5) + ELSE '''' END )::varchar as nosso_numero_normal_1 - , ( case when ( split_part(lista_parcelas_normais,''''§'''',1)::integer > 0 ) THEN + , ( case when ( split_part(lista_parcelas_normais,''§'',1)::integer > 0 ) THEN split_part ( -''; -IF ( stPadraoCodBarra = ''febrabanCompBBAnexo5'' ) THEN - stSql := stSql ||'' + '; + +IF ( stPadraoCodBarra = 'febrabanCompBBAnexo5' ) THEN + stSql := stSql ||' arrecadacao.geraCodigoBarraFebrabanCompensacaoBBAnexo5 ( - split_part(lista_parcelas_normais,''''§'''',7)::date, - split_part(lista_parcelas_normais,''''§'''',3)::varchar, - split_part(lista_parcelas_normais,''''§'''',5)::varchar, + split_part(lista_parcelas_normais,''§'',7)::date, + split_part(lista_parcelas_normais,''§'',3)::varchar, + split_part(lista_parcelas_normais,''§'',5)::varchar, 9, - ''||inNumConvenio||'' + '||inNumConvenio||' )::varchar - ''; + '; ELSE - stSql := stSql ||'' + stSql := stSql ||' arrecadacao.geraCodigoBarraFebraban ( - split_part(lista_parcelas_normais,''''§'''',7)::varchar, - split_part(lista_parcelas_normais,''''§'''',3)::varchar, - split_part(lista_parcelas_normais,''''§'''',5)::varchar, + split_part(lista_parcelas_normais,''§'',7)::varchar, + split_part(lista_parcelas_normais,''§'',3)::varchar, + split_part(lista_parcelas_normais,''§'',5)::varchar, 7, - ''||inCodFebraban||'' + '||inCodFebraban||' )::varchar - ''; + '; END IF; -stSql := stSql ||'' - , ''''§'''' +stSql := stSql ||' + , ''§'' , 1 ) - ELSE '''''''' END + ELSE '''' END )::varchar as codigo_barra_normal_1 - , ( case when ( split_part(lista_parcelas_normais,''''§'''',1)::integer > 0 ) THEN + , ( case when ( split_part(lista_parcelas_normais,''§'',1)::integer > 0 ) THEN split_part ( -''; -IF ( stPadraoCodBarra = ''febrabanCompBBAnexo5'' ) THEN - stSql := stSql ||'' + '; + +IF ( stPadraoCodBarra = 'febrabanCompBBAnexo5' ) THEN + stSql := stSql ||' arrecadacao.geraCodigoBarraFebrabanCompensacaoBBAnexo5 ( - split_part(lista_parcelas_normais,''''§'''',7)::date, - split_part(lista_parcelas_normais,''''§'''',3)::varchar, - split_part(lista_parcelas_normais,''''§'''',5)::varchar, + split_part(lista_parcelas_normais,''§'',7)::date, + split_part(lista_parcelas_normais,''§'',3)::varchar, + split_part(lista_parcelas_normais,''§'',5)::varchar, 9, - ''||inNumConvenio||'' + '||inNumConvenio||' )::varchar - ''; + '; ELSE - stSql := stSql ||'' + stSql := stSql ||' arrecadacao.geraCodigoBarraFebraban ( - split_part(lista_parcelas_normais,''''§'''',7)::varchar, - split_part(lista_parcelas_normais,''''§'''',3)::varchar, - split_part(lista_parcelas_normais,''''§'''',5)::varchar, + split_part(lista_parcelas_normais,''§'',7)::varchar, + split_part(lista_parcelas_normais,''§'',3)::varchar, + split_part(lista_parcelas_normais,''§'',5)::varchar, 7, - ''||inCodFebraban||'' + '||inCodFebraban||' )::varchar - ''; + '; END IF; -stSql := stSql ||'' - , ''''§'''' +stSql := stSql ||' + , ''§'' , 2 ) - ELSE '''''''' END + ELSE '''' END )::varchar as linha_digitavel_normal_1 - - - - - - - , ( case when ( split_part(lista_parcelas_normais,''''§'''',1)::integer > 1 ) THEN - split_part(lista_parcelas_normais,''''§'''',8) - ELSE '''''''' END + + , ( case when ( split_part(lista_parcelas_normais,''§'',1)::integer > 1 ) THEN + split_part(lista_parcelas_normais,''§'',8) + ELSE '''' END )::varchar as cod_parcela_normal_2 - , ( case when ( split_part(lista_parcelas_normais,''''§'''',1)::integer > 1 ) THEN - split_part(lista_parcelas_normais,''''§'''',9) - ELSE '''''''' END + , ( case when ( split_part(lista_parcelas_normais,''§'',1)::integer > 1 ) THEN + split_part(lista_parcelas_normais,''§'',9) + ELSE '''' END )::varchar as valor_normal_2 - , ( case when ( split_part(lista_parcelas_normais,''''§'''',1)::integer > 1 ) THEN - split_part(lista_parcelas_normais,''''§'''',10) - ELSE '''''''' END + , ( case when ( split_part(lista_parcelas_normais,''§'',1)::integer > 1 ) THEN + split_part(lista_parcelas_normais,''§'',10) + ELSE '''' END )::varchar as vencimento_normal_2 - , ( case when ( split_part(lista_parcelas_normais,''''§'''',1)::integer > 1 ) THEN - split_part(lista_parcelas_normais,''''§'''',11) - ELSE '''''''' END + , ( case when ( split_part(lista_parcelas_normais,''§'',1)::integer > 1 ) THEN + split_part(lista_parcelas_normais,''§'',11) + ELSE '''' END )::varchar as numeracao_normal_2 - , ( case when ( split_part(lista_parcelas_normais,''''§'''',1)::integer > 1 ) THEN - split_part(lista_parcelas_normais,''''§'''',11) - ELSE '''''''' END + , ( case when ( split_part(lista_parcelas_normais,''§'',1)::integer > 1 ) THEN + split_part(lista_parcelas_normais,''§'',11) + ELSE '''' END )::varchar as nosso_numero_normal_2 - , ( case when ( split_part(lista_parcelas_normais,''''§'''',1)::integer > 1 ) THEN + , ( case when ( split_part(lista_parcelas_normais,''§'',1)::integer > 1 ) THEN split_part ( -''; -IF ( stPadraoCodBarra = ''febrabanCompBBAnexo5'' ) THEN - stSql := stSql ||'' + '; + +IF ( stPadraoCodBarra = 'febrabanCompBBAnexo5' ) THEN + stSql := stSql ||' arrecadacao.geraCodigoBarraFebrabanCompensacaoBBAnexo5 ( - split_part(lista_parcelas_normais,''''§'''',13)::date, - split_part(lista_parcelas_normais,''''§'''',9)::varchar, - split_part(lista_parcelas_normais,''''§'''',11)::varchar, + split_part(lista_parcelas_normais,''§'',13)::date, + split_part(lista_parcelas_normais,''§'',9)::varchar, + split_part(lista_parcelas_normais,''§'',11)::varchar, 9, - ''||inNumConvenio||'' + '||inNumConvenio||' )::varchar - ''; + '; ELSE - stSql := stSql ||'' + stSql := stSql ||' arrecadacao.geraCodigoBarraFebraban ( - split_part(lista_parcelas_normais,''''§'''',13)::varchar, - split_part(lista_parcelas_normais,''''§'''',9)::varchar, - split_part(lista_parcelas_normais,''''§'''',11)::varchar, + split_part(lista_parcelas_normais,''§'',13)::varchar, + split_part(lista_parcelas_normais,''§'',9)::varchar, + split_part(lista_parcelas_normais,''§'',11)::varchar, 7, - ''||inCodFebraban||'' + '||inCodFebraban||' )::varchar - ''; + '; END IF; -stSql := stSql ||'' +stSql := stSql ||' - , ''''§'''' + , ''§'' , 1 ) - ELSE '''''''' END + ELSE '''' END )::varchar as codigo_barra_normal_2 - , LTRIM( case when ( split_part(lista_parcelas_normais,''''§'''',1)::integer > 1 ) THEN + , LTRIM( case when ( split_part(lista_parcelas_normais,''§'',1)::integer > 1 ) THEN split_part ( -''; + '; -IF ( stPadraoCodBarra = ''febrabanCompBBAnexo5'' ) THEN - stSql := stSql ||'' +IF ( stPadraoCodBarra = 'febrabanCompBBAnexo5' ) THEN + stSql := stSql ||' arrecadacao.geraCodigoBarraFebrabanCompensacaoBBAnexo5 ( - split_part(lista_parcelas_normais,''''§'''',13)::date, - split_part(lista_parcelas_normais,''''§'''',9)::varchar, - split_part(lista_parcelas_normais,''''§'''',11)::varchar, + split_part(lista_parcelas_normais,''§'',13)::date, + split_part(lista_parcelas_normais,''§'',9)::varchar, + split_part(lista_parcelas_normais,''§'',11)::varchar, 9, - ''||inNumConvenio||'' + '||inNumConvenio||' )::varchar - ''; + '; ELSE - stSql := stSql ||'' + stSql := stSql ||' arrecadacao.geraCodigoBarraFebraban ( - split_part(lista_parcelas_normais,''''§'''',13)::varchar, - split_part(lista_parcelas_normais,''''§'''',9)::varchar, - split_part(lista_parcelas_normais,''''§'''',11)::varchar, + split_part(lista_parcelas_normais,''§'',13)::varchar, + split_part(lista_parcelas_normais,''§'',9)::varchar, + split_part(lista_parcelas_normais,''§'',11)::varchar, 7, - ''||inCodFebraban||'' + '||inCodFebraban||' )::varchar - ''; + '; END IF; -stSql := stSql ||'' - , ''''§'''' +stSql := stSql ||' + , ''§'' , 2 ) - ELSE '''''''' END + ELSE '''' END )::varchar as linha_digitavel_normal_2 --- , ( case when ( split_part(lista_parcelas_normais,''''§'''',1)::integer > 1 ) THEN +-- , ( case when ( split_part(lista_parcelas_normais,''§'',1)::integer > 1 ) THEN -- split_part ( -- arrecadacao.geraCodigoBarraFebraban ( --- split_part(lista_parcelas_normais,''''§'''',13)::varchar --- , split_part(lista_parcelas_normais,''''§'''',9)::varchar --- , split_part(lista_parcelas_normais,''''§'''',11)::varchar +-- split_part(lista_parcelas_normais ,''§'',13)::varchar +-- , split_part(lista_parcelas_normais,''§'',9)::varchar +-- , split_part(lista_parcelas_normais,''§'',11)::varchar -- , 7 --- , ''||inCodFebraban||'' +-- , '||inCodFebraban||' -- )::varchar --- , ''''§'''' +-- , ''§'' -- , 2 -- ) --- ELSE '''''''' END +-- ELSE '''' END -- )::varchar as linha_digitavel_normal_2 - - - , ( case when ( split_part(lista_parcelas_normais,''''§'''',1)::integer > 2 ) THEN - split_part(lista_parcelas_normais,''''§'''',14) - ELSE '''''''' END + , ( case when ( split_part(lista_parcelas_normais,''§'',1)::integer > 2 ) THEN + split_part(lista_parcelas_normais,''§'',14) + ELSE '''' END )::varchar as cod_parcela_normal_3 - , ( case when ( split_part(lista_parcelas_normais,''''§'''',1)::integer > 2 ) THEN - split_part(lista_parcelas_normais,''''§'''',15) - ELSE '''''''' END + , ( case when ( split_part(lista_parcelas_normais,''§'',1)::integer > 2 ) THEN + split_part(lista_parcelas_normais,''§'',15) + ELSE '''' END )::varchar as valor_normal_3 - , ( case when ( split_part(lista_parcelas_normais,''''§'''',1)::integer > 2 ) THEN - split_part(lista_parcelas_normais,''''§'''',16) - ELSE '''''''' END + , ( case when ( split_part(lista_parcelas_normais,''§'',1)::integer > 2 ) THEN + split_part(lista_parcelas_normais,''§'',16) + ELSE '''' END )::varchar as vencimento_normal_3 - , ( case when ( split_part(lista_parcelas_normais,''''§'''',1)::integer > 2 ) THEN - split_part(lista_parcelas_normais,''''§'''',17) - ELSE '''''''' END + , ( case when ( split_part(lista_parcelas_normais,''§'',1)::integer > 2 ) THEN + split_part(lista_parcelas_normais,''§'',17) + ELSE '''' END )::varchar as numeracao_normal_3 - , ( case when ( split_part(lista_parcelas_normais,''''§'''',1)::integer > 2 ) THEN - split_part(lista_parcelas_normais,''''§'''',17) - ELSE '''''''' END + , ( case when ( split_part(lista_parcelas_normais,''§'',1)::integer > 2 ) THEN + split_part(lista_parcelas_normais,''§'',17) + ELSE '''' END )::varchar as nosso_numero_normal_3 - , ( case when ( split_part(lista_parcelas_normais,''''§'''',1)::integer > 2 ) THEN + , ( case when ( split_part(lista_parcelas_normais,''§'',1)::integer > 2 ) THEN split_part ( -''; -IF ( stPadraoCodBarra = ''febrabanCompBBAnexo5'' ) THEN - stSql := stSql ||'' + '; + +IF ( stPadraoCodBarra = 'febrabanCompBBAnexo5' ) THEN + stSql := stSql ||' arrecadacao.geraCodigoBarraFebrabanCompensacaoBBAnexo5 ( - split_part(lista_parcelas_normais,''''§'''',19)::date, - split_part(lista_parcelas_normais,''''§'''',15)::varchar, - split_part(lista_parcelas_normais,''''§'''',17)::varchar, + split_part(lista_parcelas_normais,''§'',19)::date, + split_part(lista_parcelas_normais,''§'',15)::varchar, + split_part(lista_parcelas_normais,''§'',17)::varchar, 9, - ''||inNumConvenio||'' + '||inNumConvenio||' )::varchar - ''; + '; ELSE - stSql := stSql ||'' + stSql := stSql ||' arrecadacao.geraCodigoBarraFebraban ( - split_part(lista_parcelas_normais,''''§'''',19)::varchar, - split_part(lista_parcelas_normais,''''§'''',15)::varchar, - split_part(lista_parcelas_normais,''''§'''',17)::varchar, + split_part(lista_parcelas_normais,''§'',19)::varchar, + split_part(lista_parcelas_normais,''§'',15)::varchar, + split_part(lista_parcelas_normais,''§'',17)::varchar, 7, - ''||inCodFebraban||'' + '||inCodFebraban||' )::varchar - ''; + '; END IF; -stSql := stSql ||'' - , ''''§'''' +stSql := stSql ||' + , ''§'' , 1 ) - ELSE '''''''' END + ELSE '''' END )::varchar as codigo_barra_normal_3 - , ( case when ( split_part(lista_parcelas_normais,''''§'''',1)::integer > 2 ) THEN + , ( case when ( split_part(lista_parcelas_normais,''§'',1)::integer > 2 ) THEN split_part ( -''; -IF ( stPadraoCodBarra = ''febrabanCompBBAnexo5'' ) THEN - stSql := stSql ||'' + '; +IF ( stPadraoCodBarra = 'febrabanCompBBAnexo5' ) THEN + stSql := stSql ||' arrecadacao.geraCodigoBarraFebrabanCompensacaoBBAnexo5 ( - split_part(lista_parcelas_normais,''''§'''',19)::date, - split_part(lista_parcelas_normais,''''§'''',15)::varchar, - split_part(lista_parcelas_normais,''''§'''',17)::varchar, + split_part(lista_parcelas_normais,''§'',19)::date, + split_part(lista_parcelas_normais,''§'',15)::varchar, + split_part(lista_parcelas_normais,''§'',17)::varchar, 9, - ''||inNumConvenio||'' + '||inNumConvenio||' )::varchar - ''; + '; ELSE - stSql := stSql ||'' + stSql := stSql ||' arrecadacao.geraCodigoBarraFebraban ( - split_part(lista_parcelas_normais,''''§'''',19)::varchar, - split_part(lista_parcelas_normais,''''§'''',15)::varchar, - split_part(lista_parcelas_normais,''''§'''',17)::varchar, + split_part(lista_parcelas_normais,''§'',19)::varchar, + split_part(lista_parcelas_normais,''§'',15)::varchar, + split_part(lista_parcelas_normais,''§'',17)::varchar, 7, - ''||inCodFebraban||'' + '||inCodFebraban||' )::varchar - ''; + '; END IF; -stSql := stSql ||'' - , ''''§'''' +stSql := stSql ||' + , ''§'' , 2 ) - ELSE '''''''' END + ELSE '''' END )::varchar as linha_digitavel_normal_3 - - - , ( case when ( split_part(lista_parcelas_normais,''''§'''',1)::integer > 3 ) THEN - split_part(lista_parcelas_normais,''''§'''',20) - ELSE '''''''' END + , ( case when ( split_part(lista_parcelas_normais,''§'',1)::integer > 3 ) THEN + split_part(lista_parcelas_normais,''§'',20) + ELSE '''' END )::varchar as cod_parcela_normal_4 - , ( case when ( split_part(lista_parcelas_normais,''''§'''',1)::integer > 3 ) THEN - split_part(lista_parcelas_normais,''''§'''',21) - ELSE '''''''' END + , ( case when ( split_part(lista_parcelas_normais,''§'',1)::integer > 3 ) THEN + split_part(lista_parcelas_normais,''§'',21) + ELSE '''' END )::varchar as valor_normal_4 - , ( case when ( split_part(lista_parcelas_normais,''''§'''',1)::integer > 3 ) THEN - split_part(lista_parcelas_normais,''''§'''',22) - ELSE '''''''' END + , ( case when ( split_part(lista_parcelas_normais,''§'',1)::integer > 3 ) THEN + split_part(lista_parcelas_normais,''§'',22) + ELSE '''' END )::varchar as vencimento_normal_4 - , ( case when ( split_part(lista_parcelas_normais,''''§'''',1)::integer > 3 ) THEN - split_part(lista_parcelas_normais,''''§'''',23) - ELSE '''''''' END + , ( case when ( split_part(lista_parcelas_normais,''§'',1)::integer > 3 ) THEN + split_part(lista_parcelas_normais,''§'',23) + ELSE '''' END )::varchar as numeracao_normal_4 - , ( case when ( split_part(lista_parcelas_normais,''''§'''',1)::integer > 3 ) THEN - split_part(lista_parcelas_normais,''''§'''',23) - ELSE '''''''' END + , ( case when ( split_part(lista_parcelas_normais,''§'',1)::integer > 3 ) THEN + split_part(lista_parcelas_normais,''§'',23) + ELSE '''' END )::varchar as nosso_numero_normal_4 - , ( case when ( split_part(lista_parcelas_normais,''''§'''',1)::integer > 3 ) THEN + , ( case when ( split_part(lista_parcelas_normais,''§'',1)::integer > 3 ) THEN split_part ( -''; -IF ( stPadraoCodBarra = ''febrabanCompBBAnexo5'' ) THEN - stSql := stSql ||'' + '; + +IF ( stPadraoCodBarra = 'febrabanCompBBAnexo5' ) THEN + stSql := stSql ||' arrecadacao.geraCodigoBarraFebrabanCompensacaoBBAnexo5 ( - split_part(lista_parcelas_normais,''''§'''',25)::date, - split_part(lista_parcelas_normais,''''§'''',21)::varchar, - split_part(lista_parcelas_normais,''''§'''',23)::varchar, + split_part(lista_parcelas_normais,''§'',25)::date, + split_part(lista_parcelas_normais,''§'',21)::varchar, + split_part(lista_parcelas_normais,''§'',23)::varchar, 9, - ''||inNumConvenio||'' + '||inNumConvenio||' )::varchar - ''; + '; ELSE - stSql := stSql ||'' + stSql := stSql ||' arrecadacao.geraCodigoBarraFebraban ( - split_part(lista_parcelas_normais,''''§'''',25)::varchar, - split_part(lista_parcelas_normais,''''§'''',21)::varchar, - split_part(lista_parcelas_normais,''''§'''',23)::varchar, + split_part(lista_parcelas_normais,''§'',25)::varchar, + split_part(lista_parcelas_normais,''§'',21)::varchar, + split_part(lista_parcelas_normais,''§'',23)::varchar, 7, - ''||inCodFebraban||'' + '||inCodFebraban||' )::varchar - ''; + '; END IF; -stSql := stSql ||'' - , ''''§'''' +stSql := stSql ||' + , ''§'' , 1 ) - ELSE '''''''' END + ELSE '''' END )::varchar as codigo_barra_normal_4 - , ( case when ( split_part(lista_parcelas_normais,''''§'''',1)::integer > 3 ) THEN + , ( case when ( split_part(lista_parcelas_normais,''§'',1)::integer > 3 ) THEN split_part ( -''; -IF ( stPadraoCodBarra = ''febrabanCompBBAnexo5'' ) THEN - stSql := stSql ||'' + '; + +IF ( stPadraoCodBarra = 'febrabanCompBBAnexo5' ) THEN + stSql := stSql ||' arrecadacao.geraCodigoBarraFebrabanCompensacaoBBAnexo5 ( - split_part(lista_parcelas_normais,''''§'''',25)::date, - split_part(lista_parcelas_normais,''''§'''',21)::varchar, - split_part(lista_parcelas_normais,''''§'''',23)::varchar, + split_part(lista_parcelas_normais,''§'',25)::date, + split_part(lista_parcelas_normais,''§'',21)::varchar, + split_part(lista_parcelas_normais,''§'',23)::varchar, 9, - ''||inNumConvenio||'' + '||inNumConvenio||' )::varchar - ''; + '; ELSE - stSql := stSql ||'' + stSql := stSql ||' arrecadacao.geraCodigoBarraFebraban ( - split_part(lista_parcelas_normais,''''§'''',25)::varchar, - split_part(lista_parcelas_normais,''''§'''',21)::varchar, - split_part(lista_parcelas_normais,''''§'''',23)::varchar, + split_part(lista_parcelas_normais,''§'',25)::varchar, + split_part(lista_parcelas_normais,''§'',21)::varchar, + split_part(lista_parcelas_normais,''§'',23)::varchar, 7, - ''||inCodFebraban||'' + '||inCodFebraban||' )::varchar - ''; + '; END IF; -stSql := stSql ||'' - , ''''§'''' +stSql := stSql ||' + , ''§'' , 2 ) - ELSE '''''''' END + ELSE '''' END )::varchar as linha_digitavel_normal_4 - - - - - - , ( case when ( split_part(lista_parcelas_normais,''''§'''',1)::integer > 4 ) THEN - split_part(lista_parcelas_normais,''''§'''',26) - ELSE '''''''' END + , ( case when ( split_part(lista_parcelas_normais,''§'',1)::integer > 4 ) THEN + split_part(lista_parcelas_normais,''§'',26) + ELSE '''' END )::varchar as cod_parcela_normal_5 - , ( case when ( split_part(lista_parcelas_normais,''''§'''',1)::integer > 4 ) THEN - split_part(lista_parcelas_normais,''''§'''',27) - ELSE '''''''' END + , ( case when ( split_part(lista_parcelas_normais,''§'',1)::integer > 4 ) THEN + split_part(lista_parcelas_normais,''§'',27) + ELSE '''' END )::varchar as valor_normal_5 - , ( case when ( split_part(lista_parcelas_normais,''''§'''',1)::integer > 4 ) THEN - split_part(lista_parcelas_normais,''''§'''',28) - ELSE '''''''' END + , ( case when ( split_part(lista_parcelas_normais,''§'',1)::integer > 4 ) THEN + split_part(lista_parcelas_normais,''§'',28) + ELSE '''' END )::varchar as vencimento_normal_5 - , ( case when ( split_part(lista_parcelas_normais,''''§'''',1)::integer > 4 ) THEN - split_part(lista_parcelas_normais,''''§'''',29) - ELSE '''''''' END + , ( case when ( split_part(lista_parcelas_normais,''§'',1)::integer > 4 ) THEN + split_part(lista_parcelas_normais,''§'',29) + ELSE '''' END )::varchar as numeracao_normal_5 - , ( case when ( split_part(lista_parcelas_normais,''''§'''',1)::integer > 4 ) THEN - split_part(lista_parcelas_normais,''''§'''',29) - ELSE '''''''' END + , ( case when ( split_part(lista_parcelas_normais,''§'',1)::integer > 4 ) THEN + split_part(lista_parcelas_normais,''§'',29) + ELSE '''' END )::varchar as nosso_numero_normal_5 - , ( case when ( split_part(lista_parcelas_normais,''''§'''',1)::integer > 4 ) THEN + , ( case when ( split_part(lista_parcelas_normais,''§'',1)::integer > 4 ) THEN split_part ( -''; -IF ( stPadraoCodBarra = ''febrabanCompBBAnexo5'' ) THEN - stSql := stSql ||'' + '; + +IF ( stPadraoCodBarra = 'febrabanCompBBAnexo5' ) THEN + stSql := stSql ||' arrecadacao.geraCodigoBarraFebrabanCompensacaoBBAnexo5 ( - split_part(lista_parcelas_normais,''''§'''',31)::date, - split_part(lista_parcelas_normais,''''§'''',27)::varchar, - split_part(lista_parcelas_normais,''''§'''',29)::varchar, + split_part(lista_parcelas_normais,''§'',31)::date, + split_part(lista_parcelas_normais,''§'',27)::varchar, + split_part(lista_parcelas_normais,''§'',29)::varchar, 9, - ''||inNumConvenio||'' + '||inNumConvenio||' )::varchar - ''; + '; ELSE - stSql := stSql ||'' + stSql := stSql ||' arrecadacao.geraCodigoBarraFebraban ( - split_part(lista_parcelas_normais,''''§'''',31)::varchar, - split_part(lista_parcelas_normais,''''§'''',27)::varchar, - split_part(lista_parcelas_normais,''''§'''',29)::varchar, + split_part(lista_parcelas_normais,''§'',31)::varchar, + split_part(lista_parcelas_normais,''§'',27)::varchar, + split_part(lista_parcelas_normais,''§'',29)::varchar, 7, - ''||inCodFebraban||'' + '||inCodFebraban||' )::varchar - ''; + '; END IF; -stSql := stSql ||'' - , ''''§'''' +stSql := stSql ||' + , ''§'' , 1 ) - ELSE '''''''' END + ELSE '''' END )::varchar as codigo_barra_normal_5 - , ( case when ( split_part(lista_parcelas_normais,''''§'''',1)::integer > 4 ) THEN + , ( case when ( split_part(lista_parcelas_normais,''§'',1)::integer > 4 ) THEN split_part ( -''; -IF ( stPadraoCodBarra = ''febrabanCompBBAnexo5'' ) THEN - stSql := stSql ||'' + '; + +IF ( stPadraoCodBarra = 'febrabanCompBBAnexo5' ) THEN + stSql := stSql ||' arrecadacao.geraCodigoBarraFebrabanCompensacaoBBAnexo5 ( - split_part(lista_parcelas_normais,''''§'''',31)::date, - split_part(lista_parcelas_normais,''''§'''',27)::varchar, - split_part(lista_parcelas_normais,''''§'''',29)::varchar, + split_part(lista_parcelas_normais,''§'',31)::date, + split_part(lista_parcelas_normais,''§'',27)::varchar, + split_part(lista_parcelas_normais,''§'',29)::varchar, 9, - ''||inNumConvenio||'' + '||inNumConvenio||' )::varchar - ''; + '; ELSE - stSql := stSql ||'' + stSql := stSql ||' arrecadacao.geraCodigoBarraFebraban ( - split_part(lista_parcelas_normais,''''§'''',31)::varchar, - split_part(lista_parcelas_normais,''''§'''',27)::varchar, - split_part(lista_parcelas_normais,''''§'''',29)::varchar, + split_part(lista_parcelas_normais,''§'',31)::varchar, + split_part(lista_parcelas_normais,''§'',27)::varchar, + split_part(lista_parcelas_normais,''§'',29)::varchar, 7, - ''||inCodFebraban||'' + '||inCodFebraban||' )::varchar - ''; + '; END IF; -stSql := stSql ||'' - , ''''§'''' +stSql := stSql ||' + , ''§'' , 2 ) - ELSE '''''''' END + ELSE '''' END )::varchar as linha_digitavel_normal_5 - - - - , ( case when ( split_part(lista_parcelas_normais,''''§'''',1)::integer > 5 ) THEN - split_part(lista_parcelas_normais,''''§'''',32) - ELSE '''''''' END + , ( case when ( split_part(lista_parcelas_normais,''§'',1)::integer > 5 ) THEN + split_part(lista_parcelas_normais,''§'',32) + ELSE '''' END )::varchar as cod_parcela_normal_6 - , ( case when ( split_part(lista_parcelas_normais,''''§'''',1)::integer > 5 ) THEN - split_part(lista_parcelas_normais,''''§'''',33) - ELSE '''''''' END + , ( case when ( split_part(lista_parcelas_normais,''§'',1)::integer > 5 ) THEN + split_part(lista_parcelas_normais,''§'',33) + ELSE '''' END )::varchar as valor_normal_6 - , ( case when ( split_part(lista_parcelas_normais,''''§'''',1)::integer > 5 ) THEN - split_part(lista_parcelas_normais,''''§'''',34) - ELSE '''''''' END + , ( case when ( split_part(lista_parcelas_normais,''§'',1)::integer > 5 ) THEN + split_part(lista_parcelas_normais,''§'',34) + ELSE '''' END )::varchar as vencimento_normal_6 - , ( case when ( split_part(lista_parcelas_normais,''''§'''',1)::integer > 5 ) THEN - split_part(lista_parcelas_normais,''''§'''',35) - ELSE '''''''' END + , ( case when ( split_part(lista_parcelas_normais,''§'',1)::integer > 5 ) THEN + split_part(lista_parcelas_normais,''§'',35) + ELSE '''' END )::varchar as numeracao_normal_6 - , ( case when ( split_part(lista_parcelas_normais,''''§'''',1)::integer > 5 ) THEN - split_part(lista_parcelas_normais,''''§'''',35) - ELSE '''''''' END + , ( case when ( split_part(lista_parcelas_normais,''§'',1)::integer > 5 ) THEN + split_part(lista_parcelas_normais,''§'',35) + ELSE '''' END )::varchar as nosso_numero_normal_6 - , ( case when ( split_part(lista_parcelas_normais,''''§'''',1)::integer > 5 ) THEN + , ( case when ( split_part(lista_parcelas_normais,''§'',1)::integer > 5 ) THEN split_part ( -''; -IF ( stPadraoCodBarra = ''febrabanCompBBAnexo5'' ) THEN - stSql := stSql ||'' + '; + +IF ( stPadraoCodBarra = 'febrabanCompBBAnexo5' ) THEN + stSql := stSql ||' arrecadacao.geraCodigoBarraFebrabanCompensacaoBBAnexo5 ( - split_part(lista_parcelas_normais,''''§'''',37)::date, - split_part(lista_parcelas_normais,''''§'''',33)::varchar, - split_part(lista_parcelas_normais,''''§'''',35)::varchar, + split_part(lista_parcelas_normais,''§'',37)::date, + split_part(lista_parcelas_normais,''§'',33)::varchar, + split_part(lista_parcelas_normais,''§'',35)::varchar, 9, - ''||inNumConvenio||'' + '||inNumConvenio||' )::varchar - ''; + '; ELSE - stSql := stSql ||'' + stSql := stSql ||' arrecadacao.geraCodigoBarraFebraban ( - split_part(lista_parcelas_normais,''''§'''',37)::varchar, - split_part(lista_parcelas_normais,''''§'''',33)::varchar, - split_part(lista_parcelas_normais,''''§'''',35)::varchar, + split_part(lista_parcelas_normais,''§'',37)::varchar, + split_part(lista_parcelas_normais,''§'',33)::varchar, + split_part(lista_parcelas_normais,''§'',35)::varchar, 7, - ''||inCodFebraban||'' + '||inCodFebraban||' )::varchar - ''; + '; END IF; -stSql := stSql ||'' - , ''''§'''' +stSql := stSql ||' + , ''§'' , 1 ) - ELSE '''''''' END + ELSE '''' END )::varchar as codigo_barra_normal_6 - , ( case when ( split_part(lista_parcelas_normais,''''§'''',1)::integer > 5 ) THEN + , ( case when ( split_part(lista_parcelas_normais,''§'',1)::integer > 5 ) THEN split_part ( -''; -IF ( stPadraoCodBarra = ''febrabanCompBBAnexo5'' ) THEN - stSql := stSql ||'' + '; + +IF ( stPadraoCodBarra = 'febrabanCompBBAnexo5' ) THEN + stSql := stSql ||' arrecadacao.geraCodigoBarraFebrabanCompensacaoBBAnexo5 ( - split_part(lista_parcelas_normais,''''§'''',37)::date, - split_part(lista_parcelas_normais,''''§'''',33)::varchar, - split_part(lista_parcelas_normais,''''§'''',35)::varchar, + split_part(lista_parcelas_normais,''§'',37)::date, + split_part(lista_parcelas_normais,''§'',33)::varchar, + split_part(lista_parcelas_normais,''§'',35)::varchar, 9, - ''||inNumConvenio||'' + '||inNumConvenio||' )::varchar - ''; + '; ELSE - stSql := stSql ||'' + stSql := stSql ||' arrecadacao.geraCodigoBarraFebraban ( - split_part(lista_parcelas_normais,''''§'''',37)::varchar, - split_part(lista_parcelas_normais,''''§'''',33)::varchar, - split_part(lista_parcelas_normais,''''§'''',35)::varchar, + split_part(lista_parcelas_normais,''§'',37)::varchar, + split_part(lista_parcelas_normais,''§'',33)::varchar, + split_part(lista_parcelas_normais,''§'',35)::varchar, 7, - ''||inCodFebraban||'' + '||inCodFebraban||' )::varchar - ''; + '; END IF; -stSql := stSql ||'' - , ''''§'''' +stSql := stSql ||' + , ''§'' , 2 ) - ELSE '''''''' END + ELSE '''' END )::varchar as linha_digitavel_normal_6 - - - - - , ( case when ( split_part(lista_parcelas_normais,''''§'''',1)::integer > 6 ) THEN - split_part(lista_parcelas_normais,''''§'''',38) - ELSE '''''''' END + , ( case when ( split_part(lista_parcelas_normais,''§'',1)::integer > 6 ) THEN + split_part(lista_parcelas_normais,''§'',38) + ELSE '''' END )::varchar as cod_parcela_normal_7 - , ( case when ( split_part(lista_parcelas_normais,''''§'''',1)::integer > 6 ) THEN - split_part(lista_parcelas_normais,''''§'''',39) - ELSE '''''''' END + , ( case when ( split_part(lista_parcelas_normais,''§'',1)::integer > 6 ) THEN + split_part(lista_parcelas_normais,''§'',39) + ELSE '''' END )::varchar as valor_normal_7 - , ( case when ( split_part(lista_parcelas_normais,''''§'''',1)::integer > 6 ) THEN - split_part(lista_parcelas_normais,''''§'''',40) - ELSE '''''''' END + , ( case when ( split_part(lista_parcelas_normais,''§'',1)::integer > 6 ) THEN + split_part(lista_parcelas_normais,''§'',40) + ELSE '''' END )::varchar as vencimento_normal_7 - , ( case when ( split_part(lista_parcelas_normais,''''§'''',1)::integer > 6 ) THEN - split_part(lista_parcelas_normais,''''§'''',41) - ELSE '''''''' END + , ( case when ( split_part(lista_parcelas_normais,''§'',1)::integer > 6 ) THEN + split_part(lista_parcelas_normais,''§'',41) + ELSE '''' END )::varchar as numeracao_normal_7 - , ( case when ( split_part(lista_parcelas_normais,''''§'''',1)::integer > 6 ) THEN - split_part(lista_parcelas_normais,''''§'''',41) - ELSE '''''''' END + , ( case when ( split_part(lista_parcelas_normais,''§'',1)::integer > 6 ) THEN + split_part(lista_parcelas_normais,''§'',41) + ELSE '''' END )::varchar as nosso_numero_normal_7 - , ( case when ( split_part(lista_parcelas_normais,''''§'''',1)::integer > 6 ) THEN + , ( case when ( split_part(lista_parcelas_normais,''§'',1)::integer > 6 ) THEN split_part ( -''; -IF ( stPadraoCodBarra = ''febrabanCompBBAnexo5'' ) THEN - stSql := stSql ||'' + '; + +IF ( stPadraoCodBarra = 'febrabanCompBBAnexo5' ) THEN + stSql := stSql ||' arrecadacao.geraCodigoBarraFebrabanCompensacaoBBAnexo5 ( - split_part(lista_parcelas_normais,''''§'''',43)::date, - split_part(lista_parcelas_normais,''''§'''',39)::varchar, - split_part(lista_parcelas_normais,''''§'''',41)::varchar, + split_part(lista_parcelas_normais,''§'',43)::date, + split_part(lista_parcelas_normais,''§'',39)::varchar, + split_part(lista_parcelas_normais,''§'',41)::varchar, 9, - ''||inNumConvenio||'' + '||inNumConvenio||' )::varchar - ''; + '; ELSE - stSql := stSql ||'' + stSql := stSql ||' arrecadacao.geraCodigoBarraFebraban ( - split_part(lista_parcelas_normais,''''§'''',43)::varchar, - split_part(lista_parcelas_normais,''''§'''',39)::varchar, - split_part(lista_parcelas_normais,''''§'''',41)::varchar, + split_part(lista_parcelas_normais,''§'',43)::varchar, + split_part(lista_parcelas_normais,''§'',39)::varchar, + split_part(lista_parcelas_normais,''§'',41)::varchar, 7, - ''||inCodFebraban||'' + '||inCodFebraban||' )::varchar - ''; + '; END IF; -stSql := stSql ||'' - , ''''§'''' +stSql := stSql ||' + , ''§'' , 1 ) - ELSE '''''''' END + ELSE '''' END )::varchar as codigo_barra_normal_7 - , ( case when ( split_part(lista_parcelas_normais,''''§'''',1)::integer > 6 ) THEN + , ( case when ( split_part(lista_parcelas_normais,''§'',1)::integer > 6 ) THEN split_part ( -''; -IF ( stPadraoCodBarra = ''febrabanCompBBAnexo5'' ) THEN - stSql := stSql ||'' + '; + +IF ( stPadraoCodBarra = 'febrabanCompBBAnexo5' ) THEN + stSql := stSql ||' arrecadacao.geraCodigoBarraFebrabanCompensacaoBBAnexo5 ( - split_part(lista_parcelas_normais,''''§'''',43)::date, - split_part(lista_parcelas_normais,''''§'''',39)::varchar, - split_part(lista_parcelas_normais,''''§'''',41)::varchar, + split_part(lista_parcelas_normais,''§'',43)::date, + split_part(lista_parcelas_normais,''§'',39)::varchar, + split_part(lista_parcelas_normais,''§'',41)::varchar, 9, - ''||inNumConvenio||'' + '||inNumConvenio||' )::varchar - ''; + '; ELSE - stSql := stSql ||'' + stSql := stSql ||' arrecadacao.geraCodigoBarraFebraban ( - split_part(lista_parcelas_normais,''''§'''',43)::varchar, - split_part(lista_parcelas_normais,''''§'''',39)::varchar, - split_part(lista_parcelas_normais,''''§'''',41)::varchar, + split_part(lista_parcelas_normais,''§'',43)::varchar, + split_part(lista_parcelas_normais,''§'',39)::varchar, + split_part(lista_parcelas_normais,''§'',41)::varchar, 7, - ''||inCodFebraban||'' + '||inCodFebraban||' )::varchar - ''; + '; END IF; -stSql := stSql ||'' - , ''''§'''' +stSql := stSql ||' + , ''§'' , 2 ) - ELSE '''''''' END + ELSE '''' END )::varchar as linha_digitavel_normal_7 - - - - - - , ( case when ( split_part(lista_parcelas_normais,''''§'''',1)::integer > 7 ) THEN - split_part(lista_parcelas_normais,''''§'''',44) - ELSE '''''''' END + , ( case when ( split_part(lista_parcelas_normais,''§'',1)::integer > 7 ) THEN + split_part(lista_parcelas_normais,''§'',44) + ELSE '''' END )::varchar as cod_parcela_normal_8 - , ( case when ( split_part(lista_parcelas_normais,''''§'''',1)::integer > 7 ) THEN - split_part(lista_parcelas_normais,''''§'''',45) - ELSE '''''''' END + , ( case when ( split_part(lista_parcelas_normais,''§'',1)::integer > 7 ) THEN + split_part(lista_parcelas_normais,''§'',45) + ELSE '''' END )::varchar as valor_normal_8 - , ( case when ( split_part(lista_parcelas_normais,''''§'''',1)::integer > 7 ) THEN - split_part(lista_parcelas_normais,''''§'''',46) - ELSE '''''''' END + , ( case when ( split_part(lista_parcelas_normais,''§'',1)::integer > 7 ) THEN + split_part(lista_parcelas_normais,''§'',46) + ELSE '''' END )::varchar as vencimento_normal_8 - , ( case when ( split_part(lista_parcelas_normais,''''§'''',1)::integer > 7 ) THEN - split_part(lista_parcelas_normais,''''§'''',47) - ELSE '''''''' END + , ( case when ( split_part(lista_parcelas_normais,''§'',1)::integer > 7 ) THEN + split_part(lista_parcelas_normais,''§'',47) + ELSE '''' END )::varchar as numeracao_normal_8 - , ( case when ( split_part(lista_parcelas_normais,''''§'''',1)::integer > 7 ) THEN - split_part(lista_parcelas_normais,''''§'''',47) - ELSE '''''''' END + , ( case when ( split_part(lista_parcelas_normais,''§'',1)::integer > 7 ) THEN + split_part(lista_parcelas_normais,''§'',47) + ELSE '''' END )::varchar as nosso_numero_normal_8 - , ( case when ( split_part(lista_parcelas_normais,''''§'''',1)::integer > 7 ) THEN + , ( case when ( split_part(lista_parcelas_normais,''§'',1)::integer > 7 ) THEN split_part ( -''; -IF ( stPadraoCodBarra = ''febrabanCompBBAnexo5'' ) THEN - stSql := stSql ||'' + '; + +IF ( stPadraoCodBarra = 'febrabanCompBBAnexo5' ) THEN + stSql := stSql ||' arrecadacao.geraCodigoBarraFebrabanCompensacaoBBAnexo5 ( - split_part(lista_parcelas_normais,''''§'''',49)::date, - split_part(lista_parcelas_normais,''''§'''',45)::varchar, - split_part(lista_parcelas_normais,''''§'''',47)::varchar, + split_part(lista_parcelas_normais,''§'',49)::date, + split_part(lista_parcelas_normais,''§'',45)::varchar, + split_part(lista_parcelas_normais,''§'',47)::varchar, 9, - ''||inNumConvenio||'' + '||inNumConvenio||' )::varchar - ''; + '; ELSE - stSql := stSql ||'' + stSql := stSql ||' arrecadacao.geraCodigoBarraFebraban ( - split_part(lista_parcelas_normais,''''§'''',49)::varchar, - split_part(lista_parcelas_normais,''''§'''',45)::varchar, - split_part(lista_parcelas_normais,''''§'''',47)::varchar, + split_part(lista_parcelas_normais,''§'',49)::varchar, + split_part(lista_parcelas_normais,''§'',45)::varchar, + split_part(lista_parcelas_normais,''§'',47)::varchar, 7, - ''||inCodFebraban||'' + '||inCodFebraban||' )::varchar - ''; + '; END IF; -stSql := stSql ||'' - , ''''§'''' +stSql := stSql ||' + , ''§'' , 1 ) - ELSE '''''''' END + ELSE '''' END )::varchar as codigo_barra_normal_8 - , ( case when ( split_part(lista_parcelas_normais,''''§'''',1)::integer > 7 ) THEN + , ( case when ( split_part(lista_parcelas_normais,''§'',1)::integer > 7 ) THEN split_part ( -''; -IF ( stPadraoCodBarra = ''febrabanCompBBAnexo5'' ) THEN - stSql := stSql ||'' + '; +IF ( stPadraoCodBarra = 'febrabanCompBBAnexo5' ) THEN + stSql := stSql ||' arrecadacao.geraCodigoBarraFebrabanCompensacaoBBAnexo5 ( - split_part(lista_parcelas_normais,''''§'''',49)::date, - split_part(lista_parcelas_normais,''''§'''',45)::varchar, - split_part(lista_parcelas_normais,''''§'''',47)::varchar, + split_part(lista_parcelas_normais,''§'',49)::date, + split_part(lista_parcelas_normais,''§'',45)::varchar, + split_part(lista_parcelas_normais,''§'',47)::varchar, 9, - ''||inNumConvenio||'' + '||inNumConvenio||' )::varchar - ''; + '; ELSE - stSql := stSql ||'' + stSql := stSql ||' arrecadacao.geraCodigoBarraFebraban ( - split_part(lista_parcelas_normais,''''§'''',49)::varchar, - split_part(lista_parcelas_normais,''''§'''',45)::varchar, - split_part(lista_parcelas_normais,''''§'''',47)::varchar, + split_part(lista_parcelas_normais,''§'',49)::varchar, + split_part(lista_parcelas_normais,''§'',45)::varchar, + split_part(lista_parcelas_normais,''§'',47)::varchar, 7, - ''||inCodFebraban||'' + '||inCodFebraban||' )::varchar - ''; + '; END IF; -stSql := stSql ||'' - , ''''§'''' +stSql := stSql ||' + , ''§'' , 2 ) - ELSE '''''''' END + ELSE '''' END )::varchar as linha_digitavel_normal_8 - - - - - , ( case when ( split_part(lista_parcelas_normais,''''§'''',1)::integer > 8 ) THEN - split_part(lista_parcelas_normais,''''§'''',50) - ELSE '''''''' END + , ( case when ( split_part(lista_parcelas_normais,''§'',1)::integer > 8 ) THEN + split_part(lista_parcelas_normais,''§'',50) + ELSE '''' END )::varchar as cod_parcela_normal_9 - , ( case when ( split_part(lista_parcelas_normais,''''§'''',1)::integer > 8 ) THEN - split_part(lista_parcelas_normais,''''§'''',51) - ELSE '''''''' END + , ( case when ( split_part(lista_parcelas_normais,''§'',1)::integer > 8 ) THEN + split_part(lista_parcelas_normais,''§'',51) + ELSE '''' END )::varchar as valor_normal_9 - , ( case when ( split_part(lista_parcelas_normais,''''§'''',1)::integer > 8 ) THEN - split_part(lista_parcelas_normais,''''§'''',52) - ELSE '''''''' END + , ( case when ( split_part(lista_parcelas_normais,''§'',1)::integer > 8 ) THEN + split_part(lista_parcelas_normais,''§'',52) + ELSE '''' END )::varchar as vencimento_normal_9 - , ( case when ( split_part(lista_parcelas_normais,''''§'''',1)::integer > 8 ) THEN - split_part(lista_parcelas_normais,''''§'''',53) - ELSE '''''''' END + , ( case when ( split_part(lista_parcelas_normais,''§'',1)::integer > 8 ) THEN + split_part(lista_parcelas_normais,''§'',53) + ELSE '''' END )::varchar as numeracao_normal_9 - , ( case when ( split_part(lista_parcelas_normais,''''§'''',1)::integer > 8 ) THEN - split_part(lista_parcelas_normais,''''§'''',53) - ELSE '''''''' END + , ( case when ( split_part(lista_parcelas_normais,''§'',1)::integer > 8 ) THEN + split_part(lista_parcelas_normais,''§'',53) + ELSE '''' END )::varchar as nosso_numero_normal_9 - , ( case when ( split_part(lista_parcelas_normais,''''§'''',1)::integer > 8 ) THEN + , ( case when ( split_part(lista_parcelas_normais,''§'',1)::integer > 8 ) THEN split_part ( -''; -IF ( stPadraoCodBarra = ''febrabanCompBBAnexo5'' ) THEN - stSql := stSql ||'' +'; + +IF ( stPadraoCodBarra = 'febrabanCompBBAnexo5' ) THEN + stSql := stSql ||' arrecadacao.geraCodigoBarraFebrabanCompensacaoBBAnexo5 ( - split_part(lista_parcelas_normais,''''§'''',55)::date, - split_part(lista_parcelas_normais,''''§'''',51)::varchar, - split_part(lista_parcelas_normais,''''§'''',53)::varchar, + split_part(lista_parcelas_normais,''§'',55)::date, + split_part(lista_parcelas_normais,''§'',51)::varchar, + split_part(lista_parcelas_normais,''§'',53)::varchar, 9, - ''||inNumConvenio||'' + '||inNumConvenio||' )::varchar - ''; + '; ELSE - stSql := stSql ||'' + stSql := stSql ||' arrecadacao.geraCodigoBarraFebraban ( - split_part(lista_parcelas_normais,''''§'''',55)::varchar, - split_part(lista_parcelas_normais,''''§'''',51)::varchar, - split_part(lista_parcelas_normais,''''§'''',53)::varchar, + split_part(lista_parcelas_normais,''§'',55)::varchar, + split_part(lista_parcelas_normais,''§'',51)::varchar, + split_part(lista_parcelas_normais,''§'',53)::varchar, 7, - ''||inCodFebraban||'' + '||inCodFebraban||' )::varchar - ''; + '; END IF; -stSql := stSql ||'' - , ''''§'''' +stSql := stSql ||' + , ''§'' , 1 ) - ELSE '''''''' END + ELSE '''' END )::varchar as codigo_barra_normal_9 - , ( case when ( split_part(lista_parcelas_normais,''''§'''',1)::integer > 8 ) THEN + , ( case when ( split_part(lista_parcelas_normais,''§'',1)::integer > 8 ) THEN split_part ( -''; -IF ( stPadraoCodBarra = ''febrabanCompBBAnexo5'' ) THEN - stSql := stSql ||'' +'; + +IF ( stPadraoCodBarra = 'febrabanCompBBAnexo5' ) THEN + stSql := stSql ||' arrecadacao.geraCodigoBarraFebrabanCompensacaoBBAnexo5 ( - split_part(lista_parcelas_normais,''''§'''',55)::date, - split_part(lista_parcelas_normais,''''§'''',51)::varchar, - split_part(lista_parcelas_normais,''''§'''',53)::varchar, + split_part(lista_parcelas_normais,''§'',55)::date, + split_part(lista_parcelas_normais,''§'',51)::varchar, + split_part(lista_parcelas_normais,''§'',53)::varchar, 9, - ''||inNumConvenio||'' + '||inNumConvenio||' )::varchar - ''; + '; ELSE - stSql := stSql ||'' + stSql := stSql ||' arrecadacao.geraCodigoBarraFebraban ( - split_part(lista_parcelas_normais,''''§'''',55)::varchar, - split_part(lista_parcelas_normais,''''§'''',51)::varchar, - split_part(lista_parcelas_normais,''''§'''',53)::varchar, + split_part(lista_parcelas_normais,''§'',55)::varchar, + split_part(lista_parcelas_normais,''§'',51)::varchar, + split_part(lista_parcelas_normais,''§'',53)::varchar, 7, - ''||inCodFebraban||'' + '||inCodFebraban||' )::varchar - ''; + '; END IF; -stSql := stSql ||'' - , ''''§'''' +stSql := stSql ||' + , ''§'' , 2 ) - ELSE '''''''' END + ELSE '''' END )::varchar as linha_digitavel_normal_9 - - - - - - - , ( case when ( split_part(lista_parcelas_normais,''''§'''',1)::integer > 9 ) THEN - split_part(lista_parcelas_normais,''''§'''',56) - ELSE '''''''' END + , ( case when ( split_part(lista_parcelas_normais,''§'',1)::integer > 9 ) THEN + split_part(lista_parcelas_normais,''§'',56) + ELSE '''' END )::varchar as cod_parcela_normal_10 - , ( case when ( split_part(lista_parcelas_normais,''''§'''',1)::integer > 9 ) THEN - split_part(lista_parcelas_normais,''''§'''',57) - ELSE '''''''' END + , ( case when ( split_part(lista_parcelas_normais,''§'',1)::integer > 9 ) THEN + split_part(lista_parcelas_normais,''§'',57) + ELSE '''' END )::varchar as valor_normal_10 - , ( case when ( split_part(lista_parcelas_normais,''''§'''',1)::integer > 9 ) THEN - split_part(lista_parcelas_normais,''''§'''',58) - ELSE '''''''' END + , ( case when ( split_part(lista_parcelas_normais,''§'',1)::integer > 9 ) THEN + split_part(lista_parcelas_normais,''§'',58) + ELSE '''' END )::varchar as vencimento_normal_10 - , ( case when ( split_part(lista_parcelas_normais,''''§'''',1)::integer > 9 ) THEN - split_part(lista_parcelas_normais,''''§'''',59) - ELSE '''''''' END + , ( case when ( split_part(lista_parcelas_normais,''§'',1)::integer > 9 ) THEN + split_part(lista_parcelas_normais,''§'',59) + ELSE '''' END )::varchar as numeracao_normal_10 - , ( case when ( split_part(lista_parcelas_normais,''''§'''',1)::integer > 9 ) THEN - split_part(lista_parcelas_normais,''''§'''',59) - ELSE '''''''' END + , ( case when ( split_part(lista_parcelas_normais,''§'',1)::integer > 9 ) THEN + split_part(lista_parcelas_normais,''§'',59) + ELSE '''' END )::varchar as nosso_numero_normal_10 - , ( case when ( split_part(lista_parcelas_normais,''''§'''',1)::integer > 9 ) THEN + , ( case when ( split_part(lista_parcelas_normais,''§'',1)::integer > 9 ) THEN split_part ( -''; -IF ( stPadraoCodBarra = ''febrabanCompBBAnexo5'' ) THEN - stSql := stSql ||'' + '; + +IF ( stPadraoCodBarra = 'febrabanCompBBAnexo5' ) THEN + stSql := stSql ||' arrecadacao.geraCodigoBarraFebrabanCompensacaoBBAnexo5 ( - split_part(lista_parcelas_normais,''''§'''',61)::date, - split_part(lista_parcelas_normais,''''§'''',57)::varchar, - split_part(lista_parcelas_normais,''''§'''',59)::varchar, + split_part(lista_parcelas_normais,''§'',61)::date, + split_part(lista_parcelas_normais,''§'',57)::varchar, + split_part(lista_parcelas_normais,''§'',59)::varchar, 9, - ''||inNumConvenio||'' + '||inNumConvenio||' )::varchar - ''; + '; ELSE - stSql := stSql ||'' + stSql := stSql ||' arrecadacao.geraCodigoBarraFebraban ( - split_part(lista_parcelas_normais,''''§'''',61)::varchar, - split_part(lista_parcelas_normais,''''§'''',57)::varchar, - split_part(lista_parcelas_normais,''''§'''',59)::varchar, + split_part(lista_parcelas_normais,''§'',61)::varchar, + split_part(lista_parcelas_normais,''§'',57)::varchar, + split_part(lista_parcelas_normais,''§'',59)::varchar, 7, - ''||inCodFebraban||'' + '||inCodFebraban||' )::varchar - ''; + '; END IF; -stSql := stSql ||'' - , ''''§'''' +stSql := stSql ||' + , ''§'' , 1 ) - ELSE '''''''' END + ELSE '''' END )::varchar as codigo_barra_normal_10 - , ( case when ( split_part(lista_parcelas_normais,''''§'''',1)::integer > 9 ) THEN + , ( case when ( split_part(lista_parcelas_normais,''§'',1)::integer > 9 ) THEN split_part ( -''; -IF ( stPadraoCodBarra = ''febrabanCompBBAnexo5'' ) THEN - stSql := stSql ||'' +'; + +IF ( stPadraoCodBarra = 'febrabanCompBBAnexo5' ) THEN + stSql := stSql ||' arrecadacao.geraCodigoBarraFebrabanCompensacaoBBAnexo5 ( - split_part(lista_parcelas_normais,''''§'''',61)::date, - split_part(lista_parcelas_normais,''''§'''',57)::varchar, - split_part(lista_parcelas_normais,''''§'''',59)::varchar, + split_part(lista_parcelas_normais,''§'',61)::date, + split_part(lista_parcelas_normais,''§'',57)::varchar, + split_part(lista_parcelas_normais,''§'',59)::varchar, 9, - ''||inNumConvenio||'' + '||inNumConvenio||' )::varchar - ''; + '; ELSE - stSql := stSql ||'' + stSql := stSql ||' arrecadacao.geraCodigoBarraFebraban ( - split_part(lista_parcelas_normais,''''§'''',61)::varchar, - split_part(lista_parcelas_normais,''''§'''',57)::varchar, - split_part(lista_parcelas_normais,''''§'''',59)::varchar, + split_part(lista_parcelas_normais,''§'',61)::varchar, + split_part(lista_parcelas_normais,''§'',57)::varchar, + split_part(lista_parcelas_normais,''§'',59)::varchar, 7, - ''||inCodFebraban||'' + '||inCodFebraban||' )::varchar - ''; + '; END IF; -stSql := stSql ||'' - , ''''§'''' +stSql := stSql ||' + , ''§'' , 2 ) - ELSE '''''''' END + ELSE '''' END )::varchar as linha_digitavel_normal_10 - - - - - - - - , ( case when ( split_part(lista_parcelas_normais,''''§'''',1)::integer > 10 ) THEN - split_part(lista_parcelas_normais,''''§'''',62) - ELSE '''''''' END + , ( case when ( split_part(lista_parcelas_normais,''§'',1)::integer > 10 ) THEN + split_part(lista_parcelas_normais,''§'',62) + ELSE '''' END )::varchar as cod_parcela_normal_11 - , ( case when ( split_part(lista_parcelas_normais,''''§'''',1)::integer > 10 ) THEN - split_part(lista_parcelas_normais,''''§'''',63) - ELSE '''''''' END + , ( case when ( split_part(lista_parcelas_normais,''§'',1)::integer > 10 ) THEN + split_part(lista_parcelas_normais,''§'',63) + ELSE '''' END )::varchar as valor_normal_11 - , ( case when ( split_part(lista_parcelas_normais,''''§'''',1)::integer > 10 ) THEN - split_part(lista_parcelas_normais,''''§'''',64) - ELSE '''''''' END + , ( case when ( split_part(lista_parcelas_normais,''§'',1)::integer > 10 ) THEN + split_part(lista_parcelas_normais,''§'',64) + ELSE '''' END )::varchar as vencimento_normal_11 - , ( case when ( split_part(lista_parcelas_normais,''''§'''',1)::integer > 10 ) THEN - split_part(lista_parcelas_normais,''''§'''',65) - ELSE '''''''' END + , ( case when ( split_part(lista_parcelas_normais,''§'',1)::integer > 10 ) THEN + split_part(lista_parcelas_normais,''§'',65) + ELSE '''' END )::varchar as numeracao_normal_11 - , ( case when ( split_part(lista_parcelas_normais,''''§'''',1)::integer > 10 ) THEN - split_part(lista_parcelas_normais,''''§'''',65) - ELSE '''''''' END + , ( case when ( split_part(lista_parcelas_normais,''§'',1)::integer > 10 ) THEN + split_part(lista_parcelas_normais,''§'',65) + ELSE '''' END )::varchar as nosso_numero_normal_11 - , ( case when ( split_part(lista_parcelas_normais,''''§'''',1)::integer > 10 ) THEN + , ( case when ( split_part(lista_parcelas_normais,''§'',1)::integer > 10 ) THEN split_part ( -''; -IF ( stPadraoCodBarra = ''febrabanCompBBAnexo5'' ) THEN - stSql := stSql ||'' +'; + +IF ( stPadraoCodBarra = 'febrabanCompBBAnexo5' ) THEN + stSql := stSql ||' arrecadacao.geraCodigoBarraFebrabanCompensacaoBBAnexo5 ( - split_part(lista_parcelas_normais,''''§'''',67)::date, - split_part(lista_parcelas_normais,''''§'''',63)::varchar, - split_part(lista_parcelas_normais,''''§'''',65)::varchar, + split_part(lista_parcelas_normais,''§'',67)::date, + split_part(lista_parcelas_normais,''§'',63)::varchar, + split_part(lista_parcelas_normais,''§'',65)::varchar, 9, - ''||inNumConvenio||'' + '||inNumConvenio||' )::varchar - ''; + '; ELSE - stSql := stSql ||'' + stSql := stSql ||' arrecadacao.geraCodigoBarraFebraban ( - split_part(lista_parcelas_normais,''''§'''',67)::varchar, - split_part(lista_parcelas_normais,''''§'''',63)::varchar, - split_part(lista_parcelas_normais,''''§'''',65)::varchar, + split_part(lista_parcelas_normais,''§'',67)::varchar, + split_part(lista_parcelas_normais,''§'',63)::varchar, + split_part(lista_parcelas_normais,''§'',65)::varchar, 7, - ''||inCodFebraban||'' + '||inCodFebraban||' )::varchar - ''; + '; END IF; -stSql := stSql ||'' - , ''''§'''' +stSql := stSql ||' + , ''§'' , 1 ) - ELSE '''''''' END + ELSE '''' END )::varchar as codigo_barra_normal_11 - , ( case when ( split_part(lista_parcelas_normais,''''§'''',1)::integer > 10 ) THEN + , ( case when ( split_part(lista_parcelas_normais,''§'',1)::integer > 10 ) THEN split_part ( -''; -IF ( stPadraoCodBarra = ''febrabanCompBBAnexo5'' ) THEN - stSql := stSql ||'' +'; +IF ( stPadraoCodBarra = 'febrabanCompBBAnexo5' ) THEN + stSql := stSql ||' arrecadacao.geraCodigoBarraFebrabanCompensacaoBBAnexo5 ( - split_part(lista_parcelas_normais,''''§'''',67)::date, - split_part(lista_parcelas_normais,''''§'''',63)::varchar, - split_part(lista_parcelas_normais,''''§'''',65)::varchar, + split_part(lista_parcelas_normais,''§'',67)::date, + split_part(lista_parcelas_normais,''§'',63)::varchar, + split_part(lista_parcelas_normais,''§'',65)::varchar, 9, - ''||inNumConvenio||'' + '||inNumConvenio||' )::varchar - ''; + '; ELSE - stSql := stSql ||'' + stSql := stSql ||' arrecadacao.geraCodigoBarraFebraban ( - split_part(lista_parcelas_normais,''''§'''',67)::varchar, - split_part(lista_parcelas_normais,''''§'''',63)::varchar, - split_part(lista_parcelas_normais,''''§'''',65)::varchar, + split_part(lista_parcelas_normais,''§'',67)::varchar, + split_part(lista_parcelas_normais,''§'',63)::varchar, + split_part(lista_parcelas_normais,''§'',65)::varchar, 7, - ''||inCodFebraban||'' + '||inCodFebraban||' )::varchar - ''; + '; END IF; -stSql := stSql ||'' - , ''''§'''' +stSql := stSql ||' + , ''§'' , 2 ) - ELSE '''''''' END + ELSE '''' END )::varchar as linha_digitavel_normal_11 - - - - - , ( case when ( split_part(lista_parcelas_normais,''''§'''',1)::integer > 11 ) THEN - split_part(lista_parcelas_normais,''''§'''',68) - ELSE '''''''' END + , ( case when ( split_part(lista_parcelas_normais,''§'',1)::integer > 11 ) THEN + split_part(lista_parcelas_normais,''§'',68) + ELSE '''' END )::varchar as cod_parcela_normal_12 - , ( case when ( split_part(lista_parcelas_normais,''''§'''',1)::integer > 11 ) THEN - split_part(lista_parcelas_normais,''''§'''',69) - ELSE '''''''' END + , ( case when ( split_part(lista_parcelas_normais,''§'',1)::integer > 11 ) THEN + split_part(lista_parcelas_normais,''§'',69) + ELSE '''' END )::varchar as valor_normal_12 - , ( case when ( split_part(lista_parcelas_normais,''''§'''',1)::integer > 11 ) THEN - split_part(lista_parcelas_normais,''''§'''',70) - ELSE '''''''' END + , ( case when ( split_part(lista_parcelas_normais,''§'',1)::integer > 11 ) THEN + split_part(lista_parcelas_normais,''§'',70) + ELSE '''' END )::varchar as vencimento_normal_12 - , ( case when ( split_part(lista_parcelas_normais,''''§'''',1)::integer > 11 ) THEN - split_part(lista_parcelas_normais,''''§'''',71) - ELSE '''''''' END + , ( case when ( split_part(lista_parcelas_normais,''§'',1)::integer > 11 ) THEN + split_part(lista_parcelas_normais,''§'',71) + ELSE '''' END )::varchar as numeracao_normal_12 - , ( case when ( split_part(lista_parcelas_normais,''''§'''',1)::integer > 11 ) THEN - split_part(lista_parcelas_normais,''''§'''',71) - ELSE '''''''' END + , ( case when ( split_part(lista_parcelas_normais,''§'',1)::integer > 11 ) THEN + split_part(lista_parcelas_normais,''§'',71) + ELSE '''' END )::varchar as nosso_numero_normal_12 - , ( case when ( split_part(lista_parcelas_normais,''''§'''',1)::integer > 11 ) THEN + , ( case when ( split_part(lista_parcelas_normais,''§'',1)::integer > 11 ) THEN split_part ( -''; -IF ( stPadraoCodBarra = ''febrabanCompBBAnexo5'' ) THEN - stSql := stSql ||'' +'; + +IF ( stPadraoCodBarra = 'febrabanCompBBAnexo5' ) THEN + stSql := stSql ||' arrecadacao.geraCodigoBarraFebrabanCompensacaoBBAnexo5 ( - split_part(lista_parcelas_normais,''''§'''',73)::date, - split_part(lista_parcelas_normais,''''§'''',69)::varchar, - split_part(lista_parcelas_normais,''''§'''',71)::varchar, + split_part(lista_parcelas_normais,''§'',73)::date, + split_part(lista_parcelas_normais,''§'',69)::varchar, + split_part(lista_parcelas_normais,''§'',71)::varchar, 9, - ''||inNumConvenio||'' + '||inNumConvenio||' )::varchar - ''; + '; ELSE - stSql := stSql ||'' + stSql := stSql ||' arrecadacao.geraCodigoBarraFebraban ( - split_part(lista_parcelas_normais,''''§'''',73)::varchar, - split_part(lista_parcelas_normais,''''§'''',69)::varchar, - split_part(lista_parcelas_normais,''''§'''',71)::varchar, + split_part(lista_parcelas_normais,''§'',73)::varchar, + split_part(lista_parcelas_normais,''§'',69)::varchar, + split_part(lista_parcelas_normais,''§'',71)::varchar, 7, - ''||inCodFebraban||'' + '||inCodFebraban||' )::varchar - ''; + '; END IF; -stSql := stSql ||'' - , ''''§'''' +stSql := stSql ||' + , ''§'' , 1 ) - ELSE '''''''' END + ELSE '''' END )::varchar as codigo_barra_normal_12 - , ( case when ( split_part(lista_parcelas_normais,''''§'''',1)::integer > 11 ) THEN + , ( case when ( split_part(lista_parcelas_normais,''§'',1)::integer > 11 ) THEN split_part ( -''; -IF ( stPadraoCodBarra = ''febrabanCompBBAnexo5'' ) THEN - stSql := stSql ||'' +'; + +IF ( stPadraoCodBarra = 'febrabanCompBBAnexo5' ) THEN + stSql := stSql ||' arrecadacao.geraCodigoBarraFebrabanCompensacaoBBAnexo5 ( - split_part(lista_parcelas_normais,''''§'''',73)::date, - split_part(lista_parcelas_normais,''''§'''',69)::varchar, - split_part(lista_parcelas_normais,''''§'''',71)::varchar, + split_part(lista_parcelas_normais,''§'',73)::date, + split_part(lista_parcelas_normais,''§'',69)::varchar, + split_part(lista_parcelas_normais,''§'',71)::varchar, 9, - ''||inNumConvenio||'' + '||inNumConvenio||' )::varchar - ''; + '; ELSE - stSql := stSql ||'' + stSql := stSql ||' arrecadacao.geraCodigoBarraFebraban ( - split_part(lista_parcelas_normais,''''§'''',73)::varchar, - split_part(lista_parcelas_normais,''''§'''',69)::varchar, - split_part(lista_parcelas_normais,''''§'''',71)::varchar, + split_part(lista_parcelas_normais,''§'',73)::varchar, + split_part(lista_parcelas_normais,''§'',69)::varchar, + split_part(lista_parcelas_normais,''§'',71)::varchar, 7, - ''||inCodFebraban||'' + '||inCodFebraban||' )::varchar - ''; + '; END IF; -stSql := stSql ||'' - , ''''§'''' +stSql := stSql ||' + , ''§'' , 2 ) - ELSE '''''''' END + ELSE '''' END )::varchar as linha_digitavel_normal_12 + , split_part(lista_creditos,''§'',1)::varchar as soma_creditos + , split_part(lista_creditos,''§'',2)::varchar as cod_credito_1 + , split_part(lista_creditos,''§'',3)::varchar as descricao_1 + , split_part(lista_creditos,''§'',4)::varchar as valor_1 + , split_part(lista_creditos,''§'',5)::varchar as cod_credito_2 + , split_part(lista_creditos,''§'',6)::varchar as descricao_2 + , split_part(lista_creditos,''§'',7)::varchar as valor_2 + , split_part(lista_creditos,''§'',8)::varchar as cod_credito_3 + , split_part(lista_creditos,''§'',9)::varchar as descricao_3 + , split_part(lista_creditos,''§'',10)::varchar as valor_3 + , split_part(lista_creditos,''§'',11)::varchar as cod_credito_4 + , split_part(lista_creditos,''§'',12)::varchar as descricao_4 + , split_part(lista_creditos,''§'',13)::varchar as valor_4 - , split_part(lista_creditos,''''§'''',1)::varchar as soma_creditos - - , split_part(lista_creditos,''''§'''',2)::varchar as cod_credito_1 - , split_part(lista_creditos,''''§'''',3)::varchar as descricao_1 - , split_part(lista_creditos,''''§'''',4)::varchar as valor_1 - - , split_part(lista_creditos,''''§'''',5)::varchar as cod_credito_2 - , split_part(lista_creditos,''''§'''',6)::varchar as descricao_2 - , split_part(lista_creditos,''''§'''',7)::varchar as valor_2 + , split_part(lista_creditos,''§'',14)::varchar as cod_credito_5 + , split_part(lista_creditos,''§'',15)::varchar as descricao_5 + , split_part(lista_creditos,''§'',16)::varchar as valor_5 - , split_part(lista_creditos,''''§'''',8)::varchar as cod_credito_3 - , split_part(lista_creditos,''''§'''',9)::varchar as descricao_3 - , split_part(lista_creditos,''''§'''',10)::varchar as valor_3 + , split_part(lista_creditos,''§'',17)::varchar as cod_credito_6 + , split_part(lista_creditos,''§'',18)::varchar as descricao_6 + , split_part(lista_creditos,''§'',19)::varchar as valor_6 - , split_part(lista_creditos,''''§'''',11)::varchar as cod_credito_4 - , split_part(lista_creditos,''''§'''',12)::varchar as descricao_4 - , split_part(lista_creditos,''''§'''',13)::varchar as valor_4 + , split_part(lista_creditos,''§'',20)::varchar as cod_credito_7 + , split_part(lista_creditos,''§'',21)::varchar as descricao_7 + , split_part(lista_creditos,''§'',22)::varchar as valor_7 - , split_part(lista_creditos,''''§'''',14)::varchar as cod_credito_5 - , split_part(lista_creditos,''''§'''',15)::varchar as descricao_5 - , split_part(lista_creditos,''''§'''',16)::varchar as valor_5 - - , split_part(lista_creditos,''''§'''',17)::varchar as cod_credito_6 - , split_part(lista_creditos,''''§'''',18)::varchar as descricao_6 - , split_part(lista_creditos,''''§'''',19)::varchar as valor_6 - - , split_part(lista_creditos,''''§'''',20)::varchar as cod_credito_7 - , split_part(lista_creditos,''''§'''',21)::varchar as descricao_7 - , split_part(lista_creditos,''''§'''',22)::varchar as valor_7 - - - , split_part(valor_venal,''''§'''',1)::varchar as venal_territorial - , split_part(valor_venal,''''§'''',2)::varchar as venal_predial - , split_part(valor_venal,''''§'''',3)::varchar as venal_total + , split_part(valor_venal,''§'',1)::varchar as venal_territorial + , split_part(valor_venal,''§'',2)::varchar as venal_predial + , split_part(valor_venal,''§'',3)::varchar as venal_total -- , valor_venal::varchar as venal_total - , split_part(m2_territorial,''''§'''',1)::varchar as valor_m2_territorial - , coalesce (m2_predial, ''''0.00'''')::varchar as valor_m2_predial + , split_part(m2_territorial,''§'',1)::varchar as valor_m2_territorial + , coalesce (m2_predial, ''0.00'')::varchar as valor_m2_predial , imobiliario.fn_busca_localizacao_primeiro_nivel( tudo.codigo_composto )::varchar as localizacao_primeiro_nivel - , split_part(lista_creditos_mata,''''§'''',1)::varchar as valor_imposto + , split_part(lista_creditos_mata,''§'',1)::varchar as valor_imposto - , split_part(dados_taxa_limpeza,''''§'''',1)::varchar as area_limpeza - , split_part(dados_taxa_limpeza,''''§'''',2)::varchar as aliquota_limpeza + , split_part(dados_taxa_limpeza,''§'',1)::varchar as area_limpeza + , split_part(dados_taxa_limpeza,''§'',2)::varchar as aliquota_limpeza , aliquota_imposto::varchar - , ''''''''::varchar as atributo_1 - , ''''''''::varchar as atributo_2 - , ''''''''::varchar as atributo_3 - , ''''''''::varchar as atributo_4 - , ''''''''::varchar as atributo_5 - , ''''''''::varchar as atributo_6 - , ''''''''::varchar as atributo_7 - , ''''''''::varchar as atributo_8 - , ''''''''::varchar as atributo_9 - , ''''''''::varchar as atributo_10 - , ''''''''::varchar as atributo_11 - , ''''''''::varchar as atributo_12 - , ''''''''::varchar as atributo_13 - , ''''''''::varchar as atributo_14 - , ''''''''::varchar as atributo_15 + , ''''::varchar as atributo_1 + , ''''::varchar as atributo_2 + , ''''::varchar as atributo_3 + , ''''::varchar as atributo_4 + , ''''::varchar as atributo_5 + , ''''::varchar as atributo_6 + , ''''::varchar as atributo_7 + , ''''::varchar as atributo_8 + , ''''::varchar as atributo_9 + , ''''::varchar as atributo_10 + , ''''::varchar as atributo_11 + , ''''::varchar as atributo_12 + , ''''::varchar as atributo_13 + , ''''::varchar as atributo_14 + , ''''::varchar as atributo_15 , (( coalesce( m2_predial::numeric, 0.00 ) / 2)::numeric(14,2))::varchar AS valor_m2_predial_descoberto , ( ( arrecadacao.fn_vc2num(recuperaCadastroImobiliarioImovelAreaTotalDescoberta( tudo.inscricao )) * ( coalesce( m2_predial::numeric, 0.00 ) / 2 ) )::numeric(14,2) )::varchar AS valor_venal_predial_descoberto , ( imobiliario.fn_calcula_area_imovel( tudo.inscricao ) + arrecadacao.fn_vc2num(recuperaCadastroImobiliarioImovelAreaTotalDescoberta( tudo.inscricao )) )::varchar AS area_construida_total @@ -1957,6 +1907,7 @@ FROM , imobiliario.fn_calcula_area_imovel_construcao( aic.inscricao_municipal )::numeric(14,2) as area_edificada , ILOC.codigo_composto , ILOC.nom_localizacao + , condominio.nom_condominio as nome_condominio , IML.cod_lote , ial.area_real as area_lote @@ -1965,7 +1916,7 @@ FROM , imobiliario.fn_busca_endereco_imovel ( aic.inscricao_municipal ) as endereco -- , imobiliario.fn_busca_endereco_correspondencia ( aic.inscricao_municipal ) as endereco_c - , arrecadacao.fn_consulta_endereco_mata_saojoao ( aic.inscricao_municipal ) as endereco_c + , arrecadacao.fn_consulta_endereco_mata_saojoao ( aic.inscricao_municipal, aic2.exercicio::varchar ) as endereco_c , arrecadacao.fn_lista_parcelas_unicas( al.cod_lancamento ) as lista_parcelas_unicas , arrecadacao.fn_lista_parcelas_normais( al.cod_lancamento ) as lista_parcelas_normais @@ -1973,7 +1924,7 @@ FROM , arrecadacao.fn_lista_creditos_lancamento( al.cod_lancamento, aic2.cod_grupo, aic2.exercicio ) as lista_creditos , arrecadacao.fn_lista_creditos_lancamento_mata( al.cod_lancamento, aic2.cod_grupo, aic2.exercicio ) as lista_creditos_mata - , vvenal.venal_territorial_calculado||''''§''''||vvenal.venal_predial_calculado||''''§''''|| vvenal.venal_total_calculado as valor_venal + , vvenal.venal_territorial_calculado||''§''||vvenal.venal_predial_calculado||''§''|| vvenal.venal_total_calculado as valor_venal , imobiliario.fn_busca_valor_m2_terreno( aic.inscricao_municipal ) as m2_territorial , imobiliario.fn_busca_valor_m2_predial( iua.cod_construcao, iua.cod_tipo, aic2.exercicio ) as m2_predial @@ -1990,11 +1941,11 @@ FROM select aic.inscricao_municipal as inscricao , max(ac.cod_calculo) as cod_calculo - ''||stColunasOrigem||'' + '||stColunasOrigem||' from arrecadacao.imovel_calculo as aic - ''||stFromOrigem||'' + '||stFromOrigem||' INNER JOIN arrecadacao.calculo as ac ON ac.cod_calculo = aic.cod_calculo @@ -2007,10 +1958,10 @@ FROM and l.ativo = true - ''||stFiltroCredito||'' + '||stFiltroCredito||' group by - aic.inscricao_municipal, ac.exercicio ''|| stGroupByOrigem ||'' + aic.inscricao_municipal, ac.exercicio '|| stGroupByOrigem ||' ) as aic2 ON aic2.inscricao = aic.inscricao_municipal @@ -2069,6 +2020,14 @@ FROM LEFT JOIN imobiliario.baixa_imovel as ibi ON ibi.inscricao_municipal = aic.inscricao_municipal + LEFT JOIN ( SELECT imovel_condominio.inscricao_municipal + , condominio.* + FROM imobiliario.imovel_condominio + INNER JOIN imobiliario.condominio + ON condominio.cod_condominio = imovel_condominio.cod_condominio + )as condominio + ON condominio.inscricao_municipal = aic.inscricao_municipal + LEFT JOIN ( select iua.inscricao_municipal, cod_construcao, cod_tipo @@ -2086,29 +2045,28 @@ FROM ) as iua ON iua.inscricao_municipal = aic.inscricao_municipal - ''; + '; - stSql := stSql||'' WHERE + stSql := stSql||' WHERE al.cod_lancamento is not null and ibi.inscricao_municipal is null and al.valor > 0.00 - ''||stFiltro; + '||stFiltro; /* ordenar */ - if ( stOrdem != '''' ) then + if ( stOrdem != '' ) then stSql := stSql||stOrdem; - stSql := stSql||'' , al.cod_lancamento ''; + stSql := stSql||' , al.cod_lancamento '; else - stSql := stSql||'' order by al.cod_lancamento ''; + stSql := stSql||' order by al.cod_lancamento '; end if; - - stSql := stSql||'' + stSql := stSql||' ) as tudo - ''; + '; FOR reRegistro IN EXECUTE stSql LOOP return next reRegistro; @@ -2117,4 +2075,4 @@ FROM return; END; -' LANGUAGE 'plpgsql'; +$$ LANGUAGE 'plpgsql'; diff --git a/gestaoTributaria/fontes/PLPGSQL/arrecadacao/listaEmissaoGraficaImobiliariaEmissaoIsento.plsql b/gestaoTributaria/fontes/PLPGSQL/arrecadacao/listaEmissaoGraficaImobiliariaEmissaoIsento.plsql index a6742b4..a24b7a1 100644 --- a/gestaoTributaria/fontes/PLPGSQL/arrecadacao/listaEmissaoGraficaImobiliariaEmissaoIsento.plsql +++ b/gestaoTributaria/fontes/PLPGSQL/arrecadacao/listaEmissaoGraficaImobiliariaEmissaoIsento.plsql @@ -1889,7 +1889,7 @@ FROM , imobiliario.fn_busca_endereco_imovel ( aic.inscricao_municipal ) as endereco -- , imobiliario.fn_busca_endereco_correspondencia ( aic.inscricao_municipal ) as endereco_c - , arrecadacao.fn_consulta_endereco_mata_saojoao ( aic.inscricao_municipal ) as endereco_c + , arrecadacao.fn_consulta_endereco_mata_saojoao ( aic.inscricao_municipal, aic2.exercicio::varchar ) as endereco_c , arrecadacao.fn_lista_parcelas_unicas( al.cod_lancamento ) as lista_parcelas_unicas , arrecadacao.fn_lista_parcelas_normais( al.cod_lancamento ) as lista_parcelas_normais diff --git a/gestaoTributaria/fontes/PLPGSQL/dividaAtiva/fn_aplica_reducao_modalidade_acrescimo.plsql b/gestaoTributaria/fontes/PLPGSQL/dividaAtiva/fn_aplica_reducao_modalidade_acrescimo.plsql index 5b5b27b..73c463f 100644 --- a/gestaoTributaria/fontes/PLPGSQL/dividaAtiva/fn_aplica_reducao_modalidade_acrescimo.plsql +++ b/gestaoTributaria/fontes/PLPGSQL/dividaAtiva/fn_aplica_reducao_modalidade_acrescimo.plsql @@ -25,7 +25,7 @@ * URBEM Soluções de Gestão Pública Ltda * www.urbem.cnm.org.br * -* $Id: fn_aplica_reducao_modalidade_acrescimo.plsql 63615 2015-09-18 14:11:12Z evandro $ +* $Id: fn_aplica_reducao_modalidade_acrescimo.plsql 63888 2015-10-30 15:35:08Z evandro $ * * Caso de uso: uc-05.04.00 */ @@ -106,7 +106,7 @@ begin -- executa FOR reRecordFuncoes IN EXECUTE stSqlFuncoes LOOP - stExecuta := 'SELECT '||reRecordFuncoes.funcao_valida||'( '||inRegistro|', '''||dtDataVencimento||''', '||inQtdParcelas||' ) as utilizar '; + stExecuta := 'SELECT '||reRecordFuncoes.funcao_valida||'( '||inRegistro||', '''||dtDataVencimento||''', '||inQtdParcelas||' ) as utilizar '; FOR reRecordExecuta IN EXECUTE stExecuta LOOP boUtilizar := reRecordExecuta.utilizar; END LOOP; diff --git a/gestaoTributaria/fontes/RPT/arrecadacao/report/design/relatorioDeLancamentosAutomatico.rptdesign b/gestaoTributaria/fontes/RPT/arrecadacao/report/design/relatorioDeLancamentosAutomatico.rptdesign index 3eb4dce..5b6d400 100644 --- a/gestaoTributaria/fontes/RPT/arrecadacao/report/design/relatorioDeLancamentosAutomatico.rptdesign +++ b/gestaoTributaria/fontes/RPT/arrecadacao/report/design/relatorioDeLancamentosAutomatico.rptdesign @@ -102,70 +102,57 @@ Desenvolvedor: Henrique Boaventura <henrique.boaventura@cnm.org.br> - Relatório de Pagadores + + $registros): ?> +

    + + + + + + + + + + + + + + + $registro): ?> + + + + + + + + + + + + + + + + +
    CGMNomeInscrição OrigemValorCódigoDescrição
    TOTAL DE REGISTROS:
    + \ No newline at end of file diff --git a/gestaoTributaria/fontes/SQL/GT_2044.sql b/gestaoTributaria/fontes/SQL/GT_2044.sql index 46600fa..16acd41 100644 --- a/gestaoTributaria/fontes/SQL/GT_2044.sql +++ b/gestaoTributaria/fontes/SQL/GT_2044.sql @@ -2718,3 +2718,398 @@ DROP TABLE migra_cnae; ALTER TABLE economico.cnae_fiscal ADD COLUMN risco CHAR(1) NOT NULL DEFAULT 'N'; ALTER TABLE economico.cnae_fiscal ADD CONSTRAINT ck_cnae_fiscal_1 CHECK (risco IN ('A', 'B', 'N')); + +---------------- +-- Ticket #23328 +---------------- + +DROP FUNCTION arrecadacao.fn_consulta_endereco_mata_saojoao(INTEGER); + + +---------------- +-- Ticket #22494 +---------------- + +DROP FUNCTION arrecadacao.fn_carne_parcela( INTEGER ); + + +---------------- +-- Ticket #23364 +---------------- + +INSERT + INTO administracao.acao + ( cod_acao + , cod_funcionalidade + , nom_arquivo + , parametro + , ordem + , complemento_acao + , nom_acao + , ativo + ) +SELECT 3093 + , 366 + , 'FLRelatorioPagadores.php' + , 'emitir' + , 14 + , '' + , 'Relatório de Pagadores' + , TRUE + WHERE 0 = ( + SELECT COUNT(1) + FROM administracao.acao + WHERE cod_acao = 3093 + ) + ; + +INSERT + INTO administracao.relatorio + ( cod_gestao + , cod_modulo + , cod_relatorio + , nom_relatorio + , arquivo ) +SELECT 5 + , 33 + , 9 + , 'Relatório de Pagadores' + , 'LHRelatorioPagadores.php' + WHERE 0 = ( + SELECT COUNT(1) + FROM administracao.relatorio + WHERE cod_gestao = 5 + AND cod_modulo = 33 + AND cod_relatorio = 9 + ) + ; + + +---------------- +-- Ticket #23408 +---------------- + +CREATE OR REPLACE FUNCTION manutencao() RETURNS VOID AS $$ +DECLARE + inCodModelo INTEGER; +BEGIN + PERFORM 1 + FROM administracao.configuracao + WHERE cod_modulo = 2 + AND exercicio = '2015' + AND parametro = 'cnpj' + AND valor = '13805528000180' + ; + IF FOUND THEN + PERFORM 1 + FROM arrecadacao.modelo_carne + WHERE nom_arquivo = 'RCarneTFFMataSaoJoao2016.class.php' + ; + IF NOT FOUND THEN + SELECT MAX(cod_modelo) + 1 + INTO inCodModelo + FROM arrecadacao.modelo_carne + ; + INSERT INTO arrecadacao.modelo_carne VALUES (inCodModelo, 'Carne T.F.F. 2016', 'RCarneTFFMataSaoJoao2016.class.php', 14, FALSE); + INSERT INTO arrecadacao.acao_modelo_carne VALUES (inCodModelo, 963 ); + INSERT INTO arrecadacao.acao_modelo_carne VALUES (inCodModelo, 964 ); + INSERT INTO arrecadacao.acao_modelo_carne VALUES (inCodModelo, 978 ); + INSERT INTO arrecadacao.acao_modelo_carne VALUES (inCodModelo, 979 ); + INSERT INTO arrecadacao.acao_modelo_carne VALUES (inCodModelo, 1677); + INSERT INTO arrecadacao.acao_modelo_carne VALUES (inCodModelo, 1678); + END IF; + END IF; +END; +$$ LANGUAGE 'plpgsql'; + +SELECT manutencao(); +DROP FUNCTION manutencao(); + + +---------------- +-- Ticket #23410 +---------------- + +CREATE OR REPLACE FUNCTION manutencao() RETURNS VOID AS $$ +DECLARE + inCodModelo INTEGER; +BEGIN + PERFORM 1 + FROM administracao.configuracao + WHERE cod_modulo = 2 + AND exercicio = '2015' + AND parametro = 'cnpj' + AND valor = '13805528000180' + ; + IF FOUND THEN + PERFORM 1 + FROM arrecadacao.modelo_carne + WHERE nom_arquivo = 'RCarneIPTUMataSaoJoao2016.class.php' + ; + IF NOT FOUND THEN + SELECT MAX(cod_modelo) + 1 + INTO inCodModelo + FROM arrecadacao.modelo_carne + ; + INSERT INTO arrecadacao.modelo_carne VALUES (inCodModelo, 'Carne I.P.T.U. 2016', 'RCarneIPTUMataSaoJoao2016.class.php', 12, FALSE); + INSERT INTO arrecadacao.acao_modelo_carne VALUES (inCodModelo, 963 ); + INSERT INTO arrecadacao.acao_modelo_carne VALUES (inCodModelo, 964 ); + INSERT INTO arrecadacao.acao_modelo_carne VALUES (inCodModelo, 978 ); + INSERT INTO arrecadacao.acao_modelo_carne VALUES (inCodModelo, 979 ); + END IF; + END IF; +END; +$$ LANGUAGE 'plpgsql'; + +SELECT manutencao(); +DROP FUNCTION manutencao(); + + +---------------- +-- Ticket #23442 +---------------- + + -- + -- Insere a função. + -- + CREATE OR REPLACE function public.manutencao_funcao( intCodmodulo INTEGER + , intCodBiblioteca INTEGER + , varNomeFunc VARCHAR + , intCodTiporetorno INTEGER) + RETURNS integer as $$ + DECLARE + intCodFuncao INTEGER := 0; + varAux VARCHAR; + BEGIN + + SELECT cod_funcao + INTO intCodFuncao + FROM administracao.funcao + WHERE cod_modulo = intCodmodulo + AND cod_biblioteca = intCodBiblioteca + AND Lower(Btrim(nom_funcao)) = Lower(Btrim(varNomeFunc)) + ; + + IF FOUND THEN + DELETE FROM administracao.corpo_funcao_externa WHERE cod_modulo = intCodmodulo AND cod_biblioteca = intCodBiblioteca AND cod_funcao = intCodFuncao; + DELETE FROM administracao.funcao_externa WHERE cod_modulo = intCodmodulo AND cod_biblioteca = intCodBiblioteca AND cod_funcao = intCodFuncao; + DELETE FROM administracao.funcao_referencia WHERE cod_modulo = intCodmodulo AND cod_biblioteca = intCodBiblioteca AND cod_funcao = intCodFuncao; + DELETE FROM administracao.parametro WHERE cod_modulo = intCodmodulo AND cod_biblioteca = intCodBiblioteca AND cod_funcao = intCodFuncao; + DELETE FROM administracao.variavel WHERE cod_modulo = intCodmodulo AND cod_biblioteca = intCodBiblioteca AND cod_funcao = intCodFuncao; + DELETE FROM administracao.funcao WHERE cod_modulo = intCodmodulo AND cod_biblioteca = intCodBiblioteca AND cod_funcao = intCodFuncao; + END IF; + + -- Raise Notice ' Entrou 1 '; + + SELECT (max(cod_funcao)+1) + INTO intCodFuncao + FROM administracao.funcao + WHERE cod_modulo = intCodmodulo + AND cod_biblioteca = intCodBiblioteca + ; + + --varAux := varNomeFunc || ' - ' || To_Char( intCodFuncao, '999999') ; + --RAise Notice '=> % ', varAux; + + IF intCodFuncao IS NULL OR intCodFuncao = 0 THEN + intCodFuncao := 1; + END IF; + + INSERT INTO administracao.funcao ( cod_modulo + , cod_biblioteca + , cod_funcao + , cod_tipo_retorno + , nom_funcao) + VALUES ( intCodmodulo + , intCodBiblioteca + , intCodFuncao + , intCodTiporetorno + , varNomeFunc); + + RETURN intCodFuncao; + + END; + $$ LANGUAGE 'plpgsql'; + + -- + -- Inclusão de Váriaveis. + -- + CREATE OR REPLACE function public.manutencao_variavel( intCodmodulo INTEGER + , intCodBiblioteca INTEGER + , intCodFuncao INTEGER + , varNomVariavel VARCHAR + , intTipoVariavel INTEGER) + RETURNS integer as $$ + DECLARE + intCodVariavel INTEGER := 0; + BEGIN + + If intCodFuncao != 0 THEN + SELECT COALESCE((max(cod_variavel)+1),1) + INTO intCodVariavel + FROM administracao.variavel + WHERE cod_modulo = intCodmodulo + AND cod_biblioteca = intCodBiblioteca + AND cod_funcao = intCodFuncao + ; + + INSERT INTO administracao.variavel ( cod_modulo + , cod_biblioteca + , cod_funcao + , cod_variavel + , nom_variavel + , cod_tipo ) + VALUES ( intCodmodulo + , intCodBiblioteca + , intCodFuncao + , intCodVariavel + , varNomVariavel + , intTipoVariavel + ); + END IF; + + RETURN intCodVariavel; + END; + $$ LANGUAGE 'plpgsql'; + + + -- + -- Inclusão de parametro. + -- + CREATE OR REPLACE function public.manutencao_parametro( intCodmodulo INTEGER + , intCodBiblioteca INTEGER + , intCodFuncao INTEGER + , intCodVariavel INTEGER) + RETURNS VOID as $$ + DECLARE + intOrdem INTEGER := 0; + BEGIN + If intCodFuncao != 0 THEN + SELECT COALESCE((max(ordem)+1),1) + INTO intOrdem + FROM administracao.parametro + WHERE cod_modulo = intCodmodulo + AND cod_biblioteca = intCodBiblioteca + AND cod_funcao = intCodFuncao + ; + + INSERT INTO administracao.parametro ( cod_modulo + , cod_biblioteca + , cod_funcao + , cod_variavel + , ordem) + VALUES ( intCodmodulo + , intCodBiblioteca + , intCodFuncao + , intCodVariavel + , intOrdem ); + End If; + + RETURN; + END; + $$ LANGUAGE 'plpgsql'; + + + -- + -- Inclusão de parametro. + -- + CREATE OR REPLACE function public.manutencao_funcao_externa( intCodmodulo INTEGER + , intCodBiblioteca INTEGER + , intCodFuncao INTEGER ) + RETURNS VOID as $$ + DECLARE + --intCodFuncao INTEGER; + BEGIN + + -- RAise Notice ' =====> % ', intCodFuncao; + + If intCodFuncao != 0 THEN + INSERT INTO administracao.funcao_externa ( cod_modulo + , cod_biblioteca + , cod_funcao + , comentario + ) + VALUES ( intCodmodulo + , intCodBiblioteca + , intCodFuncao + , '' + ); + END IF; + RETURN; + END; + $$ LANGUAGE 'plpgsql'; + + -- + -- Função principal. + -- + CREATE OR REPLACE function public.manutencao() RETURNS VOID as $$ + DECLARE + intCodFuncao INTEGER; + intCodVariavel INTEGER; + BEGIN + + -- 1 | INTEIRO + -- 2 | TEXTO + -- 3 | BOOLEANO + -- 4 | NUMERICO + -- 5 | DATA + + --Inclusão de função interna arrecadacao/fn_acrescimo_indice.plsql + + PERFORM 1 + FROM administracao.configuracao + WHERE cod_modulo = 2 + AND exercicio = '2015' + AND parametro = 'cnpj' + AND valor = '94068418000184' + ; + IF FOUND THEN + + intCodFuncao := public.manutencao_funcao ( 28, 2, 'fn_urm_mariana', 4); + --( intCodmodulo , intCodBiblioteca , varNomeFunc , intCodTiporetorno ) + + intCodVariavel := public.manutencao_variavel ( 28, 2, intCodFuncao, 'dtVencimento' , 5 ); + PERFORM public.manutencao_parametro( 28, 2, intCodFuncao, intCodVariavel ); + intCodVariavel := public.manutencao_variavel ( 28, 2, intCodFuncao, 'dtDataCalculo' , 5 ); + PERFORM public.manutencao_parametro( 28, 2, intCodFuncao, intCodVariavel ); + intCodVariavel := public.manutencao_variavel ( 28, 2, intCodFuncao, 'nuValor' , 4 ); + PERFORM public.manutencao_parametro( 28, 2, intCodFuncao, intCodVariavel ); + intCodVariavel := public.manutencao_variavel ( 28, 2, intCodFuncao, 'inCodAcrescimo', 1 ); + PERFORM public.manutencao_parametro( 28, 2, intCodFuncao, intCodVariavel ); + intCodVariavel := public.manutencao_variavel ( 28, 2, intCodFuncao, 'inCodTipo' , 1 ); + PERFORM public.manutencao_parametro( 28, 2, intCodFuncao, intCodVariavel ); + + PERFORM public.manutencao_funcao_externa( 28, 2, intCodFuncao ); + + INSERT + INTO monetario.formula_acrescimo + ( cod_acrescimo + , cod_tipo + , cod_modulo + , cod_biblioteca + , cod_funcao + ) + VALUES + ( 1 + , 1 + , 28 + , 2 + , intCodFuncao + ); + + END IF; + RETURN; + END; + $$ LANGUAGE 'plpgsql'; + + -- + -- Execuçao função. + -- + Select public.manutencao(); + Drop Function public.manutencao(); + Drop Function public.manutencao_funcao(integer, integer, varchar, integer ); + Drop Function public.manutencao_variavel( integer, integer, integer, varchar, integer ); + Drop Function public.manutencao_parametro( integer, integer, integer, integer ); + Drop Function public.manutencao_funcao_externa( integer, integer, integer ) ; + + -- libgit2 0.21.2