Install: DG*5.3*984

Patch Subject:  SOCIAL WORK DECOMMISSION - RETIRING API
Description:

============
 Patch DG*5.3*984 modifies routine VAFHLZPD to use a different Application
 Program Interface (API) call when retrieving the Homeless Indicator due
 to the decommissioning of the Social Work (SOWK) Package.
 Patch Components:
 -----------------
 Files & Fields Associated:
 File Name (Number)      Field Name (Number)     New/Modified/Deleted
 ------------------      -------------------     --------------------
 N/A
 Forms Associated:
 Form Name               File #                  New/Modified/Deleted
 ---------               ------                  --------------------
 N/A
 Mail Groups Associated:
 Mail Group Name         New/Modified/Deleted
 ---------------         --------------------
 N/A
 Options Associated:
 Option Name             Type                    New/Modified/Deleted
 -----------             ----                    --------------------
 N/A
 Protocols Associated:
 Protocol Name           New/Modified/Deleted
 -------------           --------------------
 N/A
 Security Keys Associated:
 Security Key Name
 -----------------
 N/A
 Templates Associated:
 Template Name   Type    File Name (Number)      New/Modified/Deleted
 -------------   ----    ------------------      --------------------
 N/A
 Additional Information:
 N/A
 New Service Requests (NSRs):
 --------------------------
 N/A
 Patient Safety Issues (PSIs):
 -----------------------------
 N/A
 Defect Tracking System Ticket(s) & Overview:
 --------------------------------------------
 1) INC6116310- Registration- Social Work Decommission - Retiring API
    Problem:
    --------
    Due to the decommissioning of the Social Work (SOWK) package, the
    Application Program Interface (API) call $$HOMELESS^SOWKHIRM will no
    longer be used when retrieving the Homeless Indicator.
    Resolution:
    -----------
    Routine VAFHLZPD has been modified to use the $$BADADR^DGUTL3 API when
    retrieving the Homeless Indicator.
 Test Sites:
 -----------
 Dayton VAMC
 Iron Mountain VAMC
 Software and Documentation Retrieval Instructions:
 --------------------------------------------------
 N/A
 Patch Installation:
 Pre/Post Installation Overview:
 -------------------------------
 You may install this patch at any time without interruption to users. It
 should take less than 2 minutes to install this patch.

Use default answers for KIDS load/install questions.

Patch-Files: http://code.osehra.org/VistA.git/tree/master/Packages/Registration/Patches/DG_5.3_984

Packages/Kernel/Globals/14.4+TASKS.zwr

@@ -1,6 +1,6 @@
 OSEHRA ZGO Export: TASKS
-20-NOV-2019 14:00:35 ZWR
-^%ZTSK(-1)=5302
+20-NOV-2019 14:51:50 ZWR
+^%ZTSK(-1)=5306
 ^%ZTSK(0)="TASKS^14.4^5277"
 ^%ZTSK(1001,0)="TASK^XMXBULL^16^^63957,36927^63957,36927^R^^^PATCH,USER^PLA^PLA^ZTDESC^^"
 ^%ZTSK(1001,.02)="^PLA^^"
@@ -50791,6 +50791,47 @@ OSEHRA ZGO Export: TASKS
 ^%ZTSK(5302,.3,"DUZ(",0)="@"
 ^%ZTSK(5302,.3,"XQSCH")=8
 ^%ZTSK(5302,.3,"XQY")=9891
+^%ZTSK(5303,0)="HOUR^XUTMHR^.5^^65337,53225^65337,53225^R^^^POSTMASTER^VISTA^VISTA^ZTDESC^^"
+^%ZTSK(5303,.02)="^VISTA^^"
+^%ZTSK(5303,.03)="Taskman Hourly Job"
+^%ZTSK(5303,.04)=5645170025
+^%ZTSK(5303,.1)="B^65337,53285^Task's volume set not listed in index.^^^^^^"
+^%ZTSK(5303,.2)=""
+^%ZTSK(5303,.21)=""
+^%ZTSK(5303,.25)=""
+^%ZTSK(5304,0)="ZTSK^XQ1^.5^VISTA^65337,53285^65337,53285^O^8853^HL AUTOSTART LINK MANAGER^POSTMASTER^VISTA^VISTA^ZTDESC^VISTA^"
+^%ZTSK(5304,.02)="^VISTA^^"
+^%ZTSK(5304,.03)="No Description (%ZTLOAD)"
+^%ZTSK(5304,.04)=5645170085
+^%ZTSK(5304,.1)="B^65337,53287^Task's volume set not listed in index.^^^^^^"
+^%ZTSK(5304,.2)=""
+^%ZTSK(5304,.21)=""
+^%ZTSK(5304,.25)=""
+^%ZTSK(5304,.3,"DUZ(",0)="@"
+^%ZTSK(5304,.3,"XQSCH")=10
+^%ZTSK(5304,.3,"XQY")=8853
+^%ZTSK(5305,0)="ZTSK^XQ1^.5^VISTA^65337,53285^65337,53285^O^8412^HL TASK RESTART^POSTMASTER^VISTA^VISTA^ZTDESC^VISTA^"
+^%ZTSK(5305,.02)="^VISTA^^"
+^%ZTSK(5305,.03)="No Description (%ZTLOAD)"
+^%ZTSK(5305,.04)=5645170085
+^%ZTSK(5305,.1)="B^65337,53289^Task's volume set not listed in index.^^^^^^"
+^%ZTSK(5305,.2)=""
+^%ZTSK(5305,.21)=""
+^%ZTSK(5305,.25)=""
+^%ZTSK(5305,.3,"DUZ(",0)="@"
+^%ZTSK(5305,.3,"XQSCH")=11
+^%ZTSK(5305,.3,"XQY")=8412
+^%ZTSK(5306,0)="ZTSK^XQ1^.5^VISTA^65337,53285^65337,53285^O^9891^XOBV LISTENER STARTUP^POSTMASTER^VISTA^VISTA^ZTDESC^VISTA^"
+^%ZTSK(5306,.02)="^VISTA^^"
+^%ZTSK(5306,.03)="No Description (%ZTLOAD)"
+^%ZTSK(5306,.04)=5645170085
+^%ZTSK(5306,.1)="B^65337,53291^Task's volume set not listed in index.^^^^^^"
+^%ZTSK(5306,.2)=""
+^%ZTSK(5306,.21)=""
+^%ZTSK(5306,.25)=""
+^%ZTSK(5306,.3,"DUZ(",0)="@"
+^%ZTSK(5306,.3,"XQSCH")=8
+^%ZTSK(5306,.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"