============================================================================= Run Date: NOV 03, 2006 Designation: DG*5.3*659 Package : DG - REGISTRATION Priority: EMERGENCY Version : 5.3 SEQ #643 Status: Released Compliance Date: NOV 13, 2006 ============================================================================= Associated patches: (v)DG*5.3*624 <<= must be installed BEFORE `DG*5.3*659' (v)DG*5.3*672 <<= must be installed BEFORE `DG*5.3*659' (v)DG*5.3*677 <<= must be installed BEFORE `DG*5.3*659' (v)DG*5.3*689 <<= must be installed BEFORE `DG*5.3*659' Subject: Ionizing Radiation Exposure Method and Help Text Updates Category: - Data Dictionary - Routine Description: ============ This patch is being released as an emergency with a November 13, 2006 compliance date because there are several other initiatives that are dependent on the release of this project, and because VHA Directive 2006-048 Verification of Ionizing Radiation (IR) Exposure was prematurely released on September 12, 2006. Note: This patch is being released along with patch EAS*1.0*75 Update Radiation Exposure Method EAS in host file DG_53_P659.KID. Please see the National Patch Module patch description for EAS*1.0*75 for details concerning the functionality of that patch. In compliance with VHA Directive 2006-048 Verification of Ionizing Radiation (IR) Exposure (Electronic Document/Data Management System (EDMS) #328586), the Radiation Exposure Method for veterans should now include additional methods that do not qualify them for Enrollment Priority Group 6. Patches DG*5.3*659 and EAS*1*75 implement this new required functionality as well as the other changes described below. 1. NEW CODES FOR RADIATION EXPOSURE METHOD Changes have been made to the RADIATION EXPOSURE METHOD (#.3212) field in the PATIENT (#2) file. The data values and meanings have been changed as follows: Old Value New Value Enrollment Priority -------------------- ------------------------ ------------------- Nagasaki/Hiroshima Hiroshima/Nagasaki 6 code: N code: 2 Nuclear Testing Atmospheric Nuclear 6 code: T Testing code: 3 Both H/N and Atmospheric 6 code: B Nuclear Testing code: 4 Underground Nuclear no special priority Testing code: 5 Exposure at Nuclear no special priority Facility code: 6 Other no special priority code: 7 Because RADIATION EXPOSURE METHOD is now involved in the determination of Enrollment Priority, this patch, DG*5.3*659 adds a new field RADIATION EXPOSURE METHOD (#76) to the PATIENT ENROLLMENT (#27.11) file. This new field will be displayed in the PATIENT ENROLLMENT option screen #2 Priority Factors with the label 'Rad Exp Method.' If RADIATION EXPOSURE INDICATED (#.32103) in the PATIENT FILE (#2) is set to 'Yes' and the RADIATION EXPOSURE METHOD (#.3212) in the same file is set to 2, 3 or 4, then assign an Enrollment Priority of 6. OPTIONS AFFECTED ---------------- Patient Enrollment [DGEN PATIENT ENROLLMENT] Load/Edit Patient Data [DG LOAD PATIENT DATA] Register a Patient [DG REGISTER PATIENT] 2. HELP TEXT CHANGES Note: Screens referred to at the beginnings of A-D below appear in the Load/Edit Patient Data option. If you wish to see the help text, navigate to the screen that is listed and follow the directions in parentheses. A. Dependent Effective Date - FAMILY DEMOGRAPHIC DATA, SCREEN <8> (Using patient that has dependent, select DD. Scroll down to Effective Date prompt and hit ?.) Note: Wherever "yyyy" appears in the OLD HELP TEXT or NEW HELP TEXT sections below, when you are using the software an actual income year (automatically calculated as the prior year) will be displayed. FILE: PATIENT RELATION (#408.12) FIELD: EFFECTIVE DATE Multiple (#75) OLD HELP TEXT ------------- Enter the date this person first became a dependent of the veteran. In the case of a spouse, this would be the date of marriage. For a parent or other dependent, this would be the date the dependent moved in. For a child, this would be the date of birth or date of adoption. Date must be before DEC 31, yyyy as dependents are collected for the prior calendar year only. NEW HELP TEXT ------------- Enter the date this person first became a dependent of the veteran. In the case of a spouse, this would be the date of marriage. For a child, this would be the date of birth or date of adoption. For a stepchild, this would be the date of marriage to the child's parent. Date must be before DEC 31, yyyy as dependents are collected for the prior calendar year only. OPTIONS AFFECTED ------------------ Load/Edit Patient Data [DG LOAD PATIENT DATA] Register a Patient [DG REGISTER PATIENT] Add a New Means Test [DG MEANS TEST ADD] Edit an Existing Means Test [DG MEANS TEST EDIT] Add a Copay Exemption Test [DG CO-PAY TEST ADD] Edit an Existing Copay Exemption Test [DG CO-PAY TEST EDIT] B. Mexican Border Eligibility Code - ELIGIBILITY STATUS DATA, SCREEN <7> (Select 3. At the Primary Eligibility Code prompt hit ?? and scroll down to 5.) FILE: PATIENT (#2) FIELD: PRIMARY ELIGIBILITY CODE (#.361) OLD HELP TEXT ------------- 5. If none of the above pertain to this veteran, then the NSC eligibility will be available for selection. ** Dependent on the birthdate of the applicant, the following two eligibility codes may be displayed along with those shown in items 3 through 5 above: WORLD WAR I and MEXICAN BORDER WAR. These would display for veterans not meeting the criteria in items 1 and 2, but whose date of birth is prior to 1920. NEW HELP TEXT ------------- 5. If none of the above pertain to this veteran, then the NSC eligibility will be available for selection. ** Dependent on the birth date of the applicant, the following two eligibility codes may be displayed along with those shown in items 3 through 5 above: WORLD WAR I and MEXICAN BORDER WAR. These would display for veterans not meeting the criteria in items 1 and 2, but whose date of birth is prior to 1907. OPTIONS AFFECTED ------------------ Load/Edit Patient Data [DG LOAD PATIENT DATA] Register a Patient [DG REGISTER PATIENT] C. Radiation Exposure Indicated? - MILITARY SERVICE DATA, SCREEN <6> (Select 3. At Environmental Factor prompt select 2. At Radiation Exposure Indicated? prompt hit ??.) FILE: PATIENT (#2) FIELD: RADIATION EXPOSURE INDICATED? (#.32103) OLD HELP TEXT ------------- For this veteran applicant enter 'Y' if s/he was exposed to ionizing radiation while in the military, 'N' if not exposed, or 'U' if unknown. Once the service record has been verified only users who hold the designated security key may enter/edit this field. NEW HELP TEXT ------------- Enter 'Y' if the veteran was exposed to ionizing radiation 1) at a nuclear device testing site (e.g. the Pacific Islands, NM or NV) or 2) as a POW or while serving in Hiroshima and/or Nagasaki, Japan from August 6, 1945 through July 1, 1946, or 3) served at Department of Energy plants at Paducah, KY, Portsmouth, OH or the K25 area at Oak Ridge, TN for at least 250 days before February 1, 1992 or 4) served at Longshot, Milrow, or Cannikin underground nuclear tests at Amchitka Island, AK prior to January 1, 1974. Veterans exposed by method #3 or #4 are not eligible for copay exemption or enrollment in priority 6 based on their IR exposure. Enter 'N' if not exposed or 'U' if unknown. Once the record has been verified only HEC users may enter/edit this field. OPTIONS AFFECTED ------------------ Load/Edit Patient Data [DG LOAD PATIENT DATA] Register a Patient [DG REGISTER PATIENT] D. Radiation Exposure Method - MILITARY SERVICE DATA, SCREEN <6> (Select 3. At Environmental Factor prompt select 2. At Radiation Exposure Indicated? prompt select 'Yes.' At Radiation Exposure Method prompt hit ?.) FILE: PATIENT (#2) FIELD: RADIATION EXPOSURE METHOD (#.3212) OLD HELP TEXT ------------- Select from the listing available the method by which this patient was exposed to ionizing radiation. Choose from: N NAGASAKI/HIROSHIMA T NUCLEAR TESTING B BOTH NEW HELP TEXT ------------- Select from the listing available the method by which this patient was exposed to ionizing radiation. Choose from: 2 HIROSHIMA/NAGASAKI 3 ATMOSPHERIC NUCLEAR TESTING 4 H/N AND ATMOSPHERIC TESTING 5 UNDERGROUND NUCLEAR TESTING 6 EXPOSURE AT NUCLEAR FACILITY 7 OTHER OPTIONS AFFECTED ------------------ Load/Edit Patient Data [DG LOAD PATIENT DATA] Register a Patient [DG REGISTER PATIENT] 3. TRIGGER LOGIC CHANGES A. When changes were made to the help text on the PRIMARY ELIGIBILITY CODE #.361 field of the PATIENT #2 File, it was discovered that the code in the trigger logic for one of the cross references still contained a $N reference. This was replaced with the appropriate $O reference. Note: This change is internal to the software and is transparent to the user. The trigger affected is: Cross reference #1: stuffs the PATIENT #2 File PRIMARY ELIGIBILITY CODE #.361 field data value into the PATIENT ELIGIBILITIES multiple (file #2 field #361). B. When changes were made to the help text on the PATIENT #2 file RADIATION EXPOSURE INDICATED? #.32103 field, it was discovered that the code in the trigger logic for two of the cross references still contained a $N reference. These were replaced with the appropriate $O reference. Note: This change is internal to the software and is transparent to the user. The triggers affected are: Cross reference #1: deletes the value of the PATIENT #2 file RADIATION EXPOSURE METHOD #.3212 field if the value of the PATIENT #2 file RADIATION EXPOSURE INDICATED? #.32103 field is set to NO. Cross reference #2: deletes the value of the PATIENT #2 file RADIATION REGISTRATION DATE #.32111 field if the value of the PATIENT #2 file RADIATION EXPOSURE INDICATED? #.32103 field is set to NO. 4. BULLETIN CHANGE This patch contains an update to the text of an Eligibility bulletin sent to report consistency check failures during the Enrollment/Eligibility upload process. This bulletin is sent when VistA receives a Z11 record for a veteran who previously had been verified as being ineligible and had their PATIENT #2 file PERIOD OF SERVICE #.323 field on VistA changed to OTHER NON-VETERANS and where the Health Eligibility Center (HEC) had changed the veteran's eligibility status to eligible. The new bulletin should be received by members of the mail group DGEN ELIGIBILITY ALERT. OLD BULLETIN TEXT ----------------- Patient was previously determined to be ineligible for VA health care. Upon review, the individual is now determined to be eligible for VA care. Please update period of service and complete a new application for enrollment in VistA. NEW BULLETIN TEXT ----------------- Patient was previously determined to be ineligible for VA health care. Upon review, the individual is determined to be eligible for VA care. Please update period of service and other eligibility data as needed. SOFTWARE RETRIEVAL ================== The software for this patch is not being distributed through the National Patch Module. That is because this patch is being distributed as a host file. The host file will contain the following two KIDS builds: Host file name: DG_53_P659.KID Builds: DG*5.3*659 EAS*1.0*75 Sites may retrieve the software directly using FTP from the ANONYMOUS.SOFTWARE directory at the following OI Field Offices: Albany : ftp.fo-albany.med.va.gov Hines : ftp.fo-hines.med.va.gov Salt Lake City : ftp.fo-slc.med.va.gov First Available Server : download.vista.med.va.gov The following file will be available: File Name Description --------- -------------- DG_53_P659.KID Host file containing KIDS software distribution Note: Use ASCII mode when transferring the .KID file. DOCUMENTATION RETRIEVAL ======================= Sites may retrieve the user documentation directly using FTP from the ANONYMOUS.SOFTWARE directory at the following OI Field Offices: Albany : ftp.fo-albany.med.va.gov Hines : ftp.fo-hines.med.va.gov Salt Lake City : ftp.fo-slc.med.va.gov First Available Server : download.vista.med.va.gov (preferred method) The following files will be available: File Name Description --------- ----------- DG_5_3_P659_ADTBE_UM.PDF Revised PIMS V. 5.3 Menus, Intro, Orientation, etc. User Manual DG_5_3_P659_REG_UM.PDF Revised PIMS V. 5.3 Registration User Manual Note: Use Binary mode when transferring the .PDF files. The VistA Documentation Library [VDL] web site contains all end-user manuals. The address is http://www.va.gov/vdl/. This patch addresses the following New Service Request (NSR): ------------------------------------------ There is no NSR associated with this patch. This patch addresses the following NOIS/Remedy ticket(s): --------------------------------------------------- There are no NOIS/Remedy tickets associated with this patch. TECHNICAL DESCRIPTION: ====================== The help texts for the following fields are modified in VistA: File # File Name Field # Field Name ------ --------- ------- ---------- 2 PATIENT .361 PRIMARY ELIGIBILITY CODE 2 PATIENT .32103 RADIATION EXPOSURE INDICATED? 2 PATIENT .3212 RADIATION EXPOSURE METHOD 27.11 PATIENT ENROLLMENT 50.12 RADIATION EXPOSURE INDICATED The following new field was added in Vista: File # File Name Field # Field Name ------ --------- ------- ---------- 27.11 PATIENT ENROLLMENT 76 RADIATION EXPOSURE METHOD Test Sites: ----------- Madison, WI (Medium) Salisbury, NC (Large) West LA, CA (Large) ================INSTALLATION INSTRUCTIONS ================= This patch can be loaded with users on the system. Install Time - 1 minute Note 1: A post-install conversion routine will be run to convert the old data values in the RADIATION EXPOSURE METHOD field (#.3212) for the records in the PATIENT (#2) file. This routine will delete the RADIATION EXPOSURE METHOD (#.3212) field data value (file #2) if the RADIATION EXPOSURE INDICATED? (#.32103) field data value (file #2) is set to 'No'. This conversion routine will also bulk fill RADIATION EXPOSURE METHOD (#.3212) to 3 - Atmospheric Nuclear Testing if the RADIATION EXPOSURE INDICATED? (#.32103) in the PATIENT (#2) file is set to 'Yes' ane RADIATION EXPOSURE METHOD (#.3212) is null. This routine will process approximately 250,000 records in 30 minutes. Note 2: You should stop the HL7 filers prior to the install to prevent possible 'No Source Errors' from occurring. No transmissions will be lost if the filers are stopped first; they will be picked up once the filers are restarted. The filers should be restarted after the post-install conversion routine finishes. 1. DOWNLOAD HOST KIDS FILE ----------------------- Download the KIDS file DG_53_P659.KID from the ANONYMOUS.SOFTWARE directory of either Albany, Hines, or the Salt Lake OI Field Office to the appropriate directory on your system. 2. LOAD DISTRIBUTION ----------------- Use the 'LOAD A DISTRIBUTION' option on the KIDS INSTALLATION menu, and enter: the directory onto which you have downloaded the host file, immediately followed by DG_53_P659.KID. 3. COMPONENTS SENT WITH PATCH ------------------------ ROUTINE SUMMARY: ================ The following is a list of the routine(s) included in this patch. The second line of each of these routine(s) will look like: ;;5.3;Registration;**[patch list]**;Aug 13,1993 CHECK^XTSUMBLD results Routine Before Patch After Patch Patch List ======= ============ =========== ========== DG53659 N/A 5728081 659 DG53659M N/A 1489506 659 DGENA 2131130 2183525 121,122,147,232,314 564,672,659 DGENA1A 3940407 3988478 121,147,232,314,564 672,659 DGENELA 4343766 4380119 121,147,232,314,451 564,631,672,659 DGENELA1 22066285 21827469 147,327,314,367,497 451,564,631,672,659 DGENELA4 14835490 15014129 232,275,306,327,314 367,417,437,456,491 451,564,672,659 DGENL1 19157648 19770405 121,147,232,266,343 564,672,659 DGENPTA1 6085759 6272592 121,147,314,677,659 DGENU 10143656 10168672 121,122,147,232,314 564,624,672,659 DGENUPLA 10896206 11463106 397,379,497,451,564 672,659 DGRP6EF 8369930 8687694 689,659 DGRPEIS3 18764144 18780538 45,624,659 Number of routines in patch: 13 Number of new routines: 2 Number of routines changed: 11 CHECK1^XTSUMBLD (new method) results Routine Before Patch After Patch Patch List ======= ============ =========== ========== DG53659 N/A 30414911 659 DG53659M N/A 3994916 659 DGENA 17884165 18471857 121,122,147,232,314 564,672,659 DGENA1A 13128537 13450046 121,147,232,314,564 672,659 DGENELA 24017259 24544789 121,147,232,314,451 564,631,672,659 DGENELA1 76882824 76520001 147,327,314,367,497 451,564,631,672,659 DGENELA4 43140907 44390257 232,275,306,327,314 367,417,437,456,491 451,564,672,659 DGENL1 60652220 63211359 121,147,232,266,343 564,672,659 DGENPTA1 15708205 16482039 121,147,314,677,659 DGENU 37061085 37392878 121,122,147,232,314 564,624,672,659 DGENUPLA 35703117 38035486 397,379,497,451,564 672,659 DGRP6EF 14465405 16194584 689,659 DGRPEIS3 78826774 78090315 45,624,659 Number of routines in patch: 13 Number of new routines: 2 Number of routines changed: 11 The following is a list of files included in this patch: UP SEND DATA DATE SEC. COMES SITE RSLV FILE # NAME DD CODE W/FILE DATA PTS -------------------------------------------------------------------- 2 PATIENT Y N N OVER N 27.11 PATIENT ENROLLMENT Y N N OVER N # of files included in this patch: 2 The following is a list of fields included in this patch: Field Name (Number) File Name (Number) ------------------- ------------------ PRIMARY ELIGIBILITY CODE (#.361) PATIENT (#2) RADIATION EXPOSURE INDICATED? (#.32103) PATIENT (#2) RADIATION EXPOSURE METHOD (#.3212) PATIENT (#2) RADIATION EXPOSURE INDICATED (#50.12) PATIENT ENROLLMENT (#27.11) RADIATION EXPOSURE METHOD (#76) PATIENT ENROLLMENT (#27.11) # of fields included in this patch: 5 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 --- Load a Distribution Print Transport Global Compare Transport Global to Current System Verify Checksums in Transport Global Install Package(s) Restart Install of Package(s) Unload a Distribution Backup a Transport Global Select Installation Option: 5. Select Installation Option: -------------------------- NOTE: The following are OPTIONAL - (When prompted for the INSTALL NAME, enter DG*5.3*659): 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. Select Installation Option: Install Package(s) ---------------- **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 (unless otherwise indicated). c. When prompted 'Want to DISABLE Scheduled Options, Menu Options, and Protocols? YES//' answer NO (unless otherwise indicated). Post Install Instructions: ========================= There are no post-install instructions for this patch. Routine Information: ==================== The checksums below are new checksums, and can be checked with CHECK1^XTSUMBLD. Routine Name: DG53659 Before: n/a After: B28307468 **659** Routine Name: DG53659M Before: n/a After: B3995714 **659** Routine Name: DGENA Before: B17884165 After: B18471857 **121,122,147,232,314,564,672,659** Description of Changes: Summary of changes: added field RADEXMP changed field IR from piece 12 in the patient file to piece 3 Before: After: +126 ; "ELIG","RADEXPM" Radiation Exposure Method Before: After: +177 S DGENR("ELIG","RADEXPM")=$P(NODE,"^",21) Routine Name: DGENA1A Before: B13128537 After: B13450046 **121,147,232,314,564,672,659** Description of Changes: Summary of changes: added field RADEXPM as the 21st '^' piece Before: After: +106 S NODE=NODE_U_DGENR("ELIG","RADEXPM") Routine Name: DGENELA Before: B24017259 After: B24544789 **121,147,232,314,451,564,631, 672,659** Description of Changes: Summary of changes added processing for field RADEXPM Before: After: +30 ;"RADEXPM" Radiation Exposure Method Before: After: +110 S DGELG("RADEXPM")=$P(NODE,"^",12) Routine Name: DGENELA1 Before: B76882824 After: B76520001 **147,327,314,367,497,451,564, 631,672,659** Description of Changes: Summary of changes modified text in module CHECK Before: +60 ...S DGTEXT="Patient was previously determined to be ineligible for VA health care. Upon review, the individual is now determined to be eligible for " +61 ...S DGTEXT=DGTEXT_"VA care. Please update period of service and complete a new application for enrollment in VistA." After: +60 ...S DGTEXT="Patient was previously determined to be ineligible for VA health care. Upon review, the individual is determined to be eligible for " +61 ...S DGTEXT=DGTEXT_"VA care. Please update period of service and other eligibility data as needed.." Routine Name: DGENELA4 Before: B43140907 After: B44390257 **232,275,306,327,314,367,417, 437,456,491,451,564,672,659** Description of Changes: Summary of changes: processing for field RADEXPM (changed enrollment priority algorithm) Before: +56 .; After: +56 .;added dg*5.3*659 +57 .S DGELGSUB("RADEXPM")=DGELG("RADEXPM") Before: +109 .I (CODENAME="WORLD WAR I")!(CODENAME="MEXICAN BORDER WAR")!(DGELG( "AO")="Y")!(DGELG("EC")="Y")!(DGELG("IR")="Y")!(DGELG("VACKAMT")>0)!((DGE LG("CVELEDT"))&(DGELG("CVELEDT")'0)!((DGELG("CVELEDT"))&(DG ELG("CVELEDT")'7 $P(DG321,U,12)="" S DIR("A",DGCT)=DIR("A",DGCT)_ $P($T(SELTBL+$P(DG321,U,12)),";;",2) Before: +67 ; After: +67 ; The following tag is a table of values. Do not change location of values including null at SELTBL+0 +68 SELTBL ;; +69 ;;NO VALUE +70 ;;HIROSHIMA/NAGASAKI +71 ;;ATMOSPHERIC NUCLEAR TEST +72 ;;H/N AND ATMOSPHERIC TEST +73 ;;UNDERGROUND NUCLEAR TEST +74 ;;EXP. AT NUCLEAR FACILITY +75 ;;OTHER Routine Name: DGRPEIS3 Before: B78826774 After: B78090315 **45,624,659** Description of Changes: Routine compare of '[MNT,VLL]DGRPEIS3' AND '[PAT,VEE]DGRPEIS3' on 17-JUN-2005 09:26:26.44 *********************** 1) DGRPEIS3 ;ALB/CAW - INCOME SCREENING DATA (CON'T) ;06/16/05 2) ;;5.3;Registration;**45,659**;Aug 13, 1993 3) ; -------- 1) DGRPEIS3 ;ALB/CAW - INCOME SCREENING DATA (CON'T) ;12/1/94 2) ;;5.3;Registration;**45**;Aug 13, 1993 3) ; *************** *********************** 50) W !,"In the case of a spouse, this would be the date of marriage. For a" 51) W !,"child, this would be the date of birth or date of adoption. For a" 52) W !,"stepchild, this would be the date of marriage to the child's parent." 53) W !," " -------- 50) W !,"In the case of a spouse, this would be the date of marriage. For" 51) W !,"a parent or other dependent, this would be the date the dependent" 52) W !,"moved in. For a child, this would be the date of birth or date of" 53) W !,"adoption." 54) W !," " *************** ============================================================================= User Information: Entered By : MULLER,RICHARD Date Entered : MAR 15, 2005 Completed By: RUDINGER,NANCY L. Date Completed: NOV 02, 2006 Released By : FLANAGAN,PATTY Date Released : NOV 03, 2006 ============================================================================= Packman Mail Message: ===================== No routines included