Teknik Pemrograman Terstruktur 1 Pertemuan 02 Konsep Dasar

Teknik Pemrograman Terstruktur 1 Pertemuan #02 – Konsep Dasar Bahasa Pemrograman COBOL (Lanjutan) Universitas Gunadarma 2017

Agenda #01 #02 #03 #04 #05 #99 Bentuk Data pada COBOL Aturan Penulisan pada COBOL Level Number pada COBOL Picture Clause pada COBOL Operator dan Aritmatika Agenda Minggu Depan

#01 Bentuk Data pada COBOL

Bentuk Data pada COBOL Data Variabel adalah data yang nilainya dapat berubah didalam program. Contoh : ACCEPT NAMA_MHS Data Konstanta adalah suatu data yang nilainya tidak tergantung dari input yang dibaca (bernilai tetap) Contoh : MULTIPLY JAM-KERJA BY 500 GIVING GAJI-OUT.

Data Konstanta Literal Numerik Aturannya : • Maksimum panjangnya 18 digit • Boleh ada tanda plus pada posisi terkiri tanpa ada spasi dengan angka pertama. Bila tanpa tanda maka dianggap bernilai positif. • Boleh ada titik desimal dimana saja kecuali pada posisi terkanan. Contoh : -15. 50, 20. 5, +0. 72, 9876, dst…

Data Konstanta Literal Non-Numerik Konstanta yang digunakan bukan untuk operasi aritmatika. Aturannya : • Panjang maksimum 120 karakter • Boleh terdiri dari kumpulan karakter kecuali karakter petik. Contoh : ‘KA 12’

Data Konstanta Figurative Constant Termasuk dalam COBOL Reserved Word (kata yang telah dikenal oleh kompiler). Contoh : ZERO. Digunakan pada Procedure Division. Move Zero TO Jumlah. Artinya memberikan nilai 0 pada Jumlah.

#02 Aturan Penulisan pada COBOL

Aturan Penulisan pada COBOL Kolom yang tersedia untuk menulis program Cobol (1 -80) Kolom Keterangan Kolom 1 -6 Untuk nomor urut bila diperlukan (optional) Kolom 7 • • Untuk tanda hypen, baris sambungannya berada di area B. Bila diisi dengan tanda *, maka baris tersebut dianggap sebagai komentar. Bila diisi dengan tanda /, maka baris tersebut dianggap sebagai komentar dan akan dicetak mulai halaman baru teratas. Bila diisi dengan karakter D, maka akan dianggap sebagai komentar. Tetapi bila pada Environment division dalam paragraph Source-Computer disebutkan With Debugging Mode, maka akan berguna untuk tujuan debugging. Kolom 8 -11 Disebut area A. Tempat menuliskan semua judul divisi, judul seksi, nama paragraph, judul file description (FD), level number 01 dan level number 77 Kolom 12 -72 Disebut area B. Tempat penulisan semua elemen program selain yang ditulis diarea A Kolom 73 -80 Untuk komentar atau dokumentasi program

Aturan Penulisan pada COBOL

#03 Level Number pada COBOL

Level Number Adalah suatu nomer yang menunjukkan jenjang dari data item dalam suatu record. Makin besar nomer levelnya, makin rendah jenjang tingkatannya. v v v Level Number 01 Level Number 02 -49 Level Number 66 Level Number 77 Level Number 88

Level Number 01 Digunakan untuk mengawali keterangan dari record Level Number 02 -49 Digunakan untuk mengawali keterangan dari data item

Level Number 66 Digunakan untuk RENAMES Level Number 77 Digunakan untuk mengawali data item yang berdiri sendiri

Level Number 88 Digunakan untuk mengawali suatu nama kondisi

#04 Picture Clause pada COBOL

Picture Clause pada COBOL v Berfungsi untuk melakukan perubahan bentuk dari data yang tersimpan (edit data) di dalam memori, sehingga data yang tercetak nantinya akan lebih mudah dimengerti, dibaca, dan mempunyai susunan yang lebih baik dari data aslinya. v Berlaku hanya untuk numerik, kecuali Picture editing karakter B.

Jenis-Jenis Picture Clause – Karakter “Z” Untuk menghilangkan angka 0 dimuka. Contoh : Space Jml Pic 9(6) | Space Edit Jml-O Pic Z(6) Data Sumber 5000 Hasil Sebelum di Edit 005000 Hasil Setelah di Edit 5000

Jenis-Jenis Picture Clause – Karakter “$” Menambahkan karakter $ saat pencetakan yang terletak paling ujung kiri. Contoh : Space Jml Pic 9(6) Data Sumber Hasil Sebelum di Edit Hasil Setelah di Edit | Space Edit Jml-O Pic $Z(6) 5000 005000 $ 5000

Jenis-Jenis Picture Clause – Karakter “. ” dan “, ” Untuk menunjukkan letak posisi dari titik desimal pada saat pencetakan. Dapat dipertukarkan kedudukannya dengan cara mendefinisikan terlebih dahulu : DATA DIVISION. WORKING-STORAGE SECTION. SPECIAL-NAMES. DECIMAL POINT IS COMMA.

Jenis-Jenis Picture Clause – Karakter “-” Menambahkan tanda – pada posisi paling kiri pada saat pencetakan jika data aslinya bernilai negatif, jika bernilai positif akan digantikan dengan blank Picture Clause – Karakter “+” Jika data aslinya bernilai positif tanda + akan tampak pada posisi paling kiri. Tetapi jika data aslinya bernilai negatif, maka yang akan muncul bukan karakter + tetapi karakter -

Jenis-Jenis Picture Clause – Karakter “DB” atau “CR” Menambahkan karakter DB atau CR pada posisi paling kanan dimana hanya berlaku untuk data aslinya yang bernilai negatif. Jika data bernilai positif tidak akan tampak. Picture Clause – Karakter “B” Khusus untuk mengedit data bukan numeric. Akan menyebabkan nilai blank dimana posisi B itu berada

Jenis-Jenis Picture Clause – Karakter “*” Untuk menggantikan nilai 0 (nol) yang muncul pada posisi paling kiri dengan karakter *. Contoh : Space Jml Pic 9(6) Data Sumber Hasil Sebelum di Edit Hasil Setelah di Edit | Space Edit Jml-O Pic ****** 400 000400 ***400

Jenis-Jenis Picture Clause – Karakter “ 0” Untuk menyisipkan karakter 0 pada posisi dimana karakter 0 itu berada Picture Clause – Karakter “/” Untuk menyisipkan karakter / pada posisi dimana karakter / itu berada

#05 Operator dan Aritmatika

Operator Aritmatika Maksud Jenjang ** Pangkat 1 * Kali 2 / Bagi 2 + Tambah 3 - Kurang 3

Operator Relational Maksud < LESS THAN Lebih kecil dari > GREATER THAN Lebih besar dari = EQUAL TO Sama dengan NOT > NOT GREATER THAN Lebih kecil atau sama dengan NOT < NOT LESS THAN Lebih besar atau sama dengan NOT = NOT EQUAL TO Tidak sama dengan

Ungkapan Aritmatika Maksud Penulisan A + B C + D ( A + B ) / ( C + D ) A 2 (B + C ) 3 A * * 2 / ( B + C ) * * 3

#99 Agenda Minggu Depan

Pertemuan #03 Logika dan Teknik Pemrograman pada COBOL