Recently in our project we got an issue. That is in a receiving field value getting is incorrect.
Move Ws-data-1 to Ws-data-2
01 WS-data-1 pic 9(4)v99999 value 0000.77779
01 Ws-data-2 pic 9(08) ==> After move getting value as ‘0’ (zero). But, we need decimal value into pic 9(08) field.
Even though, both are numeric related, but exactly not the same. How to get correct value.
Compute Ws-data-2 = Ws-data-1 * 100000.
This way we resolved the issue.