RECORD Pada PASCAL

RECORD

PENDAHULUAN

Record merupakan kumpulan elemen data yang dikumpulkan menjadi satu kesatuan dengan tipe data sama ataupun berbeda. Meskipun field tersebut berada dalam satu kesatuan, namun masih dapat di akses secara individual.

Sebuah record rekaman disusun oleh beberapa field. Tiap field berisi data dari tipe dasar / bentukan tertentu. Record mempunyai kelebihan untuk menyimpan suatu sekumpulan elemen data yang berbeda-beda tipenya (di banding array).

Cara pendeklarasian dari record adalah sebagai berikut:

• Mendefinisikan tipe dari record (jumlah field, jenis tipe data yang dipakai),

• Mendefinisikan variabel untuk dilakukan operasi.

Deklarasi record

Record pada pascal diperbolehkan memiliki field-field tipe data yang berbeda. Berikut pendeklarasian Record.

TYPE Motor = Record

NOPOL, Merk, Jenis : String;

Harga : Real;

TahunProd : Integer;

End;

Penjelasan

Type, Record, End; merupakan kata-kata baku atau reserved word yang terdaftar pada compiler.

Motor, merupakan pengenal yang menunjukan pada tipe data rekaman yang dideklarasikan.

Memanggil tipe data record

kita gunakan variable yang telah kita deklarasikan sebagai nama type bentukan “titik” nama fieldnya.

Ada cara pemanggilan yang lain, yaitu dengan struktur with-do. Dengan syarat, hanya mengacu pada satu record dan terletak dalamm satu bagian begin-end tersendiri.

STATEMENT  “WITH”

Selain cara yang telah disebutkan diatas, untuk memproses suatu record dapat

digunakan statement WITH. Dengan statement ini penulisannya akan lebih sederhana. Bentuk Umum penulisan  statement WITH ini adalah : 

WITH  nama_record  DO  statement

Perhatikan deklarasi dibawah ini :  

TYPE  x = RECORD

   No : integer;

   Kode : char;

   Juml : integer;

   Harga : real;

   END;

 VAR  p,q : x;

Untuk membaca variabel p dan q di atas dengan memanfaatkan statement WITH bentuknya menjadi :  

WITH  p,q  DO read (no, kode, juml, harga);

Bandingkan jika digunakan cara sebelumnya :

Read(p.no, p.kode, p.juml,p.harga,q.no,q.kode,q.juml,q.harga);

Pernyataan seperti : 

Data.npm :=‘22297566’

Data.Nama:=‘Abdul Kadir’

Data.Fakultas:=‘Ilmu Komputer’ 

Dapat diganti dengan :

WITH Data Do

Begin

npm :=‘22297566’

Nama:=‘Abdul Kadir’

Fakultas:=‘Ilmu Komputer’

end;

Tipe data record dengan field tipe record

Tipe data record dengan field tipe record  Tipe data record juga dapat memiliki field berupa tipe data record yang lainnya. Misalnya item-item data pada data nilai-nilai mata  kuliah yang diambil setiap mahasiswa pada suatu semester.

Data yang disimpan di dalam record adalah sbb:

1.      NIM (Nomor Induk Mahasiswa)

2.      NamaMhs (nama mahasiswa)

3.      Mata Kuliah (MK) yang diambil mahasiswa, berupa record:

•         Kode mata kuliah ke-1

Nama mata kuliah ke-1

Nilai mata kuliah ke-1

•         Kode mata kuliah ke-2

Nama mata kuliah ke-2

Nilai mata kuliah ke-2

. . .

•         Kode mata kuliah ke-n

Nama mata kuliah ke-n

Nilai mata kuliah ke-n

Record bervariasi

Record yang mempunyai field yang tidak sama atau tidak pasti atau bervariasi dalam suatu variant record mengandung suatu field yang bervariasi tergantung dari suatu kondisi

Contoh Program :

Type

            TypeBacaan = ( BukuTeks , majalah )

Bacaan = record

            kodeperpus:string [7]

            Tanggalbeli:String [8]

            Penerbit           :string [25]

Case tipe: tipebacaan of

            Majalah : (nomormajalah : string (10);

            Bukuteks: (Pengarang : string (25)

                                    Edisi : byte);

End;

Var

Databacaan : bacaan;