Install: DI*22.2*8

Patch Subject:  Data Access Control
Description:

============
 This patch releases the new Data Access Control (DAC) utility. DAC is an
 attribute-based access control tool, that can permit or deny a user access
 to a resource (i.e., a record in a file). Pre-defined target attribute
 values are used to match appropriate access policies to the action being
 taken. Policies are made up of rules that can be combined as needed,
 allowing for creation of simple or very complex access policies. See the
 VA FileMan Data Access Control User Guide for details on setting up and
 applying access control policies.
 This patch also fixes an issue with Language file (#.85) changes made to
 the DIR Reader in VA FileMan version 22.2, which altered the global
 reference and could cause an error on return to the calling application.
 Patch Components:
 -----------------
 Files & Fields Associated:
                                                              New/Modified/
 File Name (#)                  Field Name (#)                       Deleted
 -------------                  --------------                --------------
 Policy (#1.6)                                                New
 Application Action (#1.61)                                   New
 Policy Function (#1.62)                                      New
 Forms Associated:
 Form Name                     File #               New/Modified/Deleted
 ---------                     ------               --------------------
 DIAC POLICY                   1.6                  New
 DIAC RULE                     1.6                  New
 DIAC SET                      1.6                  New
 Mail Groups Associated:
 Mail Group Name          New/Modified/Deleted
 ---------------          --------------------
 N/A
 Options Associated:
 Option Name                    Type               New/Modified/Deleted
 -----------                    ----               --------------------
 DIAC ACTIONS                   Action             New
 DIAC DELETE                    Action             New
 DIAC DISABLE                   Action             New
 DIAC EDIT                      Action             New
 DIAC FUNCTIONS                 Action             New
 DIAC PRINT                     Action             New
 DIAC TEST                      Action             New
 DIACCESS                       Menu               New
 DIOTHER                        Menu               Modified
 Protocols Associated:
 Protocol Name       New/Modified/Deleted
 -------------       --------------------
 DIAC ACTION MENU    New
 DIAC BLANK LINE     New
 DIAC CHANGE         New
 DIAC DELETE         New
 DIAC DISABLE        New
 DIAC EDIT           New
 DIAC EXPAND         New
 DIAC FUNCTIONS      New
 DIAC INQUIRE        New
 DIAC LINK ACTION    New
 DIAC MEMBERS        New
 DIAC QUIT           New
 DIAC TEST           New
 Security Keys Associated:
 Security Key Name
 -----------------
 N/A
 Templates Associated:
 Template Name   Type      File Name        (Number)  New/Modified/Deleted
 -------------   ----      -------------------------  --------------------
 DIAC ACTIONS    Print     Application Action (#1.61) New
 Additional Information:
 -----------------------
 List Template DIAC POLICY EDITOR
 New Service Requests (NSRs):
 ----------------------------
 N/A
 Patient Safety Issues (PSIs):
 -----------------------------
 N/A
 Defect Tracking System Ticket(s) & Overview:
 --------------------------------------------
 1. Ticket R12680330FY17
    Ticket R12874559FY17
    Ticket R13073003FY17
 Problem:
 --------
 VA FileMan 22.2 expanded use of the Language file #.85 and converted
 all hard-coded strings to the Dialog framework, to enable table-driven translation. As a result the DIR Reader now checks the Language file
 before issuing a prompt, which changes the current global reference.
 After return to the calling application, a naked global reference
 could now cause an undefined error.
 Resolution:
 -----------
 The DIR Reader has been modified to preserve the global reference.
 Blood Bank Clearance:
 ---------------------
 EFFECT ON BLOOD BANK FUNCTIONAL REQUIREMENTS: Patch DI*22.2*8 contains
 changes to a package referenced in ProPath standard titled: BBM Team Review
 of VistA Patches. This patch does not alter or modify any VistA Blood Bank
 software design safeguards or safety critical elements functions.
 RISK ANALYSIS: Changes made by patch DI*22.2*8 have no effect on Blood Bank
 software functionality, therefore RISK is none.
 3/24/2017
 Test Sites:
 -----------
 North Florida/South Georgia HCS
 West Palm Beach, FL
 Software and Documentation Retrieval Instructions:
 --------------------------------------------------
 Updated documentation is on the VA Software Documentation Library
 at: http://www.domain.ext/vdl/
 Title                                   File Name            SFTP Mode
 ----------------------------------------------------------------------
 FM 22.2 Data Access Control User Guide  fm22_2p8_dac_ug.PDF  binary
 FM 22.2 Developer's Guide               fm22_2dg.PDF         binary
 FM 22.2 Technical Manual                fm22_2tm.PDF         binary
 Backout and Rollback Procedure:
 -------------------------------
 During the VistA Installation Procedure of the KIDS build, the
 installer should use the 'Backup a Transport Global' action (step 3a
 in the Installations Instructions below).
 If rollback/backout is required, the installer can use the MailMan
 message to restore routines that were saved prior to installing the
 patch. The option menu DIACCESS may be disabled by using VA FileMan
 to assign an Out of Order message:
 VA FileMan 22.2
 Select OPTION: 1  ENTER OR EDIT FILE ENTRIES
 Input to what File: OPTION//              (11330 entries)
 EDIT WHICH FIELD: ALL// OUT OF ORDER MESSAGE
 THEN EDIT FIELD:
 Select OPTION NAME: DIACCESS       Data Access Control
 OUT OF ORDER MESSAGE: ROLLBACK PATCH DI*22.2*8
 Select OPTION NAME:
 Patch Installation:

Use default answers for KIDS load/install questions.

Patch-Files: http://code.osehra.org/VistA.git/tree/master/Packages/VA+FileMan/Patches/DI_22.2_8

Packages/Kernel/Globals/101+PROTOCOL.zwr

@@ -1,6 +1,6 @@
 OSEHRA ZGO Export: PROTOCOL
-14-MAR-2019 21:04:36 ZWR
-^ORD(101,0)="PROTOCOL^101I^5163^4647"
+18-MAY-2019 04:10:59 ZWR
+^ORD(101,0)="PROTOCOL^101I^5176^4660"
 ^ORD(101,1,0)="ORU PATIENT MOVMT^Review Orders on Patient Movement^^A^1^^^^^^^"
 ^ORD(101,1,1,0)="^^2^2^2960720^^^^"
 ^ORD(101,1,1,1,0)="This is the option used to review orders when a patient is discharged or"
@@ -42199,6 +42199,74 @@ OSEHRA ZGO Export: PROTOCOL
 ^ORD(101,5163,10,"B",4528,18)=""
 ^ORD(101,5163,10,"B",5162,19)=""
 ^ORD(101,5163,99)="65086,75581"
+^ORD(101,5164,0)="DIAC MEMBERS^Add/Remove Members^^A^17^^^^^^^"
+^ORD(101,5164,20)="D ADD^DIACLM1"
+^ORD(101,5164,99)="65151,14734"
+^ORD(101,5165,0)="DIAC CHANGE^Select New Policy^^A^17^^^^^^^"
+^ORD(101,5165,20)="D CHANGE^DIACLM1"
+^ORD(101,5165,99)="65151,14734"
+^ORD(101,5166,0)="DIAC DELETE^Delete a Policy^^A^17^^^^^^^"
+^ORD(101,5166,20)="D DELETE^DIACLM1"
+^ORD(101,5166,99)="65151,14734"
+^ORD(101,5167,0)="DIAC INQUIRE^Inquiry^^A^17^^^^^^^"
+^ORD(101,5167,20)="D DETAIL^DIACLM1"
+^ORD(101,5167,99)="65151,14734"
+^ORD(101,5168,0)="DIAC LINK ACTION^Link to Appl Action^^A^17^^^^^^^"
+^ORD(101,5168,20)="D FULL^VALM1,LINK^DIACLM1 S VALMBCK=""R"""
+^ORD(101,5168,99)="65151,14734"
+^ORD(101,5169,0)="DIAC FUNCTIONS^Functions^^A^17^^^^^^^"
+^ORD(101,5169,20)="D FULL^VALM1,FCNS^DIACLM1 S VALMBCK=""R"""
+^ORD(101,5169,99)="65151,14734"
+^ORD(101,5170,0)="DIAC EDIT^Edit a Policy^^A^17^^^^^^^"
+^ORD(101,5170,20)="D EDIT^DIACLM1"
+^ORD(101,5170,99)="65151,14734"
+^ORD(101,5171,0)="DIAC EXPAND^Expand/Collapse^^A^17^^^^^^^"
+^ORD(101,5171,20)="D EXPAND^DIACLM1"
+^ORD(101,5171,99)="65151,14734"
+^ORD(101,5172,0)="DIAC QUIT^Quit^^A^17^^^^^^^"
+^ORD(101,5172,20)="D EXIT^DIACLM1"
+^ORD(101,5172,99)="65151,14734"
+^ORD(101,5173,0)="DIAC TEST^Test Policy^^A^17^^^^^^^"
+^ORD(101,5173,20)="D TEST^DIACLM1"
+^ORD(101,5173,24)="I $O(^DIAC(1.61,""D"",+$G(DITOP),0))"
+^ORD(101,5173,99)="65151,14734"
+^ORD(101,5174,0)="DIAC ACTION MENU^Policy Action Menu^^M^17^^^^^^^"
+^ORD(101,5174,4)="26^5"
+^ORD(101,5174,10,0)="^101.01PA^13^13"
+^ORD(101,5174,10,1,0)="5164^^11^"
+^ORD(101,5174,10,2,0)="5170^^12^"
+^ORD(101,5174,10,3,0)="5166^^13^"
+^ORD(101,5174,10,4,0)="5171^^21^"
+^ORD(101,5174,10,5,0)="5167^^22^"
+^ORD(101,5174,10,7,0)="5165^^33^"
+^ORD(101,5174,10,8,0)="5172^^34^"
+^ORD(101,5174,10,9,0)="5173^^31^"
+^ORD(101,5174,10,10,0)="5168^^24^"
+^ORD(101,5174,10,11,0)="5169^^23^"
+^ORD(101,5174,10,12,0)="5175^^14^^^   "
+^ORD(101,5174,10,13,0)="5176^^32^"
+^ORD(101,5174,10,"B",5164,1)=""
+^ORD(101,5174,10,"B",5165,7)=""
+^ORD(101,5174,10,"B",5166,3)=""
+^ORD(101,5174,10,"B",5167,5)=""
+^ORD(101,5174,10,"B",5168,10)=""
+^ORD(101,5174,10,"B",5169,11)=""
+^ORD(101,5174,10,"B",5170,2)=""
+^ORD(101,5174,10,"B",5171,4)=""
+^ORD(101,5174,10,"B",5172,8)=""
+^ORD(101,5174,10,"B",5173,9)=""
+^ORD(101,5174,10,"B",5175,12)=""
+^ORD(101,5174,10,"B",5176,13)=""
+^ORD(101,5174,24)=""
+^ORD(101,5174,26)="D SHOW^VALM"
+^ORD(101,5174,28)="Select Action: "
+^ORD(101,5174,99)="65151,14734"
+^ORD(101,5175,0)="DIAC BLANK LINE^Blank Line^^A^17^^^^^^^"
+^ORD(101,5175,20)="Q"
+^ORD(101,5175,99)="65151,14734"
+^ORD(101,5176,0)="DIAC DISABLE^Disable a Policy^^A^17^^^^^^^"
+^ORD(101,5176,20)="D DISABLE^DIACLM1"
+^ORD(101,5176,99)="65151,14734"
 ^ORD(101,"AB",1496,1495,1)=""
 ^ORD(101,"AB",1591,1590,1)=""
 ^ORD(101,"AB",1593,1469,1)=""
@@ -47546,6 +47614,18 @@ OSEHRA ZGO Export: PROTOCOL
 ^ORD(101,"AD",5162,4190,27)=""
 ^ORD(101,"AD",5162,4722,22)=""
 ^ORD(101,"AD",5162,5163,19)=""
+^ORD(101,"AD",5164,5174,1)=""
+^ORD(101,"AD",5165,5174,7)=""
+^ORD(101,"AD",5166,5174,3)=""
+^ORD(101,"AD",5167,5174,5)=""
+^ORD(101,"AD",5168,5174,10)=""
+^ORD(101,"AD",5169,5174,11)=""
+^ORD(101,"AD",5170,5174,2)=""
+^ORD(101,"AD",5171,5174,4)=""
+^ORD(101,"AD",5172,5174,8)=""
+^ORD(101,"AD",5173,5174,9)=""
+^ORD(101,"AD",5175,5174,12)=""
+^ORD(101,"AD",5176,5174,13)=""
 ^ORD(101,"AE","15;GMR(123.1,",543)=""
 ^ORD(101,"AE","173;DIC(19,",5)=""
 ^ORD(101,"AE","2053;DIC(19,",574)=""
@@ -48900,6 +48980,19 @@ OSEHRA ZGO Export: PROTOCOL
 ^ORD(101,"B","DI",800,1)=1
 ^ORD(101,"B","DI",3131,2)=1
 ^ORD(101,"B","DI",3445,1)=1
+^ORD(101,"B","DIAC ACTION MENU",5174)=""
+^ORD(101,"B","DIAC BLANK LINE",5175)=""
+^ORD(101,"B","DIAC CHANGE",5165)=""
+^ORD(101,"B","DIAC DELETE",5166)=""
+^ORD(101,"B","DIAC DISABLE",5176)=""
+^ORD(101,"B","DIAC EDIT",5170)=""
+^ORD(101,"B","DIAC EXPAND",5171)=""
+^ORD(101,"B","DIAC FUNCTIONS",5169)=""
+^ORD(101,"B","DIAC INQUIRE",5167)=""
+^ORD(101,"B","DIAC LINK ACTION",5168)=""
+^ORD(101,"B","DIAC MEMBERS",5164)=""
+^ORD(101,"B","DIAC QUIT",5172)=""
+^ORD(101,"B","DIAC TEST",5173)=""
 ^ORD(101,"B","DISCHARGE SUMMARY",1793,1)=1
 ^ORD(101,"B","DISCONTINUE",2637,3)=1
 ^ORD(101,"B","DL",757,1)=1
@@ -53949,6 +54042,7 @@ OSEHRA ZGO Export: PROTOCOL
 ^ORD(101,"C","ADD/EDIT/DELETE",3248)=""
 ^ORD(101,"C","ADD/EDITS",662)=""
 ^ORD(101,"C","ADD/REMOVE HISTORIES",3381)=""
+^ORD(101,"C","ADD/REMOVE MEMBERS",5164)=""
 ^ORD(101,"C","ADD/VIEW COMMENTS",4003)=""
 ^ORD(101,"C","ADDITIONAL 835 DATA",4764)=""
 ^ORD(101,"C","ADDITIONAL FACILITY SECONDARY IDS",4107)=""
@@ -54144,6 +54238,7 @@ OSEHRA ZGO Export: PROTOCOL
 ^ORD(101,"C","BILLING REGION MENU",1677)=""
 ^ORD(101,"C","BILLING REGIONS",1675)=""
 ^ORD(101,"C","BILLING/EDI PARAM",818)=""
+^ORD(101,"C","BLANK LINE",5175)=""
 ^ORD(101,"C","BLOCK COMPONENTS",1610)=""
 ^ORD(101,"C","BLOCK SIZE",759)=""
 ^ORD(101,"C","BLOCK SIZE",768)=""
@@ -54657,6 +54752,7 @@ OSEHRA ZGO Export: PROTOCOL
 ^ORD(101,"C","DELETE A DEFICIENCY",604)=""
 ^ORD(101,"C","DELETE A GROUP",616)=""
 ^ORD(101,"C","DELETE A LOCAL FORM",1647)=""
+^ORD(101,"C","DELETE A POLICY",5166)=""
 ^ORD(101,"C","DELETE A PROVIDER ID",3238)=""
 ^ORD(101,"C","DELETE A PROVIDER ID",3242)=""
 ^ORD(101,"C","DELETE A RECORD MENU",605)=""
@@ -54862,6 +54958,7 @@ OSEHRA ZGO Export: PROTOCOL
 ^ORD(101,"C","DIFROM",800)=""
 ^ORD(101,"C","DIRECT MAPPING",4157)=""
 ^ORD(101,"C","DISABLE",2670)=""
+^ORD(101,"C","DISABLE A POLICY",5176)=""
 ^ORD(101,"C","DISASSOCIATE COMPANIES",4098)=""
 ^ORD(101,"C","DISASSOCIATE MEDICINE RESULT MENU",3036)=""
 ^ORD(101,"C","DISASSOCIATE MEDICINE RESULTS",3035)=""
@@ -55028,6 +55125,7 @@ OSEHRA ZGO Export: PROTOCOL
 ^ORD(101,"C","EDIT A COMPLETED IRT",607)=""
 ^ORD(101,"C","EDIT A COMPLETED IRT MENU",606)=""
 ^ORD(101,"C","EDIT A CONSULT THAT HAS BEEN DENIED FOR RESUBMISSION.",2621)=""
+^ORD(101,"C","EDIT A POLICY",5170)=""
 ^ORD(101,"C","EDIT A PROBLEM",1516)=""
 ^ORD(101,"C","EDIT A SPECIFIC FIELD OF A CONSULT",2622)=""
 ^ORD(101,"C","EDIT A UNIT",3263)=""
@@ -55391,6 +55489,7 @@ OSEHRA ZGO Export: PROTOCOL
 ^ORD(101,"C","EXPAND PATIENT",2678)=""
 ^ORD(101,"C","EXPAND VIEW",1461)=""
 ^ORD(101,"C","EXPAND/COLLAPSE",1807)=""
+^ORD(101,"C","EXPAND/COLLAPSE",5171)=""
 ^ORD(101,"C","EXPAND/COLLAPSE ADDENDA",3014)=""
 ^ORD(101,"C","EXPAND/COLLAPSE CLASS",1712)=""
 ^ORD(101,"C","EXPAND/COLLAPSE ENTRY",3014)=""
@@ -55502,6 +55601,7 @@ OSEHRA ZGO Export: PROTOCOL
 ^ORD(101,"C","FREE TEXT ENTRIES",3589)=""
 ^ORD(101,"C","FRESHNESS REPORT",4743)=""
 ^ORD(101,"C","FULL ACCT PROF",3544)=""
+^ORD(101,"C","FUNCTIONS",5169)=""
 ^ORD(101,"C","FUND BALANCE CANCEL SUBSCRIPTION (EV)",3922)=""
 ^ORD(101,"C","FUND BALANCE CANCEL SUBSCRIPTION (SU)",3923)=""
 ^ORD(101,"C","FUND BALANCE PUBLISH (EV)",3924)=""
@@ -55810,6 +55910,7 @@ OSEHRA ZGO Export: PROTOCOL
 ^ORD(101,"C","INQUIRE ABOUT A HEALTH SUMMARY COMPONENT",372)=""
 ^ORD(101,"C","INQUIRE ABOUT A HEALTH SUMMARY TYPE",373)=""
 ^ORD(101,"C","INQUIRE ABOUT A HS TYPE",3400)=""
+^ORD(101,"C","INQUIRY",5167)=""
 ^ORD(101,"C","INQUIRY OFFICE",821)=""
 ^ORD(101,"C","INQUIRY/PRINT",2896)=""
 ^ORD(101,"C","INQUIRY/PRINT",2911)=""
@@ -55967,6 +56068,7 @@ OSEHRA ZGO Export: PROTOCOL
 ^ORD(101,"C","LINK PAYMENT TO ACCOUNT",2811)=""
 ^ORD(101,"C","LINK PAYMENTS",2808)=""
 ^ORD(101,"C","LINK REMINDER",2919)=""
+^ORD(101,"C","LINK TO APPL ACTION",5168)=""
 ^ORD(101,"C","LINK TO OTHER APPLIC",2058)=""
 ^ORD(101,"C","LINK TO OTHER APPLIC",2059)=""
 ^ORD(101,"C","LINK TO PATIENT FILE",3068)=""
@@ -56556,6 +56658,7 @@ OSEHRA ZGO Export: PROTOCOL
 ^ORD(101,"C","POLICY",1127)=""
 ^ORD(101,"C","POLICY",1147)=""
 ^ORD(101,"C","POLICY",1152)=""
+^ORD(101,"C","POLICY ACTION MENU",5174)=""
 ^ORD(101,"C","POLICY EDIT/VIEW",811)=""
 ^ORD(101,"C","POLICY INFO",837)=""
 ^ORD(101,"C","POLICY INFO",873)=""
@@ -56883,6 +56986,7 @@ OSEHRA ZGO Export: PROTOCOL
 ^ORD(101,"C","QUIT",3877)=""
 ^ORD(101,"C","QUIT",4394)=""
 ^ORD(101,"C","QUIT",4556)=""
+^ORD(101,"C","QUIT",5172)=""
 ^ORD(101,"C","QUIT WITHOUT SAVING",4200)=""
 ^ORD(101,"C","RAD/NM RECEIVES ORDER MSG FROM OE/RR",1468)=""
 ^ORD(101,"C","RAD/NUC MED",1463)=""
@@ -57387,6 +57491,7 @@ OSEHRA ZGO Export: PROTOCOL
 ^ORD(101,"C","SELECT NEW PATIENT",2135)=""
 ^ORD(101,"C","SELECT NEW PATIENT",2223)=""
 ^ORD(101,"C","SELECT NEW PATIENT",2885)=""
+^ORD(101,"C","SELECT NEW POLICY",5165)=""
 ^ORD(101,"C","SELECT NEW PROCEDURE",3038)=""
 ^ORD(101,"C","SELECT NEW SERVICE",2837)=""
 ^ORD(101,"C","SELECT NEW SERVICE",2884)=""
@@ -57703,6 +57808,7 @@ OSEHRA ZGO Export: PROTOCOL
 ^ORD(101,"C","TEST LINK",3951)=""
 ^ORD(101,"C","TEST ORM EVENT FOR IFC",3150)=""
 ^ORD(101,"C","TEST PAYER SHEET LIST",3677)=""
+^ORD(101,"C","TEST POLICY",5173)=""
 ^ORD(101,"C","TEST RULE SET",4140)=""
 ^ORD(101,"C","TEST SERVER",4425)=""
 ^ORD(101,"C","TESTING ACTIONS FOR DEFAULT REASON",2883)=""

Packages/Kernel/Globals/14.4+TASKS.zwr

@@ -1,6 +1,6 @@
 OSEHRA ZGO Export: TASKS
-18-MAY-2019 03:21:19 ZWR
-^%ZTSK(-1)=4399
+18-MAY-2019 04:09:12 ZWR
+^%ZTSK(-1)=4403
 ^%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^^"
@@ -40043,6 +40043,47 @@ OSEHRA ZGO Export: TASKS
 ^%ZTSK(4399,.3,"DUZ(",0)="@"
 ^%ZTSK(4399,.3,"XQSCH")=8
 ^%ZTSK(4399,.3,"XQY")=9891
+^%ZTSK(4400,0)="HOUR^XUTMHR^.5^^65151,14665^65151,14665^R^^^POSTMASTER^VISTA^VISTA^ZTDESC^^"
+^%ZTSK(4400,.02)="^VISTA^^"
+^%ZTSK(4400,.03)="Taskman Hourly Job"
+^%ZTSK(4400,.04)=5629061065
+^%ZTSK(4400,.1)="B^65151,14725^Task's volume set not listed in index.^^^^^^"
+^%ZTSK(4400,.2)=""
+^%ZTSK(4400,.21)=""
+^%ZTSK(4400,.25)=""
+^%ZTSK(4401,0)="ZTSK^XQ1^.5^VISTA^65151,14725^65151,14725^O^8853^HL AUTOSTART LINK MANAGER^POSTMASTER^VISTA^VISTA^ZTDESC^VISTA^"
+^%ZTSK(4401,.02)="^VISTA^^"
+^%ZTSK(4401,.03)="No Description (%ZTLOAD)"
+^%ZTSK(4401,.04)=5629061125
+^%ZTSK(4401,.1)="B^65151,14727^Task's volume set not listed in index.^^^^^^"
+^%ZTSK(4401,.2)=""
+^%ZTSK(4401,.21)=""
+^%ZTSK(4401,.25)=""
+^%ZTSK(4401,.3,"DUZ(",0)="@"
+^%ZTSK(4401,.3,"XQSCH")=10
+^%ZTSK(4401,.3,"XQY")=8853
+^%ZTSK(4402,0)="ZTSK^XQ1^.5^VISTA^65151,14725^65151,14725^O^8412^HL TASK RESTART^POSTMASTER^VISTA^VISTA^ZTDESC^VISTA^"
+^%ZTSK(4402,.02)="^VISTA^^"
+^%ZTSK(4402,.03)="No Description (%ZTLOAD)"
+^%ZTSK(4402,.04)=5629061125
+^%ZTSK(4402,.1)="B^65151,14729^Task's volume set not listed in index.^^^^^^"
+^%ZTSK(4402,.2)=""
+^%ZTSK(4402,.21)=""
+^%ZTSK(4402,.25)=""
+^%ZTSK(4402,.3,"DUZ(",0)="@"
+^%ZTSK(4402,.3,"XQSCH")=11
+^%ZTSK(4402,.3,"XQY")=8412
+^%ZTSK(4403,0)="ZTSK^XQ1^.5^VISTA^65151,14725^65151,14725^O^9891^XOBV LISTENER STARTUP^POSTMASTER^VISTA^VISTA^ZTDESC^VISTA^"
+^%ZTSK(4403,.02)="^VISTA^^"
+^%ZTSK(4403,.03)="No Description (%ZTLOAD)"
+^%ZTSK(4403,.04)=5629061125
+^%ZTSK(4403,.1)="B^65151,14731^Task's volume set not listed in index.^^^^^^"
+^%ZTSK(4403,.2)=""
+^%ZTSK(4403,.21)=""
+^%ZTSK(4403,.25)=""
+^%ZTSK(4403,.3,"DUZ(",0)="@"
+^%ZTSK(4403,.3,"XQSCH")=8
+^%ZTSK(4403,.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"