COBOL (singkatan dari Common Business Oriented Language) adalah sebuah bahasa pemrograman generasi ketiga. Sesuai dengan namanya, maka bahasa COBOL mempunyai fungsi menyelesaikan masalah-masalah yang berhubungan dengan perdagangan, seperti sistem pengelolaan keuangan, laporan pengeluaran sebuah perusahaan dan lain-lain. Dikembangkan tahun 1959 dan banyak digunakan pada mainframe dan komputer mini.
Defenisi COBOL:
COBOL atau Common Bussiness Oriented Language adalah bahasa pemrograman komputer, yang dirancang untuk menyelesaikan persoalan bisnis.
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
MS.COBOL VERSI 2.2 mengikuti ANSI COBOL 1974.
MS COBOL VERSI 3.0 mengikuti ANSI COBOL 1985 di luncurkan tahun 1988.
Program COBOL merupakan program terstruktur.
Struktur Utama dari suatu program COBOL terdiri dari 4 DIVISI, yaitu :
IDENTIFICATION DIVISION
ENVIRONMENT DIVISION
DATA DIVISION
PROCEDURE DIVISION
Keuntungan Bahasa COBOL :
->Program dibuat dalam bahasa inggris sehingga lebih mudah dipelajari dan dibuat.
->Sangat sesuai untuk pengolahan data, banyak diterapkan untuk masalah bisnis.
->Struktur program COBOL jelas.
->Program bersifat standart fleksibel di komputer yang berbeda.
->COBOL menyediakan fasilitas listing program
Program ini mudah didokumentasikan dan dikembangkan.
Yang Dapat Dikerjakan BAHASA COBOL :
Langkah Dasar
Membaca data lalu memproses data dan menghasilkan output informasi.
Ada dua divisi yang UTAMA yaitu :
DATA DIVISION
Menggambarkan bentuk dan jenis dari data input serta data outputnya.
PROCEDURE DIVISION
Menggambarkan prosedur yang digunakan untuk menyelesaikan permasalahan dalam bentuk dan jenis data yang ada pada DATA DIVISION dan menghasilkan hasil output informasi sesuai yang ada dalam DATA DIVISION.
Aturan Penulisan Source Program
Kolom yang tersedia untuk menulis program Cobol adalah mulai dari kolom 1 sampai dengan kolom 80.
Kolom 1-6 :
Digunakan untuk nomor urut bila diperlukan, Nomor harus urut dari kecil ke besar.
Kolom 7 :
§ Untuk tanda hypen ( - ), baris sambungannya berada di area B.
§ Bila diisi dengan tanda *, maka baris tersebut dianggap sebagai komentar.
§ Bila diisi dengan tanda /, maka baris tersebut dianggap sebagai komentar dan akan dicetak mulai halaman baru teratas.
§ Bila diisi dengan karakter D, maka akan dianggap sebagai komentar. Tetapi bila pada Environment division dalam paragraph Source-Computer disebutkan With Debugging Mode, maka akan berguna untuk tujuan debugging.
Kolom 8-11 :
Disebut area A. Tempat menuliskan semua judul divisi, judul seksi, nama paragraph, judul file description (FD), level number 01 dan level number 77.
Kolom 12-72 :
Disebut area B. Semua elemen program selain yang ditulis diarea A ditulis di area B.
Kolom 73-80 :
Merupakan kolom yang tidak diproses oleh komputer, jadi bila diisi dengan catatan – catatan apa saja hanya untuk dokumentasi program.
OPERATOR ARITHMATIKA
Adalah simbol yang digunakan untuk membentuk suatu ungkaan arithmatika,yaitu :
Operator arithmatika
|
Maksud
|
jenjang
|
**
|
Pangkat
|
1
|
*
|
Kali
|
2
|
/
|
Bagi
|
2
|
+
|
Tambah
|
3
|
-
|
Kurang
|
3
|
Maksud
|
Operational Relational
| |
Lebih kecil dari
|
<
|
LESS THAN
|
Lebih besar dari
|
>
|
GREATER THAN
|
Sama dengan
|
=
|
EQUAL TO
|
Lebih kecil atau sama dengan
|
NOT>
|
NOT GREATER THAN
|
Lebih besar atau sama dengan
|
NOT<
|
NOT LESS THAN
|
Tidak sama dengan
|
NOT=
|
NOT EQUAL TO
|
Contoh Program Cobol :
IDENTIFICATION DIVISION.
PROGRAM-ID. PICTURE-EDITING.
ENVIRONMENT DIVISION.
DATA DIVISION.
WORKING-STORAGE SECTION.
01 DATA-SUMBER.
02 NAMA PIC A(10).
02 TANGGAL PIC X(6).
02 HARGA PIC 9(6).
02 BIAYA PIC 9(6).
01 DATA-EDIT.
02 NAMA-OUT PIC A(5)BA(5).
02 TANGGAL-OUT PIC XX/XX/XX.
02 HARGA-OUT PIC $Z(6).
02 BIAYA-OUT PIC ******.
SCREEN SECTION.
01 HAPUS-LAYAR.
02 BLANK SCREEN.
PROCEDURE DIVISION.
MULAI.
DISPLAY HAPUS-LAYAR.
DISPLAY (2, 1) ‘ NAMA ANDA : ‘. ACCEPT NAMA.
MOVE NAMA TO NAMA-OUT.
DISPLAY (3, 1) ‘ TANGGAL : ‘. ACCEPT TANGGAL.
MOVE TANGGAL TO TANGGAL-OUT.
DISPLAY (4, 1) ‘ H A R G A : ‘. ACCEPT HARGA.
MOVE HARGA TO HARGA-OUT.
DISPLAY (5, 1) ‘ B I A Y A : ‘. ACCEPT BIAYA.
MOVE BIAYA TO BIAYA-OUT.
DISPLAY HAPUS-LAYAR. DISPLAY NAMA-OUT.
DISPLAY TANGGAL-OUT. DISPLAY HARGA-OUT.
DISPLAY BIAYA-OUT.
SELESAI.
STOP RUN.

0 komentar:
Posting Komentar