LNBLNK

Portability Function: Locates the position of the last nonblank character in a string.

Module: USE DFPORT

Syntax

result = LNBLNK (string)

string
(Input) Character*(*). String to be searched. Cannot be an array.

Results:

The result is of type INTEGER(4). The result is the index of the last nonblank character in string.

LNBLNK is very similar to the intrinsic function LEN_TRIM, except that string cannot be an array.

Compatibility

CONSOLE STANDARD GRAPHICS QUICKWIN GRAPHICS WINDOWS DLL LIB

See Also: LEN_TRIM, Portability Library

Example

USE DFPORT
integer(4) p
p = LNBLNK(' GOOD DAY ') ! returns 9
p = LNBLNK(' ')          ! returns 0