WVREFUSE ;HCIOFO/JWR - Add/Enter/Manipulate procedure refusals ;12/9/98 15:56
Source file <WVREFUSE.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 |
|---|---|---|
| Womens Health | 2 | WV REFUSED PROC-ADD WV REFUSED PROC-EDIT |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| EDREF | ;EDIT AN EXISTING REFUSAL
|
|
| ADDREF | ;ADD A NEW REFUSAL (not used now, use UNIV for adding a refusal)
|
|
| CHECK | ;Checks for existing refusals for this patient within 30 day period
; for this procedure. |
|
| UNIV | ;Add new Refusal & check other recent (within 30 days) Refusals
|
|
| EXIT | ;kill variables
|
|
| LOOP | ;Loop though the array of refuals for this patient & write them out
|
| Name | Field # of Occurrence |
|---|---|
| DD^%DT | CHECK+11 |
| C^%DTC | CHECK+4, CHECK+5 |
| ^DIC | EDREF+4, UNIV+5 |
| FILE^DICN | ADDREF+8, UNIV+22 |
| ^DIR | ADDREF+5, CHECK+20, CHECK+23, UNIV+9, UNIV+12 |
| DDS^WVFMAN | EDREF+7, ADDREF+11, UNIV+17, UNIV+26 |
| SETVARS^WVUTL5 | EDREF+1, ADDREF+1, UNIV+1 |
| TITLE^WVUTL5 | EDREF+2, ADDREF+2, UNIV+2 |
| KILLALL^WVUTL8 | EXIT+1 |
| Name | Line Occurrences |
|---|---|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Routine Call |
|
| Routine Call |
|
| FileNo | Call Tags |
|---|---|
| ^WV(790 - [#790] | Classic Fileman Calls |
| ^WV(790.3 - [#790.3] | Classic Fileman Calls |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^WV(790.2 - [#790.2] | CHECK+10 |
| ^WV(790.3 - [#790.3] | EDREF+6, ADDREF+10, CHECK+2, CHECK+6, UNIV+19, UNIV+23, UNIV+25 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| A | CHECK+3~, CHECK+4*, CHECK+7, CHECK+13*, CHECK+14 |
| B | CHECK+3~, CHECK+5*, CHECK+7, CHECK+13*, CHECK+14 |
| C | CHECK+3~, CHECK+13*, CHECK+14*, CHECK+15 |
| D | CHECK+3~, CHECK+9*, CHECK+11, CHECK+12, LOOP+1*, LOOP+2 |
| DA | CHECK+3! |
| DD | ADDREF+8!, UNIV+22! |
| DIC | EDREF+3!, EDREF+4*, ADDREF+7*, CHECK+3!, UNIV+3!, UNIV+4*, UNIV+5!, UNIV+20* |
| DIC("A" | EDREF+3*, UNIV+3* |
| DIC("DR" | ADDREF+6*, UNIV+21* |
| DIC("W" | UNIV+4* |
| DIC(0 | EDREF+4*, ADDREF+7*, UNIV+4*, UNIV+20* |
| >> DIDEL | EDREF+6*, UNIV+16* |
| DIR | ADDREF+3!, ADDREF+5!, CHECK+19!, CHECK+20!, CHECK+23!, UNIV+9!, UNIV+12! |
| DIR("A" | ADDREF+3*, CHECK+19*, CHECK+21*, UNIV+7*, UNIV+11* |
| DIR("B" | ADDREF+4*, CHECK+20* |
| DIR(0 | ADDREF+4*, CHECK+19*, CHECK+22*, UNIV+8*, UNIV+11* |
| DIRUT | CHECK+20, UNIV+14! |
| DO | ADDREF+8!, UNIV+22! |
| DR | CHECK+3! |
| DT | CHECK+4, CHECK+5 |
| >> DTOUT | EDREF+5 |
| >> DUOUT | EDREF+5 |
| E | CHECK+3~, CHECK+9*, CHECK+10*, CHECK+12 |
| F | CHECK+3~, CHECK+11*, CHECK+12 |
| >> G | CHECK+6*, CHECK+12 |
| >> H | CHECK+6*, CHECK+7, CHECK+8, CHECK+9 |
| U | EDREF+6, ADDREF+10, CHECK+7, CHECK+8, CHECK+9, CHECK+10, UNIV+25, LOOP+2 |
| >> WVC | CHECK+15*, CHECK+22 |
| >> WVDFN | EDREF+6*, ADDREF+3*, ADDREF+10*, CHECK+2, CHECK+6, UNIV+6*, UNIV+25* |
| WVEDREF | CHECK+23*, UNIV+14!, UNIV+15, UNIV+17, UNIV+18, EXIT+1! |
| WVJDAY | UNIV+10*, UNIV+20, EXIT+1! |
| WVJPR | CHECK+8, UNIV+13*, EXIT+1! |
| WVJR | CHECK+3! |
| WVJR( | CHECK+12*, CHECK+13, CHECK+14 |
| WVJR1 | CHECK+3!, CHECK+15 |
| WVJR1( | CHECK+14*, UNIV+17, LOOP+1, LOOP+2 |
| >> WVPOP | EDREF+3* |
| >> X | ADDREF+7*, CHECK+4, CHECK+5, UNIV+20* |
| >> X1 | CHECK+4*, CHECK+5* |
| >> X2 | CHECK+4*, CHECK+5* |
| >> Y | EDREF+5, EDREF+6, EDREF+7, ADDREF+5, ADDREF+7, ADDREF+9, ADDREF+10, ADDREF+11, CHECK+11*, CHECK+20 , CHECK+23, UNIV+5, UNIV+6, UNIV+9, UNIV+10, UNIV+12, UNIV+13, UNIV+24, UNIV+25, UNIV+26 |
