$TXT Created by at MNTVBB.DOMAIN.EXT (KIDS) on Thursday, 06/01/23 at 08:17 ============================================================================= Run Date: JUL 13, 2023 Designation: RMPR*3*213 Package : RMPR - PROSTHETICS Priority: Mandatory Version : 3 SEQ #185 Status: Released Compliance Date: AUG 13, 2023 ============================================================================= Associated patches: (v)RMPR*3*193 <<= must be installed BEFORE `RMPR*3*213' Subject: IFC FILING ROUTINE USING INCORRECT ICD API Category: - Routine Description: ============ Routine EN^RMPRFC4 is using the wrong API for looking up ICD10 codes. This is causing all Prosthetics IFC Consults to file an invalid value of "-1" into PROSTHETIC SUSPENSE file (#668) ICD field (#1.6) at the filler site. Patch Components: ----------------- Files & Fields Associated: File Name (Number) Field Name (Number) New/Modified/Deleted ------------------ -------------------- -------------------- N/A Forms Associated: Form Name File Number New/Modified/Deleted --------- ----------- -------------------- N/A Mail Groups Associated: Mail Group Name New/Modified/Deleted --------------- -------------------- N/A Options Associated: Option Name Type New/Modified/Deleted ----------- ---- -------------------- N/A Protocols Associated: Protocol Name New/Modified/Deleted ------------- -------------------- N/A Security Keys Associated: Security Key Name ----------------- N/A Templates Associated: Template Name Type File Name (Number) New/Modified/Deleted ------------- ---- ------------------ -------------------- N/A Remote Procedures Associated: Remote Procedure Name New/Modified/Deleted --------------------- -------------------- N/A Parameter Definitions Associated: Parameter Name New/Modified/Deleted -------------- -------------------- N/A Additional Information: ----------------------- New Service Requests (NSRs): N/A Patient Safety Issues (PSIs): N/A Defect Tracking System Ticket(s) & Overview: INC25443047 - IFC Consults Using Wrong ICD API Problem: -------- Routine EN^RMPRFC4 is using the wrong API for looking up ICD10 codes. This is causing all Prosthetics IFC Consults to file an invalid value into PROSTHETIC SUSPENSE file (#668) ICD field (#1.6) at the filler site. This manifests as a value of "-1" in the ICD field (#1.6). Resolution: ----------- This patch modifies the routine RMPRFC4 to use the extrinsic function $$ICDDX^ICDEX rather than $$ICDDX^ICDCODE. Routine(s): RMPRFC4 The post install routine RMPR213P searches the PROSTHETICS SUSPENSE file (#668) for incorrect ICD code entries of "-1" that were stored using the wrong API for ICD10 codes. When an incorrect entry is found, the routine calls the proper API and updates the file entry's fields ICD (#1.6) and PROVISIONAL DIAGNOSIS (#1.5) by locating the corresponding Prosthetics IFC consult in file 123 REQUEST/CONSULTATION and pulling the value from the PROVISIONAL DIAGNOSIS CODE field (#30.1). The post install routine will not update entries that have invalid ICD codes for the date specified in the PROSTHETICS SUSPENSE file (#668) DATE RX WRITTEN field (#22). Routine(s):RMPR213P Test Sites: ----------- Mann-Grandstaff VA Medical Center (Spokane, WA) Columbus - Chalmers P. Wylie VA OPC (Columbus, OH) SNOW Change Order # =================== Software and Documentation Retrieval Instructions: -------------------------------------------------- The software for this patch is being released in a PackMan message. There are no documentation changes associated with this patch release. Patch Installation: ------------------- Pre-Installation Instructions: This patch may be installed with users on the system although it is recommended that it be installed during non-peak hours to minimized potential disruption to users. This patch should take less than 5 minutes to install. It is not necessary to disable any options. Installation Instructions: 1. Choose the PackMan message containing this build. Then select the INSTALL/CHECK MESSAGE PackMan option to load the build. 2. From the Kernel Installation and Distribution System Menu, select the Installation Menu. From this menu, A. Select the Verify Checksums in Transport Global option to confirm the integrity of the routines that are in the transport global. When prompted for the INSTALL NAME enter RMPR*3.0*213. NOTE: Using will not bring up a Multi-Package build even if it was loaded immediately before this step. It will only bring up the last patch in the build. B. Select the Backup a Transport Global option to create a backup message. You must use this option and specify what to backup; the entire Build or just Routines. The backup message can be used to restore the routines and components of the build to the pre-patch condition. i. At the Installation option menu, select Backup a Transport Global. ii. At the Select INSTALL NAME prompt, enter your build RMPR*3.0*213. iii. When prompted for the following, enter "R" for Routines or "B" for Build. Select one of the following: B Build R Routines Enter response: Build iv. When prompted "Do you wish to secure your build? NO//", press and take the default response of "NO". v. When prompted with, "Send mail to: Last name, First Name", press to take default recipient. Add any additional recipients. vi. When prompted with "Select basket to send to: IN//", press and take the default IN mailbox or select a different mailbox. C. You may also elect to use the following options: i. Print Transport Global - This option will allow you to view the components of the KIDS build. ii. 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 of the components of this patch, such as routines, DDs, templates, etc. D. Select the Install Package(s) option and choose the patch to install. i. If prompted 'Want KIDS to Rebuild Menu Trees Upon Completion of Install? NO//', answer NO. ii. When prompted 'Want KIDS to INHIBIT LOGONs during the install? NO//', answer NO. iii. When prompted 'Want to DISABLE Scheduled Options, Menu Options, and Protocols? NO//', answer NO. Post-Installation Instructions: ------------------------------- None Installation Verification: -------------------------- Successful installation can be verified by reviewing the first 2 lines of the routines contained in the patch. The second line will contain the patch number (213) in the [PATCH LIST] section. ;;3.0;PROSTHETICS;**[Patch List]**; 30 Oct 98;Build 10 The Calculate and Show Checksum Values option [XTSUMBLD-CHECK] can be run to compare the routine checksums to what is documented in this patch description. Back-Out/Roll Back Plan: ------------------------ Back-out will be done only with the concurrence and participation of development team and appropriate VA site/region personnel. The decision to back-out or rollback software will be a joint decision between the development team, VA site/region personnel and other appropriate VA personnel. Prior to installing an updated KIDS package, the site/region should have saved a backup of the routines in a mail message using the Backup a Transport Global [XPD BACKUP] menu option (this is done at time of install). The message containing the backed-up routines can be loaded with the "Xtract PackMan" function at the Message Action prompt. The PackMan function "INSTALL/CHECK MESSAGE" is then used to install the backed-up routines onto the VistA System. If the patch was backed up for the build, from the Kernel Installation and Distribution System Menu, select the Installation Menu. Then select the Install Package(s) option and choose the patch (RMPR*3.0*213b) to install. The data modified by this patch installation can be restored by running the back out in the post install routine: BACKOUT^RMPR213P. Again: this action should only be taken with the concurrence and participation of development team and appropriate VA site/region personnel. Routine Information: ==================== The second line of each of these routines now looks like: ;;3.0;PROSTHETICS;**[Patch List]**; 30 Oct 98;Build 12 The checksums below are new checksums, and can be checked with CHECK1^XTSUMBLD. Routine Name: RMPR213P Before: n/a After: B59771591 **213** Routine Name: RMPRFC4 Before: B13895528 After: B14334230 **83,193,213** Routine list of preceding patches: 193 ============================================================================= User Information: Entered By : Date Entered : FEB 08, 2023 Completed By: Date Completed: JUL 12, 2023 Released By : Date Released : JUL 13, 2023 ============================================================================= Packman Mail Message: ===================== $END TXT