Routine: NURA6K2

Package	Total	Call Graph
Nursing Service	8	(SETFAC,SETPROG)^NURAAGS1 ^NURAKILL EN4^NURSAGP1 (EN5,PRD)^NURSAGSP (EN1,EN2,EN3,EN7)^NURSAUTL (EN2,EN7)^NURSUT0 (CLOSE,ENDPG)^NURSUT1 ($$CNTR,$$FACL,$$PROD)^NURSUT2
VA Fileman	3	^%DT D^DIQ ^DIR
Kernel	1	$$REPEAT^XLFSTR

Entry Points

Name	Comments	DBIA/ICR reference
SORT	; POSITION SORT
QUIT
NPPRINT
NM
NN
NO
NGO
NHDR
START	;
SORT1
NPRINT
NR

External References

Name	Field # of Occurrence
^%DT	NHDR+4
D^DIQ	NPPRINT+5, NPPRINT+7, NHDR+4
^DIR	START+3
SETFAC^NURAAGS1	SORT1+1
SETPROG^NURAAGS1	SORT1+1
^NURAKILL	QUIT
EN4^NURSAGP1	NURA6K2+7
EN5^NURSAGSP	NURA6K2+5
PRD^NURSAGSP	NURA6K2+6
EN1^NURSAUTL	NURA6K2+4
EN2^NURSAUTL	SORT1
EN3^NURSAUTL	SORT1
EN7^NURSAUTL	SORT1+7
EN2^NURSUT0	SORT1+6
EN7^NURSUT0	NURA6K2+8
CLOSE^NURSUT1	QUIT
ENDPG^NURSUT1	NHDR
$$CNTR^NURSUT2	NHDR+3, NHDR+8
$$FACL^NURSUT2	NHDR+3
$$PROD^NURSUT2	NHDR+8
$$REPEAT^XLFSTR	NHDR+8

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: ! Line Location: NURA6K2+8
Function Call: WRITE	Prompt: !,"THERE IS NO DATA FOR THIS REPORT" Line Location: START+3
Function Call: WRITE	Prompt: ! Line Location: NPPRINT+1
Function Call: WRITE	Prompt: ?23,$E(SSN,1,3),"-",$E(SSN,4,5),"-",$E(SSN,6,9) Line Location: NPPRINT+3
Function Call: WRITE	Prompt: ?ZZ,Y Line Location: NPPRINT+7
Function Call: WRITE	Prompt: !,?$$CNTR^NURSUT2(NURFAC(2)),$$FACL^NURSUT2(NURFAC(2)) Line Location: NHDR+3
Function Call: WRITE	Prompt: !,"NURSING SERVICE PROFICIENCY PROFILE" Line Location: NHDR+4
Function Call: WRITE	Prompt: ?90,Y,?105,"PAGE: ",NURPAGE Line Location: NHDR+4
Function Call: WRITE	Prompt: !!,?51,"DATE",?91,"WORK COPY",?105,"COPY RET'D" Line Location: NHDR+5
Function Call: WRITE	Prompt: !,"NAME",?23,"SSN",?40,"LOCATION",?51,"DUE",?65,"EVALUATOR",?91,"SENT OUT",?105,"FOR TYPING",! Line Location: NHDR+6
Function Call: WRITE	Prompt: X,! Line Location: NHDR+7
Function Call: WRITE	Prompt: !?$$CNTR^NURSUT2(Z),Z,!?$$CNTR^NURSUT2(Z),$$REPEAT^XLFSTR("-",$L(Z)+1),! Line Location: NHDR+8
Routine Call	DIR Line Location: START+3

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^DIC(213.9 - [#213.9]	NURA6K2+2
^NURSF(210 - [#210]	START+2, SORT1+9, SORT1+11, NGO, NGO+1, NPPRINT+7
^NURSF(211.4 - [#211.4]	SORT1+5
^NURSF(211.8 - [#211.8]	SORT+1, SORT+2, SORT1+4
^TMP($J	START+1!, START+3, QUIT!, NGO+7*, NPRINT, NM, NN, NO, NR
^VA(200 - [#200]	SORT1+2, SORT1+3, NGO+1

Label References

Name	Line Occurrences
NGO	SORT1+11
NHDR	START+3, NM, NPPRINT
NM	NPRINT
NN	NM
NO	NN
NPPRINT	NR
NPRINT	START+4
NR	NO
QUIT	NURA6K2+4, NURA6K2+5, NURA6K2+6, NURA6K2+7, NURA6K2+8, START+3
SORT	START+2
SORT1	SORT+2

Naked Globals

Name	Field # of Occurrence
^(	NR
^("I"	SORT1+5
^(0	START+2, SORT+2, SORT1+2, SORT1+4
^(1	SORT1+3

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> D1	NR*, NPPRINT+7
>> DA	START+2, SORT1, SORT1+9, SORT1+11, NGO, NGO+1, NGO+7, NR, NPPRINT+7
>> DA(1	START+2*, SORT+1, SORT1+2, SORT1+3
>> DATA	NPPRINT+7*
>> DIC(0	NURA6K2+5*
>> DIR(0	START+3*
DT	SORT+2
>> I	NPPRINT+7*
>> II	SORT1+11*
IO	START+4
IOF	NHDR+2
IOSL	NPPRINT
IOST	START+2, START+3, NHDR, NHDR+2
>> N1	SORT1+2, NGO+7, NR, NPPRINT+2
>> NDATA	NGO+1*
>> NDD	NGO+1, NGO+3, NGO+7, NN, NO, NR, NPPRINT+5
>> NEV	NGO+1, NGO+7, NR, NPPRINT+6
>> NL1	SORT1+7, NGO+7, NO, NR, NPPRINT+4
>> NLO	SORT1+4*, SORT1+5, SORT1+7, NGO+2
>> NLO(1	SORT1+5*
>> NN	SORT1+11*, NGO, NGO+1, NGO+7
>> NPSPOS(1	SORT1+6
>> NPWARD	SORT1+7*
>> NSP	NGO+3
>> NSPC	NGO+3
>> NSPC(2	NGO+3
>> NURFAC	NGO+4
>> NURFAC(1	NGO+4
>> NURFAC(2	NGO+4, NGO+7, NPRINT*, NM, NN, NO, NR, NHDR+3
>> NURHOSP	NURA6K2+3*, NGO+2
>> NURMDSW	NURA6K2+5, NURA6K2+6, NGO+4, NHDR+3
>> NURNEN	SORT1+1*
>> NURNODE4	SORT+1*, SORT+2, SORT1+4
>> NURNODE5	SORT+1*, SORT+2
>> NUROUT	NURA6K2+3, NURA6K2+4, NURA6K2+5, NURA6K2+6, NURA6K2+7, START+3, NHDR
>> NURPAGE	START+2, NHDR+2, NHDR+4
NURPLSCR	NURA6K2+5, NURA6K2+6!
>> NURPLSW	NURA6K2+6, NGO+5, NHDR+8
>> NURPROG	NGO+5
>> NURPROG("TST"	SORT1+10*, SORT1+12!, NGO+5
>> NURPROG(1	NGO+5
>> NURPROG(2	SORT1+10, NGO+6, NGO+7, NM, NN, NO, NR, NHDR+8
>> NURQUEUE	NURA6K2+3*, NHDR
>> NURQUIT	NURA6K2+3, START+2, NPRINT, NM, NN, NO, NR, NPPRINT, NHDR*
>> NURS132	NURA6K2+8*
>> NURSER	SORT1+6*, SORT1+8
>> NURSNLOC(	NGO+2
>> NURSW1	START+2, NM, NPPRINT, NHDR, NHDR+1
>> NURSZAP	SORT1
>> NURSZDA	SORT1
>> NURSZORT	SORT1*
>> POP	NURA6K2+8
>> SSN	SORT1+3, NGO+7, NR, NPPRINT+3
U	START+2, SORT+2, NPPRINT+7
>> X	START+2, START+3, NHDR+4, NHDR+7
>> Y	NPPRINT+5, NPPRINT+7, NHDR+4
Z	NHDR+8~*
>> ZTDESC	NURA6K2+8*
>> ZTRTN	NURA6K2+8*
>> ZTSK	NURA6K2+8
>> ZZ	NPPRINT+7*

Customize PDF page

Package: Nursing Service

Routine: NURA6K2

Information

Source Information

Call Graph

Call Graph Total: 12

Entry Points

External References

Interaction Calls

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend: