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