LAPORAN AKHIR COBOL 2

COBOL 

Pada pertemuan kali ini saya akan membuat  program dengan menggunakan COBOL yaitu: Membuat Program Hasil Akhir Nilai. Aplikasi yang di gunakan adalah Notepad++ dan DOSBox.

PERTAMA-TAMA BUKA Notepad++ terlebih dahulu untuk membuat codingan programnya yang nantinya akan di jalankan/di tampilkan pada DOSBox.

Buat codingan seperti di bawah ini :

- IDENTIVICATION DIVISION & PROGRAAM-ID : suatu nama yang diberikan untuk menunjukkan identitas dari program yang dibuat

- ENVIRONMENT DIVISION : nama yang dibuat oleh programmer untuk menunjukkan suatu alat tertentu

- DATA DIVISION : nama yang dibuat untuk menunjukkan suatu file tertentu yang dipergunakan dalam program.

- WORKING STORAGE SECTION : nama yang dibuat untuk menunjukkan suatu data item yang dipergunakan dalam program.

- 77 digunakan untuk menandai bahwa variabel tersebut INDEPENDENT.

- PIC di gunakan untuk mendeklarasikan suatu variabel  antara lain : A sebagai Alfabet, X sebagai AlfaNumerik , 9 sebagai Numerik.

Di dalam tanda kurung terdapat angka yang di gunakan untum memberikan batasan pada jumlah character yang nantinya akan di isi.

- SCREEN SECTION adalah isi dari outputan yang akan di tampilkan nantinya.

Yang pertama itu CLS untuk membersihkan Layar dengan BLANK SCREEN yang di awali dengan 01 yang berarti memulai suatu record program.

Yang ke 2 INPUTAN. Yaitu apa saja yang ingin di masukan atau di tampilkan pada Output program nantinya.

02 di gunakan untuk memberikan nama identitas dari statementnya.

LINE 4 COLUMN 8 VALUE ‘NAMA: ‘. Dan COLUMN PLUS 1 PIC A(20) TO NAMA. Merupakan suatu perintah yang hasilnya akan berupa NAMA : (diisikan sesuai apa yang di input pada statement NAMA) yang terletak pada baris ke 4 kolom ke 8. Begitu seterusnya hingga statementnya berakhir.

- PROCEDURE DIVISION : nama yang menunjukkan suatu paragraph

DISPLAY : Untuk tampilan yang akan di tampil kan pada output program

ACCEPT : Menampilkan Isi dari output yang di masukan

COMPUTE : Merupakan perintah untuk menghitung. Disini di gunakan untuk menghitung suatu Nilai Hasil UTS dan UAS.

Statement IF disini di gunakan untuk menentukan suatu kondisi yaitu jika hasil nilai lebih besar dari 6 maka akan di tampilkan pada baris ke 10 kolom ke 8 ‘ANDA LULUS.’ namun jika hasil kurang dari 6 output yang di tampilkan adalah ‘ANDA GAGAL.’

Setelah sudah selesai menuliskan kodingannya di Notepad++ sekarang RUN programnya menggunakan DOSBox.

Pertama – tama compile terlebih dahulu data yang telah dibuat dengan mengetikan ‘cobol (nama file.cob)’ lalu enter

Jika sudah tidak ada yang error ketikan ‘runcob (namafile.cob)’ lalu program akan run seperti berikut :

Jika sudah seperti ini isikan sesuai keinginan anda lalu enter.

Berikut output terakhir program nya