1 calls from
READBSQ

STRLNTH  1