TIUPRPN ;SLC/MJC - Print SF 509 Progress Notes ;;7-6-95 9:00pm
Source file <TIUPRPN.m>
action | A | extended action | Ea | event driver | Ed | subscriber | Su | protocol | O | limited protocol | LP | run routine | RR | broker | B | edit | E | server | Se | P | screenman | SM | inquire | I |
Package | Total | Caller Graph |
---|---|---|
Text Integration Utility | 4 | TIUPRCN TIUPRPN3 TIUPRPN6 ^TIU(8925.1 |
Name | Comments | DBIA/ICR reference |
---|---|---|
DEVICE(TIUFLAG,TIUSPG) | ; pick your device
|
|
ENTRY | ; Entry point to print progress notes-called from ^TIUA
|
|
ENTRY1 | ; Entry point from above
|
|
EXIT |
Name | Line Occurrences |
---|---|
Function Call: WRITE |
|
Function Call: WRITE |
|
Routine Call |
|
Routine Call |
|
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^TMP("TIULQ" | ENTRY1+4!, EXIT! |
^TMP("TIUPR" | EXIT! |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
>> %ZIS | DEVICE+2* |
D0 | ENTRY1+1~ |
DIROUT | ENTRY1+1~ |
DIRUT | ENTRY1+1~ |
DN | ENTRY1+1~ |
DTOUT | ENTRY1+1~ |
DUOUT | ENTRY1+1~ |
IO | DEVICE+10, ENTRY+2 |
IO("Q" | DEVICE+4! |
IOP | DEVICE+2! |
IOST | ENTRY1+2 |
POP | DEVICE+2! |
TIUERR | ENTRY1+1~ |
TIUFLAG | DEVICE~, DEVICE+3*, DEVICE+8!, ENTRY1+2*, ENTRY1+3, ENTRY1+6 |
TIUSPG | DEVICE~, DEVICE+3*, DEVICE+8!, ENTRY+1~, ENTRY1+2*, ENTRY1+3*, ENTRY1+6 |
Y | ENTRY1+1~ |
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("TIUFLAG" | DEVICE+6* |
ZTSAVE("TIUSPG" | DEVICE+6* |
ZTSAVE("^TMP(""TIUPR"",$J," | DEVICE+5* |
ZTSK | DEVICE+7, DEVICE+8! |