STANDARD DATA DICTIONARY #690.5 -- ASTM FILE 9/29/25 PAGE 1
STORED IN ^MCAR(690.5, (1327 ENTRIES) SITE: WWW.BMIRWIN.COM UCI: VISTA,VISTA (VERSION 2.3)
DATA NAME GLOBAL DATA
ELEMENT TITLE LOCATION TYPE
-----------------------------------------------------------------------------------------------------------------------------------
This file contains ASTM codes for the HL7 messaging builder for Medicine.
DD ACCESS: @
AUDIT ACCESS: @
IDENTIFIED BY: ASTM EXTENSION (#1)
"WRITE": W " ",$P(^(0),U,3)
POINTED TO BY: ASTM field (#2) of the FIELD sub-field (#690.22) of the MEDICINE VIEW File (#690.2)
ASTM field (#2) of the SUB-FIELD sub-field (#690.231) of the SUB-FILE sub-field (#690.23) of the MEDICINE VIEW File
(#690.2)
CROSS
REFERENCED BY: CPT CODE(B), ASTM EXTENSION(C)
690.5,.01 CPT CODE 0;1 POINTER TO CPT FILE (#81) (Required)
LAST EDITED: OCT 07, 1993
CROSS-REFERENCE: 690.5^B
1)= S ^MCAR(690.5,"B",$E(X,1,30),DA)=""
2)= K ^MCAR(690.5,"B",$E(X,1,30),DA)
690.5,1 ASTM EXTENSION 0;2 FREE TEXT
INPUT TRANSFORM: K:X[""""!($A(X)=45) X I $D(X) K:$L(X)>5!($L(X)<1) X
LAST EDITED: OCT 13, 1993
HELP-PROMPT: Please type in a number from .01 to .99 or &IMP, &REC, or &DEV
CROSS-REFERENCE: 690.5^C
1)= S ^MCAR(690.5,"C",$E(X,1,30),DA)=""
2)= K ^MCAR(690.5,"C",$E(X,1,30),DA)
690.5,2 DESCRIPTIONS 0;3 FREE TEXT
INPUT TRANSFORM: K:X[""""!($A(X)=45) X I $D(X) K:$L(X)>50!($L(X)<1) X
LAST EDITED: OCT 15, 1993
HELP-PROMPT: Answer must be 1-50 characters in length.
FILES POINTED TO FIELDS
CPT (#81) CPT CODE (#.01)
INPUT TEMPLATE(S):
PRINT TEMPLATE(S):
SORT TEMPLATE(S):
FORM(S)/BLOCK(S):