©2011-2018 Open Source Electronic Health Record Alliance
This work is licensed under a Creative Commons Attribution 3.0 Unported License
This work is licensed under a Creative Commons Attribution 3.0 Unported License
TIUDD98 ; slc/KCM - Build menus in XUTL (file 8925.1) ;7/19/94 13:51 ;
Source file <TIUDD98.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| UP(X) | ; Convert X to upper case
|
|
| REDO | ; Update TIMESTAMP on self when Print Name Changes
; From: File 8925.9801, Field .03 Entry: DA Exit: DA |
|
| SET | ;From: Cross reference in file 8925.98, field 99 Entry: DA Exit: DA
|
|
| KILL | ; From: File 8925.98, Field 99 Entry: DA Exit: DA
|
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^TIU(8925.1 - [#8925.1] | SET+9, SET+10, SET+16, SET+21 |
| ^TIU(8925.98 - [#8925.98] | SET+2, SET+3, SET+8, SET+9, SET+15, SET+17!, SET+18*, SET+28*, REDO+2 |
| ^TMP("XQORM" | SET+5!, SET+11*, SET+13, SET+14, SET+29! |
| ^XUTL("XQORM" | SET+3, SET+7*, SET+25*, SET+26*, SET+27*, SET+28*, KILL+1! |
| Name | Line Occurrences |
|---|---|
| $$UP | SET+26, SET+27 |
| KILL | SET+5 |
| Name | Field # of Occurrence |
|---|---|
| ^(99 | REDO+2* |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| >> DA | SET+2, SET+3, SET+7, SET+8, SET+9, SET+15, SET+17, SET+18, SET+25, SET+26 , SET+27, SET+28, KILL+1 |
| >> DA(1 | REDO+2 |
| I | SET+23~* |
| S1 | SET+4~, SET+12*, SET+13*, SET+14 |
| S2 | SET+4~, SET+7*, SET+8*, SET+9, SET+11, SET+13*, SET+14*, SET+15, SET+17, SET+18 , SET+25 |
| TIUCCOL | SET+4~, SET+12*, SET+19*, SET+20 |
| TIUCOL | SET+4~, SET+6*, SET+7, SET+12 |
| TIUCROW | SET+4~, SET+12*, SET+19*, SET+20 |
| TIUPOS | SET+4~, SET+20*, SET+25, SET+26, SET+27 |
| TIUROW | SET+4~, SET+12*, SET+19 |
| TIUTOT | SET+4~, SET+7*, SET+11*, SET+12 |
| U | SET+9, SET+10, SET+16, SET+21, SET+25 |
| X | SET+4~, SET+9*, SET+10*, SET+11, SET+15*, SET+16, SET+17, SET+21, SET+25, SET+27 , SET+28*, UP~, UP+1 |
| X1 | SET+4~, SET+21*, SET+22*, SET+23*, SET+24*, SET+25, SET+26 |