STANDARD DATA DICTIONARY #757.5 -- UCUM CODES FILE 3/24/25 PAGE 1
STORED IN ^LEX(757.5, (812 ENTRIES) SITE: WWW.BMIRWIN.COM UCI: VISTA,VISTA (VERSION 2.0)
DATA NAME GLOBAL DATA
ELEMENT TITLE LOCATION TYPE
-----------------------------------------------------------------------------------------------------------------------------------
The Unified Code for Units of Measure (UCUM) Copyright Regenstrief Institute, Inc. and the UCUM Organization, Indianapolis, IN. All
rights reserved. This table of examples does not include all possible UCUM codes. It does include those needed for routine
laboratory and clinical measures. This table was compiled by the National Library of Medicine, National Institutes of Health, U.S.
Department of Health and Human Services with content contributions from Intermountain Healthcare and the Regenstrief Institute.
DD ACCESS: @
RD ACCESS: @
WR ACCESS: @
DEL ACCESS: @
LAYGO ACCESS: @
AUDIT ACCESS: @
IDENTIFIED BY: UCUM CODE (#1)[R]
PRIMARY KEY: A (#50)
Uniqueness Index: B (#430)
File, Field: 1) DESCRIPTION OF THE UNIT (757.5,.01)
POINTED TO BY: UCUM CODE field (#223) of the REMINDER TAXONOMY File (#811.2)
DOSE UNITS field (#1313) of the IMMUNIZATION sub-field (#920.051) of the IMM DEFAULT RESPONSES File (#920.05)
DOSE UNITS field (#1313) of the V IMMUNIZATION File (#9000010.11)
UCUM CODE field (#221) of the V EXAM File (#9000010.13)
UCUM CODE field (#221) of the V PATIENT ED File (#9000010.16)
UCUM CODE field (#221) of the V HEALTH FACTORS File (#9000010.23)
UCUM CODE field (#221) of the V STANDARD CODES File (#9000010.71)
DOSE UNITS field (#1313) of the V IMMUNIZATION DELETED File (#9000080.11)
UCUM CODE field (#223) of the EDUCATION TOPICS File (#9999999.09)
UCUM CODE field (#223) of the EXAM File (#9999999.15)
UCUM CODE field (#223) of the HEALTH FACTORS File (#9999999.64)
INDEXED BY: DESCRIPTION OF THE UNIT (B), UCUM CODE (C), DESCRIPTION OF THE UNIT (UPB), UCUM CODE (UPC)
757.5,.01 DESCRIPTION OF THE UNIT 0;1 FREE TEXT (Required) (Key field)
INPUT TRANSFORM: K:$L(X)>240!($L(X)<1)!'(X'?1P.E) X
LAST EDITED: AUG 17, 2015
HELP-PROMPT: Enter the description of the unit, up to 240 characters.
DESCRIPTION: Description of the Unit (using UCUM descriptions where they exist).
FIELD INDEX: B (#430) REGULAR IR LOOKUP & SORTING
Unique for: Key A (#50), File #757.5
Short Descr: New-style "B" index.
Description: ^LEX(757.5,"B",DOU,IEN) - Where DOU is the Description of the Unit (up to 240 characters) and IEN
is the Internal Entry Number in file #757.5 where the Description of the Unit is stored.
Set Logic: S ^LEX(757.5,"B",$E(X,1,240),DA)=""
Kill Logic: K ^LEX(757.5,"B",$E(X,1,240),DA)
Whole Kill: K ^LEX(757.5,"B")
X(1): DESCRIPTION OF THE UNIT (757.5,.01) (Subscr 1) (Len 240) (forwards)
FIELD INDEX: UPB (#432) MUMPS IR LOOKUP & SORTING
Short Descr: Uppercase version of the "B" index.
Description: ^LEX(757.5,"UPB",UPDOU,IEN) - Where UPDOU is the uppercase Description of the Unit (up to 240
characters) and IEN is the Internal Entry Number in file #757.5 where the Description of the Unit
is stored.
Set Logic: S ^LEX(757.5,"UPB",$$UP^XLFSTR(X),DA)=""
Kill Logic: K ^LEX(757.5,"UPB",$$UP^XLFSTR(X),DA)
Whole Kill: K ^LEX(757.5,"UPB")
X(1): DESCRIPTION OF THE UNIT (757.5,.01) (Subscr 1) (Len 240) (forwards)
757.5,1 UCUM CODE 1;1 FREE TEXT (Required)
INPUT TRANSFORM: K:$L(X)>30!($L(X)<1) X
OUTPUT TRANSFORM: S Y=$TR(Y,"10*","10^")
LAST EDITED: AUG 19, 2015
HELP-PROMPT: Enter the UCUM code.
DESCRIPTION: This is the UCUM code.
FIELD INDEX: C (#431) MUMPS IR LOOKUP & SORTING
Short Descr: New-style index on the UCUM Code.
Description: ^LEX(757.5,"C",CODE,IEN) - Where CODE is a UCUM Code and IEN is the Internal Entry Number in file
#757.5 where the UCUM Code is stored.
Set Logic: S ^LEX(757.5,"C",X,DA)=""
Kill Logic: K ^LEX(757.5,"C",X,DA)
Whole Kill: K ^LEX(757.5,"C")
X(1): UCUM CODE (757.5,1) (Subscr 1) (Len 30) (forwards)
FIELD INDEX: UPC (#433) MUMPS IR LOOKUP & SORTING
Short Descr: Uppercase version of the "C" index.
Description: ^LEX(757.5,"UPC",UPCODE,IEN) - Where UPCODE is a UCUM Code in uppercase and IEN is the Internal
Entry Number in file #757.5 where the UCUM Code is stored.
Set Logic: S X=$TR(X,"10*","10^"),X=$$UP^XLFSTR(X),^LEX(757.5,"UPC",X,DA)=""
Kill Logic: S X=$TR(X,"10*","10^"),X=$$UP^XLFSTR(X) K ^LEX(757.5,"UPC",X,DA)
Whole Kill: K ^LEX(757.5,"UPC")
X(1): UCUM CODE (757.5,1) (Subscr 1) (Len 30) (forwards)
757.5,2 ROW NUMBER 1;2 NUMBER
INPUT TRANSFORM: K:+X'=X!(X>999999)!(X<1)!(X?.E1"."1N.N) X
LAST EDITED: AUG 10, 2015
HELP-PROMPT: Enter the row number.
DESCRIPTION: This number has no significance beyond identifying a unique row in the spreadsheet from which the
UCUM codes in this file were obtained. In particular, it does not officially denote a UCUM code.
Please use this number when suggesting changes or identifying problems with a given term.
757.5,3 COMMENT 2;1 FREE TEXT
INPUT TRANSFORM: K:$L(X)>240!($L(X)<3) X
LAST EDITED: AUG 10, 2015
HELP-PROMPT: Enter the Comment, up to 240 characters.
DESCRIPTION: The Comment field contains additional information about the unit.
INPUT TEMPLATE(S):
PRINT TEMPLATE(S):
SORT TEMPLATE(S):
FORM(S)/BLOCK(S):