Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All
Print Page as PDF
Routine: NURAFSD

Package: Nursing Service

Routine: NURAFSD


Information

NURAFSD ;HIRMFO/MD-EMPLOYEE ACT/SEP MANUAL AND TASKED REPORTS ; 4/25/03 2:37pm

Source Information

Source file <NURAFSD.m>

Call Graph

Call Graph

Call Graph Total: 11

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  

Caller Graph

Legends:

Legend of Colors

Package Component Superscript legend

action A extended action Ea event driver Ed subscriber Su protocol O limited protocol LP run routine RR broker B edit E server Se print P screenman SM inquire I

Caller Graph

Caller Graph Total: 3

Package Total Caller Graph
Nursing Service 2 NURAED-BATSEP  NURAED-BATSEP-QUEUE  
Kernel 1 ^DIC(19  

Entry Points

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

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

FileMan Files Accessed Via FileMan Db Call

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

Global Variables Directly Accessed

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

Label References

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

Naked Globals

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

Local Variables

Legend:

>> 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
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All