Representasi Visual Struktur Program COBOL
COBOL (Common Business-Oriented Language) adalah bahasa pemrograman prosedural yang dirancang khusus untuk aplikasi bisnis. Meskipun tergolong "kuno," COBOL masih menjadi tulang punggung sistem keuangan, perbankan, dan pemerintahan di banyak negara karena stabilitas, kemampuan penanganan file yang kuat, dan durabilitasnya.
Struktur program COBOL sangat terdefinisi dan terbagi menjadi empat Divisi utama: IDENTIFICATION DIVISION, ENVIRONMENT DIVISION, DATA DIVISION, dan PROCEDURE DIVISION. Setiap bagian memiliki peran spesifik dalam mendefinisikan program.
Kita akan membuat program yang meminta input nama dari pengguna dan kemudian menampilkan salam personal.
IDENTIFICATION DIVISION.
PROGRAM-ID. HALOSALAM.
ENVIRONMENT DIVISION.
CONFIGURATION SECTION.
SOURCE-COMPUTER. XYZ-COMP.
OBJECT-COMPUTER. XYZ-COMP.
DATA DIVISION.
WORKING-STORAGE SECTION.
01 WS-NAMA PIC X(30) VALUE SPACES.
01 WS-PESAN-SALAM.
05 FILLER PIC X(12) VALUE 'Selamat Datang'.
05 FILLER PIC X(1) VALUE SPACE.
05 NAMA-OUTPUT PIC X(30).
05 FILLER PIC X(2) VALUE '.'.
PROCEDURE DIVISION.
MAIN-PROGRAM.
DISPLAY '------------------------------------'.
DISPLAY 'PROGRAM SALAM COBOL SEDERHANA'.
DISPLAY '------------------------------------'.
* Meminta input dari pengguna
DISPLAY 'Silakan masukkan nama Anda (Maks. 30 karakter): '
ACCEPT WS-NAMA.
* Memindahkan data input ke area output
MOVE WS-NAMA TO NAMA-OUTPUT.
* Menampilkan hasil akhir
DISPLAY WS-PESAN-SALAM.
STOP RUN.
PROGRAM-ID). Ini mirip dengan metadata.
CONFIGURATION SECTION sering diisi dengan nilai standar.
01 WS-NAMA PIC X(30): Mendefinisikan variabel bernama WS-NAMA. PIC (Picture Clause) X(30) berarti ini adalah area karakter (alfanumerik) dengan panjang 30.01 WS-PESAN-SALAM: Mendefinisikan struktur data gabungan (level 01). Angka 05 menunjukkan sub-item.VALUE SPACES: Menginisialisasi variabel dengan spasi kosong.DISPLAY: Perintah untuk mencetak output ke layar (console).ACCEPT: Perintah untuk membaca input dari pengguna dan menyimpannya ke variabel (WS-NAMA).MOVE: Perintah untuk menyalin nilai dari satu variabel ke variabel lain.STOP RUN: Mengakhiri eksekusi program.Meskipun Java, Python, atau JavaScript mendominasi pengembangan modern, pengetahuan COBOL memiliki nilai unik: