Sub-Field: 691.701

Parent File	Name	Number	Package
EXERCISE TOLERANCE TEST(#691.7)	SYMPTOM	691.701	Medicine

Details

Field # Name Loc Type Details

Field #	Name	Loc	Type	Details
.01	SYMPTOM	0;1	POINTER TO SYMPTOM FILE (#695.5)	SYMPTOM(#695.5) INPUT TRANSFORM: `S DIC("S")="I $D(^MCAR(695.5,""C"",""ETT"",+Y))!($D(^MCAR(695.5,""C"",""C"",+Y)))" D ^DIC K DIC S DIC=DIE,X=+Y K:Y<0 X` LAST EDITED: `MAY 30, 1996` HELP-PROMPT: `HISTORY OF PRESENT HISTORY` DESCRIPTION: This field contains the patient's physical complaints or symtoms. SCREEN: `S DIC("S")="I $D(^MCAR(695.5,""C"",""ETT"",+Y))!($D(^MCAR(695.5,""C"",""C"",+Y)))"` EXPLANATION: `Choose symptoms applying to ETT or Cardiology only` CROSS-REFERENCE: `691.701^B` 1)= S ^MCAR(691.7,DA(1),.3,"B",$E(X,1,30),DA)="" 2)= K ^MCAR(691.7,DA(1),.3,"B",$E(X,1,30),DA)

SYMPTOM

0;1

POINTER TO SYMPTOM FILE (#695.5)

INPUT TRANSFORM: S DIC("S")="I $D(^MCAR(695.5,""C"",""ETT"",+Y))!($D(^MCAR(695.5,""C"",""C"",+Y)))" D ^DIC K DIC S DIC=DIE,X=+Y K:Y<0 X
LAST EDITED: MAY 30, 1996
HELP-PROMPT: HISTORY OF PRESENT HISTORY

DESCRIPTION:

This field contains the patient's physical complaints or symtoms.

SCREEN: S DIC("S")="I $D(^MCAR(695.5,""C"",""ETT"",+Y))!($D(^MCAR(695.5,""C"",""C"",+Y)))"
EXPLANATION: Choose symptoms applying to ETT or Cardiology only

CROSS-REFERENCE: 691.701^B

1)= S ^MCAR(691.7,DA(1),.3,"B",$E(X,1,30),DA)=""

2)= K ^MCAR(691.7,DA(1),.3,"B",$E(X,1,30),DA)