$TXT Created by ROWE,KIMBALL at LEXNXT.FO-BAYPINES.MED.VA.GOV (KIDS) on Tuesday, 05/09/06 at 15:19 ============================================================================= Run Date: MAY 18, 2006 Designation: LEX*2*40 Package : LEX - LEXICON UTILITY Priority: Mandatory Version : 2 SEQ #39 Status: Released Compliance Date: MAY 25, 2006 ============================================================================= Associated patches: (v)LEX*2*38 <<= must be installed BEFORE `LEX*2*40' Subject: Code Set FY06 3rd Qtr Update Category: - Routine - Data Dictionary - Enhancement (Mandatory) Description: ============ This patch contains the FY06 3rd Quarter Code Set distribution with 109 code set changes effective Apr 1, 2006 and fixes for 14 Remedy Tickets. This patch writes to the following files: ICD Diagnosis #80 ^ICD9( DBIA 4485 CPT/HCPCS Procedure #81 ^ICPT( DBIA 4489 Lexicon Files #757-757.41 ^LEX( DBIA N/A ENHANCEMENTS ============ 1 FY06 3rd Quarter Code Set Update New Code Sets HCPCS Codes 98 codes C9117 C9118 C9124 C9125 C9204 C9213 C9214 C9215 C9216 C9217 C9219 C9226 C9412 C9712 C9714 C9715 C9717 E1019 E1021 K0548 K0549 K0550 K0560 K0561 K0562 K0563 K0564 K0565 K0566 K0567 K0568 K0569 K0570 K0571 K0572 K0573 K0574 K0575 K0576 K0577 K0578 K0579 K0580 K0610 K0611 K0612 K0613 K0614 K0615 K0616 K0617 K0621 K0622 K0623 K0624 K0625 K0626 K0627 K0650 K0651 K0652 K0653 K0654 K0655 K0656 K0657 K0658 K0659 K0660 K0661 K0662 K0663 K0664 K0665 K0666 K0667 K0668 Q3030 Q4052 Q4053 Q4078 S0112 S0163 S0165 S0190 S0191 S0193 S0199 S0345 S0346 S0347 S2131 S2255 S8002 S8003 S8470 C9227 C9228 Re-Activated Code Sets None Re-Used Code Sets None Inactivated Code Sets HCPCS Codes 8 codes Q3019 Q3020 S0133 S2362 S2363 S3701 S8093 S8260 Revised Code Sets HCPCS Codes 2 codes A5513 Q4080 2 Remedy Tickets (data only) Wrong Codes being Returned ICD 610.1 defaults to 610.9 HD0000000 134038 Milwaukee ICD 781.0 defaults to 333.5 HD0000000 120112 Big Springs * ICD 781.0 defaults to 333.5 HD0000000 133577 Saginaw * ICD 781.0 defaults to 333.5 HD0000000 134472 Bay Pines * ICD 781.0 defaults to 333.5 HD0000000 135077 Walla Walla ICD 780.50 defaults to 307.47 HD0000000 120112 Big Springs ICD 369.60 defaults to 369.20 HD0000000 133023 St. Louis ICD 261. defaults to 263.9 HD0000000 136556 Central Texas ICD 729.0 defaults to 729.1 HD0000000 121657 Fargo Problems with DRG Calculations 2 ICD Codes set to 'CC' HD0000000 122318 Louisville 13 ICD Codes set to 'CC' HD0000000 129916 Minneapolis * 3 ICD Codes set to 'CC' HD0000000 131877 Central Texas 2 ICD Codes set to 'CC' HD0000000 135767 Big Springs 1 ICD Code removed 'CC' HD0000000 135804 Bay Pines * duplicates ROUTINE SUMMARY =============== The second line of each of these routines will look like: ;;2.0;LEXICON UTILITY;**[PATCH LIST]**;Sep 23, 1996 Checksums Checksums Routine Before Patch After Patch Patch List (2nd Line) -------- ------------- ------------- --------------------------------- LEX2040 71174356 40 LEX2040P 51304981 40 FTP SOFTWARE RETRIEVAL: ======================= Global Host File: LEX_2_40.GBL (ASCII) The preferred method is to FTP the files from download.vista.med.va.gov which will transmit the files from the first available FTP server. The files may also be downloaded directly from a particular FTP location at the following locations. Hines ftp.fo-hines.med.va.gov Albany ftp.fo-albany.med.va.gov Salt Lake ftp.fo-slc.med.va.gov Files are available in the ANONYMOUS.SOFTWARE directory. INSTALLATION INSTRUCTIONS ========================= 1) Users may be on the system during the install of LEX*2.0*40. It is recommended that this patch be installed during non-peak hours. This patch should take less than 10 minutes to install. 2) Create a backup of the following globals files before continuing: ICD Diagnosis #80 ^ICD9( CPT/HCPCS Procedure #81 ^ICPT( Lexicon Files #757-757.41 ^LEX( 3) Make sure that the remnants of a previous import global do not exist on your system. If the global ^LEXM does exist, you will need to kill this global before proceeding. On a Cache system, the prevention of unsubscripted global kills is a system wide setting, but it can be allowed for a particular process using the $ZU command. The command for enabling unsubscripted global kills is: VAH>S X=$ZU(68,28,0) VAH>K ^LEXM The command for disabling unsubscripted kills for a process is S X=$ZU(68,28,1); however, halting out of the process and creating a new process will achieve the same effect. 4) Install the data from the global host file LEX_2_40.GBL. This file contains the Lexicon Utility's import global ^LEXM. Thin Client Global Restore Using the Cache Thin Client, right-click on the Cache cube, then select "Explorer." Open the "Namespaces" folder, then open the "VAH" folder, and right click on the "Globals" folder. Select the "Import from disk" option. Click on the "Options..." button. Select the "Globals" tab, make sure the format is VAX DSM, then click "OK." Find the file in the directory, double click on LEX_2_40.GBL. Next, select "Import All." At the prompt "Do you wish to restore '^LEXM'," select "Yes." Programmer Mode From the Programmer prompt, execute the following routine: >D ^%GI Global input Device: VA5$:[BETA]LEX_2_40.GBL Parameters: "RS"=> Globals were saved on 03 May 2006 11:26 AM Cache with description: LEX*2*40/ICPT*6*28 Data Input option: A ^LEXM The loading of the global should take from 1 to 2 minutes. 5) (OPTIONAL) Turn journaling off for globals ^ICPT, ^ICD9, ^DIC(81.3) and ^LEX Journaling OFF Journaling on a Cache system cannot be disabled by individual global. Journaling CAN BE disabled for a user's current process. In this case, the process will be the installation of this patch. It is important to know that for this to work, the KIDS installation CANNOT be tasked off. The installation MUST be run on your screen for the disabled journaling to be in effect. To determine if your process has journaling enabled you can call: >W $$CURRENT^%NOJRN() 0 means journaling is disabled, 1 means it's on To disable journaling for the current process: >D DISABLE^%NOJRN Double check your process to be sure journaling is disabled: >W $$CURRENT^%NOJRN() 0 means journaling is disabled, 1 means it's on Proceed with the installation remembering NOT to task off the install. 6) Set up user and IO variables (D ^XUP) for programmer access. 7) Distribution Load: Load the KIDS Distribution from the Packman Message using the Packman function "Install/Check Message." 8) KIDS Installation: Install the patch using the KIDS Installation Menu action "Install Package(s)" and the install name LEX*2.0*40. The KIDS installation should take less than five minutes (with journaling off) depending on the number of users/jobs on the system. Respond "NO" at the "Want KIDS to INHIBIT LOGONs during the install? YES//" prompt. Respond "NO" at the "Want to DISABLE Schedule Options, Menu Options, and Protocols?" prompt. 9) Cleanup a) Check that the export global ^LEXM has been killed automatically. If it has not been automatically killed, you will need to kill the "unsubscripted" import global ^LEXM to prevent import global checksum errors on future installations. On a Cache system, the prevention of unsubscripted global kills is a system wide setting, but it can be allowed for a particular process using the $ZU command. The command for enabling unsubscripted global kills is: VAH>S X=$ZU(68,28,0) VAH>K ^LEXM The command for disabling unsubscripted kills for a process is S X=$ZU(68,28,1); however, halting out of the process and creating a new process will achieve the same effect. b) If you opted to turn journaling off prior to installation, then the journaling must be turned back on when the installation is complete. Journaling ON Journaling on a Cache system can only be turned back on for the user's current process. When the installation of this patch has completed (interactively - not tasked), you may enable journaling for the current process. To determine if your process has journaling disabled, you can call: >W $$CURRENT^%NOJRN() 0 means journaling is disabled, 1 means it's on To enable journaling for the current process: >D ENABLE^%NOJRN Double check your process to be sure journaling is enabled: >W $$CURRENT^%NOJRN() 0 means journaling is disabled, 1 means it's on c) If routines LEX2040 and LEX2040P are found on your system, they may be deleted upon completion of the installation. These routines are the environment check and post-install routines for this installation. Routine Information: ==================== The checksums below are new checksums, and can be checked with CHECK1^XTSUMBLD. Routine Name: LEX2040 Before: n/a After: B71174356 **40** Description of Changes: Environment Check Routine Routine Name: LEX2040P Before: n/a After: B51304981 **40** Description of Changes: Post-Install Routine ============================================================================= User Information: Entered By : ROWE,KIMBALL Date Entered : FEB 02, 2006 Completed By: BASKETT,BARBARA J Date Completed: MAY 17, 2006 Released By : MONTGOMERY,ALAN Date Released : MAY 18, 2006 ============================================================================= Packman Mail Message: ===================== $END TXT