PROGRAM GETLIC C C N. A. Bourgeois, Jr. 12-Feb-88/. C C Get and display the TSX-Plus license number. C IRET = ITSLIC () TYPE *,'The TSX-Plus license number is:',IRET TYPE * C CALL EXIT END