Routine: ACDPFACE

Package	Total	Call Graph
Alcohol Chemical Dependency	5	(CONF,DEV,GETVSITS,PAUSE)^ACDDEU (DIC,DIQ1)^ACDFMC ^ACDKILL P1^ACDWCD1 ^ACDWVIS
Kernel	3	^%ZIS ^%ZISC ^%ZTLOAD
VA Fileman	1	^DIR

Package

Total

Call Graph

Alcohol Chemical Dependency

(CONF,DEV,GETVSITS,PAUSE)^ACDDEU (DIC,DIQ1)^ACDFMC ^ACDKILL P1^ACDWCD1 ^ACDWVIS

Kernel

^%ZIS ^%ZISC ^%ZTLOAD

VA Fileman

^DIR

Package	Total	Caller Graph
Alcohol Chemical Dependency	1	ACDDE3

Package

Total

Caller Graph

Alcohol Chemical Dependency

ACDDE3

Name	Comments	DBIA/ICR reference
EOJ	;
GETPAT	; GET PATIENT
START	;
PATLOOP	; DISPLAY PATIENTS UNTIL DONE
DISPLAYQ	; EP - FOR TASKMAN
DISPLAY	; EP - DISPLAY VISIT AND SUBORDINATE FILE ENTRY
SELECT	; SELECT A CDMIS INITIAL/REOPEN/TDC VISIT

External References

Name	Field # of Occurrence
^%ZIS	DISPLAYQ+1
^%ZISC	DISPLAYQ+17, EOJ+1
^%ZTLOAD	DISPLAY+4
CONF^ACDDEU	DISPLAYQ+4
DEV^ACDDEU	PATLOOP+9
GETVSITS^ACDDEU	PATLOOP+3
PAUSE^ACDDEU	PATLOOP+8
DIC^ACDFMC	GETPAT+3
DIQ1^ACDFMC	SELECT+13
^ACDKILL	EOJ+2
P1^ACDWCD1	DISPLAYQ+13
^ACDWVIS	DISPLAYQ+6
^DIR	SELECT+18

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: ! Line Location: START+1
Function Call: WRITE	Prompt: ! Line Location: SELECT+2
Function Call: WRITE	Prompt: !,"----------",!,"No CDMIS visits!",!,"----------",! Line Location: SELECT+5
Function Call: WRITE	Prompt: ACDLC,?5,ACDPDD(9002172.1,ACDY,.01),?18," - ",ACDPDD(9002172.1,ACDY,1),"/",ACDPDD(9002172.1,ACDY,5)," ",ACDPDD(9002172.1,ACDY,3),! Line Location: SELECT+14
Function Call: WRITE	Prompt: !,"----------",!,"No type IN, RE, or TD visits!",!,"----------",! Line Location: SELECT+17
Function Call: WRITE	Prompt: !!,"No '"_ACDTC_"' attached to this visit.",! Line Location: DISPLAYQ+10
Function Call: WRITE	Prompt: @IOF Line Location: DISPLAYQ+16
Routine Call	DIR Line Location: SELECT+18
Routine Call	%ZIS Line Location: DISPLAYQ+1

FileNo	Call Tags
^AUPNPAT - [#9000001]	Classic Fileman Calls

Name	Line Occurrences (* Changed, ! Killed)
^ACDIIF("C"	DISPLAYQ+9
^ACDTDC("C"	DISPLAYQ+8
^ACDVIS - [#9002172.1]	SELECT+8, DISPLAYQ+7
^DPT - [#2]	GETPAT+6
^TMP("ACD"	SELECT+5, SELECT+7

Name	Line Occurrences
@(	DISPLAYQ+11
DISPLAY	PATLOOP+7, PATLOOP+10
DISPLAYQ	DISPLAY+6
EOJ	START+3, DISPLAYQ+18
GETPAT	PATLOOP+1
PATLOOP	START+2
SELECT	PATLOOP+5

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
ACDCOMC	DISPLAYQ+5~
ACDCOMCL	DISPLAYQ+5~
ACDCOMT	DISPLAYQ+5~
ACDCOMTL	DISPLAYQ+5~
ACDCONT	DISPLAYQ+5~
ACDCONTL	DISPLAYQ+5~
>> ACDDA	DISPLAYQ+6, DISPLAYQ+8, DISPLAYQ+9*, DISPLAYQ+10
ACDDFN	GETPAT+6*, DISPLAYQ+5~
ACDDFNP	GETPAT+6*, DISPLAYQ+5~
ACDLC	SELECT+6, SELECT+10, SELECT+11, SELECT+14, SELECT+17, SELECT+18, SELECT+20!
ACDPDD	SELECT+15!
ACDPDD(	SELECT+14
ACDPFACE	DISPLAYQ+12*, DISPLAYQ+14!
ACDPROV	DISPLAYQ+5~
ACDPROVP	DISPLAYQ+5~
>> ACDQ	START+2, PATLOOP+2, PATLOOP+4, PATLOOP+6, PATLOOP+9, GETPAT+1, GETPAT+7, SELECT+1, SELECT+22*
ACDSLAVE	PATLOOP+8, PATLOOP+10, PATLOOP+11!, DISPLAYQ+1, DISPLAYQ+17
>> ACDTC	SELECT+8, SELECT+9, DISPLAYQ+7, DISPLAYQ+8, DISPLAYQ+10, DISPLAYQ+11
>> ACDVIEN	SELECT+3, SELECT+19, SELECT+21, DISPLAYQ+6, DISPLAYQ+7, DISPLAYQ+8, DISPLAYQ+9
ACDVLST	SELECT+4!, SELECT+20!
ACDVLST(	SELECT+11*, SELECT+19
ACDWSTAF	DISPLAYQ+6!
ACDWSTAF(1	DISPLAYQ+6*
>> ACDX	SELECT+6, SELECT+7
>> ACDY	SELECT+6, SELECT+7, SELECT+8, SELECT+11, SELECT+12, SELECT+14
>> AUPNLK("ALL"	GETPAT+2*, GETPAT+4!
DA	SELECT+12*, SELECT+18!
>> DIC	GETPAT+3, SELECT+12
>> DIC("S"	GETPAT+3*
>> DIC(0	GETPAT+3*
>> DIQ	SELECT+12*
DIR	SELECT+18!
DIR("A"	SELECT+18*
DIR(0	SELECT+18*
>> DR	SELECT+12*
IO	PATLOOP+10, PATLOOP+11*, DISPLAYQ+2, DISPLAYQ+15
IO("Q"	DISPLAY+2
IO(0	PATLOOP+10, PATLOOP+11, DISPLAYQ+15
IOF	DISPLAYQ+15
>> IOP	DISPLAYQ+1*
IOST	PATLOOP+8, DISPLAYQ+4
U	GETPAT+6, SELECT+8, DISPLAYQ+7
>> Y	GETPAT+5, GETPAT+6, SELECT+19
>> ZTDESC	DISPLAY+3*
>> ZTDTH	DISPLAY+3*
>> ZTQUEUED	DISPLAYQ+18
>> ZTREQ	DISPLAYQ+18*
>> ZTRTN	DISPLAY+3*
>> ZTSAVE("ACD*"	DISPLAY+3*

Customize PDF page

Package: Alcohol Chemical Dependency

Routine: ACDPFACE

Information

Source Information

Call Graph

Call Graph Total: 9

Caller Graph

Caller Graph Total: 1

Entry Points

External References

Interaction Calls

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Local Variables

Legend: