Routine: APCDHHF

Package	Total	Call Graph
VA Fileman	3	^DIC ^DIE ^DIR
IHS VA Utilities	2	^XBFMK EN^XBNEW
Patient Care Component	2	^APCDALV ^APCDVLK
IHS Patient	1	^AUPNPAT
Patient Care Component Reports	1	$$VD^APCLV

Package

Total

Call Graph

^DIC ^DIE ^DIR

^XBFMK EN^XBNEW

$$VD^APCLV

Name	Comments	DBIA/ICR reference
ENHHF1	;
LOC	;get location and outside location
CREATE	;
CAT	;
XIT	;
ENHHF(PATDFN,TEXT,APCDTEMP,SRVCAT)	;

Name	Line Occurrences
Function Call: WRITE	Prompt: !!,"No date entered." Line Location: ENHHF1+4
Function Call: WRITE	Prompt: !!,APCDTMG1,!,APCDTMG2,! Line Location: ENHHF1+10
Function Call: WRITE	Prompt: !,"Creating PCC Visit...",! Line Location: CREATE+1
Function Call: WRITE	Prompt: !!,"Visit Type is required!" Line Location: CREATE+11
Function Call: WRITE	Prompt: !!,"Location is required. ^ NOT ALLOWED" Line Location: LOC+3
Function Call: WRITE	Prompt: !!,"creating visit failed" Line Location: CAT+4
Routine Call	DIE Line Location: ENHHF1+23
Routine Call	DIC Line Location: LOC+2
Routine Call	DIR Line Location: ENHHF1+3 CREATE+10 LOC+7

FileNo	Call Tags
^AUPNVSIT - [#9000010]	Classic Fileman Calls
^AUTTLOC - [#9999999.06]	Classic Fileman Calls

Name	Line Occurrences (* Changed, ! Killed)
^APCDSITE - [#9001001.2]	CREATE+9, LOC+6
^AUTTLOC - [#9999999.06]	LOC+5
^DD(9000010	ENHHF1+10

Name	Field # of Occurrence
APCDALVR	CREATE+4!, CREATE+11!, CAT+4!
APCDALVR("APCDADD"	CAT+2*
APCDALVR("APCDAFLG"	CAT+4
APCDALVR("APCDAUTO"	CAT+2*
APCDALVR("APCDCAT"	CAT+1*
APCDALVR("APCDDATE"	CREATE+6*
APCDALVR("APCDLOC"	LOC+4*
APCDALVR("APCDOLOC"	LOC+9*
APCDALVR("APCDPAT"	CREATE+5*
APCDALVR("APCDTYPE"	CREATE+12*
APCDALVR("APCDVSIT"	CAT+5
APCDCLN	ENHHF1+13!
>> APCDDATE	ENHHF1+22*
APCDGHVD	ENHHF1+9*, ENHHF1+14, XIT+1!
>> APCDLOC	LOC+1*
>> APCDLOOK	ENHHF1+11*, ENHHF1+15
>> APCDOVRR	ENHHF1+19*
>> APCDPAT	ENHHF1+1, ENHHF1+18
>> APCDTDA	ENHHF+1*
APCDTEMP	ENHHF~, ENHHF1+21
>> APCDTERR	ENHHF1+9, ENHHF1+14
APCDTMG1	ENHHF1+9*, ENHHF1+10, XIT+1!
APCDTMG2	ENHHF1+9*, ENHHF1+10, XIT+1!
>> APCDTX	ENHHF1+5, ENHHF1+6, ENHHF1+8, ENHHF1+10*, ENHHF1+11, CREATE+6
APCDVLDT	ENHHF1+11*, XIT+1!
>> APCDVSIT	ENHHF1+15, ENHHF1+21, ENHHF1+22, CREATE+2, CAT+5
>> AUPNPAT	ENHHF1+1*, ENHHF1+2, CREATE+3
>> AUPNVSIT	ENHHF1+21*
DA	ENHHF1+3!, ENHHF1+21*, LOC+7!
DIC	LOC+2*!
DIC(0	LOC+2*
>> DIE	ENHHF1+21*
>> DIE("NO^"	ENHHF1+20*
DIR	ENHHF1+3!, CREATE+8!, CREATE+10!, LOC+7!
DIR("A"	ENHHF1+3, CREATE+10, LOC+7*
DIR("B"	CREATE+9*
DIR(0	ENHHF1+3, CREATE+10, LOC+7*
>> DIRUT	ENHHF1+4, CREATE+11, LOC+8
>> DR	ENHHF1+21*
DUZ(2	CREATE+9, LOC+6
PATDFN	ENHHF~, ENHHF1+1, ENHHF1+16, ENHHF1+18, CREATE+5
SRVCAT	ENHHF~, CAT+1
TEXT	ENHHF~, ENHHF1+3
U	CREATE+9, LOC+5, LOC+6
X	ENHHF1+8*, ENHHF1+10, XIT+1!
Y	ENHHF1+2, ENHHF1+5, ENHHF1+16, XIT+1!, CREATE+3, CREATE+12, LOC+3, LOC+4, LOC+5, LOC+8 , LOC+9

Information