$TXT Created by VILLELLA,ROSS at MNTVBB.FO-ALBANY.MED.VA.GOV  (KIDS) on Monday, 10/03/05 at 14:29
=============================================================================
Run Date: FEB 06, 2006                     Designation: PX*1*162
Package : PX - PCE PATIENT CARE ENCOUNTER     Priority: Mandatory
Version : 1       SEQ #133                      Status: Released
                  Compliance Date: MAR 09, 2006
=============================================================================

Associated patches: (v)PX*1*124    <<= must be installed BEFORE `PX*1*162'

Subject: PCE PPD SKIN TEST RESULT

Category: 
  - Routine
  - Data Dictionary

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

 This patch has been created to correct a problem with the PCE Encounter 
 Data Entry that when entering a PPD Skin Test result of greater than 10mm,
 it forces a positive result even though it may be negative for certain 
 patients.
  
  
 ASSOCIATED REMEDY:
 =================
 HD63061 - PPD rules are incorrect.
  
 ASSOCIATED E3R(s):
 =================
 N/A
  
  
 PARTICIPATING TEST SITES:
 ========================
 Charleston, SC
 Lexington, KY
 Maryland HCS
 Salisbury, NC
  
  
 REMEDY OVERVIEW:
 ===============
  
 1. HD0000000063061 (WPB-0898-32087) - PPD RULES IN THE GUI ARE INCORRECT.
  
 Problem:
 --------
 PCE forces all results of 10mm or greater to be a "positive" result even 
 though it may be negative for some patients. 
  
 Resolution:
 ----------
 A modification will be made to the routine PXCESK along with a Data 
 Dictionary change for the V SKIN TEST (9000010.12) file. The validation 
 that all results that are >10 must be positive will be removed.
  
  
 COMPONENTS:
 ==========
 N/A
  
 TECHNICAL:
 =========
  
  
 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>;;1.0;PCE PATIENT CARE ENCOUNTER;**[patch list]**;Aug 12, 1996
  
                             CHECK^XTSUMBLD results
  Routine name      Before Patch          After Patch         Patch List
  ============      ============          ===========         ==========
  PXCESK                 8721742              7819833         27,124,162
  
                              CHECK1^XTSUMBLD
  Routine name      Before Patch          After Patch         Patch List
  ============      ============          ===========         ==========
  PXCESK                18964532             17217954         27,124,162
  
  
 INSTALLATION INSTRUCTIONS
 =========================
 This patch can be loaded with users in the system. Installation time will 
 be less than 1 minute.
  
 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 Kernal Installation and Distribution System Menu [XPD 
 MAIN]:
        Edits and Distribution ...
        Utilities ...
        Installation ...
  
    Select Kernal 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 PX*1.0*162):
  
 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
      PX*1.0*162.
  
 a.  When prompted 'Want KIDS to Rebuild Menu Trees Upon Completion 
 of Install? YES//', answer NO.
  
 b.  When prompted 'Want KIDS to INHIBIT LOGONs during the
          install? YES//', answer NO.
  
 c.  When prompted 'Want to DISABLE Scheduled Options and Menu 
          Options and Protocols? YES//', answer YES. When prompted to 
          select the actions out of order, enter the following:
  
     PXCE ENCOUNTER DATA ENTRY         PCE Encounter Data Entry
     PXCE ENCOUNTER ENTRY & DELETE     PCE Encounter Data Entry and Delete
     PXCE ENCOUNTER ENTRY NO DELETE    PCE Encounter Data Entry without 
                                       Delete
     PXCE ENCOUNTER ENTRY SUPER        PCE Encounter Data Entry  -  
                                       Supervisor
  
 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.
  
 DATA DICTIONARY CHANGES:
 =========================
  
 Remove validation from the READING (.05) field of the V SKIN TEST 
 (9000010.12) file.
  
 Before:
 -------
 9000010.12,.05READING                0;5 NUMBER
  
       INPUT TRANSFORM:  K:+X'=X!(X>40)!(X<0)!(X?.E1"."1N.N) X I $D(X),X
                         >10,$P(^AUPNVSK(DA,0),U,4)]"",$P(^AUPNVSK(DA,0)
                         ,U,4)'="P" K X
       LAST EDITED:      SEP 01, 1995 
       HELP-PROMPT:      TYPE A WHOLE NUMBER BETWEEN 0 AND 40, IF THE
                         RESULT IS NEGATIVE READING MUST BE <10 
       DESCRIPTION:      Enter the value representing the reading of the
                         skin test.  
  
       NOTES:            XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
  
       CROSS-REFERENCE:  9000010.12^AE 
                         1)= S ^AUPNVSK("AE",$E(X,1,30),DA)=""
                         2)= K ^AUPNVSK("AE",$E(X,1,30),DA)
                         This cross-reference searches on the results of
                         skin tests across all patients.  
                                  
                              "AE",READING,DA
  
 After:
 ------
 9000010.12,.05READING                0;5 NUMBER
  
       INPUT TRANSFORM:  K:+X'=X!(X>40)!(X<0)!(X?.E1"."1N.N) X
       LAST EDITED:      SEP 01, 1995 
       HELP-PROMPT:      TYPE A WHOLE NUMBER BETWEEN 0 AND 40.
  
       DESCRIPTION:      Enter the value representing the reading of the
                         skin test.  
  
       NOTES:            XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
  
       CROSS-REFERENCE:  9000010.12^AE 
                         1)= S ^AUPNVSK("AE",$E(X,1,30),DA)=""
                         2)= K ^AUPNVSK("AE",$E(X,1,30),DA)
                         This cross-reference searches on the results of
                         skin tests across all patients.  
                                  
                              "AE",READING,DA

Routine Information:
====================
The checksums below are new checksums, and
 can be checked with CHECK1^XTSUMBLD.

Routine Name: PXCESK
    Before: B18964532  After: B17217954  **27,124,162**

=============================================================================
User Information:
Entered By  : VILLELLA,ROSS                 Date Entered  : JAN 18, 2005
Completed By: TSAIMEUCHONG,BRENDA           Date Completed: JAN 31, 2006
Released By : FIELDS-BARNES,JANETTE         Date Released : FEB 06, 2006
=============================================================================


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

$END TXT