$TXT Created by CORONA,JOSE R at DEVFEX.FO-ALBANY.MED.VA.GOV  (KIDS) on Thursday, 03/25/04 at 14:30
=============================================================================
Run Date: APR 02, 2004                     Designation: SD*5.3*335
Package : SD - SCHEDULING                     Priority: Mandatory
Version : 5.3       SEQ #289                    Status: Released
                  Compliance Date: MAY 03, 2004
=============================================================================

Associated patches: (v)SD*5.3*292  <<= must be installed BEFORE `SD*5.3*335'
                    (v)TIU*1*168   <<= must be installed BEFORE `SD*5.3*335'

Subject: Additional Performance Monitors (TIU)

Category: 
  - Routine

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

 Two problems were identified when running the reports released in patch 
 SD*5.3*292. 
  
 1. The scanned document counter was not being incremented correctly since
 the check to increment the counter was using the wrong value ("YES"
 instead of "1"). 
  
 2. Scanned documents were not suppose to be counted for or against the
 performance measure.  When calculating the percentages for the report, the
 Scanned Documents counter was not being subtracted from the Total
 Encounters counter before calculating percentages. 
  
 Note: If a site scans all progress notes within a division the compliance
 rate will reflect 0 % compliance.
  
 Resolution:
 ===========
  
 Routine SDPMUT1 has been modified to check for a value of "1" instead of 
 "YES".
  
 Routines SCRPW301 and SCRPW304 have been modified so that the Scanned 
 Document counter is subtracted from the Total Encounters counter before 
 calculating the compliance percentage rates.
  
 ASSOCIATED NOIS:
 ================
 WBP-1203-20778
  
 PARTICIPATING TEST SITES:
 =========================
 Alexandria VAMC, Alexandria, LA
 Wilkes Barre VAMC, Wilkes Barre, PA 
 Fayetteville VAMC, Fayetteville, AK
 Portland VAMC, Portland, OR
 Wilmington VAMC, Willmington, DE
  
 ROUTINE SUMMARY:
  ================
  The following is a list of the routine(s) included in this patch.  The
  second line of each of these routine(s) will look like:
           
         <tab>;;5.3;SCHEDULING;**[patch list]**;AUG 13, 1993
           
                           CHECK^XTSUMBLD results
      Routine name   Before Patch       After Patch         Patch List
      ============   ============       ===========         ==========
      SCRPW301            8148209           8366902           292,335
      SCRPW304            5495187           5841130           292,335
      SDPMUT1             7907047           7887670           292,335
           
      Number of Routines = 3
    
 INSTALLATION INSTRUCTIONS
 =========================
 This patch can be loaded with users in the system.  Installation time
 will be less than 2 minutes.
    
  1.  Choose the PackMan message containing this patch and invoke the 
      INSTALL/CHECK MESSAGE PackMan option.  
    
  2.  (DSM for Open VMS sites only) Disable routine mapping on all systems
      for the routines listed in the Routine Summary.
    
      NOTE:  If the routines included in this patch are not currently
      in your mapped routine set, please skip this step.
    
  3.  Start up the Kernel Installation and Distribution System Menu
      [XPD MAIN]: 
    
           Edits and Distribution ...  
           Utilities ...  
           Installation ...  
    
      Select Kernel Installation & Distribution System Option: Installation
                                                               ---
           1      Load a Distribution
           2      Verify Checksums in Transport Global
           3      Print Transport Global
           4      Compare Transport Global to Current System
           5      Backup a Transport Global
           6      Install Package(s)
                  Restart Install of Package(s)
                  Unload a Distribution
    
  4.  From this menu, you may elect to use the following options
      (When prompted for the INSTALL NAME, enter SD*5.3*335):
    
      a.  Backup a Transport Global - This option will create a backup
          message of any routines exported with this patch. It will
          not backup any other changes such as DD's or templates.
      b.  Compare Transport Global to Current System - This option
          will allow you to view all changes that will be made when
          this patch is installed.  It compares all components of this
          patch (routines, DD's, templates, etc.).
      c.  Verify Checksums in Transport Global - This option will
          allow you to ensure the integrity of the routines that are
          in the transport global.
    
  5.  Use the Install Package(s) option and select the package
      SD*5.3*335.
    
       a.  When prompted 'Want KIDS to INHIBIT LOGONs during the
           install? YES//', answer NO.
     
       b.  When prompted 'Want to DISABLE Scheduled Options, Menu
           Options, and Protocols? YES//' answer YES.
  
     Select the following option(s)
  
     [SCRPW PM DETAILED REPORT] PERFORMANCE MONITOR DETAILED REPORT
     [SCRPW PM SUMMARY REPORT]  PERFORMANCE MONITOR SUMMARY REPORT
  
  6.  (DSM for Open VMS sites only) Optional - Include the routines
      distributed with this patch in the mapped routine set.
    
      NOTE: This step is only necessary if you performed step 2 or if
      you wish to include the routines in your mapped set.

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

Routine Name:
  - SDPMUT1

 SDPMUT1+167
  
 Before:
  
 I @SCRNARR@("SCANNED")["YES"&($P(NOTEINFO,U,2)["D") D
  
 After:
  
 I @SCRNARR@("SCANNED")&($P(NOTEINFO,U,2)["D") D

Routine Checksum:

Routine Name:
  - SCRPW301

 PRTSUMS+9
  
 Before
  
 S VAL=0 I +$P(INFO,U,1) S VAL=100*($P(INFO,U,2)/$P(INFO,U,1))
  
 After:
  
 S VAL=0 I +$P(INFO,U,1) S VAL=100*($P(INFO,U,2)/($P(INFO,U,1)-$P(INFO,U,
 7)))

Routine Checksum:

Routine Name:
  - SCRPW304

 PRTSUMS+20
  
 BEFORE:
  
 .S VAL=100*($P(PINODE,U,TMP)/TOTENC)
  
 AFTER:
  
 .S VAL=100*($P(PINODE,U,TMP)/(TOTENC-SCANNED))
  
 PRTSUMS+45
  
 BEFORE:
  
 S NPNVAL=100*(NPN/TOTENC)
  
 AFTER:
  
 S NPNVAL=100*(NPN/TOTENC)
  
 PRTSUMS+47
  
 BEFORE:
  
 S VAL=100*((TOTENC-CMPENC-NPN-(+$P(PINODE,U,11)))/TOTENC)
  
 AFTER:
  
 S VAL=100*((TOTENC-SCANNED-CMPENC-NPN-(+$P(PINODE,U,11)))/TOTENC)

Routine Checksum:

=============================================================================
User Information:
Entered By  : CORONA,JOSE                   Date Entered  : DEC 22, 2003
Completed By: PETERSON,JAMES R              Date Completed: APR 01, 2004
Released By : WASHINGTON,JANET P            Date Released : APR 02, 2004
=============================================================================


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

$END TXT