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

GMPTSET.m

Go to the documentation of this file.

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

CONFIG(LEXNS,LEXSS) ;  Redirect

 D CONFIG^LEXSET($G(LEXNS),$G(LEXSS)) Q

--- Routine Detail   --- with STRUCTURED ROUTINE LISTING ---[H[J[2J[HGMPTSET   300     printed  Dec 13, 2024@02:03:18                                                                                                                                                                                                      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