* Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA
* 02111-1307, USA.
*
* Copia da licenca no diretorio licenca/licenca_en.txt
* licenca/licenca_pt.txt
*/
error_reporting('** FAVOR FAÇA SEU PEDIDO DE SENHA! **');
include "libs/db_conecta.php";
include "libs/db_stdlib.php";
include "libs/db_utils.php";
include "dbforms/db_funcoes.php";
include "libs/db_sql.php";
$oGet = db_utils::postmemory($_GET);
$sMatric = $oGet->nummatric;
$datanasc = formataDataNasc($oGet->z01_nasc);
$cpf = formataCpf($oGet->z01_cgccpf);
$conf = true;
if ($oGet->chave == 't') {
if (isset($oGet->sqms) && $oGet->sqms == 't') {
$sErroUsuario = "t";
// verifica numcgm
$sqlCgmUsuario = " select z01_nome,\n\t\t z01_numcgm \n\t\t from cgm \n\t\t where z01_cgccpf = '{$cpf}' ";
//die($sqlCgmUsuario);
$queryCgm = pg_query($sqlCgmUsuario);
$totalCgm = pg_num_rows($queryCgm);
if ($totalCgm > 0) {
db_fieldsmemory($queryCgm, 0);
}
//verifica se usuário já é cadastrado
$sqlUsuario = " select login \n from db_usuarios \n where nome = '{$z01_nome}' \n and login = '******' \n and usuext = '1' ";
//die($sqlUsuario);
$pdf->cell(30, 5, '', 0, 1, "L", 0);
$pdf->SetFont('Arial', 'b', 8);
$pdf->cell(30, 5, 'Nº do CGM:', 0, 0, "L", 1);
$pdf->cell(0, 5, $z01_numcgm, 0, 1, "L", 1);
$pdf->cell(30, 5, 'Nome:', 0, 0, "L", 0);
$pdf->cell(0, 5, $z01_nome, 0, 1, "L", 0);
$pdf->cell(30, 5, 'Matricula:', 0, 0, "L", 1);
$pdf->cell(0, 5, $rh01_regist, 0, 1, "L", 1);
$sCgCcPf = trim($z01_cgccpf);
if (strlen($sCgCcPf) <= 11) {
$sTipo = "cpf";
} else {
$sTipo = "cnpj";
}
$pdf->cell(30, 5, 'CPF:', 0, 0, "L", 0);
$pdf->cell(0, 5, formataCpf($sCgCcPf, $sTipo), 0, 1, "L", 0);
$pdf->cell(30, 5, 'Data Nascimento:', 0, 0, "L", 1);
$pdf->cell(0, 5, formataDataNasc($z01_nasc), 0, 1, "L", 1);
if ($sEmailServ == '') {
$pdf->cell(0, 5, '', 0, 1, "L", 0);
} else {
$pdf->cell(30, 5, 'E-mail Informado:', 0, 0, "L", 0);
$pdf->cell(0, 5, $sEmailServ, 0, 1, "L", 0);
}
$pdf->cell(0, 5, '', 0, 1, "L", 1);
$pdf->cell(30, 5, 'Login:', 0, 0, "L", 0);
$pdf->cell(0, 5, $z01_numcgm, 0, 1, "L", 0);
$pdf->Output();
//**************************************** FIM PDF Servidor Público ********************************************//
function formataDataNasc($sData)
{
function dadosConta3($codpessoa)
{
$dados = mysql_query("SELECT pessoa.NOME, login.LOGIN, pessoa.CPF FROM login INNER JOIN pessoa ON login.CODLOGIN=pessoa.CODPESSOA WHERE login.CODLOGIN='******' GROUP BY login.CODLOGIN");
$dados = mysql_fetch_object($dados);
$conta = "<div class='Separador'></div>";
$conta .= "<div>";
$conta .= "<ul class='SbNav'>";
$conta .= "<li><h3><img src='../image/dadosdaconta.png' border='0' alt=''/></h3></li>";
$conta .= "<li><b>Nome:</b></li>";
$conta .= "<li>{$dados->NOME}</li>";
$conta .= "<li><b>Login</b>:</li>";
$conta .= "<li>{$dados->LOGIN}</li>";
$conta .= "<li><b>CPF:</b></li>";
$conta .= "<li>" . formataCpf($dados->CPF) . "</li>";
$conta .= "<li><br/></li>";
$conta .= "</ul>";
$conta .= "</div>";
$conta .= "<div class='Separador'></div>";
return $conta;
}
$sqlusu = "select nextval('db_usuarios_id_usuario_seq') as x";
$result = db_query($sqlusu);
$id_usuario = pg_result($result, 0, 0);
$datatoken = date("Y-m-d");
$result2 = @db_query("insert into db_usuarios ( id_usuario,\n\t\t nome,\n\t\t login,\n\t\t senha,\n\t\t usuarioativo,\n\t\t email,\n\t\t usuext,\n datatoken\n )\n\t\t values (\n\t\t {$id_usuario},\n\t\t '{$z01_nome}',\n\t\t '{$z01_numcgm}',\n\t\t '" . (@$passwd == "" ? '' : $passwd2) . "',\n\t\t '1',\n\t\t '{$z01_email}',\n\t\t 1,\n '{$datatoken}')") or die("Erro(23) inserindo em db_usuarios: " . pg_errormessage());
$result3 = @db_query("insert into db_usuacgm (id_usuario,cgmlogin) values({$id_usuario},{$z01_numcgm})");
$sCpf = formataCpf($z01_cgccpf);
$mensagemDestinatario = "\n \t\t {$nomeinst}\n\n \t\t Pedido de Senha Internet - Prefeitura On-Line\n\n \t\t --------------------------------------------------------\n\n \t\t Nome: {$z01_nome}\n\n \t\t CPF/CNPJ: {$sCpf}\n\n \t\t E-mail: {$z01_email}\n\n \t\t\t\t\t\t\t\t\t\t\t\t\t\t \n\n \t\t Login Internet: {$z01_numcgm}\n\n \t\t Senha Internet: {$passwd}\n\n \t\t\t\t\t\t\t\t\t\t\t\t\t \n\n \t\t Utilize Login e Senha para acessar suas informações no Portal da Prefeitura na Internet.\n\n \t\t\t\t\t\t\t\t\t\t\t\t\t\t \n\n \t\t {$url}/dbpref/\n\n \t\t\t\t\t\t\t\t\t\t\t\t\t\t \n\n \t\t Não responda este e-mail, ele foi gerado automaticamente pelo Servidor.\n\n \t\t\t\t\t\t\t\t\t\t\t\t\t\t \n\n \t\t --------------------------------------------------------\n\n \t\t " . date("d/m/Y - H:i:s") . " - " . getenv("REMOTE_ADDR");
} else {
/**
* Se ja tiver senha cadastrada
*/
msgbox("Você Já possui cadastro na Prefeitura!");
$dados = pg_fetch_array($result1);
$result3 = @db_query("update db_usuarios set senha = '{$passwd2}' where login = '******'0']}'");
$sCpf = formataCpf($z01_cgccpf);
$mensagemDestinatario = "\n\n \t\t {$nomeinst}\n\n \t\t Pedido de Senha Internet - Prefeitura On-Line\n\n \t\t --------------------------------------------------------\n\n \t\t Nome: {$z01_nome}\n\n \t\t CPF/CNPJ: {$sCpf}\n\n \t\t E-mail: {$z01_email}\n\n \t\t\t\t\t\t\t\t\t\t\t\t\t\t \n\n \t\t Atenção!\n\n \t\t Alguém tentou realizar um novo pedido de senha com seus dados.\n\n \t\t " . date("d/m/Y - H:i:s") . " - " . getenv("REMOTE_ADDR") . "\n\n \t\t Uma nova senha foi gerada para acesso ao Portal.\n\n \t\t\t\t\t\t\t\t\t\t\t\t\t\t \n\n \t\t Login Internet: {$z01_numcgm}\n\n \t\t Senha Internet: {$passwd}\n\n \t\t\t\t\t\t\t\t\t\t\t\t\t\t \n\n \t\t Utilize Login e Senha para acessar suas informações no Portal da Prefeitura na Internet.\n\n \t\t\t\t\t\t\t\t\t\t\t\t\t\t \n\n \t\t {$url}/dbpref/\n\n \t\t\t\t\t\t\t\t\t\t\t\t\t\t\n\n \t\t Não responda este e-mail, ele foi gerado automaticamente pelo Servidor.\n\n \t\t\t\t\t\t\t\t\t\t\t\t\t\t\n\n \t\t --------------------------------------------------------\n\n \t\t";
}
$sConsulta = $clconfigdbpref->sql_record($clconfigdbpref->sql_query_file(db_getsession('DB_instit'), "w13_emailadmin"));
$rsConsultaConfigDBPref = $sConsulta;
db_fieldsmemory($rsConsultaConfigDBPref, 0);
$oMail = new Smtp();
$oMail->Send($mailpref, $w13_emailadmin, 'Prefeitura On-Line - Pedido de Senha', $mensagemDestinatario);
msgbox("Uma mensagem foi encaminhada para o e-mail: {$sEmailServ}");
}
}
function formataCpf($sCpf)
{
if (strlen(trim($sCpf)) == 11) {
$cpf = str_replace("-", "", $sCpf);
$cpf1 = substr($cpf, -11, 3);
