PATCH DVBA-2P7 SEQ-128 PAT-138

$TXT Created by CURTIS,RICHARD L at MNTVBB.FO-ALBANY.MED.VA.GOV (KIDS) on Tuesday, 03/10/09 at 16:06

============================================================================= Run Date: AUG 03, 2009                    Designation: DVBA*2.7*138 Package : DVBA - AUTOMATED MED INFO EXCHANGE Priority: Mandatory Version : 2.7      SEQ #128                    Status: Released Compliance Date: SEP 03, 2009 =============================================================================

Associated patches: (v)DVBA*2.7*121<<= must be installed BEFORE `DVBA*2.7*138'

Subject: UPDATE TO AMIE EYE EXAM C&P WORKSHEET

Category: - Routine

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

This patch will update the Automated Medical Information Exchange (AMIE) Compensation and Pension (C&P) examination worksheet: Eye Examination (#1330). A new entry, with the updated version of the EYE EXAMINATION worksheet, will be created and activated in the AMIE EXAM (#396.6) file, and the existing entry for this worksheet will be inactivated. ASSOCIATED NSR(S): ================== N/A ASSOCIATED REMEDY TICKET(S): ============================ HD0000000284679 - Update to AMIE Eye Exam C&P Worksheet PARTICIPATING TEST SITES: ========================= Madison, WI Central Alabama HCS Manila, Philippines Montana HCS REMEDY TICKET OVERVIEW: ======================= HD0000000284679 - Update to AMIE Eye Exam C&P Worksheet Problem: Dr. Vicki Milton (VBAVACO) has requested that an update be made to the current AMIE C&P examination worksheet: Eye Examination (#1330). Resolution: --- a) Created post-init routine DVBA138P which will deactivate the current   worksheet in the AMIE EXAM (#396.6) file and activate the updated    worksheet in the same file.  The current Internal Entry Number (IEN)    for this worksheet is 216.  The new IEN for the updated version will    be 229. b) Created routine DVBCWEE6 which will contain the new text for this worksheet. Created routine DVBCWEE5, which will access the text routine and print the blank worksheet. DATA DICTIONARY CHANGES: ======================== This patch, through post-init routine DVBA138P, will create a new record in the AMIE EXAM (#396.6) file for the updated version of the AMIE C&P worksheet described above and inactivate the existing record for this worksheet. This is done, per request by VBAVACO, for historical purposes. The 5th piece of the existing record will be updated with an "I", to indicate it is Inactive and the 5th piece of the new record (IEN-229) will be updated with an "A", to indicate it is Active. Current Record Before Patch: ^DVB(396.6,216,0)=EYE EXAMINATION^EYE^3^DVBCWEE3^A^^1330 Current Record After Patch: --- ^DVB(396.6,216,0)=EYE EXAMINATION^EYE^3^DVBCWEE3^I^^1330 New Record Added with this Patch: - ^DVB(396.6,229,0)=EYE EXAMINATION^EYE^3^DVBCWEE5^A^^1330 ************************************************************************ Please note: Since the routine DVBA138P may be deleted by the installation process, sites are encouraged to verify the checksum for this routine prior to installation by using option #2 - Verify Checksums in Transport Global on the Installation menu. ************************************************************************ INSTALLATION INSTRUCTIONS: ========================== This patch can be installed at any time. Users do not have to be off the system. Installation will take less than 5 minutes. 1. Choose the PackMan message containing this patch and invoke the INSTALL/CHECK MESSAGE PackMan option. 2. 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 3. From this menu, you may elect to use the following options (when prompted for the INSTALL NAME enter DVBA*2.7*138): a. Verify Checksums in Transport Global - This option will allow you to ensure the integrity of the routines that are in the transport global. b. Print Transport Global - This option will allow you to view the components of the KIDS build. c. 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.). d. 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. 4. Use the Install Package(s) option and select DVBA*2.7*138. a. When prompted "Want KIDS to INHIBIT LOGONs during the install?         NO//" answer NO.     b.  When prompted "Want to DISABLE Scheduled Options, Menu Options,         and Protocols? NO//" respond YES. 1) When prompted "Enter options you wish to mark as "Out of           Order":" enter the following option:            Print Blank C&P Worksheet  [DVBA C PRINT BLANK C&P WORKSHEET]         2) When prompted "Enter protocols you wish to mark as "Out of            Order":" just press .

Routine Information: ==================== The second line of each of these routines now looks like: ;;2.7;AMIE;**[Patch List]**;AUG 7,2003;Build 6

The checksums below are new checksums, and can be checked with CHECK1^XTSUMBLD.

Routine Name: DVBA138P Before:      n/a   After:  B8587961  **138** Routine Name: DVBCWEE5 Before:      n/a   After:  B2619723  **138** Routine Name: DVBCWEE6 Before:      n/a   After: B96458967  **138**

============================================================================= User Information: Entered By : CURTIS,RICHARD                Date Entered  : NOV 12, 2008 Completed By: TSAIMEUCHONG,BRENDA          Date Completed: APR 29, 2009 Released By : FITCH,DONNA                  Date Released : AUG 03, 2009 =============================================================================

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

$END TXT