SUBSTITUTE Phrase

Read syntax diagramSkip visual syntax diagram
SUBSTITUTE Phrase - Format

>>-SUBSTITUTE--+----------------------------+------------------><
               '-ALL--+-------------------+-'   
                      '-EXCEPT--literal-2-'     

The SUBSTITUTE phrase allows you to bring DDS into your program, while preserving certain characters, such as the underscore character. The underscore is not a standard ILE COBOL character, but it is required for specifying locale categories. To preserve the underscore character, for example, in copied DDS, the SUBSTITUTE phrase would be used as follows:
      …SUBSTITUTE ALL EXCEPT '_'.
literal-2
Should be a 1-byte non-numeric literal. The character specified in literal-2 is not substituted.