Jumat, 30 Maret 2012

Program Sequential Cobol

Program yang telah saya buat merupakan sebuah program sequential, dimana program tersebut digunakan untuk mengisi data barang ,disimpan kedalam data.dat . Dengan menggunakan password untuk masuk kebagian isi data. Untuk masuk ke isi data kita diharuskan mengisi password yang terdiri dari 6 digit , setelah terisi dan benar maka kita akan masuk ke tahap pengisian data, yang terdiri dari no barang, nama barang, harga barang , jumlah barang, dan tanggal transaksi. No barang diminta full dan required, artinya kalau full digunakan untuk suatu field data item yang diisi dengan suatu data sampai penuh untuk tempat yang disediakan. Bila tidak diisi atau tidak penuh maka tidak bisa berpindah ke field lain, sedangkan required Digunakan kalau suatu field data item harus diisi oleh suatu nilai, tidak boleh dilewati. Password juga menggunakan secure clause , secure clause digunakan untuk membuat supaya suatu nilai data yang dimasukkan pada field data item tertentu tidak tampak di layar sewaktu diketik. Akan ditampilkan karakter ‘*’. Lalu pada harga barang menggunakan blink clause berfungsi untuk membuat kedap kedip tampilan. Tanggal pun menggunakan format xx/xx/xxxx yaitu hari, hulan, dan tahun. Setelah kita mengisi semua nya, maka kita akan mendapat pilihan : data sudah benar (y/t) ?, jika kita tekan t (tidak) maka kita akan kembali untuk mengisi password ulang dan mengisi data lagi, jika sudah selesai tekan y , maka kita akan ke pertanyaan selanjutnya : isi data lagi (y/t) ?, jika kita tekan ya maka kita akan kembali mengisi password dan mengisi data lagi , dan jika tidak (t), maka program akan keluar otomatis. Berikut tampilan program dan output menggunakan software IDEcobol :







TAMPILAN OUTPUT :






Tidak ada komentar:

Posting Komentar