STANDARD DATA DICTIONARY #71.7 -- SITE OF ADMINISTRATION FILE 9/29/25 PAGE 1
STORED IN ^RAMIS(71.7, (47 ENTRIES) SITE: WWW.BMIRWIN.COM UCI: VISTA,VISTA (VERSION 5.0)
DATA NAME GLOBAL DATA
ELEMENT TITLE LOCATION TYPE
-----------------------------------------------------------------------------------------------------------------------------------
This file contains frequently-used sites of drug administration for imaging exams.
DD ACCESS: @
POINTED TO BY: SITE OF ADMINISTRATION field (#12) of the RADIOPHARMACEUTICALS sub-field (#70.21) of the NUC MED EXAM DATA File
(#70.2)
DEFAULT SITE OF ADMINISTRATION field (#4) of the DEFAULT RADIOPHARMACEUTICALS sub-field (#71.08) of the RAD/NUC MED
PROCEDURES File (#71)
DEFAULT SITE OF ADMINISTRATION field (#4) of the DEFAULT RADIOPHARMACEUTICALS sub-field (#71.1108) of the NEW RAD
PROCEDURE WORKUP File (#71.11)
VALID SITES OF ADMINISTRATION field (#.01) of the VALID SITES OF ADMINISTRATION sub-field (#71.62) of the ROUTE OF
ADMINISTRATION File (#71.6)
CROSS
REFERENCED BY: NAME(B), SYNONYM(D)
71.7,.01 NAME 0;1 FREE TEXT (Required)
INPUT TRANSFORM: K:$L(X)>45!($L(X)<3)!'(X'?1P.E) X S:$D(X) X=$$UP^XLFSTR(X)
LAST EDITED: AUG 26, 1996
HELP-PROMPT: Enter a site of drug administration.
DESCRIPTION:
This is the name of the site of drug administration used in imaging exams.
DELETE TEST: 1,0)= I 1 W !,"Deletion not allowed! "
NOTES: XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
CROSS-REFERENCE: 71.7^B
1)= S ^RAMIS(71.7,"B",$E(X,1,30),DA)=""
2)= K ^RAMIS(71.7,"B",$E(X,1,30),DA)
71.7,100 SYNONYM SYN;0 Multiple #71.701 (Add New Entry without Asking)
71.701,.01 SYNONYM 0;1 FREE TEXT (Multiply asked)
INPUT TRANSFORM: K:$L(X)>30!($L(X)<1) X
LAST EDITED: AUG 26, 1996
HELP-PROMPT: Synonym must be 1-30 characters in length.
DESCRIPTION: Terms commonly used to refer to the site of drug administration may be entered here. The system
will use synonyms as well as the name of the site when users are selecting entries in this file.
CROSS-REFERENCE: 71.701^B
1)= S ^RAMIS(71.7,DA(1),"SYN","B",$E(X,1,30),DA)=""
2)= K ^RAMIS(71.7,DA(1),"SYN","B",$E(X,1,30),DA)
CROSS-REFERENCE: 71.7^D
1)= S ^RAMIS(71.7,"D",$E(X,1,30),DA(1),DA)=""
2)= K ^RAMIS(71.7,"D",$E(X,1,30),DA(1),DA)
3)= Don't delete
This is a regular file-wide cross-reference that is necessary for users to be able to look up
entries by their synonyms.
INPUT TEMPLATE(S):
PRINT TEMPLATE(S):
SORT TEMPLATE(S):
FORM(S)/BLOCK(S):