*DECK NOPRMPT 
          IDENT  NOPRMPT
*CALL COPYRITE
          ENTRY  NOPRMPT
          SYSCOM B1 
          TITLE  NOPRMPT - TURN OFF TERMINAL PROMPT.
          COMMENT  NOPRMPT - TURN OFF TERMINAL PROMPT.
          SPACE  4,10 
***       NOPRMPT - TURN OFF TERMINAL PROMPT. 
* 
*         CALL NOPRMPT
* 
*         NOPRMPT;            *SYMPL* CALL. 
* 
*         ENTRY 
  
  
 NOPRMPT  SUBR               ENTRY/EXIT 
          SB1    1           REQUIRED BY SYSCOM 
          PROMPT OFF         DISABLE TERMINAL PROMPT
          EQ     NOPRMPTX    RETURN 
  
          END 
