©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
BTIUPREF ; IHS/ITSC/LJF - Enter/edit personal preferences ;
Source file <BTIUPREF.m>
| Package | Total | Call Graph |
|---|---|---|
| Text Integration Utility | 2 | $$REQCOS^TIUPREF $$READ^TIUU |
| VA Fileman | 2 | ^DIC ^DIE |
| IHS Mods To Text Integration Utilities | 1 | ^BTIUPLST |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| SETDUZ() | ; -- returns user to edit
|
|
| MENU | ; ask user which option to run
|
|
| EDIT(DA) | ; Call ^DIE to edit the record
|
|
| MAIN | ; Control branching
|
|
| GETREC() | ; Get record in picklist file
|
| Name | Line Occurrences |
|---|---|
| Function Call: WRITE |
|
| Routine Call |
|
| Routine Call |
|
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^VA(200 - [#200] | GETREC+4 |
| ^XUSEC("TIUZPPR" | SETDUZ+1 |
| Name | Line Occurrences |
|---|---|
| $$GETREC | MAIN+2 |
| $$SETDUZ | GETREC+1 |
| EDIT | MAIN+4 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| ASKNEW | GETREC+2~ |
| DA | MAIN+1~, MAIN+2*, MAIN+3, MAIN+4, EDIT~, EDIT+2 |
| DIC | GETREC+2~, GETREC+3*, SETDUZ+2* |
| DIC("A" | SETDUZ+2* |
| DIC(0 | GETREC+3*, SETDUZ+2* |
| DIE | EDIT+1~, EDIT+2* |
| DLAYGO | GETREC+2~, GETREC+3* |
| DR | EDIT+1~, EDIT+3* |
| DR(2 | EDIT+4* |
| DUZ | SETDUZ+1 |
| TIUCLASS | EDIT+1~ |
| TIUDUZ | MAIN+1~, GETREC+1*, GETREC+4 |
| >> TIUREQCS | EDIT+2* |
| U | GETREC+4 |
| X | GETREC+2~, GETREC+4*, GETREC+5 |
| Y | MENU+1*, MENU+2, GETREC+2~, GETREC+7, SETDUZ+2 |