STANDARD DATA DICTIONARY #120.88 -- REMOTE ALLERGY COMMENT FILE                                                   9/29/25    PAGE 1
STORED IN ^GMR(120.88,  *** NO DATA STORED YET ***   SITE: WWW.BMIRWIN.COM   UCI: VISTA,VISTA                      (VERSION 4.0)   

DATA          NAME                  GLOBAL        DATA
ELEMENT       TITLE                 LOCATION      TYPE
-----------------------------------------------------------------------------------------------------------------------------------
This file contains locally entered comments relating to allergies entered for a patient at a separate (remote) facility 


              DD ACCESS: @
              RD ACCESS: @
              WR ACCESS: @
             DEL ACCESS: @
           LAYGO ACCESS: @
           AUDIT ACCESS: @

CROSS
REFERENCED BY: REACTANT(B)

INDEXED BY:    PATIENT & REACTANT (PR)


    LAST MODIFIED: OCT 5,2022@14:55:07

120.88,.01    REACTANT               0;1 FREE TEXT (Required)

              ALLERGY REACTANT   
              INPUT TRANSFORM:  K:$L(X)>30!($L(X)<3)!'(X'?1P.E) X
              LAST EDITED:      JAN 05, 2016 
              HELP-PROMPT:      Enter the agent to which the allergy pertains, 3 to 30 characters. 
              DESCRIPTION:
                                The reactant used for the allergy the comment is being added against 

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

              RECORD INDEXES:   PR (#1665)

120.88,.02    PATIENT                0;2 POINTER TO PATIENT FILE (#2)

              LAST EDITED:      JAN 05, 2016 
              HELP-PROMPT:      This is the patient to whom this comment pertains 
              DESCRIPTION:
                                This contains the patient identifier related to this comment 

              RECORD INDEXES:   PR (#1665)

120.88,.03    ENTERED DATE/TIME      0;3 DATE (Required)

              INPUT TRANSFORM:  S %DT="ESTR" D ^%DT S X=Y K:Y<1 X
              LAST EDITED:      JAN 07, 2016 
              HELP-PROMPT:      Answer with the Date/Time Comment was entered 
              DESCRIPTION:
                                Date/Time this comment was entered by the user 


120.88,.04    ENTERED BY             0;4 POINTER TO NEW PERSON FILE (#200) (Required)

              LAST EDITED:      JAN 07, 2016 
              HELP-PROMPT:      Answer with the identifier of the user entering the comment 
              DESCRIPTION:
                                Reference pointer to user that entered this comment 


120.88,1      COMMENT                1;1 FREE TEXT (Required)

              INPUT TRANSFORM:  K:$L(X)>250!($L(X)<3) X
              LAST EDITED:      JAN 05, 2016 
              HELP-PROMPT:      Answer must be 3-250 characters in length. 
              DESCRIPTION:      A comment entered during order check processing by a local user applied to an allergy entered at a
                                remote location/facility 



      FILES POINTED TO                      FIELDS

NEW PERSON (#200)                 ENTERED BY (#.04)

PATIENT (#2)                      PATIENT (#.02)


File #120.88

  Record Indexes:

  PR (#1665)    RECORD    REGULAR    IR    LOOKUP & SORTING
      Short Descr:  Cross reference on Patient and Reactant
      Description:  Cross reference for remote allergy comments based on the reactant and patient to allow identification of a
                    record id based on those two parameters.  
        Set Logic:  S ^GMR(120.88,"PR",X(1),$E(X(2),1,30),DA)=""
       Kill Logic:  K ^GMR(120.88,"PR",X(1),$E(X(2),1,30),DA)
       Whole Kill:  K ^GMR(120.88,"PR")
             X(1):  PATIENT  (120.88,.02)  (Subscr 1)  (forwards)
             X(2):  REACTANT  (120.88,.01)  (Subscr 2)  (Len 30)  (forwards)


INPUT TEMPLATE(S):

PRINT TEMPLATE(S):

SORT TEMPLATE(S):

FORM(S)/BLOCK(S):