Routine: XTPMSTAT

Package	Total	Call Graph
VA Fileman	4	^%DT ^%DTC ^DIC YN^DICN
Kernel	3	(,HOME)^%ZIS ^%ZISC ^%ZTLOAD
Toolkit	1	^XTPMKPCF

Entry Points

External References

Name	Field # of Occurrence
^%DT	DATE+1, DATE+2
^%DTC	PRINT+18, PRINT+19
^%ZIS	XTPMSTAT+3, DEV
HOME^%ZIS	DEV+1
^%ZISC	EXIT+1
^%ZTLOAD	DEV+1
^DIC	EN+4, EN+5
YN^DICN	EN+10
^XTPMKPCF	PRINT+16

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: @IOF,"Patch Monitor Statistics",!!! Line Location: EN+0
Function Call: WRITE	Prompt: "Please select the REPORTING GROUP. You may select as many groups as you",! Line Location: EN+1
Function Call: WRITE	Prompt: "wish for each report. Each group will be reported in a separate section.",!!! Line Location: EN+2
Function Call: WRITE	Prompt: $C(7),". . . You already have that one" Line Location: EN+6
Function Call: WRITE	Prompt: !!,"Do you want a new form/screen between REPORTING GROUPS" Line Location: EN+10
Function Call: WRITE	Prompt: ! Line Location: DATE+0
Function Call: WRITE	Prompt: !!,$C(7),"Starting date is later than ending date.",!! Line Location: DATE+3
Function Call: WRITE	Prompt: !! Line Location: DEV+0
Function Call: WRITE	Prompt: !,"Queued as task #",ZTSK Line Location: DEV+2
Function Call: WRITE	Prompt: XTBGRPHD,!! Line Location: PRINT+21
Function Call: WRITE	Prompt: ! Line Location: PRINT+22
Function Call: WRITE	Prompt: XTBGRPHD,!! Line Location: PRINT+23
Function Call: WRITE	Prompt: !,XTBGRPHD,!! Line Location: PRINT+24
Function Call: WRITE	Prompt: XTBGRPHD,!! Line Location: PRINT+25
Function Call: WRITE	Prompt: ?67,$J(XTBDAYLT,3,0)_$S(XTBDAYLT>1:" days",1:" day") Line Location: PRINT+31
Function Call: WRITE	Prompt: XTBGRPHD,!! Line Location: PRINT+34
Function Call: WRITE	Prompt: !!?6,"Totals patches received for date range: ",XTBTPTCH,! Line Location: PRINT+37
Function Call: WRITE	Prompt: "Total patches installed past compliance date: ",XTBTLATE,!! Line Location: PRINT+38
Function Call: WRITE	Prompt: ?25,"Delinquent patch % : ",$S(XTBDIVOK=1:$J((XTBTLATE/XTBTPTCH*100),6,2),1:0)_" %",! Line Location: PRINT+40
Function Call: WRITE	Prompt: ?25," Compliance % : ",$S(XTBDIVOK=1:$J(100-(XTBTLATE/XTBTPTCH*100),6,2),1:0)," %",! Line Location: PRINT+41
Function Call: WRITE	Prompt: !!,"Press ENTER to end " Line Location: PRINT+42
Function Call: WRITE	Prompt: @IOF,! Line Location: EXIT+0
Function Call: WRITE	Prompt: @IOF Line Location: HDR+0
Function Call: WRITE	Prompt: @IOF Line Location: HDR+1
Function Call: WRITE	Prompt: XTBCURDT Line Location: HDR+2
Function Call: WRITE	Prompt: ?(IOM-$L(X)\2),X,?(IOM-12),"Page: ",PG,! Line Location: HDR+3
Function Call: WRITE	Prompt: ?(IOM-$L(X)\2),X,! Line Location: HDR+4
Function Call: WRITE	Prompt: !,"Compliance",?14,"Patch",?27,"Release",?41,"Install",?67,"# Days",! Line Location: HDR+5
Function Call: WRITE	Prompt: "Date",?14,"Number",?27,"Date",?41,"Date",?55,"Priority",?67,"Delinquent",!,XTBLINE,! Line Location: HDR+6
Function Call: WRITE	Prompt: !!,"Press ENTER to continue or '^' to end " Line Location: PAUSE+1
Routine Call	%ZIS Line Location: DEV+1
Routine Call	DIC Line Location: EN+4 EN+5
Routine Call	%ZIS Line Location: XTPMSTAT+3 DEV

FileMan Files Accessed Via FileMan Db Call

FileNo	Call Tags
^XPD(9.95 - [#9.95]	Classic Fileman Calls

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^DD("DD"	DATE+1, DATE+2, PRINT+1, PRINT+26, PRINT+27, PRINT+28
^DD("SITE"	HDR+2
^XPD(9.9 - [#9.9]	SORT, SORT+1, SORT+2, PRINT+14, PRINT+15, PRINT+17
^XPD(9.95 - [#9.95]	PRINT+7

Label References

Name	Line Occurrences
DATE	DATE+3
EXIT	EN+8, EN+9, DATE+1, DATE+2, DEV, DEV+2, PRINT+3, PRINT+35
HDR	PRINT+3, PRINT+23, PRINT+25, PRINT+34, PRINT+36
PAUSE	PRINT+23, PRINT+25, PRINT+33

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
%	EN+10*, EXIT+2!
%DT	DATE, DATE+2, EXIT+2!
%DT("A"	DATE+1, DATE+2
%T	EXIT+4!
%Y	EXIT+4!
%ZIS	DEV*, EXIT+2!
D0	PRINT+16*!, EXIT+4!
DA	EN+4~
DA(1	EN+4*, EN+5
DIC	EN+4~, EN+5~, EXIT+4!
DIC(0	EN+4, EN+5
DT	PRINT+1, PRINT+19
DTIME	PRINT+42, PAUSE+1
IO	SORT
IO("Q"	DEV+1
IOF	EN, EXIT, HDR, HDR+1
IOM	PRINT+2, HDR+3, HDR+4
ION	DEV+1
IOP	XTPMSTAT+3*!
IOSL	PRINT+25, PRINT+33, PRINT+34, PRINT+36
IOST	PRINT+23, PRINT+25, PRINT+33, PRINT+36, PRINT+42, EXIT, HDR, HDR+1, PAUSE
PG	PRINT+3, PRINT+21, EXIT+4!, HDR, HDR+3
POP	DEV, EXIT+4!
TMP	EXIT+2!
TMP("XTBGRP"	EN+3!, EN+6, EN+7*, EN+9, PRINT+3, PRINT+5, EXIT+5!
TMP("XTBPKG"	EN+3!, SORT+5*, PRINT+7, PRINT+9, PRINT+10, PRINT+12, EXIT+5!
U	EN+6, EN+7, EN+8, SORT+3, SORT+4, SORT+5, PRINT+13, PRINT+14, PRINT+15, PRINT+17 , PAUSE+2
X	EN+8, PRINT+16, PRINT+18, PRINT+19, EXIT+4!, HDR+2, HDR+3, HDR+4
X1	PRINT+18, PRINT+19, EXIT+4!
X2	PRINT+18, PRINT+19, EXIT+4!
XTBANS	PRINT+42!, EXIT+2!, PAUSE+1!, PAUSE+2
XTBBDT	DATE+1*, DATE+3, SORT, EXIT+2!
XTBBDT1	DATE+1*, EXIT+2!, HDR+4
XTBCPLDT	SORT, SORT+1, SORT+5, PRINT+9, PRINT+10, PRINT+12, PRINT+18, PRINT+19, PRINT+27, EXIT+2! , PAUSE+2*
XTBCPLDX	PRINT+27*, PRINT+30, EXIT+2!
XTBCURDT	PRINT+1*, EXIT+5!, HDR+2
XTBDA	SORT+1, SORT+2, SORT+5, PRINT+10, PRINT+12, PRINT+14, PRINT+15, PRINT+16, PRINT+17, EXIT+2! , PAUSE+2*
XTBDAYLT	PRINT+18, PRINT+19, PRINT+31, EXIT+2!
XTBDIVOK	PRINT+39*, PRINT+40, PRINT+41, EXIT+5!
XTBDTA	SORT+2, SORT+3, SORT+4, PRINT+12, PRINT+13, EXIT+3!
XTBEDT	DATE+2*, DATE+3, SORT, EXIT+2!
XTBEDT1	DATE+2*, EXIT+2!, HDR+4
XTBGPDA	PRINT+5*, PRINT+7, EXIT+3!
XTBGRP	PRINT+3, PRINT+4, PRINT+5*, PRINT+20, PRINT+23, PRINT+24, PRINT+25, PRINT+32, PRINT+34, EXIT+3!
XTBGRPDA	EXIT+3!
XTBGRPHD	PRINT+20*, PRINT+21, PRINT+23, PRINT+24, PRINT+25, PRINT+34, EXIT+4!
XTBINSDT	PRINT+16, PRINT+17, PRINT+18, PRINT+19, PRINT+26*, PRINT+30, EXIT+3!
XTBLINE	PRINT+2!*, EXIT+3!, HDR+6
XTBNMSP	SORT+3, SORT+5, PRINT+4, PRINT+7, PRINT+9, PRINT+10, PRINT+12, PRINT+22, PRINT+32, EXIT+2! , EXIT+3!, PAUSE+2
XTBOLDNM	PRINT+4, PRINT+22, PRINT+23, PRINT+24, PRINT+32, EXIT+3!
XTBOLGRP	PRINT+4, PRINT+21, PRINT+23, PRINT+24, PRINT+25, PRINT+32, PRINT+34, EXIT+5!
XTBOUT	PRINT+5, PRINT+7, PRINT+9, PRINT+10, PRINT+23, PRINT+25, PRINT+33, PRINT+35, EXIT+5!, PAUSE+1! , PAUSE+2*
XTBPGF	EN+10*, PRINT+23, PRINT+24, EXIT+5!
XTBPRIOR	SORT+4, SORT+5, PRINT+13, PRINT+29*, PRINT+30, EXIT+5!
XTBPTNAM	SORT+3, SORT+5, PRINT+4, PRINT+9, PRINT+10, PRINT+12, PRINT+30, EXIT+3!, PAUSE+2
XTBPTYPE	PRINT+15*, PRINT+16, PRINT+17, EXIT+3!
XTBRCVDT	PRINT+14*, EXIT+4!
XTBRELDT	SORT+4, SORT+5, PRINT+13, PRINT+28*, PRINT+30, EXIT+5!
XTBTLATE	PRINT+4, PRINT+31, PRINT+38, PRINT+40, PRINT+41, EXIT+4!
XTBTPTCH	PRINT+4, PRINT+11, PRINT+37, PRINT+39, PRINT+40, PRINT+41, EXIT+4!
Y	EN+4, EN+5, EN+6, EN+7, DATE+1, DATE+2, PRINT+1, PRINT+26, PRINT+27, PRINT+28 , EXIT+4!
ZTDESC	DEV+1*, EXIT+4!
ZTIO	DEV+1*, EXIT+4!
ZTRTN	DEV+1*, EXIT+4!
ZTSAVE	EXIT+4!
ZTSAVE("TMP*"	DEV+1*
ZTSAVE("XTB*"	DEV+1*
ZTSK	DEV+2, EXIT+5!

Customize PDF page

Package: Toolkit

Routine: XTPMSTAT

Information

Source Information

Call Graph

Call Graph Total: 8

Entry Points

External References

Interaction Calls

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Local Variables

Legend:

Name	Comments	DBIA/ICR reference
SORT
EN
HDR
DEV
PRINT	; read and print sorted groups
PAUSE
EXIT
DATE