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 |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All
Print Page as PDF
Routine: PRCHFPT1

Package: IFCAP

Routine: PRCHFPT1


Information

PRCHFPT1 ;WISC/RSD/RHD-CONT. OF PRINT ;5/1/98 15:59

Source Information

Source file <PRCHFPT1.m>

Call Graph

Call Graph

Call Graph Total: 4

Package Total Call Graph
IFCAP 3 ^PRCHFPT2  RR^PRCHFPT4  DIWP^PRCUTL  
VA FileMan 1 %XY^%RCR  

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 PRCHFPT0  

Entry Points

Name Comments DBIA/ICR reference
CNTI
CNTD
REQ
BOCLN
P
P1
DT
TY
INV ;

External References

Name Field # of Occurrence
%XY^%RCR PRCHFPT1+14, CNTD+4
^PRCHFPT2 BOCLN+5
RR^PRCHFPT4 PRCHFPT1+12
DIWP^PRCUTL PRCHFPT1+13, CNTD+3

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"Prosthetics Delivery information:"
  • Line Location: PRCHFPT1+7
Function Call: WRITE
  • Prompt: !,?7,"Delivery To: ",$P(RMPRR3,U)
  • Line Location: PRCHFPT1+8
Function Call: WRITE
  • Prompt: !,?9,"Attention: ",$P(RMPRR3,U,4)
  • Line Location: PRCHFPT1+9
Function Call: WRITE
  • Prompt: ?96
  • Line Location: PRCHFPT1+10
Function Call: WRITE
  • Prompt: @IOBS
  • Line Location: PRCHFPT1+10
Function Call: WRITE
  • Prompt: PRCHULN
  • Line Location: PRCHFPT1+11
Function Call: WRITE
  • Prompt: !,"FOB POINT: ",$S("O"=$E($P(PRCH1,U,6)):"ORIGIN","D"=$E($P(PRCH1,U,6)):"DESTINATION",1:""),?34,"|","PROPOSAL: "
  • Line Location: PRCHFPT1+13
Function Call: WRITE
  • Prompt: ?45,$G(^TMP($J,"W",1,1,0)),?64,"|",PRCHINV(1),!,"GOV'T BL #: ",$P(PRCH12,U,7),?34,"|",?45,$G(^TMP($J,"W",1,2,0)),?64,"|",PRCHINV(2)
  • Line Location: PRCHFPT1+15
Function Call: WRITE
  • Prompt: !,$P(PRCH1,U,14)
  • Line Location: PRCHFPT1+16
Function Call: WRITE
  • Prompt: X,?34,"|",?45,$G(^TMP($J,"W",1,3,0)),?64,"|",PRCHINV(3)
  • Line Location: PRCHFPT1+16
Function Call: WRITE
  • Prompt: !,"DELIVER ON/BEFORE "
  • Line Location: PRCHFPT1+17
Function Call: WRITE
  • Prompt: ?34,"|","CONTRACT: "
  • Line Location: PRCHFPT1+17
Function Call: WRITE
  • Prompt: ?64,"|",PRCHINV(4),!
  • Line Location: PRCHFPT1+18
Function Call: WRITE
  • Prompt: $P(^(PRCH,0),U,4),$P(^(0),U,1)
  • Line Location: PRCHFPT1+19
Function Call: WRITE
  • Prompt: "%"
  • Condition for execution: $P(^(0),U,1)=+$P(^(0),U,1)
  • Line Location: PRCHFPT1+19
Function Call: WRITE
  • Prompt: $P(^(0),U,2)," "
  • Line Location: PRCHFPT1+19
Function Call: WRITE
  • Prompt: "SHIP VIA: ",$P(PRCH12,U,8)
  • Condition for execution: I=2
  • Line Location: PRCHFPT1+21
Function Call: WRITE
  • Prompt: ?34,"|"
  • Line Location: PRCHFPT1+21
Function Call: WRITE
  • Prompt: ?45,PRCH
  • Condition for execution: $G(Y)'="" ?42,$S($D(^(Y)):$J(^(Y),3),1:"") W:PRCH'=""
  • Line Location: PRCHFPT1+21
Function Call: WRITE
  • Prompt: ?64,"|"
  • Line Location: PRCHFPT1+21
Function Call: WRITE
  • Prompt: !
  • Line Location: PRCHFPT1+22
Function Call: WRITE
  • Prompt: $E(PRCHULN,1,34),"|",$E(PRCHULN,1,29),"|",$E(PRCHULN,1,31)
  • Line Location: PRCHFPT1+23
Function Call: WRITE
  • Prompt: ?69,"TOTAL"
  • Line Location: PRCHFPT1+24
Function Call: WRITE
  • Prompt: ?80,"QTY",?90,"AMT"
  • Condition for execution: PRCHDES="R"
  • Line Location: PRCHFPT1+24
Function Call: WRITE
  • Prompt: ?69,"COST"
  • Line Location: PRCHFPT1+25
Function Call: WRITE
  • Prompt: ?80,"REC",?90,"REC"
  • Condition for execution: PRCHDES="R"
  • Line Location: PRCHFPT1+26
Function Call: WRITE
  • Prompt: ?96
  • Line Location: PRCHFPT1+26
Function Call: WRITE
  • Prompt: @IOBS
  • Line Location: PRCHFPT1+26
Function Call: WRITE
  • Prompt: PRCHULN
  • Line Location: PRCHFPT1+27
Function Call: WRITE
  • Prompt: Y\100#100,"/",Y#100\1,"/",Y\10000+1700
  • Line Location: DT+0

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DIC(5 - [#5] INV+12
^PRC(440.5 - [#440.5] INV+5
^PRC(442 - [#442] PRCHFPT1+3, PRCHFPT1+4, PRCHFPT1+12, PRCHFPT1+19, PRCHFPT1+21, CNTICNTI+1, CNTDCNTD+2, CNTD+3
REQBOCLNBOCLN+1, INV+1, INV+4
^PRCD(420.8 - [#420.8] TY
^RMPR(664 - [#664] PRCHFPT1+5, PRCHFPT1+6
^TMP($J PRCHFPT1+14!, PRCHFPT1+15, PRCHFPT1+16, PRCHFPT1+27!, CNTI+2*, CNTD*, CNTD+1*, CNTD+2*, CNTD+4!, CNTD+5*
, REQ*
^UTILITY($J PRCHFPT1+13!, CNTD+3!, CNTD+5
^VA(200 - [#200] INV+6

Label References

Name Line Occurrences
CNTD CNTI
CNTI CNTI+3
DT PRCHFPT1+17
INV PRCHFPT1+13
P CNTI+2, CNTD+2, CNTD+5
P1 CNTDCNTD+1, REQ
REQ CNTD+3
TY PRCHFPT1+16

Naked Globals

Name Field # of Occurrence
^( PRCHFPT1+19, PRCHFPT1+21, CNTICNTD+2, CNTD+3, BOCLN+1
^(0 PRCHFPT1+12, PRCHFPT1+19, CNTI
^(2 CNTI+1

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> %X PRCHFPT1+14*, CNTD+4*
>> %Y PRCHFPT1+14*, CNTD+4*
>> BCT BOCLN+1*
>> BOCPG BOCLN+4*
>> CHGSHP BOCLN*, BOCLN+2
>> COUNT BOCLN+1*
>> D0 PRCHFPT1+3, PRCHFPT1+4, PRCHFPT1+12, PRCHFPT1+19, PRCHFPT1+21, CNTICNTI+1, CNTDCNTD+2, CNTD+3
REQBOCLNBOCLN+1, INV+1, INV+4
>> DA PRCHFPT1+13, CNTD+3
>> DIWF PRCHFPT1+13*, CNTD+3*
>> DIWL PRCHFPT1+13*, CNTD+3*, CNTD+5
>> DIWR PRCHFPT1+13*, CNTD+3*
>> I PRCHFPT1+10*, PRCHFPT1+19*, PRCHFPT1+21*, PRCHFPT1+22, PRCHFPT1+26*, REQ*
>> IOBS PRCHFPT1+10, PRCHFPT1+26
>> J CNTD*, CNTD+2*, REQ*
>> LITEM CNTI*
>> N BOCLN+1*, BOCLN+2*, BOCLN+3*, BOCLN+4
>> P PRCHFPT1+27*, CNTI+1, CNTI+2, CNTDCNTD+1, CNTD+2, CNTD+5, REQBOCLN+4*, P*
, P1*
PRCA INV+2~, INV+4*, INV+5, INV+7*, INV+9
PRCB INV+2~, INV+5*, INV+6, INV+7
PRCC INV+2~, INV+6*, INV+8
>> PRCH PRCHFPT1+19*, PRCHFPT1+20*, PRCHFPT1+21*, PRCHFPT1+27*, CNTI*, CNTI+1, CNTI+2, CNTD*, CNTD+2*, CNTD+3*
, REQ*
>> PRCH0 PRCHFPT1+17, CNTD+1
>> PRCH1 PRCHFPT1+13, PRCHFPT1+16, TY
>> PRCH12 PRCHFPT1+15, PRCHFPT1+21
>> PRCHDES PRCHFPT1+12, PRCHFPT1+24, PRCHFPT1+26, CNTD+1
>> PRCHDTA CNTD+1*
>> PRCHFPT PRCHFPT1+12, CNTD+1
PRCHHSP PRCHFPT1+27!
PRCHINV PRCHFPT1+27!, INV+10, INV+11, INV+12
PRCHINV( PRCHFPT1+22, INV+11*, INV+12*
PRCHINV(1 PRCHFPT1+15, INV+3*, INV+7*, INV+10*
PRCHINV(2 PRCHFPT1+15, INV+3*, INV+8*, INV+10*
PRCHINV(3 PRCHFPT1+16, INV+3*, INV+8*, INV+10*
PRCHINV(4 PRCHFPT1+18, INV+3*, INV+9*
>> PRCHJ CNTD+2*, CNTD+3*
>> PRCHL PRCHFPT1+27*, CNTI+2*, CNTD*, CNTD+1*, CNTD+2*, CNTD+5*, REQ*, BOCLN+4*, P*, P1*
>> PRCHL1 CNTI*, CNTI+1*, CNTI+2, CNTD+2*, CNTD+5*
>> PRCHLB CNTI*, CNTI+2, CNTD*, CNTD+2*, CNTD+5*, REQ*, P1*
>> PRCHLE CNTD*, REQ*, P1
PRCHSHP PRCHFPT1+27!
PRCHST PRCHFPT1+27!
>> PRCHTYPE PRCHFPT1+24, PRCHFPT1+25
>> PRCHULN PRCHFPT1+11, PRCHFPT1+23, PRCHFPT1+27
RMPR664 PRCHFPT1+3!, PRCHFPT1+5*, PRCHFPT1+6
RMPRPO PRCHFPT1+3!, PRCHFPT1+4*, PRCHFPT1+5
RMPRR3 PRCHFPT1+3!, PRCHFPT1+6*, PRCHFPT1+8, PRCHFPT1+9
S PRCHFPT1+27!
U PRCHFPT1+3, PRCHFPT1+4, PRCHFPT1+6, PRCHFPT1+8, PRCHFPT1+9, PRCHFPT1+12, PRCHFPT1+13, PRCHFPT1+15, PRCHFPT1+16, PRCHFPT1+17
PRCHFPT1+19, PRCHFPT1+21, CNTICNTI+1, CNTI+2, CNTDCNTD+1, CNTD+2, CNTD+5, REQ
BOCLNBOCLN+1, TYINV+1, INV+4, INV+6, INV+7, INV+10, INV+11, INV+12
V PRCHFPT1+27!
>> X PRCHFPT1+12*, PRCHFPT1+13*, PRCHFPT1+16, CNTD+3*, TY*, INV+10*, INV+11*, INV+12
Y PRCHFPT1+12*, PRCHFPT1+13, PRCHFPT1+17*, PRCHFPT1+20!, PRCHFPT1+21*, PRCHFPT1+22!, DT
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All