Selasa, 10 Oktober 2017

Level Number Cobol

Tags

level number pada cobol
Pengertian Level Number Pada COBOL
Level Number Adalah suatu nomer yang menunjukkan jenjang dari data item dalam suatu record. Makin besar nomer levelnya maka makin rendah jenjang tingkatannya.

Fungsi Level Number Pada COBOL
Level Number 01 => Digunakan untuk mengawali keterangan dari record.
Level number 02 – 49 => Digunakan untuk mengawali keterangan dari data item.
Contoh ?
Data Division.
Working-Storage Section.
01 Data-Masukkan.
     02 Nama Pic A(10).
     02 Gaji.
           03 Gaji-Pokok Pic 9(6).
           03 Tunjangan Pic 9(6).
     02 Total-Gaji Pic 9(7).
Level number 66 => Digunakan untuk RENAMES
contoh ?
01 Data-Masukkan.
     02 Nama Pic A(10).
     02 Alamat Pic X(15).
     02 Kelas Pic X(5).
66 Data-Pegawai Renames Nama thru Alamat.
Level number 77 => Digunakan untuk mengawali data item yang berdiri sendiri
Level number 88=>  Digunakan untuk mengawali suatu nama kondisi
contoh :


Data Division.
Working-Storage Section.
01 Data-Masukkan.
     02 Tanya Pic A.
            88 Lagi value is ‘Y’, ‘y’.
            88 Tidak value is ‘T’, ‘t’.

77 Nama Pic A(20).


EmoticonEmoticon