STANDARD DATA DICTIONARY #743.5 -- GROUP FILE                                                                     3/24/25    PAGE 1
STORED IN ^QA(743.5,  *** NO DATA STORED YET ***   SITE: WWW.BMIRWIN.COM   UCI: VISTA,VISTA                        (VERSION 1.0)   

DATA          NAME                  GLOBAL        DATA
ELEMENT       TITLE                 LOCATION      TYPE
-----------------------------------------------------------------------------------------------------------------------------------
This file contains groups of data from other DHCP files.  Group data is used by many conditions to determine if a patient should
fall out for a given monitor.  Users may create new groups and add or delete group members from existing groups 


              DD ACCESS: @
             DEL ACCESS: @
IDENTIFIED BY: PARENT FILE (#.02)[R]

CROSS
REFERENCED BY: NAME(B), PARENT FILE(C)



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

              INPUT TRANSFORM:  K:$L(X)>30!($L(X)<3)!'(X'?1P.E) X
              LAST EDITED:      DEC 12, 1990 
              HELP-PROMPT:      Answer must be 3-30 characters in length. 
              DESCRIPTION:
                                This field contains the name of the group.  

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


743.5,.02     PARENT FILE            0;2 POINTER TO FILE FILE (#1) (Required)

              INPUT TRANSFORM:  S DIC("S")="I $D(^DIC(""AC"",""QAM"",+Y))" D ^DIC K DIC S DIC=DIE,X=+Y K:Y<0 X
              LAST EDITED:      JAN 11, 1991 
              HELP-PROMPT:      Enter the file the group entries will come from. 
              DESCRIPTION:
                                This field determines which file the group entries are to be found in.  

              SCREEN:           S DIC("S")="I $D(^DIC(""AC"",""QAM"",+Y))"
              EXPLANATION:      You may select only QAM application group files.
                                UNEDITABLE
              CROSS-REFERENCE:  743.5^C 
                                1)= S ^QA(743.5,"C",$E(X,1,30),DA)=""
                                2)= K ^QA(743.5,"C",$E(X,1,30),DA)


743.5,1       GROUP MEMBER           GRP;0 Multiple #743.51 (Add New Entry without Asking)

              DESCRIPTION:
                                This field contains the actual members of the group.  

              TECHNICAL DESCR:  The group members are stored as free-text pointers to the file specified in the parent file field. 
                                The second semi-colon piece of the data is the internal entry number of the entry in the parent
                                file.  


743.51,.01      GROUP MEMBER           0;1 FREE TEXT (Multiply asked)

                INPUT TRANSFORM:  K:X[""""!($A(X)=45) X I $D(X) K:$L(X)>245!($L(X)<1) X I $D(X) D EN8^QAMUTL0
                OUTPUT TRANSFORM: S Y=$P(Y,";")
                LAST EDITED:      JUN 02, 1992 
                HELP-PROMPT:      Answer must be 1-245 characters in length. 
                DESCRIPTION:
                                  This field contains the actual members on the group.  

                TECHNICAL DESCR:  The group members are stored as free-text pointers to the file specified in the parent file
                                  field.  The second semi-colon piece of the data is the internal entry number of the entry in the
                                  parent file.  

                EXECUTABLE HELP:N DIC,DO S DIC(0)="M",D="B",DZ="?",DIC=$S($D(^DIC(+$P(^QA(743.5,$S($D(DA(1))#2:DA(1),1:D0),0),"^",2
                                ),0,"GL"))#2:^("GL"),1:"") D:DIC]"" DQ^DICQ Q
                NOTES:          XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER

                CROSS-REFERENCE:743.51^B 
                                1)= S ^QA(743.5,DA(1),"GRP","B",$E(X,1,30),DA)=""
                                2)= K ^QA(743.5,DA(1),"GRP","B",$E(X,1,30),DA)

                CROSS-REFERENCE:743.51^AB^MUMPS 
                                1)= S ^QA(743.5,DA(1),"GRP","AB",$P(X,";",2),DA)=""
                                2)= K ^QA(743.5,DA(1),"GRP","AB",$P(X,";",2),DA)
                                Cross-reference of the GROUP MEMBER's internal entry number in the file pointed to by the PARENT
                                FILE field.  






      FILES POINTED TO                      FIELDS

FILE (#1)                         PARENT FILE (#.02)



INPUT TEMPLATE(S):

PRINT TEMPLATE(S):

SORT TEMPLATE(S):

FORM(S)/BLOCK(S):