Developer Guide and Reference

ID 767251
Date 10/31/2024
Public
Document Table of Contents

LNBLNK

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

Module

USE IFPORT

result = LNBLNK (string)

string

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

Results

The result type is 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.

Example

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

See Also