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";
}
header("Last-Modified: " . gmdate("D,d M YH:i:s") . " GMT");
header("Cache-Control: no-cache, must-revalidate");
header("Pragma: no-cache");
header("Content-type: application/vnd.ms-excel");
header("Content-Disposition: attachment; filename=\"clientesactivos.csv\"");
require "./session/libreriap.php";
/*
function dias_cartera($fecha_i,$fecha_f)
{hhhhh
$dias = (strtotime($fecha_i)-strtotime($fecha_f))/86400;
$dias = abs($dias); $dias = floor($dias);
return $dias;
}
*/
if (isset($_GET['cus_no'])) {
$link = Fconectar();
if ($link) {
// Se define la consulta que va a ejecutarse, como en sql
$sql = "\n\t\t\t\t\tSELECT A.cus_no, A.cus_name, A.slspsn_no, B.slspsn_name AS vendedor, C.slspsn_name AS cobrador, A.ar_terms_cd, \n\t\t\t\t\t\t\t A.last_sale_dt, A.last_sale_amt, A.last_pay_dt, A.last_pay_amt,A.nit, A.cus_type_cd, A.start_dt, A.vend_no\n\t\t\t\t\tFROM ARCUSFIL_SQL AS A INNER JOIN\n\t\t\t\t\t\t\t\t ARSLMFIL_SQL AS B ON A.slspsn_no = B.slspsn_no INNER JOIN\n\t\t\t\t\t\t\t\t ARSLMFIL_SQL AS C ON A.slspsn_no = C.slspsn_no\n\t\t\t\t\tWHERE (A.slspsn_no <> 999) AND (A.slspsn_no <> 132) AND (A.slspsn_no <> 300) AND \n\t\t\t\t\t\t\t (A.slspsn_no <> 108) AND (A.slspsn_no <> 100) AND (A.slspsn_no <> 110) AND \n\t\t\t\t\t\t\t (A.slspsn_no <> 107) AND (A.slspsn_no <> 109) AND (A.slspsn_no <> 106) AND\n\t\t\t\t\t\t\t (A.cus_no < 10000) AND (A.curr_cd = 'PES')\n\t\t\t\t\tORDER BY A.cus_name\n\t\t\t\t";
// Se ejecuta la consulta y se guardan los resultados
$results = odbc_exec($link, $sql) or die("Error en instruccion SQL {$orden}");
$existe = odbc_num_rows($results);
if ($existe) {
$i = 0;
while ($registro = odbc_fetch_array($results)) {
$arc_cus_no[$i] = $registro['cus_no'];
$arc_cus_name[$i] = $registro['cus_name'];
$arc_slspsn_no[$i] = $registro['slspsn_no'];
$arc_nit[$i] = $registro['nit'];
$ars_slspsn_name[$i] = $registro['vendedor'];
$ars_slspsn_collector[$i] = $registro['cobrador'];
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>
// ";
}
