Global: ^LEX(757.14

FileMan FileNo	FileMan Filename	Package
757.14	SOURCE	Lexicon Utility

Directly Accessed By Routines, Total: 6

Package	Total	Routines
Lexicon Utility	6	LEX2073B LEXA LEXAL LEXU ^LEX(757.14 LINKAGES

Package	Total	FileMan Files
Lexicon Utility	2	EXPRESSIONS(#757.01)[16] SOURCE CATEGORY(#757.13)[8]

Field # Name Loc Type Details

Field #	Name	Loc	Type	Details
.01	NAME	0;1	FREE TEXT	**********************REQUIRED FIELD********************** INPUT TRANSFORM: `K:$L(X)>30!($L(X)<3)!'(X'?1P.E) X` LAST EDITED: `JUL 01, 1997` HELP-PROMPT: `Answer must be 3-30 characters in length.` DESCRIPTION: `Descriptive name of the source of terminology/vocabulary.` CROSS-REFERENCE: `757.14^B` `1)= S ^LEX(757.14,"B",$E(X,1,30),DA)=""` `2)= K ^LEX(757.14,"B",$E(X,1,30),DA)` `^LEX(757.14,"B",NAME,IEN) - Where name is the name of a terminology or vocabulary source and IEN is the internal entry number in the Source file #757.14 where the source reference is located.`
1	FILE	0;2	NUMBER	INPUT TRANSFORM: `K:+X'=X!(X>999999999999)!(X<0)!(X?.E1"."9N.N) X` LAST EDITED: `JUL 01, 1997` HELP-PROMPT: `Type a Number between 0 and 999999999999, 8 Decimal Digits` DESCRIPTION: `If the source is a VistA file, the file number will be included in the source reference.`
2	DOCUMENT	0;3	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>63!($L(X)<1) X` LAST EDITED: `JUL 01, 1997` HELP-PROMPT: `Answer must be 1-63 characters in length.` DESCRIPTION: `If the source is from a document, the document title will be included in the source reference.`

NAME

0;1

FREE TEXT

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

INPUT TRANSFORM: K:$L(X)>30!($L(X)<3)!'(X'?1P.E) X
LAST EDITED: JUL 01, 1997
HELP-PROMPT: Answer must be 3-30 characters in length.
DESCRIPTION:
Descriptive name of the source of terminology/vocabulary.
CROSS-REFERENCE: 757.14^B
1)= S ^LEX(757.14,"B",$E(X,1,30),DA)=""
2)= K ^LEX(757.14,"B",$E(X,1,30),DA)
^LEX(757.14,"B",NAME,IEN) - Where name is the name of a terminology or vocabulary source and IEN is the internal entry number in the Source file #757.14 where the source reference is located.

FILE

0;2

NUMBER

INPUT TRANSFORM: K:+X'=X!(X>999999999999)!(X<0)!(X?.E1"."9N.N) X
LAST EDITED: JUL 01, 1997
HELP-PROMPT: Type a Number between 0 and 999999999999, 8 Decimal Digits
DESCRIPTION:
If the source is a VistA file, the file number will be included in the source reference.

DOCUMENT

0;3

FREE TEXT

INPUT TRANSFORM: K:$L(X)>63!($L(X)<1) X
LAST EDITED: JUL 01, 1997
HELP-PROMPT: Answer must be 1-63 characters in length.
DESCRIPTION:
If the source is from a document, the document title will be included in the source reference.