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

Package: IFCAP

Routine: PRCHDP2


Information

PRCHDP2 ;ID/RSD/RHD-DISPLAY P.O. ; [7/22/98 11:11am]

Source Information

Source file <PRCHDP2.m>

Call Graph

Call Graph

Call Graph Total: 10

Package Total Call Graph
IFCAP 7 ^PRCFYN  ^PRCHDP3  EN^PRCHDP4  START^PRCHDP5  AMENDS^PRCHDP6  EDISTAT^PRCHUTL  DIWP^PRCUTL  
VA FileMan 3 DD^%DT  %XY^%RCR  ^DIC  

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 PRCHDP1  

Entry Points

Name Comments DBIA/ICR reference
V ;;5.1;IFCAP;**38,131,221**;Oct 20, 2000;Build 14
COM
PT
ASK2
PT1
ASK
ASK1
HDR
ITEM
DIS
AMD
DT
ADJCHK ;Check for any Adjustment on PO. If any show the adjuster. PRC*5.1*38
Q ;W @IOF ;REMOVE IF PROBLEM WITH KERNEL V6.5
PIPECK ;check for invalid pipe '|IN ' command in item description ;PRC*5.1*221

External References

Name Field # of Occurrence
DD^%DT ADJCHK+10
%XY^%RCR V+15, COM+1, ITEM+4, AMD+6
^DIC PT1+3
^PRCFYN ASK2
^PRCHDP3 PT1+3
EN^PRCHDP4 ASK2
START^PRCHDP5 AMD+1
AMENDS^PRCHDP6 PT+1
EDISTAT^PRCHUTL ITEM+14
DIWP^PRCUTL V+13, COM, ITEM+3, AMD+5

Interaction Calls

Name Line Occurrences
Function Call: READ
  • Variable: X
  • Timeout: DTIME
  • Line Location: V+8
Function Call: WRITE
  • Prompt: !?8,"ENTER '^' TO HALT: "
  • Line Location: V+8
Function Call: WRITE
  • Prompt: !?2,$J(N,3),?7,"LESS ",$P(PRCHDI0,U,2),$S($E($P(PRCHDI0,U,2),1)="$":"",1:" %")," FOR "
  • Line Location: V+10
Function Call: WRITE
  • Prompt: !?2,$J(N+1,3),?7,"EST. SHIPPING AND/OR HANDLING",?58,$J($P(PRCHD0,U,13),7,2)
  • Line Location: V+11
Function Call: WRITE
  • Prompt: !?8,^(J,0)
  • Line Location: V+16
Function Call: WRITE
  • Prompt: !
  • Line Location: COM+2
Function Call: WRITE
  • Prompt: !?8,^(J,0)
  • Line Location: COM+2
Function Call: WRITE
  • Prompt: !?14,$P(^(0),U,1)
  • Line Location: PT+0
Function Call: WRITE
  • Prompt: !!?3,"AMENDMENT NUMBER: ",PRCHI,?40,"EFFECTIVE DATE: "
  • Line Location: PT+2
Function Call: READ
  • Variable: X
  • Timeout: DTIME
  • Line Location: ASK+0
Function Call: WRITE
  • Prompt: !!,"** An amendment updated the order during your display that affected **"
  • Line Location: ASK1+1
Function Call: WRITE
  • Prompt: !,"** the order's first page total and any items that were amended **"
  • Line Location: ASK1+2
Function Call: WRITE
  • Prompt: !,"** for price/quantity. If the accuracy of the displayed order is **"
  • Line Location: ASK1+3
Function Call: WRITE
  • Prompt: !,"** critical, you should re-display the order again with the updated **"
  • Line Location: ASK1+4
Function Call: WRITE
  • Prompt: !,"** order total and items. **"
  • Line Location: ASK1+5
Function Call: WRITE
  • Prompt: !,""
  • Line Location: ASK1+6
Function Call: READ
  • Variable: X
  • Timeout: DTIME
  • Line Location: ASK1+8
Function Call: WRITE
  • Prompt: !,$C(7)
  • Line Location: ASK1+8
Function Call: WRITE
  • Prompt: "END OF DISPLAY--PRESS RETURN OR ENTER '^' TO HALT: "
  • Line Location: ASK1+8
Function Call: WRITE
  • Prompt: @IOF,!!?55,"UNIT",?70,"TOTAL",!,"ITEM",?15,"DESCRIPTION",?42,"QTY",?46,"UNIT",?55,"COST",?70,"COST",!
  • Condition for execution: $Y>0
  • Line Location: HDR+0
Function Call: WRITE
  • Prompt: "-"
  • Line Location: HDR+0
Function Call: WRITE
  • Prompt: !
  • Line Location: ITEM+5
Function Call: WRITE
  • Prompt: ?2,$J(+$P(PRCHDI0,U,1),3)
  • Line Location: ITEM+5
Function Call: WRITE
  • Prompt: ?7,$S($D(^(1,1,0)):^(0),1:"")
  • Line Location: ITEM+6
Function Call: WRITE
  • Prompt: ?40,$J($P(PRCHDI0,U,2),5),?47,$S($D(^PRCD(420.5,+$P(PRCHDI0,U,3),0)):$P(^(0),U,1),1:"")
  • Line Location: ITEM+7
Function Call: WRITE
  • Prompt: ?52,$S($L(X)>3:$J($P(PRCHDI0,U,9),5,4),$L(X)>2:$J($P(PRCHDI0,U,9),6,3),$P(PRCHDI0,U,9)="N/C":" N/C",1:$J($P(PRCHDI0,U,9),7,2))
  • Line Location: ITEM+8
Function Call: WRITE
  • Prompt: ?67,$J($P(PRCHDI2,U,1),7,2)
  • Line Location: ITEM+9
Function Call: WRITE
  • Prompt: !?8,^(K,0)
  • Line Location: ITEM+10
Function Call: WRITE
  • Prompt: !,?8,"QTY PREV RCVD: ",$J($P(PRCHDI2,U,8),5)
  • Condition for execution: $P(PRCHDI2,U,8)]""
  • Line Location: ITEM+13
Function Call: WRITE
  • Prompt: !,?8,"PARTIAL NO.: "
  • Line Location: ITEM+13
Function Call: WRITE
  • Prompt: ","
  • Condition for execution: K>1
  • Line Location: ITEM+13
Function Call: WRITE
  • Prompt: X
  • Line Location: ITEM+13
Function Call: WRITE
  • Prompt: ?8,"Items per ",$S($D(^PRCD(420.5,+$P(PRCHDI0,U,3),0)):$P(^(0),U,1),1:""),": ",$P(PRCHDI0,U,12),!
  • Line Location: ITEM+15
Function Call: WRITE
  • Prompt: ?8,"BOC: ",$P($P(PRCHDI0,U,4)," ",1)
  • Line Location: ITEM+18
Function Call: WRITE
  • Prompt: ?22,"FMS LINE: ",FMSLN
  • Line Location: ITEM+19
Function Call: WRITE
  • Prompt: !
  • Line Location: ITEM+21
Function Call: WRITE
  • Prompt: $S($P(PRCHDI0,U,1)="Q":"QUANTITY DISCOUNT",1:"ITEMS: "_$P(PRCHDI0,U,1)),?57,$J($P(PRCHDI0,U,3),8,2),!
  • Line Location: DIS+0
Function Call: WRITE
  • Prompt: !?8,^(J,0)
  • Line Location: AMD+2
Function Call: WRITE
  • Prompt: !?8,^(J,0)
  • Line Location: AMD+7
Function Call: WRITE
  • Prompt: Y\100#100,"/",Y#100\1,"/",Y\10000+1700
  • Line Location: DT+0
Function Call: WRITE
  • Prompt: ?30,"(Adjustment date: ",Y,")"
  • Line Location: ADJCHK+11
Routine Call
  • DIC
  • Line Location:
    • PT1+3

FileMan Files Accessed Via FileMan Db Call

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

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^PRC(442 - [#442] V+7, V+9, V+10, V+12, V+13, COM, PT, PT+2, ASK2, ITEM+1
, ITEM+3, ITEM+12, ITEM+13, ITEM+18, ITEM+19, AMD, AMD+4, AMD+5, ADJCHK+1, ADJCHK+4
, ADJCHK+6, PIPECK+2, PIPECK+3
^PRC(442.7 - [#442.7] V+13
^PRCD(420.5 - [#420.5] ITEM+7, ITEM+15
^PRCS(410 - [#410] PT
^TMP($J V+15!, V+16, COM+1!, COM+2, PT+3!, ITEM+4!, ITEM+5, ITEM+10, AMD+1!, AMD+2
, AMD+6!, AMD+7, Q+1!
^UTILITY($J V+12!, COM!, ITEM!, AMD+5!, Q+1!

Label References

Name Line Occurrences
AMD PT+2
ASK V+16, COM+2, ITEM+10, ITEM+16, AMD+2, AMD+7
ASK1 ASK2
ASK2 V+8, V+9, V+16, COM+2
COM V+12
DIS V+10
DT PT+2
HDR V+8, ASK
ITEM V+9
PIPECK ITEM+2
PT COM
PT1 PT1+3
Q ASK2, PT1+3, ASK1+8

Naked Globals

Name Field # of Occurrence
^( V+9, V+10, V+13, V+16, COM, COM+2, PT+2, ITEM+3, ITEM+10, AMD+2
, AMD+5, AMD+7, PIPECK+3
^(0 PT, PT+2, ITEM+3, ITEM+6, ITEM+7, ITEM+15, PIPECK+3
^(1 V+13, ITEM+5, ITEM+6
^(2 V+9
^(4 ITEM+12
^(9999999 V+12!

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> % ASK2*
>> %A ASK2*
>> %B ASK2*
>> %X V+15*, COM+1*, ITEM+4*, AMD+6*
>> %Y V+15*, COM+1*, ITEM+4*, AMD+6*
ADJDATA ADJCHK+2~, ADJCHK+6*, ADJCHK+8
ADJDT ADJCHK+2~, ADJCHK+3*
ADJNUM ADJCHK+2~
CHKADJ ADJCHK+2~, ADJCHK+3*, ADJCHK+4*, ADJCHK+5, ADJCHK+6
>> D0 V+7, V+9, V+10, V+12, V+13, COM, PT, PT+2, ASK2, PT1
, ITEM+1, ITEM+3, ITEM+12, ITEM+13, ITEM+14, ITEM+18, ITEM+19, AMD, AMD+1, AMD+4
, AMD+5, PIPECK+2, PIPECK+3
>> DA V+13, COM, ITEM+3, AMD+5
>> DA(1 PT1*
DIC PT1!*, Q+1!
DIC("W" PT1+2*
DIC(0 PT1*
DIWF ITEM*, ITEM+3*, Q+1!
DIWL V+13*, COM*, ITEM*, AMD+5*, Q+1!
DIWR V+13*, COM*, ITEM*, AMD+5*, Q+1!
DTIME V+8, ASK, ASK1+8
>> FMSLN ITEM+18*, ITEM+19*
I V+9*, V+10*, HDR*, Q+1!
IOF HDR
IOP Q+1!
IOSL ASK, ITEM+10
ISADJ ADJCHK+2~, ADJCHK+3*
J V+16*, COM+2*, AMD+2*, AMD+7*, Q+1!
JJ Q+1!
K ITEM+10*, ITEM+13*, Q+1!
KK Q+1!
N V+9*, V+10*, V+11, Q+1!
>> PRCH PIPECK+1*, PIPECK+2*, PIPECK+3
PRCHAMCT V+7~*
PRCHAMNT V+7~*, ASK1
PRCHD0 V+11, Q+1!
PRCHD1 Q+1!
PRCHDCNT ITEM+5*, ITEM+10, Q+1!
PRCHDHSP Q+1!
PRCHDI V+9*, V+10*, ITEM+3, ITEM+12, ITEM+13, ITEM+14, Q+1!
PRCHDI0 V+9*, V+10*, ITEM+5, ITEM+7, ITEM+8, ITEM+12, ITEM+15, ITEM+18, DIS, Q+1!
PRCHDI2 V+9*, ITEM+9, ITEM+13, ITEM+20, Q+1!
PRCHDIW ITEM*, ITEM+2*, ITEM+3*, Q+1!, PIPECK+2*, PIPECK+3*
>> PRCHDPT PT1+3*
PRCHDQ V+8*, V+9, V+16, COM+2, PT+2, ASK2, ASK*, ASK1+8, ITEM+10, ITEM+11
, AMD, AMD+2, AMD+7, Q+1!
>> PRCHDRD PT1+3*
PRCHDS Q+1!
PRCHDSHP Q+1!
PRCHDSIT Q+1!
PRCHDST Q+1!
>> PRCHDTP PT1+3*
PRCHDV Q+1!
PRCHFTYP Q+1!
PRCHI V+13*, PT*, PT+2*, ITEM+1~, AMD, AMD+1, AMD+4, AMD+5, Q+1!, PIPECK+2*
PRCHJ V+13*, COM*, ITEM+1~, ITEM+3*, AMD+5*, Q+1!, PIPECK+3*
PRCHK V+13*, Q+1!
>> PRCHPO PT1*, ADJCHK+1, ADJCHK+4, ADJCHK+6
PURCTYPE ITEM+1~*, ITEM+5, ITEM+7, ITEM+8, ITEM+15
PURPIPE ITEM+1~, ITEM+3, PIPECK+1*, PIPECK+2, PIPECK+3, PIPECK+4*
S Q+1!
U V+7, V+10, V+11, PT, PT+2, PT1+3, ITEM+5, ITEM+7, ITEM+8, ITEM+9
, ITEM+12, ITEM+13, ITEM+15, ITEM+18, ITEM+19, ITEM+20, DIS, ADJCHK+4
V Q+1!
>> X V+8*, V+13*, COM*, ASK*, ASK1+8*, ITEM+3*, ITEM+8*, ITEM+13*, AMD+5*, PIPECK+3*
, PIPECK+4
Y PT+2*, PT1+3, DT, ADJCHK+4, ADJCHK+7~, ADJCHK+8*, ADJCHK+9, ADJCHK+11
Y(0 PT1+3
ZZ ITEM+14~*, ITEM+15
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