Routine: DGPTODF2

Information

DGPTODF2 ;ALB/MTC - PTF DRG FREQUENCY REPORT,CONT. ; 9/14/01 4:34pm

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,!!?10,"Discharge Frequency Rank 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: " for " 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: ?110,"Printed: " Line Location: HEAD+4
Function Call: WRITE	Prompt: !?15,$S(DGB:"",1:"Not "),"Including Transfer DRGs",! Line Location: HEAD+4
Function Call: WRITE	Prompt: !?11,H3,!?10,H,?50,"Total 1 Total # Total ALOS/",?123,"Average",!?10,H1,?49,"Day Stays Discharges LOS Discharge (*)Total Weight Weight",! Line Location: HEAD+5
Function Call: WRITE	Prompt: E Line Location: HEAD+6