PEMBUATAN TABEL DIMENSI C o b o l

PEMBUATAN TABEL DIMENSI C o b o l

OCCURS CLAUSE

·         Digunakan untuk tujuan mengulang data item di dalam suatu record beberapa kali, yaitu membentuk tabel.

·         Bentuk umumnya OCCURS integer TIMES

TABEL DIMENSI SATU

·         Tabel adalah suatu kumpulan data dengang tipe sama yg diakses dg menggunakan nama yang sama, serta disimpan di memori secara berurutan (disebut juga array).

·         Pendefinisian Tabel ada pada DATA DIVISION di WORKING-STORAGE SECTION.

Ø  Contoh pendefinisian tabel :

01       tabel-nilai.

02  nilai-siswa PIC 99 OCCURS 5 TIMES.

·         Menyatakan array nilai-siswa yang menampung 5 data numerik.

·         01 tabel-nilai.

02  nilai-siswa PIC 99 OCCURS 5 TIMES

·         Identik dengan data berikut:

01       data-nilai-siswa.

02  nilai-siswa-1 PIC 99.

02  nilai-siswa-2 PIC 99.

02  nilai-siswa-3 PIC 99.

02  nilai-siswa-4 PIC 99.

02  nilai-siswa-5 PIC 99

CONTOH PROGRAM

·         IDENTIFICATION DIVISION.

·         PROGRAM-ID. tabel1.

·         ENVIRONMENT DIVISION.

·         DATA DIVISION.

·         WORKING-STORAGE SECTION.

·         77 n PIC 99.

·         01 tabel-nilai-siswa.  

·         02 nilai-siswa PIC 999 OCCURS 10 TIMES.

·         SCREEN SECTION.

·         01 hapus-layar.

·         02 BLANK SCREEN.

·         PROCEDURE DIVISION.

·         program-utama.

·         PERFORM pemasukan-nilai-siswa VARYING  n

·         FROM 1 BY 1 UNTIL n >10.

·         DISPLAY hapus-layar.

·         PERFORM tampilan-nilai-siswaVARYING  n

·         FROM 1 BY 1 UNTIL n >10.

·         STOP RUN.

·         pemasukan-nilai-siswa.

·         DISPLAY (  ,  )  'Nilai ke ', n, ':  '.  

·         ACCEPT  (  ,  )  nilai-siswa (n).

·         DISPLAY SPACE.

·         tampilan-nilai-siswa.

·         DISPLAY (  ,  ) 'Nilai ke ',  n  ,  ' : '  nilai-siswa ( n ).

·         DISPLAY SPACE.

TABEL DIMENSI DUA

·         Adalah sekumpulan nilai data yang berbentuk tabel, yang elemen masing-masing data ditunjukan oleh dua buah subscript.

·         Tabel dua dimensi biasanya berbentuk matrik dimana salah satu subscriptnya menunjukan posisi kolom, dan subscript yang satunya menunjukan posisi barisnya

OCCURS ….DEPENDING ON CLAUSE

·         Jumlah elemen didalam tabel bervariasi jumlahnya

·         Bila menggunakan OCCURS berarti nilainya akan tetap sejumlah times nya

·         Dengan depending on jumlah bisa dibuat bervariasi tergantung dari suatu nilai nama-data

·         Bentuk umumnya

OCCURS integer1 TO integer2 TIMES

DEPENDING ON nama-data

CONTOH

·         01 record-mhs.

02 jumlah pic 9(2).

02 nilai occurs 1 to 100 times depending on jumlah.

03 nama pic a(20).

03 alamat pic a(30).

OUTPUT 1

OUTPUT 2

KONSEP DASAR PEMROGRAMAN C O B O L

KONSEP DASAR PEMROGRAMAN C O B O L

Sejarah COBOL

•       COBOL atau Common Business Oriented Language adalah suatu Bahasa computer awam yang berorientasi langsung pada permasalahan bisnis.

•       Merupakan Bahasa tingkat tinggi atau High Level Language

•       Diciptakan pada tahun 1959

•       Program Bahasa COBOL merupakan program yang terstruktur, karena memiliki program yang strukturnya jelas, mudah dibaca, dan mudah dipelajari serta baik untuk dokumentasi.

Keuntungan Bahasa COBOL

u  Program COBOL dibuat dalam instruksi Bahasa inggris sehingga mudah dipelajari

u  Program COBOL sesuai untuk pengolahan data yang banyak diterapkan pada pemasalahan bisnis

u  Program COBOL bersifat standart sehingga dapat dipergunakan pada komputer yang bebeda

u  COBOL menyediakan fasilitas listing program bila diperlukan

u   Mudah didokumentasikan dan dikembangkan bila diperlukan

Keterangan Proses Kompilasi

u  Source Program merupakan program yang dibuat didalam Bahasa awam.

u  Object Program merupakan program yang telah diterjemahkan dalam Bahasa mesin

u  Kompiler merupakan program Bahasa mesin yang menterjemahkan atau mengkompilasi source program menjadi object program

u  Listing Program berisi kesalahan-kesalahan program yang terditeksi oleh compiler

Struktur COBOL [1]

u  Struktur program COBOL terbagi menjadi 4 bagian atau division, dengan urutan sebagai berikut:

1.       Identification division

2.       Environment division

3.       Data division

4.       Procedure division          

Identification Division

u  Berisi tentang program bersangkutan, seperti nama pembuat, nama instansi, tanggal program dibuat, komentar mengenai program.

u  Divisi ini tidak mempunyai pengaruh terhadap proses program, hanya sebagai identifikasi saja.

Environment Division

u  Informasi mengenai alat-alat apa saja yang digunakan

u  Divisi ini dibagi menjadi dua seksi atau section yaitu

                a. Configuration section

                                Informasi mengenai computer yang digunakan

                b. Input-output section

                                Informasi mengenai peralatan-peralatan yang                                                          dipergunakan untuk memproses file baik sebagai media peralatan input atau media peralatan output.

Data Divison

u  Berisi informasi tentang jenis data-data apa saja yang digunakan didalam program yang dibuat.

u  Terdiri dari beberapa section yaitu

1.       File section

2.       Working storage section

3.       Screen section

4.       Lingkage section

5.       Report section

PROSEDUR DIVISION

u  Berisi prosedur pemrosesan daa yang datanya tampak di data division

u  Terdapat instruksi-instruksi yang mempunyai akibat secara langsung menghasilkan output yang diminta dari sejumlah input yang ada.

Struktur COBOL [2]

u  Masing-masing divisi dapat terdiri dari urut-urutan susunan bagian tersusun secara hirarki sebagai berikut

q  Division                                                               

q  Region

q  Section

q  Paragraph

q  Sentence/Entry

q  Statement/Clause          

q  Phrase/Option

Division, Region, Section, Paragraph

u  Division

                adalah bagian utama dari suatu program COBOL

u  Region

                suatu kumpulan dari bagian tertentu didalam procedure division.

                Contohnya declarative region.

u  Section

                satu kumpulan dari paragraph

u  Paragraph

                suatu group dari kalimat (sentences) didalam procedure division

Entry, Sentence, Clause,Statement, Phrase

u  Entry è Suatu set dari anak kalimat /clause

u  Sentence è Suatu kumpulan dari satu atau lebih statement.

u  Clause è anak kalimat (clause) merupakan kumpulan dari kata yang membentuk suatu arti. Clause bagian dari entry. Satu entry bisa berisi beberapa clause.

u  Statement è     perintah pengerjaan untuk komputer, bentuknya kata kerja (verb) yang merupakan COBOL reserved word

u  Phrase è            suatu group kata yang merupakan bagian dari statement atau clause

Contoh Program

u  IDENTIFICATION DIVISION.

                PROGRAM-ID.CONTOH.

                ENVIRONMENT SECTION.

                CONFOGURATION SECTION.

                                SOURCE-COMPUTER.IBM PC.

                                SPECIAL NAMES.

                                                PRINTER IS ALAT CETAK.

                PROCEDURE DIVISION.

                                DISPLAY ‘NAMA’

                                ACCEPT NAMA-KARYAWAN.

User Define Word [1]

u  Dalam Bahasa pemrograman COBOL, programmer dapat membentuk kata-kata untuk membuat dan mendefinisikan tersendiri untuk pemberian nama pada:

o   Nama Program

                                Merupakan nama yang diberikan untuk menunjukan                                                       identitas dari program yang dibuat.

                                contoh è program-id.luas trapezium.

• Nama Alat

                                mnemonic name adalah nama yang dibuat untuk                                                                              menujukkan suatu alat tertentu. 

                                Contoh è printer is alat-cetak.

User Define Word [2]

• Nama file

                nama yang dibuat untuk menunjukan suatu file tertentu yang dipergunakan di dalam program.

• Nama record

                record dalam COBOL harus diberi nama pada data division dan akan digunakan dalam procedure division

• Nama data

                nama yang dibuat untuk menujukan suatu data item yang dipergunakan dalam program.

• Nama-indek dan nama-data indek

                nama digunakan untuk data yang berbentuk table yang diindek.

User Define Word [3]

• Nama kondisi

                Suatu nama data yang dihubungkan dengan suatu nilai   tertentu atau nilai yang mempunyai range tertentu

• Nama procedure/ nama paragaf

                nama yang menujukan suatu paragraph dalam prosedur division. Nama ini diperlukan bila proses akan menuju ke           suatu paragraph.

Aturan Pemberian Nama[1]

• Panjang nama maksimum 30 karakter
• Paling sedikit harus mengandung 1 huruf (apabetik)
• Tidak boleh mengandung karakter khusus kecuali hypen(-)
• Tidak boleh menggunakan COBOl reserved word
• Tidak boleh menggunakan spasi
• Contoh :
1. Nomer-barang
2. 5555a45
3. H-673c

Bentuk Data Dalam COBOL

u  Bentuk data dalam COBOL dibedakan menjadi 2 yaitu

1. Data variable

Adalah data yang nilainya dapat berubah didalam program

2.       Data konstanta

Adalah data yang dibutuhkan dimana nilainya tidak tergantung dari input yang dibaca

u  Ada 3 bentuk dari konstanta yaitu

a)       Literal numerik

b)      Literal non numeric

c)       Figuratuve Constant

Literal numerik

u  Terdiri dari angka 0 sd 9

u  Aturan penggunaan literal numerik

a)       Maksimum panjang 18 digit

b)      Boleh ada tanda plus atau minus yang letaknya pada posisi terkiri tanpa ada spasi dengan angka pertama

c)       Boleh ada titik decimal dimana saja kecuali paa posisi terkanan

u  Contoh

a)       -12.56

b)      5656

Literal Non Numerik

u  Konstanta yang digunakan bukan untuk operasi aritmatika

u  Aturan penulisan

1.       Panjang maksimum 120 karakter

2.       Boleh terdiri dari kumpulan karakter kecuali tanda petik

3.       Harus menggunakan tanda petik untuk membedakan literal

Contoh

1. ‘nilai uts’
2. ’13-08-2014’

Figurative Constant

u  Figurative constant termasuk dalam COBOL reserved word yang mempunyai maksud tertentu yang namanya sudah dikenal oleh compiler

u  Contoh:

a.       Zero, zeros, zeroes

b.       Space, spaces

u  Figurative constant letaknya pada procedure division.

u  Contoh è move zero to nilai

Operator Aritmatika & Ungkapan Aritmatika

Aturan Penulisan Source Program[1]

u  Kolom yang tersedia mulai dari kolom 1 sampai dengan kolom 80

u  Kolom 1-6

                digunakan untuk no urut bila diperlukan

u  Kolom 7

                digunakan untuk :

1. tanda baris sambungan dari baris sebelumnya (-)
2. Bila berisi * maka dianggap baris komentar
3. Bila berisi slash (/) maka dianggap komentar dan source program akan tercetak pada hal baru
4. Bila berisi karakter D maka dianggap komentar. Tetapi bila di environment division dalam paragraph source computer : with debugging mode, maka akan berguna untuk menelusuri kesalahan

Aturan Penulisan Source Program[2]

u  Kolom 8-10 disebut dengan area A

                Semua judul divisi, judul seksi, nama paragraph, level number 01 dan level number77

u  Kolom 12-72

                Semua elemen program selain yang ditulis di area A, ditulis pada area B ini.

u  Kolom 73-80

                Merupakan kolom yang tidak diproses oleh komputer, hanya untuk dokumentasi program