Routine: NURQRPT0

Information

NURQRPT0 ;HIRMFO/RM,YH-ROUTINE TO PRINT 10 STEP REPORT ;1/22/97 15:28

Name	Comments	DBIA/ICR reference
EN1	;
DEV	; DEVICE HANDLING
START1	; Enter here if report is queued.
QUIT
HDR	; EOP and Print Header.
END
LOOP
FHEADR	;IMPORTANT FUNCTION HEADER

Name	Line Occurrences
Function Call: WRITE	Prompt: ! Line Location: EN1+4
Function Call: WRITE	Prompt: ! Line Location: DEV+1
Function Call: WRITE	Prompt: ! Line Location: HDR+1
Function Call: WRITE	Prompt: !,NURQSITE,?60,NURQDT,?70," PAGE: "_NURQPG,!,"QI SUMMARY: "_NURQSURV,!,$$REPEAT^XLFSTR("-",80) Line Location: HDR+4
Function Call: WRITE	Prompt: ! Line Location: HDR+5
Function Call: WRITE	Prompt: !,$C(7),"NO DATA FOR THIS REPORT" Line Location: END+0
Function Call: WRITE	Prompt: !,?21,"STANDARD",?40,"ASSOC.",?51,"STANDARD",?70,"ASSOC.",!,"FUNCTION",?21,"OF CARE",?40,"SERVICE",?51,"OF PRACTICE",?70,"SERVICE",!,$$REPEAT^XLFSTR("-",80) Line Location: FHEADR+1