Stuktur Program Cobol

Struktur Program COBOL

Struktur Program Cobol

Struktur utama program COBOL terdiri dari 4 divisi utama yaitu :

IDENTIFICATION DIVISION.ENVIRONMENT DIVISION. DATA DIVISION. PROCEDURE DIVISION.Berikut ini adalah penjelasan singkat untuk setiap divisi :

• IDENTIFICATION DIVISION : Dari nama divisi-nya kita dapat menyimpulkan kegunaan dari divisi ini yaitu sebagai identifikasi program COBOL yang kita buat misalnya nama pembuat (AUTHOR) dan nama program (PROGRAM-ID). Contoh : IDENTIFICATION DIVISION. PROGRAM-ID. CONTOH. AUTHOR. SAYA.

• ENVIRONMENT DIVISION : Divisi ini berguna untuk memberikan informasi peralatan yang digunakan dalam program, dibagi menjadi 2 section yaitu CONFIGURATION SECTION dan INPUT-OUTPUT SECTION. CONFIGURATION SECTION bersifat optional (boleh tidak ditulis) yang berisi tentang peralatan hardware yang digunakan program. INPUT-OUTPUT SECTION, section ini digunakan untuk operasi file (akan dijelaskan kemudian). Contoh : ENVIRONMENT DIVISION. CONFIGURATION SECTION. SOURCE-COMPUTER. IBM-PC. OBJECT-COMPUTER. IBM-PC.

• DATA DIVISION : Divisi ini berguna untuk mendeskripsikan variable-variabel dan jenis tipe data yang digunakan dalam program COBOL. Divisi ini memiliki 5 section yaitu:

1.      FILE SECTION.

2.      WORKING-STORAGE SECTION.

3.      SCREEN SECTION.

4.      LINKAGE SECTION.

5.      REPORT SECTION.

Diantara 5 section yang disebutkan diatas yang paling sering digunakan adalah WORKING-STORAGE SECTION, SCREEN SECTION dan FILE SECTION.

WORKING-STORAGE SECTION digunakan untuk mendeklarasikan variable dan tipe data yang digunakan dalam program COBOL. SCREEN SECTION digunakan untuk menentukan format layar tampilan baik input atau output. Dan FILE SECTION berguna untuk operasi file (akan dijelaskan kemudian). Contoh :

DATA DIVISION.

WORKING-STORAGE SECTION.

01 MASUKAN.

02 NAMA PIC X(20).

02 NPM PIC X(8). SCREEN SECTION.

01 HAPUS-LAYAR.

02 BLANK SCREEN.

·         PROCEDURE DIVISION : Divisi ini merupakan inti dari bahasa pemrograman COBOL karena pada divisi inilah semua statement instruksi dibuat. Misalnya DISPLAY, ACCEPT dan STOP RUN. DISPLAY di gunakan untuk output, ACCEPT untuk menerima input dan STOP RUN untuk menghentikan proses program.

contoh Program sederhana :

1 IDENTIFICATION DIVISION.

2 PROGRAM-ID. CONTOH.

3 AUTHOR. SAYA.

4 ENVIRONMENT DIVISION.

5 CONFIGURATION SECTION.

6 SOURCE-COMPUTER. IBM-PC.

7 OBJECT-COMPUTER. IBM-PC.

8 DATA DIVISION.

9 WORKING-STORAGE SECTION.

10 01 MASUKAN.

11 02 NAMA PIC X(20).

12 02 NPM PIC X(8).

13 SCREEN SECTION.

14 01 HAPUS-LAYAR.

15 02 BLANK SCREEN.

16 PROCEDURE DIVISION.

17 MASUKKAN-DATA.

18 DISPLAY HAPUS-LAYAR.

19 DISPLAY 'NAMA : '.

20 ACCEPT NAMA.

21 DISPLAY 'NPM : '.

22 ACCEPT NPM.

23 SELESAI.

24 STOP RUN.

PENGERTIAN FILE,RECORD,FIELD,AND CHARACTER

v  File

File merupakan kumpulan dari record-record yang menggambarkan satu kesatuan data yang sejenis. Misalnya file mata pelajaran berisi data tentang semua mata pelajaran yang ada, Kusumo Ario Suryo

v  Record

Record merupakan kumpulan dari field membentuk suatu record. Record menggambarkan suatu unit data individu yang tertentu. Kumpulan dari record membentuk suatu file. Misalnya file personalia, tiap-tiap record dapat mewakili data tiap-tiap karyawan, Kusumo Ario Suryo

v  Field

Field merupakan presentasi suatu atribut dari record yang menunjukkan suatu item data/field, seperti misalnya nama, alamat, dan lain sebagainya. Kumpulan dari field membentuk suatu record, Kusumo Ario Suryo [10].

a)      Field Name : harus diberi nama untuk membedakan field yang satu dengan yang lain.

b.)    Field Representation : tipe field (karakter, teks, tanggal, angka, dan sebagainya), lebar field (ruang maksimum yang dapat diisi dengan karakter-karakter data).

c.)    Field Value : isi dari field untuk masing-masing record.

v  Characters

Characters merupakan bagian terkecil, dapat berupa karakter numeric, huruf ataupun karakter-karakter khusus (special characters) yang membentuk suatu item data/field, Kusumo Ario Suryo.

SYARAT-SYARAT/ATURAN PEMBERIAN NAMA COBOL

1. Gabungan dari huruf A-Z atau a-z, angka 0-9, Hypen (-).
2. Panjang maksimum 30 karakter.
3. Paling sedikit harus mengandung 1 huruf.
4. tidak boleh mengandung karakter khusus kecuali hypen yang diletakkan ditengah-tengah, tidak boleh diawal atau diakhir.
5. Tidak boleh mengandung COBOL reserved word.
6. Tidak boleh ada blank atau spasi.

FIELD atau DATA ITEM
Adalah bagian terkecil dari record, yang merupakan kumpulan dari karakter – karakter yang membentuk sebuah informasi.
Data item dapat terdiri dari :
a. Numerik ( numeric ) terdiri dari 0 s/d 9, + , -
b. Alphabetik ( Alphabetic ) terdiri dari A s/d Z , spasi
c. Alphanumerik ( Alphanumeric ) terdiri dari numeric dan alphanumeric

LANGKAH- LANGKAH PEMBUATAN PROGRAM COBOL :

1. Memahami masalah yang akan di programkan
2. Menggunakan FlowChart
3. Menulis program di coding form
4. Membuat source program, extension .COB
5. Mencompile program :
Source Program à Object Program
6. Membuat Excecutable program, extension EXE.
7. EXE program dapat dijalankan.

Struktur Utama dari suatu program COBOL terdiri dari 4 DIVISI , yaitu :
* IDENTIFICATION DIVISION
* ENVIRONMENT DIVISION
* DATA DIVISION
* PROCEDURE DIVISION
Dari ke-4 divisi tersebut terdapat susunan hirarki :
* Division.
* Region.
* Section.
* Paragraph.
* Sentence/Entry.
* Statement/Clause.
* Phrase/Option.
Istilah region , sentence , statement dan phrase / option dig pada PROCEDURE DIVISION, sedangkan entry dan clause digunakan pada ke 3 divisi lainnya.
* Division Adalah bagian utama dari suatu program COBOL dan harus diawali dengan suatu judul divisi.
* Region Adalah kumpulan bagian tertentu di dalam Procedure.
* Section Adalah satu kumpulan dari paragraph atau entry.
* Paragraph adalah suatu group dari kalimat (sentences) didalam Procedure Division dan harus diawali dengan nama-paragraph atau judul paragraph.
* Entry adalah suatu yang harus dituliskan pada tempat-tempat tertentu di dalam suatu program COBOL.
* Sentence adalah suatu kumpulan dari satu atau lebih statement (pernyataan).
* Clause Adalah kumpulan dari kata (word) yang membentuk suatu arti. Clause adalah bagian dari entry.
* Statement adalah perintah pengerjaan untuk komputer.
* Phrase adalah suatu group kata yang merupakan bagian dari statement atau clause.
* Option atau Optional Adalah sesuatu yang boleh disertakan, boleh juga tidak.

COBOL RESERVED WORD DAN USER DEFINED WORD

Cobol Reserved Word
Adalah kata yang telah didefinisikan yang mempunyai arti dan kegunaan tertentu dalam bahasa COBOL. Kata tersebut tidak boleh dipergunakan oleh programmer untuk nama-data dll kecuali dalam bentuk yang telah ditentukan oleh bahasa COBOL itu sendiri.
Contoh : ACCEPT, ADD, AND, BY, AFTER, dsb.

User Defined Word
Kata-kata yang dapat dibuat dan telah didefinisikan oleh programmer untuk : Nama-program, Nama-alat, Nama-file, Nama-record, Nama-data, Nama-indek dan nama-data-indek, Nama-kondisi, Nama-prosedure, Nama-seksi, Nama-kualifikasi.

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 clause dan 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 qualifie



ATURAN PENULISAN SOURCE PROGRAM KOLOM 1-80 :
Kolom yang tersedia untuk menulis program Cobol (1-80) :
Kolom 1-6 : Untuk nomor urut bila diperlukan (optional) dan nomor yang diberikan harus urut ascending.
Kolom 7 :
§ Untuk tanda hypen (-), baris sambungannya dimulai di area B.
§ Bila diisi dengan tanda *, maka baris tersebut dianggap sebagai komentar.
§ Bila diisi dengan slash (/), maka baris tersebut dianggap sebagai komentar dan akan dicetak mulai halaman baru teratas. Bila source program dicetak di printer
§ 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 ditulis mulai kolom ke – 8.
Kolom 12-72 : Disebut area B.Tempat penulisan semua elemen program selain yang ditulis diarea A ditulis pada area B.
Kolom 73-80 : Untuk komentar atau dokumentasi program.