STANDARD DATA DICTIONARY #71.7 -- SITE OF ADMINISTRATION FILE 3/24/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):