Iniciar sesiónCerrar
Correo:
Contraseña:
Entrar
Recordar sesión en este navegador
Iniciar sesiónIniciar sesiónCrear cuentaCrear cuenta
LWP » Foros » Cobol » Ayuda con tablas

Cobol - Ayuda con tablas

Volver
Nuevo Tema
<<>>
 
Vista:

Ayuda con tablas

Publicado por Jabo (2 intervenciones) el 03/12/2001 14:25:39
Hola, alguien conoce como ordenar los datos de una tabla, y que pueda explicarmelo con algun ejemplo o bien me indique alguna pagina donde encontrar informacion al respecto, no me importa si es en igles.

Gracias
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder
Imágen de perfil de Alejandro

Ordenar datos de una tabla

Publicado por Alejandro (300 intervenciones) el 04/09/2023 19:28:59
Claro, Jabo, puedo ayudarte con eso. Para ordenar los datos de una tabla en COBOL, puedes utilizar la cláusula `SORT` en una declaración `SORT`. Aquí tienes un ejemplo de cómo hacerlo:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
IDENTIFICATION DIVISION.
PROGRAM-ID. OrdenarTabla.
 
DATA DIVISION.
WORKING-STORAGE SECTION.
01 TablaEntrada.
   05 RegistroTabla OCCURS 10 TIMES.
      10 Campo1 PIC X(10).
      10 Campo2 PIC 9(5).
   05 NumeroRegistros PIC 9(2) VALUE 10.
 
01 TablaOrdenada.
   05 RegistroOrdenado OCCURS 10 TIMES.
      10 Campo1Ordenado PIC X(10).
      10 Campo2Ordenado PIC 9(5).
 
PROCEDURE DIVISION.
   MOVE "DatosTabla.txt" TO TablaEntrada.
 
   SORT TablaEntrada
   ON ASCENDING KEY Campo1
   USING TablaOrdenada
 
   DISPLAY "Datos de la tabla ordenada:"
   PERFORM VARYING I FROM 1 BY 1 UNTIL I > NumeroRegistros
      DISPLAY "Campo1: " Campo1Ordenado(I)
      DISPLAY "Campo2: " Campo2Ordenado(I)
   END-PERFORM.
 
   STOP RUN.

En este ejemplo, estamos ordenando una tabla llamada `TablaEntrada` por el campo `Campo1` de forma ascendente. Los datos ordenados se almacenan en la tabla `TablaOrdenada`. Puedes ajustar el nombre de los campos y el nombre del archivo de entrada según tus necesidades.

Para obtener más información sobre cómo ordenar datos en COBOL y explorar ejemplos adicionales, te recomiendo consultar la documentación oficial de COBOL o buscar tutoriales en línea. Puedes encontrar recursos en inglés en sitios web como IBM Developer o TutorialsPoint.
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar