Routine: NURAFSD

Package	Total	Call Graph
Nursing Service	7	^NURAKILL (EN8,EN9)^NURSAGSP EN6^NURSAUTL EN7^NURSUT0 (CLOSE,ENDPG)^NURSUT1 ($$CNTR,$$FACL)^NURSUT2 $$EN12^NURSUT3
VA Fileman	3	^%DT ^DIC (D,DT)^DIQ
Kernel	1	$$REPEAT^XLFSTR

Package

Total

Call Graph

Nursing Service

^NURAKILL (EN8,EN9)^NURSAGSP EN6^NURSAUTL EN7^NURSUT0 (CLOSE,ENDPG)^NURSUT1 ($$CNTR,$$FACL)^NURSUT2 $$EN12^NURSUT3

VA Fileman

^%DT ^DIC (D,DT)^DIQ

Kernel

$$REPEAT^XLFSTR

Package	Total	Caller Graph
Nursing Service	2	NURAED-BATSEP NURAED-BATSEP-QUEUE

Package

Total

Caller Graph

Nursing Service

NURAED-BATSEP NURAED-BATSEP-QUEUE

Name	Comments	DBIA/ICR reference
PRINT	;
START	;
HDGING	;
TOTAL	;
QUIT

External References

Name	Field # of Occurrence
^%DT	NURAFSD+3
^DIC	START+2
D^DIQ	START+2, HDGING+5
DT^DIQ	PRINT+4
^NURAKILL	QUIT
EN8^NURSAGSP	NURAFSD+5
EN9^NURSAGSP	NURAFSD+5
EN6^NURSAUTL	PRINT+3
EN7^NURSUT0	NURAFSD+6
CLOSE^NURSUT1	QUIT
ENDPG^NURSUT1	START+16, START+19, HDGING+1
$$CNTR^NURSUT2	HDGING+4
$$FACL^NURSUT2	HDGING+4
$$EN12^NURSUT3	START+6
$$REPEAT^XLFSTR	HDGING+6

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: ! Line Location: NURAFSD+5
Function Call: WRITE	Prompt: ! Line Location: NURAFSD+6
Function Call: WRITE	Prompt: !,"NO DATA FOR "_NURSDATE Line Location: START+2
Function Call: WRITE	Prompt: !,"NO EMPLOYEES SEPARATED/ACTIVATED ON ",Y,! Line Location: START+16
Function Call: WRITE	Prompt: !,"NO EMPLOYEES SEPARARTED/ACTIVATED ON ",Y,! Line Location: START+19
Function Call: WRITE	Prompt: !!,"TOTAL EMPLOYEES SEPARATED/ACTIVATED: ",NTCNT Line Location: TOTAL+1
Function Call: WRITE	Prompt: !,$E($P(^(0),U),1,20) Line Location: PRINT+2
Function Call: WRITE	Prompt: ?20,$S($P(NURSEMP,U,2)="S":"SEP",$P(NURSEMP,U,2)="A":"ACT",1:"") Line Location: PRINT+3
Function Call: WRITE	Prompt: ?29,$E(NPWARD,1,10) Line Location: PRINT+3
Function Call: WRITE	Prompt: ?39," " Line Location: PRINT+4
Function Call: WRITE	Prompt: ?53,$P(^(0),U) Condition for execution: $D(^NURSF(211.3,+$P(NURSEMP,U,6),0)) Line Location: PRINT+4
Function Call: WRITE	Prompt: ?64,$E($P(^(0),U,2),1,15) Condition for execution: $D(^NURSF(211.9,+$P(NURSEMP,U,4),0)) Line Location: PRINT+4
Function Call: WRITE	Prompt: !,"ON THE REPORT DATE, ASSIGNMENTS FOR THE FOLLOWING EMPLOYEES WERE",!,"ACTIVATED/SEPARATED. THE STATUS INDICATORS WERE MODIFIED APPROPRIATELY:",! Line Location: HDGING+3
Function Call: WRITE	Prompt: !,?$$CNTR^NURSUT2(NURFAC(2)),$$FACL^NURSUT2(NURFAC(2)) Line Location: HDGING+4
Function Call: WRITE	Prompt: !,?15,"EMPLOYEE ACTIVATION/SEPARATION REPORT "_Y Line Location: HDGING+5
Function Call: WRITE	Prompt: !,"NAME",?20,"ACT/SEP",?29,"LOCATION",?40,"ST/VAC DT",?53,"POSITION",?63,"REASON",!,$$REPEAT^XLFSTR("-",80) Line Location: HDGING+6
Routine Call	DIC Line Location: START+2

FileNo	Call Tags
^NURSA(213.5 - [#213.5]	Classic Fileman Calls

Name	Line Occurrences (* Changed, ! Killed)
^DIC(213.9 - [#213.9]	NURAFSD+2
^DIC(4 - [#4]	START+11
^NURSA(213.2 - [#213.2]	START+11
^NURSA(213.5 - [#213.5]	START+4, START+5, PRINT+2
^NURSF(211.3 - [#211.3]	PRINT+4
^NURSF(211.9 - [#211.9]	PRINT+4
^TMP($J	START+1!, START+9*, START+15, START+18, START+21, QUIT+1!
^VA(200 - [#200]	PRINT+2

Name	Line Occurrences
HDGING	START+2, START+16, START+19, START+21, PRINT+1
PRINT	START+21
QUIT	NURAFSD+3, NURAFSD+5, NURAFSD+6, START+2
TOTAL	START+21, START+22

Name	Field # of Occurrence
^(0	PRINT+2, PRINT+4

Local Variables

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
%DT	NURAFSD+3*!
%DT("A"	NURAFSD+3*
%DT("B"	NURAFSD+3*
%DT(0	NURAFSD+3*
>> DA	START+4, START+5, START+9, START+11, START+21*, PRINT+2
>> DA(1	START+4, START+5, START+9, START+21, PRINT+2
DIC	START+2*!
DIC("S"	START+2*
DIC(0	NURAFSD+5, START+2
IOF	HDGING+2
IOSL	PRINT+1
IOST	HDGING+1
>> NPWARD	PRINT+3*
>> NQSW	NURAFSD+3*
>> NTCNT	START+2, TOTAL+1, PRINT+4
>> NURFAC	START+8, START+12
>> NURFAC(1	START+8, START+12
>> NURFAC(2	START+6, START+7, START+8, START+9, START+16, START+18, START+21*, HDGING+4
>> NURMDSW	NURAFSD+3*, NURAFSD+5, START+6, START+15, START+18, HDGING+4
>> NUROUT	NURAFSD+3, NURAFSD+5, NURAFSD+6, TOTAL+1*, HDGING+1
>> NURQUEUE	HDGING+1
>> NURQUIT	HDGING+1*
>> NURS	START+15, START+16, START+18
>> NURSDA	START+3*, START+4
>> NURSDATE	NURAFSD+4, START+2, HDGING+5
>> NURSEMP	PRINT+2*, PRINT+3, PRINT+4
>> NURSFAC(	START+13*, START+15
>> NURSW1	START+2, PRINT+1, HDGING+1, HDGING+5, HDGING+7*
>> NURSWARD	START+5*, START+6
>> POP	NURAFSD+6
U	NURAFSD+2, START+5, START+11, PRINT+2, PRINT+3, PRINT+4
>> X	NURAFSD+3, START+2, START+11*, START+12, START+13
>> Y	NURAFSD+3, NURAFSD+4, START+2, START+3, START+11, START+16, START+19, PRINT+4, HDGING+5
>> ZTRTN	NURAFSD+6*
>> ZTSK	NURAFSD+6

Customize PDF page

Package: Nursing Service

Routine: NURAFSD

Information

Source Information

Call Graph

Call Graph Total: 11

Caller Graph

Caller Graph Total: 2

Entry Points

External References

Interaction Calls

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend: