Routine: DGRUGPRP

Information

DGRUGPRP ;ALB/GRR/SCK - RAI/MDS DATA COLECTION

Name	Comments	DBIA/ICR reference
EN	; Main entry point
TASK(DGFILE,DGPATH,DGDIV)	; Task off job
EN1	; Build HFS file
WARD	;Print Ward/Room/Bed for RAI/MDS wards
RPT
HED	;FORM FEED AND PRINT HEADER

Name	Line Occurrences
Function Call: WRITE	Prompt: !!?3,"Building Tasks" Line Location: EN+27
Function Call: WRITE	Prompt: !!?5,"Tasking ",DGFILE,"..." Line Location: TASK+10
Function Call: WRITE	Prompt: " Task was not queued!",! Line Location: TASK+12
Function Call: WRITE	Prompt: !?10,"Task queued: ",ZTSK,! Line Location: TASK+13
Function Call: WRITE	Prompt: DGWREC,! Line Location: EN1+26
Function Call: WRITE	Prompt: !!,"Total Beds for all wards: ",DGTCNT Line Location: RPT+13
Function Call: WRITE	Prompt: @IOF Line Location: HED+1
Function Call: WRITE	Prompt: !,"RAI/MDS Ward/Room/Beds" Line Location: HED+3
Function Call: WRITE	Prompt: ?40,DGCDT Line Location: HED+4
Function Call: WRITE	Prompt: !,"WARD: ",DGWNAME,! Line Location: HED+5