Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Details
Print Page as PDF
Sub-Field: 124.21

Package: General Medical Record - Generator

AGGREGATE TERM(#124.2)-->124.21

Sub-Field: 124.21


Information

Parent File Name Number Package
AGGREGATE TERM(#124.2) CHILDREN 124.21 General Medical Record - Generator

Details

Field # Name Loc Type Details
.01 CHILD 0;1 POINTER TO AGGREGATE TERM FILE (#124.2) AGGREGATE TERM(#124.2)

  • 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(GMRGCYC) 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(GMRG,"^",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.
1 CHILD TEXT 0;2 FREE TEXT
************************REQUIRED FIELD************************

  • 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.
2 CHILD TYPE 0;3 SET
************************REQUIRED FIELD************************
  • '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
3 CHILD PACKAGE 0;4 FREE TEXT
************************REQUIRED FIELD************************

  • 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
4 CHILD NODE ID 0;5 NUMBER
************************REQUIRED FIELD************************

  • 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
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)=""
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.
Info |  Details