Select the objects that you wish to see in the downloaded PDF
S DIC("S")="I '$P(^(0),U,9)" D ^DIC K DIC S DIC=DIE,X=+Y K:Y<0 X
FEB 17, 1993
This field contains the outpatient diagnosis.
S DIC("S")="I '$P(^(0),U,9)"
Diagnosis must be active.
1,0)= IF 0
409.43^B
1)= S ^SDD(409.43,"B",$E(X,1,30),DA)=""
2)= K ^SDD(409.43,"B",$E(X,1,30),DA)
This cross-reference allow look-up by diagnosis.
409.43^AO1^MUMPS
1)= S:$P(^SDD(409.43,DA,0),U,2) ^SDD(409.43,"AO",+$P(^(0),U,2),X,DA)=""
2)= K ^SDD(409.43,"AO",+$P(^SDD(409.43,DA,0),U,2),X,DA)
This cross-reference can be used to sort by outpatient encounter by diagnosis by internal entry number.
JUL 22, 1993
This field contains the outpatient encounter associated with this outpatient diagnosis.
UNEDITABLE
409.43^AO^MUMPS
1)= S ^SDD(409.43,"AO",X,$P(^SDD(409.43,DA,0),U),DA)=""
2)= K ^SDD(409.43,"AO",X,$P(^SDD(409.43,DA,0),U),DA)
409.43^OE
1)= S ^SDD(409.43,"OE",$E(X,1,30),DA)=""
2)= K ^SDD(409.43,"OE",$E(X,1,30),DA)
Cross-reference to look up diagnosis by outpatient encounter and to allow backwards navigation.
K:$L(X)>3!($L(X)<1) X
MAY 03, 1996
Answer must be 1-3 characters in length.
This field is to hold the ranking of the particular diagnosis related to the encounter. Currently a number one will indicate the primary diagnosis.