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):