STANDARD DATA DICTIONARY #720.5 -- EC EVENT CODE SCREENS/PROC REASON LINK FILE                                    9/29/25    PAGE 1
STORED IN ^ECL(  *** NO DATA STORED YET ***   SITE: WWW.BMIRWIN.COM   UCI: VISTA,VISTA                             (VERSION 2.0)   

DATA          NAME                  GLOBAL        DATA
ELEMENT       TITLE                 LOCATION      TYPE
-----------------------------------------------------------------------------------------------------------------------------------
This file contains pointers to the EC Event Code Screens (#720.3) file and the EC Procedure Reason (#720.4) file and is used as a
"link" file between the two.  


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

POINTED TO BY: PROCEDURE REASON field (#34) of the EVENT CAPTURE PATIENT File (#721) 
               PROCEDURE REASON #2 field (#43) of the EVENT CAPTURE PATIENT File (#721) 
               PROCEDURE REASON #3 field (#44) of the EVENT CAPTURE PATIENT File (#721) 
               

CROSS
REFERENCED BY: PROCEDURE REASON(AC), EVENT CODE SCREEN(AD), PROCEDURE REASON(B)



720.5,.01     PROCEDURE REASON       0;1 POINTER TO EC PROCEDURE REASON FILE (#720.4)

              LAST EDITED:      AUG 15, 1997 
              HELP-PROMPT:      Enter the pointer to the EC Procedure Reason file (#720.4). 
              DESCRIPTION:
                                This field contains the pointer to the procedure reason associated with the event code screen.  

              TECHNICAL DESCR:
                                This field is populated when a procedure reason is added to an event code screen.  

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

              CROSS-REFERENCE:  720.5^AC^MUMPS 
                                1)= D SAC^ECDUTL
                                2)= D KAC^ECDUTL
                                3)= DO NOT DELETE
                                This cross reference is used to sort by procedure reason and event code screen and is defined as
                                follows: 
                                        ^ECL("AC",procedure reason IEN, event code screen IEN, DA) 



720.5,.02     EVENT CODE SCREEN      0;2 POINTER TO EC EVENT CODE SCREENS FILE (#720.3)

              LAST EDITED:      JUN 25, 1997 
              HELP-PROMPT:      Enter the pointer to the Event Code Screen file (#720.3). 
              DESCRIPTION:
                                This field contains the pointer to the procedure reason associated with the event code screen.  

              TECHNICAL DESCR:
                                This field is populated when a procedure reason is added to an event code screen.  

              CROSS-REFERENCE:  720.5^AD^MUMPS 
                                1)= S ^ECL("AD",+X,+$P($G(^ECL(DA,0)),"^"),DA)=""
                                2)= K ^ECL("AD",+X,+$P($G(^ECL(DA,0)),"^"),DA)
                                3)= DO NOT DELETE
                                This cross reference is used to sort by event code screen and procedure reason and is defined as
                                follows: 
                                        ^ECL("AD",event code screen IEN,procedure reason IEN,DA) 




      FILES POINTED TO                      FIELDS

EC EVENT CODE SCREENS (#720.3)    EVENT CODE SCREEN (#.02)

EC PROCEDURE REASON (#720.4)      PROCEDURE REASON (#.01)



INPUT TEMPLATE(S):

PRINT TEMPLATE(S):

SORT TEMPLATE(S):

FORM(S)/BLOCK(S):