Routine: NURCPPS1

Package	Total	Call Graph
Nursing Service	4	^NURCAS2 (CONT,LATER)^NURCPPS3 WARDPAT^NURCUT0 EN7^NURSUT0
VA Fileman	3	NOW^%DTC WAIT^DICD EN^DIQ1
General Medical Record - Generator	1	EN1^GMRGRUT3
Kernel	1	^%ZISC
Registration	1	(DEM,INP,KVAR)^VADPT

Package	Total	Caller Graph
Nursing Service	4	NURCEVE0 NURCEVE5 NURCPP-CARE NURSCPS1

Entry Points

Name	Comments	DBIA/ICR reference
PRINT1	; PRINT ONE PATIENT RECORD
QUIT	; KILL LOCAL VARIABLES
PRINT2	; PRINT ONE PATIENT RECORD GIVEN GMRGPDA.
PRINT	;PRINT ROUTINE
REPORT	; PRINT THESE REPORTS
EN1	; ENTRY FROM OPTION NURCPE-CARE
EN2	; Entry from GMRG Patient edit to print this Nursing Care Plan ; DFN, GMRGPDA, GMRGPDT and GMRGRT must be defined.
CLEAN	; CLEAN UP FOR NEXT REPORT
ASK	; GET PATIENT/ GROUP OF PATIENTS
REASK	; SELECT CURRENT OR COMPLETE LISTING

External References

Name	Field # of Occurrence
NOW^%DTC	PRINT2+2
^%ZISC	QUIT+1
WAIT^DICD	REPORT+1
EN^DIQ1	PRINT2+5
EN1^GMRGRUT3	ASK+2
^NURCAS2	REPORT+2
CONT^NURCPPS3	EN2+2
LATER^NURCPPS3	PRINT2+9
WARDPAT^NURCUT0	ASK+1
EN7^NURSUT0	REASK+6
DEM^VADPT	PRINT2+3, EN2+2
INP^VADPT	PRINT2+3, EN2+2
KVAR^VADPT	QUIT+2, EN2+2

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !,"The ""AA"" crossreference for file 124.2 needs to be re-crossreferenced." Line Location: EN1+2
Function Call: READ	Timeout: DTIME Variable: NURSPLN Line Location: REASK+1
Function Call: WRITE	Prompt: !?3,$C(7),"Enter a C to get a current listing which will only give the latest dates,",!?3,"or an A to get a complete listing with all of the dates" Line Location: REASK+2
Function Call: WRITE	Prompt: !!,"This Report may be Queued to print on another device,",!,"freeing your terminal for other use.",! Line Location: REASK+4

FileMan Files Accessed Via FileMan Db Call

FileNo	Call Tags
^DPT - [#2]	Classic Fileman Calls

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^DIC(11 - [#11]	PRINT2+6
^DIC(13 - [#13]	PRINT2+7
^DIC(213.9 - [#213.9]	EN1+1
^GMR(124.3 - [#124.3]	PRINT1+2, PRINT2+1
^GMRD(124.2 - [#124.2]	EN1+2
^TMP($J	REPORT+2!, REPORT+3, PRINT+1, PRINT+3, PRINT+5, QUIT+3!, CLEAN+5!, PRINT1+1

Label References

Name	Line Occurrences
ASK	ASK+2, REASK+1, REPORT+3
CLEAN	PRINT2+9
PRINT1	PRINT+5
QUIT	EN1+2, ASK+1, ASK+2, REASK+1, REASK+6, REPORT+3, EN2+2
REASK	REASK+2

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
%	CLEAN+1!, PRINT2+2
%DT	CLEAN+1!
%ZIS	CLEAN+1!
ANS	CLEAN+1!
D0	CLEAN+1!
DA	CLEAN+1!, PRINT2+5*
DFN	REPORT+2!, QUIT+2!, PRINT1+1*, PRINT1+2, PRINT2+5, PRINT2+6, PRINT2+7, EN2+2
DIC	ASK+1!, CLEAN+1!, PRINT2+5*
DIPGM	CLEAN+1!
DIQ	CLEAN+1!, PRINT2+5*
DIQ(0	PRINT2+5*
DR	CLEAN+1!, PRINT2+5*
DTIME	REASK+1
GMRGLEN	CLEAN+1!
GMRGOUT	EN1+3*, ASK+2!, QUIT+2!
GMRGPAR	CLEAN+1!
GMRGPDA	ASK+2, QUIT+2!, PRINT1+2, PRINT2+1, EN2+2
GMRGPDT	REASK+5, QUIT+2!, PRINT2+2, EN2+2
GMRGPLN	CLEAN+1!
GMRGRT	EN1+2*, QUIT+2!, PRINT1+2, EN2+2
GMRGXPRT	ASK+2*!, CLEAN+1!
IO	REPORT+1
J	CLEAN+1!
N1	PRINT+4, PRINT+5, QUIT+4!, PRINT1+1
>> NACT	ASK+1*
NAME	CLEAN+1!
NBED	PRINT+1*, PRINT+3, PRINT+5, QUIT+4!, PRINT1+1
NBED(0	PRINT+2, PRINT+3, PRINT+5, PRINT1+1
NDATA	CLEAN+1!, PRINT1+1*
NI	QUIT+4!
NPWARD	ASK+1!, CLEAN+1!
NRMBD	REPORT+2!, QUIT+4!
NROOM	CLEAN+1!
NURAGE	CLEAN+1!, PRINT2+4*
NURCLEG	CLEAN+1!
NUREDB	ASK+2, QUIT+4!, PRINT1+2
NURPR	CLEAN+1!
NURQUEUE	CLEAN+1!
NURQUIT	ASK+1!
NURSA	CLEAN+1!
NURSADD	CLEAN+1!
NURSALGR	CLEAN+1!
NURSB	CLEAN+1!
NURSC	CLEAN+1!
NURSCHIL	CLEAN+1!
NURSCLAS	CLEAN+1!
NURSCPL	CLEAN+1!
NURSDA	CLEAN+1!
NURSDAT	CLEAN+1!
NURSDIAG	CLEAN+1!, PRINT2+8*
NURSDOC	CLEAN+1!
NURSE	CLEAN+1!
NURSEND	CLEAN+1!
NURSERR	CLEAN+1!
NURSG	CLEAN+2!
NURSGCK	CLEAN+2!
NURSGMRG	EN1+3, QUIT+2!, EN2+2!
NURSGOCK	CLEAN+2!
NURSH1	CLEAN+2!
NURSH2	CLEAN+2!
NURSH3	CLEAN+2!
NURSH4	CLEAN+2!
NURSH5	CLEAN+2!
NURSH6	CLEAN+2!
NURSH7	CLEAN+2!
NURSHED	CLEAN+2!
NURSI	CLEAN+2!
NURSICK	CLEAN+2!
NURSINCK	CLEAN+2!
NURSIOSL	CLEAN+2!
NURSISW	CLEAN+3!
NURSISW1	CLEAN+3!
NURSITHD	CLEAN+3!
NURSJ	CLEAN+3!
NURSK	CLEAN+3!
NURSL	CLEAN+3!
NURSLCNT	CLEAN+3!
NURSLGT	CLEAN+3!
NURSLIN	CLEAN+3!
NURSLVD	CLEAN+3!
NURSMAR	CLEAN+3!, PRINT2+6*
NURSMED	CLEAN+3!
NURSO	CLEAN+3!
NURSO1	CLEAN+3!
NURSO2	CLEAN+3!
NURSO4	CLEAN+3!
NURSOT	CLEAN+3!
NURSOUT	EN1+3, ASK+1, ASK+2, REASK+1, PRINT+1*, PRINT+3, PRINT+5, QUIT+4!
NURSP	CLEAN+4!
NURSP1	CLEAN+4!
NURSP2	CLEAN+4!
NURSP3	CLEAN+4!
NURSPAG	CLEAN+4!
NURSPAT	CLEAN+4!
NURSPAT(2	PRINT2+6, PRINT2+7
NURSPDT	CLEAN+4!, PRINT2+1*, PRINT2+2
NURSPLN	REASK+1, REASK+2, QUIT+2!, PRINT2+2, EN2+2*!
NURSPNAM	CLEAN+4!, PRINT2+4*
NURSPOI	CLEAN+4!
NURSPRB	CLEAN+4!
NURSPROV	CLEAN+4!, PRINT2+8*
NURSRB	CLEAN+4!, PRINT2+8*
NURSREL	CLEAN+4!, PRINT2+7*
NURSRET	CLEAN+4!
NURSRM	CLEAN+4!
NURSRN	CLEAN+4!
NURSRTK	CLEAN+4!
NURSSP	CLEAN+4!
NURSSS	CLEAN+4!
NURSSSN	CLEAN+4!, PRINT2+4*
NURSSW1	CLEAN+4!
NURST	CLEAN+4!
NURSTAT	CLEAN+4!
NURSTI	CLEAN+4!
NURSTITL	CLEAN+4!
NURSWD	CLEAN+4!, PRINT2+8*
NURSX	CLEAN+4!
NURUS	CLEAN+4!
NURWARD	REPORT+2!, QUIT+4!
POP	REASK+6, CLEAN+4!
VA	QUIT+2!, EN2+2!
VA("PID"	PRINT2+4
>> VADM(1	PRINT2+4
>> VADM(4	PRINT2+4
>> VAIN(2	PRINT2+8
>> VAIN(4	PRINT2+8
>> VAIN(5	PRINT2+8
>> VAIN(9	PRINT2+8
>> X	REASK+5, CLEAN+5, PRINT1+2*
ZTDESC	REASK+6*, CLEAN+4!
>> ZTQUEUED	REPORT+1, REPORT+3, QUIT+1
>> ZTREQ	QUIT+1*
>> ZTRTN	REASK+6*
>> ZTSAVE(	REASK+5*
ZTSK	REASK+6, CLEAN+4!

Customize PDF page

Package: Nursing Service

Routine: NURCPPS1

Information

Source Information

Call Graph

Call Graph Total: 10

Caller Graph

Caller Graph Total: 4

Entry Points

External References

Interaction Calls

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Local Variables

Legend: