結果を入れるには短すぎるターゲットでの CHARACTER から GRAPHIC の変換の場合
dcl X char (10) varying; dcl A graphic (8); A = graphic(X);
ABCDEFGHIJ
.A.B.C.D.E.F.G.H.I.J
.A.B.C.D.E.F.G.H