STANDARD DATA DICTIONARY #604.48 -- ASI ROUTE OF ADMINISTRATION FILE 6/27/25 PAGE 1 STORED IN ^YSTX(604.48, (7 ENTRIES) SITE: WWW.BMIRWIN.COM UCI: VISTA,VISTA (VERSION 5.01) DATA NAME GLOBAL DATA ELEMENT TITLE LOCATION TYPE ----------------------------------------------------------------------------------------------------------------------------------- These are the routes of drug administration ie nasal. This is a static file and local modifications are not permitted. IDENTIFIED BY: ROA (#.02) POINTED TO BY: ALCOHOL ANY USE ROA field (#10.03) of the ADDICTION SEVERITY INDEX File (#604) ALCOHOL INTOX ROA field (#10.06) of the ADDICTION SEVERITY INDEX File (#604) HEROIN ROA field (#10.09) of the ADDICTION SEVERITY INDEX File (#604) METHADONE ROA field (#10.14) of the ADDICTION SEVERITY INDEX File (#604) OTHER OPIATES/ANA ROA field (#10.17) of the ADDICTION SEVERITY INDEX File (#604) BARBITUATES ROA field (#10.21) of the ADDICTION SEVERITY INDEX File (#604) OTHER S H T ROA field (#10.24) of the ADDICTION SEVERITY INDEX File (#604) COCAINE ROA field (#10.27) of the ADDICTION SEVERITY INDEX File (#604) AMPHETAMINES ROA field (#10.31) of the ADDICTION SEVERITY INDEX File (#604) CANNABIS ROA field (#10.34) of the ADDICTION SEVERITY INDEX File (#604) HALLUCINOGENS ROA field (#10.37) of the ADDICTION SEVERITY INDEX File (#604) INHALANTS ROA field (#10.41) of the ADDICTION SEVERITY INDEX File (#604) CROSS REFERENCED BY: CODE(B), ROA(C) 604.48,.01 CODE 0;1 FREE TEXT (Required) INPUT TRANSFORM: K:$L(X)>1!($L(X)<1) X LAST EDITED: MAR 13, 1996 HELP-PROMPT: Answer must be 1 character in length. DESCRIPTION: This field contains the CODE for routes of drug administration. CROSS-REFERENCE: 604.48^B 1)= S ^YSTX(604.48,"B",$E(X,1,30),DA)="" 2)= K ^YSTX(604.48,"B",$E(X,1,30),DA) 604.48,.02 ROA 0;2 FREE TEXT INPUT TRANSFORM: K:$L(X)>30!($L(X)<1) X LAST EDITED: APR 15, 1996 HELP-PROMPT: Answer must be 1-30 characters in length. DESCRIPTION: This field contains the literal text of the drug route of administration. CROSS-REFERENCE: 604.48^C 1)= S ^YSTX(604.48,"C",$E(X,1,30),DA)="" 2)= K ^YSTX(604.48,"C",$E(X,1,30),DA) INPUT TEMPLATE(S): PRINT TEMPLATE(S): SORT TEMPLATE(S): FORM(S)/BLOCK(S):