Routine: APCDCAF3

Package	Total	Call Graph
Patient Care Component	19	$$ERRORCHK^APCDCAF $$ALLRET^APCDCAF1 BACK^APCDCAF2 RNU^APCDCAF4 ($$FINDPEND,EN)^APCDCAF6 MNEPROC^APCDEAP ^APCDEIN (EN,EN1,EN2)^APCDEKL PROCESS^APCDEM START^APCDEWHO EP^APCDKDE EP1^APCDKUL EN^APCDRPOV ^APCDVD UPDLOG^APCDVDEL ^APCDVDLT ^APCDVDSP ^APCDVLK EN1^APCDVMRG
VA Fileman	5	^%DTC (FILE,YN)^DICN ^DIE IX1^DIK ^DIR
IHS Patient	2	(,KILL)^AUPNPAT MOD^AUPNVSIT
IHS VA Utilities	2	$$VALI^XBDIQ1 ^XBFMK
Kernel	1	$$NOW^XLFDT
Registration	1	FULL^VALM1

Entry Points

Name	Comments	DBIA/ICR reference
DISP	;
MOVEVDX	;
RESEQ	;EP
MODIFY	;
BACK	;go back to listman
EOP	;EP - End of page.
DEL	;EP
APPENDX	;
APPEND	;
MERGEX	;
ADDCANT	;
GETVISIT	;
UPD1	;
UPD0	;EP
MOVEVD	;EP
MODIFYX	;
UPDATE	;EP
MERGE	;EP
R	;
DELX	;
RESEQX	;
DISPX	;
MERGEDD	;EP
MERGEDDX	;
UPDATEX	;
DELETE	; DELETE VISIT AND RELATED V FILES

External References

Name	Field # of Occurrence
^%DTC	MODIFY+16, APPEND+16
$$ERRORCHK^APCDCAF	UPD1+6
$$ALLRET^APCDCAF1	DEL+11
BACK^APCDCAF2	BACK+1
RNU^APCDCAF4	UPD1+9
$$FINDPEND^APCDCAF6	R+2
EN^APCDCAF6	R+1
MNEPROC^APCDEAP	APPEND+22
^APCDEIN	MODIFY+17, APPEND+17
EN^APCDEKL	MODIFYX+2, APPENDX+2, RESEQX+2
EN1^APCDEKL	MERGEX+2, MERGEDDX+2, MOVEVDX+2
EN2^APCDEKL	MODIFYX+3, APPENDX+3, MERGEX+3, MERGEDDX+3, MOVEVDX+3, RESEQX+3
PROCESS^APCDEM	MODIFY+22
START^APCDEWHO	MODIFY+18, APPEND+18
EP^APCDKDE	DISP+9, MODIFY+22, APPEND+22
EP1^APCDKUL	MOVEVD+21
EN^APCDRPOV	RESEQ+8
^APCDVD	DISP+9
UPDLOG^APCDVDEL	DELETE+7
^APCDVDLT	DELETE+8
^APCDVDSP	MERGE+23, MERGE+25, DEL+10, MERGEDD+21, MERGEDD+23
^APCDVLK	GETVISIT+3
EN1^APCDVMRG	MERGE+26, MERGEDD+24
^AUPNPAT	MODIFY+9, APPEND+9, MERGE+12, MERGEDD+10, MOVEVD+12
KILL^AUPNPAT	DISPX+2, MODIFYX+4, APPENDX+4, MERGEX+4, DELX+2, MERGEDDX+4, MOVEVDX+4, RESEQX+4
MOD^AUPNVSIT	MODIFY+20, APPEND+20, UPDATE+8
FILE^DICN	UPD0+3
YN^DICN	DELETE+1
^DIE	UPD1+2, UPD1+7, UPD1+8, DELETE+4, DELETE+5
IX1^DIK	ADDCANT+2
^DIR	DISP+3, MODIFY+4, MODIFY+23, APPEND+4, APPEND+23, UPDATE+4, EOP+5, MERGE+4, DEL+4, MERGEDD+4 , MOVEVD+4, RESEQ+4, RESEQ+10
FULL^VALM1	MODIFY+1, APPEND+1, UPDATE+1, MERGE+1, MERGEDD+1, MOVEVD+1, RESEQ+1
$$VALI^XBDIQ1	R+2
^XBFMK	DISP+8, MODIFY+21, APPEND+21, UPD1+1, UPD1+3, UPDATEX+2, DEL+8, RESEQ+9
$$NOW^XLFDT	UPD0+2, UPD0+3

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !,"No VISIT selected." Line Location: DISP+4
Function Call: WRITE	Prompt: !,"No VISIT selected." Line Location: DISP+5
Function Call: WRITE	Prompt: !,"No VISIT selected." Line Location: MODIFY+5
Function Call: WRITE	Prompt: !,"No VISIT selected." Line Location: MODIFY+6
Function Call: WRITE	Prompt: !!,"error in data entry modify mode" Line Location: MODIFY+17
Function Call: WRITE	Prompt: !,"No VISIT selected." Line Location: APPEND+5
Function Call: WRITE	Prompt: !,"No VISIT selected." Line Location: APPEND+6
Function Call: WRITE	Prompt: !!,"error in data entry APPEND mode" Line Location: APPEND+17
Function Call: WRITE	Prompt: !,"No VISIT selected." Line Location: UPDATE+5
Function Call: WRITE	Prompt: !,"No VISIT selected." Line Location: UPDATE+6
Function Call: WRITE	Prompt: !!,"updating status failed" Line Location: UPD0+4
Function Call: WRITE	Prompt: !!,"You must enter a status" Line Location: UPD1+5
Function Call: WRITE	Prompt: !!,"This visit has the following error: ",APCDERR,!,"You cannot mark a visit as Reviewed/Completed if there is an error." Line Location: UPD1+7
Function Call: WRITE	Prompt: !!,"A chart Deficiency reason is required." Line Location: R+2
Function Call: WRITE	Prompt: !!,"adding entry to chart audit notes failed." Line Location: R+8
Function Call: WRITE	Prompt: !,"No VISIT selected." Line Location: MERGE+5
Function Call: WRITE	Prompt: !,"No VISIT selected." Line Location: MERGE+6
Function Call: WRITE	Prompt: !!,"Patient only has 1 visit on that day, cannot do a merge." Line Location: MERGE+11
Function Call: WRITE	Prompt: !!,"Select 'From' visit.",! Line Location: MERGE+13
Function Call: WRITE	Prompt: !!,"Select 'To' visit.",! Line Location: MERGE+17
Function Call: WRITE	Prompt: !!,"'From' and 'To' the same. Bye!" Line Location: MERGE+20
Function Call: WRITE	Prompt: !!,"Cannot merge from a visit that has a Claim associate with it." Line Location: MERGE+21
Function Call: WRITE	Prompt: !!,"* FROM VISIT *" Line Location: MERGE+22
Function Call: WRITE	Prompt: !!,"* TO VISIT *" Line Location: MERGE+24
Function Call: WRITE	Prompt: !!,"You do not have the security key to delete a Visit.",!,"Please see your supervisor or program manager.",! Line Location: DEL+1
Function Call: WRITE	Prompt: !,"No VISIT selected." Line Location: DEL+5
Function Call: WRITE	Prompt: !,"No VISIT selected." Line Location: DEL+6
Function Call: WRITE	Prompt: !!,"All Notes must be retracted before you can delete this visit." Line Location: DEL+11
Function Call: WRITE	Prompt: !!,"THE ABOVE VISIT AND RELATED V FILE ENTRIES WILL BE REMOVED FOREVER !!!" Line Location: DEL+12
Function Call: WRITE	Prompt: !,"Sure you want to delete" Line Location: DELETE+1
Function Call: WRITE	Prompt: !,"No VISIT selected." Line Location: MERGEDD+5
Function Call: WRITE	Prompt: !,"No VISIT selected." Line Location: MERGEDD+6
Function Call: WRITE	Prompt: !!,"Select 'From' visit.",! Line Location: MERGEDD+11
Function Call: WRITE	Prompt: !!,"Select 'To' visit.",! Line Location: MERGEDD+15
Function Call: WRITE	Prompt: !!,"'From' and 'To' the same. Bye!" Line Location: MERGEDD+18
Function Call: WRITE	Prompt: !!,"Cannot merge from a visit that has a Claim associate with it." Line Location: MERGEDD+19
Function Call: WRITE	Prompt: !!,"* FROM VISIT *" Line Location: MERGEDD+20
Function Call: WRITE	Prompt: !!,"* TO VISIT *" Line Location: MERGEDD+22
Function Call: WRITE	Prompt: !,"No VISIT selected." Line Location: MOVEVD+5
Function Call: WRITE	Prompt: !,"No VISIT selected." Line Location: MOVEVD+6
Function Call: WRITE	Prompt: !!,"Patient only has 1 visit on that day, cannot move data." Line Location: MOVEVD+11
Function Call: WRITE	Prompt: !!,"Select 'From' visit.",! Line Location: MOVEVD+13
Function Call: WRITE	Prompt: !!,"Select 'To' visit.",! Line Location: MOVEVD+17
Function Call: WRITE	Prompt: !!,"'From' and 'To' the same. Bye!" Line Location: MOVEVD+20
Function Call: WRITE	Prompt: !,"No VISIT selected." Line Location: RESEQ+5
Function Call: WRITE	Prompt: !,"No VISIT selected." Line Location: RESEQ+6
Routine Call	DIE Line Location: UPD1+2 UPD1+7 UPD1+8 DELETE+4 DELETE+5
Routine Call	DIR Line Location: DISP+3 MODIFY+4 MODIFY+23 APPEND+4 APPEND+23 UPDATE+4 EOP+5 MERGE+4 DEL+4 MERGEDD+4 MOVEVD+4 RESEQ+4 RESEQ+10

FileMan Files Accessed Via FileMan Db Call

FileNo	Call Tags
^AUPNVSIT - [#9000010]	Classic Fileman Calls
^AUPNVCA - [#9000010.45]	Classic Fileman Calls
^AUPNCANT - [#9000095]	Classic Fileman Calls

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^ABSBITMS(9002302	MERGE+21, MERGEDD+19
^APCDSITE - [#9001001.2]	R+2
^AUPNCANT - [#9000095]	ADDCANT+1*
^AUPNVCA - [#9000010.45]	UPD1+4
^AUPNVSIT - [#9000010]	MODIFY+8, MODIFY+11, MODIFY+12, MODIFY+13, MODIFY+14, MODIFY+15, APPEND+8, APPEND+11, APPEND+12, APPEND+13 , APPEND+14, APPEND+15, UPD0+3, ADDCANT+1, MERGE+8, MERGE+16, DELETE+5, MERGEDD+9, MOVEVD+8, MOVEVD+16
^AUPNVSIT("AA"	MERGE+9, MERGE+10, MOVEVD+9, MOVEVD+10
^TMP("APCDCAF OP"	DISP+6, MODIFY+7, APPEND+7, UPDATE+7, MERGE+7, DEL+7, MERGEDD+7, MOVEVD+7, RESEQ+7
^XUSEC("APCDZDELETEVISIT"	DEL+1

Label References

Name	Line Occurrences
APPENDX	APPEND+5, APPEND+6, APPEND+17, APPEND+24, APPEND+25
BACK	DISPX+3, MODIFYX+5, APPENDX+5, UPDATEX+4, MERGEX+5, DELX+3, MERGEDDX+5, MOVEVDX+5, RESEQX+5
DELX	DEL+1, DEL+5, DEL+6, DEL+11, DELETE+3
DISPX	DISP+4, DISP+5
EOP	DISP+4, DISP+5, MODIFY+5, MODIFY+6, MODIFY+17, APPEND+5, APPEND+6, APPEND+17, UPDATE+5, UPDATE+6 , UPD0+4, MERGE+5, MERGE+6, MERGE+11, MERGE+20, DEL+5, DEL+6, DEL+11, MERGEDD+5, MERGEDD+6 , MERGEDD+18, MOVEVD+5, MOVEVD+6, MOVEVD+11, MOVEVD+20, RESEQ+5, RESEQ+6
GETVISIT	MERGE+14, MERGE+18, MERGEDD+12, MERGEDD+16, MOVEVD+14, MOVEVD+18
MERGEDDX	MERGEDD+5, MERGEDD+6, MERGEDD+13, MERGEDD+17, MERGEDD+18
MERGEX	MERGE+5, MERGE+6, MERGE+11, MERGE+15, MERGE+19, MERGE+20, MERGE+21, MERGEDD+19
MODIFYX	MODIFY+5, MODIFY+6, MODIFY+17, MODIFY+24, MODIFY+25
MOVEVDX	MOVEVD+5, MOVEVD+6, MOVEVD+11, MOVEVD+15, MOVEVD+19, MOVEVD+20
R	R+2
RESEQX	RESEQ+5, RESEQ+6, RESEQ+11, RESEQ+12
UPD0	MODIFY+26, APPEND+26, RESEQ+13
UPD1	UPD1+5, UPD1+7
UPDATEX	UPDATE+5, UPDATE+6, UPD0+4, UPD1+9

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> %	DELETE+1*
>> %Y	DELETE+1*, DELETE+2, DELETE+3
APCDCAF	DISP+9, DISPX+1!, MODIFY+22, MODIFYX+1!, APPEND+22, APPENDX+1!, MERGE+26, MERGEX+1!, DELX+1!, MERGEDD+24* , MERGEDDX+1!, MOVEVDX+1!, RESEQX+1!
APCDCAFV	DISP+9, DISPX+1!, MODIFY+22, MODIFYX+1!, APPEND+22*, DELX+1!
APCDCAR	UPD1+4*, UPD1+5, UPD1+7, UPD1+8, UPD1+9, UPDATEX+3!
>> APCDCAT	MODIFY+12, APPEND+12
>> APCDCLN	MODIFY+15, APPEND+15
APCDCVA	UPDATEX+3!
>> APCDDATE	MODIFY+11, MODIFY+16, APPEND+11, APPEND+16
>> APCDERR	UPD1+6*, UPD1+7
>> APCDFLG	MODIFY+17, APPEND+17
>> APCDIDT	MERGE+9, MOVEVD+9
>> APCDLOC	MODIFY+14, APPEND+14
APCDLOOK	GETVISIT+2*, GETVISIT+4, GETVISIT+5!
>> APCDMODE	MODIFY+19, APPEND+19
>> APCDNOXV	APPEND+19*
APCDPAT	MODIFY+8, MODIFYX+1!, APPEND+8, APPENDX+1!, MERGE+8, MERGE+9, MERGE+10, MERGE+12, MERGEX+1!, MERGEDD+9 , MERGEDD+10, MERGEDDX+1!, MOVEVD+8*, MOVEVD+9, MOVEVD+10, MOVEVD+12, MOVEVDX+1!, RESEQX+1!
>> APCDRCNT	DISP+2, MODIFY+3, APPEND+3, UPDATE+3, MERGE+3, DEL+3, MERGEDD+3, MOVEVD+3, RESEQ+3
>> APCDTYPE	MODIFY+13, APPEND+13
>> APCDVCA	UPD0+6*, UPD1+2, UPD1+4, UPD1+7
APCDVDLT	DELETE+8*, DELX+1!
>> APCDVDSP	MERGE+23, MERGE+25, DEL+10, MERGEDD+21, MERGEDD+23*
>> APCDVLDT	MERGE+8, MERGE+9, MERGE+16, MOVEVD+8, MOVEVD+9, MOVEVD+16
APCDVLK	MODIFY+10, APPEND+10, GETVISIT+1!
APCDVMF	MERGE+15, MERGE+16, MERGE+20, MERGE+21, MERGE+23, MERGEX+1!, MERGEDD+13, MERGEDD+18, MERGEDD+19, MERGEDD+21 , MERGEDDX+1!, MOVEVD+15, MOVEVD+16, MOVEVD+20, MOVEVDX+1!
APCDVMT	MERGE+19, MERGE+20, MERGE+25, MERGEX+1!, MERGEDD+17, MERGEDD+18, MERGEDD+23, MERGEDDX+1!, MOVEVD+19, MOVEVD+20 , MOVEVDX+1!
APCDVSIT	DISP+6, DISP+9, DISPX+1!, MODIFY+7, MODIFY+8, MODIFY+10, MODIFY+11, MODIFY+12, MODIFY+13, MODIFY+14 , MODIFY+15, MODIFY+18, MODIFY+20, MODIFY+22, MODIFYX+1!, APPEND+7, APPEND+8, APPEND+10, APPEND+11, APPEND+12 , APPEND+13, APPEND+14, APPEND+15, APPEND+18, APPEND+20, APPEND+22, APPENDX+1!, UPDATE+7, UPD0+3, UPD1+6 , UPD1+8, R+1, R+2, UPDATEX+3!, ADDCANT+1, ADDCANT+2, MERGE+7, MERGE+8, MERGEX+1!, DEL+7* , DEL+10, DEL+11, DELETE+4, DELETE+5, DELETE+7, DELETE+8, DELX+1!, MERGEDD+7, MERGEDD+9, MERGEDDX+1! , MOVEVD+7, MOVEVD+8, MOVEVDX+1!, RESEQ+7*, RESEQ+8, RESEQX+1!
>> APCDVV	MERGE+14, MERGE+18, GETVISIT+4, MERGEDD+12, MERGEDD+16, MOVEVD+14, MOVEVD+18
AUPNDAYS	MODIFY+16, MODIFYX+1!, APPEND+16, APPENDX+1!, MERGEX+1!, MERGEDDX+1!, MOVEVDX+1!, RESEQX+1!
>> AUPNDOB	MODIFY+16, APPEND+16
AUPNVSIT	MODIFY+20, MODIFYX+1!, APPEND+20, APPENDX+1!, MERGEX+1!, MERGEDDX+1!, MOVEVDX+1!, RESEQX+1!
>> C	MERGE+9, MERGE+10, MERGE+11, MOVEVD+9, MOVEVD+10, MOVEVD+11
D0	UPD0+1!, UPD0+5!
DA	MODIFY+23!, APPEND+23!, UPD0+6, UPD1+2!, UPD1+7, UPD1+8!, ADDCANT+2, DELETE+4!, DELETE+5*!, RESEQ+10!
DD	UPD0+1!, UPD0+5!
DFOUT	EOP+4!
DIADD	UPD0+2*, UPD0+5!, UPDATEX+1!
DIC	UPD0+1!, UPD0+2*, UPD0+5!
DIC("DR"	UPD0+3*
DIC(0	UPD0+2*
DIE	UPD1+2!, UPD1+7, UPD1+8!, DELETE+4!, DELETE+5*!
>> DIK	ADDCANT+2*
DIR	DISP+1!, DISP+3!, DISPX+1!, MODIFY+2!, MODIFY+4!, MODIFY+23!, APPEND+2!, APPEND+4!, APPEND+23!, UPDATE+2! , UPDATE+4!, EOP+3~, MERGE+2!, MERGE+4!, DEL+2!, DEL+4!, DELX+1!, MERGEDD+2!, MERGEDD+4!, MOVEVD+2! , MOVEVD+4!, RESEQ+2!, RESEQ+4!, RESEQ+10!
DIR("A"	DISP+2, MODIFY+3, MODIFY+23, APPEND+3, APPEND+23, UPDATE+3, EOP+5, MERGE+3, DEL+3, MERGEDD+3 , MOVEVD+3, RESEQ+3, RESEQ+10*
DIR("B"	MODIFY+23, APPEND+23, RESEQ+10*
DIR(0	DISP+2, MODIFY+3, MODIFY+23, APPEND+3, APPEND+23, UPDATE+3, EOP+5, MERGE+3, DEL+3, MERGEDD+3 , MOVEVD+3, RESEQ+3, RESEQ+10*
DIRUT	DISP+3, DISP+5, DISPX+1!, MODIFY+4, MODIFY+6, MODIFY+24, APPEND+4, APPEND+6, APPEND+24, UPDATE+4 , UPDATE+6, EOP+4!, MERGE+4, MERGE+6, DEL+4, DEL+6, DELX+1!, MERGEDD+4, MERGEDD+6, MOVEVD+4 , MOVEVD+6, RESEQ+4*, RESEQ+6, RESEQ+11
DLAYGO	UPD0+2*, UPD0+5!, UPDATEX+1!
DLOUT	EOP+4!
DO	UPD0+1!
DR	UPD1+2!, UPD1+7, UPD1+8!, MERGE+23!, MERGE+25!, DELETE+4!, DELETE+5*!, MERGEDD+21!, MERGEDD+23!
DT	UPD1+8
DTOUT	EOP+4!
DUOUT	DISP+3, DISPX+1!, MODIFY+4, APPEND+4, UPDATE+4, EOP+4!, MERGE+4, DEL+4, DELX+1!, MERGEDD+4 , MOVEVD+4, RESEQ+4
DUZ	UPD0+3, DEL+1
DUZ(2	R+2
IOST	EOP+1
U	MODIFY+8, MODIFY+11, MODIFY+12, MODIFY+13, MODIFY+14, MODIFY+15, APPEND+8, APPEND+11, APPEND+12, APPEND+13 , APPEND+14, APPEND+15, UPD0+3, UPD1+4, R+2, ADDCANT+1, MERGE+8, DELETE+5, MERGEDD+9, MOVEVD+8
>> V	MERGE+10, MOVEVD+10
X	MODIFY+16, MODIFYX+1!, APPEND+16, APPENDX+1!, UPD0+2, MERGE+9, MERGE+10, MERGEX+1!, MERGEDDX+1!, MOVEVD+9* , MOVEVD+10, MOVEVDX+1!, RESEQX+1!
>> X1	MODIFY+16, APPEND+16
>> X2	MODIFY+16, APPEND+16
Y	DISP+4, DISP+6, DISPX+1!, MODIFY+5, MODIFY+7, MODIFY+8, MODIFY+25, MODIFYX+1!, APPEND+5, APPEND+7 , APPEND+8, APPEND+25, APPENDX+1!, UPDATE+5, UPDATE+7, UPD0+4, UPD0+6, MERGE+5, MERGE+7, MERGE+12* , MERGEX+1!, DEL+5, DEL+7, DELX+1!, MERGEDD+5, MERGEDD+7, MERGEDD+10, MERGEDDX+1!, MOVEVD+5, MOVEVD+7 , MOVEVD+12, MOVEVDX+1!, RESEQ+5, RESEQ+7, RESEQ+12, RESEQX+1!

Customize PDF page

Package: Patient Care Component

Routine: APCDCAF3

Information

Source Information

Call Graph

Call Graph Total: 30

Entry Points

External References

Interaction Calls

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Local Variables

Legend: