Routine: LEX2110P

LEX2110P ;ISL/KER - LEX*2.0*110 Post Install ;09/06/2016

 ;;2.0;LEXICON UTILITY;**110**;Sep 23, 1996;Build 6

 ; Global Variables

 ;    None

 ; External References

 ;    None

POST ; Post-Install

 N LEXBUILD,LEXFY,LEXIGHF,LEXLREV,LEXMSG,LEXPTYPE,LEXQTR

 N LEXREQP,LEXSHORT,LEXSUBH S LEXPTYPE="Code Set/API Fixes"

 S LEXLREV=110,LEXBUILD="LEX*2.0*110",LEXIGHF="",LEXFY=""

 S LEXQTR="",LEXSHORT="",LEXMSG="",LEXSUBH="Lexicon Fixes"

 D POST^LEXXFI

--- Routine Detail   --- with STRUCTURED ROUTINE LISTING ---[H[J[2J[HLEX2110P   537     printed  Nov 22, 2024@17:15:39                                                                                                                                                                                                     Page 2

LEX2110P  ;ISL/KER - LEX*2.0*110 Post Install ;09/06/2016

 +1       ;;2.0;LEXICON UTILITY;**110**;Sep 23, 1996;Build 6

 +2       ;

 +3       ;

 +4       ; Global Variables

 +5       ;    None

 +6       ;

 +7       ; External References

 +8       ;    None

 +9       ;

 +10       QUIT

POST      ; Post-Install

 +1        NEW LEXBUILD,LEXFY,LEXIGHF,LEXLREV,LEXMSG,LEXPTYPE,LEXQTR

 +2        NEW LEXREQP,LEXSHORT,LEXSUBH

           SET LEXPTYPE="Code Set/API Fixes"

 +3        SET LEXLREV=110

           SET LEXBUILD="LEX*2.0*110"

           SET LEXIGHF=""

           SET LEXFY=""

 +4        SET LEXQTR=""

           SET LEXSHORT=""

           SET LEXMSG=""

           SET LEXSUBH="Lexicon Fixes"

 +5        DO POST^LEXXFI

 +6        QUIT

LEX2110P.m