STANDARD DATA DICTIONARY #698.3 -- PACEMAKER SURVEILLANCE FILE 9/29/25 PAGE 1
STORED IN ^MCAR(698.3, *** NO DATA STORED YET *** SITE: WWW.BMIRWIN.COM UCI: VISTA,VISTA (VERSION 2.3)
DATA NAME GLOBAL DATA
ELEMENT TITLE LOCATION TYPE
-----------------------------------------------------------------------------------------------------------------------------------
This file holds the telephone/clinic follow-up data for Pacemaker.
DD ACCESS: @
AUDIT ACCESS: @
IDENTIFIED BY: MEDICAL PATIENT (#1)[R]
POINTED TO BY: RESULT field (#11) of the REQUEST/CONSULTATION File (#123)
ASSOCIATED RESULTS field (#.01) of the ASSOCIATED RESULTS sub-field (#123.03) of the REQUEST/CONSULTATION File
(#123)
CROSS
REFERENCED BY: DATE/TIME(AC), MEDICAL PATIENT(AD), PCC POINTER(APCE), DATE/TIME(B), MEDICAL PATIENT(C)
698.3,.01 DATE/TIME 0;1 DATE (Required)
INPUT TRANSFORM: S %DT="ETX" D ^%DT S X=Y K:Y<1 X
HELP-PROMPT: ENTER THE DATE AND TIME OF CLINIC SURVEILLANCE VISIT OR TELEPHONE CONTACT
DESCRIPTION:
This allows analysis based on time.
TECHNICAL DESCR:
ORDER ENTRY TYPE: IDENTIFIER
CROSS-REFERENCE: 698.3^B
1)= S ^MCAR(698.3,"B",$E(X,1,30),DA)=""
2)= K ^MCAR(698.3,"B",$E(X,1,30),DA)
CROSS-REFERENCE: 698.3^AC^MUMPS
1)= S MCARCDIE="^MCAR(698.3," D CHGDTE1^MCARPROC
2)= S MCARCDIE="^MCAR(698.3," D CHGDTE^MCARPROC
This cross-reference makes an entry under the 'AC' index of the MEDICAL PATIENT file (#690) to
record the most recent pacemaker surveillance procedure for this patient.
698.3,1 MEDICAL PATIENT 0;2 POINTER TO MEDICAL PATIENT FILE (#690) (Required)
HELP-PROMPT: Enter the patient's name, SSN, or other identifier
DESCRIPTION:
Patient's name.
TECHNICAL DESCR:
ORDER ENTRY TYPE: IDENTIFIER
CROSS-REFERENCE: 698.3^C
1)= S ^MCAR(698.3,"C",$E(X,1,30),DA)=""
2)= K ^MCAR(698.3,"C",$E(X,1,30),DA)
This cross-reference allows look-ups by patient.
CROSS-REFERENCE: 698.3^AD^MUMPS
1)= S MCARCDIE="^MCAR(698.3," D CHGPAT^MCARPROC
2)= S MCARCDIE="^MCAR(698.3," D KILL^MCARPROC
This cross-reference makes an entry under the 'AC' index of the MEDICAL PATIENT file (#690) to
record the most recent pacemaker surveillance procedure for this patient.
698.3,2 CALLER 0;3 POINTER TO NEW PERSON FILE (#200)
HELP-PROMPT: Enter the surveillance operator.
DESCRIPTION:
This field identifies the surveillance operator.
698.3,3 DATA GATHERING MODE 0;4 SET (Required)
'T' FOR TELEPHONE;
'C' FOR CLINIC;
LAST EDITED: NOV 30, 1990
HELP-PROMPT: Enter T for Telephone or C for Clinic for surveillance technique.
DESCRIPTION:
This defines the surveillance technique.
698.3,4 PULSE INTERVAL (MSEC) WO MAG 0;7 NUMBER
INPUT TRANSFORM: K:+X'=X!(X>3000)!(X<200)!(X?.E1"."1N.N) X
HELP-PROMPT: Type a Number between 200 and 3000, 0 Decimal Digits
DESCRIPTION:
This allows documentation of a current rate parameter.
TECHNICAL DESCR:
ORDER ENTRY TYPE: UNKNOWN
698.3,5 RATE WO MAG ; COMPUTED
MUMPS CODE: X ^DD(698.3,5,9.2) S X=$S(Y(698.3,5,2):Y(698.3,5,3),Y(698.3,5,4):X) S X=$J(X,0,1)
9.2 = S Y(698.3,5,1)=$S($D(^MCAR(698.3,D0,0)):^(0),1:"") S X=$P(Y(698.3,5,1),U,7)="",Y(698.3,5,2)=X
S X="",Y(698.3,5,3)=X S X=1,Y(698.3,5,4)=X S X=60000,X=$S($P(Y(698.3,5,1),U,7):X/$P(Y(698.3,5,1),U
,7),1:"*******")
ALGORITHM: $S(#4="":"",1:60000/#4) (ALWAYS 1 DECIMAL DIGITS)
DESCRIPTION:
This allows documentation of a current rate parameter.
698.3,6 PULSE INTERVAL (MSEC) W MAG 0;8 NUMBER
INPUT TRANSFORM: K:+X'=X!(X>3000)!(X<200)!(X?.E1"."1N.N) X
HELP-PROMPT: Type a Number between 200 and 3000, 0 Decimal Digits
DESCRIPTION:
This allows documentation of a current rate parameter.
TECHNICAL DESCR:
ORDER ENTRY TYPE: UNKNOWN
698.3,7 RATE W MAG ; COMPUTED
MUMPS CODE: X ^DD(698.3,7,9.2) S X=$S(Y(698.3,7,2):Y(698.3,7,3),Y(698.3,7,4):X) S X=$J(X,0,1)
9.2 = S Y(698.3,7,1)=$S($D(^MCAR(698.3,D0,0)):^(0),1:"") S X=$P(Y(698.3,7,1),U,8)="",Y(698.3,7,2)=X
S X="",Y(698.3,7,3)=X S X=1,Y(698.3,7,4)=X S X=60000,X=$S($P(Y(698.3,7,1),U,8):X/$P(Y(698.3,7,1),U
,8),1:"*******")
ALGORITHM: $S(#6="":"",1:60000/#6) (ALWAYS 1 DECIMAL DIGITS)
DESCRIPTION:
This allows documentation of a current rate parameter.
698.3,11 A-V DELAY WO MAG (MSEC) 0;11 NUMBER
INPUT TRANSFORM: K:+X'=X!(X>1000)!(X<0)!(X?.E1"."1N.N) X
HELP-PROMPT: Type a Number between 0 and 1000, 0 Decimal Digits
DESCRIPTION:
This allows documentation of a current rhythm parameter.
TECHNICAL DESCR:
ORDER ENTRY TYPE: UNKNOWN
698.3,12 A-V DELAY W MAG (MSEC) 0;12 NUMBER
INPUT TRANSFORM: K:+X'=X!(X>1000)!(X<0)!(X?.E1"."1N.N) X
HELP-PROMPT: Type a Number between 0 and 1000, 0 Decimal Digits
DESCRIPTION:
This allows documentation of a current rhythm parameter.
TECHNICAL DESCR:
ORDER ENTRY TYPE: UNKNOWN
698.3,13 BATTERY VOLTAGE 0;13 NUMBER
INPUT TRANSFORM: K:+X'=X!(X>10)!(X<0)!(X?.E1"."3N.N) X
LAST EDITED: FEB 11, 1991
HELP-PROMPT: Type a Number between 0 and 10, 2 Decimal Digits
DESCRIPTION:
This allows documentation of current power state.
698.3,14 RESISTANCE 0;14 NUMBER
INPUT TRANSFORM: K:+X'=X!(X>10)!(X<0)!(X?.E1"."3N.N) X
LAST EDITED: FEB 11, 1991
HELP-PROMPT: Type a Number between 0 and 10, 2 Decimal Digits
DESCRIPTION:
This allows documentation of the current ohms parameter.
698.3,15 BASIC RHYTHM 0;9 POINTER TO NON-MAGNET ECG RHYTHM FILE (#698.9)
LAST EDITED: JAN 13, 1989
HELP-PROMPT: Enter documentation of the current rhythm, pointer to Non-Magnet ECG Rhythm File (#698.9).
DESCRIPTION:
This allows documentation of the current rhythm.
TECHNICAL DESCR:
ORDER ENTRY TYPE: UNKNOWN
698.3,16 PERCENT OF PACED BEATS 0;10 NUMBER
INPUT TRANSFORM: K:+X'=X!(X>100)!(X<0)!(X?.E1"."1N.N) X
HELP-PROMPT: Type a Number between 0 and 100, 0 Decimal Digits
DESCRIPTION:
This allows documentation of the current rate of generator activity.
TECHNICAL DESCR:
ORDER ENTRY TYPE: UNKNOWN
698.3,50 REPROGRAMMED RATE 0;15 NUMBER
INPUT TRANSFORM: K:+X'=X!(X>300)!(X<0)!(X?.E1"."2N.N) X
LAST EDITED: FEB 11, 1991
HELP-PROMPT: Type a Number between 0 and 300, 1 Decimal Digit
DESCRIPTION:
This allows documentation of rate adjustments.
TECHNICAL DESCR:
ORDER ENTRY TYPE: UNKNOWN
698.3,51 REPROG. UPPER RATE LIMIT 0;16 NUMBER
INPUT TRANSFORM: K:+X'=X!(X>300)!(X<0)!(X?.E1"."1N.N) X
HELP-PROMPT: Type a Number between 0 and 300, 0 Decimal Digits
DESCRIPTION:
This allows documentation of a rate adjustment.
TECHNICAL DESCR:
ORDER ENTRY TYPE: UNKNOWN
698.3,52 REPROGRAMMED A-V DELAY (MSECS) 0;17 NUMBER
INPUT TRANSFORM: K:+X'=X!(X>500)!(X<0)!(X?.E1"."1N.N) X
HELP-PROMPT: Type a Number between 0 and 500, 0 Decimal Digits
DESCRIPTION:
This allows documentation of a rhythm adjustment.
TECHNICAL DESCR:
ORDER ENTRY TYPE: UNKNOWN
698.3,53 REPROGRAMMED HYSTERESIS 0;18 NUMBER
INPUT TRANSFORM: K:+X'=X!(X>100)!(X<0)!(X?.E1"."1N.N) X
HELP-PROMPT: Type a Number between 0 and 100, 0 Decimal Digits
DESCRIPTION:
This allows documentation of a hysteresis adjustment.
TECHNICAL DESCR:
ORDER ENTRY TYPE: UNKNOWN
698.3,54 REPROGRAMMED PACING MODE 0;19 SET
'1' FOR AAI;
'2' FOR VVI;
'3' FOR DDD;
'4' FOR DVI;
'5' FOR AAT;
'6' FOR VVT;
'7' FOR VAT;
'8' FOR VDD;
'9' FOR AOO;
'10' FOR VOO;
'11' FOR DOO;
'12' FOR OTHER;
HELP-PROMPT: Enter Code for adjustment to device operations.
DESCRIPTION:
This allows documentation of an adjustment to device operations.
TECHNICAL DESCR:
ORDER ENTRY TYPE: UNKNOWN
698.3,55 REASON FOR REPROGRAMMING 0;20 POINTER TO REASON (MEDICINE) FILE (#695.8)
INPUT TRANSFORM: S DIC("S")="I $D(^MCAR(695.8,""AC"",""R"",+Y))" D ^DIC K DIC S DIC=DIE,X=+Y K:Y<0 X
HELP-PROMPT: Enter adjustment rationale, pointer to Reason (Medicine) File (#695.8).
DESCRIPTION:
This allows documentation of the adjustment rationale.
SCREEN: S DIC("S")="I $D(^MCAR(695.8,""AC"",""R"",+Y))"
EXPLANATION: CHOOSE ONLY REPROGRAMMING REASONS
698.3,101 PULSE WIDTH (ATRIAL-MSEC) 1;1 NUMBER
INPUT TRANSFORM: K:+X'=X!(X>5)!(X<0)!(X?.E1"."3N.N) X
LAST EDITED: FEB 11, 1991
HELP-PROMPT: Type a Number between 0 and 5, 2 Decimal Digits
DESCRIPTION:
This allows documentation of a pulse segment rate parameter.
TECHNICAL DESCR:
ORDER ENTRY TYPE: UNKNOWN
698.3,102 MEASURED A-LEAD AMPLITUDE (MV) 1;2 NUMBER
INPUT TRANSFORM: K:+X'=X!(X>500)!(X<0)!(X?.E1"."2N.N) X
LAST EDITED: FEB 11, 1991
HELP-PROMPT: Type a Number between 0 and 500, 1 Decimal Digit
DESCRIPTION:
This allows documentation of atrial lead voltage.
TECHNICAL DESCR:
ORDER ENTRY TYPE: UNKNOWN
698.3,103 RATIO (T/L) (ATRIAL) 1;3 NUMBER
INPUT TRANSFORM: K:+X'=X!(X>10)!(X<0)!(X?.E1"."4N.N) X
LAST EDITED: FEB 11, 1991
HELP-PROMPT: Type a Number between 0 and 10, 3 Decimal Digits
DESCRIPTION:
This allows documentation of a performance ratio.
698.3,104 THRESHOLD WIDTH (ATRIAL) 1;4 NUMBER
INPUT TRANSFORM: K:+X'=X!(X>10)!(X<0)!(X?.E1"."3N.N) X
LAST EDITED: FEB 11, 1991
HELP-PROMPT: Type a Number between 0 and 10, 2 Decimal Digits
DESCRIPTION:
This allows documentation of the atrial threshold parameter.
698.3,105 THRESHOLD AMPLITUDE (ATRIAL) 1;5 NUMBER
INPUT TRANSFORM: K:+X'=X!(X>10)!(X<0)!(X?.E1"."3N.N) X
LAST EDITED: FEB 11, 1991
HELP-PROMPT: Type a Number between 0 and 10, 2 Decimal Digits
DESCRIPTION:
This allows documentation of the atrial voltage threshold.
698.3,106 CAPTURE (ATRIAL) 1;6 SET
'Y' FOR YES;
'N' FOR NO;
'I' FOR INTERMITTENT;
'U' FOR UNKNOWN;
'NA' FOR NOT APPLICABLE;
HELP-PROMPT: Enter knowledge of atrial capture.
DESCRIPTION:
This allows documentation of atrial capture.
TECHNICAL DESCR:
ORDER ENTRY TYPE: UNKNOWN
698.3,107 SENSE (ATRIAL) 1;7 SET
'Y' FOR YES;
'N' FOR NO;
'I' FOR INTERMITTENT;
'U' FOR UNKNOWN;
'NA' FOR NOT APPLICABLE;
HELP-PROMPT: Enter knowledge of atrial sense.
DESCRIPTION:
This allows documentation of atrial sense.
TECHNICAL DESCR:
ORDER ENTRY TYPE: UNKNOWN
698.3,121 REPR.PULSE WIDTH (ATRIAL-MSEC) 1;8 NUMBER
INPUT TRANSFORM: K:+X'=X!(X>5)!(X<0)!(X?.E1"."3N.N) X
LAST EDITED: FEB 11, 1991
HELP-PROMPT: Type a Number between 0 and 5, 2 Decimal Digits
DESCRIPTION:
This allows documentation of a pulse segment adjustment.
TECHNICAL DESCR:
ORDER ENTRY TYPE: UNKNOWN
698.3,122 REPROG. A-AMPLITUDE (VOLTS) 1;9 NUMBER
INPUT TRANSFORM: K:+X'=X!(X>12)!(X<0)!(X?.E1"."2N.N) X
LAST EDITED: FEB 11, 1991
HELP-PROMPT: Type a Number between 0 and 12, 1 Decimal Digit
DESCRIPTION:
This allows documentation of atrial voltage adjustments.
TECHNICAL DESCR:
ORDER ENTRY TYPE: UNKNOWN
698.3,123 REPR.SENSITIVITY(ATRIAL-VOLTS) 1;10 NUMBER
INPUT TRANSFORM: K:+X'=X!(X>5)!(X<0)!(X?.E1"."3N.N) X
LAST EDITED: FEB 11, 1991
HELP-PROMPT: Type a Number between 0 and 5, 2 Decimal Digits
DESCRIPTION:
This allows documentation of adjustments to atrial sense.
TECHNICAL DESCR:
ORDER ENTRY TYPE: UNKNOWN
698.3,124 REPR.ATRIAL REFRACTORY PERIOD 1;11 NUMBER
INPUT TRANSFORM: K:+X'=X!(X>1000)!(X<0)!(X?.E1"."1N.N) X
HELP-PROMPT: Type a Number between 0 and 1000, 0 Decimal Digits
DESCRIPTION:
This allows documentation of adjustments to atrial refraction.
TECHNICAL DESCR:
ORDER ENTRY TYPE: UNKNOWN
698.3,201 PULSE WIDTH (VENTRICLE-MSEC) 2;1 NUMBER
INPUT TRANSFORM: K:+X'=X!(X>5)!(X<0)!(X?.E1"."3N.N) X
LAST EDITED: FEB 11, 1991
HELP-PROMPT: Type a Number between 0 and 5, 2 Decimal Digits
DESCRIPTION:
This allows documentation of a pulse segment rate parameter.
TECHNICAL DESCR:
ORDER ENTRY TYPE: UNKNOWN
698.3,202 MEASURED V-LEAD AMPLITUDE (MV) 2;2 NUMBER
INPUT TRANSFORM: K:+X'=X!(X>500)!(X<0)!(X?.E1"."2N.N) X
LAST EDITED: FEB 11, 1991
HELP-PROMPT: Type a Number between 0 and 500, 1 Decimal Digit
DESCRIPTION:
This allows documentation of ventricular lead voltage.
TECHNICAL DESCR:
ORDER ENTRY TYPE: UNKNOWN
698.3,203 RATIO (T/L) (VENTRICLE) 2;3 NUMBER
INPUT TRANSFORM: K:+X'=X!(X>10)!(X<0)!(X?.E1"."1N.N) X
LAST EDITED: NOV 01, 1989
HELP-PROMPT: Type a Number between 0 and 10, 0 Decimal Digits
DESCRIPTION:
This allows documentation of a performance ratio.
698.3,204 THRESHOLD WIDTH (VENTRICLE) 2;4 NUMBER
INPUT TRANSFORM: K:+X'=X!(X>10)!(X<0)!(X?.E1"."3N.N) X
LAST EDITED: FEB 11, 1991
HELP-PROMPT: Type a Number between 0 and 10, 2 Decimal Digits
DESCRIPTION:
This allows documentation of the ventricular threshold.
698.3,205 THRESHOLD AMPLITUDE (VENT.) 2;5 NUMBER
INPUT TRANSFORM: K:+X'=X!(X>10)!(X<0)!(X?.E1"."3N.N) X
LAST EDITED: FEB 11, 1991
HELP-PROMPT: Type a Number between 0 and 10, 2 Decimal Digits
DESCRIPTION:
This allows documentation of the ventricular voltage threshold.
698.3,206 CAPTURE (VENTRICULAR) 2;6 SET
'Y' FOR YES;
'N' FOR NO;
'I' FOR INTERMITTENT;
'UNK' FOR UNKNOWN;
'NA' FOR NOT APPLICABLE;
HELP-PROMPT: Enter knowledge of ventricular capture.
DESCRIPTION:
This allows documentation of ventricular capture.
TECHNICAL DESCR:
ORDER ENTRY TYPE: UNKNOWN
698.3,207 SENSE (VENTRICULAR) 2;7 SET
'Y' FOR YES;
'N' FOR NO;
'I' FOR INTERMITTENT;
'UNK' FOR UNKNOWN;
'NA' FOR NOT APPLICABLE;
HELP-PROMPT: Enter knowledge of ventricular sense.
DESCRIPTION:
This allows documentation of ventricular sense.
TECHNICAL DESCR:
ORDER ENTRY TYPE: UNKNOWN
698.3,221 REPR.PULSE WIDTH (VENT-MSEC) 2;8 NUMBER
INPUT TRANSFORM: K:+X'=X!(X>5)!(X<0)!(X?.E1"."3N.N) X
LAST EDITED: FEB 11, 1991
HELP-PROMPT: Type a Number between 0 and 5, 2 Decimal Digits
DESCRIPTION:
This allows documentation of a pulse segment adjustment.
TECHNICAL DESCR:
ORDER ENTRY TYPE: UNKNOWN
698.3,222 REPROGR. V-AMPLITUDE (VOLTS) 2;9 NUMBER
INPUT TRANSFORM: K:+X'=X!(X>12)!(X<0)!(X?.E1"."2N.N) X
LAST EDITED: FEB 11, 1991
HELP-PROMPT: Type a Number between 0 and 12, 1 Decimal Digit
DESCRIPTION:
This allows documentation of ventricular voltage adjustments.
TECHNICAL DESCR:
ORDER ENTRY TYPE: UNKNOWN
698.3,223 REPR.SENSITIVITY (VENTR.-MV) 2;10 NUMBER
INPUT TRANSFORM: K:+X'=X!(X>5)!(X<0)!(X?.E1"."3N.N) X
LAST EDITED: FEB 11, 1991
HELP-PROMPT: Type a Number between 0 and 5, 2 Decimal Digits
DESCRIPTION:
This allows documentation of adjustments to ventricular sense.
TECHNICAL DESCR:
ORDER ENTRY TYPE: UNKNOWN
698.3,224 REPR. VENT. REFRACTORY PERIOD 2;11 NUMBER
INPUT TRANSFORM: K:+X'=X!(X>1000)!(X<0)!(X?.E1"."1N.N) X
HELP-PROMPT: Type a Number between 0 and 1000, 0 Decimal Digits
DESCRIPTION:
This allows documentation of adjustments to ventricular refraction.
TECHNICAL DESCR:
ORDER ENTRY TYPE: UNKNOWN
698.3,300 ATTENDING PHYSICIAN 3;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
HELP-PROMPT: This field identifies the name of the Attending Physician for this Surveillance Entry.
SCREEN: S DIC("S")="I $D(^XUSEC(""PROVIDER"",+Y))"
EXPLANATION: Allows only holders of the 'Provider' security key.
698.3,301 FELLOW 3;2 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 field identifies the name of the Cardiology Fellow for this Surveillance Entry.
SCREEN: S DIC("S")="I $D(^XUSEC(""PROVIDER"",+Y))"
698.3,491 FOLLOWUP COMMENT 4;4 FREE TEXT
INPUT TRANSFORM: K:$L(X)>60!($L(X)<2) X
HELP-PROMPT: ANSWER MUST BE 2-60 CHARACTERS IN LENGTH
DESCRIPTION:
This allows a documentation area of free form.
698.3,492 FAST OR SLOW CHECK 4;1 SET
'F' FOR FAST CHECK;
'S' FOR SLOW CHECK;
HELP-PROMPT: Enter F for fast or S for slow check.
DESCRIPTION:
This allows documentation of fast/slow check.
698.3,493 NEXT FOLLOW-UP DATE 0;5 DATE
INPUT TRANSFORM: S %DT="ETX" D ^%DT S X=Y K:Y<1 X
HELP-PROMPT: Enter date/time of next follow-up date.
DESCRIPTION:
This allows documentation of the scheduled follow-up date.
698.3,500 COMMENTS 10;0 WORD-PROCESSING #698.31
DESCRIPTION:
This allows a documentation area of free form.
HELP-PROMPT: Enter comments into this word-processing field.
DESCRIPTION:
This allows a documentation area of free form.
698.3,600 PROCEDURE SUMMARY .2;2 FREE TEXT (Required)
INPUT TRANSFORM: K:$L(X)>79!($L(X)<1) X
LAST EDITED: NOV 21, 1990
HELP-PROMPT: Answer must be 1-79 characters in length. This will appear on the 'Summary of Patient Procedures'.
DESCRIPTION: This field identifies a required free-text summary (1 to 79 characters) of the surveillance. This
summary will appear on the Summary of Patient Procedures.
TECHNICAL DESCR:
ORDER ENTRY TYPE: UNKNOWN
698.3,601 SUMMARY .2;1 SET (Required)
'A' FOR ABNORMAL;
'B' FOR BORDERLINE;
'N' FOR NORMAL;
LAST EDITED: NOV 21, 1990
HELP-PROMPT: Enter appropriate code for summary of the surveillance.
DESCRIPTION: This field identifies a required summary of the surveillance (Normal, Abnormal, or Borderline).
This will appear on the Summary of Patient Procedures.
TECHNICAL DESCR:
ORDER ENTRY TYPE: UNKNOWN
698.3,700 ICD DIAGNOSIS ICD;0 POINTER Multiple #698.32
DESCRIPTION:
This field contains the ICD Diagnosis(es) for the procedure.
TECHNICAL DESCR:
ORDER ENTRY TYPE: UNKNOWN
698.32,.01 ICD DIAGNOSIS 0;1 POINTER TO ICD DIAGNOSIS FILE (#80) (Required) (Multiply asked)
LAST EDITED: JAN 02, 1992
DESCRIPTION:
This field contains an ICD Diagnosis for the procedure.
TECHNICAL DESCR:
ORDER ENTRY TYPE: UNKNOWN
CROSS-REFERENCE: 698.32^B
1)= S ^MCAR(698.3,DA(1),"ICD","B",$E(X,1,30),DA)=""
2)= K ^MCAR(698.3,DA(1),"ICD","B",$E(X,1,30),DA)
698.32,.02 NARRATIVE DIAGNOSIS 0;2 FREE TEXT
INPUT TRANSFORM: K:$L(X)>80!($L(X)<1) X
LAST EDITED: JAN 02, 1992
HELP-PROMPT: Answer must be 1-80 characters in length.
TECHNICAL DESCR:
ORDER ENTRY TYPE: UNKNOWN
698.3,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: ^
698.3,900 PCC POINTER PCC;1 POINTER TO VISIT FILE (#9000010)
LAST EDITED: MAY 17, 1996
DESCRIPTION: This field is used to link the Medicine package results with the PCC Visit File for use by
Queryman.
CROSS-REFERENCE: 698.3^APCE
1)= S ^MCAR(698.3,"APCE",$E(X,1,30),DA)=""
2)= K ^MCAR(698.3,"APCE",$E(X,1,30),DA)
Pointer to the Visit file.
698.3,1000 ORIFN OR;1 POINTER TO ORDER FILE (#100)
LAST EDITED: JUL 09, 1991
HELP-PROMPT: Enter the 'Consult Orders' internal file number.
DESCRIPTION: This field contains a pointer to the 'Consult Orders' internal file number, stored in file 100.
This field is entered when results are entered in the Medicine package.
698.3,1001 GMRCO OR;2 POINTER TO REQUEST/CONSULTATION FILE (#123)
LAST EDITED: AUG 16, 1991
HELP-PROMPT: Enter the 'Request/Consultation' internal file number.
DESCRIPTION: This field contains a pointer to the internal number of the consult order stored in the
REQUEST/CONSULTATION file (123). This field is entered when results are entered in the Medicine
package.
FILES POINTED TO FIELDS
ICD DIAGNOSIS (#80) ICD DIAGNOSIS:ICD DIAGNOSIS (#.01)
MEDICAL PATIENT (#690) MEDICAL PATIENT (#1)
NEW PERSON (#200) CALLER (#2)
ATTENDING PHYSICIAN (#300)
FELLOW (#301)
PRIMARY PROVIDER (#701)
NON-MAGNET ECG RHYTHM (#698.9) BASIC RHYTHM (#15)
ORDER (#100) ORIFN (#1000)
REASON (MEDICINE) (#695.8) REASON FOR REPROGRAMMING (#55)
REQUEST/CONSULTATION (#123) GMRCO (#1001)
VISIT (#9000010) PCC POINTER (#900)
INPUT TEMPLATE(S):
MCARPACSURV MAR 09, 1993@11:56 USER #0
MCARPACSURVBRIEF MAR 09, 1993@11:59 USER #0
PRINT TEMPLATE(S):
MCAROPS MAY 13, 1996@10:28 USER #0 ^MCAROPS @
MCPACSURVBRPR MAY 13, 1996@10:31 USER #0 ^MCOBPS @
SORT TEMPLATE(S):
FORM(S)/BLOCK(S):