次に、利用可能なフィールド タイプの一部を示します。
フィールド タイプ | 定義 |
---|---|
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"
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 に書き込まれます。