Discussion:
Borrar espacios en blanco al final de fichero TXT
(demasiado antiguo para responder)
Ricardo Castro
2005-08-10 16:38:02 UTC
Permalink
Estimados compañeros
tengo un fichero de texto que originalmente exporto de una vista local con
copy to c:\fichero.txt type SDF al abrirlo noto que en la ultima parte de la
linea me deja espacios en blanco originalmente la longuitud del registro debe
de ser de 106 pero con los espacios en blanco me lo deja de 121 el ultimo
campo que es el mes y año dentro de la vista tambien posee los espacios en
blanco y es por eso que al pasarlo a texto me lo pasa con todo y espacios....
Ahora la pregunta es... abra alguna forma de eliminar a partir de la
posicion 106 los "15" espacios restantes...
ya probe con estos comandos

*- Guardas el contenido del fichero en una variable
cadena = FILETOSTR("c:\fichero.txt")

*- Quitas los caracteres que no necesites
cadena = STRTRAN(cadena,'"',SPACE(0))

*- Vuelves a guardar el contenido de la variable en el fichero de texto
STRTOFILE(cadena,"c:\fichero.txt")

pero resulta que al final me quita "Todos los espacios en blanco" no le
puedo decir desde que aparicion por que de la posicion 1 a la 106 son
variables los espacios en blanco
aqui les dejo un ejemplo todo es una sola linea lo pueden pegar en notepad y
ver lo que les comento...

CASTRO RICARDO
020308017400141330000000000000038000000000042500000000000425052005
Gracias por su valiosa colaboracion
Luis María Guayán
2005-08-10 19:41:10 UTC
Permalink
En tu vista puedes "cortar" tu campo con:
..., LEFT(MiCampo,106) AS MiCampo ...
y luego exportarlo con COPY TO ...
--
Luis María Guayán
Tucumán, Argentina
________________________________
SysOp de www.PortalFox.com
Microsoft Visual FoxPro MVP
________________________________
La palabra imposible solo figura
en el diccionario de los tontos
Post by Ricardo Castro
Estimados compañeros
tengo un fichero de texto que originalmente exporto de una vista local con
copy to c:\fichero.txt type SDF al abrirlo noto que en la ultima parte de la
linea me deja espacios en blanco originalmente la longuitud del registro debe
de ser de 106 pero con los espacios en blanco me lo deja de 121 el ultimo
campo que es el mes y año dentro de la vista tambien posee los espacios en
blanco y es por eso que al pasarlo a texto me lo pasa con todo y espacios....
Ahora la pregunta es... abra alguna forma de eliminar a partir de la
posicion 106 los "15" espacios restantes...
ya probe con estos comandos
*- Guardas el contenido del fichero en una variable
cadena = FILETOSTR("c:\fichero.txt")
*- Quitas los caracteres que no necesites
cadena = STRTRAN(cadena,'"',SPACE(0))
*- Vuelves a guardar el contenido de la variable en el fichero de texto
STRTOFILE(cadena,"c:\fichero.txt")
pero resulta que al final me quita "Todos los espacios en blanco" no le
puedo decir desde que aparicion por que de la posicion 1 a la 106 son
variables los espacios en blanco
aqui les dejo un ejemplo todo es una sola linea lo pueden pegar en notepad y
ver lo que les comento...
CASTRO RICARDO
020308017400141330000000000000038000000000042500000000000425052005
Gracias por su valiosa colaboracion
Ricardo Castro
2005-08-11 01:05:39 UTC
Permalink
Muchisimas Gracias Luis Maria, era lo que necesitaba
Larga vida al Zorro.
...., LEFT(MiCampo,106) AS MiCampo ...
y luego exportarlo con COPY TO ...
--
Luis María Guayán
Tucumán, Argentina
________________________________
SysOp de www.PortalFox.com
Microsoft Visual FoxPro MVP
________________________________
La palabra imposible solo figura
en el diccionario de los tontos
Post by Ricardo Castro
Estimados compañeros
tengo un fichero de texto que originalmente exporto de una vista local con
copy to c:\fichero.txt type SDF al abrirlo noto que en la ultima parte de
la
Post by Ricardo Castro
linea me deja espacios en blanco originalmente la longuitud del registro
debe
Post by Ricardo Castro
de ser de 106 pero con los espacios en blanco me lo deja de 121 el ultimo
campo que es el mes y año dentro de la vista tambien posee los espacios en
blanco y es por eso que al pasarlo a texto me lo pasa con todo y
espacios....
Post by Ricardo Castro
Ahora la pregunta es... abra alguna forma de eliminar a partir de la
posicion 106 los "15" espacios restantes...
ya probe con estos comandos
*- Guardas el contenido del fichero en una variable
cadena = FILETOSTR("c:\fichero.txt")
*- Quitas los caracteres que no necesites
cadena = STRTRAN(cadena,'"',SPACE(0))
*- Vuelves a guardar el contenido de la variable en el fichero de texto
STRTOFILE(cadena,"c:\fichero.txt")
pero resulta que al final me quita "Todos los espacios en blanco" no le
puedo decir desde que aparicion por que de la posicion 1 a la 106 son
variables los espacios en blanco
aqui les dejo un ejemplo todo es una sola linea lo pueden pegar en notepad
y
Post by Ricardo Castro
ver lo que les comento...
CASTRO RICARDO
020308017400141330000000000000038000000000042500000000000425052005
Gracias por su valiosa colaboracion
Loading...