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
Print Page as PDF
Routine: NURA9D2

Package: Nursing Service

Routine: NURA9D2


Information

NURA9D2 ;HIRMFO/YH,MH,MD,RM,FT-FTEE PROFILE BY LOCATION AND SERVICE POSITION ;5/2/97

Source Information

Source file <NURA9D2.m>

Entry Points

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

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !
  • Line Location: NURA9D2+8
Function Call: WRITE
  • Prompt: !
  • Line Location: NURA9D2+9
Function Call: WRITE
  • Prompt: !
  • Line Location: NURA9D2+10
Function Call: WRITE
  • Prompt: !!,?20,NURLINE,!,"REPORT TOTAL",?18,$J(NCT,8,3),!!,"COUNT - ASSIGN.",?18,$J(NTCT,8,3)
  • Line Location: START+4
Function Call: WRITE
  • Prompt: ?36,"PERSONNEL",?62,$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",?62,$S(NCT>0&(NTOT>0):$J((NCT/NTOT),8,3),1:" 0.000")
  • Line Location: START+5
Function Call: WRITE
  • Prompt: !
  • Line Location: NO+0
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 LOCATION AND SERVICE POSITION"
  • Line Location: NHDR+3
Function Call: WRITE
  • Prompt: ?56,Y,?72,"PAGE: ",NURPAGE
  • Line Location: NHDR+3
Function Call: WRITE
  • Prompt: !!
  • Line Location: NHDR+4
Function Call: WRITE
  • Prompt: !,"SERVICE",?36,"EMPLOYEE"
  • Line Location: NHDR+5
Function Call: WRITE
  • Prompt: !,"POSITION",?22,"FTEE",?36,"NAME",?64,"LOCATION"
  • Line Location: NHDR+6
Function Call: WRITE
  • Prompt: ?85,"TOUR"
  • Condition for execution: IOM>120
  • Line Location: NHDR+6
Function Call: WRITE
  • Prompt: !,$$REPEAT^XLFSTR("-",IOM)
  • Line Location: NHDR+7
Function Call: WRITE
  • Prompt: !
  • Line Location: SORT+0
Function Call: WRITE
  • Prompt: !,"THERE IS NO DATA FOR THIS REPORT"
  • Line Location: SORT+1
Function Call: WRITE
  • Prompt: !?21,"-----"
  • 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,"******"
  • 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
Info |  Source |  Entry Points |  Interaction Calls