APCDK ; IHS/CMI/LAB - NIGHTLY AMBULATORY VISIT V FILE RELINKER ; 15 Nov 2010 12:10 PM
Source file <APCDK.m>
Package | Total | Call Graph |
---|---|---|
VA Fileman | 6 | C^%DTC ^DIC FILE^DICN ^DIE ^DIK $$GET1^DIQ |
Patient Care Component | 3 | ^APCDCHKJ ^APCDKDTC $$EN1^APCDKFDE |
IHS Patient | 1 | MOD^AUPNVSIT |
IHS VA Utilities | 1 | EN^XBNEW |
Package | Total | Caller Graph |
---|---|---|
Patient Care Component | 1 | APCDKDE |
Third Party Billing | 1 | ABMDVCK |
Name | Comments | DBIA/ICR reference |
---|---|---|
ORDERLOC | ;check ordering location
|
|
EN | ;
|
|
UPDLOG(VF,VFI,TV,FV,RD,TYPE) | ;EP - CALLED FROM APCDKDE
|
|
VENTRIES | ;
|
|
PROCESS | ;Get vars and process visit
|
|
EOJ | ;
|
|
ENCPROV | ;
|
|
NOVFILES(V) | ;check to see if any vfiles, if so return a 1
|
|
UPDLOG1 | ;EP
|
|
LABLRO | ;
|
|
CLIN | ;check clinic
|
|
UPDMULT | ;
|
|
ORDPROV | ;
|
|
RELINK | ;repoint v file entry
|
|
GVISITS | ;go through all A and X visits on this date for this patient
|
|
CHECKV | ;check visit to see if should be deleted
|
|
CHECK | ;
|
FileNo | Call Tags |
---|---|
^LRO(68.999999901 - [#68.999999901] | Classic Fileman Calls |
^AUPNVSIT - [#9000010] | Classic Fileman Calls |
^APCDKLOG - [#9001003.91] | Classic Fileman Calls |
^AMERVSIT - [#9009080] | GET1^DIQ |
^AUTTSITE - [#9999999.39] | Classic Fileman Calls |
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^APCDKLOG("AA" | UPDLOG1+3 |
^AUPNVAST("AD" | NOVFILES+32 |
^AUPNVBB("AD" | NOVFILES+24 |
^AUPNVCHS("AD" | NOVFILES+3 |
^AUPNVCPT("AD" | NOVFILES+15 |
^AUPNVDEN("AD" | NOVFILES+5 |
^AUPNVDXP("AD" | NOVFILES+17 |
^AUPNVELD("AD" | NOVFILES+28 |
^AUPNVER("AD" | NOVFILES+23 |
^AUPNVEYE("AD" | NOVFILES+4 |
^AUPNVHF("AD" | NOVFILES+19 |
^AUPNVIMM("AD" | NOVFILES+10 |
^AUPNVINP("AD" | NOVFILES+2 |
^AUPNVLAB("AD" | NOVFILES+9 |
^AUPNVMED("AD" | NOVFILES+13 |
^AUPNVMIC("AD" | NOVFILES+21 |
^AUPNVMSR("AD" | NOVFILES+1 |
^AUPNVNOT("AD" | NOVFILES+22 |
^AUPNVNT("AD" | NOVFILES+27 |
^AUPNVPHN("AD" | NOVFILES+25 |
^AUPNVPOD("AD" | NOVFILES+33 |
^AUPNVPOV("AD" | PROCESS+7, GVISITS+6, NOVFILES+7 |
^AUPNVPRC("AD" | NOVFILES+8 |
^AUPNVPRV - [#9000010.06] | GVISITS+10 |
^AUPNVPRV("AD" | PROCESS+8, GVISITS+7, GVISITS+10, NOVFILES+6 |
^AUPNVPTH("AD" | NOVFILES+20 |
^AUPNVRAD("AD" | NOVFILES+18 |
^AUPNVSIT - [#9000010] | PROCESS+1, PROCESS+2, PROCESS+3, PROCESS+4, PROCESS+6, PROCESS+9, GVISITS+1, GVISITS+5, GVISITS+8, GVISITS+9 , ORDERLOC+1, UPDLOG1+5 |
^AUPNVSIT("AA" | GVISITS+2, GVISITS+3 |
^AUPNVSIT("B" | EN+6, EN+7 |
^AUPNVSK("AD" | NOVFILES+11 |
^AUPNVTC("AD" | NOVFILES+26 |
^AUPNVTM("AD" | NOVFILES+16 |
^AUPNVTRC("AD" | NOVFILES+29 |
^AUPNVTRT("AD" | NOVFILES+14 |
^AUPNVTXC("AD" | NOVFILES+31 |
^AUPNVUNH("AD" | NOVFILES+30 |
^AUPNVXAM("AD" | NOVFILES+12 |
^DD( | ENCPROV+6, ENCPROV+7, ENCPROV+8, ORDPROV+3, ORDPROV+4, ORDPROV+5 |
^DD(9000010.06 | ENCPROV+6, ENCPROV+7, ENCPROV+8, ORDPROV+3, ORDPROV+4, ORDPROV+5 |
^DD(9001003.91 | UPDMULT+1 |
^DIC - [#1] | GVISITS+11, VENTRIES+1 |
^LRO(68.999999901 - [#68.999999901] | LABLRO+6, LABLRO+7 |
^VA(200 - [#200] | ENCPROV+6, ORDPROV+3 |
Name | Line Occurrences |
---|---|
$$NOVFILES | PROCESS+3 |
CHECK | VENTRIES+2 |
CHECKV | GVISITS+3 |
CLIN | ORDPROV+2, ORDPROV+6 |
EOJ | EN+9 |
LABLRO | RELINK+4 |
ORDPROV | ENCPROV+3, ENCPROV+5, ENCPROV+9 |
PROCESS | EN+7 |
RELINK | ENCPROV+10, ENCPROV+11, ORDPROV+7, ORDPROV+8, ORDERLOC+1 |
UPDLOG | RELINK+7 |
UPDMULT | UPDLOG1+4 |
VENTRIES | GVISITS+11 |
Name | Field # of Occurrence |
---|---|
^(0 | GVISITS+10 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
APCDFILE | LABLRO+3~*, LABLRO+4 |
APCDK | EOJ+4! |
APCDK("DATE" | EN+3*, EN+6 |
APCDK("RELINK" | EN+4* |
APCDK("VISITS" | EN+4* |
APCDK12N | EOJ+4!, CHECK+1*, CHECK+2, CHECK+3*, CHECK+4, ENCPROV+5, ENCPROV+6, ENCPROV+7, ENCPROV+8, ORDPROV+2 , ORDPROV+3, ORDPROV+4, ORDPROV+5, ORDERLOC+1 |
APCDKAVC | EOJ+4!, GVISITS+1*, GVISITS+2 |
APCDKAVD | EOJ+4!, GVISITS+1*, GVISITS+2*, GVISITS+3 |
>> APCDKDPP | GVISITS+10*, ENCPROV+10, ORDPROV+7 |
APCDKDSP | EOJ+4!, GVISITS+10*, ENCPROV+11, ORDPROV+8 |
APCDKDVR | EOJ+4! |
APCDKHI | EOJ+4! |
APCDKIEN | LABLRO+6!*, LABLRO+7, LABLRO+8! |
APCDKIGR | EOJ+4!, VENTRIES+1*, VENTRIES+2 |
APCDKMM | EOJ+4! |
APCDKNV | EOJ+4! |
APCDKORD | LABLRO+4*, LABLRO+5, LABLRO+6, LABLRO+8! |
APCDKPAT | EOJ+4! |
APCDKV | EN+7*, EOJ+4!, PROCESS+1, PROCESS+2, PROCESS+3, PROCESS+4, PROCESS+5, PROCESS+6, PROCESS+7, PROCESS+8 , PROCESS+9, GVISITS+1, GVISITS+4, GVISITS+8, RELINK+7, LABLRO+6, CHECKV+1 |
APCDKVCT | EOJ+4! |
APCDKVD | EN+6*, EN+7, EN+8! |
APCDKVDG | EOJ+4!, VENTRIES+1*, CHECK+1, RELINK+2, LABLRO+3 |
APCDKVFL | EOJ+4!, GVISITS+11*, VENTRIES+1, ENCPROV+3, ENCPROV+6, ENCPROV+7, ENCPROV+8, ORDPROV+3, ORDPROV+4, ORDPROV+5 , RELINK+4, RELINK+7 |
>> APCDKVFP | ENCPROV+4*, ENCPROV+6*, ENCPROV+7*, ENCPROV+8*, ENCPROV+9, ENCPROV+10, ENCPROV+11, ORDPROV+1*, ORDPROV+3*, ORDPROV+4* , ORDPROV+5*, ORDPROV+6, ORDPROV+7, ORDPROV+8 |
APCDKX | EOJ+4! |
>> APCDKXVS | GVISITS+1*, GVISITS+3*, GVISITS+4, GVISITS+5, GVISITS+6, GVISITS+7, GVISITS+8, GVISITS+9, GVISITS+10, ORDERLOC+1 , RELINK+2, RELINK+5, RELINK+7, LABLRO+7 |
APCDLOGX | UPDLOG1+1~, UPDLOG1+3*, UPDLOG1+4!, UPDLOG1+6*, UPDMULT+1 |
APCDRUND | EN+4*, EOJ+4!, RELINK+7 |
APCDVDFN | EOJ+4!, VENTRIES+2*, CHECK+1, RELINK+2, RELINK+7 |
>> APCDVI | VENTRIES+2* |
AUPNVSIT | RELINK+5~* |
D0 | UPDLOG1+5! |
DA | EOJ+1*!, EOJ+5!, PROCESS+3*, RELINK+2!*, UPDLOG1+2~, UPDMULT+5*, UPDMULT+8!, LABLRO+7*! |
DA(1 | UPDMULT+1* |
DD | UPDLOG1+5! |
>> DFN | PROCESS+3*, PROCESS+5, PROCESS+9*, GVISITS+2, GVISITS+3 |
DIADD | UPDLOG1+2~, UPDLOG1+5*! |
DIC | EOJ+5!, UPDLOG1+2~, UPDLOG1+5*!, UPDMULT+1*, UPDMULT+4!, UPDMULT+8! |
DIC("DR" | UPDLOG1+5* |
DIC("P" | UPDMULT+1* |
DIC(0 | UPDLOG1+5*, UPDMULT+1* |
DIE | EOJ+1*!, EOJ+5!, RELINK+2!*, UPDLOG1+2~, UPDMULT+4*, UPDMULT+8!, LABLRO+7*! |
>> DIK | PROCESS+3* |
DITC | RELINK+2*! |
DIU | EOJ+5!, RELINK+2! |
DIV | EOJ+5!, RELINK+2! |
DLAYGO | UPDLOG1+2~, UPDLOG1+5*! |
DO | UPDLOG1+5! |
DR | EOJ+1*!, EOJ+5!, RELINK+2!*, UPDLOG1+2~, UPDMULT+6*, UPDMULT+8!, LABLRO+7*! |
DT | EN+3, EN+4, PROCESS+3 |
FV | UPDLOG~, UPDLOG1+3, UPDLOG1+5 |
I | ENCPROV+11*, ORDPROV+8*, LABLRO+6*, LABLRO+8! |
P | GVISITS+10~ |
RD | UPDLOG~, UPDLOG1+3, UPDLOG1+5 |
S | GVISITS+10~* |
TV | UPDLOG~, UPDLOG1+5 |
TYPE | UPDLOG~, UPDLOG1+5 |
U | EN+4*, PROCESS+2, PROCESS+3, PROCESS+4, PROCESS+6, PROCESS+9, GVISITS+1, GVISITS+5, GVISITS+8, GVISITS+9 , GVISITS+10, ENCPROV+5, ENCPROV+6, ENCPROV+7, ENCPROV+8, ENCPROV+11, ORDPROV+2, ORDPROV+3, ORDPROV+4, ORDPROV+5 , ORDPROV+8, ORDERLOC+1, UPDLOG1+5, UPDMULT+1, LABLRO+4, LABLRO+6, LABLRO+7 |
V | NOVFILES~, NOVFILES+1, NOVFILES+2, NOVFILES+3, NOVFILES+4, NOVFILES+5, NOVFILES+6, NOVFILES+7, NOVFILES+8, NOVFILES+9 , NOVFILES+10, NOVFILES+11, NOVFILES+12, NOVFILES+13, NOVFILES+14, NOVFILES+15, NOVFILES+16, NOVFILES+17, NOVFILES+18, NOVFILES+19 , NOVFILES+20, NOVFILES+21, NOVFILES+22, NOVFILES+23, NOVFILES+24, NOVFILES+25, NOVFILES+26, NOVFILES+27, NOVFILES+28, NOVFILES+29 , NOVFILES+30, NOVFILES+31, NOVFILES+32, NOVFILES+33 |
VF | UPDLOG~, UPDMULT+1 |
VFI | UPDLOG~, UPDMULT+6 |
X | EN+3, GVISITS+10~*, ENCPROV+11*, ORDPROV+8*, UPDLOG1+2~, UPDLOG1+5*!, UPDMULT+1*, UPDMULT+8!, CHECKV+1* |
>> X1 | EN+3* |
>> X2 | EN+3* |
>> Y | UPDLOG1+6, UPDMULT+5 |
>> ZTQUEUED | EOJ+3 |
>> ZTREQ | EOJ+3* |