Routine: DGPMBSP3

Package	Total	Call Graph
Registration	1	(HEAD,HEAD2)^DGPMBSP

Package	Total	Caller Graph
Registration	1	DGPMBSP

Entry Points

Name	Comments	DBIA/ICR reference
A
Q
WR
CUM
TL
TWR
PTOT	; Calc Vacant, Overcapacity Beds for Totals
MTL

Name	Field # of Occurrence
HEAD^DGPMBSP	PTOT+12
HEAD2^DGPMBSP	PTOT+12

Name	Line Occurrences
Function Call: WRITE	Prompt: ! Line Location: WR+0
Function Call: WRITE	Prompt: W Line Location: WR+0
Function Call: WRITE	Prompt: ?+$P(TAB,"^",W),$J($P(DGWOR,"^",W),$P(JUS,"^",W)) Line Location: WR+0
Function Call: WRITE	Prompt: ! Condition for execution: UL["-" Line Location: TWR+2
Function Call: WRITE	Prompt: UL Line Location: TWR+2
Function Call: WRITE	Prompt: $C(13) Line Location: TWR+4
Function Call: WRITE	Prompt: ! Condition for execution: UL["-" Line Location: TWR+4
Function Call: WRITE	Prompt: UL Line Location: TWR+4
Function Call: WRITE	Prompt: $P(DGWTOR,"^") Line Location: PTOT+3
Function Call: WRITE	Prompt: ?+$P(TAB,"^",I),$J($P(W,"^",I),$P(JUS,"^",I)) Line Location: PTOT+4
Function Call: WRITE	Prompt: ?+$P(TAB,"^",I),$J(X(I),$P(JUS,"^",I)) Line Location: PTOT+10
Function Call: WRITE	Prompt: ?131,"" Condition for execution: $Y<131 Line Location: PTOT+11
Function Call: WRITE	Prompt: $C(13) Line Location: PTOT+11
Function Call: WRITE	Prompt: ! Condition for execution: UL["-" Line Location: PTOT+11
Function Call: WRITE	Prompt: UL Line Location: PTOT+11

Name	Line Occurrences (* Changed, ! Killed)
^UTILITY("DGWBD"	A+2
^UTILITY("DGWNN"	CUM+4
^UTILITY("DGWON"	CUM+3
^UTILITY("DGWOR"	A+2
^UTILITY("DGWTOR"	WR+3, WR+6

Name	Field # of Occurrence
^(	A+2, WR+6, CUM+3, CUM+4

Name	Field # of Occurrence
BD	A, A+3!, CUM+2, TL+2, TWR+8*
BDAY	A+2*, A+3!, WR, WR+2, CUM+1, CUM+2
C	A+3!, CUM+5, CUM+6
CB	A, A+3!, CUM+1, TL+2, TWR+8*
>> CT	A, TL+6, TWR+12*
>> CUM	A, CUM+6, TL, TL+7, TWR+9, TWR+10, TWR+11*
>> CUM(	TL+6, TWR+10
CW	A, A+3!, CUM, TL+2, TWR+8*
DGDNTD	TWR~, TWR+1*, TWR+2, TWR+3
DGWNN	A+3!, CUM+4*, CUM+6
DGWON	A+3!, CUM+3*, CUM+6
DGWOR	A+2*, A+3!, WR, WR+2
DGWTOR	A+3!, WR+6*, TL+6, TWR+1, TWR+9, TWR+10, PTOT+3, MTL+4
>> FY("D"	PTOT+5, PTOT+6
I	A+3!, CUM+6, PTOT+4, PTOT+10*
I1	A+3!, CUM+6*
IOSL	PTOT+12
>> JUS	WR, PTOT+4, PTOT+10
L	A+3!, TWR+2, TWR+4, PTOT+11*
N	A+3!
N1	A+3!, WR+2, MTL, MTL+3, MTL+4, MTL+5!
>> NTOTAL	A, WR+2, TL+1, TL+3, TL+4, TL+7, TWR+8, MTL*
O1	A+2*, A+3!
ORDER	A, A+2, A+3!, WR+3, WR+6, CUM+3, CUM+4, TL, TL+1, TL+2 , TL+3, TL+5, TWR+10
T	A+3!, TL+4, TL+5, MTL+1, MTL+2, MTL+5
T1	A+3!, TL+5*
T2	A+3!, TL+3, TL+5, TL+6, TL+7, PTOT+6, MTL+2*, MTL+3, MTL+4
T3	A+3!, MTL+1*, MTL+2, MTL+5!
>> TAB	WR, PTOT+4, PTOT+10
>> TB(	TL+2, TL+5, PTOT+6, MTL+1, MTL+3, MTL+5!
>> TC(	TL, TL+5, TL+6, MTL+4, MTL+5!
TL	A+3!, WR+4, WR+6, TL, TL+1, TL+2, TL+3, TL+5, TL+6, TL+7 , TWR+2, TWR+9, TWR+10, PTOT+6, MTL+1, MTL+3, MTL+4, MTL+5
TL(	TL+1, TL+5, TL+7, MTL+5!
>> TL1	WR+6*
TN	A+3!, TL+5*, MTL
TX	A+3!, TL+5*, MTL+3
TY	A+3!, TL+5*, MTL+4
>> UL	TWR+2, TWR+4, PTOT+11
W	A+3!, WR, TL+3, TL+7, PTOT+1, PTOT+2*, PTOT+4, PTOT+5, PTOT+9
X	A+3!
X(	PTOT+10
X(16	PTOT+5, PTOT+6, PTOT+7
X(17	PTOT+6, PTOT+8
X(18	PTOT+9*
X1	A+3!
Y	A+3!