>>915
01 A PIC S9(5) COMP-3.
01 B.
  03 CPIC SSSS9

MOVE A TO C.
DISPLAY B.

で満足?