Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Entry Points |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call
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>

Entry Points

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

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

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^NURSA(213.5 - [#213.5] Classic Fileman Calls
Info |  Source |  Entry Points |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call