STANDARD DATA DICTIONARY #692 -- VENTRICULAR STUDY FILE 6/27/25 PAGE 1
STORED IN ^MCAR(692, *** NO DATA STORED YET *** SITE: WWW.BMIRWIN.COM UCI: VISTA,VISTA (VERSION 2.3)
DATA NAME GLOBAL DATA
ELEMENT TITLE LOCATION TYPE
-----------------------------------------------------------------------------------------------------------------------------------
Stores data for Ventricular studies associated with a particular EP. Data to this file is entered through the EP options.
DD ACCESS: @
AUDIT ACCESS: @
CROSS
REFERENCED BY: DATE/TIME(B), EP RECORD(C)
692,.01 DATE/TIME 0;1 DATE (Required)
INPUT TRANSFORM: S %DT="ETX" D ^%DT S X=Y K:Y<1 X
LAST EDITED: APR 21, 1992
DESCRIPTION:
This field identifies the date and time the procedure was entered into the database.
CROSS-REFERENCE: 692^B
1)= S ^MCAR(692,"B",$E(X,1,30),DA)=""
2)= K ^MCAR(692,"B",$E(X,1,30),DA)
692,.5 EP RECORD 0;2 POINTER TO ELECTROPHYSIOLOGY (EP) FILE (#691.8) (Required)
OUTPUT TRANSFORM: X ^DD("DD")
LAST EDITED: AUG 05, 1987
HELP-PROMPT: Enter the date and time of the associated Electrophysiology procedure.
DESCRIPTION:
This field identifies the EP record identifier.
UNEDITABLE
CROSS-REFERENCE: 692^C
1)= S ^MCAR(692,"C",$E(X,1,30),DA)=""
2)= K ^MCAR(692,"C",$E(X,1,30),DA)
This cross-reference allow the linking to the EP file.
692,.9 INTERVENTION 0;3 POINTER TO EP INTERVENTION FILE (#693.6)
LAST EDITED: MAR 07, 1990
HELP-PROMPT: New entries to the EP INTERVENTION file can only be added through the management menu option.
DESCRIPTION:
This field documents intervention necessary for this procedure.
692,1 PREMEDICATION 0;4 FREE TEXT
INPUT TRANSFORM: K:$L(X)>30!($L(X)<1) X
HELP-PROMPT: ANSWER MUST BE 1-30 CHARACTERS IN LENGTH
DESCRIPTION:
This field documents the medication given before the procedure.
692,2 EKG 6;0 DATE Multiple #692.02 (Add New Entry without Asking)
DESCRIPTION:
This field identifies the EKG which is associated with this procedure.
692.02,.01 DATE/TIME OF EKG 0;1 DATE
INPUT TRANSFORM: S %DT="ETXR" D ^%DT S X=Y K:Y<1 X
LAST EDITED: JUL 31, 1987
HELP-PROMPT: Enter the date and time of an EKG associated with this procedure.
DESCRIPTION:
This field identifies the EKG which is associated with this procedure.
692.02,1 RHYTHM 1;0 POINTER Multiple #692.21
DESCRIPTION:
This allows the user to describe the rhythm.
SCREEN: S DIC("S")="I $P(^(0),U,3)=""R"""
EXPLANATION: Rhythm Interpretation Codes
692.21,.01 RHYTHM 0;1 POINTER TO ECG INTERPRETATION FILE (#693.3) (Multiply asked)
INPUT TRANSFORM: S DIC("S")="I $P(^(0),U,3)=""R""" D ^DIC K DIC S DIC=DIE,X=+Y K:Y<0 X
LAST EDITED: AUG 03, 1987
HELP-PROMPT: Enter an interpretation of the associated electrocardiogram procedure.
DESCRIPTION:
This allows the user to describe the rhythm.
CROSS-REFERENCE: 692.21^B
1)= S ^MCAR(692,DA(2),6,DA(1),1,"B",$E(X,1,30),DA)=""
2)= K ^MCAR(692,DA(2),6,DA(1),1,"B",$E(X,1,30),DA)
692.02,2 ATRIAL CYCLE LENGTH 0;3 NUMBER
INPUT TRANSFORM: K:+X'=X!(X>5000)!(X<0)!(X?.E1"."1N.N) X
LAST EDITED: AUG 03, 1987
HELP-PROMPT: Type the Number of milliseconds between 0 and 5000, 0 Decimal Digits
DESCRIPTION:
Enter Cycle Length in Milliseconds.
692.02,3 VENTRICULAR CYCLE LENGTH 0;4 NUMBER
INPUT TRANSFORM: K:+X'=X!(X>5000)!(X<0)!(X?.E1"."1N.N) X
LAST EDITED: OCT 07, 1987
HELP-PROMPT: Type the Number in milliseconds between 0 and 5000, 0 Decimal Digits
DESCRIPTION:
Enter Cycle Length in Milliseconds.
692.02,4 QRS DURATION 0;5 NUMBER
INPUT TRANSFORM: K:+X'=X!(X>400)!(X<0)!(X?.E1"."1N.N) X
LAST EDITED: AUG 03, 1987
HELP-PROMPT: Type a Number between 0 and 400, 0 Decimal Digits
DESCRIPTION:
This allows the user to enter the QRS Duration interval.
692.02,5 QRS AXIS 0;6 NUMBER
INPUT TRANSFORM: K:+X'=X!(X>180)!(X<-180)!(X?.E1"."1N.N) X
LAST EDITED: AUG 03, 1987
HELP-PROMPT: Type a Number between -180 and 180, 0 Decimal Digits
DESCRIPTION:
This allows the user to enter the QRS Axis.
692.02,6 P-R DURATION 0;7 NUMBER
INPUT TRANSFORM: K:+X'=X!(X>999)!(X<0)!(X?.E1"."1N.N) X
LAST EDITED: AUG 03, 1987
HELP-PROMPT: Type a Number between 0 and 999, 0 Decimal Digits
DESCRIPTION:
This allows the user to enter the P-R duration.
692.02,7 QT 0;8 NUMBER
INPUT TRANSFORM: K:+X'=X!(X>999)!(X<0)!(X?.E1"."1N.N) X
LAST EDITED: AUG 03, 1987
HELP-PROMPT: Type a Number between 0 and 999, 0 Decimal Digits
DESCRIPTION:
This allows the user to enter the QT axis.
692.02,8 QTC ; COMPUTED
MUMPS CODE: X ^DD(692.02,8,9.2) D SQR^DIXC S X=$S(X'>0:"",1:Y) S Y=X,X=Y(692.02,8,2),X=X S X=X,X=$S(Y:X/Y,1:"**
*****")*1000 S X=$J(X,0,0)
9.2 = S Y(692.02,8,1)=$S($D(^MCAR(692,D0,6,D1,0)):^(0),1:"") S X=$P(Y(692.02,8,1),U,8)/1000,Y(692.0
2,8,2)=X,Y(692.02,8,3)=X S X=$P(Y(692.02,8,1),U,4)/1000
ALGORITHM: ((QT/1000)/SQUAREROOT((VENTRICULAR CYCLE LENGTH)/1000))*1000 (ALWAYS 0 DECIMAL DIGITS)
LAST EDITED: OCT 08, 1987
DESCRIPTION:
This field identifies computed from the QT information.
692.02,9 INTERPRETATION 0;10 FREE TEXT
INPUT TRANSFORM:K:$L(X)>50!($L(X)<1) X
LAST EDITED: AUG 03, 1987
HELP-PROMPT: ANSWER MUST BE 1-50 CHARACTERS IN LENGTH
DESCRIPTION:
This allows the user to enter information from the tests.
692,3 ENTRY SITE 0;6 POINTER TO ANATOMY FILE (#697)
INPUT TRANSFORM: S DIC("S")="I $D(^MCAR(697,""D"",$G(MCARGNAM,U),+Y))" D ^DIC K DIC S DIC=DIE,X=+Y K:Y<0 X
LAST EDITED: JUL 30, 1992
HELP-PROMPT: CHOOSE ONLY ENTRIES ASSOCIATED WITH EP'S
DESCRIPTION:
This field identifies the anatomical location of the catheter entry.
SCREEN: S DIC("S")="I $D(^MCAR(697,""D"",$G(MCARGNAM,U),+Y))"
EXPLANATION: CHOOSE ONLY ENTRY SITES APPLICABLE TO EP'S
NOTES: XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
692,4 RECORDING SITE 0;7 POINTER TO RECORDING SITE FILE (#693.5)
LAST EDITED: SEP 09, 1991
HELP-PROMPT: Enter the anatomical location of the recording site.
DESCRIPTION:
This field identifies the anatomical location of the recording site.
692,5 PACING SITE 0;8 SET
'RVA' FOR RT VENTRICULAR APEX;
'RVOT' FOR RT VENTRICULAR OUTFLOW TRACT;
'LV' FOR LEFT VENTRICLE;
LAST EDITED: JUN 23, 1987
HELP-PROMPT: Enter the anatomical location of the pacing mechanism.
DESCRIPTION:
This field identifies the anatomical location of the pacing site.
692,6 VENTRICULAR THRESHOLD (mA) 0;9 NUMBER
INPUT TRANSFORM: K:+X'=X!(X>99)!(X<0)!(X?.E1"."2N.N) X
LAST EDITED: SEP 09, 1991
HELP-PROMPT: Type a Number between 0 and 99, 1 Decimal Digit
DESCRIPTION:
This field identifies the ventricular threshold in milliamperes.
692,7 DRIVE CYCLE LENGTH 1;0 Multiple #692.07 (Add New Entry without Asking)
LAST EDITED: SEP 09, 1991
DESCRIPTION:
This field identifies the drive cycle length.
692.07,.01 DRIVE CYCLE LENGTH 0;1 NUMBER (Multiply asked)
INPUT TRANSFORM: K:+X'=X!(X>9999)!(X<1)!(X?.E1"."1N.N) X
LAST EDITED: SEP 09, 1991
HELP-PROMPT: Type a Whole Number between 1 and 9999
DESCRIPTION:
This field identifies the drive cycle length.
692.07,1 1VES(#REPETITIVE BEATS) 0;2 FREE TEXT
INPUT TRANSFORM: K:$L(X)>9!($L(X)<1) X
HELP-PROMPT: Ventricular Extrastimulus: 1 to 9 Characters
DESCRIPTION:
This allows the user to enter the Ventricular Extrastimulus.
692.07,2 VERP (1 VES) 0;3 NUMBER
INPUT TRANSFORM: K:+X'=X!(X>999)!(X<1)!(X?.E1"."1N.N) X
HELP-PROMPT: Ventricular Effective Refractory Period: Whole Number 1-999
DESCRIPTION:
This allows the user to enter the Ventricular Effective Refractory Period.
692.07,3 2VES(#REPETITIVE BEATS) 0;4 FREE TEXT
INPUT TRANSFORM: K:$L(X)>9!($L(X)<1) X
HELP-PROMPT: Ventricular Extrastimulus: 1 to 9 Characters
DESCRIPTION:
This allows the user to enter the Ventricular Extrastimulus.
692.07,4 VERP (2 VES) 0;5 NUMBER
INPUT TRANSFORM: K:+X'=X!(X>999)!(X<1)!(X?.E1"."1N.N) X
HELP-PROMPT: Ventricular Effective Refractory Period: Whole Number 1-999
DESCRIPTION:
This allows the user to enter the Ventricular Effective Refractory Period.
692.07,5 3VES(#REPETITIVE BEATS) 0;6 FREE TEXT
INPUT TRANSFORM: K:$L(X)>9!($L(X)<1) X
HELP-PROMPT: Ventricular Extrastimulus: 1 to 9 Characters
DESCRIPTION:
This allows the user to enter the Ventricular Extrastimulus.
692.07,6 VERP (3 VES) 0;7 NUMBER
INPUT TRANSFORM: K:+X'=X!(X>999)!(X<1)!(X?.E1"."1N.N) X
HELP-PROMPT: Ventricular Effective Refractory Period: Whole Number 1-999
DESCRIPTION:
This allows the user to enter the Ventricular Effective Refractory Period.
692,8 BURST PACING (#REP. RESPONSES) 2;1 FREE TEXT
INPUT TRANSFORM: K:$L(X)>9!($L(X)<1) X
LAST EDITED: SEP 09, 1991
HELP-PROMPT: ANSWER MUST BE 1-9 CHARACTERS IN LENGTH
DESCRIPTION:
This field identifies the burst pacing (#rep. responses).
692,9 SHORTEST BURST CL 2;2 NUMBER
INPUT TRANSFORM: K:+X'=X!(X>999)!(X<1)!(X?.E1"."1N.N) X
LAST EDITED: SEP 09, 1991
HELP-PROMPT: Type a Number between 1 and 999, 0 Decimal Digits
DESCRIPTION:
This field identifies the shortest burst CL.
692,10 V.T.? 2;3 SET
'Y' FOR SUS. V-T INDUCED;
'N' FOR NO V-T INDUCED;
'N-S' FOR NON-SUS. V.T. INDUCED;
LAST EDITED: OCT 07, 1987
HELP-PROMPT: Indicate whether and how ventricular tachycardia was induced.
DESCRIPTION:
This documents the occurrance of ventricular tachycardia.
692,11 INITIATION SEQUENCE OF VT 2;4 FREE TEXT
INPUT TRANSFORM: K:$L(X)>50!($L(X)<1) X
HELP-PROMPT: ANSWER MUST BE 1-50 CHARACTERS IN LENGTH
DESCRIPTION:
This defines the initiation of VT.
692,12 DURATION OF VT/VF 2;5 NUMBER
INPUT TRANSFORM: K:+X'=X!(X>9999)!(X<0)!(X?.E1"."1N.N) X
HELP-PROMPT: Enter the duration of VT/VF in seconds: Whole Number 0-9999
DESCRIPTION:
This field identifies the duration of VT/VF.
692,13 V-T AXIS 2;6 FREE TEXT
INPUT TRANSFORM: K:$L(X)>10!($L(X)<1) X
HELP-PROMPT: ANSWER MUST BE 1-10 CHARACTERS IN LENGTH
DESCRIPTION:
This field identifies the V-T axis.
692,14 V-T CYCLE LENGTH 2;7 NUMBER
INPUT TRANSFORM: K:+X'=X!(X>999)!(X<0)!(X?.E1"."1N.N) X
HELP-PROMPT: Type a Number between 0 and 999, 0 Decimal Digits
DESCRIPTION:
This field identifies the V-T cycle length.
692,15 V-T MORPHOLOGY 2;8 SET
'R' FOR RBBB;
'L' FOR LBBB;
'N' FOR NON DESC.;
'V' FOR VARIABLE;
LAST EDITED: SEP 09, 1991
HELP-PROMPT: Enter a code describing the nature of the patient's ventricular tachycardia.
DESCRIPTION:
This field identifies the V-T morphology.
692,16 TERM. V-T 2;9 SET
'C' FOR EXTERNAL CARDIOVERSION;
'P' FOR PACED OUT;
'S' FOR SELF TERMINATION;
'C+P' FOR CARDIOVERSION+PACE OUT;
'C+S' FOR CARDIOVERSION+SELF TERM;
'P+S' FOR PACE OUT+SELF TERM;
'IC' FOR INTERNAL CARDIOVERSION;
HELP-PROMPT: Enter a code describing how the ventricular tachycardia was terminated.
DESCRIPTION:
This field identifies the term V-T.
692,17 PACE OUT CYCLE LENGTH OF V-T 2;10 NUMBER
INPUT TRANSFORM: K:+X'=X!(X>999)!(X<1)!(X?.E1"."1N.N) X
LAST EDITED: SEP 09, 1991
HELP-PROMPT: Type a Number between 1 and 999, 0 Decimal Digits
DESCRIPTION:
This field identifies the pace out cycle length of V-T.
692,18 CARDIOVERSION (J) 2;11 FREE TEXT
INPUT TRANSFORM: K:$L(X)>60!($L(X)<1) X
LAST EDITED: SEP 09, 1991
HELP-PROMPT: ANSWER MUST BE 1-60 CHARACTERS IN LENGTH
DESCRIPTION:
This documents whether cardioversion was necessary.
692,19 DISCHARGE DATE 4;0 DATE Multiple #692.019 (Add New Entry without Asking)
DESCRIPTION:
This field identifies the discharge date.
692.019,.01 DISCHARGE DATE 0;1 DATE
INPUT TRANSFORM: S %DT="ETX" D ^%DT S X=Y K:Y<1 X
HELP-PROMPT: Enter the discharge date
DESCRIPTION:
This field identifies the discharge date.
692.019,1 MEDICATION ON DISCHARGE 0;2 FREE TEXT
INPUT TRANSFORM: K:$L(X)>40!($L(X)<1) X
HELP-PROMPT: ANSWER MUST BE 1-40 CHARACTERS IN LENGTH
DESCRIPTION:
This allows the user to enter the patient's medications upon discharge.
692,20 COMMENT 3;0 WORD-PROCESSING #692.01
DESCRIPTION:
This field identifies the comment field.
HELP-PROMPT: Enter a free-text commentary on this procedure.
DESCRIPTION:
This field identifies the comment field.
692,21 CARDIOLOGY STAFF 5;1 POINTER TO NEW PERSON FILE (#200)
INPUT TRANSFORM: S DIC("S")="I $D(^XUSEC(""PROVIDER"",+Y))" D ^DIC K DIC S DIC=DIE,X=+Y K:Y<0 X
LAST EDITED: APR 23, 1996
HELP-PROMPT: Enter the name of the cardiology staff member attending this procedure.
DESCRIPTION:
This field identifies the cardiology staff assigned to this case.
SCREEN: S DIC("S")="I $D(^XUSEC(""PROVIDER"",+Y))"
CROSS-REFERENCE: ^^TRIGGER^692^701
1)= K DIV S DIV=X,D0=DA,DIV(0)=D0 S Y(1)=$S($D(^MCAR(692,D0,"PROV")):^("PROV"),1:"") S X=$P(Y(1),U,
1),X=X S DIU=X K Y S X=DIV S X=DIV,X=X X ^DD(692,21,1,1,1.4)
1.4)= S DIH=$S($D(^MCAR(692,DIV(0),"PROV")):^("PROV"),1:""),DIV=X S $P(^("PROV"),U,1)=DIV,DIH=692,D
IG=701 D ^DICR:$O(^DD(DIH,DIG,1,0))>0
2)= K DIV S DIV=X,D0=DA,DIV(0)=D0 S Y(1)=$S($D(^MCAR(692,D0,"PROV")):^("PROV"),1:"") S X=$P(Y(1),U,
1),X=X S DIU=X K Y X ^DD(692,21,1,1,2.1) X ^DD(692,21,1,1,2.4)
2.1)= S X=DIV S Y(1)=$S($D(^MCAR(692,D0,5)):^(5),1:"") S X=$P(Y(1),U,1),X=X
2.4)= S DIH=$S($D(^MCAR(692,DIV(0),"PROV")):^("PROV"),1:""),DIV=X S $P(^("PROV"),U,1)=DIV,DIH=692,D
IG=701 D ^DICR:$O(^DD(DIH,DIG,1,0))>0
CREATE VALUE)= INTERNAL(#21)
DELETE VALUE)= INTERNAL(#21)
FIELD)= #701
This trigger sets the primary provider file.
692,700 ICD DIAGNOSIS ICD;0 POINTER Multiple #692.03
DESCRIPTION:
This field contains the ICD Diagnosis(es) for the procedure.
692.03,.01 ICD DIAGNOSIS 0;1 POINTER TO ICD DIAGNOSIS FILE (#80) (Multiply asked)
LAST EDITED: MAR 10, 1993
DESCRIPTION:
This field contains an ICD Diagnosis for the procedure.
CROSS-REFERENCE: 692.03^B
1)= S ^MCAR(692,DA(1),"ICD","B",$E(X,1,30),DA)=""
2)= K ^MCAR(692,DA(1),"ICD","B",$E(X,1,30),DA)
692.03,.02 NARRATIVE DIAGNOSIS 0;2 FREE TEXT
INPUT TRANSFORM: K:$L(X)>80!($L(X)<1) X
LAST EDITED: JAN 14, 1992
HELP-PROMPT: Answer must be 1-80 characters in length.
692,701 PRIMARY PROVIDER PROV;1 POINTER TO NEW PERSON FILE (#200)
INPUT TRANSFORM: S DIC("S")="I $D(^XUSEC(""PROVIDER"",+Y))" D ^DIC K DIC S DIC=DIE,X=+Y K:Y<0 X
LAST EDITED: OCT 25, 1994
DESCRIPTION: This contains the primary provider. It is triggered by another field in the file and is located
here to provider a standard provider location for use in transferring data to the PCC.
SCREEN: S DIC("S")="I $D(^XUSEC(""PROVIDER"",+Y))"
WRITE AUTHORITY: ^
NOTES: TRIGGERED by the CARDIOLOGY STAFF field of the VENTRICULAR STUDY File
FILES POINTED TO FIELDS
ANATOMY (#697) ENTRY SITE (#3)
ECG INTERPRETATION (#693.3) RHYTHM:RHYTHM (#.01)
ELECTROPHYSIOLOGY (EP) (#691.8) EP RECORD (#.5)
EP INTERVENTION (#693.6) INTERVENTION (#.9)
ICD DIAGNOSIS (#80) ICD DIAGNOSIS:ICD DIAGNOSIS (#.01)
NEW PERSON (#200) CARDIOLOGY STAFF (#21)
PRIMARY PROVIDER (#701)
RECORDING SITE (#693.5) RECORDING SITE (#4)
INPUT TEMPLATE(S):
PRINT TEMPLATE(S):
MCAREP3 MAY 13, 1996@10:07 USER #0 ^MCAROV @
SORT TEMPLATE(S):
FORM(S)/BLOCK(S):