Jenis Data Non-Standar (User Definied)

1. Enumerated

Jenis data ini terdiri atas barisan identifier yang terturut dimana setiap identifier tersebut dianggap sebagai suatu individual data item (elemen data yang berdiri sendiri).  Pada saat mendeklarasikan jenis data ini kita harus menuliskan semua elemen elemennya. 

Bentuk umumnya :

TYPE nama = (data_item_1, data_item_2, ......, data_item_n);

Fungsi standar yang dapat digunakan pada jenis data ini adalah :

PRED, SUCC dan ORD 

Misalnya : PRED (sel) = sen

                SUCC (sen) = sel

                ORD (sen) = 0

                ORD (sel) = 1

2. Sub-Range

Jenis data ini berupa range dari suatu kumpulan data yang mempunyai urutan.

Bentuk umumnya:

TYPE nama = data_item_pertama .. data_item_terakhir;

Contoh :

1.  TYPE   jam kuliah = 1 .. 10;

                  tanggal = 1 .. 31;

                  abjad = `A` .. `Z`;

2. TYPE     bulan = (jan,feb,mar,apr,mei,jun,jul,agt,sept,okt,nov,des);

                   hari = (sen,sel,rab,kam,jum,sabt,ming);

                   pta = feb .. jun;

                   hari_kerja = sen .. jum;