正文
CONDENSE命令により、文字列から冗長スペースが削除
小程序：扫一扫查出行【扫一扫了解最新限行尾号】
复制小程序
CONDENSE 命令により、文字列から冗長スペースが削除されます。
CONDENSE c [NO-GAPS].
この命令により、項目 c に先行空白が含まれる場合は削除され、その他の空白列がある場合は 1 つの空白と置換されます。その結果は左寄せされた単語の列となり、それぞれの単語が 1 つの空白によって区切られます。NO-GAPS オプションを指定すると、すべての空白が削除されます。
DATA: string(25) TYPE c VALUE ' one two three four',
len TYPE I. len = strlen( string ).
WRITE: string, '!'.
WRITE: / 'Length: ', len. CONDENSE string.
len = strlen( string ).
WRITE: string, '!'.
WRITE: / 'Length: ', len. CONDENSE string NO-GAPS.
len = strlen( string ).
WRITE: string, '!'.
WRITE: / 'Length: ', len.
出力: one two three four ! Length: one two three four ! Length: onetwothreefour ! Length:
項目 string の合計長は変化せず、削除された空白が再び右側に現れていることに注意してください。
