title: Decode a Binary Coded Decimal
body: <p>I have a field  pic X(03) with a date in it  as X'160101' format yymmdd.</p>
  
  <p>I will like to know how to convert it to pic x(06).</p>
  
  <p>So far I tried to move it back to a 9(03) comp  and  move the
  9(03) comp to a 9(06)  but it didn't work.</p>
  
  <p>How can I do this?</p>