©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
ORDD101 ; slc/KCM - Build menus in XUTL (file 101) ;10/31/91 14:53 ;
Source file <ORDD101.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| REDOM | ;From: File 101, Field 1.1 Entry: DA(1) Exit: DA(1)
|
|
| SET | ;From: Cross reference in file 101, field 99 Entry: DA Exit: DA
|
|
| NAME | ;CHECK NAMESPACING IN PACKAGE FILE.
|
|
| UP(X) | ;Convert X to upper case
|
|
| TREE | ;Look back up tree to make sure item is not ancestor (input xform)
|
|
| CHKNAME | ;CHECK A NAME, AND DISPLAY APPROPRIATE MESSAGE
|
|
| TREE2 | ||
| KILL | ;From: File 101, Field 99 Entry: DA Exit: DA
|
|
| REDOX | ;From: Subfile 101.01, Fields .01,2,3 Entry: DA(1) Exit: DA(1)
|
|
| TREE1 | ||
| NAMEOK | ||
| TEST | ||
| T1 | ||
| REDO | ;From: File 101, Field 7 Entry: DA Exit: DA
|
| Name | Field # of Occurrence |
|---|---|
| EN^DDIOL | CHKNAME+1, CHKNAME+2, CHKNAME+3 |
| Name | Line Occurrences |
|---|---|
| Function Call: WRITE |
|
| Function Call: READ |
|
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^DIC(9.4 - [#9.4] | NAME+2, NAMEOK |
| ^ORD( | TREE1 |
| ^ORD(101 - [#101] | SET+2, SET+3, SET+6, SET+8, SET+9, SET+10, SET+15, SET+16!*, SET+19, SET+24 , SET+25*, REDO+1, REDO+2, REDOM+2, REDOX+1, CHKNAME+1 |
| ^TMP("XQORM" | SET+5!, SET+11*, SET+13, SET+14, SET+26! |
| ^XUTL("XQORM" | SET+3, SET+7*, SET+20*, SET+22*, SET+23*, SET+24*, SET+25*, KILL+1! |
| Name | Line Occurrences |
|---|---|
| $$UP | SET+22, SET+23, SET+24 |
| CHKNAME | T1 |
| KILL | SET+5 |
| NAME | CHKNAME+2 |
| NAMEOK | NAME+2 |
| T1 | T1 |
| TREE1 | TREE+2, TREE2 |
| TREE2 | TREE1 |
| Name | Field # of Occurrence |
|---|---|
| ^("B" | SET+16! |
| ^(0 | SET+24, NAMEOK |
| ^(4 | SET+6 |
| ^(99 | REDO+1*, REDO+2*, REDOM+2*, REDOX+1* |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| >> % | NAME+1*, NAME+2*, NAMEOK, CHKNAME+3 |
| >> %1 | NAME+1*, NAMEOK*, CHKNAME+3 |
| >> DA | SET+2, SET+3, SET+6, SET+7, SET+8, SET+9, SET+15, SET+16, SET+20, SET+22 , SET+23, SET+24, SET+25, KILL+1, REDO+1, REDO+2 |
| >> DA(1 | REDOM+2, REDOX+1, TREE+2 |
| >> DIFROM | CHKNAME+3 |
| DTIME | T1 |
| I | REDO+1~, REDO+2*, REDOM+1~*, REDOM+2* |
| ORCCOL | SET+4~, SET+12*, SET+17*, SET+18 |
| ORCOL | SET+4~, SET+6*, SET+7, SET+12 |
| ORCROW | SET+4~, SET+12*, SET+17*, SET+18 |
| ORDD | TREE+2!, TREE1*, TREE2~ |
| ORDDA | TREE+2*!, TREE1, TREE2~* |
| ORDDF | TREE+2!, TREE1 |
| ORPOS | SET+4~, SET+18*, SET+20, SET+22, SET+23, SET+24 |
| ORROW | SET+4~, SET+12*, SET+17 |
| ORTOT | SET+4~, SET+7*, SET+11*, SET+12 |
| 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+16, SET+20 |
| U | NAMEOK |
| X | SET+4~, SET+9*, SET+10*, SET+11, SET+15*, SET+16, SET+19, SET+20, SET+21, SET+23 , SET+24, SET+25*, UP~, UP+1, REDO+1~*, REDO+2, REDOM+1~*, REDOM+2, TREE+2!, TREE1! , NAME+1, NAME+2, NAMEOK, CHKNAME+1!, CHKNAME+3, T1* |
| X1 | SET+4~, SET+19*, SET+20, SET+22, SET+24* |