PXCEVFI5 ;ISL/dee - Check to see if the encounter is a standalone and if it needs to be deleted ;3/17/04 12:24pm
Source file <PXCEVFI5.m>
| Package | Total | Call Graph |
|---|---|---|
| PCE Patient Care Encounter | 2 | $$DELVFILE^PXAPI ($$PRIMVPOV,$$VSTAPPT)^PXUTL1 |
| VA FileMan | 1 | ^DIR |
| 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 |
|---|---|---|
| PCE Patient Care Encounter | 2 | PXCE QUIT PXCEAE |
| Kernel | 1 | ^ORD(101 |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| CHECK | ;Check to see if this is a standalone and if it is make sure it has
; a procedure or stop code. If it does not have either then allow the ; user to continue editing it or to delete the encounter. |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^AUPNVCPT("AD" | CHECK+23, CHECK+31 |
| ^AUPNVPOV("AD" | CHECK+13 |
| ^AUPNVSIT - [#9000010] | CHECK+7, CHECK+9 |
| ^AUPNVSIT("AD" | CHECK+23, CHECK+31 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| DIR | CHECK+24~, CHECK+33~ |
| DIR("A" | CHECK+29*, CHECK+35*, CHECK+36*, CHECK+39*, CHECK+41*, CHECK+43*, CHECK+50* |
| DIR("B" | CHECK+25* |
| DIR(0 | CHECK+26*, CHECK+34* |
| PXCEAPPT | CHECK+8~, CHECK+16*, CHECK+18, CHECK+31 |
| PXCECNT | CHECK+24~, CHECK+27*, CHECK+29, CHECK+30*, CHECK+39, CHECK+40*, CHECK+41, CHECK+42* |
| >> PXCEEXIT | CHECK+7*, CHECK+11*, CHECK+18*, CHECK+21*, CHECK+23*, CHECK+47*, CHECK+48*, CHECK+52*, CHECK+53* |
| >> PXCEPAT | CHECK+16 |
| PXCEPDX | CHECK+8~, CHECK+13*, CHECK+14*, CHECK+18, CHECK+23, CHECK+28 |
| >> PXCEVIEN | CHECK+7, CHECK+9, CHECK+13, CHECK+14, CHECK+16, CHECK+23, CHECK+31, CHECK+38, CHECK+46 |
| PXCEVST0 | CHECK+8~, CHECK+9*, CHECK+11, CHECK+16 |
| >> PXQUIT | CHECK+32 |
| X | CHECK+24~ |
| Y | CHECK+24~, CHECK+45, CHECK+52 |