Global: ^ETSLNC(129.1

FileMan FileNo	FileMan Filename	Package
129.1	LOINC	Enterprise Terminology Services

Package	Total	Routines
Enterprise Terminology Services	5	ETSLNC ETSLNC1 ETSLNC2 ETSLNCIX ETSLNCTX

Package	Total	Routines
Enterprise Terminology Services	3	ETSLNC1 ETSLNC2 ETSLNC3

Package	Total	FileMan Files
Enterprise Terminology Services	3	LOINC COMPONENT(#129.11)[1] LOINC AXIS CODES(#129.12)[1.5, 1.6, 1.7, 2, 3, 3.1, 4, 5, 7, 10] LOINC METHOD CODES(#129.13)[6]

Fields, Total: 34

Field #	Name	Loc	Type	Details
.01	CODE	0;1	NUMBER	**********************REQUIRED FIELD******************** INPUT TRANSFORM: `K:+X'=X!(X>9999999)!(X<1)!(X?.E1"."1N.N) X I $D(X) S DINUM=X` OUTPUT TRANSFORM: `S:Y]"" Y=$S($L($P($G(^ETSLNC(129.1,Y,0)),U,15)):Y_"-"_$P(^ETSLNC(129.1,Y,0),U,15),1:Y)` LAST EDITED: `JAN 29, 2017` HELP-PROMPT: `Enter the unique LOINC code.` DESCRIPTION: `This is the unique LOINC code in numeric form.` 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: ^` `UNEDITABLE` NOTES: `XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER` CROSS-REFERENCE: `129.1^B` `1)= S ^ETSLNC(129.1,"B",$E(X,1,30),DA)=""` `2)= K ^ETSLNC(129.1,"B",$E(X,1,30),DA)` CROSS-REFERENCE: `129.1^VR^MUMPS` `1)= S ^ETSLNC(129.1,"VR")=$G(^ETSLNC(129.1,"VR"))` `2)= Q` `3)= This is the version of the data files loaded.` `This X-ref is used to determine the patch # and the version of the data loaded on the system. This differs from the version node of the DDs (field definition). This field is set by the post-install routine and should not` `be directly edited.` `Format of the node is LOINC VERSION_2nd line of the post-install patch routine. Looks like: ^ETSLNC(129.1,"VR") = 2.09;;5.2;ETS SERVICE;274**;Sep 27,1994` `There is an alternate location of version number stored in the DDs. ^DD(129.1,0,"VRRV") = 2.09`
1	COMPONENT	0;2	POINTER TO LOINC COMPONENT FILE (#129.11)	LOINC COMPONENT(#129.11) LAST EDITED: `JAN 30, 2017` HELP-PROMPT: `Enter the name of the component or analyte measured.` DESCRIPTION: `This is the name of the component or analyte measured e.g., potassium, hemoglobin, or hepatitis C antigen.` `WRITE AUTHORITY: ^` CROSS-REFERENCE: `129.1^C` `1)= S ^ETSLNC(129.1,"C",$E(X,1,30),DA)=""` `2)= K ^ETSLNC(129.1,"C",$E(X,1,30),DA)` `This x-ref is used for lookup and sorting of the Component field.`
1.5	CHALLENGE	0;3	POINTER TO LOINC AXIS CODES FILE (#129.12)	LOINC AXIS CODES(#129.12) INPUT TRANSFORM: `S DIC("S")="I $P(^(0),U,7)=""CHALLENGE""" D ^DIC K DIC S DIC=DIE,X=+Y K:Y<0 X` LAST EDITED: `JAN 31, 2017` HELP-PROMPT: `Enter challenge.` DESCRIPTION: `This field contains information necessary to interpret "challenge" (or loading or tolerance) tests.` SCREEN: `S DIC("S")="I $P(^(0),U,7)=""CHALLENGE"""` EXPLANATION: `TYPE=CHALLENGE` `WRITE AUTHORITY: ^`
1.6	ADJUSTMENT	0;4	POINTER TO LOINC AXIS CODES FILE (#129.12)	LOINC AXIS CODES(#129.12) INPUT TRANSFORM: `S DIC("S")="I $P(^(0),U,7)=""ADJUSTMENT""" D ^DIC K DIC S DIC=DIE,X=+Y K:Y<0 X` LAST EDITED: `JAN 31, 2017` HELP-PROMPT: `Enter adjustment.` DESCRIPTION: `This field contains calculations that adjust or correct some measured value.` SCREEN: `S DIC("S")="I $P(^(0),U,7)=""ADJUSTMENT"""` EXPLANATION: `TYPE=ADJUSTMENT` `WRITE AUTHORITY: ^`
1.7	NON-PATIENT SPECIMEN	0;5	POINTER TO LOINC AXIS CODES FILE (#129.12)	LOINC AXIS CODES(#129.12) INPUT TRANSFORM: `S DIC("S")="I $P(^(0),U,7)=""NON-PATIENT SPECIMEN""" D ^DIC K DIC S DIC=DIE,X=+Y K:Y<0 X` LAST EDITED: `APR 25, 2017` HELP-PROMPT: `Enter non-patient specimen.` DESCRIPTION: `The second subpart of the system distinguishes observations on the patient (or samples taken from the patient or donor) from observations on non-patient materials that relate to the patient, e.g. a blood product unit` `(BPU). When the person or super system is not included in a name, it can be assumed to be the patient.` SCREEN: `S DIC("S")="I $P(^(0),U,7)=""NON-PATIENT SPECIMEN"""` EXPLANATION: `TYPE=NON-PATIENT SPECIMEN` `WRITE AUTHORITY: ^`
2	PROPERTY	0;6	POINTER TO LOINC AXIS CODES FILE (#129.12)	LOINC AXIS CODES(#129.12) INPUT TRANSFORM: `S DIC("S")="I $P(^(0),U,7)=""PROPERTY""" D ^DIC K DIC S DIC=DIE,X=+Y K:Y<0 X` LAST EDITED: `JAN 31, 2017` HELP-PROMPT: `Enter the property measured.` DESCRIPTION: `This field contains the property measured - e.g., a mass concentration or enzyme activity.` SCREEN: `S DIC("S")="I $P(^(0),U,7)=""PROPERTY"""` EXPLANATION: `TYPE=PROPERTY` `WRITE AUTHORITY: ^` `UNEDITABLE`
3	TIME ASPECT	0;7	POINTER TO LOINC AXIS CODES FILE (#129.12)	LOINC AXIS CODES(#129.12) LAST EDITED: `JAN 30, 2017` HELP-PROMPT: `Enter the time aspect.` DESCRIPTION: `This is the point or moment in time vs. time interval, e.g., 24-hour urine.` `WRITE AUTHORITY: ^`
3.1	TIME MODIFIER	0;17	POINTER TO LOINC AXIS CODES FILE (#129.12)	LOINC AXIS CODES(#129.12) INPUT TRANSFORM: `S DIC("S")="I $P(^(0),U,7)=""TIME MODIFIER""" D ^DIC K DIC S DIC=DIE,X=+Y K:Y<0 X` LAST EDITED: `APR 25, 2017` HELP-PROMPT: `Enter the time modifier.` DESCRIPTION: `The second and optional subpart of the time component allows an indication of some sub-selection or integration of the measures taken over the defined period of time, so 8H^MAX heart rate would be the highest heart rate` `observed over 8H(Shift). MIN, MAX, FIRST, LAST, MEAN are the possible values for this subpart. When nothing is stored in this subpart, we assume a mean value over the time period in question.` SCREEN: `S DIC("S")="I $P(^(0),U,7)=""TIME MODIFIER"""` EXPLANATION: `TYPE=TIME MODIFIER` `WRITE AUTHORITY: ^`
4	SYSTEM	0;8	POINTER TO LOINC AXIS CODES FILE (#129.12)	LOINC AXIS CODES(#129.12) LAST EDITED: `JAN 30, 2017` HELP-PROMPT: `Enter the specimen.` DESCRIPTION: `This field contains the specimen.` `WRITE AUTHORITY: ^`
5	SCALE TYPE	0;9	POINTER TO LOINC AXIS CODES FILE (#129.12)	LOINC AXIS CODES(#129.12) LAST EDITED: `JAN 30, 2017` HELP-PROMPT: `Enter the scale of the measure.` DESCRIPTION: `This field contains the data part of the test name which specifies the scale of the measure, and is a required part. The abbreviation of the type of scale (previously called precision) should be used in the fully` `specified name.` `WRITE AUTHORITY: ^`
6	METHOD TYPE	0;10	POINTER TO LOINC METHOD CODES FILE (#129.13)	LOINC METHOD CODES(#129.13) LAST EDITED: `JAN 30, 2017` HELP-PROMPT: `Enter the test method.` DESCRIPTION: `This is the method by which the test was performed. Methods need only be expressed as part of the name when they provide a distinction between tests that measure the same component (analyte) but which have different` `clinical significance or have different clinical reference ranges. For instance, whole blood glucose tested with a chemstrip might be distinguished in the method field.` `WRITE AUTHORITY: ^`
7	CLASS	0;11	POINTER TO LOINC AXIS CODES FILE (#129.12)	LOINC AXIS CODES(#129.12) LAST EDITED: `JAN 30, 2017` HELP-PROMPT: `Enter the class.` DESCRIPTION: `This is an arbitrary classification of the terms for grouping related observations together. Some examples are CHEM for Chemistry, MICRO for Microbiology, and BLDBK for Blood Bank.` `WRITE AUTHORITY: ^`
8	SOURCE	0;12	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>10!($L(X)<1) X` `MAXIMUM LENGTH: 10` LAST EDITED: `JAN 30, 2017` HELP-PROMPT: `Enter an answer 1-10 characters in length.` DESCRIPTION: `Source is a field for internal use of the LOINC committee.` `WRITE AUTHORITY: ^`
10	UNITS	0;14	POINTER TO LOINC AXIS CODES FILE (#129.12)	LOINC AXIS CODES(#129.12) LAST EDITED: `JAN 30, 2017` HELP-PROMPT: `Enter the units of measure.` DESCRIPTION: `This field contains the units of measure for the test of this specimen.` `WRITE AUTHORITY: ^`
15	CHECK DIGIT	0;15	NUMBER	INPUT TRANSFORM: `K:+X'=X!(X>9)!(X<0)!(X?.E1"."1N.N) X` LAST EDITED: `JAN 24, 2017` HELP-PROMPT: `Type a number between 0 and 9, 0 decimal digits.` DESCRIPTION: `Note: the data contained in this field contains some incorrect values due to errors in the LOINC released database. When check digit computation errors are discovered - STATUS (#20) field is marked as DEL preventing the` `code from being assigned. Once a LOINC has been released it is never deleted from the database.` `This field contains the LOINC number modulo 10 check digit. The instruction for calculating a Mod 10 check digit is as follows: (1) Take the odd digit positions counting from the right (2) Multiply by 2 (3) Take the even` `digits starting from the right (4) Append these to the front of the results of (2) (5) Add the digits of (4) together (6) Find the next highest multiple of 10 (7) Subtract (5) from (6)` `WRITE AUTHORITY: ^`
20	STATUS	4;1	SET	'1' FOR DEL; '2' FOR TRIAL; '3' FOR DISCOURAGED; LAST EDITED: `JAN 24, 2017` HELP-PROMPT: `Select the Status of the code: 1=Deprecated (deleted), 2=Trial or 3=Discouraged` DESCRIPTION: `This field can contain one of the following values:` `(Null) This is a code with ACTIVE status.` `1 This is a code that has been DELETED (DEPRECATED).` `2 This is a code that is on TRIAL.` `3 This is a code the use of which is DISCOURAGED. LOINC codes will never be reused nor will they be removed from the database.` `WRITE AUTHORITY: ^` CROSS-REFERENCE: `129.1^AD` `1)= S ^ETSLNC(129.1,"AD",$E(X,1,30),DA)=""` `2)= K ^ETSLNC(129.1,"AD",$E(X,1,30),DA)` `3)= List of Status` `This cross-reference will provide a listing of those LOINC codes that have a status update.`
22	DATE LAST CHANGED	4;3	DATE	INPUT TRANSFORM: `S %DT="EX" D ^%DT S X=Y K:Y<1 X` LAST EDITED: `JAN 30, 2017` HELP-PROMPT: `Enter the date last changed.` DESCRIPTION: `This is the date last changed, in the format YYYYMMDD.` `WRITE AUTHORITY: ^`
23	CHANGE TYPE	4;4	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>3!($L(X)<1) X` `MAXIMUM LENGTH: 3` LAST EDITED: `JAN 30, 2017` HELP-PROMPT: `Enter an answer 1-3 characters in length.` DESCRIPTION: `This is the Change Type Code. DEL= Delete; ADD=add; NAM=change to Analyte/ Component (field #2); MAJ=change to name field other than #2 (#3-#7); MIN=change to field other than name.` `WRITE AUTHORITY: ^`
24	CHANGE REASON	4;5	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>205!($L(X)<1) X` `MAXIMUM LENGTH: 205` LAST EDITED: `JAN 30, 2017` HELP-PROMPT: `Enter an answer 1-205 characters in length.` DESCRIPTION: `This is the reason the term was changed. If a term has been changed, the reason for the change is detailed here.` `WRITE AUTHORITY: ^`
25	VERSION NUMBER	4;6	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>15!($L(X)<1) X` `MAXIMUM LENGTH: 15` LAST EDITED: `JAN 30, 2017` HELP-PROMPT: `Enter an answer 1-15 characters in length.` DESCRIPTION: `This is the LOINC version number for this code.`
33	SNOMED CODE	1;4	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>9!($L(X)<1) X` `MAXIMUM LENGTH: 9` LAST EDITED: `JAN 30, 2017` HELP-PROMPT: `Enter an answer 1-9 characters in length.` DESCRIPTION: `This is the SNOMED Code (future versions). Not currently used.` `WRITE AUTHORITY: ^`
41	CLASSTYPE	3;1	SET	'1' FOR LABORATORY; '2' FOR CLINICAL; '3' FOR CLAIMS; '4' FOR SURVEYS; LAST EDITED: `JAN 30, 2017` HELP-PROMPT: `Enter the class type.` DESCRIPTION: `This field is used to indicate the source of this code. There are at least four general areas: Laboratory Class, Clinical Class, Claims Attachment and Surveys. The selections are available on the Regenstrief RELMA class` `restriction window.` `WRITE AUTHORITY: ^`
80	FULLY SPECIFIED NAME	80;1	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>250!($L(X)<1) X` `MAXIMUM LENGTH: 250` LAST EDITED: `JAN 30, 2017` HELP-PROMPT: `Enter an answer 1-250 characters in length.` DESCRIPTION: `This field contains the fully specified name of the LOINC code. It has five or six major parts including: the name of the component or analyte measured, the property observed, the timing of the measurement, the type of` `sample, the scale of measurement, and where relevant, the method of the measurement. The colon character, ":", is part of the name and is used to separate the main parts of the name.` `WRITE AUTHORITY: ^` `UNEDITABLE`
81	SHORTNAME	81;1	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>80!($L(X)<1) X` `MAXIMUM LENGTH: 80` LAST EDITED: `JAN 30, 2017` HELP-PROMPT: `Enter an answer 1-80 characters in length.` DESCRIPTION: `This field was introduced in LOINC version 2.07; the field is a concatenation of the fully specified LOINC name. This field may be used as the test name on reports rather than the fully specified name in the FULLY` `SPECIFIED NAME (#80) field.` `WRITE AUTHORITY: ^` `UNEDITABLE` CROSS-REFERENCE: `129.1^E` `1)= S ^ETSLNC(129.1,"E",$E(X,1,30),DA)=""` `2)= K ^ETSLNC(129.1,"E",$E(X,1,30),DA)` `3)= LOINC Short name` `This cross-reference contains the LOINC short name for selected codes. The field is a concatenation of the fully specified LOINC Name. Not all LOINC codes have short name as issued by Regenstrief Institute.`
82	VA COMMON DISPLAY NAME	82;E1,100	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>100!($L(X)<1) X` `MAXIMUM LENGTH: 100` LAST EDITED: `JAN 30, 2017` HELP-PROMPT: `Enter an answer 1-100 characters in length.` DESCRIPTION: `This field contains common display names derived from the LOINC codes to be used as a clinician-friendly display of the standard LOINC codes. Names for LOINC codes not related to lab have been created using the component` `axes of the LOINC code.`
83	LONG COMMON NAME	83;E1,245	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>245!($L(X)<1) X` `MAXIMUM LENGTH: 245` LAST EDITED: `FEB 06, 2017` HELP-PROMPT: `Enter an answer 1-245 characters in length.` DESCRIPTION: `This field contains the LOINC term in a more readable format than the fully specified name. The long common names have been created via a table-driven algorithmic process. Most abbreviations and acronyms that are used in` `the LOINC database have been fully spelled out in English.` CROSS-REFERENCE: `129.1^D^MUMPS` `1)= D SETLNC^ETSLNCIX(X,DA)` `2)= D KILLLNC^ETSLNCIX(X,DA)` `This is a LEXICON style Taxonomy index for the LONG COMMON NAME field. Each term in the LONG COMMON NAME is indexed up to either the [ character or the words IN, ON, or BY. Punctuation only terms, such as " -- " are not` `indexed as well.`
84	EXTERNAL COPYRIGHT NOTICE	84;0	WORD-PROCESSING #129.101	DESCRIPTION: `This is the external copyright holders copyright notice for this LOINC code.` LAST EDITED: `JAN 29, 2017` HELP-PROMPT: `Enter the external copyright holders copyright notice for this LOINC code.` DESCRIPTION: `This is the external copyright holders copyright notice for this LOINC code.`
85	EXAMPLE UCUM UNITS	85;E1,245	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>245!($L(X)<1) X` `MAXIMUM LENGTH: 245` LAST EDITED: `JAN 30, 2017` HELP-PROMPT: `Enter an answer 1-245 characters in length.` DESCRIPTION: `Unified Code for Units of Measure (UCUM) is a code system intended to include all units of measures being contemporarily used in international science, engineering, and business. (www.unitsofmeasure.org ). This field` `contains example units of measures for this term expressed as UCUM units.`
86	REPEAT OBSERVATION	86;E1,245	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>245!($L(X)<1) X` `MAXIMUM LENGTH: 245` LAST EDITED: `JAN 30, 2017` HELP-PROMPT: `Enter an answer 1-245 characters in length.` DESCRIPTION: `This field contains data that shows repeat observations taken at the same time and/or on the same specimen.`
95	ACTIVATION STATUS	SS;0	DATE Multiple #129.103	129.103 LAST EDITED: `JAN 31, 2017` DESCRIPTION: `This field describes the pair Activation Status and Activation Effective Date for each reference term.` `WRITE AUTHORITY: ^`
99	COMMENTS	99;0	WORD-PROCESSING #129.102	DESCRIPTION: `This field contains free-text comments relating to the test result.` LAST EDITED: `JAN 30, 2017` HELP-PROMPT: `Enter comments.` DESCRIPTION: `Free-text comments relating to the test result.`
99.98	MASTER ENTRY FOR VUID	VUID;2	SET	**********************REQUIRED FIELD********************** '1' FOR YES; '0' FOR NO; LAST EDITED: `FEB 09, 2017` HELP-PROMPT: `Enter 1 for YES if this is the master entry for this VUID code; otherwise, enter 0 for NO.` DESCRIPTION: `This field identifies the Master entry for a VUID associated with a Term/Concept.` `WRITE AUTHORITY: ^` `UNEDITABLE` RECORD INDEXES: `AMASTERVUID (#1436)`
99.99	VUID	VUID;1	FREE TEXT	**********************REQUIRED FIELD********************** INPUT TRANSFORM: `S X=+X K:$L(X)>20!($L(X)<1)!'(X?1.20N) X` `MAXIMUM LENGTH: 20` LAST EDITED: `JAN 30, 2017` HELP-PROMPT: `Enter an answer 1-20 digits in length.` DESCRIPTION: `This is the VHA Unique ID (VUID), a unique meaningless integer assigned to reference terms VHA-wide.` `WRITE AUTHORITY: ^` `UNEDITABLE` CROSS-REFERENCE: `129.1^AVUID^MUMPS` `1)= S ^ETSLNC(129.1,"AVUID",$E(X,1,30),DA)=""` `2)= K ^ETSLNC(129.1,"AVUID",$E(X,1,30),DA)` `3)= This cross-reference is by VUID.` RECORD INDEXES: `AMASTERVUID (#1436)`
99.991	EFFECTIVE DATE/TIME	TERMSTATUS;0	DATE Multiple #129.104	129.104 DESCRIPTION: `This field describes the pair Status and Effective Date/Time for the VUID.` `WRITE AUTHORITY: ^`

Customize PDF page

Package: Enterprise Terminology Services

Global: ^ETSLNC(129.1

Information

Description

Directly Accessed By Routines, Total: 5

Accessed By FileMan Db Calls, Total: 3

Pointer To FileMan Files, Total: 3

Fields, Total: 34