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

Package: IFCAP

Routine: PRCPRAL1


Information

PRCPRAL1 ;WISC/RFJ/DST-automatic level setter (print report) ;28 Dec 93

Source Information

Source file <PRCPRAL1.m>

Entry Points

Name Comments DBIA/ICR reference
PRINT ; print report
H

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !?10,"<<< TASKMANAGER JOB TERMINATED BY USER >>>"
  • Line Location: PRINT+26
Function Call: WRITE
  • Prompt: !!?5,"GROUP: ",$S(GROUP=" ":"<<NONE>>",1:GROUP)
  • Line Location: PRINT+28
Function Call: WRITE
  • Prompt: !!,NSN,?18,$E(DESCR,1,18)
  • Line Location: PRINT+33
Function Call: WRITE
  • Prompt: !!,$E(DESCR,1,18),?25,$S(ODI="Y":"D",1:"")
  • Line Location: PRINT+38
Function Call: WRITE
  • Prompt: ?38,ITEMDA,?45,"OLD",$J(+$P(ITEMDATA,"^",9),8),$J(+$P(ITEMDATA,"^",11),8),$J(+$P(ITEMDATA,"^",10),8),$J(+$P(ITEMDATA,"^",4),8)
  • Line Location: PRINT+40
Function Call: WRITE
  • Prompt: !?3,"AVG USAGE: ",$J(AVERAGE,0,4)
  • Line Location: PRINT+42
Function Call: WRITE
  • Prompt: ?22,$J($S('$G(PRCPFSET):"ESTIMATED VALUES",AVERAGE'>.06:"LOW USAGE (NOT UPDATED)",$G(PRCPFNOT):"UNABLE TO UPDATE (LOCKED)",1:"NEW VALUES"),26),?48
  • Line Location: PRINT+43
Function Call: WRITE
  • Prompt: $J(PRCPNNSL,8)
  • Line Location: PRINT+45
Function Call: WRITE
  • Prompt: $J(PRCPNESL,8)
  • Line Location: PRINT+47
Function Call: WRITE
  • Prompt: $J(PRCPNSRP,8)
  • Line Location: PRINT+49
Function Call: WRITE
  • Prompt: $J(PRCPNORP,8)
  • Line Location: PRINT+51
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: H+0
Function Call: WRITE
  • Prompt: $C(13),"AUTOMATIC LEVEL SETTER FOR: ",$E(PRCP("IN"),1,20),?(80-$L(%)),%
  • Line Location: H+1
Function Call: WRITE
  • Prompt: !?5,$S(ODIS=2:"ON-DEMAND ITEMS ONLY",ODIS=3:"ALL ITEMS (STANDARD AND ON-DEMAND)",1:"STANDARD ITEMS ONLY")
  • Line Location: H+2
Function Call: WRITE
  • Prompt: !?5,"AVG USAGE START DATE: ",PRCPSTDD," (",PRCPTDAY," TOTAL DAYS)"
  • Line Location: H+3
Function Call: WRITE
  • Prompt: !?5,"DAYS/PERCENTAGE USED FOR CALCULATION:",?48,$J(PRCPDNSL,8),$J(PRCPPESL_"%",8),$J(PRCPPSRP_"%",8),$J(PRCPPORP_"%",8)
  • Line Location: H+4
Function Call: WRITE
  • Prompt: !?48,$J("NORMAL",8),$J("EMERG",8),$J("STAND",8),$J("OPTION",8),!
  • Line Location: H+6
Function Call: WRITE
  • Prompt: "NSN",?18,"DESCRIPTION"
  • Line Location: H+7
Function Call: WRITE
  • Prompt: "DESCRIPTION",?25,"OD"
  • Line Location: H+8
Function Call: WRITE
  • Prompt: ?38,"IM#",?48,$J("STKLVL",8),$J("STKLVL",8),$J("REO PT",8),$J("REO PT",8),!,%
  • Line Location: H+9
Info |  Source |  Entry Points |  Interaction Calls