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

Package: Toolkit

Routine: XTPMSTAT


Information

XTPMSTAT ;OAK/BP - PRINT PATCH STATISTICS BY REPORT GROUP; 2/7/06

Source Information

Source file <XTPMSTAT.m>

Entry Points

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

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

FileMan Files Accessed Via FileMan Db Call

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