$TXT Created by at CHEYL106.FO-BAYPINES.DOMAIN.EXT (KIDS) on Thursday, 05/28/20 at 14:52 ============================================================================= Run Date: JUN 16, 2020 Designation: LEX*2*128 Package : LEX - LEXICON UTILITY Priority: EMERGENCY Version : 2 SEQ #119 Status: Released Compliance Date: JUN 24, 2020 ============================================================================= Associated patches: (v)LEX*2*127 <<= must be installed BEFORE `LEX*2*128' Subject: CODE SET FY20 4TH QTR UPDATE: COVID-19 Category: - Routine - Enhancement () - Other - Data Dictionary Description: ============ This patch contains the FY20 4th Quarter Code Set distribution with 70 changes effective Jul 01, 2020. This patch also contains one change from FY20 2nd Qtr (effective Jan 27, 2020), two changes from FY20 2nd Qtr (effective Feb 04, 2020) and two changes from FY20 2nd Qtr (effective Mar 01, 2020). This patch installs the data for the following Informational patch: ICPT*6.0*95 This patch writes to the following files: CPT #81 ^ICPT( ICR 4489 CPT CATEGORY #81.1 ^DIC(81.1, ICR 4490 CPT MODIFIER #81.3 ^DIC(81.3, ICR 4492 LEXICON files #757-757.41 ^LEX( N/A PATCH COMPONENTS: ================ Files & Fields Associated: N/A Forms Associated: N/A Mail Groups Associated: N/A Options Associated: N/A Protocols Associated: N/A Security Keys Associated: N/A Templates Associated: N/A ADDITIONAL INFORMATION: ====================== New Service Requests (NSRs): N/A Patient Safety Issues (PSIs): N/A ENHANCEMENTS: ============ FY20 4th Quarter Update HCPCS Procedure Additions (59 Codes) ------------------------- Effective Jan 27, 2020 (FY20 2nd Qtr) (1 Code) G2025 Effective Mar 01, 2020 (FY20 2nd Qtr) (1 Code) C9803 Effective Jul 01, 2020 (57 Codes) C1748 C1849 C9059 C9061 C9063 C9122 C9759 C9760 C9762 C9763 C9764 C9765 C9766 C9767 G2170 G2171 J0223 J0591 J0691 J0742 J0791 J0896 J1201 J1429 J1558 J3399 J7169 J7204 J7333 J9177 J9198 J9246 J9358 Q4227 Q4228 Q4229 Q4230 Q4231 Q4232 Q4233 Q4234 Q4235 Q4236 Q4237 Q4238 Q4239 Q4240 Q4241 Q4242 Q4244 Q4245 Q4246 Q4247 Q4248 Q5119 Q5120 Q5121 HCPCS Procedure Inactivations ----------------------------- Effective Jul 01, 2020 (9 Codes) C9041 C9053 C9054 C9056 C9057 C9058 C9754 C9755 J9199 HCPCS Procedure Revisions (6 Codes) ------------------------- Effective Feb 04, 2020 (FY20 2nd Qtr) (2 Codes) U0003 U0004 Effective Jul 01, 2020 (4 Codes) C9758 J7321 J9245 Q4176 CPT Modifier Revisions ---------------------- Effective Mar 01, 2020 (1 Code) CS CPT/HCPCS Modifier Pairs ------------------------ Added Inact React Revise Total ----- ----- ----- ------ ----- Effective Jan 01, 2017 * -- -- -- 1 1 * update from a previous quarter CPT Copyright ============== CPT (CPT is a registered trademark of the American Medical Association) codes, descriptions and other data are copyright 1966, 1970, 1973, 1977, 1981, 1983-2020 American Medical Association. CPT is commercial technical data developed exclusively at private expense by Contractor/Manufacturer American Medical Association, AMA Plaza, 330 N. Wabash Ave., Suite 39300, Chicago, IL 60611-5885. The provisions of this Agreement between AMA and VA prevail, including prohibiting creating derivative works and providing CPT to any third parties outside of the Facilities. REQUEST/INCIDENTS ================= None TEST SITES ========== VISN 02 (Buffalo, NY) Montana HCS (Fort Harrison, MT) North Florida HCS (Gainesville, FL) SOFTWARE RETRIEVAL INSTRUCTIONS =============================== Global Host File: LEX_2_128.GBL (ASCII) The host file is 94 MB in size and could take up to 15 minutes to transmit. The host file is available at the following location. /srv/vista/patches/SOFTWARE/LEX_2_128.GBL INSTALLATION INSTRUCTIONS ========================= 1) Users may be on the system during the install of LEX*2.0*128. It is recommended that this patch be installed during non-peak hours. This patch should take from 30 to 90 minutes to install depending on the system. Create a backup 20-75 minutes Load the Global 1-5 minutes Kids Install 5-15 minutes 2) Size/Disk Space Requirements: The changes to the Lexicon and CPT globals will result in a combined growth of about 15 MB of data. The import global ^LEXM is about 94 MB in size. Make sure there is sufficient space for the growth to the VistA globals and the import global before continuing. 3) Create a backup of the following global files before continuing: CPT #81 ^ICPT( CPT Category #81.1 ^DIC(81.1, CPT Modifier #81.3 ^DIC(81.3, Lexicon Files #757-757.41 ^LEX( These backup files may get as large as 2.4 gigabytes. Make sure space is available before proceeding. It should take from 20 to 75 minutes to create the backup files. When you are creating a backup of non-subscripted globals, you are saving the entire global. You should use the utility ^%GO for non-subscripted globals, and when prompted for a global, enter the global root (global name only, no open parenthesis, no file number and no commas, as shown below). Examples: Enter To create a Backup copy of: ------ -------------------------- ^ICPT CPT ^LEX Lexicon Files When you are creating a backup of a subscripted global, you are saving a partial global (a file within a global). You should use the utility ^%GOGEN, and when prompted for a global, enter the open global reference as shown below. Examples: Enter To create a Backup copy of: ------ -------------------------- ^DIC(81.1, CPT Category ^DIC(81.3, CPT Modifier 4) Install the data from the global host file LEX_2_128.GBL. This file contains the Lexicon Utility's import global ^LEXM. This global is approximately 94 megabytes in size. Make sure there is sufficient space available to load this global on your system. The loading of the global should take from 1 to 5 minutes. From the Programmer prompt, execute the following routine: >D ^%GI Global input Device: /srv/vista/patches/SOFTWARE/LEX_2_128.GBL Parameter: "WNS" => Globals were saved on 28 May 2020 13:02 PM Cache with description: LEX*2.0*128/ICPT*6.0*95 Data Input option: A ^LEXM 5) Set up user and IO variables (D ^XUP) for programmer access. 6) Distribution Load: Load the KIDS Distribution from the Packman Message using the Packman function "Install/Check Message." 7) KIDS Installation: Install the patch using the KIDS Installation Menu action "Install Package(s)" and the install name LEX*2.0*128. Respond "NO" at the "Want KIDS to INHIBIT LOGONs during the install?" prompt. Respond "NO" at the "Want to DISABLE Scheduled Options, Menu Options, and Protocols?" prompt. The KIDs install should take from 5-15 minutes 8) Cleanup a) The Environment Check routine LEX2128 and the Post-Install routine LEX2128P should be deleted using the KERNEL option 'Delete Routines' [XTRDEL] upon completion of the installation. NOTE: The installation of this patch should trigger an update protocol and may spawn background tasks for the Clinical Reminders or Consult packages. You do not need to wait for these background jobs to complete to delete the Environment Check and Post-Install routines. 9) Back-out Plan: To back-out data from a production account could cause broken pointers, errors and hard MUMPS crashes. The back-out plan for data only patches is to report your findings and wait for a repair patch. Contact Help desk to log a ticket. 10) Patch Verification: Kernel Installation & Distribution System-> Utilities-> Install File Print option can be used to check for any errors plus the status of the install being Completed. Routine Information: ==================== The second line of each of these routines now looks like: ;;2.0;LEXICON UTILITY;**[Patch List]**;Sep 23, 1996;Build 3 The checksums below are new checksums, and can be checked with CHECK1^XTSUMBLD. Routine Name: LEX2128 Before: n/a After: B94450253 **128** Routine Name: LEX2128P Before: n/a After: B21873162 **128** ============================================================================= User Information: Entered By : Date Entered : MAY 19, 2020 Completed By: Date Completed: JUN 15, 2020 Released By : Date Released : JUN 16, 2020 ============================================================================= Packman Mail Message: ===================== $END TXT