Prompt: !,"This report will present, for all Living Patients registered at the facility",!,"that you select, age groups for a selected attribute.",!
Line Location: START+4
Function Call: WRITE
Prompt: !,"The Age Groups to be used are currently defined as:",!
Line Location: BIN+1
Function Call: WRITE
Prompt: !!,$C(7),"WARNING: If you use more than 8 age groups the report will wrap around",!,"the page. Only 8 will fit on an 80 column screen or page!!",!
Line Location: BIN+5
Function Call: WRITE
Prompt: !
Line Location: RUN+1
Function Call: WRITE
Prompt: $C(7)
Line Location: AGE+6
Function Call: WRITE
Prompt: !,"Make sure the age is higher the beginning age of the previous group.",!
Line Location: AGE+6
Function Call: WRITE
Prompt: " ??",$C(7)
Line Location: GC+5
Function Call: WRITE
Prompt: !,$P(X,":")," - ",$P(X,":",2)
Line Location: LIST+2
Function Call: WRITE
Prompt: !
Line Location: LIST+3
Function Call: WRITE
Prompt: !!,$C(7),$C(7),"TEMPLATE MISSING",!
Line Location: PRNT+1
Function Call: WRITE
Prompt: ?((80-APCLHDRL)/2),APCLHDR," By AGE GROUP",?71,"Page ",APCLPG,!
Line Location: HDR+3
Function Call: WRITE
Prompt: ?((80-APCLHDRL)/2),"All Living Patients Registered at ",$P(^DIC(4,APCLSITE,0),U),!
Line Location: HDR+5
Function Call: WRITE
Prompt: ?(80-$L(APCLDT)/2),APCLDT,!
Line Location: HDR+6
Function Call: WRITE
Prompt: !?35,"AGE GROUPS",!
Line Location: HDR+7
Function Call: WRITE
Prompt: !,"Choose a number from the menu presented. The item selected will be ",!,"displayed in a matrix by age groups.",!