Home Package List Routine Alphabetical List Global Alphabetical List FileMan Files List FileMan Sub-Files List Package Component Lists Package-Namespace Mapping

Info | Desc | Directly Accessed By Routines | Accessed By FileMan Db Calls | Pointed To By FileMan Files | Pointer To FileMan Files | Fields | ICR | Found Entries | External References | Global Variables Directly Accessed | Naked Globals | Local Variables | All

Print Page as PDF

Global: ^LRMLTF

Package: Lab Service

Global: ^LRMLTF

Information

FileMan FileNo	FileMan Filename	Package
66.3	MASTER LABORATORY TEST	Lab Service

Description

This is the Master Laboratory Test file. It contains the standardized Lab Test Name and its associated LOINC code. The Lab will associate their local test to this file (^LAB(60,test#,1,specimen#)). Per VHA Directive 2005-044, this file has been "locked down" by Data Standardization (DS). The file definition (i.e. data dictionary) shall not be modified. All additions, changes and deletions to entries in the file shall be done by Enterprise Reference Terminology (ERT) using the Master File Server (MFS), provided by Common Services (CS). Creating and/or editing locally defined fields in the file are not permitted. Use of locally defined fields that were created prior to the VHA Directive's 2005-044 effective date shall not be supported.

Directly Accessed By Routines, Total: 5

Package	Total	Routines
Lab Service	5	EFFECTIVE DATE/TIME LR500PO LR664L LRMLEDA RELATED NAME

Accessed By FileMan Db Calls, Total: 8

Package	Total	Routines
Lab Service	8	LR500PO LR664L LRMLACM LRMLREI LRMLRIV LRMLWT LRSRVR9 LRVER1

Pointed To By FileMan Files, Total: 2

Package	Total	FileMan Files
Lab Service	2	LABORATORY TEST(#60)[#60.01(30)] MASTER LABORATORY TEST(#66.3)[99.97]

Pointer To FileMan Files, Total: 1

Package	Total	FileMan Files
Lab Service	1	MASTER LABORATORY TEST(#66.3)[99.97]

Fields, Total: 13

Field #	Name	Loc	Type	Details
.01	LAB TEST NAME	0;1	FREE TEXT	**********************REQUIRED FIELD********************** INPUT TRANSFORM: `K:$L(X)>230!($L(X)<1) X` `MAXIMUM LENGTH: 230` LAST EDITED: `FEB 13, 2018` HELP-PROMPT: `Answer must be 1-230 characters in length.` DESCRIPTION: `This is the National Master Laboratory Test file (MLTF)` `for associating lab tests with LOINC Codes and should not be edited.` AUDIT: `YES, ALWAYS` PRE-LOOKUP: `I $G(DIC(0))["L",'$D(XUMF) K X D EN^DDIOL("Entries must be edited via the Master File Server (MFS).","","!?5,$C(7)")` DELETE TEST: `1,0)= D:'$D(XUMF) EN^DDIOL("Entries must be inactivated via the Master File Server (MFS).","","!?5,$C(7)") I $D(XUMF)` LAYGO TEST: `1,0)= D:'$D(XUMF) EN^DDIOL("Entries must be added via the Master File Server (MFS).","","!?5,$C(7)") I $D(XUMF)` `WRITE AUTHORITY: ^` FIELD INDEX: `B (#1517) REGULAR IR LOOKUP & SORTING` `Short Descr: New style Cross Reference for 60 characters.` `Description: The 'B' cross reference is being created here due to the 30 character limiting the traditional 'B' cross reference. This 'B' cross reference is for a 60 character length.` `Set Logic: S ^LRMLTF("B",$E(X,1,60),DA)=""` `Kill Logic: K ^LRMLTF("B",$E(X,1,60),DA)` `Whole Kill: K ^LRMLTF("B")` `X(1): LAB TEST NAME (66.3,.01) (Subscr 1) (Len 60) (forwards)`
.02	ALTERNATE TEST NAME	1;1	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>230!($L(X)<1) X` `MAXIMUM LENGTH: 230` LAST EDITED: `FEB 27, 2018` HELP-PROMPT: `Answer must be 1-230 characters in length.` DESCRIPTION: `This is the 'short name' for the Master Laboratory Test file.` AUDIT: `YES, ALWAYS` `WRITE AUTHORITY: ^` FIELD INDEX: `D (#1518) REGULAR IR LOOKUP & SORTING` `Short Descr: New Style Alternate Name index for 60 characters` `Description: This 'New' style cross reference is to allow the user to lookup by the Alt Name in addition to the 'B' and 'C' cross references.` `Set Logic: S ^LRMLTF("D",$E(X,1,60),DA)=""` `Kill Logic: K ^LRMLTF("D",$E(X,1,60),DA)` `Whole Kill: K ^LRMLTF("D")` `X(1): ALTERNATE TEST NAME (66.3,.02) (Subscr 1) (Len 60) (forwards)`
.04	LOINC CODE	2;2	FREE TEXT	**********************REQUIRED FIELD********************** INPUT TRANSFORM: `K:$L(X)>20!($L(X)<1) X` `MAXIMUM LENGTH: 20` LAST EDITED: `MAR 21, 2018` HELP-PROMPT: `Answer must be 1-20 characters in length.` DESCRIPTION: `This is the LOINC code that will be associated to the lab test name and VUID.` AUDIT: `YES, ALWAYS` `WRITE AUTHORITY: ^` CROSS-REFERENCE: `66.3^C` `1)= S ^LRMLTF("C",$E(X,1,30),DA)=""` `2)= K ^LRMLTF("C",$E(X,1,30),DA)` `Additional lookup field for the LIMs.`
.05	COMPONENT	2;3	FREE TEXT	**********************REQUIRED FIELD********************** INPUT TRANSFORM: `K:$L(X)>230!($L(X)<1) X` `MAXIMUM LENGTH: 230` LAST EDITED: `FEB 08, 2018` HELP-PROMPT: `Answer must be 1-230 characters in length.` DESCRIPTION: `This is the Lab COMPONENT value used in matching a Lab test to a LOINC Code.` AUDIT: `YES, ALWAYS` `WRITE AUTHORITY: ^`
.06	PROPERTY	2;4	FREE TEXT	**********************REQUIRED FIELD********************** INPUT TRANSFORM: `K:$L(X)>230!($L(X)<1) X` `MAXIMUM LENGTH: 230` LAST EDITED: `FEB 07, 2018` HELP-PROMPT: `Answer must be 1-230 characters in length.` DESCRIPTION: `This is the Lab PROPERTY value used in matching a Lab test to a LOINC Code.` AUDIT: `YES, ALWAYS` `WRITE AUTHORITY: ^`
.07	TIME ASPECT	3;1	FREE TEXT	**********************REQUIRED FIELD********************** INPUT TRANSFORM: `K:$L(X)>230!($L(X)<1) X` `MAXIMUM LENGTH: 230` LAST EDITED: `FEB 07, 2018` HELP-PROMPT: `Answer must be 1-230 characters in length.` DESCRIPTION: `This is the Lab TIME ASPECT value used in matching a Lab test to a LOINC Code.` AUDIT: `YES, ALWAYS` `WRITE AUTHORITY: ^`
.08	SPECIMEN	3;2	FREE TEXT	**********************REQUIRED FIELD********************** INPUT TRANSFORM: `K:$L(X)>230!($L(X)<1) X` `MAXIMUM LENGTH: 230` LAST EDITED: `FEB 07, 2018` HELP-PROMPT: `Answer must be 1-230 characters in length.` DESCRIPTION: `This is the Lab SPECIMEN (site/specimen) value used in matching a Lab test to a LOINC Code.` AUDIT: `YES, ALWAYS` `WRITE AUTHORITY: ^`
.09	SCALE	3;3	FREE TEXT	**********************REQUIRED FIELD********************** INPUT TRANSFORM: `K:$L(X)>230!($L(X)<1) X` `MAXIMUM LENGTH: 230` LAST EDITED: `FEB 07, 2018` HELP-PROMPT: `Answer must be 1-230 characters in length.` DESCRIPTION: `This is the Lab SCALE value used in matching a Lab test to a LOINC Code.` AUDIT: `YES, ALWAYS` `WRITE AUTHORITY: ^`
1	METHOD	3;4	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>230!($L(X)<1) X` `MAXIMUM LENGTH: 230` LAST EDITED: `FEB 07, 2018` HELP-PROMPT: `Answer must be 1-230 characters in length.` DESCRIPTION: `This is the Lab METHOD value used in matching a Lab test to a LOINC Code.` AUDIT: `YES, ALWAYS` `WRITE AUTHORITY: ^`
99.97	REPLACED BY VHA STANDARD TERM	VUID;3	POINTER TO MASTER LABORATORY TEST FILE (#66.3)	MASTER LABORATORY TEST(#66.3) LAST EDITED: `APR 20, 2016` HELP-PROMPT: `Enter the pointer to the VHA Standard Term` DESCRIPTION: `This field is populated when one Term/Concept replaces another Term/Concept. This field is controlled by standardization and should only be changed by standardization processes. This field contains a pointer to a VHA` `standard term that replaces this entry.` AUDIT: `YES, ALWAYS` `WRITE AUTHORITY: ^` `UNEDITABLE` CROSS-REFERENCE: `66.3^AREPLACETERM` `1)= S ^LRMLTF("AREPLACETERM",$E(X,1,30),DA)=""` `2)= K ^LRMLTF("AREPLACETERM",$E(X,1,30),DA)` `This cross-reference can be used to identify the replacement entries associated with a Term/Concept.`
99.98	MASTER ENTRY FOR VUID	VUID;2	SET	**********************REQUIRED FIELD********************** '0' FOR NO; '1' FOR YES; LAST EDITED: `APR 20, 2016` HELP-PROMPT: `Enter 1 if this is the master entry` DESCRIPTION: `This field identifies the Master entry for a VUID associated with a Term/Concept.` AUDIT: `YES, ALWAYS` `WRITE AUTHORITY: ^` `UNEDITABLE` RECORD INDEXES: `AMASTERVUID (#1424)`
99.99	VUID	VUID;1	FREE TEXT	**********************REQUIRED FIELD********************** INPUT TRANSFORM: `K:$L(X)>20!($L(X)<1)!'(X?1.20N) X` LAST EDITED: `APR 20, 2016` HELP-PROMPT: `Answer must be 1-20 digits in length, only the first 19 are used.` DESCRIPTION: `VHA Unique ID (VUID). A unique arbitrary integer assigned to reference terms VHA wide.` AUDIT: `YES, ALWAYS` `WRITE AUTHORITY: ^` `UNEDITABLE` NOTES: `XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER` CROSS-REFERENCE: `66.3^AVUID` `1)= S ^LRMLTF("AVUID",$E(X,1,30),DA)=""` `2)= K ^LRMLTF("AVUID",$E(X,1,30),DA)` `This cross-reference is by VUID.` RECORD INDEXES: `AMASTERVUID (#1424)`
99.991	EFFECTIVE DATE/TIME	TERMSTATUS;0	DATE Multiple #66.399	66.399 DESCRIPTION: `Describes the pair Status and Effective Date/Time for each reference term.`

Found Entries, Total: 17

LAB TEST NAME: PEANUT IGE RAST	LAB TEST NAME: PEANUT IGE	LAB TEST NAME: SODIUM	LAB TEST NAME: POTASSIUM	LAB TEST NAME: GLUCOSE	LAB TEST NAME: CREATININE	LAB TEST NAME: CREATININE, TIMED URINE	LAB TEST NAME: CREATININE RATE, TIMED URINE
LAB TEST NAME: WBC #, BLOOD	LAB TEST NAME: RBC #, BLOOD	LAB TEST NAME: RBC #, CSF	LAB TEST NAME: RBC #, BODY FLUID	LAB TEST NAME: GLUCOSE, BODY FLUID	LAB TEST NAME: FSH	LAB TEST NAME: OCCULT BLOOD QL, STOOL	LAB TEST NAME: APTT
LAB TEST NAME: INR, BLOOD

ICR, Total: 1

ICR LINK	Subscribing Package(s)	Fields Referenced	Description
ICR #6375

External References

Name	Field # of Occurrence
EN^DDIOL	.01TPL+1, .01DEL1+1, .01LAYGO1+1

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^LRMLTF("AMASTERVUID"	IXAMASTERVUIDSL+1*, IXAMASTERVUIDKL+1!, IXAMASTERVUIDKEIC+1!
^LRMLTF("AREPLACETERM"	99.97(XREF 1S), 99.97(XREF 1K)
^LRMLTF("AVUID"	99.99(XREF 1S), 99.99(XREF 1K)
^LRMLTF("B"	IXBSL+1*, IXBKL+1!, IXBKEIC+1!
^LRMLTF("C"	.04(XREF 1S), .04(XREF 1K)
^LRMLTF("D"	IXDSL+1*, IXDKL+1!, IXDKEIC+1!

Naked Globals

Name	Field # of Occurrence
^(2	ID.04+1
^(3	ID.08+1, ID1+1

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> DA	IXAMASTERVUIDSL+1, IXAMASTERVUIDKL+1, IXBSL+1, IXBKL+1, IXDSL+1, IXDKL+1, .04(XREF 1S), .04(XREF 1K), 99.97(XREF 1S), 99.97(XREF 1K) , 99.99(XREF 1S), 99.99(XREF 1K)
>> DIC(0	.01TPL+1
U	ID.04+1, ID.08+1, ID1+1
X	IXBSL+1, IXBKL+1, IXDSL+1, IXDKL+1, .01+1!, .01TPL+1!, .02+1!, .04+1!, .04(XREF 1S), .04(XREF 1K) , .05+1!, .06+1!, .07+1!, .08+1!, .09+1!, 1+1!, 99.97(XREF 1S), 99.97(XREF 1K), 99.99+1!, 99.99(XREF 1S) , 99.99(XREF 1K)
X(1	IXAMASTERVUIDSL+1, IXAMASTERVUIDKL+1
X(2	IXAMASTERVUIDSL+1, IXAMASTERVUIDKL+1
>> XUMF	.01TPL+1, .01DEL1+1, .01LAYGO1+1

Info | Desc | Directly Accessed By Routines | Accessed By FileMan Db Calls | Pointed To By FileMan Files | Pointer To FileMan Files | Fields | ICR | Found Entries | External References | Global Variables Directly Accessed | Naked Globals | Local Variables | All