El 24/09/2010 05:30 a.m., kikejordi escribió:
El 24 de septiembre de 2010 06:15, José Jesús<[email protected]> escribió:
El jue, 23-09-2010 a las 11:22 -0500, Manuel Andres Ramirez escribió:
> El 22/09/2010 03:19 p.m., kike jordi escribió:
> > El 22 de septiembre de 2010 15:17, Eduardo
Moreno<[email protected]>
> > escribió:
> >
> > El 22/09/10 08:39, kikejordi escribió:
> >
> >
> >
> > Hola, tengo una vieja base de datos hecha con
qbasic,
> > las tablas son de longitud fija, abriendo el
archivo con
> > writer se ve una sola fila (no tiene separador de
> > registros), hay alguna forma de importarlo con calc
> > pasandole
> > como parametros la longitud del registro, y la de
los
> > campos? una vez separados los registros no es
dificil
> > separar los campos de longitud fija, mi problema es
con
> > los separadores de registro, no encuentro nada que
me
> > los separe.
> >
> > gracias
> >
> >
> >
> > La pregunta es, ¿Tu programa como termina las filas?
> >
> > Si abres el archivo que generó tu programa con otra
aplicación
> > (gedit o WordPad) ¿También ves una sola fila?
> >
> > En caso de que si, si sabes que el largo de cada registro es
> > constante, pues creo que tu solución primera es hacer un
> > pequeños programa que te vaya segmentando tu texto.
> >
> > Si tienes el código de tu programa de Qbasic, checa si lo
puedes
> > transformar en un macro o compilalo con RealBasic para que
lo
> > tengas listo para Windows, Linux y MAC.
> >
> > -
> >
> >
> >
> >
> > -
> > Mi Office genera: Seguridad, Confianza y Ahorro
> >
> >
> > J. Eduardo Moreno
> > TOKONHU de México
> > 044 55 2748 4840
> >
> >
> >
> >
> > Ante todo gracias por tu respuesta. Abriendo el archivo con
> > gedit se ve una sola fila, y si, separando esa fila de
acuerdo a
> > la longitud del registro, que es constante, tengo gran
parte de
> > mi problema solucionado. pero esto es lo que no logro hacer.
> > intente insertar un caracter especial con el awk con el
> > siguiente script:
> >
> > awk 'BEGIN {RS=""} {for(i=1;i<1268;i++) {for(j=1;j<23;j++)
> > print $(i*j)} print "/n"}' CONCEPTO.PRO> convert.txt
> >
> >
Kike y amigos de la lista.
Aqui te copio otra posible solución por si te gusta más utilizar awk:
awk '{for (i=0;i< 10;i++) { c=substr($0,(i*22)+1,22) ; print c } } '
CONCEPTO.PRO > convert.txt
aunque la que propuso josé es la más práctica.
Cordia Saludo.
--
Manuel Andrés Ramírez P.
Administrador Informático
GNU/Linux Registered User:412887
www.obtengalinux.org
<<Yo Tengo mi Office Legal y no pagué por su licencia>>
"El placer más noble es el júbilo de comprender"
(Leonardo Da Vinci)
---------------------------------------------------------------------
To unsubscribe, e-mail: [email protected]
For additional commands, e-mail: [email protected]
