opensource COBOL Programmer’s Guide
1.10. LENGTH OFの使い方
オプションで、英数字定数と一意名の前に「LENGTH OF」という句を付けることができる。この場合、実際の定数は、英数字定数のバイト数と等しい値を持つ数字定数である。例えば、次の二つのopensource COBOL文はどちらも同じ結果(27)を表示する。
01 Demo-Identifier PIC X(27). *> This is a 27-character data-item
.
.
.
DISPLAY LENGTH OF “This is a LENGTH OF Example”
DISPLAY LENGTH OF Demo-Identifier
DISPLAY 27
定数または一意名参照のLENGTH OF句は、通常、数値定数を指定できる場所であればどこでも使用できるが、次のように使用する場合は例外となる。
- DISPLAY文の定数の代わりとして
- WRITE文またはRELEASE文のFROM句の一部として
- PERFORM文のTIMES句の一部として