Please create a support incident for this problem and reference my name in the description so that it is assigned to me.
I will create an rpi for this behavior so that we can get it fixed.
I can reproduce the problem using the following:
working-storage section.
01 mydecimal decimal value 13.
01 result decimal.
01 mynumber pic 9(3)v99.
procedure division.
set result to 100 / mydecimal
set mynumber to result
Thanks.