Routine: NURA6D2

Package	Total	Call Graph
Nursing Service	10	NHDR1^NURA9D1 EN2^NURA9D11 EN2^NURAED3 ^NURAKILL EN5^NURSAGP0 (EN12,EN2,EN5,EN9,PRD)^NURSAGSP (EN1,EN7)^NURSAUTL EN7^NURSUT0 (CLOSE,ENDPG)^NURSUT1 $$CNTR^NURSUT2
VA FileMan	2	^%DT D^DIQ
Kernel	1	$$REPEAT^XLFSTR

Entry Points

Name	Comments	DBIA/ICR reference
START	;
QUIT
NPRINT
NL
NM
NE
NN
NO
NP
NQ
NR
NPPRINT
NHDR
NSUB	; SUBTOTAL ROUTINE
PSUB	; PRODUCT LINE SUBTOTAL ROUTINE
FSUB	; FACILITY SUBTOTAL ROUTINE
SORT

External References

Name	Field # of Occurrence
^%DT	NHDR+3
D^DIQ	NHDR+3
NHDR1^NURA9D1	NHDR+7
EN2^NURA9D11	SORT
EN2^NURAED3	START+4
^NURAKILL	QUIT
EN5^NURSAGP0	NURA6D2+9
EN12^NURSAGSP	NURA6D2+6
EN2^NURSAGSP	NURA6D2+8
EN5^NURSAGSP	NURA6D2+6
EN9^NURSAGSP	NURA6D2+5
PRD^NURSAGSP	NURA6D2+7
EN1^NURSAUTL	NURA6D2+4
EN7^NURSAUTL	NPPRINT+1
EN7^NURSUT0	NURA6D2+10
CLOSE^NURSUT1	QUIT
ENDPG^NURSUT1	NHDR
$$CNTR^NURSUT2	NHDR+2
$$REPEAT^XLFSTR	NHDR+6, NSUB+1, PSUB+1

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: ! Line Location: NURA6D2+8
Function Call: WRITE	Prompt: ! Line Location: NURA6D2+10
Function Call: WRITE	Prompt: !?20,NURLINE,!,"TOTAL",?18,$J(NCT,8,3),!!,"COUNT - ASSIGN.",?18,$J(NTCT,8,3),?36,"PERSONNEL",?61,$J(NTOT,8,3) Line Location: START+4
Function Call: WRITE	Prompt: !!,"MEAN - ASSIGN.",?18,$S(NCT>0&(NTCT>0):$J((NCT/NTCT),8,3),1:" 0.000"),?36,"PERSONNEL",?61,$S(NCT>0&(NTOT>0):$J((NCT/NTOT),8,3),1:" 0.000") Line Location: START+5
Function Call: WRITE	Prompt: !,$S(+NFTEE:" ",1:"** ") Line Location: NPPRINT+7
Function Call: WRITE	Prompt: !,?$$CNTR^NURSUT2(NURFAC(2)),$S($G(NURFAC(2))=" BLANK":"NO FACILITY",1:$G(NURFAC(2))) Line Location: NHDR+2
Function Call: WRITE	Prompt: !,"FTEE PROFILE BY SERVICE POSITION" Line Location: NHDR+3
Function Call: WRITE	Prompt: ?56,Y,?72,"PAGE: ",NURPAGE Line Location: NHDR+3
Function Call: WRITE	Prompt: !!,"SERVICE",?36,"EMPLOYEE" Line Location: NHDR+4
Function Call: WRITE	Prompt: !,"POSITION",?22,"FTEE",?36,"NAME",?64,"LOCATION" Line Location: NHDR+5
Function Call: WRITE	Prompt: !,$$REPEAT^XLFSTR("-",80) Line Location: NHDR+6
Function Call: WRITE	Prompt: !?21,$$REPEAT^XLFSTR("-",5) Line Location: NSUB+1
Function Call: WRITE	Prompt: !,$S($E(NURPROG(2),1)=" ":$E(NURPROG(2),2,99),1:NURPROG(2))_" TOTALS" Line Location: PSUB+1
Function Call: WRITE	Prompt: !?20,$$REPEAT^XLFSTR("*",6) Line Location: PSUB+1
Function Call: WRITE	Prompt: !,"SUBTOTAL",?18,$J(PSUBT,8,3) Line Location: PSUB+2
Function Call: WRITE	Prompt: !,NURFAC(2)_" TOTALS" Line Location: FSUB+1
Function Call: WRITE	Prompt: !?20,NURLINE Line Location: FSUB+1
Function Call: WRITE	Prompt: !,"SUBTOTAL",?18,$J(FSUBT,8,3) Line Location: FSUB+2
Function Call: WRITE	Prompt: ! Line Location: SORT+0
Function Call: WRITE	Prompt: !,"THERE IS NO DATA FOR THIS REPORT" Line Location: SORT+1

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^DIC(213.9 - [#213.9]	NURA6D2+2
^NURSF(211.8 - [#211.8]	NPPRINT+1
^TMP("NURA"	START+1!, QUIT!, NPPRINT+2*
^TMP($J	START+1!, QUIT!, NPRINT, NL, NM, NE, NN, NO, NP, NQ , NR, SORT+1

Label References

Name	Line Occurrences
FSUB	NPRINT
NE	NM
NHDR	START+2, NL, NPPRINT, NSUB+1, PSUB+1, FSUB+1, SORT+1
NL	NPRINT
NM	NL
NN	NE
NO	NN
NP	NO
NPPRINT	NR
NPRINT	START+2
NQ	NP
NR	NQ
NSUB	NM
PSUB	NL
QUIT	NURA6D2+4, NURA6D2+6, NURA6D2+7, NURA6D2+8, NURA6D2+9, NURA6D2+10, START+2
SORT	START+2

Naked Globals

Name	Field # of Occurrence
^(	NP

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> DA	NR*
>> DA(1	NO*, NP, NPPRINT+2
>> DA(2	NP*, NPPRINT+1
>> DIC(0	NURA6D2+6*
>> FCT	START+1, FSUB+3
>> FSUBC	START+1, NPPRINT+5, FSUB+2, FSUB+4*
>> FSUBM	NPPRINT+5, FSUB+4
>> FSUBT	START+1, NPPRINT+5, FSUB+2, FSUB+3, FSUB+4*
IO	START+1
IOF	NHDR+1
IOSL	START+2, NPPRINT, NSUB+1, PSUB+1, FSUB+1
IOST	NHDR, NHDR+1
>> N1	NQ*, NR, NPPRINT+10
>> NCT	START+1, START+2, START+4, START+5, NSUB+3*
>> NFTEE	NN*, NO, NP, NPPRINT+3, NPPRINT+4, NPPRINT+5, NPPRINT+7, NPPRINT+9
>> NL1	NPPRINT+1*, NPPRINT+11
>> NPRI	NM*, NE, NN, NO, NP
>> NPWARD	NPPRINT+1*
>> NRPT	SORT*
>> NSPO	NE*, NN, NO, NP, NPPRINT+8
>> NSUBC	START+1, NPPRINT+3, NSUB+2, NSUB+3, NSUB+4*
>> NSUBM	NPPRINT+3, NSUB+4
>> NSUBT	START+1, START+2, NPPRINT+3, NSUB+2, NSUB+3, NSUB+4*
>> NTCT	START+1, START+4, START+5, NSUB+3
>> NTOT	START+4, START+5
>> NURFAC(2	NPRINT*, NL, NM, NE, NN, NO, NP, NHDR+2, FSUB+1
>> NURLINE	START+3, START+4, FSUB+1
>> NURMDSW	NURA6D2+3*, NURA6D2+6, NURA6D2+7, NPRINT, NHDR+2
>> NURNEN	SORT*
>> NUROUT	NURA6D2+3, NURA6D2+4, NURA6D2+6, NURA6D2+7, NURA6D2+8, NURA6D2+9, START+2, NHDR, SORT+1
>> NURPAGE	START+1, NHDR+1, NHDR+3
NURPLSCR	NURA6D2+6!, NURA6D2+7!
>> NURPLSW	NURA6D2+3*, NURA6D2+7, NL, NHDR+7
>> NURPROG	SORT+1
>> NURPROG(1	SORT+1
>> NURPROG(2	NPRINT, NL, NM, NE, NN, NO, NP, PSUB+1, SORT+1*
>> NURQUEUE	NURA6D2+3*, NHDR
>> NURQUIT	START+1, START+2, NPRINT, NL, NM, NE, NN, NO, NQ, NR , NPPRINT, NPPRINT+11, NHDR, NSUB+1, PSUB+1, FSUB+1
>> NURSORT	NP*, NQ, NR, NPPRINT+2
>> NURSUMSW	NURA6D2+3*, START+2, NL, NM, NPPRINT+6, NHDR+7, NSUB+1, NSUB+2, FSUB+5
>> NURSW1	START+1, NPPRINT+2, NHDR
>> PCT	START+1, PSUB+3
>> POP	NURA6D2+10
>> PSUBC	START+1, NPPRINT+4, PSUB+2, PSUB+4*
>> PSUBM	NPPRINT+4, PSUB+4
>> PSUBT	START+1, NPPRINT+4, PSUB+2, PSUB+3, PSUB+4*
>> X	NHDR+3, SORT+1
>> Y	NHDR+3
>> ZTDESC	NURA6D2+10*
>> ZTRTN	NURA6D2+10*
>> ZTSK	NURA6D2+10

Customize PDF page

Package: Nursing Service

Routine: NURA6D2

Information

Source Information

Call Graph

Call Graph Total: 13

Entry Points

External References

Interaction Calls

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend: