Description:
The given string is
truncated at the first occurrence of the given delimiter character. The delimiter character and all
subsequent characters are replaced by blanks. If no delimiter character is found in the string, no
truncation takes place. This routine is effectively a combination of INDEX and CHR_TERM.
Invocation
CALL CHR_TRUNC( DELIM, STRING )
Arguments
DELIM = CHARACTER
1 (Given)
The truncation delimiter character.
STRING = CHARACTER
(
)
(Given and Returned)
The string to be truncated. All characters from, and including, the first
occurrence of DELIM will be replaced with blanks.
Copyright © 2018 East Asian Observatory