You can define alpha-literals containing DBCS data either in the PDL source or as initial values in working data. The form of the literals must be an EBCDIC quote or apostrophe, followed by any number of DBCS characters (surrounded by S/D and S/S characters) or non-DBCS characters, followed by a matching EBCDIC quote or apostrophe. The literal value is everything between the matching EBCDIC quotes or apostrophes, including any S/D or S/S characters. If the application wants to move to or compare with a field that contains implicit DBCS, you must use the $DBCS‑DETACH function.
Example
SET A = $DBCS-DETACH('dbcs data surrounded by S/D and S/S')
IF A = $DBCS-DETACH('dbcs data surrounded by S/D and S/S')
There is no way to put implicit DBCS initial values into working data. They must be initialized through SET statements.
|
Copyright © 2015 CA Technologies.
All rights reserved.
|
|