PageRenderTime 167ms CodeModel.GetById 35ms RepoModel.GetById 0ms app.codeStats 0ms

/modulo_usrs/nomina_txt_banco_vzla.php

https://gitlab.com/merintec/merintec_iapmce
PHP | 210 lines | 188 code | 5 blank | 17 comment | 20 complexity | 564041d60e8a4f5ba2c2f0f179714f42 MD5 | raw file
  1. <?php include('../comunes/conexion_basedatos.php'); ?>
  2. <?php include ('../comunes/titulos.php'); ?>
  3. <?php include ('../comunes/mensajes.php'); ?>
  4. <title>Nomina <?php echo $_GET['mes_nom'].'/'.$_GET['ano_nom'].' - '; if ($_GET['por_nom']==1) { echo '1ra quincena'; $q = '1ra_quincena';} if ($_GET['por_nom']==2) { echo '2da quincena'; $q = '2da_quincena';} if ($_GET['por_nom']==3) { echo 'Mes'; $q = 'Mes_completo';} ?></title>
  5. <?php if (! $_COOKIE[usnombre]) { echo '<b><center>'.$msg_usr_noidentificado.'</center></b>';
  6. echo '<SCRIPT> alert ("'.$msg_usr_noidentificado_alert.'"); </SCRIPT>'; exit; } ?>
  7. <link href="../comunes/estilo.css" rel="stylesheet" type="text/css">
  8. <?php include ('../comunes/formularios_funciones.php'); ?>
  9. <?php if ($_POST['procesar_val']=="NO") { echo "<SCRIPT>window.close();</SCRIPT>"; return; } ?>
  10. <?php
  11. $sql="select * from vista_nominas_pagadas where ano_nom=".$_GET['ano_nom']." AND mes_nom=".$_GET['mes_nom']." AND por_nom=".$_GET['por_nom'];
  12. if ($_GET['por_nom']==3) { $sql="select * from vista_nominas_pagadas where ano_nom=".$_GET['ano_nom']." AND mes_nom=".$_GET['mes_nom']; }
  13. if ($prenomina==1){ $add='pre'; $add_titulo = " (PRE-NOMINA)"; $sql="select * from vista_nominapre_proc where ano_nom=".$_GET['ano_nom']." AND mes_nom=".$_GET['mes_nom']." AND por_nom=".$_GET['por_nom']; } else { $add=""; }
  14. $busq=mysql_query($sql);
  15. if(!mysql_fetch_array($busq)){
  16. //$procesar_val='SI';
  17. echo '<SCRIPT>alert("'.$msg_nomina_no_pagada.'");</SCRIPT>';
  18. echo "<SCRIPT>window.close();</SCRIPT>";
  19. }?>
  20. <?php
  21. $sql2="select n.* from nomina".$add."_pagar n WHERE n.ano_nom=".$_GET['ano_nom']." AND n.mes_nom=".$_GET['mes_nom']." AND n.por_nom=".$_GET['por_nom']. " ORDER BY n.ape_per, n.nom_per, n.ced_per";
  22. $busq2=mysql_query($sql2);
  23. if($reg2=@mysql_fetch_array($busq2)){
  24. $tot_pag=0;
  25. $nf=0;
  26. do{
  27. if($reg2["num_cue"]!="Cheque"){
  28. $tot_pag+=$reg2["mon_pag"];
  29. $nf++;
  30. }
  31. }while($reg2=mysql_fetch_array($busq2));
  32. }
  33. /* $sql3="select m.*, p.nac_per, p.ced_per, c.num_cue, c.tip_cue from prog_mov_pagos m, personal p, cuentas c WHERE MONTH(fch_pag)=".$_GET['mes_nom']." AND YEAR(fch_pag)=".$_GET['ano_nom']." AND p.ced_per=m.ced_per AND c.ced_per=m.ced_per";
  34. $busq3=mysql_query($sql3);
  35. if($reg3=mysql_fetch_array($busq3)){
  36. do{
  37. $tot_pag+=$reg3["mon_pag"];
  38. }while($reg3=mysql_fetch_array($busq3));
  39. } */
  40. ?>
  41. <?php
  42. $nombre=$q."-".$_GET['mes_nom']."-".$_GET['ano_nom'].".txt"; // generar nombre de archivo
  43. $ruta="../txt".$add."/"; //indicar ruta para guardar
  44. $abrir_archivo = $ruta."".$nombre; //concatenar ruta + nombre
  45. ///// Borrar el archivo de txtpre si este existe
  46. if($add!=""){
  47. @chmod($abrir_archivo, 0777);
  48. @unlink($abrir_archivo); //borrar el archivo
  49. }
  50. ///// Verificar si existe el archivo
  51. $comando = "ls $abrir_archivo";
  52. exec($comando, $resultado);
  53. foreach ($resultado as $line){
  54. if ($line = $abrir_archivo){
  55. echo '<center><br><br><h1>'.$msg_txt_procesado.'</h2>';
  56. echo 'Haga click <b><a href="../comunes/descargar.php?f='.$abrir_archivo.'" title="Descargar Archivo">Aqu&iacute;</a></b> para descargar una copia de este archivo.<br><br>';
  57. echo '<input type="button" name="Submit" value="Cerrar Ventana" onclick="window.close();" title="'.$msg_btn_cerrarV.'"></center>';
  58. echo '<SCRIPT>alert("'.$msg_txt_procesado_alert.'");</SCRIPT>';
  59. return;
  60. }
  61. }
  62. $archivo = fopen($abrir_archivo, "w+"); //abrir el archivo
  63. chmod($abrir_archivo, 0777);
  64. $sql2="select n.* from nomina".$add."_pagar n WHERE n.ano_nom=".$_GET['ano_nom']." AND n.mes_nom=".$_GET['mes_nom']." AND n.por_nom=".$_GET['por_nom']. " ORDER BY n.ape_per, n.nom_per, n.ced_per";
  65. $busq2=mysql_query($sql2);
  66. if($reg2=@mysql_fetch_array($busq2)){
  67. echo '<table width="100%" border="0" cellpadding="0" cellspacing="5" align="right" class="detallespago">
  68. <tr bgcolor="#000000"><td width="15%" align="center"><font color="FFFFFF"><b>CEDULA</b></font></td>
  69. <td align="center" width="45%"><font color="FFFFFF"><b>APELLIDOS Y NOMBRES</b></font></td>
  70. <td align="center" width="25%"><font color="FFFFFF"><b>NUMERO DE CUENTA</b></font></td>
  71. <td align="center" width="15%"><font color="FFFFFF"><b>TOTAL A COBRAR</b></font></td></tr>
  72. <tr>';
  73. //condiciones para ceros complemento de la primera linea
  74. $cro_nf='';
  75. switch ($nf){
  76. case ($nf>=1 AND $nf<10):
  77. $cro_nf='000';
  78. break;
  79. case ($nf>=10 AND $nf<100):
  80. $cro_nf='00';
  81. break;
  82. case ($nf>=100 AND $nf<1000):
  83. $cro_nf='0';
  84. break;
  85. case ($nf>=1000 AND $nf<10000):
  86. $cro_nf='';
  87. break;
  88. }
  89. $cro_tp='';
  90. switch ($tot_pag){
  91. case ($tot_pag>=0 AND $tot_pag<10):
  92. $cro_tp='0000000000';
  93. break;
  94. case ($tot_pag>=10 AND $tot_pag<100):
  95. $cro_tp='000000000';
  96. break;
  97. case ($tot_pag>=100 AND $tot_pag<1000):
  98. $cro_tp='00000000';
  99. break;
  100. case ($tot_pag>=1000 AND $tot_pag<10000):
  101. $cro_tp='0000000';
  102. break;
  103. case ($tot_pag>=10000 AND $tot_pag<100000):
  104. $cro_tp='000000';
  105. break;
  106. case ($tot_pag>=100000 AND $tot_pag<1000000):
  107. $cro_tp='00000';
  108. break;
  109. case ($tot_pag>=1000000 AND $tot_pag<10000000):
  110. $cro_tp='0000';
  111. break;
  112. case ($tot_pag>=10000000 AND $tot_pag<100000000):
  113. $cro_tp='000';
  114. break;
  115. case ($tot_pag>=100000000 AND $tot_pag<1000000000):
  116. $cro_tp='00';
  117. break;
  118. case ($tot_pag>=1000000000 AND $tot_pag<10000000000):
  119. $cro_tp='0';
  120. break;
  121. case ($tot_pag>=10000000000 AND $tot_pag<100000000000):
  122. $cro_tp='';
  123. break;
  124. }
  125. //generar primera linea del archivo
  126. $linea="HINSTITUTO POLICIA MUNICIPAL CAMPO ELIAS 01020441190000194000##DD/MM/AA";
  127. $linea.=$cro_tp.str_replace(".","",redondear($tot_pag,2,"",""))."03299 "."\r\n";
  128. //escribir primera linea en el archivo
  129. fwrite($archivo,$linea);
  130. do{
  131. if($reg2["num_cue"]!="Cheque"){
  132. echo '<td align="right">'.$reg2["ced_per"].'&nbsp;&nbsp;&nbsp;</td>
  133. <td>&nbsp;&nbsp;'.$reg2["ape_per"].", ".$reg2["nom_per"].'</td>
  134. <td align="right">'.$reg2["num_cue"].'&nbsp;&nbsp;&nbsp;</td>
  135. <td align="right">'; echo redondear ($reg2["mon_pag"],2,".",","); echo'&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;</td>
  136. </tr>';
  137. //condiciones para ceros complemento
  138. switch ($reg2["ced_per"]){
  139. case ($reg2["ced_per"]>=10000000):
  140. $cero1='00';
  141. break;
  142. case ($reg2["ced_per"]<10000000):
  143. $cero1='000';
  144. break;
  145. case ($reg2["ced_per"]<1000000):
  146. $cero1='0000';
  147. break;
  148. }
  149. switch ($reg2["mon_pag"]){
  150. case ($reg2["mon_pag"]>=0 AND $reg2["mon_pag"]<10):
  151. $cero2='00000000';
  152. break;
  153. case ($reg2["mon_pag"]>=10 AND $reg2["mon_pag"]<100):
  154. $cero2='0000000';
  155. break;
  156. case ($reg2["mon_pag"]>=100 AND $reg2["mon_pag"]<1000):
  157. $cero2='000000';
  158. break;
  159. case ($reg2["mon_pag"]>=1000 AND $reg2["mon_pag"]<10000):
  160. $cero2='00000';
  161. break;
  162. case ($reg2["mon_pag"]>=10000 AND $reg2["mon_pag"]<100000):
  163. $cero2='0000';
  164. break;
  165. case ($reg2["mon_pag"]>=100000 AND $reg2["mon_pag"]<1000000):
  166. $cero2='000';
  167. break;
  168. case ($reg2["mon_pag"]>=1000000 AND $reg2["mon_pag"]<10000000):
  169. $cero2='00';
  170. break;
  171. case ($reg2["mon_pag"]>=10000000 AND $reg2["mon_pag"]<100000000):
  172. $cero2='0';
  173. break;
  174. case ($reg2["mon_pag"]>=100000000 AND $reg2["mon_pag"]<1000000000):
  175. $cero2='';
  176. break;
  177. }
  178. //condicion para
  179. //generar linea a guardar en e archivo
  180. $t_cue =$reg2["tip_cue"]-1;
  181. $nombre = $reg2["ape_per"].' '.$reg2["nom_per"];
  182. $tam_nom = 40 - strlen($nombre);
  183. echo $tam_nom;
  184. $lineas=$t_cue.$reg2["num_cue"];
  185. $lineas.=$cero2.str_replace(".","",$reg2["mon_pag"]);
  186. $lineas.=$t_cue.'770'.$nombre;
  187. for($i=0;$i<$tam_nom;$i++){ $lineas .= " "; }
  188. $lineas.=$cero1.$reg2["ced_per"].'003299 '."\r\n";
  189. //escribir lineas en el archivo
  190. fwrite($archivo,$lineas);
  191. }
  192. }while($reg2=mysql_fetch_array($busq2));
  193. echo '<tr><td colspan="3" align="right"><b>TOTAL RELACION&nbsp;&nbsp;&nbsp;</b></td>
  194. <td align="right"><b>'; echo redondear ($tot_pag,2,".",","); echo '&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;</b></td>
  195. </tr>
  196. </table>
  197. </td>
  198. </tr>';
  199. }
  200. fclose($archivo); //cerrar el archivo
  201. chmod($abrir_archivo, 0555);
  202. ?>
  203. <?php
  204. echo '<SCRIPT LANGUAGE="javascript">parent.location.href = "../comunes/descargar.php?f='.$abrir_archivo.'";</SCRIPT>';
  205. ?>