ACCEPT ステートメントで浮動小数点データ項目を使用する場合には、以下について考慮する必要があります。
外部浮動小数点リテラルが ACCEPT される場合は、結果が少し不正確になる可能性があります。 このことは、浮動小数点データ項目が ACCEPT された後で転送された場合に、特にそうであると言えます。 浮動小数点データ・タイプは近似値で、外部浮動小数点リテラルが転送された場合に、 この浮動小数点データ・タイプはまず真の浮動小数点値 (IEEE) に変換されますが、 この変換も浮動小数点データ・タイプの正確性に影響を与える可能性があります。
77 external-float-1 PIC +9(3).9(13)E+9(3).
ACCEPT external-float-1 FROM CRT.
DISPLAY "EXTERNAL-FLOAT-1=" external-float-1.
+123455779012.3453E+297 が ACCEPT された後の表示結果は以下のとおりです。
EXTERNAL-FLOAT-1=+123.4557790123452E+306