Routine: NURQRPT0

Package	Total	Call Graph
Nursing Service	6	^NURQKILL EN1^NURQRPT1 $$SURGENVR^NURQUTL1 EN1^NURSAGSP EN1^NURSAUTL (CLOSE,ENDPG)^NURSUT1
Kernel	3	^%ZIS ^%ZTLOAD $$REPEAT^XLFSTR
VA Fileman	2	^DIC $$GET1^DIQ

Package

Total

Call Graph

^NURQKILL EN1^NURQRPT1 $$SURGENVR^NURQUTL1 EN1^NURSAGSP EN1^NURSAUTL (CLOSE,ENDPG)^NURSUT1

^%ZIS ^%ZTLOAD $$REPEAT^XLFSTR

^DIC $$GET1^DIQ

Package	Total	Caller Graph
Nursing Service	7	NURQA-PT-10PRINT NURQRPT1 NURQRPT2 NURQRPT3 NURQRPT4 NURQUTL2 NURQUTL3

Package

Total

Caller Graph

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

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
Routine Call	DIC Line Location: EN1+3
Routine Call	%ZIS Line Location: DEV+1

FileNo	Call Tags
^NURQ(217 - [#217]	Classic Fileman Calls
^DIC(4 - [#4]	GET1^DIQ

Name	Line Occurrences (* Changed, ! Killed)
^NURQ(217 - [#217]	START1+2, START1+3, START1+5, START1+6, START1+7
^SC - [#44]	START1+5, START1+6, START1+7

Name	Line Occurrences
LOOP	DEV+2
QUIT	EN1+4, EN1+5, EN1+6, DEV+1, DEV+2, END

Name	Field # of Occurrence
^(0	START1+5, START1+7
^(1	START1+3

Name	Field # of Occurrence
>> %	START1+2*
%ZIS	DEV+1*!
>> D1	START1+5, START1+6, START1+7
>> DA	EN1+4, EN1+6, START1+2, START1+3, START1+5, START1+6, START1+7
DIC	EN1+3*!
DIC("A"	EN1+3*
DIC(0	EN1+3*
DT	START1+1
DUZ(2	HDR+2
IO	START1+1
IO("Q"	DEV+1!, DEV+2!
IOF	HDR+3
IOSL	HDR+5
IOST	HDR+1, HDR+3
NARRAY	QUIT!
NARY	QUIT!
NI	QUIT!
NURDEM	QUIT!
>> NUREQWRD	START1+8
>> NUREQWRD(	START1+5, START1+7
NURFAC	QUIT!
>> NURHOSP	START1+4, START1+6
NURMDSW	QUIT!
>> NUROUT	EN1+2*, EN1+5, EN1+6, START1+5, START1+6, HDR+1
>> NURQ	EN1+4*, EN1+6
>> NURQAR	START1+3*
NURQB	QUIT!
>> NURQBYR	EN1+2*
>> NURQDT	EN1+2, START1+1, HDR+4
NURQI	QUIT!
NURQJ	QUIT!
>> NURQND	START1+2*
>> NURQPG	EN1+2, HDR+3, HDR+4, HDR+5
NURQRPT	START1+3, START1+8, START1+9, QUIT!
>> NURQSITE	HDR+2*, HDR+4
>> NURQSRVC	START1+2*
>> NURQSURV	EN1+2, START1+2, HDR+4
>> NURQSVN	START1+2*
>> NURQSW	EN1+2, HDR+1, HDR+5
NURQTXT	QUIT!
NURQWRD	QUIT!
>> NURSNLOC(	START1+6
>> NURSX	START1+6*
>> NURSY	START1+6*
NURSZFAC	QUIT!
>> POP	DEV+1
>> X	LOOP*
>> Y	EN1+4
>> ZTDESC	DEV+2*
>> ZTRTN	DEV+2*
>> ZTSAVE(	LOOP*
>> ZTSK	DEV+2

Information