Kamis, 29 November 2012

LOOPING pada cobol











LOGIKA GAMBAR .
Ø Pada baris pertama kita menggunakan statment IDENTIFICATION DIVISION Berfungsi :pada divisi ini digunakan untuk memberi nama program,mengetahui informasi tentang program tersebut yaitu berupa :nama pembuat,instalasi dan tanggal pembuatan.
Ø Pada baris kedua kita menggunakan statment PROGRAM  ID TUNJANGAN yang dimana program yang kita buat ini bertipe suatu kondisi yang dilakukan program sampai perintah dalam program terpenuhi.
Ø Pada baris ketiga kita menggunakan statment AUTHOR yang berfungsi :menentukan siapa nama pembuat program tersebut yang bertipe program perulangan.
Ø  Pada baris keempat kita menggunakan statment ENVIRONMENT DIVISION yang berfungsi :memberikan informasi peralatan yang digunakan dalam program dan salah satunya input an output section
Ø Pada baris kelima kita menggunakan statment DATA DIVISION yag berfungsi untuk mendeskripsikan variabel-variabel dan jenis tipe data pada cobol,pada program ini kita menggunakan tipe data PERULANGAN.
Ø Pada baris keenam kita menggunakan statment WORKING-STORAGE SECTION yang berfungsi untuk mendeklarasikan variabel dan tipe data yang digunakan pada cobol.
Ø  Pada baris ketujuh kita menggunakan statment 77 JABATAN PIC 9 yang artinya meminta input yang mana karakter numerik yang disediakan hanya 1 angka saja biasanya ini digunakan  untuk pemprograman perulangan atau looping.
Ø Pada baris kedelapan kita menggunakan statment PROCEDURE DIVISION yang berfungsi sebagai perintah memulai instruksi-instruksi yang ditulis pada program cobol.
Ø  Pada baris kesembilan TANYA-JAWABAN artinya judul program ini bernama TANYA –JAWABAN.
Ø  Pada baris kesepuluh DISPLAY’JABATAN ANDA [1,2 ATAU 3]’ artinya digunakan untuk menampilkan JABATAN ANDA [1,2 ATAU 3] pada layar output.
Ø  Pada baris kesebelas gunakan statment accept jabatan yang artinya digunakan untuk memasukan data lewat layar yang dimana piihannya [1,2 atau 3] untuk JABATAN ANDA.
Ø  Pada baris keduabelas gunakan statment DISPAY SPACE yang berfungsi untuk pindah kolom ke bawahnya.`
Ø  Pada baris ketigabelas gunakan statment GO TO tunj1.tunj2.tunj3 yang berfungsi menuju suatu paragraf yang di tuju yang melewati perintah-perintah program yang ada di bawahnya.
Ø  Pada baris keempatbelas apabila kita tidak memilih tunj1,tunj2,tunj3 maka ia akan mencetak di output tidak ada jabatan dan kondisi kembali ke GO TO tunj1,tunj 2,tunj 3.
Ø  Pada baris keenambelas-tujuh belas apabila kita memilih tunj1 di layar outpunya menghasilkan tunjangan anda sebesar 10000.
Ø  Pada baris kedelapanbelas-kesembilan belas apabila kita memilih tunj2 di layar outpunya menghasilkan tunjangan anda sebesar 20000.
Ø  Pada baris kedelapanbelas-kesembilan belas apabila kita memilih tunj3 di layar outpunya menghasilkan tunjangan anda sebesar 40000.