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
Print Page as PDF
Routine: XTPMSTA2

Package: Toolkit

Routine: XTPMSTA2


Information

XTPMSTA2 ;OAK/BP - PRINT PATCH STATISTICS BY COMPLIANCE DATE; ; 3/15/11 7:23am

Source Information

Source file <XTPMSTA2.m>

Entry Points

Name Comments DBIA/ICR reference
EN
DATE
DEV
SORT
PRINT ;
EXIT
HDR
PAUSE

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: @IOF,"Patch Monitor Statistics By Compliance Date",!!!
  • Line Location: EN+0
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: !!,"Do you want to see the patch data"
  • Line Location: DATE+4
Function Call: WRITE
  • Prompt: !!
  • Line Location: DEV+0
Function Call: WRITE
  • Prompt: !,"Queued as task #",ZTSK
  • Line Location: DEV+2
Function Call: WRITE
  • Prompt: XTBCPLDX,?14,XTBPTNAM,?27,XTBRELDT,?41,XTBINSDT,?55,XTBPRIOR
  • Line Location: PRINT+20
Function Call: WRITE
  • Prompt: ?67,$J(XTBDAYLT,3,0)_$S(XTBDAYLT>1:" days",1:" day")
  • Line Location: PRINT+21
Function Call: WRITE
  • Prompt: !
  • Line Location: PRINT+23
Function Call: WRITE
  • Prompt: !!?6,"Totals patches received for date range: ",XTBTPTCH,!
  • Line Location: PRINT+27
Function Call: WRITE
  • Prompt: "Total patches installed past compliance date: ",XTBTLATE,!!
  • Line Location: PRINT+28
Function Call: WRITE
  • Prompt: ?25,"Delinquent patch % : ",$S(XTBDIVOK=1:$J((XTBTLATE/XTBTPTCH*100),6,2),1:100)_" %",!
  • Line Location: PRINT+30
Function Call: WRITE
  • Prompt: ?25," Compliance % : ",$S(XTBDIVOK=1:$J(100-(XTBTLATE/XTBTPTCH*100),6,2),1:100)," %",!
  • Line Location: PRINT+31
Function Call: WRITE
  • Prompt: !!,"Press ENTER to end "
  • Line Location: PRINT+32
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,!,?31,"By Compliance Date",!
  • 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
Info |  Source |  Entry Points |  Interaction Calls