Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Routine: UTWRD

UTWRD.m

Go to the documentation of this file.
  1. UTWRD(DIR,DIRH,DIRT,DIRFK) ;ESS,JSH ; 16 Sep 1999 09:40; SCREEN READER 
  1.  ;;3.01;BHL IHS Interfaces with GIS;;JUL 01, 2001
  1.  ;COPYRIGHT 1991-2000 SAIC
  1.  ;CHCS TLS_4603; GEN 1; 28-JUN-1999
  1.  ;COPYRIGHT 1999 SAIC
  1.  ;The CHCS version of this routine is part of the WindowMan function.
  1.  ;The IHS version contains stub tags
  1.  Q
  1. HELP ;;
  1.  S X="?" Q
  1. EXIT ;;
  1.  S X="^" Q
  1. ABRT ;;
  1.  S X="^^" Q
  1.  ;
  1. YN(DIR,DIRH,DIRT) ;EP - Yes/No reader 
  1.  ; Returns 1 for YES, 0 for NO, 0^0=^, 0^1=TIMED OUT
  1.  Q
  1.  ;
  1. MESS(DIR) ;entry point to print message DIR
  1.  Q
  1.  ;
  1. UPCASE(X) ; FUNCTION, Convert X to uppercase
  1.  Q $TR(X,"abcdefghijklmnopqrstuvwxyz","ABCDEFGHIJKLMNOPQRSTUVWXYZ")
  1.  ;