ILE COBOL 解説書

文字ストリングおよび項目のサイズ

ユーザー・プログラムでは、基本項目のサイズは、その PICTURE 文字ストリングの中で指定する文字位置の個数によって決まります。 しかし、ストレージ内では、その項目が実際に占めるバイト数 (PICTURE 文字ストリングと USAGE 文節の組み合わせによって判別される) によって項目のサイズが決められます。

+----------------------------------IBM 拡張----------------------------------+

LOCALE 句を含む PICTURE 文節を持つ基本項目のサイズは SIZE 句の整数-1 から判別されます。

内部浮動小数点項目については、ストレージ内の項目のサイズはその USAGE 文節によって決められます。 USAGE COMPUTATIONAL-1 は項目用に 4 バイトのストレージを予約し、USAGE COMPUTATIONAL-2 は 8 バイトのストレージを予約します。

日時クラスの基本項目のサイズは、FORMAT リテラルまたは SIZE 句内の整数から判別されます。

+------------------------------End of IBM 拡張-------------------------------+

通常、算術項目をあるフィールドからそれより短いフィールドに移すと、 コンパイラーは短い方の項目の PICTURE 文字ストリングで表された文字数に 合わせて、データを切り捨てます。

たとえば、PICTURE S99999 と指定され、+12345 という値が入っている送り出しフィールドから、PICTURE S99 と指定され、BINARY である受け入れフィールドにデータが移されるとすると、そのデータは切り捨てられて +45 になります。 詳しくは USAGE 文節を参照してください。


[ ページのトップ | 前ページ | 次ページ | 目次 | 索引 ]