Routine: NURSEPD0

Package	Total	Call Graph
Nursing Service	8	EN3^NURSAGP1 DATSEL^NURSAGP2 (EN1,EN7)^NURSAUTL HDR^NURSEPD1 ^NURSKILL (EN3,EN7)^NURSUT0 CLOSE^NURSUT1 EN10^NURSUT3
Kernel	1	$$FMTE^XLFDT
VA Fileman	1	C^%DTC

Package

Total

Call Graph

Nursing Service

EN3^NURSAGP1 DATSEL^NURSAGP2 (EN1,EN7)^NURSAUTL HDR^NURSEPD1 ^NURSKILL (EN3,EN7)^NURSUT0 CLOSE^NURSUT1 EN10^NURSUT3

Kernel

$$FMTE^XLFDT

VA Fileman

C^%DTC

Package	Total	Caller Graph
Nursing Service	1	NURSE-PR-DEMP

Package

Total

Caller Graph

Nursing Service

NURSE-PR-DEMP

External References

Name	Field # of Occurrence
C^%DTC	START+28
EN3^NURSAGP1	NAME+1
DATSEL^NURSAGP2	EN1+3
EN1^NURSAUTL	EN1+4
EN7^NURSAUTL	START+7
HDR^NURSEPD1	START+36, START+37, START+40
^NURSKILL	QUIT+1
EN3^NURSUT0	START+4
EN7^NURSUT0	A+1
CLOSE^NURSUT1	QUIT+1
EN10^NURSUT3	EN1+4
$$FMTE^XLFDT	START+45

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !!?5,"No SSN found for this user or, no entry for" Line Location: EN1+7
Function Call: WRITE	Prompt: !?5,"this person in the PAID EMPLOYEE File (#450)." Line Location: EN1+8
Function Call: WRITE	Prompt: !!?5,"No SSN found for this person or, no entry for" Line Location: NAME+5
Function Call: WRITE	Prompt: !?5,"this person is found in the PAID EMPLOYEE File (#450)." Line Location: NAME+6
Function Call: WRITE	Prompt: ! Line Location: A+1
Function Call: WRITE	Prompt: !,NAM_" HAS NO DEFICIENCIES FOR THIS PERIOD" Line Location: START+36
Function Call: WRITE	Prompt: !,NAM_" HAS NO GROUPS/CLASSES ASSIGNED" Line Location: START+37

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^DIC(213.9 - [#213.9]	EN1+1
^NURSF(210 - [#210]	EN1+10, START+4
^NURSF(211.8 - [#211.8]	START+5, START+8
^PRSE(452	START+18
^PRSE(452.1	START+13
^PRSE(452.7	EN1
^PRSPC(	A, START+2, START+10, START+11, START+37
^PRSPC("SSN"	EN1+5, NAME+3
^TMP("NURE"	START+1!, START+33, START+34, START+35, START+36, START+38, START+39, START+41, QUIT+1!
^VA(200 - [#200]	EN1+5, NAME+2, START+2, START+9

Name	Line Occurrences
A	EN1+10
EN1	EN1+6
NAME	NAME+4
QUIT	EN1+3, EN1+4, NAME+1, A+1, START+36, START+37

Name	Field # of Occurrence
^(0	START+5, START+8

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> CLASS	START+13*, START+14, START+15
>> CLASSIEN	START+11*, START+13
>> CLASSTXT	START+15, START+16, START+18, START+33, START+34, START+38, START+46
>> CLASSTXT(0	START+16, START+17
>> COUNT	START+1*
>> DA	EN1+10, START+4, START+35
>> DATE	START+18*, START+19, START+20
>> DATSEL	EN1+3*
>> DIC("S"	NAME*
DROPDEAD	START+9!, START+29, START+30, START+31, START+35, START+41, START+45
DT	START+12, START+31
DUZ	EN1+4, EN1+5, EN1+10
>> FREQ	START+15*, START+19, START+28
>> HOLD	START+1, START+38, START+42, START+43, START+44, START+47*
IO	START+1
IOM	START+1
IOSL	START+40
IOST	START+3
>> LASTDATE	START+20, START+21, START+23, START+26, START+28
>> LASTDAY	START+24, START+25, START+26
MONTH	START+22~, START+23*, START+25
>> NAM	A, START+9, START+35, START+36, START+37, START+39*, START+41, START+42
>> NDA	EN1+5, EN1+6, NAME+1, NAME+2, NAME+3*, NAME+4, A, START+2, START+10, START+11 , START+37
>> NL1	START+7, START+33, START+34, START+38, START+44
>> NOD1	START+4
>> NPWARD	START+5*, START+6, START+7
>> NSCT	START+8, START+35, START+39, START+41, START+43
>> NSCT(1	START+43*
NSTATUS	QUIT+2!
NTODAY	QUIT+2!
>> NURNODE4	START+4*, START+5, START+8
>> NUROUT	EN1+2*, EN1+4, NAME+1, START+38, START+39, START+40
>> NURQUEUE	EN1+2*
>> NURS	START+11*, START+12
>> NURS132	START+1*, START+16, START+42, START+44, START+45, START+46
>> NURSORT	START+32, START+34, START+38*, START+39, START+41
>> NURSW1	EN1+2*, START+40
>> NURSZAP	EN1+10
>> NWRD	START+6
>> POP	A+1
>> POUT	EN1+3
>> PRDA	START+39*, START+41
>> PRSPCD1	START+10*, START+11
>> SSN	EN1+5, NAME+2, NAME+3, START+2*
U	EN1+5, NAME+1, NAME+2, A, START+2, START+5, START+8, START+9, START+12, START+14 , START+15, START+25
>> VA200DA	START+2*, START+4, START+9, START+18
X	EN1, EN1+1, START+29, START+33~, START+34, START+35
>> X1	START+28*
>> X2	START+28*
>> Y	NAME+1
YEAR	START+22~, START+23*, START+24
>> YREND	START+12, START+30, START+31
>> YRST	START+31
>> ZTDESC	A+1*
>> ZTRTN	A+1*
>> ZTSK	A+1

Customize PDF page

Package: Nursing Service

Routine: NURSEPD0

Information

Source Information

Call Graph

Call Graph Total: 10

Caller Graph

Caller Graph Total: 1

Entry Points

External References

Interaction Calls

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend:

Name	Comments	DBIA/ICR reference
A
EN1
NAME
QUIT	; KILL ALL LOCAL VARIABLES
START	;DEFINE FISCAL YEAR DATE AND HEADERS FOR OUTPUT DATA REPORT