Очень краткое введение в COBOL

COBOL - один из тех языков, о которых вы постоянно слышите, один из остатков прошлого.

Оказывается, именно язык движет миром, особенно в банках и финансовых учреждениях. Я где-то читал, что более 70% бизнес-транзакций совершаются с помощью программ, написанных на COBOL.

На то есть разные причины. Во-первых, язык был разработан для этого случая использования.

В конце концов, это называется COmmon Business-Oriented Language.

Скучно для имени. Но это сразу переходит к делу.

Другая причина в том, что он старый. Разработанный в 1959 году, он с самого начала использовался для создания этих систем, и никто не собирается менять те программы, которые работают нормально.

Эти программы настолько важны, что их просто поддерживают и улучшают, но никогда не переписывают с нуля.

В любом случае, вы можете прочитать об истории COBOL в Википедии. Цель здесь - сделать быстрое введение в язык, чтобы в следующий раз, когда вы услышите COBOL, вы знали, как он выглядит.

Установите компилятор GNU COBOL

Установитьgnu-cobol.

На Mac используйтеДомашнее пиво:

brew install gnu-cobol

или используйте любой способ установки команд GNU в вашей операционной системе (подсказка: Homebrew также работает в Win / Linux)

Как только это будет сделано, у вас будет доступ кcobcкоманда.

Это справочная страница для него:

man cobc

Некоторые инструкции, которые я нашел в Интернете, включают установку IDE (интегрированной среды разработки), но для проверки она вам не нужна.

Напишите свои программы на COBOL в.cobфайл и скомпилируйте его, используя

cobc -x <filename>.cob

Write the COBOL Hello, World!

I created a hello.cob file and opened it in VS Code. Immediately a popup told me some extensions could help with .cob files. I’m impressed.

I’m going to install the first and most popular, named COBOL, to provide syntax highlighting.

Now add this code to the hello.cob file:

HELLO
       IDENTIFICATION DIVISION.
       PROGRAM-ID. HELLO.
       PROCEDURE DIVISION.
           DISPLAY "Hello, World!".
           STOP RUN.

Compile it from the command line:

cobc -x hello.cob

and then run the binary file generated:

./hello

This was simple.

Sum two numbers received from the user

Now create a sum.cob file:

HELLO
       IDENTIFICATION DIVISION.
       PROGRAM-ID. ADDITION.
       DATA DIVISION.
       WORKING-STORAGE SECTION.
       77 NUM_1 PIC 9(4).
       77 NUM_2 PIC 9(4).
       77 SOLVE_SUM PIC 9(4).
       PROCEDURE DIVISION.
       PARA.
       DISPLAY "First number: ".
       ACCEPT NUM_1.
       DISPLAY "Second number: ".
       ACCEPT NUM_2.
       COMPUTE SOLVE_SUM = NUM_1 + NUM_2.
       DISPLAY "Sum: " SOLVE_SUM.
       STOP RUN.

Compile it:

cobc -x sum.cob

Run it:

./sum

and you’ll be asked for 2 numbers, then the program calculates the sum:

Note that I have no idea how those programs run, the instructions meanings, but I just wanted to try it out.

I think this is all the COBOL I’ll ever write in my life.


More computers tutorials: