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: NURARWL7

Package: Nursing Service

Routine: NURARWL7


Information

NURARWL7 ;HIRMFO/MD,FT-DAILY TOTAL ROUTINE FOR AMIS WORKLOAD STATISTICS REPORT ;9/20/96

Source Information

Source file <NURARWL7.m>

Entry Points

Name Comments DBIA/ICR reference
DAYTL ; DAY SUMMARY FOR AMIS WORKLOAD REPORTS
PRINT ;
; DETAIL LINE PRINT FOR AMIS WORKLOAD REPORT
EN1 ; ENTRY POINT TO OPTION NURAPR-RES-CURWKL-QUEUE
EN2 ;

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,?18,$$REPEAT^XLFSTR("-",114)
  • Line Location: DAYTL+9
Function Call: WRITE
  • Prompt: ?48,$J($P(NDREQ,U,2),4,1),?54,$J($P(NDFTEE,U,2),4,1)
  • Line Location: DAYTL+11
Function Call: WRITE
  • Prompt: ?60,$J($P(NDVAR,U,2),5,1)
  • Line Location: DAYTL+12
Function Call: WRITE
  • Prompt: ?93,$J($P(NDPROD,U,3),3,0)
  • Condition for execution: NURSZAP'>6 ?67,$J($P(NDPROD,U,2),3,0) W ?74,$J($P(NDREQ,U,3),4,1),?80,$J($P(NDFTEE,U,3),4,1),?86,$J($P(NDVAR,U,3),5,1) W:NURSZAP'>6
  • Line Location: DAYTL+12
Function Call: WRITE
  • Prompt: ?97,$J($P(NDPC,U),4,1),?103,$J($P(NDPC,U,2),4,1),?109,$J($P(NDPC,U,3),4,1),?115,$J($P(NDPC,U,4),4,1),?122,$J($P(NDPC,U,5),3,1),?126,$J(NDPCC,5,1)
  • Line Location: DAYTL+13
Function Call: WRITE
  • Prompt: !,NDATED(2)," ",Z," COUNT",?28,$J(+DMNHRS(Z),4,1),?54,$J($P(DMNHRS(Z),U,2),4,1),?80,$J($P(DMNHRS(Z),U,3),4,1)
  • Line Location: DAYTL+16
Function Call: WRITE
  • Prompt: ?97,$J(+DCOUNT(Z),4,1),?103,$J($P(DCOUNT(Z),U,2),4,1),?109,$J($P(DCOUNT(Z),U,3),4,1),?115,$J($P(DCOUNT(Z),U,4),4,1),?122,$J($P(DCOUNT(Z),U,5),3,1),?126,$J(+DCOUNT(Z),5,1)
  • Line Location: DAYTL+17
Function Call: WRITE
  • Prompt: !
  • Line Location: PRINT+5
Function Call: WRITE
  • Prompt: !,$E(NPLOC,1,10)
  • Line Location: PRINT+5
Function Call: WRITE
  • Prompt: ?11,$S(NSHFT=1:"NIGHT",NSHFT=2:"DAY",NSHFT=3:"EVE"),?17,$J(NSEC,3)
  • Line Location: PRINT+6
Function Call: WRITE
  • Prompt: ?23,$S(SECT="ATC":" N/A",1:$J($P(NREQ(NSHFT),U),3,1))
  • Line Location: PRINT+7
Function Call: WRITE
  • Prompt: ?29,$J($P(NDFTEE(NSHFT),U),3,1)
  • Line Location: PRINT+8
Function Call: WRITE
  • Prompt: ?49,$S($P(NURS213,U)="ATC":" N/A",1:$J($P(NREQ(NSHFT),U,2),3,1))
  • Line Location: PRINT+9
Function Call: WRITE
  • Prompt: ?55,$J($P(NDFTEE(NSHFT),U,2),3,1)
  • Line Location: PRINT+10
Function Call: WRITE
  • Prompt: ?75,$S($P(NURS213,U)="ATC":" N/A",1:$J($P(NREQ(NSHFT),U,3),3,1))
  • Line Location: PRINT+11
Function Call: WRITE
  • Prompt: ?81,$J($P(NDFTEE(NSHFT),U,3),3,1)
  • Line Location: PRINT+12
Function Call: WRITE
  • Prompt: ?98,$J($P(NPC(NSHFT),U),3),?104,$J($P(NPC(NSHFT),U,2),3),?110,$J($P(NPC(NSHFT),U,3),3),?116,$J($P(NPC(NSHFT),U,4),3),?122,$J($P(NPC(NSHFT),U,5),3),?126,$J(NPCC(NSHFT),4)
  • Line Location: PRINT+14
Function Call: WRITE
  • Prompt: !,$C(7),?5,"The professional percentage default site parameter, for wards without an",!,?5,"entry in the professional percentage field, in the NURS LOCATION File",!,?5,"entry must be entered: ",!
  • Line Location: EN1+3
Function Call: WRITE
  • Prompt: !!,$C(7),"To generate this report AMIS Bedsections must be associated with MAS locations",!,"Contact the NURSING ADP Coordinator."
  • Line Location: EN1+5

FileMan Files Accessed Via FileMan Db Call

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