The Trim a Full Name to Fit into a Desired Output Field routine
    trims a full name to fit into a desired output field. The
    trimming preserves the most significant part of the full name.

    Format

      LIB$TRIM_FULLNAME  fullname, trimmed-nodename [,output-width]

                         [,resultant-length]