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 |  Global Variables Directly Accessed |  Label References |  Local Variables  | All
Print Page as PDF
Routine: PRSNRLOS

Package: PAID

Routine: PRSNRLOS


Information

PRSNRLOS ;WOIFO/KJS - All Overtime at a Nursing Location - Summary and Detailed;2-2-2012

Source Information

Source file <PRSNRLOS.m>

Call Graph

Call Graph

Call Graph Total: 9

Package Total Call Graph
PAID 5 $$ASK^PRSLIB00  ($$ISNURSE,$$POCRANGE)^PRSNUT01  $$PRIMLOC^PRSNUT03  PIKGROUP^PRSNUT04  $$AMT^PRSPSAPU  
Kernel 3 ^%ZIS  ^%ZISC  ^%ZTLOAD  
VA FileMan 1 ^DIR  

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

Package Total Caller Graph
PAID 1 PRSNR NURLOC OT  

Entry Points

Name Comments DBIA/ICR reference
COORD ;Entry point for VANOD Coordinator
; Coordinator has no access limits so let them pick any group
MAIN ;
REPORT ;for group of location
EXIT ;
INFO ;Find nurse information to display in report
DATA ;Extract display data from POCD array
TOTTIM1 ;
; save hours into work array
TOTTIM2 ;
; save hours into work array
HDRSUM1 ;Display header for report of Individual Nurse Activity
PRTSUM1 ; Loop through Totals array and print each one
PPP1 ;
HDRSUM2 ;Display header for report of Individual Nurse Activity
PRTSUM2 ; Loop through Totals array and print each one
PPP2 ;
PRTSUM3 ; Loop through Totals array and print each one
PPP3 ;
TYPE ;Choose summary or detailed group activity report
DATE ; User is prompted for a date range
QUE ;call to generate and display report for individual activity

External References

Name Field # of Occurrence
^%ZIS QUE+3
^%ZISC EXIT+2
^%ZTLOAD QUE+17
^DIR TYPE+6
$$ASK^PRSLIB00 PRTSUM1+10, PPP1+8, PRTSUM2+16, PPP2+6, PRTSUM3+10, PPP3+3
$$ISNURSE^PRSNUT01 INFO+7
$$POCRANGE^PRSNUT01 DATE+2
$$PRIMLOC^PRSNUT03 INFO+11
PIKGROUP^PRSNUT04 COORD+3
$$AMT^PRSPSAPU DATA+12

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,?TAB,GHD,!
  • Line Location: REPORT+41
Function Call: WRITE
  • Prompt: ?TAB
  • Line Location: REPORT+42
Function Call: WRITE
  • Prompt: "-"
  • Line Location: REPORT+42
Function Call: WRITE
  • Prompt: !,?2,"GRAND TOTAL:",?43,$J($P(HOURS,U,1),7,2),?53,$J($P(HOURS,U,2),7,2),?63,$J($P(HOURS,U,3),7,2),?73,$J(TOTHRS,7,2)
  • Line Location: REPORT+50
Function Call: WRITE
  • Prompt: !,?2,"GRAND TOTAL:",?66,$J(HOURS,7,2)
  • Line Location: REPORT+54
Function Call: WRITE
  • Prompt: !!,"End of Report"
  • Line Location: EXIT+1
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: HDRSUM1+2
Function Call: WRITE
  • Prompt: ?20,"All Overtime at a Nurse Location Summary Report"
  • Line Location: HDRSUM1+4
Function Call: WRITE
  • Prompt: !,?15,EXTBEG_" - "_EXTEND,?45,"Run Date: ",TODAY,?70,"Page: ",$J(PG,3)
  • Line Location: HDRSUM1+5
Function Call: WRITE
  • Prompt: !
  • Line Location: HDRSUM1+6
Function Call: WRITE
  • Prompt: !,?10,"Reason for",?45,"# Of",?55,"# Of",?65,"# Of",?75,"Total"
  • Line Location: HDRSUM1+7
Function Call: WRITE
  • Prompt: !,?10,"Overtime",?45,"Hours",?55,"Hours",?65,"Hours",?75,"Hours"
  • Line Location: HDRSUM1+8
Function Call: WRITE
  • Prompt: !,?46,"RN",?56,"LPN",?66,"UAP"
  • Line Location: HDRSUM1+9
Function Call: WRITE
  • Prompt: !,"--------------------------------------------------------------------------------"
  • Line Location: HDRSUM1+10
Function Call: WRITE
  • Prompt: !
  • Line Location: PRTSUM1+8
Function Call: WRITE
  • Prompt: !,?4," TOTAL: ",PICK,?43,$J($P(HOURS,U,1),7,2),?53,$J($P(HOURS,U,2),7,2),?63,$J($P(HOURS,U,3),7,2),?73,$J(TOTHRS,7,2),!
  • Line Location: PRTSUM1+14
Function Call: WRITE
  • Prompt: !
  • Line Location: PPP1+3
Function Call: WRITE
  • Prompt: ?10,PRSNTT
  • Line Location: PPP1+4
Function Call: WRITE
  • Prompt: ?10,"TOTAL: ",PRSNTT
  • Line Location: PPP1+5
Function Call: WRITE
  • Prompt: ?43,$J($P(HOURS,U,1),7,2),?53,$J($P(HOURS,U,2),7,2),?63,$J($P(HOURS,U,3),7,2),?73,$J(TOTHRS,7,2)
  • Line Location: PPP1+6
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: HDRSUM2+2
Function Call: WRITE
  • Prompt: ?20,"All Overtime at a Nurse Location Detail Report"
  • Line Location: HDRSUM2+4
Function Call: WRITE
  • Prompt: !,?15,EXTBEG_" - "_EXTEND,?45,"Run Date: ",TODAY,?70,"Page: ",$J(PG,3)
  • Line Location: HDRSUM2+5
Function Call: WRITE
  • Prompt: !
  • Line Location: HDRSUM2+6
Function Call: WRITE
  • Prompt: !,"Nurse Name",?21,"Type Time-",?32,"Type",?48,"Primary Location",?68,"# of",?75,"T&L"
  • Line Location: HDRSUM2+7
Function Call: WRITE
  • Prompt: !,"Skill Mix",?21,"OT-Reason",?32,"Work",?68,"Hours",?75,"Unit"
  • Line Location: HDRSUM2+8
Function Call: WRITE
  • Prompt: !,"--------------------------------------------------------------------------------"
  • Line Location: HDRSUM2+9
Function Call: WRITE
  • Prompt: !
  • Line Location: PRTSUM2+14
Function Call: WRITE
  • Prompt: !,$E(PRSNAME,1,19)
  • Line Location: PPP2+1
Function Call: WRITE
  • Prompt: ?21,$P(PRSNTT,"-",1,3),?32,$E($P(PRSNTT,"-",4),1,14),?48,$E($P(PRIMLOC,U,3),1,18),?67,$J(HOURS,6,2),?75,PRSNTL,!
  • Line Location: PPP2+2
Function Call: WRITE
  • Prompt: " ",$E(SKILMIX,1,17)
  • Line Location: PPP2+3
Function Call: WRITE
  • Prompt: !
  • Line Location: PRTSUM3+8
Function Call: WRITE
  • Prompt: !,?4," TOTAL: ",PICK,?67,$J(HOURS,6,2),!
  • Line Location: PRTSUM3+13
Function Call: WRITE
  • Prompt: !,?6," TOTAL: ",PRSNTT,?67,$J(HOURS,6,2)
  • Line Location: PPP3+1
Function Call: WRITE
  • Prompt: !,"Request "_ZTSK_" queued."
  • Line Location: QUE+18
Routine Call
  • %ZIS
  • Line Location:
    • QUE+3
Routine Call
  • DIR
  • Line Location:
    • TYPE+6

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^PRSN(451 - [#451] REPORT+17, REPORT+20, REPORT+23, REPORT+25, REPORT+27, REPORT+28
^PRSN(451.5 - [#451.5] DATA+30, DATA+33
^PRSN(451.6 - [#451.6] DATA+40, DATA+43
^PRSPC - [#450] INFO+3, INFO+10
^PRST(457.3 - [#457.3] DATA+19, DATA+23
^PRST(458 - [#458] REPORT+10, REPORT+11, REPORT+21
^TMP($J REPORT+7!, REPORT+38, REPORT+48, REPORT+53, EXIT+3!, TOTTIM1+2*, TOTTIM1+3*, TOTTIM1+4*, TOTTIM1+5*, TOTTIM1+6*
, TOTTIM2+2*, TOTTIM2+3*, TOTTIM2+4*, TOTTIM2+5*, TOTTIM2+6*, TOTTIM2+7*, PRTSUM1+5, PRTSUM1+6, PRTSUM1+12, PRTSUM2+4
, PRTSUM2+6, PRTSUM2+9, PRTSUM2+11, PRTSUM3+5, PRTSUM3+6, PRTSUM3+12

Label References

Name Line Occurrences
DATA REPORT+29
DATE MAIN+7
EXIT REPORT+46
HDRSUM1 REPORT+35, PRTSUM1+10, PPP1+8
HDRSUM2 REPORT+36, PRTSUM2+16, PPP2+6, PRTSUM3+10, PPP3+3
INFO REPORT+18, PRTSUM2+7
MAIN COORD+7
PPP1 PRTSUM1+7
PPP2 PRTSUM2+12
PPP3 PRTSUM3+7
PRTSUM1 REPORT+43
PRTSUM2 REPORT+44
PRTSUM3 PRTSUM2+18
QUE MAIN+9
REPORT QUE+20
TOTTIM1 REPORT+32
TOTTIM2 REPORT+33
TYPE MAIN+5

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
%ZIS QUE+1~, QUE+2*
BEG MAIN+1~, MAIN+3~, REPORT+10, DATE+6*
BEGDAY REPORT+2~, REPORT+10*, REPORT+22
BEGPP REPORT+2~, REPORT+10*, REPORT+19, REPORT+22
CNT PRTSUM2+2~, PRTSUM2+8*, PRTSUM2+10*, PRTSUM2+14
DAYBEG MAIN+2~
DAYEND MAIN+2~
DIR TYPE+2~
DIR("?" TYPE+5*
DIR("A" TYPE+4*
DIR(0 TYPE+3*
DIRUT TYPE+2~, TYPE+7
DT REPORT+9
END MAIN+1~, MAIN+3~, REPORT+11, DATE+7*
ENDDAY REPORT+2~, REPORT+11*, REPORT+23
ENDPP REPORT+2~, REPORT+11*, REPORT+20, REPORT+23
EXTBEG MAIN+1~, HDRSUM1+5, HDRSUM2+5, DATE+8*
EXTEND MAIN+1~, HDRSUM1+5, HDRSUM2+5, DATE+9*
GHD REPORT+6~, REPORT+39*, REPORT+40, REPORT+41, REPORT+42
GROUP COORD+2~, COORD+3
GROUP( REPORT+13, REPORT+14, REPORT+15
GROUP(0 COORD+5, COORD+6, REPORT+14
HOURS REPORT+4~, REPORT+48*, REPORT+49, REPORT+50, REPORT+53*, REPORT+54, DATA+12*, TOTTIM1+2, TOTTIM1+3, TOTTIM1+4
, TOTTIM1+5, TOTTIM1+6, TOTTIM2+2, TOTTIM2+3, TOTTIM2+4, TOTTIM2+5, TOTTIM2+6, TOTTIM2+7, PRTSUM1+6*, PRTSUM1+12*
, PRTSUM1+13, PRTSUM1+14, PPP1+2, PPP1+6, PRTSUM2+11*, PPP2+2, PRTSUM3+6*, PRTSUM3+12*, PRTSUM3+13, PPP3+1
I REPORT+6~, REPORT+42*, REPORT+49*, PRTSUM1+13*, PPP1+2*
IEN200 REPORT+6~, INFO+10*, INFO+11
IO REPORT+8
IO("Q" QUE+5, QUE+6!
IOF HDRSUM1+2, HDRSUM2+2
IOM REPORT+40
IOP QUE+1~
IOSL PRTSUM1+10, PPP1+8, PRTSUM2+16, PPP2+6, PRTSUM3+10, PPP3+3
LOCIEN REPORT+2~, REPORT+15*, REPORT+17, REPORT+20, REPORT+23, REPORT+25, REPORT+27
MEAL REPORT+5~, DATA+9*, DATA+12
PG REPORT+2~, REPORT+9*, HDRSUM1+3*, HDRSUM1+5, HDRSUM2+3*, HDRSUM2+5
PICK REPORT+2~, REPORT+12*, REPORT+13*, REPORT+14, REPORT+15, REPORT+37*, REPORT+38*, REPORT+39, TOTTIM1+3, TOTTIM1+4
, TOTTIM1+5, TOTTIM1+6, TOTTIM2+3, TOTTIM2+4, TOTTIM2+5, TOTTIM2+6, TOTTIM2+7, PRTSUM1+5, PRTSUM1+6, PRTSUM1+12
, PRTSUM1+14, PRTSUM2+4, PRTSUM2+6, PRTSUM2+9, PRTSUM2+11, PRTSUM3+5, PRTSUM3+6, PRTSUM3+12, PRTSUM3+13
POP QUE+1~, QUE+4
PPIEN REPORT+2~, REPORT+19*, REPORT+20*, REPORT+21, REPORT+22, REPORT+23, REPORT+25, REPORT+27, REPORT+28
PRIMLOC REPORT+6~, INFO+11*, PPP2+2
>> PRSD REPORT+26*
PRSIEN REPORT+2~, REPORT+16*, REPORT+17*, REPORT+20, REPORT+23, REPORT+25, REPORT+27, REPORT+28, INFO+3, INFO+7
, INFO+10, TOTTIM2+7, PRTSUM2+5*, PRTSUM2+6*, PRTSUM2+9, PRTSUM2+11
PRSL REPORT+3~, INFO+2*, HDRSUM1+3*, HDRSUM2+3*, PPP2+1, PPP2+3, PPP2+5*
PRSNAME REPORT+3~, INFO+4*, TOTTIM2+7, PRTSUM2+3*, PRTSUM2+4*, PRTSUM2+6, PRTSUM2+9, PRTSUM2+11, PPP2+1
PRSNARY REPORT+6~, INFO+3*, INFO+4, INFO+5, INFO+6
PRSNDATE REPORT+3~, REPORT+24*
PRSNDAY REPORT+2~, REPORT+22*, REPORT+23*, REPORT+24, REPORT+25, REPORT+27, REPORT+28
PRSNDAYS REPORT+3~, REPORT+21*, REPORT+24
PRSNG REPORT+2~, REPORT+14*
PRSNLNG REPORT+6~, DATA+15*, DATA+23*
PRSNM REPORT+5~, REPORT+31, DATA+36*, TOTTIM1+5, TOTTIM2+5, TOTTIM2+6, TOTTIM2+7
PRSNRE REPORT+5~, DATA+37*, DATA+43*, TOTTIM1+6
PRSNREC REPORT+5~, DATA+37*, DATA+40*, TOTTIM2+6, TOTTIM2+7
PRSNRIEN REPORT+5~, DATA+37*, DATA+38, DATA+40, DATA+43
PRSNSP REPORT+4~, DATA+6*, DATA+12
PRSNSSN REPORT+3~, INFO+5*
PRSNST REPORT+4~, DATA+3*, DATA+12
PRSNTIEN REPORT+4~, DATA+19*, DATA+20, DATA+23
PRSNTL REPORT+3~, INFO+6*, PPP2+2
PRSNTS REPORT+2~, REPORT+26*, REPORT+27*, REPORT+28
PRSNTT REPORT+4~, DATA+15*, DATA+16, DATA+19, TOTTIM1+4, TOTTIM1+5, TOTTIM2+4, TOTTIM2+5, TOTTIM2+6, TOTTIM2+7
, PRTSUM1+4*, PRTSUM1+5*, PRTSUM1+6, PPP1+4, PPP1+5, PRTSUM2+8*, PRTSUM2+9*, PRTSUM2+11, PPP2+2, PRTSUM3+4*
, PRTSUM3+5*, PRTSUM3+6, PPP3+1
PRSNTW REPORT+5~, DATA+26*, DATA+30*
PRSNTWD REPORT+5~, DATA+26*, DATA+33*, TOTTIM2+7
PRSNVER REPORT+2~, REPORT+25*, REPORT+27, REPORT+28
PRSNWIEN REPORT+4~, DATA+26*, DATA+27, DATA+30, DATA+33
RANGE MAIN+1~, DATE+2*, DATE+4, DATE+6, DATE+7, DATE+8, DATE+9
SKILMIX REPORT+3~, INFO+7*, INFO+8*, INFO+9, PPP2+3
SKILTYP REPORT+6~, INFO+9*, TOTTIM1+2, TOTTIM1+3, TOTTIM1+4, TOTTIM1+5, TOTTIM1+6
STOP MAIN+1~, MAIN+4*, MAIN+6, MAIN+8, REPORT+12*, REPORT+13, REPORT+17, REPORT+20, REPORT+23, REPORT+27
, REPORT+38, REPORT+46, PRTSUM1+3, PRTSUM1+5, PRTSUM1+9, PRTSUM1+10*, PRTSUM1+11, PPP1+8*, PRTSUM2+4, PRTSUM2+6
, PRTSUM2+9, PRTSUM2+15, PRTSUM2+16*, PRTSUM2+17, PPP2+6*, PRTSUM3+3, PRTSUM3+5, PRTSUM3+9, PRTSUM3+10*, PRTSUM3+11
, PPP3+3*, TYPE+7*, DATE+4*
>> TAB REPORT+40*, REPORT+41, REPORT+42
TIMEREC REPORT+2~, REPORT+28*, DATA+3, DATA+6, DATA+9, DATA+15, DATA+26, DATA+36, DATA+37
TODAY REPORT+2~, REPORT+9*, HDRSUM1+5, HDRSUM2+5
TOTHRS REPORT+6~, REPORT+48*, REPORT+49*, REPORT+50, PRTSUM1+12*, PRTSUM1+13*, PRTSUM1+14, PPP1+1*, PPP1+2*, PPP1+6
TOTYP PRTSUM1+2~, PRTSUM1+3*, PRTSUM1+5, PRTSUM1+6, PPP1+4, PPP1+5, PRTSUM3+2~, PRTSUM3+3*, PRTSUM3+5, PRTSUM3+6
TYPE MAIN+3~, REPORT+32, REPORT+33, REPORT+35, REPORT+36, REPORT+43, REPORT+44, REPORT+47, REPORT+52, TYPE+8*
, QUE+8
U COORD+5, COORD+6, REPORT+10, REPORT+11, REPORT+24, REPORT+49, REPORT+50, INFO+4, INFO+5, INFO+6
, INFO+7, DATA+3, DATA+6, DATA+9, DATA+15, DATA+23, DATA+26, DATA+30, DATA+33, DATA+36
, DATA+37, DATA+40, DATA+43, TOTTIM1+2, TOTTIM1+3, TOTTIM1+4, TOTTIM1+5, TOTTIM1+6, PRTSUM1+13, PRTSUM1+14
, PPP1+2, PPP1+6, PPP2+2, DATE+6, DATE+7, DATE+8, DATE+9
X TYPE+2~
Y TYPE+2~, TYPE+8
ZTCPU QUE+7~
ZTDESC QUE+7~, QUE+8*
ZTDTH QUE+7~
ZTIO QUE+7~
ZTKIL QUE+7~
ZTPRI QUE+7~
>> ZTREQ QUE+18*
ZTRTN QUE+7~, QUE+9*
ZTSAVE QUE+7~
ZTSAVE("BEG" QUE+13*
ZTSAVE("END" QUE+14*
ZTSAVE("EXTBEG" QUE+15*
ZTSAVE("EXTEND" QUE+16*
ZTSAVE("GROUP" QUE+10*
ZTSAVE("GROUP(" QUE+11*
ZTSAVE("TYPE" QUE+12*
ZTSK QUE+7~, QUE+18
ZTSYNC QUE+7~
ZTUCI QUE+7~
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables  | All