COBOL DESDE CERO #38

Aprendiendo COBOL: Escritura y Manipulación en Bases de Datos SQL

Operaciones de Escritura y Manipulación en Bases de Datos SQL desde COBOL

En esta lección, nos enfocaremos en cómo realizar operaciones de escritura y manipulación de datos en una base de datos SQL utilizando programas COBOL. Aprenderemos a insertar nuevos registros, actualizar datos existentes y eliminar información según nuestras necesidades.

IDENTIFICATION DIVISION.
PROGRAM-ID. EscrituraSQL.

DATA DIVISION.
WORKING-STORAGE SECTION.
    EXEC SQL
        INCLUDE SQLCA
    END-EXEC.

    EXEC SQL
        BEGIN DECLARE SECTION
    END-EXEC.
    
    01 NuevoNombre            PIC X(30) VALUE 'Nuevo Empleado'.
    01 NuevaEdad              PIC 9(3) VALUE 25.
    
    EXEC SQL
        END DECLARE SECTION
    END-EXEC.

PROCEDURE DIVISION.
    EXEC SQL
        CONNECT TO 'nombre_bd' USER 'usuario' USING 'contrasena'
    END-EXEC.

    EXEC SQL
        INSERT INTO Empleados (Nombre, Edad)
        VALUES (:NuevoNombre, :NuevaEdad)
    END-EXEC.

    DISPLAY 'Registro insertado correctamente.'.

    EXEC SQL
        COMMIT
    END-EXEC.

    EXEC SQL
        DISCONNECT
    END-EXEC.

    STOP RUN.
        

En este ejemplo, nos conectamos a la base de datos, insertamos un nuevo registro en la tabla "Empleados" y confirmamos la operación utilizando la sentencia COMMIT. Es esencial entender el impacto de las operaciones de escritura y manejarlas con precaución.

Puntos Destacados:

• La sentencia INSERT INTO se utiliza para agregar nuevos registros a la base de datos.
• La sentencia COMMIT confirma las operaciones de escritura realizadas.
• Es crucial manejar adecuadamente la conexión y desconexión de la base de datos.

En futuras lecciones, exploraremos actualizaciones, eliminaciones y estrategias avanzadas para manipular datos en bases de datos SQL desde COBOL. ¡Sigue aprendiendo y disfrutando del viaje!

© 2024 Programar desde Cero