Anuidade - Impressão de Boleto

Anuidade - Impressão de Boleto

$args = arg();
$showForm = true;
?>

>

if(isset($_POST['modulo']) && $_POST['modulo']==2):
//CRIAR CONEXAO COM BASE DE PRODUCAO
$conexao = "host=bd.servidor.webcorensp.org.br port=5432 dbname=corensp user=pg_web password=pg_web()";
$conectado = pg_connect($conexao) or die ("Erro de Conexão!!!");
//var_dump(pg_client_encoding());
pg_set_client_encoding('UTF-8');

$erro = "N";
set_time_limit (1000);
$quadro_id = "";
if($_POST["quadro"] != "selecione"):
$quadro_id = "'".$_POST["quadro"]."'";
endif;
if(strlen($quadro_id) > 0):
if(substr($quadro_id,-1) == ","):
$quadro_id = substr($quadro_id,0,strlen($quadro_id)-1);
endif;
$quadro_id = " concessao_profissional.quadro_id = ".$quadro_id." and";
endif;
$nome_profissional = "";
/* VERIFICAçãO DE DADOS */
if(!(strrpos($_POST["nome_profissional"], "%") === false) ||
!(strrpos($_POST["nome_profissional"], "'") === false)):
$erro ="


Caracter digitado no campo 'NOME' inválido.

Verifique sua opção de busca!



Caso não encontre sua inscrição, entre em contato com o COREN-SP:

(11) 3225-6300.

";
endif;
if(strlen($_POST["nome_profissional"]) > 5):
$nome_profissional = " (to_ascii(nome_profissional) ilike to_ascii('".pg_escape_string($_POST["nome_profissional"])."%')) AND ";
else:
$erro ="


Digite um nome maior.

Verifique sua opção de busca!


Caso não encontre sua inscrição, entre em contato com o COREN-SP:

(11) 3225-6300.

";
endif;
$num_cpf = "";
if(strlen($_POST["num_cpf"]) == 11):
$num_cpf = " num_cpf = '".pg_escape_string($_POST["num_cpf"])."' AND ";
$erro = "N";
endif;
$sql = "select current_timestamp as agora from auxiliar";
$rs_data = pg_query($sql) or die ("Erro na consulta");
$row_data = pg_fetch_array($rs_data);

$sql = "select date_part('day', current_timestamp) as dt_30_d,
date_part('month', current_timestamp) as dt_30_m,
date_part('year', current_timestamp) as dt_30_a,
date_part('year', current_timestamp) as ano
from auxiliar";
$rs = pg_query($sql) or die (mysql_error().'
'.$sql);
if (pg_num_rows($rs) > 0):
$row = pg_fetch_array($rs);
$dt_30 = strftime("%Y-%m-%d %H:%M:%S",mktime(0,0,0,$row['dt_30_m'],$row['dt_30_d']-30,$row['dt_30_a']));
//$dt_30 = sprintf("%04d",$row[DT_30_A])."/".sprintf("%02d",$row[DT_30_M])."/".sprintf("%02d",$row[DT_30_D]);
$ano = sprintf("%04d",$row['ano']);
endif;
$sql2 = "select count(*) as count_nome
from profissionais
join concessao_profissional
on profissionais.cpd = concessao_profissional.cpd
where profissionais.cpd NOT IN (select ppi.cpd
from ppi
where ppi.habilitado = 'N')
and";
$sql = " select profissionais.cpd as cpd, nome_profissional, num_cpf, data_cadastro,
sexo, descricao_sub, inscricao, concessao_profissional.quadro_id as quadro_id,
dt_insc,
dt_cancela,
date_part('day', dt_insc) as dt_insc_d,
date_part('month', dt_insc) as dt_insc_m,
date_part('year', dt_insc) as dt_insc_a,
date_part('day', dt_validade) as dt_validade_d,
date_part('month', dt_validade) as dt_validade_m,
date_part('year', dt_validade) as dt_validade_a,
date_part('day', dt_prorro) as dt_prorro_d,
date_part('month', dt_prorro) as dt_prorro_m,
date_part('year', dt_prorro) as dt_prorro_a,
date_part('day', dt_pro_val) as dt_pro_val_d,
date_part('month', dt_pro_val) as dt_pro_val_m,
date_part('year', dt_pro_val) as dt_pro_val_a,
date_part('day', dt_cancela) as dt_cancela_d,
date_part('month', dt_cancela) as dt_cancela_m,
date_part('year', dt_cancela) as dt_cancela_a,
concessao_profissional.concessao_id,
descricao_concessao,
( select count(*)
from especialidade
where cpd = profissionais.cpd ) as especialidade,
(select count(*)
from cobranca_amigavel
where cobranca_amigavel.cpd = profissionais.cpd
and data_comprov_acordo is null) as ca,
(select count(*)
from cobranca_amigavel, execucao_fiscal
where cobranca_amigavel.processo_adm_id = execucao_fiscal.processo_adm_id
and cobranca_amigavel.cpd = profissionais.cpd
and dt_extincao is null) as ef,
(select count(*)
from pacancela
where pacancela.cpd = profissionais.cpd
and dt_fim is null ) as pacancela,
(select count(*)
from anuidade, parcela
where anuidade.cpd = parcela.cpd
and anuidade.ano = parcela.ano
and anuidade.cpd = profissionais.cpd
and anuidade.ano in('".($ano - 1)."', '".($ano - 2)."', '".($ano - 3)."', '".($ano - 4)."', '".($ano - 5)."')
and anuidade.selecao in('C','E','F','D')
and data_venc_anu and data_baixa_anu is null
and ativa_anu = 'S' ) as devedor,
( select count(*)
from anuidade, parcela
where anuidade.cpd = parcela.cpd
and anuidade.cpd = profissionais.cpd
and anuidade.ano = parcela.ano
and anuidade.selecao in('C','E','F','D')
and data_venc_anu >= '" .strftime("%Y/%m/%d",strtotime($row_data['agora']))." 00:00:00'
and data_baixa_anu is null
and ativa_anu = 'S' ) as a_vencer,
( select count(*)
from movto_processo
where cpd = profissionais.cpd
and processo_id in (16, 17)
and ( deferido = ''
or deferido is null ) ) as definitiva,
( select count(*)
from movto_processo
where cpd = profissionais.cpd
and processo_id = (21)
and ( deferido = ''
or deferido is null ) ) as transferencia_definitiva
from profissionais, concessao_profissional, concessao, sub_secao
where profissionais.cpd = concessao_profissional.cpd
and concessao_profissional.concessao_id = concessao.concessao_id
and profissionais.sub_secao_id = sub_secao.sub_secao_id
and concessao_profissional.concessao_id = ( select concessao_profissional.concessao_id
from concessao_profissional
where cpd = profissionais.cpd
and (CASE WHEN (select count(*) from concessao_profissional where cpd = profissionais.cpd and dt_insc is not NULL) >
(select count(*) from concessao_profissional where cpd = profissionais.cpd and dt_cancela is not null)
THEN dt_cancela is null
ELSE dt_insc = ( select max(dt_insc) from concessao_profissional where cpd = profissionais.cpd )
END))
and profissionais.cpd NOT IN (select ppi.cpd
from ppi
where ppi.habilitado = 'N')
and (";
$sql3 = "";
if(strlen($quadro_id) > 0):
$sql3 .= $quadro_id;
endif;

if(strlen($nome_profissional) > 0):
$sql3 .= $nome_profissional;
endif;

if(strlen($num_cpf) > 0):
$sql3 .= $num_cpf;
$sql4 = ' OR '. $num_cpf;
$sql4 = substr($sql4,0,strlen($sql4)-4);
endif;

if(strlen($num_rg) > 0):
$sql3 .= $num_rg;
endif;
$sql .= '(' . $sql3 . ')';
$sql2 .= '(' . $sql3 . ')';
if(substr($sql,-4) == "AND)"):
$sql = substr($sql,0,strlen($sql)-4) . ')';
endif;
if(substr($sql2,-4) == "AND)"):
$sql2 = substr($sql2,0,strlen($sql2)-4) . ')';
endif;

if(substr($sql,-5) == "AND )"):
$sql = substr($sql,0,strlen($sql)-5) . ')';
endif;
if(substr($sql2,-5) == "AND )"):
$sql2 = substr($sql2,0,strlen($sql2)-5) . ')';
endif;

$sql .= $sql4 . ") order by nome_profissional";
?>

if($erro == "N"):
$rs = pg_query($sql2.$sql4) or die ($sql2.$sql4);
if (pg_num_rows($rs) > 0):
$row = pg_fetch_array($rs);
endif;
if($row['count_nome'] > 100):
$erro = "

";

endif;
endif;

if($erro != "N"):
print "

";
else:
$rs = pg_query($sql) or die ($sql);

if (pg_num_rows($rs) > 0):
$showForm = false;
while ($row = pg_fetch_array($rs)):
$dt_insc = sprintf("%02d",$row['dt_insc_d'])."/".sprintf("%02d",$row['dt_insc_m'])."/".sprintf("%04d",$row['dt_insc_a']);
$dt_validade = sprintf("%02d",$row['dt_validade_d'])."/".sprintf("%02d",$row['dt_validade_m'])."/".sprintf("%04d",$row['dt_validade_a']);
$dt_prorro = sprintf("%02d",$row['dt_prorro_d'])."/".sprintf("%02d",$row['dt_prorro_m'])."/".sprintf("%04d",$row['dt_prorro_a']);
$dt_pro_val = sprintf("%02d",$row['dt_pro_val_d'])."/".sprintf("%02d",$row['dt_pro_val_m'])."/".sprintf("%04d",$row['dt_pro_val_a']);
$dt_cancela = sprintf("%02d",$row['dt_cancela_d'])."/".sprintf("%02d",$row['dt_cancela_m'])."/".sprintf("%04d",$row['dt_cancela_a']);

?>

";

endwhile;
else:
$showForm = true;
print "

";

endif;
endif;
?>

RETORNO DA CONSULTA



Digite o 'NOME' completo ou realize sua busca em conjunto com o 'CPF'.

Verifique sua opção de busca!



Caso não encontre sua inscrição, entre em contato com o COREN-SP:

(11) 3225-6300.

".$erro."
if (checkdate($row['dt_cancela_m'],$row['dt_cancela_d'],$row['dt_cancela_a'])):
if (($row['definitiva'] > 0) or ($row['transferencia_definitiva'] > 0)):
$titulo = "titulo";
$campo = "campo";
else:
$titulo = "titulo_red";
$campo = "campo_red";
endif;
else:
$titulo = "titulo";
$campo = "campo";
endif;
print "

";
elseif ($row['transferencia_definitiva'] > 0):
print "Ativo";
print " *";
print "  

";
print "

";
elseif ($row['definitiva'] > 0):
print "Ativo";
print " *";
print "  

";
print "

";
else:
print "Ativo";
if ($row['devedor'] > 0):
print " *";
print "  

";
print "

";
else:
print "
 

";
endif;
endif;
else:
print "Ativo";
if ($row['devedor'] > 0):
print " *";
print "  

";
print "

";
else:
print "
 

";
endif;
endif;
print "

";
if (trim($row['quadro_id']) == "QI"):
print "Enfermeiro";
elseif(trim($row['quadro_id']) == "QII"):
print "Técnico de Enfermagem";
elseif(trim($row['quadro_id']) == "QIII"):
print "Auxiliar de Enfermagem";
elseif(trim($row['quadro_id']) == "QA"):
print "Atendente de Enfermagem";
elseif(trim($row['quadro_id']) == "QE"):
print "Estagiário";
endif;
print " - Situação: ";

$vl_texto = "";
$vl_time_val_pro = mktime(0, 0, 0, $row['dt_pro_val_m'], $row['dt_pro_val_d'], $row['dt_pro_val_a']);
$vl_time_validade = mktime(0, 0, 0, $row['dt_validade_m'],$row['dt_validade_d'], $row['dt_validade_a']);

$vl_time_now = time();

if ( checkdate($row['dt_cancela_m'],$row['dt_cancela_d'],$row['dt_cancela_a']) ||
(!checkdate($row['dt_cancela_m'],$row['dt_cancela_d'],$row['dt_cancela_a']) &&
( checkdate($row['dt_validade_m'],$row['dt_validade_d'],$row['dt_validade_a']) &&
!checkdate($row['dt_pro_val_m'],$row['dt_pro_val_d'],$row['dt_pro_val_a']) && $vl_time_validade - $vl_time_now checkdate($row['dt_pro_val_m'],$row['dt_pro_val_d'],$row['dt_pro_val_a']) && $vl_time_val_pro - $vl_time_now

if (checkdate($row['dt_cancela_m'],$row['dt_cancela_d'],$row['dt_cancela_a']) &&
$row['transferencia_definitiva'] == 0 &&
$row['definitiva'] == 0):
print "Inativo";
print "
 

* - O profissional já solicitou uma Transferência de Inscrição Definitiva e aguarda a conclusão do processo.
* - O profissional já solicitou uma Inscrição Definitiva e aguarda a conclusão do processo.
* - O profissional deverá dirigir-se à sede do COREN-SP para regularizar sua situação, não estando impedido do exercício de suas atividades profissionais.
* - O profissional deverá dirigir-se à sede do COREN-SP para regularizar sua situação, não estando impedido do exercício de suas atividades profissionais.

";
?>

Nome
do Profissional
 
Sexo Pertence
a Subseção
if($row['sexo'] == "F"):
print "Feminino";
elseif($row['sexo'] == "M"):
print "Masculino";
endif;
?>  
if($row['descricao_sub'] == 'Matriz'):
print "São Paulo" ;
else:
print mb_convert_encoding($row['descricao_sub'], "UTF-8");
endif;
?>  
N° de Inscrição Inscrito
desde
if(checkdate($row['dt_cancela_m'],$row['dt_cancela_d'],$row['dt_cancela_a'])):
print "Cancelado em";
else:
if(checkdate($row['dt_validade_m'],$row['dt_validade_d'],$row['dt_validade_a']) ||
checkdate($row['dt_pro_val_m'],$row['dt_pro_val_d'],$row['dt_pro_val_a'])):
print "Válido até";
endif;
endif;
?>
Tipo
da Concessão
 
if(checkdate($row['dt_cancela_m'],$row['dt_cancela_d'],$row['dt_cancela_a'])):
print $dt_cancela;
else:
if(checkdate($row['dt_validade_m'],$row['dt_validade_d'],$row['dt_validade_a']) &&
!checkdate($row['dt_pro_val_m'],$row['dt_pro_val_d'],$row['dt_pro_val_a'])):
print $dt_validade;
endif;
if(checkdate($row['dt_pro_val_m'],$row['dt_pro_val_d'],$row['dt_pro_val_a'])):
print $dt_pro_val;
endif;
endif;
?>

if($row['especialidade'] > 0):
$sql2 = "select descr_especialidade, numero_sob_cofen,
date_part('day', data_expedicao_registro) as data_expedicao_registro_d,
date_part('month', data_expedicao_registro) as data_expedicao_registro_m,
date_part('year', data_expedicao_registro) as data_expedicao_registro_a,
date_part('day', dt_exp_tit) as dt_exp_tit_d,
date_part('month', dt_exp_tit) as dt_exp_tit_m,
date_part('year', dt_exp_tit) as dt_exp_tit_a
from especialidade, tipo_especialidade
where especialidade.especialidade_id = tipo_especialidade.especialidade_id
and cpd = ".$row['cpd'];
$rs2 = pg_query($sql2) or die ($sql2);
if (pg_num_rows($rs2) > 0):
print "

";
while ($row2 = pg_fetch_array($rs2)):
$data_expedicao_registro = sprintf("%02d",$row2['data_expedicao_registro_d'])."/".sprintf("%02d",$row2['data_expedicao_registro_m'])."/".sprintf("%04d",$row2['data_expedicao_registro_a']);
$dt_exp_tit = sprintf("%02d",$row2['dt_exp_tit_d'])."/".sprintf("%02d",$row2['dt_exp_tit_m'])."/".sprintf("%04d",$row2['dt_exp_tit_a']);
print "

";
endwhile;
print "

Especialização em N° Registro Inscrito em Expedido em
".mb_convert_encoding($row2['descr_especialidade'], "UTF-8")."  ".$row2['numero_sob_cofen']."  ".$data_expedicao_registro."  ".$dt_exp_tit." 

";
endif;
else:
print "

Profissional não possui registro de Especialização neste COREN-SP.

";
endif;

print "

";
print "

Situação Eleitoral 2008
";

if($row['concessao_id']!=7 && $row['concessao_id']!=8 && $row['concessao_id']!=9 &&
$row['concessao_id']!=10 && $row['concessao_id']!=11 && $row['concessao_id']!=12 &&
$row['concessao_id']!=15 && $row['concessao_id']!=17 && $row['concessao_id']!=19 &&
$row['concessao_id']!=24):
print "Inscrição sem obrigatoriedade do voto";
else:
if($dt_cancela!='00/00/0000'):
$vl_time_dt_cancela = mktime(0,0,0, $row['dt_cancela_m'],$row['dt_cancela_d'],$row['dt_cancela_a']);
else:
$vl_time_dt_cancela = 0;
endif;

if($dt_insc!='00/00/0000'):
$vl_time_dt_insc = mktime(0,0,0, $row['dt_insc_m'], $row['dt_insc_d'],$row['dt_insc_a']);
else:
$vl_time_dt_insc = 0;
endif;

$vl_time_dt_limite = mktime(0,0,0, 4,1,2008);

if(($vl_time_dt_cancela!=0 && $vl_time_dt_cancela ($vl_time_dt_insc!=0 && $vl_time_dt_insc > $vl_time_dt_limite)):
print "Inscrição sem obrigatoriedade de voto";
else:
$sql = "SELECT status,
num_cpf
FROM votacao
JOIN profissionais ON profissionais.cpd = votacao.cpd
WHERE ano = '2008'
AND profissionais.cpd =".$row['cpd'];

$rs_eleicao = pg_query($sql) or die ("Erro de Conexão!!!");

if (pg_num_rows($rs_eleicao) > 0):
$row_eleicao = pg_fetch_array($rs_eleicao);
if($row_eleicao['status']=='VOTOU - RECEBIDO APOS O PRAZO' || $row_eleicao['status']=='VOTOU'):
print "Voto Recebido - Clique aqui para imprimir seu Comprovante Eleitoral";
elseif($row_eleicao['status']=='JUSTIFICOU'):
print "Justificativa Eleitoral Aceita - Clique aqui para imprimir seu Comprovante Eleitoral";
elseif($row_eleicao['status']=='VOTO ENVIADO NãO RECEBIDO'):
print 'Kit Eleitoral enviado e não devolvido ao COREN-SP';
elseif($row_eleicao['status']=='VOTO ENVIADO NãO RECEBIDO'):
print 'Kit Eleitoral enviado e não devolvido ao COREN-SP';
endif;
else:
$sql = "SELECT cpd
FROM public.anda_prof
WHERE andamento='*** KIT ELEITORAL NãO FOI ENVIADO POR APRESENTAR PROBLEMA NO ENDEREçO ***'
AND cpd =".$row['cpd'];

$rs_anda_prof = pg_query($sql) or die ("Erro de Conexão!!!");

if (pg_num_rows($rs_anda_prof) > 0 ):
print 'Kit Eleitoral não enviado por problema no endereço';
else:
print "Inscrição sem obrigatoriedade de voto";
endif;
endif;
endif;
endif;

print "

";

// $sql = " select count(*) as a_vencer_do_ano
// from anuidade, parcela
// where anuidade.cpd = parcela.cpd
// and anuidade.ano = parcela.ano
// and anuidade.cpd = ".$row['cpd']."
// and anuidade.ano >= '".$ano."'
// and anuidade.selecao = 'D'
// and data_venc_anu >= '" .strftime("%Y/%m/%d",strtotime($row_data['agora']))." 00:00:00'
// and data_baixa_anu is null
// and ativa_anu = 'S' ";
// $rs2 = pg_query($sql) or die ($sql);
// if (pg_num_rows($rs2) > 0):
// $row2 = pg_fetch_array($rs2);
// endif;
// Comentado quando o parcelamento foi colocado no ar
// if ((($row['a_vencer'] > 0) && ($row['devedor'] == 0) && ($row['ef'] == 0) && ($row['pacancela'] == 0) && ($row['ca'] == 0)) || ($row2['a_vencer_do_ano'] > 0) ):
//
// print "

//
//

//

//

 Visualizar Boletos

";
// endif; ?> 
print "



Nenhum PROFISSIONAL encontrado - verifique sua opção de busca!

Lembramos que na busca por CPF, você deve digitar apenas NÚMEROS.


Caso não encontre sua inscrição, entre em contato com o COREN-SP:

(11) 3225-6300.

endif;
if($showForm):?>

Profissional

Preencha o nome completo ou CPF para imprimir o seu boleto


(somente números)

Atenção: As informações apresentadas são exclusivamente para identificá-lo como profissional de enfermagem registrado no Conselho.
Qualquer informação adicional deverá ser solicitada por escrito à diretoria do COREN-SP que analisará a solicitação.