それぞれの序数タイプ・レコードは、序数タイプ索引と呼ばれる 1 つの番号を割り当て、このレコードに記述された序数タイプを参照するために、後のレコードによって使用されるようにします。 タイプの名前は、リテラル索引によって示されます。 それぞれの序数タイプ・レコードには、その序数タイプが宣言されたファイルおよび行のファイル索引およびソース行番号が入っています。
それぞれの序数タイプ・レコードには、以下のものが入っています。
declare /* */
1 xin_Ord_Type based( null() ), /* */
/* */
2 xin_Ord_Type_Hdr /* standard header */
like xin_Hdr, /* */
/* */
2 xin_Ord_Type_File_Id /* file id */
fixed bin(31) unsigned, /* */
/* */
2 xin_Ord_Type_Line_No /* line no within file */
fixed bin(31) unsigned, /* */
/* */
2 xin_Ord_Type_Id /* identifying number */
fixed bin(31), /* */
/* */
2 xin_Ord_Type_Count /* count of elements */
fixed bin(31), /* */
/* */
2 xin_Ord_Type_Prec /* precision for ordinal */
fixed bin(08) unsigned, /* */
/* */
2 *, /* */
3 xin_Ordinal_Type_Signed /* signed attribute applies */
bit(1), /* */
3 xin_Ordinal_Type_Unsigned /* unsigned attribute applies */
bit(1), /* */
3 * /* unused */
bit(6), /* */
/* */
2 * /* unused */
char(2), /* */
/* */
2 xin_Ord_Type_Name /* type name */
fixed bin(31); /* */