この CALL ステートメント例は、alpha-item 内の英数字データを DBCS データに変換します。変換の結果は dbcs-item に入れられます。
CALL "IGZCA2D" USING BY REFERENCE alpha-item dbcs-item
BY CONTENT LENGTH OF alpha-item LENGTH OF dbcs-item
変換前の alpha-item および dbcs-item の内容と長さが次のものであるとします。
alpha-item = AB<D1D2D3>CD dbcs-item = D4D5D6D7D8D9D0
LENGTH OF alpha-item = 12 LENGTH OF dbcs-item = 14
変換後、alpha-item および dbcs-item には次のものが入ります。
alpha-item = AB<D1D2D3>CD dbcs-item = .A.BD1D2D3.C.D
RETURN-CODE レジスターの内容は 0 です。
関連参照
DBCS 表記