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

Komentar

Postingan populer dari blog ini

statement kondisi pada qbasic

statement dasar qbasic

jenis jenis array pada qbasic