Categories: 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

pola ?

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 bangun sendiri
Level number 88=> Digunakan untuk mengawali suatu nama kondisi

pola :

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

Demikian yang dapat kami share kepada sobat source code aplikasi pada kesempatan ini, semoga dapat bermanfaat dan bisa menjadi referensi pemrograman bagi anda. Jangan lupa like Fan Page kami, dan SUBSCRIBE Channel Youtube kami untuk dapatkan update source code aplikasi terbaru.

Ahmad Code