STANDARD DATA DICTIONARY #69.1 -- COLLECTION LIST FILE                                                            3/24/25    PAGE 1
STORED IN ^LRO(69.1,  *** NO DATA STORED YET ***   SITE: WWW.BMIRWIN.COM   UCI: VISTA,VISTA                        (VERSION 5.2)   

DATA          NAME                  GLOBAL        DATA
ELEMENT       TITLE                 LOCATION      TYPE
-----------------------------------------------------------------------------------------------------------------------------------
This contains the lab collection list entries.  
 
 ^LRO(69.1,"LRPH",division,location rm/bed, LRDFN,spec)=col samp^LC^build date/time^acc date/time^DA 
 ^LRO(69.1,"LRPH",division,location,rm/bed,LRDFN,spec,acc area,acc #,test)=test 



CROSS
REFERENCED BY: COLLECTION ROUTE(B), TEST(LRPH), SPECIMEN #(LRPH1)



69.1,.01      COLLECTION ROUTE       0;1 NUMBER (Required)

              INPUT TRANSFORM:  K:+X'=X!(X>999)!(X<1)!(X?.E1"."1N.N) X I $D(X) S DINUM=X
              LAST EDITED:      APR 30, 1987 
              HELP-PROMPT:      TYPE A WHOLE NUMBER BETWEEN 1 AND 999 
              DESCRIPTION:
                                 This field contains the numeric order of the collection list.^ 

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

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


69.1,.02      DATE                   0;2 DATE

              INPUT TRANSFORM:  S %DT="E" D ^%DT S X=Y K:Y<1 X
              DESCRIPTION:
                                 This field contains the date of this collection list.  


69.1,1        TEST                   1;0 POINTER Multiple #69.11

              DESCRIPTION:
                                 This field contains the a listing of test to be collected from this patient.  


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

                LAST EDITED:      AUG 07, 1989 
                CROSS-REFERENCE:  69.11^B 
                                  1)= S ^LRO(69.1,DA(1),1,"B",$E(X,1,30),DA)=""
                                  2)= K ^LRO(69.1,DA(1),1,"B",$E(X,1,30),DA)

                CROSS-REFERENCE:  69.1^LRPH^MUMPS 
                                1)= S ^LRO(69.1,"LRPH",1,$P(^LRO(69.1,DA(1),1,DA,0),U,2),$P(^(0),U,3),$P(^(0),U,4),$P(^(0),U,5),$P(
                                ^(0),U,10),$P(^(0),U,11),$P(^(0),U,1))=$P(^(0),U,1)

                                2)= K ^LRO(69.1,"LRPH",1,$P(^LRO(69.1,DA(1),1,DA,0),U,2),$P(^(0),U,3),$P(^(0),U,4),$P(^(0),U,5),$P(
                                ^(0),U,10),$P(^(0),U,11),$P(^(0),U,1))


69.11,1         LOCATION             0;2 FREE TEXT

                INPUT TRANSFORM:S DIC=44,DIC(0)="QELM" K DO D ^DIC S:Y>0 X=$P(^SC(+Y,0),U,2) S DIC=DIE K:Y<0!('$L(X)) X
                DESCRIPTION:
                                 The location of the patient in the hospital.  

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


69.11,2         ROOM/BED             0;3 FREE TEXT

                INPUT TRANSFORM:K:$L(X)>20!($L(X)<1) X
                HELP-PROMPT:    ANSWER MUST BE 1-20 CHARACTERS IN LENGTH 
                DESCRIPTION:
                                 The room and bed of the patient in the hospital ward.  


69.11,3         LRDFN                0;4 POINTER TO LAB DATA FILE (#63)


69.11,4         SPECIMEN #           0;5 NUMBER

                INPUT TRANSFORM:K:+X'=X!(X>999999)!(X<1)!(X?.E1"."1N.N) X
                LAST EDITED:    SEP 19, 1989 
                HELP-PROMPT:    TYPE A WHOLE NUMBER BETWEEN 1 AND 999999 
                CROSS-REFERENCE:69.1^LRPH1^MUMPS 
                                1)= S ^LRO(69.1,"LRPH",1,$P(^LRO(69.1,DA(1),1,DA,0),U,2),$P(^(0),U,3),$P(^(0),U,4),$P(^(0),U,5))=$P
                                (^(0),U,6)_"^"_"LC"_"^"_$P(^(0),U,8)_"^"_$P(^(0),U,9)_"^"_DA

                                2)= K ^LRO(69.1,"LRPH",1,$P(^LRO(69.1,DA(1),1,DA,0),U,2),$P(^(0),U,3),$P(^(0),U,4),$P(^(0),U,5))


69.11,5         COLLECTION SAMPLE    0;6 POINTER TO COLLECTION SAMPLE FILE (#62)


69.11,6         LAB COLLECT          0;7 SET

                                'LC' FOR LAB COLLECT; 
                                'WC' FOR WARD COLLECT; 

69.11,7         BUILD DATE           0;8 DATE

                INPUT TRANSFORM:S %DT="E" D ^%DT S X=Y K:Y<1 X
                DESCRIPTION:
                                 The date the collection list was built.  


69.11,8         ACCESSION DATE       0;9 DATE

                INPUT TRANSFORM:S %DT="E" D ^%DT S X=Y K:Y<1 X
                DESCRIPTION:
                                 The date the specimen was accessioned.  


69.11,9         ACCESSION AREA       0;10 POINTER TO ACCESSION FILE (#68)

                INPUT TRANSFORM:S DIC("S")="I '$L($P(^(0),U,17))" D ^DIC K DIC S DIC=DIE,X=+Y K:Y<0 X
                LAST EDITED:    JAN 06, 1992 
                DESCRIPTION:
                                 The accession area where this test will be performed.  

                SCREEN:         S DIC("S")="I '$L($P(^(0),U,17))"
                EXPLANATION:    Can not select Work Area accession area.

69.11,10        ACCESSION NUMBER     0;11 NUMBER

                INPUT TRANSFORM:K:+X'=X!(X>9999999)!(X<1)!(X?.E1"."1N.N) X
                HELP-PROMPT:    TYPE A WHOLE NUMBER BETWEEN 1 AND 9999999 
                DESCRIPTION:
                                 The accession number for the specimen.  


69.11,11        ORDERING LOCATION    0;12 POINTER TO HOSPITAL LOCATION FILE (#44)

                LAST EDITED:    DEC 12, 1989 
                HELP-PROMPT:    This is the location that is ordered the test. 
                DESCRIPTION:
                                 The location that orginated this order.  





      FILES POINTED TO                      FIELDS

ACCESSION (#68)                   TEST:ACCESSION AREA (#9)

COLLECTION SAMPLE (#62)           TEST:COLLECTION SAMPLE (#5)

HOSPITAL LOCATION (#44)           TEST:ORDERING LOCATION (#11)

LAB DATA (#63)                    TEST:LRDFN (#3)

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



INPUT TEMPLATE(S):

PRINT TEMPLATE(S):

SORT TEMPLATE(S):

FORM(S)/BLOCK(S):