| FILE |
757.5 |
| NAME |
UPC |
| 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.
|
| SHORT DESCRIPTION |
Uppercase version of the "C" index. |
| TYPE |
MUMPS |
| EXECUTION |
FIELD |
| ACTIVITY |
IR |
| USE |
LOOKUP & SORTING |
| ROOT TYPE |
INDEX FILE |
| ROOT FILE |
757.5 |
| SET LOGIC |
S X=$TR(X,"10*","10^"),X=$$UP^XLFSTR(X),^LEX(757.5,"UPC",X,DA)="" |
| CROSS-REFERENCE VALUES |
-
- ORDER NUMBER: 1
- SUBSCRIPT NUMBER: 1
- TYPE OF VALUE: FIELD
- FILE: 757.5
- FIELD: 1
- MAXIMUM LENGTH: 30
- COLLATION: forwards
|
| KILL LOGIC |
S X=$TR(X,"10*","10^"),X=$$UP^XLFSTR(X) K ^LEX(757.5,"UPC",X,DA) |
| KILL ENTIRE INDEX CODE |
K ^LEX(757.5,"UPC") |
