diff --git a/Packages/Kernel/Globals/14.4+TASKS.zwr b/Packages/Kernel/Globals/14.4+TASKS.zwr
index 0a603e258ce..abc2ef6f459 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
-22-MAY-2019 09:28:40 ZWR
-^%ZTSK(-1)=4881
+22-MAY-2019 10:47:56 ZWR
+^%ZTSK(-1)=4885
 ^%ZTSK(0)="TASKS^14.4^4344"
 ^%ZTSK(1001,0)="TASK^XMXBULL^16^^63957,36927^63957,36927^R^^^PATCH,USER^PLA^PLA^ZTDESC^^"
 ^%ZTSK(1001,.02)="^PLA^^"
@@ -46206,6 +46206,47 @@ OSEHRA ZGO Export: TASKS
 ^%ZTSK(4881,.3,"DUZ(",0)="@"
 ^%ZTSK(4881,.3,"XQSCH")=8
 ^%ZTSK(4881,.3,"XQY")=9891
+^%ZTSK(4882,0)="HOUR^XUTMHR^.5^^65155,38561^65155,38561^R^^^POSTMASTER^VISTA^VISTA^ZTDESC^^"
+^%ZTSK(4882,.02)="^VISTA^^"
+^%ZTSK(4882,.03)="Taskman Hourly Job"
+^%ZTSK(4882,.04)=5629430561
+^%ZTSK(4882,.1)="B^65155,38621^Task's volume set not listed in index.^^^^^^"
+^%ZTSK(4882,.2)=""
+^%ZTSK(4882,.21)=""
+^%ZTSK(4882,.25)=""
+^%ZTSK(4883,0)="ZTSK^XQ1^.5^VISTA^65155,38621^65155,38621^O^8853^HL AUTOSTART LINK MANAGER^POSTMASTER^VISTA^VISTA^ZTDESC^VISTA^"
+^%ZTSK(4883,.02)="^VISTA^^"
+^%ZTSK(4883,.03)="No Description (%ZTLOAD)"
+^%ZTSK(4883,.04)=5629430621
+^%ZTSK(4883,.1)="B^65155,38623^Task's volume set not listed in index.^^^^^^"
+^%ZTSK(4883,.2)=""
+^%ZTSK(4883,.21)=""
+^%ZTSK(4883,.25)=""
+^%ZTSK(4883,.3,"DUZ(",0)="@"
+^%ZTSK(4883,.3,"XQSCH")=10
+^%ZTSK(4883,.3,"XQY")=8853
+^%ZTSK(4884,0)="ZTSK^XQ1^.5^VISTA^65155,38621^65155,38621^O^8412^HL TASK RESTART^POSTMASTER^VISTA^VISTA^ZTDESC^VISTA^"
+^%ZTSK(4884,.02)="^VISTA^^"
+^%ZTSK(4884,.03)="No Description (%ZTLOAD)"
+^%ZTSK(4884,.04)=5629430621
+^%ZTSK(4884,.1)="B^65155,38625^Task's volume set not listed in index.^^^^^^"
+^%ZTSK(4884,.2)=""
+^%ZTSK(4884,.21)=""
+^%ZTSK(4884,.25)=""
+^%ZTSK(4884,.3,"DUZ(",0)="@"
+^%ZTSK(4884,.3,"XQSCH")=11
+^%ZTSK(4884,.3,"XQY")=8412
+^%ZTSK(4885,0)="ZTSK^XQ1^.5^VISTA^65155,38621^65155,38621^O^9891^XOBV LISTENER STARTUP^POSTMASTER^VISTA^VISTA^ZTDESC^VISTA^"
+^%ZTSK(4885,.02)="^VISTA^^"
+^%ZTSK(4885,.03)="No Description (%ZTLOAD)"
+^%ZTSK(4885,.04)=5629430621
+^%ZTSK(4885,.1)="B^65155,38627^Task's volume set not listed in index.^^^^^^"
+^%ZTSK(4885,.2)=""
+^%ZTSK(4885,.21)=""
+^%ZTSK(4885,.25)=""
+^%ZTSK(4885,.3,"DUZ(",0)="@"
+^%ZTSK(4885,.3,"XQSCH")=8
+^%ZTSK(4885,.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 3996da1d9aa..8295268bd40 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
-22-MAY-2019 09:28:43 ZWR
+22-MAY-2019 10:47:58 ZWR
 ^DIC(9.4,-1,"INI")="^2960819.165753"
 ^DIC(9.4,0)="PACKAGE^9.4I^232^144"
 ^DIC(9.4,0,"DD")="#"
@@ -52929,7 +52929,7 @@ OSEHRA ZGO Export: PACKAGE
 ^DIC(9.4,14,20,"B",2,1)=""
 ^DIC(9.4,14,22,0)="^9.49I^5.9^1"
 ^DIC(9.4,14,22,5.9,0)="5.2^3051119^2960610"
-^DIC(9.4,14,22,5.9,"PAH",0)="^9.4901^319^319"
+^DIC(9.4,14,22,5.9,"PAH",0)="^9.4901^320^320"
 ^DIC(9.4,14,22,5.9,"PAH",1,0)="105 SEQ #78^2960611^1"
 ^DIC(9.4,14,22,5.9,"PAH",1,1,0)="^^2^2^2960611"
 ^DIC(9.4,14,22,5.9,"PAH",1,1,1,0)="This is patch LR*5.2*105 which will transport menus, data dictionary"
@@ -80785,6 +80785,13 @@ OSEHRA ZGO Export: PACKAGE
 ^DIC(9.4,14,22,5.9,"PAH",319,0)="513^3190522.092503^17"
 ^DIC(9.4,14,22,5.9,"PAH",319,1,0)="^^1^1^3190522"
 ^DIC(9.4,14,22,5.9,"PAH",319,1,1,0)="Problem with option Results entry (batch) [LRMISTUF]"
+^DIC(9.4,14,22,5.9,"PAH",320,0)="514^3190522.104351^17"
+^DIC(9.4,14,22,5.9,"PAH",320,1,0)="^^5^5^3190522"
+^DIC(9.4,14,22,5.9,"PAH",320,1,1,0)="This patch addresses one (1) issue:"
+^DIC(9.4,14,22,5.9,"PAH",320,1,2,0)=" "
+^DIC(9.4,14,22,5.9,"PAH",320,1,3,0)="Anatomic Pathology Log-In does not require that the patient's sex must "
+^DIC(9.4,14,22,5.9,"PAH",320,1,4,0)="match the SEX SPECIFIC (#2.5) field in the TOPOGRAPHY FIELD (#61) file for"
+^DIC(9.4,14,22,5.9,"PAH",320,1,5,0)="specimens (if the sex specific field is defined)."
 ^DIC(9.4,14,22,5.9,"PAH","B",121,30)=""
 ^DIC(9.4,14,22,5.9,"PAH","B",128,14)=""
 ^DIC(9.4,14,22,5.9,"PAH","B",153,40)=""
@@ -80874,6 +80881,7 @@ OSEHRA ZGO Export: PACKAGE
 ^DIC(9.4,14,22,5.9,"PAH","B",510,312)=""
 ^DIC(9.4,14,22,5.9,"PAH","B",511,316)=""
 ^DIC(9.4,14,22,5.9,"PAH","B",513,319)=""
+^DIC(9.4,14,22,5.9,"PAH","B",514,320)=""
 ^DIC(9.4,14,22,5.9,"PAH","B","100 SEQ #91",2)=""
 ^DIC(9.4,14,22,5.9,"PAH","B","101 SEQ #101",8)=""
 ^DIC(9.4,14,22,5.9,"PAH","B","105 SEQ #78",1)=""
diff --git a/Packages/Kernel/Globals/9.6+BUILD.zwr b/Packages/Kernel/Globals/9.6+BUILD.zwr
index e1293b94023..f858de82867 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
-22-MAY-2019 09:31:10 ZWR
-^XPD(9.6,0)="BUILD^9.6I^11244^10884"
+22-MAY-2019 10:50:39 ZWR
+^XPD(9.6,0)="BUILD^9.6I^11245^10885"
 ^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"
@@ -1215895,6 +1215895,87 @@ OSEHRA ZGO Export: BUILD
 ^XPD(9.6,11244,"REQB",0)="^9.611^1^1"
 ^XPD(9.6,11244,"REQB",1,0)="LR*5.2*508^2"
 ^XPD(9.6,11244,"REQB","B","LR*5.2*508",1)=""
+^XPD(9.6,11245,0)="LR*5.2*514^14^0^3190205^y"
+^XPD(9.6,11245,1,0)="^^5^5^3181130^"
+^XPD(9.6,11245,1,1,0)="This patch addresses one (1) issue:"
+^XPD(9.6,11245,1,2,0)=" "
+^XPD(9.6,11245,1,3,0)="Anatomic Pathology Log-In does not require that the patient's sex must "
+^XPD(9.6,11245,1,4,0)="match the SEX SPECIFIC (#2.5) field in the TOPOGRAPHY FIELD (#61) file for"
+^XPD(9.6,11245,1,5,0)="specimens (if the sex specific field is defined)."
+^XPD(9.6,11245,4,0)="^9.64PA^63^1"
+^XPD(9.6,11245,4,63,0)=63
+^XPD(9.6,11245,4,63,2,0)="^9.641^63.202^3"
+^XPD(9.6,11245,4,63,2,63.202,0)="SPECIMEN  (sub-file)"
+^XPD(9.6,11245,4,63,2,63.202,1,0)="^9.6411^.06^1"
+^XPD(9.6,11245,4,63,2,63.202,1,.06,0)="SPECIMEN TOPOGRAPHY"
+^XPD(9.6,11245,4,63,2,63.812,0)="SPECIMEN  (sub-file)"
+^XPD(9.6,11245,4,63,2,63.812,1,0)="^9.6411^.06^1"
+^XPD(9.6,11245,4,63,2,63.812,1,.06,0)="SPECIMEN TOPOGRAPHY"
+^XPD(9.6,11245,4,63,2,63.902,0)="SPECIMEN  (sub-file)"
+^XPD(9.6,11245,4,63,2,63.902,1,0)="^9.6411^.06^1"
+^XPD(9.6,11245,4,63,2,63.902,1,.06,0)="SPECIMEN TOPOGRAPHY"
+^XPD(9.6,11245,4,63,222)="y^n^p^^^^n^^n"
+^XPD(9.6,11245,4,63,224)=""
+^XPD(9.6,11245,4,"APDD",63,63.202)=""
+^XPD(9.6,11245,4,"APDD",63,63.202,.06)=""
+^XPD(9.6,11245,4,"APDD",63,63.812)=""
+^XPD(9.6,11245,4,"APDD",63,63.812,.06)=""
+^XPD(9.6,11245,4,"APDD",63,63.902)=""
+^XPD(9.6,11245,4,"APDD",63,63.902,.06)=""
+^XPD(9.6,11245,4,"B",63,63)=""
+^XPD(9.6,11245,6)="^419"
+^XPD(9.6,11245,6.3)=17
+^XPD(9.6,11245,"ABPKG")="n"
+^XPD(9.6,11245,"KRN",0)="^9.67PA^1.61^23"
+^XPD(9.6,11245,"KRN",.4,0)=.4
+^XPD(9.6,11245,"KRN",.401,0)=.401
+^XPD(9.6,11245,"KRN",.402,0)=.402
+^XPD(9.6,11245,"KRN",.403,0)=.403
+^XPD(9.6,11245,"KRN",.5,0)=.5
+^XPD(9.6,11245,"KRN",.84,0)=.84
+^XPD(9.6,11245,"KRN",1.6,0)=1.6
+^XPD(9.6,11245,"KRN",1.61,0)=1.61
+^XPD(9.6,11245,"KRN",1.62,0)=1.62
+^XPD(9.6,11245,"KRN",3.6,0)=3.6
+^XPD(9.6,11245,"KRN",3.8,0)=3.8
+^XPD(9.6,11245,"KRN",9.2,0)=9.2
+^XPD(9.6,11245,"KRN",9.8,0)=9.8
+^XPD(9.6,11245,"KRN",19,0)=19
+^XPD(9.6,11245,"KRN",19.1,0)=19.1
+^XPD(9.6,11245,"KRN",101,0)=101
+^XPD(9.6,11245,"KRN",409.61,0)=409.61
+^XPD(9.6,11245,"KRN",771,0)=771
+^XPD(9.6,11245,"KRN",779.2,0)=779.2
+^XPD(9.6,11245,"KRN",870,0)=870
+^XPD(9.6,11245,"KRN",8989.51,0)=8989.51
+^XPD(9.6,11245,"KRN",8989.52,0)=8989.52
+^XPD(9.6,11245,"KRN",8994,0)=8994
+^XPD(9.6,11245,"KRN","B",.4,.4)=""
+^XPD(9.6,11245,"KRN","B",.401,.401)=""
+^XPD(9.6,11245,"KRN","B",.402,.402)=""
+^XPD(9.6,11245,"KRN","B",.403,.403)=""
+^XPD(9.6,11245,"KRN","B",.5,.5)=""
+^XPD(9.6,11245,"KRN","B",.84,.84)=""
+^XPD(9.6,11245,"KRN","B",1.6,1.6)=""
+^XPD(9.6,11245,"KRN","B",1.61,1.61)=""
+^XPD(9.6,11245,"KRN","B",1.62,1.62)=""
+^XPD(9.6,11245,"KRN","B",3.6,3.6)=""
+^XPD(9.6,11245,"KRN","B",3.8,3.8)=""
+^XPD(9.6,11245,"KRN","B",9.2,9.2)=""
+^XPD(9.6,11245,"KRN","B",9.8,9.8)=""
+^XPD(9.6,11245,"KRN","B",19,19)=""
+^XPD(9.6,11245,"KRN","B",19.1,19.1)=""
+^XPD(9.6,11245,"KRN","B",101,101)=""
+^XPD(9.6,11245,"KRN","B",409.61,409.61)=""
+^XPD(9.6,11245,"KRN","B",771,771)=""
+^XPD(9.6,11245,"KRN","B",779.2,779.2)=""
+^XPD(9.6,11245,"KRN","B",870,870)=""
+^XPD(9.6,11245,"KRN","B",8989.51,8989.51)=""
+^XPD(9.6,11245,"KRN","B",8989.52,8989.52)=""
+^XPD(9.6,11245,"KRN","B",8994,8994)=""
+^XPD(9.6,11245,"QDEF")="^^^^NO^^^^NO^^NO"
+^XPD(9.6,11245,"QUES",0)="^9.62^^"
+^XPD(9.6,11245,"REQB",0)="^9.611^^"
 ^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)=""
@@ -1220078,6 +1220159,7 @@ OSEHRA ZGO Export: BUILD
 ^XPD(9.6,"B","LR*5.2*510",11062)=""
 ^XPD(9.6,"B","LR*5.2*511",11212)=""
 ^XPD(9.6,"B","LR*5.2*513",11244)=""
+^XPD(9.6,"B","LR*5.2*514",11245)=""
 ^XPD(9.6,"B","LR*5.2*59",257)=""
 ^XPD(9.6,"B","LR*5.2*72",165)=""
 ^XPD(9.6,"B","LR*5.2*90",1171)=""
@@ -1228350,6 +1228432,7 @@ OSEHRA ZGO Export: BUILD
 ^XPD(9.6,"C",14,11213)=""
 ^XPD(9.6,"C",14,11228)=""
 ^XPD(9.6,"C",14,11244)=""
+^XPD(9.6,"C",14,11245)=""
 ^XPD(9.6,"C",18,169)=""
 ^XPD(9.6,"C",18,217)=""
 ^XPD(9.6,"C",18,245)=""
diff --git a/Packages/Kernel/Globals/9.7+INSTALL.zwr b/Packages/Kernel/Globals/9.7+INSTALL.zwr
index 071c9623604..abdb390382e 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
-22-MAY-2019 09:31:30 ZWR
-^XPD(9.7,0)="INSTALL^9.7I^10963^10821"
+22-MAY-2019 10:50:59 ZWR
+^XPD(9.7,0)="INSTALL^9.7I^10964^10822"
 ^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"
@@ -843060,6 +843060,53 @@ OSEHRA ZGO Export: INSTALL
 ^XPD(9.7,10963,"RTN",0)="^9.704A^1^1"
 ^XPD(9.7,10963,"RTN",1,0)="LRMISTF"
 ^XPD(9.7,10963,"RTN","B","LRMISTF",1)=""
+^XPD(9.7,10964,0)="LR*5.2*514^14^3190522.104345^10964^1^^0^0LR*5.2*514^3^0^17"
+^XPD(9.7,10964,1)="3190522.10435^3190522.10435^3190522.104351^3190205"
+^XPD(9.7,10964,2)="Extracted from mail message  ;Created on "
+^XPD(9.7,10964,4,0)="^9.714P^63^1"
+^XPD(9.7,10964,4,63,0)="63^3190522.104351"
+^XPD(9.7,10964,4,"B",63,63)=""
+^XPD(9.7,10964,6)="^419"
+^XPD(9.7,10964,"INI",0)="^9.713^1^1"
+^XPD(9.7,10964,"INI",1,0)="XPD PREINSTALL COMPLETED^3190522.10435"
+^XPD(9.7,10964,"INI","B","XPD PREINSTALL COMPLETED",1)=""
+^XPD(9.7,10964,"INIT",0)="^9.716^1^1"
+^XPD(9.7,10964,"INIT",1,0)="XPD POSTINSTALL COMPLETED^3190522.104351"
+^XPD(9.7,10964,"INIT","B","XPD POSTINSTALL COMPLETED",1)=""
+^XPD(9.7,10964,"MES",0)="^^22^22^3190522"
+^XPD(9.7,10964,"MES",1,0)=" "
+^XPD(9.7,10964,"MES",2,0)=" Install Started for LR*5.2*514 : "
+^XPD(9.7,10964,"MES",3,0)="               May 22, 2019@10:43:50"
+^XPD(9.7,10964,"MES",4,0)=" "
+^XPD(9.7,10964,"MES",5,0)="Build Distribution Date: Feb 05, 2019"
+^XPD(9.7,10964,"MES",6,0)=" "
+^XPD(9.7,10964,"MES",7,0)=" Installing Routines:"
+^XPD(9.7,10964,"MES",8,0)="               May 22, 2019@10:43:50"
+^XPD(9.7,10964,"MES",9,0)=" "
+^XPD(9.7,10964,"MES",10,0)=" Installing Data Dictionaries: "
+^XPD(9.7,10964,"MES",11,0)="               May 22, 2019@10:43:51"
+^XPD(9.7,10964,"MES",12,0)=" "
+^XPD(9.7,10964,"MES",13,0)=" Updating Routine file..."
+^XPD(9.7,10964,"MES",14,0)=" "
+^XPD(9.7,10964,"MES",15,0)=" Updating KIDS files..."
+^XPD(9.7,10964,"MES",16,0)=" "
+^XPD(9.7,10964,"MES",17,0)=" LR*5.2*514 Installed. "
+^XPD(9.7,10964,"MES",18,0)="               May 22, 2019@10:43:51"
+^XPD(9.7,10964,"MES",19,0)=" "
+^XPD(9.7,10964,"MES",20,0)=" Not a production UCI"
+^XPD(9.7,10964,"MES",21,0)=" "
+^XPD(9.7,10964,"MES",22,0)=" NO Install Message sent "
+^XPD(9.7,10964,"QUES",0)="^9.701^2^2"
+^XPD(9.7,10964,"QUES",1,0)="XPI1"
+^XPD(9.7,10964,"QUES",1,1)=0
+^XPD(9.7,10964,"QUES",1,"A")="Want KIDS to INHIBIT LOGONs during the install"
+^XPD(9.7,10964,"QUES",1,"B")="NO"
+^XPD(9.7,10964,"QUES",2,0)="XPZ1"
+^XPD(9.7,10964,"QUES",2,1)=0
+^XPD(9.7,10964,"QUES",2,"A")="Want to DISABLE Scheduled Options, Menu Options, and Protocols"
+^XPD(9.7,10964,"QUES",2,"B")="NO"
+^XPD(9.7,10964,"QUES","B","XPI1",1)=""
+^XPD(9.7,10964,"QUES","B","XPZ1",2)=""
 ^XPD(9.7,"ASP",1,1,1)=""
 ^XPD(9.7,"ASP",1,2,2)=""
 ^XPD(9.7,"ASP",3,1,3)=""
@@ -853881,6 +853928,7 @@ OSEHRA ZGO Export: INSTALL
 ^XPD(9.7,"ASP",10961,1,10961)=""
 ^XPD(9.7,"ASP",10962,1,10962)=""
 ^XPD(9.7,"ASP",10963,1,10963)=""
+^XPD(9.7,"ASP",10964,1,10964)=""
 ^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)=""
@@ -857975,6 +858023,7 @@ OSEHRA ZGO Export: INSTALL
 ^XPD(9.7,"B","LR*5.2*510",10781)=""
 ^XPD(9.7,"B","LR*5.2*511",10931)=""
 ^XPD(9.7,"B","LR*5.2*513",10963)=""
+^XPD(9.7,"B","LR*5.2*514",10964)=""
 ^XPD(9.7,"B","LR*5.2*59",270)=""
 ^XPD(9.7,"B","LR*5.2*72",174)=""
 ^XPD(9.7,"B","LR*5.2*90",898)=""
diff --git a/Packages/VA FileMan/Globals/DD.zwr b/Packages/VA FileMan/Globals/DD.zwr
index 1ddc13d3ca3..a30212669dc 100644
--- a/Packages/VA FileMan/Globals/DD.zwr	
+++ b/Packages/VA FileMan/Globals/DD.zwr	
@@ -1,5 +1,5 @@
 OSEHRA ZGO Export: ^DD
-22-MAY-2019 03:03:55 ZWR
+22-MAY-2019 10:48:00 ZWR
 ^DD(0,0)="ATTRIBUTE^N^999^41"
 ^DD(0,0,"IX","ACOMP",0,"9.01")=""
 ^DD(0,0,"IX","AUD",0,"1.1")=""
@@ -139204,7 +139204,7 @@ OSEHRA ZGO Export: ^DD
 ^DD("62.93","RQ",".01")=""
 ^DD(63,0)="FIELD^NL^102.2^97"
 ^DD(63,0,"DDA")="N"
-^DD(63,0,"DT")=3180601
+^DD(63,0,"DT")=3190522
 ^DD(63,0,"ID",".02")="W:$D(^(""0"")) ""   "",$S($D(^DIC(+$P(^(""0""),U,2),0))#2:$P(^(0),U,1),1:""""),$E(^LR(Y,0),0)"
 ^DD(63,0,"ID",".03")="W:$D(^(""0"")) ""   "" S DA=Y,PDY=Y X ^DD(63,.03,2) W Y S Y=PDY K PDY,DA"
 ^DD(63,0,"IX","AAU",63,11)=""
@@ -147870,8 +147870,8 @@ OSEHRA ZGO Export: ^DD
 ^DD("63.201",".01","DT")=2850302
 ^DD("63.201","B","GROSS DESCRIPTION",".01")=""
 ^DD("63.201","GL",0,1,".01")=""
-^DD("63.202",0)="SPECIMEN SUB-FIELD^NL^1^4"
-^DD("63.202",0,"DT")=3030306
+^DD("63.202",0)="FIELD^NL^1^4"
+^DD("63.202",0,"DT")=3190522
 ^DD("63.202",0,"NM","SPECIMEN")=""
 ^DD("63.202",0,"UP")=63.02
 ^DD("63.202",".01",0)="SPECIMEN^MF^^0;1^K:$L(X)>75!($L(X)<2) X"
@@ -147879,10 +147879,15 @@ OSEHRA ZGO Export: ^DD
 ^DD("63.202",".01",21,0)="^^1^1^2911127^"
 ^DD("63.202",".01",21,1,0)="This is the specimen submitted for testing."
 ^DD("63.202",".01","DT")=2870803
-^DD("63.202",".06",0)="SPECIMEN TOPOGRAPHY^P61'^LAB(61,^0;6^Q"
-^DD("63.202",".06",21,0)="^^1^1^3051125^"
-^DD("63.202",".06",21,1,0)="This field contains the topography location for this test."
-^DD("63.202",".06","DT")=3051125
+^DD("63.202",".06",0)="SPECIMEN TOPOGRAPHY^*P61'^LAB(61,^0;6^S DIC(""S"")=""I $P(^LAB(61,+Y,0),U,3)=""""""""!($P(^LAB(61,+Y,0),U,3)=$G(SEX))"" D ^DIC K DIC S DIC=$G(DIE),X=+Y K:Y<0 X"
+^DD("63.202",".06",3)="This field contains the topography location for this test."
+^DD("63.202",".06",12)="If this message appears after entering a topography, the entry might be: (1) not on file; (2) misspelled; or (3) the topography has a restriction by sex that does not match the patient's sex."
+^DD("63.202",".06","12.1")="S DIC(""S"")=""I $P(^LAB(61,+Y,0),U,3)=""""""""!($P(^LAB(61,+Y,0),U,3)=$G(SEX))"""
+^DD("63.202",".06",21,0)="^^3^3^3181130^"
+^DD("63.202",".06",21,1,0)="This field contains the topography location for this test. "
+^DD("63.202",".06",21,2,0)="If the SEX SPECIFIC (#2.5) field of the TOPOGRAPHY FIELD (#61) file"
+^DD("63.202",".06",21,3,0)="is defined, the sex of the patient must match."
+^DD("63.202",".06","DT")=3190205
 ^DD("63.202",".07",0)="COLLECTION SAMPLE^P62'^LAB(62,^0;7^Q"
 ^DD("63.202",".07",21,0)="^^1^1^3051125^"
 ^DD("63.202",".07",21,1,0)="  This field contains the collection sample for this test."
@@ -150950,8 +150955,8 @@ OSEHRA ZGO Export: ^DD
 ^DD("63.811",".01","DT")=2930715
 ^DD("63.811","B","MICROSCOPIC DESCRIPTION",".01")=""
 ^DD("63.811","GL",0,1,".01")=""
-^DD("63.812",0)="SPECIMEN SUB-FIELD^NL^3^10"
-^DD("63.812",0,"DT")=3030306
+^DD("63.812",0)="FIELD^NL^3^10"
+^DD("63.812",0,"DT")=3190522
 ^DD("63.812",0,"IX","B","63.812",".01")=""
 ^DD("63.812",0,"NM","SPECIMEN")=""
 ^DD("63.812",0,"UP")=63.08
@@ -150994,10 +150999,15 @@ OSEHRA ZGO Export: ^DD
 ^DD("63.812",".05",21,0)="^^1^1^2940510^"
 ^DD("63.812",".05",21,1,0)="Whether the gross description is counted for workload"
 ^DD("63.812",".05","DT")=2910717
-^DD("63.812",".06",0)="SPECIMEN TOPOGRAPHY^P61'^LAB(61,^0;6^Q"
-^DD("63.812",".06",21,0)="^.001^1^1^3070208^^^"
-^DD("63.812",".06",21,1,0)="This field contains the topography location for this test."
-^DD("63.812",".06","DT")=3070208
+^DD("63.812",".06",0)="SPECIMEN TOPOGRAPHY^*P61'^LAB(61,^0;6^S DIC(""S"")=""I $P(^LAB(61,+Y,0),U,3)=""""""""!($P(^LAB(61,+Y,0),U,3)=$G(SEX))"" D ^DIC K DIC S DIC=$G(DIE),X=+Y K:Y<0 X"
+^DD("63.812",".06",3)="This field contains the topography location for this test."
+^DD("63.812",".06",12)="If this message appears after entering a topography, the entry might be: (1) not on file; (2) misspelled; or (3) the topography has a restriction by sex that does not match the patient's sex."
+^DD("63.812",".06","12.1")="S DIC(""S"")=""I $P(^LAB(61,+Y,0),U,3)=""""""""!($P(^LAB(61,+Y,0),U,3)=$G(SEX))"""
+^DD("63.812",".06",21,0)="^^3^3^3181130^"
+^DD("63.812",".06",21,1,0)="This field contains the topography location for this test. "
+^DD("63.812",".06",21,2,0)="If the SEX SPECIFIC (#2.5) field of the TOPOGRAPHY FIELD (#61) file"
+^DD("63.812",".06",21,3,0)="is defined, the sex of the patient must match."
+^DD("63.812",".06","DT")=3190205
 ^DD("63.812",".07",0)="COLLECTION SAMPLE^P62'^LAB(62,^0;7^Q"
 ^DD("63.812",".07",21,0)="^.001^1^1^3070208^^^"
 ^DD("63.812",".07",21,1,0)="This field contains the collection sample for this test. "
@@ -151615,8 +151625,8 @@ OSEHRA ZGO Export: ^DD
 ^DD("63.901",".01","DT")=2850227
 ^DD("63.901","B","ICD DIAGNOSIS",".01")=""
 ^DD("63.901","GL",0,1,".01")=""
-^DD("63.902",0)="SPECIMEN SUB-FIELD^NL^5^9"
-^DD("63.902",0,"DT")=3030306
+^DD("63.902",0)="FIELD^NL^5^9"
+^DD("63.902",0,"DT")=3190522
 ^DD("63.902",0,"IX","B","63.902",".01")=""
 ^DD("63.902",0,"NM","SPECIMEN")=""
 ^DD("63.902",0,"UP")=63.09
@@ -151639,10 +151649,15 @@ OSEHRA ZGO Export: ^DD
 ^DD("63.902",".02",21,2,0)=" The entry is composed of accession WKLD codes and one or more"
 ^DD("63.902",".02",21,3,0)=" cytology procedures associated with specimen processing."
 ^DD("63.902",".02","DT")=2910507
-^DD("63.902",".06",0)="SPECIMEN TOPOGRAPHY^P61'^LAB(61,^0;6^Q"
-^DD("63.902",".06",21,0)="^^1^1^3051125^"
+^DD("63.902",".06",0)="SPECIMEN TOPOGRAPHY^*P61'^LAB(61,^0;6^S DIC(""S"")=""I $P(^LAB(61,+Y,0),U,3)=""""""""!($P(^LAB(61,+Y,0),U,3)=$G(SEX))"" D ^DIC K DIC S DIC=$G(DIE),X=+Y K:Y<0 X"
+^DD("63.902",".06",3)="This field contains the topography location for this test."
+^DD("63.902",".06",12)="If this message appears after entering a topography, the entry might be: (1) not on file; (2) misspelled; or (3) the topography has a restriction by sex that does not match the patient's sex."
+^DD("63.902",".06","12.1")="S DIC(""S"")=""I $P(^LAB(61,+Y,0),U,3)=""""""""!($P(^LAB(61,+Y,0),U,3)=$G(SEX))"""
+^DD("63.902",".06",21,0)="^^3^3^3181130^"
 ^DD("63.902",".06",21,1,0)="This field contains the topography location for this test. "
-^DD("63.902",".06","DT")=3051125
+^DD("63.902",".06",21,2,0)="If the SEX SPECIFIC (#2.5) field of the TOPOGRAPHY FIELD (#61) file"
+^DD("63.902",".06",21,3,0)="is defined, the sex of the patient must match."
+^DD("63.902",".06","DT")=3190205
 ^DD("63.902",".07",0)="COLLECTION SAMPLE^P62'^LAB(62,^0;7^Q"
 ^DD("63.902",".07",21,0)="^^1^1^3051125^"
 ^DD("63.902",".07",21,1,0)="This field contains the collection sample for this test.  "