$TXT Created by HUA,PATRICK at MNTVBB.FO-ALBANY.MED.VA.GOV (KIDS) on Friday, 01/28/05 at 12:51 ============================================================================= Run Date: FEB 09, 2005 Designation: DGBT*1*12 Package : DGBT - BENEFICIARY TRAVEL Priority: EMERGENCY Version : 1 SEQ #10 Status: Released Compliance Date: FEB 11, 2005 ============================================================================= Associated patches: (v)DGBT*1*8 <<= must be installed BEFORE `DGBT*1*12' Subject: FIX DGBT BENE TRAVEL SCREEN Category: - Routine Description: ============ There was a conflict in the evaluation of the error message in the temporary global vs actual appointment data for a patient or clinic. If there was an internal patient ID of 101, or an internal clinic ID of 101, then the routines would mistakenly treat those appointments as an error. When this happens no appointment information is returned, and the following error message is returned: SDAMAPI - Appointment Database is Unavailable. The software is being modified to correctly identify the returned appointment data for errors. The modifications will check if the Temporary global (^TMP($J)) contains a database error message and doesn't conflict with any patient or clinic appointments This patch addresses the following New Service Request (NSR): ------------------------------------------------------------- There is no NSR associated with this patch. This patch addresses the following NOIS/Remedy ticket(s): --------------------------------------------------------- There is no NOIS/Remedy ticket(s) associated with this patch. Test Sites: ----------- Bronx Houston San Juan Tampa ================INSTALLATION INSTRUCTIONS ================= If installed during the normal workday, it is recommended that the following selection(s) in the OPTION (#19) file, and all of their descendants be disabled to prevent possible conflicts while running the KIDS Install. Other VISTA users will not be affected. Claim Enter/Edit [DGBT BENE TRAVEL SCREEN] Install Time - less than 5 minutes 1. LOAD TRANSPORT GLOBAL --------------------- Choose the PackMan message containing this patch and invoke the INSTALL/CHECK MESSAGE PackMan option. 2. DISABLE ROUTINE MAPPING (DSM for Open VMS sites only) ----------------------- Disable routine mapping on all systems for the routines listed in step 3 below. NOTE: If the routines included in this patch are not currently in your mapped routine set, please skip this step. 3. COMPONENTS SENT WITH PATCH -------------------------- The following is a list of the routines included in this patch. The second line of each of these routines now looks like: 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: ;;1.0;Beneficiary Travel;**[patch list]**;September 25, 2001 CHECK^XTSUMBLD results Routine name Before Patch After Patch Patch List ============ ============ =========== ========== DGBTE1 11728398 11744334 8,12 Total number of routines modified: 1 4. START UP KIDS ------------- Start up the Kernel Installation and Distribution System Menu [XPD MAIN]: Edits and Distribution ... Utilities ... Installation ... Select Kernel Installation & Distribution System Option: INStallation --- Load a Distribution Print Transport Global Compare Transport Global to Current System Verify Checksums in Transport Global Install Package(s) Restart Install of Package(s) Unload a Distribution Backup a Transport Global Select Installation Option: 5. Select Installation Option: --------------------------- NOTE: The following are OPTIONAL - (When prompted for the INSTALL NAME, enter DGBT*1.0*12): 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. 6. Select Installation Option: Install Package(s) ---------------- **This is the step to start the installation of this KIDS patch: a. Choose the Install Package(s) option to start the patch install. b. When prompted 'Want KIDS to INHIBIT LOGONs during the install? YES//' answer NO (unless otherwise indicated) c. When prompted 'Want to DISABLE Scheduled Options, Menu Options, and Protocols? YES//' answer YES d. When prompted 'Enter options you wish to mark as 'Out Of Order':' Enter the following options: Claim Enter/Edit [DGBT BENE TRAVEL SCREEN] e. When prompted 'Enter protocols you wish to mark as 'Out Of Order':' press . 7. REBUILD MAPPED ROUTINE(S) (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: - DGBTE1 Routine Name: DGBTE1 Description of Changes: Before: 75) I $D(^TMP($J,"SDAMA301",101)) S I1=1,DGBTCL(101)="** Appointment Database Unavailable **" 76) I '$D(^TMP($J,"SDAMA301",101)) D 77) .S CLIEN="" F S CLIEN=$O(^TMP($J,"SDAMA301",DFN,CLIEN)) Q:'CLIEN D After: 75) ;if dfn = 101, e.g., it's not clear if it is an error or clinic or patient 76) ;if an error, there will be no lower subscripts eg 01/20/2005 77) I $D(^TMP($J,"SDAMA301",101))=1 S I1=1,DGBTCL(101)="** Appointment Database Unavailable **" 78) I $D(^TMP($J,"SDAMA301",101))'=1 D 79) .S CLIEN="" F S CLIEN=$O(^TMP($J,"SDAMA301",DFN,CLIEN)) Q:'CLIEN D Routine Checksum: ============================================================================= User Information: Entered By : MULLER,RICHARD Date Entered : JAN 19, 2005 Completed By: RUDINGER,NANCY L. Date Completed: FEB 07, 2005 Released By : GROOMS,ANTHONY E Date Released : FEB 09, 2005 ============================================================================= Packman Mail Message: ===================== $END TXT