function head_cus($customer_no)
{
$link = Fconectar();
if ($link) {
// Se define la consulta que va a ejecutarse, como en sql
$sql_datos_cus = "\n\t\t\t\t\tSELECT C.par_cus_no, C.cus_no, C.cus_name, V1.slspsn_name AS Vendedor, V2.slspsn_name AS Cobrador, C.ar_terms_cd \n\t\t\t\t\tFROM\n\t\t\t\t\tARCUSFIL_SQL AS C,\n\t\t\t\t\tARSLMFIL_SQL AS V1,\n\t\t\t\t\tARSLMFIL_SQL AS V2\n\t\t\t\t\tWHERE\n\t\t\t\t\tC.slspsn_no = V1.slspsn_no AND\n\t\t\t\t\tC.collector = V2.slspsn_no AND\n\t\t\t\t\tC.cus_no = '{$customer_no}'\n\t\t\t\t";
// Se ejecuta la consulta y se guardan los resultados
$results = odbc_exec($link, $sql_datos_cus) or die("Error en instruccion SQL {$sql_datos_cus}");
$existe = odbc_num_rows($results);
if ($existe) {
$registro = odbc_fetch_array($results);
$head_cus_no = $registro['cus_no'];
$head_cus_name = $registro['cus_name'];
$head_ar_terms_cd = $registro['ar_terms_cd'];
$head_slspsn_name = $registro['Vendedor'];
$head_collector = $registro['Cobrador'];
} else {
$mensaje = "No existen registros!";
}
} else {
Ferror("No se pudo establecer coneccion con la Base de Datos!");
}
// Se cierra la conexión
odbc_close($link);
echo "\n\t\t<div align='center'>\n\t\t<table width='40%' border='3' cellpadding='0' cellspacing='10' bordercolor='#DCF3A4' align='center'>\n\t\t\t<th colspan='2'>EDADES DE CARTERA POR CLIENTE (Datos hasta: " . date('d-m-Y') . ")</th>\t\n\t\t\t<tr>\n\t\t\t\t<td>Cliente:</td>\n\t\t\t\t<td>(" . number_format($head_cus_no, 0, '', '') . ") - {$head_cus_name}</td>\n\t\t\t</tr>\n\t\t\t<tr>\n\t\t\t\t<td>Vendedor:</td>\n\t\t\t\t<td>{$head_slspsn_name}</td>\n\t\t\t</tr>\n\t\t\t<tr>\n\t\t\t\t<td>Cobrador:</td>\n\t\t\t\t<td>{$head_collector}</td>\n\t\t\t</tr>\n\t\t\t<tr>\n\t\t\t\t<td>Condición de Pago:</td>\n\t\t\t\t<td>{$head_ar_terms_cd}</td>\n\t\t\t</tr>\n\t\t\t<tr>\n\t\t\t\t<td colspan='2' align='center'>Generado: " . date('d-m-Y H:i:s') . "</td>\n\t\t\t</tr>\n\t\t</table>\n\t\t</div>\n\t\t";
}
$fecha_new[$i] = date_create($date_doc);
$fp .= " days";
date_add($fecha_new[$i], date_interval_create_from_date_string($fp));
//echo date_format($fecha_new[$i], 'Y/m/d');
*/
$i++;
}
//while
$cont = $i;
} else {
$mensaje = "Cobrador no encontrado!";
}
} else {
Ferror("No se pudo establecer coneccion con la Base de Datos!");
}
// Se cierra la conexión
odbc_close($link);
}
//if isset...
echo "COD,NIT,CLIENTE,TIPOCLIENTE,F. CREACION,FP,VENDEDOR,COBRADOR,ZONA,F.ULT.VTA,VLR.ULT.VTA,F.ULT.PAGO,VLR.ULT.PAGO,\n";
for ($i = 0; $i < $cont; $i++) {
//Código Hijo
// echo "<td>".number_format($arc_cus_no[$i],0,'','')."</td>";
$registro_cxc = number_format($arc_cus_no[$i], 0, '', '');
//Nit
// echo "<td>".$arc_nit[$i]."</td>";
$registro_cxc .= "," . $arc_nit[$i];
//Nombre del cliente
// echo "<td>".$arc_cus_name[$i]."</td>";
function head_cus($customer_no)
{
$link = Fconectar();
if ($link) {
// Se define la consulta que va a ejecutarse, como en sql
$sql_datos_cus = "\n\t\t\t\t\tSELECT C.par_cus_no, C.cus_no, C.cus_name, V1.slspsn_name AS Vendedor, V2.slspsn_name AS Cobrador, C.ar_terms_cd \n\t\t\t\t\tFROM\n\t\t\t\t\tARCUSFIL_SQL AS C,\n\t\t\t\t\tARSLMFIL_SQL AS V1,\n\t\t\t\t\tARSLMFIL_SQL AS V2\n\t\t\t\t\tWHERE\n\t\t\t\t\tC.slspsn_no = V1.slspsn_no AND\n\t\t\t\t\tC.collector = V2.slspsn_no AND\n\t\t\t\t\tC.cus_no = '{$customer_no}'\n\t\t\t\t";
// Se ejecuta la consulta y se guardan los resultados
$results = odbc_exec($link, $sql_datos_cus) or die("Error en instruccion SQL {$sql_datos_cus}");
$existe = odbc_num_rows($results);
if ($existe) {
$registro = odbc_fetch_array($results);
$head_cus_no = $registro['cus_no'];
$head_cus_name = $registro['cus_name'];
$head_ar_terms_cd = $registro['ar_terms_cd'];
$head_slspsn_name = $registro['Vendedor'];
$head_collector = $registro['Cobrador'];
} else {
$mensaje = "No existen registros!";
}
} else {
Ferror("No se pudo establecer coneccion con la Base de Datos!");
}
// Se cierra la conexión
odbc_close($link);
// echo "CLiente,Vendedor,Cobrador,CondicionDePago,\n";
// echo"
// <div class='edad'>
// <div align='center'>
// <table width='40%' border='3' cellpadding='0' cellspacing='10' bordercolor='#DCF3A4' align='center'>
// <th colspan='2'>EDADES DE CARTERA POR CLIENTE (Datos hasta: ".date('d-m-Y').")</th>
// <tr>
// <td>Cliente:</td>
// $registro_cxc = number_format($head_cus_no,0,'','');
//<td>(".number_format($head_cus_no,0,'','').") - $head_cus_name</td>
//</tr>
//<tr>
// <td>Vendedor:</td>
// $registro_cxc .= ",".$head_slspsn_name;
// <td>$head_slspsn_name</td>
//</tr>
//<tr>
//<td>Cobrador:</td>
// $registro_cxc .= ",".$head_collector;
//<td>$head_collector</td>
//</tr>
//<tr>
//<td>Condición de Pago:</td>
// $registro_cxc .= ",".$head_ar_terms_cd;
// <td>$head_ar_terms_cd</td>
// </tr>
// <tr>
// $registro_cxc .= ",".date_format($fecha_new[$i], 'd/m/Y');
//$registro_cxc .= ",".date,('d/m/Y');
// <td colspan='2' align='center'>Generado: ".date('d-m-Y H:i:s')."</td>
// </tr>
// <td align='right'><h3><input type='button' value='Exportar a Excel' class='excel'onclick=\"location.href='http://localhost/reportesc/ace_cxc_excel.php?cut_date=".$_POST['cut_date']."'\" name='excel'/></h3>
// </table>
// </div>
// </div>
// ";
}
//$aro_amt[$i] = $registro['VALOR'] + $registro['VALOR2'];
//$aro_ar_terms_cd[$i] = $registro['ar_terms_cd'];
//$aro_slspsn_no[$i] = $registro['slspsn_no2'];
//$aro_curr_trx_rt[$i] = $registro['curr_trx_rt'];
//$ars_slspsn_name[$i] = $registro['slspsn_name'];
$total_cliente += $aro_amt[$i];
$tot_sls_amt = $registro['tot_sls_amt'];
$i++;
}
//while
$cont = $i;
} else {
$mensaje = "Cliente no Existe!";
}
} else {
Ferror("No se pudo establecer conexión con la Base de datos!");
}
// Se cierra la conexión
odbc_close($link);
}
//if isset...
?>
<div class="main_content">
<br>
<table width="80%" border="0" align="center">
<tr>
<td align='left'>
<td><h6>Días Cartera</h6>
<br>
<form name="consulta" action="cxc_day.php" method="post" onsubmit="return valida_envia(this);">
<input type="text" size="6" maxlength="6" name="cus_no">
