$mes_actual=date(n);
$mes_anterior=$mes_actual-1;
$ano=date(Y);
$extension='.txt';
$fecha_actual=date("d/m/Y");
foreach (glob("./planos_argentina/*.txt") as $filename) // BORRO TODOS LOS .TXT QUE ESTUVIESEN EN ESA RUTA ANTES DE GENERAR LOS NUEVOS
{
unlink($filename);
}
$exportar_af=mysql_query("SELECT cod_prestador,razon_social,tipo_identi,numero_identi,numero_fact,fecha_exp_fact,fecha_inicial,fecha_fina,cod_entidad,nombre_entidad,numero_contrato,plan_beneficios,numero_poliza,valor_copago,valor_comision,valor_descuentos,valor_neto
INTO OUTFILE '".$fullpath1."".$ips."".$mes_anterior."".$ano."".$extension."' FIELDS TERMINATED BY ',' LINES TERMINATED BY '\r\n'
FROM af_argentina");
$exportar_us=mysql_query("SELECT tipo_ident,documento_paci,eps,tipo_usuario,apellido_1,apellido_2,nombre_1,nombre_2,edad,unidad_edad,sexo,departamento,municipio,zona
INTO OUTFILE '".$fullpath."".$ips."".$mes_anterior."".$ano."".$extension."' FIELDS TERMINATED BY ',' LINES TERMINATED BY '\r'
FROM us_argentina");
$exportar_ac=mysql_query("SELECT num_factura,cod_prestador,tipo_identi,a.numero_identi,fecha_consulta,num_autorizacion,b.codigo_cups,finalidad_consulta,causa_externa,
dx_principal,cod_dx_1,cod_dx_2,cod_dx_3,tipo_diagnostico,valor_consulta,valor_moderadora,valor_neto INTO OUTFILE '".$fullpath2."".$ips."".$mes_anterior."".$ano."".$extension."' FIELDS TERMINATED BY ',' LINES TERMINATED BY '\r' from ac_argentina a, cups b,categorias c
where a.cod_consulta=b.cod_servicio AND b.categoria_cups=c.cod_categoria AND c.cod_categoria='4'");
$exportar_ap=mysql_query("SELECT numero_factura,codigo_prestador,tipo_identi,numero_identi,fecha_procediimiento,num_autorizacion,b.codigo_cups,ambito_procedimiento,finalidad_procedimiento,personal_atiende,cod_dx_ppal,cod_dx_relacionado,complicacion,forma_acto,valor_procedimiento INTO OUTFILE '".$fullpath3."".$ips."".$mes_anterior."".$ano."".$extension."' FIELDS TERMINATED BY ',' LINES TERMINATED BY '\r' FROM ap_argentina a, cups b,categorias c
where a.cod_procedimiento=b.cod_servicio AND b.categoria_cups=c.cod_categoria AND c.cod_categoria in('1','5','2','3')");
$contar_us_argentina=mysql_query("SELECT COUNT(tipo_ident ) FROM us_argentina");
while ($us=mysql_fetch_array($contar_us_argentina)) // Con este arreglo lleno la lista /Menu con los valores de la tabla tipo_usuario
{
$contar_us=$us[0];
}
$contar_af_argentina=mysql_query("SELECT COUNT(cod_prestador) FROM af_argentina");
while ($af=mysql_fetch_array($contar_af_argentina)) // Con este arreglo lleno la lista /Menu con los valores de la tabla tipo_usuario
{
$contar_af=$af[0];
}
$contar_ac_argentina=mysql_query("SELECT COUNT(cod_prestador) FROM ac_argentina a, cups b,categorias c where a.cod_consulta=b.cod_servicio AND b.categoria_cups=c.cod_categoria AND c.cod_categoria='4'");
while ($ac=mysql_fetch_array($contar_ac_argentina)) // Con este arreglo lleno la lista /Menu con los valores de la tabla tipo_usuario
{
$contar_ac=$ac[0];
}
$contar_ap_argentina=mysql_query("SELECT COUNT(cod_prestador) FROM ac_argentina a, cups b,categorias c
where a.cod_consulta=b.cod_servicio AND b.categoria_cups=c.cod_categoria AND c.cod_categoria in('1','5','2','3')");
while ($ap=mysql_fetch_array($contar_ap_argentina)) // Con este arreglo lleno la lista /Menu con los valores de la tabla tipo_usuario
{
$contar_ap=$ap[0];
}
$contar_af_argentina=mysql_query("SELECT COUNT(cod_prestador) FROM af_argentina");
while ($af=mysql_fetch_array($contar_af_argentina)) // Con este arreglo lleno la lista /Menu con los valores de la tabla tipo_usuario
{
$contar_af=$af[0];
}
$af='AF';
$nombre_af= $af.$ips.$mes_anterior.$ano; //alimento la tabla ct con la descripcion de cada archivo
$ct_argentina=mysql_query("INSERT INTO ct_argentina (cod_prestador,fecha_remision,cod_archivo,total_registros) VALUES ('$prestador','$fecha_actual','$nombre_af','$contar_af')");
$us='US';
$nombre_us= $us.$ips.$mes_anterior.$ano;
$ct_sura2=mysql_query("INSERT INTO ct_argentina VALUES ('$prestador','$fecha_actual','$nombre_us','$contar_us')");
$ac='AC';
$nombre_ac= $ac.$ips.$mes_anterior.$ano;
$ct_sura3=mysql_query("INSERT INTO ct_argentina VALUES ('$prestador','$fecha_actual','$nombre_ac','$contar_ac')");
$ap='AP';
$nombre_ap= $ap.$ips.$mes_anterior.$ano;
$ct_sura4=mysql_query("INSERT INTO ct_argentina VALUES ('$prestador','$fecha_actual','$nombre_ap','$contar_ap')");
$exportar_ct=mysql_query("SELECT cod_prestador,fecha_remision,cod_archivo,total_registros INTO OUTFILE '".$fullpath4."".$ips."".$mes_anterior."".$ano."".$extension."' FIELDS TERMINATED BY ',' LINES TERMINATED BY '\r' from ct_argentina ");
?>
<body>
<blockquote>
<blockquote>
<p><img src="imagenes/logonuevo.png" alt="Coopsana" width="193" height="60" longdesc="coopana" /><span class="Estilo6">Departamento de informatica</span></p>
<blockquote>
<blockquote>
<div align="center">
<pre><img src="imagenes/logoaliansalud.jpg" width="176" height="45" alt="Aliansalud" longdesc="RIPS Aliansalud" />
</pre>
</div>
<table width="520" border="1" align="center">
<tr>
<td width="510" bgcolor="#23A6DC"><div align="center"><span class="Estilo7">Vista de Archivos Planos Aliansalud</span></div></td>
</tr>
<tr>
</tr>
</table>
<pre><?
if (empty($_GET['ruta']) || ereg("^\.", $_GET['ruta'])) { $dir = './planos_argentina/';
}
else {
$dir = $_GET['ruta'];
}
function tamano($bytes) {
if ($largo < 4) {
$divisor = 1;
$unidad = 'B';
}
else if ($largo > 3 && $largo < 7) {
$divisor = 1024;
$unidad = 'KB';
}
else if ($largo > 6 && $largo < 10) {
$unidad = 'MB';
}
else if ($largo > 9 && $largo < 12) {
$unidad = 'GB';
}
else {
$unidad = 'TB';
}
$salida[0] = round(($bytes / $divisor), 2); $salida[1] = $unidad;
return $salida;
}
if ($gd) {
$rn = "\r\n";
while (($archivo = readdir($gd)) !== false) { if (ereg("^(.)*\.[a-zA-Z0-9]{1,3}$", $archivo)) { if ($archivo == 'seleccionar_archivo.php') { break; }
switch ($extension) {
case 'mp3':
case 'wma':
$icono = 'snd';
break;
case 'jpg';
case 'tif';
case 'png';
$icono = 'pic';
break;
default:
$icono = 'aliansa';
break;
}
$iconos [] = $icono;
$archivos[] = $archivo;
$fechas[] = $fecha;
$tamanos[] = tamano
(filesize($dir.$archivo)); }
else if ($archivo != '.' && $archivo != '..') {
$carpetas[] = $archivo;
}
}
if ($dir != '.') {
$ruta = explode('/', $_GET['ruta']); $tot_subdir = count($ruta) - 2; $volver = '<img src="bck.png"> <a href="seleccionar_archivo.php';
for ($i = 0; $i < $tot_subdir; $i++) {
$volver .= $ruta[$i].'/';
}
$volver .= '">volver</a>'.$rn;
echo $volver;
}
foreach ($carpetas as $valor) {
echo '<img src="fol.png"> <a href="?ruta='.$_GET['ruta'].urlencode($valor).'/">'.$valor.'</a> '.$rn; }
}
foreach ($archivos as $clave => $valor) {
echo '<img src="'.$iconos[$clave].'.png"> <a href="'.$dir.urlencode($valor).'">'.$valor.'</a> '; printf("%6.2f ", $tamanos[$clave][0]); echo $tamanos[$clave][1];
echo $rn;
}
}
}
}
else {
echo 'El directorio \''.$dir.'\' no es válido.';
}
} //cierro if
?>
<p><div align="center">
<p><span class="Estilo11">All Right Reserved © 2012</span> <img src="http://www.forosdelweb.com/f18/Meco/imagenes/IconoRedes2.PNG" width="41" height="44" alt="logo" longdesc="logo" /></p>
</div>
</p>
</blockquote>
</blockquote>
</blockquote>
</blockquote>
</body>
</html>