$TXT Created by DAYON,RUFINO at SUP.DEV.FO-HINES.MED.VA.GOV (KIDS) on Monday, 09/15/03 at 14:59 ============================================================================= Run Date: SEP 16, 2003 Designation: RMPR*3*77 Package : RMPR - PROSTHETICS Priority: Mandatory Version : 3 SEQ #65 Status: Released Compliance Date: OCT 17, 2003 ============================================================================= Associated patches: (v)RMPR*3*13 <<= must be installed BEFORE `RMPR*3*77' (v)RMPR*3*29 <<= must be installed BEFORE `RMPR*3*77' (v)RMPR*3*33 <<= must be installed BEFORE `RMPR*3*77' (v)RMPR*3*35 <<= must be installed BEFORE `RMPR*3*77' (v)RMPR*3*37 <<= must be installed BEFORE `RMPR*3*77' (v)RMPR*3*41 <<= must be installed BEFORE `RMPR*3*77' (v)RMPR*3*44 <<= must be installed BEFORE `RMPR*3*77' (v)RMPR*3*46 <<= must be installed BEFORE `RMPR*3*77' (v)RMPR*3*50 <<= must be installed BEFORE `RMPR*3*77' (v)RMPR*3*52 <<= must be installed BEFORE `RMPR*3*77' (v)RMPR*3*55 <<= must be installed BEFORE `RMPR*3*77' (v)RMPR*3*57 <<= must be installed BEFORE `RMPR*3*77' (v)RMPR*3*59 <<= must be installed BEFORE `RMPR*3*77' (v)RMPR*3*62 <<= must be installed BEFORE `RMPR*3*77' (v)RMPR*3*69 <<= must be installed BEFORE `RMPR*3*77' (v)RMPR*3*70 <<= must be installed BEFORE `RMPR*3*77' (v)RMPR*3*71 <<= must be installed BEFORE `RMPR*3*77' (v)RMPR*3*72 <<= must be installed BEFORE `RMPR*3*77' (v)RMPR*3*76 <<= must be installed BEFORE `RMPR*3*77' Subject: MISCELLANEOUS NOIS FIXES Category: - Print Template - Routine - Other - Informational Description: ============ Test Sites: ----------- Cheyenne VAMC Milwaukee VAMC NY-Harbor Network South Texas HCS Tampa VAMC NOIS: ----- AMA-0503-71417 CHY-0503-51280 CTX-0403-70080 MON-0403-50356 UNY-0303-10990 TAM-0303-30926 SLC-0103-52515 SBY-0103-30481 DUR-0103-30328 SFC-1202-61632 DUR-1202-30303 SBY-1102-31355 PRE-0902-60462 CAH-0902-30107 AUG-0902-30993 CPH-0802-42711 TNV-0602-31189 MUS-0502-70072 SBY-0502-33034 ATG-0402-32747 DAY-0402-41893 FAV-0302-71019 PUG-0202-52047 IND-0202-40748 TAM-1101-31264 HEH-1001-40478 LAH-0901-60296 PUG-0801-51599 MAC-0201-61936 COS-1000-42808 Patch RMPR*3.0*77 includes the following NOIS fixes: 1. The Display/Print Patient 2319 [RMPR PRINT 2319] option for patient with multiple items are showing transactions that belong to different patient. Modified routine RMPRPAT7 to only print transactions for the same patient. Reported in NOIS IND-0202-40748. 2. An undefined error occurs during processing of suspense when users link a suspense, create a Prosthetics letter and back to suspense list manager processing. The link to the Letter Module was removed while in suspense processing list manager screen. This is reported in nois MON-0403-50356, SBY-0103-30481, DUR-0103-30328, SFC-1202-61632, DUR-1202-30303, SBY-1102-31355, AUG-0902-30993, CAH-0902-30107, SBY-0502-33034, ATG-0402-32747, DAY-0402-41893 and COS-1000-42808. 3. When option DSS HCPCS History [RMPR HCPCS HISTORY] is queued to print for a station, a different station entries are printed in addition to the queued station report. Routine RMPRSE2 was modified to fix the printout and this is reported in nois HEH-1001-40478. 4. Template RMPR VIEW REQUEST has been modified to print the word processing field (Completion Note) in a separate line. Reported in NOIS TNV-0602-31189. 5. Using option Display/Print Patient 2319 [RMPR PRINT 2319], the patient 2319 records differ depending on which site is selected. Reported in NOIS CPH-0802-42711. 6. When Prosthetics user add a patient to Prosthetics using option Display/Print Patient 2319 [RMPR PRINT 2319], some of the required information for the patient were not entered. In order to prevent a future problem, the ability of adding a Prosthetics patient was removed in this option. Reported in NOIS FAV-0302-71019. 7. An error sometime occurs while running the Home Oxygen report New Patients [RMPO-RPT-HONEWPT] and option Generate Letters [RMPO LIST/PRINT MANAGER] when a dangling 'AC' cross-reference of primary item field for a deleted item still exist. Modified routines RMPOLZA, RMPOPED and RMPORNQ in order to prevent the error and use Fileman during the deletion of an Oxygen item. Reported in nois AMA-0503-71417 and CHY-0503-51280. 8. When user runs the Billing Transactions [RMPO BILLING TRANSACTIONS] option, a future billing month is allowed to be created. This causes a problem for some Home Oxygen patients that were entered after the creation date. Routine RMPOBILU was modified to prevent the creation of future Home Oxygen billing month. This is reported in nois SLC-0103-52515. 9. Not all unlinked 2319 records are printed in the Print Patient Records Not Linked To Suspense [RMPR RECORDS WITHOUT SUSPENSE] report. Modified routine RMPRSP7 to print all unlinked 2319 records. This is reported in nois UNY-0303-10990. 10. Undefined error for variable WHO while running option Print NPPD Worksheets [RMPR NPPD PRT]. Modified routine RMPRN73. This is reported in nois CTX-0403-70080. 11. Allows printing of Prosthetics reports to P-MESSAGE device and queuing. Modified routines RMPR5N1, RMPR5N2, RMPR5N3, RMPROPN, RMPROPN1, RMPRP55, RMPRSE1, RMPRSE2, RMPRSEA, RMPRSP, RMPRSP1, RMPRPSP2 and RMPRSP3. The following options are affected: a. Print Current HCPCS Balance by HCPCS [RMPR INV STOCK BY HCPCS]; b. Print Current Item Balance by Location [RMPR INV STOCK BY LOCATION]; c. Print VA Form 10-1210 [RMPR INV PRINT/CHECK BAL]; d. Print Closed Suspense Records [RMPR SUSPENSE PRINT CLOSED]; e. Print Detailed Open/Pending Suspense Records [RMPR SUSPENSE PRINT]; f. Print 5 Day Old Suspense Report [RMPR SUSPENSE PRINT 5 DAY OLD]; h. Print Summary Open/Pending Suspense Records [RMPR PENDING SUSPENSE]; i. Print Suspense Statistics [RMPR SUSPENSE STAT]; j. List Open 1358 Prosthetic Transactions [RMPR PRINT OPEN TRANS]; k. List Open 1358 Transactions By Initiator [RMPR PRINT OPEN TRANS INIT]; l. List Open Stock Issues [RMPR PRINT OPEN STK ISS]; m. PSAS HCPCS History [RMPR PSAS HCPCS HISTORY]; n. Item History [RMPR ITEM HISTORY]; o. Search for Recalled Item [RMPR PRINT RECALL]; and p. Display/Print Patient 2319 [RMPR PRINT 2319] Reported in nois PUG-0801-51599 and TAM-1101-31264. 12. Prosthetics patient encounters should only have one entry per patient in a single day. Since the background job that processes Prosthetics encounter to PCE goes back to 90 days, other patient transactions are being process to PCE the next time the background job runs. Routine RMPRPCEB was modified to prevent multiple transactions to be processed to PCE. Reported in nois PRE-0902-60462. 13. Undefined error occurs when running option Print NPPD Worksheets [RMPR NPPD PRT] where the TMP global is not being defined. Also, execute the proper kill of variables after closing the device. Modified routine RMPRN6 and this is reported in nois TAM-0303-30926 and MAC-0201-61936. 14. Undefined error occurs while running options Close Out [RMPR CLOSE-OUT] or Complete Form 2529-3 [RMPR COMPLETE 2529-3]. Routine RMPR29D was modified. This is reported in nois PUG-0202-52047 and LAH-0901-60296. 15. Prevent duplicates in the DOR screen display. Modified routine RMPR9DO. NO associated NOIS. PSAS HCPCS Added: ----------------- HCPCS: G0290 SHORT NAME: STENT, DRUG ELUTING W/DEL SYS CPT: G0290 STATUS: ACTIVE NPPD NEW CODE: 960 E DESCRIPTION: STENT, DRUG ELUTING WITH DELIVERY SYSTEM CPT MODIFIER: GY,NU HCPCS: G0291 SHORT NAME: STENT, DRUG ELUTING W/O DEL CPT: G0291 STATUS: ACTIVE NPPD NEW CODE: 960 E DESCRIPTION: STENT, DRUG ELUTING WITH OUT DELIVERY SYSTEM CPT MODIFIER: GY,NU HCPCS: TM100 SHORT NAME: TELEMED HOME COMPUTER/EQUIPMT CPT: A9270 STATUS: ACTIVE NPPD REPAIR CODE: R80 C NPPD NEW CODE: 900 K DESCRIPTION: TELEMEDICINE HOME COMPUTER EQUIPMENT CPT MODIFIER: NU,RP HCPCS: TM101 SHORT NAME: TELEMED VIDEO MONITOR CPT: A9270 STATUS: ACTIVE NPPD REPAIR CODE: R80 C NPPD NEW CODE: 900 K DESCRIPTION: TELEMEDICINE VIDEO MONITOR CPT MODIFIER: NU,RP HCPCS: TM102 SHORT NAME: TELEMED HOME EQUIPMENT CPT: A9270 STATUS: ACTIVE NPPD REPAIR CODE: R80 C NPPD NEW CODE: 900 K DESCRIPTION: TELEMEDICINE HOME EQUIPMENT CPT MODIFIER: NU,RP HCPCS: TM103 SHORT NAME: TELEMED MESSAGE/MONITORING CPT: A9270 STATUS: ACTIVE NPPD REPAIR CODE: R80 C NPPD NEW CODE: 900 K DESCRIPTION: TELEMEDICINE IN HOME MESSAGE MONITORING CPT MODIFIER: NU,RP HCPCS: TM104 SHORT NAME: TELEMED AUDIO/VIDEO CPT: A9270 STATUS: ACTIVE NPPD REPAIR CODE: R80 C NPPD NEW CODE: 900 K DESCRIPTION: TELEMEDICINE VIDEOPHONE/AUDIO VIDEO CPT MODIFIER: NU,RP HCPCS: TM105 SHORT NAME: TELEMED WOUND CARE CPT: A9270 STATUS: ACTIVE NPPD REPAIR CODE: R80 C NPPD NEW CODE: 900 K DESCRIPTION: TELEMEDICINE WOUND CARE EQUIPMENT CPT MODIFIER: NU,RP DATA DICTIONARY: ---------------- A new field was added in file #660 ( RECORD OF PROS APPLIANCE/REPAIR ). 660,8.61 CONSULT REQUEST SERVICE 4;3 FREE TEXT INPUT TRANSFORM: K:$L(X)>35!($L(X)<2) X LAST EDITED: MAY 06, 2003 HELP-PROMPT: Answer must be 2-35 characters in length. DESCRIPTION: A service/section of a suspense requestor that initiated a consult for Prosthetics item. This free text entry is a service/section name of SERVICE/SECTION file (#49). Conversion of Deactivated HCPCS: -------------------------------- If the Deactivated HCPCS in the Prosthetics Inventory Program (PIP) and the replacement HCPCS is not in the inventory, the Deactivated/old HCPCS will be replaced with the active/new HCPCS during the post-init, based on the list provided by the Data Validation Group. Setting of Consult Request Service: ----------------------------------- During the post-init, a new field CONSULT REQUEST SERVICE (#8.61) will be filled for entries in file RECORD OF PROS APPLIANCE/REPAIR (#660), starting from 1/1/2000, based on the Suspense Requestor field (#8.6). Removing Calculation Flag of the following HCPCS: ------------------------------------------------- E1038 E1050 E1060 E1070 E1083 E1084 E1085 E1086 E1087 E1088 E1089 E1090 E1092 E1093 E1100 E1110 E1130 E1140 E1150 E1160 E1161 E1170 E1171 E1172 E1180 E1190 E1195 E1200 E1210 E1211 E1212 E1213 E1220 E1221 E1222 E1223 E1224 E1225 E1226 E1227 E1228 E1230 E1240 E1250 E1260 E1270 E1280 E1285 E1290 E1295 E1296 E1297 E1298 K0001 K0002 K0003 K0004 K0005 K0006 K0007 K0009 K0010 K0011 K0012 K0014 Routine Summary: ---------------- The following routines are included in this patch. The second line of each of these routine(s) will look like: ;;3.0;PROSTHETICS;**[patch list]**;Feb 09, 1996 Routines Before Patch After Patch Patch List -------- ------------ ------------ ---------- RMPOBILU 4999908 5005240 29,43,44,77 RMPOLZA 3473403 3546144 29,77 RMPOPED 10867010 10874505 29,44,41,52,77 RMPORNQ 2855641 2912913 29,77 RMPR29D 4666949 4686813 12,41,77 RMPR5N1 1532943 13547461 33,77 RMPR5N2 11028900 11041057 33,37,77 RMPR5N3 11242678 11254835 33,37,77 RMPR9DO 11332380 11624979 59,77 RMPR9LNP 1808798 1839486 71,77 RMPREO23 5741535 8354770 45,55,62,77 RMPRFO 6785983 6866037 55,77 RMPRFO1 9390631 9018587 8,44,77 RMPRFO2 11154476 11156533 77 RMPRN6 15409036 15467556 31,32,34,36,39,48,51,70,77 RMPRN73 7608957 7699369 57,70,72,77 RMPROPN 12427496 12439231 77 RMPROPN1 7297330 7308753 13,77 RMPRP55 18834824 18842569 20,55,77 RMPRPAT7 970444 1018432 32,34,35,77 RMPRPCE1 3612150 4980725 62,69,77 RMPRPCEB 5649197 6198988 62,69,77 RMPRPRT 12938581 14330067 7,50,77 RMPRPS35 9875526 10430216 58,69,76,77 RMPRPS36 6594717 7093236 76,77 RMPRSE1 15405106 15357823 20,57,77 RMPRSE2 11474895 11490188 28,30,32,36,46,77 RMPRSE21 12238205 12223229 36,62,77 RMPRSEA 17966677 17994968 77 RMPRSP 3957601 3964387 45,55,77 RMPRSP1 8309851 8319479 45,52,77 RMPRSP2 12440149 12452300 45,52,77 RMPRSP3 3800005 3806869 45,55,77 RMPRSP7 7248126 7272366 62,69,77 Installation instruction: This patch was created with Kernel V8 KIDS and should be installed into your production UCI. It can be installed anytime but it is recommended that all Prosthetics users should be off the system. Complete installation will take about 20 minutes. Follow these instructions: 1. Choose the PackMan message containing this patch and invoke the INSTALL/CHECK MESSAGE PackMan option. 2. On the KIDS menu, under the 'Installation' menu, use the option 'Verify Checksum in Transport Global' and verify that all routines have the correct checksums. 3. From the 'Installation' menu of KIDS, use the option 'Install Package(s)'. Select the package 'RMPR*3.0*77' and proceed with the install. 4. It is recommended that you do not queue this patch for install. 5. When prompted 'Want KIDS to INHIBIT LOGONs during the install? YES//' respond NO. 6. When prompted 'Want to DISABLE Schedule Options, Menu Options and Protocols? YES//', respond YES. When prompted to select the options you would like to place out of order, enter the following: RMPR OFFICIAL RMPR CLERK Routine Information: ==================== Routine Name: - RMPOBILU Routine Checksum: Routine Name: - RMPR29D Routine Checksum: Routine Name: - RMPR5N1 Routine Checksum: Routine Name: - RMPR5N2 Routine Checksum: Routine Name: - RMPR5N3 Routine Checksum: Routine Name: - RMPRFO1 Routine Checksum: Routine Name: - RMPRN6 Routine Checksum: Routine Name: - RMPROPN Routine Checksum: Routine Name: - RMPROPN1 Routine Checksum: Routine Name: - RMPRP55 Routine Checksum: Routine Name: - RMPRPAT7 Routine Checksum: Routine Name: - RMPRPCEB Routine Checksum: Routine Name: - RMPRPRT Routine Checksum: Routine Name: - RMPRSE1 Routine Checksum: Routine Name: - RMPRSE2 Routine Checksum: Routine Name: - RMPRSE21 Routine Checksum: Routine Name: - RMPRSEA Routine Checksum: Routine Name: - RMPRSP Routine Checksum: Routine Name: - RMPRSP2 Routine Checksum: Routine Name: - RMPRSP3 Routine Checksum: Routine Name: - RMPRSP7 Routine Checksum: Routine Name: - RMPRPCE1 Routine Checksum: Routine Name: - RMPOPED Routine Checksum: Routine Name: - RMPOLZA Routine Checksum: Routine Name: - RMPORNQ Routine Checksum: Routine Name: - RMPRN73 Routine Checksum: Routine Name: - RMPRFO2 Routine Checksum: Routine Name: - RMPREO23 Routine Checksum: Routine Name: - RMPRSP1 Routine Checksum: Routine Name: - RMPRFO Routine Checksum: Routine Name: - RMPRPS35 Routine Checksum: Routine Name: - RMPRPS36 Routine Checksum: Routine Name: - RMPR9DO Routine Checksum: Routine Name: - RMPR9LNP Routine Checksum: ============================================================================= User Information: Entered By : DAYON,RUFINO Date Entered : FEB 24, 2003 Completed By: HESS,JAMES Date Completed: SEP 16, 2003 Released By : DIETRICH,JON Date Released : SEP 16, 2003 ============================================================================= Packman Mail Message: ===================== $END TXT