STANDARD DATA DICTIONARY #61 -- TOPOGRAPHY FIELD FILE 9/29/25 PAGE 1
STORED IN ^LAB(61, (8576 ENTRIES) SITE: WWW.BMIRWIN.COM UCI: VISTA,VISTA (VERSION 5.2)
DATA NAME GLOBAL DATA
ELEMENT TITLE LOCATION TYPE
-----------------------------------------------------------------------------------------------------------------------------------
This is the TOPOGRAPHY file of SNOMED
POINTED TO BY: SPECIMEN TYPE field (#17.4) of the DRUG File (#50)
*SPECIMEN TYPE field (#623004) of the DRUG File (#50)
SPECIMEN TYPE field (#2) of the CLOZAPINE LAB TEST sub-field (#50.02) of the DRUG File (#50)
SITE/SPECIMEN field (#.01) of the SITE/SPECIMEN sub-field (#60.01) of the LABORATORY TEST File (#60)
DEFAULT SPECIMEN field (#2) of the COLLECTION SAMPLE File (#62)
*SPECIMEN field (#.01) of the *PRIMARY DISPLAY sub-field (#62.062) of the ANTIMICROBIAL SUSCEPTIBILITY File (#62.06)
SPECIMEN (SCREEN) field (#2) of the ALTERNATE SCREEN sub-field (#62.08) of the ANTIMICROBIAL SUSCEPTIBILITY File
(#62.06)
SPECIMEN (INTERP) field (#2) of the ALTERNATE INTERPRETATION sub-field (#62.091) of the SUSCEPTIBILITY RESULT
sub-field (#62.061) of the ANTIMICROBIAL SUSCEPTIBILITY File (#62.06)
MIMIC SPECIMEN field (#.04) of the LAB CONTROL NAME File (#62.3)
SPECIMEN field (#8) of the LABORATORY TESTS sub-field (#62.41) of the AUTO INSTRUMENT File (#62.4)
VA FILE ENTRY field (#.01) of the NON-VA ORDER SNOMED CODES sub-field (#62.482) of the LA7 MESSAGE PARAMETER File
(#62.48)
SPECIMEN field (#4) of the TEST sub-field (#62.61) of the ACCESSION TEST GROUP File (#62.6)
SPECIMEN TYPE field (#.03) of the SPECIMENS sub-field (#62.801) of the LAB SHIPPING MANIFEST File (#62.8)
SPECIMEN field (#.03) of the TEST/PROFILE sub-field (#62.9001) of the LAB SHIPPING CONFIGURATION File (#62.9)
SPECIMEN field (#.05) of the BLOOD BANK sub-field (#63.01) of the LAB DATA File (#63)
SPECIMEN TYPE field (#.05) of the CHEM, HEM, TOX, RIA, SER, etc. sub-field (#63.04) of the LAB DATA File (#63)
SITE/SPECIMEN field (#.05) of the MICROBIOLOGY sub-field (#63.05) of the LAB DATA File (#63)
SPECIMEN TOPOGRAPHY field (#8) of the ORDERED TEST sub-field (#63.07) of the CHEM, HEM, TOX, RIA, SER, etc.
sub-field (#63.04) of the LAB DATA File (#63)
ORGAN/TISSUE field (#.01) of the ORGAN/TISSUE sub-field (#63.12) of the SURGICAL PATHOLOGY sub-field (#63.08) of the
LAB DATA File (#63)
AUTOPSY ORGAN/TISSUE field (#.01) of the AUTOPSY ORGAN/TISSUE sub-field (#63.2) of the LAB DATA File (#63)
SPECIMEN TOPOGRAPHY field (#.06) of the SPECIMEN sub-field (#63.202) of the EM sub-field (#63.02) of the LAB DATA
File (#63)
EM ORGAN/TISSUE field (#.01) of the EM ORGAN/TISSUE sub-field (#63.212) of the EM sub-field (#63.02) of the LAB DATA
File (#63)
SPECIMEN TOPOGRAPHY field (#8) of the ORDERED TEST sub-field (#63.5) of the MICROBIOLOGY sub-field (#63.05) of the
LAB DATA File (#63)
SPECIMEN TOPOGRAPHY field (#8) of the ORDERED TEST sub-field (#63.51) of the CYTOPATHOLOGY sub-field (#63.09) of the
LAB DATA File (#63)
SPECIMEN TOPOGRAPHY field (#8) of the ORDERED TEST sub-field (#63.52) of the EM sub-field (#63.02) of the LAB DATA
File (#63)
SPECIMEN TOPOGRAPHY field (#8) of the ORDERED TEST sub-field (#63.53) of the SURGICAL PATHOLOGY sub-field (#63.08)
of the LAB DATA File (#63)
SPECIMEN TOPOGRAPHY field (#.06) of the SPECIMEN sub-field (#63.812) of the SURGICAL PATHOLOGY sub-field (#63.08) of
the LAB DATA File (#63)
SPECIMEN TOPOGRAPHY field (#.06) of the SPECIMEN sub-field (#63.902) of the CYTOPATHOLOGY sub-field (#63.09) of the
LAB DATA File (#63)
CYTOPATH ORGAN/TISSUE field (#.01) of the CYTOPATH ORGAN/TISSUE sub-field (#63.912) of the CYTOPATHOLOGY sub-field
(#63.09) of the LAB DATA File (#63)
SPECIMEN TYPE field (#.05) of the CHEM sub-field (#63.999904) of the ARCHIVED LR DATA File (#63.9999)
SPECIMEN field (#.01) of the SPECIMEN sub-field (#64.01) of the WKLD CODE File (#64)
SPECIMEN field (#16) of the WKLD LOG FILE File (#64.03)
SPECIMEN field (#7) of the LAB DSS LAR EXTRACT File (#64.036)
ASSOCIATED FILES field (#4) of the LAB ELECTRONIC CODES File (#64.061)
SPECIMEN field (#13) of the ACCESSION WKLD CODE TIME sub-field (#64.1111) of the WKLD CODE sub-field (#64.111) of
the DATE sub-field (#64.11) of the WKLD DATA File (#64.1)
PROFILE SITE/SPECIMEN field (#1) of the MINOR HEADER sub-field (#64.52) of the MAJOR HEADER sub-field (#64.51) of
the LAB REPORTS File (#64.5)
ASSOCIATED FILES field (#.01) of the ASSOCIATED FILES sub-field (#64.614) of the LAB ELECTRONIC CODES File (#64.061)
TOPOGRAPHY field (#1) of the MINOR HEADER sub-field (#64.703) of the MAJOR HEADER sub-field (#64.701) of the
CUMULATIVE File (#64.7)
TOPOGRAPHY field (#1) of the RESULT sub-field (#64.708) of the COLLECTION DATE/TIME sub-field (#64.707) of the
MISCELLANEOUS sub-field (#64.702) of the CUMULATIVE File (#64.7)
SPECIMEN field (#.02) of the TESTS TO CHECK sub-field (#66.04) of the BLOOD PRODUCT File (#66)
SPECIMEN field (#.02) of the PRE-OP TESTS TO CHECK sub-field (#66.08) of the BLOOD PRODUCT File (#66)
SPECIMEN field (#.01) of the SPECIMEN sub-field (#68.05) of the ACCESSION NUMBER sub-field (#68.02) of the DATE
sub-field (#68.01) of the ACCESSION File (#68)
SPECIMEN field (#4) of the SEQUENCE or CUP NUMBER sub-field (#68.22) of the RUN or TRAY NUMBER sub-field (#68.21) of
the LOAD/WORK LIST File (#68.2)
SPECIMEN field (#1) of the TEST sub-field (#68.24) of the PROFILE sub-field (#68.23) of the LOAD/WORK LIST File
(#68.2)
Specimens to EXCLUDE! field (#.01) of the Specimen to EXCLUDE sub-field (#68.27) of the PROFILE sub-field (#68.23)
of the LOAD/WORK LIST File (#68.2)
SPECIMEN field (#.01) of the SPECIMEN sub-field (#69.02) of the SPECIMEN # sub-field (#69.01) of the LAB ORDER ENTRY
File (#69)
AP SPECIMEN field (#.06) of the AP SPECIMEN sub-field (#69.221661) of the SPECIMEN sub-field (#69.02) of the
SPECIMEN # sub-field (#69.01) of the LAB ORDER ENTRY File (#69)
SPECIMEN field (#.02) of the TEST sub-field (#69.34) of the TEST LIST NUMBER sub-field (#69.33) of the LAB SECTION
PRINT File (#69.2)
TOPOGRAPHY field (#.01) of the INCLUDED SITES sub-field (#69.56) of the LAB SEARCH/EXTRACT File (#69.5)
TOPOGRAPHY field (#.01) of the EXCLUDED SITES sub-field (#69.57) of the LAB SEARCH/EXTRACT File (#69.5)
SPECIMEN field (#4) of the LAB PENDING ORDERS ENTRY File (#69.6)
AP SPECIMEN TOPOGRAPHY field (#.02) of the AP SPECIMENS sub-field (#69.6061) of the LAB PENDING ORDERS ENTRY File
(#69.6)
TOPOGRAPHY field (#.01) of the TOPOGRAPHY sub-field (#69.61) of the LAB SECTION PRINT File (#69.2)
SPECIMEN field (#.02) of the TEST TO DISPLAY sub-field (#69.62) of the TOPOGRAPHY sub-field (#69.61) of the LAB
SECTION PRINT File (#69.2)
SPECIMEN field (#.02) of the TEST TO PRINT sub-field (#69.63) of the TOPOGRAPHY sub-field (#69.61) of the LAB
SECTION PRINT File (#69.2)
SITE SPECIMEN (TO EXCLUDE) field (#.01) of the SITE SPECIMEN (TO EXCLUDE) sub-field (#69.861) of the HOWDY SITE FILE
File (#69.86)
DEFAULT BLOOD SPECIMEN field (#100) of the LABORATORY SITE File (#69.9)
DEFAULT URINE SPECIMEN field (#101) of the LABORATORY SITE File (#69.9)
DEFAULT SERUM SPECIMEN field (#102) of the LABORATORY SITE File (#69.9)
DEFAULT PLASMA SPECIMEN field (#103) of the LABORATORY SITE File (#69.9)
DEFAULT UNKNOWN SPECIMEN field (#104) of the LABORATORY SITE File (#69.9)
FILE LINK field (#6) of the PROTOCOL File (#101)
SPECIMEN field (#.01) of the SPECIMEN sub-field (#101.453) of the AP DIALOG CONFIG File (#101.45)
SPECIMEN field (#.01) of the SPECIMEN sub-field (#104.0216061) of the MDRO SITE PARAMETERS File (#104)
INCLUDED TOPOGRAPHY field (#.01) of the INCLUDED SITES sub-field (#104.103) of the MDRO TOOLS LAB SEARCH/EXTRACT
File (#104.1)
EXCLUDED TOPOGRAPHY field (#.01) of the EXCLUDED SITES sub-field (#104.104) of the MDRO TOOLS LAB SEARCH/EXTRACT
File (#104.1)
BLOCK SITE field (#.01) of the BLOCK SITE sub-field (#130.49) of the ANESTHESIA TECHNIQUE sub-field (#130.06) of the
SURGERY File (#130)
SPECIMEN field (#2) of the RISK MODEL LAB TEST File (#139.2)
ORGAN/TISSUE field (#5) of the SUSPENSE sub-field (#160.075) of the ONCOLOGY PATIENT File (#160)
SNOMED ENCODING field (#.01) of the SNOMED ENCODING sub-field (#164.04) of the ICDO TOPOGRAPHY File (#164)
TOPOGRAPHY field (#1) of the RECORDING SITE File (#693.5)
TOPOGRAPHY field (#2) of the SEGMENT OF CORONARY ARTERIES File (#696)
TOPOGRAPHY field (#2) of the ANATOMY File (#697)
BLOOD SPECIMEN field (#.01) of the BLOOD SPECIMEN sub-field (#727.22) of the DSS LAB TESTS File (#727.2)
URINE SPECIMEN field (#.01) of the URINE SPECIMEN sub-field (#727.23) of the DSS LAB TESTS File (#727.2)
FECES SPECIMEN field (#.01) of the FECES SPECIMEN sub-field (#727.24) of the DSS LAB TESTS File (#727.2)
TOPOGRAPHY SNOMED CODE field (#.01) of the TOPOGRAPHY SNOMED CODE sub-field (#790.22) of the WV PROCEDURE TYPE File
(#790.2)
CROSS
REFERENCED BY: SCT CODE STATUS(AC), NAME(B), ABBREVIATION(B), SNOMED CODE(C), SYNONYM(D), ABBREVIATION(E), SNOMED CT ID(F),
LEDI HL7(HL7)
INDEXED BY: SCT TRANSACTION NUMBER (AD), NAME & SNOMED CT ID (AERT)
61,.01 NAME 0;1 FREE TEXT (Required)
INPUT TRANSFORM: K:$L(X)>80!($L(X)<2)!'(X'?1P.E)!(X'?.ANP) X I $D(X),X?1"T"1N.E!(X?1"T-".E) K X D EN^DDIOL("Enter SN
OMED CODE without T or T-",,"$C(7),!") Q
LAST EDITED: FEB 21, 2013
HELP-PROMPT: Answer must be 2-80 characters in length.
DESCRIPTION:
The name of the specimen or source.
TECHNICAL DESCR: When this field is modified by non-interactive means, the variable LRFMERTS should be defined.
LRFMERTS is used by the AERT xref to determine if the field is being edited by a user or by a
process.
DELETE TEST: 1,0)= I '$D(^XUSEC("LRLIASON",DUZ))
NOTES: XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
CROSS-REFERENCE: 61^B
1)= S ^LAB(61,"B",$E(X,1,80),DA)=""
2)= K ^LAB(61,"B",$E(X,1,80),DA)
RECORD INDEXES: AERT (#892)
61,.07 ICDO CODE 0;7 FREE TEXT
INPUT TRANSFORM: K:$L(X)>5!($L(X)<5)!'(X?3N1"."1N)!(X<140)!(X>199.9) X
LAST EDITED: APR 29, 1986
HELP-PROMPT: ANSWER MUST BE FROM 140.0 TO 199.9
DESCRIPTION:
The appropriate ICD0 code associated with this specimen or source.
NOTES: XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
61,.08 HL7 CODE 0;8 FREE TEXT
INPUT TRANSFORM: K:$L(X)>4!($L(X)<2) X I $D(X) K:'$$XFORM^LA7HLP(X) X
LAST EDITED: DEC 23, 1994
HELP-PROMPT: Answer must be 2-4 characters in length.
EXECUTABLE HELP: D SHOW^LA7HLP
NOTES: XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
61,.09 LEDI HL7 0;9 POINTER TO LAB ELECTRONIC CODES FILE (#64.061)
INPUT TRANSFORM: S DIC("S")="I $P(^(0),U,7)=""S"",$P(^(0),U,5)=""0070"",$P(^(0),U,3)'=""""" D ^DIC K DIC S DIC=$G(DI
E),X=+Y K:Y<0 X
LAST EDITED: JUN 03, 2003
HELP-PROMPT: This field contains the standard HL7 specimen type code.
DESCRIPTION:
This field contains the HL7 standard specimen type code.
SCREEN: S DIC("S")="I $P(^(0),U,7)=""S"",$P(^(0),U,5)=""0070"",$P(^(0),U,3)'="""""
EXPLANATION: Limits the selection of only Specimen type codes with approved HL7 specimen codes.
CROSS-REFERENCE: 61^HL7^MUMPS
1)= I $P(^LAB(64.061,X,0),U,3)'="" S:X'="" ^LAB(61,"HL7",$P(^LAB(64.061,X,0),U,3),DA)=""
2)= I $P(^LAB(64.061,X,0),U,3)'="" K:X'="" ^LAB(61,"HL7",$P(^LAB(64.061,X,0),U,3),DA)
This cross reference is used to map incoming HL7 specimen codes to an entry in the LAB ELECTRONIC
CODES file (#64.061). The cross reference is set with the following format:
S ^LAB(61,"HL7",HL7 ABBR,DA)=""
HL7 ABBR is Field (#2) in the LAB ELECTRONIC CODES file (#64.061).
61,.0961 TIME ASPECT 0;10 POINTER TO LAB ELECTRONIC CODES FILE (#64.061)
INPUT TRANSFORM: S DIC("S")="I $P(^(0),U,7)=""S""" D ^DIC K DIC S DIC=$G(DIE),X=+Y K:Y<0 X
LAST EDITED: JUL 21, 2001
DESCRIPTION: This field describes the time aspect for this specimen. (i.e. 24hour, point, fasting, 30 mins ...)
You may select any entry in the LAB ELECTRONIC CODE (#64.061) that has the type of SPECIMEN.
This field is used to determine the correct specimen LOINC code during verification of results.
SCREEN: S DIC("S")="I $P(^(0),U,7)=""S"""
EXPLANATION: Select only specimens from ELECTRONIC CODE file
61,2 SNOMED CODE 0;2 FREE TEXT
ENTER CHARACTERS FOLLOWING 'T-' IN SNOMED REFERENCE BOOK
INPUT TRANSFORM: K:$L(X)>7!($L(X)<2)!'(X?.AN)!(X?1"T-"1N.E)!(X?1"T"1N.E) X I $D(X),'$D(DIU(0)) S Y=$O(^LAB(61,"C",X,
0)) I Y>0 K:'$D(^LAB(61,Y,0)) ^LAB(61,"C",X,Y) I $D(^LAB(61,Y,0)) K X D EN^DDIOL("ALREADY AN ENTRY"
,,"$C(7),!") Q
LAST EDITED: APR 09, 2006
HELP-PROMPT: ANSWER MUST BE 2-7 CHARACTERS IN LENGTH and NOT begin with T- or T
DESCRIPTION:
The code consists of the characters following "T-" in the SNOMED reference book.
NOTES: XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
CROSS-REFERENCE: 61^C
1)= S ^LAB(61,"C",$E(X,1,30),DA)=""
2)= K ^LAB(61,"C",$E(X,1,30),DA)
61,2.5 SEX SPECIFIC 0;3 SET
'F' FOR FEMALE;
'M' FOR MALE;
LAST EDITED: MAR 21, 1984
DESCRIPTION:
If this specimen is specific to one sex only, enter F for female or M for male.
61,3 SYNONYMS 1;0 Multiple #61.01 (Add New Entry without Asking)
DESCRIPTION:
This is a multiple field. Enter synonyms or common misspellings of the specimen or organ/tissue.
61.01,.01 SYNONYM 0;1 FREE TEXT (Multiply asked)
INPUT TRANSFORM: K:$L(X)>80!($L(X)<2) X
LAST EDITED: AUG 31, 1984
HELP-PROMPT: ANSWER MUST BE 2-80 CHARACTERS IN LENGTH
DESCRIPTION:
This is a multiple field. Enter synonyms, abbreviations, or common misspellings of the specimen.
CROSS-REFERENCE: 61^D
1)= S ^LAB(61,"D",$E(X,1,30),DA(1),DA)=""
2)= K ^LAB(61,"D",$E(X,1,30),DA(1),DA)
61,4 WEIGH 0;4 SET
'1' FOR YES;
HELP-PROMPT: Should this be weighed for surgical pathology?
DESCRIPTION: WEIGH is a YES/NO question. Answer YES if you want this specimen to be weighed for surgical
pathology. A null answer equals NO.
61,4.1 COLLECTION SAMPLE 0;6 POINTER TO COLLECTION SAMPLE FILE (#62)
LAST EDITED: JUL 25, 1984
HELP-PROMPT: IF PRESENT COLLECTION SAMPLE IS ASSUMED
DESCRIPTION:
The name of the collection sample for this specimen. Points to the COLLECTION SAMPLE file.
61,5 JOURNAL REFERENCE JR;0 Multiple #61.02 (Add New Entry without Asking)
DESCRIPTION:
This is a multiple field. You may enter Journal references that apply to this specimen.
61.02,.01 TITLE OF ARTICLE 0;1 FREE TEXT (Multiply asked)
INPUT TRANSFORM: K:$L(X)>80!($L(X)<1) X
LAST EDITED: JUN 09, 1984
HELP-PROMPT: ANSWER MUST BE 1-80 CHARACTERS IN LENGTH
DESCRIPTION:
Title of an article that discusses the named specimen.
61.02,1 AUTHOR(S) 0;2 FREE TEXT
INPUT TRANSFORM: K:$L(X)>80!($L(X)<1) X
LAST EDITED: NOV 09, 1984
HELP-PROMPT: ANSWER MUST BE 1-80 CHARACTERS IN LENGTH
DESCRIPTION:
Author(s) of the named article.
61.02,2 MEDICAL JOURNAL 0;3 POINTER TO LAB JOURNAL FILE (#95)
LAST EDITED: JUN 16, 1984
DESCRIPTION:
The name of the medical journal containing the article. Points to FILE #95.
61.02,3 VOLUME 0;4 FREE TEXT
INPUT TRANSFORM: K:$L(X)>6!($L(X)<1) X
LAST EDITED: JUN 09, 1984
HELP-PROMPT: ANSWER MUST BE 1-6 CHARACTERS IN LENGTH
DESCRIPTION:
The volume number/name that contains the article.
61.02,4 STARTING PAGE 0;5 FREE TEXT
INPUT TRANSFORM: K:$L(X)>6!($L(X)<1) X
HELP-PROMPT: ANSWER MUST BE 1-6 CHARACTERS IN LENGTH
DESCRIPTION:
The first page of the article.
61.02,5 DATE 0;6 DATE
INPUT TRANSFORM: S %DT="E" D ^%DT S X=Y K:Y<1 X
LAST EDITED: JUN 09, 1984
DESCRIPTION:
Date of article.
61.02,6 LIST ON PATIENT RECORD 0;7 SET
'1' FOR YES;
'0' FOR NO;
LAST EDITED: JUN 09, 1984
DESCRIPTION: If this reference is to be listed on a patient record whenever this specimen is used, this field
requires a YES entry.
61,6 ABBREVIATION 0;5 FREE TEXT
INPUT TRANSFORM: K:X[""""!($A(X)=45) X I $D(X) K:$L(X)>3!($L(X)<1) X
LAST EDITED: OCT 23, 1984
HELP-PROMPT: ANSWER MUST BE 1-3 CHARACTERS IN LENGTH
DESCRIPTION:
This must be a 1,2, or 3 character abbreviation of the specimen.
CROSS-REFERENCE: 61^B^MNEMONIC
1)= S ^LAB(61,"B",$E(X,1,30),DA)=1
2)= K ^LAB(61,"B",$E(X,1,30),DA)
CROSS-REFERENCE: 61^E
1)= S ^LAB(61,"E",$E(X,1,30),DA)=""
2)= K ^LAB(61,"E",$E(X,1,30),DA)
61,20 SNOMED CT ID SCT;1 FREE TEXT
INPUT TRANSFORM: K:$L(X)>18!($L(X)<6)!'(X?6.18N) X D:$D(X) IT61F20^LRXREF
LAST EDITED: JUN 05, 2009
HELP-PROMPT: Enter a valid SNOMED CT Identifier (6-18 numeric).
DESCRIPTION: This is the SNOMED CT concept identifier for this entry. If this entry is null then the entry is
either unmapped or no valid SNOMED concept term exists to map this term.
This field is not editable except by the Lab software.
TECHNICAL DESCR: Field added via patch LR*5.2*350.
-----------------------------
The SNOMED CT concept identifiers assigned by The International Health Terminology Standards
Development Organisation has the following specifications.
The SCTID data type is a 64-bit integer, which is subject to the following constraints:
Only positive integer values are permitted.
The minimum permitted value is 100,000 (6 digits)
The maximum permitted value is 999,999,999,999,999,999 (18-digits).
As a result of rules for the partition-identifier and check-digit, many
integers within this range are not valid SCTIDs.
Storage of these identifiers in this file is of data type free text with a 6-18 character length
and a numeric pattern match. This conforms to The Department of Veterans Affairs M Programming
Standards and Conventions 2008. The VA SACC has reviewed and indicated this data storage is within
standards and conventions.
-----------------------------
The SNOMED CT ID (SCTID) field needs to be a valid SNOMED CT concept.
The INPUT TRANSFORM checks if the SCT code is valid. If not the INPUT TRANSFORM fails.
------------------------------
This field is modified only by non-interactive means via updates from the VA Standard Terminology
Services.
The variable LRFMERTS is used by the AERT xref to determine if the field is being edited by a user
or by a process.
NOTES: XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
CROSS-REFERENCE: 61^F
1)= S ^LAB(61,"F",$E(X,1,30),DA)=""
2)= K ^LAB(61,"F",$E(X,1,30),DA)
3)= Cross reference on the SNOMED CT code assigned to this entry
RECORD INDEXES: AERT (#892)
61,21 SCT CODE STATUS SCT;2 SET
'P' FOR PREFERRED TERM;
'S' FOR SYNONYM;
'L' FOR LOCAL;
'R' FOR REFERRED;
'X' FOR NO APPLICABLE MAPPING;
'LN' FOR NEW TERM PENDING LEXICON UPDATE;
'RN' FOR STS REQUEST NEW CODE;
'E' FOR ERROR;
LAST EDITED: JUN 08, 2009
HELP-PROMPT: Enter the status of this term's mapping to SNOMED CT.
DESCRIPTION: This field indicate the status or disposition of this entry.
P = SNOMED Preferred term
S = SNOMED Synonym term
L = Local spelling of a SNOMED term (miss-spelled)
R = Referred to national coders to determine if acceptable
X = No applicable mapping
LN = New term pending LEXICON release/update.
RN = STS Request New Code
E = Error encountered when applying STS disposition to file entry.
SCREEN: S DIC("S")="I ($G(DIUTIL)=""VERIFY FIELDS"")!$G(LRFMERTS)"
EXPLANATION: Locks field to prevent editing other than by Lab software.
CROSS-REFERENCE: 61^AC
1)= S ^LAB(61,"AC",$E(X,1,30),DA)=""
2)= K ^LAB(61,"AC",$E(X,1,30),DA)
This cross reference will sort the entries based on their mapping status or the SCT designation as
to term type.
61,22 SCT TOP CONCEPT SCT;3 POINTER TO LAB ELECTRONIC CODES FILE (#64.061)
INPUT TRANSFORM: S DIC("S")="I $P(^(0),U,11)=""SCT"",($G(DIUTIL)=""VERIFY FIELDS"")!$G(LRFMERTS)" D ^DIC K DIC S DIC
=$G(DIE),X=+Y K:Y<0 X
LAST EDITED: JUN 05, 2009
HELP-PROMPT: Select the SNOMED Hierarchy associated with this term.
DESCRIPTION: This field Identifies the SNOMED CT top level concept for this SNOMED code. This is useful to
determine the proper code when the spelling of the terms are identical but have different concept
(meaning).
SCREEN: S DIC("S")="I $P(^(0),U,11)=""SCT"",($G(DIUTIL)=""VERIFY FIELDS"")!$G(LRFMERTS)"
EXPLANATION: Select only SCT Concept terms and locks field to prevent editing other than Lab software
61,23 SCT STATUS DATE SCT1;0 DATE Multiple #61.023 (Add New Entry without Asking)
DESCRIPTION: This multiple tracks the status of SNOMED SCT codes referred to STS to determine if the code is a
valid VHA SCT term. This field is not editable except by Lab software.
INDEXED BY: SCT TRANSACTION NUMBER (AC)
61.023,.01 SCT STATUS DATE 0;1 DATE
INPUT TRANSFORM: S %DT="ESTXR" D ^%DT S X=Y K:X<1 X I $D(X),$G(DIUTIL)'="VERIFY FIELDS",'$G(LRFMERTS) K X
LAST EDITED: JUN 08, 2009
HELP-PROMPT: Enter the date the status was changed.
DESCRIPTION:
The date the status was changed.
NOTES: XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
CROSS-REFERENCE: 61.023^B
1)= S ^LAB(61,DA(1),"SCT1","B",$E(X,1,30),DA)=""
2)= K ^LAB(61,DA(1),"SCT1","B",$E(X,1,30),DA)
61.023,1 SCT STATUS CHANGE TO 0;2 SET
'P' FOR PREFERRED TERM;
'S' FOR SYNONYM;
'L' FOR LOCAL;
'R' FOR REFERRED;
'X' FOR NO APPLICABLE MAPPING;
'LN' FOR NEW TERM PENDING LEXICON UPDATE;
'RN' FOR STS REQUEST NEW CODE;
'E' FOR ERROR;
LAST EDITED: JUN 08, 2009
HELP-PROMPT: Enter the status of this term's mapping to SNOMED CT.
DESCRIPTION: This field track the status of terms referred to the ERT team to determine if this code is a
valid VHA SNOMED SCT term.
SCREEN: S DIC("S")="I ($G(DIUTIL)=""VERIFY FIELDS"")!$G(LRFMERTS)"
EXPLANATION: Locks field to prevent editing other than by Lab software.
61.023,2 SCT TRANSACTION NUMBER 0;3 FREE TEXT
INPUT TRANSFORM: K:$L(X)>45!($L(X)<1) X I $D(X),$G(DIUTIL)'="VERIFY FIELDS",'$G(LRFMERTS) K X
LAST EDITED: JUN 10, 2009
HELP-PROMPT: Answer must be 1-45 characters in length
DESCRIPTION: Transaction number generated by Laboratory software when referring a term for mediation by STS
and mapping to SNOMED CT.
NOTES: XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
FIELD INDEX: AD (#891) REGULAR IR SORTING ONLY WHOLE FILE (#61)
Short Descr: Whole file cross-reference on STS transaction numbers
Description: Index to cross-reference the transaction numbers associated with submission and disposition of
terms by STS.
Set Logic: S ^LAB(61,"AD",$E(X,1,45),DA(1),DA)=""
Kill Logic: K ^LAB(61,"AD",$E(X,1,45),DA(1),DA)
Whole Kill: K ^LAB(61,"AD")
X(1): SCT TRANSACTION NUMBER (61.023,2) (Subscr 1) (Len 45) (forwards)
FIELD INDEX: AC (#893) REGULAR IR SORTING ONLY
Short Descr: Regular cross-reference on STS transaction numbers
Description: Index to cross-reference the transaction numbers associated with submission and disposition of
terms by STS within this multiple.
Set Logic: S ^LAB(61,DA(1),"SCT1","AC",$E(X,1,45),DA)=""
Kill Logic: K ^LAB(61,DA(1),"SCT1","AC",$E(X,1,45),DA)
Whole Kill: K ^LAB(61,DA(1),"SCT1","AC")
X(1): SCT TRANSACTION NUMBER (61.023,2) (Subscr 1) (Len 45) (forwards)
61.023,3 SCT STATUS USER 0;4 POINTER TO NEW PERSON FILE (#200)
LAST EDITED: JUN 12, 2009
HELP-PROMPT: Enter the user who performed the SCT code resolution.
DESCRIPTION: Store the user who initiated the process to apply the STS SNOMED CT code resolution or the
original mapping to this file entry.
61.023,4 SCT COMMENT TEXT 1;0 WORD-PROCESSING #61.0231 (NOWRAP) (IGNORE "|")
LAST EDITED: JUN 08, 2009
DESCRIPTION: Contains text or comments related to the mapping of a term to SNOMED CT. The text can relate to
information submitted to STS for the term to be mapped, the comments returned by STS related to
the mapping and any comments when attempting to apply the disposition from STS.
LAST EDITED: JUN 08, 2009
HELP-PROMPT: Enter the comment that accompanies this disposition.
DESCRIPTION: Contains text or comments related to the mapping of a term to SNOMED CT. The text can relate
to information submitted to STS for the term to be mapped, the comments returned by STS related
to the mapping and any comments when attempting to apply the disposition from STS.
61,63.05 *NEGATIVE BACTERIOLOGY COMMENT 5;1 FREE TEXT
INPUT TRANSFORM: K:$L(X)>75!($L(X)<1) X
LAST EDITED: JUL 25, 1984
HELP-PROMPT: ANSWER MUST BE 1-75 CHARACTERS IN LENGTH
DESCRIPTION: This comment facilitates batch entry of microbiology results. The text contained in this field is
the default comment for the named specimen.
61,64.9103 INACTIVE DATE 64.91;3 DATE
INPUT TRANSFORM: S %DT="EX" D ^%DT S X=Y K:Y<1 X
LAST EDITED: JAN 31, 2012
HELP-PROMPT: Enter the date this TOPOGRAPHY entry should no longer be considered available.
DESCRIPTION: This is the date on or after which the entry will no longer be active. Inactive entries will not
be available for selection in CPRS nor be able to be associated with a test in the LABORATORY TEST
file (#60).
FILES POINTED TO FIELDS
COLLECTION SAMPLE (#62) COLLECTION SAMPLE (#4.1)
LAB ELECTRONIC CODES (#64.061) LEDI HL7 (#.09)
TIME ASPECT (#.0961)
SCT TOP CONCEPT (#22)
LAB JOURNAL (#95) JOURNAL REFERENCE:MEDICAL JOURNAL (#2)
NEW PERSON (#200) SCT STATUS DATE:SCT STATUS USER (#3)
File #61
Record Indexes:
AERT (#892) RECORD MUMPS ACTION
Short Descr: Send ERT alert if needed.
Description: Action cross reference for sending ERT alerts when an entry is added or modified.
Set Logic: D TASK^LRERT1(61,DA)
Set Cond: S X=$S('$D(LRFMERTS):1,1:0)
Kill Logic: Q
Kill Cond: S X=0
X(1): NAME (61,.01) (forwards)
X(2): SNOMED CT ID (61,20) (forwards)
INPUT TEMPLATE(S):
LRAPTOP JUL 09, 1986 USER #0
LRAPTR JUL 09, 1986 USER #0
PRINT TEMPLATE(S):
SORT TEMPLATE(S):
FORM(S)/BLOCK(S):