$TXT Created by HOWELL,LYNN MIDDLENAMEIS at MNTVBB.ISC-ALBANY.VA.GOV (KIDS) on FRIDAY, 08/03/01 at 08:37 ============================================================================= Run Date: AUG 21, 2001 Designation: OOPS*1*11 Package : OOPS - ASISTS Priority: Mandatory Version : 1 SEQ #11 Status: Released ============================================================================= Associated patches: (v)OOPS*1*9 <<= must be installed BEFORE `OOPS*1*11' (v)OOPS*1*10 <<= must be installed BEFORE `OOPS*1*11' Subject: NEEDLESTICK INITIATIVE Category: - Enhancement (Mandatory) - Data Dictionary - Routine Description: ============ This patch contains enhancements to the ASISTS package to implement the requirements for the Needlestick Act (HR 5178). In addition to adding new fields to ASISTS, modifications are being made to the Edit Report of Incident and Log of Needlestick Incidents Options. All of the new fields (except Service) will be transmitted to the ASISTS National Database using the existing option. Changes are also being made to the transmission of data to the ASISTS National Database. The log of needlestick Incidents report has also been modified to display the new Needlestick Act information. In addition to these enhancements the following NOIS and E3R's will be addressed: NOIS: ----- DUB-0200-30806 - LOG Scrolling off screen DAY-0300-40493 - Problem in OOPS*1*9 patch (queued reports) FAV-0501-72555 - ENTERING NEW UNION INFO FOR W.C. SBY-0501-31651 - DATE OF INJURY DOESN'T SHOW UNDER DISPLAY E3R's: ------ 11860 - ADD SERVICE FIELD 12320 - SERVICE NAME / MAIL SYMBOL 12418 - ASISTS REPORTS 14511 - LOG OF FEDERAL INJURIES PRINT TO SCREEN 14736 - DATE RANGE FOR LOG OPTIONS 1. Modifications to the Edit Report of Incident Option [OOPS SAFETY SUP ENTRY], [OOPS SUP ENTRY] Modifications have been made to the 2162 portion of the Edit Report of Incident Option [OOPS SAFETY SUP ENTRY], [OOPS SUP ENTRY] on the Safety, Supervisor, and Workers' Comp menus. These modifications allow for collecting data in the new fields added to the ASISTS ACCIDENT REPORTING FILE (#2260) (see item 2 below). If the TYPE OF INCIDENT field (#3) in the ASISTS Accident Reporting File (#2260) equals either Sharps Exposure, Hollow Bore Needlestick, or Suture Needlestick then the user is prompted to enter the BRAND (#82) of the device. BRAND is a pointer to a new file, ASISTS NEEDLESTICK BRANDS File (#2262.3) that can be updated as needed by the user. DEVICE SIZE (#83) is a new field whose entry is dependant on the OBJECT CAUSING INJURY field (#38). The OBJECT CAUSING INJURY field (#38) uses (is a pointer to) the ASISTS DEVICE/EQUIPMENT File (#2261.7). If the response to the OBJECT CAUSING INJURY (#38) prompt points to an entry in the ASISTS DEVICE/EQUIPMENT File (#2261.7) whose TYPE field (#2) equals an 'N' for Needlestick, then the user is prompted to enter the DEVICE SIZE (#83). If the TYPE Field (#2) equals an 'S', the DEVICE SIZE prompt is not asked. Additionally, if the description for the OBJECT CAUSING INJURY field (#38), contains the word Needle, a listing of valid Needle sizes will be available for selection. If the description contains the word Syringe, a listing of valid Syringe gauges will be available. The SAFETY DESIGN DEVICE USED Field (#43) set of codes has been changed. Unknown is no longer a valid selection. Additionally, if the user enters a 'Y' in this field now, they will be prompted to enter two new fields. The first field is DID THE INJURY OCCUR BEFORE THE SAFETY DEVICE WAS ENGAGED (#87) and has a Yes/No response. The second new field, SAFETY CHARACTERISTICS (#84) points to a new ASISTS Table File, ASISTS SAFETY CHARACTERISTICS (#2261.9). If the user enters a 'N' in the SAFETY DESIGN DEVICE USED field (#43), they will be prompted to reply to the new free text field, EXPLAIN WHY A SAFETY DEVICE WAS NOT USED field (#85). The new fields noted above must be completed before the Supervisor can sign the 2162 form. In addition, the SERVICE (#86) field has been added and is 'pulled' automatically from the New Person File (#200), SERVICE/SECTION field (#29). This occurs in the Edit Report of Incident option. 2. New fields have been added to the ASISTS Accident Reporting File (#2260). The following fields have been added to the ASISTS Accident Reporting File (#2260) (field numbers are shown to right of field name): BRAND (#82) DEVICE SIZE (#83) SAFETY CHARACTERISTICS (#84) SAFETY DEVICE NOT USED (#85) SERVICE (#86) INJ PRIOR TO SAFE DEV ENGAGED (#87) NEEDS XMIT TO NDB (#54) TRANSMITTED TO NDB (#59) 3. The Print Report of Accident [OOPS SAFETY PRINT], [OOPS SUP PRINT], [OOPS UNION PRINT] has been modified. The Print Report of Accident has been modified to display the new fields listed in item #2 above.. 4. The routines that extract and transmit data to the ASISTS National Database have been modified to include sending the new fields: BRAND (#82), DEVICE SIZE (#83), SAFETY CHARACTERISTICS (#84), SAFETY DEVICE NOT USED (#85) and the INJ PRIOR TO SAFE DEV ENGAGED (#87). In addition to sending these new fields, the routines have been altered to allow data to be sent daily versus the original design of only once a month. In order to do this, the Scheduled Transmit National Database (2162) Data [OOPS SCHEDULED XMIT 2162 DATA] should be scheduled to run once a day (business days), 8 hours after the close of normal business hours. The IRM or designated group or the facility should schedule this. Along with this update, the Manual Transmit of National Database (2162) Data, [OOPS MANUAL 2162 DATA XMIT] can now ONLY be used to re-transmit data that was previously sent to NDB. This includes both cases successfully sent and cases that failed during the transmit process. This is a change from the current processing where any case could be selected for manual transmission. 5. Three new ASISTS files have been added. The following table files have been added to ASISTS: ASISTS DEVICE SIZE File (#2262.2), the ASISTS SAFETY CHARACTERISTICS File (#2261.9), and the ASISTS NEEDLESTICK BRANDS File (#2262.3). These files will be used as valid responses to the DEVICE SIZE (#83), SAFETY CHARACTERISTICS (#84) and the BRAND (#82) fields in the ASISTS Accident Reporting File (#2260) . 6. A pre-installation routine will be run that will convert the value of the SAFETY DESIGN DEVICE USED (#43) field in the ASISTS ACCIDENT REPORTING File (#2260) if it equals 'U'nknown to 'N'o. This change is made at the direction of TAG in order to support the new logic for this field as described in item 1 above. 7. The Log of Federal Occupational Injuries and Illnesses [OOPS LOG] and Log of Needlestick Incidents [OOPS NEEDLESTICK LOG] which can be accessed from the ASISTS Employee Health Menu [OOPS EMP HEALTH MENU], the ASISTS Safety Officers Menu [OOPS SAFETY MENU], and the ASISTS Union Menu [OOPS UNION MENU] have been modified. Both reports will now accept date ranges for the report information selection criteria. The new Needlestick Act (HR 5178) information, from the ASISTS Accident Reporting File (#2260) are now included in the report information. In addition to the above information being displayed, NOIS DUB-0200-30806 is also resolved by fixing a bug in the code that prints/lists report data to the terminal. 8. The Print Accident Report Status report which can be accessed from ASISTS Employee Health Menu [OOPS EMP HEALTH MENU], ASISTS Supervisor Menu [OOPS SUP MENU], ASISTS Safety Officers Menu [OOPS SAFETY MENU], ASISTS Union Menu [OOPS UNION MENU], and ASISTS Worker's Compensation Menu [OOPS WORKER'S COMP MENU] has been modified. NOIS DAY-0300-40493 has been resolved by fixing a bug in the code that was erroneously reporting that no data was found for queued reports containing valid data. 9. The Display CA1 or CA2 Option which can be accessed from ASISTS Employee Health Menu [OOPS EMP HEALTH MENU], ASISTS Supervisor Menu [OOPS SUP MENU], ASISTS Safety Officers Menu [OOPS SAFETY MENU], and ASISTS Worker's Compensation Menu [OOPS WORKER'S COMP MENU] has been modified to correct NOIS SBY-0501-31651. The DATE OF INJURY field (#141) in the ASISTS ACCIDENT REPORTING File (#2260) from the Supervisors' portion of the CA1 was not displaying the date. With the modification, the date now displays correctly. 10. The Edit Site Parameter Option [OOPS EDIT SITE PARAMETER] has been modified by adding a new field, OWCP CHARGEBACK CODE (.7) to the subfile, STATION (#2262.03) of the ASISTS SITE PARAMETER File (#2262). This field will be used as the default value for the OWCP CHARGEBACK CODE field (#70) in the ASISTS ACCIDENT REPORTING File (#2260) entered in the Workers' Compensation Edit CA1/CA2 [OOPS WC EDIT CA1/CA2] Option. This field can be left blank if a default value is not desired. The prompt, OWCP AGENCY CODE field (#1) in the ASISTS SITE PARAMETER File (#2262) has been removed as it is no longer used in ASISTS. 11. The Print CA1/CA2 Option [OOPS EMP PRINT CA], [OOPS SUP PRINT CA], and [OOPS SAFETY PRINT CA] has been modified to print the DATE/TIME INJURY OCCURRED field (#109) entered by the employee in block 10 on the CA1 instead of the DATE/TIME OF OCCURRENCE field (#4) from the ASISTS ACCIDENT REPORTING FILE (#2260). 12. The Workers' Compensation Edit CA1/CA2 [OOPS WC EDIT CA1/CA2] Option has been modified to use the OWCP CHARGEBACK CODE field (#.7) from the ASISTS SITE PARAMETER FILE (#2262) subfile STATION (#2262.03) as the default value for the OWCP CHARGEBACK CODE field (#70) in the ASISTS ACCIDENT REPORTING FILE (#2260). 13. Additional error checking has been added to the SSN field (#5) in the ASISTS ACCIDENT REPORTING FILE (#2260) to prevent entry of all zero's. This is necessary to use the SSN as a unique identifier in the ASIST National Database. 14. Removed the date error checking the DATE FIRST AWARE OF ILLNESS field (#214) in the ASISTS ACCIDENT REPORTING File (#2260) that prevented this date being greater than 3 years in the past. Additional date error checking has been implemented on fields DATE FIRST REALIZED CAUSE (#215), FIRST DATE MEDICAL CARE (#250), DATE NOTICE RECEIVED (#252), DATE/TIME WORK STOPPED (#253), and DATE OF LAST EXPOSURE (#255) in the ASISTS ACCIDENT REPORTING File (#2260) so that these dates cannot be prior to the DATE FIRST AWARE OF ILLNESS (#214). Note that the DATE 1ST AWARE OF ILLNESS in the Create Accident/Illness Record [OOPS CREATE CASE] cannot be greater than three years in the past. 15. Modifications have been made to routines OOPSDOL1, OOPSDOL2 and OOPSDOLX to implement corrections of minor problems in the data extraction and transmission of claims data to the Department of Labor. 16. Made a modification to Enter/Edit Union Information Option [OOPS WC EDIT UNION INFO] to correct a problem with adding new records. This addresses NOIS FAV-0501-72555. INSTALLATION ------------ It is recommended that this patch be installed when no ASISTS users are on the system. It is recommended the following menu options (File #19) and all of their descendants be disabled prior to installing this patch: OOPS WORKER'S COMP MENU ASISTS Worker's Compensation Menu OOPS SAFETY MENU ASISTS Safety Officers Menu OOPS SUP MENU ASISTS Supervisor Menu Install Time - less than 5 minutes ================ INSTALLATION INSTRUCTIONS ================= 1. LOAD TRANSPORT GLOBAL --------------------- Choose the PackMan message containing this patch and invoke the INSTALL/CHECK MESSAGE PackMan option. 2. DISABLE ROUTINE MAPPING (DSM for Open VMS sites only) ----------------------- Disable routine mapping on all systems for the routines listed in step 3 below. NOTE: If the routines included in this patch are not currently in your mapped routine set, please skip this step. 3. ROUTINES SENT WITH PATCH ------------------------ The following is a list of the routines included in this patch. The second line of each of these routines now looks like: ;;1.0;ASISTS;**Patch List**;Jun 01, 1998 CHECK^XTSUMBLD results Routine Name Before Patch After Patch Patch List ------------ ------------ ----------- ---------- OOPSCA 2257581 2301151 8,11 OOPSCA1 15507942 15500850 6,8,11 OOPSDOL 15575764 15573722 8,11 OOPSDOL1 13433218 13466377 8,10,11 OOPSDOL2 11849463 11995337 8,10,11 OOPSDOLX 4584201 5676301 8,10,11 OOPSESP 475215 422796 7,8,11 OOPSEUT 390747 448543 10,11 OOPSLOG 9487158 12819248 1,2,5,9,11 OOPSNDB 9603220 10528271 5,11 OOPSNDBX 4573142 6106434 5,11 OOPSPC11 9986979 9956072 1,6,8,11 OOPSPRT 14480032 15564255 2,3,5,11 OOPSPRT1 6613069 6581442 2,3,5,9,11 OOPSSUP1 8815368 8823897 1,3,5,8,11 OOPSSUP3 4641922 6096383 3,5,11 OOPSUTL1 7422299 7551540 8,11 OOPSUTL2 9332148 9875415 7,8,11 OOPSUTL4 9807880 11500958 3,5,8,10,11 OOPSWCE 11050958 11277164 8,11 OOPSWCE1 16567167 16611391 8,11 OOPSWCE2 23738143 23782367 8,11 OOPSXP11 New 1936601 11 Total number of routines: 23 4. START UP KIDS ------------- 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 Select Installation Option: 5. Select Installation Option: --------------------------- NOTE: The following are OPTIONAL - (When prompted for the INSTALL NAME, enter OOPS*1.0*11): a. 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. b. 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.). c. Verify Checksums in Transport Global - This option will allow you to ensure the integrity of the routines that are in the transport global. 6. INSTALL KIDS PATCH ------------------ **This is the step to start the installation of this KIDS patch: a. Choose the Install Package(s) option to start the patch install. b. When prompted 'Want KIDS to INHIBIT LOGONs during the install? YES//' answer NO c. When prompted 'Want to DISABLE Scheduled Options and Menu Options and Protocols? YES//' answer NO. d. When prompted 'Enter options you wish to mark as 'Out Of Order':' enter the following options: OOPS WORKER'S COMP MENU ASISTS Worker's Compensation Menu OOPS SAFETY MENU ASISTS Safety Officers Menu OOPS SUP MENU ASISTS Supervisor Menu e. When prompted 'Enter protocols you wish to mark as 'Out Of Order': ' press return. 7. REBUILD MAPPED ROUTINE(S) (DSM for Open VMS sites only) ------------------------- Optional - Include the routines distributed with this patch in the mapped routine set. NOTE: This step is only necessary if you performed step 2 or if you wish to include the routines in your mapped set. Routine Information: ==================== Routine Name: - OOPSSUP1 Routine Checksum: Routine Name: - OOPSSUP3 Routine Checksum: Routine Name: - OOPSUTL2 Routine Checksum: Routine Name: - OOPSUTL4 Routine Checksum: Routine Name: - OOPSPRT Routine Checksum: Routine Name: - OOPSNDBX Routine Checksum: Routine Name: - OOPSXP11 Routine Checksum: Routine Name: - OOPSNDB Routine Checksum: Routine Name: - OOPSLOG Routine Checksum: Routine Name: - OOPSPRT1 Routine Checksum: Routine Name: - OOPSCA1 Routine Checksum: Routine Name: - OOPSDOL2 Routine Checksum: Routine Name: - OOPSDOLX Routine Checksum: Routine Name: - OOPSESP Routine Checksum: Routine Name: - OOPSWCE Routine Checksum: Routine Name: - OOPSWCE1 Routine Checksum: Routine Name: - OOPSWCE2 Routine Checksum: Routine Name: - OOPSEUT Routine Checksum: Routine Name: - OOPSDOL1 Routine Checksum: Routine Name: - OOPSCA Routine Checksum: Routine Name: - OOPSUTL1 Routine Checksum: Routine Name: - OOPSDOL Routine Checksum: Routine Name: - OOPSPC11 Routine Checksum: ============================================================================= User Information: Entered By : HOWELL,LYNN Date Entered : FEB 27, 2001 Completed By: PHELPS,TY Date Completed: AUG 21, 2001 Released By : DIETRICH,JON Date Released : AUG 21, 2001 ============================================================================= Packman Mail Message: ===================== $END TXT