Routine: NURCPP3

Package	Total	Caller Graph
Nursing Service	1	NURCPP1

Entry Points

Name	Comments	DBIA/ICR reference
PRINT
CHKLINE
HEADER
SPACES
GETOUPT	;Print Patient Care Plan Data and Affiliated Dates.

Name	Line Occurrences
Function Call: WRITE	Prompt: !,NURSA Line Location: PRINT+0
Function Call: WRITE	Prompt: ! Line Location: HEADER+0
Function Call: WRITE	Prompt: !,NURSALGR(I) Line Location: HEADER+1
Function Call: WRITE	Prompt: !,NURCLEG(K) Line Location: HEADER+2
Function Call: WRITE	Prompt: !,NURSHED,?65,"["_NURSPLN_"]",?69,"VAF 10-0043",! Line Location: HEADER+3
Function Call: READ	Prompt: "Press return to continue or ""^"" to exit: " Formatting: ! Timeout: DTIME Variable: ANS Line Location: HEADER+4
Function Call: WRITE	Prompt: @IOF,!,NURSDAT,?(IOM/2-($L(NURSTITL)/2+($L(NURSTITL)#2)\1)),NURSTITL,?71,"PAGE ",NURSPAG Line Location: HEADER+5
Function Call: WRITE	Prompt: !,NURSERR(1),!,NURSERR(2),!,NURSERR(1) Condition for execution: NURSPAG=1&NURSERR Line Location: HEADER+6
Function Call: WRITE	Prompt: !,$E(NURSLIN("-"),1,80),!,NURSH4,"Date R.N." Line Location: HEADER+6

Name	Line Occurrences (* Changed, ! Killed)
^TMP($J	PRINT

Name	Field # of Occurrence
>> ANS	GETOUPT+1, HEADER+4
DTIME	HEADER+4
>> GMRGOUT	HEADER+4*
>> I	HEADER+1*
IOF	HEADER+5
IOM	HEADER+5
IOSL	HEADER
IOST	HEADER+4
>> K	HEADER+2*
>> NURCLEG(	HEADER+2
>> NURSA	PRINT*
>> NURSALGR(	HEADER+1
>> NURSDAT	HEADER+5
>> NURSEND	HEADER*
>> NURSERR	HEADER+6
>> NURSERR(1	HEADER+6
>> NURSERR(2	HEADER+6
>> NURSH1	SPACES+1*
>> NURSH2	SPACES+1*
>> NURSH3	SPACES+1*
>> NURSH4	HEADER+6, SPACES+1*
>> NURSH5	SPACES+1*
>> NURSH6	SPACES+1*
>> NURSH7	SPACES+1*
>> NURSHED	HEADER+3
>> NURSIOSL	CHKLINE
>> NURSISW	GETOUPT+1, PRINT, HEADER, HEADER+1, HEADER+2, HEADER+3, HEADER+4, HEADER+5
>> NURSLCNT	PRINT, CHKLINE, HEADER, HEADER+6
>> NURSLIN("-"	HEADER+1, HEADER+6
>> NURSMED	HEADER+1
>> NURSO	PRINT*
>> NURSOUT	GETOUPT+1, PRINT, HEADER+4*
>> NURSP1	SPACES+1*
>> NURSP2	SPACES+1*
>> NURSP3	SPACES, SPACES+1
>> NURSPAG	HEADER+5, HEADER+6*
>> NURSPLN	HEADER+3
>> NURSSP	PRINT*
>> NURSSS	SPACES+1
>> NURSTITL	HEADER+5
>> X	HEADER*