OT: Datos en Cobol

196 views
Skip to first unread message

Afpsistemas - Fernando Maggi

unread,
Oct 11, 2019, 4:16:09 PM10/11/19
to publice...@googlegroups.com

Colegas, tengo un desafío por resolver y apelo a los más “jóvenes” del grupo jaja

 

Tengo que migrar un sistema de muchos años, del cual obviamente no existen datos del programador y tendría que poder acceder a los datos … lo que encuentro son archivos sin extensión y los mismos archivos con una extensión .KEY

 

Alguien puede darme una idea de como leer estos datos ¿?

 

Gracias ¡!

Fernando.

 

PD: Pongo una imagen del directorio

 

 

 

 

 

image001.png

Hèctor Javier Yost

unread,
Oct 11, 2019, 5:48:53 PM10/11/19
to Comunidad de Visual Foxpro en Español
Hola, probablemente puedan ser Cobol, ya que la extensión delos archivos la pone el programador, pon en imagen el archivo menu.bat allí puede dar un pista.
Si no tienes tanto el diseño de registro como el de claves de las fd's si fuese Cobol no hay forma de leer los datos.
Saludos!

Afpsistemas - Fernando Maggi

unread,
Oct 12, 2019, 8:50:55 AM10/12/19
to publice...@googlegroups.com
Héctor gracias por responder, te pongo una copia del contenido del menú ....... se te ocurre alguna otra forma ? se puede descompilar el programa ?

echo off
cls
cd c:\sistema
rem copy b:*.* c:
rem assign b=c
subst b: c:\sistema
isam /s:20000
runcob brauer
isam /f
rem assign
cls
rem echo PARA COPIAR A DISKETTE LOS ARCHIVOS ESCRIBIR LO SIGUIENTE
rem ECHO COPY C:*.* B: (ENTER)


-----Mensaje original-----
De: publice...@googlegroups.com <publice...@googlegroups.com> En nombre de Hèctor Javier Yost
Enviado el: viernes, 11 de octubre de 2019 18:49
Para: Comunidad de Visual Foxpro en Español <publice...@googlegroups.com>
Asunto: [vfp] OT: Datos en Cobol

Hola, probablemente puedan ser Cobol, ya que la extensión delos archivos la pone el programador, pon en imagen el archivo menu.bat allí puede dar un pista.
Si no tienes tanto el diseño de registro como el de claves de las fd's si fuese Cobol no hay forma de leer los datos.
Saludos!

--
Has recibido este mensaje porque estás suscrito al grupo "Comunidad de Visual Foxpro en Español" de Grupos de Google.
Para cancelar la suscripción a este grupo y dejar de recibir sus mensajes, envía un correo electrónico a publicesvfoxp...@googlegroups.com.
Para ver este debate en la Web, visita https://groups.google.com/d/msgid/publicesvfoxpro/f8f8cb37-db20-4d8f-ac0c-d9b8075055f9%40googlegroups.com.

Carlos Miguel FARIAS

unread,
Oct 12, 2019, 10:38:44 AM10/12/19
to Grupo Fox
Los archivos sin extensión son cobol, los key son los archivos de indices (ISAM generalmente).
Los archivos cobol son en general archivos de registros de longitud fija. Para ver como están distribuidos los campos, tienes que usar un editor hexadecimal (podes usar el de fox) y pomada anti-hemorroidales.
Los campos son de longitud fija, puede que haya alguna cabecera, para acceder los, puedes hacer un fopen() y luego ir leyendo cantidad de bytes fija.
Para detectar la longitud de registro, tendrás que probar hasta que leyendo los datos alfanuméricos que puedas detectar comiencen alineados.
Los campos numéricos pueden venir en varios formatos, el más simple son texto plano, son fáciles de ubicar.
Otros formatos son COMP-3 o empaquetados y COMP-4 o binarios. (depende de la versión de cobol utilizado).
Los comp-3 tienen un dígito cada medio byte y en el último medio byte una marca de signo.
Los campos en cobol no guardan la posición decimal, son básicamente enteros que luego el lenguaje en función de la especificación de diseño de registro interna, determina cuantos decimales debe usar en cálculos.
Reconstruir el diseño de los registros de cada tabla, va a depender si puedes obtener un listado del sistema de lo que hay en cada tabla.
Por eso las dos herramientas que sugerí al principio
Saludos: Miguel

Libre de virus. www.avast.com

Para ver este debate en la Web, visita https://groups.google.com/d/msgid/publicesvfoxpro/00ef01d580fb%24a7bac700%24f7305500%24%40gmail.com.

Esteban H

unread,
Oct 12, 2019, 1:23:53 PM10/12/19
to publice...@googlegroups.com

Creo q lo más fácil de este trabajo va a ser conseguir la pomada anti-hemorroides. Jejeje.

Una titánica tarea leer esos archivos….

 

Muuuuucha suerte…

Afpsistemas - Fernando Maggi

unread,
Oct 14, 2019, 9:23:52 AM10/14/19
to publice...@googlegroups.com

Muchas gracias a todos ¡!

Arrancaremos con la pomada jaja

--

Has recibido este mensaje porque estás suscrito al grupo "Comunidad de Visual Foxpro en Español" de Grupos de Google.
Para cancelar la suscripción a este grupo y dejar de recibir sus mensajes, envía un correo electrónico a publicesvfoxp...@googlegroups.com.

Marcos Godoy

unread,
Oct 15, 2019, 2:35:57 PM10/15/19
to publice...@googlegroups.com
Si no tenes los programas con extensión cob, es muy trabajoso reconstituir esto, te diría que lo más eficiente para este caso es ver como funciona la aplicación y de acuerdo a ese análisis funcional, pensar en el desarrollo total de una nueva aplicación
Saludos!!!!, 
Muy bien Miguel Farías con el computational-3.!!!!

Para ver esta conversación en el sitio web, visita https://groups.google.com/d/msgid/publicesvfoxpro/019b01d58292%249aaa5d30%24cfff1790%24%40gmail.com.

Afpsistemas - Fernando Maggi

unread,
Oct 15, 2019, 2:52:11 PM10/15/19
to publice...@googlegroups.com

Marcos, obviamente que la idea es migrar el sistema ……. El tema que tiene bastantes datos y la idea era ver si se podía encontrar alguna forma de importarlos, por lo visto hasta ahora tendrán que sentarse a pasar nuevamente todo.

 

Gracias ¡!

Fernando.

ROBERTO EDGARDO Rogers

unread,
Oct 15, 2019, 3:37:37 PM10/15/19
to publice...@googlegroups.com
Es correcta la apreciación. Yo tengo sistemas en cobol (RMCOBOL) y no sé si me animaría a encarar un trabajo parecido al que propones. En el caso que sea RMCOBOL, fijate si entre los archivos están los tipo CPY que son los diseños de registro o los CBL que son los fuentes. Si tuvieras los COB (ejecutables desde el runcobol) y se pueden ejecutar porian generarse alguna listado a disco de los padrones y con eso podrias tomar un TXT de salida.
Saludos
Roberto ROGERS
wapp: 2914661135
skype: robertorogers

Mailtrack Remitente notificado con
Mailtrack 15/10/19 16:33:05

Para ver esta conversación en el sitio web, visita https://groups.google.com/d/msgid/publicesvfoxpro/CAHfMKtRDUiiQBNEXjCCCuz3ggZ-wBpQpHHkD2un%3DxWrBjd7aiw%40mail.gmail.com.

Afpsistemas - Fernando Maggi

unread,
Oct 15, 2019, 4:08:55 PM10/15/19
to publice...@googlegroups.com

Roberto, logre ejecutar la aplicación en una maquina virtual, se que emite algunos reportes en matriz de puntos … se te ocurre justamente como poder emular una impresora para desde el sistema tener un TXT ¿?

 

Saludos,

Fernando.

Claudio Luna

unread,
Oct 15, 2019, 4:17:00 PM10/15/19
to Comunidad de Visual Foxpro en Español
Aca tenes si es una salida a lpt1 como redirigirlo a un archivo.
Que tiempos los de cobol !!!
Abrazo 

Para ver esta conversación en el sitio web, visita https://groups.google.com/d/msgid/publicesvfoxpro/003901d58394%245a036cb0%240e0a4610%24%40gmail.com.


--
Claudio Luna
Monttevideo - Uruguay
SKYPE: clunamarin
Cel. 099 194 770

Claudio Luna

unread,
Oct 15, 2019, 4:19:23 PM10/15/19
to Comunidad de Visual Foxpro en Español
Y por aca tenes algo que quizas te pueda servir tambien :
Saludos 

ROBERTO EDGARDO Rogers

unread,
Oct 15, 2019, 4:20:39 PM10/15/19
to publice...@googlegroups.com
Si, hace mucho, recuerdo vagamente. Recuerdo una vez generé una impresora tipo generica y la puse como predeterminada y me generó un archivo al disco en formato txt. Hay impresoras que generan txt. Creo que era si una generica
Saludos
Roberto ROGERS
wapp: 2914661135
skype: robertorogers

Mailtrack Remitente notificado con
Mailtrack 15/10/19 17:17:06

Para ver esta conversación en el sitio web, visita https://groups.google.com/d/msgid/publicesvfoxpro/003901d58394%245a036cb0%240e0a4610%24%40gmail.com.

Claudio Luna

unread,
Oct 15, 2019, 4:21:00 PM10/15/19
to Comunidad de Visual Foxpro en Español
Se me cae un lagrimon, sin darme cuenta ya pasaron 34 años de mi primer programa Cobol....
hace poquito..jaja
Saludos

Afpsistemas - Fernando Maggi

unread,
Oct 15, 2019, 4:26:33 PM10/15/19
to publice...@googlegroups.com

Muchas gracias, les comento cuando pueda meter mano en el tema ¡!

Claudio Luna

unread,
Oct 15, 2019, 4:28:52 PM10/15/19
to Comunidad de Visual Foxpro en Español

wpalomo

unread,
Oct 21, 2019, 10:11:41 PM10/21/19
to Comunidad de Visual Foxpro en Español

Carlos Miguel FARIAS

unread,
Oct 22, 2019, 9:35:26 AM10/22/19
to Grupo Fox
Sitio web no fiable. No se le puede fiar? Parece Argentina 😱😱🖖

El lun., 21 oct. 2019 a las 23:11, wpalomo (<toshiba....@gmail.com>) escribió:

--
Visita el Blog de la Comunidad Visual FoxPro en Español: http://comunidadvfp.blogspot.com
---
Has recibido este mensaje porque estás suscrito al grupo "Comunidad de Visual Foxpro en Español" de Grupos de Google.
Para cancelar la suscripción a este grupo y dejar de recibir sus mensajes, envía un correo electrónico a publicesvfoxp...@googlegroups.com.
Para ver esta conversación en el sitio web, visita https://groups.google.com/d/msgid/publicesvfoxpro/2aba68d7-5617-4d16-8c62-5d22e9c3c4c8%40googlegroups.com.
Reply all
Reply to author
Forward
0 new messages