MENDISKRIPSIKAN DATA PEGAWAI DALAM BAHASA COBOL

Mendiskripsikan DATA PEGAWAI kedalam BAHASA COBOL , NIP bertipe ALFANUMERIK , NAMA PEGAWAI bertipe ALFABETH,  ALAMAT = NAMA JALAN, KOTA, KODE POS bertipe ALFANUMERIK , mendapatkan tunjangan, TUNJANGAN= TUNJANGAN JABATAN, TUNJANGAN KESEHATAN, TUNJANGAN KELUARGA.

=>

DATA DIVISION

WORKING-STORAGE SECTION.

01 DATA-PEGAWAI

                02 NIP PIC 9(7)

                02 NAMA PEGAWAI PIC X(20)

                02 ALAMAT

                                03 NAMA JALANAN        PIC 9(15)

                                03 KOTA                              PIC X(10)

                                03 KODE POS                      PIC 9(6)

                02 TUNJANGAN

                                03 TUNJANGAN JABATAN            PIC 9(6)

                                03 TUNJANGAN KESEHATAN      PIC 9(6)

                                03 TUNJANGAN KELUARGA        PIC9(6)

                02 JABATAN       PIC X(10)