*DECK TXSTD 
      PROC TXSTD ;
      BEGIN 
      CONTROL STEXT;
*CALL XSTD
      END 
      TERM
