*DECK     CLT=CR2 
          IDENT  CCIRCLE
*CALL     NMI=VER 
          TITLE  COLLECT VERSION "VERSN" - COPYRIGHT
          COMMENT COLLECT VERSION "VERSN" "JDATE" "TIME"
          USE    /IDINFO/ 
          DIS    ,*COLLECT VERSION "VERSN" "JDATE" "TIME"*
          DIS    ,*COLLECT COPYRIGHT 1982 CONTROL DATA CORPORATION* 
          USE 
          END 
