Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Caller Graph |  Entry Points |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All
Print Page as PDF
Routine: PRCHRPTA

Package: IFCAP

Routine: PRCHRPTA


Information

PRCHRPTA ;WISC/TKW-PUBLIC LAW 100-322 REPORT--CONTINUED ;4/13/93 11:15

Source Information

Source file <PRCHRPTA.m>

Caller Graph

Legends:

Legend of Colors

Package Component Superscript legend

action A extended action Ea event driver Ed subscriber Su protocol O limited protocol LP run routine RR broker B edit E server Se print P screenman SM inquire I

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
IFCAP 1 PRCHRPT9  

Entry Points

Name Comments DBIA/ICR reference
V ;;5.1;IFCAP;*89*;Oct 20, 2000
EN
RD1 ;PRINT DETAILED REPORT
RD2
RD3
PRT
HDR
EN2 ;PRINT SUMMARY TOTALS
RDS
PRT2
GT ;PRINT GROUP SUB-TOTALS
GT1
ACM
T
HDR2
NONE ; perform this if no records were gathered
Q

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: $C(13)
  • Line Location: EN+0
Function Call: WRITE
  • Prompt: PRCHDESC,?32,$J($P(X,U,12),5),?39,PRCHFSC,?46,$S($P(X,U,2)'=0:$P(X,U,2),1:"-"),?61,$J($FN($P(X,U,4),","),7),?73,$S(PRCHV'=0:PRCHV,1:"-")
  • Line Location: PRT+0
Function Call: WRITE
  • Prompt: ?77,$J($P(X,U,6),11,2),?90,$J($P(X,U,10),9,2),?101,$J($P(X,U,11),9,2),?112,$J(AVRG,9,2),!
  • Line Location: PRT+1
Function Call: WRITE
  • Prompt: @IOF,?55,"P.L. 100-322 Local Procurement",!,?56,"Aggregated Item Detail Report",!,?108,$P(PRCHPDAT,"@"),?122,"PAGE ",PRCHPAGE,!
  • Line Location: HDR+0
Function Call: WRITE
  • Prompt: I_" "
  • Line Location: HDR+1
Function Call: WRITE
  • Prompt: " Non-Expendable Purchases NOT Included",!
  • Line Location: HDR+2
Function Call: WRITE
  • Prompt: ?33,"ITEM",?63,"TOTAL",?82,"TOTAL",?96,"LOW",?106,"HIGH",?115,"AVERAGE",!
  • Line Location: HDR+3
Function Call: WRITE
  • Prompt: "DESCRIPTION",?32,"NUMBER",?40,"FSC",?48,"N.I.I.N",?62,"QUANTITY",?72,"UNIT",?81,"DOLLARS",?95,"COST",?106,"COST",?116,"COST",!
  • Line Location: HDR+4
Function Call: WRITE
  • Prompt: "-"
  • Line Location: HDR+5
Function Call: WRITE
  • Prompt: !!
  • Line Location: HDR+6
Function Call: WRITE
  • Prompt: PRCHFSC_" "_$P(^TMP($J,"FSC",PRCHFSC),U,1)
  • Line Location: RDS+0
Function Call: WRITE
  • Prompt: ?41,$J(PRCHTOT,11,2)
  • Line Location: PRT2+1
Function Call: WRITE
  • Prompt: ?60,$J($P(X,U,3),11,2),?79,$J((($P(X,U,3)/PRCHTOT)*100),6,2),?91,$J($P(X,U,4),11,2),?110,$J((($P(X,U,4)/PRCHTOT)*100),6,2),?122,$J($P(X,U,5),11,2),?141,$J((($P(X,U,5)/PRCHTOT)*100),6,2)
  • Line Location: PRT2+1
Function Call: WRITE
  • Prompt: !
  • Line Location: PRT2+2
Function Call: WRITE
  • Prompt: ?2,"SUB-TOTAL"
  • Line Location: GT+2
Function Call: WRITE
  • Prompt: !,?2,"FSC GROUP: "_$S($D(^TMP($J,"FSCG",PRCHFSCG)):^(PRCHFSCG),1:"**INVALID**"),!
  • Line Location: GT1+1
Function Call: WRITE
  • Prompt: ?41,I,?60,I,?79,$E(I,1,6),?91,I,?110,$E(I,1,6),?122,I,?141,$E(I,1,6),!
  • Line Location: T+0
Function Call: WRITE
  • Prompt: ?1,"* TOTAL *"
  • Line Location: T+1
Function Call: WRITE
  • Prompt: @IOF,?55,"P.L. 100-322 SUMMARY TOTALS REPORT",?108,$P(PRCHPDAT,"@"),?122,"PAGE ",PRCHPAGE,!
  • Line Location: HDR2+0
Function Call: WRITE
  • Prompt: I_" "
  • Line Location: HDR2+1
Function Call: WRITE
  • Prompt: " Non-Expendable Purchases NOT Included",!!
  • Line Location: HDR2+2
Function Call: WRITE
  • Prompt: ?63,"ALL OPEN",?81,"% OF",?94,"OPEN MKT",?112,"% OF",?123,"OPEN MARKET",?143,"% OF",!
  • Line Location: HDR2+3
Function Call: WRITE
  • Prompt: "FSC",?47,"TOTAL",?65,"MARKET",?80,"TOTAL",?93,"EMERGENCY",?111,"TOTAL",?120,"LESS EMERGENCY",?142,"TOTAL",!
  • Line Location: HDR2+4
Function Call: WRITE
  • Prompt: "-"
  • Line Location: HDR2+5
Function Call: WRITE
  • Prompt: !!
  • Line Location: HDR2+6
Function Call: WRITE
  • Prompt: !,"No records matched the selected criteria.",!
  • Line Location: NONE+2
Function Call: WRITE
  • Prompt: ?77,"___________",!," * TOTAL *",?80,PRCHTOTD
  • Line Location: Q+0

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^TMP($J RD1+1, RD2, RD3, RD3+1, HDR+1, RDS, GT1+1, HDR2+1

Label References

Name Line Occurrences
ACM RDS
GT RDS, RDS+1
GT1 GT+1
HDR RD1+1, PRT, NONE+1, Q
HDR2 EN2+1, GT+1
PRT RD3+1
PRT2 RDS, GT+2, T+1
Q RD1+1
RD1 EN
RD2 RD1+1
RD3 RD2
RDS EN2+1
T RDS+1

Naked Globals

Name Field # of Occurrence
^( RD3+1, GT1+1

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> AVRG RD3+1*, PRT+1
>> I HDR+1*, HDR+5*, ACM*, T*, HDR2+1*
IOF HDR, HDR2
IOM HDR+5, HDR2+5
>> J RD1+1*, HDR2+5*
>> L RD3*, RD3+1
>> PRC("SITE" HDR+1, HDR2+1
>> PRCHDESC RD2*, RD3, RD3+1, PRT
>> PRCHDY RD1+1*, PRT, PRT+2*, HDR+6*, PRT2+2*, GT+1, GT1+1*, T+1*, HDR2+6*, Q*
>> PRCHFSC RD1+1*, RD2, RD3, RD3+1, PRT, RDS*, GT1
>> PRCHFSCG RDS*, RDS+1*, GT+1, GT+2, GT1*, GT1+1
>> PRCHFT HDR+1, HDR2+1
>> PRCHGT RDS*, GT+2, GT1*, ACM*
>> PRCHPAGE HDR*, HDR2*
>> PRCHPDAT HDR, HDR2
>> PRCHSITE HDR+1, HDR2+1
>> PRCHSRC RD3*, RD3+1*
>> PRCHT RDS*, ACM*, T+1
>> PRCHTOT EN*, PRT+2*, PRT2*, PRT2+1
>> PRCHTOTD EN*, RD3+1*, Q
>> PRCHV RD3*, RD3+1, PRT
U RD3+1, PRT, PRT+1, PRT+2, RDS, PRT2, PRT2+1, ACM
>> X RD3+1*, PRT, PRT+1, PRT+2, RDS*, PRT2, PRT2+1, GT+2*, ACM, T+1*
Info |  Source |  Caller Graph |  Entry Points |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All