! ! ! Link file for GETRNO ! ! r link getrno,getrno=getrno// outrno,string sy:pascal // ^C