Per VHA Directive, 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 the 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 shall not be supported. This is a table of administration sites - areas of the patient's body through which a vaccine/immunization can be administered. The values in this table are from the HL7-defined Table 0163 - Administrative site.
INPUT TRANSFORM: K:$L(X)>30!($L(X)<3)!'(X'?1P.E) X
LAST EDITED: FEB 27, 2015
HELP-PROMPT: Answer must be 3-30 characters in length.
DESCRIPTION:
This is area on the body of the patient where the immunization/vaccine was administered. The entry is expected to be 3-30 characters with all alpha characters being uppercase
TECHNICAL DESCR: This is the area of a patient's body to where a vaccine can be administered. The entry is expected to be 3-30 characters, with the alpha characters being all uppercase. The entry here should correspond to one of the
entries the HL7 0163 Body Site Codeset table.
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")
DELETE TEST: 1,0)= D:'$D(XUMF) EN^DDIOL("Entries must be inactivated via the Master File Server(MFS).","","!?5") I '$D(XUMF)
LAYGO TEST: 1,0)= D:'$D(XUMF) EN^DDIOL("Entries must be added via the Master File Server(MFS).","","!?5") I $D(XUMF)
HELP-PROMPT: Enter the term that replaces this term.
DESCRIPTION: This field is populated when one Term/Concept replaces another Term/Concept. The 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: 920.3^AREPLACETERM
1)= S ^PXV(920.3,"AREPLACETERM",$E(X,1,30),DA)=""
2)= K ^PXV(920.3,"AREPLACETERM",$E(X,1,30),DA)
This cross-reference can be used to identify the replacement entries associated with a Term/Concept.