Konsep Dasar Program
COBOL Pendahuluan COBOL (Common Business Oriented Language) adalah suatu bahasa
komputer awam (High Level Language) yang berorientasi langsung pada
permasalahan bisnis. COBOL hampir dapat digunakan pada semua komputer bila
terdapat compiler COBOL-nya. Diciptakan pada tahun 1959 dan dikembangkan oleh
suatu grup bernama CODASYL (Conference on Data System Language).
Diperkenalkan pertama
kali secara formal pada bulan Januari 1960. COBOL mempunyai banyak versi,
sehingga untuk mempermudah penggunanya COBOL terus dikembangkan dan distandarisasi
pada tahun 1968 dan 1974, diberi nama ANSI COBOL (American National Standard
Institute COBOL)
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 :
§ Division
§ Region
§ Section
§ Paragraph
§ Sentence/Entry
§ Statement/Clause
§ 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 dengan 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 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.
Macam-macam
level number beserta fungsinya pada cobol yaitu :
§ Level Number 01
Digunakan untuk mengawali keterangan
dari record (record description)
§ Level Number 02 sampai 49
Digunakan untuk mengawali suatu
keterangan dari data item, boleh dipilih salah satu dari nomor level tersebut
§ Level 66
Digunakan untuk REN AMES
§ Level 77
Digunakan untuk mengawali sebuah data
item yang berdiri sendiri. Level number ini hanya boleh terdapat pada working
storage section
§ Level 88
Digunakan untuk mengawali suatu nama
pada kondisi.
Aturan
Penulisan Source Program
Kolom yang tersedia untuk menuliskan
program COBOL adal kolom 1- 80, dengan ketentuan:
§ Kolom 1–6
: Digunakan untuk nomor urut bilamana diperlukan, sifatnya optional, dan nomor
yang diberikan harus urut ascending.
§ Kolom 7 :
o
Tanda baris sambung dari baris sebelumnya
dengan memberikan tandahypen (-), baris sambungannya dimulai dari Area B.
o
Bila kolom ini di isi dengan karakter “*”
, maka apa yang ditulis pada baris ini akan dianggap sebagai komentar.
o
Bila kolom ini di isi dengan slash (/),
maka baris yang ada tanda ini dianggap sebagaikomentar dan akan dicetak mulai
halaman baru teratas, bila source program dicetakdi printer.
o
Bila kolom ini di isi dengan karakter “D”
, baris ini juga dianggap sebagai komentar, tetapi bila pada ENVIRONMENT
DIVISION dalam paragraph SOURCE-COMPUTERdisebutkan WITH DEBUGGING MODE, maka
akan berguna untuk tujuan debugging.
§ Kolom 8–11
: Disebut dengan area A, semua judul divisi,judul seksi, nama paragraph,
judulfile description (FD), level number 01 dan level number 77 ditulis mulai
kolom ke-8.
§ Kolom 12–72
: Disebut dengan area B, semua elemen program selain yang ditulis di area Aditulis
pada area B.
§ Kolom 73 –80
: Merupakan kolom yang tidak diproses oleh komputer, jadi jika diisi
dengancatatan-catatan apa saja hanya untuk dokumentasi program.
1. Pertama
tama kita mount COBOL ke dalam dosbox dengan menggunakan syntax Mount C C:\Cobol,
setelah selesai masuk ke dalam sistem C dengan menggunakan syntax C: .
2. Berikut
ini adalah Screenshot syntax program yang di buat di notepad dan di save dengan
extensi .COB untuk menampilkan data pengiriman barang pada cobol.
PENGERTIAN
SEQUENTIAL
Organisasi file
secara urut (sequential file) memungkinkan pengaksesan record di file secara
berurutan.Urutan data record yang direkamkan di file sama dengan urutan sewaktu
data itu direkamkan.
File Sequensial (urut) memungkinkan pengaksesan record file secara berurutan. Urutan data record yang direkam ke file sama dengan urutan sewaktu data tersebut direkamkan. Urutan data ini tidak berubah walaupun data baru ditambahkan.
File Sequensial (urut) memungkinkan pengaksesan record file secara berurutan. Urutan data record yang direkam ke file sama dengan urutan sewaktu data tersebut direkamkan. Urutan data ini tidak berubah walaupun data baru ditambahkan.
Statment File Sequential Dalam Cobol
1. Pernyataan
OPEN
OPEN INPUT digunakan untuk membuka file yang isinya
hendak dibaca.
OPEN OUTPUT digunakan untuk menciptakan file baru.
OPEN I-O
memungkinkan data record di dalam file diperbaharui.
OPEN EXTEND
digunakan untuk membuka file sequential dan isinya dapat
2. Pernyataan
CLOSE
Pernyataan ini digunakan untuk
menutup file atau mengakhiri pemrosesan pada file.
3. Pernyataan
READ
Pernyataan ini digunakan untuk membaca data record yang dilakukan secara
berurutan (sequential). READ hanya dapat digunakan pada file yang dibuka
dengan model OPEN INPUT atau OPEN I-O.
4. Pernyataan
REWRITE
Pernyataan
REWRITE digunakan untuk mengubah data record yang sudah ada pada file.
Pernyataan ini hanya dapat digunakan pada file disk yang dibuka dengan model
OPEN I-O.
5. Pernyataan
WRITE
Pernyataan ini digunakan untuk menuliskan data record
baru ke file. Statement
WRITE hanya dapat digunakan pada file yang dibuka
dengan model OPEN OUTPUT atau OPEN EXTEND.