Routine: PRSNRDN1

Information

PRSNRDN1 ;WOIFO/KJS - GROUP SUMMARY ACTIVITY DIRECT AND NON DIRECT II REPORT ;080411

Call Graph

Call Graph Total: 4

Package	Total	Call Graph
PAID	4	$$ASK^PRSLIB00 L1^PRSNRUT1 $$ISACTIVE^PRSNUT01 $$AMT^PRSPSAPU

Caller Graph

Legends:

Package Component Superscript legend

action

extended action

^Ea

event driver

^Ed

subscriber

^Su

protocol

limited protocol

^LP

run routine

^RR

broker

edit

server

^Se

screenman

^SM

inquire

Caller Graph Total: 1

Package	Total	Caller Graph
PAID	1	PRSNRDN0

Entry Points

Name	Comments	DBIA/ICR reference
GATHER(SKILMIX,GRP,PRSIEN,BEG,END)	;Entry point to gather POC data from 451
DATA(SKILMIX,GRP)	;Extract data from POCD array
HDR(EXTBEG,EXTEND)	;Display header for report of Individual Nurse Activity
PRTLP(EXTBEG,EXTEND)	;Order through SKILMIX array, total data & display
PPP(STOP,EXTBEG,EXTEND)	;

External References

Name	Field # of Occurrence
$$ASK^PRSLIB00	PPP+3
L1^PRSNRUT1	GATHER+16
$$ISACTIVE^PRSNUT01	DATA+28
$$AMT^PRSPSAPU	DATA+11

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: @IOF Line Location: HDR+2
Function Call: WRITE	Prompt: ?17,"GROUP SUMMARY ACTIVITY DIRECT AND NON DIRECT REPORT" Line Location: HDR+4
Function Call: WRITE	Prompt: !,?15,EXTBEG_" - "_EXTEND,?45,"Run Date: ",TODAY,?70,"Page: ",$J(PG,3) Line Location: HDR+5
Function Call: WRITE	Prompt: ! Line Location: HDR+6
Function Call: WRITE	Prompt: !,"Location",?22,"Type of Time",?44,"Type of Work",?75,"Hours" Line Location: HDR+7
Function Call: WRITE	Prompt: !,"--------------------------------------------------------------------------------" Line Location: HDR+8
Function Call: WRITE	Prompt: !,GP Line Location: PPP+1
Function Call: WRITE	Prompt: ?22,TYPETM,?44,TYPEWK,?72,$J(TOTHRS,8,2),! Line Location: PPP+2

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^PRSN(451.5 - [#451.5]	DATA+36, DATA+39
^PRST(457.3 - [#457.3]	DATA+19, DATA+23
^PRST(458 - [#458]	GATHER+11, GATHER+12

Label References

Name	Line Occurrences
DATA	GATHER+18
HDR	PPP+3
PPP	PRTLP+10

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
BEG	GATHER~, GATHER+9
CNT	GATHER+8~, GATHER+10*
DAYNODE	GATHER+8~, GATHER+12*, GATHER+13, GATHER+14
DT	DATA+28
END	GATHER~, GATHER+11
EXTBEG	HDR~, HDR+5, PRTLP~, PRTLP+10, PPP~, PPP+3
EXTEND	HDR~, HDR+5, PRTLP~, PRTLP+10, PPP~, PPP+3
FMDT	GATHER+8~, GATHER+9, GATHER+11, GATHER+12
GP	PRTLP+1~, PRTLP+2, PRTLP+3, PRTLP+5, PRTLP+8, PRTLP+9, PPP+1
GRP	GATHER~, GATHER+18, DATA~, DATA+45
HOURS	DATA+2~, DATA+11*, DATA+45
INDEX	GATHER+8~, GATHER+10*
IOF	HDR+2
IOSL	PPP+3
LNDC	PRTLP+1~, PRTLP+6*
MEAL	DATA+2~, DATA+8*, DATA+11
>> PG	HDR+3*, HDR+5
POC	DATA+2~, DATA+26*, DATA+27, DATA+28
POC1	DATA+2~, DATA+25, DATA+28, DATA+42
POCD	GATHER+15!, GATHER+16
POCD(	DATA+5, DATA+8, DATA+15, DATA+26, DATA+32
POCD(0	GATHER+17
PPIEN	GATHER+8~, GATHER+13*, GATHER+16
PRSIEN	GATHER~, GATHER+16
PRSL	DATA+2~, DATA+4, DATA+5, DATA+8, DATA+15, DATA+26, DATA+32
PRSNDAY	GATHER+8~, GATHER+14*, GATHER+16
>> PRTGP	HDR+3, PRTLP+4, PPP+1*
RNDC	PRTLP+1~, PRTLP+6*
SKILMIX	GATHER~, GATHER+18, DATA~
SKILMIX(	DATA+45*, PRTLP+3, PRTLP+5, PRTLP+8, PRTLP+9
SP	DATA+2~, DATA+8*, DATA+11
ST	DATA+2~, DATA+8*, DATA+11
STOP	GATHER+11, PRTLP+3, PRTLP+5, PRTLP+8, PRTLP+10, PPP~, PPP+3*
TIEN	DATA+2~, DATA+14, DATA+19, DATA+20, DATA+23
TNDC	PRTLP+1~, PRTLP+6*
>> TODAY	HDR+5
>> TOTHRS	PRTLP+9*, PPP+2
TT	DATA+2~, DATA+15*, DATA+16, DATA+19
TW	DATA+2~, DATA+31, DATA+36, DATA+44
TWD	DATA+2~, DATA+31, DATA+39
TYPETM	DATA+2~, DATA+14, DATA+23, DATA+42, DATA+45, PRTLP+1~, PRTLP+4, PRTLP+5, PRTLP+8, PRTLP+9 , PPP+2
TYPEWK	DATA+2~, DATA+44, DATA+45, PRTLP+1~, PRTLP+7, PRTLP+8*, PRTLP+9, PPP+2
U	GATHER+14, DATA+8, DATA+15, DATA+23, DATA+26, DATA+28, DATA+32, DATA+36, DATA+39, PRTLP+9
UNDC	PRTLP+1~, PRTLP+6*
WIEN	DATA+2~, DATA+32*, DATA+33, DATA+36, DATA+39

Customize PDF page

Package: PAID