Program Nilai Lulus dan Tidak dengan Cobol

Pada kesempatan kali ini saya akan menjelaskan lebih detail mengenai bagaimana cara membuat suatu program menentukan nilai lulus dan tidak pada bahasa pemrograman cobol. Untuk membuat program menentukan nilai lulus dan tidak  dengan menggunakan cobol langkah pertama yang harus anda lakukan adalah install aplikasi cobol pada pc anda jika sudah, selanjutnya jalankan cmd lalu di cmd ketik cd\ setelah itu tekan enter lalu ketik cd cobol lalu enter untuk membuka cobol ketik edit namaprogram.cob lalu enter maka program cobol akan terbuka. Tuliskan contoh codingan seperti contoh gambar berikut ini untuk membuat program sederhana dengan cobol.

Setelah anda selesai menuliskan codingan seperti contoh gambar diatas langkah selanjutnya yang harus anda lakukan adalah save program terlebih dahulu dengan cara pilih file lalu save. Lalu file exit setelah itu pada cmd ketikan cobol namaprogram.cob lalu tekan enter 3x ini bertujuan untuk mengecek apakah masih ada error didalam program jika sudah tidak ada error ketikan  runcobol namaprogram.cob  lalu enter untuk memulai program seperti gambar dibawah ini.

Penjelasan Program :

·         IDENTIFICATION DIVISION yaitu berisi informasi tentang identitas program yang bersangkutan (nama program, nama pembuat, tanggal program dibuat, dll) dan tidak mempunyai pengaruh terhadap proses program, hanya sebagai identifikasi.

·         ENVIRONMENT DIVISION yaitu berisi informasi tentang keadaan komputer dan alat – alat yang digunakan.

·         DATA DIVISION yaitu berisi informasi mengenai komputer yang digunakan dan menerangkan peralatan yang digunakan untuk memproses file, baik peralatan input maupun peralatan output.

·         PROCEDURE DIVISION yaitu inti dari pemrograman COBOL karena semua prosedur pekerjaan proses dari input data menjadi output.

·         77 NAMA PIC A(30) maksudnya adalah menunjukkan posisi alphabhet  yang disimpan pada field, Bersifat rata kiri. Dalam contoh diatas panjang karakternya adalah 30. maka penulisan nama tidak boleh lebih dari 30 karakter.

·         77 NPM PIC 9(8) batas penulisan NPM sebanyak 8 karakter. Lebih dari itu tidak akan tercetak.

·         77 KELAS PIC X(5) batas penulisan kelas hanya 5 karakter. Lebih dari itu tidak tercetak.

·         77 UTS PIC 9(3) batas penulisan uts hanya 3 numeric. Sedangkan angka 9 itu untuk menunjukan numeric

·         77 UAS PIC 9(3) batas penulisan uas hanya 3 numeric. Sedangkan angka 9 itu untuk menunjukan numeric.

·         SCREEN SECTION  digunakan untuk menunjukkan bentuk format layar terminaluntuk menampilkan atau memasukkan data.

·         01 INPUTAN. Digunakan untuk menandai memulai memasukkan input

·         02 LINE 4 COLUMN 8 VALUE “masukkan nama :”. Digunakan untuk menulis output masukkan nama di baris 4  dimulai dari kolom 8

·         02 LINE 5 COLUMN 8 VALUE “masukkan npm :”. Digunakan untuk menulis output masukkan npm di baris 5 dimulai dari kolom 8

·         02 LINE 6 COLUMN 8 VALUE “masukkan kelas :”. Digunakan untuk menulis output masukkan kelas di baris 6 dimulai dari kolom 8

·         02 LINE 8 COLUMN 8 VALUE “nilai uts :”. Digunakan untuk menulis output nilai uts di baris 8 dimulai dari kolom 8

·         02 LINE 9 COLUMN 8 VALUE “nilai uas :”. Digunakan untuk menulis output nilai uas dibaris 9 dimulai dari kolom 8

·         02 BLANK SCREEN digunakan untuk membersihkan layar dan menempatkan kursor pada posisi kiri atas (baris1, kolom1).

·         COMPUTE HASIL = (UTS * 0.7) + (UAS * 0.3). digunakan untuk memasukan rumus untuk menghitung hasil dari uts dengan uas