File: /home/asjudine/www/acreditos/credito_cargar_automatico_mc.php
<!DOCTYPE HTML>
<html>
<head>
<meta http-equiv="X-UA-Compatible" content="IE=8; IE=9; IE=edge" />
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
<title>Cargar automatico Credito</title>
<style type="text/css">
*{margin: 0;padding: 0;}
body{background-color:#EAEAEA;font-family:Geneva,Arial,Helvetica,sans-serif;}
header {background-color: #B7271F; text-align: center;}
.titulo{width: 100%;text-align: center;background-color: #dbd8c9;color: #b20606;padding: 6px 0;font-size: 18px;}
table{margin: 0 auto;border: 8px solid #bebebe; text-align: center;}
.divirmenu{text-align: center;}
.irmenu{width: 200px;background-color: #1c4fa0;color: #fff; padding: 4px;border-radius: 6px;}
.irmenu:hover{background-color: #67a0d9; color: #000;}
.direcciona{width: 200px;background-color: #D4090C;color: #fff; padding: 4px;border-radius: 3px;}
.direcciona:hover{background-color: #67a0d9; color: #000;}
.fecha{background-color: #d6e08b; padding: 2px;color: #000;font-size: 15px; text-align: center;}
td{padding: 1px; border: 1px solid #a0a0a0;}
.td{background-color: #e5e5e5; padding: 1px 30px;color: #00135F;font-size: 14px;font-weight: 600; text-align: center;}
.boton1{width:30%;background-color: #ffffff;color: #000;padding: 2px;border:2px solid #580000;border-radius:10px;}
.boton1:hover{background-color: #6f0000;color: #fff;cursor: pointer;}
input[type=text]{border-radius: 5px; padding: 3px;background-color: #FFFEF4;}
.tdtitulo{background-color: #e3dec0; color: #b20606; padding: 2px; text-align: center; font-size: 12px; font-weight: 900}
.tdfull{background-color: #fff; color: #000; padding: 1px; text-align: center; font-size: 12px;}
.botonnew{width: 90px; background-color: #e3dec0;color: #b20606;padding: 1px;border-radius:5px;}
.botonnew:hover{width: 90px; background-color: #cbbd6a;color: #000;padding: 1px;border-radius:5px;}
.tdizq{background-color: #e5e5e5; padding: 1px 10px;color: #00135F;font-size: 12px;font-weight: 600; text-align: left;}
.tdcen{background-color: #e5e5e5; padding: 1px 10px;color: #00135F;font-size: 12px;font-weight: 600; text-align: center;}
.tdder{background-color: #e5e5e5; padding: 1px 2px;color: #00135F;font-size: 12px;font-weight: 600; text-align: right;}
.tddered{background-color: #e5e5e5; padding: 1px 2px;color: #D40609;font-size: 12px;font-weight: 600; text-align: right;}
.tdbono{background-color: #FFFFCC; padding: 1px 2px;color: #00135F;font-size: 12px;font-weight: 600; text-align: right;}
/*Estilo Complementario*/
.tdi{background-color: #F9FBC8; padding: 1px 10px;color: #00135F;font-size: 12px;font-weight: 600; text-align: left;}
.tdc{background-color: #F9FBC8; padding: 1px 10px;color: #00135F;font-size: 12px;font-weight: 600; text-align: center;}
.tdd{background-color: #F9FBC8; padding: 1px 2px;color: #00135F;font-size: 12px;font-weight: 600; text-align: right;}
</style>
</head>
<body>
<form action="" method="post" enctype="multipart/form-data" name="form1" id="form1">
<header>
<img src="../ELEMENTS/bannerInterasjudinet.png" alt="" width=" 700" height="70">
</header>
<label> </label>
<div align="center">
<table width="448" border="3" cellpadding="3" cellspacing="3" class="recaudo">
<caption>
<div class="titulo">PAGO AUTOMATICO CREDITO</div>
</caption>
<tr>
<tD colspan="2" class="titulo">Seleccione el Archivo a Cargar</tD>
</tr>
<tr>
<td class="tdder">ARHIVO(Excel):</td>
<td>
<input type="file" name="archivo_carga" id="archivo_carga" />
</td>
</tr>
<tr>
<td class="tdder">Fecha Nomina:
<input name="fecha_nom" type="text" class="est_cont2" id="fecha_nom" value="0000-00-00" size="12" maxlength="12" />
</td>
<td colspan="2"><div align="center">
<input name="cargar" type="submit" class="irmenu" id="cargar" value="Enviar" />
</div></td>
</tr>
<tr>
<td colspan="2"><div align="center">
<input name="menu2" type="button" class="direcciona" id="menu2" onclick="window.location.href='menu_creditos_serviasjudinet.php'" value="IR AL MENU" />
</div></td>
</tr>
</table>
</div>
<label><br />
</label>
<p>
<label></label>
</p>
</form>
<p> </p>
</body>
</html>
<?php
require_once("../Conectarse.php");
$tota = 0 ;
$regi = 0;
$total = 0 ;
$tere = 0;
if(isset($_POST["cargar"]))
{
// Test CVS
require_once 'Excel/reader.php';
// ExcelFile($filename,$encoding);
$data = new Spreadsheet_Excel_Reader();
// Set output Encoding.
$data->setOutputEncoding('CP1251');
$data->read($archivo_carga);
error_reporting(E_ALL ^ E_NOTICE);
$fecha_act=date ( "Y-n-j" );
echo'<table width="700" border="0" cellspacing="2" cellpadding="2" align = "center">
<tr align="center">
<td colspan="6"><font face="Georgia,Times New Roman,Times,serif" color="#006600"><b align = "center">PAGOS EFECTUADOS</b></font></td>
</tr>
<tr align="center" bgcolor="#DDDDDD">
<td width="90" align="center"><font face="Geneva,Arial,Helvetica,san-serif" size="2" color="#000099">Cedula</font></td>
<td bgcolor="#DDDDDD" width="250" ><font face="Geneva,Arial,Helvetica,san-serif" size="2" color="#000099">Nombre</font></td>
<td width="100"><font face="Geneva,Arial,Helvetica,san-serif" size="2" color="#000099" align="center">Valor</font></td>
<td width="300"><font face="Geneva,Arial,Helvetica,san-serif" size="2" color="#000099" align="center">Anomalia</font></td>
</tr>';
$dis = date("d");
$mes = date("m");
$anos = date("Y");
$fechar = $anos.'-'.$mes.'-'.$dis;
for ($i = 1; $i <= $data->sheets[0]['numRows'] ; $i++)
{
for ($j = 1; $j <=5; $j++)
{
//echo "\"".$data->sheets[0]['cells'][$i][$j]."\",";
$data2[$j]=$data->sheets[0]['cells'][$i][$j];
$tere = 0;
}
$total = $total + 1;
$sqlnom = mysql_query('select cedula,nombre,numero_libranza,unidad_descuento,codigo_descuento,cuotas_credito,valor_cuota,fecha_ultimo_descuento,mes_inicio,ano_inicio,saldo_anterior,cuotas_pendientes,cuotas_descontadas,saldo_nuevo FROM creditos_serviasjudinet WHERE (cedula = "' . "$data2[1]". '" || codigo = "' . "$data2[1]". '") and valor_cuota = "' ."$data2[3]". '" and estado = "1" ');
if (!$sqlnom) {
die('Invalid query cartera_serviasjudinet 11: ' . mysql_error());
}
$num2 = mysql_num_rows($sqlnom);
list($codigo,$nombre,$numlib,$uni_desc,$cod_desc,$cuota,$valor_descuento,$fud,$mes_inicio,$ano_inicio,$saldo_ant,$cuopend,$cuodesc,$sal_nuevo) = mysql_fetch_row($sqlnom);
$con1 = mysql_query('SELECT cedula FROM creditos_serviasjudinet WHERE (cedula = "' . "$data2[1]". '" || codigo = "' . "$data2[1]". '") and estado = "1" ');
if (!$con1) {
die('Invalid query: ' . mysql_error());
}
while(list($cedut) = mysql_fetch_row($con1))
{
$tere = $tere + 1 ;
}
if ($tere < 2 )
{
if((mysql_num_rows($sqlnom)!=0) )
{
/*if ($data2[4] == 9802)
{
$data2[5] = $uni_desc;
}*/
$contable = mysql_query('SELECT id,cedula FROM credito_estado_contable WHERE cedula = "' . $codigo. '" and numero_libranza = "' . $numlib. '" ');
if (!$contable) {
die('Invalid query contable 8: ' . mysql_error());
}
list($id,$ced) = mysql_fetch_row($contable);
$num2 = mysql_num_rows($contable);
if($num2 == 0)
{
$tota = $tota +1 ;
$guardar = mysql_query("INSERT INTO credito_estado_contable (cedula,nombre,numero_libranza,numero_cuota,mes_cuota,ano_cuota,valor_cuota,fecha_registro,fecha_nomina,codigo_descuento,unidad_descuento) VALUES ('" ."$codigo". "','" ."$nombre". "','" ."$numlib". "','1','" ."$mes_inicio". "','" ."$ano_inicio". "','" . "$data2[3]". "','" ."$fechar". "','" ."$fecha_nom". "','" . "$data2[4]". "','" . "$data2[5]". "')");
if (!$guardar) {
die('Invalid query 1 cartera_estado_contable guardar: ' . mysql_error());
}
$cuopend--;
$cuodesc++;
$sal_ant = $sal_nuevo;
$sal_nuevo = $sal_nuevo - $valor_descuento ;
$mssql3 = mysql_query("UPDATE creditos_serviasjudinet set fecha_ultimo_descuento = '" .$fecha_nom. "',saldo_anterior = '" .$sal_ant. "' ,cuotas_pendientes = '" .$cuopend. "' ,cuotas_descontadas = '" .$cuodesc. "' ,saldo_nuevo = '" .$sal_nuevo. "',mes_aplicado = '" .$mes_inicio. "' ,ano_aplicado = '" .$ano_inicio. "' WHERE cedula = '" .$codigo. "' and numero_libranza = '" . $numlib. "' ");
if (!$mssql3) {
die('Invalid query cartera_serviasjudinet MODIFICAR: ' . mysql_error());
}
}else{
$sqlnom = mysql_query('select cedula,nombre,numero_libranza,unidad_descuento,codigo_descuento,cuotas_credito,valor_cuota ,fecha_ultimo_descuento,mes_inicio,ano_inicio,saldo_anterior,cuotas_pendientes,cuotas_descontadas,saldo_nuevo,estado FROM creditos_serviasjudinet WHERE (cedula = "' . "$data2[1]". '" || codigo = "' . "$data2[1]". '") and estado = "1"');
if (!$sqlnom) {
die('Invalid query cartera_serviasjudinet 11: ' . mysql_error());
}
list($codigo,$nombre,$numlib,$uni_desc,$cod_desc,$cuota,$valor_descuento,$fud,$mes_inicio,$ano_inicio,$saldo_ant,$cuopend,$cuodesc,$sal_nuevo,$estado) = mysql_fetch_row($sqlnom);
$cont = mysql_query('SELECT * FROM credito_estado_contable WHERE cedula = "' .$codigo. '" and numero_libranza = "' . $numlib. '" and fecha_registro <= "' .$fechar. '" order by numero_cuota ');
if (!$cont) {
die('Invalid query: ' . mysql_error());
}
$num2 = mysql_num_rows($cont);
while(list($id,$ceduc,$nombrec,$numero_libranza,$cuota,$mesi,$ano,$valorcuotac,$fecha_nomina,$fecha_registroc,$codescc,$unidescc) = mysql_fetch_row($cont))
{
if ($numero_libranza == $numlib)
{
$registro = 1;
$feccc = $fud;
$ide = $id;
$rem= $mesi ;
$rama = $ano ;
$cuo = $cuota;
}
if($fecha_registroc == $fechar)
{
$registro = 2;
}
}
if($registro == 1 and $num2 > 0)
{
if($rem == 12)
{
$rem = 1;
$rama = $rama + 1;
$cuo = $cuo + 1 ;
}else{
$cuo = $cuo + 1 ;
$rem = $rem + 1;
}
$tota = $tota +1 ;
$guardar = mysql_query("INSERT INTO credito_estado_contable (cedula,nombre,numero_libranza,numero_cuota,mes_cuota,ano_cuota,valor_cuota,fecha_registro,fecha_nomina,codigo_descuento,unidad_descuento) VALUES ('" ."$codigo". "','" ."$nombre". "','" ."$numlib". "','" ."$cuo". "','" ."$rem". "','" ."$rama". "','" . "$data2[3]". "','" ."$fechar". "','" ."$fecha_nom". "','" . "$data2[4]". "','" . "$data2[5]". "')");
if (!$guardar) {
die('Invalid query 1 cartera_estado_contable guardar: ' . mysql_error());
}
$cuopend--;
$cuodesc++;
$sal_ant = $sal_nuevo;
$sal_nuevo = $sal_nuevo - $valor_descuento ;
$mssql3 = mysql_query("UPDATE creditos_serviasjudinet set fecha_ultimo_descuento = '" .$fecha_nom. "',saldo_anterior = '" .$sal_ant. "' ,cuotas_pendientes = '" .$cuopend. "' ,cuotas_descontadas = '" .$cuodesc. "' ,saldo_nuevo = '" .$sal_nuevo. "',mes_aplicado = '" .$rem. "' ,ano_aplicado = '" .$rama. "' WHERE cedula = '" .$codigo. "' and numero_libranza = '" . $numlib. "' ");
if (!$mssql3) {
die('Invalid query cartera_serviasjudinet MODIFICAR: ' . mysql_error());
}
}else{
$regi = $regi + 1;
if ($estado == 0)
{
printf ("<tr align='center' bgcolor='#f4f4f4'>
<td width='100'><font face='Geneva,Arial,Helvetica,san-serif' size='2' color=#993300'>$data2[1]</td>
<td width='600'> <font face='Geneva,Arial,Helvetica,san-serif' size='2' color=#993300'>$data2[2]</td>
<td width='100'><font face='Geneva,Arial,Helvetica,san-serif' size='2' color=#993300'>$data2[3]</td>
<td width='400'><font face='Geneva,Arial,Helvetica,san-serif' size='2' color=#993300'>HISTORICO</td></tr>");
}else{
printf ("<tr align='center' bgcolor='#f4f4f4'>
<td width='100'><font face='Geneva,Arial,Helvetica,san-serif' size='2' color=#993300'>$data2[1]</td>
<td width='600'> <font face='Geneva,Arial,Helvetica,san-serif' size='2' color=#993300'>$data2[2]</td>
<td width='100'><font face='Geneva,Arial,Helvetica,san-serif' size='2' color=#993300'>$data2[3]</td>
<td width='400'><font face='Geneva,Arial,Helvetica,san-serif' size='2' color=#993300'>Cuota ya fue cargada el Dia de Hoy</td></tr>");
}
}
}
}
else
{
$regi = $regi + 1;
$con = mysql_query('select cedula,nombre,numero_libranza,unidad_descuento,codigo_descuento,valor_cuota,fecha_ultimo_descuento,mes_inicio,ano_inicio,saldo_anterior,cuotas_pendientes,cuotas_descontadas,saldo_nuevo FROM creditos_serviasjudinet WHERE (cedula = "' . "$data2[1]". '" || codigo = "' . "$data2[1]". '") and estado = "0"');
if (!$con) {
die('Invalid query cartera_estado_contable: ' . mysql_error());
}
list($codigo,$nombre,$numlib,$uni_desc,$cod_desc,$valor_descuento,$fud,$mes_inicio,$ano_inicio,$saldo_ant,$cuopend,$cuodesc,$sal_nuevo) = mysql_fetch_row($con);
if ((mysql_num_rows($con)!=0))
{
printf ("<tr align='center' bgcolor='#f4f4f4'>
<td width='100'><font face='Geneva,Arial,Helvetica,san-serif' size='2' color=#993300'>$codigo</td>
<td width='600'> <font face='Geneva,Arial,Helvetica,san-serif' size='2' color=#993300'>$nombre</td>
<td width='100'><font face='Geneva,Arial,Helvetica,san-serif' size='2' color=#993300'>$data2[3]</td>
<td width='100'><font face='Geneva,Arial,Helvetica,san-serif' size='2' color=#993300'>HISTORICO</td></tr>");
}else{
$sqlnom = mysql_query('select cedula,nombre,numero_libranza,unidad_descuento,codigo_descuento,cuotas_credito,valor_cuota,fecha_ultimo_descuento,mes_inicio,ano_inicio,saldo_anterior,cuotas_pendientes,cuotas_descontadas,saldo_nuevo FROM creditos_serviasjudinet WHERE (cedula = "' . "$data2[1]". '" || codigo = "' . "$data2[1]". '") and valor_cuota != "' ."$data2[3]". '" and estado = "1" ');
if (!$sqlnom) {
die('Invalid query cartera_serviasjudinet 11: ' . mysql_error());
}
list($codigo,$nombre,$numlib,$uni_desc,$cod_desc,$cuota,$valor_descuento,$fud,$mes_inicio,$ano_inicio,$saldo_ant,$cuopend,$cuodesc,$sal_nuevo) = mysql_fetch_row($sqlnom);
if ((mysql_num_rows($sqlnom)!=0))
{
printf ("<tr align='center' bgcolor='#f4f4f4'>
<td width='100'><font face='Geneva,Arial,Helvetica,san-serif' size='2' color=#993300'>$data2[1]</td>
<td width='600'> <font face='Geneva,Arial,Helvetica,san-serif' size='2' color=#993300'>$data2[2]</td>
<td width='100'><font face='Geneva,Arial,Helvetica,san-serif' size='2' color=#993300'>$data2[3]</td>
<td width='100'><font face='Geneva,Arial,Helvetica,san-serif' size='2' color=#993300'>Valor Cuota Incorrecta</td></tr>");
}else
{
printf ("<tr align='center' bgcolor='#f4f4f4'>
<td width='100'><font face='Geneva,Arial,Helvetica,san-serif' size='2' color=#993300'>$data2[1]</td>
<td width='600'> <font face='Geneva,Arial,Helvetica,san-serif' size='2' color=#993300'>$data2[2]</td>
<td width='100'><font face='Geneva,Arial,Helvetica,san-serif' size='2' color=#993300'>$data2[3]</td>
<td width='100'><font face='Geneva,Arial,Helvetica,san-serif' size='2' color=#993300'>Cedula Incorrecta</td></tr>");
}
}
}
}
else
{
printf ("<tr align='center' bgcolor='#f4f4f4'>
<td width='100'><font face='Geneva,Arial,Helvetica,san-serif' size='2' color=#993300'>$data2[1]</td>
<td width='600'> <font face='Geneva,Arial,Helvetica,san-serif' size='2' color=#993300'>$data2[2]</td>
<td width='100'><font face='Geneva,Arial,Helvetica,san-serif' size='2' color=#993300'>$data2[3]</td>
<td width='100'><font face='Geneva,Arial,Helvetica,san-serif' size='2' color=#993300'>Tiene mas de un Credito </td></tr>");
}
}
echo "</table>";
echo'<table width="300" border="0" cellspacing="2" cellpadding="2" align = "center">
<tr align="center">
<td colspan="4"><font face="Georgia,Times New Roman,Times,serif" color="#FF0000"><b align = "center">INFORME DE REGISTROS</b></font></td>
</tr>
<tr align="center" bgcolor="#DDDDDD">
<td width="200" align="center"><font face="Geneva,Arial,Helvetica,san-serif" size="2" color="#000099">N° Archivos Subidos</font></td>
<td bgcolor="#DDDDDD" width="300" ><font face="Geneva,Arial,Helvetica,san-serif" size="2" color="#000099">N° Inconsistencias</font></td>
<td width="150"><font face="Geneva,Arial,Helvetica,san-serif" size="2" color="#000099" align="center">Total de Registros</font></td>
</tr>';
printf ("<tr align='center' bgcolor='#f4f4f4'>
<td width='300'><font face='Geneva,Arial,Helvetica,san-serif' size='2' color=#993300'>$tota</td>
<td width='300'> <font face='Geneva,Arial,Helvetica,san-serif' size='2' color=#993300'>$regi</td>
<td width='300'><font face='Geneva,Arial,Helvetica,san-serif' size='2' color=#993300'>$total</td></tr>");
echo "</table>";
}
?>