File: /home/asjudine/public_html/ingresar_pago_auto.php
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html xmlns="http://www.w3.org/1999/xhtml">
<head>
<meta http-equiv="Content-Type" content="text/html; charset=utf-8" />
<title>Documento sin título</title>
<style type="text/css">
<!--
.Estilo2 {color: #0000CC;
font-size: 16px;
}
.Estilo3 {color: #2492FF;
font-weight: bold;
}
.Estilo4 {
color: #003300;
font-size: 18px;
font-family: Georgia, "Times New Roman", Times, serif;
}
.recaudo {font-family: "Courier New", Courier, monospace;
font-size: 12px;
font-style: normal;
font-weight: bold;
font-variant: normal;
color: #000000;
background-color: #B6CBDC;
margin: 4px;
padding: 8px;
width: auto;
border: medium outset #339966;
}
.Estilo50 {color: #CC3333;
font-family: "Arial Narrow";
font-weight: bold;
}
.Estilo53 {font-family: "Courier New", Courier, monospace}
-->
</style>
</head>
<body>
<form action="" method="post" enctype="multipart/form-data" name="form1" id="form1">
<label> </label>
<div align="center">
<table width="448" border="3" cellpadding="3" cellspacing="3" class="recaudo">
<caption>
<div align="center" class="Estilo4 ">PAGO AUTOMATICO CARTERA</div>
</caption>
<tr>
<th colspan="2" bgcolor="#E0FEF3" scope="col"><label><span class="Estilo53">Seleccione el Archivo a Cargar</span></label></th>
</tr>
<tr>
<td width="150" bgcolor="#E0FEF3"><div align="center"><span class="Estilo2">ARHIVO(Excel): </span></div></td>
<td width="265" bgcolor="#E0FEF3"><div align="center">
<input type="file" name="archivo_carga" id="archivo_carga" />
</div></td>
</tr>
<tr>
<td bgcolor="#E0FEF3" align="center">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" bgcolor="#E0FEF3"><div align="center">
<input name="cargar" type="submit" class="Estilo3" id="cargar" value="Enviar" />
</div></td>
</tr>
<tr>
<td colspan="2" bgcolor="#E0FEF3"><div align="center">
<input name="menu2" type="button" class="Estilo50" id="menu2" onclick="window.location.href='proveedor_desc.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("mainfile.php");
include ("config.php");
global $dbi;
function Conectarse()
{
if (!($link=@mysql_connect("localhost","asjudine","as2006")))
{
echo "Error conectando con el servidor.";
exit();
}
$dbname = "asjudinet";
if (!@mysql_select_db($dbname,$link))
{
echo "Error seleccionando la base de datos.";
exit();
}
return $link;
}
Conectarse();
$tota = 0 ;
$regi = 0;
$total = 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];
}
$total = $total + 1;
$sqlnom = mysql_query('select nombres, cedula, numero_cuotas, valor_mensual, numero_libranza, mes_inicio, ano_inicio FROM creditos WHERE cedula = "' . "$data2[1]". '" ');
if (!$sqlnom) {
die('Invalid query cartera_serviasjudinet 11: ' . mysql_error());
}
$num2 = mysql_num_rows($sqlnom); list( $nombre, $codigo, $cuota, $valor_descuento, $numlibra, $mes_inicio, $ano_inicio) = mysql_fetch_row($sqlnom);
if((mysql_num_rows($sqlnom)!=0) )
{
$contable = mysql_query('SELECT id, codigo FROM relacion_pagos WHERE codigo = "' . $codigo. '" and numero_libranza = "' . $numlibra. '" AND tipo_pago = "CRE" ');
if (!$contable) {
die('Invalid query jis: ' . mysql_error());
}
list($id, $ced) = mysql_fetch_row($contable);
$num2 = mysql_num_rows($contable);
if($num2 == 0)
{
$tota = $tota +1 ;
$ter = mysql_query("INSERT INTO relacion_pagos (codigo, valor, cuota, mes_inicio, ano_inicio, cod_descuento, unidad_descuento, fecha_registro, fecha_pago , numero_libranza, tipo_pago) VALUES ('" ."$codigo". "', '$data2[2]' , '1', '" ."$mes_inicio". "', '" ."$ano_inicio". "', '$data2[3]', '$data2[4]', '" ."$fechar". "', '" . $_POST["fecha_nom"] . "', '" ."$numlibra". "', 'CRE')");
if (!$ter) {
die('Invalid query insert: ' . mysql_error());
}
$mssql3 = mysql_query('SELECT * FROM estado_contable WHERE codigo = "' . $codigo. '" AND tipo_pago = "CRE" ');
$num3=mysql_num_rows($mssql3);
list($codigo, $sal_ant, $cuopend , $sal_nuevo, $cuodesc , $fecha_udesc , $proveedor, $tipo_pago ) = mysql_fetch_row($mssql3);
$cuopend--;
$cuodesc++;
$sal_ant = $sal_nuevo;
$sal_nuevo = $sal_nuevo - $valor_descuento ;
$upd = mysql_query("UPDATE estado_contable set saldo_ant = '" .$sal_ant. "', cuotas_pend = '" .$cuopend. "', nuevo_saldo = '" .$sal_nuevo. "', cuotas_desc = '" .$cuodesc. "', fecha_udesc = '" .$fechar. "' WHERE codigo = '$data2[1]' and tipo_pago = 'CRE' ");
if (!$upd) {
die('Invalid query update: ' . mysql_error());
}
}else{
$cont = mysql_query('SELECT id, codigo, valor , cuota , mes_inicio, ano_inicio, cod_descuento, unidad_descuento, fecha_registro FROM relacion_pagos WHERE codigo = "' .$codigo. '" and numero_libranza = "' . $numlibra. '" and fecha_registro <= "' .$fechar. '" order by cuota ');
if (!$cont) {
die('Invalid query relacion_pagos 1: ' . mysql_error());
}
$num2 = mysql_num_rows($cont);
while(list($id, $codi, $valor, $cuota, $mes_inicio, $ano_inicio, $cod_descuento, $unidad_descuento, $regis) = mysql_fetch_row($cont))
{
$registro = 1;
$ide = $id;
$rem= $mes_inicio ;
$rama = $ano_inicio ;
$cuo = $cuota;
if($regis == $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 ;
$ter = mysql_query("INSERT INTO relacion_pagos (codigo, valor, cuota, mes_inicio, ano_inicio, cod_descuento, unidad_descuento, fecha_registro, fecha_pago, numero_libranza, tipo_pago) VALUES ( '" ."$codigo". "', '" ."$valor_descuento". "', '" ."$cuo". "', '" ."$rem". "', '" ."$rama". "', '$data2[3]', '$data2[4]', '" ."$fechar". "', '" . $_POST["fecha_nom"] . "', '" ."$numlibra". "', 'CRE')");
if (!$ter) {
die('Invalid query insert: ' . mysql_error());
}
$mssql3 = mysql_query('SELECT * FROM estado_contable WHERE codigo = "' . $codigo. '" AND tipo_pago = "CRE" ');
list($codigo, $sal_ant, $cuopend , $sal_nuevo, $cuodesc , $fecha_udesc , $proveedor, $tipo_pago ) = mysql_fetch_row($mssql3);
$cuopend--;
$cuodesc++;
$sal_ant = $sal_nuevo;
$sal_nuevo = $sal_nuevo - $valor_descuento ;
$upd = mysql_query("UPDATE estado_contable set saldo_ant = '" .$sal_ant. "', cuotas_pend = '" .$cuopend. "', nuevo_saldo = '" .$sal_nuevo. "', cuotas_desc = '" .$cuodesc. "', fecha_udesc = '" .$fechar. "' WHERE codigo = '" .$codigo. "' and tipo_pago = 'CRE' ");
if (!$upd) {
die('Invalid query update: ' . mysql_error());
}
}else{
$regi = $regi + 1;
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 nombres, cedula, numero_cuotas, valor_mensual, mes_inicio, ano_inicio FROM creditos WHERE cedula = "' . "$data2[1]". '" ');
if (!$con) {
die('Invalid query cartera_serviasjudinet 11: ' . mysql_error());
}
list( $nombre, $codigo, $cuota, $valor_descuento, $mes_inicio, $ano_inicio) = mysql_fetch_row($con);
//mostrar los datos del archivo de descargue
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>");
}
}
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>";
}
?>