*DECK TTARGET 
      PRGM  TTARGET;
      BEGIN 
      CONTROL STEXT;
  
*CALL TARGETDEF 
  
      END 
      TERM
