Routine: ACDRR1PC

Information

ACDRR1PC ;IHS/ADC/EDE/KML - BROKE UP ACDRR1PB;

Package	Total	Call Graph
Alcohol Chemical Dependency	2	$$LJRF^ACD PAUSE^ACDDEU

Package	Total	Caller Graph
Alcohol Chemical Dependency	1	ACDRR1P

Name	Comments	DBIA/ICR reference
TRIBE	; EP-tribe
F	;Form feed
LOS	; EP-length of stay by component code/type

Name	Field # of Occurrence
$$LJRF^ACD	TRIBE+6, TRIBE+14, LOS+9
PAUSE^ACDDEU	F+3

Name	Line Occurrences
Function Call: WRITE	Prompt: !!,?50,"SEX",?68,"AGE",! Line Location: TRIBE+2
Function Call: WRITE	Prompt: "PATIENT COUNT BY TRIBE",?48,"M",?55,"F",?62,"<13",?67,"13-20",?75,"21+",!! Line Location: TRIBE+3
Function Call: WRITE	Prompt: ?2,$$LJRF^ACD("TOTAL SEEN",28,".")," ",X,?44,$J(M,5),?51,$J(F,5),?60,$J(%(1),5),?67,$J(%(2),5),?73,$J(%(3),5),! Line Location: TRIBE+6
Function Call: WRITE	Prompt: ?2,$$LJRF^ACD(ACDTRIBE,28,".")," ",Y Line Location: TRIBE+14
Function Call: WRITE	Prompt: ?37,$J((Y/X*100),3,0),"%",?44,$J(M,5),?51,$J(F,5),?60,$J(%(1),5),?67,$J(%(2),5),?73,$J(%(3),5),! Line Location: TRIBE+14
Function Call: WRITE	Prompt: !,"AVERAGE LENGTH OF STAY IN DAYS BY COMPONENT CODE/TYPE",! Line Location: LOS+2
Function Call: WRITE	Prompt: ?30,"COUNT",?40,"AVERAGE LOS",! Line Location: LOS+3
Function Call: WRITE	Prompt: ?2,$$LJRF^ACD(ACDTC,28,".")," ",Y,?44,$J(Z,5,0),! Line Location: LOS+9
Function Call: WRITE	Prompt: @IOF Line Location: F+4
Function Call: WRITE	Prompt: ! Line Location: F+5

Name	Line Occurrences (* Changed, ! Killed)
^TMP("ACDRR1"	TRIBE+4, TRIBE+5, TRIBE+9, TRIBE+11, TRIBE+12, TRIBE+13, LOS+5, LOS+7, LOS+8

Name	Line Occurrences
F	TRIBE+1, TRIBE+10, LOS+1, LOS+6

Name	Field # of Occurrence
>> %	TRIBE+4, TRIBE+5, TRIBE+12, TRIBE+13
>> %(	TRIBE+5, TRIBE+13
>> %(1	TRIBE+6, TRIBE+14
>> %(2	TRIBE+6, TRIBE+14
>> %(3	TRIBE+6, TRIBE+14
>> ACDBT	TRIBE+4, TRIBE+5, TRIBE+9, TRIBE+11, TRIBE+12, TRIBE+13, LOS+5, LOS+7, LOS+8
>> ACDJOB	TRIBE+4, TRIBE+5, TRIBE+9, TRIBE+11, TRIBE+12, TRIBE+13, LOS+5, LOS+7, LOS+8
>> ACDQ	TRIBE+1, TRIBE+9, TRIBE+10, LOS+1, LOS+5, LOS+6, F+3*
>> ACDTC	LOS+4, LOS+5, LOS+7, LOS+8, LOS+9
>> ACDTRIBE	TRIBE+8, TRIBE+9, TRIBE+11, TRIBE+12, TRIBE+13, TRIBE+14
>> DIRUT	F+3
>> F	TRIBE+6, TRIBE+14
IO("S"	F+3
IOF	F+4
IOSL	F+2
IOST	F+3
>> M	TRIBE+6, TRIBE+14
V	F+1~
W	F+1~
X	TRIBE+6, TRIBE+14, F+1~
Y	TRIBE+11, TRIBE+14, LOS+7, LOS+9, F+1~
Z	LOS+8*, LOS+9, F+1~
>> ZTQUEUED	F+3