DISPLAY ステートメント - 形式 1 - データ 転送 .----------------. V | >>-DISPLAY----+-ID-1-------+-+--+---------------------------+---> '-リテラル-1-' '-+------+--+-簡略名------+-' '-UPON-' | (1) | '-環境名------' >--+--------------------------------+--+------------------+---->< | (2) | | (1) | '-+------+--不可--ADVANCING------' '-END-DISPLAY------' '-WITH-'
注:
+----------------------------------IBM 拡張----------------------------------+
ID-1 の記述に TYPE 文節が含まれる場合は、その文節で指定されるタイプ名は基本項目でなければなりません。
+------------------------------End of IBM 拡張-------------------------------+
これが数字であって外部 10 進数としては記述されていない場合、ID は以下の方法で外部形式に自動的に変換されます。
このようなデータにはディスプレイ装置制御文字が入っていることがあるので、予期しない結果を引き起こすことになります。
+----------------------------------IBM 拡張----------------------------------+
外部浮動小数点リテラルが表示される場合は、結果が少し不正確になる可能性があります。 このことは、DISPLAY が MOVE の後に来る場合に、特にそうであると言えます。 浮動小数点データ・タイプは近似値で、外部浮動小数点リテラルが転送された場合に、 この浮動小数点データ・タイプはまず真の浮動小数点値 (IEEE) に変換されますが、 この変換も浮動小数点データ・タイプの正確性に影響を与える可能性があります。
たとえば、以下の DISPLAY を考えてみます。
77 external-float-1 PIC +9(3).9(13)E+9(3). MOVE +123455779012.3453E+297 to external-float-1. DISPLAY "EXTERNAL-FLOAT-1=" external-float-1.
MOVE の後で表示される結果は以下のとおりです。
EXTERNAL-FLOAT-1=+123.4557790123452E+306
+------------------------------End of IBM 拡張-------------------------------+
+----------------------------------IBM 拡張----------------------------------+
+------------------------------End of IBM 拡張-------------------------------+
+----------------------------------IBM 拡張----------------------------------+
浮動小数点リテラルを使用できます。
符号付きで非整数の、数字リテラルが使用可能です。
DBCS リテラルおよび国別 16 進リテラルが使用可能です。 verb、DISPLAY 内で、表意定数 ALL を DBCS リテラルおよび国別 16 進リテラルと一緒に使用できます。
+------------------------------End of IBM 拡張-------------------------------+
+----------------------------------IBM 拡張----------------------------------+
簡略名の代わりに環境名を指定することもできます。 有効な環境名は CONSOLE および SYSOUT です。
+------------------------------End of IBM 拡張-------------------------------+