Condense --[NO-GAPS]

Syntax

CONDENSE text [NO-GAPS].

• In the variable text, leading and closing blanks are completely removed and any other directly consecutive blanks are all replaced by exactly one space character or - if NO-GAPS is specified - are also removed completely.
• The data object text must be character-type. If the data object has a fixed length, any space created by the condense operation is filled with blanks on the right. If the data object is of the type string, its length is adapted to the result of the condense operation.

Source code

PARAMETERS : TXT TYPE STRING.

CONDENSE txt NO-GAPS   .

WRITE : TXT.

Input

Output

                        For more information.................>>>>>