Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Details
Print Page as PDF
Sub-Field: 691.93

Package: Medicine

ATRIAL STUDY(#691.9)-->691.93

Sub-Field: 691.93


Information

Parent File Name Number Package
ATRIAL STUDY(#691.9) EKG 691.93 Medicine

Details

Field # Name Loc Type Details
.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:  This field identies the EKG's associated with this procedure.
  • DESCRIPTION:  
    This field identies the EKG's associated with this procedure.
1 RHYTHM 1;0 POINTER Multiple #691.931 691.931

  • DESCRIPTION:  
    This allows the user to enter the regular underlying heart rhythm of the patient.
  • SCREEN:  S DIC("S")="I $P(^(0),U,3)=""R"""
  • EXPLANATION:  Rhthym Interpretation codes
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:  
    This allows the user to enter the atrial cycle length.
3 VENTRICULAR CYCLE LENGTH 0;4 NUMBER

  • INPUT TRANSFORM:  K:+X'=X!(X>5000)!(X<0)!(X?.E1"."1N.N) X
  • LAST EDITED:  OCT 08, 1987
  • HELP-PROMPT:  Type the Number in milliseconds between 0 and 5000, 0 Decimal Digits
  • DESCRIPTION:  
    This allows the user to enter the ventricular cycle length.
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 duration of the QRS wave.
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.
6 P-R DURATION 0;7 NUMBER

  • INPUT TRANSFORM:  K:+X'=X!(X>999)!(X<0)!(X?.E1"."1N.N) X
  • LAST EDITED:  JUL 31, 1987
  • HELP-PROMPT:  Type a Number between 0 and 999, 0 Decimal Digits
  • DESCRIPTION:  
    This allows the user to enter the P-R interval duration.
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.
8 QTC COMPUTED

  • MUMPS CODE:  X ^DD(691.93,8,9.2) D SQR^DIXC S X=$S(X'>0:"",1:Y) S Y=X,X=Y(691.93,8,2),X=X S X=X,X=$S(Y:X/Y,1:"*******")*1000 S X=$J(X,0,0)
    9.2 = S Y(691.93,8,1)=$S($D(^MCAR(691.9,D0,7,D1,0)):^(0),1:"") S X=$P(Y(691.93,8,1),U,8)/1000,Y(691.93,8,2)=X,Y(691.93,8,3)=X S X=$P(Y(691.93,8,1),U,4)/1000
  • ALGORITHM:  ((QT/1000)/SQUAREROOT((VENTRICULAR CYCLE LENGTH)/1000))*1000 (ALWAYS 0 DECIMAL DIGITS)
  • LAST EDITED:  OCT 15, 1987
  • DESCRIPTION:  
    This field is computed from the QT information.
9 INTERPRETATION 0;10 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>100!($L(X)<1) X
  • LAST EDITED:  NOV 19, 1987
  • HELP-PROMPT:  ANSWER MUST BE 1-100 CHARACTERS IN LENGTH
  • DESCRIPTION:  
    This allows the user to enter information from tests.
Info |  Details