WVREFUSE ;HCIOFO/JWR - Add/Enter/Manipulate procedure refusals ;12/9/98 15:56
Source file <WVREFUSE.m>
| 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 | Line Occurrences |
|---|---|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| FileNo | Call Tags |
|---|---|
| ^WV(790 - [#790] | Classic Fileman Calls |
| ^WV(790.3 - [#790.3] | Classic Fileman Calls |