Global: ^LEX(757.14

Information

FileMan FileNo	FileMan Filename	Package
757.14	SOURCE	Lexicon Utility

This file contains the name and when applicable, the file number of the source of the terminology.

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.