| [613] | 1 | LREPIRP1 ;DALOI/CKA-EMERGING PATHOGENS HL7 REPORT CONVERSION ;5/14/03
|
|---|
| 2 | ;;5.2;LAB SERVICE;**281**;Sep 27, 1994
|
|---|
| 3 | ; Reference to $$SITE^VASITE supported by IA # 10112
|
|---|
| 4 | ; Reference to ^DIC(21 supported by IA #2504
|
|---|
| 5 | Q
|
|---|
| 6 | ;SUMMARY VERIFICATION REPORT HEADING
|
|---|
| 7 | SUMHD1 S SITE=$$SITE^VASITE
|
|---|
| 8 | S MSG="SUMMARY VERIFICATION REPORT OF EPI EXTRACTED DATA"
|
|---|
| 9 | S ^TMP($J,"MSG",MSGCNT)=MSG,MSGCNT=MSGCNT+1,MSG=""
|
|---|
| 10 | S MSG="FROM STATION "_$P(SITE,U,3)_" "_$P(SITE,U,2)
|
|---|
| 11 | S ^TMP($J,"MSG",MSGCNT)=MSG,MSGCNT=MSGCNT+1,MSG=""
|
|---|
| 12 | SUMHD2 S MSG="",^TMP($J,"MSG",MSGCNT)=MSG,MSGCNT=MSGCNT+1,MSG=""
|
|---|
| 13 | S MSG="Processing Month "_LRHDGL2
|
|---|
| 14 | S ^TMP($J,"MSG",MSGCNT)=MSG,MSGCNT=MSGCNT+1,MSG=""
|
|---|
| 15 | S ^TMP($J,"MSG",MSGCNT)=MSG,MSGCNT=MSGCNT+1,MSG=""
|
|---|
| 16 | S MSG=LRSP_LRSP_$E(LRSP,1,7)_"Number of"
|
|---|
| 17 | S ^TMP($J,"MSG",MSGCNT)=MSG,MSGCNT=MSGCNT+1
|
|---|
| 18 | S MSG=LRSP_$E(LRSP,1,24)_"Number of Persons with"
|
|---|
| 19 | S ^TMP($J,"MSG",MSGCNT)=MSG,MSGCNT=MSGCNT+1
|
|---|
| 20 | S MSG=$E(LRSP,1,2)_"Emerging Pathogen"_LRSP_$E(LRSP,1,3)_"Occurrences Occurrence"
|
|---|
| 21 | S ^TMP($J,"MSG",MSGCNT)=MSG,MSGCNT=MSGCNT+1
|
|---|
| 22 | S MSG="________________________________________________________________________________"
|
|---|
| 23 | S ^TMP($J,"MSG",MSGCNT)=MSG,MSGCNT=MSGCNT+1
|
|---|
| 24 | Q
|
|---|
| 25 | NOTE1 S MSG="",^TMP($J,"MSG",MSGCNT)=MSG,MSGCNT=MSGCNT+1
|
|---|
| 26 | S MSG="For definitions of case ascertainment for each category, please refer to"
|
|---|
| 27 | S ^TMP($J,"MSG",MSGCNT)=MSG,MSGCNT=MSGCNT+1
|
|---|
| 28 | S MSG="documentation in Laboratory EPI Patch LR*5.2*281 Technical and"
|
|---|
| 29 | S ^TMP($J,"MSG",MSGCNT)=MSG,MSGCNT=MSGCNT+1
|
|---|
| 30 | S MSG="User Guide in conjunction with your local parameter set-up of this process."
|
|---|
| 31 | S ^TMP($J,"MSG",MSGCNT)=MSG,MSGCNT=MSGCNT+1
|
|---|
| 32 | S MSG=""
|
|---|
| 33 | S ^TMP($J,"MSG",MSGCNT)=MSG,MSGCNT=MSGCNT+1
|
|---|
| 34 | S MSG="If you feel that these numbers are in error, please verify with the local"
|
|---|
| 35 | S ^TMP($J,"MSG",MSGCNT)=MSG,MSGCNT=MSGCNT+1
|
|---|
| 36 | S MSG="facility personnel responsible for setting the EPI Laboratory Search/Extract"
|
|---|
| 37 | S ^TMP($J,"MSG",MSGCNT)=MSG,MSGCNT=MSGCNT+1
|
|---|
| 38 | S MSG="parameters. However, do not change these parameters if they are incorrect"
|
|---|
| 39 | S ^TMP($J,"MSG",MSGCNT)=MSG,MSGCNT=MSGCNT+1
|
|---|
| 40 | S MSG="without fully reading the documentation; this will be crucial in order to"
|
|---|
| 41 | S ^TMP($J,"MSG",MSGCNT)=MSG,MSGCNT=MSGCNT+1
|
|---|
| 42 | S MSG="avoid any misalignment with the concomitant Hepatitis C Extract patches"
|
|---|
| 43 | S ^TMP($J,"MSG",MSGCNT)=MSG,MSGCNT=MSGCNT+1
|
|---|
| 44 | S MSG="(PXRM*1.5*1, VA-National EPI DB Update, LR*5.2*260, PSJ*5*48, Hepatitis C"
|
|---|
| 45 | S ^TMP($J,"MSG",MSGCNT)=MSG,MSGCNT=MSGCNT+1
|
|---|
| 46 | S MSG="Initiative, and PSO*7*45, Hepatitis C Initiative). In particular, the"
|
|---|
| 47 | S ^TMP($J,"MSG",MSGCNT)=MSG,MSGCNT=MSGCNT+1
|
|---|
| 48 | S MSG="hepatitis C antibody positive, hepatitis C antibody negative, hepatitis A"
|
|---|
| 49 | S ^TMP($J,"MSG",MSGCNT)=MSG,MSGCNT=MSGCNT+1
|
|---|
| 50 | S MSG="antibody positive and hepatitis B positive will be especially sensitive to"
|
|---|
| 51 | S ^TMP($J,"MSG",MSGCNT)=MSG,MSGCNT=MSGCNT+1
|
|---|
| 52 | S MSG="changes, and concomitant changes of all of the patches may need to occur."
|
|---|
| 53 | S ^TMP($J,"MSG",MSGCNT)=MSG,MSGCNT=MSGCNT+1
|
|---|
| 54 | Q
|
|---|
| 55 | SUMHD3 S MSG=LRSP_LRSP_$E(LRSP,1,1)_"Number of Persons"
|
|---|
| 56 | S ^TMP($J,"MSG",MSGCNT)=MSG,MSGCNT=MSGCNT+1
|
|---|
| 57 | S MSG=LRSP_LRSP_$E(LRSP,1,1)_"with the Term and"
|
|---|
| 58 | S ^TMP($J,"MSG",MSGCNT)=MSG,MSGCNT=MSGCNT+1
|
|---|
| 59 | S MSG=LRSP_LRSP_$E(LRSP,1,1)_"Transmitted For"
|
|---|
| 60 | S ^TMP($J,"MSG",MSGCNT)=MSG,MSGCNT=MSGCNT+1
|
|---|
| 61 | S MSG=$E(LRSP,1,18)_"Nationally rolled-up resolution term"_$E(LRSP,1,7)_"National Roll-up"
|
|---|
| 62 | S ^TMP($J,"MSG",MSGCNT)=MSG,MSGCNT=MSGCNT+1
|
|---|
| 63 | S MSG="_______________________________________________________________________________"
|
|---|
| 64 | S ^TMP($J,"MSG",MSGCNT)=MSG,MSGCNT=MSGCNT+1
|
|---|
| 65 | Q
|
|---|
| 66 | NOTE2 S MSG="This table represents only those who had a once-lifetime resolution of the"
|
|---|
| 67 | S ^TMP($J,"MSG",MSGCNT)=MSG,MSGCNT=MSGCNT+1
|
|---|
| 68 | S MSG="National Clinical Reminder for Risk Assessment for Hepatitis C. This"
|
|---|
| 69 | S ^TMP($J,"MSG",MSGCNT)=MSG,MSGCNT=MSGCNT+1
|
|---|
| 70 | S MSG="resolution will only occur once during the care of a patient (unless actively"
|
|---|
| 71 | S ^TMP($J,"MSG",MSGCNT)=MSG,MSGCNT=MSGCNT+1
|
|---|
| 72 | S MSG="changed by a point-of-care practitioner at a later date)."
|
|---|
| 73 | S ^TMP($J,"MSG",MSGCNT)=MSG,MSGCNT=MSGCNT+1
|
|---|
| 74 | Q
|
|---|
| 75 | NOTE3 S MSG="1. For Microbiology Lab Package Organism results/isolates (e.g."
|
|---|
| 76 | S ^TMP($J,"MSG",MSGCNT)=MSG,MSGCNT=MSGCNT+1
|
|---|
| 77 | S MSG="Enterococcus, or Streptococcus pneumoniae), the number corresponding"
|
|---|
| 78 | S ^TMP($J,"MSG",MSGCNT)=MSG,MSGCNT=MSGCNT+1
|
|---|
| 79 | S MSG="to the name represents the total number reported from your local"
|
|---|
| 80 | S ^TMP($J,"MSG",MSGCNT)=MSG,MSGCNT=MSGCNT+1
|
|---|
| 81 | S MSG="microbiology package during the processing month. The number"
|
|---|
| 82 | S ^TMP($J,"MSG",MSGCNT)=MSG,MSGCNT=MSGCNT+1
|
|---|
| 83 | S MSG="corresponding to the line 'Patients with...<Microbiology Lab"
|
|---|
| 84 | S ^TMP($J,"MSG",MSGCNT)=MSG,MSGCNT=MSGCNT+1
|
|---|
| 85 | S MSG="Result/isolates> (e.g. Patients with Enterococcus or Patients with"
|
|---|
| 86 | S ^TMP($J,"MSG",MSGCNT)=MSG,MSGCNT=MSGCNT+1
|
|---|
| 87 | S MSG="Streptococcus pneumoniae) represents the number of individual"
|
|---|
| 88 | S ^TMP($J,"MSG",MSGCNT)=MSG,MSGCNT=MSGCNT+1
|
|---|
| 89 | S MSG="patients from whom the results were isolated."
|
|---|
| 90 | S ^TMP($J,"MSG",MSGCNT)=MSG,MSGCNT=MSGCNT+1
|
|---|
| 91 | S MSG="2. For non-microbiology results (e.g. chemistry/serology results such"
|
|---|
| 92 | S ^TMP($J,"MSG",MSGCNT)=MSG,MSGCNT=MSGCNT+1
|
|---|
| 93 | S MSG="as Hepatitis C antibody), the number corresponding to the name"
|
|---|
| 94 | S ^TMP($J,"MSG",MSGCNT)=MSG,MSGCNT=MSGCNT+1
|
|---|
| 95 | S MSG="represents the TOTAL number of <named> tests done at your facility"
|
|---|
| 96 | S ^TMP($J,"MSG",MSGCNT)=MSG,MSGCNT=MSGCNT+1
|
|---|
| 97 | S MSG="during the processing month. The number corresponding to the line"
|
|---|
| 98 | S ^TMP($J,"MSG",MSGCNT)=MSG,MSGCNT=MSGCNT+1
|
|---|
| 99 | S MSG="<Patients with...<non-Microbiology test> (e.g. Hepatitis C antibody)"
|
|---|
| 100 | S ^TMP($J,"MSG",MSGCNT)=MSG,MSGCNT=MSGCNT+1
|
|---|
| 101 | S MSG="represents the number of individuals on whom the test(s) was/were"
|
|---|
| 102 | S ^TMP($J,"MSG",MSGCNT)=MSG,MSGCNT=MSGCNT+1
|
|---|
| 103 | S MSG="performed. This does not represent the number of persons who had a positive"
|
|---|
| 104 | S ^TMP($J,"MSG",MSGCNT)=MSG,MSGCNT=MSGCNT+1
|
|---|
| 105 | S MSG=" test result."
|
|---|
| 106 | S ^TMP($J,"MSG",MSGCNT)=MSG,MSGCNT=MSGCNT+1
|
|---|
| 107 | S MSG="3. These results have been obtained based on specimen accession"
|
|---|
| 108 | S ^TMP($J,"MSG",MSGCNT)=MSG,MSGCNT=MSGCNT+1
|
|---|
| 109 | S MSG="date and not results reported dating."
|
|---|
| 110 | S ^TMP($J,"MSG",MSGCNT)=MSG,MSGCNT=MSGCNT+1
|
|---|
| 111 | Q
|
|---|
