Routine: ACD

Package	Total	Call Graph
Kernel	2	ENDR^%ZISS $$REPEAT^XLFSTR

Package	Total	Caller Graph
Alcohol Chemical Dependency	14	ACDBILLS ACDCNV ACDPCCLS ACDPCCLT ACDRR1P ACDRR1PB ACDRR1PC ACDRR2P ACDRR3P ACDWDRV1 ACDWDRV2 ACDWDRV3 ACDWDRV4 ACDWDRV5

Entry Points

Name	Comments	DBIA/ICR reference
LJRF(X,Y,Z)	;EP - left justify X in a field Y wide, right filling with Z.
LOC()	;EP - Return location name from file 4 based on DUZ(2).
CTR(X,Y)	;EP - Center X in a field Y wide.
START	;
USR()	;EP - Return name of current user from ^VA(200.
PRHDR	;EP PRINT HEADER
HDR	;EP - Screen header.

Name	Field # of Occurrence
ENDR^%ZISS	START+17, HDR+3
$$REPEAT^XLFSTR	HDR+11, HDR+16

Name	Line Occurrences
Function Call: WRITE	Prompt: !!,"Your SITE NAME is not set for the KERNEL.",!,"Please contact your System Support person.",!! Line Location: START+7
Function Call: WRITE	Prompt: !!,"You do not have the appropriate FileMan access.",!,"Please contact your System Support person.",!! Line Location: START+8
Function Call: WRITE	Prompt: !!,"Your Program is not defined in the CDMIS PROGRAM file.",!,"Please contact your Site Manager." Line Location: START+9
Function Call: WRITE	Prompt: IORVON,IORVOFF Line Location: HDR+9
Function Call: WRITE	Prompt: @IOF,!,$$CTR($$REPEAT^XLFSTR("*",D)),! Line Location: HDR+11
Function Call: WRITE	Prompt: ?L,"",$$CTR(ACDPNV,N),?R,"",! Line Location: HDR+12
Function Call: WRITE	Prompt: ?L,"",$$CTR($$LOC(),N),?R,"",! Line Location: HDR+14
Function Call: WRITE	Prompt: ?L,"",?(L+(((R-L)-$L(ACDMT))\2)),IORVON,ACDMT,IORVOFF,?R+F,"",! Line Location: HDR+15
Function Call: WRITE	Prompt: $$CTR($$REPEAT^XLFSTR("*",D)),! Line Location: HDR+16

Name	Line Occurrences (* Changed, ! Killed)
^%ZIS(1 - [#3.5]	START+18
^%ZIS(2 - [#3.2]	START+18
^ACDF5PI - [#9002173]	START+9, START+12, START+16
^AUTTLOC - [#9999999.06]	START+11
^DIC(4 - [#4]	START+11, LOC+1
^DIC(9.4 - [#9.4]	START+2, START+3
^VA(200 - [#200]	USR+1

Name	Field # of Occurrence
^(0	USR+1, LOC+1

Name	Field # of Occurrence
A	HDR+7~, HDR+9*
>> ACD6DIG	START+11*, HDR+2, HDR+6
>> ACDFHCP	START+14*
>> ACDFHCPT	START+15, START+16
>> ACDFHCPT(	START+16*
>> ACDFPCC	START+13*
ACDHQAF	HDR+6*, HDR+13, HDR+17!
ACDMT	HDR+4*, HDR+15, HDR+17!
>> ACDPGM	START+10*, START+12, START+16
>> ACDPNM	START+6*, HDR+5
ACDPNV	HDR+5*, HDR+12, HDR+17!
>> ACDQUIT	START+7, START+8, START+9*
>> ACDRVOF	START+18, START+19
>> ACDRVON	START+18, START+19
>> ACDSITE	START+11*
>> ACDTOP	START+1*
>> ACDVER	START+3, START+5, HDR+5
ACDY	START+2*, START+3!
D	HDR+7~, HDR+9, HDR+10, HDR+11, HDR+16
DUZ	USR+1
DUZ(0	START+8
DUZ(2	START+7, START+9, START+10, START+11, LOC+1
F	HDR+7~, HDR+8, HDR+9, HDR+15
I	HDR+7~
IO	START+18
IOF	HDR+11
IOM	CTR+1
>> IORVOFF	HDR+9, HDR+15
>> IORVON	START+17, HDR+3, HDR+9, HDR+15
L	HDR+7~, HDR+10, HDR+12, HDR+13, HDR+14, HDR+15, LJRF+1~, LJRF+3, LJRF+4
M	LJRF+1~, LJRF+4*, LJRF+5
N	HDR+7~, HDR+10*, HDR+12, HDR+13, HDR+14
R	HDR+7~, HDR+10*, HDR+12, HDR+13, HDR+14, HDR+15
U	START+11, START+12, START+18, HDR+4, USR+1, LOC+1
V	HDR+7~
X	START+4, START+5, START+12, START+13, START+17, START+18, HDR+3, HDR+4, CTR~, CTR+1 , LJRF~, LJRF+2, LJRF+3, LJRF+5
>> XQY0	START+1, HDR+1, HDR+4
Y	START+12, START+14, START+16, START+18*, CTR~, CTR+1, LJRF~, LJRF+2, LJRF+3
Z	LJRF~, LJRF+2, LJRF+4

Name	Field # of Occurrence
$T(	START+4