Global: ^MCAR(699.86

FileMan FileNo	FileMan Filename	Package
699.86	SURVEILLANCE	Medicine

Directly Accessed By Routines, Total: 3

Package	Total	Routines
Medicine	3	MCOBGA MCPARC MCPOS01F

Package	Total	FileMan Files
Medicine	1	ENDOSCOPY/CONSULT(#699)[#699.37(.01)]

Field # Name Loc Type Details

Field #	Name	Loc	Type	Details
.01	NAME	0;1	FREE TEXT	**********************REQUIRED FIELD********************** INPUT TRANSFORM: `K:X[""""!($A(X)=45) X I $D(X) K:$L(X)>30!(X?.N)!($L(X)<3)!'(X'?1P.E)!(X'?.ANP) X` HELP-PROMPT: `NAME MUST BE 3-30 CHARACTERS, NOT NUMERIC OR STARTING WITH PUNCTUATION` DESCRIPTION: This field identifies a list of possible surveillances which can be used as an indication for procedure for GI Endoscopies. CROSS-REFERENCE: `699.86^B` 1)= S ^MCAR(699.86,"B",$E(X,1,30),DA)="" 2)= K ^MCAR(699.86,"B",$E(X,1,30),DA) CROSS-REFERENCE: `699.86^C^KWIC` 1)= F %=1:1 Q:$P(X," ",%,99)="" S I=$P(X," ",%) I $L(I)>2,$L(I)<31,^DD("KWIC")'[I S ^MCAR(699.86,"C",I,DA)="" 2)= F %=1:1 Q:$P(X," ",%,99)="" S I=$P(X," ",%) I $L(I)>2,$L(I)<31 K ^MCAR(699.86,"C",I,DA) This cross-reference indexes surveillance names alphabetically by key word.

NAME

0;1

FREE TEXT

************************REQUIRED FIELD************************

INPUT TRANSFORM: K:X[""""!($A(X)=45) X I $D(X) K:$L(X)>30!(X?.N)!($L(X)<3)!'(X'?1P.E)!(X'?.ANP) X
HELP-PROMPT: NAME MUST BE 3-30 CHARACTERS, NOT NUMERIC OR STARTING WITH PUNCTUATION

DESCRIPTION:

This field identifies a list of possible surveillances which can be used as an indication for procedure for GI Endoscopies.

CROSS-REFERENCE: 699.86^B

1)= S ^MCAR(699.86,"B",$E(X,1,30),DA)=""

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

CROSS-REFERENCE: 699.86^C^KWIC

1)= F %=1:1 Q:$P(X," ",%,99)=""  S I=$P(X," ",%) I $L(I)>2,$L(I)<31,^DD("KWIC")'[I S ^MCAR(699.86,"C",I,DA)=""

2)= F %=1:1 Q:$P(X," ",%,99)=""  S I=$P(X," ",%) I $L(I)>2,$L(I)<31 K ^MCAR(699.86,"C",I,DA)

This cross-reference indexes surveillance names alphabetically by key word.