Pertama kita buat program
Biodata, buka cmd di start menu kemudian pada kotak isian search ketik cmd lalu
ok maka akan muncul command promt seperti gambar dibawah :
Masuk ke program
cobol dengan cara masuk ke folder cobol melalui command promt lalu bila sudah
masuk ke folder cobol ketik edit lat1.cob untuk mencreate cobol lat1
Jika sudah muncul
seperti kotak di atas maka ketikan kode program seperti di bawah ini, dengan
menspasi 8 x terlebih dahulu.
Keterangan
:
IDENTIFICATION
DIVISION. Berfungsi untuk memberikan informasi mengenai program
yang dibuat.
PROGRAM-ID.
INPUT. Berfungsi untuk memberi nama sebuah program yang akan
dibuat.
AUTHOR.
NASHCHAN. Berfungsi untuk memberi nama pembuat program/programmer.
YANG WAJIB DI TULIS DI
IDENTIFICATION DIVISION ADALAH IDENTIFICATION DIVISION dan PROGRAM-ID.
ENVIRONMENT
DIVISION. Berfungsi untuk memberikan informasi peralatan yang di
gunakan dalam program.
DATA DIVISION. Berfungsi
untuk memberikan penjelasan tentang input data dan output yang di pergunakan.
Isi dari divisi ini adalah semua keterangan tentang file, record, nama-data,
serta bentuk format yang akan digunakan di Procedure Division.
WORKING – STORAGE SECTION. Berfungsi
untuk Sifatnya optional, ada bilamana
diperlukan pemesanan tempat di internal memori yang diperlukan oleh pekerjaan
proses program.
01 MHS. Befungsi
untuk mengawali keterangan dari record yang akan di buat dan keterangannya MHS.
02 NAMA PIC A(20). Berfungsi
untuk mengawali keterangan dari data item.
02 NPM PIC X(8). Berfungsi
untuk mengawali keterangan dari data item.
02 KELAS PIC X(5). Berfungsi
untuk mengawali keterangan dari data item.
Keterangan
: A(20) Punya arti tipe data yang akan di input nanti berupa huruf dan
memiliki panjang 20 karakter.
X(8)/X(5) Punya arti tipe data yang
digunakana yang akan di input nanti berupa angka dan memiliki panjang 8/5
karakter.
SCREEN SECTION. Berfungsi
untuk menunjukkan bentuk format dari layar terminal untuk menampilkan data atau
memasukkan data.
01 HAPUS. Befungsi
untuk mengawali keterangan dari record yang akan di buat dan keterangannya
HAPUS.
BLANK SCRREN. Berfungsi
untuk membersihkan layar dan menempatkan kursor pada baris1, kolom1 pada posisi
kiri atas.
PROCEDURE
DIVISION. Berfungsi untuk tempat menaruh instruksi-instruksi dimana
dilakukan prosedur pekerjaan proses dari input data menjadi output data.
MULAI.
Berfungsi
untuk perintah memulai instruksi – instruksi oleh programmer.
DISPLAY
HAPUS. Berfungsi untuk menampilkan hasil di layar.
DISPLAY(9
, 9)”NAMA :”. Berfungsi untuk menampilkan NAMA : di baris 9
kolom 9 di layar.
ACCEPT(
, )NAMA. Berfungsi untuk memasukan data NAMA : ke layar saat
program di jalan kan,
DISPLAY(10
, 9)”NPM :”. Berfungsi untuk menampilkan NPM : di baris 10
kolom 9 di layar.
ACCEPT(
, )NPM. Berfungsi untuk memasukan data NPM : ke layar saat
program di jalan kan,
DISPLAY(11
, 9)”KELAS :”. Berfungsi untuk menampilkan KELAS : di baris
11 kolom 9 di layar.
ACCPET(
, )KELAS. Berfungsi untuk memasukan data KELAS : ke layar saat
program di jalan kan,
DISPLAY(12
, 9)”NAMA SAYA :”NAMA. Berfungsi untuk menampilkan NAMA SAYA :
pada baris 12 kolom 9 di layar dan kemudian memamnggil ACCEPT( , ) NAMA di
samping NAMA SAYA :.
DISPLAY(13
, 9)”NPM SAYA :”NPM. Berfungsi untuk menampilkan NPM SAYA : pada
baris 13 kolom 9 di layar dan kemudian memamnggil ACCEPT( , ) NPM di samping
NPM SAYA :.
DISPLAY(14
, 9)”KELAS SAYA :”KELAS. Berfungsi untuk menampilkan KELAS SAYA :
pada baris 14 kolom 9 di layar dan kemudian memamnggil ACCEPT( , ) KELAS di
samping KELAS SAYA :.
STOP
RUN. Berfungsi untuk menghentikan program secara permanen.
Jika
sudah mengetik kode program seperti diatas, jalankan kode program tersebut
dengan langkah dibawah ini
-
Save file terlebih dahulu dengan cara klik
file lalu save jika sudah ikuti langkah berikutnya
-
Klik file lalu exit pada table diatas maka
muncul tabell seperti dibawah :
Lalu kita compiler
dahulu file yang tadi kita buat dengan cara ketik cobol lat1.cob dan tekan enter sebanyak 3x. seperti gambar di
bawah :
Kemudian ketik runcobol lat1.cob untuk menjalankan
program seperti gambar di bawah jika masih errors periksa kembali kode program
yang di buat tadi dengan ccara edit
lat1.cob kemudian Ketik kembali runcobol
lat1.cob jika jalan akan muncul seperti table dibawah ini :
Dan Programpun telah
selesai.
Tidak ada komentar:
Posting Komentar