Example: IGZCA2D
This example CALL statement converts the alphanumeric
data in alpha-item to DBCS data. The results of the
conversion are
placed in dbcs-item.
CALL "IGZCA2D" USING BY REFERENCE alpha-item dbcs-item
BY CONTENT LENGTH OF alpha-item LENGTH OF dbcs-item
Suppose the contents of alpha-item and dbcs-item and
the lengths before the conversion are:
alpha-item = AB<D1D2D3>CD
dbcs-item = D4D5D6D7D8D9D0
LENGTH OF alpha-item = 12
LENGTH OF dbcs-item = 14
Then after the conversion, alpha-item and dbcs-item will
contain:
alpha-item = AB<D1D2D3>CD
dbcs-item = .A.BD1D2D3.C.D
The content of the RETURN-CODE register is 0.