Routine: APCDENV

Package	Total	Call Graph
VA Fileman	5	^%DT ^%DTC ^DIC YN^DICN ^DIE
Patient Care Component	4	INAC^APCDEA ^APCDEA3 ^APCDEIN ^APCDEKL

Entry Points

Name	Comments	DBIA/ICR reference
GETMNE	; GET MNEMONIC
HDR	; Write Header
GETLOC	; GET LOCATION
EOJ	; END OF JOB
GETMNEK	; KILL GETMNE SPECIFIC VARIABLES
GETPAT	; GET PATIENT
PROCESS	; PROCESS MNEMONIC
TEXT	;
GETDATE	; GET DATE

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: GETPAT+2
Function Call: WRITE	Prompt: !!,"Select non VISIT related mnemonics only!" Line Location: PROCESS+1
Function Call: WRITE	Prompt: ! Line Location: GETMNE+1
Routine Call	DIE Line Location: GETPAT+1 PROCESS+3
Routine Call	DIC Line Location: GETPAT+5 GETLOC+1 GETMNE+2

Name	Line Occurrences (* Changed, ! Killed)
^APCDSITE - [#9001001.2]	GETPAT+4

Name	Field # of Occurrence
>> %	GETPAT+7*
%A	EOJ+3!
%DT	GETDATE+1*, EOJ+3!
%DT("A"	GETDATE+1*
%W	EOJ+3!
>> APCDDATE	HDR+9, GETDATE+1, GETDATE+3*, GETDATE+4
>> APCDEMF	HDR+9, PROCESS+4*
APCDENV	HDR+8*, EOJ+2!
>> APCDFLG	HDR+7
APCDJ	HDR+2*, HDR+3!
>> APCDL	HDR+9*
>> APCDLOC	HDR+9, GETLOC+1, GETLOC+3*
>> APCDMNE	GETMNE+4*
>> APCDMNE("NAME"	GETMNE+4*
>> APCDPARM	GETPAT+7
>> APCDPAT	HDR+8, HDR+9, GETPAT+1, GETPAT+3, GETPAT+8, GETPAT+9*, PROCESS+3
APCDVSIT	GETMNEK+1!
APCDX	HDR+2*, HDR+3!, GETMNEK+1!
>> AUPNDAYS	GETDATE+4*
>> AUPNDOB	GETDATE+4
>> AUPNLK("INAC"	GETPAT+4*
C	EOJ+3!
>> DA	GETPAT+1, PROCESS+3
DI	EOJ+3!
DIC	GETPAT+5!, GETLOC+1!, GETMNE+2*
DIC("A"	GETMNE+2*!
DIC("S"	GETMNE+2*!
DIC(0	GETPAT+5, GETLOC+1, GETMNE+2*
>> DIE	GETPAT+1, PROCESS+3
DIG	EOJ+3!
DIH	EOJ+3!
DIPGM	EOJ+3!
DIU	PROCESS+3!
DIV	PROCESS+3!
DIW	EOJ+3!
>> DR	GETPAT+1, PROCESS+3
DUZ(2	GETPAT+4
IOF	HDR+1
U	GETPAT+4, GETPAT+7, GETMNE+4
>> X	GETPAT+9, GETDATE+4
>> X1	GETDATE+4*
>> X2	GETDATE+4*
>> Y	GETPAT+6, GETPAT+8, GETLOC+2, GETLOC+3, GETDATE+2, GETDATE+3, GETMNE+3, GETMNE+4

Name	Field # of Occurrence
$T(TEXT+APCDJ	HDR+2