Tus primeros pasos con COBOL

1

Fundamentos B谩sicos de Programaci贸n en Cobol

2

Estructura y Divisiones de Programas COBOL

3

Configuraci贸n de un entorno de desarrollo emulando mainframe IBM

4

Configuraci贸n de Terminal WC3270 en Entorno de Desarrollo

5

Instalaci贸n del emulador MVS en Ubuntu

6

Instalaci贸n del emulador MVS en macOS

7

Creaci贸n y Gesti贸n de Directorios en Entorno Cobol

8

Comandos esenciales en ISPF para programar en COBOL

9

Consola y L铆nea de Comandos en Entornos de Desarrollo Cobol

10

Ejecuci贸n de Programas Cobol en Mainframe MBS

11

Primer Programa "Hola Mundo" en COBOL: Paso a Paso

Quiz: Tus primeros pasos con COBOL

JCL: Job Control Language

12

Lenguaje JCL: Enlace Crucial entre Cobol y Mainframe

13

Par谩metros y Estructura de un JCL en Mainframe

14

Codificaci贸n de Utiler铆as JCL en Mainframe: IEFBR14 y Par谩metros

15

Utilizaci贸n de la utiler铆a IEBener para crear respaldos de archivos

16

Creaci贸n de un JCL para Compilar en Mainframe

17

Creaci贸n y Ejecuci贸n de un JCL para Programa Hola Mundo en Cobol

Quiz: JCL: Job Control Language

Tipos de datos y operaciones matem谩ticas

18

Tipos de Datos y Convenciones en Programaci贸n Cobol

19

Despliegue de Variables en Consola con COBOL

20

Operaciones Matem谩ticas en Cobol con Sentencia Compute

Quiz: Tipos de datos y operaciones matem谩ticas

Estructuras de control

21

Estructura de Control If-Else en COBOL

22

Estructuras de Control: Perform Times y Perform Until en COBOL

Algoritmos y resoluci贸n de problemas

23

Programaci贸n Top-Down y Modularidad en COBOL

Quiz: Algoritmos y resoluci贸n de problemas

Despedida

24

Curso Pr谩ctico de Cobol: Creaci贸n de Reportes con JCL

No tienes acceso a esta clase

隆Contin煤a aprendiendo! 脷nete y comienza a potenciar tu carrera

Curso de COBOL desde Cero

Curso de COBOL desde Cero

Carlos S谩nchez Botello

Carlos S谩nchez Botello

Estructura de Control If-Else en COBOL

21/24
Recursos

驴C贸mo implementar una estructura de control if else en COBOL?

La programaci贸n en COBOL te brinda una oportunidad 煤nica para adquirir habilidades que pueden transformarse en un empleo estable y de larga duraci贸n. Con este conocimiento, te sumerges en el mundo de la l贸gica y las decisiones, reflejado en la estructura if else. Aqu铆 te explicaremos c贸mo crear un programa sencillo que utilice esta estructura de control, paso a paso.

驴C贸mo se inicia el programa base en COBOL?

  1. Accede a tu emulador y dir铆gete a la carpeta SRC en platzi.
  2. Copia el contenido del programa de ejemplo "hola" a un nuevo programa llamado cree if else.
  3. Actualiza el nombre del programa a it else y elimina cualquier comando de display innecesario.

驴C贸mo definir las constantes necesarias?

Dentro de la secci贸n de datos del programa, es crucial establecer las constantes que se utilizar谩n durante la ejecuci贸n:

  1. Dir铆gete a la secci贸n Data Division, espec铆ficamente dentro de Working Storage Section.

  2. Define tus constantes a partir de la fila n煤mero 12:

    05  WSC-A    PIC 9 VALUE 7.
    05  WSC-B    PIC 9 VALUE 9.
    

    Aqu铆, WSC-A y WSC-B son constantes con un valor predeterminado de 7 y 9, respectivamente.

驴C贸mo se estructura el if else en COBOL?

Ahora, vamos a definir la l贸gica dentro de Procedure Division:

  1. Realiza un llamado al p谩rrafo 010-IF desde la columna n煤mero 12:

    PERFORM 010-IF.
    
  2. Crea el p谩rrafo 010-IF:

    010-IF.
        IF WSC-A < WSC-B THEN
            DISPLAY "El valor de " WSC-A " es menor que " WSC-B
        ELSE
            DISPLAY "El valor de " WSC-A " es mayor que " WSC-B.
    
  3. Define el p谩rrafo final 020-FIN:

    020-FIN.
        STOP RUN.
    

驴C贸mo compilar y ejecutar tu c贸digo COBOL?

Para verificar que tu programa funcione correctamente:

  1. Salva tu c贸digo y teclea F3 para ir a la carpeta JCLs.
  2. Realiza un submit del JCL para compilar el programa, asegur谩ndote de que el nombre coincida con el de tu c贸digo.
  3. Ejecuta el JCL EXEC IF para comprobar que la ejecuci贸n es exitosa.

驴Qu茅 modificaciones permiten observar cambios en el if else?

A fin de entender c贸mo funciona el flujo de control:

  1. Cambia el valor de WSC-B a 5.
  2. Compila nuevamente y observa c贸mo el flujo del programa se dirige ahora a la otra rama del else, mostrando que "El valor de 7 es mayor que 5".

Reto para el aprendizaje

Te animo a experimentar cambiando los valores de las constantes y definiciones de texto en cada display. Esto te permitir谩 ver c贸mo cada ejecuci贸n refleja el camino l贸gico definido por tus condiciones. 隆Contin煤a explorando y codificando, y prep谩rate para el pr贸ximo m贸dulo sobre la estructura de control perform!

Aportes 4

Preguntas 7

Ordenar por:

驴Quieres ver m谩s aportes, preguntas y respuestas de la comunidad?

Aporte, quisiera tu observaci贸n en el c贸digo, es que estoy haciendo muchos IF como puede agruparlos en uno sola lineal de c贸digo, si se puede


He tenido problemas en las ultimas clases y al parecer es que hay diferencias entre la tecla espaciadora y desplazarse adelante con la flecha del teclado, pues mi c贸digo visualmente esta bien, todo corresponde a las columnas y filas donde empieza y termina tal cual lo llevaba el profe, pero me sigue resultando el error, pero al copiar el del profe linea por linea ese si resulto bien. Creo que este detalle que estoy mencionando no se ha tratado claramente por parte del profe.

Hola:
M谩s sobre PERFORM.
Saludos.

++sintaxis ++
IF [condition] THEN
[COBOL statements]
ELSE
[COBOL statements]
END-IF.
link para apoyo en el caso de if else en cobol :https://www.tutorialspoint.com/es/cobol/cobol_condition_statements.htm