Routine: APCDECPT

Package	Total	Call Graph
Patient Care Component	4	GETPAT^APCDEA ^APCDEA2 ^APCDEIN ^APCDEKL
VA Fileman	4	^%DT ^%DTC ^DIC ^DIR
IHS Patient	1	KILL^AUPNPAT

Entry Points

Name	Comments	DBIA/ICR reference
CPTTEST	;
HDR	;
GETLOC	; GET LOCATION OF ENCOUNTER
EOJ	; END OF JOB
GETMNEK	; KILL GETMNE SPECIFIC VARIABLES
GETTYPE	; GET TYPE OF ENCOUNTER
GETPAT	; GET PATIENT
PROCESS	; PROCESS MNEMONIC
CPTLOG	;
GETCAT	; GET SERVICE CATEGORY
TEXT	;
RESTOFIT
GETDATE	; GET DATE

External References

Name	Field # of Occurrence
^%DT	GETDATE+1
^%DTC	GETPAT+3
GETPAT^APCDEA	GETPAT+1
^APCDEA2	CPTLOG+4, CPTTEST+7
^APCDEIN	HDR+5
^APCDEKL	EOJ+1
KILL^AUPNPAT	EOJ+2
^DIC	GETLOC+2, CPTLOG+1, CPTTEST+2, CPTTEST+5
^DIR	GETTYPE+3, GETCAT+3

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !?80-$L(APCDX)\2,APCDX Line Location: HDR+2
Function Call: WRITE	Prompt: !! Line Location: HDR+4
Function Call: WRITE	Prompt: ! Line Location: GETDATE+1
Function Call: WRITE	Prompt: !!,$C(7),$C(7),"CPT LOG TEMPLATE MISSING, NOTIFY YOUR SUPERVISOR" Line Location: CPTLOG+2
Function Call: WRITE	Prompt: !!,$C(7),$C(7),"CPT TEST TEMPLATE MISSING, NOTIFY YOUR SUPERVISOR" Line Location: CPTTEST+3
Routine Call	DIC Line Location: GETLOC+2 CPTLOG+1 CPTTEST+2 CPTTEST+5
Routine Call	DIR Line Location: GETTYPE+3 GETCAT+3

FileMan Files Accessed Via FileMan Db Call

FileNo	Call Tags
^APCDTKW - [#9001001]	Classic Fileman Calls
^AUTTLOC - [#9999999.06]	Classic Fileman Calls

Label References

Name	Line Occurrences
CPTLOG	PROCESS+1
EOJ	HDR+9
GETCAT	HDR+8
GETDATE	RESTOFIT
GETLOC	HDR+8
GETMNEK	CPTLOG+4, CPTTEST+7
GETPAT	CPTLOG+4, CPTTEST+7
GETTYPE	HDR+8
PROCESS	RESTOFIT
RESTOFIT	HDR+8

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
%	EOJ+6!
%DT	GETDATE+1*, EOJ+6!
%DT("A"	GETDATE+1*, GETDATE+4!
AGE	EOJ+3!
APCDADD	CPTLOG+4!, CPTTEST+7!
APCDALVR	CPTLOG+4!, CPTTEST+7!
>> APCDCAT	HDR+8, GETCAT+1, GETCAT+5*
APCDCPT	HDR+7*, EOJ+5!
APCDCPTT	CPTTEST+1, CPTTEST+6, EOJ+5!
>> APCDDATE	RESTOFIT, GETDATE+1, GETDATE+3*, GETPAT+3
>> APCDFLG	HDR+6
APCDJ	HDR+2*, HDR+3!
>> APCDLOC	HDR+8, GETLOC+1, GETLOC+4*
>> APCDPAT	HDR+7, GETPAT+2, CPTLOG+4, CPTTEST+7*
>> APCDTPLT	CPTLOG+3, CPTTEST+4
>> APCDTPLT("NAME"	CPTLOG+3, CPTTEST+4
>> APCDTYPE	HDR+8, GETTYPE+1, GETTYPE+6*
APCDVSIT	GETMNEK+1!
APCDX	HDR+2*, HDR+3!
>> AUPNDAYS	GETPAT+3*
>> AUPNDOB	GETPAT+3
D	EOJ+4!
DA	GETLOC+2!, GETTYPE+2!, GETCAT+2!, GETCAT+6!
DFN	EOJ+3!
DI	EOJ+4!
DIC	GETLOC+2!, CPTLOG+1, CPTTEST+2!, CPTTEST+5!, CPTTEST+6!
DIC("A"	CPTLOG+1!, CPTTEST+5*
DIC("B"	CPTLOG+1!
DIC("S"	CPTLOG+1!, CPTTEST+2
DIC(0	GETLOC+2, CPTLOG+1, CPTTEST+2, CPTTEST+5
DIG	EOJ+4!
DIH	EOJ+4!
DIR	GETTYPE+2!, GETTYPE+3!, GETTYPE+4!, GETCAT+2!, GETCAT+3!, GETCAT+6!
DIR("A"	GETTYPE+3, GETCAT+3
DIR(0	GETTYPE+3, GETCAT+3
DIROUT	GETTYPE+2!, GETTYPE+4!, GETCAT+2!, GETCAT+6!
DIRUT	GETTYPE+2!, GETTYPE+4!, GETTYPE+5, GETCAT+2!, GETCAT+4, GETCAT+6!
DIW	EOJ+4!
DK	EOJ+4!
DL	EOJ+4!
DLOUT	EOJ+4!
DQ	EOJ+4!
DTOUT	GETTYPE+2!, GETTYPE+4!, GETCAT+2!, GETCAT+6!
DUOUT	GETTYPE+2!, GETTYPE+4!, GETCAT+2!, GETCAT+6!
DX	EOJ+4!
IOF	HDR+1
POP	EOJ+4!
U	CPTLOG+3, CPTTEST+4
X	GETTYPE+5, GETCAT+4, GETCAT+6!, GETPAT+3, CPTLOG+1, CPTTEST+2, EOJ+4!
>> X1	GETPAT+3*
>> X2	GETPAT+3*
Y	GETLOC+3, GETLOC+4, GETTYPE+6, GETCAT+5, GETCAT+6!, GETDATE+2, GETDATE+3, CPTLOG+2, CPTLOG+3, CPTTEST+3 , CPTTEST+4, CPTTEST+5, CPTTEST+6, EOJ+4!

Customize PDF page

Package: Patient Care Component

Routine: APCDECPT

Information

Source Information

Call Graph

Call Graph Total: 9

Entry Points

External References

Interaction Calls

FileMan Files Accessed Via FileMan Db Call

Label References

Local Variables

Legend:

Marked Items