Routine: NURCPP5

Package	Total	Call Graph
VA Fileman	2	NOW^%DTC D^DIQ
Nursing Service	1	PROB^NURCPP9

Package	Total	Caller Graph
Nursing Service	1	NURCPPS3

Entry Points

External References

Name	Field # of Occurrence
NOW^%DTC	EN1+1
D^DIQ	EN1+1
PROB^NURCPP9	EN1+13

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !,$E(NURSLIN("-"),1,132),!!,"THERE IS NO DATA FOR THIS REPORT" Line Location: EN1+16
Function Call: WRITE	Prompt: Condition for execution: $E(IOST)'="C" ! F NURSO=1:0 S NURSA=$S($D(^TMP($J,"NURSDATA",NURSO)):^TMP($J,"NURSDATA",NURSO),1:"") W !,NURSA S NURSO=$O(^TMP($J,"NURSDATA",NURSO)) Q:NURSO'>0 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: !,$E(NURSHED,1,106),NURSH5,"["_NURSPLN_"]"," ","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,?123,"Page ",$J(NURSPAG,2),!?(IOM/2-($L(NURSTITL)/2+($L(NURSTITL)#2)\1)),$E(NURSLIN("-"),1,$L(NURSTITL)) Line Location: HEADER+5
Function Call: WRITE	Prompt: !,NURSPNAM,?30,NURSMED Condition for execution: NURSPAG=1 Line Location: HEADER+5
Function Call: WRITE	Prompt: ! Line Location: HEADER+7
Function Call: WRITE	Prompt: !,^TMP($J,"NURSDATA",Y) Line Location: HEADER+7

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^TMP($J	EN1+5, EN1+9, EN1+10, EN1+11, EN1+15, PRINT, HEADER+7

Label References

Name	Line Occurrences
CHKLINE	PRINT
HEADER	EN1+16, EN1+17, CHKLINE
PRINT	EN1+17
SPACES	EN1+1

Naked Globals

Name	Field # of Occurrence
^(	EN1+15!

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> %	EN1+1
>> ANS	EN1+16, EN1+17, HEADER+4*
DTIME	HEADER+4
>> GMRGOUT	HEADER+4*
>> I	HEADER+1*
IO	EN1+16
IOF	HEADER+5
IOM	HEADER+5
IOSL	HEADER
IOST	PRINT, HEADER+4, HEADER+7
>> K	HEADER+2*
>> NURAGE	EN1+3
>> NURCLEG(	HEADER+2
>> NURSA	PRINT*
>> NURSALGR(	HEADER+1
>> NURSDAT	EN1+1*, HEADER+5
>> NURSDIAG	EN1+2
>> NURSDOC	EN1+2*, HEADER+1
>> NURSEND	HEADER*
>> NURSERR	HEADER+6
>> NURSERR(1	HEADER+6
>> NURSERR(2	HEADER+6
>> NURSH1	SPACES*
>> NURSH2	SPACES*
>> NURSH3	SPACES*
>> NURSH4	HEADER+1, SPACES*
>> NURSH5	HEADER+3, SPACES*
>> NURSH6	SPACES*
>> NURSHED	EN1+3*, HEADER+3
>> NURSIOSL	CHKLINE
>> NURSISW	EN1+1, EN1+16, EN1+17, HEADER, HEADER+1, HEADER+2, HEADER+3, HEADER+4, HEADER+5, HEADER+6
>> NURSISW1	EN1+16, EN1+17, HEADER+7, HEADER+8*
>> NURSITHD	EN1+6, EN1+7, EN1+8
>> NURSLCNT	EN1+1, EN1+16, PRINT, CHKLINE, HEADER, HEADER+6, HEADER+7*
>> NURSLIN("-"	EN1+1*, EN1+10, EN1+16, HEADER+1, HEADER+5
>> NURSMAR	EN1+3
>> NURSMED	EN1+2*, HEADER+1, HEADER+5
>> NURSO	EN1+5, EN1+9, EN1+10, EN1+11, EN1+13, EN1+15, EN1+16, PRINT, HEADER+7
>> NURSO1	EN1+5, EN1+13
>> NURSO2	EN1+5, EN1+13
>> NURSOUT	EN1+17, PRINT, HEADER+4*
>> NURSP	EN1+13*
>> NURSP(1	EN1+13*
>> NURSPAG	EN1+1, HEADER+5, HEADER+6
>> NURSPLN	HEADER+3
>> NURSPNAM	EN1+3, HEADER+5
>> NURSPRB(	EN1+13
>> NURSPROV	EN1+2
>> NURSRB	EN1+3
>> NURSREL	EN1+3
>> NURSSP	PRINT*
>> NURSSS	EN1+2, EN1+3, EN1+6, EN1+7, EN1+8, EN1+14, SPACES
>> NURSSSN	EN1+3
>> NURSSW1	EN1+1*
>> NURSTITL	HEADER+5
>> NURSWD	EN1+3
>> NURSX	EN1+13*
U	EN1+6, EN1+7, EN1+8
>> X	EN1+5, EN1+6, EN1+7, EN1+8, EN1+9, EN1+14, EN1+15, HEADER
>> X(0	EN1+15*
>> X(1	EN1+7, EN1+8
>> Y	EN1+1, HEADER+7

Customize PDF page

Package: Nursing Service

Routine: NURCPP5

Information

Source Information

Call Graph

Call Graph Total: 3

Caller Graph

Caller Graph Total: 1

Entry Points

External References

Interaction Calls

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend: