File: /home/asjudine/public_html/creditos/administracion/exportar_solicitud_deudor.php
<?
//include("head.php");
include("head.php");
include("datacon.php");
?>
<?
$querysearch = "select * from solicitudcredito_deudor where cedula='$lacedula'";
$resultsearch = MYSQL_QUERY($querysearch);
$numbersearch = mysql_Numrows($resultsearch);
if ($numbersearch==0) {
echo "<font size=2 face=\"Arial, Helvetica, sans-serif\"><b>No se encontraron Solicitudes de Crédito !</b></font>";
}
else if ($numbersearch>0) {
$x=0;
while ($x<$numbersearch)
{
// if (($x%2)==0) { $bgcolor="#FFFFFF"; } else { $bgcolor="#C0C0C0"; }
?>
<? $ciudad=mysql_result($resultsearch,$x,"ciudad"); ?>
<? $fecha=mysql_result($resultsearch,$x,"fecha"); ?>
<? $apellidosynombres=mysql_result($resultsearch,$x,"apellidosynombres"); ?>
<? $cedula=mysql_result($resultsearch,$x,"cedula"); ?>
<? $cedulade=mysql_result($resultsearch,$x,"cedulade"); ?>
<? $empresa=mysql_result($resultsearch,$x,"empresa"); ?>
<? $tiemposervicio=mysql_result($resultsearch,$x,"tiemposervicio"); ?>
<? $grado=mysql_result($resultsearch,$x,"grado"); ?>
<? $ocupacion=mysql_result($resultsearch,$x,"ocupacion"); ?>
<? $codigo=mysql_result($resultsearch,$x,"codigo"); ?>
<? $estadocivil=mysql_result($resultsearch,$x,"estadocivil"); ?>
<? $direccionresidencia=mysql_result($resultsearch,$x,"direccionresidencia"); ?>
<? $ciudadresidencia=mysql_result($resultsearch,$x,"ciudadresidencia"); ?>
<? $barrio=mysql_result($resultsearch,$x,"barrio"); ?>
<? $telefono=mysql_result($resultsearch,$x,"telefono"); ?>
<? $banco=mysql_result($resultsearch,$x,"banco"); ?>
<? $cuenta=mysql_result($resultsearch,$x,"cuenta"); ?>
<? $sucursal=mysql_result($resultsearch,$x,"sucursal"); ?>
<? $tipodemercancia=mysql_result($resultsearch,$x,"tipodemercancia"); ?>
<? $valorsolicitado=mysql_result($resultsearch,$x,"valorsolicitado"); ?>
<? $plazomeses=mysql_result($resultsearch,$x,"plazomeses"); ?>
<? $valorcuotas=mysql_result($resultsearch,$x,"valorcuotas"); ?>
<? $devengado=mysql_result($resultsearch,$x,"devengado"); ?>
<? $descuentos=mysql_result($resultsearch,$x,"descuentos"); ?>
<? $disponible=mysql_result($resultsearch,$x,"disponible"); ?>
<? $valorcredito=mysql_result($resultsearch,$x,"valorcredito"); ?>
<? $valorlibranza=mysql_result($resultsearch,$x,"valorlibranza"); ?>
<? $valorcuota=mysql_result($resultsearch,$x,"valorcuota"); ?>
<? $refco_nombre1=mysql_result($resultsearch,$x,"refco_nombre1"); ?>
<? $refco_direccion1=mysql_result($resultsearch,$x,"refco_direccion1"); ?>
<? $refco_telefono1=mysql_result($resultsearch,$x,"refco_telefono1"); ?>
<? $refco_nombre2=mysql_result($resultsearch,$x,"refco_nombre2"); ?>
<? $refco_direccion2=mysql_result($resultsearch,$x,"refco_direccion2"); ?>
<? $refco_telefono2=mysql_result($resultsearch,$x,"refco_telefono2"); ?>
<? $refco_nombre3=mysql_result($resultsearch,$x,"refco_nombre3"); ?>
<? $refco_direccion3=mysql_result($resultsearch,$x,"refco_direccion3"); ?>
<? $refco_telefono3=mysql_result($resultsearch,$x,"refco_telefono3"); ?>
<? $refper_nombre1=mysql_result($resultsearch,$x,"refper_nombre1"); ?>
<? $refper_direccion1=mysql_result($resultsearch,$x,"refper_direccion1"); ?>
<? $refper_telefono1=mysql_result($resultsearch,$x,"refper_telefono1"); ?>
<? $refper_nombre2=mysql_result($resultsearch,$x,"refper_nombre2"); ?>
<? $refper_direccion2=mysql_result($resultsearch,$x,"refper_direccion2"); ?>
<? $refper_telefono2=mysql_result($resultsearch,$x,"refper_telefono2"); ?>
<? $refper_nombre3=mysql_result($resultsearch,$x,"refper_nombre3"); ?>
<? $refper_direccion3=mysql_result($resultsearch,$x,"refper_direccion3"); ?>
<? $refper_telefono3=mysql_result($resultsearch,$x,"refper_telefono3"); ?>
<?
$x++;
} // end while
} // end if
$fechayhoraField = date("j_n_Y_") . " " . date("h_i_s");
$nombre_archivo = 'exportacion/credito_' . $fechayhoraField . '.txt';
$gestor = fopen($nombre_archivo, 'w');
if ($gestor) {
$contenido = $cedula . ";\"" . $nombre . "\";\"" . $direccion . "\";\"" . $ciudad . "\";\"" . $telefono . "\";\"" . $correo . "\";\"" . $actividad . "\";\"" . $banco . "\";\"" . $cuenta . "\";\"" . $sucursal . "\";\"" . $tipocuenta . "\";\"" . $fechayhora . "\";\"" . $ip . "\"\n";
if (fwrite($gestor, $contenido) == FALSE) {
// echo "No se puede escribir al archivo ($nombre_archivo)";
exit;
}
echo "<br><br><font size=2 face=\"Arial, Helvetica, sans-serif\"><center>Se exportó con éxito el archivo de <br>Actualización de Datos de Asociados a formato Excel ! <br><br>Puede visualizarlo <a href=\"http://www.febor.com/actualizacion_asociados.csv\"><b> Aquí</b></a></font></center>";
fclose($gestor);
} else {
echo "<br><br>No se exportó el archivo !";
}
include("foot.php");
?>