STANDARD DATA DICTIONARY #69.5 -- LAB SEARCH/EXTRACT FILE                                                         3/24/25    PAGE 1
STORED IN ^LAB(69.5,  (23 ENTRIES)   SITE: WWW.BMIRWIN.COM   UCI: VISTA,VISTA                                      (VERSION 5.2)   

DATA          NAME                  GLOBAL        DATA
ELEMENT       TITLE                 LOCATION      TYPE
-----------------------------------------------------------------------------------------------------------------------------------
This file contains search criteria used by the Laboratory Search/Extract software. This file should only be edited using  the
Search/Extract Parameter Setup option [LREPI PARAMETER SETUP] provided with this software.  
 



CROSS
REFERENCED BY: NAME(B), REFERENCE NUMBER(C), NAME(D)



69.5,.01      NAME                   0;1 FREE TEXT (Required)

              INPUT TRANSFORM:  K:$L(X)>30!($L(X)<3)!'(X'?1P.E)!(X'?.ANP) X
              LAST EDITED:      MAR 16, 2004 
              HELP-PROMPT:      Enter a Name (3 to 30 characters) for the Search/Extract parameter you are defining. 
              DESCRIPTION:
                                This is the name of the Search/Extract parameter you are defining.  

              NOTES:            XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER

              CROSS-REFERENCE:  69.5^B 
                                1)= S ^LAB(69.5,"B",$E(X,1,30),DA)=""
                                2)= K ^LAB(69.5,"B",$E(X,1,30),DA)

              CROSS-REFERENCE:  69.5^D^MUMPS 
                                1)= D UP^LRXREF S ^LAB(69.5,"D",X,DA)=""
                                2)= D UP^LRXREF K ^LAB(69.5,"D",X,DA)
                                The name is converted to upper case and stored in the "D" x-ref for easier lookup. 
                                ^LAB(69.5,"D",UPPERCASE NAME, IEN) 



69.5,.05      REFERENCE NUMBER       0;9 NUMBER

              INPUT TRANSFORM:  K:+X'=X!(X>999)!(X<1)!(X?.E1"."1N.N)!(X'>99)!$D(^LAB(69.5,"C",X)) X
              LAST EDITED:      NOV 29, 1996 
              HELP-PROMPT:      Type a unique number between 100 and 999 to identify this entry. Numbers from 1 to 99 are reserved 
                                for future use. 
              DESCRIPTION:
                                This is a unique number used to identify this entry.  

                                UNEDITABLE
              NOTES:            XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER

              CROSS-REFERENCE:  69.5^C 
                                1)= S ^LAB(69.5,"C",$E(X,1,30),DA)=""
                                2)= K ^LAB(69.5,"C",$E(X,1,30),DA)


69.5,1        INACTIVE               0;2 SET

                                '1' FOR YES; 
                                '0' FOR NO; 
              LAST EDITED:      JUN 19, 2002 
              HELP-PROMPT:      '1' or 'YES' indicates that this is an inactive entry. '0' or 'NO' indicates that this is an active 
                                entry. 
              DESCRIPTION:
                                This defines if this entry is active or not.  


69.5,2        LAB TEST               1;0 POINTER Multiple #69.52

              DESCRIPTION:
                                This is the test that is to be searched for and retrieved.  


69.52,.01       LAB TEST               0;1 POINTER TO LABORATORY TEST FILE (#60) (Multiply asked)

                INPUT TRANSFORM:S DIC("S")="I $P($G(^(0)),U,4)=""CH""!($P($G(^(0)),U,4)=""CY"")" D ^DIC K DIC S DIC=DIE,X=+Y K:Y<0 
                                X
                LAST EDITED:    FEB 04, 1998 
                HELP-PROMPT:    Enter the lab test that is to be searched for and retrieved. Consider this synonymous with 
                                chemistry, serology, hematology "blood/serum" or Cytology tests. 
                DESCRIPTION:
                                This is the lab test that is to be searched for and retrieved.  

                SCREEN:         S DIC("S")="I $P($G(^(0)),U,4)=""CH""!($P($G(^(0)),U,4)=""CY"")"
                EXPLANATION:    Only CH subscripts are selectable.
                NOTES:          XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER

                CROSS-REFERENCE:69.52^B 
                                1)= S ^LAB(69.5,DA(1),1,"B",$E(X,1,30),DA)=""
                                2)= K ^LAB(69.5,DA(1),1,"B",$E(X,1,30),DA)


69.52,1         INDICATOR            0;2 SET

                                '1' FOR Use Reference Ranges; 
                                '2' FOR Contains; 
                                '3' FOR Greater Than; 
                                '4' FOR Less Than; 
                                '5' FOR Equal To; 
                LAST EDITED:    FEB 05, 1997 
                HELP-PROMPT:    Select the code that will determine how to match lab results. 
                DESCRIPTION:
                                This indicates if the search for the lab test is conditional.  


69.52,2         INDICATED VALUE      0;3 FREE TEXT

                INPUT TRANSFORM:K:$L(X)>30!($L(X)<1) X
                LAST EDITED:    FEB 05, 1998 
                HELP-PROMPT:    Enter the data to be compared using the INDICATOR field. 
                DESCRIPTION:
                                If the search is conditional this defines the criteria. 




69.5,3        ETIOLOGY               2;0 POINTER Multiple #69.53

              DESCRIPTION:
                                This defines the Etiology to search for.  


69.53,.01       ETIOLOGY               0;1 POINTER TO ETIOLOGY FIELD FILE (#61.2) (Multiply asked)

                LAST EDITED:      AUG 29, 1996 
                HELP-PROMPT:      Select the Etiology to search for. 
                DESCRIPTION:
                                  This defines the Etiology to search for. Select the appropriate Etiology.  

                CROSS-REFERENCE:  69.53^B 
                                  1)= S ^LAB(69.5,DA(1),2,"B",$E(X,1,30),DA)=""
                                  2)= K ^LAB(69.5,DA(1),2,"B",$E(X,1,30),DA)




69.5,4        ICD DIAGNOSIS          3;0 POINTER Multiple #69.54

              LAST EDITED:      JUN 12, 2012 
              DESCRIPTION:
                                This defines the ICD Diagnoses to search for.  


69.54,.01       ICD DIAGNOSIS          0;1 POINTER TO ICD DIAGNOSIS FILE (#80) (Multiply asked)

                LAST EDITED:      SEP 17, 2012 
                HELP-PROMPT:      Select the ICD Diagnosis Code to be included in the search. 
                DESCRIPTION:
                                  This defines an ICD Diagnosis for use in emerging pathogens data search/extract.  

                CROSS-REFERENCE:  69.54^B 
                                  1)= S ^LAB(69.5,DA(1),3,"B",$E(X,1,30),DA)=""
                                  2)= K ^LAB(69.5,DA(1),3,"B",$E(X,1,30),DA)


69.54,1         CODING SYSTEM          0;2 POINTER TO ICD CODING SYSTEMS FILE (#80.4)

                LAST EDITED:      AUG 10, 2012 
                HELP-PROMPT:      Enter the applicable ICD coding system for this ICD Diagnosis. 
                DESCRIPTION:      This defines an ICD coding system associated with an ICD diagnosis for use in emerging pathogens
                                  data search/extract.  




69.5,5        ANTIMICROBIAL SUSCEPTIBILITY 4;0 POINTER Multiple #69.55

              LAST EDITED:      JAN 22, 1997 
              DESCRIPTION:
                                This determines that if any of the Etiologies selected are to be resistant to any Antimicrobials.  


69.55,.01       ANTIMICROBIAL SUSCEPTIBILITY 0;1 POINTER TO ANTIMICROBIAL SUSCEPTIBILITY FILE (#62.06) (Multiply asked)

                LAST EDITED:      JAN 22, 1997 
                HELP-PROMPT:      Enter the Antimicrobial that will be used in screening out sensitive Etiologies. 
                DESCRIPTION:      This determines that if any of the Etiologies selected are to be resistant to any Antimicrobials.
                                  Select the appropriate Antimicrobials to screen out the Etiologies.  
                                   

                CROSS-REFERENCE:  69.55^B 
                                  1)= S ^LAB(69.5,DA(1),4,"B",$E(X,1,30),DA)=""
                                  2)= K ^LAB(69.5,DA(1),4,"B",$E(X,1,30),DA)


69.55,1         INDICATOR              0;2 SET

                                  '1' FOR Use Reference Ranges; 
                                  '2' FOR Contains; 
                                  '3' FOR Greater Than; 
                                  '4' FOR Less Than; 
                                  '5' FOR Equal To; 
                LAST EDITED:      MAR 24, 2004 
                HELP-PROMPT:      Select the code that will determine how to match lab results. 
                DESCRIPTION:
                                  This indicates if the search for the lab test is conditional.  


69.55,2         INDICATED VALUE        0;3 FREE TEXT

                INPUT TRANSFORM:  K:$L(X)>30!($L(X)<1) X
                LAST EDITED:      MAR 24, 2004 
                HELP-PROMPT:      Enter the data to be compared using the INDICATOR field. 
                DESCRIPTION:
                                  If the search is conditional this defines the criteria.  




69.5,6        INCLUDED SITES         5;0 POINTER Multiple #69.56

              LAST EDITED:      OCT 04, 1996 
              DESCRIPTION:
                                This determines what Topography to screen for.  


69.56,.01       TOPOGRAPHY             0;1 POINTER TO TOPOGRAPHY FIELD FILE (#61) (Multiply asked)

                LAST EDITED:      OCT 04, 1996 
                HELP-PROMPT:      Selection of a Topography screens all others out except the ones selected. For "ALL" leave blank. 
                                  Not to be used in conjunction with the exclude Topography selection. 
                DESCRIPTION:      This determines what Topography to screen for. Select the appropriate Topography to include in
                                  the extract. 

                CROSS-REFERENCE:  69.56^B 
                                  1)= S ^LAB(69.5,DA(1),5,"B",$E(X,1,30),DA)=""
                                  2)= K ^LAB(69.5,DA(1),5,"B",$E(X,1,30),DA)




69.5,7        EXCLUDED SITES         6;0 POINTER Multiple #69.57

              DESCRIPTION:
                                This determines what Topography to screen out.  


69.57,.01       TOPOGRAPHY             0;1 POINTER TO TOPOGRAPHY FIELD FILE (#61) (Multiply asked)

                LAST EDITED:      OCT 04, 1996 
                HELP-PROMPT:      Select the Topography to screen out. Not to be used in conjunction with the Include Topography 
                                  selection. 
                DESCRIPTION:      This determines what Topography to screen out. Select the appropriate Topography to be excluded
                                  from the extract. 

                CROSS-REFERENCE:  69.57^B 
                                  1)= S ^LAB(69.5,DA(1),6,"B",$E(X,1,30),DA)=""
                                  2)= K ^LAB(69.5,DA(1),6,"B",$E(X,1,30),DA)




69.5,8        SNOMED CODES           9;0 Multiple #69.58

              DESCRIPTION:
                                This is a list of SNOMED codes to be included in the search.  


69.58,.01       SNOMED CODES           0;1 FREE TEXT (Multiply asked)

                INPUT TRANSFORM:  K:$L(X)>15!($L(X)<1) X
                LAST EDITED:      AUG 20, 1997 
                HELP-PROMPT:      Enter any SNOMED codes to be included in the search. Enter one code per line. 
                DESCRIPTION:
                                  This is a list of SNOMED code to be included in the search.  

                CROSS-REFERENCE:  69.58^B 
                                  1)= S ^LAB(69.5,DA(1),9,"B",$E(X,1,30),DA)=""
                                  2)= K ^LAB(69.5,DA(1),9,"B",$E(X,1,30),DA)




69.5,9        RUN DATE               0;4 DATE

              INPUT TRANSFORM:  S %DT="ESTX" D ^%DT S X=Y K:Y<1 X
              LAST EDITED:      FEB 06, 1997 
              HELP-PROMPT:      Enter the date that the last Auto Search/Extract processed. 
              DESCRIPTION:
                                The date that the last Auto Search/Extract processed 


69.5,10       CYCLE                  0;5 SET

                                'M' FOR MONTHLY; 
                                'D' FOR DAILY; 
              LAST EDITED:      DEC 03, 1997 
              HELP-PROMPT:      Select whether this parameter is to be used 'D'aily or 'M'onthly 
              DESCRIPTION:      This field defines how often the this entry is acted upon by the nightly task.  
                                 

              CROSS-REFERENCE:  ^^TRIGGER^69.5^10.5 
                                1)= K DIV S DIV=X,D0=DA,DIV(0)=D0 S Y(1)=$S($D(^LAB(69.5,D0,0)):^(0),1:"") S X=$P(Y(1),U,3),X=X S D
                                IU=X K Y S X="" X ^DD(69.5,10,1,1,1.4)

                                1.4)= S DIH=$S($D(^LAB(69.5,DIV(0),0)):^(0),1:""),DIV=X S $P(^(0),U,3)=DIV,DIH=69.5,DIG=10.5 D ^DIC
                                R:$O(^DD(DIH,DIG,1,0))>0

                                2)= K DIV S DIV=X,D0=DA,DIV(0)=D0 S Y(1)=$S($D(^LAB(69.5,D0,0)):^(0),1:"") S X=$P(Y(1),U,3),X=X S D
                                IU=X K Y S X="" X ^DD(69.5,10,1,1,2.4)

                                2.4)= S DIH=$S($D(^LAB(69.5,DIV(0),0)):^(0),1:""),DIV=X S $P(^(0),U,3)=DIV,DIH=69.5,DIG=10.5 D ^DIC
                                R:$O(^DD(DIH,DIG,1,0))>0

                                CREATE VALUE)= ""
                                DELETE VALUE)= ""
                                FIELD)= LAG DAY


69.5,10.5     LAG DAYS               0;3 NUMBER

              INPUT TRANSFORM:  S CYC=$P(^LAB(69.5,DA,0),U,5),MAX=$S(CYC="D":99,CYC="M":26,1:0) K:+X'=X!(X>MAX)!(X<1)!(X?.E1"."1N.N
                                ) X K MAX,CYC
              LAST EDITED:      SEP 04, 1997 
              HELP-PROMPT:      Enter the numbers of lag days desired. The amount allowed will very depending on the cycle type. 
              DESCRIPTION:      This is the number of days that the search should wait after the test was ordered to ensure that
                                the results have been entered in the system.  

              NOTES:            XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
                                TRIGGERED by the CYCLE field of the LAB SEARCH/EXTRACT File 


69.5,11       FIRST ENCOUNTER        0;6 SET

                                '1' FOR YES; 
                                '0' FOR NO; 
              LAST EDITED:      DEC 30, 1996 
              HELP-PROMPT:      Enter '1' to limit the output to the first encounter for the patient. '0' will list all encounters. 
              DESCRIPTION:      This determines if after the first encounter is found and extracted should sequential encounters be
                                extracted.  


69.5,12       PROTOCOL               0;7 POINTER TO LAB SEARCH/EXTRACT PROTOCOL FILE (#69.4)

              LAST EDITED:      NOV 06, 2003 
              HELP-PROMPT:      Select the Protocol to be used to define the output messages. 
              DESCRIPTION:      This defines what protocol is associated with the parameters.  
                                 

                                UNEDITABLE

69.5,13       FOLLOW PTF             0;8 SET

                                '1' FOR YES; 
                                '0' FOR NO; 
              LAST EDITED:      OCT 17, 1996 
              HELP-PROMPT:      'YES' or '1' indicates that the PTF record will be followed until a discharge has been entered.   
              DESCRIPTION:      This determines whether the discharge information should be updated upon discharge if a inpatient
                                encounter does not have an existing discharge.  


69.5,14       PTF                    7;0 POINTER Multiple #69.514 (Add New Entry without Asking)

              DESCRIPTION:
                                This is the PTF file enty to be followed.  


69.514,.01      PTF                    0;1 POINTER TO PTF FILE (#45)

                LAST EDITED:      OCT 17, 1996 
                HELP-PROMPT:      Enter the PTF file entry to be followed. 
                DESCRIPTION:
                                  This is the PTF file entry to be followed.  

                CROSS-REFERENCE:  69.514^B 
                                  1)= S ^LAB(69.5,DA(1),7,"B",$E(X,1,30),DA)=""
                                  2)= K ^LAB(69.5,DA(1),7,"B",$E(X,1,30),DA)


69.514,1        DATE                   0;2 DATE

                INPUT TRANSFORM:  S %DT="E" D ^%DT S X=Y K:Y<1 X
                LAST EDITED:      DEC 31, 1996 
                HELP-PROMPT:      Enter the date that the Inpatient discharge information was included in the report as an update. 
                DESCRIPTION:
                                  This is the date that the Inpatient discharge information was included in the report as a update.  




69.5,15       Description            8;0   WORD-PROCESSING #69.515

              DESCRIPTION:
                                This is the general description for the entry.  


                LAST EDITED:      DEC 02, 1996 
                HELP-PROMPT:      Enter the general description for this entry. 
                DESCRIPTION:
                                  This is the general description for this entry.  




69.5,16       SEX                    0;10 SET

                                'M' FOR MALE; 
                                'F' FOR FEMALE; 
                                'O' FOR OTHER; 
              LAST EDITED:      NOV 17, 1997 
              HELP-PROMPT:      Enter the sex code to be included in the search. Leave blank if all types are to be included. 
              DESCRIPTION:      This is the sex code to be included in the search.  All types will be included if this field is
                                left blank.  


69.5,17       BEFORE DATE OF BIRTH   0;11 DATE

              INPUT TRANSFORM:  S %DT="EX" D ^%DT S X=Y K:Y<1 X
              LAST EDITED:      NOV 17, 1997 
              HELP-PROMPT:      Enter a date to screen out patients born after the date entered. 
              DESCRIPTION:
                                Patients born after the date entered will not be included in the report.  


69.5,18       AFTER DATE OF BIRTH    0;12 DATE

              INPUT TRANSFORM:  S %DT="EX" D ^%DT S X=Y K:Y<1 X
              LAST EDITED:      NOV 17, 1997 
              HELP-PROMPT:      A birthdate to screen patients. ie patients DOB after 1/1/1950. 
              DESCRIPTION:
                                Persons born before the date entered will not be included in the report.  


69.5,19       PREVIOUS CYCLE         0;13 NUMBER

              INPUT TRANSFORM:  K:+X'=X!(X>99)!(X<1)!(X?.E1"."1.N) X
              LAST EDITED:      SEP 09, 2003 
              HELP-PROMPT:      Type a number between 1 and 99. 
              DESCRIPTION:      By entering a number here the Lab search engine knows to look at a previous cycle for updates to
                                data. How far back it looks is based on the cycle and number entered. For example if the cycle is
                                monthly and the previous cycle is 1 then the search engine will also search 1 month back for data.  

                                UNEDITABLE


      FILES POINTED TO                      FIELDS

ANTIMICROBIAL SUSCEPTIBILITY 
                   (#62.06)       ANTIMICROBIAL SUSCEPTIBILITY:ANTIMICROBIAL SUSCEPTIBILITY (#.01)

ETIOLOGY FIELD (#61.2)            ETIOLOGY:ETIOLOGY (#.01)

ICD CODING SYSTEMS (#80.4)        ICD DIAGNOSIS:CODING SYSTEM (#1)

ICD DIAGNOSIS (#80)               ICD DIAGNOSIS:ICD DIAGNOSIS (#.01)

LAB SEARCH/EXTRACT PROTOCOL 
                   (#69.4)        PROTOCOL (#12)

LABORATORY TEST (#60)             LAB TEST:LAB TEST (#.01)

PTF (#45)                         PTF:PTF (#.01)

TOPOGRAPHY FIELD (#61)            INCLUDED SITES:TOPOGRAPHY (#.01)
                                  EXCLUDED SITES:TOPOGRAPHY (#.01)



INPUT TEMPLATE(S):

PRINT TEMPLATE(S):

SORT TEMPLATE(S):

FORM(S)/BLOCK(S):
LREPI                         OCT 07, 1996@10:13  USER #0
  LREPIHEAD                     DD #69.5
  LREPI2                        DD #69.52
  LREPI3                        DD #69.54
  LREPI1                        DD #69.5
  LREPI11                       DD #69.5
  LREPI4                        DD #69.53
  LREPI6                        DD #69.5
  LREPI12                       DD #69.58
  LREPI95                       DD #69.55
  LREPI7                        DD #69.55
  LREPI8                        DD #69.56
  LREPI9                        DD #69.57
  LREPI13                       DD #69.5
  LREPI10                       DD #69.5
  LREPI15                       DD #69.55

LREPI9                        OCT 07, 1996@10:13  USER #0
  LREPI9HEAD                    DD #69.5
  LREPI92                       DD #69.52
  LREPI93                       DD #69.54
  LREPI91                       DD #69.5
  LREPI911                      DD #69.5
  LREPI92B                      DD #69.5
  LREPI5                        DD #69.55
  LREPI94                       DD #69.53
  LREPI96                       DD #69.5
  LREPI912                      DD #69.58
  LREPI97                       DD #69.5
  LREPI98                       DD #69.56
  LREPI99                       DD #69.57
  LREPI913                      DD #69.5
  LREPI910                      DD #69.5