STANDARD DATA DICTIONARY #720.3 -- EC EVENT CODE SCREENS FILE 3/24/25 PAGE 1 STORED IN ^ECJ( *** 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 information that is used to screen procedures based on a unique location, DSS unit, category, and procedure. Information in this file should only be entered or edited through the Event Code Screen (Create) option. Access to this option is restricted to the Event Capture Management Menu. One important note, information related to the event code screen cannot be deleted; however, it may be inactivated using the Inactivate Event Code Screens option within the Event Capture software. This file should NOT be modified directly using VA FileMan. This information is created and edited using the Event Capture Management Menu options. POINTED TO BY: EVENT CODE SCREEN field (#.02) of the EC EVENT CODE SCREENS/PROC REASON LINK File (#720.5) CROSS REFERENCED BY: CHARGE CAPTURE CODE(AD), EVENT CODE(AP), EVENT CODE(AST), EVENT CODE(B), INACTIVE DATE(C), SYNONYM(SY), SYNONYM(SYN) 720.3,.01 EVENT CODE 0;1 FREE TEXT (Required) INPUT TRANSFORM: K:X[""""!($A(X)=45) X I $D(X) K:$L(X)>30!($L(X)<3)!'(X'?1P.E) X OUTPUT TRANSFORM: S Y=$P(Y,";")_" ("_$S($E($P(Y,";",2))="I":"CPT",1:"NATIONAL PROCEDURE FILE")_")" LAST EDITED: APR 01, 1996 HELP-PROMPT: Enter the event code screen for this entry. DESCRIPTION: This field contains the information that makes up the event code screen. This information is grouped in the following order: Location # - DSS Unit # - Category # - Procedure # TECHNICAL DESCR: The event code screen is defined as: Location # - DSS Unit # - Category # - Procedure # Location is a pointer to the INSTITUTION file (#4). DSS Unit is a pointer the DSS Unit file (#724). Category is optionally used within each DSS Unit to group procedures. When utilized, category is a pointer to the EVENT CAPTURE CATEGORY file (#726). Otherwise it is a zero (0). When category is not used and stored as a zero (0), it is shown with the name "None" on all display screens and reports. Procedure is a variable pointer to A. CPT file (#81) or B. EC NATIONAL PROCEDURE file (#725). DELETE AUTHORITY: ^ WRITE AUTHORITY: ^ CROSS-REFERENCE: 720.3^B 1)= S ^ECJ("B",$E(X,1,30),DA)="" 2)= K ^ECJ("B",$E(X,1,30),DA) CROSS-REFERENCE: 720.3^AP^MUMPS 1)= D AP^ECDSREF 2)= D KILLAP^ECDSREF 3)= DO NOT DELETE This cross reference creates a subscript for each component of the event code screen in a sequence of: location, DSS unit, category, procedure, and DA. This cross-reference also populates (creates) the "APP" cross reference in a sequence of: location, DSS unit, procedure, and DA. Only those event codes for the selected subscript will be displayed. Defined as: ^ECJ("AP",location,DSS unit,category, procedure,DA)="" and ^ECJ("APP",location,DSS unit,category,procedure,DA)="" CROSS-REFERENCE: 720.3^AST^MUMPS 1)= D AST^ECDSREF 2)= D KAST^ECDSREF 3)= DO NOT DELETE This cross reference is used to control the display of event codes based on the user selected location. Only those codes appropriate for the selected location will be displayed. Defined as: ^ECJ("AST",location,DA)="" 720.3,1 INACTIVE DATE 0;2 DATE INPUT TRANSFORM: S %DT="E" D ^%DT S X=Y K:Y<1 X LAST EDITED: APR 11, 1995 HELP-PROMPT: Enter the date this event code screen was inactivated. DESCRIPTION: This is the date that this event code screen was inactivated. TECHNICAL DESCR: The date this event code screen was inactivated. CROSS-REFERENCE: 720.3^C 1)= S ^ECJ("C",$E(X,1,30),DA)="" 2)= K ^ECJ("C",$E(X,1,30),DA) 720.3,2 CREATION DATE 0;3 DATE INPUT TRANSFORM: S %DT="E" D ^%DT S X=Y K:Y<1 X HELP-PROMPT: Enter the date this event code screen was created. DESCRIPTION: This is the date that this event code screen was created. TECHNICAL DESCR: The date this event code screen was created. 720.3,52.1 PROCEDURE PRO;1 VARIABLE POINTER Procedure FILE ORDER PREFIX LAYGO MESSAGE 81 1 A n CPT 725 2 B n EC NAT PROCEDURE LAST EDITED: MAY 11, 1995 HELP-PROMPT: Enter the new procedure for this screen. DESCRIPTION: This field contains the name of this procedure. Procedures can be selected from either the CPT file (#81) or EC NATIONAL PROCEDURE file (#725). TECHNICAL DESCR: A variable pointer to either the A. CPT file (#81) or B. EC NATIONAL PROCEDURE file (#725). The EC NATIONAL PROCEDURE file (#725) also contains the locally defined procedures. 720.3,53 SYNONYM PRO;2 FREE TEXT Synonym INPUT TRANSFORM: K:X[""""!($A(X)=45) X I $D(X) K:$L(X)>50!($L(X)<3) X LAST EDITED: MAY 11, 1995 HELP-PROMPT: Enter the name that is recognized locally for this event code screen. DESCRIPTION: This field contains the synonym for the procedure associated with this event code screen. This synonym can be created locally, using the Procedure Synonym/Default Volume (Enter/Edit) option, which will allow easy recognition of standard procedures codes. Access to this option is restricted to the Event Capture Management Menu. TECHNICAL DESCR: Free text name that is recognized locally for this event code screen. CROSS-REFERENCE: 720.3^SY^MUMPS 1)= S ^ECJ("SY",DA,$E(X,1,50))="" 2)= K ^ECJ("SY",DA,$E(X,1,50)) 3)= DO NOT DELETE This cross reference is used in identifying the synonym. Defined as: ^ECJ("SY",DA,synonym)="" CROSS-REFERENCE: 720.3^SYN^MUMPS 1)= S ^ECJ("SYN",$E(X,1,50),DA)="" 2)= K ^ECJ("SYN",$E(X,1,50),DA) 3)= DO NOT DELETE This cross reference is used in identifying the synonym. Defined as: ^ECJ("SYN",synonym,DA)="" 720.3,54 VOLUME PRO;3 NUMBER Volume INPUT TRANSFORM: K:+X'=X!(X>999)!(X<1)!(X?.E1"."1N.N) X LAST EDITED: MAY 11, 1995 HELP-PROMPT: Type a Number between 1 and 999, 0 Decimal Digits DESCRIPTION: This is the default volume associated with this event code screen. It contains the number of procedures performed or the time actually spent performing the procedures. This default volume can be created using the Procedure Synonym/Default Volume (Enter/Edit) option. Access to this option is restricted to the Event Capture Management Menu. TECHNICAL DESCR: The numeric volume locally associated with this event code screen. 720.3,55 ASSOCIATED CLINIC PRO;4 POINTER TO HOSPITAL LOCATION FILE (#44) Associated Clinic INPUT TRANSFORM: S DIC("S")="I $P(^(0),""^"",3)=""C""" D ^DIC K DIC S DIC=DIE,(X,ECYCLN)=+Y K:'+$$CLNCK^SDUTL2(+Y,0) X LAST EDITED: APR 28, 2004 HELP-PROMPT: Enter the clinic associated with this event code screen. DESCRIPTION: This is the clinic associated with this event code screen. TECHNICAL DESCR: Pointer to the HOSPITAL LOCATION file (#44). These entries are screened by TYPE field (2). Only entries with a TYPE of C for Clinic may be selected. SCREEN: S DIC("S")="I $P(^(0),""^"",3)=""C""" EXPLANATION: Allows selection of Clinic entries only. EXECUTABLE HELP: I $G(ECYCLN)>0 D:'+$$CLNCK^SDUTL2(ECYCLN,1) EN^DDIOL(" Clinic MUST be corrected before selectin g.") K ECYCLN NOTES: XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER 720.3,56 PROCEDURE REASONS INDICATOR PRO;5 SET (Required) Ask Procedure Reason(s) for this Event Code Screen? '0' FOR NO; '1' FOR YES; LAST EDITED: AUG 15, 1997 HELP-PROMPT: Will procedure reason(s) be associated with this event code screen? DESCRIPTION: If this field is answered 'YES', procedure reason(s) may be added to the event code screen. This will allow the user to select a procedure reason for a patient's procedure during Event Capture data entry. TECHNICAL DESCR: One or more proecedure reasons may be associated with this event code screen. During Event Capture data entry, the user will then be allowed to choose one procedure reason based on the procedure reason(s) entered for the event code screen. 720.3,99 CHARGE CAPTURE CODE WB;1 FREE TEXT INPUT TRANSFORM: K:$L(X)>50!($L(X)<1) X LAST EDITED: APR 01, 1996 HELP-PROMPT: Enter the charge capture code for this event code screen. DESCRIPTION: This field is used to store the charge capture code for data collected prior to the development of the Event Capture software. This code will be utilized by DSS pilot sites only. This code is not utilized in the Event Capture software. TECHNICAL DESCR: Charge capture code for this procedure. This code will be transmitted to DSS for their use only. This code is not utilized in the Event Capture software. The sites using charge capture will locally provide the tools to populate this field. CROSS-REFERENCE: 720.3^AD 1)= S ^ECJ("AD",$E(X,1,30),DA)="" 2)= K ^ECJ("AD",$E(X,1,30),DA) 3)= DO NOT DELETE This cross reference will be used by the Decision Support System (DSS) Extracts when extracting data to the commercial software. FILES POINTED TO FIELDS CPT (#81) PROCEDURE (#52.1) EC NATIONAL PROCEDURE (#725) PROCEDURE (#52.1) HOSPITAL LOCATION (#44) ASSOCIATED CLINIC (#55) INPUT TEMPLATE(S): PRINT TEMPLATE(S): SORT TEMPLATE(S): FORM(S)/BLOCK(S):