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 |  Local Variables  | All
Print Page as PDF
Routine: PRCPRDIS

Package: IFCAP

Routine: PRCPRDIS


Information

PRCPRDIS ;WISC/CC-supply station quantity discrepancy report ;4/00

Source Information

Source file <PRCPRDIS.m>

Call Graph

Call Graph

Call Graph Total: 13

Package Total Call Graph
IFCAP 7 BLDSEG^PRCPHLQU  ($$SCRPAUSE,END,P)^PRCPUREP  ^PRCPUSEL  $$GETVEN^PRCPUVEN  $$INVNAME^PRCPUX1  DISPLAY^PRCPUX2  $$YN^PRCPUYN  
Kernel 3 ^%ZIS  ^%ZISC  ^%ZTLOAD  
VA FileMan 3 DD^%DT  NOW^%DTC  EN^DDIOL  

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 PRCPHL70  

Entry Points

Name Comments DBIA/ICR reference
V ;;5.1;IFCAP;**1,24**;Oct 20, 2000
PRINT
REFILLS(ITEMDA,PRCPINPT) ; is the item refilled in an unposted order
; ITEMDA = DA of item
; PRCPINT = DA of inventory point
H

External References

Name Field # of Occurrence
DD^%DT PRINT+1
NOW^%DTC PRINT+1
^%ZIS V+35
^%ZISC PRINT+25
^%ZTLOAD V+36
EN^DDIOL V+31, V+32
BLDSEG^PRCPHLQU V+33
$$SCRPAUSE^PRCPUREP PRINT+2
END^PRCPUREP PRINT+24
P^PRCPUREP PRINT+11
^PRCPUSEL V+3
$$GETVEN^PRCPUVEN REFILLS+14
$$INVNAME^PRCPUX1 V+8
DISPLAY^PRCPUX2 V+11, V+22
$$YN^PRCPUYN V+27

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !
  • Line Location: V+30
Function Call: WRITE
  • Prompt: !
  • Line Location: V+35
Function Call: WRITE
  • Prompt: !!,"<*> please wait <*>"
  • Line Location: V+39
Function Call: WRITE
  • Prompt: !,$J(ITEM,7)," ",$P($G(^PRCP(445,INVPT,1,ITEM,6)),"^",1)
  • Line Location: PRINT+12
Function Call: WRITE
  • Prompt: !,"GIP: ",$J(GIPCNT,7)," SUPPLY STATION: ",$J(SSCNT,7)
  • Line Location: PRINT+13
Function Call: WRITE
  • Prompt: $J(GIPCNT,7)," ",$J(SSCNT,7)
  • Line Location: PRINT+14
Function Call: WRITE
  • Prompt: " "
  • Line Location: PRINT+16
Function Call: WRITE
  • Prompt: $J(" ("_Y_")",23)
  • Line Location: PRINT+19
Function Call: WRITE
  • Prompt: " ",$J(ITEM,7)," ",$E($P($G(^PRCP(445,INVPT,1,ITEM,6)),"^",1),1,32)
  • Line Location: PRINT+20
Function Call: WRITE
  • Prompt: !,?8,REFILL
  • Line Location: PRINT+21
Function Call: WRITE
  • Prompt: !
  • Line Location: PRINT+22
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: H+0
Function Call: WRITE
  • Prompt: $C(13),"SUPPLY STATION QUANTITY DISCREPANCY REPORT",?(IOM-$L(%)),%
  • Line Location: H+1
Function Call: WRITE
  • Prompt: !,"FOR: ",PRCPINNM,!
  • Line Location: H+2
Function Call: WRITE
  • Prompt: !,?2,"GIP",?19,"SUPPLY STATION"
  • Line Location: H+3
Function Call: WRITE
  • Prompt: !,"QTY NOW QTY (AS OF DATE and TIME) ITEM NUMBER AND DESCRIPTION"
  • Line Location: H+4
Function Call: WRITE
  • Prompt: !,"ITEM NUMBER AND DESCRIPTION"
  • Line Location: H+5
Function Call: WRITE
  • Prompt: ?58,$J("STAND",6),$J("NORM",6),$J("UNIT",10),!,"DESCRIPTION",?29,"MI#",?35,"NSN",?50,$J("UNIT/IS",8),$J("REOPT",6),$J("STLVL",6),$J("COST",10)
  • Line Location: H+6
Function Call: WRITE
  • Prompt: !,%,!
  • Line Location: H+7
Routine Call
  • %ZIS
  • Line Location:
    • V+35

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DD("DD" V+17, PRINT+18
^PRCP(445 - [#445] V+5, V+14, PRINT+5, PRINT+6, PRINT+7, PRINT+8, PRINT+15, PRINT+20
^PRCP(445.3 - [#445.3] REFILLS+6, REFILLS+7, REFILLS+8, REFILLS+9, REFILLS+12, REFILLS+17

Label References

Name Line Occurrences
$$REFILLS PRINT+21
H PRINT+2, PRINT+11

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
% V+7~, V+27*, V+28, V+29, PRINT~, PRINT+1, H*, H+1, H+7*
>> %ZIS V+35*
GIPCNT PRINT~, PRINT+7*, PRINT+9, PRINT+10, PRINT+14
I V+7~, V+18*, V+19
INVPT V+7~, V+8*, V+33, PRINT~, PRINT+3*, PRINT+5, PRINT+6, PRINT+7, PRINT+8, PRINT+15
PRINT+20, PRINT+21
IO PRINT+2
IO("Q" V+36!
IOF H
IOM H+1, H+7
IOSL PRINT+11
ITEM PRINT~, PRINT+4*, PRINT+5*, PRINT+6, PRINT+7, PRINT+8, PRINT+15, PRINT+20, PRINT+21
ITEMDA REFILLS~, REFILLS+8, REFILLS+9, REFILLS+14, REFILLS+17
NOW PRINT~, PRINT+1*, H
ORD REFILLS+4~, REFILLS+5*, REFILLS+6*, REFILLS+7, REFILLS+8, REFILLS+9, REFILLS+12, REFILLS+17
OUTORD REFILLS+4~, REFILLS+5*, REFILLS+10, REFILLS+11*
PAGE PRINT~, PRINT+2*, H*
>> POP V+35
>> PRCP("DPTYPE" V+2*, V+4
>> PRCP("I" V+3, V+5, V+8, V+14, PRINT+3
>> PRCPFLAG PRINT+5, PRINT+11, PRINT+24
PRCPINNM V+7~, V+8*, V+10, H+2
PRCPINPT REFILLS~, REFILLS+6, REFILLS+14
PRIMVN REFILLS+4~, REFILLS+13*, REFILLS+14
REFILL PRINT~, PRINT+21*, REFILLS+4~, REFILLS+5*, REFILLS+10*, REFILLS+11*, REFILLS+12*, REFILLS+17*, REFILLS+18
SCREEN PRINT~, PRINT+2*, PRINT+11, H
SSCNT PRINT~, PRINT+8*, PRINT+9, PRINT+10, PRINT+14
X V+7~, V+10!, V+11, V+13!, V+22, PRINT~, REFILLS+4~, REFILLS+7*, REFILLS+8, REFILLS+13
, REFILLS+14*, REFILLS+15*, REFILLS+16*, REFILLS+17
X(1 V+10*, V+15*, V+19*, V+20*
X(2 V+21*
XH V+7~
XH(1 V+24*
XH(2 V+25*
XH(3 V+26*
XP V+7~, V+23*
Y V+7~, V+14*, V+15, V+16, V+18*, V+20, PRINT~, PRINT+1*, PRINT+15*, PRINT+16
PRINT+17, PRINT+19
>> ZTDESC V+37*
>> ZTRTN V+37*
>> ZTSAVE("PRCP*" V+38*
ZTSK V+36!
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables  | All