Routine: NURSUT1

Package	Total	Call Graph
VA Fileman	4	NOW^%DTC ^DIC IX1^DIK ^DIR
Nursing Service	3	EN1^NURSAPE0 $$EN1^NURSUT0 ($$LOCSTAT,ENDPG)^NURSUT1
Kernel	1	^%ZISC

Package	Total	Caller Graph
Nursing Service	93	NURA5A NURA5B NURA5C NURA6A1 NURA6B1 NURA6B2 NURA6C1 NURA6C2 NURA6D1 NURA6D2 NURA6E1 NURA6F1 NURA6G NURA6H1 NURA6I1 NURA6I2 NURA6J1 NURA6K1 NURA6K2 NURA7A NURA7B NURA7C NURA9A1 NURA9B1 NURA9B2 NURA9C1 NURA9C2 NURA9D1 NURA9D2 NURA9E1 NURA9F1 NURA9G NURA9H1 NURA9I NURA9J1 NURA9K NURAAU2 NURADEG NURAED6 NURAFSD NURAGEN NURAMH9 NURAMU3 NURAR110 NURAR11A NURAR1A NURARCR0 NURARCR1 NURARCRW NURARMH0 NURARMH1 NURARNCT NURARPC0 NURARPC2 NURARWL1 NURARWL3 NURARWL4 NURARWL8 NURARWL9 NURCAS0 NURCCP1 NURCCP4 NURCES0 NURCEVP0 NURCRL0 NURCROP0 NURCROP1 NURQRPT0 NURSAL0 NURSAMSG NURSAWL0 NURSCEP NURSCEP1 NURSCPLC NURSCUTL NURSDD NURSDFFS NURSEP31 NURSEP3I NURSEPC1 NURSEPCA NURSEPCP NURSEPD0 NURSEPD1 NURSEPD2 NURSEPD3 NURSEPIN NURSEPL1 NURSEPML NURSEXP NURSHIGH NURSUT1 NURSXECP

Entry Points

Name	Comments	DBIA/ICR reference
QUIT
DBL	;CHECK FOR ROOM-BED DUPLICATE ENTRIES
LOCSTAT(NURLOC)	; CHECK FOR ACTIVE EMPLOYEES ON NURS LOCATION
SETST	; CHANGE STATUS FIELD OF FILE 210
CHKSTAT	; INPUT TRANSFORM FOR STATUS FIELD OF NURS LOCATION FILE
EN4(NACT,NASK)	; ENTRY POINT FOR BEDSIDE TERMINAL PATIENT LOOK-UP
BUDCAT(D0)	; COMPUTE BUDGET CATEGORY FTEE FOR A LOCATION
ENDPG	; HANDLE EOP
EN1B	; ENTRY POINT TO KILL "ASD" X-REF AFTER ADDED TO 213.5 DURING ACT/SEP BATCH JOB
EN1	; ENTRY FROM ASD1 FROM 211.82,.01, ASD2 FROM 211.82,3 AND ASD3 FROM ; 211.82,5 CROSSREFERENCES. THE VARIABLE NUR WILL BE SET TO THE ; FOLLOWING: FIELD NUMBER CALLING XREF^$S(0:KILL LOGIC,1:SET LOGIC)
EMP
QSU
CLOSE	; CLOSE DEVICE
NODATA	; NO DATA ROUTINE FOR LOCATION REPORTS
STTUPD	; CHECK IF UPDATE OF STATUS FIELD IN FILE 210 IS NECESSARY

External References

Name	Field # of Occurrence
NOW^%DTC	STTUPD+1
^%ZISC	CLOSE+3
^DIC	EN4+6
IX1^DIK	SETST+3
^DIR	ENDPG+2
EN1^NURSAPE0	EMP
$$EN1^NURSUT0	STTUPD+3, STTUPD+4
$$LOCSTAT^NURSUT1	CHKSTAT+1
ENDPG^NURSUT1	CHKSTAT+3

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !!,?5,"Room-Bed: ",ROOMBED,!,?6,"Patient: ",PATIENT Line Location: EN4+3
Function Call: WRITE	Prompt: ! Line Location: EN4+6
Function Call: WRITE	Prompt: ! Line Location: EN4+8
Function Call: WRITE	Prompt: *7,!!,?5,"That ROOM-BED is already associated with ION VALUE "_$P(^NURSC(214.8,IEN,0),U,1)_" " Line Location: DBL+3
Function Call: WRITE	Prompt: ! Line Location: CLOSE+1
Function Call: WRITE	Prompt: $C(7),!!,NURLOC(1)," HAS ACTIVE STAFF ASSIGNED AND CANNOT BE DEACTIVATED: ",!!,"Generate an FTEE report for this location to identify active staff members",!,"who should be transferred prior to deactivation!" Line Location: CHKSTAT+3
Function Call: WRITE	Prompt: !!,"THERE IS NO DATA FOR ",NL1 Line Location: NODATA+1
Routine Call	DIC Line Location: EN4+6
Routine Call	DIR Line Location: ENDPG+2

FileMan Files Accessed Via FileMan Db Call

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

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^DPT - [#2]	EN4+3
^DPT("RM"	EN4+3
^NURSC(214.8	EN4+1, EN4+2, DBL+2, DBL+3
^NURSF(210 - [#210]	STTUPD+2, SETST+1, SETST+2!, SETST+3*
^NURSF(211.4 - [#211.4]	CHKSTAT+1
^NURSF(211.8 - [#211.8]	EN1+4, EN1+5!, EN1+6!, EN1B+2, EN1B+3!, EN1B+4!, LOCSTAT+2, LOCSTAT+3, BUDCAT+2
^NURSF(211.9 - [#211.9]	STTUPD+4
^NURSF(214 - [#214]	EN4+7
^SC - [#44]	CHKSTAT+1

Label References

Name	Line Occurrences
EMP	EN1+7
ENDPG	CLOSE+2
QSU	STTUPD+1, STTUPD+2
QUIT	EN4+6, EN4+8
SETST	STTUPD+3, STTUPD+4
STTUPD	EMP

Naked Globals

Name	Field # of Occurrence
^(0	EN1+4, EN1B+2, STTUPD+2, STTUPD+4, LOCSTAT+3, BUDCAT+2

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> %	STTUPD+1
D0	BUDCAT~, BUDCAT+2
D1	BUDCAT+1~, BUDCAT+2*
DA	EN1+4, EN1+5, EN1+6, EN1B+2, EN1B+3, EN1B+4, SETST+1~*, SETST+2, SETST+3, CHKSTAT+1
DA(1	EN1+4, EN1+5, EN1+6, EN1B+2, EN1B+3, EN1B+4
>> DFN	EN4+6, EN4+8
DIC	EN4+6*!, EN4+8!
DIC("A"	EN4+5*
DIC("B"	EN4+4*
DIC(0	EN4+4*
DIK	EN1+3~, EN1B+1~, SETST+3*
DIR	ENDPG+2!
DIR(0	ENDPG+2*
DT	EN1B+3, EN1B+4, LOCSTAT+3
DTOUT	EN4+6, QUIT!
DUOUT	EN4+6, QUIT!
IEN	EN4+2, EN4+3, QUIT!, DBL+2*, DBL+3, DBL+4!
ION	EN4+2
IOST	ENDPG+1
LOOP	QUIT!
NACT	EN4~, EN4+7, EN4+9
NASK	EN4~
>> NL1	NODATA+1
NPOSDA	LOCSTAT+1~, LOCSTAT+2*, LOCSTAT+3
NUR	EN1+4, EN1+5, EN1+6, EN1B+2, EN1B+3, EN1B+4, EMP, EMP+1!, STTUPD+4
NUR(	EN1+4, EN1B+2, STTUPD+1, STTUPD+4*
NUR("NST"	STTUPD+3, STTUPD+4, SETST+3
NUR("OST"	STTUPD+2*, STTUPD+3, STTUPD+4, SETST+2
NUR("PE"	EMP*
NUR("SDT"	EN1+4, EN1B+2, EN1B+3
NUR("VDT"	EN1+4, EN1B+2, EN1B+4
NUR(0	STTUPD+1*
NUR(200	STTUPD+1*, STTUPD+2, SETST+1
NUR(210	STTUPD+2*
>> NURACTV	LOCSTAT+1, LOCSTAT+3, LOCSTAT+5
>> NURBEDSW	EN4+1*
NURLOC	LOCSTAT~, LOCSTAT+2, CHKSTAT+1~*
NURLOC(1	CHKSTAT+1*, CHKSTAT+3
>> NUROUT	CLOSE+2, ENDPG+2*
NURPOS	LOCSTAT+1~, LOCSTAT+2*, LOCSTAT+3
>> NURSDT	STTUPD+1*, STTUPD+3, STTUPD+4
>> NURSEMP	STTUPD+1*, STTUPD+3, STTUPD+4
>> NURSTAT	STTUPD+4, CHKSTAT+1*, CHKSTAT+2
PATIENT	EN4+2, EN4+3, EN4+4, QUIT!
ROOMBED	EN4+2*, EN4+3, QUIT!
U	EN4+2, EN4+3, DBL+3, LOCSTAT+3, BUDCAT+2
X	EN1+4, EN1B+2, STTUPD+1, STTUPD+4, SETST+1~, SETST+2, SETST+3, EN4+6, EN4+9, DBL+1! , DBL+2, DBL+3!, CHKSTAT+1, CHKSTAT+2, BUDCAT+1, BUDCAT+2, BUDCAT+3
>> Y	EN4+6, EN4+7*, EN4+8, EN4+9, ENDPG+2
>> ZTQUEUED	CLOSE+4
>> ZTREQ	CLOSE+4*

Customize PDF page

Package: Nursing Service

Routine: NURSUT1

Information

Source Information

Call Graph

Call Graph Total: 8

Caller Graph

Caller Graph Total: 93

Entry Points

External References

Interaction Calls

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend: