ONCOU0A ;WISC/MLH - ONCOLOGY PATIENT FILE UTILITIES - Fix follow ups for expired patients ;6/21/93 09:18
Source file <ONCOU0A.m>
Package | Total | Call Graph |
---|---|---|
VA FileMan | 1 | ^DIE |
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 |
---|---|---|
Oncology | 1 | ONCO #SITE-FIX EXP PAT F/U |
Name | Comments | DBIA/ICR reference |
---|---|---|
FIXFOR(ONCOWRT) | ; correct erroneous 'foreign resident' status for exp pats
; ONCOWRT defined if output desired |
|
INITSYA() | ; find level of ^TMP on which to put SYA and initialize
|
|
CHKSTAT(ONCOP,ONCOF,ONCOLVL,ONCOWRT) | ; look at follow-up record for patient ONCOP, follow-up ONCOF
; if we need to change and ONCOLVL defined, back up on ^TMP("ONCOFIXFOR",ONCOLVL) ; ONCOWRT is defined if we want dots for the user |
|
WRT(ONCORES) | ; output results array
|
Name | Field # of Occurrence |
---|---|
^DIE | CHKSTAT+10 |
Name | Line Occurrences |
---|---|
Function Call: WRITE |
|
Function Call: WRITE |
|
Routine Call |
|
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^ONCO(160 - [#160] | FIXFOR+5, FIXFOR+7, CHKSTAT+3 |
^TMP("ONCOFIXFOR" | INITSYA+1 |
Name | Line Occurrences |
---|---|
$$CHKSTAT | FIXFOR+7 |
$$INITSYA | FIXFOR+2 |
WRT | FIXFOR+12 |
Name | Field # of Occurrence |
---|---|
^(0 | INITSYA+1* |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
DA | CHKSTAT+9~* |
DA(1 | CHKSTAT+9* |
DIE | CHKSTAT+9~* |
>> DR | CHKSTAT+9* |
ONCOCHG | CHKSTAT+4~*, CHKSTAT+13*, CHKSTAT+17 |
ONCOF | CHKSTAT~, CHKSTAT+3, CHKSTAT+6, CHKSTAT+9 |
ONCOFI | FIXFOR+6~*, FIXFOR+7* |
ONCOI | INITSYA+1~*, INITSYA+2, WRT+1~* |
ONCOKC | FIXFOR+3~*, FIXFOR+7*, FIXFOR+11 |
ONCOKF | FIXFOR+3~*, FIXFOR+7*, FIXFOR+11 |
ONCOKP | FIXFOR+3~*, FIXFOR+5*, FIXFOR+11 |
ONCOLVL | FIXFOR+2~*, FIXFOR+7, CHKSTAT~, CHKSTAT+6* |
ONCOP | CHKSTAT~, CHKSTAT+3, CHKSTAT+6, CHKSTAT+9 |
ONCOPI | FIXFOR+4~*, FIXFOR+5*, FIXFOR+7 |
ONCORES | FIXFOR+11~*, FIXFOR+12, WRT~, WRT+1 |
ONCORES( | WRT+1* |
ONCORES(1 | WRT+2 |
ONCORES(2 | WRT+2 |
ONCORES(3 | WRT+2 |
>> ONCOSYA | CHKSTAT+6* |
ONCOWRT | FIXFOR~, FIXFOR+7, FIXFOR+12, CHKSTAT~, CHKSTAT+12 |
ONCOX | CHKSTAT+3~*, CHKSTAT+5, CHKSTAT+6 |
U | FIXFOR+11, INITSYA+1, CHKSTAT+5, CHKSTAT+6, WRT+1 |