2 calls to
CORRLENGTHLA2

SPCORRLA2
SUSTATSLA