Hello All,

I have a Numeric Field of length 8 and dec position as 0. A date Field which I have initialized to '1900-01-01'. Now I am trying to move the value in the Date field to the Numeric field in Free Format RPGLE. This is the below statement.

Eval Cdate = %Dec(%Char(Cdate1:*ISO-):8:0);...