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

Package: IFCAP

Routine: PRCHQRP4


Information

PRCHQRP4 ;WISC/KMB-DISPLAY ABS/AGGREGATE QUOTE ;8/6/96 21:05

Source Information

Source file <PRCHQRP4.m>

Call Graph

Call Graph

Call Graph Total: 6

Package Total Call Graph
Kernel 3 ^%ZIS  ^%ZISC  ^%ZTLOAD  
VA FileMan 2 DD^%DT  ^DIC  
IFCAP 1 RFQLOAD^PRCHQRP3  

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

Package Total Caller Graph
IFCAP 2 PRCHQRP3  PRCHQRP4  

Entry Points

Name Comments DBIA/ICR reference
START ;Entry point for aggregate report
PROCESS ;
WRITE ;
HDR ;
DETAIL ;
VENDOR ; determine 864 messages for each vendor
LEGEND ;Print Flags Legend at end of last page.

External References

Name Field # of Occurrence
DD^%DT PROCESS+6
^%ZIS START+5
^%ZISC START+6, START+7
^%ZTLOAD START+6
^DIC START+2
RFQLOAD^PRCHQRP3 PROCESS+7

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: START+1
Function Call: WRITE
  • Prompt: !
  • Line Location: START+5
Function Call: WRITE
  • Prompt: !,"No dollar totals were entered for vendor quotes",!
  • Line Location: WRITE+2
Function Call: WRITE
  • Prompt: !,$P(STRING(Q,J,K),"^"),?20,$P(STRING(Q,J,K),"^",2),?25,$J($FN($P(STRING(Q,J,K),"^",3),"",2),10)
  • Line Location: WRITE+10
Function Call: WRITE
  • Prompt: ?40,$P(STRING(Q,J,K),"^",4),?47,$P(STRING(Q,J,K),"^",5),?56,$P(STRING(Q,J,K),"^",6)
  • Line Location: WRITE+11
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: WRITE+12
Function Call: READ
  • Formatting: !
  • Prompt: "Enter RETURN to continue or '^' to exit: "
  • Variable: Z1
  • Timeout: DTIME
  • Line Location: HDR+1
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: HDR+2
Function Call: WRITE
  • Prompt: !,"RFQ #",ZIP1,?70,"Page ",P,!,"Quotations Due Date: ",ZIP2,!,"Number of Quotes: ",ZIP3,!,"Number of Items on RFQ: ",ZIP4,!,"Point of Contact: ",ZIP5,!
  • Line Location: HDR+3
Function Call: WRITE
  • Prompt: !,?20,"#Items",?30,"Total",?47,"Total"
  • Line Location: HDR+4
Function Call: WRITE
  • Prompt: !,"Vendor",?20,"Quoted",?30,"Price",?40,"FOB",?47,"#Msgs.",?56,"Flags",!
  • Line Location: HDR+5
Function Call: WRITE
  • Prompt: "----------"
  • Line Location: HDR+6
Function Call: WRITE
  • Prompt: !!,?5,"Flags Legend:"
  • Line Location: LEGEND+1
Function Call: WRITE
  • Prompt: !,"F=FOB is Different from That Requested"
  • Line Location: LEGEND+2
Function Call: WRITE
  • Prompt: !,"Q=Quantity Quoted is Different from RFQ"
  • Line Location: LEGEND+3
Function Call: WRITE
  • Prompt: !,"U=Unit of Purchase is Different from RFQ"
  • Line Location: LEGEND+4
Function Call: WRITE
  • Prompt: !,"DT=Quote Received at Station after Date/Time Set for Receipt of Quotes"
  • Line Location: LEGEND+5
Function Call: WRITE
  • Prompt: !,"S=RFQ Set-Aside for Small Business But Size Status of Vendor is Large or Missing"
  • Line Location: LEGEND+6
Function Call: WRITE
  • Prompt: !,"LI=Number of Line Items Quoted Differs from Number of RFQ Line Items"
  • Line Location: LEGEND+7
Function Call: WRITE
  • Prompt: !,"C=Vendor Indicates Item(s) on Contract"
  • Line Location: LEGEND+8
Function Call: WRITE
  • Prompt: !,"M=Quoted Mfg. Part Number is Different from that Requested"
  • Line Location: LEGEND+9
Function Call: WRITE
  • Prompt: !,"V=Vendor has Quoted a Vendor Product Number"
  • Line Location: LEGEND+10
Function Call: WRITE
  • Prompt: !,"NSN=National Stock Number Quoted is Different from that Requested"
  • Line Location: LEGEND+11
Function Call: WRITE
  • Prompt: !,"NDC=National Drug Code is Different from that Requested"
  • Line Location: LEGEND+12
Routine Call
  • DIC
  • Line Location:
    • START+2
Routine Call
  • %ZIS
  • Line Location:
    • START+5

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^PRC(444 - [#444] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^PRC(440 - [#440] DETAIL+11, DETAIL+19
^PRC(444 - [#444] PROCESS+3, PROCESS+4, PROCESS+5, DETAIL+2, DETAIL+3, DETAIL+4, DETAIL+6, DETAIL+7, DETAIL+9, DETAIL+13
DETAIL+17, DETAIL+21, DETAIL+22, DETAIL+24, DETAIL+25, DETAIL+31, VENDOR+2, VENDOR+3
^PRC(444.1 - [#444.1] DETAIL+11, DETAIL+20
^PRCD(420.5 - [#420.5] DETAIL+28
^TMP($J PROCESS+2!, PROCESS+8!, DETAIL+16, DETAIL+17, DETAIL+18, DETAIL+21, DETAIL+27, DETAIL+29, DETAIL+30, DETAIL+33
DETAIL+34
^VA(200 - [#200] PROCESS+4

Label References

Name Line Occurrences
DETAIL PROCESS+7
HDR WRITE+1, WRITE+9
LEGEND WRITE+13
PROCESS START+7
START START+6, START+7
VENDOR PROCESS+7
WRITE PROCESS+7

Naked Globals

Name Field # of Occurrence
^(0 PROCESS+3
^(8 PROCESS+3

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> %ZIS START+5*
DIC START+1*, START+2!
DIC("S" START+1*
DIC(0 START+2*
DTIME WRITE+12, WRITE+14, HDR+1
DTOUT START+2!
DUOUT START+2!
FILE PROCESS+1~, DETAIL+10*, DETAIL+11, DETAIL+19, DETAIL+20
FLAG PROCESS+2~, DETAIL+35*, DETAIL+36*, DETAIL+37
FOB PROCESS+1~, DETAIL+4*, DETAIL+8*, DETAIL+14, DETAIL+16
I PROCESS+1~, HDR+6*, DETAIL+1*, DETAIL+2*, DETAIL+3, DETAIL+4, DETAIL+6, DETAIL+7, DETAIL+9, DETAIL+13
DETAIL+14, DETAIL+17, DETAIL+21, DETAIL+22, DETAIL+24, DETAIL+25, DETAIL+31, DETAIL+37
ID PROCESS+1~, VENDOR+3*, VENDOR+4
IO WRITE+1
>> IO("Q" START+6
IOF START+1, WRITE+12, HDR+2
IOSL WRITE+9, WRITE+12
IOST WRITE+12, WRITE+14, HDR+1
ITEMNO PROCESS+1~, DETAIL+13*, DETAIL+14
J PROCESS+1~, WRITE+5*, WRITE+6*, WRITE+8, WRITE+10, WRITE+11, DETAIL+5*, DETAIL+6*, DETAIL+7, DETAIL+23*
DETAIL+24*, DETAIL+25, DETAIL+31, DETAIL+36*, VENDOR+1*, VENDOR+2*, VENDOR+3
K PROCESS+1~, WRITE+7*, WRITE+8*, WRITE+10, WRITE+11, DETAIL+7*, DETAIL+8, DETAIL+28*, DETAIL+29
L PROCESS+1~, DETAIL+26*, DETAIL+27, DETAIL+29, DETAIL+30, DETAIL+33, DETAIL+34
P PROCESS+1~, WRITE+1*, HDR+1, HDR+3, HDR+7*
>> POP START+5
PRCDA START+2!, START+3*, START+5!, START+7!, PROCESS+3, PROCESS+4, PROCESS+5, PROCESS+8!, DETAIL+2, DETAIL+3
DETAIL+4, DETAIL+6, DETAIL+7, DETAIL+9, DETAIL+13, DETAIL+17, DETAIL+21, DETAIL+22, DETAIL+24, DETAIL+25
DETAIL+31, VENDOR+2, VENDOR+3
PRCFLG PROCESS+2~, DETAIL+15!
PRCFLG( DETAIL+36
PRCFLG("CONTRACT" DETAIL+22*, DETAIL+31*
PRCFLG("FOB" DETAIL+16*
PRCFLG("MFG P ART" , DETAIL+30*
PRCFLG("NBR" DETAIL+21*
PRCFLG("NDC" DETAIL+33*
PRCFLG("NSN" DETAIL+34*
PRCFLG("QUANTITY" DETAIL+27*
PRCFLG("RECVD DATE" , DETAIL+17*
PRCFLG("SIZE" DETAIL+19*, DETAIL+20*
PRCFLG("UNIT" DETAIL+29*
PRCFLG("VENDO R PRODUCT #" , DETAIL+32*
Q PROCESS+1~, WRITE+3*, WRITE+4*, WRITE+6, WRITE+8, WRITE+10, WRITE+11
STRING PROCESS+1~, WRITE+2
STRING( WRITE+4, WRITE+6, WRITE+8, WRITE+10, WRITE+11, DETAIL+14*, DETAIL+37*
TOT PROCESS+1~, DETAIL+3*, DETAIL+14, DETAIL+37
U WRITE+4, WRITE+6, WRITE+8, WRITE+9, WRITE+12, WRITE+13, WRITE+14
VDUN PROCESS+1~, DETAIL+11*, DETAIL+14
VEN PROCESS+1~, DETAIL+9*, DETAIL+10
VENDOR PROCESS+2~
VENDOR( DETAIL+14, VENDOR+4*
VN PROCESS+1~, DETAIL+10*, DETAIL+11, DETAIL+19, DETAIL+20
VNAME PROCESS+1~, DETAIL+10*, DETAIL+12*, DETAIL+14, DETAIL+37
X PROCESS+2~, DETAIL+25*, DETAIL+26, DETAIL+27, DETAIL+28, DETAIL+30, DETAIL+32, DETAIL+33, DETAIL+34
Y START+2!, START+3, START+5!, START+7!, PROCESS+2~, PROCESS+6*
Z1 PROCESS+1~, WRITE+1*, WRITE+4, WRITE+6, WRITE+8, WRITE+9, WRITE+12*, WRITE+13, WRITE+14*, HDR+1*
ZIP1 PROCESS+2~, PROCESS+3*, HDR+3
ZIP2 PROCESS+2~, PROCESS+3*, PROCESS+6*, HDR+3
ZIP3 PROCESS+2~, PROCESS+3*, HDR+3
ZIP4 PROCESS+2~, PROCESS+5*, HDR+3
ZIP5 PROCESS+2~, PROCESS+4*, HDR+3
>> ZTQUEUED PROCESS+8, WRITE+12, WRITE+14, HDR+1
>> ZTREQ PROCESS+8*
>> ZTRTN START+6*
>> ZTSAVE("DUZ" START+6*
>> ZTSAVE("PRCDA" START+6*
ZTSK START+6!
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All