$TXT Created by HICKS,BRENT at DEV.DEV.ISC-CHICAGO.VA.GOV  (KIDS) on MONDAY, 08/28/00 at 14:27
=============================================================================
Run Date: SEP 11, 2000                     Designation: ANRV*4*3
Package : ANRV -  IMPAIRMENT SERVICE TEAMPriority: Mandatory
Version : 4         SEQ #3                     Status: Released
=============================================================================


Subject: FIX TO VARO REPORT FOR CORRECT DATA DISPLAY.

Category: 
  - Routine

Description: 
============

  
 NOIS # HUN-0700-21173
 Problem reported at Huntington, WV
  
 Test Sites
 ==========
  
 Huntington, WV
 Seattle, WA
  
  
 An incomplete data set was being displayed in the VARO Report (invoked by
 the VIST option 'VARO Claims List'. An error was found in the routine
 ^ANRVRP9 that caused this problem.  This patch contains a fix to this
 routine.
 The routine was Creating an array of VARO claims using the .01 field as
 the reference to file #2043.5.  The Array was then used to reference back
 to file #2043.5 using the .01 as the IEN.  As this file is no longer
 DINUM'ed this processing no longer works.
 It appears that this problem has arisen with VARO entries made after
 version 4.0 of VIST was installed.
 Users discovered the error when running the VARO report.  A number of
 entries on the report contained no VARO data - even though when the
 Enter/edit VARO data option was used to check the entry data was found.
 After the installation of this patch all data is displayed correctly.
  
 Routine Summary
 ===============
  
 The second line of the routine now looks like:
 ;;4.0; Visual Impairment Service Team ;**3**;12 Jun 98
                    CHECK^XTSUMBLD results
  
 Name              Before Patch          After Patch          Patch List
 -----------------------------------------------------------------------
 ANRVRP9           10669079              10967400             3
  
 Installation Instructions
 =========================
  
 This Patch was created with Kernel V8 KIDS.  Follow these instructions:
  
 1) This patch should be installed during off peak hours when the
 VIST users are off the system.
  
 2) Version 4.0 of VIST must be installed. If the routines in this
 VIST patch are mapped at your site, remember to disable mapping before
 installing the patch and to re-enable it when you are finished.
  
 3) The routines included in this patch should be installed in the
 production UCI.
  
 4) Use the 'INSTALL/CHECK MESSAGE' option of your Packman menu to load the
 KIDS patch onto your system.
  
 5) Using the Kernel Installation and Distribution System menu (KIDS), you
 may choose the following options prior to installing this patch:
  
   a)  Backup a Transport Global - this option will create a backup message
       of any routines exported with the patch.  It will NOT backup any
       other changes such as data dictionaries or templates.
  
   b)  Verify Checksum in Transport Global - this option will allow you to
       ensure the integrity of the routines that are in the transport
       global.
  
   c)  Compare Transport Global to Current System - this option will allow
       you to view all changes that will be made when the patch is
       installed.  It compares all components of the patch (routines, DDs,
       templates, etc.)
  
 6) It is recommended that you do not queue this patch for install.
  
 7) When prompted 'Want KIDS to INHIBIT LOGONs during the install? YES//'
 respond NO.
  
 8) Use the 'Install Package(s)' option under the 'Installation' menu.
 When prompted "Want to DISABLE Scheduled Options and Menu Option?",
 respond "NO".  The VIST options do not need to be disabled during the
 installation of this patch.  Your customer support representative will
 answer any questions regarding this patch.
  
 9) The estimated installation time for this patch is two minutes.

Routine Information:
====================

Routine Name:
  - ANRVRP9

 Routine now looks at IEN when mapping from local array back to file #
 2043.5 as opposed to .01 field.

Routine Checksum:

=============================================================================
User Information:                               
Entered By  : HICKS,BRENT                    Date Entered : AUG 07, 2000
Completed By: AGUILERA,TONY                 Date Completed: SEP 01, 2000
Released By : SCOTT,JEAN M                 Date Released : SEP 11, 2000
=============================================================================


Packman Mail Message:
=====================

$END TXT