Gracias Rui Pinto (Rapinto)
COBOL Foro
Foro dedicado a COBOL, a la Programación y a la Informática.
  COBOL Foro > IDE-s y compiladores COBOL > COBOL - General
COBOL - General Discusiones de temática general sobre el lenguaje COBOL y todo lo relacionado con él.
Comunicados
Otros temas que te pueden interesar
Tema Autor Foro Respuestas Último post
[Aporte] Tablas bidimensionales de longitud variable Kuk Cocina MicroFocus 2 23 de mayo de 2018 10:13
Respuesta
 
Herramientas

  #1
Antiguo 21 de abril de 2020, 06:23
IDENTIFICATION DIVISION
dariodr
 Acabo de llegar...
ENVIRONMENT DIVISION
Avatar de dariodr
DATA DIVISION
noviembre 2018
52 años
29.06.2022 11:44
PROCEDURE DIVISION
Posts: 16
Enviado: 3
Recibido: 1
Soluciones: 0
Reputación: 0
dariodr is an unknown quantity at this point
Tabla Tablas en Cobol

Buenas tardes amigos Coboleros, tengo una consulta.
Tengo este enunciado:

Programa que carga una matriz alfanumérica de 80 filas y 2 columnas conteniendo en cada fila un nombre de persona y su numero de teléfono. A continuacion realiza una clasificación ascendente por orden alfabético de nombres y finalmente imprime la lista ordenada de nombres y teléfonos.

La pregunta es: como creo la matriz alfanumerica.
He hecho este trozo de codigo pero se que esta mal.

Código COBOL:
  1. DATA DIVISION.
  2.        FILE SECTION.
  3.        WORKING-STORAGE SECTION.
  4.        01  TABLA-DIR.
  5.            02 T-NOMBRES              OCCURS 5 TIMES.
  6.                03 T-COL    PIC 9(7)  OCCURS 2 TIMES.
dariodr no ha iniciado sesión   Responder Con Cita
  #2
Antiguo 21 de abril de 2020, 08:12
IDENTIFICATION DIVISION
Kuk
 Administrador
ENVIRONMENT DIVISION
Avatar de Kuk
DATA DIVISION
diciembre 2014
Madrid
37 años
29.06.2022 13:02
PROCEDURE DIVISION
Posts: 1.998
Enviado: 701
Recibido: 852
Soluciones: 100
Reputación: 10
Kuk is on a distinguished road Kuk is on a distinguished road Kuk is on a distinguished road Kuk is on a distinguished road Kuk is on a distinguished road Kuk is on a distinguished road Kuk is on a distinguished road Kuk is on a distinguished road Kuk is on a distinguished road Kuk is on a distinguished road Kuk is on a distinguished road
Predeterminado

dariodr, la estructura de datos debe ser algo así :

Código COBOL:
  1.        WORKING-STORAGE SECTION.
  2.        01  TABLA-DIR.
  3.            05 TBL-FILAS OCCURS 80 TIMES.
  4.               10 TB-NOMBRE             PIC X(20).
  5.               10 TB-TELEFONO           PIC X(20).



NORMAS DEL FORO - para garantizar el buen funcionamiento del Foro.
¿Te han ayudado? NO TE OLVIDES de darle a
¿Quieres dirigirte a alguien en tu post? Notifícale haciendo clic en su Nick
Kuk no ha iniciado sesión   Responder Con Cita
  #3
Antiguo 21 de abril de 2020, 08:55
IDENTIFICATION DIVISION
dariodr
 Acabo de llegar...
ENVIRONMENT DIVISION
Avatar de dariodr
DATA DIVISION
noviembre 2018
52 años
29.06.2022 11:44
PROCEDURE DIVISION
Posts: 16
Enviado: 3
Recibido: 1
Soluciones: 0
Reputación: 0
dariodr is an unknown quantity at this point
Predeterminado

En ese ejemplo que has puesto la tabla TBL-FILAS es bidimensional, si?
Salu2.
dariodr no ha iniciado sesión   Responder Con Cita
  #4
Antiguo 21 de abril de 2020, 09:03
IDENTIFICATION DIVISION
Kuk
 Administrador
ENVIRONMENT DIVISION
Avatar de Kuk
DATA DIVISION
diciembre 2014
Madrid
37 años
29.06.2022 13:02
PROCEDURE DIVISION
Posts: 1.998
Enviado: 701
Recibido: 852
Soluciones: 100
Reputación: 10
Kuk is on a distinguished road Kuk is on a distinguished road Kuk is on a distinguished road Kuk is on a distinguished road Kuk is on a distinguished road Kuk is on a distinguished road Kuk is on a distinguished road Kuk is on a distinguished road Kuk is on a distinguished road Kuk is on a distinguished road Kuk is on a distinguished road
Predeterminado

dariodr, no que va, es unidimensional ya que sólo hay un OCCURS (o sea no los hay anidados).



NORMAS DEL FORO - para garantizar el buen funcionamiento del Foro.
¿Te han ayudado? NO TE OLVIDES de darle a
¿Quieres dirigirte a alguien en tu post? Notifícale haciendo clic en su Nick
Kuk no ha iniciado sesión   Responder Con Cita
Respuesta


Usuarios activos actualmente viendo este tema: 2 (0 miembros y 2 visitantes)
 
Herramientas

Derechos de Publicación
No puedes publicar nuevos temas
No puedes publicar posts/responder
No puedes adjuntar archivos
No puedes editar tus posts

BB code is habilitado
Las caritas están habilitado
Código [IMG] está habilitado
Código HTML está deshabilitado



La franja horaria es GMT +1. Ahora son las 13:28.
Powered by: vBulletin, Versión 3.8.7
Derechos de Autor ©2000 - 2022, Jelsoft Enterprises Ltd.