Routine: NURA5C

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

Package	Total	Caller Graph
Nursing Service	1	NURAPR-SAL-LOC

Entry Points

Name	Comments	DBIA/ICR reference
P2
QUIT
P0
P1
FSUB	; FACILITY SUBTLS/AVG
HEADER
P3
PRINT
PGCHK	; FORM FEED CHECK
WRITE
START	;
PSUB	; PRODUCT LINE SUBTLS/AVG
LSUB	;LOCATION SUBTLS/AVG
CSUB	; CATEGORY SUBTLS/AVG
BLD2
BLD1

External References

Name	Field # of Occurrence
^%DT	HEADER+3
D^DIQ	HEADER+3
SETCAT^NURAAGS1	BLD2+3
SETFAC^NURAAGS1	BLD2+3
SETPROG^NURAAGS1	BLD2+3
^NURAKILL	QUIT
EN1^NURSAGSP	NURA5C+8
EN3^NURSAGSP	NURA5C+9
EN5^NURSAGSP	NURA5C+6
PRD^NURSAGSP	NURA5C+7
EN1^NURSAUTL	NURA5C+5
EN2^NURSAUTL	BLD2
EN3^NURSAUTL	BLD2
EN7^NURSAUTL	BLD2+2
$$EN12^NURSUT0	WRITE+1
EN7^NURSUT0	NURA5C+10
CLOSE^NURSUT1	QUIT
ENDPG^NURSUT1	HEADER
$$CAT^NURSUT2	WRITE+4
$$CNTR^NURSUT2	HEADER+2, HEADER+5
$$FACL^NURSUT2	HEADER+2
$$PROD^NURSUT2	HEADER+5
$$REPEAT^XLFSTR	HEADER+4, HEADER+5

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: ! Line Location: NURA5C+3
Function Call: WRITE	Prompt: ! Line Location: NURA5C+8
Function Call: WRITE	Prompt: ! Line Location: NURA5C+10
Function Call: WRITE	Prompt: !,"THERE IS NO DATA FOR THIS REPORT" Line Location: START+3
Function Call: WRITE	Prompt: !!?22,X,!,"EMPLOYEES COUNTED",?25,$J(NSUBC,9,2),!,"REPORT TOTAL ",?22,$J(NSALT,12,2),!,"AVERAGE SALARY ",?22,$J(NAVG,12,2) Line Location: START+6
Function Call: WRITE	Prompt: ! Line Location: P2+0
Function Call: WRITE	Prompt: ?42,NLOC Line Location: WRITE+4
Function Call: WRITE	Prompt: !!?20,"-------------" Line Location: CSUB+1
Function Call: WRITE	Prompt: !,"EMPLOYEES COUNTED:",?25,$J(CSUBC,8,2) Line Location: CSUB+3
Function Call: WRITE	Prompt: !,"CATEGORY SUBTOTAL:",?22,$J(CSALT,11,2) Line Location: CSUB+4
Function Call: WRITE	Prompt: !,"AVERAGE SALARY:",?22,$J(CAVG,11,2) Line Location: CSUB+5
Function Call: WRITE	Prompt: !?20,"-------------" Line Location: PSUB+1
Function Call: WRITE	Prompt: !,"EMPLOYEES COUNTED:",?25,$J(PSUBC,8,2) Line Location: PSUB+3
Function Call: WRITE	Prompt: !,"PRODUCT LINE SUBTOTAL:",?22,$J(PSALT,11,2) Line Location: PSUB+4
Function Call: WRITE	Prompt: !,"AVERAGE SALARY:",?22,$J(PAVG,11,2) Line Location: PSUB+5
Function Call: WRITE	Prompt: !?22,"------------" Line Location: FSUB+1
Function Call: WRITE	Prompt: !,"EMPLOYEES COUNTED:",?25,$J(FSUBC,9,2) Line Location: FSUB+3
Function Call: WRITE	Prompt: !,"FACILITY SUBTOTAL:",?22,$J(FSALT,12,2) Line Location: FSUB+4
Function Call: WRITE	Prompt: !,"AVERAGE SALARY:",?22,$J(FAVG,12,2) Line Location: FSUB+5
Function Call: WRITE	Prompt: !?20,"-------------" Line Location: LSUB+1
Function Call: WRITE	Prompt: !,"EMPLOYEES COUNTED:",?25,$J(LSUBC,8,2) Line Location: LSUB+3
Function Call: WRITE	Prompt: !,"UNIT SUBTOTAL:",?22,$J(LSALT,11,2) Line Location: LSUB+4
Function Call: WRITE	Prompt: !,"AVERAGE SALARY:",?22,$J(LAVG,11,2) Line Location: LSUB+5
Function Call: WRITE	Prompt: ?$$CNTR^NURSUT2(NURFAC(2)),$$FACL^NURSUT2(NURFAC(2)) Line Location: HEADER+2
Function Call: WRITE	Prompt: !!,"STAFF SALARIES BY LOCATION AND SERVICE CATEGORY" Line Location: HEADER+3
Function Call: WRITE	Prompt: ?54,Y,?69,"PAGE: ",NURPAGE Line Location: HEADER+3
Function Call: WRITE	Prompt: !!,?28,"SERVICE",?56,"GRADE/STEP",?69,"GRADE/STEP" Line Location: HEADER+4
Function Call: WRITE	Prompt: !,"EMPLOYEE NAME",?28,"CATEGORY",?42,"LOCATION",?56,"CODE",?69,"SALARY" Line Location: HEADER+4
Function Call: WRITE	Prompt: !,"EMPLOYEE NAME",?28,"CATEGORY",?42,"LOCATION",?56,"CODE",?69,"SALARY" Line Location: HEADER+4
Function Call: WRITE	Prompt: !,?$$CNTR^NURSUT2(NURPROG(2)),$G(Z),!,?$$CNTR^NURSUT2(NURPROG(2)),$$REPEAT^XLFSTR("-",$L(Z)+1) Line Location: HEADER+5

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^DIC(213.9 - [#213.9]	NURA5C+2
^NURSF(210 - [#210]	START+2, WRITE+2, WRITE+5
^NURSF(211.1 - [#211.1]	WRITE+6
^NURSF(211.8 - [#211.8]	BLD1, BLD1+1, BLD2+1, BLD2+12
^TMP("NURSCAT"	BLD2+8
^TMP($J	START+1!, START+3, QUIT!, BLD2+12*, PRINT, P0, P1, P2, P3
^VA(200 - [#200]	BLD2+9, WRITE+2

Label References

Name	Line Occurrences
BLD1	START+2
BLD2	BLD1+1
CSUB	P2
FSUB	PRINT
HEADER	START+3, P1, PGCHK+1
LSUB	P1
P0	PRINT
P1	P0
P2	P1
P3	P2
PGCHK	START+5, WRITE, CSUB+1, PSUB+1, FSUB+1, LSUB+1
PRINT	START+4
PSUB	P0
QUIT	NURA5C+5, NURA5C+6, NURA5C+7, NURA5C+8, NURA5C+9, NURA5C+10, START+3
WRITE	P3

Naked Globals

Name	Field # of Occurrence
^(	P3
^(0	START+2, BLD1+1, BLD2+1, BLD2+9, WRITE+2, WRITE+6

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> CAVG	START+1, CSUB+2, CSUB+5, CSUB+6*
>> CSALT	START+1, START+5, WRITE+8, CSUB+2, CSUB+4, CSUB+6*
>> CSUBC	START+1, WRITE+8, CSUB+2, CSUB+3, CSUB+6*
>> DA	START+2, BLD2, BLD2+12, P3, WRITE+1, WRITE+2, WRITE+5
>> DA(1	START+2*, BLD1, BLD2+9
>> DATA	WRITE+5*, WRITE+6
>> DATA(1	WRITE+6*, WRITE+7
>> DIC(0	NURA5C+6*
DT	BLD1+1
>> FAVG	START+1, FSUB+2, FSUB+5, FSUB+6*
>> FSALT	START+1, WRITE+8, FSUB+2, FSUB+4, FSUB+6*
>> FSUBC	START+1, WRITE+8, FSUB+2, FSUB+3, FSUB+6*
>> I	START+2*
IO	START+4
IOF	HEADER+1
IOSL	PGCHK+1
IOST	BLD2+3, HEADER, HEADER+1
>> LAVG	START+1, LSUB+2, LSUB+5, LSUB+6*
>> LSALT	START+1, WRITE+8, LSUB+2, LSUB+4, LSUB+6*
>> LSUBC	START+1, WRITE+8, LSUB+2, LSUB+3, LSUB+6*
>> N1	BLD2+9, BLD2+10, BLD2+12, P3*
>> NAVG	START+1, START+6
>> NFTEE	P3*, WRITE+1
>> NLOC	P1*, P2, P3, WRITE+4
>> NLOCN	BLD2+1*, BLD2+2
>> NLOCN(1	BLD2+2*, BLD2+5, BLD2+12
>> NPWARD	BLD2+2*
>> NSALT	START+1, START+5, START+6, WRITE+8*
>> NSUBC	START+1, START+6, WRITE+8
>> NURCAT	P2*, P3, WRITE+4
>> NURFAC	BLD2+4, BLD2+11
>> NURFAC(1	BLD2+4, BLD2+11
>> NURFAC(2	BLD2+4, BLD2+11, BLD2+12, PRINT*, P0, P1, P2, P3, HEADER+2
>> NURHOSP	BLD2+5
>> NURMDSW	NURA5C+6, NURA5C+7, BLD2+4, BLD2+11, PRINT, HEADER+2
>> NURNEN	BLD2+3*
>> NURNODE4	BLD1*, BLD1+1, BLD2+1, BLD2+12
>> NURNODE5	BLD1*, BLD1+1, BLD2+12
>> NUROUT	NURA5C+4*, NURA5C+5, NURA5C+6, NURA5C+7, NURA5C+8, NURA5C+9, START+5, PRINT, P0, P1 , P2, P3, WRITE, CSUB+1, PSUB+1, FSUB+1, LSUB+1, HEADER
>> NURPAGE	NURA5C+4, HEADER+1, HEADER+3
NURPLSCR	NURA5C+6, NURA5C+7!
>> NURPLSW	NURA5C+7, BLD2+6, P0, HEADER+5
>> NURPROG	BLD2+6
>> NURPROG(1	START+3, BLD2+6
>> NURPROG(2	START+3, BLD2+6, BLD2+12, P0, P1, P2, P3, HEADER+5
>> NURQUEUE	NURA5C+4*, HEADER
>> NURSAL	WRITE+1*, WRITE+2, WRITE+7, WRITE+8
>> NURSCATY	BLD2+7*, BLD2+8, BLD2+12
>> NURSNLOC(	BLD2+5
>> NURSW1	NURA5C+4, HEADER, HEADER+1
>> NURSZAP	BLD2
>> NURSZDA	BLD2
>> NURSZORT	BLD2*
>> PAVG	START+1, PSUB+2, PSUB+5, PSUB+6*
>> POP	NURA5C+10
>> PSALT	START+1, WRITE+8, PSUB+2, PSUB+4, PSUB+6*
>> PSUBC	START+1, WRITE+8, PSUB+2, PSUB+3, PSUB+6*
U	START+2, BLD1+1, BLD2+1, BLD2+9, BLD2+12, WRITE+2, WRITE+7
>> X	NURA5C+2, START+2, START+6, HEADER+3
>> Y	HEADER+3
Z	HEADER+5~*
>> ZTDESC	NURA5C+10*
>> ZTRTN	NURA5C+10*
>> ZTSK	NURA5C+10

Customize PDF page

Package: Nursing Service

Routine: NURA5C

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: