Level Number Cobol

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).

sumber