function __construct() { /** * Declaramos as variáveis da classe de acordo com o que está configurado no arquivo config.mail.php */ include_once 'libs/config.mail.php'; $this->sUserMail = $sUser; $this->sPassMail = $sPass; $this->sHostMail = $sHost; $this->sPortMail = (int) $sPort; $this->sClass = (int) $sClass; $oConfigDBpref = db_utils::getDao("configdbpref"); $rsConfigDBpref = $oConfigDBpref->sql_record($oConfigDBpref->sql_query_file(db_getsession('DB_instit'), "w13_emailadmin")); $this->sEmailFrom = db_utils::fieldsMemory($rsConfigDBpref, 0)->w13_emailadmin; }
include "libs/db_sql.php"; include "libs/db_utils.php"; include "dbforms/db_funcoes.php"; $oPost = db_utils::postMemory($_POST); if (isset($oPost->autent) && $oPost->autent != '' && isset($oPost->matricula) && $oPost->matricula != '') { $numMatricula = $oPost->matricula; $codAutenticacao = $oPost->autent; $sqlRhEmiteContraCheque = " select rh85_sequencial,\n\t rh85_regist\n\t from rhemitecontracheque \n\t where rh85_regist = '{$numMatricula}' \n\t and rh85_codautent = '{$codAutenticacao}'"; $rsRhEmiteContraCheque = pg_query($sqlRhEmiteContraCheque); $iRhEmiteContraCheque = pg_num_rows($rsRhEmiteContraCheque); if ($iRhEmiteContraCheque == 0) { db_logs("", "", 0, "Solicitação de senha para fornecedor: cgc ou cpf não encontrado. {$numMatricula}"); $erro = true; } if ($iRhEmiteContraCheque > 0) { $oRhEmiteContraCheque = db_utils::fieldsMemory($rsRhEmiteContraCheque, 0); $erro = false; } if (isset($erro) && $erro == false) { $sValidaCodAutenticacao = 't'; } else { if (isset($erro) && $erro == true) { $sValidaCodAutenticacao = 'f'; } } } else { $sValidaCodAutenticacao = ''; } ?> <html> <head>
if ($oParam->iProcesso != "") { $aWhere[] = "p58_codproc = {$oParam->iProcesso}"; } if ($oParam->iAtendimento != "") { list($iNumeroAtendimento, $iAnoAtendimento) = explode("/", $oParam->iAtendimento); $aWhere[] = "ov01_numero = {$iNumeroAtendimento} and ov01_anousu = {$iAnoAtendimento}"; } $sWhere = implode(" and ", $aWhere); $sSqlBuscaAtendimentos = $oDaoOuvidoriaAtendimento->sql_query_titular(null, $sCampos, null, $sWhere); $rsBuscaAtendimentos = $oDaoOuvidoriaAtendimento->sql_record($sSqlBuscaAtendimentos); if ($oDaoOuvidoriaAtendimento->numrows == 0) { throw new Exception("Não encontrado atendimentos para os filtros selecionados."); } $aResultados = array(); for ($iAtendimento = 0; $iAtendimento < $oDaoOuvidoriaAtendimento->numrows; $iAtendimento++) { $oOuvidoriaAtendimento = db_utils::fieldsMemory($rsBuscaAtendimentos, $iAtendimento); $oAtendimento = new stdClass(); $oAtendimento->iSeqAtendimento = $oOuvidoriaAtendimento->ov01_sequencial; $oAtendimento->iAtendimento = $oOuvidoriaAtendimento->ov01_numero; $oAtendimento->sDescricao = urlencode($oOuvidoriaAtendimento->p51_descr); $oAtendimento->sRequerente = urlencode($oOuvidoriaAtendimento->ov01_requerente); $oAtendimento->sDepartamento = urlencode($oOuvidoriaAtendimento->descrdepto); $oAtendimento->dtDataAtendimento = $oOuvidoriaAtendimento->ov01_dataatend; $oAtendimento->iProtocolo = $oOuvidoriaAtendimento->ov09_protprocesso; $oAtendimento->iCpfCnpj = $oOuvidoriaAtendimento->cpf_cnpj; $aResultados[] = $oAtendimento; } $_SESSION["aResultadosConsultaOuvidoria"] = $aResultados; } $oRetorno->status = 1; $oRetorno->aResultados = $_SESSION["aResultadosConsultaOuvidoria"];
function __construct($iArretipo = null, $iTipoMod, $iInstit, $dDatahj, $sIp = null, $lNovoPdf = true, $oPdfUnico = null) { $this->lNovoPdf = $lNovoPdf; $this->oPdfUnico = $oPdfUnico; $sWhereModCarne = " where k48_dataini <= '{$dDatahj}' "; $sWhereModCarne .= " and k48_datafim >= '{$dDatahj}' "; $sWhereModCarne .= " and k48_instit = {$iInstit} "; $sWhereModCarne .= " and k48_cadtipomod = {$iTipoMod} "; $sSqlTipoExecessao = " select distinct k48_sequencial, "; $sSqlTipoExecessao .= " k49_tipo, "; $sSqlTipoExecessao .= " k36_ip "; $sSqlTipoExecessao .= " from modcarnepadrao "; $sSqlTipoExecessao .= " left join modcarnepadraotipo on modcarnepadraotipo.k49_modcarnepadrao = modcarnepadrao.k48_sequencial "; $sSqlTipoExecessao .= " left join modcarneexcessao on modcarneexcessao.k36_modcarnepadrao = modcarnepadrao.k48_sequencial "; $sSqlTipoExecessao .= $sWhereModCarne; $rsConsultaTipoExcessao = db_query($sSqlTipoExecessao); $iNroLinhasTipoExcessao = pg_num_rows($rsConsultaTipoExcessao); $iCodModCarnePadrao = ''; // Validação de Tipo e Excessão for ($iInd = 0; $iInd < $iNroLinhasTipoExcessao; $iInd++) { $oTipoExcessao = db_utils::fieldsMemory($rsConsultaTipoExcessao, $iInd); if ($oTipoExcessao->k49_tipo != '' || $oTipoExcessao->k36_ip != '') { if (!empty($iArretipo) && !empty($sIp)) { if ($oTipoExcessao->k49_tipo != '' && $oTipoExcessao->k36_ip != '') { if (trim($iArretipo) == trim($oTipoExcessao->k49_tipo) && $sIp == $oTipoExcessao->k36_ip) { $iCodModCarnePadrao = $oTipoExcessao->k48_sequencial; } } else { if ($oTipoExcessao->k36_ip != '') { if ($sIp == $oTipoExcessao->k36_ip) { $iCodModCarnePadrao = $oTipoExcessao->k48_sequencial; } } else { if (trim($iArretipo) == trim($oTipoExcessao->k49_tipo)) { $iCodModCarnePadrao = $oTipoExcessao->k48_sequencial; } } } } else { if (!empty($sIp)) { if ($sIp == $oTipoExcessao->k36_ip) { $iCodModCarnePadrao = $oTipoExcessao->k48_sequencial; } } else { if (!empty($iArretipo)) { if (trim($iArretipo) == trim($oTipoExcessao->k49_tipo) && $oTipoExcessao->k36_ip == "") { $iCodModCarnePadrao = $oTipoExcessao->k48_sequencial; } } else { $iCodModCarnePadrao = $oTipoExcessao->k48_sequencial; } } } // Caso não tenha retornado nenhum tipo ou excessão e a variável $iCodModCarnePadrao estiver vazia então é atribuído // a ela o código do molelo padrão } else { if (trim($iCodModCarnePadrao) == '') { $iCodModCarnePadrao = $oTipoExcessao->k48_sequencial; } } } if ($iCodModCarnePadrao != "") { $sSql = " select k48_sequencial, \t\t\t\t \t "; $sSql .= " \t k48_cadconvenio, \t\t\t\t \t "; $sSql .= " \t ar12_cadconveniomodalidade, \t\t\t "; $sSql .= " \t m01_sequencial, \t\t\t\t \t "; $sSql .= " \t m02_sequencial, \t\t\t\t \t "; $sSql .= " \t k47_sequencial, \t\t\t\t\t "; $sSql .= " k47_descr, \t\t\t\t\t "; $sSql .= " k47_obs, \t\t\t\t \t "; $sSql .= " k47_altura, \t\t\t\t \t "; $sSql .= " k47_largura, \t\t\t\t \t "; $sSql .= " k47_orientacao \t\t\t\t\t "; $sSql .= " from modcarnepadrao\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t \t "; $sSql .= " \t inner join cadconvenio on cadconvenio.ar11_sequencial = modcarnepadrao.k48_cadconvenio "; $sSql .= " \t inner join cadtipoconvenio on cadtipoconvenio.ar12_sequencial = cadconvenio.ar11_cadtipoconvenio "; $sSql .= " \t left join conveniocobranca on conveniocobranca.ar13_cadconvenio \t = cadconvenio.ar11_sequencial "; $sSql .= " left join modcarnepadraocadmodcarne on modcarnepadraocadmodcarne.m01_modcarnepadrao = modcarnepadrao.k48_sequencial \t "; $sSql .= " left join cadmodcarne \t\t\t\t on cadmodcarne.k47_sequencial\t = modcarnepadraocadmodcarne.m01_cadmodcarne \t"; $sSql .= " left join modcarnepadraolayouttxt on modcarnepadraolayouttxt.m02_modcarnepadrao = modcarnepadrao.k48_sequencial \t "; $sSql .= " left join db_layouttxt \t\t\t\t on db_layouttxt.db50_codigo \t\t = modcarnepadraolayouttxt.m02_db_layouttxt \t"; $sSql .= " where k48_sequencial = {$iCodModCarnePadrao} "; $rsConsultaRegra = pg_query($sSql); $iNroLinhas = pg_num_rows($rsConsultaRegra); if ($iNroLinhas > 0) { $oModCarne = db_utils::fieldsMemory($rsConsultaRegra, 0); $this->iModCarnePadrao = $oModCarne->k48_sequencial; $this->iConvenio = $oModCarne->k48_cadconvenio; if (!empty($oModCarne->m01_sequencial)) { $this->setObjPdf($oModCarne->k47_altura, $oModCarne->k47_largura, $oModCarne->k47_orientacao, $oModCarne->k47_sequencial); } else { if (!empty($oModCarne->m02_sequencial)) { $this->setObjLayout(); } } if (!empty($oModCarne->ar13_sequencial)) { $this->iCodConvenioCobranca = $oModCarne->ar13_sequencial; } else { $this->iCodConvenioCobranca = 0; } if ($oModCarne->ar12_cadconveniomodalidade == 1) { $this->lArrecadacao = false; $this->lCobranca = true; } else { if ($oModCarne->ar12_cadconveniomodalidade == 2) { $this->lArrecadacao = true; $this->lCobranca = false; } } } else { throw new Exception("Nenhum convênio encontrado! TipoMod:{$iTipoMod}, Tipo Débito: {$iArretipo}"); } } else { throw new Exception("Nenhum modelo padrão encontrado! TipoMod:{$iTipoMod}, Tipo Débito: {$iArretipo}"); } }
function processaSimulacao() { $aRetorno = array(); $oDaoCadVenc = db_utils::getDao("cadvenc"); $oDadosTipoCalculo = $this->processaAtividadeTipoCalculo(); foreach ($oDadosTipoCalculo as $oDadosCalculo) { $sMsgLog = "----------------------------------------------------------------------------------------------<br>"; $sMsgLog .= "Processando Calculo ...: {$oDadosCalculo->iCalculo} - {$oDadosCalculo->sCalculoDescricao} <br><br>"; $sMsgLog .= "Tipo de Calculo .......: {$oDadosCalculo->iTipoCalculo} - {$oDadosCalculo->sTipoCalculoDescricao} <br>"; $sMsgLog .= "Vencimento ............: {$oDadosCalculo->iCodigoVencimento} <br>"; $this->logCalculo($sMsgLog); //Processamos os calculos de variável if ($oDadosCalculo->sVariavel == 't') { $sMsgLog = "Processando calculo de ISSQN Variável <br>"; $this->logCalculo($sMsgLog); $sSqlVencimentos = $oDaoCadVenc->sql_query($oDadosCalculo->iCodigoVencimento, null, "*", "q82_parc asc"); $rsVencimentos = $oDaoCadVenc->sql_record($sSqlVencimentos); $iQuantidadeVencimentos = $oDaoCadVenc->numrows; if ($iQuantidadeVencimentos == 0) { $sMsgLog = "[ Erro 10] - Erro ao buscar dados dos vemcimentos"; $this->logCalculo($sMsgLog); throw new Exception($sMsgLog); } for ($iInd = 0; $iInd < $iQuantidadeVencimentos; $iInd++) { $oDadosVencimento = db_utils::fieldsMemory($rsVencimentos, $iInd); if (substr(str_replace("-", "", $oDadosVencimento->q82_venc), 0, 6) > substr(str_replace("-", "", $this->getDataInicioAtividade()), 0, 6)) { $nValorParcela = $oDadosCalculo->nValorOrigem / $this->nValorInflator; $iParcela = $oDadosVencimento->q82_parc; $dVencimento = $oDadosVencimento->q82_venc; $sMsgLog = "Parcela : {$iParcela} Vencimento : {$dVencimento} Valor: {$nValorParcela}<br>"; $this->logCalculo($sMsgLog); $oRetornoCalculo = new stdClass(); $oRetornoCalculo->iTipoCalculo = $oDadosCalculo->iTipoCalculo; $oRetornoCalculo->sDescricaoCalculo = $oDadosCalculo->sCalculoDescricao; $oRetornoCalculo->iParcela = $iParcela; $oRetornoCalculo->dVencimento = $dVencimento; $oRetornoCalculo->nValor = $nValorParcela; $aRetorno[] = $oRetornoCalculo; } else { $sMsgLog = "Parcela : {$oDadosVencimento->q82_parc} Vencimento : {$oDadosVencimento->q82_venc} "; $sMsgLog .= "não calculada pois o ano/mes de vencimento é menor ou igual ao ano/mes do início da ativiade {$this->getDataInicioAtividade()} <br>"; $this->logCalculo($sMsgLog); } } $sMsgLog = "FIM DO PROCESSAMENTO DO ISSQN VARIÁVEL"; $this->logCalculo($sMsgLog); } else { $sMsgLog = "Processando calculo de ISSQN NÃO VARIÁVEL<br>"; $this->logCalculo($sMsgLog); $bProcessaParcelaVencida = false; $bUltimoVencimento = false; $iQuantidadeVencimentoProcessar = 0; $iVencimentosProcessados = 0; $iDiasSomados = 0; $dUltimoDiaAno = $this->getAnoCalculo() . "-12-31"; $sMktimeUltimoDiaAno = mktime(0, 0, 0, "12", "31", $this->getAnoCalculo()); $sWhere = " cadvencdesc.q92_codigo = {$oDadosCalculo->iCodigoVencimento} "; $sWhere .= " and ( case "; $sWhere .= " when cadvencdesc.q92_formacalcparcvenc = 1 "; $sWhere .= " then "; $sWhere .= " case "; $sWhere .= " when q82_venc >= '{$this->getDataInicioAtividade()}' "; $sWhere .= " then true "; $sWhere .= " else false "; $sWhere .= " end "; $sWhere .= " when cadvencdesc.q92_formacalcparcvenc = 3 "; $sWhere .= " then q82_venc >= '{$this->getDataCalculo()}' and q82_venc >= '{$this->getDataInicioAtividade()}' "; $sWhere .= " else "; $sWhere .= " case "; $sWhere .= " when cadvenc.q82_calculaparcvenc is true "; $sWhere .= " then true "; $sWhere .= " else "; $sWhere .= " q82_venc >= '{$this->getDataCalculo()}' and q82_venc >= '{$this->getDataInicioAtividade()}' "; $sWhere .= " end "; $sWhere .= " end ) "; $sSqlVerificaVencimentosProcessar = $oDaoCadVenc->sql_query(null, null, "count(*) as qtd", null, $sWhere); $rsVerificaVencimentosProcessar = $oDaoCadVenc->sql_record($sSqlVerificaVencimentosProcessar); $iQuantidadeVencimentoProcessar = db_utils::fieldsMemory($rsVerificaVencimentosProcessar, 0)->qtd; $sCampos = "max(cadvenc.q82_venc) as maiorvencimento,\n coalesce(max(cadvencdesc.q92_diasvcto),0) as dias,\n count(*) as total"; $sSqlComplementoVencimento = $oDaoCadVenc->sql_query($oDadosCalculo->iCodigoVencimento, null, $sCampos, null); $rsComplementoVencimento = $oDaoCadVenc->sql_record($sSqlComplementoVencimento); $dMaiorVencimento = db_utils::fieldsMemory($rsComplementoVencimento, 0)->maiorvencimento; $iDiasParaVencimento = db_utils::fieldsMemory($rsComplementoVencimento, 0)->dias; $iTotalVencimentos = db_utils::fieldsMemory($rsComplementoVencimento, 0)->total; $sSqlVencimentos = $oDaoCadVenc->sql_query($oDadosCalculo->iCodigoVencimento, null, "*", "q82_parc asc"); $rsVencimentos = $oDaoCadVenc->sql_record($sSqlVencimentos); $iQuantidadeVencimentos = $oDaoCadVenc->numrows; if ($iQuantidadeVencimentos == 0) { $sMsgLog = "[ Erro 10] - Erro ao buscar dados dos vemcimentos"; $this->logCalculo($sMsgLog); throw new Exception($sMsgLog); } for ($iInd = 0; $iInd < $iQuantidadeVencimentos; $iInd++) { $oDadosVencimento = db_utils::fieldsMemory($rsVencimentos, $iInd); $sMsgLog = "Processando Vencimento {$oDadosVencimento->q82_venc} Parcela: {$oDadosVencimento->q82_parc} <br>"; $this->logCalculo($sMsgLog); //Guardar o vencimento atual do cadvenc $dVencimento = $oDadosVencimento->q82_venc; if ($dVencimento == "") { $dVencimento = $this->getDataCalculo(); } $bProcessaParcela = true; if ($iQuantidadeVencimentoProcessar == 0) { if ($iDiasParaVencimento > 0) { $aDataCalculo = explode("-", $this->getDataCalculo()); $dVencimento = date("Y-m-d", mktime(0, 0, 0, $aDataCalculo[1], $aDataCalculo[2] + $iDiasParaVencimento, $aDataCalculo[0])); } else { $dVencimento = $dUltimoDiaAno; } $sMsgLog = "Trocou o vencimento para : {$dVencimento}"; $this->logCalculo($sMsgLog); } /* * Verificamos se será gerada parcela vencida */ if ($oDadosVencimento->q92_formacalcparcvenc == 1) { $bProcessaParcelaVencida = true; } else { if ($oDadosVencimento->q92_formacalcparcvenc == 3) { if ($oDadosVencimento->q82_venc >= $this->getDataCalculo() && $oDadosVencimento->q82_venc <= $dUltimoDiaAno) { $bProcessaParcelaVencida = true; } } else { if ($oDadosVencimento->q82_calculaparcvenc == "t") { $bProcessaParcelaVencida = true; } else { if ($oDadosVencimento->q82_venc >= $this->getDataCalculo() && $oDadosVencimento->q82_venc <= $dUltimoDiaAno) { $bProcessaParcelaVencida = true; } } } } $aVencimento = explode("-", $dVencimento); $sMktimeVencimento = mktime(0, 0, 0, $aVencimento[1], $aVencimento[2], $aVencimento[0]); $aMaiorVencimento = explode("-", $dMaiorVencimento); $sMktimeMaiorVencimento = mktime(0, 0, 0, $aMaiorVencimento[1], $aMaiorVencimento[2], $aMaiorVencimento[0]); $aDataInicioAtividade = explode("-", $this->getDataInicioAtividade()); $sMktimeDataInicioAtividade = mktime(0, 0, 0, $aDataInicioAtividade[1], $aDataInicioAtividade[2], $aDataInicioAtividade[0]); $aDataCalculo = explode("-", $this->getDataCalculo()); $sMktimeDataCalculo = mktime(0, 0, 0, $aDataCalculo[1], $aDataCalculo[2], $aDataCalculo[0]); if ($sMktimeVencimento > $sMktimeMaiorVencimento) { $sMsgLog = "Vencimento do cadastro de vencimentos maior que o maximo vencimento, pasando bUltVenc para true"; $this->logCalculo($sMsgLog); $bUltimoVencimento = true; } if ($this->getAnoInicioAtividade() != $this->getAnoCalculo()) { $sMsgLog = "Ano de inicio diferente do atual"; $this->logCalculo($sMsgLog); $bProcessaParcela = true; } else { if ($sMktimeVencimento >= $sMktimeDataInicioAtividade || $dVencimento == "" || $iQuantidadeVencimentoProcessar == 0 || $bProcessaParcelaVencida == true) { $bProcessaParcela = true; } else { $bProcessaParcela = false; } } if ($sMktimeDataCalculo > $sMktimeVencimento && $bProcessaParcelaVencida == false) { $sMsgLog = "Inicio maior que data de vencimento e processar parcelas vencidas NAO"; $this->logCalculo($sMsgLog); $bProcessaParcela = false; } if ($sMktimeDataInicioAtividade > $sMktimeVencimento && $bUltimoVencimento == false && $iTotalVencimentos != $iVencimentosProcessados) { $bProcessaParcela = false; } if ($bProcessaParcela == true) { $iVencimentosProcessados++; if ($iQuantidadeVencimentoProcessar == 0) { $nPercentualParcela = 100; } else { if ($oDadosCalculo->sTipoProporcionalidade == "D") { $dVencimentoCalculado = $dVencimento; if ($bUltimoVencimento == true || $sMktimeVencimento == $sMktimeMaiorVencimento) { $dVencimentoCalculado = $dUltimoDiaAno; $dMaiorVencimento = $dVencimentoCalculado; $aMaiorVencimento = explode("-", $dMaiorVencimento); $sMktimeMaiorVencimento = mktime(0, 0, 0, $aMaiorVencimento[1], $aMaiorVencimento[2], $aMaiorVencimento[0]); } if ($this->getAnoInicioAtividade() < $this->getAnoCalculo()) { $dInicioAtividadeCalculado = $this->getAnoCalculo() . "-01-01"; } else { $dInicioAtividadeCalculado = $this->getDataInicioAtividade(); } $aInicioAtividadeCalculado = explode("-", $dInicioAtividadeCalculado); $sMktimeInicioAtividadeCalculado = mktime(0, 0, 0, $aInicioAtividadeCalculado[1], $aInicioAtividadeCalculado[2], $aInicioAtividadeCalculado[0]); $iDiasInicio = date("d", $sMktimeUltimoDiaAno - $sMktimeDataInicioAtividade) + 1; $iDiasVencimento = date("d", $sMktimeUltimoDiaAno - $sMktimeInicioAtividadeCalculado) + 1 - $iDiasSomados; $iDiasSomados += $iDiasVencimento; $nPercentualParcela = round(100 / $iDiasInicio * $iDiasVencimento, 2); } else { $nPercentualParcela = round(100 / $iQuantidadeVencimentos, 2); } } if ($dVencimento == "" and $this->getAnoInicioAtividade() < $this->getAnoCalculo()) { $dVencimento = $dUltimoDiaAno; if ($iDiasParaVencimento > 0 && $this->getAnoInicioAtividade() == $this->getAnoCalculo()) { $dVencimento = date("Y-m-d", mktime(0, 0, 0, $aDataCalculo[1], $aDataCalculo[2] + $iDiasParaVencimento, $aDataCalculo[0])); } } $nValorParcela = round($oDadosCalculo->nValorIntegral * $nPercentualParcela / 100, 2); $oRetornoCalculo = new stdClass(); $oRetornoCalculo->iTipoCalculo = $oDadosCalculo->iTipoCalculo; $oRetornoCalculo->sDescricaoCalculo = $oDadosCalculo->sCalculoDescricao; $oRetornoCalculo->iParcela = $iVencimentosProcessados; $oRetornoCalculo->dVencimento = $dVencimento; $oRetornoCalculo->nValor = $nValorParcela; $aRetorno[] = $oRetornoCalculo; if ($nPercentualParcela == 100) { break; } } } } } return $aRetorno; }
/** * No construtor já será gerado os abjetos apartir do layout informado * * @param integer $iLayoutTxt Código do Cadastro de Layout * @param string $sArquivo Caminho do Arquivo * @param boolean $lUsaSeparador true para utilizar separador (se houver), ou seja, * fazer o explode pelo separador nas linhas. false para não utilizar separador. * @param boolean $lProcessarArquivo true para processar o arquivo diretamente default true */ function __construct($iLayoutTxt = '', $sArquivo = '', $lUsaSeparador = false, $lProcessarArquivo = true, $lUsaChr = false) { if (trim($iLayoutTxt) == '') { throw new Exception('Código do Layout não informado!'); } if (trim($sArquivo) == '') { throw new Exception('Caminho do arquivo não informado!'); } $clLayoutTxt = db_utils::getDao("db_layouttxt"); $this->sCaminhoArquivo = $sArquivo; /** * Consulta as propriedades de cada campo das linhas do layout informado */ $sCamposDadosLayout = " ( select trim(db52_default) "; $sCamposDadosLayout .= "\t\t\tfrom db_layoutcampos \t\t\t"; $sCamposDadosLayout .= "\t\t where db52_layoutlinha = db51_codigo\t\t\t\t\t"; $sCamposDadosLayout .= "\t\t\t and db52_ident is true ) as identificador, "; $sCamposDadosLayout .= "\tdb52_nome as nome_campo, \t\t\t\t\t"; $sCamposDadosLayout .= " db52_descr as descricao_campo, "; $sCamposDadosLayout .= "\tdb52_posicao as posicao_campo, \t\t\t\t\t\t"; $sCamposDadosLayout .= "\tdb52_tamanho as tamanho_campo, \t\t\t\t\t\t\t"; $sCamposDadosLayout .= "\tdb51_separador as separador_campo,\t\t\t\t\t\t\t"; $sCamposDadosLayout .= " db52_obs as observacao_campo, "; $sCamposDadosLayout .= "\tdb52_ident as campo_identificador \t\t"; $sOrderByDadosLayout = " db51_tipolinha, "; $sOrderByDadosLayout .= " identificador, "; $sOrderByDadosLayout .= " db52_posicao "; $sSqlDadosLayout = $clLayoutTxt->sql_query_campos($iLayoutTxt, $sCamposDadosLayout, $sOrderByDadosLayout); $rsDadosLayout = $clLayoutTxt->sql_record($sSqlDadosLayout); $iLinhasLayout = $clLayoutTxt->numrows; if ($iLinhasLayout > 0) { /** * Para o caso de utilizar separadores para determinar os campos dentro das linhas * preciso saber o índice do vetor explodido no separador. Como os dados vêm ordenados * pelo tipo de linha e pela posição dentro do tipo de linha, então, a ordem * para cada campo dentro de cada tipo de linha já está correta. O índice começa em 0 * porque os arrays no PHP começam em 0 também. * Ex.: * linha: 123|456|78 * separador: | * array explodido: {123, 456, 78} * valor da posição 1: 456 */ $iIndice = 0; /** * Variável que identifica a mudança de um tipo de linha para outro */ $sIdentificadorAtual = ''; for ($iInd = 0; $iInd < $iLinhasLayout; $iInd++) { $oDadosLayout = db_utils::fieldsMemory($rsDadosLayout, $iInd); /** * Verifico se mudou o tipo de linha. Se mudou, zero o índice do campo. */ if ($sIdentificadorAtual != $oDadosLayout->identificador) { $iIndice = 0; $sIdentificadorAtual = $oDadosLayout->identificador; } /** * Cria um array contendo as propriedades necessárias para * a localização do campo dentro da linha do arquivo */ $this->aPropriedadesCampos[$oDadosLayout->identificador][$oDadosLayout->nome_campo] = array($oDadosLayout->posicao_campo, $oDadosLayout->tamanho_campo, $oDadosLayout->separador_campo, $iIndice, $oDadosLayout->nome_campo, $oDadosLayout->campo_identificador == 't' ? true : false, $oDadosLayout->descricao_campo, $oDadosLayout->observacao_campo); $iTamanhoIdent = strlen($oDadosLayout->identificador); $iIndice++; } } if ($lProcessarArquivo) { $this->processarArquivo($iTamanhoIdent, $lUsaSeparador, false, $lUsaChr); } }
$sCamposAtendimentoLocal .= "ov25_sequencial ||' - '|| ov25_descricao as local,"; $sCamposAtendimentoLocal .= "ov01_depart ||' - '|| descrdepto as departamento_inicial,"; $sCamposAtendimentoLocal .= "(select procarquiv.p67_dtarq "; $sCamposAtendimentoLocal .= " from arqproc "; $sCamposAtendimentoLocal .= " inner join procarquiv on p68_codarquiv = p67_codarquiv "; $sCamposAtendimentoLocal .= " where p68_codproc = p58_codproc) as data_arquivamento, "; $sCamposAtendimentoLocal .= "p58_codproc as numero_processo"; $sWhereAtendimentoLocal = "ouvidoriaatendimento.ov01_sequencial = {$oGet->iAtendimento}"; $sSqlOuvAtend = $oDaoOuvidoriaAtend->sql_query_atendimento_processo(null, $sCamposAtendimentoLocal, null, $sWhereAtendimentoLocal); $rsOuviAtendimento = $oDaoOuvidoriaAtend->sql_record($sSqlOuvAtend); if ($oDaoOuvidoriaAtend->erro_status == "0") { db_msgbox("Não foi possível localizar o atendimento desejado."); db_redireciona("digitaconsultaouvidorianovo.php"); exit; } $oAtendimento = db_utils::fieldsMemory($rsOuviAtendimento, 0); $sDataArquivamento = ""; if ($oAtendimento->data_arquivamento != "") { $sDataArquivamento = db_formatar($oAtendimento->data_arquivamento, "d"); } $oAtendimento->data_arquivamento = $sDataArquivamento; $sNumeroProcesso = ""; if ($oAtendimento->numero_processo != "") { $sNumeroProcesso = $oAtendimento->numero_processo; } $oAtendimento->numero_processo = $sNumeroProcesso; ?> <html> <head> <title>Consulta Atendimento Ouvidoria</title> <meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
$pdf1->logo = $logo; $pdf1->prefeitura = $nomeinst; $pdf1->enderpref = $ender . (isset($numero) ? ', ' . $numero : ""); $pdf1->cgcpref = $cgc; $pdf1->municpref = $munic; $pdf1->telefpref = $telef; $pdf1->emailpref = $email; $pdf1->ano = $ano; $pdf1->mes = $mes; $pdf1->mensagem = $msg; $pdf1->qualarquivo = $qualarquivo; $lin = 1; for ($i = 0; $i < $num; $i++) { db_fieldsmemory($res, $i); $rsSeqContraCheque = db_query("select nextval('rhemitecontracheque_rh85_sequencial_seq') as sequencial"); $oSeqContraCheque = db_utils::fieldsMemory($rsSeqContraCheque, 0); $iSequencial = str_pad($oSeqContraCheque->sequencial, 6, '0', STR_PAD_LEFT); $iMes = str_pad($mes, 2, '0', STR_PAD_LEFT); $iMatricula = str_pad($regist, 6, '0', STR_PAD_LEFT); $iMod1 = db_CalculaDV($iMatricula); $iMod2 = db_CalculaDV($iMatricula . $iMod1 . $iMes . $ano . $iSequencial); $iCodAutent = $iMatricula . $iMod1 . $iMes . $iMod2 . $ano . $iSequencial; $clrhemitecontracheque->rh85_sequencial = $iSequencial; $clrhemitecontracheque->rh85_regist = $regist; $clrhemitecontracheque->rh85_anousu = $ano; $clrhemitecontracheque->rh85_mesusu = $mes; $clrhemitecontracheque->rh85_sigla = substr($sigla, 0, 3); $clrhemitecontracheque->rh85_codautent = $iCodAutent; $clrhemitecontracheque->rh85_dataemissao = date('Y-m-d', db_getsession('DB_datausu')); $clrhemitecontracheque->rh85_horaemissao = db_hora(); $clrhemitecontracheque->rh85_ip = $sIp;
function getImagemBanco() { $sSqlBanco = " select * \t\t\t\t\t\t \t\t\t "; $sSqlBanco .= " from db_bancos\t\t\t\t\t\t\t "; $sSqlBanco .= " where db90_codban = '{$this->getCodBanco()}' "; $rsBanco = pg_query($sSqlBanco); $iNroLinhasBanco = pg_num_rows($rsBanco); if ($iNroLinhasBanco > 0) { $oBanco = db_utils::fieldsMemory($rsBanco, 0); if ($oBanco->db90_digban == "" || $oBanco->db90_abrev == "" || $oBanco->db90_logo == "") { throw new Exception("Configure o banco no Cadastro de Bancos!"); } pg_query("begin"); $sCaminho = "tmp/" . $this->getCodBanco() . ".jpg"; global $conn; pg_lo_export("{$oBanco->db90_logo}", $sCaminho, $conn); pg_query("commit"); return $sCaminho; } else { throw new Exception("Não existe Banco cadastrado para o código {$this->getCodBanco()}!"); } }
$pdf->Cell(13, 5, "OPER.", 1, 0, "C", 0); $pdf->Cell(13, 5, "VENC.", 1, 0, "C", 0); $pdf->Cell(13, 5, "ORIGEM", 1, 0, "C", 0); $pdf->Cell(30, 5, "DESCRIÇÃO", 1, 0, "C", 0); $pdf->Cell(6, 5, "REC", 1, 0, "C", 0); $pdf->Cell(23, 5, "DESCRIÇÃO", 1, 0, "C", 0); $pdf->Cell(15, 5, "VALOR", 1, 0, "C", 0); $pdf->Cell(15, 5, "CORRIGIDO", 1, 0, "C", 0); $pdf->Cell(15, 5, "JUROS", 1, 0, "C", 0); $pdf->Cell(15, 5, "MULTA", 1, 0, "C", 0); $pdf->Cell(15, 5, "DESCONTO", 1, 0, "C", 0); $pdf->Cell(15, 5, "TOTAL", 1, 1, "C", 0); $iNumpre = null; $iTipo = null; for ($i = 0; $i < $iLinhasSuspensao; $i++) { $oSuspensao = db_utils::fieldsMemory($rsSuspensao, $i); $pdf->setx(5); $pdf->SetFont('arial', '', 6); $nTotal = $oSuspensao->k00_vlrcor + $oSuspensao->k00_vlrjur + $oSuspensao->k00_vlrmul - $oSuspensao->k00_vlrdes; $pdf->Cell(2, 4, " ", 0, 0, "C", 0); $pdf->Cell(4, 4, $oSuspensao->k00_numpar, "LR", 0, "C", 0); $pdf->Cell(4, 4, $oSuspensao->k00_numtot, "R", 0, "C", 0); $pdf->Cell(13, 4, $oSuspensao->k00_dtoper, "R", 0, "C", 0); $pdf->Cell(13, 4, $oSuspensao->k00_dtvenc, "R", 0, "C", 0); $pdf->cell(13, 4, $oSuspensao->matinscr, "R", 0, "L", 0); $pdf->Cell(30, 4, substr(trim($oSuspensao->k00_descr), 0, 20), "R", 0, "L", 0); $pdf->Cell(6, 4, $oSuspensao->k00_receit, "R", 0, "C", 0); $pdf->Cell(23, 4, substr(trim($oSuspensao->k02_descr), 0, 15), "R", 0, "L", 0); $pdf->Cell(15, 4, db_formatar($oSuspensao->k00_valor, 'f'), "R", 0, "R", 0); $pdf->Cell(15, 4, db_formatar($oSuspensao->k00_vlrcor, 'f'), "R", 0, "R", 0); $pdf->Cell(15, 4, db_formatar($oSuspensao->k00_vlrjur, 'f'), "R", 0, "R", 0);
function getCodigoTom($iInstit = null) { if (empty($iInstit)) { $iInstit = db_getsession("DB_instit"); } $sSql = "select db125_codigosistema "; $sSql .= " from db_config "; $sSql .= " inner join cadenderestado on trim(db71_sigla) = uf "; $sSql .= " inner join cadendermunicipio on db71_sequencial = db72_cadenderestado "; $sSql .= " and trim(db72_descricao) = munic "; $sSql .= " inner join cadendermunicipiosistema on db125_cadendermunicipio = db72_sequencial "; $sSql .= " and db125_db_sistemaexterno = 5 "; $sSql .= " where codigo = {$iInstit}; "; $rsDbConfig = $this->sql_record($sSql); if ($this->numrows > 0) { return db_utils::fieldsMemory($rsDbConfig, 0); } return null; }
/** * Funçao que retorna o número + 1 do ultimo alvará cadastrado para evitar descontinuidade na sequence. * O numero estará armazenado na tabela de parâmetro issbasenumeracao * No momento da chamada da função esse número será atualizado para o próximo (q133_numeracaoatual + 1) * e atribuido a váriavel q02_inscr da classe * * @return boolean */ function getNumeroContinuo() { $lTransacaoInterna = false; $lErro = false; if (!db_utils::inTransaction()) { $lTransacaoInterna = true; db_inicio_transacao(); } $sUpdate = "update issbasenumeracao \t\t\t\t\t\t\t\t\t\t\t\t\t\t\t"; $sUpdate .= " set q133_numeracaoatual = q133_numeracaoatual + 1 "; if (db_query($sUpdate)) { $sSql = "select q133_numeracaoatual "; $sSql .= " from issbasenumeracao \t\t\t "; $sSql .= " order by q133_sequencial desc "; $sSql .= " limit 1\t\t\t\t\t\t\t\t\t\t\t "; $rsNumeroContinuo = db_query($sSql); if ($rsNumeroContinuo and pg_num_rows($rsNumeroContinuo) > 0) { $this->q02_inscr = db_utils::fieldsMemory($rsNumeroContinuo, 0)->q133_numeracaoatual; } else { $lErro = true; } } if ($lTransacaoInterna) { db_fim_transacao($lErro); } if (!$lErro) { if (!db_query("select setval('issbase_q02_inscr_seq', {$this->q02_inscr})")) { return false; } return true; } else { return false; } }
$rsBuscaDadosCgmCidadao = $oDaoBuscaCidadao->sql_record($sSqlBuscaDadosCidadao); $oDaoBuscaCidadaoContato = db_utils::getDao('cidadaotelefone'); $sSqlBuscaTelefones = $oDaoBuscaCidadaoContato->sql_query_file(null, "*", null, "ov07_cidadao = {$oDadosAtendimento->ov10_cidadao}"); $rsBuscaTelefones = $oDaoBuscaCidadaoContato->sql_record($sSqlBuscaTelefones); $iTotalTelefones = $oDaoBuscaCidadaoContato->numrows; $aTelefones = array(); if ($iTotalTelefones > 0) { $aTelefones = db_utils::getCollectionByRecord($rsBuscaTelefones); } } } /* * dados pessoais do requerente */ if (isset($rsBuscaDadosCgmCidadao) && pg_num_rows($rsBuscaDadosCgmCidadao) > 0) { $oResultadoRequerente = db_utils::fieldsMemory($rsBuscaDadosCgmCidadao, 0); $oStdDadosRequerente->codigo = $oResultadoRequerente->codigo; $oStdDadosRequerente->nomerequerente = "{$oResultadoRequerente->codigo} - {$oResultadoRequerente->nomerequerente}"; $oStdDadosRequerente->cpfcnpj = $oResultadoRequerente->cpfcnpj; $oStdDadosRequerente->municipio = $oResultadoRequerente->municipio; $oStdDadosRequerente->cep = $oResultadoRequerente->cep; $oStdDadosRequerente->estado = $oResultadoRequerente->estado; $oStdDadosRequerente->endereco = $oResultadoRequerente->endereco; $oStdDadosRequerente->complemento = $oResultadoRequerente->complemento; $oStdDadosRequerente->numero = $oResultadoRequerente->numero; $oStdDadosRequerente->bairro = $oResultadoRequerente->bairro; $oStdDadosRequerente->telefone = $oResultadoRequerente->telefone; } } ?> <html>
/** * Retorna dados Basicos Referentes a Parcela de Débito * * @param mixed $iNumpre * @param mixed $iNumpar * @static * @access public * @return stdClass */ public static function getMensagensParcela($iNumpre, $iNumpar, $dDataEmissao) { $oRetorno = new stdClass(); $oRetorno->sMensagemContribuinte = ""; $oRetorno->sMensagemCaixa = ""; /** * Para Buscar valor deve-se implentar busca na função debitos_numpre */ $sSql = "select distinct "; if (!empty($iNumpar)) { $sSql .= " k00_dtvenc, "; } $sSql .= " k00_msguni, "; $sSql .= " k00_msguni2, "; $sSql .= " k00_msgparc, "; $sSql .= " k00_msgparc2, "; $sSql .= " k00_msgparcvenc, "; $sSql .= " k00_msgparcvenc2, "; $sSql .= " arrecad.k00_tipo "; $sSql .= " from arrecad "; $sSql .= " inner join arretipo on arrecad.k00_tipo = arretipo.k00_tipo "; $sSql .= " where k00_numpre = {$iNumpre} "; if (!empty($iNumpar)) { $sSql .= " AND k00_numpar = {$iNumpar} "; } $rsSql = db_query($sSql); if (!$rsSql) { throw new DBException("Erro ao Buscar os Dados da Parcela. Descrição do Erro:" . pg_last_error()); } $oDadosDebito = db_utils::fieldsMemory($rsSql, 0); if (empty($iNumpar)) { $oRetorno->sMensagemContribuinte = $oDadosDebito->k00_msguni2; $oRetorno->sMensagemCaixa = $oDadosDebito->k00_msguni; return $oRetorno; } $oDataVencimentoDebito = new DBDate($oDadosDebito->k00_dtvenc); $oDataEmissao = new DBDate($dDataEmissao); if ($oDataEmissao->getTimeStamp() > $oDataVencimentoDebito->getTimeStamp()) { $oRetorno->sMensagemContribuinte = $oDadosDebito->k00_msgparc; $oRetorno->sMensagemCaixa = $oDadosDebito->k00_msgparc2; return $oRetorno; } $oRetorno->sMensagemContribuinte = $oDadosDebito->k00_msgparcvenc; $oRetorno->sMensagemCaixa = $oDadosDebito->k00_msgparcvenc2; return $oRetorno; }
public function processamentoResumoGeralDivida($dDataDebitos) { $aResumoCurtoPrazo = array(); $aResumoLongoPrazo = array(); $aAgrupador['receita'] = 'receit'; $aDataDebitos = explode("-", $dDataDebitos); $sSqlDebitosPagos = $this->sql_queryDebitosAnteriores($aDataDebitos[0]); $rsDebitosPagos = $this->sql_record($sSqlDebitosPagos); for ($iInd = 0; $iInd < $this->numrows; $iInd++) { $oDebitosPagos = db_utils::fieldsMemory($rsDebitosPagos, $iInd); if (isset($aDebitosPagos[$oDebitosPagos->k03_tipo][$oDebitosPagos->v01_proced])) { $aDebitosPagos[$oDebitosPagos->k03_tipo][$oDebitosPagos->v01_proced]['nTotal'] += $oDebitosPagos->total; } else { $aDebitosPagos[$oDebitosPagos->k03_tipo][$oDebitosPagos->v01_proced]['nTotal'] = $oDebitosPagos->total; } foreach ($aAgrupador as $sDescrAgrupa => $sCampo) { if (isset($aResumoDebitosPagos[$sDescrAgrupa][$oDebitosPagos->{$sCampo}])) { $aResumoDebitosPagos[$sDescrAgrupa][$oDebitosPagos->{$sCampo}]['nTotal'] += $oDebitosPagos->total; } else { $aResumoDebitosPagos[$sDescrAgrupa][$oDebitosPagos->{$sCampo}]['nTotal'] = $oDebitosPagos->total; } } } $sSqlResumoGeral = $this->sql_queryProcessamentoResumoGeralDivida($dDataDebitos); $rsResumoGeral = $this->sql_record($sSqlResumoGeral); $iLinhasResumoGeral = $this->numrows; $aLongoPrazo = array(); $aCurtoPrazo = array(); for ($iInd = 0; $iInd < $iLinhasResumoGeral; $iInd++) { $oResumo = db_utils::fieldsMemory($rsResumoGeral, $iInd); $dtDataLimite = $oResumo->v01_exerc + 1 . "-12-31"; foreach ($aAgrupador as $sDescrAgrupa => $sCampo) { $aDescrTipo[$oResumo->k03_tipo] = $oResumo->descrtipo; $aDescrProced[$oResumo->v01_proced] = $oResumo->descrproced; $aDescrTipoProced[$oResumo->v03_tributaria] = $oResumo->descrtipoproced; if ($sDescrAgrupa == 'proced') { $sDescricao = $oResumo->descrproced; } else { if ($sDescrAgrupa == 'tipo_proced') { $sDescricao = $oResumo->descrtipoproced; } else { if ($sDescrAgrupa == 'receita') { $sDescricao = $oResumo->descrreceit; } else { $sDescricao = $oResumo->descrtipo; } } } if (in_array($oResumo->k03_tipo, array(5, 15, 18)) || in_array($oResumo->k03_tipo, array(6, 13)) && $oResumo->dtvenc > $dtDataLimite) { if (isset($aResumoLongoPrazo[$sDescrAgrupa][$oResumo->{$sCampo}])) { $aResumoLongoPrazo[$sDescrAgrupa][$oResumo->{$sCampo}]['nVlrHist'] += $oResumo->vlrhis; $aResumoLongoPrazo[$sDescrAgrupa][$oResumo->{$sCampo}]['nVlrCorr'] += $oResumo->vlrcor; $aResumoLongoPrazo[$sDescrAgrupa][$oResumo->{$sCampo}]['nMulta'] += $oResumo->multa; $aResumoLongoPrazo[$sDescrAgrupa][$oResumo->{$sCampo}]['nJuros'] += $oResumo->juros; $aResumoLongoPrazo[$sDescrAgrupa][$oResumo->{$sCampo}]['nTotal'] += $oResumo->total; } else { $aResumoLongoPrazo[$sDescrAgrupa][$oResumo->{$sCampo}]['sDescricao'] = $sDescricao; $aResumoLongoPrazo[$sDescrAgrupa][$oResumo->{$sCampo}]['nVlrHist'] = $oResumo->vlrhis; $aResumoLongoPrazo[$sDescrAgrupa][$oResumo->{$sCampo}]['nVlrCorr'] = $oResumo->vlrcor; $aResumoLongoPrazo[$sDescrAgrupa][$oResumo->{$sCampo}]['nMulta'] = $oResumo->multa; $aResumoLongoPrazo[$sDescrAgrupa][$oResumo->{$sCampo}]['nJuros'] = $oResumo->juros; $aResumoLongoPrazo[$sDescrAgrupa][$oResumo->{$sCampo}]['nTotal'] = $oResumo->total; } } else { if (in_array($oResumo->k03_tipo, array(6, 13)) && $oResumo->dtvenc <= $dtDataLimite) { if (isset($aResumoCurtoPrazo[$sDescrAgrupa][$oResumo->{$sCampo}])) { $aResumoCurtoPrazo[$sDescrAgrupa][$oResumo->{$sCampo}]['nVlrHist'] += $oResumo->vlrhis; $aResumoCurtoPrazo[$sDescrAgrupa][$oResumo->{$sCampo}]['nVlrCorr'] += $oResumo->vlrcor; $aResumoCurtoPrazo[$sDescrAgrupa][$oResumo->{$sCampo}]['nMulta'] += $oResumo->multa; $aResumoCurtoPrazo[$sDescrAgrupa][$oResumo->{$sCampo}]['nJuros'] += $oResumo->juros; $aResumoCurtoPrazo[$sDescrAgrupa][$oResumo->{$sCampo}]['nTotal'] += $oResumo->total; } else { $aResumoCurtoPrazo[$sDescrAgrupa][$oResumo->{$sCampo}]['sDescricao'] = $sDescricao; $aResumoCurtoPrazo[$sDescrAgrupa][$oResumo->{$sCampo}]['nVlrHist'] = $oResumo->vlrhis; $aResumoCurtoPrazo[$sDescrAgrupa][$oResumo->{$sCampo}]['nVlrCorr'] = $oResumo->vlrcor; $aResumoCurtoPrazo[$sDescrAgrupa][$oResumo->{$sCampo}]['nMulta'] = $oResumo->multa; $aResumoCurtoPrazo[$sDescrAgrupa][$oResumo->{$sCampo}]['nJuros'] = $oResumo->juros; $aResumoCurtoPrazo[$sDescrAgrupa][$oResumo->{$sCampo}]['nTotal'] = $oResumo->total; } } } } } foreach ($aResumoLongoPrazo as $sTipoAgrupa => $aDadosLongoPrazo) { foreach ($aDadosLongoPrazo as $sCampoAgrupa => $aValoresLongoPrazo) { if (isset($aResumoDebitosPagos[$sTipoAgrupa][$sCampoAgrupa])) { $nTotalPago = $aResumoDebitosPagos[$sTipoAgrupa][$sCampoAgrupa]['nTotal']; $nTotalPago = round($nTotalPago / 3 * 2, 2); $nTotalProced = $aValoresLongoPrazo['nTotal']; // Percentual que será subtraído do logon prazo e incluído no longo prazo $nPercentual = round($nTotalPago * 100 / $nTotalProced, 2); $nValorHist = $aValoresLongoPrazo['nVlrHist'] / 100 * $nPercentual; $nValorCorr = $aValoresLongoPrazo['nVlrCorr'] / 100 * $nPercentual; $nValorMulta = $aValoresLongoPrazo['nMulta'] / 100 * $nPercentual; $nValorJuros = $aValoresLongoPrazo['nJuros'] / 100 * $nPercentual; $nValorTotal = $aValoresLongoPrazo['nTotal'] / 100 * $nPercentual; if ($nValorTotal < $aValoresLongoPrazo['nTotal']) { $aResumoLongoPrazo[$sTipoAgrupa][$sCampoAgrupa]['nVlrHist'] -= $nValorHist; $aResumoLongoPrazo[$sTipoAgrupa][$sCampoAgrupa]['nVlrCorr'] -= $nValorCorr; $aResumoLongoPrazo[$sTipoAgrupa][$sCampoAgrupa]['nMulta'] -= $nValorMulta; $aResumoLongoPrazo[$sTipoAgrupa][$sCampoAgrupa]['nJuros'] -= $nValorJuros; $aResumoLongoPrazo[$sTipoAgrupa][$sCampoAgrupa]['nTotal'] -= $nValorTotal; if (isset($aResumoCurtoPrazo[$sTipoAgrupa][$sCampoAgrupa])) { $aResumoCurtoPrazo[$sTipoAgrupa][$sCampoAgrupa]['nVlrHist'] += $nValorHist; $aResumoCurtoPrazo[$sTipoAgrupa][$sCampoAgrupa]['nVlrCorr'] += $nValorCorr; $aResumoCurtoPrazo[$sTipoAgrupa][$sCampoAgrupa]['nMulta'] += $nValorMulta; $aResumoCurtoPrazo[$sTipoAgrupa][$sCampoAgrupa]['nJuros'] += $nValorJuros; $aResumoCurtoPrazo[$sTipoAgrupa][$sCampoAgrupa]['nTotal'] += $nValorTotal; } else { $aResumoCurtoPrazo[$sTipoAgrupa][$sCampoAgrupa]['sDescricao'] = $aValoresLongoPrazo['sDescricao']; $aResumoCurtoPrazo[$sTipoAgrupa][$sCampoAgrupa]['nVlrHist'] = $nValorHist; $aResumoCurtoPrazo[$sTipoAgrupa][$sCampoAgrupa]['nVlrCorr'] = $nValorCorr; $aResumoCurtoPrazo[$sTipoAgrupa][$sCampoAgrupa]['nMulta'] = $nValorMulta; $aResumoCurtoPrazo[$sTipoAgrupa][$sCampoAgrupa]['nJuros'] = $nValorJuros; $aResumoCurtoPrazo[$sTipoAgrupa][$sCampoAgrupa]['nTotal'] = $nValorTotal; } } else { if (isset($aResumoCurtoPrazo[$sTipoAgrupa][$sCampoAgrupa])) { $aResumoCurtoPrazo[$sTipoAgrupa][$sCampoAgrupa]['nVlrHist'] += $aValoresLongoPrazo['nVlrHist']; $aResumoCurtoPrazo[$sTipoAgrupa][$sCampoAgrupa]['nVlrCorr'] += $aValoresLongoPrazo['nVlrCorr']; $aResumoCurtoPrazo[$sTipoAgrupa][$sCampoAgrupa]['nMulta'] += $aValoresLongoPrazo['nMulta']; $aResumoCurtoPrazo[$sTipoAgrupa][$sCampoAgrupa]['nJuros'] += $aValoresLongoPrazo['nJuros']; $aResumoCurtoPrazo[$sTipoAgrupa][$sCampoAgrupa]['nTotal'] += $aValoresLongoPrazo['nTotal']; } else { $aResumoCurtoPrazo[$sTipoAgrupa][$sCampoAgrupa]['sDescricao'] = $aValoresLongoPrazo['sDescricao']; $aResumoCurtoPrazo[$sTipoAgrupa][$sCampoAgrupa]['nVlrHist'] = $aValoresLongoPrazo['nVlrHist']; $aResumoCurtoPrazo[$sTipoAgrupa][$sCampoAgrupa]['nVlrCorr'] = $aValoresLongoPrazo['nVlrCorr']; $aResumoCurtoPrazo[$sTipoAgrupa][$sCampoAgrupa]['nMulta'] = $aValoresLongoPrazo['nMulta']; $aResumoCurtoPrazo[$sTipoAgrupa][$sCampoAgrupa]['nJuros'] = $aValoresLongoPrazo['nJuros']; $aResumoCurtoPrazo[$sTipoAgrupa][$sCampoAgrupa]['nTotal'] = $aValoresLongoPrazo['nTotal']; } unset($aResumoLongoPrazo[$sTipoAgrupa][$sCampoAgrupa]); } } } } foreach ($aResumoLongoPrazo as $sTipoAgrupa => $aDadosLongoPrazo) { if (count($aDadosLongoPrazo) == 0) { unset($aResumoLongoPrazo[$sTipoAgrupa]); } } $aDados = array(); $aDados['aCurtoPrazo'] = $aResumoCurtoPrazo; $aDados['aLongoPrazo'] = $aResumoLongoPrazo; return $aDados; }
</tr> </table> <table align="center" class="tableForm"> <tr class="subTituloForm" align="center"> <td>N° Matrícula</td> <td>Data Admissão</td> <td>Cargo</td> <td>Data Demissão</td> <td>Instituicao</td> </tr> <?php $corFundo = "#FFFFFF"; $corOver = "#ede67c"; for ($x = 0; $x < $iRhCgmCont; $x++) { if ($iRhCgmCont > 0) { $oCgmCont = db_utils::fieldsMemory($rsRhCgmCont, $x); } if ($corFundo == "#FFFFFF") { $corFundo = "#FFFFFF"; } else { $corFundo = "#FFFFFF"; } $sUrl = base64_encode("id_usuario=" . $id_usuario . "&matricula=" . $oCgmCont->rh01_regist . "&instituicao=" . $oCgmCont->rh02_instit); ?> <tr bgcolor="<?php echo $corFundo; ?> " onmouseover="bgColor='<?php echo $corOver; ?> '" onmouseout="bgColor='<?php
* durante o processo. */ if (isset($inicial)) { $sSqlNumpresInicial = " select distinct "; $sSqlNumpresInicial .= " k00_numpre, "; $sSqlNumpresInicial .= " k00_numpar "; $sSqlNumpresInicial .= " from inicialnumpre "; $sSqlNumpresInicial .= " inner join arrecad on arrecad.k00_numpre = inicialnumpre.v59_numpre "; $sSqlNumpresInicial .= " where v59_inicial in (" . $num_pres . ") "; $num_pres = ""; $rsSqlNumpresInicial = pg_query($sSqlNumpresInicial); $iLinhasNumpresInicial = pg_num_rows($rsSqlNumpresInicial); if ($iLinhasNumpresInicial > 0) { $sVirgula = ""; for ($iRow = 0; $iRow < $iLinhasNumpresInicial; $iRow++) { $oDadosNumpre = db_utils::fieldsMemory($rsSqlNumpresInicial, $iRow); $sNumpre = "N" . $oDadosNumpre->k00_numpre; $sNumpar = "P" . $oDadosNumpre->k00_numpar; $sReceita = "R0"; $num_pres .= $sVirgula . $sNumpre . $sNumpar . $sReceita; $sVirgula = ","; } } } $num_pres = explode(',', $num_pres); if (!isset($emite_recibo_protocolo)) { pg_exec("BEGIN"); $result = pg_exec("select nextval('numpref_k03_numpre_seq') as k03_numpre"); db_fieldsmemory($result, 0); $result = pg_exec("select k00_codbco,k00_codage,k00_descr,k00_hist1,k00_hist2,k00_hist3,k00_hist4,k00_hist5,k00_hist6,k00_hist7,k00_hist8,k03_tipo,k00_tipoagrup from arretipo where k00_tipo = {$tipo}"); if (pg_numrows($result) == 0) {
</td> </tr> <?php } ?> <tr> <td class="tituloForm" colspan="3"> <b>Férias a Gozar</b> </td> </tr> <?php if ($iNroFeriasaGozar > 0) { for ($iInd = 0; $iInd < $iNroFeriasaGozar; $iInd++) { $oFeriasaGozar = db_utils::fieldsMemory($rsFeriasaGozar, $iInd); if ($oFeriasaGozar->periodo_aquisitivo_final < date('Y-m-d', db_getsession('DB_datausu'))) { ?> <tr> <td class="labelForm"> Período Aquisitivo: </td> <td class="dadosForm"> <?php echo db_formatar($oFeriasaGozar->periodo_aquisitivo_inicial, 'd') . " à " . db_formatar($oFeriasaGozar->periodo_aquisitivo_final, 'd'); ?> </td> </tr> <?php $lMonstraMsg = true;
if ($clcertidao->numrows > 0) { $oCertidao = db_utils::fieldsMemory($rsCertidao, 0); if ($sqlerro == false && $sStatus != 3) { $clcertvalonlinecert->w19_certidao = $oCertidao->p50_sequencial; $clcertvalonlinecert->w19_certidaovalidaonline = $clcertvalonline->w18_sequencial; $clcertvalonlinecert->incluir(null); if ($clcertvalonlinecert->erro_status == 0) { $sqlerro = true; $erro_msg = $clcertvalonlinecert->erro_msg; } } } if (isset($iLogin) && $iLogin != "") { $rsDbUsuarios = $cldbusuarios->sql_record($cldbusuarios->sql_query("", "id_usuario", "", "login = '******'")); if ($cldbusuarios->numrows > 0) { $oDbUsuario = db_utils::fieldsMemory($rsDbUsuarios, 0); if ($sqlerro == false && $sStatus != 3) { $clcertvalonlineusuario->w20_certidaovalidaonline = $clcertvalonline->w18_sequencial; $clcertvalonlineusuario->w20_id_usuario = $oDbUsuario->id_usuario; $clcertvalonlineusuario->incluir(null); if ($clcertvalonlineusuario->erro_status == 0) { $sqlerro = true; $erro_msg = $clcertvalonlineusuario->erro_msg; } } } } db_fim_transacao($sqlerro); if ($sqlerro == true) { db_msgbox($erro_msg); }
$rotulo->label("j14_nome"); $rotulo->label("z01_numero"); $rotulo->label("z01_compl"); $rotulo->label("j13_descr"); $rotulo->label("z01_telef"); $rotulo->label("z01_numcgm"); $rotulo->label("j50_zona"); $rotulo->label("j50_descr"); $rotulo->label("q03_ativ"); $rotulo->label("q03_descr"); $rotulo->label("q86_numcgm"); $sCampos = 'mens, alinhamento'; $sWhereConfMensagem = "cod = 'simulacao_inscricao_cab' "; $sSqlConfMensagem = $oDaoConfMensagem->sql_query(null, $sCampos, null, $sWhereConfMensagem); $rsConfMensagem = $oDaoConfMensagem->sql_record($sSqlConfMensagem); $oDadosConfMensagem = db_utils::fieldsMemory($rsConfMensagem, 0); $sConfMensagem = $oDadosConfMensagem->mens; $sAlinhamento = $oDadosConfMensagem->alinhamento; db_logs(0, 0, 0, "Simulação de Inscrição ISS"); ?> <html> <head> <title>DBSeller Informática Ltda - Página Inicial</title> <meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1"> <meta http-equiv="Expires" CONTENT="0"> <script language="JavaScript" src="scripts/scripts.js"></script> <script language="JavaScript" src="scripts/strings.js"></script> <script language="JavaScript" src="scripts/prototype.js"></script> <script language="JavaScript" src="scripts/widgets/DBHint.widget.js"></script> <link rel="stylesheet" type="text/css" href="include/estilodai.css"> <link rel="stylesheet" type="text/css" href="config/estilos.css">
* licenca/licenca_pt.txt */ require_once "fpdf151/pdf.php"; require_once "libs/db_utils.php"; require_once "libs/JSON.php"; require_once "dbforms/db_funcoes.php"; require_once "classes/db_isssimulacalculo_classe.php"; require_once "classes/db_isssimulacalculoatividade_classe.php"; $oJson = new services_json(); $oIssSimulaCalculo = new cl_isssimulacalculo(); $oIssSimulaCalculoAtividade = new cl_isssimulacalculoatividade(); $oGet = db_utils::postMemory($_GET); $oPost = db_utils::postMemory($_POST); $sSqlMunic = "select munic from db_config where codigo = " . db_getsession("DB_instit"); $rsMunic = db_query($sSqlMunic); $sMunic = db_utils::fieldsMemory($rsMunic, 0)->munic; $sSqlSimulaCalculo = $oIssSimulaCalculo->sql_query($oGet->iSimulacao); $rsSimulacaoCalculo = $oIssSimulaCalculo->sql_record($sSqlSimulaCalculo); $iLinhasConsulta = $oIssSimulaCalculo->numrows; if ($iLinhasConsulta == 0) { db_redireciona("db_erros.php?fechar=true&db_erro=Nenhum registro encontrado."); } $sSqlSimulaCalculoAtividade = $oIssSimulaCalculoAtividade->sql_query(null, "*", "q131_seq", "q131_issimulacalculo = {$oGet->iSimulacao}"); $rsSimulacaoCalculoAtividade = $oIssSimulaCalculoAtividade->sql_record($sSqlSimulaCalculoAtividade); $iLinhasConsultaAtividade = $oIssSimulaCalculoAtividade->numrows; $head4 = "BIC simulada de Alvara"; $pdf = new PDF(); $pdf->Open(); $pdf->AliasNbPages(); $total = 0; $alt = 4;
* * Copia da licenca no diretorio licenca/licenca_en.txt * licenca/licenca_pt.txt */ include "libs/db_conecta.php"; include "libs/db_stdlib.php"; include "libs/db_sql.php"; include "libs/db_utils.php"; validaUsuarioLogado(); $aRetorno = array(); parse_str(base64_decode($HTTP_SERVER_VARS["QUERY_STRING"]), $aRetorno); $iMatric = $aRetorno['iMatric']; $oRHPessoal = db_utils::getDao('rhpessoal'); $sSqlDadosServidor = "select *,\n substr((select * from db_fxxx(rh02_regist,rh02_anousu,rh02_mesusu,rh02_instit)),210,25) as padraoatual\n\t\t\t\t\t\t\t\t\t\t\t from rhpessoal\n\t\t\t\t\t\t\t\t\t\t\t inner join rhpessoalmov on rh02_anousu = " . db_anofolha() . " \n\t\t\t\t\t\t\t\t\t\t\t and rh02_mesusu = " . db_mesfolha() . "\n\t\t\t\t\t\t\t\t\t\t\t and rh02_regist = rh01_regist\n\t\t\t\t\t\t\t\t\t\t\t left join rhlota on rhlota.r70_codigo = rhpessoalmov.rh02_lota\n\t\t\t\t\t\t\t\t\t\t\t and rhlota.r70_instit = rhpessoalmov.rh02_instit\n\t\t\t\t\t\t\t\t\t\t\t left join rhpesbanco on rh44_seqpes = rhpessoalmov.rh02_seqpes\n\t\t\t\t\t\t\t\t\t\t\t inner join cgm on cgm.z01_numcgm = rhpessoal.rh01_numcgm\n\t\t\t\t\t\t\t\t\t\t\t left join db_cgmruas on db_cgmruas.z01_numcgm = cgm.z01_numcgm\n\t\t\t\t\t\t\t\t\t\t\t left join ruas on ruas.j14_codigo = db_cgmruas.j14_codigo\n\t\t\t\t\t\t\t\t\t\t\t left join ruastipo on ruastipo.j88_codigo = ruas.j14_tipo\n\t\t\t\t\t\t\t\t\t\t\t inner join rhestcivil on rhestcivil.rh08_estciv = rhpessoal.rh01_estciv\n\t\t\t\t\t\t\t\t\t\t\t left join rhfuncao on rhfuncao.rh37_funcao = rhpessoal.rh01_funcao\n\t\t\t\t\t\t\t\t\t\t\t and rhfuncao.rh37_instit = rhpessoalmov.rh02_instit\n\t\t\t\t\t\t\t\t\t\t\t left join rhregime on rhregime.rh30_codreg = rhpessoalmov.rh02_codreg\n\t\t\t\t\t\t\t\t\t\t\t and rhregime.rh30_instit = rhpessoalmov.rh02_instit \n\t\t\t\t\t\t\t\t\t\t\t inner join rhinstrucao on rhinstrucao.rh21_instru = rhpessoal.rh01_instru\n\t\t\t\t\t\t\t\t\t\t\t left join rhpespadrao on rhpespadrao.rh03_seqpes = rhpessoalmov.rh02_seqpes \n\t\t\t\t\t\t\t\t\t\t\t left join rhpesrescisao on rh02_seqpes = rh05_seqpes\n\t\t\t\t\t\t\t\t\t\t\t where rhpessoal.rh01_regist = {$iMatric}"; $rsDadosServidor = $oRHPessoal->sql_record($sSqlDadosServidor); $oDadosServidor = db_utils::fieldsMemory($rsDadosServidor, 0); ?> <html> <head> <title><?php echo $w01_titulo; ?> </title> <meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1"> <link href="config/estilos.css" rel="stylesheet" type="text/css"> <link href="config/portalservidor.css" rel="stylesheet" type="text/css"> <script language="JavaScript" src="scripts/scripts.js"></script> <script language="JavaScript" src="scripts/db_script.js"></script> </head> <body leftmargin="0" topmargin="0" marginwidth="0" marginheight="0" bgcolor="<?php
$pdf1->descr12_1 = "\n" . $historico . "\n" . $k00_mensagemdesconto . "\n" . $pdf1->sMensagemContribuinte; $pdf1->pqllocal = $sPQLLocal; $pdf1->descr14 = $datavencimento; // vencimento $pdf1->descr10 = "1 / 1"; $pdf1->data_processamento = date('d/m/Y', db_getsession('DB_datausu')); $pdf1->tipo_exerc = $tipo_debito . " / " . $exerc; $pdf1->especie = "R\$"; $pdf1->dtparapag = $datavencimento; //date('d/m/Y',db_getsession('DB_datausu')); $pdf1->loteamento = $loteador; // ###################### BUSCA OS DADOS PARA IMPRIMIR O LOGO DO BANCO ######################### //verifica se é ficha e busca o codigo do banco if ($oRegraEmissao->isCobranca()) { $rsConsultaBanco = $cldb_bancos->sql_record($cldb_bancos->sql_query_file($oConvenio->getCodBanco())); $oBanco = db_utils::fieldsMemory($rsConsultaBanco, 0); $pdf1->numbanco = $oBanco->db90_codban . "-" . $oBanco->db90_digban; $pdf1->banco = $oBanco->db90_abrev; try { $pdf1->imagemlogo = $oConvenio->getImagemBanco(); } catch (Exception $eExeption) { db_redireciona("db_erros.php?fechar=true&db_erro=" . $eExeption->getMessage()); } } //############################################################# /** * Verifica se é um objeto db_impcarne */ if (!is_a($pdf1, "db_impcarne")) { $sMensagemErro = "Erro ao gerar recibo. Contate suporte! Não possui modelo do documento para emissão do boleto selecionado."; db_redireciona("db_erros.php?fechar=true&db_erro=" . $sMensagemErro);
</tr> <tr> <td width="50%" height="30" align="right"> Matrícula do Imóvel: </td> <td width="50%" height="30"> <input name="matricula1" type="text" class="digitacgccpf" id="matricula1" size="10" maxlength="10"> </td> </tr> <?php /* * Se o parametro de configuração do prefeitura on-line no dbportal, na tabela configdbpref, campo chamado w13_exigecpfcnpjmatricula * estiver como true é para exibir os campos cnpj e cpf para o usuário do dbpref */ $rsParametro = $clconfigdbpref->sql_record($clconfigdbpref->sql_query_file($iInstit, "w13_exigecpfcnpjmatricula")); $oRetorno = db_utils::fieldsMemory($rsParametro, 0); if ($oRetorno->w13_exigecpfcnpjmatricula == "t") { ?> <tr> <td width="50%" height="30" align="right"> CNPJ: </td> <td width="50%" height="30"> <input name="cgc" type="text" class="digitacgccpf" id="cgc" size="18" maxlength="18" onKeyPress="FormataCNPJ(this,event); return js_teclas(event);"> </td> </tr> <tr> <td width="50%" height="30" align="right"> CPF: </td>
/** * Função que calcula o valor total da inicial * */ function valorInicialAtualizado($iInicial, $dDtEmiss = null) { require_once "libs/db_sql.php"; $nValor = 0; $sSqlCertidoesInicial = "select v51_inicial, \n \t v13_certid, \n \t v13_dtemis \n \t from inicialcert\n \t inner join certid on v13_certid = v51_certidao \n \t where v51_inicial = {$iInicial} "; $rsCertidoesInicial = db_query($sSqlCertidoesInicial); for ($iCertidoesInicial = 0; $iCertidoesInicial < pg_num_rows($rsCertidoesInicial); $iCertidoesInicial++) { $oCertidoesInicial = db_utils::fieldsMemory($rsCertidoesInicial, $iCertidoesInicial); if ($dDtEmiss == null) { $dDtEmiss = $oCertidoesInicial->v13_dtemis; } $sSqlParcelamentos = " select v14_parcel, "; $sSqlParcelamentos .= " v07_numpre "; $sSqlParcelamentos .= " from certter"; $sSqlParcelamentos .= " inner join termo on v07_parcel = v14_parcel"; $sSqlParcelamentos .= " where v14_certid = {$oCertidoesInicial->v13_certid} "; $rsParcelamentos = db_query($sSqlParcelamentos); $iLinhasParcel = pg_num_rows($rsParcelamentos); for ($iIndParcel = 0; $iIndParcel < $iLinhasParcel; $iIndParcel++) { $oDadosParcel = db_utils::fieldsMemory($rsParcelamentos, $iIndParcel); $rsDadosDebitoCorrigido = debitos_numpre($oDadosParcel->v07_numpre, 0, 0, mktime(0, 0, 0, substr($dDtEmiss, 5, 2), substr($dDtEmiss, 8, 2), substr($dDtEmiss, 0, 4)), substr($dDtEmiss, 0, 4), 0); if ($rsDadosDebitoCorrigido != false) { $iLinhasDebito = pg_num_rows($rsDadosDebitoCorrigido); for ($iIndDebito = 0; $iIndDebito < $iLinhasDebito; $iIndDebito++) { $nValor += db_utils::fieldsMemory($rsDadosDebitoCorrigido, $iIndDebito)->total; } } } $sSqlDadosDebitos = " select distinct "; $sSqlDadosDebitos .= " k00_numpre, "; $sSqlDadosDebitos .= " k00_numpar "; $sSqlDadosDebitos .= " from certdiv"; $sSqlDadosDebitos .= " inner join divida on certdiv.v14_coddiv = divida.v01_coddiv"; $sSqlDadosDebitos .= " inner join arrecad on arrecad.k00_numpre = divida.v01_numpre "; $sSqlDadosDebitos .= " and arrecad.k00_numpar = divida.v01_numpar"; $sSqlDadosDebitos .= " where v14_certid in ({$oCertidoesInicial->v13_certid})"; $rsDadosDebitos = db_query($sSqlDadosDebitos); $iLinhasDadosDebitos = pg_num_rows($rsDadosDebitos); for ($iIndDadosDebitos = 0; $iIndDadosDebitos < $iLinhasDadosDebitos; $iIndDadosDebitos++) { $oDivida = db_utils::fieldsmemory($rsDadosDebitos, $iIndDadosDebitos); $rsDadosDebitoCorrigido = debitos_numpre($oDivida->k00_numpre, 0, 0, mktime(0, 0, 0, substr($dDtEmiss, 5, 2), substr($dDtEmiss, 8, 2), substr($dDtEmiss, 0, 4)), substr($dDtEmiss, 0, 4), $oDivida->k00_numpar); for ($iIndDebito = 0; $iIndDebito < pg_numrows($rsDadosDebitoCorrigido); $iIndDebito++) { $nValor += db_utils::fieldsMemory($rsDadosDebitoCorrigido, $iIndDebito)->total; } } } return $nValor; }
/** * Método responsável por setar na sessão a estrutura da folha de pagamento. * EX.: C/ Suplementar ou S/Suplementar * * @static * @access public * @param Integer $iInstituicao * @throws DBException */ public static function declararEstruturaFolhaPagamento($iInstituicao) { $oDaoCfPess = new cl_cfpess(); $sSqlSuplementar = $oDaoCfPess->sql_query_file(null, null, $iInstituicao, "distinct r11_suplementar::int"); $rsSuplementar = db_query($sSqlSuplementar); if (!$rsSuplementar) { throw new DBException("Ocorreu um erro ao declarar a estrutura da folha de pagamento."); } $oDadosSuplementar = db_utils::fieldsMemory($rsSuplementar, 0); db_putsession("DB_COMPLEMENTAR", (bool) $oDadosSuplementar->r11_suplementar); }
function db_varPatrimoniaisRpps($anousu, $dataini, $datafin, $iInstit) { $aVariacoesAtivo = array(); $aVariacoesPassivo = array(); $aVariacoesExtraAtivo = array(); $aVariacoesExtraPassivo = array(); (double) ($aVariacoesAtivo['ReceitasCorrentes'] = 0); (double) ($aVariacoesAtivo['ReceitasCapital'] = 0); (double) ($aVariacoesAtivo['IntraOrcamentarias'] = 0); (double) ($aVariacoesAtivo['TransferenciasFinanceirasRecebidas'] = 0); (double) ($aVariacoesAtivo['IncorporacaoAtivos'] = 0); (double) ($aVariacoesAtivo['DesincorporacaoPassivos'] = 0); (double) ($aVariacoesPassivo['DespesasCorrentes'] = 0); (double) ($aVariacoesPassivo['DespesasCapital'] = 0); (double) ($aVariacoesPassivo['IntraOrcamentarias'] = 0); (double) ($aVariacoesPassivo['DesincorporacaoAtivos'] = 0); (double) ($aVariacoesPassivo['IncorporacaoPassivos'] = 0); (double) ($aVariacoesExtraAtivo['TransferenciasFinanceirasRecebidas'] = 0); (double) ($aVariacoesExtraAtivo['MovimentoFundosDebito'] = 0); (double) ($aVariacoesExtraAtivo['IncorporacaoAtivos'] = 0); (double) ($aVariacoesExtraAtivo['DesincorporacaoPassivos'] = 0); (double) ($aVariacoesExtraAtivo['AjustesBensValoresCreditos'] = 0); (double) ($aVariacoesExtraAtivo['AjustesExerciciosAnteriores'] = 0); (double) ($aVariacoesExtraPassivo['TransferenciasFinanceirasConcedidas'] = 0); (double) ($aVariacoesExtraPassivo['MovimentoFundosCredito'] = 0); (double) ($aVariacoesExtraPassivo['DesincorporacaoAtivos'] = 0); (double) ($aVariacoesExtraPassivo['AjustesBensValoresCreditos'] = 0); (double) ($aVariacoesExtraPassivo['IncorporacaoPassivos'] = 0); // // Balancete de Receita (db_receitasaldo) // $sSqlFiltro = ' o70_instit = ' . $iInstit; $rsReceitaSaldo = db_receitasaldo(3, 1, 3, true, $sSqlFiltro, $anousu, $dataini, $datafin); $iNumrowsReceita = pg_num_rows($rsReceitaSaldo); // db_criatabela($rsReceitaSaldo);exit; for ($i = 0; $i < $iNumrowsReceita; $i++) { $oReceitaSaldo = db_utils::fieldsMemory($rsReceitaSaldo, $i); switch (substr($oReceitaSaldo->o57_fonte, 0, 4)) { case '4100': $aVariacoesAtivo['ReceitasCorrentes'] += (double) $oReceitaSaldo->saldo_arrecadado_acumulado; break; case '4200': $aVariacoesAtivo['ReceitasCapital'] += (double) $oReceitaSaldo->saldo_arrecadado_acumulado; break; case '4700': $aVariacoesAtivo['IntraOrcamentarias'] += (double) $oReceitaSaldo->saldo_arrecadado_acumulado; break; case '4800': $aVariacoesAtivo['IntraOrcamentarias'] += (double) $oReceitaSaldo->saldo_arrecadado_acumulado; break; } } // // Balancete de Despesa (db_dotacaosaldo) // $sCondicaoDotacao = 'w.o58_instit = ' . $iInstit; $rsDotacaoSaldo = db_dotacaosaldo(7, 3, 4, true, $sCondicaoDotacao, $anousu, $dataini, $datafin); $iNumRowsDotacaoSaldo = pg_num_rows($rsDotacaoSaldo); //db_criatabela($rsDotacaoSaldo); exit; for ($i = 0; $i < $iNumRowsDotacaoSaldo; $i++) { $oDotacaoSaldo = db_utils::fieldsMemory($rsDotacaoSaldo, $i); if (substr($oDotacaoSaldo->o58_elemento, 0, 2) == '33' && substr($oDotacaoSaldo->o58_elemento, 3, 2) != '91') { $aVariacoesPassivo['DespesasCorrentes'] += (double) $oDotacaoSaldo->liquidado_acumulado; } if (substr($oDotacaoSaldo->o58_elemento, 0, 2) == '34' && substr($oDotacaoSaldo->o58_elemento, 3, 2) != '91') { $aVariacoesPassivo['DespesasCapital'] += (double) $oDotacaoSaldo->liquidado_acumulado; } if ((substr($oDotacaoSaldo->o58_elemento, 0, 2) == '33' || substr($oDotacaoSaldo->o58_elemento, 0, 2) == '34') && substr($oDotacaoSaldo->o58_elemento, 3, 2) == '91') { $aVariacoesPassivo['IntraOrcamentarias'] += (double) $oDotacaoSaldo->liquidado_acumulado; } } // // Balancete de verificacao (db_planocontassaldo_matriz) // $sCondicaoConta = ' c61_instit = ' . $iInstit; $rsContaSaldo = db_planocontassaldo_matriz($anousu, $dataini, $datafin, false, $sCondicaoConta); $iNumRowsContaSaldo = pg_num_rows($rsContaSaldo); //db_criatabela($rsContaSaldo); exit; for ($i = 0; $i < $iNumRowsContaSaldo; $i++) { $oContaSaldo = db_utils::fieldsMemory($rsContaSaldo, $i); if (substr($oContaSaldo->estrutural, 0, 15) == '612000000000000') { $aVariacoesAtivo['TransferenciasFinanceirasRecebidas'] += (double) $oContaSaldo->saldo_final; } switch (substr($oContaSaldo->estrutural, 0, 15)) { case '613100000000000': $aVariacoesAtivo['IncorporacaoAtivos'] += (double) $oContaSaldo->saldo_final; break; case '613300000000000': $aVariacoesAtivo['DesincorporacaoPassivos'] += (double) $oContaSaldo->saldo_final; break; case '622200000000000': $aVariacoesExtraAtivo['TransferenciasFinanceirasRecebidas'] += (double) $oContaSaldo->saldo_final; break; case '622300000000000': $aVariacoesExtraAtivo['MovimentoFundosDebito'] += (double) $oContaSaldo->saldo_final; break; case '623100000000000': $aVariacoesExtraAtivo['IncorporacaoAtivos'] += (double) $oContaSaldo->saldo_final; break; case '623200000000000': $aVariacoesExtraAtivo['AjustesBensValoresCreditos'] += (double) $oContaSaldo->saldo_final; break; case '623300000000000': $aVariacoesExtraAtivo['DesincorporacaoPassivos'] += (double) $oContaSaldo->saldo_final; break; case '623800000000000': $aVariacoesExtraAtivo['AjustesExerciciosAnteriores'] += (double) $oContaSaldo->saldo_final; break; case '513100000000000': $aVariacoesPassivo['DesincorporacaoAtivos'] += (double) $oContaSaldo->saldo_final; break; case '513300000000000': $aVariacoesPassivo['IncorporacaoPassivos'] += (double) $oContaSaldo->saldo_final; break; case '522200000000000': $aVariacoesExtraPassivo['TransferenciasFinanceirasConcedidas'] += (double) $oContaSaldo->saldo_final; break; case '522300000000000': $aVariacoesExtraPassivo['MovimentoFundosCredito'] += (double) $oContaSaldo->saldo_final; break; case '523100000000000': $aVariacoesExtraPassivo['DesincorporacaoAtivos'] += (double) $oContaSaldo->saldo_final; break; case '523200000000000': $aVariacoesExtraPassivo['AjustesBensValoresCreditos'] += (double) $oContaSaldo->saldo_final; break; case '523300000000000': $aVariacoesExtraPassivo['IncorporacaoPassivos'] += (double) $oContaSaldo->saldo_final; break; } } //------------------------------------------------------------------------------------------------------------------------------------------------// // // Totalizadores // $aRetorno = array(); // Receitas $aRetorno['Ativo']['ReceitasCorrentes'] = $aVariacoesAtivo['ReceitasCorrentes']; $aRetorno['Ativo']['ReceitasCapital'] = $aVariacoesAtivo['ReceitasCapital']; $aRetorno['Ativo']['IntraOrcamentarias'] = $aVariacoesAtivo['IntraOrcamentarias']; $aRetorno['Ativo']['Receitas'] = $aVariacoesAtivo['ReceitasCorrentes'] + $aVariacoesAtivo['ReceitasCapital'] + $aVariacoesAtivo['IntraOrcamentarias']; // Interferencias Ativas $aRetorno['Ativo']['TransferenciasFinanceirasRecebidas'] = $aVariacoesAtivo['TransferenciasFinanceirasRecebidas']; $aRetorno['Ativo']['InterferenciasAtivas'] = $aVariacoesAtivo['TransferenciasFinanceirasRecebidas']; // Mutacoes Ativas $aRetorno['Ativo']['IncorporacaoAtivos'] = $aVariacoesAtivo['IncorporacaoAtivos']; $aRetorno['Ativo']['DesincorporacaoPassivos'] = $aVariacoesAtivo['DesincorporacaoPassivos']; $aRetorno['Ativo']['MutacoesAtivas'] = $aVariacoesAtivo['IncorporacaoAtivos'] + $aVariacoesAtivo['DesincorporacaoPassivos']; //Total Orcamentaria Ativa $aRetorno['Ativo']['TotalOrcamentariaAtiva'] = $aRetorno['Ativo']['Receitas'] + $aRetorno['Ativo']['InterferenciasAtivas'] + $aRetorno['Ativo']['MutacoesAtivas']; $aRetorno['Passivo']['DespesasCorrentes'] = $aVariacoesPassivo['DespesasCorrentes']; $aRetorno['Passivo']['DespesasCapital'] = $aVariacoesPassivo['DespesasCapital']; $aRetorno['Passivo']['IntraOrcamentarias'] = $aVariacoesPassivo['IntraOrcamentarias']; $aRetorno['Passivo']['Despesas'] = $aVariacoesPassivo['DespesasCorrentes'] + $aVariacoesPassivo['DespesasCapital'] + $aVariacoesPassivo['IntraOrcamentarias']; $aRetorno['Passivo']['DesincorporacaoAtivos'] = $aVariacoesPassivo['DesincorporacaoAtivos']; $aRetorno['Passivo']['IncorporacaoPassivos'] = $aVariacoesPassivo['IncorporacaoPassivos']; $aRetorno['Passivo']['MutacoesPassivas'] = $aVariacoesPassivo['DesincorporacaoAtivos'] + $aVariacoesPassivo['IncorporacaoPassivos']; // Total Orcamentaria Passiva $aRetorno['Passivo']['TotalOrcamentariaPassiva'] = $aRetorno['Passivo']['Despesas'] + $aRetorno['Passivo']['MutacoesPassivas']; // //Extra-Orcamentario // // Interferencias Ativas $aRetorno['AtivoExtra']['TransferenciasFinanceirasRecebidas'] = $aVariacoesExtraAtivo['TransferenciasFinanceirasRecebidas']; $aRetorno['AtivoExtra']['MovimentoFundosDebito'] = $aVariacoesExtraAtivo['MovimentoFundosDebito']; $aRetorno['AtivoExtra']['InterferenciasAtivas'] = $aVariacoesExtraAtivo['TransferenciasFinanceirasRecebidas'] + $aVariacoesExtraAtivo['MovimentoFundosDebito']; // Acrescimos Patrimoniais $aRetorno['AtivoExtra']['IncorporacaoAtivos'] = $aVariacoesExtraAtivo['IncorporacaoAtivos']; $aRetorno['AtivoExtra']['AjustesBensValoresCreditos'] = $aVariacoesExtraAtivo['AjustesBensValoresCreditos']; $aRetorno['AtivoExtra']['DesincorporacaoPassivos'] = $aVariacoesExtraAtivo['DesincorporacaoPassivos']; $aRetorno['AtivoExtra']['AjustesExerciciosAnteriores'] = $aVariacoesExtraAtivo['AjustesExerciciosAnteriores']; $aRetorno['AtivoExtra']['AcrescimosPatrimoniais'] = $aVariacoesExtraAtivo['IncorporacaoAtivos'] + $aVariacoesExtraAtivo['AjustesBensValoresCreditos'] + $aVariacoesExtraAtivo['DesincorporacaoPassivos']; // Total Ativo Extra-Orcamentario $aRetorno['AtivoExtra']['TotalAtivoExtra'] = $aRetorno['AtivoExtra']['InterferenciasAtivas'] + $aRetorno['AtivoExtra']['AcrescimosPatrimoniais']; // Interferencias Passivas $aRetorno['PassivoExtra']['TransferenciasFinanceirasConcedidas'] = $aVariacoesExtraPassivo['TransferenciasFinanceirasConcedidas']; $aRetorno['PassivoExtra']['MovimentoFundosCredito'] = $aVariacoesExtraPassivo['MovimentoFundosCredito']; $aRetorno['PassivoExtra']['InterferenciasPassivas'] = $aVariacoesExtraPassivo['TransferenciasFinanceirasConcedidas'] + $aVariacoesExtraPassivo['MovimentoFundosCredito']; //Descrescimos Patrimoniais $aRetorno['PassivoExtra']['DesincorporacaoAtivos'] = $aVariacoesExtraPassivo['DesincorporacaoAtivos']; $aRetorno['PassivoExtra']['AjustesBensValoresCreditos'] = $aVariacoesExtraPassivo['AjustesBensValoresCreditos']; $aRetorno['PassivoExtra']['IncorporacaoPassivos'] = $aVariacoesExtraPassivo['IncorporacaoPassivos']; $aRetorno['PassivoExtra']['DecrescimosPatrimoniais'] = $aVariacoesExtraPassivo['DesincorporacaoAtivos'] + $aVariacoesExtraPassivo['AjustesBensValoresCreditos'] + $aVariacoesExtraPassivo['IncorporacaoPassivos']; // Total Passivo Extra-Orcamentario $aRetorno['PassivoExtra']['TotalPassivoExtra'] = $aRetorno['PassivoExtra']['InterferenciasPassivas'] + $aRetorno['PassivoExtra']['DecrescimosPatrimoniais']; $aRetorno['TotaisAtivo']['Soma'] = $aRetorno['Ativo']['TotalOrcamentariaAtiva'] + $aRetorno['AtivoExtra']['TotalAtivoExtra']; $aRetorno['TotaisPassivo']['Soma'] = $aRetorno['Passivo']['TotalOrcamentariaPassiva'] + $aRetorno['PassivoExtra']['TotalPassivoExtra']; $nSomaAtivo = $aRetorno['TotaisAtivo']['Soma']; $nSomaPassivo = $aRetorno['TotaisPassivo']['Soma']; if ($nSomaAtivo - $nSomaPassivo < 0) { $nDeficitPatrimonial = abs($nSomaAtivo - $nSomaPassivo); (double) ($nTotalAtivo = $nSomaAtivo + abs($nSomaAtivo - $nSomaPassivo)); } else { $nDeficitPatrimonial = '-'; (double) ($nTotalAtivo = $nSomaAtivo); } if ($nSomaAtivo - $nSomaPassivo > 0) { $nSuperavitPatrimonial = $nSomaAtivo - $nSomaPassivo; (double) ($nTotalPassivo = $nSomaPassivo + abs($nSomaAtivo - $nSomaPassivo)); } else { $nSuperavitPatrimonial = '-'; (double) ($nTotalPassivo = $nSomaPassivo); } $aRetorno['TotaisAtivo']['TotalAtivo'] = $nTotalAtivo; $aRetorno['TotaisAtivo']['DeficitPatrimonial'] = $nDeficitPatrimonial; $aRetorno['TotaisPassivo']['TotalPassivo'] = $nTotalPassivo; $aRetorno['TotaisPassivo']['SuperavitPatrimonial'] = $nSuperavitPatrimonial; return $aRetorno; }
saude das lotacoes abaixo, deve imprimir os dados da instituicao prefeitura, somente para Marica. */ if ($oDbConfig->codcli == 19985) { if ($oRendimento->r70_codigo == 222 || $oRendimento->r70_codigo == 223) { $sSqlDbConfig = " select ender, "; $sSqlDbConfig .= " cgc, "; $sSqlDbConfig .= " nomeinst, "; $sSqlDbConfig .= " munic, "; $sSqlDbConfig .= " telef "; $sSqlDbConfig .= " from db_config "; $sSqlDbConfig .= " where codigo = (select codigo from db_config where prefeitura = true) "; $rsSqlDbConfig = db_query($sSqlDbConfig); $iNumRowsDbConfig = pg_num_rows($rsSqlDbConfig); if ($iNumRowsDbConfig > 0) { $oDbConfig2 = db_utils::fieldsMemory($rsSqlDbConfig, 0); $prefeitura = db_translate($oDbConfig2->nomeinst); $enderpref = db_translate($oDbConfig2->ender); $municpref = db_translate($oDbConfig2->munic); $telefpref = $oDbConfig2->telef; $cgcpref = $oDbConfig2->cgc; } } } /*=============================================================================================*/ /** * Informações de Cabeçalho */ $pdf1->prefeitura = $prefeitura; $pdf1->enderpref = $enderpref; $pdf1->municpref = $municpref;
/** * Retorna objeto com as configurções do módulo issqn * @return mixed boolean|object */ function getParametrosIssqn() { $sSql = $this->sql_query_file(); $rsSql = db_query($sSql); if (!$rsSql) { $this->erro_status = "0"; $this->erro_msg = "Erro ao Buscar Parametros do ISSQN."; return false; } $oParametrosISSQN = db_utils::fieldsMemory($rsSql, 0); return $oParametrosISSQN; }
$oArquivoEnviado = db_utils::postMemory($_FILES['arquivo']); $oPost = db_utils::postMemory($_POST); $oPost->cgc = str_replace(array("/", "-", ".", " "), '', $oPost->cgc); if ($oPost->cgc == '') { throw new Exception('Informe o CNPJ/CPF'); } if ($oPost->inscricaow == '') { throw new Exception('Informe a inscrição'); } $sSqlValidaDados = "select q02_numcgm "; $sSqlValidaDados .= " from issbase "; $sSqlValidaDados .= " inner join cgm on z01_numcgm = q02_numcgm "; $sSqlValidaDados .= " where q02_inscr = {$oPost->inscricaow} "; $sSqlValidaDados .= " and z01_cgccpf = '{$oPost->cgc}' "; $rsValidaDados = db_query($sSqlValidaDados); $oValidaDados = db_utils::fieldsMemory($rsValidaDados, 0); if (pg_numrows($rsValidaDados) == 0) { throw new Exception('Não encontrado inscrição para o CNPJ/CPF informado'); } $sNomeArquivo = 'tmp/' . date('Ymd_His') . '_' . $oArquivoEnviado->name; $lUpload = move_uploaded_file($oArquivoEnviado->tmp_name, $sNomeArquivo); /** * Ocorreu erro ao mover arquivo para pasta tmp */ if ($lUpload == false) { throw new Exception('Erro ao mover arquivo'); } $oLayout = new DBLayoutReader(190, $sNomeArquivo); /** * Verifica se arquivo é do tipo txt */