Cobol Foro

Cobol Foro (https://www.cobolforo.es/index.php)
-   COBOL - General (https://www.cobolforo.es/forumdisplay.php?f=44)
-   -   [Sintaxis] Tablas en Cobol (https://www.cobolforo.es/showthread.php?t=1120)

dariodr 21 de abril de 2020 07:23

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.

Kuk 21 de abril de 2020 09:12

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).

dariodr 21 de abril de 2020 09:55

En ese ejemplo que has puesto la tabla TBL-FILAS es bidimensional, si?
Salu2.

Kuk 21 de abril de 2020 10:03

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


La franja horaria es GMT +2. Ahora son las 14:46.

Powered by: vBulletin, Versión 3.8.7
Derechos de Autor ©2000 - 2026, Jelsoft Enterprises Ltd.