>>-DBADJUST(string-+------------+-)----------------------------><
                   '-,operation-'     

In EBCDIC, adjusts all contiguous SI and SO (or SO and SI) characters in string based on the operation specified. The following are valid operations. Only the capitalized and highlighted letter is needed; all characters following it are ignored.

Blank

changes contiguous characters to blanks (X'4040').

Remove

removes contiguous characters, and is the default.

Here are some EBCDIC examples:

DBADJUST('<.A><.B>a<>b','B')    ->    '<.A. .B>a  b'
DBADJUST('<.A><.B>a<>b','R')    ->    '<.A.B>ab'
DBADJUST('<><.A.B>','B')        ->    '<. .A.B>'