Tema: problema con ejecucion de una gran ocnsulta
Ver Mensaje Individual
  #5 (permalink)  
Antiguo 12/02/2013, 15:24
Avatar de mager3
mager3
 
Fecha de Ingreso: junio-2012
Ubicación: Medellin
Mensajes: 318
Antigüedad: 11 años, 10 meses
Puntos: 4
Información Respuesta: problema con ejecucion de una gran ocnsulta
Es muy extenso porque hace varias actualizaciones

Código PHP: 
Ver original
  1. <?php
  2. include ('conexion.php');
  3. ini_set('max_execution_time', 40000);
  4. ?>
  5. <!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
  6. <html xmlns="http://www.w3.org/1999/xhtml">
  7. <head>
  8. <meta http-equiv="Content-Type" content="text/html; charset=utf-8" />
  9. <title>Generacion de Planos Argentina</title>
  10. <style type="text/css">
  11. <!--
  12. .Estilo6 {color: #A5A6AA;
  13.     font-weight: bold;
  14. }
  15. .Estilo7 {
  16.     color: #FFFFFF;
  17.     font-weight: bold;
  18. }
  19. .Estilo11 { color: #10A1DD;
  20.     font-weight: bold;
  21. }
  22. -->
  23. </style>
  24. </head>
  25. <?php
  26. $borrado_us=mysql_query(" TRUNCATE us_argentina");
  27. $borrado_af=mysql_query(" TRUNCATE af_argentina");
  28. $borrado_ac=mysql_query(" TRUNCATE ac_argentina");
  29. $borrado_ap=mysql_query(" TRUNCATE ap_argentina");
  30. $borrado_ct=mysql_query(" TRUNCATE ct_argentina"); 
  31.  
  32. $seleccion_ips='argentina';
  33. $tratante_ips='argentina';
  34. /*
  35. $ips_tratante=mysql_query("SELECT LEFT(ips,2) FROM rips_sura where id_rips='1'");
  36. while ($t=mysql_fetch_array($ips_tratante)) // Con este arreglo lleno la lista /Menu con los valores de la tabla tipo_usuario
  37.             {   
  38.                 $tratante_ips=$t[0];
  39.             }
  40. */
  41.  
  42. $prestador='05001043470';
  43. $ips='EPS';
  44.  
  45. $seleccion_edad=mysql_query("SELECT fecha_naci_usuario FROM anexo_8");
  46.  
  47. while ($b=mysql_fetch_array($seleccion_edad)) // Con este arreglo lleno la lista /Menu con los valores de la tabla tipo_usuario
  48.             {   
  49.                 $tratante_ips=$t[0];
  50.             }
  51.  mysql_free_result($seleccion_edad);    
  52.         
  53. //////////////////////INSERT /////////////////////////////
  54. $ac_argentina=mysql_query("INSERT INTO ac_argentina (num_factura,cod_prestador,tipo_identi,numero_identi,fecha_consulta,num_autorizacion,cod_consulta,
  55. finalidad_consulta,causa_externa,dx_principal,cod_dx_1,cod_dx_2,cod_dx_3,tipo_diagnostico,valor_consulta,valor_moderadora,valor_neto)
  56. select 'numero factura','05001043470',tipo_identi_usuario,numero_identi_usuario,fecha_servicio,numero_orden,codigo_servicio,
  57. '10','13',codigo_dx_ppal,codigo_dx1,codigo_dx2,codigo_dx3,'1',valor,valor_moderadora,
  58. 'sumar' FROM anexo_8");
  59.  
  60. $us_argentina=mysql_query("INSERT INTO us_argentina (documento_paci,tipo_ident,eps,tipo_usuario,apellido_1,apellido_2,nombre_1,nombre_2,edad,unidad_edad,sexo,
  61. departamento,municipio,zona)
  62. select distinct(numero_identi_usuario) as 
  63. r,tipo_identi_usuario,'05001043470',1,apellido1_usuario,apellido2_usuario,nombre1_usuario,nombre2_usuario,edad_final_usuario,unidad_medida_edad,genero,'05','001','U' from anexo_8");
  64.  
  65. $ap_argentina=mysql_query("INSERT INTO ap_argentina (numero_factura,codigo_prestador,tipo_identi,numero_identi,fecha_procediimiento,num_autorizacion,
  66. cod_procedimiento,ambito_procedimiento,finalidad_procedimiento,personal_atiende,cod_dx_ppal,cod_dx_relacionado,
  67. complicacion,forma_acto,valor_procedimiento)
  68. SELECT 'numero factura','05001043470',tipo_identi_usuario,numero_identi_usuario,fecha_servicio,numero_orden,codigo_servicio,'1',
  69. '1','',codigo_dx_ppal,'','','',valor from anexo_8 ");
  70.  
  71. $actualizar_valor=mysql_query("select distinct(fecha_servicio), sum(valor) FROM anexo_8 GROUP BY 1 ORDER BY 1");
  72.  
  73. $contador=1;
  74. while ($k=mysql_fetch_array($actualizar_valor)) // Con este arreglo lleno la lista /Menu con los valores de la tabla tipo_usuario
  75.             {   
  76.                 $valor_factura=$k['1'];
  77.                 $fecha_factura=$k['fecha_servicio'];
  78.                 $actualizar_af=mysql_query("INSERT INTO af_argentina (cod_prestador,razon_social,tipo_identi,numero_identi,fecha_exp_fact,fecha_inicial,fecha_fina,cod_entidad,nombre_entidad,valor_copago,valor_neto) VALUES ('05001043470','COOPERATIVA ANTIOQUEÑA DE SALUD','NI','800168183-5','$fecha_factura','','','EPS001','EPS ALIANSALUD','$valor_factura','$valor_factura') ");
  79.                 $actualice_valor=mysql_query("update facturas_argentina set suma_factura = $valor_factura where fecha_factura='$fecha_factura'");
  80.                 $contador++;
  81.             }
  82. mysql_free_result($actualizar_valor);   
  83. $actualizar_num_factura_ac1=mysql_query("UPDATE af_argentina a SET numero_fact = (SELECT numero_factura FROM facturas_argentina WHERE fecha_factura = a.fecha_exp_fact LIMIT 1)");
  84.  
  85. $actualizar_num_factura=mysql_query("UPDATE af_argentina a SET numero_fact = '1X' WHERE numero_fact IS NULL");
  86.  
  87. $actualizar_num_factura_ap=mysql_query("UPDATE ap_argentina a SET numero_factura = (SELECT numero_factura FROM facturas_argentina WHERE fecha_factura = a.fecha_procediimiento LIMIT 1)");
  88.  
  89. $actualizar_num_factura_ac=mysql_query("UPDATE ac_argentina a SET num_factura = (SELECT numero_factura FROM facturas_argentina WHERE a.fecha_consulta=fecha_factura  LIMIT 1)");
  90.  
  91. $seleccion_ac=mysql_query("SELECT num_factura FROM ac_argentina");  
  92. while ($tows1=mysql_fetch_array($seleccion_ac)) // Con este arreglo actualizo los numeros de facturas del ac vacios por 1X
  93.             {   
  94.                 $registros_ac=$tows1['num_factura'];
  95.                 $actualizar_factura_ac=mysql_query("UPDATE ac_argentina SET num_factura = '1X' WHERE num_factura=''");
  96.             }
  97. mysql_free_result($seleccion_ac); 
  98.     
  99. $seleccion_ap=mysql_query("SELECT numero_factura FROM ap_argentina");
  100. while ($tows2=mysql_fetch_array($seleccion_ap)) // Con este arreglo actualizo los numeros de facturas del ap vacios por 1X
  101.             {   
  102.                 $registros_ap=$tows2['numero_factura'];
  103.                 $actualizar_factura_ap=mysql_query("UPDATE ap_argentina SET numero_factura = '1X' WHERE numero_factura=''");
  104.             }
  105. mysql_free_result($seleccion_ap);
  106.  
  107. $invertir_fecha_ac=mysql_query("SELECT fecha_consulta FROM ac_argentina ");
  108. $contin=1;
  109. while ($towsn=mysql_fetch_array($invertir_fecha_ac)) // Con este arreglo corrijo la fecha de 2012-05-12 a 12-05-2012
  110.             {   
  111.                 $fecha_consulta=$towsn['fecha_consulta'];
  112.                 $fcha=explode("-",$fecha_consulta);
  113.                 $fechanueva=$fcha[2]."/".$fcha[1]."/".$fcha[0];
  114.                 $actualizar_ac=mysql_query("UPDATE ac_argentina a SET fecha_consulta ='$fechanueva' where id_ac='$contin' ");
  115.                 $contin++;
  116.             }
  117. mysql_free_result($invertir_fecha_ac);
  118.  
  119. $invertir_fecha_servicio=mysql_query("SELECT fecha_procediimiento FROM ap_argentina ");
  120. $contic=1;
  121. while ($towss=mysql_fetch_array($invertir_fecha_servicio)) // Con este arreglo corrijo la fecha de 2012-05-12 a 12-05-2012
  122.             {   
  123.                 $fecha2=$towss['0'];
  124.                 $fch2=explode("-",$fecha2);
  125.                 $fecha_nueva=$fch2[2]."/".$fch2[1]."/".$fch2[0];
  126.                 $actualizar_serv=mysql_query("UPDATE ap_argentina a SET fecha_procediimiento ='$fecha_nueva' where id_ap='$contic' ");
  127.                 $contic++;
  128.             }
  129. mysql_free_result($invertir_fecha_servicio);
  130.             
  131. $sumar_cuotas_ac=mysql_query("SELECT valor_consulta,valor_moderadora FROM ac_argentina ");
  132. $contac=1;
  133. while ($towac=mysql_fetch_array($sumar_cuotas_ac)) // Con este arreglo corrijo la fecha de 2012-05-12 a 12-05-2012
  134.             {   
  135.                 $valor_consulta=$towac['0'];
  136.                 $valor_moderadora=$towac['1'];
  137.                 $valor_total=$valor_consulta+$valor_moderadora;
  138.                 $actualizar_total=mysql_query("UPDATE ac_argentina a SET valor_neto ='$valor_total' where id_ac='$contac' ");
  139.                 $contac++;
  140.             }
  141. mysql_free_result($sumar_cuotas_ac);
  142.  
  143. $update_valor_consulta=mysql_query("UPDATE ac_argentina SET valor_consulta='1' where valor_consulta='0'");
  144. $update_valor_consulta=mysql_query("UPDATE ac_argentina SET valor_moderadora='1' where valor_moderadora='0'");
  145. $update_valor_consulta=mysql_query("UPDATE ac_argentina SET valor_neto='1' where valor_neto='0'");      
  146.  
  147. $fullpath='C:/Archivos de programa/VertrigoServ/www/Rips/planos_argentina/US';
  148. $fullpath1='C:/Archivos de programa/VertrigoServ/www/Rips/planos_argentina/AF';
  149. $fullpath2='C:/Archivos de programa/VertrigoServ/www/Rips/planos_argentina/AC';
  150. $fullpath3='C:/Archivos de programa/VertrigoServ/www/Rips/planos_argentina/AP';
  151. $fullpath4='C:/Archivos de programa/VertrigoServ/www/Rips/planos_argentina/CT';