Página 2 de 2 PrimerPrimer 1 2
Resultados 11 al 17 de 17

Tema: Exportar datos de una app Cobol a un .txt o .csv

  1. #11
      Senior
    J

    Registrado
    junio de 2016
    Ubicación
    Albacete
    Edad
    57
    Mensajes
    417
    Última visita
    Hoy a las 19:16

    Agradecimientos
     
    Recibidos
    240
    Enviados
    149

    Citaciones y menciones
     
    Mentioned
    52 Post(s)
    Tagged
    0 Thread(s)
    Quoted
    9 Post(s)
    Poder de Reputación
    25
    Activista del Foro / Point Value: 0 Agradecimientos / Point Value: 0

    Predeterminado

    Como que lo has recortado ?
    Por que ?

    No hay que recortarlo.
    Pon extención .txt
    Abrelo con el bloc de notas o con la excel

    El registro de cada socio puede que tenga 256 caracteres o mas. Revisa el fuente o pon aqui la fd del fichero de socios para orientarte.

    Lo que envias, aparentemente, como lo has cortado 2 tienes lineas por socio. Cuando es una linea por socio.

    Los campos son de ancho fijo, la longitud de cada campo esta en la fd.

    Si abres ese fichero, sin cortar, con la excel, lo abres delimitado por longitud variable, vas marcando cada campo, lo tendras en la excel y podras guardarlo en .csv delimitado como quieras, comas, punto y comas, tabuladores, etc..

    ---------- Post añadido el 17 de abril de 2022 a las 23:19 ----------

    Cita Iniciado por manu Ver Mensaje
    Una consulta: El programa tiene una función de imprimir todos los datos que se encuentran en esos archivos y de forma ordenada... Hay alguna forma de modificar el código para que en vez de imprimirlos los guarde en un .csv/.txt/.xlsx ? Porque esa sería una forma de realizar lo que necesito...
    No

    El TXT lo puedes coger con excel, marcar cada campo, ayudantote de la FD que estará en algun fuente.

    Una vez lo tengas en la excel lo puedes guardar en .CSV

    ---------- Post añadido el 17 de abril de 2022 a las 23:20 ----------

    Envia el txt sin cortar y un fuente que tenga la FD y te muestro como hacerlo

    ---------- Post añadido el 17 de abril de 2022 a las 23:21 ----------

    Para generar un .csv directamente hay que hacer la opción 3 que te propuse al principio de este hilo.

    ---------- Post añadido el 17 de abril de 2022 a las 23:33 ----------

    Cita Iniciado por manu Ver Mensaje


    Acá estan los archivos que entiendo son los encargados de realizar la impresión..

    Con la FD que has enviado

    COBOL Código:
    1.        FD  SOCIOS             LABEL RECORD IS STANDARD
    2.                               RECORD  CONTAINS 256 CHARACTERS.
    3.        01  I-REG-SOCI.
    4.            03  I-CVE-SOCI.
    5.                05  I-SOCI               PIC 9(05).
    6.            03  I-APENOM-SOCI            PIC X(35).
    7.            03  I-CVE-DIR-SOCI.
    8.                05  I-DIR-SOCI           PIC X(35).
    9.            03  I-CODPOS-SOCI            PIC 9(04).
    10.            03  I-LOCAL-SOCI             PIC X(15).
    11.            03  I-TE-SOCI                PIC X(11).
    12.            03  I-CVE-PANTEON-SOCI.
    13.                05  I-N-PANTEON-SOCI     PIC 99.
    14.            03  I-CVE-ZONA.
    15.                05  I-ZONA-SOCI          PIC 99.
    16.                05  I-RUTA-SOCI          PIC 9(04).
    17.            03  I-CATEG-SOCI             PIC 99.
    18.            03  I-CVE-NICHO-SOCI.
    19.                05  I-N-NICHO-SOCI       PIC 9(06).
    20.                05  I-N-QUEK-NICH REDEFINES I-N-NICHO-SOCI.
    21.                    07  I-N-NICHO-3      PIC 9(03).
    22.                    07  FILLER           PIC XXX.
    23.            03  I-N-PISO-SOCI            PIC XX.
    24.            03  I-N-FILA-SOCI            PIC 99.
    25.            03  KK-CON-FILA REDEFINES I-N-FILA-SOCI.
    26.                05 I-1ER-BYTE PIC X.
    27.                05 I-2DO-BYTE PIC X.
    28.            03  I-CVE-ALTA-SOCI.
    29.                05  I-F-ALTA-SOCI            PIC 9(06).
    30.                05  I-F-ALTA-SOCIX           REDEFINES I-F-ALTA-SOCI.
    31.                    07  I-F-AA-ALTA-SOCI     PIC 99.
    32.                    07  I-F-MM-ALTA-SOCI     PIC 99.
    33.                    07  I-F-DD-ALTA-SOCI     PIC 99.
    34.                05  I-F-ALTA-SOCIXX          REDEFINES I-F-ALTA-SOCI.
    35.                    07  I-F-AAMM-ALTA-SOCI   PIC 9999.
    36.                    07  FILLER               PIC 99.
    37.            03  I-ACUM-SOCI              PIC S9(12)V99.
    38.            03  I-IMP-CTDO-SOCI          PIC S9(12)V99.
    39.            03  I-IMP-ANTI-SOCI          PIC S9(12)V99.
    40.            03  I-CAN-CUO-SOCI           PIC 99.
    41.            03  I-IMP-CUO-SOCI           PIC S9(12)V99.
    42.            03  I-C-MONEDA-SOCI          PIC X.
    43.            03  I-F-PRIMER-CUO-SOCI      PIC 9(06).
    44.            03  FILLER                   PIC X(46).
    45.            03  I-OPER-SOCI              PIC X(04).
    46.            03  I-F-MODI-SOCI            PIC 9(06).

    1) Selecciona el TXT sin recortar con la excel,

    2) Te pregunta la excel, delimitados o ancho ficho, le das ancho fijo,
    3) Le das siguiente,
    4) Vas marcando cada campo con su logitud determinada por la fd que te he puesto arriba.
    5) Cuando termines, siguiente
    6) y ya tienes en excel cada campo en una columna,
    7) lo guardas en .csv con las caracteristicas deseadas

    ---------- Post añadido el 17 de abril de 2022 a las 23:35 ----------

    Si hay algun campo de la FD que no entiendas, pregunta.

    0 Not allowed!
    Última edición por JCantero; 17.04.2022 a las 23:16 Razón: porque esta mal

  2. #12
      Acabo de llegar...
    m

    Registrado
    abril de 2022
    Ubicación
    Rosario
    Edad
    30
    Mensajes
    11
    Última visita
    20.04.2022

    Agradecimientos
     
    Recibidos
    0
    Enviados
    5

    Citaciones y menciones
     
    Mentioned
    4 Post(s)
    Tagged
    0 Thread(s)
    Quoted
    0 Post(s)
    Poder de Reputación
    0

    Predeterminado

    Cita Iniciado por JCantero Ver Mensaje
    Como que lo has recortado ?
    Por que ?

    No hay que recortarlo.
    Pon extención .txt
    Abrelo con el bloc de notas o con la excel

    El registro de cada socio puede que tenga 256 caracteres o mas. Revisa el fuente o pon aqui la fd del fichero de socios para orientarte.

    Lo que envias, aparentemente, como lo has cortado 2 tienes lineas por socio. Cuando es una linea por socio.

    Los campos son de ancho fijo, la longitud de cada campo esta en la fd.

    Si abres ese fichero, sin cortar, con la excel, lo abres delimitado por longitud variable, vas marcando cada campo, lo tendras en la excel y podras guardarlo en .csv delimitado como quieras, comas, punto y comas, tabuladores, etc..

    ---------- Post añadido el 17 de abril de 2022 a las 23:19 ----------



    No

    El TXT lo puedes coger con excel, marcar cada campo, ayudantote de la FD que estará en algun fuente.

    Una vez lo tengas en la excel lo puedes guardar en .CSV

    ---------- Post añadido el 17 de abril de 2022 a las 23:20 ----------

    Envia el txt sin cortar y un fuente que tenga la FD y te muestro como hacerlo

    ---------- Post añadido el 17 de abril de 2022 a las 23:21 ----------

    Para generar un .csv directamente hay que hacer la opción 3 que te propuse al principio de este hilo.

    ---------- Post añadido el 17 de abril de 2022 a las 23:33 ----------




    Con la FD que has enviado

    COBOL Código:
    1.        FD  SOCIOS             LABEL RECORD IS STANDARD
    2.                               RECORD  CONTAINS 256 CHARACTERS.
    3.        01  I-REG-SOCI.
    4.            03  I-CVE-SOCI.
    5.                05  I-SOCI               PIC 9(05).
    6.            03  I-APENOM-SOCI            PIC X(35).
    7.            03  I-CVE-DIR-SOCI.
    8.                05  I-DIR-SOCI           PIC X(35).
    9.            03  I-CODPOS-SOCI            PIC 9(04).
    10.            03  I-LOCAL-SOCI             PIC X(15).
    11.            03  I-TE-SOCI                PIC X(11).
    12.            03  I-CVE-PANTEON-SOCI.
    13.                05  I-N-PANTEON-SOCI     PIC 99.
    14.            03  I-CVE-ZONA.
    15.                05  I-ZONA-SOCI          PIC 99.
    16.                05  I-RUTA-SOCI          PIC 9(04).
    17.            03  I-CATEG-SOCI             PIC 99.
    18.            03  I-CVE-NICHO-SOCI.
    19.                05  I-N-NICHO-SOCI       PIC 9(06).
    20.                05  I-N-QUEK-NICH REDEFINES I-N-NICHO-SOCI.
    21.                    07  I-N-NICHO-3      PIC 9(03).
    22.                    07  FILLER           PIC XXX.
    23.            03  I-N-PISO-SOCI            PIC XX.
    24.            03  I-N-FILA-SOCI            PIC 99.
    25.            03  KK-CON-FILA REDEFINES I-N-FILA-SOCI.
    26.                05 I-1ER-BYTE PIC X.
    27.                05 I-2DO-BYTE PIC X.
    28.            03  I-CVE-ALTA-SOCI.
    29.                05  I-F-ALTA-SOCI            PIC 9(06).
    30.                05  I-F-ALTA-SOCIX           REDEFINES I-F-ALTA-SOCI.
    31.                    07  I-F-AA-ALTA-SOCI     PIC 99.
    32.                    07  I-F-MM-ALTA-SOCI     PIC 99.
    33.                    07  I-F-DD-ALTA-SOCI     PIC 99.
    34.                05  I-F-ALTA-SOCIXX          REDEFINES I-F-ALTA-SOCI.
    35.                    07  I-F-AAMM-ALTA-SOCI   PIC 9999.
    36.                    07  FILLER               PIC 99.
    37.            03  I-ACUM-SOCI              PIC S9(12)V99.
    38.            03  I-IMP-CTDO-SOCI          PIC S9(12)V99.
    39.            03  I-IMP-ANTI-SOCI          PIC S9(12)V99.
    40.            03  I-CAN-CUO-SOCI           PIC 99.
    41.            03  I-IMP-CUO-SOCI           PIC S9(12)V99.
    42.            03  I-C-MONEDA-SOCI          PIC X.
    43.            03  I-F-PRIMER-CUO-SOCI      PIC 9(06).
    44.            03  FILLER                   PIC X(46).
    45.            03  I-OPER-SOCI              PIC X(04).
    46.            03  I-F-MODI-SOCI            PIC 9(06).

    1) Selecciona el TXT sin recortar con la excel,

    2) Te pregunta la excel, delimitados o ancho ficho, le das ancho fijo,
    3) Le das siguiente,
    4) Vas marcando cada campo con su logitud determinada por la fd que te he puesto arriba.
    5) Cuando termines, siguiente
    6) y ya tienes en excel cada campo en una columna,
    7) lo guardas en .csv con las caracteristicas deseadas

    ---------- Post añadido el 17 de abril de 2022 a las 23:35 ----------

    Si hay algun campo de la FD que no entiendas, pregunta.


    tuve que cortarlo para subirlo acá... igualmente se muestra bien, con un socio por linea... pero si te fijas, por ejemplo, de la línea 1 hasta la 10 el nro de operacion consiste de 5 caracteres y en las líneas 11 y 12 consiste de 4, luego vuelve a 5... y asi con varios campos...

    Intenté hacer lo que me decís con ese archivo pero al no coincidir todos los campos como debería, las columnas agarraban partes de otras... no se si me explico...

    Estuve revisando y ese no es el .CBL... es de otro listado q no me sirve.. el que si me sirve no tengo el .CBL (creo q solo tengo el .COB)

    De todas formas lo que hice fue imprimir con el PDFCreator a un .TXT y ahi si lo importe al excel y quedo dentro de todo bien pero no llega a ser lo que necesito... es mejor que nada pero no lo que necesito porque lo imprime en dos lineas y por momentos se mezclan ciertos campos...

    Sinceramente no logro entender como el COBOL entiende cuando comienza y finaliza un campo si no coinciden en la cantidad de caracteres entre distintos registros...

    Te paso -> acá <- todos los archivos del programa a ver si logras entenderlo... Los datos que yo necesito extraer están en los archivos SOCIMANT y SOCIOSER

    Estos son los dos archivos TXT recuperados con rmifca y ReadCOBOLFiles -> txt.rar <-


    Gracias por toda la ayuda que me estás brindando... Quería molestar lo menos posible pero ya me está mareando todo esto

    0 Not allowed!

  3. #13
      Senior
    J

    Registrado
    junio de 2016
    Ubicación
    Albacete
    Edad
    57
    Mensajes
    417
    Última visita
    Hoy a las 19:16

    Agradecimientos
     
    Recibidos
    240
    Enviados
    149

    Citaciones y menciones
     
    Mentioned
    52 Post(s)
    Tagged
    0 Thread(s)
    Quoted
    9 Post(s)
    Poder de Reputación
    25
    Activista del Foro / Point Value: 0 Agradecimientos / Point Value: 0

    Predeterminado
    ¡Solución!1 usuarios han marcado el post como Solución

    Debe de ser problema del readcobolfiles.

    Inténtalo con la utilidad mira.

    O mejor pásame los ficheros recuperados del rmifca.cob

    0 Not allowed!

  4. #14
      Acabo de llegar...
    m

    Registrado
    abril de 2022
    Ubicación
    Rosario
    Edad
    30
    Mensajes
    11
    Última visita
    20.04.2022

    Agradecimientos
     
    Recibidos
    0
    Enviados
    5

    Citaciones y menciones
     
    Mentioned
    4 Post(s)
    Tagged
    0 Thread(s)
    Quoted
    0 Post(s)
    Poder de Reputación
    0

    Predeterminado

    Cita Iniciado por JCantero Ver Mensaje
    pásame los ficheros recuperados del rmifca.cob
    Aquí están: txt rmifca.rar

    0 Not allowed!

  5. #15
      Acabo de llegar...
    m

    Registrado
    abril de 2022
    Ubicación
    Rosario
    Edad
    30
    Mensajes
    11
    Última visita
    20.04.2022

    Agradecimientos
     
    Recibidos
    0
    Enviados
    5

    Citaciones y menciones
     
    Mentioned
    4 Post(s)
    Tagged
    0 Thread(s)
    Quoted
    0 Post(s)
    Poder de Reputación
    0

    Medalla

    Cita Iniciado por JCantero Ver Mensaje
    Debe de ser problema del readcobolfiles.

    Inténtalo con la utilidad mira.
    Bueno, al final tanto dolor de cabeza y era esto... Un problema en el ReadCOBOLFiles...

    Intenté con Mira y quedo EXCELENTE...

    Nada más que agradecerte por toda la voluntad y la paciencia que me tuviste... Sos el mejor de los mejores...

    Saludos y MUCHISIMAS MUCHISIMAS GRACIAS!@JCantero,

    0 Not allowed!

  6. #16
      Senior
    J

    Registrado
    junio de 2016
    Ubicación
    Albacete
    Edad
    57
    Mensajes
    417
    Última visita
    Hoy a las 19:16

    Agradecimientos
     
    Recibidos
    240
    Enviados
    149

    Citaciones y menciones
     
    Mentioned
    52 Post(s)
    Tagged
    0 Thread(s)
    Quoted
    9 Post(s)
    Poder de Reputación
    25
    Activista del Foro / Point Value: 0 Agradecimientos / Point Value: 0

    Predeterminado

    Cita Iniciado por manu Ver Mensaje
    Bueno, al final tanto dolor de cabeza y era esto... Un problema en el ReadCOBOLFiles...

    Intenté con Mira y quedo EXCELENTE...

    Nada más que agradecerte por toda la voluntad y la paciencia que me tuviste... Sos el mejor de los mejores...

    Saludos y MUCHISIMAS MUCHISIMAS GRACIAS!@JCantero,
    El "mira" es que lo hice yo.


    0 Not allowed!

  7. #17
      Acabo de llegar...
    m

    Registrado
    abril de 2022
    Ubicación
    Rosario
    Edad
    30
    Mensajes
    11
    Última visita
    20.04.2022

    Agradecimientos
     
    Recibidos
    0
    Enviados
    5

    Citaciones y menciones
     
    Mentioned
    4 Post(s)
    Tagged
    0 Thread(s)
    Quoted
    0 Post(s)
    Poder de Reputación
    0

    Medalla

    Cita Iniciado por JCantero Ver Mensaje
    El "mira" es que lo hice yo.

    Ahhh hubiésemos empezado por ahí!!! 👏🏻👏🏻👏🏻👏🏻👏🏻

    Un genio total

    Nuevamente muchas Gracias, y espero que sigas muy bien!

    Saludos y un fuerte abrazo...

    0 Not allowed!

Página 2 de 2 PrimerPrimer 1 2

Información de Tema

Usuarios Viendo este Tema

Actualmente hay 1 usuarios viendo este tema. (0 miembros y 1 visitantes)

Temas Similares

  1. [Sintaxis] ODBC - cambiar el "path" de una base de datos
    Por Hrmcobol en el foro PowerCOBOL (ActiveX, v4 - v11)
    Respuestas: 9
    Último Mensaje: 15.11.2022, 20:24
  2. [Información] I/O Error al ejecutar una base de datos
    Por DestinedBroken en el foro Visual Cobol
    Respuestas: 11
    Último Mensaje: 02.02.2022, 11:13
  3. [Componente] Mejor opcion para editar datos en una grilla
    Por dmosca en el foro PowerCOBOL (ActiveX, v4 - v11)
    Respuestas: 13
    Último Mensaje: 08.11.2021, 00:21
  4. [Sintaxis] Crear CSV
    Por JuanJuan77 en el foro PowerCOBOL (ActiveX, v4 - v11)
    Respuestas: 3
    Último Mensaje: 27.09.2021, 19:14
  5. [Herramienta] Pasar datos de Cobol (Archivos RMKF) a txt/Excel
    Por JuanPelaez en el foro COBOL - General
    Respuestas: 10
    Último Mensaje: 03.01.2020, 12:58

Etiquetas para este Tema

Marcadores

Marcadores

Permisos de Publicación

  • No puedes crear nuevos temas
  • No puedes responder temas
  • No puedes subir archivos adjuntos
  • No puedes editar tus mensajes
  •