Routine: DGODNSM

Information

DGODNSM ;ALB/EG - INPATIENT WORKLOAD SUMMARY ; 2/28/89 1600

Package	Total	Call Graph
Registration	1	(TOT,TOT1)^DGODOSM1

Package	Total	Caller Graph
Registration	1	DGODNP2

Name	Field # of Occurrence
TOT^DGODOSM1	DGODNSM+15
TOT1^DGODOSM1	DGODNSM+13

Name	Line Occurrences
Function Call: WRITE	Prompt: @IOF,!,?((IOM-$L(HR))/2),HR,?IOM-20,T2,! Line Location: DGODNSM+4
Function Call: WRITE	Prompt: !,?1,"DATE RANGE: FROM " Line Location: DGODNSM+5
Function Call: WRITE	Prompt: Y," TO " Line Location: DGODNSM+5
Function Call: WRITE	Prompt: Y," TO " Line Location: DGODNSM+5
Function Call: WRITE	Prompt: ! Line Location: DGODNSM+13
Function Call: WRITE	Prompt: ! Line Location: DGODNSM+15
Function Call: WRITE	Prompt: !,$P($T(LEG+I),";;",2) Line Location: DGODNSM+15
Function Call: READ	Timeout: DTIME Variable: ZRT Line Location: PRI+1
Function Call: WRITE	Prompt: !,?1,$P(A(I),U,2),?7,$P(A(I),U,1) Line Location: PRI+2
Function Call: WRITE	Prompt: ?30,^UTILITY("DGOD",$J,"T",K,I,1),?40,^(2),?50,^(3),?60,^(4),?70,^(5),?80,^(6),?90,^(7) Line Location: PRI+3
Function Call: WRITE	Prompt: ?100,^UTILITY("DGOD",$J,"T",K,I,"R") Line Location: PRI+4
Function Call: WRITE	Prompt: ?110,"("_$J(^UTILITY("DGOD",$J,"T",K,I,"R")/^UTILITY("DGOD",$J,"T",K,"R")*100,2,2)_")",! Line Location: PRI+5
Function Call: WRITE	Prompt: !,?1,$P($T(HD+2),";;",2)," ON "_T2,! Line Location: REM+1
Function Call: WRITE	Prompt: !,?1,X,?20,Z(X) Line Location: REM+2
Function Call: WRITE	Prompt: ! Line Location: REM+3
Function Call: WRITE	Prompt: !,?1,HDR1,! Line Location: HDR+0
Function Call: WRITE	Prompt: !,?1,"FACILITY",?30,"AS",?40,"AN",?50,"B0",?60,"C0",?70,"N0",?80,"X0",?90,"U0",?100,"TOTAL",?110,"%",! Line Location: HDR+1

Name	Line Occurrences (* Changed, ! Killed)
^DD("DD"	DGODNSM+5
^UTILITY("DGOD"	DGODNSM+4, DGODNSM+6, DGODNSM+7, DGODNSM+8, DGODNSM+9, DGODNSM+10, DGODNSM+11, DGODNSM+12, DGODNSM+14*, PRI , PRI+3, PRI+4, PRI+5

Name	Field # of Occurrence
A	END!
A(	DGODNSM+9, DGODNSM+10, PRI+2
A(1	DGODNSM+3
A1X	DGODNSM+3*, DGODNSM+9, END!
A2	DGODNSM+6, DGODNSM+8, DGODNSM+9, DGODNSM+10, DGODNSM+11, DGODNSM+12, DGODNSM+13, END!
DGBD	DGODNSM+5, END!
DGDV	DGODNSM+9, DGODNSM+10, END!
>> DGJB	DGODNSM+9, DGODNSM+10
DGMT	DGODNSM+9, DGODNSM+10, DGODNSM+11*, END!
DGND	DGODNSM+5, END!
>> DGTN	DGODNSM+6, DGODNSM+8, DGODNSM+9, DGODNSM+10, DGODNSM+11, DGODNSM+12, DGODNSM+13, DGODNSM+14
DTIME	PRI+1
HDR1	END!, HDR*
HR	DGODNSM+4*, END!
I	DGODNSM+6, DGODNSM+8, DGODNSM+9, DGODNSM+10, DGODNSM+11, DGODNSM+12, DGODNSM+13, DGODNSM+15, END!, PRI , PRI+2, PRI+3, PRI+4, PRI+5, REM+2*
IO	PRI+1
IO(0	PRI+1
IOF	DGODNSM+4
IOM	DGODNSM+4, PRI+1
IOSL	PRI+1
IOST	PRI+1
J	DGODNSM+6, DGODNSM+7, DGODNSM+14*, END!
K	DGODNSM+6, DGODNSM+8, DGODNSM+9, DGODNSM+10, DGODNSM+11, DGODNSM+12, DGODNSM+13, DGODNSM+14, END!, PRI , PRI+3, PRI+4, PRI+5
T2	DGODNSM+4, END!, REM+1
U	DGODNSM+3, DGODNSM+9, DGODNSM+10, PRI+1, PRI+2
X	END!, REM+2*
Y	DGODNSM+5*, END!
Z	END!
Z(	REM+2
>> ZRT	PRI+1*
>> ZRT1	PRI+1*