/modulo_usrs/nomina_txt_banco_vzla.php
PHP | 210 lines | 188 code | 5 blank | 17 comment | 20 complexity | 564041d60e8a4f5ba2c2f0f179714f42 MD5 | raw file
- <?php include('../comunes/conexion_basedatos.php'); ?>
- <?php include ('../comunes/titulos.php'); ?>
- <?php include ('../comunes/mensajes.php'); ?>
- <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>
- <?php if (! $_COOKIE[usnombre]) { echo '<b><center>'.$msg_usr_noidentificado.'</center></b>';
- echo '<SCRIPT> alert ("'.$msg_usr_noidentificado_alert.'"); </SCRIPT>'; exit; } ?>
- <link href="../comunes/estilo.css" rel="stylesheet" type="text/css">
- <?php include ('../comunes/formularios_funciones.php'); ?>
- <?php if ($_POST['procesar_val']=="NO") { echo "<SCRIPT>window.close();</SCRIPT>"; return; } ?>
- <?php
- $sql="select * from vista_nominas_pagadas where ano_nom=".$_GET['ano_nom']." AND mes_nom=".$_GET['mes_nom']." AND por_nom=".$_GET['por_nom'];
- if ($_GET['por_nom']==3) { $sql="select * from vista_nominas_pagadas where ano_nom=".$_GET['ano_nom']." AND mes_nom=".$_GET['mes_nom']; }
- 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=""; }
- $busq=mysql_query($sql);
- if(!mysql_fetch_array($busq)){
- //$procesar_val='SI';
- echo '<SCRIPT>alert("'.$msg_nomina_no_pagada.'");</SCRIPT>';
- echo "<SCRIPT>window.close();</SCRIPT>";
-
- }?>
- <?php
- $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";
- $busq2=mysql_query($sql2);
- if($reg2=@mysql_fetch_array($busq2)){
- $tot_pag=0;
- $nf=0;
- do{
- if($reg2["num_cue"]!="Cheque"){
- $tot_pag+=$reg2["mon_pag"];
- $nf++;
- }
- }while($reg2=mysql_fetch_array($busq2));
- }
- /* $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";
- $busq3=mysql_query($sql3);
- if($reg3=mysql_fetch_array($busq3)){
- do{
- $tot_pag+=$reg3["mon_pag"];
- }while($reg3=mysql_fetch_array($busq3));
- } */
- ?>
- <?php
- $nombre=$q."-".$_GET['mes_nom']."-".$_GET['ano_nom'].".txt"; // generar nombre de archivo
- $ruta="../txt".$add."/"; //indicar ruta para guardar
- $abrir_archivo = $ruta."".$nombre; //concatenar ruta + nombre
- ///// Borrar el archivo de txtpre si este existe
- if($add!=""){
- @chmod($abrir_archivo, 0777);
- @unlink($abrir_archivo); //borrar el archivo
- }
-
- ///// Verificar si existe el archivo
- $comando = "ls $abrir_archivo";
- exec($comando, $resultado);
- foreach ($resultado as $line){
- if ($line = $abrir_archivo){
- echo '<center><br><br><h1>'.$msg_txt_procesado.'</h2>';
- echo 'Haga click <b><a href="../comunes/descargar.php?f='.$abrir_archivo.'" title="Descargar Archivo">Aquí</a></b> para descargar una copia de este archivo.<br><br>';
- echo '<input type="button" name="Submit" value="Cerrar Ventana" onclick="window.close();" title="'.$msg_btn_cerrarV.'"></center>';
- echo '<SCRIPT>alert("'.$msg_txt_procesado_alert.'");</SCRIPT>';
- return;
- }
- }
-
- $archivo = fopen($abrir_archivo, "w+"); //abrir el archivo
-
- chmod($abrir_archivo, 0777);
-
- $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";
- $busq2=mysql_query($sql2);
- if($reg2=@mysql_fetch_array($busq2)){
- echo '<table width="100%" border="0" cellpadding="0" cellspacing="5" align="right" class="detallespago">
- <tr bgcolor="#000000"><td width="15%" align="center"><font color="FFFFFF"><b>CEDULA</b></font></td>
- <td align="center" width="45%"><font color="FFFFFF"><b>APELLIDOS Y NOMBRES</b></font></td>
- <td align="center" width="25%"><font color="FFFFFF"><b>NUMERO DE CUENTA</b></font></td>
- <td align="center" width="15%"><font color="FFFFFF"><b>TOTAL A COBRAR</b></font></td></tr>
- <tr>';
- //condiciones para ceros complemento de la primera linea
- $cro_nf='';
- switch ($nf){
- case ($nf>=1 AND $nf<10):
- $cro_nf='000';
- break;
- case ($nf>=10 AND $nf<100):
- $cro_nf='00';
- break;
- case ($nf>=100 AND $nf<1000):
- $cro_nf='0';
- break;
- case ($nf>=1000 AND $nf<10000):
- $cro_nf='';
- break;
- }
- $cro_tp='';
- switch ($tot_pag){
- case ($tot_pag>=0 AND $tot_pag<10):
- $cro_tp='0000000000';
- break;
- case ($tot_pag>=10 AND $tot_pag<100):
- $cro_tp='000000000';
- break;
- case ($tot_pag>=100 AND $tot_pag<1000):
- $cro_tp='00000000';
- break;
- case ($tot_pag>=1000 AND $tot_pag<10000):
- $cro_tp='0000000';
- break;
- case ($tot_pag>=10000 AND $tot_pag<100000):
- $cro_tp='000000';
- break;
- case ($tot_pag>=100000 AND $tot_pag<1000000):
- $cro_tp='00000';
- break;
- case ($tot_pag>=1000000 AND $tot_pag<10000000):
- $cro_tp='0000';
- break;
- case ($tot_pag>=10000000 AND $tot_pag<100000000):
- $cro_tp='000';
- break;
- case ($tot_pag>=100000000 AND $tot_pag<1000000000):
- $cro_tp='00';
- break;
- case ($tot_pag>=1000000000 AND $tot_pag<10000000000):
- $cro_tp='0';
- break;
- case ($tot_pag>=10000000000 AND $tot_pag<100000000000):
- $cro_tp='';
- break;
- }
- //generar primera linea del archivo
- $linea="HINSTITUTO POLICIA MUNICIPAL CAMPO ELIAS 01020441190000194000##DD/MM/AA";
- $linea.=$cro_tp.str_replace(".","",redondear($tot_pag,2,"",""))."03299 "."\r\n";
- //escribir primera linea en el archivo
- fwrite($archivo,$linea);
- do{
- if($reg2["num_cue"]!="Cheque"){
- echo '<td align="right">'.$reg2["ced_per"].' </td>
- <td> '.$reg2["ape_per"].", ".$reg2["nom_per"].'</td>
- <td align="right">'.$reg2["num_cue"].' </td>
- <td align="right">'; echo redondear ($reg2["mon_pag"],2,".",","); echo' </td>
- </tr>';
- //condiciones para ceros complemento
- switch ($reg2["ced_per"]){
- case ($reg2["ced_per"]>=10000000):
- $cero1='00';
- break;
- case ($reg2["ced_per"]<10000000):
- $cero1='000';
- break;
- case ($reg2["ced_per"]<1000000):
- $cero1='0000';
- break;
- }
- switch ($reg2["mon_pag"]){
- case ($reg2["mon_pag"]>=0 AND $reg2["mon_pag"]<10):
- $cero2='00000000';
- break;
- case ($reg2["mon_pag"]>=10 AND $reg2["mon_pag"]<100):
- $cero2='0000000';
- break;
- case ($reg2["mon_pag"]>=100 AND $reg2["mon_pag"]<1000):
- $cero2='000000';
- break;
- case ($reg2["mon_pag"]>=1000 AND $reg2["mon_pag"]<10000):
- $cero2='00000';
- break;
- case ($reg2["mon_pag"]>=10000 AND $reg2["mon_pag"]<100000):
- $cero2='0000';
- break;
- case ($reg2["mon_pag"]>=100000 AND $reg2["mon_pag"]<1000000):
- $cero2='000';
- break;
- case ($reg2["mon_pag"]>=1000000 AND $reg2["mon_pag"]<10000000):
- $cero2='00';
- break;
- case ($reg2["mon_pag"]>=10000000 AND $reg2["mon_pag"]<100000000):
- $cero2='0';
- break;
- case ($reg2["mon_pag"]>=100000000 AND $reg2["mon_pag"]<1000000000):
- $cero2='';
- break;
- }
- //condicion para
- //generar linea a guardar en e archivo
- $t_cue =$reg2["tip_cue"]-1;
- $nombre = $reg2["ape_per"].' '.$reg2["nom_per"];
- $tam_nom = 40 - strlen($nombre);
- echo $tam_nom;
- $lineas=$t_cue.$reg2["num_cue"];
- $lineas.=$cero2.str_replace(".","",$reg2["mon_pag"]);
- $lineas.=$t_cue.'770'.$nombre;
- for($i=0;$i<$tam_nom;$i++){ $lineas .= " "; }
- $lineas.=$cero1.$reg2["ced_per"].'003299 '."\r\n";
- //escribir lineas en el archivo
- fwrite($archivo,$lineas);
- }
- }while($reg2=mysql_fetch_array($busq2));
- echo '<tr><td colspan="3" align="right"><b>TOTAL RELACION </b></td>
- <td align="right"><b>'; echo redondear ($tot_pag,2,".",","); echo ' </b></td>
- </tr>
- </table>
- </td>
- </tr>';
- }
- fclose($archivo); //cerrar el archivo
- chmod($abrir_archivo, 0555);
- ?>
- <?php
- echo '<SCRIPT LANGUAGE="javascript">parent.location.href = "../comunes/descargar.php?f='.$abrir_archivo.'";</SCRIPT>';
- ?>