©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
BTIUPRPN ;IHS/MSC/MGH - Special header/printer formats ;29-Aug-2014 15:41;DU
Source file <BTIUPRPN.m>
| Package | Total | Call Graph |
|---|---|---|
| Kernel | 3 | (,HOME)^%ZIS ^%ZISC ^%ZTLOAD |
| VA Fileman | 2 | ^DIC ^DIE |
| IHS Mods To Text Integration Utilities | 1 | PRINT^BTIUPRT1 |
| Text Integration Utility | 1 | PRINT^TIUPRPN1 |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| ENTRY | ; Entry point to print progress notes-called from ^TIUA
|
|
| DIV | ; enter/edit division params in file 8925.94
|
|
| ENTRY1 | ; Entry point from above
|
|
| EXIT | ||
| DEVICE(TIUFLAG,TIUSPG) | ; pick your device
|
| Name | Line Occurrences |
|---|---|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Routine Call |
|
| Routine Call |
|
| Routine Call |
|
| Routine Call |
|
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^DD(8925.94 | DIV+10 |
| ^TMP("TIULQ" | ENTRY1+4!, EXIT! |
| ^TMP("TIUPR" | EXIT! |
| Name | Line Occurrences |
|---|---|
| ENTRY1 | DEVICE+10 |
| EXIT | DEVICE+2, DEVICE+4 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| >> %ZIS | DEVICE+2* |
| D0 | ENTRY1+1~ |
| DA | DIV+1~, DIV+15*, DIV+17! |
| DA(1 | DIV+10*, DIV+15* |
| DIC | DIV+1~, DIV+3*, DIV+7!, DIV+9*, DIV+14, DIV+17! |
| DIC("A" | DIV+4* |
| DIC("P" | DIV+10* |
| DIC(0 | DIV+3*, DIV+9* |
| DIE | DIV+1~, DIV+14*, DIV+17! |
| DIROUT | ENTRY1+1~ |
| DIRUT | ENTRY1+1~ |
| DIV | DIV+1~, DIV+6*, DIV+9, DIV+10, DIV+15 |
| DLAYGO | DIV+18! |
| DN | ENTRY1+1~ |
| DR | DIV+1~, DIV+16*, DIV+17! |
| DTOUT | ENTRY1+1~ |
| DUOUT | ENTRY1+1~ |
| IO | DEVICE+10, ENTRY+2 |
| IO("Q" | DEVICE+4! |
| IOP | DEVICE+2! |
| IOST | ENTRY1+2 |
| POP | DEVICE+2! |
| TITLE | DIV+1~, DIV+12*, DIV+15 |
| >> TIUD0 | ENTRY1+8 |
| TIUERR | ENTRY1+1~ |
| TIUFLAG | DEVICE~, DEVICE+3*, DEVICE+8!, ENTRY1+2*, ENTRY1+3, ENTRY1+10 |
| TIUQT | DIV+1~, DIV+2, DIV+5*, DIV+11* |
| TIUSPG | DEVICE~, DEVICE+3*, DEVICE+8!, ENTRY+1~, ENTRY1+2*, ENTRY1+3*, ENTRY1+10 |
| >> TIUTYPE | ENTRY1+8*, ENTRY1+9 |
| U | ENTRY1+8 |
| Y | ENTRY1+1~, DIV+1~, DIV+5, DIV+6, DIV+11, DIV+12, DIV+13! |
| ZTDESC | DEVICE+6*, DEVICE+8! |
| ZTDTH | DEVICE+8! |
| ZTIO | DEVICE+8! |
| >> ZTQUEUED | ENTRY1+5 |
| >> ZTREQ | ENTRY1+5* |
| ZTRTN | DEVICE+5*, DEVICE+8! |
| ZTSAVE | DEVICE+8! |
| ZTSAVE("TIUD0" | DEVICE+5* |
| ZTSAVE("TIUFLAG" | DEVICE+6* |
| ZTSAVE("TIUSPG" | DEVICE+6* |
| ZTSAVE("^TMP(""TIUPR"",$J," | DEVICE+5* |
| ZTSK | DEVICE+7, DEVICE+8! |