Prompt: ?23,"ACTIVITY REPORT BY PRIMARY PURPOSE",!
Line Location: HEAD1+4
Function Call: WRITE
Prompt: ?10,"ACTIVITY REPORT FOR ",$S(AMHPROG="S":"SOCIAL SERVICES",AMHPROG="M":"MENTAL HEALTH",AMHPROG="C":"CHEMICAL DEPENDENCY or A/SA",1:"ALL PROGRAMS (MH,SS,CD,OTHER)")," PROGRAM",!
Line Location: HEAD1+5
Function Call: WRITE
Prompt: ?17,"RECORD DATES: ",AMHBDD," TO ",AMHEDD,!
Line Location: HEAD1+6
Function Call: WRITE
Prompt: "# PATS is the total number of unique, identified patients when",!,"a patient name was entered on the record. # served is a tally of the ",!,"number served data value.",!