©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
XUINEND1 ;SF-ISC/STAFF - POSTINIT FOR KERNEL V7 ;4/15/93 12:33
Source file <XUINEND1.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| TYPE(X) | ;EF. Return option type, Pass IFN.
|
|
| ITEMDEL(MENU,OPT) | ;EF. Delete item from menu.
|
|
| LKOPT(X) | ;EF. To lookup on "B"
|
|
| A5 | ;Now to change your XUCOMMAND option. Please review."
|
|
| A5X | ;Exit tag for A5
|
|
| ADD(MENU,OPT,SYN,ORD) | ;EF. Add options to a menu
|
| Name | Line Occurrences |
|---|---|
| Function Call: WRITE |
|
| Routine Call |
|
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^DD(19 | ADD+6 |
| ^DIC(19 - [#19] | ADD+6, ADD+7, LKOPT+1, TYPE+1, ITEMDEL+5 |
| Name | Line Occurrences |
|---|---|
| $$ADD | A5+3 |
| $$ITEMDEL | A5+2 |
| $$LKOPT | A5+1, ADD+3, ADD+5, ITEMDEL+3, ITEMDEL+4 |
| $$TYPE | ADD+3, ITEMDEL+3 |
| A5X | A5+1 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| D0 | ADD+2~, ADD+6* |
| DA | ADD+2~, ADD+8*, ITEMDEL+1~, ITEMDEL+5* |
| DA(1 | ADD+6*, ADD+8*, ITEMDEL+6* |
| DIC | ADD+2~, ADD+4*, ADD+8 |
| DIC("P" | ADD+6* |
| DIC(0 | ADD+6* |
| >> DIE | ADD+8* |
| DIK | ITEMDEL+1~, ITEMDEL+6* |
| DLAYGO | ADD+2~* |
| DR | ADD+2~, ADD+8* |
| MENU | ADD~, ADD+1, ADD+3, ITEMDEL~, ITEMDEL+2, ITEMDEL+3 |
| OPT | ADD~, ADD+1, ADD+5, ITEMDEL~, ITEMDEL+2, ITEMDEL+4 |
| ORD | ADD~, ADD+1*, ADD+8 |
| SYN | ADD~, ADD+1*, ADD+8 |
| U | A5+3 |
| X | A5+2*, A5+3*, ADD+2~, ADD+6*, LKOPT~, LKOPT+1, TYPE~, TYPE+1, ITEMDEL+1~ |
| XPD1 | ADD+2~, ADD+3*, ADD+4, ADD+6, ADD+7, ADD+8, ITEMDEL+1~, ITEMDEL+3*, ITEMDEL+5, ITEMDEL+6 |
| XPD2 | ADD+2~, ADD+5*, ADD+6, ADD+7, ITEMDEL+1~, ITEMDEL+4*, ITEMDEL+5 |
| XPD3 | ADD+2~, ADD+7*, ADD+8, ADD+9 |
| >> XU1 | A5+2*, A5+3* |