PXCEVFI5 ;ISL/dee - Check to see if the encounter is a standalone and if it needs to be deleted ;11/20/96
Source file <PXCEVFI5.m>
Package | Total | Call Graph |
---|---|---|
PCE Patient Care Encounter | 2 | $$DELVFILE^PXAPI ($$PRIMVPOV,$$VSTAPPT)^PXUTL1 |
VA Fileman | 1 | ^DIR |
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 continueing edit it or delete the encounter. |
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^AUPNVCPT("AD" | CHECK+20, CHECK+28 |
^AUPNVPOV("AD" | CHECK+13 |
^AUPNVSIT - [#9000010] | CHECK+7, CHECK+9 |
^AUPNVSIT("AD" | CHECK+20, CHECK+28 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
DIR | CHECK+21~, CHECK+30~ |
DIR("A" | CHECK+26*, CHECK+32*, CHECK+33*, CHECK+36*, CHECK+38*, CHECK+40*, CHECK+47* |
DIR("B" | CHECK+22* |
DIR(0 | CHECK+23*, CHECK+31* |
PXCEAPPT | CHECK+8~, CHECK+16*, CHECK+18, CHECK+28 |
PXCECNT | CHECK+21~, CHECK+24*, CHECK+26, CHECK+27*, CHECK+36, CHECK+37*, CHECK+38, CHECK+39* |
>> PXCEEXIT | CHECK+7*, CHECK+11*, CHECK+18*, CHECK+20*, CHECK+44*, CHECK+45*, CHECK+49*, CHECK+50* |
>> PXCEPAT | CHECK+16 |
PXCEPDX | CHECK+8~, CHECK+13*, CHECK+14*, CHECK+18, CHECK+20, CHECK+25 |
>> PXCEVIEN | CHECK+7, CHECK+9, CHECK+13, CHECK+14, CHECK+16, CHECK+20, CHECK+28, CHECK+35, CHECK+43 |
PXCEVST0 | CHECK+8~, CHECK+9*, CHECK+11, CHECK+16 |
>> PXQUIT | CHECK+29 |
X | CHECK+21~ |
Y | CHECK+21~, CHECK+42, CHECK+49 |