Routine: NURACE0

Name	Comments	DBIA/ICR reference
SELT1	; SET USER NAME
A
SELTLOP	;ENTER STAFF DATA
AROUND
QUIT	;KILL LOCAL VARIABLES
STARTIT	;CONTINUE CLASSIFICATION
STAT
CHKJOB	; ; if acuity job did not run print warning, but do not stop user from ; classifying patients
EN1	; ENTRY FROM ROUTINES NURACEW1 or NURACEW
EN2	; ENTRY FROM OPTION NURAPC-REVIND OR ROUTINE NURACEW
STARTREV	; SET VARIABLES IF REVIEWING PATIENT RECORD
KILL	;KILL CLASSREV VARIABLE

Name	Field # of Occurrence
^%ZIS	SELT1+1
YN^DICN	STAT+1
EN1^NURACE7	STARTREV+1
EN3^NURACE8	CHKJOB+3
^NURSAPCH	SELTLOP+3
EN2^NURSCUTL	STARTIT+4
EN5^NURSCUTL	SELTLOP+3
EN6^NURSCUTL	AROUND+5
1^VADPT	AROUND
KVAR^VADPT	QUIT+2

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: @IOF Line Location: SELT1+1
Function Call: WRITE	Prompt: !!," THIS PATIENT IS ",$S(NURSX="LEAVE":"ON "_NURSX,NURSX="AWOL":NURSX,NURSX="OTH. FAC.":"IN ANOTHER FACILITY",1:""),", DO YOU STILL WISH TO CLASSIFY" Line Location: STAT+0
Function Call: WRITE	Prompt: !!," ANSWER YES OR NO " Line Location: STAT+3
Function Call: WRITE	Prompt: $C(7),!!," BAD LOCATION/BED SECTION DATA-CANNOT CLASSIFY " Line Location: STARTIT+1
Function Call: WRITE	Prompt: !!,$C(7),"CANNOT CLASSIFY ",NURSBSF," PATIENTS " Line Location: STARTIT+3
Function Call: WRITE	Prompt: $C(7),"**BAD PREVIOUS CLASSIFICATION DATA CANNOT PROCESS THIS PATIENT**" Line Location: A+2
Function Call: WRITE	Prompt: !! Line Location: CHKJOB+3
Routine Call	%ZIS Line Location: SELT1+1

Name	Line Occurrences (* Changed, ! Killed)
^DIC(213.9 - [#213.9]	EN1+1, EN2+1, CHKJOB+3
^NURSA(214.6 - [#214.6]	A+1
^NURSF(213.3 - [#213.3]	STARTIT+2
^NURSF(214 - [#214]	AROUND+2
^VA(200 - [#200]	SELT1+2, A+6

Name	Line Occurrences
AROUND	SELTLOP+4, STAT+2
KILL	SELTLOP+2, SELTLOP+3, STAT+2, STARTIT+1, STARTIT+3
QUIT	SELT1+1
SELT1	EN1+2
SELTLOP	STAT+2, STARTREV+2
STARTREV	A, A+3
STAT	STAT+3

Name	Field # of Occurrence
^("DATE"	CHKJOB+3
^(0	STARTIT+2, A+1

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
%	STAT+1*, STAT+2, QUIT+3!
%DT	QUIT+1!
ABORTSW	QUIT+1!
CAT	QUIT+1!
CHANGESW	QUIT+1!
CHKVAR	QUIT+1!
CK	QUIT+1!
CLASSREV	EN1+2, EN2+2, A+3*, KILL+1!
CLASSX	A, A+3, A+4*, QUIT+1!
COMMENTX	A, A+3, A+6*, QUIT+1!
CONFIGX	A, A+3, A+4, A+5, QUIT+1!
DA	QUIT+1!
DATEX	A, A+3, A+4*, QUIT+1!
DFN	SELTLOP+3, AROUND+2, QUIT+1!
DIC	QUIT+1!
DIC(0	SELTLOP+3*
DT	CHKJOB+3
DUZ	SELT1+2
FACT	QUIT+1!
FACT1	QUIT+2!
FACTORS	A, A+3, A+6*, A+7, QUIT+1!
FACTX	A, A+3, A+6, A+7, A+8*, QUIT+1!
FCK	QUIT+1!
I	A+7*, QUIT+1!
IOF	SELT1+1
ION	SELT1+1
IOP	SELT1+1*!
J	QUIT+1!
NACT	SELTLOP+3*, QUIT+1!
NASK	SELTLOP+1, SELTLOP+2, QUIT+2!
NAX	AROUND+2*, AROUND+3, AROUND+4, QUIT+1!
NCX	A+1*, A+4, A+6, QUIT+1!
NEWREV	QUIT+1!
NOREVSW	SELTLOP+1*, QUIT+1!
NPWARD	QUIT+3!
NRX	QUIT+1!
NS1	QUIT+2!
NURMDSW	QUIT+3!
NURS10SW	QUIT+3!
NURS11SW	QUIT+1!
NURS13SW	QUIT+3!
NURS1SW	QUIT+3!
NURS3SW	QUIT+3!
NURS4SW	QUIT+1!
NURS5SW	QUIT+1!
NURS6SW	QUIT+3!
NURS7SW	QUIT+3!
NURS8SW	QUIT+1!
NURS9SW	QUIT+3!
NURSA	QUIT+2!
NURSADM	QUIT+3!
NURSBS	AROUND+4*, STARTIT+1, STARTIT+2, STARTIT+3, A+3, QUIT+3!
NURSBS1	A+1*, A+2, A+3, QUIT+1!
NURSBSF	STARTIT+2*, STARTIT+3, QUIT+3!
NURSCKSW	SELTLOP+1*, QUIT+3!
NURSCLAS	A, A+1, QUIT+1!
NURSCLAS("CL"	STARTIT+4*
NURSNAM	AROUND*, QUIT+3!
>> NURSNSW	SELTLOP+1*
NURSOLDC	QUIT+2!
NURSREV	QUIT+1!
NURSRMBD	AROUND+1*, QUIT+3!
NURSRTSW	SELTLOP+1*, QUIT+1!
NURSRVDT	QUIT+1!
>> NURSTABL	SELTLOP+2
>> NURSTABL(	SELTLOP+2
NURSTCLS	QUIT+3!
NURSTRAN	QUIT+2!
NURSUSER	SELT1+2*, QUIT+3!
NURSWARD	AROUND+3*, STARTIT+1, QUIT+3!
NURSX	SELTLOP+4, STAT, QUIT+1!
NWFCTSW	QUIT+3!
NXT	QUIT+3!
OUTSW	QUIT+3!
PADMDT	AROUND+5*, QUIT+3!
PREV	QUIT+3!
REENTSW	QUIT+1!
REVDATE	QUIT+3!
REVIEWER	QUIT+3!
REVNO	QUIT+3!
SAVEX	QUIT+3!
SSN	AROUND*, QUIT+3!
>> TABLSW	SELTLOP+2*
>> TCNT	SELTLOP+2
TX	QUIT+1!
U	SELT1+1*, AROUND+3, AROUND+4, AROUND+5, STARTIT+2
USENO	A, A+3, A+6*, QUIT+3!
USERX	A, A+3, A+6*, QUIT+3!
VA	QUIT+2!
VA("PID"	AROUND
>> VADM(1	AROUND
>> VAIN(5	AROUND+1
>> VAIN(7	AROUND+5
VAROOT	QUIT+1!
>> X	SELTLOP+2*
XCLAS	QUIT+3!

Customize PDF page

Package: Nursing Service

Routine: NURACE0

Information

Source Information

Call Graph

Call Graph Total: 7

Caller Graph

Caller Graph Total: 5

Entry Points

External References

Interaction Calls

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend: