Lompati ke konten utama
Modul 1 · Pelajaran 2 dari 22/10 dalam kursus~12 min
Pelajaran modul (2/2)

Variabel dan GAMBAR

Di COBOL, semua variabel yang digunakan harus dideklarasikan di dalam DIVISI DATA. Secara khusus, variabel sementara dalam memori yang digunakan untuk logika program berada di dalam BAGIAN PENYIMPANAN KERJA.

Angka Tingkat

Deklarasi variabel COBOL menggunakan angka level untuk menyusun dan mengatur data secara hierarki:

  • 01: Mendefinisikan variabel utama atau item grup (level tertinggi).
  • 05, 10, 15: Menentukan bidang bawahan dalam item grup level 01.
  • 77: Secara historis menunjukkan variabel dasar independen yang tidak dapat dibagi lagi.

Dalam praktik modern, level 01 biasanya digunakan untuk mendeklarasikan variabel dasar independen.

Klausul GAMBAR (atau GAMBAR).

Klausa PICTURE (disingkat PIC) menentukan jenis data dan panjang karakter variabel. Tiga karakter format dasar adalah:

  1. X (Alfanumerik): Dapat berisi huruf, angka, dan karakter khusus.
    • PIC X(10) mendeklarasikan string yang terdiri dari tepat 10 karakter.
  2. 9 (Numerik): Hanya dapat berisi angka numerik.
    • PIC 9(3) mendeklarasikan bilangan bulat yang terdiri dari 3 digit (hingga 999).
  3. V (Titik Desimal Implisit): Digunakan dalam angka desimal untuk mewakili awal bagian pecahan (titik desimal tidak disimpan secara fisik).
    • PIC 9(3)V99 mendeklarasikan bilangan dengan 3 digit bilangan bulat dan 2 tempat desimal.

Klausul NILAI

Untuk menetapkan nilai awal ke variabel pada waktu deklarasi, gunakan klausa VALUE.

COBOL
01 WS-PROJECT-NAME PIC X(15) VALUE "ELEARNER".
01 WS-USER-AGE     PIC 9(3)  VALUE 25.

Semua definisi variabel harus diakhiri dengan titik ..


Cobalah sendiri

Latihan#cobol.m1.l2.e1
Upaya: 0Memuat…

Deklarasikan variabel alfanumerik level 01 bernama WS-USER-NAME dengan panjang 20 karakter dan tetapkan nilai awalnya ke 'ALICE'.

Memuat editor…
Tunjukkan petunjuk

Gunakan format: 01 WS-NAMA PENGGUNA PIC X(20) NILAI 'ALICE'.

Solusi tersedia setelah 3 upaya

Latihan#cobol.m1.l2.e2
Upaya: 0Memuat…

Deklarasikan variabel numerik level 01 bernama WS-USER-AGE sebanyak 3 digit dengan nilai awal 25.

Memuat editor…
Tunjukkan petunjuk

Gunakan sintaks: 01 WS-USER-AGE PIC 9(3) VALUE 25.

Solusi tersedia setelah 3 upaya