Tema: problema con ejecucion de una gran ocnsulta
Ver Mensaje Individual
  #6 (permalink)  
Antiguo 12/02/2013, 15:25
Avatar de mager3
mager3
 
Fecha de Ingreso: junio-2012
Ubicación: Medellin
Mensajes: 318
Antigüedad: 11 años, 10 meses
Puntos: 4
Respuesta: problema con ejecucion de una gran ocnsulta
Código PHP: 
Ver original
  1. $mes_actual=date(n);
  2. $mes_anterior=$mes_actual-1;
  3. $ano=date(Y);
  4. $extension='.txt';
  5. $fecha_actual=date("d/m/Y");
  6.  
  7. foreach (glob("./planos_argentina/*.txt") as $filename) // BORRO TODOS LOS .TXT QUE ESTUVIESEN EN ESA RUTA ANTES DE GENERAR LOS NUEVOS
  8. { 
  9. unlink($filename); 
  10. }
  11.  
  12.  
  13. $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 
  14. INTO OUTFILE '".$fullpath1."".$ips."".$mes_anterior."".$ano."".$extension."' FIELDS TERMINATED BY ',' LINES TERMINATED BY '\r\n'
  15. FROM af_argentina");
  16.  
  17. $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 
  18. INTO OUTFILE '".$fullpath."".$ips."".$mes_anterior."".$ano."".$extension."' FIELDS TERMINATED BY ',' LINES TERMINATED BY '\r'
  19. FROM us_argentina");
  20.  
  21. $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,
  22. 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
  23. where a.cod_consulta=b.cod_servicio AND b.categoria_cups=c.cod_categoria AND c.cod_categoria='4'");
  24.  
  25. $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 
  26. where a.cod_procedimiento=b.cod_servicio AND b.categoria_cups=c.cod_categoria AND c.cod_categoria in('1','5','2','3')");
  27.  
  28. $contar_us_argentina=mysql_query("SELECT COUNT(tipo_ident ) FROM us_argentina");
  29. while ($us=mysql_fetch_array($contar_us_argentina)) // Con este arreglo lleno la lista /Menu con los valores de la tabla tipo_usuario
  30.             {   
  31.                 $contar_us=$us[0];
  32.             }
  33.  
  34. $contar_af_argentina=mysql_query("SELECT COUNT(cod_prestador) FROM af_argentina");
  35. while ($af=mysql_fetch_array($contar_af_argentina)) // Con este arreglo lleno la lista /Menu con los valores de la tabla tipo_usuario
  36.             {   
  37.                 $contar_af=$af[0];
  38.             }
  39.             
  40. $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'");
  41. while ($ac=mysql_fetch_array($contar_ac_argentina)) // Con este arreglo lleno la lista /Menu con los valores de la tabla tipo_usuario
  42.             {   
  43.                 $contar_ac=$ac[0];
  44.             }
  45.             
  46. $contar_ap_argentina=mysql_query("SELECT COUNT(cod_prestador) FROM ac_argentina a, cups b,categorias c
  47. where a.cod_consulta=b.cod_servicio AND b.categoria_cups=c.cod_categoria AND c.cod_categoria in('1','5','2','3')");
  48. while ($ap=mysql_fetch_array($contar_ap_argentina)) // Con este arreglo lleno la lista /Menu con los valores de la tabla tipo_usuario
  49.             {   
  50.                 $contar_ap=$ap[0];
  51.             }
  52.  
  53. $contar_af_argentina=mysql_query("SELECT COUNT(cod_prestador) FROM af_argentina");
  54. while ($af=mysql_fetch_array($contar_af_argentina)) // Con este arreglo lleno la lista /Menu con los valores de la tabla tipo_usuario
  55.             {   
  56.                 $contar_af=$af[0];
  57.             }
  58.  
  59.  
  60. $af='AF';
  61. $nombre_af= $af.$ips.$mes_anterior.$ano;  //alimento la tabla ct con la descripcion de cada archivo
  62.  
  63. $ct_argentina=mysql_query("INSERT INTO ct_argentina (cod_prestador,fecha_remision,cod_archivo,total_registros) VALUES ('$prestador','$fecha_actual','$nombre_af','$contar_af')");
  64.  
  65. $us='US';
  66. $nombre_us= $us.$ips.$mes_anterior.$ano;
  67. $ct_sura2=mysql_query("INSERT INTO ct_argentina VALUES ('$prestador','$fecha_actual','$nombre_us','$contar_us')");
  68.  
  69. $ac='AC';
  70. $nombre_ac= $ac.$ips.$mes_anterior.$ano;
  71. $ct_sura3=mysql_query("INSERT INTO ct_argentina VALUES ('$prestador','$fecha_actual','$nombre_ac','$contar_ac')");
  72.  
  73. $ap='AP';
  74. $nombre_ap= $ap.$ips.$mes_anterior.$ano;
  75. $ct_sura4=mysql_query("INSERT INTO ct_argentina VALUES ('$prestador','$fecha_actual','$nombre_ap','$contar_ap')");
  76.  
  77. $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 ");
  78.  
  79. ?>
  80. <body>
  81. <blockquote>
  82.   <blockquote>
  83.     <p><img src="imagenes/logonuevo.png" alt="Coopsana" width="193" height="60" longdesc="coopana" /><span class="Estilo6">Departamento de informatica</span></p>
  84.     <blockquote>
  85.       <blockquote>
  86.         <div align="center">
  87.           <pre><img src="imagenes/logoaliansalud.jpg" width="176" height="45" alt="Aliansalud" longdesc="RIPS Aliansalud" /> 
  88.           </pre>
  89.         </div>
  90.         <table width="520" border="1" align="center">
  91.           <tr>
  92.             <td width="510" bgcolor="#23A6DC"><div align="center"><span class="Estilo7">Vista de Archivos Planos Aliansalud</span></div></td>
  93.           </tr>
  94.           <tr>
  95.           </tr>
  96.         </table>
  97.         <pre><? 
  98. if (empty($_GET['ruta']) || ereg("^\.", $_GET['ruta'])) { 
  99.     $dir = './planos_argentina/'; 
  100. } 
  101. else { 
  102.     $dir = $_GET['ruta']; 
  103. } 
  104. if (is_dir($dir)) { 
  105.  
  106.     function tamano($bytes) { 
  107.         $largo = strlen($bytes); 
  108.         if ($largo < 4) { 
  109.             $divisor = 1; 
  110.             $unidad = 'B'; 
  111.         } 
  112.         else if ($largo > 3 && $largo < 7) { 
  113.             $divisor = 1024; 
  114.             $unidad = 'KB'; 
  115.         } 
  116.         else if ($largo > 6 && $largo < 10) { 
  117.             $divisor = pow(1024, 2); 
  118.             $unidad = 'MB'; 
  119.         } 
  120.         else if ($largo > 9 && $largo < 12) { 
  121.             $divisor = pow(1024, 3); 
  122.             $unidad = 'GB'; 
  123.         } 
  124.         else { 
  125.             $divisor = pow(1024, 4); 
  126.             $unidad = 'TB'; 
  127.         } 
  128.         $salida[0] = round(($bytes / $divisor), 2); 
  129.         $salida[1] = $unidad; 
  130.         return $salida; 
  131.     } 
  132.  
  133.     $gd = opendir($dir); 
  134.     if ($gd) { 
  135.         $rn = "\r\n"; 
  136.         while (($archivo = readdir($gd)) !== false) { 
  137.             if (ereg("^(.)*\.[a-zA-Z0-9]{1,3}$", $archivo)) { 
  138.                 if ($archivo == 'seleccionar_archivo.php') { break; } 
  139.                 $extension = strtolower(substr($archivo, -3)); 
  140.                 switch ($extension) { 
  141.                     case 'mp3': 
  142.                     case 'wma': 
  143.                         $icono = 'snd'; 
  144.                         break; 
  145.                     case 'jpg'; 
  146.                     case 'tif'; 
  147.                     case 'png'; 
  148.                         $icono = 'pic'; 
  149.                         break;                     
  150.                     default: 
  151.                         $icono = 'aliansa'; 
  152.                         break; 
  153.                 } 
  154.  
  155.                 $iconos [] = $icono; 
  156.                 $archivos[] = $archivo; 
  157.                 $fechas[] = $fecha; 
  158.                 $tamanos[] = tamano(filesize($dir.$archivo)); 
  159.             } 
  160.             else if ($archivo != '.' && $archivo != '..') { 
  161.                 $carpetas[] = $archivo; 
  162.             } 
  163.         } 
  164.         closedir($gd); 
  165.  
  166.         if ($dir != '.') { 
  167.             $ruta = explode('/', $_GET['ruta']); 
  168.             $tot_subdir = count($ruta) - 2; 
  169.             krsort($ruta); 
  170.             $volver = '<img src="bck.png"> <a href="seleccionar_archivo.php'; 
  171.             for ($i = 0; $i < $tot_subdir; $i++) { 
  172.                 $volver .= $ruta[$i].'/'; 
  173.             } 
  174.             $volver .= '">volver</a>'.$rn; 
  175.             echo $volver; 
  176.         } 
  177.  
  178.         if (is_array($carpetas)) { 
  179.             natcasesort($carpetas); 
  180.             foreach ($carpetas as $valor) { 
  181.                 echo '<img src="fol.png"> <a href="?ruta='.$_GET['ruta'].urlencode($valor).'/">'.$valor.'</a>    '.$rn; 
  182.             } 
  183.         } 
  184.  
  185.         if (is_array($archivos)) { 
  186.             if (natcasesort($archivos)) { 
  187.                 foreach ($archivos as $clave => $valor) { 
  188.                     echo '<img src="'.$iconos[$clave].'.png"> <a href="'.$dir.urlencode($valor).'">'.$valor.'</a>    '; 
  189.                     printf("%6.2f ", $tamanos[$clave][0]); 
  190.                     echo $tamanos[$clave][1]; 
  191.                     echo $rn; 
  192.                 } 
  193.             } 
  194.         } 
  195.     
  196. } 
  197. else    { 
  198.           echo 'El directorio \''.$dir.'\' no es v&aacute;lido.';  
  199.         } 
  200. } //cierro if 
  201.  
  202. ?>
  203.         
  204.  
  205.  
  206.  
  207.  
  208.  
  209.  
  210.  
  211.  
  212.  
  213.  
  214.  
  215.  
  216.   <p><div align="center">
  217.     <p><span class="Estilo11">All Right Reserved &copy; 2012</span> <img src="http://www.forosdelweb.com/f18/Meco/imagenes/IconoRedes2.PNG" width="41" height="44" alt="logo" longdesc="logo" /></p>
  218. </div> 
  219.   </p>
  220.       </blockquote>
  221.     </blockquote>
  222.   </blockquote>
  223. </blockquote>
  224.  
  225. </body>
  226. </html>