GMPTSET ; ISL Setup Appl/User Defaults for Look-up ; 10-25-96
;;2.0;LEXICON UTILITY;**2**;Aug 15, 1996
;
; Replaces Clinical Lexicon Utility v 1.0 GMPTSET and re-directs
; call to Lexicon Utility v 2.0 LEXSET
;
Q
CONFIG(LEXNS,LEXSS) ; Redirect
D CONFIG^LEXSET($G(LEXNS),$G(LEXSS)) Q
--- Routine Detail --- with STRUCTURED ROUTINE LISTING ---[H[J[2J[HGMPTSET 300 printed Oct 16, 2024@18:04:01 Page 2
GMPTSET ; ISL Setup Appl/User Defaults for Look-up ; 10-25-96
+1 ;;2.0;LEXICON UTILITY;**2**;Aug 15, 1996
+2 ;
+3 ; Replaces Clinical Lexicon Utility v 1.0 GMPTSET and re-directs
+4 ; call to Lexicon Utility v 2.0 LEXSET
+5 ;
+6 QUIT
CONFIG(LEXNS,LEXSS) ; Redirect
+1 DO CONFIG^LEXSET($GET(LEXNS),$GET(LEXSS))
QUIT