Select the objects that you wish to see in the downloaded PDF
K:X[""""!($A(X)=45) X I $D(X) K:$L(X)>60!($L(X)<3)!'(X'?1P.E)!(X'?.ANP) X
DEC 01, 1988
ANSWER MUST BE 3-60 CHARACTERS IN LENGTH
This field contains a name of a result applicable to an Endoscopy.
699.81^B^MUMPS
1)= S ^MCAR(699.81,"B",X,DA)=""
2)= K ^MCAR(699.81,"B",X,DA)
This cross-reference indexes result names in alphabetical order.
699.81^D^KWIC
1)= S %1=1 F %=1:1:$L(X)+1 S I=$E(X,%) I "(,.?! '-/&:;)"[I S I=$E($E(X,%1,%-1),1,30),%1=%+1 I $L(I)>2,^DD("KWIC")'[I S ^MCAR(699.81,"D",I,DA)=""
2)= S %1=1 F %=1:1:$L(X)+1 S I=$E(X,%) I "(,.?! '-/&:;)"[I S I=$E($E(X,%1,%-1),1,30),%1=%+1 I $L(I)>2 K ^MCAR(699.81,"D",I,DA)
This cross-reference indexes result names by key word.
This field is used as a screen to allow results to be selectable by Medical procedure.