Install: SR*3.0*193

Patch Subject:  CVD FIELDS ASSIGNED WRONG VALUE
Description:

============
 This patch addresses one (1) issue:
 1. Preoperative CVD data fields assigned invalid values.
 Associated ticket(s):
 =====================
 1. INC0448967 - Preoperative CVD data fields assigned invalid values
 Associated NSR(s):
 ==================
 N/A
 Participating Test Sites:
 =========================
 Ann Arbor VAMC
 White River JCT
 Defect Tracking System Ticket(s) & Overview:
 ============================================
 INC0448967 - Preoperative CVD data fields assigned invalid values
 Problem:
 --------
 When a user is in the process of entering preoperative info using the
 "Preoperative Information (Enter/Edit") [SROA PREOP DATA] option
 and enters an "NS" (no study) in the CENTRAL NERVOUS SYSTEM (#210)
 grouping, which is a component of the SURGERY file (#130), the
 CVD fields, CVD REPAIR/OBSTRUCTION (#521) and HISTORY OF CVD (#522),
 are being assigned the "NS" value. Per definition of these fields
 in the data dictionary, this is an invalid value.
 Resolution:
 -----------
 The routine ^SROAPRE2 is modified to assign the value of zero (0)
 to both the CVD REPAIR/OBSTRUCTION (#521) and HISTORY OF CVD (#522),
 fields of the SURGERY file (#130) when the user enters "NS"
 (no study) at the CENTRAL NERVOUS SYSTEM (#210) grouping level.
 Components:
 ===========
 N/A

Use default answers for KIDS load/install questions.

Patch-Files: http://code.osehra.org/VistA.git/tree/master/Packages/Surgery/Patches/SR_3.0_193

Packages/Kernel/Globals/14.4+TASKS.zwr

@@ -1,6 +1,6 @@
 OSEHRA ZGO Export: TASKS
-23-MAY-2019 15:31:09 ZWR
-^%ZTSK(-1)=4971
+23-MAY-2019 16:57:04 ZWR
+^%ZTSK(-1)=4975
 ^%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^^"
@@ -47225,6 +47225,47 @@ OSEHRA ZGO Export: TASKS
 ^%ZTSK(4971,.3,"DUZ(",0)="@"
 ^%ZTSK(4971,.3,"XQSCH")=8
 ^%ZTSK(4971,.3,"XQY")=9891
+^%ZTSK(4972,0)="HOUR^XUTMHR^.5^^65156,60715^65156,60715^R^^^POSTMASTER^VISTA^VISTA^ZTDESC^^"
+^%ZTSK(4972,.02)="^VISTA^^"
+^%ZTSK(4972,.03)="Taskman Hourly Job"
+^%ZTSK(4972,.04)=5629539115
+^%ZTSK(4972,.1)="B^65156,60775^Task's volume set not listed in index.^^^^^^"
+^%ZTSK(4972,.2)=""
+^%ZTSK(4972,.21)=""
+^%ZTSK(4972,.25)=""
+^%ZTSK(4973,0)="ZTSK^XQ1^.5^VISTA^65156,60775^65156,60775^O^8853^HL AUTOSTART LINK MANAGER^POSTMASTER^VISTA^VISTA^ZTDESC^VISTA^"
+^%ZTSK(4973,.02)="^VISTA^^"
+^%ZTSK(4973,.03)="No Description (%ZTLOAD)"
+^%ZTSK(4973,.04)=5629539175
+^%ZTSK(4973,.1)="B^65156,60777^Task's volume set not listed in index.^^^^^^"
+^%ZTSK(4973,.2)=""
+^%ZTSK(4973,.21)=""
+^%ZTSK(4973,.25)=""
+^%ZTSK(4973,.3,"DUZ(",0)="@"
+^%ZTSK(4973,.3,"XQSCH")=10
+^%ZTSK(4973,.3,"XQY")=8853
+^%ZTSK(4974,0)="ZTSK^XQ1^.5^VISTA^65156,60775^65156,60775^O^8412^HL TASK RESTART^POSTMASTER^VISTA^VISTA^ZTDESC^VISTA^"
+^%ZTSK(4974,.02)="^VISTA^^"
+^%ZTSK(4974,.03)="No Description (%ZTLOAD)"
+^%ZTSK(4974,.04)=5629539175
+^%ZTSK(4974,.1)="B^65156,60779^Task's volume set not listed in index.^^^^^^"
+^%ZTSK(4974,.2)=""
+^%ZTSK(4974,.21)=""
+^%ZTSK(4974,.25)=""
+^%ZTSK(4974,.3,"DUZ(",0)="@"
+^%ZTSK(4974,.3,"XQSCH")=11
+^%ZTSK(4974,.3,"XQY")=8412
+^%ZTSK(4975,0)="ZTSK^XQ1^.5^VISTA^65156,60775^65156,60775^O^9891^XOBV LISTENER STARTUP^POSTMASTER^VISTA^VISTA^ZTDESC^VISTA^"
+^%ZTSK(4975,.02)="^VISTA^^"
+^%ZTSK(4975,.03)="No Description (%ZTLOAD)"
+^%ZTSK(4975,.04)=5629539175
+^%ZTSK(4975,.1)="B^65156,60781^Task's volume set not listed in index.^^^^^^"
+^%ZTSK(4975,.2)=""
+^%ZTSK(4975,.21)=""
+^%ZTSK(4975,.25)=""
+^%ZTSK(4975,.3,"DUZ(",0)="@"
+^%ZTSK(4975,.3,"XQSCH")=8
+^%ZTSK(4975,.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"