Setelah sebelumnya sudah
membahasa tentang DATA DIVISION selanjutnya saya akan membahas sedikit tentang
PROCEDURE DIVISION pada Pemrograman COBOL , PROCEDURE merupakan division yang
memperinci setiap langkah instruksi, mulai dari instruksi untuk menyiapkan
peralatan atau device yang akan digunakakn baik untuk input maupun untuk
output,intruksi untuk menyiapkan input data yang akan diolah instruksi untuk
melakukan hal-hal seperti pengolahan aritmatikan dan logika manipulasi data
ataupun memasukan data ke output device.section atau paragraph merupakan user
defined section mempunyai nama yang sering disebut dengan
procedure-names,tetapi khusus untuk pemakaian dalam division ini diberikan
sedikit kelonggaran dengan memperbolehkan penggunna numeric charakter untuk
nama tersebut jadi tidak harus dimulai dengan alphabetic charakter.
Unutk secion setelah nama
tersebut (Procedure-name) di ikuti dengan minimal satu space/blank kata SECTION
dan titik. Tidak boleh disambung dengan kata-kata lainnya , kecuali untuk
DECLARATIVES dan untuk segmentation,sedangkan untuk suatu paragraph setelah
nama diikuti dengan sebuah titik dan minumal sebuah blank ,perlu diingat bahwa
untuk sautu unit program tidak diperbolehkan untuk menggunakan procedure yang
sama .
Suatu section
dapat terdiri atas satu paragraph atau lebih yang pembagiannya menurut kehendak
programer section ini bisa dibatasi dengan section lainnya atau suatu EXIT
statement, sedangkan suatu paragraph merupakan suatu kesatuan
logika yang terdiri atas satu atau beberapa sentence, sedangkan yang dimaksud
dengan sentence adalah suatu kesatuan yang terdiri atas satu atau lebih
statement yang di akhiri dengan sebuah titik dan minimal satu sapace/blank,kata
THEN bisa digunakan sebagai pemisah antara statemen-statement yang berbentuk
sentence tersebut,
Expression bisa dikatakan sebagai kombinasi
dari data-names,Literals, COBOL word atau operator aritmatic Logical yang
mengandung arti tertentu ,suatu statement terdiri atas suatu COBOL verb diikuti
oleh operands(Data-names,Literals) dan COBOL word lainnya yang digunakan untuk
melengkapi statemen tersebut .
Jenis-jenis statement meliputi :
*Imperative Statemen :
-Input/output
:
OPEN; CLOSE; READ; WRITE; REWRITE;
ACCEPT; DISPLAY; START; SEEK;
-Arithmetic :
ADD; SUBTRACT; MULTIPLY; DIVIDE; COMPUTE;
-Procedure
Branching :
GO TO; ALTER; PERFORM; STOP; EXIT;
-Table
Handling:
SEARCH; SET;
-Sort :
SORT; RELASE; RETURN;
-Report
Writer :
GENERATE; INITIATE; TERMINATE;
-Subprogram
Linkage :
CALL; ENTRY ;GOBACK; EXIT PROGRAM ;
CANCEL ;
-Message
Control :
READY TRACE; RESET TRACE; EXHIBIT;
READY TRACE; RESET TRACE; EXHIBIT;
*Compiler Directing Statement :
COPY; ENTER; NOTE; DEBUG;
*Conditional Statement :
IF;ON; ADD ; SUBTRACT; MULTIPLY;
DIVIDE; COMPUTE; GOTO; READ; SEARCH; RETURN; WRITE; START; PERFORM; RECEIVE;
STRING; UNSTRING;
Demikianlah macam-macam statemen yang bisa
dipaka untuk menyusun suatu program dalam bahasa COBOL,tidak semua bisa
menggunakan statement tersebut karena menyangkut kemampuan dari masing-masing
compiler dan hardwarenya .
ARITMETIC STATEMENT
Statement ini digunakan untuk melakukan
perhitungan untuk mempermudah perhitungan telah disediakan beberapa option
yaitu : Corresponding, Giving , Rounded dan Size eror
CORRESPONDING
OPTION
Dipakai untuk melaksankan proses
perhitungan atas beberapa data-name yang dilakukan sekaligus dengan persyaratan
bahwa data-names tersebut harus merupakan bagian dari suatu group item tertentu
dan harus merupakan elementaru item dengan nama yang sama statement yang di
gunakan adalah ADD dan SUBTRACT .
GIVING
OPTION
Merupakan tempat menampung hasil
perhitungan yang telah dilaksanakan, bila data nama tersebut tidak dipakai lagi
untuk perhitungan selanjutnya maka boleh suatu numeric edited item
ROUNDED
OPTION
Dipakai untuk membulatkan hasil yang sudah
dilaksanaakan sebagai contoh bila perhitungan 123,4 maka hasil akan di bulatkan
yaitu 123 jika 123.5 maka di bultakan ke atas menjadi 124
SIZE
EROR OPTION
Jika area penampungan tidak mencukupi hasil
perhtingan tersebut maka imperative statement sesudah option ini akan
dilaksanakan .
Tidak ada komentar:
Posting Komentar