diff --git a/Packages/Consult Request Tracking/Routines/GMRC110P.m b/Packages/Consult Request Tracking/Routines/GMRC110P.m
new file mode 100644
index 00000000000..2e8bf78c644
--- /dev/null
+++ b/Packages/Consult Request Tracking/Routines/GMRC110P.m	
@@ -0,0 +1,66 @@
+GMRC110P ;ABV/PIJ - Consult STA3N fix. Patch GMRC*3.0*110 ;8/1/18 07:36
+ ;;3.0;CONSULT/REQUEST TRACKING;**110**;DEC 27, 1997;Build 6
+ ;
+ ;This routine locates a site's STA3N ID and places it in a GMRC UNIQUE CONSULT ID parameter.
+ ;It is used by Community Care.
+ ;
+ Q
+ ;
+POST ;updates GMRC UNIQUE CONSULT ID paramater file #8989.5
+ N GMRCID
+ ;
+ S GMRCID=$E($P($$SITE^VASITE(),U,3),1,3)
+ I GMRCID="" D  Q
+ .D BMES^XPDUTL()
+ .D MES^XPDUTL("*****************************************")
+ .D MES^XPDUTL("Your SITE ID does not exist.")
+ .D MES^XPDUTL("Please contact IRM for assistance.")
+ .D MES^XPDUTL("*****************************************")
+ ;
+ D EN^XPAR("PKG.CONSULT/REQUEST TRACKING","GMRC UNIQUE CONSULT SITE ID",,GMRCID)
+ ;
+ D BMES^XPDUTL()
+ D MES^XPDUTL("******************************************************")
+ D MES^XPDUTL("Your STATION 3N (STA3N) is "_GMRCID_" and")
+ D MES^XPDUTL("has been recorded in the Parameters file.")
+ D MES^XPDUTL("******************************************************")
+ D BMES^XPDUTL()
+ ;
+ D BMES^XPDUTL("******************************************************")
+ D MES^XPDUTL("Commencing conversion of existing UCIDs to "_GMRCID)
+ D FIXSTA3N
+ D BMES^XPDUTL("******************************************************")
+ D MES^XPDUTL("End of conversion.")
+ Q
+ ;
+FIXSTA3N ; Scroll through #123 "B" index.  Look for any entries in #80 (UCID)
+ ; and if the first "_" piece does not = GMRCID, then update field #80 with this
+ ; new number.
+ N FMDATE,GMRCID,GMRCIEN,GMRCOUT,NEWUCID,OLDUCID,X
+ N DA,DIE,DR
+ ;
+ S (GMRCID,GMRCIEN)=""
+ S (OLDUCID,NEWUCID,X)=0
+ ;
+ S FMDATE="3180101"
+ ;GMRCID = Parameter Name
+ S GMRCID=$$GET^XPAR("PKG.CONSULT/REQUEST TRACKING","GMRC UNIQUE CONSULT SITE ID")
+ ;
+ F  S FMDATE=$O(^GMR(123,"B",FMDATE)) Q:FMDATE=""  D
+ .S GMRCIEN=""
+ .F  S GMRCIEN=$O(^GMR(123,"B",FMDATE,GMRCIEN)) Q:GMRCIEN=""  D UPDATE
+ ;
+ Q
+ ;
+UPDATE ;
+ S X=$$GET1^DIQ(123,GMRCIEN,80) ; 325_883826
+ I X'="" S OLDUCID=$P(X,"_",1) D
+ .I OLDUCID'=GMRCID D
+ ..S NEWUCID=GMRCID_"_"_GMRCIEN
+ ..S DR="80///"_NEWUCID
+ ..S DIE=123
+ ..S DA=GMRCIEN
+ ..D ^DIE
+ ..K GMRCOUT D GETS^DIQ(123,GMRCIEN_",",".01;.02","E","GMRCOUT")
+ ..D MES^XPDUTL($G(GMRCOUT(123,GMRCIEN_",",.01,"E"))_"  "_$G(GMRCOUT(123,GMRCIEN_",",.02,"E"))_"  From: "_OLDUCID_"_"_GMRCIEN_"  To: "_NEWUCID)
+ Q
diff --git a/Packages/Consult Request Tracking/Routines/GMRCSLM2.m b/Packages/Consult Request Tracking/Routines/GMRCSLM2.m
index f696bf6959b..d350ea00d5c 100644
--- a/Packages/Consult Request Tracking/Routines/GMRCSLM2.m	
+++ b/Packages/Consult Request Tracking/Routines/GMRCSLM2.m	
@@ -1,5 +1,5 @@
 GMRCSLM2 ;SLC/DCM,WAT - LM Detailed  display and printing ;12/10/14  14:15
- ;;3.0;CONSULT/REQUEST TRACKING;**1,4,18,15,17,23,22,65,66,73,81**;DEC 27,1997;Build 6
+ ;;3.0;CONSULT/REQUEST TRACKING;**1,4,18,15,17,23,22,65,66,73,81,110**;DEC 27,1997;Build 6
  ;
  ;ICRs
  ;GLOBALS/FILES
@@ -14,7 +14,7 @@
  ;;Pass in variable GMRCOER=2 if calling from the GUI, GMRCOER=1 if call is from CPRS consults tab
  ;;Pass in variable GMRCOER=0 (or as <UNDEFINED>) if call is from consults routines
  K GMRCQUT
- N DFN,GMRCD,GMRCDA,ORIFN,GMRCSF S GMRCDVDL="",$P(GMRCDVDL,"-",80)=""
+ N DFN,GMRCD,GMRCDA,ORIFN,GMRCSF,GMRCUCID S GMRCDVDL="",$P(GMRCDVDL,"-",80)=""
  I $S('GMRCO:1,'$D(^GMR(123,+GMRCO,0)):1,1:0) D:$S('$D(GMRCOER):1,'GMRCOER:1,1:0)  S GMRCQUT=1 Q
  .S GMRCMSG="The consult entry selected for the Detailed Display is unknown." D EXAC^GMRCADC(GMRCMSG) K GMRCMSG
  .Q
@@ -27,6 +27,7 @@ S GMRCO(0)=^GMR(123,+GMRCO,0),ORIFN=$P(GMRCO(0),"^",3),DFN=$P(GMRCO(0),"^",2)
  N VAIN,VAEL,CVELIG
  D INP^VADPT S ^TMP("GMRCR",$J,"DT",GMRCCT,0)="Current Pat. Status:   "_$S(+VAIN(8):"Inpatient",1:"Outpatient"),GMRCCT=GMRCCT+1
  I $D(VAIN(4)),$L($P(VAIN(4),"^",2)) S ^TMP("GMRCR",$J,"DT",GMRCCT,0)="Ward:"_$E(TAB,1,18)_$P(VAIN(4),"^",2),GMRCCT=GMRCCT+1
+ S GMRCUCID=$$GET1^DIQ(123,+GMRCO,80) I GMRCUCID]"" S ^TMP("GMRCR",$J,"DT",GMRCCT,0)="UCID:"_$E(TAB,1,23-$L("UCID:"))_GMRCUCID,GMRCCT=GMRCCT+1 ;110
  D ELIG^VADPT
  S:$L($P(VAEL(1),"^",2)) ^TMP("GMRCR",$J,"DT",GMRCCT,0)="Primary Eligibility:"_$E(TAB,1,3)_$P(VAEL(1),"^",2)_$S(VAEL(8)']"":" (NOT VERIFIED)",1:"("_$P(VAEL(8),"^",2)_")"),GMRCCT=GMRCCT+1
  ;wat 66
diff --git a/Packages/Kernel/Globals/14.4+TASKS.zwr b/Packages/Kernel/Globals/14.4+TASKS.zwr
index 93ac373d5af..13fb7a66290 100644
--- a/Packages/Kernel/Globals/14.4+TASKS.zwr
+++ b/Packages/Kernel/Globals/14.4+TASKS.zwr
@@ -1,6 +1,6 @@
 OSEHRA ZGO Export: TASKS
-15-MAR-2019 06:18:36 ZWR
-^%ZTSK(-1)=4322
+15-MAR-2019 07:06:17 ZWR
+^%ZTSK(-1)=4326
 ^%ZTSK(0)="TASKS^14.4^4237"
 ^%ZTSK(1001,0)="TASK^XMXBULL^16^^63957,36927^63957,36927^R^^^PATCH,USER^PLA^PLA^ZTDESC^^"
 ^%ZTSK(1001,.02)="^PLA^^"
@@ -39263,6 +39263,47 @@ OSEHRA ZGO Export: TASKS
 ^%ZTSK(4322,.3,"DUZ(",0)="@"
 ^%ZTSK(4322,.3,"XQSCH")=8
 ^%ZTSK(4322,.3,"XQY")=9891
+^%ZTSK(4323,0)="HOUR^XUTMHR^.5^^65087,25305^65087,25305^R^^^POSTMASTER^VISTA^VISTA^ZTDESC^^"
+^%ZTSK(4323,.02)="^VISTA^^"
+^%ZTSK(4323,.03)="Taskman Hourly Job"
+^%ZTSK(4323,.04)=5623542105
+^%ZTSK(4323,.1)="B^65087,25365^Task's volume set not listed in index.^^^^^^"
+^%ZTSK(4323,.2)=""
+^%ZTSK(4323,.21)=""
+^%ZTSK(4323,.25)=""
+^%ZTSK(4324,0)="ZTSK^XQ1^.5^VISTA^65087,25365^65087,25365^O^8853^HL AUTOSTART LINK MANAGER^POSTMASTER^VISTA^VISTA^ZTDESC^VISTA^"
+^%ZTSK(4324,.02)="^VISTA^^"
+^%ZTSK(4324,.03)="No Description (%ZTLOAD)"
+^%ZTSK(4324,.04)=5623542165
+^%ZTSK(4324,.1)="B^65087,25368^Task's volume set not listed in index.^^^^^^"
+^%ZTSK(4324,.2)=""
+^%ZTSK(4324,.21)=""
+^%ZTSK(4324,.25)=""
+^%ZTSK(4324,.3,"DUZ(",0)="@"
+^%ZTSK(4324,.3,"XQSCH")=10
+^%ZTSK(4324,.3,"XQY")=8853
+^%ZTSK(4325,0)="ZTSK^XQ1^.5^VISTA^65087,25365^65087,25365^O^8412^HL TASK RESTART^POSTMASTER^VISTA^VISTA^ZTDESC^VISTA^"
+^%ZTSK(4325,.02)="^VISTA^^"
+^%ZTSK(4325,.03)="No Description (%ZTLOAD)"
+^%ZTSK(4325,.04)=5623542165
+^%ZTSK(4325,.1)="B^65087,25370^Task's volume set not listed in index.^^^^^^"
+^%ZTSK(4325,.2)=""
+^%ZTSK(4325,.21)=""
+^%ZTSK(4325,.25)=""
+^%ZTSK(4325,.3,"DUZ(",0)="@"
+^%ZTSK(4325,.3,"XQSCH")=11
+^%ZTSK(4325,.3,"XQY")=8412
+^%ZTSK(4326,0)="ZTSK^XQ1^.5^VISTA^65087,25365^65087,25365^O^9891^XOBV LISTENER STARTUP^POSTMASTER^VISTA^VISTA^ZTDESC^VISTA^"
+^%ZTSK(4326,.02)="^VISTA^^"
+^%ZTSK(4326,.03)="No Description (%ZTLOAD)"
+^%ZTSK(4326,.04)=5623542165
+^%ZTSK(4326,.1)="B^65087,25372^Task's volume set not listed in index.^^^^^^"
+^%ZTSK(4326,.2)=""
+^%ZTSK(4326,.21)=""
+^%ZTSK(4326,.25)=""
+^%ZTSK(4326,.3,"DUZ(",0)="@"
+^%ZTSK(4326,.3,"XQSCH")=8
+^%ZTSK(4326,.3,"XQY")=9891
 ^%ZTSK(1082462,.1)="E^64013,39495^Interrupted While Running"
 ^%ZTSK(1082463,.1)="E^64013,39495^Interrupted While Running"
 ^%ZTSK(1082464,.1)="E^64013,39495^Interrupted While Running"
diff --git a/Packages/Kernel/Globals/9.4+PACKAGE.zwr b/Packages/Kernel/Globals/9.4+PACKAGE.zwr
index 5fcdea4dd95..b55501d783c 100644
--- a/Packages/Kernel/Globals/9.4+PACKAGE.zwr
+++ b/Packages/Kernel/Globals/9.4+PACKAGE.zwr
@@ -1,5 +1,5 @@
 OSEHRA ZGO Export: PACKAGE
-15-MAR-2019 06:18:38 ZWR
+15-MAR-2019 07:06:19 ZWR
 ^DIC(9.4,-1,"INI")="^2960819.165753"
 ^DIC(9.4,0)="PACKAGE^9.4I^232^144"
 ^DIC(9.4,0,"DD")="#"
@@ -93507,7 +93507,7 @@ OSEHRA ZGO Export: PACKAGE
 ^DIC(9.4,44,22,3,0)="3.0^3051119^2990416^1"
 ^DIC(9.4,44,22,3,1,0)="^^1^1^3051119"
 ^DIC(9.4,44,22,3,1,1,0)="Consult/Request Tracking and Resulting Package. Version 3.0."
-^DIC(9.4,44,22,3,"PAH",0)="^9.4901^85^85"
+^DIC(9.4,44,22,3,"PAH",0)="^9.4901^86^86"
 ^DIC(9.4,44,22,3,"PAH",1,0)="1^2990416^1"
 ^DIC(9.4,44,22,3,"PAH",1,1,0)="^^171^171^2990416"
 ^DIC(9.4,44,22,3,"PAH",1,1,1,0)="Consult/Request Tracking and Resulting Package. Version 3.0."
@@ -94430,6 +94430,7 @@ OSEHRA ZGO Export: PACKAGE
 ^DIC(9.4,44,22,3,"PAH",85,1,0)="^^2^2^3190314"
 ^DIC(9.4,44,22,3,"PAH",85,1,1,0)="Handles the GMRC portion of changing EARLIEST DATE in 123 to CLINICIALLY "
 ^DIC(9.4,44,22,3,"PAH",85,1,2,0)="INDICATED DATE."
+^DIC(9.4,44,22,3,"PAH",86,0)="110^3190315.070255^17"
 ^DIC(9.4,44,22,3,"PAH","B",1,1)=""
 ^DIC(9.4,44,22,3,"PAH","B",2,2)=""
 ^DIC(9.4,44,22,3,"PAH","B",4,4)=""
@@ -94453,6 +94454,7 @@ OSEHRA ZGO Export: PACKAGE
 ^DIC(9.4,44,22,3,"PAH","B",98,80)=""
 ^DIC(9.4,44,22,3,"PAH","B",104,82)=""
 ^DIC(9.4,44,22,3,"PAH","B",107,83)=""
+^DIC(9.4,44,22,3,"PAH","B",110,86)=""
 ^DIC(9.4,44,22,3,"PAH","B",114,84)=""
 ^DIC(9.4,44,22,3,"PAH","B","10 SEQ #7",7)=""
 ^DIC(9.4,44,22,3,"PAH","B","11 SEQ #8",8)=""
diff --git a/Packages/Kernel/Globals/9.6+BUILD.zwr b/Packages/Kernel/Globals/9.6+BUILD.zwr
index 5b5f0813ac3..179541d2a1b 100644
--- a/Packages/Kernel/Globals/9.6+BUILD.zwr
+++ b/Packages/Kernel/Globals/9.6+BUILD.zwr
@@ -1,6 +1,6 @@
 OSEHRA ZGO Export: BUILD
-15-MAR-2019 06:21:04 ZWR
-^XPD(9.6,0)="BUILD^9.6I^11124^10764"
+15-MAR-2019 07:08:39 ZWR
+^XPD(9.6,0)="BUILD^9.6I^11125^10765"
 ^XPD(9.6,1,0)="KERNEL - VIRGIN INSTALL 8.0^3^0^2950703^n"
 ^XPD(9.6,1,1,0)="^^3^3^2950703^"
 ^XPD(9.6,1,1,1,0)="Install files needed to support Kernel 8.0.  This package is"
@@ -1204488,6 +1204488,64 @@ OSEHRA ZGO Export: BUILD
 ^XPD(9.6,11124,"KRN","B",8994,8994)=""
 ^XPD(9.6,11124,"QUES",0)="^9.62^^"
 ^XPD(9.6,11124,"REQB",0)="^9.611^^"
+^XPD(9.6,11125,0)="GMRC*3.0*110^44^0^3180808^y"
+^XPD(9.6,11125,4,0)="^9.64PA^^"
+^XPD(9.6,11125,6)="^98"
+^XPD(9.6,11125,6.3)=6
+^XPD(9.6,11125,"ABPKG")="n"
+^XPD(9.6,11125,"INID")="^n"
+^XPD(9.6,11125,"INIT")="POST^GMRC110P"
+^XPD(9.6,11125,"KRN",0)="^9.67PA^779.2^20"
+^XPD(9.6,11125,"KRN",.4,0)=.4
+^XPD(9.6,11125,"KRN",.401,0)=.401
+^XPD(9.6,11125,"KRN",.402,0)=.402
+^XPD(9.6,11125,"KRN",.403,0)=.403
+^XPD(9.6,11125,"KRN",.5,0)=.5
+^XPD(9.6,11125,"KRN",.84,0)=.84
+^XPD(9.6,11125,"KRN",3.6,0)=3.6
+^XPD(9.6,11125,"KRN",3.8,0)=3.8
+^XPD(9.6,11125,"KRN",9.2,0)=9.2
+^XPD(9.6,11125,"KRN",9.8,0)=9.8
+^XPD(9.6,11125,"KRN",9.8,"NM",0)="^9.68A^2^2"
+^XPD(9.6,11125,"KRN",9.8,"NM",1,0)="GMRCSLM2^^0^B94486427"
+^XPD(9.6,11125,"KRN",9.8,"NM",2,0)="GMRC110P^^0^B7095361"
+^XPD(9.6,11125,"KRN",9.8,"NM","B","GMRC110P",2)=""
+^XPD(9.6,11125,"KRN",9.8,"NM","B","GMRCSLM2",1)=""
+^XPD(9.6,11125,"KRN",19,0)=19
+^XPD(9.6,11125,"KRN",19.1,0)=19.1
+^XPD(9.6,11125,"KRN",101,0)=101
+^XPD(9.6,11125,"KRN",409.61,0)=409.61
+^XPD(9.6,11125,"KRN",771,0)=771
+^XPD(9.6,11125,"KRN",779.2,0)=779.2
+^XPD(9.6,11125,"KRN",870,0)=870
+^XPD(9.6,11125,"KRN",8989.51,0)=8989.51
+^XPD(9.6,11125,"KRN",8989.52,0)=8989.52
+^XPD(9.6,11125,"KRN",8994,0)=8994
+^XPD(9.6,11125,"KRN","B",.4,.4)=""
+^XPD(9.6,11125,"KRN","B",.401,.401)=""
+^XPD(9.6,11125,"KRN","B",.402,.402)=""
+^XPD(9.6,11125,"KRN","B",.403,.403)=""
+^XPD(9.6,11125,"KRN","B",.5,.5)=""
+^XPD(9.6,11125,"KRN","B",.84,.84)=""
+^XPD(9.6,11125,"KRN","B",3.6,3.6)=""
+^XPD(9.6,11125,"KRN","B",3.8,3.8)=""
+^XPD(9.6,11125,"KRN","B",9.2,9.2)=""
+^XPD(9.6,11125,"KRN","B",9.8,9.8)=""
+^XPD(9.6,11125,"KRN","B",19,19)=""
+^XPD(9.6,11125,"KRN","B",19.1,19.1)=""
+^XPD(9.6,11125,"KRN","B",101,101)=""
+^XPD(9.6,11125,"KRN","B",409.61,409.61)=""
+^XPD(9.6,11125,"KRN","B",771,771)=""
+^XPD(9.6,11125,"KRN","B",779.2,779.2)=""
+^XPD(9.6,11125,"KRN","B",870,870)=""
+^XPD(9.6,11125,"KRN","B",8989.51,8989.51)=""
+^XPD(9.6,11125,"KRN","B",8989.52,8989.52)=""
+^XPD(9.6,11125,"KRN","B",8994,8994)=""
+^XPD(9.6,11125,"QDEF")="^^^^NO^^^^NO^^NO"
+^XPD(9.6,11125,"QUES",0)="^9.62^^"
+^XPD(9.6,11125,"REQB",0)="^9.611^1^1"
+^XPD(9.6,11125,"REQB",1,0)="GMRC*3.0*81^1"
+^XPD(9.6,11125,"REQB","B","GMRC*3.0*81",1)=""
 ^XPD(9.6,"B","A4A7*1.01*10",1312)=""
 ^XPD(9.6,"B","A4A7*1.01*11",1900)=""
 ^XPD(9.6,"B","A4A7*1.01*9",339)=""
@@ -1206870,6 +1206928,7 @@ OSEHRA ZGO Export: BUILD
 ^XPD(9.6,"B","GMRC*3.0*104",11066)=""
 ^XPD(9.6,"B","GMRC*3.0*107",11067)=""
 ^XPD(9.6,"B","GMRC*3.0*11",2645)=""
+^XPD(9.6,"B","GMRC*3.0*110",11125)=""
 ^XPD(9.6,"B","GMRC*3.0*114",11068)=""
 ^XPD(9.6,"B","GMRC*3.0*12",2950)=""
 ^XPD(9.6,"B","GMRC*3.0*13",2757)=""
@@ -1217666,6 +1217725,7 @@ OSEHRA ZGO Export: BUILD
 ^XPD(9.6,"C",44,11067)=""
 ^XPD(9.6,"C",44,11068)=""
 ^XPD(9.6,"C",44,11097)=""
+^XPD(9.6,"C",44,11125)=""
 ^XPD(9.6,"C",47,24)=""
 ^XPD(9.6,"C",47,25)=""
 ^XPD(9.6,"C",47,26)=""
diff --git a/Packages/Kernel/Globals/9.7+INSTALL.zwr b/Packages/Kernel/Globals/9.7+INSTALL.zwr
index a4aeb117bc4..32d85343aec 100644
--- a/Packages/Kernel/Globals/9.7+INSTALL.zwr
+++ b/Packages/Kernel/Globals/9.7+INSTALL.zwr
@@ -1,6 +1,6 @@
 OSEHRA ZGO Export: INSTALL
-15-MAR-2019 06:21:27 ZWR
-^XPD(9.7,0)="INSTALL^9.7I^10843^10701"
+15-MAR-2019 07:09:03 ZWR
+^XPD(9.7,0)="INSTALL^9.7I^10844^10702"
 ^XPD(9.7,1,0)="KERNEL - VIRGIN INSTALL 8.0^^2960531.10393^1^1^^^^3^0^.5"
 ^XPD(9.7,1,1)="2960604.094043^2960604.094043^2960604.094047"
 ^XPD(9.7,1,2)="Kernel 8.0 from ISC-SF by RSD  ;Created on Jul 10, 1995@09:28:18"
@@ -833988,6 +833988,67 @@ OSEHRA ZGO Export: INSTALL
 ^XPD(9.7,10843,"RTN",0)="^9.704A^1^1"
 ^XPD(9.7,10843,"RTN",1,0)="XUMVIDTA"
 ^XPD(9.7,10843,"RTN","B","XUMVIDTA",1)=""
+^XPD(9.7,10844,0)="GMRC*3.0*110^44^3190315.070249^10844^1^^0^0GMRC*3.0*110^3^0^17"
+^XPD(9.7,10844,1)="3190315.070255^3190315.070255^3190315.070255^3180808"
+^XPD(9.7,10844,2)="Extracted from mail message  ;Created on "
+^XPD(9.7,10844,6)="^98"
+^XPD(9.7,10844,"INI",0)="^9.713^1^1"
+^XPD(9.7,10844,"INI",1,0)="XPD PREINSTALL COMPLETED^3190315.070255"
+^XPD(9.7,10844,"INI","B","XPD PREINSTALL COMPLETED",1)=""
+^XPD(9.7,10844,"INIT",0)="^9.716^2^2"
+^XPD(9.7,10844,"INIT",1,0)="XPD POSTINSTALL COMPLETED^3190315.070255"
+^XPD(9.7,10844,"INIT",2,0)="XPD POSTINSTALL STARTED^3190315.070255"
+^XPD(9.7,10844,"INIT",2,1)="POST^GMRC110P"
+^XPD(9.7,10844,"INIT","B","XPD POSTINSTALL COMPLETED",1)=""
+^XPD(9.7,10844,"INIT","B","XPD POSTINSTALL STARTED",2)=""
+^XPD(9.7,10844,"MES",0)="^^31^31^3190315"
+^XPD(9.7,10844,"MES",1,0)=" "
+^XPD(9.7,10844,"MES",2,0)=" Install Started for GMRC*3.0*110 : "
+^XPD(9.7,10844,"MES",3,0)="               Mar 15, 2019@07:02:55"
+^XPD(9.7,10844,"MES",4,0)=" "
+^XPD(9.7,10844,"MES",5,0)="Build Distribution Date: Aug 08, 2018"
+^XPD(9.7,10844,"MES",6,0)=" "
+^XPD(9.7,10844,"MES",7,0)=" Installing Routines:"
+^XPD(9.7,10844,"MES",8,0)="               Mar 15, 2019@07:02:55"
+^XPD(9.7,10844,"MES",9,0)=" "
+^XPD(9.7,10844,"MES",10,0)=" Running Post-Install Routine: POST^GMRC110P"
+^XPD(9.7,10844,"MES",11,0)="******************************************************"
+^XPD(9.7,10844,"MES",12,0)="Your STATION 3N (STA3N) is 050 and"
+^XPD(9.7,10844,"MES",13,0)="has been recorded in the Parameters file."
+^XPD(9.7,10844,"MES",14,0)="******************************************************"
+^XPD(9.7,10844,"MES",15,0)=" "
+^XPD(9.7,10844,"MES",16,0)="******************************************************"
+^XPD(9.7,10844,"MES",17,0)="Commencing conversion of existing UCIDs to 050"
+^XPD(9.7,10844,"MES",18,0)=" "
+^XPD(9.7,10844,"MES",19,0)="******************************************************"
+^XPD(9.7,10844,"MES",20,0)="End of conversion."
+^XPD(9.7,10844,"MES",21,0)=" "
+^XPD(9.7,10844,"MES",22,0)=" Updating Routine file..."
+^XPD(9.7,10844,"MES",23,0)=" "
+^XPD(9.7,10844,"MES",24,0)=" Updating KIDS files..."
+^XPD(9.7,10844,"MES",25,0)=" "
+^XPD(9.7,10844,"MES",26,0)=" GMRC*3.0*110 Installed. "
+^XPD(9.7,10844,"MES",27,0)="               Mar 15, 2019@07:02:55"
+^XPD(9.7,10844,"MES",28,0)=" "
+^XPD(9.7,10844,"MES",29,0)=" Not a production UCI"
+^XPD(9.7,10844,"MES",30,0)=" "
+^XPD(9.7,10844,"MES",31,0)=" NO Install Message sent "
+^XPD(9.7,10844,"QUES",0)="^9.701^2^2"
+^XPD(9.7,10844,"QUES",1,0)="XPI1"
+^XPD(9.7,10844,"QUES",1,1)=0
+^XPD(9.7,10844,"QUES",1,"A")="Want KIDS to INHIBIT LOGONs during the install"
+^XPD(9.7,10844,"QUES",1,"B")="NO"
+^XPD(9.7,10844,"QUES",2,0)="XPZ1"
+^XPD(9.7,10844,"QUES",2,1)=0
+^XPD(9.7,10844,"QUES",2,"A")="Want to DISABLE Scheduled Options, Menu Options, and Protocols"
+^XPD(9.7,10844,"QUES",2,"B")="NO"
+^XPD(9.7,10844,"QUES","B","XPI1",1)=""
+^XPD(9.7,10844,"QUES","B","XPZ1",2)=""
+^XPD(9.7,10844,"RTN",0)="^9.704A^2^2"
+^XPD(9.7,10844,"RTN",1,0)="GMRC110P"
+^XPD(9.7,10844,"RTN",2,0)="GMRCSLM2"
+^XPD(9.7,10844,"RTN","B","GMRC110P",1)=""
+^XPD(9.7,10844,"RTN","B","GMRCSLM2",2)=""
 ^XPD(9.7,"ASP",1,1,1)=""
 ^XPD(9.7,"ASP",1,2,2)=""
 ^XPD(9.7,"ASP",3,1,3)=""
@@ -844689,6 +844750,7 @@ OSEHRA ZGO Export: INSTALL
 ^XPD(9.7,"ASP",10841,1,10841)=""
 ^XPD(9.7,"ASP",10842,1,10842)=""
 ^XPD(9.7,"ASP",10843,1,10843)=""
+^XPD(9.7,"ASP",10844,1,10844)=""
 ^XPD(9.7,"B","A4A7*1.01*10",1037)=""
 ^XPD(9.7,"B","A4A7*1.01*11",1611)=""
 ^XPD(9.7,"B","A4A7*1.01*11",1631)=""
@@ -846973,6 +847035,7 @@ OSEHRA ZGO Export: INSTALL
 ^XPD(9.7,"B","GMRC*3.0*104",10785)=""
 ^XPD(9.7,"B","GMRC*3.0*107",10786)=""
 ^XPD(9.7,"B","GMRC*3.0*11",2355)=""
+^XPD(9.7,"B","GMRC*3.0*110",10844)=""
 ^XPD(9.7,"B","GMRC*3.0*114",10787)=""
 ^XPD(9.7,"B","GMRC*3.0*12",2663)=""
 ^XPD(9.7,"B","GMRC*3.0*13",2470)=""
diff --git a/Packages/Kernel/Globals/9.8+ROUTINE.zwr b/Packages/Kernel/Globals/9.8+ROUTINE.zwr
index ba309ed8aa6..844bb7c43b5 100644
--- a/Packages/Kernel/Globals/9.8+ROUTINE.zwr
+++ b/Packages/Kernel/Globals/9.8+ROUTINE.zwr
@@ -1,6 +1,6 @@
 OSEHRA ZGO Export: ROUTINE
-15-MAR-2019 06:18:43 ZWR
-^DIC(9.8,0)="ROUTINE^9.8^35816^29243"
+15-MAR-2019 07:06:24 ZWR
+^DIC(9.8,0)="ROUTINE^9.8^35817^29244"
 ^DIC(9.8,0,"DD")="#"
 ^DIC(9.8,0,"DEL")="#"
 ^DIC(9.8,0,"GL")="^DIC(9.8,"
@@ -71559,7 +71559,7 @@ OSEHRA ZGO Export: ROUTINE
 ^DIC(9.8,18494,8,1,0)="COMPARE CONSULT/REQUEST TRACKING 3.0^19476998/55643288"
 ^DIC(9.8,18494,8,"B","COMPARE CONSULT/REQUEST TRACKI",1)=""
 ^DIC(9.8,18495,0)="GMRCSLM2^R"
-^DIC(9.8,18495,4.1)=3190314.132214
+^DIC(9.8,18495,4.1)=3190315.070255
 ^DIC(9.8,18495,8,0)="^9.818^1^1"
 ^DIC(9.8,18495,8,1,0)="COMPARE CONSULT/REQUEST TRACKING 3.0^23794727/58749629"
 ^DIC(9.8,18495,8,"B","COMPARE CONSULT/REQUEST TRACKI",1)=""
@@ -115685,6 +115685,8 @@ OSEHRA ZGO Export: ROUTINE
 ^DIC(9.8,35815,4.1)=3190315.003834
 ^DIC(9.8,35816,0)="XUMVIDTA^R"
 ^DIC(9.8,35816,4.1)=3190315.061414
+^DIC(9.8,35817,0)="GMRC110P^R"
+^DIC(9.8,35817,4.1)=3190315.070255
 ^DIC(9.8,"%",0)="^1.005^1^1"
 ^DIC(9.8,"%",1,0)="XU"
 ^DIC(9.8,"%","B","XU",1)=""
@@ -122416,6 +122418,7 @@ OSEHRA ZGO Export: ROUTINE
 ^DIC(9.8,"B","GMRC101C",1941)=""
 ^DIC(9.8,"B","GMRC101H",18453)=""
 ^DIC(9.8,"B","GMRC104",35764)=""
+^DIC(9.8,"B","GMRC110P",35817)=""
 ^DIC(9.8,"B","GMRC1233",20723)=""
 ^DIC(9.8,"B","GMRC1235",31274)=""
 ^DIC(9.8,"B","GMRC3P52",27887)=""