Routine: PRSNRDN1

Information

PRSNRDN1 ;WOIFO/KJS - GROUP SUMMARY ACTIVITY DIRECT AND NON DIRECT II REPORT ;080411

Name	Comments	DBIA/ICR reference
GATHER(SKILMIX,GRP,PRSIEN,BEG,END)	;Entry point to gather POC data from 451
DATA(SKILMIX,GRP)	;Extract data from POCD array
HDR(EXTBEG,EXTEND)	;Display header for report of Individual Nurse Activity
PRTLP(EXTBEG,EXTEND)	;Order through SKILMIX array, total data & display
PPP(STOP,EXTBEG,EXTEND)	;

Name	Line Occurrences
Function Call: WRITE	Prompt: @IOF Line Location: HDR+2
Function Call: WRITE	Prompt: ?17,"GROUP SUMMARY ACTIVITY DIRECT AND NON DIRECT REPORT" Line Location: HDR+4
Function Call: WRITE	Prompt: !,?15,EXTBEG_" - "_EXTEND,?45,"Run Date: ",TODAY,?70,"Page: ",$J(PG,3) Line Location: HDR+5
Function Call: WRITE	Prompt: ! Line Location: HDR+6
Function Call: WRITE	Prompt: !,"Location",?22,"Type of Time",?44,"Type of Work",?75,"Hours" Line Location: HDR+7
Function Call: WRITE	Prompt: !,"--------------------------------------------------------------------------------" Line Location: HDR+8
Function Call: WRITE	Prompt: !,GP Line Location: PPP+1
Function Call: WRITE	Prompt: ?22,TYPETM,?44,TYPEWK,?72,$J(TOTHRS,8,2),! Line Location: PPP+2