Routine: KMPRP2

Information

KMPRP2 ;OAK/KAK - RUM Hourly Occurrences Distribution ;11/29/04 11:57

Call Graph

Call Graph Total: 8

Package	Total	Call Graph
Kernel	4	^%ZIS ^%ZISC ^%ZTLOAD ($$FMTE,$$HTFM)^XLFDT
VA FileMan	2	^DIC ^DIR
Capacity Management	1	(CONTINUE,HDR)^KMPDUTL4
Registration	1	$$SITE^VASITE

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
Capacity Management	1	KMPR PRINT HOURLY OCCURRENCE

Entry Points

Name	Comments	DBIA/ICR reference
EN	;-- entry point
EN1	;-- entry point from taskman
DATA	;-- set data
TODAY	; ; 1 - option, 2 - protocol, 3 - rpc
EXIT	;
PRINT	;-- print data
HDR	;
OPR()	;-- extrinsic function - select option, protocol or rpc
OPRCHK(OPR,OPT,DATA)	;-- extrinsic function
OPRSEL(OPR)	;-- extrinsic function - select entry

External References

Name	Field # of Occurrence
^%ZIS	EN+26
^%ZISC	EXIT+2
^%ZTLOAD	EN+34
^DIC	OPRSEL+17
^DIR	EN+19, OPR+10
CONTINUE^KMPDUTL4	PRINT+16, PRINT+26, PRINT+37, PRINT+40
HDR^KMPDUTL4	EN+7
$$SITE^VASITE	PRINT+7
$$FMTE^XLFDT	EN+22
$$HTFM^XLFDT	PRINT+19

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: ! Line Location: EN+7
Function Call: WRITE	Prompt: !,"No action taken." Line Location: EN+26
Function Call: WRITE	Prompt: DATA(0),! Line Location: DATA+21
Function Call: WRITE	Prompt: DATA(0),! Line Location: DATA+26
Function Call: WRITE	Prompt: " <<<Partial Data>>>" Line Location: PRINT+34
Function Call: WRITE	Prompt: @IOF Condition for execution: $Y Line Location: HDR+3
Function Call: WRITE	Prompt: ! Line Location: HDR+3
Function Call: WRITE	Prompt: ?(80-$L($G(SITE))\2),$G(SITE),! Line Location: HDR+4
Function Call: WRITE	Prompt: ?(80-$L(TITLE)\2),TITLE,! Line Location: HDR+5
Function Call: WRITE	Prompt: ?31,"For "_$P($G(KMPRDATE),U,2),!! Line Location: HDR+6
Function Call: WRITE	Prompt: LINE,!," Hour",?10 Line Location: HDR+7
Function Call: WRITE	Prompt: " Total Total",! Line Location: HDR+12
Function Call: WRITE	Prompt: ?X," Occ User",!,LINE,! Line Location: HDR+13
Function Call: WRITE	Prompt: ! Line Location: OPRSEL+13
Routine Call	%ZIS Line Location: EN+26
Routine Call	DIC Line Location: OPRSEL+17
Routine Call	DIR Line Location: EN+19 OPR+10

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^KMPR(8971.1	EN+15, DATA+14, DATA+18, DATA+20, DATA+25
^KMPTMP("KMPR"	TODAY+7, TODAY+10, TODAY+20, TODAY+22
^TMP($J	DATA+6!, DATA+29, DATA+30, TODAY+8, TODAY+24, TODAY+25*, EXIT+3!, PRINT+14, PRINT+29, PRINT+30 , PRINT+31, HDR+9

Label References

Name	Line Occurrences
$$OPR	EN+8
$$OPRCHK	DATA+22
$$OPRSEL	EN+12
DATA	EN1+6
EN1	EN+38
EXIT	EN+36, EN1+6, DATA+11
HDR	PRINT+12, PRINT+27, PRINT+38
PRINT	EN1+6
TODAY	DATA+11

Naked Globals

Name	Field # of Occurrence
^(	TODAY+22
^(1.2	DATA+25
^(2.1	DATA+25
^(2.2	DATA+25

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
%ZIS	EN+2~, EN+25*
%ZIS("A"	EN+25*
CONT	EN+2~, DATA+8*, PRINT+16, PRINT+21, PRINT+26, PRINT+27, PRINT+37, PRINT+38, PRINT+40
DATA	EN+2~, DATA+5~, TODAY+22*, TODAY+23, OPRCHK~, OPRCHK+12, OPRCHK+18, OPRCHK+20
DATA(	DATA+25*, DATA+29, DATA+30
DATA(0	DATA+20*, DATA+22
DIC	OPRSEL+11~, OPRSEL+15*
DIC("A"	OPRSEL+16*
DIC(0	OPRSEL+16*
DIR	EN+2~, OPR+7~
DIR("?"	EN+17*
DIR("A"	EN+17*
DIR(0	EN+16, OPR+9
>> DIRUT	EN+20
DOT	DATA+5~, DATA+8, DATA+15, DATA+16, TODAY+11*, TODAY+12
DT	EN+16, DATA+11, PRINT+18, PRINT+23, PRINT+34
END	DATA+5~
HR	EN+2~
I	DATA+5~, DATA+28, DATA+29, DATA+30, TODAY+23, TODAY+24, TODAY+25
IEN	DATA+5~, DATA+13, DATA+14, DATA+18, DATA+20, DATA+25
IO	PRINT+2
IO("Q"	EN+28, EN+30!
IOF	HDR+3
IOM	PRINT+10
IOSL	PRINT+25, PRINT+36
IOST	DATA+9, DATA+16, TODAY+12
JOB	DATA+5~, TODAY+19, TODAY+20, TODAY+22
KMPRDATE	EN+2~, EN+21, EN+22, EN1+2, DATA+1, DATA+11, DATA+14, PRINT+18, PRINT+23, PRINT+34 , HDR+6
KMPROPR	EN+2~, EN+8*, EN+9, EN+12, EN1+3, DATA+2, DATA+22, TODAY+2, TODAY+3, TODAY+4 , TODAY+14, TODAY+17
KMPROPT	EN+2~, EN+12*, EN1+4, DATA+3, DATA+22, TODAY+2, TODAY+3, TODAY+4, HDR+2
LINE	PRINT+4~, PRINT+10*, HDR+7, HDR+13
NODE	DATA+5~, DATA+20, DATA+29, DATA+30, TODAY+6, TODAY+7, TODAY+8, TODAY+10, TODAY+20, TODAY+22 , TODAY+24, TODAY+25, PRINT+4~, PRINT+28, PRINT+29, PRINT+30, PRINT+31, HDR+1~, HDR+8, HDR+9* , HDR+10
NOWFM	PRINT+4~, PRINT+19*, PRINT+20
NOWHR	PRINT+4~, PRINT+20*, PRINT+23, PRINT+34
OCCUR	DATA+5~, TODAY+23, TODAY+24, PRINT+4~, PRINT+30, PRINT+32
OPR	OPRCHK~, OPRCHK+10, OPRCHK+11, OPRCHK+13, OPRCHK+18, OPRCHK+20, OPRSEL~, OPRSEL+8, OPRSEL+9, OPRSEL+15 , OPRSEL+16
OPT	DATA+5~, TODAY+9, TODAY+10, TODAY+14, TODAY+17, TODAY+20, TODAY+22, OPRCHK~, OPRCHK+20
OPT1	DATA+5~, TODAY+2, TODAY+3, TODAY+4*, TODAY+14
OPTION	DATA+5~, DATA+22, DATA+23, OPRCHK+15~, OPRCHK+18, OPRCHK+20
OUT	EN+2~, EN+5, EN+6, EN+9
POP	EN+2~, EN+26
PT	DATA+5~, TODAY+21, TODAY+22
SITE	PRINT+4~, PRINT+7, PRINT+8, HDR+4
STRT	EN+3~, EN+15*, EN+16
TIME	PRINT+4~, PRINT+21*, PRINT+22, PRINT+23, PRINT+30, PRINT+31, PRINT+34
TITLE	HDR+1~, HDR+2*, HDR+5
TOTOCC	PRINT+4~, PRINT+28, PRINT+30, PRINT+33
TOTUSR	PRINT+4~, PRINT+28, PRINT+31, PRINT+33
U	EN+22, DATA+20, DATA+29, DATA+30, TODAY+2, TODAY+3, TODAY+4, TODAY+23, TODAY+24, TODAY+25 , PRINT+8, PRINT+30, PRINT+31, HDR+2, HDR+6, OPRCHK+11, OPRCHK+18, OPRCHK+20, OPRSEL+16
USER	EN+3~, PRINT+4~, PRINT+31*
X	EN+3~, HDR+1~, HDR+11*, HDR+13, OPR+7~, OPRSEL+11~
Y	EN+3~, EN+21, EN+22, OPR+7~, OPR+12, OPRSEL+11~, OPRSEL+19
Y(0	OPR+12, OPRSEL+19
ZTDESC	EN+29~, EN+31*
>> ZTQUEUED	EXIT+1
>> ZTREQ	EXIT+1*
ZTRTN	EN+29~, EN+32*
ZTSAVE	EN+29~
ZTSAVE("KMPRDATE"	EN+33*
ZTSAVE("KMPROPR"	EN+33*
ZTSAVE("KMPROPT"	EN+33*
>> ZTSK	EN+35

Customize PDF page

Package: Capacity Management