LAPORAN AKHIR PICTURE CLAUSE PADA COBOL

LOGIKA :

cobol itu tersendiri adalah bahasa pemrograman tingkat tinggi. Cobol tersendiri dibagi struktur bahasa pertiap divisinya yaitu :

Identification division, environment division, data division dan procedure division. Kalau tidak ada semua struktur divisi ini bias dibilang program cobol ini tidak dapat berjalan, jadi tidak sembarangan orang membuat codingan yang harus teliti pertiap baris dan kolom, cobol tersendiri memiliki beberapa syarat variable yaitu max 30 karakter, minimum ada satu alphabet, tidak boleh ada special karakter, tidak ada blank spack, dan cobol reserver word, harus alphanumeric, dan no hypen.

Penulisan dalam cobol tersendiri dibagi berbeda beda, seperti kolom 1-6 yaitu nomor urut (optional) (999,999), kolom 7 yaitu hypen, /, D, *, kolom 8 – 11 yaitu area A berdivisi dan level number, kolom 12-72 yaitu area B kodingan , kolom 73 – 80 yaitu dokumentansi.

Jadi dalam cobol itu adalah program terstruktur dimana itu dibagi persetiap bagian. Struktur Sub dibagi seperti dari atas yaitu, division, region, section, paragraph, sentence, statement, phrase.

Cobol tersendiri dijalankan melalui run, dan cmd, dimana program cobol ini sungguh rumit.

Pengakhiran dalam kodingan cobol selalu diakhiri dengan tanda “ . “

Cobol juga berpengaruh pada kolom dan baris, jika salah penempatan akan berpengaruh.

Pengejeaan sangatlah penting dimana huruf capital dan kecil berpengaruh pada codingan, dan jangan lupa untuk tidak TYPO.

Program Cobol Kondisi

IDENTIFICATION DIVISION atau nama lain adalah identitas program cobol ini. Ini bagian struktur pertama dalam cobol, seperti memulai programnya diawali dengan identification/ identifikasi atau Informasi mengenai identitas program (nama program, sipembuat, tanggaldibuat, tanggal dikompilasi, danlainnya.). Program-ID. Program id menjelaskan bahwa merupakan reserve word dan nama program yang diberi nama programnya KA28(program-name) adalah suatu nama yang diberikan untuk menunjukkan identitas dari program yang dibuat, dituliskan pada paragraph PROGRAM-ID dalam struktur IDENTIFICATION DIVISION.

AUTHOR atau disebut sebagai yang punya atau owner, dan ANDRE sebagai saya sendiri adalah nama owner, didalam struktur IDENTIFICATION DIVISION.

ENVIROMENT DIVISION. Divisi ini menyediakan informasi mengenai peralatan yang digunakan atau disebut INPUT / OUTPUTnya program ini.

DATA DIVISION. Informasi mengenai bentuk, jenis dari data apa saja yang dipergunakan dalam program bersangkutan.

WORKING-STORAGE SECTION

Mempunyai maksud pemesanan tempat di internal memori (STORAGE) yang diperlukan

oleh pekerjaan (WORKING) proses program

77 NAMA PIC A(20). Berarti 77 melambangkan nomor identitas untuk sebuah penginputan data tunggal / sub tunggal, lalu yang dimasukkan adalah NAMA sebagai penginputan dalam memorinya dalam Picture clause, atau PIC Picture clause digunakan untuk menerangkan masing-masing data-item yang digunakan, mengenai ukuran dari field dan memberikan informasi dari nilai data tersebut, juga mengatur

bentuk data dimemori. Seperti disitu ada A(20) yang berarti menyimpan nilai data huruf/ alphabetic. Dengan 20 karaker.

77 NPM PIC 9(8). ). Berarti 77 melambangkan nomor identitas untuk sebuah penginputan data tunggal / sub tunggal, lalu yang dimasukkan adalah NPM sebagai penginputan dalam memorinya dalam Picture clause, dengan 9(8) Menunjukkan bahwa posisi sebuah memori hanya dapat mengandung nilai-nilai dengan 8 karakter.

   

   77 KELAS PIC X(5). Berarti 77 melambangkan nomor identitas untuk sebuah penginputan data tunggal / sub tunggal, lalu yang dimasukkan adalah KELAS sebagai penginputan dalam memorinya dalam Picture clause, dengan X(5) Digunakan untuk menyimpan nilai data alphanumerik, dapat berupa gabungan angka, huruf, ataupun karakter khusus dengan 8 karakter

       01 PIL PIC A. sub 01 dimana pilihan untuk kondisi pada picture clause diawali dengan alphabetic.

           88 YA VALUE 'Y' , 'y'. 88, digunakan untuk mengawali suatu nama kondisi dengan penginputan kondisi YA, dimana  Value sebagai sifat menunjukan informasi data yang bersifat Y / y pada penginputan program cobol.

           88 TDK VALUE 'T' , 't'. 88, digunakan untuk mengawali suatu nama kondisi dengan penginputan kondisi TDK, dimana  Value sebagai sifat menunjukan informasi data yang bersifat T/ t .

SCREEN SECTION. berguna untuk menunjukkan bentuk format dari layar terminal untuk menampilkan data atau memasukkan data.

01 CLS untuk membersihkan layar pada sub pertama,

02 Blank Screen, hamper sama dengan kegunaan CLS tapi ini pada bagian sub bagian kedua.

PROCEDURE DIVISION. Untuk memuat procedure pemrosesan data. Berisi paragraph - paragraph yang terdiri dari instruksi untuk pelaksanaan program / pemprosesan program.

MULAI. Disebut statement awal mula untuk pelaksanaan program.

DISPLAY CLS, artinya menampilkan layar yang bersih.

DISPLAY(9, 5)'NAMA  : '. memunculkan perintah di baris 9 kolom 5 pada saat pengoutputan dengan penginputan NAMA,

ACCEPT ( , )NAMA. Lalu diterima pada bagian ACCEPT untuk di input pada memori data. Dan seterusnya sama hingga penginputan yang terakhir adalah kelas.

DISPLAY(10, 5)'NPM  : '. ACCEPT ( , )NPM. DISPLAY(11, 5)'KELAS   : '.

ACCEPT ( , )KELAS.

DISPLAY(12, 5)'APA ANDA YAKIN ? (Y/T) '. menjelaskan bagaimana pada baris 12 dan kolom 12 ada sebuah kondisi dimana menanyakan data itu benar atau salah. Dengan meyakinkan pada perintah Y/T atau nama lain ya atau tidak.

           ACCEPT PIL. Lalu menerima perintah persetujuan untuk diproses.

           IF TDK GO TO MULAI. Disini mulai terjadi kondisi kedua dimana jika tidak/ atau menginput T maka akan kembali ke awal.

       HASIL. Memberikan proses akhir atau pengoutputan pada memori dari data division/ working storage pekerjaan yang disimpan.

           DISPLAY(15, 5)'=======OUTPUT======='. Memunculkan perintah output. Pada baris ke 15 dan kolom 5.

         

 DISPLAY(16, 5)'NAMA SAYA ' NAMA. Memunculkan output Pada baris ke 16 dan kolom 5 dari data memori NAMA yang sudah diproses dan dihasilkan.

           DISPLAY(17, 5)'NPM  SAYA ' NPM. Memunculkan output Pada baris ke 17 dan kolom 5 dari data memori NPM yang sudah diproses dan dihasilkan

           DISPLAY(18, 5)'SAYA BERADA DIKELAS ' KELAS. Memunculkan output Pada baris ke 18 dan kolom 5 dari data memori KELAS yang sudah diproses dan dihasilkan

       

BERHENTI.Artinya program statement telah selesai.

STOP RUN.   Artinya program berakhir / berhenti dan program siap dijalankan

Inilah hasil Outputan setelah dilakukan cmd, yaitu menjalankan programnya dengan mengetik pada cmd runcob “nama file.cob” lalu program akan berjalan seperti penginputan sebelumnya jika tidak terjadi error maka program sukses berjalan, jika tidak berjalan coba cek dengan ketik di cmd cobol “nama file.cob;” maka akan diketahui kesalahan error pada program tersebut.

Output hasil program PICTURE CLAUSE