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 |
| 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 |