/* This is an example of a valid REXX comment */
01 parse pull input
02 if substr(input,1,5) = '/*123'
03 then call process
04 dept = substr(input,32,5)
01 parse pull input
02 /* if substr(input,1,5) = '/*123'
03 then call process
04 */ dept = substr(input,32,5)
This is incorrect because the language processor would interpret the /* that is part of the literal string /*123 as the start of a nested comment. It would not process the rest of the program because it would be looking for a matching comment end (*/).
if substr(input,1,5) = '/' || '*123'
01 parse pull input
02 /* if substr(input,1,5) = '/' || '*123'
03 then call process
04 */ dept = substr(input,32,5)
For information about Double-Byte
Character Set characters, see Double-Byte Character Set (DBCS) Support and the OPTIONS
instruction on page OPTIONS.