diff --git a/config.yml-dist b/config.yml-dist index 05174ae..50a9021 100644 --- a/config.yml-dist +++ b/config.yml-dist @@ -10,4 +10,4 @@ urbem: birt: port: 8080 port_ssl: 8443 - host: + host: diff --git a/gestaoAdministrativa/fontes/PHP/framework/bancoDados/postgreSQL/PersistenteRelatorio.class.php b/gestaoAdministrativa/fontes/PHP/framework/bancoDados/postgreSQL/PersistenteRelatorio.class.php index f58a3ef..2cf9994 100755 --- a/gestaoAdministrativa/fontes/PHP/framework/bancoDados/postgreSQL/PersistenteRelatorio.class.php +++ b/gestaoAdministrativa/fontes/PHP/framework/bancoDados/postgreSQL/PersistenteRelatorio.class.php @@ -74,7 +74,7 @@ function PersistenteRelatorio() * Método abstrato * @access Public */ -function geraRecordSet(&$rsRecordSet , $stOrder = "") -{ -} +//function geraRecordSet(&$rsRecordSet , $stOrder = "") +//{ +//} } diff --git a/gestaoAdministrativa/fontes/PHP/protocolo/protocolo/processos/incluiProcesso.php b/gestaoAdministrativa/fontes/PHP/protocolo/protocolo/processos/incluiProcesso.php index 9b212bc..90ab1dc 100755 --- a/gestaoAdministrativa/fontes/PHP/protocolo/protocolo/processos/incluiProcesso.php +++ b/gestaoAdministrativa/fontes/PHP/protocolo/protocolo/processos/incluiProcesso.php @@ -32,7 +32,7 @@ Casos de uso: uc-01.06.98 - $Id: incluiProcesso.php 60298 2014-10-10 21:01:01Z arthur $ + $Id: incluiProcesso.php 62399 2015-05-04 17:27:11Z jean $ */ @@ -157,6 +157,7 @@ switch ($controle) { # Insere o processo no banco de dados e exibe mensagens $processos = new processosLegado; + $boProcessoIncluido = $processos->incluiProcesso($codProcesso,$_REQUEST["vinculo"],$codClassificacao,$codAssunto,$numCgm,$_REQUEST["numMatricula"], $_REQUEST['numInscricao'],$_REQUEST["observacoes"],$_REQUEST["resumo"],$refAnterior,$processosAnexos, Sessao::read('numCgm'),$codOrgao,$codUnidade,$codDpto,$codSetor, diff --git a/gestaoAdministrativa/fontes/PHP/protocolo/protocolo/processos/interfaceProcessos.class.php b/gestaoAdministrativa/fontes/PHP/protocolo/protocolo/processos/interfaceProcessos.class.php index 274a507..46433e2 100755 --- a/gestaoAdministrativa/fontes/PHP/protocolo/protocolo/processos/interfaceProcessos.class.php +++ b/gestaoAdministrativa/fontes/PHP/protocolo/protocolo/processos/interfaceProcessos.class.php @@ -32,7 +32,7 @@ * Casos de uso: uc-01.06.98 - $Id: interfaceProcessos.class.php 62345 2015-04-27 18:46:06Z jean $ + $Id: interfaceProcessos.class.php 62399 2015-05-04 17:27:11Z jean $ */ include_once '../../../../../../gestaoAdministrativa/fontes/PHP/pacotes/FrameworkHTML.inc.php'; @@ -594,6 +594,13 @@ function formIncluiProcesso($dadosForm="",$action="",$controle=0) mensagem += '@A combo Assunto é obrigatória'; erro = true; } + + campo = jq('#inCodOrganogramaClassificacao').val(); + + if (campo=='0.00.00' || campo=='') { + mensagem += '@A combo Classificação de Encaminhamento de Processo é obrigatória'; + erro = true; + } if (erro) { jq('#botaoOk').attr('disabled','disabled'); diff --git a/gestaoAdministrativa/fontes/RPT/protocolo/report/design/arquivaProcessoDefinitivo.rptdesign b/gestaoAdministrativa/fontes/RPT/protocolo/report/design/arquivaProcessoDefinitivo.rptdesign index 93e77ce..8edf575 100644 --- a/gestaoAdministrativa/fontes/RPT/protocolo/report/design/arquivaProcessoDefinitivo.rptdesign +++ b/gestaoAdministrativa/fontes/RPT/protocolo/report/design/arquivaProcessoDefinitivo.rptdesign @@ -1,8 +1,8 @@ - - Copyright (c) 2007 <<Your Company Name here>> - Eclipse BIRT Designer Version 4.4.0.v201405191524 Build <4.4.0.v20140606-1451> + + Eclipse BIRT Designer Version 2.5.0.v20090603 Build <2.5.0.v20090617-0630> in + Copyright (c) 2007 <<Your Company Name here>> Template Urbem Retrato auto layout @@ -15,9 +15,9 @@ static string - true simple text-box + true Unformatted @@ -27,9 +27,9 @@ static false string - true simple text-box + true Unformatted @@ -39,9 +39,9 @@ static false string - true simple text-box + true Unformatted @@ -51,12 +51,12 @@ static false string - true org.postgresql.Driver simple text-box + true Unformatted @@ -66,12 +66,12 @@ static false string - true jdbc:postgresql://172.16.30.4:5432/ga_mariana_1809_1910_1 simple text-box + true Unformatted @@ -81,12 +81,12 @@ static false string - true sw.suporte simple text-box + true Unformatted @@ -96,12 +96,12 @@ static false string - true suporte simple text-box + true Unformatted @@ -110,9 +110,9 @@ static false integer - true simple text-box + true Unformatted @@ -121,10 +121,10 @@ static false string - true simple false text-box + true Unformatted @@ -133,10 +133,10 @@ static false string - true simple false text-box + true Unformatted @@ -145,9 +145,9 @@ static false string - true simple text-box + true Unformatted @@ -156,9 +156,9 @@ static false string - true simple text-box + true Unformatted @@ -167,10 +167,10 @@ static false string - true simple false text-box + true Unformatted @@ -179,9 +179,9 @@ static false string - true simple text-box + true Unformatted @@ -190,23 +190,22 @@ static false string - true simple text-box + true Unformatted - + static string - true - simple text-box + true Unformatted @@ -519,9 +518,8 @@ params['query'] = this.queryText; ]]> valor - params["pEntidadePrincipal"] + ", " + params["pDataHoje"] + params["pEntidadePrincipal"] + ", " + params["pDataHoje"] string - true endereco @@ -833,12 +831,14 @@ params['query'] = this.queryText; ]]> 3 1 - + bold + 1pt + 1pt + 10pt center - params["pEntidadePrincipal"] + ", " + params["pDataHoje"] - html - + valor + diff --git a/gestaoAdministrativa/fontes/RPT/protocolo/report/design/reciboProcesso.rptdesign b/gestaoAdministrativa/fontes/RPT/protocolo/report/design/reciboProcesso.rptdesign index 048354b..3fca044 100644 --- a/gestaoAdministrativa/fontes/RPT/protocolo/report/design/reciboProcesso.rptdesign +++ b/gestaoAdministrativa/fontes/RPT/protocolo/report/design/reciboProcesso.rptdesign @@ -1,7 +1,8 @@ - + + Eclipse BIRT Designer Version 2.5.0.v20090603 Build <2.5.0.v20090617-0630> + in Copyright (c) 2007 <<Your Company Name here>> - Eclipse BIRT Designer Version 4.4.0.v201405191524 Build <4.4.0.v20140606-1451> queryText @@ -20,7 +21,6 @@ 1181 - in Template Urbem Retrato auto layout @@ -33,9 +33,9 @@ static string - true simple text-box + true Unformatted @@ -45,9 +45,9 @@ static false string - true simple text-box + true Unformatted @@ -57,9 +57,9 @@ static false string - true simple text-box + true Unformatted @@ -69,12 +69,12 @@ static false string - true org.postgresql.Driver simple text-box + true Unformatted @@ -84,12 +84,12 @@ static false string - true jdbc:postgresql://[ip]:5432/[database] simple text-box + true Unformatted @@ -99,12 +99,12 @@ static false string - true [usuario] simple text-box + true Unformatted @@ -114,12 +114,12 @@ static false string - true [usuario] simple text-box + true Unformatted @@ -128,9 +128,9 @@ static false integer - true simple text-box + true Unformatted @@ -139,10 +139,10 @@ static false string - true simple false text-box + true Unformatted @@ -151,9 +151,9 @@ static false string - true simple text-box + true Unformatted @@ -162,10 +162,10 @@ static false string - true simple false text-box + true Unformatted @@ -174,10 +174,10 @@ static false string - true simple false text-box + true Unformatted @@ -186,9 +186,9 @@ static false string - true simple text-box + true Unformatted @@ -197,9 +197,9 @@ static false string - true simple text-box + true Unformatted @@ -208,9 +208,9 @@ static false string - true simple text-box + true Unformatted @@ -219,9 +219,9 @@ static false string - true simple text-box + true Unformatted @@ -233,10 +233,9 @@ static string - true - simple text-box + true Unformatted @@ -1395,7 +1394,7 @@ INNER JOIN sw_municipio Column Binding - cod_situacao + cod_situacao dataSetRow["cod_situacao"] any @@ -1490,8 +1489,8 @@ INNER JOIN sw_municipio 50 - right 1.6145833333in + right 0.3229166667in @@ -2154,7 +2153,7 @@ INNER JOIN sw_municipio valor - dataSetRow["valor"]+', ' + params["pEntidadePrincipal"] + ', ' string @@ -2166,15 +2165,14 @@ INNER JOIN sw_municipio - + bold right pEntidadePrincipal - params["pEntidadePrincipal"] + ', ' + params["pEntidadePrincipal"].value + ', ' string - true pEntidadePrincipal @@ -2203,42 +2201,270 @@ INNER JOIN sw_municipio 0pt 1pt - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - + + + + all + params["numero_assinatura"] == 0 + + + + 20% + + + 25% + center + + + 10% + center + + + 25% + center + + + 20% + + + + + 3 + 1 + + 0pt + 100% + urbem_221.assinaturas + + + all + params["numero_assinatura"] > 1 || params["numero_assinatura"] == "" || params["numero_assinatura"] == "" + + + + + exercicio + dataSetRow["exercicio"] + string + + + cod_entidade + dataSetRow["cod_entidade"] + integer + + + numcgm + dataSetRow["numcgm"] + integer + + + cargo + dataSetRow["cargo"] + string + + + timestamp + dataSetRow["timestamp"] + date-time + + + nom_cgm + dataSetRow["nom_cgm"] + string + + + 50 + + + + + + all + (row.__rownum%2==1) + + + + #000000 + solid + 1px + 1pt + 40pt + + serif + medium + center + nom_cgm + + + serif + medium + center + cargo + + + + +
+ + + + + + 2 + 1 + + 100% + urbem_221.assinaturas + + + all + params["numero_assinatura"] < 2 || params["numero_assinatura"] == "" || params["numero_assinatura"] == "" + + + + + exercicio + dataSetRow["exercicio"] + string + + + cod_entidade + dataSetRow["cod_entidade"] + integer + + + numcgm + dataSetRow["numcgm"] + integer + + + cargo + dataSetRow["cargo"] + string + + + timestamp + dataSetRow["timestamp"] + date-time + + + nom_cgm + dataSetRow["nom_cgm"] + string + + + 50 + + + + + + all + (row.__rownum%2==1) + + + + #000000 + solid + 1px + 1pt + 40pt + + serif + medium + center + nom_cgm + + + serif + medium + center + cargo + + + + +
+ + + + 2 + 1 + + 100% + urbem_221.assinaturas + + + all + params["numero_assinatura"] < 2 || params["numero_assinatura"] == "" || params["numero_assinatura"] == "" + + + + + exercicio + dataSetRow["exercicio"] + string + + + cod_entidade + dataSetRow["cod_entidade"] + integer + + + numcgm + dataSetRow["numcgm"] + integer + + + cargo + dataSetRow["cargo"] + string + + + timestamp + dataSetRow["timestamp"] + date-time + + + nom_cgm + dataSetRow["nom_cgm"] + string + + + 50 + + + + + + all + (row.__rownum%2==0) + + + + #000000 + solid + 1px + 1pt + 40pt + + serif + medium + center + nom_cgm + + + serif + medium + center + cargo + + + + +
+ + diff --git a/gestaoFinanceira/fontes/PHP/contabilidade/instancias/lancamentoContabil/FLAberturaRestosAPagar.php b/gestaoFinanceira/fontes/PHP/contabilidade/instancias/lancamentoContabil/FLAberturaRestosAPagar.php index c600aef..cc020f5 100755 --- a/gestaoFinanceira/fontes/PHP/contabilidade/instancias/lancamentoContabil/FLAberturaRestosAPagar.php +++ b/gestaoFinanceira/fontes/PHP/contabilidade/instancias/lancamentoContabil/FLAberturaRestosAPagar.php @@ -33,7 +33,7 @@ * @ignore - $Id: FLAberturaRestosAPagar.php 59612 2014-09-02 12:00:51Z gelson $ + $Id: FLAberturaRestosAPagar.php 62406 2015-05-05 14:43:16Z franver $ $Revision: $ $Name$ @@ -73,17 +73,17 @@ $obHdnCtrl->setName ( "stCtrl" ); $obHdnCtrl->setValue( $stCtrl ); $obRConfiguracao = new RConfiguracaoConfiguracao; -$obRConfiguracao->setParametro('virada_GF'); +$obRConfiguracao->setParametro('abertura_RP'); $obRConfiguracao->setExercicio( Sessao::getExercicio()); -$obRConfiguracao->setCodModulo( 10 ); -$obRConfiguracao->consultar(); +$obRConfiguracao->setCodModulo( 9 ); +$obRConfiguracao->consultar($boTransacao); $obHdnEval = new HiddenEval; $obHdnEval->setName ( "stEval" ); $obHdnEval->setValue ( $stEval ); if ( $obRConfiguracao->getValor() == 'T' ) { - $stObs = "Este processo já foi executado! Se deseja prosseguir faça a Anulação de Restos à pagar primeiro!"; + $stObs = "Este processo já foi executado! Se deseja prosseguir faça a Anulação de Restos à pagar primeiro!"; } else { $stObs = "Este processo é lento devido aos cálculos de restos a pagar.
Recomenda-se que o mesmo seja executado após o término do expediente."; } @@ -102,7 +102,7 @@ $obFormulario->addHidden( $obHdnAcao ); $obFormulario->addHidden( $obHdnCtrl ); $obFormulario->addTitulo( "Restos a Pagar Abertura do Exercício." ); $obFormulario->addComponente($obLblObs); -$obBtnOk = new Ok(); +$obBtnOk = new Ok(true); if ( $obRConfiguracao->getValor() != 'T') { $obFormulario->defineBarra( array($obBtnOk) ); } diff --git a/gestaoFinanceira/fontes/PHP/contabilidade/instancias/lancamentoContabil/FLCancelarAberturaRestosAPagar.php b/gestaoFinanceira/fontes/PHP/contabilidade/instancias/lancamentoContabil/FLCancelarAberturaRestosAPagar.php index d23e271..1932fa2 100755 --- a/gestaoFinanceira/fontes/PHP/contabilidade/instancias/lancamentoContabil/FLCancelarAberturaRestosAPagar.php +++ b/gestaoFinanceira/fontes/PHP/contabilidade/instancias/lancamentoContabil/FLCancelarAberturaRestosAPagar.php @@ -35,7 +35,7 @@ * @ignore - $Id: FLCancelarAberturaRestosAPagar.php 59612 2014-09-02 12:00:51Z gelson $ + $Id: FLCancelarAberturaRestosAPagar.php 62406 2015-05-05 14:43:16Z franver $ * Casos de uso: */ @@ -77,7 +77,17 @@ $obHdnEval = new HiddenEval; $obHdnEval->setName ( "stEval" ); $obHdnEval->setValue ( $stEval ); -$stObs = "Este processo é lento devido aos cálculos de restos a pagar.
Recomenda-se que o mesmo seja executado após o término do expediente."; +$obRConfiguracao = new RConfiguracaoConfiguracao; +$obRConfiguracao->setParametro('abertura_RP'); +$obRConfiguracao->setExercicio( Sessao::getExercicio()); +$obRConfiguracao->setCodModulo( 9 ); +$obRConfiguracao->consultar($boTransacao); + +if ( $obRConfiguracao->getValor() == 'T' ) { + $stObs = "Este processo é lento devido aos cálculos de restos a pagar.
Recomenda-se que o mesmo seja executado após o término do expediente."; +} else { + $stObs = "Este processo já foi executado! Se deseja prosseguir faça a Abertura de Restos à pagar primeiro!"; +} $obLblObs = new Label; $obLblObs->setValue ( $stObs ); @@ -95,9 +105,9 @@ $obFormulario->addTitulo( "Cancelar Abertura de Restos a Pagar do Exercício." $obFormulario->addComponente($obLblObs ); $obBtnOk = new Ok(); $obBtnOk ->obEvento->setOnClick('BloqueiaFrames(true,false); Salvar();' ); - -$obFormulario->defineBarra( array($obBtnOk) ); - +if ( $obRConfiguracao->getValor() == 'T' ) { + $obFormulario->defineBarra( array($obBtnOk) ); +} $obFormulario->show(); include_once '../../../../../../gestaoAdministrativa/fontes/PHP/framework/include/rodape.inc.php'; diff --git a/gestaoFinanceira/fontes/PHP/contabilidade/instancias/lancamentoContabil/PRAberturaRestosAPagar.php b/gestaoFinanceira/fontes/PHP/contabilidade/instancias/lancamentoContabil/PRAberturaRestosAPagar.php index 669ff24..810a747 100755 --- a/gestaoFinanceira/fontes/PHP/contabilidade/instancias/lancamentoContabil/PRAberturaRestosAPagar.php +++ b/gestaoFinanceira/fontes/PHP/contabilidade/instancias/lancamentoContabil/PRAberturaRestosAPagar.php @@ -32,7 +32,7 @@ * @ignore - $Id: PRAberturaRestosAPagar.php 59612 2014-09-02 12:00:51Z gelson $ + $Id: PRAberturaRestosAPagar.php 62406 2015-05-05 14:43:16Z franver $ $Revision: 30668 $ $Name$ @@ -41,14 +41,6 @@ * Casos de uso: uc-02.02.31 */ - -/* -$Log$ -Revision 1.2 2006/07/05 20:50:57 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_GA_ADM_NEGOCIO."RConfiguracaoConfiguracao.class.php" ); @@ -73,7 +65,16 @@ switch ($stAcao) { case "incluir": $obFContabilidadeAberturaRestosAPagar->setDado("stExercicio", Sessao::getExercicio()); - $obErro = $obFContabilidadeAberturaRestosAPagar->gerarRestosAbertura($rsRecordSet, ""); + $obErro = $obFContabilidadeAberturaRestosAPagar->gerarRestosAbertura($rsRecordSet, $boTransacao); + if (!$obErro->ocorreu()) { + $obRConfiguracao = new RConfiguracaoConfiguracao; + $obRConfiguracao->setParametro('abertura_RP'); + $obRConfiguracao->setExercicio( Sessao::getExercicio()); + $obRConfiguracao->setCodModulo( 9 ); + $obRConfiguracao->setValor( 'T' ); + $obErro = $obRConfiguracao->alterar($boTransacao); + } + if ( !$obErro->ocorreu() ) { SistemaLegado::alertaAviso($pgFilt."?stAcao=incluir","Geração de Abertura do Exercício - Restos a Pagar realizado.","pagar","aviso", Sessao::getId(), "../"); } else { @@ -81,4 +82,5 @@ switch ($stAcao) { } break; } +SistemaLegado::LiberaFrames(true, false); ?> diff --git a/gestaoFinanceira/fontes/PHP/contabilidade/instancias/lancamentoContabil/PRCancelarAberturaRestosAPagar.php b/gestaoFinanceira/fontes/PHP/contabilidade/instancias/lancamentoContabil/PRCancelarAberturaRestosAPagar.php index c5bdce9..1efd1f1 100755 --- a/gestaoFinanceira/fontes/PHP/contabilidade/instancias/lancamentoContabil/PRCancelarAberturaRestosAPagar.php +++ b/gestaoFinanceira/fontes/PHP/contabilidade/instancias/lancamentoContabil/PRCancelarAberturaRestosAPagar.php @@ -35,7 +35,7 @@ * @ignore - $Id: PRCancelarAberturaRestosAPagar.php 59612 2014-09-02 12:00:51Z gelson $ + $Id: PRCancelarAberturaRestosAPagar.php 62406 2015-05-05 14:43:16Z franver $ * Casos de uso: */ @@ -43,6 +43,7 @@ include_once '../../../../../../gestaoAdministrativa/fontes/PHP/pacotes/FrameworkHTML.inc.php'; include_once '../../../../../../gestaoAdministrativa/fontes/PHP/framework/include/cabecalho.inc.php'; include_once ( CAM_GF_CONT_NEGOCIO."RContabilidadeCancelarAberturaRestosAPagar.class.php" ); +include_once ( CAM_GA_ADM_NEGOCIO."RConfiguracaoConfiguracao.class.php" ); //Define o nome dos arquivos PHP $stPrograma = "CancelarAberturaRestosAPagar"; @@ -110,7 +111,15 @@ switch ($stAcao) { } #FIM DA CADEIA } - $obTransacao->fechaTransacao( $boFlagTransacao, $boTransacao, $obErro, $obRContabilidadeCancelarAberturaRestosAPagar->obTContabilidadeLote ); + if (!$obErro->ocorreu()) { + $obRConfiguracao = new RConfiguracaoConfiguracao; + $obRConfiguracao->setParametro('abertura_RP'); + $obRConfiguracao->setExercicio( Sessao::getExercicio()); + $obRConfiguracao->setCodModulo( 9 ); + $obRConfiguracao->setValor( 'F' ); + $obErro = $obRConfiguracao->alterar($boTransacao); + } + $obTransacao->fechaTransacao( $boFlagTransacao, $boTransacao, $obErro, $obRContabilidadeCancelarAberturaRestosAPagar->obTContabilidadeLote ); } if (!$obErro->ocorreu()) { diff --git a/gestaoFinanceira/fontes/PHP/orcamento/classes/mapeamento/TOrcamentoReceita.class.php b/gestaoFinanceira/fontes/PHP/orcamento/classes/mapeamento/TOrcamentoReceita.class.php index a37061c..ba8c0d6 100755 --- a/gestaoFinanceira/fontes/PHP/orcamento/classes/mapeamento/TOrcamentoReceita.class.php +++ b/gestaoFinanceira/fontes/PHP/orcamento/classes/mapeamento/TOrcamentoReceita.class.php @@ -27,7 +27,7 @@ * @author Analista: Jorge B. Ribarr * @author Desenvolvedor: Marcelo B. Paulino - $Id: TOrcamentoReceita.class.php 62365 2015-04-28 19:43:51Z carlos.silva $ + $Id: TOrcamentoReceita.class.php 62404 2015-05-04 20:44:10Z arthur $ * Casos de uso: uc-02.01.06, uc-02.04.04, uc-02.01.34, uc-02.04.03 */ @@ -1034,349 +1034,6 @@ function montaRecuperaReceitaConfiguracaoLancamento() return $stSql; } -function recuperaReceitaExportacao10(&$rsRecordSet, $boTransacao = "") -{ - $obErro = new Erro; - $obConexao = new Conexao; - $rsRecordSet = new RecordSet; - $stSql = $this->montaRecuperaReceitaExportacao10(); - $this->setDebug( $stSql); - $obErro = $obConexao->executaSQL( $rsRecordSet, $stSql, $boTransacao ); - - return $obErro; -} - -function montaRecuperaReceitaExportacao10() -{ - $stSql = " - - SELECT tipo_registro - , cod_receita_final AS cod_receita - , cod_orgao - , deducao_receita - , identificador_deducao - , CASE WHEN SUBSTR(natureza_receita::text, 1, 1) = '9' - THEN SUBSTR(natureza_receita::text, 2, 8)::integer - ELSE natureza_receita - END AS natureza_receita - , remove_acentos(especificacao) as especificacao - , CASE WHEN SUBSTR(cod_receita_final::VARCHAR, 1, 1) = '9' - THEN REPLACE(REPLACE(sum(tabela.vl_previsto)::VARCHAR,'.',','),'-','') - ELSE REPLACE(sum(tabela.vl_previsto)::VARCHAR,'.',',') - END AS vl_previsto - FROM ( - SELECT 10::integer AS tipo_registro - , 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 - 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' - WHEN SUBSTR(REPLACE(conta_receita.cod_estrutural, '.', ''), 1, 8)::INTEGER = 19319902 - THEN '19319900' - ELSE SUBSTR(REPLACE(conta_receita.cod_estrutural, '.', ''), 1, 8)::INTEGER - END - END AS cod_receita_final - , configuracao_entidade.valor AS cod_orgao - , rec.masc_recurso_red AS recurso - , CASE WHEN SUBSTR(conta_receita.cod_estrutural, 1, 1) = '9' - THEN 1 - ELSE 2 - END AS deducao_receita - , valores_identificadores.cod_identificador::integer AS identificador_deducao - , 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 - 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' - WHEN SUBSTR(REPLACE(conta_receita.cod_estrutural, '.', ''), 1, 8)::INTEGER = 19319902 - THEN '19319900' - ELSE SUBSTR(REPLACE(conta_receita.cod_estrutural, '.', ''), 1, 8)::INTEGER - END - END AS natureza_receita - , CASE WHEN SUBSTR(conta_receita.cod_estrutural, 1, 1) = '9' - THEN (SELECT TRIM(o_cr.descricao) - FROM orcamento.conta_receita AS o_cr - WHERE o_cr.exercicio ='".Sessao::getExercicio()."' - AND RPAD(SUBSTR(REPLACE(conta_receita.cod_estrutural, '.', ''), 1, 9),15,'0') = REPLACE(o_cr.cod_estrutural,'.','')) - ELSE (SELECT TRIM(descricao) - FROM orcamento.conta_receita AS o_cr - WHERE o_cr.exercicio ='".Sessao::getExercicio()."' - AND RPAD(SUBSTR(REPLACE(conta_receita.cod_estrutural, '.', ''), 1, 8),14,'0') = REPLACE(o_cr.cod_estrutural,'.','')) - END AS especificacao - , CASE WHEN SUBSTR(conta_receita.cod_estrutural, 1, 1) = '9' - THEN detalhamento_receitas.arrecadado_periodo - ELSE ABS(detalhamento_receitas.arrecadado_periodo) - END AS vl_previsto - FROM orcamento.receita - - LEFT JOIN orcamento.recurso('".Sessao::getExercicio()."') as rec - ON rec.cod_recurso = receita.cod_recurso - AND rec.exercicio = receita.exercicio - - JOIN orcamento.conta_receita - ON conta_receita.cod_conta = receita.cod_conta - AND conta_receita.exercicio = receita.exercicio - - JOIN administracao.configuracao_entidade - ON configuracao_entidade.cod_entidade = receita.cod_entidade - AND configuracao_entidade.exercicio = receita.exercicio - - JOIN tcemg.fn_detalhamento_receitas('".Sessao::getExercicio()."','','".$this->getDado('dt_inicial')."','".$this->getDado('dt_final')."','".$this->getDado('entidades')."','','','','','','','') - AS detalhamento_receitas ( - cod_estrutural varchar, - receita integer, - recurso varchar, - descricao varchar, - valor_previsto numeric, - arrecadado_periodo numeric, - arrecadado_ano numeric, - diferenca numeric - ) ON detalhamento_receitas.cod_estrutural = conta_receita.cod_estrutural - AND SUBSTR(detalhamento_receitas.cod_estrutural, 1, 1) != '9' - - LEFT JOIN tcemg.receita_indentificadores_peculiar_receita - ON receita_indentificadores_peculiar_receita.exercicio = receita.exercicio - AND receita_indentificadores_peculiar_receita.cod_receita = receita.cod_receita - - LEFT JOIN tcemg.valores_identificadores - ON valores_identificadores.cod_identificador = receita_indentificadores_peculiar_receita.cod_identificador - - WHERE receita.exercicio = '".Sessao::getExercicio()."' - AND receita.cod_entidade IN (".$this->getDado('entidades').") - AND configuracao_entidade.cod_modulo = 55 - AND configuracao_entidade.parametro = 'tcemg_codigo_orgao_entidade_sicom' - --AND receita.vl_original <> 0.00 - AND conta_receita.cod_conta NOT IN (384) -- Retirado esta conta devido a erro de cadastro do wallace, sendo cadastrada duas vezes. - - GROUP BY cod_receita_final - , conta_receita.cod_estrutural - , conta_receita.descricao - , cod_orgao - , identificador_deducao - , detalhamento_receitas.arrecadado_periodo - , rec.masc_recurso_red - UNION - - SELECT - 10::integer AS tipo_registro - , SUBSTR(REPLACE(conta_receita.cod_estrutural, '.', ''), 1, 9)::integer AS cod_receita_final - , LPAD(configuracao_entidade.valor::VARCHAR,2,'0') AS cod_orgao - , rec.masc_recurso_red AS recurso - , 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 - , SUBSTR(REPLACE(conta_receita.cod_estrutural, '.', ''), 1, 9)::integer AS natureza_receita - , TRIM(conta_receita.descricao) AS especificacao - , SUM(arrecadacao_receita_dedutora.vl_deducao) AS vl_previsto - - FROM orcamento.receita - - LEFT JOIN orcamento.recurso('".Sessao::getExercicio()."') as rec - ON rec.cod_recurso = receita.cod_recurso - AND rec.exercicio = receita.exercicio - - JOIN tesouraria.arrecadacao_receita_dedutora - ON arrecadacao_receita_dedutora.cod_receita_dedutora=receita.cod_receita - AND arrecadacao_receita_dedutora.exercicio=receita.exercicio - AND arrecadacao_receita_dedutora.timestamp_arrecadacao::date BETWEEN TO_DATE( '".$this->getDado('dt_inicial')."', 'dd/mm/yyyy' ) AND TO_DATE( '".$this->getDado('dt_final')."', 'dd/mm/yyyy' ) - - JOIN administracao.configuracao_entidade - ON configuracao_entidade.cod_entidade = receita.cod_entidade - AND configuracao_entidade.exercicio = receita.exercicio - - JOIN orcamento.conta_receita - ON conta_receita.cod_conta = receita.cod_conta - AND conta_receita.exercicio = receita.exercicio - - LEFT JOIN tcemg.receita_indentificadores_peculiar_receita - ON receita_indentificadores_peculiar_receita.exercicio = receita.exercicio - AND receita_indentificadores_peculiar_receita.cod_receita = receita.cod_receita - - LEFT JOIN tcemg.valores_identificadores - ON valores_identificadores.cod_identificador = receita_indentificadores_peculiar_receita.cod_identificador - - WHERE receita.exercicio = '".Sessao::getExercicio()."' - AND receita.cod_entidade IN (".$this->getDado('entidades').") - AND configuracao_entidade.cod_modulo = 55 - AND configuracao_entidade.parametro = 'tcemg_tipo_orgao_entidade_sicom' - - GROUP BY receita.cod_receita - , receita.exercicio - , cod_orgao - , conta_receita.cod_estrutural - , conta_receita.descricao - , indentificador_deducao - , natureza_receita - , especificacao - , rec.masc_recurso_red - ) AS tabela - WHERE tabela.vl_previsto<>0.00 - GROUP BY tipo_registro, cod_orgao, deducao_receita, identificador_deducao, natureza_receita, cod_receita, especificacao - ORDER BY tabela.natureza_receita - "; - - return $stSql; -} - -function recuperaReceitaExportacao11(&$rsRecordSet, $boTransacao = "") -{ - $obErro = new Erro; - $obConexao = new Conexao; - $rsRecordSet = new RecordSet; - $stSql = $this->montaRecuperaReceitaExportacao11(); - $this->setDebug( $stSql); - $obErro = $obConexao->executaSQL( $rsRecordSet, $stSql, $boTransacao ); - - return $obErro; -} - -function montaRecuperaReceitaExportacao11() -{ - $stSql = " - - SELECT tipo_registro - , cod_receita - , cod_font_recursos - , REPLACE(REPLACE(sum(vl_arrecadado_fonte)::VARCHAR,'.',','),'-','') AS vl_arrecadado_fonte - - FROM( - - SELECT 11 AS tipo_registro - , 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 - 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' - WHEN SUBSTR(REPLACE(conta_receita.cod_estrutural, '.', ''), 1, 8)::INTEGER = 19319902 - THEN '19319900' - ELSE SUBSTR(REPLACE(conta_receita.cod_estrutural, '.', ''), 1, 8)::INTEGER - END - END AS cod_receita - , receita.cod_recurso::integer AS cod_font_recursos - , detalhamento_receitas.arrecadado_periodo AS vl_arrecadado_fonte - - FROM orcamento.receita - - JOIN orcamento.conta_receita - ON conta_receita.cod_conta = receita.cod_conta - AND conta_receita.exercicio = receita.exercicio - - JOIN (SELECT cod_estrutural - , receita - , recurso - , descricao - , sum(detalhamento.arrecadado_periodo) as arrecadado_periodo - - FROM - ( - SELECT * FROM tcemg.fn_detalhamento_receitas('".Sessao::getExercicio()."','','".$this->getDado('dt_inicial')."','".$this->getDado('dt_final')."','".$this->getDado('entidades')."','','','','','','','') - AS detalhamento_receitas - ( - cod_estrutural varchar, - receita integer, - recurso varchar, - descricao varchar, - valor_previsto numeric, - arrecadado_periodo numeric, - arrecadado_ano numeric, - diferenca numeric - ) - WHERE SUBSTR(cod_estrutural, 1, 1) != '9' - - UNION - - SELECT conta_receita.cod_estrutural::varchar AS cod_estrutural - , receita.cod_receita AS receita - , rec.masc_recurso_red AS recurso - , TRIM(conta_receita.descricao)::varchar AS descricao - , 0.00::numeric AS valor_previsto - , SUM(arrecadacao_receita_dedutora.vl_deducao)::numeric AS arrecadado_periodo - , 0.00::numeric AS arrecadado_ano - , 0.00::numeric AS diferenca - - FROM orcamento.receita - - LEFT JOIN orcamento.recurso('".Sessao::getExercicio()."') as rec - ON rec.cod_recurso = receita.cod_recurso - AND rec.exercicio = receita.exercicio - - JOIN tesouraria.arrecadacao_receita_dedutora - ON arrecadacao_receita_dedutora.cod_receita_dedutora=receita.cod_receita - AND arrecadacao_receita_dedutora.exercicio=receita.exercicio - AND arrecadacao_receita_dedutora.timestamp_arrecadacao::date BETWEEN TO_DATE( '".$this->getDado('dt_inicial')."', 'dd/mm/yyyy' ) AND TO_DATE( '".$this->getDado('dt_final')."', 'dd/mm/yyyy' ) - - JOIN administracao.configuracao_entidade - ON configuracao_entidade.cod_entidade = receita.cod_entidade - AND configuracao_entidade.exercicio = receita.exercicio - - JOIN orcamento.conta_receita - ON conta_receita.cod_conta = receita.cod_conta - AND conta_receita.exercicio = receita.exercicio - - - LEFT JOIN tcemg.receita_indentificadores_peculiar_receita - ON receita_indentificadores_peculiar_receita.exercicio = receita.exercicio - AND receita_indentificadores_peculiar_receita.cod_receita = receita.cod_receita - - LEFT JOIN tcemg.valores_identificadores - ON valores_identificadores.cod_identificador = receita_indentificadores_peculiar_receita.cod_identificador - - WHERE receita.exercicio = '".Sessao::getExercicio()."' - AND receita.cod_entidade IN (".$this->getDado('entidades').") - AND configuracao_entidade.cod_modulo = 55 - AND configuracao_entidade.parametro = 'tcemg_tipo_orgao_entidade_sicom' - - GROUP BY receita.cod_receita - , receita.exercicio - , cod_estrutural - , conta_receita.descricao - , rec.masc_recurso_red - ) - AS detalhamento - GROUP BY cod_estrutural - , receita - , recurso - , descricao - ) - AS detalhamento_receitas - ON detalhamento_receitas.cod_estrutural = conta_receita.cod_estrutural - - WHERE receita.exercicio = '".Sessao::getExercicio()."' - AND receita.cod_entidade IN (".$this->getDado('entidades').") - --AND receita.vl_original <> 0.00 - AND detalhamento_receitas.arrecadado_periodo <> 0.00 - - GROUP BY receita.cod_receita - , receita.cod_recurso - , conta_receita.cod_estrutural - , detalhamento_receitas.arrecadado_periodo - - ORDER BY tipo_registro - , cod_receita - , cod_font_recursos - - ) AS tabela - - GROUP BY tipo_registro - , cod_receita - , cod_font_recursos - - ORDER BY tipo_registro, cod_receita, cod_font_recursos "; - - return $stSql; -} - function recuperaReceitaExportacaoPlanejamento10(&$rsRecordSet, $boTransacao = "") { $obErro = new Erro; @@ -1692,882 +1349,6 @@ if ( Sessao::getExercicio() == '2014' ) { return $stSql; } -function recuperaCorrecoesReceitas10(&$rsRecordSet, $boTransacao = "") -{ - $obErro = new Erro; - $obConexao = new Conexao; - $rsRecordSet = new RecordSet; - $stSql = $this->montaRecuperaCorrecoesReceitas10(); - $this->setDebug( $stSql); - $obErro = $obConexao->executaSQL( $rsRecordSet, $stSql, $boTransacao ); - - return $obErro; -} - -function montaRecuperaCorrecoesReceitas10() -{ - $stSql = " - SELECT - tipo_registro - , cod_correcao - , cod_orgao - , deducao_receita - , indentificador_deducao_reduzida - , natureza_receita_reduzida - , especificacao_reduzida - , identificador_acrescida - , natureza_receita_acrescida - , especificacao_acrescida - , SUM(vl_reduzido_acrescido) AS vl_reduzido_acrescido - , cod_receita - FROM ( - SELECT - 10 AS tipo_registro - , receita.cod_receita - , receita.exercicio||SUBSTR(REPLACE(conta_receita.cod_estrutural, '.', ''), 1, 8) AS cod_correcao - , 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 - , 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 - , TRIM(conta_receita.descricao) AS especificacao_reduzida - , '' AS identificador_acrescida - , '' AS natureza_receita_acrescida - , '' AS especificacao_acrescida - , SUM(arrecadacao_receita.vl_arrecadacao) AS vl_reduzido_acrescido - - FROM orcamento.receita - - JOIN tesouraria.arrecadacao_receita - ON arrecadacao_receita.cod_receita=receita.cod_receita - AND arrecadacao_receita.exercicio=receita.exercicio - AND 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')) - - 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=true - - JOIN administracao.configuracao_entidade - ON configuracao_entidade.cod_entidade = receita.cod_entidade - AND configuracao_entidade.exercicio = receita.exercicio - - JOIN orcamento.conta_receita - ON conta_receita.cod_conta = receita.cod_conta - AND conta_receita.exercicio = receita.exercicio - - LEFT JOIN tcemg.receita_indentificadores_peculiar_receita - ON receita_indentificadores_peculiar_receita.exercicio = receita.exercicio - AND receita_indentificadores_peculiar_receita.cod_receita = receita.cod_receita - - LEFT JOIN tcemg.valores_identificadores - ON valores_identificadores.cod_identificador = receita_indentificadores_peculiar_receita.cod_identificador - - WHERE receita.exercicio = '". $this->getDado('exercicio')."' - AND receita.cod_entidade IN (".$this->getDado('entidades').") - AND configuracao_entidade.cod_modulo = 55 - AND configuracao_entidade.parametro = 'tcemg_tipo_orgao_entidade_sicom' - - GROUP BY receita.cod_receita - , receita.exercicio - , cod_orgao - , conta_receita.cod_estrutural - , conta_receita.descricao - , indentificador_deducao_reduzida - , natureza_receita_reduzida - , especificacao_reduzida - , identificador_acrescida - , natureza_receita_acrescida - , especificacao_acrescida - - UNION - - SELECT - 10 AS tipo_registro - , receita.cod_receita - , receita.exercicio||SUBSTR(REPLACE(conta_receita.cod_estrutural, '.', ''), 1, 8) AS cod_correcao - , 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 - , 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 - , TRIM(conta_receita.descricao) AS especificacao_reduzida - , '' AS identificador_acrescida - , '' AS natureza_receita_acrescida - , '' AS especificacao_acrescida - , SUM(arrecadacao_estornada_receita.vl_estornado) AS vl_reduzido_acrescido - - FROM orcamento.receita - - JOIN tesouraria.arrecadacao_receita - ON arrecadacao_receita.cod_receita=receita.cod_receita - AND arrecadacao_receita.exercicio=receita.exercicio - - JOIN tesouraria.arrecadacao_estornada_receita - ON arrecadacao_estornada_receita.cod_arrecadacao=arrecadacao_receita.cod_arrecadacao - AND arrecadacao_estornada_receita.cod_receita=arrecadacao_receita.cod_receita - AND arrecadacao_estornada_receita.exercicio=arrecadacao_receita.exercicio - AND arrecadacao_estornada_receita.timestamp_arrecadacao=arrecadacao_receita.timestamp_arrecadacao - AND arrecadacao_estornada_receita.timestamp_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')) - - JOIN administracao.configuracao_entidade - ON configuracao_entidade.cod_entidade = receita.cod_entidade - AND configuracao_entidade.exercicio = receita.exercicio - - JOIN orcamento.conta_receita - ON conta_receita.cod_conta = receita.cod_conta - AND conta_receita.exercicio = receita.exercicio - - LEFT JOIN tcemg.receita_indentificadores_peculiar_receita - ON receita_indentificadores_peculiar_receita.exercicio = receita.exercicio - AND receita_indentificadores_peculiar_receita.cod_receita = receita.cod_receita - - LEFT JOIN tcemg.valores_identificadores - ON valores_identificadores.cod_identificador = receita_indentificadores_peculiar_receita.cod_identificador - - WHERE receita.exercicio = '". $this->getDado('exercicio')."' - AND receita.cod_entidade IN (".$this->getDado('entidades').") - AND configuracao_entidade.cod_modulo = 55 - AND configuracao_entidade.parametro = 'tcemg_tipo_orgao_entidade_sicom' - - GROUP BY receita.cod_receita - , receita.exercicio - , cod_orgao - , conta_receita.cod_estrutural - , conta_receita.descricao - , indentificador_deducao_reduzida - , natureza_receita_reduzida - , especificacao_reduzida - , identificador_acrescida - , natureza_receita_acrescida - , especificacao_acrescida - - UNION - - SELECT - 10 AS tipo_registro - , receita.cod_receita - , receita.exercicio||SUBSTR(REPLACE(conta_receita.cod_estrutural, '.', ''), 1, 9) AS cod_correcao - , 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 - , 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 - , TRIM(conta_receita.descricao) AS especificacao_reduzida - , '' AS identificador_acrescida - , '' AS natureza_receita_acrescida - , '' AS especificacao_acrescida - , SUM(redutora.vl_deducao) AS vl_reduzido_acrescido - - FROM orcamento.receita - - 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 - 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 - - JOIN administracao.configuracao_entidade - ON configuracao_entidade.cod_entidade = receita.cod_entidade - AND configuracao_entidade.exercicio = receita.exercicio - - JOIN orcamento.conta_receita - ON conta_receita.cod_conta = receita.cod_conta - AND conta_receita.exercicio = receita.exercicio - AND SUBSTR(conta_receita.cod_estrutural, 1, 1) = '9' - - LEFT JOIN tcemg.receita_indentificadores_peculiar_receita - ON receita_indentificadores_peculiar_receita.exercicio = receita.exercicio - AND receita_indentificadores_peculiar_receita.cod_receita = receita.cod_receita - - LEFT JOIN tcemg.valores_identificadores - ON valores_identificadores.cod_identificador = receita_indentificadores_peculiar_receita.cod_identificador - - WHERE receita.exercicio = '". $this->getDado('exercicio')."' - AND receita.cod_entidade IN (".$this->getDado('entidades').") - AND configuracao_entidade.cod_modulo = 55 - AND configuracao_entidade.parametro = 'tcemg_tipo_orgao_entidade_sicom' - - GROUP BY receita.cod_receita - , receita.exercicio - , cod_orgao - , conta_receita.cod_estrutural - , conta_receita.descricao - , indentificador_deducao_reduzida - , natureza_receita_reduzida - , especificacao_reduzida - , identificador_acrescida - , natureza_receita_acrescida - , especificacao_acrescida - - ) AS consulta - GROUP BY - tipo_registro - , cod_receita - , cod_correcao - , cod_orgao - , deducao_receita - , indentificador_deducao_reduzida - , natureza_receita_reduzida - , especificacao_reduzida - , identificador_acrescida - , natureza_receita_acrescida - , especificacao_acrescida - - ORDER BY consulta.cod_receita - - "; - - return $stSql; -} - -function recuperaCorrecoesReceitas11(&$rsRecordSet, $boTransacao = "") -{ - $obErro = new Erro; - $obConexao = new Conexao; - $rsRecordSet = new RecordSet; - $stSql = $this->montaRecuperaCorrecoesReceitas11(); - $this->setDebug( $stSql); - $obErro = $obConexao->executaSQL( $rsRecordSet, $stSql, $boTransacao ); - - return $obErro; -} - -function montaRecuperaCorrecoesReceitas11() -{ - $stSql = " - SELECT - tipo_registro - , cod_correcao - , cod_fonte_reduzida - , SUM(vl_reduzido_acrescido) AS vl_reduzido_fonte - , cod_receita - FROM ( - SELECT 11 AS tipo_registro - , receita.cod_receita - , receita.exercicio||SUBSTR(REPLACE(conta_receita.cod_estrutural, '.', ''), 1, 8) AS cod_correcao - , receita.cod_recurso AS cod_fonte_reduzida - , SUM(valor_lancamento.vl_lancamento) AS vl_reduzido_acrescido - - FROM contabilidade.lancamento_receita - - JOIN contabilidade.lancamento - ON lancamento.exercicio=lancamento_receita.exercicio - AND lancamento.cod_entidade=lancamento_receita.cod_entidade - AND lancamento.tipo=lancamento_receita.tipo - AND lancamento.cod_lote=lancamento_receita.cod_lote - AND lancamento.sequencia=lancamento_receita.sequencia - - JOIN contabilidade.lote - ON lancamento.exercicio=lote.exercicio - AND lancamento.cod_entidade=lote.cod_entidade - AND lancamento.tipo=lote.tipo - AND lancamento.cod_lote=lote.cod_lote - - JOIN contabilidade.valor_lancamento - ON lancamento.exercicio=valor_lancamento.exercicio - AND lancamento.cod_entidade=valor_lancamento.cod_entidade - AND lancamento.tipo=valor_lancamento.tipo - AND lancamento.cod_lote=valor_lancamento.cod_lote - AND lancamento.sequencia=valor_lancamento.sequencia - AND valor_lancamento.tipo_valor='D' - - JOIN orcamento.receita - ON receita.cod_receita=lancamento_receita.cod_receita - AND receita.exercicio=lancamento_receita.exercicio - - JOIN orcamento.conta_receita - ON receita.cod_conta=conta_receita.cod_conta - AND receita.exercicio=conta_receita.exercicio - AND SUBSTR(conta_receita.cod_estrutural, 1, 1) != '9' - - LEFT JOIN orcamento.recurso('". $this->getDado('exercicio')."') as rec - ON rec.cod_recurso=receita.cod_recurso - AND rec.exercicio=receita.exercicio - - WHERE estorno=true - AND lote.dt_lote 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 receita.cod_entidade IN (".$this->getDado('entidades').") - - GROUP BY tipo_registro - - , receita.cod_receita - , receita.exercicio - , conta_receita.cod_estrutural - , receita.cod_recurso - - UNION - - SELECT - 11 AS tipo_registro - , receita.cod_receita - , receita.exercicio||SUBSTR(REPLACE(conta_receita.cod_estrutural, '.', ''), 1, 9) AS cod_correcao - , receita.cod_recurso AS cod_fonte_reduzida - , SUM(redutora.vl_deducao) AS vl_reduzido_acrescido - - FROM orcamento.receita - - 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 - 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 - - JOIN administracao.configuracao_entidade - ON configuracao_entidade.cod_entidade = receita.cod_entidade - AND configuracao_entidade.exercicio = receita.exercicio - - JOIN orcamento.conta_receita - ON conta_receita.cod_conta = receita.cod_conta - AND conta_receita.exercicio = receita.exercicio - AND SUBSTR(conta_receita.cod_estrutural, 1, 1) = '9' - - LEFT JOIN tcemg.receita_indentificadores_peculiar_receita - ON receita_indentificadores_peculiar_receita.exercicio = receita.exercicio - AND receita_indentificadores_peculiar_receita.cod_receita = receita.cod_receita - - LEFT JOIN tcemg.valores_identificadores - ON valores_identificadores.cod_identificador = receita_indentificadores_peculiar_receita.cod_identificador - - WHERE receita.exercicio = '". $this->getDado('exercicio')."' - AND receita.cod_entidade IN (".$this->getDado('entidades').") - AND configuracao_entidade.cod_modulo = 55 - AND configuracao_entidade.parametro = 'tcemg_tipo_orgao_entidade_sicom' - - GROUP BY receita.cod_receita - , receita.exercicio - , conta_receita.cod_estrutural - - ) AS consulta - GROUP BY - tipo_registro - , cod_receita - , cod_correcao - , cod_fonte_reduzida - - ORDER BY consulta.cod_receita - "; - return $stSql; -} - -function recuperaCorrecoesReceitas12(&$rsRecordSet, $boTransacao = "") -{ - $obErro = new Erro; - $obConexao = new Conexao; - $rsRecordSet = new RecordSet; - $stSql = $this->montaRecuperaCorrecoesReceitas12(); - $this->setDebug( $stSql); - $obErro = $obConexao->executaSQL( $rsRecordSet, $stSql, $boTransacao ); - - return $obErro; -} - -function montaRecuperaCorrecoesReceitas12() -{ - $stSql = " - SELECT 12 AS tipo_registro - , receita.cod_receita||''||receita.cod_recurso||receita.cod_entidade||receita.exercicio AS cod_correcao - , 0 AS cod_fonte_acrescida - , 0 AS vl_acrescido_fonte - FROM orcamento.receita - JOIN orcamento.previsao_receita - ON previsao_receita.cod_receita = receita.cod_receita - AND previsao_receita.exercicio = receita.exercicio - WHERE receita.exercicio = '".Sessao::getExercicio()."' - AND receita.cod_entidade IN (".$this->getDado('entidades').") - GROUP BY receita.cod_receita - , receita.cod_recurso - , receita.cod_entidade - , receita.exercicio - "; - - return $stSql; -} - -function recuperaCorrecoesReceitas20(&$rsRecordSet, $boTransacao = "") -{ - $obErro = new Erro; - $obConexao = new Conexao; - $rsRecordSet = new RecordSet; - $stSql = $this->montaRecuperaCorrecoesReceitas20(); - $this->setDebug( $stSql); - $obErro = $obConexao->executaSQL( $rsRecordSet, $stSql, $boTransacao ); - - return $obErro; -} - -function montaRecuperaCorrecoesReceitas20() -{ - $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 - , 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 - 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 - , 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 - - FROM orcamento.receita - - JOIN tesouraria.arrecadacao_receita - ON arrecadacao_receita.cod_receita=receita.cod_receita - AND arrecadacao_receita.exercicio=receita.exercicio - AND 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')) - - 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=true - - JOIN administracao.configuracao_entidade - ON configuracao_entidade.cod_entidade = receita.cod_entidade - AND configuracao_entidade.exercicio = receita.exercicio - - JOIN orcamento.conta_receita - ON conta_receita.cod_conta = receita.cod_conta - AND conta_receita.exercicio = receita.exercicio - - LEFT JOIN tcemg.receita_indentificadores_peculiar_receita - ON receita_indentificadores_peculiar_receita.exercicio = receita.exercicio - AND receita_indentificadores_peculiar_receita.cod_receita = receita.cod_receita - - LEFT JOIN tcemg.valores_identificadores - ON valores_identificadores.cod_identificador = receita_indentificadores_peculiar_receita.cod_identificador - - WHERE receita.exercicio = '". $this->getDado('exercicio')."' - AND receita.cod_entidade IN (".$this->getDado('entidades').") - AND configuracao_entidade.cod_modulo = 55 - AND configuracao_entidade.parametro = 'tcemg_tipo_orgao_entidade_sicom' - - GROUP BY receita.cod_receita - , receita.exercicio - , cod_orgao - , deducao_receita - , indentificador_deducao_reduzida - , natureza_receita_reduzida - , cod_correcao - - UNION - - 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 - , 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 - , 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 - - FROM orcamento.receita - - JOIN tesouraria.arrecadacao_receita - ON arrecadacao_receita.cod_receita=receita.cod_receita - AND arrecadacao_receita.exercicio=receita.exercicio - - JOIN tesouraria.arrecadacao_estornada_receita - ON arrecadacao_estornada_receita.cod_arrecadacao=arrecadacao_receita.cod_arrecadacao - AND arrecadacao_estornada_receita.cod_receita=arrecadacao_receita.cod_receita - AND arrecadacao_estornada_receita.exercicio=arrecadacao_receita.exercicio - AND arrecadacao_estornada_receita.timestamp_arrecadacao=arrecadacao_receita.timestamp_arrecadacao - AND arrecadacao_estornada_receita.timestamp_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')) - - JOIN administracao.configuracao_entidade - ON configuracao_entidade.cod_entidade = receita.cod_entidade - AND configuracao_entidade.exercicio = receita.exercicio - - JOIN orcamento.conta_receita - ON conta_receita.cod_conta = receita.cod_conta - AND conta_receita.exercicio = receita.exercicio - AND SUBSTR(conta_receita.cod_estrutural, 1, 1) != '9' - - LEFT JOIN tcemg.receita_indentificadores_peculiar_receita - ON receita_indentificadores_peculiar_receita.exercicio = receita.exercicio - AND receita_indentificadores_peculiar_receita.cod_receita = receita.cod_receita - - LEFT JOIN tcemg.valores_identificadores - ON valores_identificadores.cod_identificador = receita_indentificadores_peculiar_receita.cod_identificador - - WHERE receita.exercicio = '". $this->getDado('exercicio')."' - AND receita.cod_entidade IN (".$this->getDado('entidades').") - AND configuracao_entidade.cod_modulo = 55 - AND configuracao_entidade.parametro = 'tcemg_tipo_orgao_entidade_sicom' - --and receita.vl_original > 0 - - GROUP BY receita.cod_receita - , receita.exercicio - , cod_orgao - , deducao_receita - , indentificador_deducao_reduzida - , natureza_receita_reduzida - , cod_correcao - - UNION - - 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 - , valores_identificadores.cod_identificador AS indentificador_deducao_reduzida - , SUBSTR(REPLACE(conta_receita.cod_estrutural, '.', ''), 2, 9)::INTEGER 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 - - FROM orcamento.receita - - 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 - 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 - - JOIN administracao.configuracao_entidade - ON configuracao_entidade.cod_entidade = receita.cod_entidade - AND configuracao_entidade.exercicio = receita.exercicio - - JOIN orcamento.conta_receita - ON conta_receita.cod_conta = receita.cod_conta - AND conta_receita.exercicio = receita.exercicio - AND SUBSTR(conta_receita.cod_estrutural, 1, 1) = '9' - - LEFT JOIN tcemg.receita_indentificadores_peculiar_receita - ON receita_indentificadores_peculiar_receita.exercicio = receita.exercicio - AND receita_indentificadores_peculiar_receita.cod_receita = receita.cod_receita - - LEFT JOIN tcemg.valores_identificadores - ON valores_identificadores.cod_identificador = receita_indentificadores_peculiar_receita.cod_identificador - - WHERE receita.exercicio = '". $this->getDado('exercicio')."' - AND receita.cod_entidade IN (".$this->getDado('entidades').") - AND configuracao_entidade.cod_modulo = 55 - AND configuracao_entidade.parametro = 'tcemg_tipo_orgao_entidade_sicom' - - GROUP BY tipo_registro - , receita.cod_receita - , cod_orgao - , deducao_receita - , indentificador_deducao_reduzida - , natureza_receita_reduzida - , cod_correcao - ) AS consulta -GROUP BY - tipo_registro - , cod_orgao - , deducao_receita - , indentificador_deducao_reduzida - , natureza_receita_reduzida - , especificacao_estornada - , cod_correcao - - ORDER BY consulta.natureza_receita_reduzida "; - - return $stSql; -} - -function recuperaCorrecoesReceitas21(&$rsRecordSet, $boTransacao = "") -{ - $obErro = new Erro; - $obConexao = new Conexao; - $rsRecordSet = new RecordSet; - $stSql = $this->montaRecuperaCorrecoesReceitas21(); - $this->setDebug( $stSql); - $obErro = $obConexao->executaSQL( $rsRecordSet, $stSql, $boTransacao ); - - return $obErro; -} - -function montaRecuperaCorrecoesReceitas21() -{ - $stSql = " - SELECT - tipo_registro - , '20'||cod_correcao AS cod_estorno - , SUM(vl_reduzido_acrescido) AS vl_estornado_fonte - , cod_receita - , cod_fonte_reduzida AS cod_fonte_estornada - , cod_correcao - FROM ( - SELECT 21 AS tipo_registro - , 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 - - - FROM contabilidade.lancamento_receita - - JOIN contabilidade.lancamento - ON lancamento.exercicio = lancamento_receita.exercicio - AND lancamento.cod_entidade = lancamento_receita.cod_entidade - AND lancamento.tipo = lancamento_receita.tipo - AND lancamento.cod_lote = lancamento_receita.cod_lote - AND lancamento.sequencia = lancamento_receita.sequencia - - JOIN contabilidade.lote - ON lancamento.exercicio = lote.exercicio - AND lancamento.cod_entidade = lote.cod_entidade - AND lancamento.tipo = lote.tipo - AND lancamento.cod_lote = lote.cod_lote - - JOIN contabilidade.valor_lancamento - ON lancamento.exercicio = valor_lancamento.exercicio - AND lancamento.cod_entidade = valor_lancamento.cod_entidade - AND lancamento.tipo = valor_lancamento.tipo - AND lancamento.cod_lote = valor_lancamento.cod_lote - AND lancamento.sequencia = valor_lancamento.sequencia - AND valor_lancamento.tipo_valor = 'D' - - JOIN orcamento.receita - ON receita.cod_receita=lancamento_receita.cod_receita - AND receita.exercicio=lancamento_receita.exercicio - - JOIN orcamento.conta_receita - ON receita.cod_conta = conta_receita.cod_conta - AND receita.exercicio = conta_receita.exercicio - AND SUBSTR(conta_receita.cod_estrutural, 1, 1) != '9' - - LEFT JOIN orcamento.recurso('". $this->getDado('exercicio')."') as rec - ON rec.cod_recurso = receita.cod_recurso - AND rec.exercicio = receita.exercicio - - WHERE estorno = true - AND lote.dt_lote 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 receita.cod_entidade IN (".$this->getDado('entidades').") - - GROUP BY tipo_registro - , receita.cod_receita - , receita.exercicio - , conta_receita.cod_estrutural - , receita.cod_recurso - , cod_correcao - - UNION - - SELECT - 21 AS tipo_registro - , 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 - - FROM orcamento.receita - - 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 - 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 - - JOIN administracao.configuracao_entidade - ON configuracao_entidade.cod_entidade = receita.cod_entidade - AND configuracao_entidade.exercicio = receita.exercicio - - JOIN orcamento.conta_receita - ON conta_receita.cod_conta = receita.cod_conta - AND conta_receita.exercicio = receita.exercicio - AND SUBSTR(conta_receita.cod_estrutural, 1, 1) = '9' - - LEFT JOIN tcemg.receita_indentificadores_peculiar_receita - ON receita_indentificadores_peculiar_receita.exercicio = receita.exercicio - AND receita_indentificadores_peculiar_receita.cod_receita = receita.cod_receita - - LEFT JOIN tcemg.valores_identificadores - ON valores_identificadores.cod_identificador = receita_indentificadores_peculiar_receita.cod_identificador - - WHERE receita.exercicio = '". $this->getDado('exercicio')."' - AND receita.cod_entidade IN (".$this->getDado('entidades').") - AND configuracao_entidade.cod_modulo = 55 - AND configuracao_entidade.parametro = 'tcemg_tipo_orgao_entidade_sicom' - - GROUP BY receita.cod_receita - , receita.exercicio - , conta_receita.cod_estrutural - - ) AS consulta - GROUP BY - tipo_registro - , cod_receita - , cod_correcao - , cod_fonte_reduzida - - - ORDER BY consulta.cod_receita - "; - - return $stSql; -} - - function recuperaLancamentosCreditosReceber(&$rsRecordSet, $boTransacao = "") { $obErro = new Erro; diff --git a/gestaoFinanceira/fontes/PHP/orcamento/instancias/alteracaoOrcamento/FMManterTransferencia.php b/gestaoFinanceira/fontes/PHP/orcamento/instancias/alteracaoOrcamento/FMManterTransferencia.php index 43b3c64..1282b26 100755 --- a/gestaoFinanceira/fontes/PHP/orcamento/instancias/alteracaoOrcamento/FMManterTransferencia.php +++ b/gestaoFinanceira/fontes/PHP/orcamento/instancias/alteracaoOrcamento/FMManterTransferencia.php @@ -32,32 +32,15 @@ * @ignore - $Revision: 30813 $ - $Name$ - $Author: melo $ - $Date: 2007-05-21 16:04:19 -0300 (Seg, 21 Mai 2007) $ + $Id: FMManterTransferencia.php 62400 2015-05-04 17:30:31Z michel $ * Casos de uso: uc-02.01.07 */ -/* -$Log$ -Revision 1.8 2007/05/21 18:55:10 melo -Bug #9229# - -Revision 1.7 2006/07/24 20:19:42 andre.almeida -Bug #6408# - -Revision 1.6 2006/07/05 20:42:23 cleisson -Adicionada tag Log aos arquivos - -*/ - include_once '../../../../../../gestaoAdministrativa/fontes/PHP/pacotes/FrameworkHTML.inc.php'; include_once( CAM_GF_INCLUDE."validaGF.inc.php"); include_once '../../../../../../gestaoAdministrativa/fontes/PHP/framework/include/cabecalho.inc.php'; include_once(CAM_GF_ORC_NEGOCIO."ROrcamentoSuplementacao.class.php"); -//include_once("../../../classes/componentes/Link.class.php"); $stPrograma = "ManterTransferencia"; $pgFilt = "FL".$stPrograma.".php"; @@ -109,8 +92,6 @@ if ($rsUltimoMesEncerrado->getCampo('mes') >= $mesAtual AND $boUtilizarEncerrame Sessao::remove('arRedutoras'); Sessao::remove('arSuplementada'); - //sessao->transf3['arRedutoras'] = array(); - //sessao->transf3['arSuplementada'] = array (); $obHdnAcao = new Hidden; $obHdnAcao->setName( "stAcao" ); @@ -220,7 +201,7 @@ if ($rsUltimoMesEncerrado->getCampo('mes') >= $mesAtual AND $boUtilizarEncerrame $obBscDespesaReducao->obCampoCod->setAlign ("left"); $obBscDespesaReducao->obCampoCod->obEvento->setOnBlur("buscaDado('buscaDespesaReducao');"); if ($stAcao == 'Remaneja') { - $obBscDespesaReducao->setFuncaoBusca("abrePopUp('".CAM_GF_ORC_POPUPS."despesa/LSDespesa.php','frm','inCodDotacaoReducao','stNomDotacaoRedutora','alteracaoOrcamento&inCodEntidade='+document.frm.inCodEntidade.value + '&stMascClassificacaoDespesa=3.1','".Sessao::getId()."','800','550');"); + $obBscDespesaReducao->setFuncaoBusca("abrePopUp('".CAM_GF_ORC_POPUPS."despesa/LSDespesa.php','frm','inCodDotacaoReducao','stNomDotacaoRedutora','alteracaoOrcamento&inCodEntidade='+document.frm.inCodEntidade.value + '&stMascClassificacaoDespesa=3.1&stAcao=Remaneja','".Sessao::getId()."','800','550');"); } else { $obBscDespesaReducao->setFuncaoBusca("abrePopUp('".CAM_GF_ORC_POPUPS."despesa/LSDespesa.php','frm','inCodDotacaoReducao','stNomDotacaoRedutora','alteracaoOrcamento&inCodEntidade='+document.frm.inCodEntidade.value,'".Sessao::getId()."','800','550');"); } @@ -265,8 +246,12 @@ if ($rsUltimoMesEncerrado->getCampo('mes') >= $mesAtual AND $boUtilizarEncerrame $obBscDespesaSuplementada->obCampoCod->setValue ( $inCodDotacaoOrcamentaria ); $obBscDespesaSuplementada->obCampoCod->setAlign ("left"); $obBscDespesaSuplementada->obCampoCod->obEvento->setOnBlur("buscaDado('buscaDespesaSuplementada');"); - $obBscDespesaSuplementada->setFuncaoBusca("abrePopUp('".CAM_GF_ORC_POPUPS."despesa/LSDespesa.php','frm','inCodDotacaoSuplementada','stNomDotacaoSuplementada','alteracaoOrcamento&inCodEntidade='+document.frm.inCodEntidade.value,'".Sessao::getId()."','800','550');"); - + if ($stAcao == 'Remaneja') { + $obBscDespesaSuplementada->setFuncaoBusca("abrePopUp('".CAM_GF_ORC_POPUPS."despesa/LSDespesa.php','frm','inCodDotacaoSuplementada','stNomDotacaoSuplementada','alteracaoOrcamento&stAcao=Remaneja&inCodEntidade='+document.frm.inCodEntidade.value,'".Sessao::getId()."','800','550');"); + } else { + $obBscDespesaSuplementada->setFuncaoBusca("abrePopUp('".CAM_GF_ORC_POPUPS."despesa/LSDespesa.php','frm','inCodDotacaoSuplementada','stNomDotacaoSuplementada','alteracaoOrcamento&inCodEntidade='+document.frm.inCodEntidade.value,'".Sessao::getId()."','800','550');"); + } + // Define Objeto Numeric para Total $obTxtTotalSuplementada = new Numerico; $obTxtTotalSuplementada->setName ( "nuVlDotacaoSuplementada" ); diff --git a/gestaoFinanceira/fontes/PHP/orcamento/instancias/alteracaoOrcamento/OCManterTransferencia.php b/gestaoFinanceira/fontes/PHP/orcamento/instancias/alteracaoOrcamento/OCManterTransferencia.php index b925d1b..129a7e5 100755 --- a/gestaoFinanceira/fontes/PHP/orcamento/instancias/alteracaoOrcamento/OCManterTransferencia.php +++ b/gestaoFinanceira/fontes/PHP/orcamento/instancias/alteracaoOrcamento/OCManterTransferencia.php @@ -32,10 +32,7 @@ * @ignore - $Revision: 30813 $ - $Name$ - $Author: cleisson $ - $Date: 2006-07-05 17:51:50 -0300 (Qua, 05 Jul 2006) $ + $Id: OCManterTransferencia.php 62400 2015-05-04 17:30:31Z michel $ * Casos de uso: uc-02.01.07 */ @@ -401,10 +398,13 @@ switch ($stCtrl) { } } Sessao::write('arSuplementada',$arTEMP); - //sessao->transf3['arSuplementada'] = $arTEMP; + montaListaSuplementada( $arTEMP, $nuVlTotal ); break; case 'buscaDespesaReducao': + $boErro = false; + $stMsg = ''; + if (($_REQUEST["inCodDotacaoReducao"] != "") && ($_REQUEST['inCodEntidade'] != "")) { $obRegra->addDespesaReducao(); $obRegra->roUltimoDespesaReducao->setCodDespesa( $_REQUEST["inCodDotacaoReducao"] ); @@ -417,20 +417,30 @@ switch ($stCtrl) { $stNomDespesa = $rsDespesa->getCampo( "descricao" ); if (!$stNomDespesa) { - $js = 'f.inCodDotacaoReducao.value = "";'; - $js .= 'f.inCodDotacaoReducao.focus();'; - $js .= 'd.getElementById("stNomDotacaoRedutora").innerHTML = " ";'; - $js .= "alertaAviso('@Valor inválido. (".$_REQUEST["inCodDotacaoReducao"].")','form','erro','".Sessao::getId()."');"; + $boErro = true; + $stMsg .= "@Valor inválido. (".$_REQUEST["inCodDotacaoReducao"].")"; } else { $js = 'd.getElementById("stNomDotacaoRedutora").innerHTML = "'.$stNomDespesa.'";'; } } else { - $js = 'd.getElementById("stNomDotacaoRedutora").innerHTML = " ";'; + $boErro = true; + if($_REQUEST['inCodEntidade'] == "") + $stMsg .= "@Selecione a Entidade para buscar a Dotação Orçamentária Redutora."; + } + + if ($boErro) { + $js = 'f.inCodDotacaoReducao.value = "";'; + $js .= 'd.getElementById("stNomDotacaoRedutora").innerHTML = " ";'; + if($stMsg!='') + $js .= "alertaAviso('".$stMsg."','form','erro','".Sessao::getId()."');"; } SistemaLegado::executaFrameOculto($js); break; case 'buscaDespesaSuplementada': + $boErro = false; + $stMsg = ''; + if (($_REQUEST["inCodDotacaoSuplementada"] != "") && ($_REQUEST['inCodEntidade'] != "")) { $obRegra->addDespesaSuplementada(); $obRegra->roUltimoDespesaSuplementada->setCodDespesa( $_REQUEST["inCodDotacaoSuplementada"] ); @@ -443,23 +453,29 @@ switch ($stCtrl) { $stNomDespesa = $rsDespesa->getCampo( "descricao" ); if (!$stNomDespesa) { - $js = 'f.inCodDotacaoSuplementada.value = "";'; - $js .= 'f.inCodDotacaoSuplementada.focus();'; - $js .= 'd.getElementById("stNomDotacaoSuplementada").innerHTML = " ";'; - $js .= "alertaAviso('@Valor inválido. (".$_REQUEST["inCodDotacaoSuplementada"].")','form','erro','".Sessao::getId()."');"; + $boErro = true; + $stMsg .= "@Valor inválido. (".$_REQUEST["inCodDotacaoSuplementada"].")"; } else { $js = 'd.getElementById("stNomDotacaoSuplementada").innerHTML = "'.$stNomDespesa.'";'; } } else { - $js = 'd.getElementById("stNomDotacaoSuplementada").innerHTML = " ";'; + $boErro = true; + if($_REQUEST['inCodEntidade'] == "") + $stMsg .= "@Selecione a Entidade para buscar a Dotação Orçamentária Suplementada."; } + + if ($boErro) { + $js = 'f.inCodDotacaoSuplementada.value = "";'; + $js .= 'd.getElementById("stNomDotacaoSuplementada").innerHTML = " ";'; + if($stMsg!='') + $js .= "alertaAviso('".$stMsg."','form','erro','".Sessao::getId()."');"; + } + SistemaLegado::executaFrameOculto($js); break; case 'limparListas': Sessao::remove('arSuplementada'); Sessao::remove('arRedutoras'); - //sessao->transf3['arSuplementada'] = array(); - //sessao->transf3['arRedutoras'] = array(); break; case 'buscaNorma': diff --git a/gestaoFinanceira/fontes/PHP/orcamento/instancias/alteracaoOrcamento/PRManterTransferencia.php b/gestaoFinanceira/fontes/PHP/orcamento/instancias/alteracaoOrcamento/PRManterTransferencia.php index 0236737..78df6b4 100755 --- a/gestaoFinanceira/fontes/PHP/orcamento/instancias/alteracaoOrcamento/PRManterTransferencia.php +++ b/gestaoFinanceira/fontes/PHP/orcamento/instancias/alteracaoOrcamento/PRManterTransferencia.php @@ -32,21 +32,11 @@ * @ignore - $Revision: 30813 $ - $Name$ - $Author: cleisson $ - $Date: 2006-07-05 17:51:50 -0300 (Qua, 05 Jul 2006) $ + $Id: PRManterTransferencia.php 62400 2015-05-04 17:30:31Z michel $ * Casos de uso: uc-02.01.07 */ -/* -$Log$ -Revision 1.4 2006/07/05 20:42:23 cleisson -Adicionada tag Log aos arquivos - -*/ - include '../../../../../../gestaoAdministrativa/fontes/PHP/pacotes/FrameworkHTML.inc.php'; include_once '../../../../../../gestaoAdministrativa/fontes/PHP/framework/include/cabecalho.inc.php'; include( CAM_GF_ORC_NEGOCIO."ROrcamentoSuplementacao.class.php" ); @@ -131,6 +121,9 @@ switch ($stAcao) { SistemaLegado::exibeAviso(urlencode($obErro->getDescricao()),"n_incluir","erro"); } } + else { + SistemaLegado::exibeAviso(urlencode($obErro->getDescricao()),"n_incluir","erro"); + } break; } ?> diff --git a/gestaoFinanceira/fontes/PHP/orcamento/popups/despesa/LSDespesa.php b/gestaoFinanceira/fontes/PHP/orcamento/popups/despesa/LSDespesa.php index f6739e6..25a73fc 100755 --- a/gestaoFinanceira/fontes/PHP/orcamento/popups/despesa/LSDespesa.php +++ b/gestaoFinanceira/fontes/PHP/orcamento/popups/despesa/LSDespesa.php @@ -30,7 +30,7 @@ * @author Desenvolvedor: Marcelo Boezzio Paulino * @ignore - $Id: LSDespesa.php 61756 2015-03-02 16:03:30Z michel $ + $Id: LSDespesa.php 62398 2015-05-04 17:23:58Z michel $ $Revision: 31725 $ $Name$ @@ -117,14 +117,17 @@ $stMascClassificacaoDespesa = isset($_REQUEST['stMascClassificacaoDespesa']) ? $ $stLink = ''; //Monta sessae com os valores do filtro $arFiltro = Sessao::read('filtroPopUp'); -if ( is_array($arFiltro) ) { - $_REQUEST = $arFiltro; -} else { - foreach ($_REQUEST as $key => $valor) { - $arFiltro[$key] = $valor; + +if($_REQUEST['pg']&&$_REQUEST['pos']){ + if ( is_array($arFiltro) ) { + $_REQUEST = $arFiltro; } - Sessao::write('filtroPopUp',$arFiltro); } + +foreach ($_REQUEST as $key => $valor) { + $arFiltro[$key] = $valor; +} +Sessao::write('filtroPopUp',$arFiltro); if ( isset($_REQUEST["campoNom"]) ) { $stLink .= '&campoNom='.$_REQUEST['campoNom']; @@ -198,7 +201,9 @@ if ($stTipoBusca == 'autorizacaoEmpenho') { } elseif ($stTipoBusca == 'alteracaoOrcamento') { $obROrcamentoDespesa->setExercicio( Sessao::getExercicio() ); $obROrcamentoDespesa->obROrcamentoEntidade->setCodigoEntidade( $inCodEntidade ); - $obROrcamentoDespesa->listarDespesaCredEspecial( $rsLista , "ORDER BY cod_despesa"); + if( $stAcao == 'Remaneja' ) + $obROrcamentoDespesa->obROrcamentoClassificacaoDespesa->setMascClassificacao('3.1'); + $obROrcamentoDespesa->listarDespesa( $rsLista ); } else { $obROrcamentoDespesa->setCodDespesa( $inCodDespesa ); $obROrcamentoDespesa->setDescricao( $stDescricao ); diff --git a/gestaoFinanceira/fontes/PHP/tesouraria/instancias/pagamentos/OCManterPagamentoExtra.php b/gestaoFinanceira/fontes/PHP/tesouraria/instancias/pagamentos/OCManterPagamentoExtra.php index 42b1bea..4cf8f9c 100644 --- a/gestaoFinanceira/fontes/PHP/tesouraria/instancias/pagamentos/OCManterPagamentoExtra.php +++ b/gestaoFinanceira/fontes/PHP/tesouraria/instancias/pagamentos/OCManterPagamentoExtra.php @@ -269,7 +269,7 @@ function montaBoletim($inCodEntidade, $inCodBoletim = '') $obISelectBoletim = new ISelectBoletim; $obISelectBoletim->obBoletim->obROrcamentoEntidade->setCodigoEntidade( $inCodEntidade ); $obISelectBoletim->obBoletim->setExercicio( Sessao::getExercicio() ); - $obISelectBoletim->obEvento->setOnChange ( "montaParametrosGET('alteraBoletim');"); + $obISelectBoletim->obEvento->setOnChange ( "buscaDado('alteraBoletim');"); $obISelectBoletim->setNull ( false ); $obFormulario = new Formulario; @@ -287,14 +287,13 @@ function montaBoletim($inCodEntidade, $inCodBoletim = '') $ISaldoCaixa = new ISaldoCaixa(); $ISaldoCaixa->inCodEntidade = $_REQUEST['inCodEntidade']; $stJs .= $ISaldoCaixa->montaSaldo(); - + if ($inCodBoletim) { $stJs .= "if(d.getElementById('inCodBoletim')) \n d.getElementById('inCodBoletim').value = '".$inCodBoletim."';\n "; } } - return $stJs; } @@ -465,6 +464,7 @@ function montaDescricaoTipoPagamento($inTIpoPagamento) return $stJs; } + switch ($_REQUEST['stCtrl']) { case 'limparCampos': $stJs = limparCampos(); @@ -479,12 +479,12 @@ case 'alteraBoletim': if ( !$obErro->ocorreu() && $rsBoletimAberto->getNumLinhas() == 1 ) { $stJs .= "f.inCodBoletim.value = '" . $rsBoletimAberto->getCampo( 'cod_boletim' ) . "';\r\n"; - $stJs .= "jQuery('#stDtBoletim').val('" . $rsBoletimAberto->getCampo( 'dt_boletim' ) . "');\r\n"; - //SistemaLegado::executaFrameOculto( "LiberaFrames(true,false);".$stJs ); + $stJs .= "jQuery('#stDtBoletim').val('" . $rsBoletimAberto->getCampo( 'dt_boletim' ) . "');\r\n"; + SistemaLegado::executaFrameOculto( "LiberaFrames(true,false);".$stJs ); } else { $stJs .= "f.inCodBoletim.value = '';\r\n"; $stJs .= "jQuery('#stDtBoletim').val('');\r\n"; - //SistemaLegado::executaFrameOculto( "LiberaFrames(true,false);".$stJs ); + SistemaLegado::executaFrameOculto( "LiberaFrames(true,false);".$stJs ); } //exit; diff --git a/gestaoFinanceira/fontes/PHP/tesouraria/instancias/pagamentos/PRManterPagamento.php b/gestaoFinanceira/fontes/PHP/tesouraria/instancias/pagamentos/PRManterPagamento.php index b350078..0e1a2d5 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 62349 2015-04-28 13:34:07Z diogo.zarpelon $ + * $Id: PRManterPagamento.php 62401 2015-05-04 17:36:47Z lisiane $ * Casos de uso: uc-02.04.05 */ @@ -80,7 +80,7 @@ if ($boUtilizarEncerramentoMes == 'true' AND $rsUltimoMesEncerrado->getCampo('me $obRTesourariaBoletim = new RTesourariaBoletim(); $obRTesourariaBoletim->setExercicio ( Sessao::getExercicio() ); $obRTesourariaBoletim->setCodBoletim ( $inCodBoletim ); -$obRTesourariaBoletim->setDataBoletim( $stDtBoletim ); +$obRTesourariaBoletim->setDataBoletim( $stDtBoletim ); $obRTesourariaBoletim->obROrcamentoEntidade->setCodigoEntidade ( $_POST['inCodEntidade'] ); $obRTesourariaBoletim->obRTesourariaUsuarioTerminal->obRCGM->setNumCGM( Sessao::read('numCgm') ); $obRTesourariaBoletim->obRTesourariaUsuarioTerminal->setTimestampUsuario( $_POST['stTimestampUsuario'] ); @@ -93,7 +93,6 @@ $obRTesourariaConfiguracao->setExercicio( Sessao::getExercicio() ); $obRTesourariaConfiguracao->consultarTesouraria($boTransacao); #$boTransacao = isset($boTransacao) ? $boTransacao : ""; - switch ($stAcao) { case 'incluir': @@ -375,6 +374,8 @@ switch ($stAcao) { } break; +/////////////////////////////////////////////////////////////////////////////// + case 'alterar': if ( $stDtBoletim == date( 'd/m/Y' ) ) { @@ -458,8 +459,11 @@ switch ($stAcao) { $obErro->setDescricao("O valor a estornar deve ser maior que 0,00."); } } + if (!$obErro->ocorreu()) { - $obErro = $obRTesourariaBoletim->roUltimoPagamento->estornar( $boTransacao ); + Sessao::setTrataExcecao ( true ); + $obErro = $obRTesourariaBoletim->roUltimoPagamento->estornar( $boTransacao ); + Sessao::encerraExcecao(); } $boRetencao = $obRTesourariaBoletim->roUltimoPagamento->obREmpenhoPagamentoLiquidacao->obREmpenhoOrdemPagamento->getRetencao(); diff --git a/gestaoFinanceira/fontes/PLPGSQL/contabilidade/aberturaRestosPagar.plsql b/gestaoFinanceira/fontes/PLPGSQL/contabilidade/aberturaRestosPagar.plsql index a15b0af..8dd39ae 100755 --- a/gestaoFinanceira/fontes/PLPGSQL/contabilidade/aberturaRestosPagar.plsql +++ b/gestaoFinanceira/fontes/PLPGSQL/contabilidade/aberturaRestosPagar.plsql @@ -29,7 +29,7 @@ * @package URBEM - * $Id: aberturaRestosPagar.plsql 59612 2014-09-02 12:00:51Z gelson $ + * $Id: aberturaRestosPagar.plsql 62406 2015-05-05 14:43:16Z franver $ */ CREATE OR REPLACE FUNCTION contabilidade.fn_abertura_restos_pagar(varchar) RETURNS VARCHAR AS $$ @@ -166,7 +166,7 @@ CREATE TEMPORARY TABLE tmp_valores AS WHERE cod_estrutural like ''5.3.2.1%'' AND plano_conta.exercicio= entidade.exercicio)::VARCHAR) as cod_estrutural_debito - , contabilidade.fn_saldo_conta_analitica_entidade(entidade.exercicio,(SELECT plano_analitica.cod_plano + , contabilidade.fn_saldo_inicial_conta_analitica_entidade_rp(entidade.exercicio,(SELECT plano_analitica.cod_plano FROM contabilidade.plano_conta INNER JOIN contabilidade.plano_analitica ON plano_analitica.exercicio = plano_conta.exercicio @@ -177,7 +177,7 @@ CREATE TEMPORARY TABLE tmp_valores AS FROM orcamento.entidade WHERE entidade.exercicio = ''' || stExercicio || ''' AND entidade.cod_entidade IN ('|| stCodEntidade ||') - AND contabilidade.fn_saldo_conta_analitica_entidade(entidade.exercicio,(SELECT plano_analitica.cod_plano + AND contabilidade.fn_saldo_inicial_conta_analitica_entidade_rp(entidade.exercicio,(SELECT plano_analitica.cod_plano FROM contabilidade.plano_conta INNER JOIN contabilidade.plano_analitica ON plano_analitica.exercicio = plano_conta.exercicio @@ -194,7 +194,7 @@ CREATE TEMPORARY TABLE tmp_valores AS INNER JOIN contabilidade.plano_analitica ON plano_analitica.exercicio = plano_conta.exercicio AND plano_analitica.cod_conta= plano_conta.cod_conta - WHERE cod_estrutural like ''6.3.2.7%'' + WHERE cod_estrutural like ''6.3.2.1%'' AND plano_conta.exercicio= entidade.exercicio )::VARCHAR) as cod_estrutural_credito @@ -203,10 +203,10 @@ CREATE TEMPORARY TABLE tmp_valores AS INNER JOIN contabilidade.plano_analitica ON plano_analitica.exercicio = plano_conta.exercicio AND plano_analitica.cod_conta= plano_conta.cod_conta - WHERE cod_estrutural like ''6.3.2.1%'' + WHERE cod_estrutural like ''6.3.2.7%'' AND plano_conta.exercicio= entidade.exercicio)::VARCHAR) as cod_estrutural_debito - , contabilidade.fn_saldo_conta_analitica_entidade(entidade.exercicio,(SELECT plano_analitica.cod_plano + , contabilidade.fn_saldo_inicial_conta_analitica_entidade_rp(entidade.exercicio,(SELECT plano_analitica.cod_plano FROM contabilidade.plano_conta INNER JOIN contabilidade.plano_analitica ON plano_analitica.exercicio = plano_conta.exercicio @@ -217,7 +217,7 @@ CREATE TEMPORARY TABLE tmp_valores AS FROM orcamento.entidade WHERE entidade.exercicio = ''' || stExercicio || ''' AND entidade.cod_entidade IN ('|| stCodEntidade ||') - AND contabilidade.fn_saldo_conta_analitica_entidade(entidade.exercicio,(SELECT plano_analitica.cod_plano + AND contabilidade.fn_saldo_inicial_conta_analitica_entidade_rp(entidade.exercicio,(SELECT plano_analitica.cod_plano FROM contabilidade.plano_conta INNER JOIN contabilidade.plano_analitica ON plano_analitica.exercicio = plano_conta.exercicio @@ -249,7 +249,7 @@ CREATE TEMPORARY TABLE tmp_valores AS WHERE cod_estrutural like ''5.3.1.1%'' AND plano_conta.exercicio= entidade.exercicio)::VARCHAR) as cod_estrutural_debito - , contabilidade.fn_saldo_conta_analitica_entidade(entidade.exercicio,(SELECT plano_analitica.cod_plano + , contabilidade.fn_saldo_inicial_conta_analitica_entidade_rp(entidade.exercicio,(SELECT plano_analitica.cod_plano FROM contabilidade.plano_conta INNER JOIN contabilidade.plano_analitica ON plano_analitica.exercicio = plano_conta.exercicio @@ -260,7 +260,7 @@ CREATE TEMPORARY TABLE tmp_valores AS FROM orcamento.entidade WHERE entidade.exercicio = ''' || stExercicio || ''' AND entidade.cod_entidade IN ('|| stCodEntidade ||') - AND contabilidade.fn_saldo_conta_analitica_entidade(entidade.exercicio,(SELECT plano_analitica.cod_plano + AND contabilidade.fn_saldo_inicial_conta_analitica_entidade_rp(entidade.exercicio,(SELECT plano_analitica.cod_plano FROM contabilidade.plano_conta INNER JOIN contabilidade.plano_analitica ON plano_analitica.exercicio = plano_conta.exercicio @@ -285,10 +285,10 @@ CREATE TEMPORARY TABLE tmp_valores AS INNER JOIN contabilidade.plano_analitica ON plano_analitica.exercicio = plano_conta.exercicio AND plano_analitica.cod_conta= plano_conta.cod_conta - WHERE cod_estrutural like ''6.3.1.1%'' + WHERE cod_estrutural like ''6.3.1.7.1%'' AND plano_conta.exercicio= entidade.exercicio)::VARCHAR) as cod_estrutural_debito - , contabilidade.fn_saldo_conta_analitica_entidade(entidade.exercicio,(SELECT plano_analitica.cod_plano + , contabilidade.fn_saldo_inicial_conta_analitica_entidade_rp(entidade.exercicio,(SELECT plano_analitica.cod_plano FROM contabilidade.plano_conta INNER JOIN contabilidade.plano_analitica ON plano_analitica.exercicio = plano_conta.exercicio @@ -299,7 +299,7 @@ CREATE TEMPORARY TABLE tmp_valores AS FROM orcamento.entidade WHERE entidade.exercicio = ''' || stExercicio || ''' AND entidade.cod_entidade IN ('|| stCodEntidade ||') - AND contabilidade.fn_saldo_conta_analitica_entidade(entidade.exercicio,(SELECT plano_analitica.cod_plano + AND contabilidade.fn_saldo_inicial_conta_analitica_entidade_rp(entidade.exercicio,(SELECT plano_analitica.cod_plano FROM contabilidade.plano_conta INNER JOIN contabilidade.plano_analitica ON plano_analitica.exercicio = plano_conta.exercicio @@ -346,8 +346,8 @@ UNION ALL GROUP BY tmp_valores.exercicio, tmp_valores.cod_entidade , cod_estrutural_credito, cod_estrutural_debito UNION ALL - SELECT exercicio - ,cod_entidade + SELECT conta_contabil_rp_np.exercicio + , conta_contabil_rp_np.cod_entidade , buscaCodigoEstrutural(conta_contabil_rp_np.exercicio,(SELECT plano_analitica.cod_plano FROM contabilidade.plano_conta INNER JOIN contabilidade.plano_analitica @@ -360,18 +360,21 @@ UNION ALL , buscaCodigoEstrutural(conta_contabil_rp_np.exercicio,(SELECT plano_analitica.cod_plano FROM contabilidade.plano_analitica WHERE plano_analitica.cod_conta = conta_contabil_rp_np.cod_conta - AND plano_analitica.natureza_saldo = ''D'' + AND plano_analitica.natureza_saldo = pa.natureza_saldo AND plano_analitica.exercicio= conta_contabil_rp_np.exercicio)::VARCHAR) as cod_estrutural_debito - , contabilidade.fn_saldo_conta_analitica_entidade(conta_contabil_rp_np.exercicio,(SELECT plano_analitica.cod_plano + , contabilidade.fn_saldo_inicial_conta_analitica_entidade_rp(conta_contabil_rp_np.exercicio,(SELECT plano_analitica.cod_plano FROM contabilidade.plano_analitica WHERE plano_analitica.cod_conta = conta_contabil_rp_np.cod_conta - AND plano_analitica.natureza_saldo = ''D'' + AND plano_analitica.natureza_saldo = pa.natureza_saldo AND plano_analitica.exercicio= conta_contabil_rp_np.exercicio), conta_contabil_rp_np.cod_entidade) AS valor , CAST(''Não Processados nos Exercicios Anteriores.'' AS VARCHAR) AS complemento FROM contabilidade.conta_contabil_rp_np - WHERE exercicio = ''' || stExercicio || ''' - AND cod_entidade IN ('|| stCodEntidade ||') + INNER JOIN contabilidade.plano_analitica AS pa + ON pa.cod_conta = conta_contabil_rp_np.cod_conta + ANd pa.exercicio = conta_contabil_rp_np.exercicio + WHERE conta_contabil_rp_np.exercicio = ''' || stExercicio || ''' + AND conta_contabil_rp_np.cod_entidade IN ('|| stCodEntidade ||') UNION ALL ------------------------------------------------------------------------------------------------------------ diff --git a/gestaoFinanceira/fontes/PLPGSQL/contabilidade/relatorioInsuficiencia.plsql b/gestaoFinanceira/fontes/PLPGSQL/contabilidade/relatorioInsuficiencia.plsql index cad94df..899bac9 100644 --- a/gestaoFinanceira/fontes/PLPGSQL/contabilidade/relatorioInsuficiencia.plsql +++ b/gestaoFinanceira/fontes/PLPGSQL/contabilidade/relatorioInsuficiencia.plsql @@ -54,10 +54,16 @@ BEGIN stSql := ' CREATE TEMPORARY TABLE tmp_recursos_processados_exercicios_anteriores AS - SELECT busca_recurso.cod_recurso + SELECT CASE WHEN restos_pre_empenho.recurso IS NOT NULL + THEN restos_pre_empenho.recurso + ELSE busca_recurso.cod_recurso + END AS cod_recurso , liquidado.cod_empenho , liquidado.cod_entidade - , busca_recurso.nom_recurso + , CASE WHEN restos_pre_empenho.recurso IS NOT NULL + THEN recurso_restos.nom_recurso + ELSE busca_recurso.nom_recurso + END AS nom_recurso , sw_cgm.nom_cgm as nom_entidade , CASE WHEN restos_pre_empenho.cod_estrutural IS NOT NULL @@ -241,11 +247,16 @@ BEGIN LEFT JOIN empenho.restos_pre_empenho ON restos_pre_empenho.exercicio = liquidado.exercicio AND restos_pre_empenho.cod_pre_empenho = liquidado.cod_pre_empenho + LEFT JOIN orcamento.recurso AS recurso_restos + ON restos_pre_empenho.recurso = recurso_restos.cod_recurso + AND restos_pre_empenho.exercicio = liquidado.exercicio GROUP BY busca_recurso.cod_recurso + , restos_pre_empenho.recurso , liquidado.cod_empenho , liquidado.cod_entidade , busca_recurso.nom_recurso + , recurso_restos.nom_recurso , sw_cgm.nom_cgm , restos_pre_empenho.cod_estrutural , conta_despesa.cod_estrutural @@ -263,10 +274,16 @@ BEGIN stSql := ' CREATE TEMPORARY TABLE tmp_recursos_processados_exercicio_anterior AS - SELECT busca_recurso.cod_recurso + SELECT CASE WHEN restos_pre_empenho.recurso IS NOT NULL + THEN restos_pre_empenho.recurso + ELSE busca_recurso.cod_recurso + END AS cod_recurso , liquidado.cod_empenho , liquidado.cod_entidade - , busca_recurso.nom_recurso + , CASE WHEN restos_pre_empenho.recurso IS NOT NULL + THEN recurso_restos.nom_recurso + ELSE busca_recurso.nom_recurso + END AS nom_recurso , sw_cgm.nom_cgm as nom_entidade , CASE WHEN restos_pre_empenho.cod_estrutural IS NOT NULL @@ -448,11 +465,16 @@ BEGIN LEFT JOIN empenho.restos_pre_empenho ON restos_pre_empenho.exercicio = liquidado.exercicio AND restos_pre_empenho.cod_pre_empenho = liquidado.cod_pre_empenho + LEFT JOIN orcamento.recurso AS recurso_restos + ON restos_pre_empenho.recurso = recurso_restos.cod_recurso + AND restos_pre_empenho.exercicio = liquidado.exercicio GROUP BY busca_recurso.cod_recurso + , restos_pre_empenho.recurso , liquidado.cod_empenho , liquidado.cod_entidade , busca_recurso.nom_recurso + , recurso_restos.nom_recurso , sw_cgm.nom_cgm , restos_pre_empenho.cod_estrutural , conta_despesa.cod_estrutural @@ -466,10 +488,16 @@ BEGIN StSql := ' CREATE TEMPORARY TABLE tmp_recursos_nao_processados_exercicios_anteriores AS - SELECT busca_recurso.cod_recurso + SELECT CASE WHEN restos_pre_empenho.recurso IS NOT NULL + THEN restos_pre_empenho.recurso + ELSE busca_recurso.cod_recurso + END AS cod_recurso , empenhado.cod_empenho , empenhado.cod_entidade - , busca_recurso.nom_recurso + , CASE WHEN restos_pre_empenho.recurso IS NOT NULL + THEN recurso_restos.nom_recurso + ELSE busca_recurso.nom_recurso + END AS nom_recurso , sw_cgm.nom_cgm as nom_entidade , CASE WHEN restos_pre_empenho.cod_estrutural IS NOT NULL @@ -627,9 +655,14 @@ BEGIN LEFT JOIN empenho.restos_pre_empenho ON restos_pre_empenho.exercicio = empenhado.exercicio AND restos_pre_empenho.cod_pre_empenho = empenhado.cod_pre_empenho + LEFT JOIN orcamento.recurso AS recurso_restos + ON restos_pre_empenho.recurso = recurso_restos.cod_recurso + AND restos_pre_empenho.exercicio = empenhado.exercicio GROUP BY busca_recurso.cod_recurso + , restos_pre_empenho.recurso , busca_recurso.nom_recurso + , recurso_restos.nom_recurso , sw_cgm.nom_cgm , restos_pre_empenho.cod_estrutural , conta_despesa.cod_estrutural @@ -645,10 +678,16 @@ BEGIN StSql := ' CREATE TEMPORARY TABLE tmp_recursos_nao_processados_exercicio_anterior AS - SELECT busca_recurso.cod_recurso + SELECT CASE WHEN restos_pre_empenho.recurso IS NOT NULL + THEN restos_pre_empenho.recurso + ELSE busca_recurso.cod_recurso + END AS cod_recurso , empenhado.cod_empenho , empenhado.cod_entidade - , busca_recurso.nom_recurso + , CASE WHEN restos_pre_empenho.recurso IS NOT NULL + THEN recurso_restos.nom_recurso + ELSE busca_recurso.nom_recurso + END AS nom_recurso , sw_cgm.nom_cgm as nom_entidade , CASE WHEN restos_pre_empenho.cod_estrutural IS NOT NULL @@ -804,9 +843,14 @@ BEGIN LEFT JOIN empenho.restos_pre_empenho ON restos_pre_empenho.exercicio = empenhado.exercicio AND restos_pre_empenho.cod_pre_empenho = empenhado.cod_pre_empenho + LEFT JOIN orcamento.recurso AS recurso_restos + ON restos_pre_empenho.recurso = recurso_restos.cod_recurso + AND restos_pre_empenho.exercicio = empenhado.exercicio GROUP BY busca_recurso.cod_recurso + , restos_pre_empenho.recurso , busca_recurso.nom_recurso + , recurso_restos.nom_recurso , sw_cgm.nom_cgm , restos_pre_empenho.cod_estrutural , conta_despesa.cod_estrutural diff --git a/gestaoFinanceira/fontes/PLPGSQL/contabilidade/saldoContaAnaliticaEntidade.plsql b/gestaoFinanceira/fontes/PLPGSQL/contabilidade/saldoContaAnaliticaEntidade.plsql index fecaa4c..c580241 100755 --- a/gestaoFinanceira/fontes/PLPGSQL/contabilidade/saldoContaAnaliticaEntidade.plsql +++ b/gestaoFinanceira/fontes/PLPGSQL/contabilidade/saldoContaAnaliticaEntidade.plsql @@ -41,13 +41,12 @@ Bug #8125# */ -CREATE OR REPLACE FUNCTION contabilidade.fn_saldo_conta_analitica_entidade(VARCHAR,INTEGER,INTEGER) RETURNS NUMERIC AS ' - +CREATE OR REPLACE FUNCTION contabilidade.fn_saldo_conta_analitica_entidade(VARCHAR,INTEGER,INTEGER) RETURNS NUMERIC AS $$ DECLARE stExercicio ALIAS FOR $1; inCodPlano ALIAS FOR $2; inCodEntidade ALIAS FOR $3; - stSql VARCHAR := ''''; + stSql VARCHAR := ''; nuVlDebito NUMERIC := 0.00; nuVlCredito NUMERIC := 0.00; reRecord RECORD; @@ -103,4 +102,4 @@ BEGIN RETURN nuVlDebito + nuVlCredito; END; -'LANGUAGE 'plpgsql'; +$$ LANGUAGE 'plpgsql'; diff --git a/gestaoFinanceira/fontes/PLPGSQL/orcamento/orcamentoSuplementacoesTransferencia.plsql b/gestaoFinanceira/fontes/PLPGSQL/orcamento/orcamentoSuplementacoesTransferencia.plsql index 2232979..7ed6ef2 100644 --- a/gestaoFinanceira/fontes/PLPGSQL/orcamento/orcamentoSuplementacoesTransferencia.plsql +++ b/gestaoFinanceira/fontes/PLPGSQL/orcamento/orcamentoSuplementacoesTransferencia.plsql @@ -20,6 +20,15 @@ * * ********************************************************************************** */ +/* +* Script de função PLPGSQL +* +* URBEM Soluções de Gestão Pública Ltda +* www.urbem.cnm.org.br +* +* $Id: orcamentoSuplementacoesTransferencia.plsql 62400 2015-05-04 17:30:31Z michel $ +*/ + CREATE OR REPLACE FUNCTION orcamentosuplementacoestransferencia (character varying, numeric, character varying, integer, character varying, integer, integer) RETURNS INTEGER AS $$ DECLARE EXERCICIO ALIAS FOR $1; @@ -32,6 +41,12 @@ DECLARE SEQUENCIA INTEGER; BEGIN + IF EXERCICIO::integer > 2013 THEN + SEQUENCIA := FAZERLANCAMENTO( '622110000' , '522190109' , CODHISTORICO , EXERCICIO , VALOR , COMPLEMENTO , CODLOTE , TIPOLOTE , CODENTIDADE ); + SEQUENCIA := FAZERLANCAMENTO( '522120100' , '622110000' , CODHISTORICO , EXERCICIO , VALOR , COMPLEMENTO , CODLOTE , TIPOLOTE , CODENTIDADE ); + SEQUENCIA := FAZERLANCAMENTO( '522130300' , '522139900' , CODHISTORICO , EXERCICIO , VALOR , COMPLEMENTO , CODLOTE , TIPOLOTE , CODENTIDADE ); + END IF; + IF EXERCICIO::integer > 2012 THEN SEQUENCIA := FAZERLANCAMENTO( '522190101' , '622110000' , CODHISTORICO , EXERCICIO , VALOR , COMPLEMENTO , CODLOTE , TIPOLOTE , CODENTIDADE ); SEQUENCIA := FAZERLANCAMENTO( '522120100' , '522190109' , CODHISTORICO , EXERCICIO , VALOR , COMPLEMENTO , CODLOTE , TIPOLOTE , CODENTIDADE ); diff --git a/gestaoFinanceira/fontes/PLPGSQL/tesouraria/conciliacaoMovimentacaoCorrente.plsql b/gestaoFinanceira/fontes/PLPGSQL/tesouraria/conciliacaoMovimentacaoCorrente.plsql index 11d53cc..43ebdbb 100644 --- a/gestaoFinanceira/fontes/PLPGSQL/tesouraria/conciliacaoMovimentacaoCorrente.plsql +++ b/gestaoFinanceira/fontes/PLPGSQL/tesouraria/conciliacaoMovimentacaoCorrente.plsql @@ -154,9 +154,13 @@ BEGIN ,coalesce( lpad(lc.mes::text,2,''0''), '''') as mes ,lc.exercicio_conciliacao FROM + tesouraria.boletim as BOLETIM, tesouraria.pagamento as P, - contabilidade.pagamento as cp + contabilidade.pagamento as cp + + + LEFT JOIN tesouraria.conciliacao_lancamento_contabil as lc on( cp.cod_lote = lc.cod_lote AND cp.tipo = lc.tipo @@ -238,159 +242,170 @@ BEGIN AND to_char(P.timestamp,''yyyy'')::integer BETWEEN '''||stExercicio||'''::integer-1 AND '''||stExercicio||'''::integer AND lo.dt_lote = to_date(to_char(P.timestamp,''yyyy-mm-dd''),''yyyy-mm-dd'') - UNION - - - SELECT - cp.cod_lote, - BOLETIM.dt_boletim as dt_lancamento, - TO_DATE(conciliacao.dt_extrato::VARCHAR,''yyyy-mm-dd'') AS dt_conciliacao, - boletim.exercicio, - p.cod_plano, - cast( - CASE WHEN TRIM(substring(ENLPA.observacao,1,60)) = '''' THEN - CASE WHEN (ENL.exercicio_empenho < P.exercicio_boletim) THEN - ''Estorno de Pagamento de RP n° '' || ENL.cod_empenho || ''/'' || ENL.exercicio_empenho - ELSE ''Estorno de Pagamento de Empenho n° '' || ENL.cod_empenho || ''/'' || ENL.exercicio_empenho - END - ELSE - CASE WHEN (ENL.exercicio_empenho < P.exercicio_boletim) THEN - ''Estorno de Pagamento de RP n° '' || ENL.cod_empenho || ''/'' || ENL.exercicio_empenho - ELSE ''Estorno de Pagamento de Empenho n° '' || ENL.cod_empenho || ''/'' || ENL.exercicio_empenho - END - END as varchar) - || CASE WHEN (cheque_emissao_ordem_pagamento.num_cheque IS NOT NULL) THEN - '' CH '' || cheque_emissao_ordem_pagamento.num_cheque - END - as descricao, - replace(trim(substring(coalesce(ENLPA.observacao,''''),1,60)),'''','''') as observacao, - enlpa.vl_anulado as vl_lancamento, - cast( ''C'' as varchar ) as tipo_valor, - cp.tipo, - cp.sequencia, - boletim.cod_entidade, - CASE - WHEN lc.cod_plano is not null - THEN ''true'' - ELSE '''' - END as conciliar, - ''A'' as tipo_movimentacao, - 0 as cod_arrecadacao, - 0 as cod_receita, - ttp.cod_bordero, - CAST('''' as text ) as timestamp_arrecadacao, - CAST('''' as text ) as timestamp_estornada, - CAST('''' as text ) as tipo_arrecadacao - ,coalesce( lpad(lc.mes::text,2,''0''), '''') as mes - ,lc.exercicio_conciliacao - FROM - tesouraria.boletim as BOLETIM, - tesouraria.pagamento_estornado as PE, - tesouraria.pagamento as P, - contabilidade.pagamento as cp - JOIN contabilidade.pagamento_estorno as cpe - on( cp.cod_lote = cpe.cod_lote - AND cp.tipo = cpe.tipo - AND cp.sequencia = cpe.sequencia - AND cp.exercicio = cpe.exercicio - AND cp.cod_entidade = cpe.cod_entidade - AND cp.timestamp = cpe.timestamp - AND cp.cod_nota = cpe.cod_nota - AND cp.exercicio_liquidacao = cpe.exercicio_liquidacao - ) - LEFT JOIN tesouraria.conciliacao_lancamento_contabil as lc - on( cp.cod_lote = lc.cod_lote - AND cp.tipo = lc.tipo - AND cp.sequencia = lc.sequencia - AND cp.exercicio = lc.exercicio - AND cp.cod_entidade = lc.cod_entidade - AND lc.tipo_valor = ''C'' - ) - LEFT JOIN tesouraria.conciliacao - ON lc.cod_plano = conciliacao.cod_plano - AND lc.exercicio_conciliacao = conciliacao.exercicio - AND lc.mes = conciliacao.mes - - JOIN contabilidade.lancamento_empenho as LE - ON ( le.cod_entidade = cp.cod_entidade - AND le.tipo = cp.tipo - AND le.sequencia = cp.sequencia - AND le.exercicio = cp.exercicio - AND le.cod_lote = cp.cod_lote - AND le.estorno = ''true'' - ) - JOIN contabilidade.lote as lo - ON ( le.cod_lote = lo.cod_lote - AND le.cod_entidade = lo.cod_entidade - AND le.tipo = lo.tipo - AND le.exercicio = lo.exercicio - ), - empenho.pagamento_liquidacao as EPL - LEFT JOIN tesouraria.cheque_emissao_ordem_pagamento - ON cheque_emissao_ordem_pagamento.cod_ordem = EPL.cod_ordem - AND cheque_emissao_ordem_pagamento.exercicio = EPL.exercicio - AND cheque_emissao_ordem_pagamento.cod_entidade = EPL.cod_entidade - AND cheque_emissao_ordem_pagamento.timestamp_emissao = ( SELECT MAX(timestamp_emissao) - FROM tesouraria.cheque_emissao_ordem_pagamento - WHERE cod_ordem = EPL.cod_ordem - AND exercicio = EPL.exercicio - AND cod_entidade = EPL.cod_entidade ), - empenho.pagamento_liquidacao_nota_liquidacao_paga as EPLNLP - LEFT JOIN tesouraria.transacoes_pagamento as TTP - ON ( ttp.cod_ordem = EPLNLP.cod_ordem - AND ttp.cod_entidade = EPLNLP.cod_entidade - AND ttp.exercicio = EPLNLP.exercicio - ), - empenho.nota_liquidacao_paga as ENLP, - empenho.nota_liquidacao_paga_anulada as ENLPA, - empenho.nota_liquidacao as ENL - WHERE - BOLETIM.cod_boletim = PE.cod_boletim - AND BOLETIM.exercicio = PE.exercicio_boletim - AND BOLETIM.cod_entidade = PE.cod_entidade + UNION + + + + + + + + SELECT + conciliacao_pagamento.cod_lote + , boletim.dt_boletim as dt_lancamento + , TO_DATE(conciliacao.dt_extrato::VARCHAR,''yyyy-mm-dd'') AS dt_conciliacao + , boletim.exercicio + , pagamento.cod_plano + , CAST( + CASE WHEN TRIM(substring(nota_liquidacao_paga_anulada.observacao,1,60)) = '''' THEN + CASE WHEN (nota_liquidacao.exercicio_empenho < pagamento.exercicio_boletim) THEN + ''Estorno de Pagamento de RP n° '' || nota_liquidacao.cod_empenho || ''/'' || nota_liquidacao.exercicio_empenho + ELSE ''Estorno de Pagamento de Empenho n° '' || nota_liquidacao.cod_empenho || ''/'' || nota_liquidacao.exercicio_empenho + END + ELSE + CASE WHEN (nota_liquidacao.exercicio_empenho < pagamento.exercicio_boletim) THEN + ''Estorno de Pagamento de RP n° '' || nota_liquidacao.cod_empenho || ''/'' || nota_liquidacao.exercicio_empenho + ELSE ''Estorno de Pagamento de Empenho n° '' || nota_liquidacao.cod_empenho || ''/'' || nota_liquidacao.exercicio_empenho + END + END as varchar) + || CASE WHEN (cheque_emissao_ordem_pagamento.num_cheque IS NOT NULL) THEN + '' CH '' || cheque_emissao_ordem_pagamento.num_cheque + END + AS descricao + , replace(trim(substring(coalesce(nota_liquidacao_paga_anulada.observacao,''''),1,60)),'''','''') AS observacao + , nota_liquidacao_paga_anulada.vl_anulado AS vl_lancamento + , cast( ''C'' as varchar ) AS tipo_valor + , conciliacao_pagamento.tipo + , conciliacao_pagamento.sequencia + , boletim.cod_entidade + , CASE + WHEN conciliacao_lancamento_contabil.cod_plano is not null + THEN ''true'' + ELSE '''' + END as conciliar + , ''A'' as tipo_movimentacao + , 0 AS cod_arrecadacao + , 0 AS cod_receita + , transacoes_pagamento.cod_bordero + , CAST('''' as text ) AS timestamp_arrecadacao + , CAST('''' as text ) AS timestamp_estornada + , CAST('''' as text ) AS tipo_arrecadacao + , coalesce( lpad(conciliacao_lancamento_contabil.mes::text,2,''0''), '''') AS mes + , conciliacao_lancamento_contabil.exercicio_conciliacao + + FROM tesouraria.boletim + + INNER JOIN tesouraria.pagamento_estornado + ON boletim.cod_boletim = pagamento_estornado.cod_boletim + AND boletim.exercicio = pagamento_estornado.exercicio_boletim + AND boletim.cod_entidade = pagamento_estornado.cod_entidade + + INNER JOIN tesouraria.pagamento + ON pagamento_estornado.cod_nota = pagamento.cod_nota + AND pagamento_estornado.exercicio = pagamento.exercicio + AND pagamento_estornado.cod_entidade = pagamento.cod_entidade + AND pagamento_estornado.timestamp = pagamento.timestamp - AND PE.cod_nota = P.cod_nota - AND PE.exercicio = P.exercicio - AND PE.cod_entidade = P.cod_entidade - AND PE.timestamp = P.timestamp + , contabilidade.pagamento AS conciliacao_pagamento + + INNER JOIN contabilidade.pagamento_estorno + ON conciliacao_pagamento.cod_lote = pagamento_estorno.cod_lote + AND conciliacao_pagamento.tipo = pagamento_estorno.tipo + AND conciliacao_pagamento.sequencia = pagamento_estorno.sequencia + AND conciliacao_pagamento.exercicio = pagamento_estorno.exercicio + AND conciliacao_pagamento.cod_entidade = pagamento_estorno.cod_entidade + AND conciliacao_pagamento.timestamp = pagamento_estorno.timestamp + AND conciliacao_pagamento.cod_nota = pagamento_estorno.cod_nota + AND conciliacao_pagamento.exercicio_liquidacao = pagamento_estorno.exercicio_liquidacao + + LEFT JOIN tesouraria.conciliacao_lancamento_contabil + ON conciliacao_pagamento.cod_lote = conciliacao_lancamento_contabil.cod_lote + AND conciliacao_pagamento.tipo = conciliacao_lancamento_contabil.tipo + AND conciliacao_pagamento.sequencia = conciliacao_lancamento_contabil.sequencia + AND conciliacao_pagamento.exercicio = conciliacao_lancamento_contabil.exercicio + AND conciliacao_pagamento.cod_entidade = conciliacao_lancamento_contabil.cod_entidade + AND conciliacao_lancamento_contabil.tipo_valor = ''C'' + + LEFT JOIN tesouraria.conciliacao + ON conciliacao_lancamento_contabil.cod_plano = conciliacao.cod_plano + AND conciliacao_lancamento_contabil.exercicio_conciliacao = conciliacao.exercicio + AND conciliacao_lancamento_contabil.mes = conciliacao.mes + + INNER JOIN contabilidade.lancamento_empenho + ON lancamento_empenho.cod_entidade = conciliacao_pagamento.cod_entidade + AND lancamento_empenho.tipo = conciliacao_pagamento.tipo + AND lancamento_empenho.sequencia = conciliacao_pagamento.sequencia + AND lancamento_empenho.exercicio = conciliacao_pagamento.exercicio + AND lancamento_empenho.cod_lote = conciliacao_pagamento.cod_lote + AND lancamento_empenho.estorno = ''true'' + + INNER JOIN contabilidade.lote + ON lancamento_empenho.cod_lote = lote.cod_lote + AND lancamento_empenho.cod_entidade = lote.cod_entidade + AND lancamento_empenho.tipo = lote.tipo + AND lancamento_empenho.exercicio = lote.exercicio + + , empenho.pagamento_liquidacao + + LEFT JOIN ( SELECT MAX(timestamp_emissao), num_cheque, cod_ordem, exercicio, cod_entidade + FROM tesouraria.cheque_emissao_ordem_pagamento + GROUP BY num_cheque, cod_ordem, exercicio, cod_entidade + ) AS cheque_emissao_ordem_pagamento + ON cheque_emissao_ordem_pagamento.cod_ordem = pagamento_liquidacao.cod_ordem + AND cheque_emissao_ordem_pagamento.exercicio = pagamento_liquidacao.exercicio + AND cheque_emissao_ordem_pagamento.cod_entidade = pagamento_liquidacao.cod_entidade + + , empenho.pagamento_liquidacao_nota_liquidacao_paga + + LEFT JOIN tesouraria.transacoes_pagamento + ON transacoes_pagamento.cod_ordem = pagamento_liquidacao_nota_liquidacao_paga.cod_ordem + AND transacoes_pagamento.cod_entidade = pagamento_liquidacao_nota_liquidacao_paga.cod_entidade + AND transacoes_pagamento.exercicio = pagamento_liquidacao_nota_liquidacao_paga.exercicio - AND PE.cod_nota = ENLPA.cod_nota - AND PE.exercicio = ENLPA.exercicio - AND PE.cod_entidade = ENLPA.cod_entidade - AND PE.timestamp_anulado = ENLPA.timestamp_anulada - AND PE.timestamp = ENLPA.timestamp + , empenho.nota_liquidacao_paga + , empenho.nota_liquidacao_paga_anulada + , empenho.nota_liquidacao + + WHERE + pagamento_estornado.cod_nota = nota_liquidacao_paga_anulada.cod_nota + AND pagamento_estornado.exercicio = nota_liquidacao_paga_anulada.exercicio + AND pagamento_estornado.cod_entidade = nota_liquidacao_paga_anulada.cod_entidade + AND pagamento_estornado.timestamp_anulado = nota_liquidacao_paga_anulada.timestamp_anulada + AND pagamento_estornado.timestamp = nota_liquidacao_paga_anulada.timestamp - AND ENLPA.exercicio = CPE.exercicio_liquidacao - AND ENLPA.cod_nota = CPE.cod_nota - AND ENLPA.cod_entidade = CPE.cod_entidade - AND ENLPA.timestamp = CPE.timestamp - AND ENLPA.timestamp_anulada = CPE.timestamp_anulada + AND nota_liquidacao_paga_anulada.exercicio = pagamento_estorno.exercicio_liquidacao + AND nota_liquidacao_paga_anulada.cod_nota = pagamento_estorno.cod_nota + AND nota_liquidacao_paga_anulada.cod_entidade = pagamento_estorno.cod_entidade + AND nota_liquidacao_paga_anulada.timestamp = pagamento_estorno.timestamp + AND nota_liquidacao_paga_anulada.timestamp_anulada = pagamento_estorno.timestamp_anulada - AND ENLPA.cod_nota = ENLP.cod_nota - AND ENLPA.exercicio = ENLP.exercicio - AND ENLPA.cod_entidade = ENLP.cod_entidade - AND ENLPA.timestamp = ENLP.timestamp + AND nota_liquidacao_paga_anulada.cod_nota = nota_liquidacao_paga.cod_nota + AND nota_liquidacao_paga_anulada.exercicio = nota_liquidacao_paga.exercicio + AND nota_liquidacao_paga_anulada.cod_entidade = nota_liquidacao_paga.cod_entidade + AND nota_liquidacao_paga_anulada.timestamp = nota_liquidacao_paga.timestamp - AND ENLP.cod_nota = ENL.cod_nota - AND ENLP.exercicio = ENL.exercicio - AND ENLP.cod_entidade = ENL.cod_entidade + AND nota_liquidacao_paga.cod_nota = nota_liquidacao.cod_nota + AND nota_liquidacao_paga.exercicio = nota_liquidacao.exercicio + AND nota_liquidacao_paga.cod_entidade = nota_liquidacao.cod_entidade - AND EPL.cod_ordem = EPLNLP.cod_ordem - AND EPL.exercicio = EPLNLP.exercicio - AND EPL.cod_entidade = EPLNLP.cod_entidade - AND EPL.exercicio_liquidacao = EPLNLP.exercicio_liquidacao - AND EPL.cod_nota = EPLNLP.cod_nota + AND pagamento_liquidacao.cod_ordem = pagamento_liquidacao_nota_liquidacao_paga.cod_ordem + AND pagamento_liquidacao.exercicio = pagamento_liquidacao_nota_liquidacao_paga.exercicio + AND pagamento_liquidacao.cod_entidade = pagamento_liquidacao_nota_liquidacao_paga.cod_entidade + AND pagamento_liquidacao.exercicio_liquidacao = pagamento_liquidacao_nota_liquidacao_paga.exercicio_liquidacao + AND pagamento_liquidacao.cod_nota = pagamento_liquidacao_nota_liquidacao_paga.cod_nota - AND EPLNLP.exercicio_liquidacao = ENLP.exercicio - AND EPLNLP.cod_nota = ENLP.cod_nota - AND EPLNLP.cod_entidade = ENLP.cod_entidade - AND EPLNLP.timestamp = ENLP.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 + AND pagamento_liquidacao_nota_liquidacao_paga.cod_entidade = nota_liquidacao_paga.cod_entidade + AND pagamento_liquidacao_nota_liquidacao_paga.timestamp = nota_liquidacao_paga.timestamp - AND p.cod_plano = '||inCodPlano||' - AND pe.cod_entidade in ( '||stCodEntidade||' ) - AND to_char(PE.timestamp_anulado,''yyyy'')::integer BETWEEN '''||stExercicio||'''::integer-1 AND '''||stExercicio||'''::integer - AND TO_CHAR(BOLETIM.dt_boletim,''mm'') = TO_CHAR(TO_DATE( '''||stDtFinal||'''::VARCHAR, ''dd/mm/yyyy'' ),''mm'') - AND lo.dt_lote = to_date(to_char(PE.timestamp_anulado,''yyyy-mm-dd''),''yyyy-mm-dd'') + AND pagamento.cod_plano = '||inCodPlano||' + AND pagamento_estornado.cod_entidade in ( '||stCodEntidade||' ) + AND to_char(pagamento_estornado.timestamp_anulado,''yyyy'')::INTEGER BETWEEN '''||stExercicio||'''::integer-1 AND '''||stExercicio||'''::integer + AND TO_CHAR(BOLETIM.dt_boletim,''mm'') = TO_CHAR(TO_DATE( '''||stDtFinal||'''::VARCHAR, ''dd/mm/yyyy'' ),''mm'') + AND lote.dt_lote = to_date(to_char(pagamento_estornado.timestamp_anulado,''yyyy-mm-dd''),''yyyy-mm-dd'') + + UNION @@ -1061,6 +1076,8 @@ BEGIN AND TO_CHAR(BOLETIM.dt_boletim,''mm'') < TO_CHAR(TO_DATE( '''||stDtFinal||'''::VARCHAR, ''dd/mm/yyyy''),''mm'') ) as tbl '; + + --RAISE NOTICE '%', stSql || stFiltro; IF(stFiltro != '')THEN stSql := stSql || stFiltro; diff --git a/gestaoPatrimonial/fontes/PHP/licitacao/classes/componentes/IMontaNumeroLicitacaoMultiploEntidadeUsuario.class.php b/gestaoPatrimonial/fontes/PHP/licitacao/classes/componentes/IMontaNumeroLicitacaoMultiploEntidadeUsuario.class.php index 72dc29f..ddee6c5 100644 --- a/gestaoPatrimonial/fontes/PHP/licitacao/classes/componentes/IMontaNumeroLicitacaoMultiploEntidadeUsuario.class.php +++ b/gestaoPatrimonial/fontes/PHP/licitacao/classes/componentes/IMontaNumeroLicitacaoMultiploEntidadeUsuario.class.php @@ -78,6 +78,7 @@ class IMontaNumeroLicitacaoMultiploEntidadeUsuario extends Objeto $this->obExercicio = new Exercicio(); $this->obExercicio->setName( 'stExercicioLicitacao' ); + $this->obExercicio->setId( 'stExercicioLicitacao' ); $this->obExercicio->setNull( true ); $this->obISelectMultiploEntidadeUsuario = new ISelectMultiploEntidadeUsuario(); @@ -88,6 +89,7 @@ class IMontaNumeroLicitacaoMultiploEntidadeUsuario extends Objeto $this->obTxtLicitacao = new TextBox(); $this->obTxtLicitacao->setName ( 'inCodLicitacao' ); + $this->obTxtLicitacao->setId ( 'inCodLicitacao' ); $this->obTxtLicitacao->setRotulo ( 'Licitação' ); $this->obTxtLicitacao->setTitle ( 'Selecione a Licitação.' ); diff --git a/gestaoPatrimonial/fontes/PHP/licitacao/classes/mapeamento/TLicitacaoLicitacao.class.php b/gestaoPatrimonial/fontes/PHP/licitacao/classes/mapeamento/TLicitacaoLicitacao.class.php index f8e968e..5814e94 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 62279 2015-04-16 18:38:45Z arthur $ + $Id: TLicitacaoLicitacao.class.php 62370 2015-04-29 15:01:13Z jean $ */ @@ -80,6 +80,7 @@ function TLicitacaoLicitacao() $this->AddCampo('num_orgao' ,'integer' ,true ,'' ,false,false); $this->AddCampo('num_unidade' ,'integer' ,true ,'' ,false,false); $this->AddCampo('cod_regime' ,'integer' ,false ,'' ,false,false); + $this->AddCampo('tipo_chamada_publica','integer' ,false ,'' ,false,true); } function proximoCodigoLicitacao(&$inCodLicitacao , $boTransacao = "") diff --git a/gestaoPatrimonial/fontes/PHP/licitacao/instancias/processoLicitatorio/FLManterProcessoLicitatorio.php b/gestaoPatrimonial/fontes/PHP/licitacao/instancias/processoLicitatorio/FLManterProcessoLicitatorio.php index 863944a..8a1bf8d 100644 --- a/gestaoPatrimonial/fontes/PHP/licitacao/instancias/processoLicitatorio/FLManterProcessoLicitatorio.php +++ b/gestaoPatrimonial/fontes/PHP/licitacao/instancias/processoLicitatorio/FLManterProcessoLicitatorio.php @@ -68,6 +68,8 @@ $pgOcul = "OC".$stPrograma.".php"; $pgJs = "JS".$stPrograma.".js"; //include ($pgJs); +$jsOnload = ''; + //Define a função do arquivo, ex: incluir, excluir, alterar, consultar, etc $stAcao = $request->get('stAcao'); @@ -132,6 +134,7 @@ $obFormulario->setAjuda ("UC-03.05.15"); $obFormulario->addHidden ( $obHdnAcao ); $obFormulario->addHidden ( $obHdnCtrl ); $obMontaLicitacao->geraFormulario( $obFormulario ); +$obMontaLicitacao->obExercicio->setReadOnly(true); $obFormulario->addComponente ( $obHomologada); $obFormulario->addComponente ( $obPopUpProcesso ); $obFormulario->addComponente ( $obPopUpMapa ); @@ -144,4 +147,6 @@ $obFormulario->addComponente ( $obPopUpObjeto ); $obFormulario->OK(); $obFormulario->show(); +//$jsOnload .="jq('#stExercicioLicitacao').attr('readonly',true);"; + include_once '../../../../../../gestaoAdministrativa/fontes/PHP/framework/include/rodape.inc.php'; diff --git a/gestaoPatrimonial/fontes/PHP/licitacao/instancias/processoLicitatorio/FMManterProcessoLicitatorio.php b/gestaoPatrimonial/fontes/PHP/licitacao/instancias/processoLicitatorio/FMManterProcessoLicitatorio.php index 2c4d49e..9e83886 100644 --- a/gestaoPatrimonial/fontes/PHP/licitacao/instancias/processoLicitatorio/FMManterProcessoLicitatorio.php +++ b/gestaoPatrimonial/fontes/PHP/licitacao/instancias/processoLicitatorio/FMManterProcessoLicitatorio.php @@ -30,7 +30,7 @@ * @author Analista: Cleisson da Silva Barboza * @author Desenvolvedor: Fernando Zank Correa Evangelista - $Id: FMManterProcessoLicitatorio.php 62228 2015-04-10 13:01:15Z evandro $ + $Id: FMManterProcessoLicitatorio.php 62402 2015-05-04 20:19:28Z jean $ * Casos de uso : uc-03.04.15 */ @@ -282,6 +282,7 @@ if ($stAcao == 'incluir') { $obISelectModalidadeLicitacao->setCampoDesc ("[cod_modalidade] - [descricao]" ); $obISelectModalidadeLicitacao->preencheCombo ($rsRecordSet ); $obISelectModalidadeLicitacao->setNull ( false ); + $obISelectModalidadeLicitacao->obEvento->setOnChange ("ajaxJavaScript('".$pgOcul."?".Sessao::getId()."&inCodModalidade='+this.value,'recuperaRegistroModalidade');"); } if(!$boEdital) { @@ -419,7 +420,6 @@ if ($stAcao != "incluir") { $obLblLicitacao->setRotulo('Código da Licitação'); $obLblLicitacao->setValue($_REQUEST['inCodLicitacao']); - if ( $compraJulgamento ) { $obLblProcessoAdm = new Label(); $obLblProcessoAdm->setRotulo('Processo Administrativo'); @@ -534,6 +534,9 @@ if ($stAcao != "incluir") { $obSpnItens = new Span; $obSpnItens->setId( 'spnItens' ); +$obSpnRegistroModalidade = new Span; +$obSpnRegistroModalidade->setId('spnRegistroModalidade'); + //define o formulário $obFormulario = new Formulario; $obFormulario->addForm ( $obForm ); @@ -587,9 +590,11 @@ if ($stAcao != 'anular' ) { if ($stAcao == 'incluir') { $obFormulario->addComponente( $obISelectModalidadeLicitacao ); } else { - $obFormulario->addComponente( $obLblModalidade ); + $obFormulario->addComponente( $obLblModalidade ); } - + + $obFormulario->addSpan ( $obSpnRegistroModalidade ); + if($compraJulgamento){ $obFormulario->addComponente ( $obLblCriterioJulg ); }else{ diff --git a/gestaoPatrimonial/fontes/PHP/licitacao/instancias/processoLicitatorio/FMManterProcessoLicitatorioConsulta.php b/gestaoPatrimonial/fontes/PHP/licitacao/instancias/processoLicitatorio/FMManterProcessoLicitatorioConsulta.php index ecfba37..6efdabe 100644 --- a/gestaoPatrimonial/fontes/PHP/licitacao/instancias/processoLicitatorio/FMManterProcessoLicitatorioConsulta.php +++ b/gestaoPatrimonial/fontes/PHP/licitacao/instancias/processoLicitatorio/FMManterProcessoLicitatorioConsulta.php @@ -199,6 +199,26 @@ $obLblModalidade = new Label; $obLblModalidade->setRotulo('Modalidade'); $obLblModalidade->setValue($_REQUEST['stModalidade']); +include_once(TLIC."TLicitacaoTipoChamadaPublica.class.php"); +$obTLicitacaoTipoChamadaPublica = new TLicitacaoTipoChamadaPublica; +$obTLicitacaoTipoChamadaPublica->setDado('cod_tipo',$rsLicitacao->getCampo("tipo_chamada_publica")); +$obTLicitacaoTipoChamadaPublica->recuperaPorChave($rsTipoChamadaPublica); + +# Define o Label de Tipo de Chamada Pública +$obLblChamadaPublica = new Label; + +if ($rsLicitacao->getCampo('cod_modalidade') == 8 || $rsLicitacao->getCampo('cod_modalidade') == 9) { + $obLblChamadaPublica->setRotulo('Chamada Pública'); + if ($rsTipoChamadaPublica->getCampo("cod_tipo") != 0) { + $obLblChamadaPublica->setValue("Sim"); + } else { + $obLblChamadaPublica->setValue("Não"); + } +} else { + $obLblChamadaPublica->setRotulo('Tipo de Chamada Pública'); + $obLblChamadaPublica->setValue($rsTipoChamadaPublica->getCampo("cod_tipo")." - ".$rsTipoChamadaPublica->getCampo("descricao")); +} + # Define o Label para tipo de Cotação $obLblTipoCotacao = new Label; $obLblTipoCotacao->setName ( 'txtTipoCotacao' ); @@ -336,6 +356,14 @@ $obFormulario->addComponente ( $obLblDtLicitacao ); $obFormulario->addComponente ( $obLblValorReferencia); $obFormulario->addComponente ( $obLblTipoCotacao ); $obFormulario->addComponente ( $obLblModalidade ); + +if ($rsLicitacao->getCampo('cod_modalidade') == 8 || + $rsLicitacao->getCampo('cod_modalidade') == 9 || + $rsLicitacao->getCampo('cod_modalidade') == 10 + ) { + $obFormulario->addComponente ( $obLblChamadaPublica ); +} + $obFormulario->addComponente ( $obILblCriterioJulgamento); $obFormulario->addComponente ( $obILblTipoObjeto); $obFormulario->addComponente ( $obLblObjeto ); diff --git a/gestaoPatrimonial/fontes/PHP/licitacao/instancias/processoLicitatorio/OCManterProcessoLicitatorio.php b/gestaoPatrimonial/fontes/PHP/licitacao/instancias/processoLicitatorio/OCManterProcessoLicitatorio.php index 3f4d0bf..094e69f 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 62334 2015-04-24 17:34:31Z michel $ + $Id: OCManterProcessoLicitatorio.php 62402 2015-05-04 20:19:28Z jean $ */ @@ -1235,6 +1235,114 @@ switch ($stCtrl) { $dtLicitacao = SistemaLegado::dataToBr(substr($rsLicitacao->getCampo("timestamp"),0,10)); $stJs .= "f.stDtLicitacao.value='".$dtLicitacao."';"; + + include_once(TLIC."TLicitacaoTipoChamadaPublica.class.php"); + $obLicitacaoTipoChamadaPublica = new TLicitacaoTipoChamadaPublica; + $obLicitacaoTipoChamadaPublica->setDado('cod_tipo',$rsLicitacao->getCampo("tipo_chamada_publica")); + $obLicitacaoTipoChamadaPublica->recuperaPorChave($rsTipoChamadaPublica); + + switch ($_REQUEST['inCodModalidade']) { + case 3: + case 6: + case 7: + $obRadioRegistroPrecosSim = new Radio; + $obRadioRegistroPrecosSim->setRotulo ('Registro de Preços'); + $obRadioRegistroPrecosSim->setLabel ('Sim'); + $obRadioRegistroPrecosSim->setName ('boRegistroModalidade'); + $obRadioRegistroPrecosSim->setId ('boRegistroModalidade'); + $obRadioRegistroPrecosSim->setTitle ('Informe se existe registros de preços.'); + $obRadioRegistroPrecosSim->setValue ('Sim'); + $obRadioRegistroPrecosSim->setNull (false); + $obRadioRegistroPrecosSim->setChecked (false); + + $obRadioRegistroPrecosNao = new Radio; + $obRadioRegistroPrecosNao->setLabel ('Não'); + $obRadioRegistroPrecosNao->setTitle ('Informe se existe registros de preços.'); + $obRadioRegistroPrecosNao->setName ('boRegistroModalidade'); + $obRadioRegistroPrecosNao->setId ('boRegistroModalidade'); + $obRadioRegistroPrecosNao->setValue (0); + $obRadioRegistroPrecosNao->setNull (false); + $obRadioRegistroPrecosNao->setChecked (true); + + if ($rsTipoChamadaPublica->getCampo('cod_tipo') != 0) { + $obRadioRegistroPrecosSim->setChecked (true); + $obRadioRegistroPrecosNao->setChecked (false); + } + + $obFormulario = new Formulario(); + $obFormulario->agrupaComponentes(array($obRadioRegistroPrecosSim,$obRadioRegistroPrecosNao)); + $obFormulario->montaInnerHTML(); + $stHTML = $obFormulario->getHTML(); + $stJs .= "d.getElementById('spnRegistroModalidade').innerHTML = '".$stHTML."';\n"; + break; + case 8: + case 9: + $obRadioChamadaPublicaSim = new Radio; + $obRadioChamadaPublicaSim->setRotulo ('Chamada Pública'); + $obRadioChamadaPublicaSim->setLabel ('Sim'); + $obRadioChamadaPublicaSim->setName ('boChamadaPublica'); + $obRadioChamadaPublicaSim->setId ('boChamadaPublica'); + $obRadioChamadaPublicaSim->setTitle ('Informe se existe chamada pública.'); + $obRadioChamadaPublicaSim->setValue ('Sim'); + $obRadioChamadaPublicaSim->setNull (false); + $obRadioChamadaPublicaSim->setChecked (false); + + $obRadioChamadaPublicaNao = new Radio; + $obRadioChamadaPublicaNao->setLabel ('Não'); + $obRadioChamadaPublicaNao->setTitle ('Informe se existe chamada pública.'); + $obRadioChamadaPublicaNao->setName ('boChamadaPublica'); + $obRadioChamadaPublicaNao->setId ('boChamadaPublica'); + $obRadioChamadaPublicaNao->setValue (0); + $obRadioChamadaPublicaNao->setNull (false); + $obRadioChamadaPublicaNao->setChecked (true); + + if ($rsTipoChamadaPublica->getCampo('cod_tipo') != 0) { + $obRadioChamadaPublicaSim->setChecked (true); + $obRadioChamadaPublicaNao->setChecked (false); + } + + $obFormulario = new Formulario(); + $obFormulario->agrupaComponentes(array($obRadioChamadaPublicaSim,$obRadioChamadaPublicaNao)); + $obFormulario->montaInnerHTML(); + $stHTML = $obFormulario->getHTML(); + $stJs .= "d.getElementById('spnRegistroModalidade').innerHTML = '".$stHTML."';\n"; + break; + case 10: + $obRadioChamadaPublicaDispensa = new Radio; + $obRadioChamadaPublicaDispensa->setRotulo ('Tipo de Chamada Pública'); + $obRadioChamadaPublicaDispensa->setLabel ('Dispensa por Chamada Pública'); + $obRadioChamadaPublicaDispensa->setName ('boRegistroModalidade'); + $obRadioChamadaPublicaDispensa->setId ('boRegistroModalidade'); + $obRadioChamadaPublicaDispensa->setTitle ('Informe se é por dispensa.'); + $obRadioChamadaPublicaDispensa->setValue (1); + $obRadioChamadaPublicaDispensa->setNull (false); + + $obRadioChamadaPublicaInexigibilidade = new Radio; + $obRadioChamadaPublicaInexigibilidade->setLabel ('Inexigibilidade por Chamada Pública'); + $obRadioChamadaPublicaInexigibilidade->setTitle ('Informe se é por inexigibilidade.'); + $obRadioChamadaPublicaInexigibilidade->setName ('boRegistroModalidade'); + $obRadioChamadaPublicaInexigibilidade->setId ('boRegistroModalidade'); + $obRadioChamadaPublicaInexigibilidade->setValue (2); + $obRadioChamadaPublicaInexigibilidade->setNull (false); + + if ($rsTipoChamadaPublica->getCampo('cod_tipo') != 0) { + if ($rsTipoChamadaPublica->getCampo('cod_tipo') == 1) { + $obRadioChamadaPublicaDispensa->setChecked(true); + } else { + $obRadioChamadaPublicaInexigibilidade->setChecked(true); + } + } + + $obFormulario = new Formulario(); + $obFormulario->agrupaComponentes(array($obRadioChamadaPublicaDispensa,$obRadioChamadaPublicaInexigibilidade)); + $obFormulario->montaInnerHTML(); + $stHTML = $obFormulario->getHTML(); + $stJs .= "d.getElementById('boRegistroModalidade').innerHTML = '".$stHTML."';\n"; + break; + default: + $stJs .= "d.getElementById('boRegistroModalidade').innerHTML = '';\n"; + break; + } } include_once(TLIC."TLicitacaoMembroAdicional.class.php"); @@ -1510,6 +1618,94 @@ case 'validaDtLicitacao': } break; + + case 'recuperaRegistroModalidade': + switch ($_REQUEST['inCodModalidade']) { + case 3: + case 6: + case 7: + $obRadioRegistroPrecosSim = new Radio; + $obRadioRegistroPrecosSim->setRotulo ('Registro de Preços'); + $obRadioRegistroPrecosSim->setLabel ('Sim'); + $obRadioRegistroPrecosSim->setName ('boRegistroModalidade'); + $obRadioRegistroPrecosSim->setId ('boRegistroModalidade'); + $obRadioRegistroPrecosSim->setTitle ('Informe se existe registros de preços.'); + $obRadioRegistroPrecosSim->setValue ('Sim'); + $obRadioRegistroPrecosSim->setNull (false); + $obRadioRegistroPrecosSim->setChecked (false); + + $obRadioRegistroPrecosNao = new Radio; + $obRadioRegistroPrecosNao->setLabel ('Não'); + $obRadioRegistroPrecosNao->setTitle ('Informe se existe registros de preços.'); + $obRadioRegistroPrecosNao->setName ('boRegistroModalidade'); + $obRadioRegistroPrecosNao->setId ('boRegistroModalidade'); + $obRadioRegistroPrecosNao->setValue (0); + $obRadioRegistroPrecosNao->setNull (false); + $obRadioRegistroPrecosNao->setChecked (true); + + $obFormulario = new Formulario(); + $obFormulario->agrupaComponentes(array($obRadioRegistroPrecosSim,$obRadioRegistroPrecosNao)); + $obFormulario->montaInnerHTML(); + $stHTML = $obFormulario->getHTML(); + $stJs .= "d.getElementById('spnRegistroModalidade').innerHTML = '".$stHTML."';\n"; + break; + case 8: + case 9: + $obRadioChamadaPublicaSim = new Radio; + $obRadioChamadaPublicaSim->setRotulo ('Chamada Pública'); + $obRadioChamadaPublicaSim->setLabel ('Sim'); + $obRadioChamadaPublicaSim->setName ('boRegistroModalidade'); + $obRadioChamadaPublicaSim->setId ('boRegistroModalidade'); + $obRadioChamadaPublicaSim->setTitle ('Informe se existe chamada pública.'); + $obRadioChamadaPublicaSim->setValue ('Sim'); + $obRadioChamadaPublicaSim->setNull (false); + $obRadioChamadaPublicaSim->setChecked (false); + + $obRadioChamadaPublicaNao = new Radio; + $obRadioChamadaPublicaNao->setLabel ('Não'); + $obRadioChamadaPublicaNao->setTitle ('Informe se existe chamada pública.'); + $obRadioChamadaPublicaNao->setName ('boRegistroModalidade'); + $obRadioChamadaPublicaNao->setId ('boRegistroModalidade'); + $obRadioChamadaPublicaNao->setValue (0); + $obRadioChamadaPublicaNao->setNull (false); + $obRadioChamadaPublicaNao->setChecked (true); + + $obFormulario = new Formulario(); + $obFormulario->agrupaComponentes(array($obRadioChamadaPublicaSim,$obRadioChamadaPublicaNao)); + $obFormulario->montaInnerHTML(); + $stHTML = $obFormulario->getHTML(); + $stJs .= "d.getElementById('spnRegistroModalidade').innerHTML = '".$stHTML."';\n"; + break; + case 10: + $obRadioChamadaPublicaDispensa = new Radio; + $obRadioChamadaPublicaDispensa->setRotulo ('Tipo de Chamada Pública'); + $obRadioChamadaPublicaDispensa->setLabel ('Dispensa por Chamada Pública'); + $obRadioChamadaPublicaDispensa->setName ('boRegistroModalidade'); + $obRadioChamadaPublicaDispensa->setId ('boRegistroModalidade'); + $obRadioChamadaPublicaDispensa->setTitle ('Informe se é por dispensa.'); + $obRadioChamadaPublicaDispensa->setValue (1); + $obRadioChamadaPublicaDispensa->setNull (false); + + $obRadioChamadaPublicaInexigibilidade = new Radio; + $obRadioChamadaPublicaInexigibilidade->setLabel ('Inexigibilidade por Chamada Pública'); + $obRadioChamadaPublicaInexigibilidade->setTitle ('Informe se é por inexigibilidade.'); + $obRadioChamadaPublicaInexigibilidade->setName ('boRegistroModalidade'); + $obRadioChamadaPublicaInexigibilidade->setId ('boRegistroModalidade'); + $obRadioChamadaPublicaInexigibilidade->setValue (2); + $obRadioChamadaPublicaInexigibilidade->setNull (false); + + $obFormulario = new Formulario(); + $obFormulario->agrupaComponentes(array($obRadioChamadaPublicaDispensa,$obRadioChamadaPublicaInexigibilidade)); + $obFormulario->montaInnerHTML(); + $stHTML = $obFormulario->getHTML(); + $stJs .= "d.getElementById('spnRegistroModalidade').innerHTML = '".$stHTML."';\n"; + break; + default: + $stJs .= "d.getElementById('spnRegistroModalidade').innerHTML = '';\n"; + break; + } + + break; case 'alterarMembroAdicional': $arMembro = Sessao::read('arMembro'); diff --git a/gestaoPatrimonial/fontes/PHP/licitacao/instancias/processoLicitatorio/PRManterProcessoLicitatorio.php b/gestaoPatrimonial/fontes/PHP/licitacao/instancias/processoLicitatorio/PRManterProcessoLicitatorio.php index 87eb37f..3e76b04 100644 --- a/gestaoPatrimonial/fontes/PHP/licitacao/instancias/processoLicitatorio/PRManterProcessoLicitatorio.php +++ b/gestaoPatrimonial/fontes/PHP/licitacao/instancias/processoLicitatorio/PRManterProcessoLicitatorio.php @@ -1,4 +1,4 @@ -setDado('cod_objeto' , $_REQUEST['stObjeto'] ); $obTLicitacaoLicitacao->setDado('cod_criterio' , $_REQUEST['inCodCriterio'] ); $obTLicitacaoLicitacao->setDado('cod_tipo_licitacao' , $_REQUEST['inCodTipoCotacao'] ); + + if ($_REQUEST['boRegistroModalidade'] == '' || (!isset($_REQUEST['boRegistroModalidade']))) { + $registroModalidade = 0; + } else { + $registroModalidade = $_REQUEST['boRegistroModalidade']; + } + + if (($_REQUEST['inCodModalidade'] == 3 || + $_REQUEST['inCodModalidade'] == 6 || + $_REQUEST['inCodModalidade'] == 7 + ) && $registroModalidade == 'Sim') { + $obTLicitacaoLicitacao->setDado('registro_precos' , 't' ); + } else { + $obTLicitacaoLicitacao->setDado('registro_precos' , 'f' ); + } + + if ($_REQUEST['inCodModalidade'] == 8 && $registroModalidade == 'Sim') { + $obTLicitacaoLicitacao->setDado('tipo_chamada_publica' , 1 ); + } elseif ($_REQUEST['inCodModalidade'] == 9 && $chamadaPublica == 'Sim') { + $obTLicitacaoLicitacao->setDado('tipo_chamada_publica' , 2 ); + } else { + $obTLicitacaoLicitacao->setDado('tipo_chamada_publica' , $chamadaPublica ); + } + $obTLicitacaoLicitacao->setDado('cod_mapa' , $arMapa[0] ); $obTLicitacaoLicitacao->setDado('exercicio_mapa' , "".$arMapa[1]."" ); $obTLicitacaoLicitacao->setDado('cod_processo' , $arProcesso[0] ); @@ -475,6 +499,30 @@ switch ($stAcao) { $obTLicitacaoLicitacao->setDado('num_orgao' , $arStUnidadeOrcamentaria[0]); $obTLicitacaoLicitacao->setDado('num_unidade', $arStUnidadeOrcamentaria[1]); $obTLicitacaoLicitacao->setDado('cod_regime',$_REQUEST['inCodRegime'] != '' ? $_REQUEST['inCodRegime'] : 'null'); + + if ($_REQUEST['boRegistroModalidade'] == '' || (!isset($_REQUEST['boRegistroModalidade']))) { + $registroModalidade = 0; + } else { + $registroModalidade = $_REQUEST['boRegistroModalidade']; + } + + if (($_REQUEST['inCodModalidade'] == 3 || + $_REQUEST['inCodModalidade'] == 6 || + $_REQUEST['inCodModalidade'] == 7 + ) && $registroModalidade == 'Sim') { + $obTLicitacaoLicitacao->setDado('registro_precos' , 't' ); + } else { + $obTLicitacaoLicitacao->setDado('registro_precos' , 'f' ); + } + + if ($_REQUEST['inCodModalidade'] == 8 && $registroModalidade == 'Sim') { + $obTLicitacaoLicitacao->setDado('tipo_chamada_publica' , 1 ); + } elseif ($_REQUEST['inCodModalidade'] == 9 && $chamadaPublica == 'Sim') { + $obTLicitacaoLicitacao->setDado('tipo_chamada_publica' , 2 ); + } else { + $obTLicitacaoLicitacao->setDado('tipo_chamada_publica' , $chamadaPublica ); + } + $obTLicitacaoLicitacao->alteracao(); $obTMapaModalidade = new TComprasMapaModalidade(); diff --git a/gestaoPrestacaoContas/fontes/PHP/TCEMG/classes/mapeamento/TTCEMGRelatorioRazaoDespesa.class.php b/gestaoPrestacaoContas/fontes/PHP/TCEMG/classes/mapeamento/TTCEMGRelatorioRazaoDespesa.class.php index 2b60fdf..29cf6e7 100644 --- a/gestaoPrestacaoContas/fontes/PHP/TCEMG/classes/mapeamento/TTCEMGRelatorioRazaoDespesa.class.php +++ b/gestaoPrestacaoContas/fontes/PHP/TCEMG/classes/mapeamento/TTCEMGRelatorioRazaoDespesa.class.php @@ -33,7 +33,7 @@ * @package URBEM * @subpackage Mapeamento * - * $Id: TTCEMGRelatorioRazaoDespesa.class.php 62317 2015-04-22 16:28:06Z michel $ + * $Id: TTCEMGRelatorioRazaoDespesa.class.php 62411 2015-05-05 19:01:22Z lisiane $ * * $Name: $ * $Date: $ @@ -73,353 +73,42 @@ class TTCEMGRelatorioRazaoDespesa extends Persistente } public function montaRecuperaDadosConsultaPrincipal() { - $stSql = "CREATE TEMPORARY TABLE tmp_liquidado_razaodespesa AS ( - SELECT nota_liquidacao.cod_entidade, - nota_liquidacao.cod_empenho, - nota_liquidacao.exercicio_empenho, - SUM(nota_liquidacao_item.vl_total) - SUM(coalesce(nota_liquidacao_item_anulado.vl_anulado, 0.00)) AS vl_total - - FROM empenho.nota_liquidacao - - 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 empenho.nota_liquidacao_item_anulado - ON nota_liquidacao_item_anulado.exercicio = nota_liquidacao_item.exercicio - AND nota_liquidacao_item_anulado.cod_nota = nota_liquidacao_item.cod_nota - AND nota_liquidacao_item_anulado.cod_entidade = nota_liquidacao_item.cod_entidade - AND nota_liquidacao_item_anulado.num_item = nota_liquidacao_item.num_item - AND nota_liquidacao_item_anulado.cod_pre_empenho = nota_liquidacao_item.cod_pre_empenho - AND nota_liquidacao_item_anulado.exercicio_item = nota_liquidacao_item.exercicio_item - - WHERE nota_liquidacao_item.exercicio_item = '".$this->getDado('exercicio')."' - AND to_date( to_char(nota_liquidacao.dt_liquidacao, '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') - - GROUP BY nota_liquidacao.cod_entidade, - nota_liquidacao.cod_empenho, - nota_liquidacao.exercicio_empenho - ); - - SELECT entidade, - empenho, - exercicio, - cgm, - cgm||' - '||nom_cgm AS credor, - dt_empenho, - valor, - valor_liquidado, - valor_pago, - descricao, - cod_recurso, - recurso, - cod_estrutural||' - '||descricao_despesa AS despesa, - dotacao, - dt_pagamento, - num_banco||' / '||num_agencia||' / '||num_conta_corrente AS banco, - cod_recurso_banco, - num_documento - - FROM ( - SELECT empenho.cod_entidade AS entidade, - empenho.cod_empenho AS empenho, - empenho.exercicio AS exercicio, - pre_empenho.cgm_beneficiario AS cgm, - sw_cgm.nom_cgm, - cast( pre_empenho.descricao AS varchar ) AS descricao, - sw_cgm.nom_cgm AS nome_conta, - to_char(empenho.dt_empenho,'dd/mm/yyyy') AS dt_empenho, - - sum(coalesce(empenho.vl_total, 0.00)) - sum(coalesce(empenho.vl_anulado, 0.00)) AS valor, - coalesce(pago.vl_total, 0.00) - coalesce(pago.vl_anulado, 0.00) AS valor_pago, - - ( SELECT vl_total - FROM tmp_liquidado_razaodespesa tlr - WHERE tlr.cod_entidade = empenho.cod_entidade - AND tlr.exercicio_empenho = empenho.exercicio - AND tlr.cod_empenho = empenho.cod_empenho) AS valor_liquidado, - - ped_d_cd.cod_recurso, - ped_d_cd.nom_recurso AS recurso, - ped_d_cd.cod_estrutural AS cod_estrutural, - ped_d_cd.descricao AS descricao_despesa, - ped_d_cd.dotacao, - to_char(pago.timestamp,'dd/mm/yyyy') AS dt_pagamento, - banco.num_banco, - agencia.num_agencia, - conta_corrente.num_conta_corrente, - plano_recurso.cod_recurso AS cod_recurso_banco, - pago.num_documento - FROM - ( - SELECT - empenho.cod_entidade - , empenho.cod_empenho - , empenho.exercicio - , empenho.dt_empenho - , empenho.cod_categoria - , item_pre_empenho.vl_total - , item_pre_empenho.cod_pre_empenho - , item_pre_empenho.num_item - , sum(empenho_anulado_item.vl_anulado) AS vl_anulado - - FROM empenho.empenho - - INNER JOIN empenho.item_pre_empenho - ON empenho.exercicio = item_pre_empenho.exercicio - AND empenho.cod_pre_empenho = item_pre_empenho.cod_pre_empenho - - LEFT JOIN empenho.empenho_anulado - ON empenho_anulado.exercicio = empenho.exercicio - AND empenho_anulado.cod_entidade = empenho.cod_entidade - AND empenho_anulado.cod_empenho = empenho.cod_empenho - AND to_date( to_char(empenho_anulado.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') - - LEFT JOIN empenho.empenho_anulado_item - ON empenho_anulado_item.exercicio = empenho_anulado.exercicio - AND empenho_anulado_item.cod_entidade = empenho_anulado.cod_entidade - AND empenho_anulado_item.cod_empenho = empenho_anulado.cod_empenho - AND empenho_anulado_item.timestamp = empenho_anulado.timestamp - AND empenho_anulado_item.exercicio = 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 - - WHERE to_date(to_char(empenho.dt_empenho, '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') - - GROUP BY empenho.cod_entidade - , empenho.cod_empenho - , empenho.exercicio - , empenho.dt_empenho - , empenho.cod_categoria - , item_pre_empenho.vl_total - , item_pre_empenho.cod_pre_empenho - , item_pre_empenho.num_item - ) AS 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.historico - ON historico.cod_historico = pre_empenho.cod_historico - AND historico.exercicio = pre_empenho.exercicio - - INNER JOIN sw_cgm - ON sw_cgm.numcgm = pre_empenho.cgm_beneficiario - - LEFT JOIN ( SELECT nota_liquidacao.cod_entidade, - nota_liquidacao.cod_empenho, - nota_liquidacao.exercicio, - nota_liquidacao.exercicio_empenho, - nota_liquidacao_paga.timestamp, - nota_liquidacao_conta_pagadora.cod_plano, - pagamento_tipo_documento.num_documento, - sum(nota_liquidacao_paga.vl_pago) as vl_total, - sum(nota_liquidacao_paga_anulada.vl_anulado) as vl_anulado - - FROM empenho.nota_liquidacao - - INNER JOIN empenho.nota_liquidacao_paga - ON nota_liquidacao_paga.exercicio = nota_liquidacao.exercicio - AND nota_liquidacao_paga.cod_entidade = nota_liquidacao.cod_entidade - AND nota_liquidacao_paga.cod_nota = nota_liquidacao.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_entidade = nota_liquidacao_paga.cod_entidade - AND nota_liquidacao_paga_anulada.cod_nota = nota_liquidacao_paga.cod_nota - AND nota_liquidacao_paga_anulada.timestamp = nota_liquidacao_paga.timestamp - - INNER JOIN empenho.pagamento_liquidacao_nota_liquidacao_paga - ON pagamento_liquidacao_nota_liquidacao_paga.cod_entidade = nota_liquidacao_paga.cod_entidade - AND pagamento_liquidacao_nota_liquidacao_paga.cod_nota = nota_liquidacao_paga.cod_nota - AND pagamento_liquidacao_nota_liquidacao_paga.exercicio_liquidacao = nota_liquidacao_paga.exercicio - AND pagamento_liquidacao_nota_liquidacao_paga.timestamp = nota_liquidacao_paga.timestamp - - 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 - - LEFT JOIN tcemg.pagamento_tipo_documento - ON pagamento_tipo_documento.exercicio = nota_liquidacao_paga.exercicio - AND pagamento_tipo_documento.cod_nota = nota_liquidacao_paga.cod_nota - AND pagamento_tipo_documento.cod_entidade = nota_liquidacao_paga.cod_entidade - AND pagamento_tipo_documento.timestamp = nota_liquidacao_paga.timestamp - - WHERE 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') - - GROUP BY nota_liquidacao.cod_entidade, - nota_liquidacao.cod_empenho, - nota_liquidacao.exercicio, - nota_liquidacao.exercicio_empenho, - nota_liquidacao_paga.timestamp, - pagamento_tipo_documento.num_documento, - nota_liquidacao_conta_pagadora.cod_plano - ) AS pago - - ON pago.exercicio_empenho = empenho.exercicio - AND pago.cod_entidade = empenho.cod_entidade - AND pago.cod_empenho = empenho.cod_empenho - - LEFT JOIN contabilidade.plano_analitica - ON plano_analitica.exercicio = pago.exercicio - AND plano_analitica.cod_plano = pago.cod_plano - - LEFT JOIN contabilidade.plano_recurso - ON plano_recurso.exercicio = plano_analitica.exercicio - AND plano_recurso.cod_plano = plano_analitica.cod_plano - - LEFT JOIN contabilidade.plano_banco - ON plano_banco.exercicio = plano_analitica.exercicio - AND plano_banco.cod_plano = plano_analitica.cod_plano - - 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.agencia - ON agencia.cod_banco = conta_corrente.cod_banco - AND agencia.cod_agencia = conta_corrente.cod_agencia - - LEFT JOIN monetario.banco - ON banco.cod_banco = conta_corrente.cod_banco - - LEFT JOIN ( - SELECT - pre_empenho_despesa.exercicio, - pre_empenho_despesa.cod_pre_empenho, - despesa.num_orgao, - despesa.num_unidade, - despesa.cod_funcao, - despesa.cod_subfuncao, - programa.num_programa, - despesa.num_pao, - LPAD(despesa.num_orgao::VARCHAR, 2, '0')||'.'||LPAD(despesa.num_unidade::VARCHAR, 2, '0')||'.'||despesa.cod_funcao||'.'||despesa.cod_subfuncao||'.'||programa.num_programa||'.'||LPAD(despesa.num_pao::VARCHAR, 4, '0')||'.'||REPLACE(conta_despesa.cod_estrutural, '.', '') AS dotacao, - despesa.cod_recurso, - despesa.cod_despesa, - recurso.nom_recurso, - despesa.cod_conta, - conta_despesa.cod_estrutural, - conta_despesa.descricao, - recurso.masc_recurso_red, - recurso.cod_detalhamento, - ppa.acao.num_acao - - FROM empenho.pre_empenho_despesa - - INNER JOIN orcamento.despesa - ON pre_empenho_despesa.cod_despesa = despesa.cod_despesa - AND pre_empenho_despesa.exercicio = despesa.exercicio - - INNER JOIN orcamento.recurso('".$this->getDado('exercicio')."') AS recurso - ON recurso.cod_recurso = despesa.cod_recurso - AND recurso.exercicio = despesa.exercicio - - INNER JOIN orcamento.programa_ppa_programa - ON programa_ppa_programa.cod_programa = despesa.cod_programa - AND programa_ppa_programa.exercicio = despesa.exercicio - - INNER JOIN ppa.programa - ON ppa.programa.cod_programa = programa_ppa_programa.cod_programa_ppa - - INNER JOIN orcamento.pao_ppa_acao - ON pao_ppa_acao.num_pao = despesa.num_pao - AND pao_ppa_acao.exercicio = despesa.exercicio - - INNER JOIN ppa.acao - ON ppa.acao.cod_acao = pao_ppa_acao.cod_acao - - INNER JOIN orcamento.conta_despesa - ON pre_empenho_despesa.cod_conta = conta_despesa.cod_conta - AND pre_empenho_despesa.exercicio = conta_despesa.exercicio - - WHERE pre_empenho_despesa.exercicio = '".$this->getDado('exercicio')."' - ) AS ped_d_cd - - ON pre_empenho.exercicio = ped_d_cd.exercicio - AND pre_empenho.cod_pre_empenho = ped_d_cd.cod_pre_empenho - - WHERE empenho.exercicio = '".$this->getDado('exercicio')."' - AND empenho.cod_entidade IN (".$this->getDado('entidade').") "; - - - switch($this->getDado('tipo_relatorio')) { - case 'fundeb_60': - $stSql .= " AND ped_d_cd.cod_recurso = 118"; - break; - - case 'fundeb_40': - $stSql .= " AND ped_d_cd.cod_recurso = 119"; - break; - - case 'ensino_fundamental': - $stSql .= " AND ped_d_cd.cod_subfuncao = 361"; - break; - - case 'gasto_25': - $stSql .= " AND ped_d_cd.cod_recurso = 101"; - break; - - case 'saude': - $stSql .= " AND ped_d_cd.cod_recurso = 102"; - break; - - case 'diversos': - $stSql .= " AND ped_d_cd.cod_recurso = 100"; - break; - //falta educacao_extra_orcamentario e restos_pagar - } - - if($this->getDado('num_orgao') != '') { - $stSql .= " AND ped_d_cd.num_orgao = ".$this->getDado('num_orgao'); - } - - if($this->getDado('num_unidade') != '') { - $stSql .= " AND ped_d_cd.num_unidade = ".$this->getDado('num_unidade'); - } - - if($this->getDado('num_pao') != '') { - $stSql .= " AND ped_d_cd.num_pao = ".$this->getDado('num_pao'); - } - - $stSql.= " GROUP BY empenho.dt_empenho, - empenho.cod_pre_empenho, - empenho.cod_entidade, - empenho.cod_empenho, - empenho.exercicio, - pre_empenho.cgm_beneficiario, - sw_cgm.nom_cgm, - pre_empenho.descricao, - ped_d_cd.cod_estrutural, - ped_d_cd.cod_recurso, - ped_d_cd.nom_recurso, - ped_d_cd.descricao, - ped_d_cd.dotacao, - pago.vl_total, - pago.vl_anulado, - pago.timestamp, - banco.num_banco, - agencia.num_agencia, - conta_corrente.num_conta_corrente, - plano_recurso.cod_recurso, - pago.num_documento - ) AS tbl - - WHERE valor <> '0.00' - - ORDER BY cod_estrutural, - empenho, - dt_empenho, - dt_pagamento ; - "; - - //SistemaLegado::mostravar($stSql); - //die; - + $stSql = " SELECT DISTINCT * + FROM tcemg.razao_despesa('".$this->getDado('exercicio')."', + '".$this->getDado('dt_inicial')."', + '".$this->getDado('dt_final')."', + '".$this->getDado('entidade')."', + '".$this->getDado('num_orgao')."', + '".$this->getDado('num_unidade')."', + '".$this->getDado('num_pao')."', + '".$this->getDado('cod_recurso')."', + 'data' + ) as retorno( entidade integer, + empenho integer, + exercicio char(4), + cgm integer, + credor text, + dt_empenho text, + valor numeric, + valor_pago numeric, + valor_liquidado numeric, + descricao varchar, + cod_recurso integer, + recurso varchar, + despesa text, + dotacao text, + dt_pagamento text, + banco varchar, + cod_recurso_banco integer, + num_documento varchar, + cod_nota integer, + vl_total_pago numeric, + vl_total_pago_anulado numeric, + vl_total_empenhado numeric, + vl_total_empenhado_anulado numeric, + vl_total_liquidado numeric, + vl_total_liquidado_anulado numeric + ) "; return $stSql; } public function recuperaDadosConsultaEmpenhoLiquidadoPago(&$rsRecordSet, $stCondicao = "" , $stOrdem = "" , $boTransacao = "") diff --git a/gestaoPrestacaoContas/fontes/PHP/TCEMG/instancias/relatorios/FLRelatorioRazaoDespesa.php b/gestaoPrestacaoContas/fontes/PHP/TCEMG/instancias/relatorios/FLRelatorioRazaoDespesa.php index c7f7e4e..4ab9223 100644 --- a/gestaoPrestacaoContas/fontes/PHP/TCEMG/instancias/relatorios/FLRelatorioRazaoDespesa.php +++ b/gestaoPrestacaoContas/fontes/PHP/TCEMG/instancias/relatorios/FLRelatorioRazaoDespesa.php @@ -28,7 +28,7 @@ * Data de Criação : 06/08/2004 * @author Desenvolvedor: Cassiano de Vasconcellos Ferreira * @ignore - * $Id: FLRelatorioRazaoDespesa.php 62308 2015-04-20 19:41:57Z evandro $ + * $Id: FLRelatorioRazaoDespesa.php 62411 2015-05-05 19:01:22Z lisiane $ * Casos de uso: uc-02.01.22 */ @@ -242,7 +242,6 @@ $obCmbRecursos->setCampoId2 ('cod_recurso'); $obCmbRecursos->setCampoDesc2 ('[cod_recurso] - [nom_recurso]'); $obCmbRecursos->SetRecord2 ( $rsRecordsetRecursos ); - //Define objeto span para componentes de filtro $obSpan = new Span; $obSpan->setId( "spnFormularioFiltro" ); @@ -251,25 +250,14 @@ $obFormularioFiltro = new Formulario; $obFormularioFiltro->addComponenteComposto($obTxtOrgao , $obCmbOrgao ); $obFormularioFiltro->addComponenteComposto($obTxtUnidade, $obCmbUnidade); $obFormularioFiltro->addComponenteComposto($obTxtPao , $obCmbPao ); + $obFormularioFiltro->montaInnerHTML(); $stHtml = $obFormularioFiltro->getHTML(); -$obFormularioFiltroRecurso = new Formulario; -$obFormularioFiltroRecurso->addComponente($obCmbRecursos); -$obFormularioFiltroRecurso->montaInnerHTML(); -$stHtmlRecurso = $obFormularioFiltroRecurso->getHTML(); - $jsOnLoad = " function salvar() { selecionaTodosSelect(document.frm.inCodEntidade); - - if( jQuery('#stTipoRelatorio').val() == 'educacao_despesa_extra_orcamentaria' - || jQuery('#stTipoRelatorio').val() == 'educacao_receita_extra_orcamentaria' - || jQuery('#stTipoRelatorio').val() == 'restos_pagar' ){ - - selecionaTodosSelect(document.frm.inCodRecurso); - } - + selecionaTodosSelect(document.frm.inCodRecurso); document.frm.submit(); } @@ -300,14 +288,15 @@ $jsOnLoad = " "; $obFormulario = new Formulario; -$obFormulario->setAjuda ('UC-02.01.22'); -$obFormulario->addForm ($obForm); -$obFormulario->addHidden ($obHdnCaminho); +$obFormulario->setAjuda ('UC-02.01.22' ); +$obFormulario->addForm ($obForm ); +$obFormulario->addHidden ($obHdnCaminho ); $obFormulario->addTitulo ("Dados para Filtro"); -$obFormulario->addComponente($obCmbEntidades); -$obFormulario->addComponente($obPeriodicidade); +$obFormulario->addComponente($obCmbEntidades ); +$obFormulario->addComponente($obPeriodicidade ); $obFormulario->addComponente($obCmbTipoRelatorio); -$obFormulario->addSpan($obSpan); +$obFormulario->addSpan ($obSpan ); +$obFormulario->addComponente($obCmbRecursos ); // BOTÕES DE AÇÃO DO FORMULÁRIO (OK/LIMPAR) $obBtnOk = new Ok(); diff --git a/gestaoPrestacaoContas/fontes/PHP/TCMGO/classes/mapeamento/TTGODSI.class.php b/gestaoPrestacaoContas/fontes/PHP/TCMGO/classes/mapeamento/TTGODSI.class.php index 324513f..89fe04d 100644 --- a/gestaoPrestacaoContas/fontes/PHP/TCMGO/classes/mapeamento/TTGODSI.class.php +++ b/gestaoPrestacaoContas/fontes/PHP/TCMGO/classes/mapeamento/TTGODSI.class.php @@ -47,8 +47,10 @@ class TTGODSI extends Persistente , licitacao.num_unidade AS cod_unidade , sw_processo.cod_processo AS num_processo , sw_processo.ano_exercicio AS ano_exercicio_processo - , CASE WHEN modalidade.cod_modalidade = 8 THEN 1 - WHEN modalidade.cod_modalidade = 9 THEN 2 + , CASE WHEN modalidade.cod_modalidade = 8 AND licitacao.tipo_chamada_publica = 0 THEN 1 + WHEN modalidade.cod_modalidade = 9 AND licitacao.tipo_chamada_publica = 0 THEN 2 + WHEN (modalidade.cod_modalidade = 9 OR modalidade.cod_modalidade = 10) AND licitacao.tipo_chamada_publica = 2 THEN 3 + WHEN (modalidade.cod_modalidade = 9 OR modalidade.cod_modalidade = 10) AND licitacao.tipo_chamada_publica = 1 THEN 4 END AS tipo_processo , TO_CHAR(licitacao.timestamp,'dd/mm/yyyy') AS dt_abertura , CASE WHEN tipo_objeto.cod_tipo_objeto = 1 THEN 2 @@ -166,9 +168,11 @@ class TTGODSI extends Persistente , licitacao.num_unidade AS cod_unidade , sw_processo.cod_processo AS num_processo , sw_processo.ano_exercicio AS ano_exercicio_processo - , CASE WHEN modalidade.cod_modalidade = 8 THEN 1 - WHEN modalidade.cod_modalidade = 9 THEN 2 - END AS tipo_processo + , CASE WHEN modalidade.cod_modalidade = 8 AND licitacao.tipo_chamada_publica = 0 THEN 1 + WHEN modalidade.cod_modalidade = 9 AND licitacao.tipo_chamada_publica = 0 THEN 2 + WHEN (modalidade.cod_modalidade = 9 OR modalidade.cod_modalidade = 10) AND licitacao.tipo_chamada_publica = 2 THEN 3 + WHEN (modalidade.cod_modalidade = 9 OR modalidade.cod_modalidade = 10) AND licitacao.tipo_chamada_publica = 1 THEN 4 + END AS tipo_processo , 1 AS tipo_resp , responsavel_dispensa.cpf AS num_cpf_responsavel , responsavel_dispensa.nom_cgm AS nome_responsavel @@ -268,9 +272,11 @@ class TTGODSI extends Persistente , licitacao.num_unidade AS cod_unidade , sw_processo.cod_processo AS num_processo , sw_processo.ano_exercicio AS ano_exercicio_processo - , CASE WHEN modalidade.cod_modalidade = 8 THEN 1 - WHEN modalidade.cod_modalidade = 9 THEN 2 - END AS tipo_processo + , CASE WHEN modalidade.cod_modalidade = 8 AND licitacao.tipo_chamada_publica = 0 THEN 1 + WHEN modalidade.cod_modalidade = 9 AND licitacao.tipo_chamada_publica = 0 THEN 2 + WHEN (modalidade.cod_modalidade = 9 OR modalidade.cod_modalidade = 10) AND licitacao.tipo_chamada_publica = 2 THEN 3 + WHEN (modalidade.cod_modalidade = 9 OR modalidade.cod_modalidade = 10) AND licitacao.tipo_chamada_publica = 1 THEN 4 + END AS tipo_processo , 2 AS tipo_resp , responsavel_dispensa.cpf AS num_cpf_responsavel , responsavel_dispensa.nom_cgm AS nome_responsavel @@ -370,9 +376,11 @@ class TTGODSI extends Persistente , licitacao.num_unidade AS cod_unidade , sw_processo.cod_processo AS num_processo , sw_processo.ano_exercicio AS ano_exercicio_processo - , CASE WHEN modalidade.cod_modalidade = 8 THEN 1 - WHEN modalidade.cod_modalidade = 9 THEN 2 - END AS tipo_processo + , CASE WHEN modalidade.cod_modalidade = 8 AND licitacao.tipo_chamada_publica = 0 THEN 1 + WHEN modalidade.cod_modalidade = 9 AND licitacao.tipo_chamada_publica = 0 THEN 2 + WHEN (modalidade.cod_modalidade = 9 OR modalidade.cod_modalidade = 10) AND licitacao.tipo_chamada_publica = 2 THEN 3 + WHEN (modalidade.cod_modalidade = 9 OR modalidade.cod_modalidade = 10) AND licitacao.tipo_chamada_publica = 1 THEN 4 + END AS tipo_processo , 3 AS tipo_resp , responsavel_dispensa.cpf AS num_cpf_responsavel , responsavel_dispensa.nom_cgm AS nome_responsavel @@ -472,9 +480,11 @@ class TTGODSI extends Persistente , licitacao.num_unidade AS cod_unidade , sw_processo.cod_processo AS num_processo , sw_processo.ano_exercicio AS ano_exercicio_processo - , CASE WHEN modalidade.cod_modalidade = 8 THEN 1 - WHEN modalidade.cod_modalidade = 9 THEN 2 - END AS tipo_processo + , CASE WHEN modalidade.cod_modalidade = 8 AND licitacao.tipo_chamada_publica = 0 THEN 1 + WHEN modalidade.cod_modalidade = 9 AND licitacao.tipo_chamada_publica = 0 THEN 2 + WHEN (modalidade.cod_modalidade = 9 OR modalidade.cod_modalidade = 10) AND licitacao.tipo_chamada_publica = 2 THEN 3 + WHEN (modalidade.cod_modalidade = 9 OR modalidade.cod_modalidade = 10) AND licitacao.tipo_chamada_publica = 1 THEN 4 + END AS tipo_processo , 4 AS tipo_resp , responsavel_dispensa.cpf AS num_cpf_responsavel , responsavel_dispensa.nom_cgm AS nome_responsavel @@ -574,9 +584,11 @@ class TTGODSI extends Persistente , licitacao.num_unidade AS cod_unidade , sw_processo.cod_processo AS num_processo , sw_processo.ano_exercicio AS ano_exercicio_processo - , CASE WHEN modalidade.cod_modalidade = 8 THEN 1 - WHEN modalidade.cod_modalidade = 9 THEN 2 - END AS tipo_processo + , CASE WHEN modalidade.cod_modalidade = 8 AND licitacao.tipo_chamada_publica = 0 THEN 1 + WHEN modalidade.cod_modalidade = 9 AND licitacao.tipo_chamada_publica = 0 THEN 2 + WHEN (modalidade.cod_modalidade = 9 OR modalidade.cod_modalidade = 10) AND licitacao.tipo_chamada_publica = 2 THEN 3 + WHEN (modalidade.cod_modalidade = 9 OR modalidade.cod_modalidade = 10) AND licitacao.tipo_chamada_publica = 1 THEN 4 + END AS tipo_processo , 5 AS tipo_resp , responsavel_dispensa.cpf AS num_cpf_responsavel , responsavel_dispensa.nom_cgm AS nome_responsavel @@ -676,9 +688,11 @@ class TTGODSI extends Persistente , licitacao.num_unidade AS cod_unidade , sw_processo.cod_processo AS num_processo , sw_processo.ano_exercicio AS ano_exercicio_processo - , CASE WHEN modalidade.cod_modalidade = 8 THEN 1 - WHEN modalidade.cod_modalidade = 9 THEN 2 - END AS tipo_processo + , CASE WHEN modalidade.cod_modalidade = 8 AND licitacao.tipo_chamada_publica = 0 THEN 1 + WHEN modalidade.cod_modalidade = 9 AND licitacao.tipo_chamada_publica = 0 THEN 2 + WHEN (modalidade.cod_modalidade = 9 OR modalidade.cod_modalidade = 10) AND licitacao.tipo_chamada_publica = 2 THEN 3 + WHEN (modalidade.cod_modalidade = 9 OR modalidade.cod_modalidade = 10) AND licitacao.tipo_chamada_publica = 1 THEN 4 + END AS tipo_processo , 6 AS tipo_resp , responsavel_dispensa.cpf AS num_cpf_responsavel , responsavel_dispensa.nom_cgm AS nome_responsavel @@ -778,9 +792,11 @@ class TTGODSI extends Persistente , licitacao.num_unidade AS cod_unidade , sw_processo.cod_processo AS num_processo , sw_processo.ano_exercicio AS ano_exercicio_processo - , CASE WHEN modalidade.cod_modalidade = 8 THEN 1 - WHEN modalidade.cod_modalidade = 9 THEN 2 - END AS tipo_processo + , CASE WHEN modalidade.cod_modalidade = 8 AND licitacao.tipo_chamada_publica = 0 THEN 1 + WHEN modalidade.cod_modalidade = 9 AND licitacao.tipo_chamada_publica = 0 THEN 2 + WHEN (modalidade.cod_modalidade = 9 OR modalidade.cod_modalidade = 10) AND licitacao.tipo_chamada_publica = 2 THEN 3 + WHEN (modalidade.cod_modalidade = 9 OR modalidade.cod_modalidade = 10) AND licitacao.tipo_chamada_publica = 1 THEN 4 + END AS tipo_processo , 7 AS tipo_resp , responsavel_dispensa.cpf AS num_cpf_responsavel , responsavel_dispensa.nom_cgm AS nome_responsavel @@ -891,8 +907,10 @@ class TTGODSI extends Persistente , licitacao.num_unidade AS cod_unidade , sw_processo.cod_processo AS num_processo , sw_processo.ano_exercicio AS ano_exercicio_processo - , CASE WHEN modalidade.cod_modalidade = 8 THEN 1 - WHEN modalidade.cod_modalidade = 9 THEN 2 + , CASE WHEN modalidade.cod_modalidade = 8 AND licitacao.tipo_chamada_publica = 0 THEN 1 + WHEN modalidade.cod_modalidade = 9 AND licitacao.tipo_chamada_publica = 0 THEN 2 + WHEN (modalidade.cod_modalidade = 9 OR modalidade.cod_modalidade = 10) AND licitacao.tipo_chamada_publica = 2 THEN 3 + WHEN (modalidade.cod_modalidade = 9 OR modalidade.cod_modalidade = 10) AND licitacao.tipo_chamada_publica = 1 THEN 4 END AS tipo_processo , mapa_item.lote AS num_lote , mapa_item.cod_item AS num_item @@ -991,9 +1009,11 @@ class TTGODSI extends Persistente , licitacao.num_unidade AS cod_unidade , sw_processo.cod_processo AS num_processo , sw_processo.ano_exercicio AS ano_exercicio_processo - , CASE WHEN modalidade.cod_modalidade = 8 THEN 1 - WHEN modalidade.cod_modalidade = 9 THEN 2 - END AS tipo_processo + , CASE WHEN modalidade.cod_modalidade = 8 AND licitacao.tipo_chamada_publica = 0 THEN 1 + WHEN modalidade.cod_modalidade = 9 AND licitacao.tipo_chamada_publica = 0 THEN 2 + WHEN (modalidade.cod_modalidade = 9 OR modalidade.cod_modalidade = 10) AND licitacao.tipo_chamada_publica = 2 THEN 3 + WHEN (modalidade.cod_modalidade = 9 OR modalidade.cod_modalidade = 10) AND licitacao.tipo_chamada_publica = 1 THEN 4 + END AS tipo_processo , despesa.cod_funcao AS cod_funcao , despesa.cod_subfuncao AS cod_subfuncao , despesa.cod_programa AS cod_programa @@ -1125,9 +1145,11 @@ class TTGODSI extends Persistente , licitacao.num_unidade AS cod_unidade , sw_processo.cod_processo AS num_processo , sw_processo.ano_exercicio AS ano_exercicio_processo - , CASE WHEN modalidade.cod_modalidade = 8 THEN 1 - WHEN modalidade.cod_modalidade = 9 THEN 2 - END AS tipo_processo + , CASE WHEN modalidade.cod_modalidade = 8 AND licitacao.tipo_chamada_publica = 0 THEN 1 + WHEN modalidade.cod_modalidade = 9 AND licitacao.tipo_chamada_publica = 0 THEN 2 + WHEN (modalidade.cod_modalidade = 9 OR modalidade.cod_modalidade = 10) AND licitacao.tipo_chamada_publica = 2 THEN 3 + WHEN (modalidade.cod_modalidade = 9 OR modalidade.cod_modalidade = 10) AND licitacao.tipo_chamada_publica = 1 THEN 4 + END AS tipo_processo , documento_pessoa.tipo_documento AS tipo_documento , documento_pessoa.num_documento AS num_documento , mapa_item.lote AS num_lote @@ -1282,9 +1304,11 @@ class TTGODSI extends Persistente , licitacao.num_unidade AS cod_unidade , sw_processo.cod_processo AS num_processo , sw_processo.ano_exercicio AS ano_exercicio_processo - , CASE WHEN modalidade.cod_modalidade = 8 THEN 1 - WHEN modalidade.cod_modalidade = 9 THEN 2 - END AS tipo_processo + , CASE WHEN modalidade.cod_modalidade = 8 AND licitacao.tipo_chamada_publica = 0 THEN 1 + WHEN modalidade.cod_modalidade = 9 AND licitacao.tipo_chamada_publica = 0 THEN 2 + WHEN (modalidade.cod_modalidade = 9 OR modalidade.cod_modalidade = 10) AND licitacao.tipo_chamada_publica = 2 THEN 3 + WHEN (modalidade.cod_modalidade = 9 OR modalidade.cod_modalidade = 10) AND licitacao.tipo_chamada_publica = 1 THEN 4 + 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 diff --git a/gestaoPrestacaoContas/fontes/PLPGSQL/TCEMG/receitaPrev.plsql b/gestaoPrestacaoContas/fontes/PLPGSQL/TCEMG/receitaPrev.plsql index 9c7f13d..aa7ba6d 100644 --- a/gestaoPrestacaoContas/fontes/PLPGSQL/TCEMG/receitaPrev.plsql +++ b/gestaoPrestacaoContas/fontes/PLPGSQL/TCEMG/receitaPrev.plsql @@ -53,26 +53,25 @@ BEGIN stSql :='CREATE TEMPORARY TABLE tmp_balancete_receita AS ( - SELECT - cod_estrutural - ,ABS(valor_previsto) as valor_previsto - ,ABS(arrecadado_periodo) as arrecadado_periodo + SELECT cod_estrutural + , ABS(valor_previsto) as valor_previsto + , ABS(arrecadado_periodo) as arrecadado_periodo FROM orcamento.fn_balancete_receita('''||stExercicio||''','''','''||dtInicial||''','''||dtFinal||''','''||stCodEntidades||''' ,'''','''','''','''','''','''','''') - as retorno( - cod_estrutural varchar, - receita integer, - recurso varchar, - descricao varchar, - valor_previsto numeric, - arrecadado_periodo numeric, - arrecadado_ano numeric, - diferenca numeric + AS retorno( + cod_estrutural VARCHAR, + receita INTEGER, + recurso VARCHAR, + descricao VARCHAR, + valor_previsto NUMERIC, + arrecadado_periodo NUMERIC, + arrecadado_ano NUMERIC, + diferenca NUMERIC ) ORDER BY cod_estrutural ) '; - EXECUTE stSql; + EXECUTE stSql; stSql :=' SELECT @@ -80,43 +79,43 @@ BEGIN FROM ( SELECT ''01''::VARCHAR AS cod_tipo - ,( SELECT COALESCE(SUM(valor_previsto),0)::VARCHAR as valor FROM tmp_balancete_receita WHERE cod_estrutural LIKE ''1.2.1.0.29.01.00.00.00%'' ) AS contrib_pat - ,( SELECT COALESCE(SUM(valor_previsto),0)::VARCHAR as valor FROM tmp_balancete_receita WHERE cod_estrutural LIKE ''1.2.1.0.29.07%'' ) AS contrib_serv_ativo - ,( SELECT COALESCE(SUM(valor_previsto),0)::VARCHAR as valor FROM tmp_balancete_receita WHERE cod_estrutural LIKE ''1.2.1.0.29.09%'' ) AS contrib_serv_inat_pens - ,( SELECT COALESCE(SUM(valor_previsto),0)::VARCHAR as valor FROM tmp_balancete_receita WHERE cod_estrutural LIKE ''1.3%'' ) AS rec_patrimoniais - ,( SELECT COALESCE(SUM(valor_previsto),0)::VARCHAR as valor FROM tmp_balancete_receita WHERE cod_estrutural LIKE ''2.2%'' ) AS alienacao_bens - ,( SELECT COALESCE(SUM(valor_previsto),0)::VARCHAR as valor FROM tmp_balancete_receita WHERE cod_estrutural LIKE ''2.5%'' ) AS outras_rec_cap - ,( SELECT COALESCE(SUM(valor_previsto),0)::VARCHAR as valor FROM tmp_balancete_receita WHERE cod_estrutural LIKE ''1.2.1.0.99.00.10.00.00%'' ) AS comp_prev - ,( SELECT COALESCE(SUM(valor_previsto),0)::VARCHAR as valor FROM tmp_balancete_receita WHERE cod_estrutural LIKE ''1.9.9.0.99%'' ) AS outras_rec - ,( SELECT COALESCE(SUM(valor_previsto),0)::VARCHAR as valor FROM tmp_balancete_receita WHERE cod_estrutural LIKE ''9.%'' ) AS deducoes_receita + ,( SELECT COALESCE(SUM(valor_previsto),0)::VARCHAR AS valor FROM tmp_balancete_receita WHERE cod_estrutural LIKE ''1.2.1.0.29.01.00.00.00'' ) AS contrib_pat + ,( SELECT COALESCE(SUM(valor_previsto),0)::VARCHAR AS valor FROM tmp_balancete_receita WHERE cod_estrutural LIKE ''1.2.1.0.29.07%'' ) AS contrib_serv_ativo + ,( SELECT COALESCE(SUM(valor_previsto),0)::VARCHAR AS valor FROM tmp_balancete_receita WHERE cod_estrutural LIKE ''1.2.1.0.29.09%'' ) AS contrib_serv_inat_pens + ,( SELECT COALESCE(SUM(valor_previsto),0)::VARCHAR AS valor FROM tmp_balancete_receita WHERE cod_estrutural LIKE ''1.3.0.0.00.00.00.00.00'' ) AS rec_patrimoniais + ,( SELECT COALESCE(SUM(valor_previsto),0)::VARCHAR AS valor FROM tmp_balancete_receita WHERE cod_estrutural LIKE ''2.2%'' ) AS alienacao_bens + ,( SELECT COALESCE(SUM(valor_previsto),0)::VARCHAR AS valor FROM tmp_balancete_receita WHERE cod_estrutural LIKE ''2.5%'' ) AS outras_rec_cap + ,( SELECT COALESCE(SUM(valor_previsto),0)::VARCHAR AS valor FROM tmp_balancete_receita WHERE cod_estrutural LIKE ''1.2.1.0.99.00.10.00.00'' ) AS comp_prev + ,( SELECT COALESCE(SUM(valor_previsto),0)::VARCHAR AS valor FROM tmp_balancete_receita WHERE cod_estrutural LIKE ''1.9.9.0.99%'' ) AS outras_rec + ,( SELECT COALESCE(SUM(valor_previsto),0)::VARCHAR AS valor FROM tmp_balancete_receita WHERE cod_estrutural LIKE ''9.0.0.0.0.00.00.00.00.00'') AS deducoes_receita UNION SELECT ''02''::VARCHAR AS cod_tipo - ,( SELECT COALESCE(SUM(valor_previsto),0)::VARCHAR as valor FROM tmp_balancete_receita WHERE cod_estrutural LIKE ''1.2.1.0.29.01.00.00.00%'' ) AS contrib_pat - ,( SELECT COALESCE(SUM(valor_previsto),0)::VARCHAR as valor FROM tmp_balancete_receita WHERE cod_estrutural LIKE ''1.2.1.0.29.07%'' ) AS contrib_serv_ativo - ,( SELECT COALESCE(SUM(valor_previsto),0)::VARCHAR as valor FROM tmp_balancete_receita WHERE cod_estrutural LIKE ''1.2.1.0.29.09%'' ) AS contrib_serv_inat_pens - ,( SELECT COALESCE(SUM(valor_previsto),0)::VARCHAR as valor FROM tmp_balancete_receita WHERE cod_estrutural LIKE ''1.3%'' ) AS rec_patrimoniais - ,( SELECT COALESCE(SUM(valor_previsto),0)::VARCHAR as valor FROM tmp_balancete_receita WHERE cod_estrutural LIKE ''2.2%'' ) AS alienacao_bens - ,( SELECT COALESCE(SUM(valor_previsto),0)::VARCHAR as valor FROM tmp_balancete_receita WHERE cod_estrutural LIKE ''2.5%'' ) AS outras_rec_cap - ,( SELECT COALESCE(SUM(valor_previsto),0)::VARCHAR as valor FROM tmp_balancete_receita WHERE cod_estrutural LIKE ''1.2.1.0.99.00.10.00.00%'' ) AS comp_prev - ,( SELECT COALESCE(SUM(valor_previsto),0)::VARCHAR as valor FROM tmp_balancete_receita WHERE cod_estrutural LIKE ''1.9.9.0.99%'' ) AS outras_rec - ,( SELECT COALESCE(SUM(valor_previsto),0)::VARCHAR as valor FROM tmp_balancete_receita WHERE cod_estrutural LIKE ''9.%'' ) AS deducoes_receita + ,( SELECT COALESCE(SUM(valor_previsto),0)::VARCHAR AS valor FROM tmp_balancete_receita WHERE cod_estrutural LIKE ''1.2.1.0.29.01.00.00.00'' ) AS contrib_pat + ,( SELECT COALESCE(SUM(valor_previsto),0)::VARCHAR AS valor FROM tmp_balancete_receita WHERE cod_estrutural LIKE ''1.2.1.0.29.07%'' ) AS contrib_serv_ativo + ,( SELECT COALESCE(SUM(valor_previsto),0)::VARCHAR AS valor FROM tmp_balancete_receita WHERE cod_estrutural LIKE ''1.2.1.0.29.09%'' ) AS contrib_serv_inat_pens + ,( SELECT COALESCE(SUM(valor_previsto),0)::VARCHAR AS valor FROM tmp_balancete_receita WHERE cod_estrutural LIKE ''1.3.0.0.00.00.00.00.00'' ) AS rec_patrimoniais + ,( SELECT COALESCE(SUM(valor_previsto),0)::VARCHAR AS valor FROM tmp_balancete_receita WHERE cod_estrutural LIKE ''2.2%'' ) AS alienacao_bens + ,( SELECT COALESCE(SUM(valor_previsto),0)::VARCHAR AS valor FROM tmp_balancete_receita WHERE cod_estrutural LIKE ''2.5%'' ) AS outras_rec_cap + ,( SELECT COALESCE(SUM(valor_previsto),0)::VARCHAR AS valor FROM tmp_balancete_receita WHERE cod_estrutural LIKE ''1.2.1.0.99.00.10.00.00'' ) AS comp_prev + ,( SELECT COALESCE(SUM(valor_previsto),0)::VARCHAR AS valor FROM tmp_balancete_receita WHERE cod_estrutural LIKE ''1.9.9.0.99%'' ) AS outras_rec + ,( SELECT COALESCE(SUM(valor_previsto),0)::VARCHAR AS valor FROM tmp_balancete_receita WHERE cod_estrutural LIKE ''9.0.0.0.0.00.00.00.00.00'') AS deducoes_receita UNION SELECT ''04''::VARCHAR AS cod_tipo - ,( SELECT COALESCE(SUM(arrecadado_periodo),0)::VARCHAR as valor FROM tmp_balancete_receita WHERE cod_estrutural LIKE ''1.2.1.0.29.01.00.00.00%'' ) AS contrib_pat - ,( SELECT COALESCE(SUM(arrecadado_periodo),0)::VARCHAR as valor FROM tmp_balancete_receita WHERE cod_estrutural LIKE ''1.2.1.0.29.07%'' ) AS contrib_serv_ativo - ,( SELECT COALESCE(SUM(arrecadado_periodo),0)::VARCHAR as valor FROM tmp_balancete_receita WHERE cod_estrutural LIKE ''1.2.1.0.29.09%'' ) AS contrib_serv_inat_pens - ,( SELECT COALESCE(SUM(arrecadado_periodo),0)::VARCHAR as valor FROM tmp_balancete_receita WHERE cod_estrutural LIKE ''1.3%'' ) AS rec_patrimoniais - ,( SELECT COALESCE(SUM(arrecadado_periodo),0)::VARCHAR as valor FROM tmp_balancete_receita WHERE cod_estrutural LIKE ''2.2%'' ) AS alienacao_bens - ,( SELECT COALESCE(SUM(arrecadado_periodo),0)::VARCHAR as valor FROM tmp_balancete_receita WHERE cod_estrutural LIKE ''2.5%'' ) AS outras_rec_cap - ,( SELECT COALESCE(SUM(arrecadado_periodo),0)::VARCHAR as valor FROM tmp_balancete_receita WHERE cod_estrutural LIKE ''1.2.1.0.99.00.10.00.00%'' ) AS comp_prev - ,( SELECT COALESCE(SUM(arrecadado_periodo),0)::VARCHAR as valor FROM tmp_balancete_receita WHERE cod_estrutural LIKE ''1.9.9.0.99%'' ) AS outras_rec - ,( SELECT COALESCE(SUM(arrecadado_periodo),0)::VARCHAR as valor FROM tmp_balancete_receita WHERE cod_estrutural LIKE ''9.%'' ) AS deducoes_receita + ,( SELECT COALESCE(SUM(arrecadado_periodo),0)::VARCHAR AS valor FROM tmp_balancete_receita WHERE cod_estrutural LIKE ''1.2.1.0.29.01.00.00.00'' ) AS contrib_pat + ,( SELECT COALESCE(SUM(arrecadado_periodo),0)::VARCHAR AS valor FROM tmp_balancete_receita WHERE cod_estrutural LIKE ''1.2.1.0.29.07%'' ) AS contrib_serv_ativo + ,( SELECT COALESCE(SUM(arrecadado_periodo),0)::VARCHAR AS valor FROM tmp_balancete_receita WHERE cod_estrutural LIKE ''1.2.1.0.29.09%'' ) AS contrib_serv_inat_pens + ,( SELECT COALESCE(SUM(arrecadado_periodo),0)::VARCHAR AS valor FROM tmp_balancete_receita WHERE cod_estrutural LIKE ''1.3.0.0.00.00.00.00.00'' ) AS rec_patrimoniais + ,( SELECT COALESCE(SUM(arrecadado_periodo),0)::VARCHAR AS valor FROM tmp_balancete_receita WHERE cod_estrutural LIKE ''2.2%'' ) AS alienacao_bens + ,( SELECT COALESCE(SUM(arrecadado_periodo),0)::VARCHAR AS valor FROM tmp_balancete_receita WHERE cod_estrutural LIKE ''2.5%'' ) AS outras_rec_cap + ,( SELECT COALESCE(SUM(arrecadado_periodo),0)::VARCHAR AS valor FROM tmp_balancete_receita WHERE cod_estrutural LIKE ''1.2.1.0.99.00.10.00.00'' ) AS comp_prev + ,( SELECT COALESCE(SUM(arrecadado_periodo),0)::VARCHAR AS valor FROM tmp_balancete_receita WHERE cod_estrutural LIKE ''1.9.9.0.99%'' ) AS outras_rec + ,( SELECT COALESCE(SUM(arrecadado_periodo),0)::VARCHAR AS valor FROM tmp_balancete_receita WHERE cod_estrutural LIKE ''9.0.0.0.0.00.00.00.00.00'') AS deducoes_receita ) AS retorno '; @@ -130,4 +129,4 @@ BEGIN RETURN; END; -$$ language 'plpgsql'; +$$ language 'plpgsql'; \ No newline at end of file diff --git a/gestaoPrestacaoContas/fontes/RPT/TCEMG/MPDF/LHTCEMGRelatorioRazaoDespesa.php b/gestaoPrestacaoContas/fontes/RPT/TCEMG/MPDF/LHTCEMGRelatorioRazaoDespesa.php index 29804e6..a251c5c 100644 --- a/gestaoPrestacaoContas/fontes/RPT/TCEMG/MPDF/LHTCEMGRelatorioRazaoDespesa.php +++ b/gestaoPrestacaoContas/fontes/RPT/TCEMG/MPDF/LHTCEMGRelatorioRazaoDespesa.php @@ -66,19 +66,28 @@

Total Geral
- Empenhado:
- Liquidado:
- Pago: + Empenhado:
+ Empenhado Anulado:
+ Liquidado:
+ Liquidado Anulado:
+ Pago:
+ Pago Anulado:

\ No newline at end of file diff --git a/gestaoRH/fontes/PHP/IMA/instancias/configuracao/FMManterConfiguracaoSEFIP.php b/gestaoRH/fontes/PHP/IMA/instancias/configuracao/FMManterConfiguracaoSEFIP.php index 0d6e6b2..7a78a1c 100644 --- a/gestaoRH/fontes/PHP/IMA/instancias/configuracao/FMManterConfiguracaoSEFIP.php +++ b/gestaoRH/fontes/PHP/IMA/instancias/configuracao/FMManterConfiguracaoSEFIP.php @@ -56,7 +56,13 @@ $obRFolhaPagamentoFolhaSituacao = new RFolhaPagamentoFolhaSituacao(new RFolhaPag $jsOnload = "executaFuncaoAjax('preencherForm');"; //Define a função do arquivo, ex: incluir, excluir, alterar, consultar, etc -$stAcao = $_GET['stAcao'] ? $_GET['stAcao'] : $_POST['stAcao']; +//$stAcao = $_REQUEST['stAcao'] ? $_REQUEST['stAcao'] : Sessao::read('acao'); + +if (Sessao::read('NOVAacao') != "") { + $stAcao = Sessao::read('NOVAacao'); +} else { + $stAcao = $_REQUEST['stAcao']; +} $obTAdministracaoConfiguracao = new TAdministracaoConfiguracao(); $obTAdministracaoConfiguracao->setDado("cod_modulo",40); @@ -301,9 +307,9 @@ $stComplementoValida .= " erro = true;\n"; $stComplementoValida .= " mensagem += '@Campo E-mail do Contato inválido!()';\n"; $stComplementoValida .= " }\n"; $stComplementoValida .= "}\n"; -$stComplementoValida .= "if (erro == false) {\n"; -$stComplementoValida .= " BloqueiaFrames(true,false);\n"; -$stComplementoValida .= " parent.frames[2].document.body.scrollTop=0; }\n"; +//$stComplementoValida .= "if (erro == false) {\n"; +//$stComplementoValida .= " BloqueiaFrames(true,false);\n"; +//$stComplementoValida .= " parent.frames[2].document.body.scrollTop=0; }\n"; $obFormulario->obJavaScript->setComplementoValida($stComplementoValida); diff --git a/gestaoRH/fontes/PHP/IMA/instancias/configuracao/OCManterConfiguracaoSEFIP.php b/gestaoRH/fontes/PHP/IMA/instancias/configuracao/OCManterConfiguracaoSEFIP.php index 20ba2f0..89d1877 100644 --- a/gestaoRH/fontes/PHP/IMA/instancias/configuracao/OCManterConfiguracaoSEFIP.php +++ b/gestaoRH/fontes/PHP/IMA/instancias/configuracao/OCManterConfiguracaoSEFIP.php @@ -138,48 +138,53 @@ function preencherForm() function submeter() { + //SistemaLegado::BloqueiaFrames(true,false); + $obErro = new Erro(); - switch ($_GET["inTipoInscricao"]) { + + switch ($_REQUEST["inTipoInscricao"]) { case 1: - if ($_GET["inCGM"] == "") { - $obErro->setDescricao("Campo CGM inválido!()");; + if ($_REQUEST["inCGM"] == "") { + $obErro->setDescricao("Campo CGM inválido!"); } else { include_once(CAM_GA_CGM_MAPEAMENTO."TCGMPessoaJuridica.class.php"); $obTCGMPessoaJuridica = new TCGMPessoaJuridica(); - $obTCGMPessoaJuridica->setDado("numcgm",$_GET["inCGM"]); $obTCGMPessoaJuridica->recuperaPorChave($rsCgm); + if ( $rsCgm->getCampo("cnpj") == "" ) { $obErro->setDescricao("O CGM ".$_GET["inCGM"]." não possui um cnpj cadastrado!"); } } - break; + break; + case 2: - if ($_GET["inCGM"] == "") { - $obErro->setDescricao("Campo CEI inválido!()"); + if ($_REQUEST["inCGM"] == "") { + $obErro->setDescricao("Campo CEI inválido!"); } - break; + break; + case 3: - if ($_GET["inCGM"] == "") { - $obErro->setDescricao("Campo CGM inválido!()");; + if ($_REQUEST["inCGM"] == "") { + $obErro->setDescricao("Campo CGM inválido!"); } else { include_once(CAM_GA_CGM_MAPEAMENTO."TCGMPessoaFisica.class.php"); $obTCGMPessoaFisica = new TCGMPessoaFisica(); - $obTCGMPessoaFisica->setDado("numcgm",$_GET["inCGM"]); $obTCGMPessoaFisica->recuperaPorChave($rsCgm); + if ( $rsCgm->getCampo("cpf") == "" ) { $obErro->setDescricao("O CGM ".$_GET["inCGM"]." não possui um cpf cadastrado!"); } } - break; + break; } + if ( !$obErro->ocorreu() ) { - $stJs .= "parent.frames[2].Salvar();\n"; + $stJs .= "BloqueiaFrames(true,false);\nparent.frames[2].Salvar();\n"; } else { $stJs .= "alertaAviso('".$obErro->getDescricao()."','form','erro','".Sessao::getId()."');\n"; } - return $stJs; } diff --git a/gestaoRH/fontes/PHP/IMA/instancias/configuracao/PRManterConfiguracaoSEFIP.php b/gestaoRH/fontes/PHP/IMA/instancias/configuracao/PRManterConfiguracaoSEFIP.php index 8246008..c8dccaa 100644 --- a/gestaoRH/fontes/PHP/IMA/instancias/configuracao/PRManterConfiguracaoSEFIP.php +++ b/gestaoRH/fontes/PHP/IMA/instancias/configuracao/PRManterConfiguracaoSEFIP.php @@ -51,76 +51,101 @@ $pgJS = "JS".$stPrograma.".js"; $stAcao = $_POST["stAcao"] ? $_POST["stAcao"] : $_GET["stAcao"]; +Sessao::setTrataExcecao(true); +Sessao::getTransacao()->setMapeamento($obTAdministracaoConfiguracao); + +$obErro = new Erro(); + switch ($stAcao) { + case "configurar": - Sessao::setTrataExcecao(true); $inCodModulo = 40; - $obTAdministracaoConfiguracao = new TAdministracaoConfiguracao(); - $obTIMACategoriaSefip = new TIMACategoriaSefip(); - $obTAdministracaoConfiguracao->setDado( "cod_modulo", $inCodModulo ); - $obTAdministracaoConfiguracao->setDado( "exercicio" , Sessao::getExercicio() ); - $obTAdministracaoConfiguracao->setDado( "parametro" , "cnae_fiscal".Sessao::getEntidade() ); - $obTAdministracaoConfiguracao->setDado( "valor" , $_POST["HdninCodCnae"] ); - $obTAdministracaoConfiguracao->alteracao(); - - $obTAdministracaoConfiguracao->setDado( "parametro" , "centralizacao".Sessao::getEntidade() ); - $obTAdministracaoConfiguracao->setDado( "valor" , $_POST["inCodCentralizacao"] ); - $obTAdministracaoConfiguracao->alteracao(); - - $obTAdministracaoConfiguracao->setDado( "parametro" , "codigo_outras_entidades_sefip".Sessao::getEntidade() ); - $obTAdministracaoConfiguracao->setDado( "valor" , $_POST["inCodigoOutrasEntidades"] ); - $obTAdministracaoConfiguracao->alteracao(); - - $obTAdministracaoConfiguracao->setDado( "parametro" , "fpas".Sessao::getEntidade() ); - $obTAdministracaoConfiguracao->setDado( "valor" , $_POST["inCodFPAS"] ); - $obTAdministracaoConfiguracao->alteracao(); - - $obTAdministracaoConfiguracao->setDado( "parametro" , "gps".Sessao::getEntidade() ); - $obTAdministracaoConfiguracao->setDado( "valor" , $_POST["inCodPagamentoGPS"] ); - $obTAdministracaoConfiguracao->alteracao(); - - $obTAdministracaoConfiguracao->setDado( "parametro" , "tipo_inscricao".Sessao::getEntidade() ); - $obTAdministracaoConfiguracao->setDado( "valor" , $_POST["inTipoInscricao"] ); - $obTAdministracaoConfiguracao->alteracao(); - - $obTAdministracaoConfiguracao->setDado( "parametro" , "inscricao_fornecedor".Sessao::getEntidade() ); - $obTAdministracaoConfiguracao->setDado( "valor" , $_POST["inCGM"] ); - $obTAdministracaoConfiguracao->alteracao(); - - $obTAdministracaoConfiguracao->setDado( "parametro" , "nome_pessoa_contato_sefip".Sessao::getEntidade() ); - $obTAdministracaoConfiguracao->setDado( "valor" , $_POST["stPessoaContato"] ); - $obTAdministracaoConfiguracao->alteracao(); - - $obTAdministracaoConfiguracao->setDado( "parametro" , "telefone_pessoa_contato_sefip".Sessao::getEntidade() ); - $obTAdministracaoConfiguracao->setDado( "valor" , $_POST["stTelefoneContato"] ); - $obTAdministracaoConfiguracao->alteracao(); - - $obTAdministracaoConfiguracao->setDado( "parametro" , "DDD_pessoa_contato_sefip".Sessao::getEntidade() ); - $obTAdministracaoConfiguracao->setDado( "valor" , $_POST["stDDDContato"] ); - $obTAdministracaoConfiguracao->alteracao(); - - $obTAdministracaoConfiguracao->setDado( "parametro" , "mail_pessoa_contato_sefip".Sessao::getEntidade() ); - $obTAdministracaoConfiguracao->setDado( "valor" , $_POST["stEmailContato"] ); - $obTAdministracaoConfiguracao->alteracao(); - - $obTIMACategoriaSefip->excluirTodos(); - - if(count(Sessao::read("arModalidades")) == 0) { - Sessao::encerraExcecao(); - SistemaLegado::alertaAviso($pgForm,"É necessário inserir ao menos 1 (uma) Modalidades de Recolhimento!","incluir","aviso", Sessao::getId(), "../"); - break; - } - - foreach (Sessao::read("arModalidades") as $inIndex=>$arModalidade) { - $obTIMACategoriaSefip->setDado("cod_modalidade",$arModalidade["inCodModalidadeRecolhimento"]); - foreach ($arModalidade["categorias"] as $inCodCategoria) { - $obTIMACategoriaSefip->setDado("cod_categoria",$inCodCategoria); - $obTIMACategoriaSefip->inclusao(); + + if (count(Sessao::read("arModalidades")) == 0) { + Sessao::write('NOVAacao',$stAcao); + SistemaLegado::alertaAviso($pgForm,"É necessário inserir ao menos 1 (uma) Modalidades de Recolhimento!","n_incluir","erro", Sessao::getId(), "../"); + } else { + $obTAdministracaoConfiguracao = new TAdministracaoConfiguracao(); + $obTIMACategoriaSefip = new TIMACategoriaSefip(); + + $obTAdministracaoConfiguracao->setDado( "cod_modulo", $inCodModulo ); + $obTAdministracaoConfiguracao->setDado( "exercicio" , Sessao::getExercicio() ); + $obTAdministracaoConfiguracao->setDado( "parametro" , "cnae_fiscal".Sessao::getEntidade() ); + $obTAdministracaoConfiguracao->setDado( "valor" , $_POST["HdninCodCnae"] ); + $obTAdministracaoConfiguracao->alteracao($boTransacao); + + $obTAdministracaoConfiguracao->setDado( "parametro" , "centralizacao".Sessao::getEntidade() ); + $obTAdministracaoConfiguracao->setDado( "valor" , $_POST["inCodCentralizacao"] ); + $obTAdministracaoConfiguracao->alteracao($boTransacao); + + $obTAdministracaoConfiguracao->setDado( "parametro" , "codigo_outras_entidades_sefip".Sessao::getEntidade() ); + $obTAdministracaoConfiguracao->setDado( "valor" , $_POST["inCodigoOutrasEntidades"] ); + $obTAdministracaoConfiguracao->alteracao($boTransacao); + + $obTAdministracaoConfiguracao->setDado( "parametro" , "fpas".Sessao::getEntidade() ); + $obTAdministracaoConfiguracao->setDado( "valor" , $_POST["inCodFPAS"] ); + $obTAdministracaoConfiguracao->alteracao($boTransacao); + + $obTAdministracaoConfiguracao->setDado( "parametro" , "gps".Sessao::getEntidade() ); + $obTAdministracaoConfiguracao->setDado( "valor" , $_POST["inCodPagamentoGPS"] ); + $obTAdministracaoConfiguracao->alteracao($boTransacao); + + $obTAdministracaoConfiguracao->setDado( "parametro" , "tipo_inscricao".Sessao::getEntidade() ); + $obTAdministracaoConfiguracao->setDado( "valor" , $_POST["inTipoInscricao"] ); + $obTAdministracaoConfiguracao->alteracao($boTransacao); + + $obTAdministracaoConfiguracao->setDado( "parametro" , "inscricao_fornecedor".Sessao::getEntidade() ); + $obTAdministracaoConfiguracao->setDado( "valor" , $_POST["inCGM"] ); + $obTAdministracaoConfiguracao->alteracao($boTransacao); + + $obTAdministracaoConfiguracao->setDado( "parametro" , "nome_pessoa_contato_sefip".Sessao::getEntidade() ); + $obTAdministracaoConfiguracao->setDado( "valor" , $_POST["stPessoaContato"] ); + $obTAdministracaoConfiguracao->alteracao($boTransacao); + + $obTAdministracaoConfiguracao->setDado( "parametro" , "telefone_pessoa_contato_sefip".Sessao::getEntidade() ); + $obTAdministracaoConfiguracao->setDado( "valor" , $_POST["stTelefoneContato"] ); + $obTAdministracaoConfiguracao->alteracao($boTransacao); + + $obTAdministracaoConfiguracao->setDado( "parametro" , "DDD_pessoa_contato_sefip".Sessao::getEntidade() ); + $obTAdministracaoConfiguracao->setDado( "valor" , $_POST["stDDDContato"] ); + $obTAdministracaoConfiguracao->alteracao($boTransacao); + + $obTAdministracaoConfiguracao->setDado( "parametro" , "mail_pessoa_contato_sefip".Sessao::getEntidade() ); + $obTAdministracaoConfiguracao->setDado( "valor" , $_POST["stEmailContato"] ); + $obTAdministracaoConfiguracao->alteracao($boTransacao); + + $obErro = $obTIMACategoriaSefip->excluirTodos($boTransacao); + + if (!$obErro->ocorreu()) { + foreach (Sessao::read("arModalidades") as $inIndex=>$arModalidade) { + $obTIMACategoriaSefip->setDado("cod_modalidade",$arModalidade["inCodModalidadeRecolhimento"]); + + foreach ($arModalidade["categorias"] as $inCodCategoria) { + $obTIMACategoriaSefip->setDado("cod_categoria",$inCodCategoria); + $obErro = $obTIMACategoriaSefip->inclusao($boTransacao); + + if ($obErro->ocorreu()) { + break; + } + } + } } - } - Sessao::encerraExcecao(); - SistemaLegado::alertaAviso($pgForm,"Configuração da SEFIP concluída com sucesso!","incluir","aviso", Sessao::getId(), "../"); + if (!$obErro->ocorreu()) { + $stMsg = "Configuração da SEFIP concluída com sucesso!"; + + Sessao::write('NOVAacao',$stAcao); + + SistemaLegado::alertaAviso($pgForm.'?'.Sessao::getId()."&stAcao=".$stAcao, $stMsg."",$stAcao,"aviso", Sessao::getId(), "../"); + } else { + SistemaLegado::exibeAviso(urlencode($obErro->getDescricao()), 'form', 'erro', Sessao::getId(), '../'); + } + } break; } + +Sessao::encerraExcecao(); + +SistemaLegado::LiberaFrames(true,true); + include_once '../../../../../../gestaoAdministrativa/fontes/PHP/framework/include/rodape.inc.php'; -- libgit2 0.21.2