The set of cobol examples
PC with linux OS and Vagrant installed. If you are using Windows, translate bin/buildAndRun.sh and bin/mf-terminal.sh (or run over WSL?).
- Install Vagrant (documentation).
- Clone this repository and open repo directory in VSC.
- Install extensions:
- Language support
ext install bitlang.cobol(description) - GnuCobol support
ext install bitlang.gnucobol(description) - COBOL flow visualization
ext install broadcomMFD.ccf(description)
- Do in the terminal
$ vagrant up. - Open selected program in VSC.
- Type
Ctrl + Shift + B. Enjoy! - After work, do
$ vagrant haltto stop virtual machines.
- examples/gnucobol - gnucobol dedicated examples
- motto.cbl - gnuCobol motto!
- basic/01_hello_world.cbl - Greeting the World!
- basic/02_variables.cbl - Declaring "variables" (pictures).
- basic/03_add.cbl - Math: add two numbers.
- basic/04_subtract.cbl - Math: subtract two numbers. User input.
- basic/05_multiply.cbl - Math: multiply two numbers.
- basic/06_variables.cbl - Declaring "variables" (pictures).
- basic/07_compute.cbl - Math: calculating the result of a quadratic function.
- basic/08_redefines.cbl - Redefines. Kind of alias of "variable" name (and "variable" type).
- basic/09_rename.cbl - Rename. (Share "sub variables" across two records.)
- basic/10_copybook.cbl - including other source files.
- control/01_if.cbl - if statement and comparison operators.
- control/02_loops.cbl - simple loop. Iterate over the code! :)
- control/03_more_loops.cbl - simple loop. More classic loops.
- control/04_goto.cbl - GOTO and GOTO Monster (something like a switch statement).
- database/mariadb/01_select.cbl - SELECT SQL Statement.
- database/mariadb/02_insert_update.cbl - INSERT and UPDATE SQL Statements.
- database/mariadb/03_delete.cbl - DELETE SQL Statement.
- database/mariadb/04_ddl.cbl - CREATE TABLE and DROP TABLE SQL Statement.
- file/01_read.cbl - read line sequentially.
- file/02_write.cbl - read line sequentially and write to indexed file.
- file/03_rewrite.cbl - something like SQL UPDATE.
- sorting/01_sort.cbl - sort file.
- string/01_inspect.cbl - count characters, replacing.
- string/02_concatenation.cbl - strings concatenation.
- string/03_split.cbl - split string by delimiter.
- subroutines/01_call_main.cbl - call subroutine with params.
- subroutines/01_call_subroutine.cbl - example of subroutine. (Is automatically compiled with 01_call_main)
- examples/mainframe - Hercules dedicated examples
- basic/01_hello_world.cbl - Greeting the World!
- Mainframe/Printers - Hercules printers output files
- prt00e.txt - A device
GnuCobol doesn't support OOP yet.
When you type Ctrl + Shift + B, vscode will execute build task that runs buildAndRun.sh. That magic script looking for JCL corresponding to your CBL file. If the JCL is found then your program will be transfer to the mainframe and submit using JCL. If not, your program will be compile with gnuCobol. Each CBL file is precompiled with esqlOC.
This repository is under development. Currently building a program using the mainframe does not support copybooks. The connection to mariadb has not been tested. VMs builded with Vagrantfile are not secured. Do not use them for sensitive data or production purposes. Building script lacks of error checking.
The mainframe is a large computer designed to process large amounts of business data and I/O operations. Detailed answer.
The actual compilation and running of the program are run in the job queue processed by the mainframe. This makes the process asynchronous to VSCode. Also for this reason, the program output is available on the output device (usually the printer) and not on the terminal. See compilation using the old mainframe. Hercules works similarly.
Probably this process will be improved in the future.
Type ./bin/mf-terminal.sh in your terminal. The default user (f.e.) is HERC02 (password: CUL8TR). After finishing work REMEMBER to LOGOFF (before disconnecting).