Routine: NURQRPT3

Information

NURQRPT3 ;HIRMFO/YH-ROUTINE TO PRINT 10 STEP REPORT, PART 4 ;3/21/96

Source file <NURQRPT3.m>

Package	Total	Call Graph
Nursing Service	1	(FHEADR,HDR)^NURQRPT0
VA Fileman	1	^DIWP

Package	Total	Caller Graph
Nursing Service	2	NURQRPT1 NURQRPT2

Name	Comments	DBIA/ICR reference
CUT
MERGE(NTEXT,NLEN)	;MERGE ^UTILITY($J,"W") TO NTEXT ARRAY WITH TEXT LENGTH<=NLEN
COMUN
WRITE	;PRINT IMPORTANT FUNCTION TABLE
DIWP(NTEXT)	;INPUT NTEXT CONTAINS WP TEXT
REFER	;PRINT REFERENCE INFORMATION

Name	Line Occurrences
Function Call: WRITE	Prompt: !,"D. REFERENCE:" Line Location: REFER+1
Function Call: WRITE	Prompt: !,"E. OTHER:" Line Location: REFER+5
Function Call: WRITE	Prompt: ! Line Location: WRITE+6
Function Call: WRITE	Prompt: NFUNC(+NII) Line Location: WRITE+7
Function Call: WRITE	Prompt: ?21,NCARE(+NII) Line Location: WRITE+8
Function Call: WRITE	Prompt: ?51,NPRACT(+NII) Line Location: WRITE+9
Function Call: WRITE	Prompt: !,$S(NX=1:NY,1:NTEXT(1)_NY) Line Location: DIWP+3

Name	Line Occurrences (* Changed, ! Killed)
^NURQ(217 - [#217]	COMUN, REFER+1, REFER+2, REFER+5, REFER+6
^UTILITY($J	DIWP+2!, DIWP+3, MERGE+1

Name	Line Occurrences
CUT	MERGE+2, CUT+1
DIWP	REFER+3, REFER+7

Name	Field # of Occurrence
>> D1	COMUN, REFER+2, REFER+6
>> DA	COMUN, REFER+1, REFER+2, REFER+5, REFER+6
>> DIWF	DIWP+2*
>> DIWL	DIWP+2*
>> DIWR	DIWP+2*
I	MERGE+1~*
I(1	MERGE+1, MERGE+2, MERGE+3, CUT, CUT+1, CUT+2
IOSL	WRITE+6, DIWP+3
NCARE	WRITE+10!
NCARE(	WRITE+8
NFUNC	WRITE+10!
NFUNC(	WRITE+7
NII	WRITE+6~*, WRITE+7, WRITE+8, WRITE+9
NLEN	MERGE~, MERGE+2, CUT, CUT+1
NLEVL	WRITE+5, WRITE+6, WRITE+10!
NPRACT	WRITE+10!
NPRACT(	WRITE+9
NTEXT	DIWP~, DIWP+2, MERGE~, MERGE+1, MERGE+3, CUT, CUT+2
NTEXT(	MERGE+3, CUT, CUT+2*
NTEXT(1	DIWP+3
>> NUROUT	REFER+2, REFER+3, REFER+5, REFER+6, REFER+7, WRITE+6, DIWP+3
>> NURQB	REFER+3, REFER+7
>> NURQDC	COMUN*
>> NURQTXT	REFER+2, REFER+3, REFER+6, REFER+7
>> NURQTXT(1	REFER+3, REFER+7
NX	DIWP+3~*
NY	DIWP+3~*
>> X	DIWP+2*