Facturas

$llave;
$dir = ‘/microbal.net/usuarios/’.$dni.’/facturas’;

if (is_dir($dir)) {
$dh = opendir($dir);
while (false !== ($filename = readdir($dh))) {
if ((trim($filename) != «.») && (trim($filename) != «..»)) {
$archivos[$filename] = $filename;
}
}

krsort ($archivos);

$ano=»;
$cuentaanos=0;

echo ‘

‘;

foreach ($archivos as $arch) {
$anoactual = substr($arch, 0, 4);

if ($ano!==$anoactual){
if ($ano!==»){
echo ‘

‘;
if($cuentaanos!==1){echo ‘[/EXPAND]

‘;}
echo ‘

[EXPAND ‘.$anoactual.’]’;
}
$ano=$anoactual;
$cuentaanos=$cuentaanos+1;
echo ‘

‘.$ano.’

‘;
echo ‘

‘;
}
$pdf = ‘/microbal.net/usuarios/’.$dni.’/facturas/’.$arch;
$fecha=substr($arch, 0, 10);
$fact=str_replace( «.pdf», «», substr($arch, 11, 100));
echo ‘

‘;
echo ‘

‘;
echo ‘

‘;

}
echo ‘

Fecha	Recibo	Ver
‘.$fecha.’	‘.$fact.’

‘;
if($cuentaanos!==1){ echo ‘[/EXPAND]’;}
echo ‘

‘;
}
else{
echo «
No se han encontrado documentos.»;
}

?>