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

Package: IFCAP

Routine: PRCPWPP0


Information

PRCPWPP0 ;WISC/RFJ,DWA-primary receive issue book (options) ;20 Jan 94

Source Information

Source file <PRCPWPP0.m>

Call Graph

Call Graph

Call Graph Total: 8

Package Total Call Graph
IFCAP 5 EN^PRCPEILM  ($$DESCR,$$NSN,$$UNIT)^PRCPUX1  DISPLAY^PRCPUX2  $$YN^PRCPUYN  REBUILD^PRCPWPPB  
VA FileMan 2 ^DIC  ^DIR  
List Manager 1 FULL^VALM1  

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

Package Total Caller Graph
IFCAP 3 PRCP RECEIVE ISSUE BOOK E/E ITEMS  PRCP RECEIVE ISSUE BOOK QTY TO ENTER  PRCP RECEIVE ISSUE BOOK QTY TO REMAIN  
Kernel 1 ^ORD(101  

Entry Points

Name Comments DBIA/ICR reference
EEITEMS ; called from protocol file to enter/edit invpt items
REMAIN ; set qty to receive to remaining (outstanding) qty
ENTER ; enter quantity to post
LINEITEM()

External References

Name Field # of Occurrence
^DIC LINEITEM+4
^DIR ENTER+23, ENTER+32
EN^PRCPEILM EEITEMS+2
$$DESCR^PRCPUX1 ENTER+11
$$NSN^PRCPUX1 ENTER+11
$$UNIT^PRCPUX1 ENTER+11
DISPLAY^PRCPUX2 REMAIN+5, ENTER+35
$$YN^PRCPUYN REMAIN+7
REBUILD^PRCPWPPB EEITEMS+3, REMAIN+12, ENTER+36
FULL^VALM1 EEITEMS+1, REMAIN+1, ENTER+1

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !
  • Line Location: ENTER+5
Function Call: WRITE
  • Prompt: !,"CANNOT FIND LINE ITEM."
  • Line Location: ENTER+6
Function Call: WRITE
  • Prompt: !,"ITEM (#",ITEMDA,") NOT STORED IN THE INVENTORY POINT."
  • Line Location: ENTER+8
Function Call: WRITE
  • Prompt: !,"ITEM IS CANCELLED",$S(STATUS["S":" AND SUBSTITUTED WITH LINE #(S): "_$P(STATUS,",",2,99),1:"")
  • Line Location: ENTER+9
Function Call: WRITE
  • Prompt: !!,ITEMDA,?5,$E($$DESCR^PRCPUX1(PRCPINPT,ITEMDA),1,30)," ",$$NSN^PRCPUX1(ITEMDA)," U/I: ",$$UNIT^PRCPUX1(PRCPINPT,ITEMDA,"/")
  • Line Location: ENTER+11
Function Call: WRITE
  • Prompt: !?5,"AVERAGE COST : ",$J(+$P(INVDATA,"^",22),0,2)
  • Line Location: ENTER+12
Function Call: WRITE
  • Prompt: !?5,"LAST COST : ",$J(+$P(INVDATA,"^",15),0,2)
  • Line Location: ENTER+13
Function Call: WRITE
  • Prompt: !
  • Line Location: ENTER+14
Function Call: WRITE
  • Prompt: !?5,"QTY ON-HAND : ",ONHAND
  • Line Location: ENTER+15
Function Call: WRITE
  • Prompt: !?5,"QTY ORDERED : ",+$P(DATA,"^",2)
  • Line Location: ENTER+16
Function Call: WRITE
  • Prompt: !?5,"QTY POSTED : ",+$P(DATA,"^",12)
  • Line Location: ENTER+17
Function Call: WRITE
  • Prompt: !?5,"QTY RECEIVED : ",+$P(DATA,"^",13)
  • Line Location: ENTER+18
Function Call: WRITE
  • Prompt: !?5,"QTY OUTSTANDING: ",QTYOUT
  • Line Location: ENTER+19
Function Call: WRITE
  • Prompt: !?5,"QTY TO RECEIVE : ",+$G(^TMP($J,"PRCPWPPLPOST",LINEDA))
  • Line Location: ENTER+20
Function Call: WRITE
  • Prompt: !
  • Line Location: ENTER+23
Function Call: WRITE
  • Prompt: !!
  • Line Location: ENTER+27
Function Call: WRITE
  • Prompt: !,?15,"*****************WARNING*********************"
  • Line Location: ENTER+28
Function Call: WRITE
  • Prompt: !,?15,"** Quantity RECEIVED greater than ORDERED. **"
  • Line Location: ENTER+29
Function Call: WRITE
  • Prompt: !,?15,"** Is that what you want to do? **"
  • Line Location: ENTER+30
Function Call: WRITE
  • Prompt: !,?15,"*********************************************",!!
  • Line Location: ENTER+31
Routine Call
  • DIC
  • Line Location:
    • LINEITEM+4
Routine Call
  • DIR
  • Line Location:
    • ENTER+23
    • ENTER+32

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^PRCP(445 - [#445] REMAIN+10, ENTER+7
^PRCS(410 - [#410] ENTER+6
^TMP($J REMAIN+8, REMAIN+11*, ENTER+10, ENTER+20, ENTER+24*, ENTER+25

Label References

Name Line Occurrences
$$LINEITEM ENTER+5

Naked Globals

Name Field # of Occurrence
^( REMAIN+8

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
DA LINEITEM+1~
DA(1 LINEITEM+2*
DATA REMAIN+3~, REMAIN+8*, REMAIN+9, ENTER+3~, ENTER+6*, ENTER+7, ENTER+16, ENTER+17, ENTER+18
DIC LINEITEM+1~, LINEITEM+2*
DIC("A" LINEITEM+2*
DIC("W" LINEITEM+3*
DIC(0 LINEITEM+2*
DIR ENTER+3~, ENTER+23!
DIR("A" ENTER+21*, ENTER+22*
DIR("B" ENTER+21*
DIR(0 ENTER+21*, ENTER+32*
INVDATA ENTER+3~, ENTER+7*, ENTER+8, ENTER+10, ENTER+12, ENTER+13
ITEMDA REMAIN+3~, REMAIN+9*, REMAIN+10, ENTER+3~, ENTER+7*, ENTER+8, ENTER+11
LINEDA REMAIN+3~, REMAIN+8*, REMAIN+11, ENTER+3~, ENTER+5*, ENTER+6, ENTER+10, ENTER+20, ENTER+24, ENTER+25
ONHAND ENTER+3~, ENTER+10*, ENTER+15
>> PRCPDA ENTER+6, LINEITEM+2
>> PRCPINPT REMAIN+10, ENTER+7, ENTER+11
QTY REMAIN+3~, REMAIN+9*, REMAIN+10*, REMAIN+11
QTYOUT ENTER+3~, ENTER+10*, ENTER+19, ENTER+26
QTYPST ENTER+3~, ENTER+10*, ENTER+21, ENTER+22
QTYREC ENTER+3~, ENTER+25*, ENTER+26, ENTER+33!
QUIT ENTER+3~, ENTER+4*, ENTER+33*, ENTER+35, ENTER+36
STATUS ENTER+3~, ENTER+7*, ENTER+9
>> VALMBCK EEITEMS+4*, REMAIN+2*, ENTER+2*
>> VALMSG REMAIN+13*
X REMAIN+3~, REMAIN+4!, REMAIN+5, ENTER+3~, ENTER+25!, ENTER+35, LINEITEM+1~
X(1 REMAIN+4*, ENTER+25*, ENTER+33!
>> XH REMAIN+6*
>> XP REMAIN+6*
Y ENTER+3~, ENTER+24, ENTER+33, LINEITEM+1~, LINEITEM+5
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All