ONCOU55A ;Hines OIFO/GWB,RTK-UTILITY ROUTINE 2 ;12/15/99
Source file <ONCOU55A.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 |
---|---|---|
Oncology | 2 | ONCO #SITE-RESTAGE PRIMARY ONCOENV |
Name | Comments | DBIA/ICR reference |
---|---|---|
RSTG(ONCDDX) | ;restage all primaries diagnosed from year YEAR1 forward - called by STAGEM
|
|
INIT | ;initialize our variables - called by RSTG
|
|
PROCESS | ;Process the primaries - called by RSTG
|
|
PROC1(D0) | ;process a single primary D0 - called by PROCESS
|
|
STAGEM | ;Interact with user to restage primaries
|
|
RSTGASK() | ;Function to determine initial restaging date/time
|
Name | Line Occurrences |
---|---|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Routine Call |
|
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^ONCO("RESTAGE" | INIT+3, PROCESS+7*, PROC1+5* |
^ONCO(165.5 - [#165.5] | PROCESS+1, PROCESS+3, PROC1+4, PROC1+8 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
COUNT | RSTG+4~, INIT+1*, PROCESS+5, PROCESS+7, PROC1+7* |
COUNTCHG | RSTG+4~, INIT+1*, PROCESS+6, PROC1+8* |
D0 | PROC1~, PROC1+3, PROC1+4, PROC1+5, PROC1+6, PROC1+8 |
>> DA | PROC1+6* |
DIR | RSTGASK+1~ |
DIR("?" | RSTGASK+2* |
DIR("A" | RSTGASK+2* |
DIR("B" | RSTGASK+2* |
DIR(0 | RSTGASK+2* |
DT | RSTGASK+2 |
DTOUT | RSTGASK+1~, RSTGASK+4 |
DUOUT | RSTGASK+1~, RSTGASK+4 |
DUZ(2 | PROCESS+3 |
DXDATE | RSTG+4~ |
FIRST | STAGEM+3~*, STAGEM+4, STAGEM+5 |
OLDSTAGE | PROC1+4~*, PROC1+5, PROC1+8 |
ONCDDX | RSTG~, INIT+4*, INIT+5*, PROCESS+1*, PROCESS+3 |
PRIMIX | PROCESS+2~*, PROCESS+3* |
SYBIX | RSTG+4~, INIT+3*, PROCESS+7, PROC1+5 |
SYBIX1 | RSTG+4~, INIT+3*, PROC1+5* |
U | PROCESS+7, PROC1+4, PROC1+5, PROC1+8 |
WRTFLG | RSTG+4~, INIT+2* |
Y | RSTGASK+1~, RSTGASK+4*, RSTGASK+5 |