STANDARD DATA DICTIONARY #124.2 -- AGGREGATE TERM FILE 9/29/25 PAGE 1
STORED IN ^GMRD(124.2, (6552 ENTRIES) SITE: WWW.BMIRWIN.COM UCI: VISTA,VISTA (VERSION 3.0)
DATA NAME GLOBAL DATA
ELEMENT TITLE LOCATION TYPE
-----------------------------------------------------------------------------------------------------------------------------------
File that contains the aggregate terms which makes up the prime document content.
DD ACCESS: @
WR ACCESS: @
IDENTIFIED BY: TYPE OF TERM (#.02)[R], PACKAGE (#.03)[R], NODE IDENTIFICATION (#.05)[R]
"WRITE": D EN1^GMRGUT3
POINTED TO BY: CHILD field (#.01) of the CHILDREN sub-field (#124.21) of the AGGREGATE TERM File (#124.2)
TEXT BLOCK field (#.01) of the GMR TEXT File (#124.3)
SELECTION field (#.01) of the SELECTION sub-field (#124.31) of the GMR TEXT File (#124.3)
PROBLEM field (#.01) of the NURSING PROBLEM LIST sub-field (#216.81) of the NURS CARE PLAN File (#216.8)
PROBLEM field (#.02) of the EVALUATION DATE sub-field (#216.82) of the NURS CARE PLAN File (#216.8)
GOAL/EXPECTED OUTCOME field (#.03) of the TARGET DATE sub-field (#216.83) of the NURS CARE PLAN File (#216.8)
ORDERABLE field (#.02) of the ORDER INFO sub-field (#216.84) of the NURS CARE PLAN File (#216.8)
CROSS
REFERENCED BY: NAME(AA), TYPE OF TERM(AA02), PACKAGE(AA03), NODE IDENTIFICATION(AA05), CHILD(AKID), NODE IDENTIFICATION(ANDUP),
PACKAGE(APKUP), CLASSIFICATION(ATD), PACKAGE(ATD1), NAME(ATXTUP), TYPE OF TERM(ATY), TYPE OF TERM(ATYUP),
NAME(B), NAME(C), CLASSIFICATION(CL), PACKAGE(PK)
124.2,.01 NAME 0;1 FREE TEXT (Required)
INPUT TRANSFORM: K:X[""""!($A(X)=45) X I $D(X) K:$L(X)>60!($L(X)<3)!'(X'?1P.E!(X?1"[".E)!(X?1"<".E)) X
LAST EDITED: DEC 06, 1990
HELP-PROMPT: Answer must be 3-60 characters in length.
DESCRIPTION:
Text that composes the Aggregate Term
CROSS-REFERENCE: 124.2^B
1)= S ^GMRD(124.2,"B",$E(X,1,30),DA)=""
2)= K ^GMRD(124.2,"B",$E(X,1,30),DA)
This is a regular cross-reference on the Name field.
CROSS-REFERENCE: 124.2^AA^MUMPS
1)= D EN3^GMRGUT1
2)= S GMRG=$S($D(^GMRD(124.2,DA,0)):^(0),1:""),GMRG(2)=$P(GMRG,"^",2),GMRG(3)=$P(GMRG,"^",3),GMRG(5
)=$P(GMRG,"^",5) K:GMRG(2)'=""&(GMRG(3)'="")&(GMRG(5)'="") ^GMRD(124.2,"AA",GMRG(3),GMRG(2),X,GMRG(
5),DA) K GMRG
This cross-reference triggers data into the Node Identification field if its null, and sets a
multiple cross-reference ("AA") over four fields. The fields used are the Name (.01), Type of Term
(.02), Package (.03) and Node Identification (.05). The structure of the cross-reference is:
^GMRD(124.2,"AA",Package,Type_of_Term,Name,Node_Identification,DA)="".
CROSS-REFERENCE: 124.2^ATXTUP^MUMPS
1)= S GMRGX("D")=1,GMRGX("F")=1 D EN6^GMRGUT2
2)= S GMRGX("D")=0,GMRGX("F")=1 D EN6^GMRGUT2
This field triggers in the new value of the Name field into the Child Text sub-field of the
Children multiple for all entries that point to this entry.
CROSS-REFERENCE: 124.2^C^MUMPS
1)= D EN4^GMRGUT3
2)= D EN5^GMRGUT3
This cross-reference has the format of a regular cross-reference, but the value used for the lookup
is the uppercase version of the Name field. ^GMRD(124.2,"C",Uppercase_Name,DA)="" is the
structure.
124.2,.02 TYPE OF TERM 0;2 SET (Required)
'2' FOR FRAME;
'3' FOR TERM;
LAST EDITED: MAY 17, 1989
DESCRIPTION:
Set of codes that identifies the basic types of text.
SCREEN: S DIC("S")="D EN4^GMRGUT1"
EXPLANATION: You cannot make a term out of an Aggregate term with children.
CROSS-REFERENCE: 124.2^ATY
1)= S ^GMRD(124.2,"ATY",$E(X,1,30),DA)=""
2)= K ^GMRD(124.2,"ATY",$E(X,1,30),DA)
This is a regular cross-reference on the Type of Term field.
CROSS-REFERENCE: 124.2^AA02^MUMPS
1)= D EN3^GMRGUT1
2)= S GMRG=$S($D(^GMRD(124.2,DA,0)):^(0),1:""),GMRG(1)=$P(GMRG,"^"),GMRG(3)=$P(GMRG,"^",3),GMRG(5)=
$P(GMRG,"^",5) K:GMRG(1)'=""&(GMRG(3)'="")&(GMRG(5)'="") ^GMRD(124.2,"AA",GMRG(3),X,GMRG(1),GMRG(5)
,DA) K GMRG
This cross-reference triggers data into the Node Identification field if its null, and sets a
multiple cross-reference ("AA") over four fields. The fields used are the Name (.01), Type of Term
(.02), Package (.03) and Node Identification (.05). The structure of the cross-reference is:
^GMRD(124.2,"AA",Package,Type_of_Term,Name,Node_Identification,DA)="".
CROSS-REFERENCE: 124.2^ATYUP^MUMPS
1)= S GMRGX("D")=1,GMRGX("F")=2 D EN6^GMRGUT2
2)= S GMRGX("D")=0,GMRGX("F")=2 D EN6^GMRGUT2
This cross-reference triggers the value of the Type of Term field into the Child Type sub-field of
the Children multiple for all entries that point to this entry.
124.2,.03 PACKAGE 0;3 FREE TEXT (Required)
INPUT TRANSFORM: K:X[""""!($A(X)=45) X I $D(X) K:$L(X)>5!($L(X)<2) X
LAST EDITED: JUL 19, 1990
HELP-PROMPT: Please enter Package Name (2-5 chars.)
DESCRIPTION: The DHCP package associated with this aggregate term.
If an application wants to allow site configuration of its care plans, the changes made by the site
should be given 'ZZ' as a package. In other words calls made to the Generic Input Utility routine
(GMRGTGIF) for site configuration options should set the variable GMRGPK="ZZ".
CROSS-REFERENCE: 124.2^PK
1)= S ^GMRD(124.2,"PK",$E(X,1,30),DA)=""
2)= K ^GMRD(124.2,"PK",$E(X,1,30),DA)
This is a regular cross-refence on the Package field.
CROSS-REFERENCE: 124.2^AA03^MUMPS
1)= D EN3^GMRGUT1
2)= S GMRG=$S($D(^GMRD(124.2,DA,0)):^(0),1:""),GMRG(1)=$P(GMRG,"^"),GMRG(2)=$P(GMRG,"^",2),GMRG(5)=
$P(GMRG,"^",5) K:GMRG(1)'=""&(GMRG(2)'="")&(GMRG(5)'="") ^GMRD(124.2,"AA",X,GMRG(2),GMRG(1),GMRG(5)
,DA) K GMRG
This cross-reference triggers data into the Node Identification field if its null, and sets a
multiple cross-reference ("AA") over four fields. The fields used are the Name (.01), Type of Term
(.02), Package (.03) and Node Identification (.05). The structure of the cross-reference is:
^GMRD(124.2,"AA",Package,Type_of_Term,Name,Node_Identification,DA)="".
CROSS-REFERENCE: 124.2^APKUP^MUMPS
1)= S GMRGX("D")=1,GMRGX("F")=3 D EN6^GMRGUT2
2)= S GMRGX("D")=0,GMRGX("F")=3 D EN6^GMRGUT2
This cross-reference triggers the value of the Package field into the Child Package sub-field of
the Children multiple for all entries that point to this entry.
CROSS-REFERENCE: 124.2^ATD1^MUMPS
1)= S GMRG=.03 D EN1^GMRGUT2
2)= S GMRG=.03 D EN2^GMRGUT2
This cross-reference sets a multiple index ("ATD") on the Package (.03) and Classification (.04)
fields and Begin Text (1) field of the Term Classification file for the entry pointed to by the
Classification (.04) field. The value of the Begin Text field will determine if this index will be
set. If the Begin Text field is null, the index is not set, if it is 'YES' it is set. The format
of the "ATD" cross-reference is: ^GMRD(124.2,"ATD",Package,Classification,DA)="".
This cross-reference also triggers the values into the Action on Entering Selection (7), Action on
Filing Selection (8), Action on Leaving Selection (9) and Action on Printing Selection (10) from
the corresponding fields in the Term Classification file for the entry which is pointed to by the
Classification field.
124.2,.04 CLASSIFICATION 0;4 POINTER TO TERM CLASSIFICATION FILE (#124.25)
LAST EDITED: JUL 19, 1994
HELP-PROMPT: Please enter Classification of aggregate term.
DESCRIPTION:
Special classification that further identifies an aggregate term.
CROSS-REFERENCE: 124.2^CL
1)= S ^GMRD(124.2,"CL",$E(X,1,30),DA)=""
2)= K ^GMRD(124.2,"CL",$E(X,1,30),DA)
This is a regular cross-reference on the Classification field.
CROSS-REFERENCE: 124.2^ATD^MUMPS
1)= S GMRG=.04 D EN1^GMRGUT2
2)= S GMRG=.04 D EN2^GMRGUT2
This cross-reference sets a multiple index ("ATD") on the Package (.03) and Classification (.04)
fields and Begin Text (1) field of the Term Classification file for the entry pointed to by the
Classification (.04) field. The value of the Begin Text field will determine if this index will be
set. If the Begin Text field is null, the index is not set, if it is 'YES' it is set. The format
of the "ATD" cross-reference is: ^GMRD(124.2,"ATD",Package,Classification,DA)="".
This cross-reference also triggers the values into the Action on Entering Selection (7), Action on
Filing Selection (8), Action on Leaving Selection (9) and Action on Printing Selection (10) from
the corresponding fields in the Term Classification file for the entry which is pointed to by the
Classification field.
124.2,.05 NODE IDENTIFICATION 0;5 NUMBER (Required)
INPUT TRANSFORM: K:+X'=X!(X>99999)!(X<1)!(X?.E1"."1N.N) X
LAST EDITED: MAY 17, 1989
HELP-PROMPT: Please enter this Aggregate Term's "NODE" (a whole number between 1 and 99999).
DESCRIPTION: Identification which separates this Aggregate Term NODE from another Aggregate Term NODE that has
the same NAME(.01), but different logical parent NODE.
DELETE AUTHORITY: ^
WRITE AUTHORITY: ^
UNEDITABLE
CROSS-REFERENCE: 124.2^ANDUP^MUMPS
1)= S GMRGX("D")=1,GMRGX("F")=4 D EN6^GMRGUT2
2)= S GMRGX("D")=0,GMRGX("F")=4 D EN6^GMRGUT2
This cross-reference triggers the value of the Node Identification field into the Child Node ID
sub-field of the Children multiple for all entries that point to this entry.
CROSS-REFERENCE: 124.2^AA05^MUMPS
1)= S GMRGX=$S($D(^GMRD(124.2,DA,0)):^(0),1:""),GMRGX(1)=$P(GMRGX,"^"),GMRGX(2)=$P(GMRGX,"^",2),GMR
GX(3)=$P(GMRGX,"^",3) S:GMRGX(1)'=""&(GMRGX(2)'="")&(GMRGX(3)'="") ^GMRD(124.2,"AA",GMRGX(3),GMRGX(
2),GMRGX(1),X,DA)="" K GMRGX
2)= S GMRGX=$S($D(^GMRD(124.2,DA,0)):^(0),1:""),GMRGX(1)=$P(GMRGX,"^"),GMRGX(2)=$P(GMRGX,"^",2),GMR
GX(3)=$P(GMRGX,"^",3) K:GMRGX(1)'=""&(GMRGX(2)'="")&(GMRGX(3)'="") ^GMRD(124.2,"AA",GMRGX(3),GMRGX(
2),GMRGX(1),X,DA) K GMRGX
This cross-reference sets a multiple cross-reference ("AA") over four fields. The fields used are
the Name (.01), Type of Term (.02), Package (.03) and Node Identification (.05). The structure of
the cross-reference is: ^GMRD(124.2,"AA",Package,Type_of_Term,Name,Node_Identification,DA)="".
124.2,.1 TERM DEFINITION TD;0 WORD-PROCESSING #124.22
DESCRIPTION: If further clarification of this term is needed, it may be added here. The definition of the term
displays when a user types '???' while selecting terms through the Patient Data Enter/Edit module.
added here, and when selecting terms in the patient edit, if the user types in '???' then this
definition will appear in conjunction with this term.
LAST EDITED: MAR 01, 1989
DESCRIPTION:
A further clarification of this term.
124.2,1 CHILDREN 1;0 POINTER Multiple #124.21
DESCRIPTION:
Children are aggregate terms that are under this frame/document.
IDENTIFIED BY: CHILD TEXT(#1)[R], CHILD TYPE(#2)[R], CHILD PACKAGE(#3)[R], CHILD NODE ID(#4)[R], DISPLAY ORDER(#6)
124.21,.01 CHILD 0;1 POINTER TO AGGREGATE TERM FILE (#124.2) (Multiply asked)
INPUT TRANSFORM: S DIC("S")="D EN3^GMRGUTL" D ^DIC K DIC S DIC=DIE,X=+Y K:Y<0 X
LAST EDITED: FEB 13, 1989
HELP-PROMPT: Answer with an aggregate term that is under this frame/document.
DESCRIPTION:
An aggregate term that is under this frame/document.
SCREEN: S DIC("S")="D EN3^GMRGUTL"
EXPLANATION: Entries are screened to allow only valid children.
LAYGO TEST: 1,0)= S GMRGCYC(0)=X,GMRGND=DA(1),GMRGCYC=0 D FNDPRM^GMRGRUT0 K:GMRGCYC GMRGCYC D:'$D(GMRGCYC) EN
^DDIOL($C(7)_"ADDING THIS TERM WOULD CREATE AN INVALID DATA CONDITION, CANNOT ADD!!",,"!?5") I $D(G
MRGCYC) K GMRGCYC
CROSS-REFERENCE:124.21^B
1)= S ^GMRD(124.2,DA(1),1,"B",$E(X,1,30),DA)=""
2)= K ^GMRD(124.2,DA(1),1,"B",$E(X,1,30),DA)
This is a regular cross-reference on the Children sub-field for the Name sub-field of the Children
multiple.
CROSS-REFERENCE:124.2^AKID^MUMPS
1)= S GMRG=$S($D(^GMRD(124.2,DA(1),1,DA,0)):^(0),1:"") S ^GMRD(124.2,"AKID",$E(X,1,30),DA(1),+$P(GM
RG,"^",6),DA)="" K GMRG
2)= K ^GMRD(124.2,"AKID",$E(X,1,30),DA(1),1,DA),^GMRD(124.2,"AKID",$E(X,1,30),DA(1),0,DA)
This cross-reference sets a multi-field cross-reference ("AKID") on the entire file. This
cross-reference uses the Name (.01) sub-field and Delete Flag (5) sub-field of the Children
multiple, and has the following structure: ^GMRD(124.2,"AKID",Name,DA(1),Delete_Flag,DA)=""
CROSS-REFERENCE:124.21^ACHTXT^MUMPS
1)= S GMRG(0)=1 D EN5^GMRGUT2
2)= S GMRG(0)=0 D EN5^GMRGUT2
This cross-reference triggers data into the following fields:
Value that is triggered Field Triggered into
----------------------- --------------------
a. Name field for Aggregate Term file Child Text sub-field of Children
entry pointed to by this field. multiple for this entry. b. Package field for Aggregate
Term Child Package sub-field of Children
file entry pointed to by this field. multiple for this entry. c. Type of Term field for
Aggregate Child Type of Term sub-field of
Term file entry pointed to by this Children multiple for this entry.
field. d. Node Identification field for Child Node ID sub-field of Children
Aggregate Term file entry pointed multiple for this entry.
to by this field.
124.21,1 CHILD TEXT 0;2 FREE TEXT (Required)
INPUT TRANSFORM:K:X[""""!($A(X)=45) X I $D(X) K:$L(X)>60!($L(X)<3)!'(X'?1P.E!(X?1"[".E)) X
LAST EDITED: MAR 16, 1989
HELP-PROMPT: Please enter Child Text (3-60 chars.)
DESCRIPTION: The data in this field is triggered in from the ACHTXT xref on the Child (#.01) field, of the
Children multiple. This field is uneditable, and should be invisible to the users. No
cross-referencing is allowed for this field.
DELETE TEST: 1,0)= I 1
DELETE AUTHORITY: ^
WRITE AUTHORITY:^
UNEDITABLE
CROSS-REFERENCE:124.21^AC^MUMPS
1)= S GMRGX0("D")=1 D EN7^GMRGUT4
2)= S GMRGX0("D")=0 D EN7^GMRGUT4
This cross-reference is a multi-field cross-reference on the Children sub-file. The fields that
are indexed are the Uppercase version of the Child Text (1) sub-field, the Display Order (6)
sub-field and Delete Flag (5) sub-field of the Children multiple. The cross- reference is set only
if the Delete Flag sub-field is null or equal to 'NO', otherwise it is killed. Also, the data that
is cross-reference varies on whether there is data in the Display Order sub-field. If there is
data in the Display Order sub-field, then the cross-reference will be set for the Display Order,
else it will use the value in the Child Text sub-field, if any. The structure of the
cross-reference is: ^GMRD(124.2,DA(1),1,"AC",Value,DA)="", where Value is the Display Order if its
present, otherwise its the Child Text. There will be only one cross-reference entry per entry in
multiple.
124.21,2 CHILD TYPE 0;3 SET (Required)
'2' FOR FRAME;
'3' FOR TERM;
LAST EDITED: MAY 17, 1989
DESCRIPTION: This field contains the type of term for this child. This field is needed as an identifier when
transferring data from one system to another.
DELETE AUTHORITY: ^
WRITE AUTHORITY:^
UNEDITABLE
124.21,3 CHILD PACKAGE 0;4 FREE TEXT (Required)
INPUT TRANSFORM:K:$L(X)>5!($L(X)<2)!'(X'?1P.E) X
LAST EDITED: MAY 17, 1989
HELP-PROMPT: Please enter Child Package name, (2-5 chars.).
DESCRIPTION: This field contains the package reference for this child. This field is needed as an identifier
when transferring data from one system to another.
DELETE AUTHORITY: ^
WRITE AUTHORITY:^
UNEDITABLE
124.21,4 CHILD NODE ID 0;5 NUMBER (Required)
INPUT TRANSFORM:K:+X'=X!(X>99999)!(X<1)!(X?.E1"."1N.N) X
LAST EDITED: MAY 17, 1989
HELP-PROMPT: Please enter the "NODE" for this Child, (a whole number between 1 and 99999).
DESCRIPTION: This field contains the node identifier for this child. This field is needed for transferring data
from one system to another.
DELETE AUTHORITY: ^
WRITE AUTHORITY:^
UNEDITABLE
124.21,5 DELETE FLAG 0;6 SET
'0' FOR NO;
'1' FOR YES;
9.2 = I $D(^GMRD(124.2,"AKID",$E(GMRG,1,30),DA(1),0,DA))!$D(^GMRD(124.2,"AKID",$E(GMRG,1,30),DA(1),
1,DA)) K ^GMRD(124.2,"AKID",$E(GMRG,1,30),DA(1),1,DA) S ^GMRD(124.2,"AKID",$E(GMRG,1,30),DA(1),0,DA
)=""
LAST EDITED: FEB 07, 1991
HELP-PROMPT: Please enter a one (1) if this term has been deleted from the Care Plan. Press RETURN or ENTER if
not.
DESCRIPTION: A flag to track whether a site has removed this term from its care plan or not. A flag was used so
that site configured changes are not lost from version to version.
CROSS-REFERENCE:124.21^AC1^MUMPS
1)= S GMRGX0("D")=101 D EN7^GMRGUT4
2)= S GMRGX0("D")=100 D EN7^GMRGUT4
This cross-reference is a multi-field cross-reference on the Children sub-file. The fields that
are indexed are the Uppercase version of the Child Text (1) sub-field, the Display Order (6)
sub-field and Delete Flag (5) sub-field of the Children multiple. The cross- reference is set only
if the Delete Flag sub-field is null or equal to 'NO', otherwise it is killed. Also, the data that
is cross-reference varies on whether there is data in the Display Order sub-field. If there is
data in the Display Order sub-field, then the cross-reference will be set for the Display Order,
else it will use the value in the Child Text sub-field, if any. The structure of the
cross-reference is: ^GMRD(124.2,DA(1),1,"AC",Value,DA)="", where Value is the Display Order if its
present, otherwise its the Child Text. There will be only one cross-reference entry per entry in
multiple.
CROSS-REFERENCE:124.21^AKID1^MUMPS
1)= S GMRG=$S($D(^GMRD(124.2,DA(1),1,DA,0)):$P(^(0),"^"),1:"") K:GMRG ^GMRD(124.2,"AKID",$E(GMRG,1,
30),DA(1),1-X,DA) S:GMRG ^GMRD(124.2,"AKID",$E(GMRG,1,30),DA(1),+X,DA)="" K GMRG
2)= S GMRG=$S($D(^GMRD(124.2,DA(1),1,DA,0)):$P(^(0),"^"),1:"") X:GMRG ^DD(124.21,5,9.2) K GMRG
This cross-reference sets a multi-field cross-reference ("AKID") on the entire file. This
cross-reference uses the Name (.01) sub-field and Delete Flag (5) sub-field of the Children
multiple, and has the following structure: ^GMRD(124.2,"AKID",Name,DA(1),Delete_Flag,DA)=""
124.21,6 DISPLAY ORDER 0;7 NUMBER
INPUT TRANSFORM:K:+X'=X!(X>9999)!(X<1)!(X?.E1"."1N.N) X
LAST EDITED: APR 09, 1990
HELP-PROMPT: Type a Number between 1 and 9999, 0 Decimal Digits
DESCRIPTION:
This field contains data indicating the order this child is displayed in this frame.
CROSS-REFERENCE:124.21^AC2^MUMPS
1)= S GMRGX0("D")=11 D EN7^GMRGUT4
2)= S GMRGX0("D")=10 D EN7^GMRGUT4
This cross-reference is a multi-field cross-reference on the Children sub-file. The fields that
are indexed are the Uppercase version of the Child Text (1) sub-field, the Display Order (6)
sub-field and Delete Flag (5) sub-field of the Children multiple. The cross- reference is set only
if the Delete Flag sub-field is null or equal to 'NO', otherwise it is killed. Also, the data that
is cross-reference varies on whether there is data in the Display Order sub-field. If there is
data in the Display Order sub-field, then the cross-reference will be set for the Display Order,
else it will use the value in the Child Text sub-field, if any. The structure of the
cross-reference is: ^GMRD(124.2,DA(1),1,"AC",Value,DA)="", where Value is the Display Order if its
present, otherwise its the Child Text. There will be only one cross-reference entry per entry in
multiple.
124.2,2 MIN 0;6 NUMBER
INPUT TRANSFORM: K:+X'=X!(X>99)!(X<0)!(X?.E1"."1N.N) X
LAST EDITED: OCT 08, 1988
HELP-PROMPT: Enter The minimum number of selections allowed under this frame/document. (0-99)
DESCRIPTION:
The minimum number of selections allowed under this frame/document. Null entry means zero.
124.2,3 MAX 0;7 NUMBER
INPUT TRANSFORM: K:+X'=X!(X>99)!(X<0)!(X?.E1"."1N.N) X
LAST EDITED: OCT 08, 1988
HELP-PROMPT: Enter the maximum number of selections allowed under this frame/document. (0-99)
DESCRIPTION: The maximum number of selections allowed under this frame/document. A null entry means there is no
maximum.
124.2,3.5 SUPRESS MIN/MAX MESSAGE 0;12 SET
'0' FOR NO SUPRESSION;
'1' FOR SUPRESS MIN MESSAGE;
'2' FOR SUPRESS MAX MESSAGE;
'3' FOR SUPRESS BOTH MESSAGES;
LAST EDITED: MAR 25, 1991
DESCRIPTION:
This field determines whether the MIN and MAX messages should be supressed for this frame.
124.2,4 LEAD TEXT 4;1 FREE TEXT
INPUT TRANSFORM: K:$L(X)>200!($L(X)<1) X
LAST EDITED: OCT 08, 1988
HELP-PROMPT: Enter a Header Text that would precede this frame/document.(1-200 chars.)
DESCRIPTION:
Text that precedes the text of this frame/document in displays.
124.2,5 TRAIL TEXT 5;1 FREE TEXT
INPUT TRANSFORM: K:$L(X)>200!($L(X)<1) X
LAST EDITED: OCT 08, 1988
HELP-PROMPT: Enter a Trailing Text that would follow this frame/document. (1-200 chars.)
DESCRIPTION:
Text that follows the text of this frame/document in displays.
124.2,6 FORMAT OF OUTPUT 0;8 SET
'S' FOR SENTENCE;
'T' FOR TABULAR;
'B' FOR BRIEF TABULAR;
LAST EDITED: OCT 08, 1988
DESCRIPTION: This is the format of the frame/document display. Tabular, and brief tabular displays in an
outline format; tabular uses lead and trail texts, and brief tabular does not. Sentence creates
paragraphs using lead and trail texts, and ends sentences with periods.
124.2,6.5 ASK ADDITIONAL TEXT 0;9 SET
'0' FOR NO;
'1' FOR YES;
LAST EDITED: MAR 03, 1989
DESCRIPTION:
A flag determining whether Additional Text can be entered for an aggregate term or not.
SCREEN: S DIC("S")="I $P(^GMRD(124.2,DA,0),U,4)'=$O(^GMRD(124.25,""B"",""PRIME DOCUMENT"",0))"
EXPLANATION: Cannot have an entry for a term with classification of Prime Document.
124.2,7 ACTION ON ENTERING SELECTION 7;E1,245 FREE TEXT
INPUT TRANSFORM: D ^DIM
LAST EDITED: OCT 06, 1988
HELP-PROMPT: ANSWER MUST BE VALID MUMPS CODE, 1-245 CHARACTERS IN LENGTH
DESCRIPTION: This is valid MUMPS code that is executed upon entering the screen of an Aggregate Term in the
General Medical Record Generator patient edit.
The variables that the programmer can rely on being set and the
programmer should not kill are:
DFN and arrays from DEM^VADPT and INP^VADPT
GMRGRT=Prime document data for this term in the following format:
AGGY IEN^Term text
GMRGPDA=ENTRY IN GMR TEXT (124.3) FILE
GMRGTERM=Data on term being processed in the following format:
124.2 FILE IEN^Term text^IEN in 124.31 multiple if exists.
GMRGTERM(0)=^GMRD(124.2,+GMRGTERM,0)
WRITE AUTHORITY: @
NOTES: XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
124.2,8 ACTION ON FILING 8;E1,245 FREE TEXT
INPUT TRANSFORM: D ^DIM
LAST EDITED: OCT 08, 1988
HELP-PROMPT: ANSWER MUST BE 1-245 CHARACTERS IN LENGTH
DESCRIPTION: This is valid MUMPS code that will be executed upon the filing of an Aggregate Term in the General
Medical Record Treatment Planner.
The variables that the programmer can rely on being set and the
programmer should not kill are:
DFN and arrays from DEM^VADPT and INP^VADPT
GMRGRT=Prime document data for this term in the following format:
AGGY IEN^Term text
GMRGPDA = ENTRY IN GMR TEXT (124.3) FILE
GMRGTERM=Data on term being filed in the following format:
124.2 FILE IEN^Term text^IEN in 124.31 multiple if exists.
GMRGTERM(0)=^GMRD(124.2,+GMRGTERM,0)
GMRGART=$S(0:if term is being deleted,1:if term is being added)
WRITE AUTHORITY: @
NOTES: XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
124.2,9 ACTION ON LEAVING SELECTION 9;E1,245 FREE TEXT
INPUT TRANSFORM: D ^DIM
LAST EDITED: MAR 01, 1989
HELP-PROMPT: ANSWER MUST BE VALID MUMPS CODE, 1-245 CHARACTERS IN LENGTH
DESCRIPTION: This is valid MUMPS code that will be executed upon the leaving of this aggregate term screen from
the General Medical Record Generator patient edit.
The variables that the programmer can rely on being set, and that the
programmer should not kill are:
DFN and arrays from DEM^VADPT and INP^VADPT
GMRGRT=Prime document data for this term in the following format:
AGGY IEN^Term text
GMRGPDA= ENTRY IN GMR TEXT (124.3) FILE
GMRGTERM=Data on term being processed in the following format:
124.2 FILE IEN^Term text^IEN in 124.31 multiple if exist.
GMRGTERM(0)=^GMRD(124.2,+GMRGTERM,0)
WRITE AUTHORITY: @
NOTES: XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
124.2,10 ACTION ON PRINTING SELECTION 10;E1,245 FREE TEXT
INPUT TRANSFORM: D ^DIM
LAST EDITED: MAR 14, 1989
HELP-PROMPT: Answer must be 1-245 characters in length.
DESCRIPTION: An action that occurs when an aggregate term is printed as a selection on the screen.
The variables that the programmer can rely on being set, and that the
programmer should not kill are:
DFN and arrays from DEM^VADPT and INP^VADPT
GMRGRT=Prime document data for this term in the following format:
AGGY IEN^Term text
GMRGPDA= ENTRY IN GMR TEXT (124.3) FILE
GMRGTERM=Term data whose selections are being printed as follows:
124.2 FILE IEN^Term text^IEN in 124.31 multiple if exists
GMRGTERM(0)=^GMRD(124.2,GMRGTERM,0)
GMRGSEL=Selection being printed for term in GMRGTERM
124.2 FILE IEN^Term text^$S(1:data is active for term
,0:data is not active for term)
If there is other information that needs to be printed with a selection for a particular package,
this is a way to get this information to print.
WRITE AUTHORITY: @
NOTES: XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
FILES POINTED TO FIELDS
AGGREGATE TERM (#124.2) CHILDREN:CHILD (#.01)
TERM CLASSIFICATION (#124.25) CLASSIFICATION (#.04)
INPUT TEMPLATE(S):
GMRG EDIT TERM MAR 25, 1991@15:06 USER #0
PRINT TEMPLATE(S):
SORT TEMPLATE(S):
FORM(S)/BLOCK(S):