COBOLの転記結果の問題

質問

01 AAA PIC 99V99 VALUE 1234
01 BBB PIC 9V9
　　　　　：
　　　　　：
MOVE AAA TO BBB
-----------------------------
とすると、BBBの転記結果はなんですか？
23
でいいのでしょうか？

回答No.3

rvr3958

VALUEの値は、１２３４であり、１２．３４ではないですね？であるなら、答えは４．０ですね。
もしも１２．３４なら、答えは２．３ですね。

仮想小数点が付いてるワークのVALUE値は、そのまま小数点を適用しますので、AAA=1234.00と扱われます。これをBBB=0.0のエリアに数値同士を転送しますので小数点の位置が合わされ、上記のような回答になります。

但しコンパイラーにもよりけりかも知れませんが、

01 AAA PIC 99V99 VALUE 1234

この定義でコンパイルエラーが発生するかも知れませんね。（桁が足らないので…）

回答No.2

taka_tetsu

>23
>でいいのでしょうか？

桁落ちと桁あふれが発生しているわけですから
いいんじゃないんですか？

もちろん、数値として考えれば2.3ですけど

回答No.1

PAPA0427

９Ｖ９ですから３では？

補足

解答欄は一応２文字ですが...