Global: ^ADERSCT

FileMan FileNo	FileMan Filename	Package
9002010.05	DENTAL RESOURCE TYPE	IHS Dental System

FileMan FileNo

FileMan Filename

Package

9002010.05

DENTAL RESOURCE TYPE

Package	Total	Routines
IHS Dental System	1	ADEXCOD

Package	Total	Routines
IHS Dental System	1	ADEXCOD

Package	Total	FileMan Files
IHS Dental System	1	DENTAL RESOURCE(#9002005)[1]

Field # Name Loc Type Details

Field #	Name	Loc	Type	Details
.01	TYPE	0;1	FREE TEXT	**********************REQUIRED FIELD********************** INPUT TRANSFORM: `K:$L(X)>30!($L(X)<3)!'(X'?1P.E)!(X'?.ANP) X` HELP-PROMPT: `ANSWER MUST BE 3-30 CHARACTERS IN LENGTH, ENTER THE GENERIC DENTAL RESOURCE TYPE` DESCRIPTION: FIELD WILL CONTAIN VALID TYPE CROSS-REFERENCE: `9002010.05^B` 1)= S ^ADERSCT("B",$E(X,1,30),DA)="" 2)= K ^ADERSCT("B",$E(X,1,30),DA)
8801	MNEMONIC	88;1	FREE TEXT	**********************REQUIRED FIELD********************** INPUT TRANSFORM: `K:$L(X)>4!($L(X)<1) X` LAST EDITED: `MAY 03, 1993` HELP-PROMPT: `Answer must be 1-4 characters in length.` DESCRIPTION: This field enables users to enter a defined mnemonic in lieu of a name. CROSS-REFERENCE: `9002010.05^B^MNEMONIC` 1)= S ^ADERSCT("B",$E(X,1,30),DA)=1 2)= K ^ADERSCT("B",$E(X,1,30),DA)

TYPE

0;1

FREE TEXT

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

INPUT TRANSFORM: K:$L(X)>30!($L(X)<3)!'(X'?1P.E)!(X'?.ANP) X
HELP-PROMPT: ANSWER MUST BE 3-30 CHARACTERS IN LENGTH, ENTER THE GENERIC DENTAL RESOURCE TYPE
DESCRIPTION:
```
FIELD WILL CONTAIN VALID TYPE
```

CROSS-REFERENCE: 9002010.05^B

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

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

MNEMONIC

88;1

FREE TEXT

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

DESCRIPTION:

This field enables users to enter a defined mnemonic in lieu of a name.

CROSS-REFERENCE: 9002010.05^B^MNEMONIC

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

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

Information