STANDARD DATA DICTIONARY #720.3 -- EC EVENT CODE SCREENS FILE 9/29/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):