Exportar a archivo txt con delimitador
Publicado por Rafael (8 intervenciones) el 13/10/2017 15:30:56
Buenas Tardes.
Tebgo un problema para exportar archivo txt, yo quiero que me separe un campo con respecto a otro mediante un delimitador ;, actualmente me trae los datos pero todos seguidos sin separación.
Les anexo la funcion donde estoy haciendo ese trabajo:
Tebgo un problema para exportar archivo txt, yo quiero que me separe un campo con respecto a otro mediante un delimitador ;, actualmente me trae los datos pero todos seguidos sin separación.
Les anexo la funcion donde estoy haciendo ese trabajo:
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
function uf_load_conceptos($as_codconcep,$ao_archivo,$as_ruta,$as_codarch)
{ $lb_valido=true;$ls_codnom=$_SESSION["la_nomina"]["codnom"];
$ls_peractnom=$_SESSION["la_nomina"]["peractnom"];
$ls_nombrearchivo=$as_ruta.'/Conceptos_Exportados_'.$ls_peractnom.".txt";
$ls_sql= "SELECT sno_salida.codper, sno_salida.codconc, sno_salida.valsal ".
" FROM sno_salida, sno_conceptopersonal ".
" WHERE sno_salida.codemp= '".$this->ls_codemp."' ".
" AND sno_salida.codconc='".$as_codconcep."' ".
" AND sno_salida.codnom='".$ls_codnom."' ".
" AND sno_salida.codemp=sno_conceptopersonal.codemp ".
" AND sno_salida.codconc=sno_conceptopersonal.codconc ".
" AND sno_salida.codnom=sno_conceptopersonal.codnom ".
" AND sno_salida.codper=sno_conceptopersonal.codper ".
" ORDER BY sno_salida.codper,sno_salida.codconc";$rs_data=$this->io_sql->select($ls_sql);
if($rs_data===false)
{ $lb_valido=false;$this->io_mensajes->message("CLASE->Archivo txt MÉTODO->uf_load_conceptos ERROR->".$this->io_funciones->uf_convertirmsg($this->io_sql->message));
}else
{$this->uf_load_configuracion_campos($as_codarch,$ai_totrows,$ao_object);
while($row=$this->io_sql->fetch_row($rs_data))
{$ls_codper=$row["codper"];
$ls_valsal=$row["valsal"];
$ls_codconc=$row["codconc"];
$ls_cadena="";
$longitud=0; //print_r($longitud); die();
for($li_z=1;($li_z<=$ai_totrows);$li_z++)
{$li_codcam=$ao_object["codcam"][$li_z];
$ls_descam=$ao_object["descam"][$li_z];
$li_inicam=$ao_object["inicam"][$li_z];
$li_loncam=$ao_object["loncam"][$li_z];
$ls_cricam=ltrim(rtrim($ao_object["cricam"][$li_z]));
$ls_edicam=$ao_object["edicam"][$li_z];
$ls_clacam=$ao_object["clacam"][$li_z];
$ls_actcam=$ao_object["actcam"][$li_z];
$ls_tabrelcam=$ao_object["tabrelcam"][$li_z];
$ls_iterelcam=$ao_object["iterelcam"][$li_z];
$ls_tipcam=$ao_object["tipcam"][$li_z];
if ($ls_iterelcam=='moncon')
{ $ls_campo=$ls_valsal; }elseif ($ls_iterelcam=='codcons')
{ $ls_campo=$ls_codconc; }elseif ($ls_iterelcam=='codper')
{ $ls_campo=$ls_codper; }if($ls_tipcam=="N")
{$ls_campo=number_format($ls_campo,2,".","");
}if($ls_cricam!="")
{if($ls_tipcam=="N")
{$ls_cricam=str_replace("campo",$ls_campo,$ls_cricam);
$ls_campo=$this->io_eval->uf_evaluar_formula($ls_cricam,$ls_campo);
}else
{$ls_campo="'".ltrim(rtrim($ls_campo))."'";
$ls_cricam=str_replace("campo",$ls_campo,$ls_cricam);
$ls_campo=@eval(" return $ls_cricam;");
} }if ($li_z!=1)
{$ls_aux="";
$longitud=$ao_object["inicam"][$li_z-1]+$ao_object["loncam"][$li_z-1];
$ls_campo=str_pad($ls_campo,$li_loncam,' ');
$li_relleno=$ao_object["inicam"][$li_z]-$longitud;
$ls_aux=str_pad($ls_aux,$li_relleno,' ','left');
$ls_campo=$ls_aux.$ls_campo;
}else
{$ls_campo=str_pad($ls_campo,$li_loncam,' ');
}$ls_cadena=$ls_cadena.$ls_campo;
}//fin del for
$ls_cadena=$ls_cadena."\r\n";
if ($ao_archivo)
{if (@fwrite($ao_archivo,$ls_cadena)===false)//Escritura
{$this->io_mensajes->message("No se puede escribir el archivo ".$ls_nombrearchivo);
$lb_valido = false; } }else
{$this->io_mensajes->message("Error al abrir el archivo ".$ls_nombrearchivo);
$lb_valido = false; }}//fin del while
$this->io_sql->free_result($rs_data);
}return $lb_valido;
}// end function uf_load_conceptos
Valora esta pregunta
0