
Quitar un caracter de una cadena
Publicado por Rafael Aguilar (8 intervenciones) el 27/10/2017 18:04:03
Buenas.
Quiero quitar el primer caracter de una cadena, en este caso este ";"
Aqui le mando mi codigo:
Al imprimir $ls_campo me sale en la pantalla ;00001245, quiero eliminar ; que sale en el principio y las demas filas siguientes.
Espero me puedan orientar.
Atento a sus comentarios.
Quiero quitar el primer caracter de una cadena, en este caso este ";"
Aqui le mando mi codigo:
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
function uf_load_archivotxt_campos($ao_archivo,$ai_totrows,$ao_object,&$ao_title,&$ao_campos,&$ai_nrofilas)
{
$lb_valido=true;
$li_fila=0;
$li_total=count($ao_archivo);
for($li_i=0;($li_i<$li_total);$li_i++)
{
$li_fila++;
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];
$ao_title[$li_z]=$ls_descam;
$ls_readonly="readonly";
$ls_formato="onKeyUp='javascript: ue_validarcomillas(this);'";
//$ls_prueba="";
if($ls_edicam=="1")
{
$ls_readonly="";
}
if($ls_campo.substr(0)==";")
{
//$ls_campo = $ls_campo.substr(2,$ls_campo.l);
$ls_campo=ltrim($ao_archivo, ";");
}
$ls_campo=substr($ao_archivo[$li_i],$li_inicam,$li_loncam);
//$ls_prueba=ltrim($ls_campo, ";");
//$ls_prueba=ltrim($ao_archivo[$li_i],$li_inicam,$li_loncam);
print_r($ls_campo);die();
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($ls_tipcam=="N")
{
$ls_campo=number_format($ls_campo,2,",",".");
$ls_formato="onKeyPress=return(ue_formatonumero(this,'.',',',event)) style='text-align:right'";
$li_loncam=15;
}
$ao_campos[$li_fila][$li_z]="<input name=txtcampo".$li_fila.$li_z." type=text id=txtcampo".$li_fila.$li_z." class=sin-borde maxlength=".$li_loncam." value='".$ls_campo."' ".$ls_formato." ".$ls_readonly.">".
"<input type=hidden name=txtclacam".$li_fila.$li_z." id=txtclacam".$li_fila.$li_z." value='".$ls_clacam."'>".
"<input type=hidden name=txtactcam".$li_fila.$li_z." id=txtactcam".$li_fila.$li_z." value='".$ls_actcam."'>".
"<input type=hidden name=txttipcam".$li_fila.$li_z." id=txttipcam".$li_fila.$li_z." value='".$ls_tipcam."'>".
"<input type=hidden name=txttabrelcam".$li_fila.$li_z." id=txttabrelcam".$li_fila.$li_z." value='".$ls_tabrelcam."'>".
"<input type=hidden name=txtiterelcam".$li_fila.$li_z." id=txtiterelcam".$li_fila.$li_z." value='".$ls_iterelcam."'>";
}
$ao_title[$li_z]=" ";
$ao_campos[$li_fila][$li_z]="<input type=checkbox name=chksel".$li_fila.$li_z." id=chksel".$li_fila.$li_z." value=1 style=width:15px;height:15px checked>";
//print_r($lb_valido);die();
}
//print_r($ao_campos);die();
$ai_nrofilas=$li_i;
return $lb_valido;
}
Al imprimir $ls_campo me sale en la pantalla ;00001245, quiero eliminar ; que sale en el principio y las demas filas siguientes.
Espero me puedan orientar.
Atento a sus comentarios.
Valora esta pregunta


0