Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All
Print Page as PDF
Routine: APCDK

Package: Patient Care Component

Routine: APCDK


Information

APCDK ; IHS/CMI/LAB - NIGHTLY AMBULATORY VISIT V FILE RELINKER ; 15 Nov 2010 12:10 PM

Source Information

Source file <APCDK.m>

Call Graph

Call Graph Total: 11

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  

Caller Graph

Caller Graph Total: 2

Package Total Caller Graph
Patient Care Component 1 APCDKDE  
Third Party Billing 1 ABMDVCK  

Entry Points

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 ;

External References

Name Field # of Occurrence
C^%DTC EN+3
^APCDCHKJ EN+1
^APCDKDTC EN+2
$$EN1^APCDKFDE CHECKV+1
MOD^AUPNVSIT RELINK+5
^DIC UPDMULT+2
FILE^DICN UPDLOG1+5
^DIE EOJ+1, RELINK+2, UPDMULT+7, LABLRO+7
^DIK PROCESS+3
$$GET1^DIQ PROCESS+5
EN^XBNEW UPDLOG+1

FileMan Files Accessed Via FileMan Db Call

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

Global Variables Directly Accessed

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

Label References

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

Naked Globals

Name Field # of Occurrence
^(0 GVISITS+10

Local Variables

Legend:

>> 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*
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All