SEJARAH COBOL

COBOL adalah kepanjangan dari Common Bussiness Oriented Language. Bahasa COBOL  digolongkan sebagai High Level Language (bahasa pemrograman tingkat tinggi) yang berorientasi pada masalah bisnis. Diciptakan pada tahun 1959.

COBOL atau Common Bussiness Oriented Language adalah bahasa pemrograman komputer, yang dirancang untuk menyelesaikan persoalan bisnis.

COBOL pertama kali diperkenalkan secara formal bulan Januari 1960 dan disebut dengan COBOL-60. Dan diperbaharui tahun 1965. Pada tahun 1968 dan 1974, bahasa COBOL dikembangkan dan distandarisasikan dengan nama ANSI COBOL (American National Standarts Institute).

Bahasa pemrograman COBOL sangat terstruktur, karena mudah dibaca dan memiliki struktur yang jelas. COBOL dibuat untuk operasi pengolahan data,  yaitu membaca data, memproses data dan menghasilkan output berupa informasi

Perkembangan COBOL :

·           Tahun 1958 : Pertama kali diciptakan oleh CODASYL

·           Tahun 1960 : VERSY COBOL – 60, versi pertama

·           Tahun 1968 : ANS COBOL gunakan standart ANSI

·           Tahun 1974 : ANSI COBOL 1974

·           Tahun 1985 : ANSI COBOL 1985

Struktur Program COBOL

Program COBOL dibagi kedalam 4 bagian yang disebut dengan Division. Masingmasing divisi dimulai dengan judul divisi deengan urutan sbb:

·         IDENTIFICATION DIVISION

·         ENVIRONMENT DIVISION

·         DATA DIVISION

·         PROCEDURE DIVISION

Masing-masing divisi dapat terdiri dari urutan-urutan susunan bagian. Tersusun secara hirarki,yang secara umum sbb :

1.      Division

2.      Region

3.      Section

4.      Paragraph

5.      Sentence/Entry

6.      Statement/Clause

7.      Phrase/Option

Istilah Region, sentence, statement dan phrase/option digunakan pada PROCEDURE DIVISION, sedangkan istilah Entry dan clause digunakan pada ke-3 divisi lainnya.

1.      Division, merupakan bagian utama dari suatu program COBOL dan selalu di awali dengan judul divisi.

2.      Region, merupakan suatu kumpulan bagian tertentu dalam PROCEDURE DIVISION.

3.      Section, merupakan suatu kumpulan dari paragraph atau entry dan selalu diawali denga judul seksi.

4.      Paragraph, merupakan suatu grup dari kalimat (sentences) didalam PROCEDURE DIVISION dan selalu diawali dengan nama/ judul  Paragraph.

5.      Entry, merupakan sesuatu yang harus harus dituliskan pada tempat-tempat tertentu didalam program COBOL. Suatu entry dapat juga dikatakan sebagai suatu set (kumpulan) dari clause (anak kalimat) yang diakhiri dengan titik.

6.      Sentence, merupakan kumpulan dari satu atau lebih statement, dan harus diakhiri dengan tanda titik.

7.      Clause, merupakan kumpulan dari kata yang membentuk suatu arti. Clause adalah bagian dari entry.

8.      Statement, merupakan perintah pengerjaan untuk komputer. Statement dalam bentuk kata kerja yang merupakan COBOL Reserved Words.

9.      Phrase, suatu group kata yang merupakan bagian dari statement atau clause.

10.  Option, kebanyakan Phrase adalah optional (boleh disertakan/tidak) maka, sering disebut dengan Option.

User Defined Word

Programmer dapat membentuk kata-kata untuk membuat dan mendefinisikan tersendiri untuk pemberian nama pada :

1.      Nama-program (program-name) adalah suatu nama yang diberikan untuk menunjukkan identitas dari program yang dibuat, dituliskan pada paragraph PROGRAM-ID dalam IDENTIFICATION DIVISION.

2.      Nama-alat (mnemonic-name) adalah nama yang dibuat oleh programmer untuk menunjukkan suatu alat tertentu. Dibentuk pada paragraph SPECIAL-NAMES dalam ENVIRONMENTDIVISION.

3.      Nama-file (file-name) adalah nama yang dibuat untuk menunjukkan suatu file tertentu yang dipergunakan dalam program. Dibentuk pada paragraph FD (File Description) dalam DATA DIVISION atau pada statement CLOSE< OPEN< READ dalam PROCEDURE DIVISION.

4.      Nama-record, pada COBOL, record harus diberi nama-record (Record-name) pada DATA RECORD clausedan pada record description entry dalam DATA DIVISION.

5.      Nama-data (data-name) adalah nama yang dibuat untuk menunjukkan suatu data item yang dipergunakan dalam program. Dibentuk pada FILE SECTION di record description entry dalam DATA DIVISION dan pada WORKING-STORAGE SECTION.

6.      Nama-indek dan nama-data-indek, digunakan untuk data pada tabel yang di-indek. Dibentuk secara implisit dengan OCCURS dan INDEXED BY clause. Nama-data-indek didefinisikan dengan mengunakan USAGE IS INDEX dalam DATA DIVISION.

7.      Nama-kondisi (condition-name) adalah nama data yang dihubungkan dengan suatu nilai tertentu. Didefinisikan dalam DATA DIVISION dengan level number 88 dan dioperasikan dalam PROCEDURE DIVISION pada statement IF.

8.      Nama-prosedur (procedure-name) atau nama-paragraph (paragraph-name) adalah nama yang menunjukkan suatu paragraph dalam PROCEDURE DIVISION. Nama-paragraph diperlukan bila proses akan melompat ke paragraph tertentu dengan menggunakan statement GO TO dan PERFORM dalam PROCEDURE DIVISION.

9.      Nama-seksi , pada PROCEDURE DIVISION, dapat dibuat menjadi beberapa seksi dan tiap seksi dapat dibentuk dengan dimulai judul seksinya yang disebut dengan Section-name.

10.  Nama-kualifikasi bila nama-data atau nama-kondisi tidak unik (ada yang sama satu dengan yang lain), untuk menentukan yang mana yang akan digunakan, dapat digunakan qualifier.

Syarat Pemberian nama :

v  Gabungan dari huruf A-Z atau a-z, angka 0-9, Hypen (-).

v  Panjang maksimum 30 karakter.

v  Paling sedikit harus mengandung 1 huruf.

v  Tidak boleh mengandung karakter khusus kecuali hypen yang diletakkan ditengahtengah, tidak boleh diawal atau diakhir.

v  Tidak boleh mengandung COBOL reserved word.

v  Tidak boleh ada blank atau spasi.

Bentuk data

Dibagi menjadi 2 :

1.      Data Variabel

2.      Konstanta

Data variabel

Data variabel adalah data yang nilainya dapat berubah didalam program. Nilai data ini akan selalu berubah bila dibaca nilai data yang lain dengan nama data yang sama.

Konstanta. Konstanta atau data konstanta adalah bentuk dari data yang dibutuhkan untuk pengolahan dimana nilai datanya tidak tergantung dari input yang dibaca. Ada 3 bentuk dari konstanta yang dapat dipakai dalam PROCEDURE DIVISION pada program COBOL, yaitu Numeric Literal, Non Numeric Literal, dan Figurative Constant.

Numeric Literal

Aturan penggunaan literal numerik :

v  Panjang maksimum 18 digit.

v  Boleh ada tanda plus atau minus yang letaknya pada posisi terkiri tanpa ada spasi dengan angka pertama.Bila tidak bertanda berarti bernilai positif.

v  Boleh ada titik desimal dimana saja kecuali pada posisi terkanan.

Non Numeric Literal

Adalah konstanta yang digunakan bukan untuk operasi arithmatika. Aturan penggunaan literal bukan numerik :

1. Panjang maksimum 120 karakter

2. Boleh terdiri dari kumpulan karakter (Character set) kecuali karakter petik.

3. Dibatasi tanda petik pada awal dan akhir.

Figurative Constant

Figurative constant termasuk dalam COBOL reserved word yang mempunyai maksud tertentu yang namanya sudah dikenal oleh compiler.

Contoh :
ZERO, ZEROS, ZEROES berarti nilai nol.
SPACE,SPACES berarti nilai 1 blank atau spasi.
QUOTE, QUOTES berarti tanda petik.