LREPIRP9 ;DALOI/CKA-EMERGING PATHOGENS VERIFICATION REPORT ;9/30/03
;;5.2;LAB SERVICE;**281**;Sep 27, 1994
; This routine contains documentation of the ^XTMP global created
;for the verification report.
Q
REPORT ;
;^XTMP("LREPIREP"_DATE,0)="CREATION DATE^PURGE DATE(creation date+260)^description^creator"
;HEADINGS
;^XTMP("LREPIREP"_DATE,LRPATH,"HDG",#)
;Pathogen OF 1,3,4,5,6,8,10,18,19,20,21,22,23
;NTE~1 Vancomycin-resistan Enterococcus
;NTE~3 Penicillin-resistant Steptococcus pneumoniae
;NTE~4 Report of Clostidium difficile
;NTE~5 Report of Tuberculosis
;NTE~6 Report of Group A Streptococcus
;NTE~8 Report of Candida Bloodstream Infections
;NTE~10 Report of Escherichia coli 0157
;^XTMP("LREPIREP"_DATE,LRPATH,DFN,"PID")
;^XTMP("LREPIREP"_DATE,LRPATH,DFN,"PV1",#)
;^XTMP("LREPIREP"_DATE,LRPATH,DFN,"PV1",LRPV1,"OBR",#)
;^XTMP("LREPIREP"_DATE,LRPATH,DFN,"PV1",LRPV1,"OBR",LROBR,"OBX",#)
;NTES OF 11,12,13,14
;NTE~11 Report of Malaria
;NTE~12 Report of Dengue
;NTE~13 Report of Creutzfeldt-Jakob Disease
;NTE~14 Report of Leishmaniasis
;^XTMP("LREPIREP"_DATE,LRPATH,DFN,"PID")
;^XTMP("LREPIREP"_DATE,LRPATH,DFN,"PV1",#)
;^XTMP("LREPIREP"_DATE,LRPATH,DFN,"PV1",LRPV1,"DG1",#)
;NTES OF 7 AND 9
;NTE~7 Report of Legionella/Legionaire's
;NTE~9 Report of Cryptosporidium
;^XTMP("LREPIREP"_DATE,LRPATH,DFN,"PID")
;^XTMP("LREPIREP"_DATE,LRPATH,DFN,"PV1",#)
;^XTMP("LREPIREP"_DATE,LRPATH,DFN,"PV1",LRPV1,"DG1",#)
;^XTMP("LREPIREP"_DATE,LRPATH,DFN,"PV1",LRPV1,"OBR",#)
;^XTMP("LREPIREP"_DATE,LRPATH,DFN,"PV1",LRPV1,"OBR",LROBR,"OBX",#)
;NTES OF 2,15,16,17
;NTE~2 Report of Hepatitis C antibody positive
;NTE~15 Report of Hepatitis C antibody negative
;NTE~16 Report of Hepatitis A antibody positive
;NTE~17 Report of Hepatitis B positive
;^XTMP("LREPIREP"_DATE,LRPATH,DFN,#)
;="Name SSN Date of Test Name of Test Result of Test"
;UPDATES
;^XTMP("LREPIREP"_DATE,"UPDATES",#)
; ="Name SSN EPI/Pathogen Admission Date Discharge Date"
;
;PHARMACY DATA
;^XTMP("LREPIREP"_DATE,"ZXE",DRUG NAME,#)
; ="SSN Name Status(Inpatient/Outpatient) Date"
;RISK ASSESSMENT DATA
;^XTMP("LREPIREP"_DATE,"DSP",RISK ASSESSMENT NAME,#)
; ="SSN NAME Status Date"
Q
--- Routine Detail --- with STRUCTURED ROUTINE LISTING ---[H[J[2J[HLREPIRP9 2263 printed Dec 13, 2024@02:14:31 Page 2
LREPIRP9 ;DALOI/CKA-EMERGING PATHOGENS VERIFICATION REPORT ;9/30/03
+1 ;;5.2;LAB SERVICE;**281**;Sep 27, 1994
+2 ; This routine contains documentation of the ^XTMP global created
+3 ;for the verification report.
+4 QUIT
REPORT ;
+1 ;^XTMP("LREPIREP"_DATE,0)="CREATION DATE^PURGE DATE(creation date+260)^description^creator"
+2 ;HEADINGS
+3 ;^XTMP("LREPIREP"_DATE,LRPATH,"HDG",#)
+4 ;Pathogen OF 1,3,4,5,6,8,10,18,19,20,21,22,23
+5 ;NTE~1 Vancomycin-resistan Enterococcus
+6 ;NTE~3 Penicillin-resistant Steptococcus pneumoniae
+7 ;NTE~4 Report of Clostidium difficile
+8 ;NTE~5 Report of Tuberculosis
+9 ;NTE~6 Report of Group A Streptococcus
+10 ;NTE~8 Report of Candida Bloodstream Infections
+11 ;NTE~10 Report of Escherichia coli 0157
+12 ;^XTMP("LREPIREP"_DATE,LRPATH,DFN,"PID")
+13 ;^XTMP("LREPIREP"_DATE,LRPATH,DFN,"PV1",#)
+14 ;^XTMP("LREPIREP"_DATE,LRPATH,DFN,"PV1",LRPV1,"OBR",#)
+15 ;^XTMP("LREPIREP"_DATE,LRPATH,DFN,"PV1",LRPV1,"OBR",LROBR,"OBX",#)
+16 ;NTES OF 11,12,13,14
+17 ;NTE~11 Report of Malaria
+18 ;NTE~12 Report of Dengue
+19 ;NTE~13 Report of Creutzfeldt-Jakob Disease
+20 ;NTE~14 Report of Leishmaniasis
+21 ;^XTMP("LREPIREP"_DATE,LRPATH,DFN,"PID")
+22 ;^XTMP("LREPIREP"_DATE,LRPATH,DFN,"PV1",#)
+23 ;^XTMP("LREPIREP"_DATE,LRPATH,DFN,"PV1",LRPV1,"DG1",#)
+24 ;NTES OF 7 AND 9
+25 ;NTE~7 Report of Legionella/Legionaire's
+26 ;NTE~9 Report of Cryptosporidium
+27 ;^XTMP("LREPIREP"_DATE,LRPATH,DFN,"PID")
+28 ;^XTMP("LREPIREP"_DATE,LRPATH,DFN,"PV1",#)
+29 ;^XTMP("LREPIREP"_DATE,LRPATH,DFN,"PV1",LRPV1,"DG1",#)
+30 ;^XTMP("LREPIREP"_DATE,LRPATH,DFN,"PV1",LRPV1,"OBR",#)
+31 ;^XTMP("LREPIREP"_DATE,LRPATH,DFN,"PV1",LRPV1,"OBR",LROBR,"OBX",#)
+32 ;NTES OF 2,15,16,17
+33 ;NTE~2 Report of Hepatitis C antibody positive
+34 ;NTE~15 Report of Hepatitis C antibody negative
+35 ;NTE~16 Report of Hepatitis A antibody positive
+36 ;NTE~17 Report of Hepatitis B positive
+37 ;^XTMP("LREPIREP"_DATE,LRPATH,DFN,#)
+38 ;="Name SSN Date of Test Name of Test Result of Test"
+39 ;UPDATES
+40 ;^XTMP("LREPIREP"_DATE,"UPDATES",#)
+41 ; ="Name SSN EPI/Pathogen Admission Date Discharge Date"
+42 ;
+43 ;PHARMACY DATA
+44 ;^XTMP("LREPIREP"_DATE,"ZXE",DRUG NAME,#)
+45 ; ="SSN Name Status(Inpatient/Outpatient) Date"
+46 ;RISK ASSESSMENT DATA
+47 ;^XTMP("LREPIREP"_DATE,"DSP",RISK ASSESSMENT NAME,#)
+48 ; ="SSN NAME Status Date"
+49 QUIT