Routine: DGPTODT2

Information

DGPTODT2 ;ALB/BOK - PTF DRG TRIM POINT REPORT CONT ; 9/7/01 11:33am

Package	Total	Call Graph
Registration	2	DIS^DGPTOD1 C^DGUTL
VA Fileman	1	DT^DIQ

Package	Total	Caller Graph
Registration	1	DGPTODT1

Name	Line Occurrences
Function Call: WRITE	Prompt: ! Line Location: HEAD+0
Function Call: WRITE	Prompt: !! Line Location: HEAD+1
Function Call: WRITE	Prompt: ?62,"-",P,"-" Condition for execution: P Line Location: HEAD+2
Function Call: WRITE	Prompt: @IOF,!,"DRG Trim Point Totals for ",$S(DGFLAG'["M":G2_" SERVICE",1:"MEDICAL CENTER"),$S(DGFLAG["Spec":" by Specialty",1:"") I 'DGD Line Location: HEAD+2
Function Call: WRITE	Prompt: " for Active Admissions" Line Location: HEAD+2
Function Call: WRITE	Prompt: !,"Discharge Dates from " Line Location: HEAD+3
Function Call: WRITE	Prompt: $P(Y,"@",1)," to " Line Location: HEAD+3
Function Call: WRITE	Prompt: $P(Y,"@",1)," to " Line Location: HEAD+3
Function Call: WRITE	Prompt: !!?38,"\| BELOW \| WITHIN TRIM \| ABOVE TRIM \|",!?16,"National",?30," ",?38,"\|-------\|----------------\|------------------------\|" Line Location: HEAD+5
Function Call: WRITE	Prompt: !,H,?36," \| # of \| # of",?57,"Total \| # of",?71,"Days Above ",?82,"Total \|",?91,"Total Total Total",?123,"Average",!,H1 Line Location: HEAD+6
Function Call: WRITE	Prompt: "\| Disch \| Disch LOS \| Disch Trim",?83,"LOS \| Disch LOS",?109,"Weight(*)",?124,"Weight",! Line Location: HEAD+7
Function Call: WRITE	Prompt: E Line Location: HEAD+8

Name	Line Occurrences (* Changed, ! Killed)
^DD("DD"	HEAD+3, COV+1
^UTILITY($J	MTRIM, MTRIM+1, MTRIM+2, MTRIM+3, TSET, BSTRIM, BSTRIM+1, BSTRIM+2, STRIM, STRIM+1 , STRIM+2, STRIM+3, COV!

Name	Line Occurrences
STRIM	BSTRIM+2

Name	Field # of Occurrence
>> %	HEAD, COV+1
>> A1	MTRIM+2, BSTRIM+2
>> A2	MTRIM+2, BSTRIM+2
>> A3	MTRIM+2, BSTRIM+2
>> B1	MTRIM, BSTRIM
>> B2	MTRIM, BSTRIM
>> B4	MTRIM, BSTRIM
>> B5	MTRIM, BSTRIM
>> D	BSTRIM, BSTRIM+1, BSTRIM+2
>> D2	MTRIM, MTRIM+1, MTRIM+2, MTRIM+3, TSET, BSTRIM, BSTRIM+1, BSTRIM+2, STRIM, STRIM+1 , STRIM+2, STRIM+3
>> D3	TSET
DGAT1	MTRIM+2, BSTRIM!, BSTRIM+2, STRIM+2
>> DGB	HEAD+4, COV+1
DGBT1	MTRIM!, BSTRIM!, STRIM, STRIM+3
DGCPG	COV!
DGCPG(1	COV*
DGCPG(2	COV, COV+1
DGCPG(3	COV+1*
>> DGD	HEAD+2, HEAD+3, COV, COV+1
>> DGED	HEAD+3, COV+1
>> DGFLAG	BSTRIM+2, HEAD+2, COV
>> DGSD	HEAD+3, COV+1
DGTCH	COV!, COV+2*
DGWT1	MTRIM!, MTRIM+1, BSTRIM!, BSTRIM+1, STRIM+1
DT	HEAD+4
E	HEAD, HEAD+8!
>> G	BSTRIM, BSTRIM+1, BSTRIM+2
>> G2	HEAD+2
>> H	HEAD+6
>> H1	HEAD+6
IOF	HEAD+2
IOSL	HEAD
>> P	MTRIM+3, BSTRIM, HEAD, HEAD+1, HEAD+2, HEAD+9*
>> P1	BSTRIM
>> P3	COV+2
U	MTRIM, MTRIM+1, MTRIM+2, TSET, BSTRIM, BSTRIM+1, BSTRIM+2, STRIM, STRIM+1, STRIM+2 , STRIM+3
>> W1	MTRIM+1, BSTRIM+1
>> W2	MTRIM+1, BSTRIM+1
>> Y	HEAD+3, HEAD+4, COV+1*
>> Z	STRIM*, STRIM+1, STRIM+2, STRIM+3