次に、利用可能なフィールド タイプの一部を示します。
| フィールド タイプ | 定義 |
|---|---|
| AQ | 代替照合順序を使用する文字 |
| BI | COMP |
| C5 | COMP-5 |
| C6 | COMP-6 |
| CH | PIC X DISPLAY |
| CX | COMP-X |
| FL | 浮動小数点、符号付き |
| FS/CSF | 符号付き数値、オプションの先行浮動符号付き |
| LI/OL/CLO | PIC S9 LEADING INCLUDED |
| LS/CSL | PIC S9 LEADING SEPARATE |
| NU | PIC 9 DISPLAY |
| PD | PIC S9 COMP-3 |
| PD0 | パック 10 進数。最初のセミバイトおよび符号セミバイトは無視されます。 |
| SB/FI | PIC S9 COMP |
| S5 | S9 COMP-5 |
| SFF | 符号付き自由形式数値 |
| SS | サブストリング。条件でのみ使用されます。 |
| TS/CST | PIC S9 TRAILING SEPARATE |
| TI/ZD/OT/CTO | PIC S9 TRAILING INCLUDED |
| UFF | 符号なし自由形式数値 |
| Y2B | 2 桁、1 バイトの 2 進の年データ |
| Y2C/Y2Z | 2 桁、2 バイトの年データ、オプションの末尾の含まれる符号付き。PIC 99 または PIC S99 |
| Y2D | 2 桁、1 バイトのパック 10 進数年データ。PIC 99 COMP-6 |
| Y2P | 2 桁、2 バイトのパック 10 進数年データ。PIC 99 COMP-3 |
| Y2S | 2 桁、2 バイトの文字年データ、特殊なインジケーター付き。バイナリのゼロ、空白、バイナリの 1 は、特殊文字として扱われます。 |
| Y2T | フル日付フォーマット、yyx... |
| Y2U | フル日付フォーマット、yyx...、COMP-3。 |
| Y2V | フル日付フォーマット、yyx...、COMP-3。最初のセミバイトは無視されます。 |
| Y2W | フル日付フォーマット、x...yy |
| Y2X | フル日付フォーマット、x...yy、COMP-3。 |
| Y2Y | フル日付フォーマット、x...yy、COMP-3。最初のセミバイトは無視されます。 |
他のフィールド タイプは、IBM ドキュメントの「SORT Control Statement」で定義されています。
golf.dat が COBOL プログラムで次のように定義される相対ファイルであるとします。
file-control.
select members-file
assign to "d:\netexpress\base\workarea\golf.dat"(Windows) または assign to "/home/user/workarea/golf.dat"(UNIX)
organization is relative
access mode is random
relative key is relative-key.
data division.
file section.
fd members-file
record contains 28 characters.
01 members-record.
03 members-number pic 9(6).
03 members-lname pic x(10).
03 members-fname pic x(10).
03 members-handicap pic 9(2).
次の mfsort コマンドを使用して、メンバーシップ番号を含むフィールドを基準に golf.dat ファイルを昇順でソートできます。
mfsort sort fields(1,6,nu,a) use golf.dat record f,28 org rl give members.dat
ソートされたバージョンのファイルが、ファイル members.dat に書き込まれます。