$sCamposAtendimentoLocal .= "nome as nome_ouvidor,";
$sCamposAtendimentoLocal .= "ov01_dataatend as data_atendimento,";
$sCamposAtendimentoLocal .= "ov01_horaatend as hora_atendimento,";
$sCamposAtendimentoLocal .= "ov01_requerente as nome_requerente,";
$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;
?>
*
* Do contrário todos os menus são mostrados normalmente.
*/
$lBloqueio = false;
$rsCodCli = db_query("select db21_codcli from db_config where prefeitura is true limit 1");
$iCodCli = db_utils::fieldsmemory($rsCodCli)->db21_codcli;
if ($iCodCli == 15) {
$lBloqueio = true;
}
/**
* Declara a estrutura da folha de pagamento conforme a instituição do servidor informado.
*/
try {
cl_cfpess::declararEstruturaFolhaPagamento($instituicao);
} catch (Exception $ex) {
db_msgbox($ex->getMessage());
}
/**
* Verifica para quais matriculas não deve ser exibido o menu de Comprovante
* de rendimentos atraves da seleção "MAT COMPR REND ECIDADEONLINE".
*/
$lComprovanteRendimentos = true;
$rsSelecaoMatriculas = db_query("select r44_where from selecao where r44_descr = 'MAT COMPR REND ECIDADEONLINE'");
if (pg_numrows($rsSelecaoMatriculas) > 0) {
$sMatriculasExcecao = db_utils::fieldsMemory($rsSelecaoMatriculas, 0)->r44_where;
$rsMatriculaExcecaoRendimentos = db_query("select rh01_regist from rhpessoal where {$matricula} in ({$sMatriculasExcecao})");
if (pg_numrows($rsMatriculaExcecaoRendimentos) > 0) {
$lComprovanteRendimentos = false;
}
}
?>
}
}
}
db_fim_transacao($sqlerro);
if ($sqlerro == true) {
db_msgbox($erro_msg);
}
if (isset($oPost->verificador) && $oPost->verificador == "") {
$sErro = true;
db_msgbox('Código Identificador dever ser Preenchido!');
} else {
if (isset($oPost->verificador) && $oPost->verificador != "") {
$clcertidaoweb->sql_record($clcertidaoweb->sql_query("", "codcert,cerdtvenc,ceracesso", "", "ceracesso = '" . $oPost->verificador . "'"));
if ($clcertidaoweb->numrows == 0) {
$sErro = true;
db_msgbox('Código de Autenticidade Inválido');
} else {
$sUrl = "toolbar=0,location=0,directories=0,status=0,menubar=0,scrollbars=1,resizable=1,height=500,width=700";
flush();
echo "\n <script>\n window.open('gerador.php?" . base64_encode('cod=' . $verificador) . "','','" . $sUrl . "');\n </script>";
}
}
}
}
?>
<html>
<head>
<title><?php
echo $w01_titulo;
?>
</title>
function estrutura_sistema($picture = null)
{
$rotuloc = new rotulocampo();
$clconparametro = new cl_conparametro();
$rotuloc->label($picture);
$title = "T" . $picture;
$label = "L" . $picture;
global ${$label}, ${$title}, ${$picture}, $mascara;
if (!class_exists('cl_conparametro')) {
db_msgbox('Classe conparametro não incluida!');
exit;
}
$result = $clconparametro->sql_record($clconparametro->sql_query_file("", "{$picture} as mascara"));
if ($clconparametro->numrows > 0) {
db_fieldsmemory($result, 0);
$tamanho = strlen($mascara);
} else {
db_msgbox('Configuração de Parametros não encontrada ! Contate o suporte !');
exit;
}
if ($this->funcao_onchange != null) {
if ($this->autocompletar == false && $this->reload == false) {
$funcao = $this->funcao_onchange;
} else {
$funcao = "onChange='js_mascara02_{$picture}(this.value);" . $this->funcao_onchange . ";'";
}
} else {
$funcao = "onChange=\"js_mascara02_{$picture}(this.value);\"";
}
if ($this->mascara == true && $this->input == false) {
?>
<tr>
<td nowrap title="Máscara do campo <?php
echo @$picture;
?>
">
<b>Máscara:</b>
</td>
<td>
<input name="mascara_<?php
echo $picture;
?>
" readonly disabled size='<?php
echo $this->size;
?>
' type="text" value="<?php
echo $mascara;
?>
" >
</td>
</tr>
<?php
}
if ($this->input == false) {
?>
<tr>
<td nowrap title="<?php
echo @${$title};
?>
">
<?php
echo @${$label};
?>
</td>
<td>
<?php
}
?>
<input title="<?php
echo @${$title};
?>
"
name="<?php
echo $picture;
?>
" maxlength='<?php
echo $tamanho;
?>
'
size='<?php
echo $this->size;
?>
' type="text" value="<?php
echo @${$picture};
?>
"
onKeyPress="return js_mascara01_<?php
echo $picture;
?>
(event,this.value);"
<?php
echo $funcao;
?>
<?php
echo $this->db_opcao == 22 || $this->db_opcao == 33 || $this->db_opcao == 3 ? "readonly style=\"background-color:#DEB887\" " : "";
?>
>
<?php
if ($this->botao == true) {
?>
<input name='verifica' type="button" value='Verificar' onclick="js_mascara02_<?php
echo $picture;
?>
(document.<?php
echo $this->nomeform;
?>
.<?php
echo $picture;
?>
.value);" <?php
echo $this->db_opcao == 22 || $this->db_opcao == 33 || $this->db_opcao == 3 ? "disabled " : "";
?>
>
<?php
}
?>
<?php
if ($this->input == false) {
?>
</td>
</tr>
<?php
}
?>
<script>
function js_mascara01_<?php
echo $picture;
?>
(evt,obj){
var evt = (evt) ? evt : (window.event) ? window.event : "";
if(evt.charCode >47 && evt.charCode <58 ){//8:backspace|46:delete|190:.
var str='<?php
echo $mascara;
?>
';
var tam=obj.length;
var dig=str.substr(tam,1);
if(dig=="."){
document.<?php
echo $this->nomeform;
?>
.<?php
echo $picture;
?>
.value=obj+".";
}
return true;
}else if(evt.charCode=='0'){
return true;
}else{
return false;
}
}
function js_mascara02_<?php
echo $picture;
?>
(obj){
var str='<?php
echo $mascara;
?>
';
var obj=document.<?php
echo $this->nomeform;
?>
.<?php
echo $picture;
?>
.value;
while(obj.search(/\./)!='-1'){
obj=obj.replace(/\./,'');
}
<?php
if ($this->autocompletar == true) {
?>
if(obj!=''){
var tam=<?php
echo strlen(str_replace(".", "", $mascara));
?>
;
for(var i=obj.length; i<tam; i++){
obj=obj+"0";
}
}
<?php
}
?>
//analise da estrutura passada
var nada='';
var matriz=str.split(nada);
var tam=matriz.length;
var arr=new Array();
var cont=0;
for(i=0; i<tam; i++){
if(matriz[i]=='.'){
arr[cont]=i;
cont++;
}
}
//fim
for(var i=0; i<arr.length; i++){
var pos=arr[i];
var strpos=obj.substr(pos,1);
if(strpos!='' && strpos!='.'){
ini=obj.slice(0,pos);
fim=obj.slice(pos);
obj=ini+"."+fim;
}
}
document.<?php
echo $this->nomeform;
?>
.<?php
echo $picture;
?>
.value=obj;
<?php
if ($this->reload == true) {
?>
obj=document.createElement('input');
obj.setAttribute('name','atualizar');
obj.setAttribute('type','hidden');
obj.setAttribute('value',"atualizar");
document.<?php
echo $this->nomeform;
?>
.appendChild(obj);
document.<?php
echo $this->nomeform;
?>
.submit();
<?php
}
?>
}
function js_mascara03_<?php
echo $picture;
?>
(obj){
obj=document.<?php
echo $this->nomeform;
?>
.<?php
echo $picture;
?>
.value;
while(obj.search(/\./)!='-1'){
obj=obj.replace(/\./,'');
}
<?php
if ($this->autocompletar == true) {
?>
tam=<?php
echo strlen(str_replace(".", "", $mascara));
?>
;
for(i=obj.length; i<tam; i++){
obj=obj+"0";
}
<?php
}
?>
//analise da estrutura passada
var str='<?php
echo $mascara;
?>
';
var nada='';
var matriz=str.split(nada);
var tam=matriz.length;
var arr=new Array();
var cont=0;
for(var i=0; i<tam; i++){
if(matriz[i]=='.'){
arr[cont]=i;
cont++;
}
}
//fim
for(var i=0; i<arr.length; i++){
pos=arr[i];
strpos=obj.substr(pos,1);
if(strpos!='' && strpos!='.'){
ini=obj.slice(0,pos);
fim=obj.slice(pos);
obj=ini+"."+fim;
}
}
document.<?php
echo $this->nomeform;
?>
.<?php
echo $picture;
?>
.value=obj;
}
</script>
<?php
$this->nomeform = "form1";
$this->reload = false;
$this->size = '50';
$this->mascara = true;
$this->input = false;
$this->db_opcao = 1;
$this->funcao_onchange = null;
$this->autocompletar = false;
$this->botao = false;
}
$sSqlVerifica = " select q10_numcgm, ";
$sSqlVerifica .= " q10_inscr ";
$sSqlVerifica .= " from escrito ";
$sSqlVerifica .= " where q10_numcgm = {$id_usuario} ";
$sSqlVerifica .= " and q10_inscr = {$iInscricao} ";
$sSqlVerifica .= " union ";
$sSqlVerifica .= " select q02_numcgm, ";
$sSqlVerifica .= " q02_inscr ";
$sSqlVerifica .= " from issbase ";
$sSqlVerifica .= " where q02_numcgm = {$id_usuario} ";
$sSqlVerifica .= " and q02_inscr = {$iInscricao} ";
$rsVerificaInscricao = db_query($sSqlVerifica);
$iVerificaInscricao = pg_numrows($rsVerificaInscricao);
if ($iVerificaInscricao == 0) {
$sUrl = base64_encode("id_usuario=" . $id_usuario . "&opcao=i&inscricao=" . $iInscricao);
db_msgbox("Não é permitido fazer consultas que não estejam ligadas ao seu CGM.");
db_redireciona("certidaoinscr003.php?" . $sUrl);
}
}
}
if (!session_is_registered("DB_processacaptcha")) {
session_register("DB_processacaptcha");
$_SESSION["DB_processacaptcha"] = false;
} else {
$_SESSION["DB_processacaptcha"] = false;
}
$sqlmenu = " select funcao ";
$sqlmenu .= " from db_itensmenu ";
$sqlmenu .= " where id_item = 5468 ";
$resultmenu = db_query($sqlmenu);
$linhasmenu = pg_num_rows($resultmenu);
$clcancdebitos->excluir($cancdebitos2[$b]);
if ($clcancdebitos->erro_status == 0) {
$sqlerro = true;
$erro = "exclução da cancdebitos..." . $clcancdebitos->erro_sql;
}
}
}
}
// $sqlerro =true;
db_fim_transacao($sqlerro);
}
if (isset($cancelar)) {
if ($sqlerro == true) {
db_msgbox("erro = {$erro}");
} else {
db_msgbox("Cancelamento efetuado com sucesso.");
}
}
$sql = "SELECT ISSVAR.*, ARREINSCR.* FROM ARREINSCR\n\t INNER JOIN ISSVAR ON ISSVAR.Q05_NUMPRE = ARREINSCR.K00_NUMPRE \n\t\t INNER JOIN ARRECANT ON ARRECANT.K00_NUMPRE = Q05_NUMPRE AND K00_NUMPAR = ISSVAR.Q05_NUMPAR \n\t\t WHERE ARRECANT.K00_VALOR='0' AND K00_INSCR = {$inscr} AND Q05_VALOR = 0 ORDER BY Q05_ANO, Q05_MES";
$result = pg_exec($sql);
$linhas = pg_num_rows($result);
?>
<html>
<head>
<title><?php
echo $w01_titulo;
?>
</title>
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
<link rel="stylesheet" type="text/css" href="include/estilodai.css" >
<script language="JavaScript" src="scripts/db_script.js"></script>
$sql_config = "select * from configdbpref where w13_instit = {$instit}";
$result_config = pg_query($sql_config);
$iNumRowns = pg_num_rows($result_config);
db_fieldsmemory($result_config, 0);
if ($certidao == "positiva") {
if ($w13_libcertpos == 't') {
if ($iNumRowns == 0) {
$sMsg = "As informações e/ou condições disponíveis são insuficientes para a emissão de certidão negativa por meio da Internet.";
$sMsg .= "Para maiores informações, dirija-se ao órgão competente da Administração Municipal.";
db_msgbox($sMsg);
}
echo "\n\t\t\t<table width=\"100%\" border=\"0\" cellspacing=\"0\" cellpadding=\"0\">\n\t\t\t<tr>\n\t\t\t<td align='center'>\n\t\t\t\t<a href=\"javascript:js_certidao(1,'{$titulo}','{$origem}', '{$individualconjunta}')\">CERTIDÃO POSITIVA {$link}</a>\n\t\t\t</td>\n\t\t\t</tr>\n\t\t\t</table>\n";
} else {
//db_msgbox("Certidão não liberada pelo site, procure a Prefeitura.");
if ($i == 0) {
db_msgbox("As informações e/ou condições disponíveis são insuficientes para a emissão de certidão negativa por meio da Internet. Para maiores informações, dirija-se ao órgão competente da Administração Municipal.");
}
}
} elseif ($certidao == "regular") {
echo "\n\t\t<table width=\"100%\" border=\"0\" cellspacing=\"0\" cellpadding=\"0\">\n\t\t<tr>\n\t\t<td align='center'>\n\t\t\t<a href=\"javascript:js_certidao(0,'{$titulo}','{$origem}', '{$individualconjunta}')\">CERTIDÃO REGULAR {$link}</a>\n\t\t</td>\n\t\t</tr>\n\t\t</table>\n";
} elseif ($certidao == "negativa") {
echo "\n\t\t<table width=\"100%\" border=\"0\" cellspacing=\"0\" cellpadding=\"0\">\n\t\t<tr>\n\t\t<td align='center'>\n\t\t\t<a href=\"javascript:js_certidao(2,'{$titulo}','{$origem}', '{$individualconjunta}')\">CERTIDÃO NEGATIVA {$link}</a>\n\t\t</td>\n\t\t</tr>\n\t\t</table>\n";
}
}
?>
<br/>
<input type="submit" value="Voltar" class="botao" onclick="js_voltar();">
</center>
</td>
</tr>
$sqlReceitas .= " (select (select k02_codigo from tabrec where k02_recjur = k00_receit or k02_recmul = k00_receit limit 1) is not null ) as codtipo,";
//$sqlReceitas .= " fc_calcula(a.k00_numpre,a.k00_numpar,a.k00_receit,'".date('Y-m-d',$H_DATAUSU)."','".date('Y-m-d',$H_DATAUSU)."',".$H_ANOUSU.")";
$sqlReceitas .= " fc_calcula(a.k00_numpre,a.k00_numpar,a.k00_receit,a.k00_dtvenc,a.k00_dtvenc," . db_getsession('DB_anousu') . ") ";
$sqlReceitas .= " from arrecad a";
$sqlReceitas .= " inner join tabrec on tabrec.k02_codigo = a.k00_receit ";
$sqlReceitas .= " left join taborc on tabrec.k02_codigo = taborc.k02_codigo ";
$sqlReceitas .= " and taborc.k02_anousu = " . db_getsession('DB_anousu') . "";
$sqlReceitas .= " left join tabplan on tabrec.k02_codigo = tabplan.k02_codigo ";
$sqlReceitas .= " and tabplan.k02_anousu = " . db_getsession('DB_anousu') . "";
$sqlReceitas .= " where k00_numpre = {$k00_numpre} ";
$sqlReceitas .= " and k00_numpar = {$k00_numpar} ";
} else {
$sqlReceitas = " select k00_tipo as codtipo\n from arrecad where k00_numpre = {$k00_numpre}";
$rsReceitas = db_query($sqlReceitas);
if (pg_numrows($rsReceitas) == 0) {
db_msgbox("Não encontrado arrecad ({$k00_numpre}).");
exit;
}
db_fieldsmemory($rsReceitas, 0);
$sqlReceitas = " select k00_receit as codreceita, ";
$sqlReceitas .= " k02_descr as descrreceita, ";
$sqlReceitas .= " case when taborc.k02_codigo is not null then k02_codrec ";
$sqlReceitas .= " when tabplan.k02_codigo is not null then k02_reduz ";
$sqlReceitas .= " end as reduzreceita, ";
$sqlReceitas .= " k00_valor as valreceita, ";
$sqlReceitas .= " k00_valor as fc_calcula";
$sqlReceitas .= " from recibopaga a";
$sqlReceitas .= " inner join tabrec on tabrec.k02_codigo = a.k00_receit ";
$sqlReceitas .= " left join taborc on tabrec.k02_codigo = taborc.k02_codigo ";
$sqlReceitas .= " and taborc.k02_anousu = " . db_getsession('DB_anousu') . "";
$sqlReceitas .= " left join tabplan on tabrec.k02_codigo = tabplan.k02_codigo ";
'q21_aliq' => "\$q21_aliq . '%';",
'q21_valor' => "db_formatar(\$q21_valor, 'f');"
);
*/
if (isset($planilha)) {
if ($planilha != "" || $planilha != 0) {
$sql = "select *,\n\t\t\t\t\t\t\t\t\t\tcase when q21_tipolanc = 1 then 'Tomado' \n\t\t\t\t\t\t\t\t\t\t\t\telse 'Prestado' \n\t\t\t\t\t\t\t\t\t\tend as tipolanc\n\t\t\t\t\t\t\t\t\tfrom issplanit \n\t\t\t\t\t\t\t\t\tleft join issplanitinscr on q21_sequencial=q31_issplanit \n\t\t\t\t\t\t\t\t\twhere q21_planilha= {$planilha} and q21_status = 1\n\t\t\t\t\t\t\t\t\torder by q21_tipolanc,q21_datanota";
//monta_tabela($sql,$parametro);
//die($sql);
$resultx = db_query($sql);
$linhax = pg_num_rows($resultx);
// db_msgbox("nnnnnnnnnnn".$int_max." lin=".$linhax);
if ($linhax > 0) {
if ($linhax > $int_max) {
db_msgbox("Voce deve criar outra planilha");
echo "<script> document.form1.grava.style.visibility='hidden';\n\t\t\t\t\t </script>";
}
for ($x = 0; $x < $linhax; $x++) {
db_fieldsmemory($resultx, $x);
echo "\n\t\t\t\t\t\t\t\t\t\t\t<tr>\n\t\t\t\t\t\t\t\t\t\t\t<td align= 'center'>{$tipolanc}</td>\n\t\t\t\t\t\t\t\t\t\t\t<td align= 'center'>{$q31_inscr}</td>\n\t\t\t\t\t\t\t\t\t\t\t<td align= 'left'>" . db_cgccpf($q21_cnpj) . "</td>\n\t\t\t\t\t\t\t\t\t\t\t<td align= 'left'>{$q21_nome}</td>\n\t\t\t\t\t\t\t\t\t\t\t<td align= 'center'>{$q21_nota}</td>\n\t\t\t\t\t\t\t\t\t\t\t<td align= 'center'>{$q21_serie}</td>\n\t\t\t\t\t\t\t\t";
if ($q21_datanota != "") {
echo "<td align= 'center'>" . db_formatar($q21_datanota, "d") . "</td>";
} else {
echo "<td align= 'center'></td>";
}
echo "\n\t\t\t\t\t\t\t\t\t\t\t<td align= 'right'>" . db_formatar($q21_valorbase, 'f') . "</td>\n\t\t\t\t\t\t\t\t\t\t\t<td align= 'center'>{$q21_aliq}%</td>\n\t\t\t\t\t\t\t\t\t\t\t<td align= 'right'>" . db_formatar($q21_valor, 'f') . "</td>\n\t\t\t\t\t\t\t\t\t\t\t<td width= '150px'>\n\t\t\t\t\t\t\t \t <input class=\"botao\" name=\"alterar teste\" type=\"button\" value=\"Alterar\" onClick=\"js_alterar('{$q31_sequencial}','{$q31_inscr}','{$q21_sequencial}','{$q21_planilha}','{$q21_cnpj}','{$q21_nome}','{$q21_servico}','{$q21_nota}','{$q21_serie}','{$q21_valorser}','{$q21_aliq}','{$q21_valor}','{$q21_tipolanc}','{$q21_situacao}','{$q21_valordeducao}','{$q21_valorbase}','{$q21_retido}','{$q21_obs}','{$q21_valorimposto}', '" . db_formatar($q21_datanota, "d") . "')\">\n\t\t\t\t\t\t\t\t\t\t \t<input class=\"botao\" name=\"excluir\" type=\"submit\" value=\"Excluir\" onClick=\"js_excluir('{$q21_sequencial}','{$q31_sequencial}')\">\n\t\t\t\t\t\t\t\t\t\t\t</td>\n\t\t\t\t\t\t\t\t\t\t\t</tr>\n\n";
}
}
}
echo "<script> document.form1.proximo.style.visibility='visible'; </script>";
$config = pg_exec("select * from db_config where codigo = " . db_getsession("DB_instit"));
db_fieldsmemory($config, 0);
$numpre = db_numpre_sp($numpre, 1);
if ($formvencfebraban == 1) {
$db_dtvenc = str_replace("-", "", $datavencimento);
$vencbar = $db_dtvenc . '000000';
} elseif ($formvencfebraban == 2) {
$db_dtvenc = str_replace("-", "", $datavencimento);
$db_dtvenc = substr($db_dtvenc, 6, 2) . substr($db_dtvenc, 4, 2) . substr($db_dtvenc, 2, 2);
$vencbar = $db_dtvenc . '00000000';
}
$inibar = "8" . $segmento . "6";
$resultcod = pg_exec("select fc_febraban('{$inibar}'||'{$vlrbar}'||'" . $numbanco . "'||'" . $vencbar . "'||'{$numpre}')");
$fc_febraban = pg_result($resultcod, 0, 0);
if ($fc_febraban == "") {
db_msgbox("Erro ao gerar codigo de barras (3)!");
exit;
}
$codigo_barras = substr($fc_febraban, 0, strpos($fc_febraban, ','));
$linha_digitavel = substr($fc_febraban, strpos($fc_febraban, ',') + 1);
/************************************************************* R E C I B O I T B I *************************************************************************************/
$pdf = new scpdf();
$pdf->Open();
$pdf->settopmargin(5);
$pdf->AliasNbPages();
$pdf->AddPage();
$pdf->SetFillColor(235);
$altura = 3.5;
for ($i = 1; $i < 3; $i++) {
$pdf->SetFillColor(235);
$y = $pdf->gety() - 2;
//cgmatualizaliga se cgm não for novo
if ($w11_cgmnovo == "f") {
$cldb_cgmatualizaliga->w12_cgmatualiza = $cldb_cgmatualiza->w11_sequencial;
$cldb_cgmatualizaliga->w12_numcgm = $w11_numcgm;
$cldb_cgmatualizaliga->incluir(null);
}
} else {
db_fieldsmemory($result2, 0);
//update
$cldb_cgmatualiza->alterar($w11_sequencial);
}
db_fim_transacao();
if ($cldb_cgmatualiza->erro_status == "0") {
@$cldb_cgmatualiza->erro();
} else {
db_msgbox("Seus dados foram encaminhados para análise.");
//encaminhar email
$mensagemDestinatario = "\n{$nomeinst}\nAtualização/Pedido de CGM - Prefeitura On-Line\n----------------------------\nNome: {$w11_nome}\nCPF/CNPJ: {$w11_cgccpf}\nE-mail: {$w11_email}\n\n" . date("d/m/Y - H:i:s") . " - " . getenv("REMOTE_ADDR") . "\nSeus dados do CGM foram encaminhados para análise.\nAguarde retorno sobre seu pedido.\n\n{$url}\n\nNão responda este e-mail, ele foi gerado automaticamente pelo Servidor.\n----------------------------\n";
//$headers = "Content-Type:text\n Bcc: $email";
//$enviando = mail($w11_email,"Prefeitura On-Line - Atualização/Pedido de CGM",$mensagemDestinatario,$headers);
$rsConsultaConfigDBPref = $clconfigdbpref->sql_record($clconfigdbpref->sql_query_file(db_getsession('DB_instit'), "w13_emailadmin"));
db_fieldsmemory($rsConsultaConfigDBPref, 0);
$oMail = new Smtp();
$oMail->Send($w11_email, $w13_emailadmin, 'Prefeitura On-Line - Atualização/Pedido de CGM', $mensagemDestinatario);
db_redireciona("centro_pref.php");
}
}
?>
<html>
<head>
<title><?php
$clcertidaoweb->codcert = $clcertidao->p50_sequencial;
$clcertidaoweb->tipocer = $tipo;
$clcertidaoweb->cerdtemite = $ano . "-" . $mes1 . "-" . $dia;
$clcertidaoweb->cerhora = $hora . ":" . $min . ":" . $sec;
$clcertidaoweb->cerdtvenc = $venc;
$clcertidaoweb->cerip = $ip;
$clcertidaoweb->ceracesso = $t1;
$clcertidaoweb->cercertidao = $oidgrava;
$clcertidaoweb->cernomecontr = addslashes($z01_nome);
$clcertidaoweb->cerhtml = "x";
$clcertidaoweb->cerweb = 'true';
$clcertidaoweb->incluir();
$erro_msg = $clcertidaoweb->erro_msg;
if ($clcertidaoweb->erro_status == 0) {
$sqlerro = true;
db_msgbox("Erro ao gerar certidao. ERRO: " . $erro_msg);
exit;
}
/**
* Grava arquivo da certidao também na tabela certidao
*/
$clcertidao->p50_arquivo = $oidgrava;
$clcertidao->alterar($clcertidao->p50_sequencial);
$objeto = pg_lo_open($conn, $oidgrava, "w");
if ($objeto != false) {
$erro = pg_lo_write($objeto, $dados);
pg_lo_close($objeto);
} else {
$sqlerro = true;
}
}
function validaRegra($iRgr, $iCgm, $iInscr, $iCgcCpf, $iTipo)
{
$iRegra = $iRgr;
$iNumCgm = $iCgm;
$iNumInscr = $iInscr;
$iNumCgcCpf = $iCgcCpf;
$iTipoLanc = $iTipo;
if (isset($iRegra)) {
if ($iTipoLanc == 0 || $iTipoLanc == 1) {
$sExit = "EXIT";
}
if ($iNumInscr == "" || $iNumCgcCpf == "") {
db_redireciona($_SERVER['REQUEST_URI']);
} else {
$sqlEscrito = " select * \n\t from escrito \n\t where q10_inscr = {$iNumInscr}\n\t and q10_numcgm = {$iNumCgm} ";
//die($sqlEscrito);
$rsEscrito = pg_query($sqlEscrito);
$iEscrito = pg_numrows($rsEscrito);
$oEscrito = db_utils::fieldsMemory($rsEscrito, 0);
if ($iEscrito > 0) {
if ($iTipoLanc == 0) {
if ($iRegra == 3 && $oEscrito->q10_dtfim == "" || $iRegra == 5 && $oEscrito->q10_dtfim == "") {
if ($oEscrito->q10_inscr == $iNumInscr) {
$sMsg = "ATENÇÃO! Inscrição {$iNumInscr} já Lançada como Cliente.\\n - Informe apenas seu novo Cliente.";
}
db_msgbox($sMsg);
db_redireciona($_SERVER['REQUEST_URI']);
exit;
}
}
if ($iRegra == 2 && $sExit == "EXIT" && $oEscrito->q10_dtfim == "" || $iRegra == 4 && $sExit == "EXIT" && $oEscrito->q10_dtfim == "") {
if ($oEscrito->q10_inscr == $iNumInscr) {
$sMsg = "ATENÇÃO! Inscrição {$iNumInscr} já Lançada como Cliente.\\n - Informe apenas seu novo Cliente.";
}
db_msgbox($sMsg);
db_redireciona($_SERVER['REQUEST_URI']);
exit;
}
if ($iTipoLanc == 1 && $oEscrito->q10_numcgm == $iNumCgm) {
if ($iRegra == 2 && $oEscrito->q10_dtfim == "" || $iRegra == 4 && $oEscrito->q10_dtfim == "") {
if ($oEscrito->q10_inscr == $iNumInscr) {
$sMsg = "ATENÇÃO! Inscrição {$iNumInscr} já Lançada como Cliente.\\n - Informe apenas seu novo Cliente.";
db_msgbox($sMsg);
db_redireciona($_SERVER['REQUEST_URI']);
exit;
} else {
$sMsg = "ATENÇÃO! Inscrição {$iNumInscr} já Pertence a outro Escritório.\\n - Informe apenas seu novo Cliente.";
db_msgbox($sMsg);
db_redireciona($_SERVER['REQUEST_URI']);
exit;
}
} else {
if ($iRegra == 3 && $oEscrito->q10_dtfim == "" || $iRegra == 5 && $oEscrito->q10_dtfim == "") {
if ($oEscrito->q10_inscr == $iNumInscr) {
$sMsg = "ATENÇÃO! Inscrição {$iNumInscr} já Lançada como Cliente.";
db_msgbox($sMsg);
db_redireciona($_SERVER['REQUEST_URI']);
exit;
} else {
$sMsg = "ATENÇÃO! Inscrição {$iNumInscr} já Pertence a outro Escritório.";
db_msgbox($sMsg);
}
}
}
} else {
if ($iTipoLanc == 1 && $oEscrito->q10_numcgm != $iNumCgm) {
if ($iRegra == 2 && $oEscrito->q10_dtfim == "" || $iRegra == 4 && $oEscrito->q10_dtfim == "") {
$sMsg = "ATENÇÂO! Inscrição {$iNumInscr} Pertence a outro Escritório.";
db_msgbox($sMsg);
db_redireciona($_SERVER['REQUEST_URI']);
exit;
} else {
if ($iRegra == 3 && $oEscrito->q10_dtfim == "" || $iRegra == 5 && $oEscrito->q10_dtfim == "") {
$sMsg = "ATENÇÂO! Inscrição {$iNumInscr} Pertence a outro Escritório.";
db_msgbox($sMsg);
}
}
} else {
if ($iTipoLanc == 2 && $oEscrito->q10_numcgm != $iNumCgm) {
echo "1";
if ($iRegra == 2 && $oEscrito->q10_dtfim == "" || $iRegra == 4 && $oEscrito->q10_dtfim == "") {
$sMsg = "ATENÇÂO! Inscrição {$iNumInscr} não Cadastrada neste Escritório.\\n - Informe apenas seus Ex Clientes.";
db_msgbox($sMsg);
db_redireciona($_SERVER['REQUEST_URI']);
exit;
} else {
if ($iRegra == 3 && $oEscrito->q10_dtfim == "" || $iRegra == 5 && $oEscrito->q10_dtfim == "") {
$sMsg = "ATENÇÂO! Inscrição {$iNumInscr} não Cadastrada como Ex Cliente de um Escritório.";
db_msgbox($sMsg);
}
}
}
}
}
if ($iTipoLanc == 2 && $oEscrito->q10_dtfim != "") {
if ($oEscrito->q10_inscr == $iNumInscr) {
$sMsg = "ATENÇÂO! Inscrição {$iNumInscr} já Cadastrada como Ex Cliente de um Escritório.";
$sMsg .= "\\n - Informe apenas seus Ex Clientes.";
}
db_msgbox($sMsg);
db_redireciona($_SERVER['REQUEST_URI']);
exit;
}
} else {
if ($iTipoLanc == 2) {
if ($iRegra == 2 || $iRegra == 3 || $iRegra == 4 || $iRegra == 5) {
$sMsg = "ATENÇÂO! Inscrição {$iNumInscr} não Cadastrada como Cliente.";
db_msgbox($sMsg);
db_redireciona($_SERVER['REQUEST_URI']);
exit;
}
}
}
///verifica se inscr já está na tabela listainscr
$sqlListainscr = " select * \n from listainscr\n inner join listainscrcab on p11_codigo = p12_codigo\n where p12_inscr = {$iNumInscr}\n and p12_codigo = p11_codigo \n and p11_processado = 'f' ";
$rsListainscr = pg_query($sqlListainscr);
$iListainscr = pg_numrows($rsListainscr);
if ($iListainscr > 0) {
$oListainscr = db_utils::fieldsMemory($rsListainscr, 0);
if ($oListainscr->p12_codigo == "") {
echo "ERRO (212)! Contate o Suporte...";
exit;
}
if ($iTipoLanc == 1) {
$sMsg = "ATENÇÃO! A inscrição {$iNumInscr} já está vinculada a uma lista não processada.\\n";
$sMsg .= "Para maiores informações entre em contato com a Prefeitura...";
db_msgbox($sMsg);
db_redireciona($_SERVER['REQUEST_URI']);
exit;
} else {
$sMsg = "ATENÇÃO! A inscrição {$iNumInscr} já Lançada como Cliente.";
db_msgbox($sMsg);
db_redireciona($_SERVER['REQUEST_URI']);
exit;
}
}
if ($iRegra == 4 || $iRegra == 5) {
$sqlVerificaBaixa = " select cgm.z01_nome,\n\t\t\t cgm.z01_cgccpf,\n\t\t\t q02_dtbaix\n\t\t\t from issbase \n\t\t\t inner join cgm on cgm.z01_numcgm = issbase.q02_numcgm \n\t\t\t left join escrito on escrito.q10_inscr = q02_inscr \n\t\t\t where issbase.q02_inscr = {$iNumInscr} ";
$rsVerificaBaixa = pg_query($sqlVerificaBaixa);
$iVerificaBaixa = pg_numrows($rsVerificaBaixa);
if ($iVerificaBaixa > 0) {
$oVerificaBaixa = db_utils::fieldsMemory($rsVerificaBaixa, 0);
}
if ($oVerificaBaixa->q02_dtbaix != "" && $iTipoLanc == 2) {
$sMsg = "Inscrição Baixada - Contate a Prefeitura.";
db_msgbox($sMsg);
} else {
if ($oVerificaBaixa->q02_dtbaix != "") {
$sMsg = "Inscrição Baixada - Contate a Prefeitura.";
db_msgbox($sMsg);
db_redireciona($_SERVER['REQUEST_URI']);
}
}
}
}
}
}
echo "<script>location.href='recibo.php?erropdf=true&pdf=$q20_numpre&CHECK1=".$q20_numpre."P1&ver_inscr=".$q24_inscr."&tipo=".$tipo."&dtpaga=".$dtpaga."';</script>";
}
*/
}
// verifica se tem ordem de pagamewnto para esta planilha
$sqlpla = "select q96_pagordem from issplanitop \n\t\t inner join issplanit on q96_issplanit = q21_sequencial \n\t\t inner join issplan on q20_planilha = q21_planilha \n\t\t where q20_planilha = {$planilha} limit 1";
$resultpla = pg_query($sqlpla);
$linhaspla = pg_num_rows($resultpla);
if ($linhaspla > 0) {
db_fieldsmemory($resultpla, 0);
// se tiver ordem grava na cairetordem
$cl_cairetordem->k32_numpre = $q20_numpre;
$cl_cairetordem->k32_ordpag = $q96_pagordem;
$cl_cairetordem->incluir(null);
if ($cl_cairetordem->erro_status == '0') {
db_msgbox("{$cl_cairetordem->erro_msg}");
pg_query("rollback");
}
}
db_fim_transacao($sqlerro);
} else {
// se não foi alterado os dados da planilha depois de emitir o recibo
// alterar a situação para 4 .........................................................
$clquery->sql_update("issplan", "q20_situacao= 4", "q20_planilha = {$planilha}");
$clquery->sql_query("issvar left join arreinscr on q05_numpre = k00_numpre inner join arrecad on arrecad.k00_numpre = issvar.q05_numpre", " q05_ano,q05_mes,k00_dtvenc ", "", " q05_numpre = " . $q20_numpre);
$clquery->sql_record($clquery->sql);
if ($clquery->numrows == 0) {
echo "<script>window.close();window.opener.alert(' Não é possivel gerar recibo. Por favor, contate com a prefeitura.');window.opener.location.href='digitaissqn.php'</script>";
exit;
}
db_fieldsmemory($clquery->result, 0);
function db_alerta_erro_eval($registro, $formula, $rubrica)
{
$saida = ob_get_contents();
ob_end_clean();
if (strpos($saida, "Parse error") > 0) {
db_msgbox("Erro na Formula : " . $formula . " \\n\\n Matricula : " . $registro . " \\n\\n Rubrica : " . $rubrica . " \\n\\n Contate o Suporte !!");
exit;
}
}
$_SESSION["dbprefcgm"] = $cgm;
$_SESSION["dbprefempresa"] = $dbprefempresa;
echo "<script> location.href='cadempresaaba01.php?pessoa={$pessoa}&cpf_cnpj={$cpf_cnpj}&opcao=2';</script>";
} else {
db_msgbox("Empresa ja cadastrada por outro usuário");
}
} else {
session_register("dbprefcgm");
session_register("dbprefempresa");
$_SESSION["dbprefcgm"] = "";
$_SESSION["dbprefempresa"] = "";
echo "<script> location.href='cadempresaaba01.php?pessoa={$pessoa}&cpf_cnpj={$cpf_cnpj}&opcao=1';</script>";
}
}
} else {
db_msgbox("Informe o CPF/CNPJ.");
}
}
?>
<html>
<head>
<title><?php
echo $w01_titulo;
?>
</title>
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
<script language="JavaScript" src="scripts/db_script.js"></script>
<style type="text/css">
<?php
db_estilosite();
<input name="voltar" value="Voltar" type="button" class="botao" onclick="js_voltar(1);">
</td>
</tr>
</table>
</form>
</center>
</body>
<html>
<?php
if (isset($anular)) {
if ($sqlerro == true) {
//db_msgbox($erro_msg);
db_msgbox("Anulação não efetuada.");
} else {
db_msgbox("Anulação efetuada com sucesso");
echo "<script> js_voltar(6); </script> ";
}
}
function db_anulaPlanilha($planilha, $motivo, $ip)
{
$clissplananula = new cl_issplananula();
$clissplan = new cl_issplan();
$clarrecad = new cl_arrecad();
$clcancdebitos = new cl_cancdebitos();
$data = date("Y-m-d");
$hora = date("H:i");
$usuario = db_getsession("id");
if ($usuario == "") {
$usuario = 1;
}
$oNotaRetencao->setDataOperacao(new DBDate(date('Y-m-d', db_getsession('DB_datausu'))));
$oNotaRetencao->setHoraOperacao(db_hora());
$oNotaRetencao->setTipoLancamento(NotaPlanilhaRetencao::SERVICO_TOMADO);
$oNotaRetencao->setNome("");
$oNotaRetencao->setRetido(true);
$oNotaRetencao->setStatus(NotaPlanilhaRetencao::STATUS_ATIVO);
$oNotaRetencao->setSituacao('0');
// 0 - Normal | 1 - cancelado
$oNotaRetencao->setDataNota(new DBDate($oPlanilhaRetencao->getDataPlanilha()));
$oNotaRetencao->setCNPJ($oLinha->cpf_cnpj_prestador);
$oNotaRetencao->setSerie($oLinha->serie_nota);
$oNotaRetencao->setNome(substr($oLinha->nome_razao_social, 0, 40));
$oNotaRetencao->setNumeroNota($oLinha->numero_nota);
$oNotaRetencao->setValorServico($oLinha->valor_servico);
$oNotaRetencao->setValorRetencao($oLinha->valor_imposto);
$oNotaRetencao->setAliquota($oLinha->aliquota);
$oNotaRetencao->setValorDeducao($oLinha->valor_deducao);
$oNotaRetencao->setValorBase($oLinha->valor_base);
$oNotaRetencao->setValorImposto($oLinha->valor_imposto);
$oNotaRetencao->setDescricaoServico("Recolhimento de retencao");
$oNotaRetencao->setObservacoes("Realizado via importaçao de arquivo no DBPREF");
$oPlanilhaRetencao->adicionarNota($oNotaRetencao);
}
db_fim_transacao(false);
db_msgbox('Importação efetuada com sucesso.');
db_redireciona("planilha.php?nomecontri=&mostra=5&fonecontri=&inscricaow={$oPost->inscricaow}&mesx=&mes={$iMesUsu}&ano={$iAnoUsu}&numcgm={$oValidaDados->q02_numcgm}");
} catch (Exception $oErro) {
db_fim_transacao(true);
db_msgbox($oErro->getMessage());
db_redireciona('iss4_importaplanilharetencao001.php');
}
$parcela = split("P", $np[$i]);
$par[$i] = $parcela[1];
$num[$i] = $parcela[0];
$sqlnumpre = "select * from debcontapedidotiponumpre where d67_numpre = {$num[$i]} and d67_numpar= {$par[$i]}";
$resultnumpre = pg_query($sqlnumpre);
$linhasnp = pg_num_rows($resultnumpre);
if ($linhasnp != "") {
$imp = "t";
db_fieldsmemory($resultnumpre, 0);
//echo " parcela $d67_numpar,";
$msg = "{$msg} " . $d67_numpar . ",";
}
}
}
if (isset($imp)) {
db_msgbox("Parcela(s) {$msg} ja estão em debito em conta");
$disabled = 'disabled';
} else {
$disabled = '';
}
//$sqlnumpre= "";
//xxxxxxxxxxxxxxxxxxxxxxxxxxx
// 1- incluir na debcontapedido............
if (isset($incluir)) {
$data = date("Y-m-d");
$sqlerro = false;
db_inicio_transacao();
$cl_debcontapedido->d63_instit = $instit;
$cl_debcontapedido->d63_banco = $banco;
$cl_debcontapedido->d63_agencia = $ag;
$cl_debcontapedido->d63_conta = $conta;
$cgccpf = "";
}
}
$cgccpf = str_replace(".", "", $cgccpf);
$cgccpf = str_replace("/", "", $cgccpf);
$cgccpf = str_replace("-", "", $cgccpf);
if ($cgccpf != "") {
// die($clissbase->sql_query("","*","","cgm.z01_cgccpf = '$cgccpf' and issbase.q02_inscr = $inscricaow"));
$result = $clissbase->sql_record($clissbase->sql_query("", "*", "", "cgm.z01_cgccpf = '{$cgccpf}' and issbase.q02_inscr = {$inscricaow}"));
} else {
$result = $clissbase->sql_record($clissbase->sql_query("", "*", "", "issbase.q02_inscr = {$inscricaow}"));
}
if ($clissbase->numrows != 0) {
db_fieldsmemory($result, 0);
if ($q02_dtbaix != "") {
db_msgbox("Contribuinte com inscrição baixada.");
db_redireciona("digitaaidof.php");
exit;
}
} else {
db_redireciona("digitaaidof.php?" . base64_encode('erroscripts=Acesso a Rotina Inválido, verifique os dados digitados!'));
}
if (!isset($DB_LOGADO) && $m_publico != 't') {
$sql = "select fc_permissaodbpref(" . db_getsession("DB_login") . ",2,{$inscricaow})";
$result = pg_query($sql);
if (pg_numrows($result) == 0) {
db_redireciona("digitaaidof.php?" . base64_encode('erroscripts=Acesso não Permitido. Contate a Prefeitura.'));
exit;
}
$result = pg_result($result, 0, 0);
if ($result == "0") {
if ($senhaantiga == Encriptacao::encriptaSenha($senhaatual)) {
db_query("BEGIN");
db_query("update db_usuarios set\r\n senha = '" . Encriptacao::encriptaSenha($senha) . "'\r\n where id_usuario = {$id_usuario}") or die("Erro(38) alterando db_usuarios: " . pg_errormessage());
db_query("COMMIT");
} else {
db_msgbox("campo senha atual não confere!");
db_redireciona($HTTP_SERVER_VARS['PHP_SELF'] . "?" . base64_encode("id_usuario=" . $id_usuario));
}
if (isset($enviaemail) && $enviaemail == "sim") {
$mensagemDestinatario = "\r\n<html>\r\n<head>\r\n<title>DBSeller Informática Ltda.</title>\r\n<meta http-equiv=\"Content-Type\" content=\"text/html; charset=iso-8859-1\">\r\n</head>\r\n\r\n<body bgcolor=\"#FFFFFF\" leftmargin=\"0\" topmargin=\"0\" marginwidth=\"0\" marginheight=\"0\">\r\n<table width=\"100%\" height=\"100%\" border=\"0\" cellpadding=\"0\" cellspacing=\"0\">\r\n <tr>\r\n <td nowrap align=\"center\" valign=\"top\"><table width=\"100%\" height=\"100%\" border=\"0\" align=\"center\" cellpadding=\"0\" cellspacing=\"0\">\r\n <tr>\r\n <td width=\"146\" nowrap bgcolor=\"#6699CC\"><font color=\"#FFFFFF\" ></font></td>\r\n <td height=\"60\" nowrap align=\"left\" bgcolor=\"#6699CC\"><font color=\"#FFFFFF\"><strong> .: Senha Alterada :.\r\n </tr>\r\n <tr>\r\n <td colspan=\"2\"><table width=\"100%\" border=\"0\" cellspacing=\"0\" cellpadding=\"0\">\r\n <tr>\r\n <td> </td>\r\n </tr>\r\n <tr>\r\n <td><ul>\r\n <li><font size=\"2\" face=\"Arial, Helvetica, sans-serif\">Você alterou sua senha no site Prefeitura-OnLine,<br> este e-mail foi enviado conforme solicitado no site para verificação</li>\r\n </ul></td>\r\n </tr>\r\n <tr>\r\n <td><font size=\"2\" face=\"Arial, Helvetica, sans-serif\"> </font></td>\r\n </tr>\r\n <tr>\r\n <td><font size=\"2\" face=\"Arial, Helvetica, sans-serif\"> </font></td>\r\n </tr>\r\n <tr>\r\n <td><ul>\r\n <li>Usuário : <font size=\"2\" face=\"Arial, Helvetica, sans-serif\"><strong>{$nome}</strong></font></li>\r\n </ul></td>\r\n </tr>\r\n <tr>\r\n <td><ul>\r\n <li>Login : <font size=\"2\" face=\"Arial, Helvetica, sans-serif\"><strong>{$login}</strong></font></li>\r\n </ul></td>\r\n </tr>\r\n <tr>\r\n <td><ul>\r\n <li>Nova Senha : <font size=\"2\" face=\"Arial, Helvetica, sans-serif\"><strong>{$senha}</strong></font></li>\r\n </ul></td>\r\n </tr>\r\n <tr>\r\n <td><ul>\r\n <li>Data da alteração : <font size=\"2\" face=\"Arial, Helvetica, sans-serif\"><strong>" . db_formatar(date("Y-m-d"), 'd') . "</strong></font></li>\r\n </ul></td>\r\n </tr>\r\n <tr>\r\n <td><ul>\r\n <li>Hora : <font size=\"2\" face=\"Arial, Helvetica, sans-serif\"><strong>" . ($hora = db_getsession("hora") . "</strong></font></li>\r\n </ul></td>\r\n </tr>\r\n <tr>\r\n <td><font size=\"2\" face=\"Arial, Helvetica, sans-serif\"> </font></td>\r\n </tr>\r\n <tr>\r\n <td> </td>\r\n </tr>\r\n <tr>\r\n <td align=\"center\"><p><font size=\"1\">Este e-mail foi enviado automaticamente\r\n por favor não responda-o</font></p></td>\r\n </tr>\r\n <tr>\r\n <td align=\"center\"><p><a href=\"http://200.102.214.168\"><font size=\"1\">DBSeller Informática\r\n Ltda.</font></a></p></td>\r\n </tr>\r\n </table></td>\r\n </tr>\r\n </table></td>\r\n </tr>\r\n</table>\r\n\r\n</body>\r\n</html>");
$rsConsultaConfigDBPref = $clconfigdbpref->sql_record($clconfigdbpref->sql_query_file(db_getsession('DB_instit'), "w13_emailadmin"));
db_fieldsmemory($rsConsultaConfigDBPref, 0);
$oMail = new Smtp();
$oMail->Send($email, $w13_emailadmin, 'Alteração de senha do site Prefeitura On-Line', $mensagemDestinatario);
}
db_msgbox("Senha alterada com sucesso!");
db_redireciona("centro_pref.php");
}
?>
<html>
<head>
<title><?php
echo $w01_titulo;
?>
</title>
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
<script language="JavaScript" src="scripts/db_script.js"></script>
<style type="text/css">
<?php
db_estilosite();
?>
}
$result = $clissbase->sql_record($clissbase->sql_query("","*","","issbase.q02_inscr = $inscricaow"));
if($clissbase->numrows != 0){
db_fieldsmemory($result,0);
}
*/
if (isset($gravar)) {
$sql = "select * from aidof\n where y08_inscr = {$inscricaow} and y08_quantlib = '0' and (y08_cancel is false or y08_cancel is null)\n ";
//die($sql." nota".$tiponota);
$result = pg_query($sql);
$linhas = pg_num_rows($result);
if ($linhas > 0) {
for ($i = 0; $i < $linhas; $i++) {
db_fieldsmemory($result, $i);
if ($y08_nota == $tiponota) {
db_msgbox("Contribuinte com pedidos em Aberto! Aguarde comunicado da Prefeitura.");
db_redireciona("digitaaidof.php");
exit;
}
}
}
// grava os dados da solicitação...$quantnotasrec
db_inicio_transacao();
$dataat = date("Y-m-d");
$hora = date("H:i");
$codigo = pg_query("select nextval('aidof_y08_codigo_seq')");
$codigo = pg_result($codigo, 0, 0);
$claidof->y08_nota = $tiponota;
// tipo de nota
$claidof->y08_inscr = $inscricaow;
$claidof->y08_dtlanc = $dataat;
}
db_fim_transacao($sqlerro);
//verifica se email
if (isset($sEmailServ) && $sEmailServ == '') {
if ($sqlerro == true) {
db_msgbox($erro_msg);
} else {
$sMsg = "Entre em contato com a Prefeitura para atualizar seu cadastrado.";
msgbox($sMsg);
}
} else {
$sCpf = $oGet->numcpf;
$sSenha = $oPost->senhasrv;
$mensagemDestinatario = "{$nomeinst}\n\t\t\t Pedido de Senha Internet - Prefeitura On-Line\n\t\t\t --------------------------------------------------------\n\t\t\t Nome: {$z01_nome}\n\t\t\t CPF: {$sCpf}\n\t\t\t E-mail: {$sEmailServ}\n\n\t\t\t Login Internet: {$z01_numcgm}\n\t\t\t Senha Internet: {$sSenha}\n\n\t\t\t Utilize Login e Senha para acessar suas informações no Portal da Prefeitura na Internet.\n\n\t\t\t {$url}/dbpref/\n\n\t\t\t Não responda este e-mail, ele foi gerado automaticamente pelo Servidor.\n\n\t\t\t --------------------------------------------------------\n\t\t\t " . date("d/m/Y - H:i:s") . " - " . getenv("REMOTE_ADDR");
if ($sqlerro == true) {
db_msgbox($erro_msg);
} else {
if (isset($sEmailServ) && $sEmailServ != '') {
$msg = "E-mail enviado com sucesso.\\n";
$msg .= "Suas informações foram enviadas para o e-mail: {$sEmailServ}";
msgbox($msg);
$sTring = $clconfigdbpref->sql_record($clconfigdbpref->sql_query_file(db_getsession('DB_instit'), "w13_emailadmin"));
$rsConsultaConfigDBPref = $sTring;
db_fieldsmemory($rsConsultaConfigDBPref, 0);
$oMail = new Smtp();
$oMail->Send($mailpref, $w13_emailadmin, 'Prefeitura On-Line - Pedido de Senha', $mensagemDestinatario);
}
}
}
} else {
// se ja tiver senha cadastrada........
$cod_procandamint = $p78_sequencial;
}
}
}
}
}
}
}
}
}
} else {
if (isset($cgc) && $cgc != "" || isset($cpf) && $cpf != "") {
db_msgbox("AVISO:\\nNenhum registro encontrado para o número de processo com o CNPJ/CPF informado!");
echo "<script>location.href='digitaconsultaprocesso.php?outro=123456'</script>";
} else {
db_msgbox("AVISO:\\nNenhum registro encontrado para o número de processo informado!");
echo "<script>location.href='digitaconsultaprocesso.php?outro=123456'</script>";
}
}
if ($arqant == false) {
$result_arqproc = $clarqproc->sql_record($clarqproc->sql_query_file(null, null, "*", null, "p68_codproc = {$codproc}"));
if ($clarqproc->numrows != 0) {
db_fieldsmemory($result_arqproc, 0);
$result_procandam_arq = $clprocandam->sql_record($clprocandam->sql_query_com(null, "*", "p61_codandam desc limit 1", "p61_codproc = {$codproc}"));
if ($clprocandam->numrows != 0) {
db_fieldsmemory($result_procandam_arq, 0);
if ($db21_usasisagua == 't') {
echo "<tr>\n\t\t\t <td>" . db_formatar($p61_dtandam, 'd') . "</td>\n\t\t\t <td>{$p61_hora} </td>\n\t\t\t <td>{$p61_coddepto}-{$descrdepto}</td>\n\t\t\t <td>{$nomeinstabrev}</td>\n\t\t\t <td><b>Processo Arquivado</b></td>\n\t\t\t <td>{$p61_despacho} / Cod. Arquivamento: {$p68_codarquiv}  </td>\n\t </tr>";
} else {
echo "<tr>\n <td>" . db_formatar($p61_dtandam, 'd') . "</td>\n <td>{$p61_hora} </td>\n <td>{$p61_coddepto}-{$descrdepto}</td>\n <td>{$nomeinstabrev}</td>\n <td>{$nome}</td>\n <td><b>Processo Arquivado</b></td>\n <td>{$p61_despacho} / Cod. Arquivamento: {$p68_codarquiv}  </td>\n </tr>";
}
$sqlerro = true;
$msgerro = $clcancdebitosreg->erro_msg;
db_msgbox($msgerro);
}
$clcancdebitosprocreg->k24_codigo = $clcancdebitosproc->k23_codigo;
$clcancdebitosprocreg->k24_cancdebitosreg = $clcancdebitosreg->k21_sequencia;
$clcancdebitosprocreg->k24_vlrhis = '0';
$clcancdebitosprocreg->k24_vlrcor = $k00_valor;
$clcancdebitosprocreg->k24_juros = '0';
$clcancdebitosprocreg->k24_multa = '0';
$clcancdebitosprocreg->k24_desconto = '0';
$clcancdebitosprocreg->incluir(null);
if ($clcancdebitosprocreg->erro_status == 0) {
$sqlerro = true;
$msgerro = $clcancdebitosprocreg->erro_msg;
db_msgbox($msgerro);
}
}
}
}
//fim sem lançamento
}
//fim for
db_fim_transacao($sqlerro);
db_redireciona($_SERVER["REQUEST_URI"]);
}
$tipo = 3;
}
if (isset($db_datausu)) {
if (!checkdate(substr($db_datausu, 5, 2), substr($db_datausu, 8, 2), substr($db_datausu, 0, 4))) {
echo "Data para Cálculo Inválida. <br><br>";
$ip = $_SERVER["REMOTE_ADDR"];
$cl_licbaixa = new cl_licbaixa();
//echo "seq= $edital";
if (isset($incluir)) {
$sqlerro = false;
$cl_licbaixa->l28_nome = $nome;
$cl_licbaixa->l28_email = $email2;
$cl_licbaixa->l28_cnpj = ereg_replace("[./-]", "", $cnpj);
$cl_licbaixa->l28_endereco = $endereco;
$cl_licbaixa->l28_cidade = $cidade;
$cl_licbaixa->l28_fone = $fone;
$cl_licbaixa->l28_data = date("Y-m-d");
$cl_licbaixa->l28_hora = date("H:i");
$cl_licbaixa->l28_ip = $_SERVER["REMOTE_ADDR"];
$cl_licbaixa->l28_liclicita = $edital;
$cl_licbaixa->incluir(null);
if ($cl_licbaixa->erro_status == 0) {
$sqlerro = true;
//echo"entrei no erro do cl_licbaixa.....";
//die($cl_licbaixa->erro_sql);
$erro_sql = $cl_licbaixa->erro_sql;
db_msgbox($erro_sql);
}
if ($sqlerro == false) {
echo "<script>location.href='lic_baixaedital.php?lic={$edital}'</script>";
}
}
?>
</form>
</table>
</html>