Global: ^DIC(7.1

Information

FileMan FileNo	FileMan Filename	Package
7.1	SPECIALITY	Kernel

Package	Total	Routines
Kernel	1	^DIC(7.1

Field # Name Loc Type Details

Field #	Name	Loc	Type	Details
.01	NAME	0;1		INPUT TRANSFORM: `K:$L(X)>30!(+X=X)!($L(X)<3)!'(X'?1P.E)!(X'?.ANP) X` HELP-PROMPT: `NAME MUST BE 3-30 CHARACTERS, NOT NUMERIC OR STARTING WITH PUNCTUATION` DELETE TEST: `.01,0)= I 1` CROSS-REFERENCE: `7.1^B` 1)= S ^DIC(7.1,"B",$E(X,1,30),DA)="" 2)= K ^DIC(7.1,"B",$E(X,1,30),DA)
1	ABBREVIATION	0;2	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>8!($L(X)<2) X` HELP-PROMPT: `ANSWER MUST BE 2-8 CHARACTERS IN LENGTH`
2	SERVICE	0;3	SET	'M' FOR MEDICINE; 'S' FOR SURGERY; 'R' FOR REHAB MEDICINE; 'N' FOR NEUROLOGY; 'P' FOR MENTAL HEALTH;

NAME

0;1

INPUT TRANSFORM: K:$L(X)>30!(+X=X)!($L(X)<3)!'(X'?1P.E)!(X'?.ANP) X
HELP-PROMPT: NAME MUST BE 3-30 CHARACTERS, NOT NUMERIC OR STARTING WITH PUNCTUATION
DELETE TEST: .01,0)= I 1

CROSS-REFERENCE: 7.1^B

1)= S ^DIC(7.1,"B",$E(X,1,30),DA)=""

2)= K ^DIC(7.1,"B",$E(X,1,30),DA)

ABBREVIATION

0;2

FREE TEXT

SERVICE

0;3

SET

Name	Line Occurrences (* Changed, ! Killed)
^DIC(7.1 - [#7.1]	.01(XREF 1S), .01(XREF 1K)

Name	Field # of Occurrence
>> DA	.01(XREF 1S), .01(XREF 1K)
X	.01+1!, .01(XREF 1S), .01(XREF 1K), 1+1!