Routine: APCDELAB

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

Entry Points

Name	Comments	DBIA/ICR reference
RDPV	;
LABLOG	;
HDR	;
LABTEST	;
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
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	LABLOG+4, LABTEST+7
^APCDEIN	HDR+5
^APCDEKL	EOJ+1
^DIC	GETLOC+2, LABLOG+1, LABTEST+2, LABTEST+5
^DIR	RDPV+3, 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: RDPV+2
Function Call: WRITE	Prompt: ! Line Location: GETDATE+1
Function Call: WRITE	Prompt: !!,$C(7),$C(7),"LAB LOG TEMPLATE MISSING, NOTIFY YOUR SUPERVISOR" Line Location: LABLOG+2
Function Call: WRITE	Prompt: !!,$C(7),$C(7),"LAB TEST TEMPLATE MISSING, NOTIFY YOUR SUPERVISOR" Line Location: LABTEST+3
Routine Call	DIC Line Location: GETLOC+2 LABLOG+1 LABTEST+2 LABTEST+5
Routine Call	DIR Line Location: RDPV+3 GETTYPE+3 GETCAT+3

FileMan Files Accessed Via FileMan Db Call

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

Label References

Name	Line Occurrences
EOJ	HDR+9
GETCAT	HDR+8
GETDATE	RESTOFIT
GETLOC	HDR+8
GETMNEK	LABLOG+4, LABTEST+7
GETPAT	LABLOG+4, LABTEST+7
GETTYPE	HDR+8
LABLOG	PROCESS+1
LABTEST	PROCESS+2
PROCESS	RESTOFIT
RDPV	RESTOFIT
RESTOFIT	HDR+8

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

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

Customize PDF page

Package: Patient Care Component

Routine: APCDELAB

Information

Source Information

Call Graph

Call Graph Total: 8

Entry Points

External References

Interaction Calls

FileMan Files Accessed Via FileMan Db Call

Label References

Local Variables

Legend:

Marked Items