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

Package: IFCAP

Routine: PRCHDPO


Information

PRCHDPO ;WOIFO/CR - DELINQUENT DELIVERY LISTING PA OPTION ; 2/20/01 12:55 PM

Source Information

Source file <PRCHDPO.m>

Call Graph

Call Graph

Call Graph Total: 6

Package Total Call Graph
Kernel 3 ^%ZIS  ^%ZISC  ^%ZTLOAD  
VA FileMan 3 DD^%DT  NOW^%DTC  ^DIR  

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 PRCHOUT DEL  

Entry Points

Name Comments DBIA/ICR reference
A1 ;
TYPE
DATE
FRMDT ; Make the current date for the header easier to read.
FRMDT1 ; Compress the delivery date display.
STAT ; Gather all the statistics
PRINT ; Let's print the outstanding orders and dollar amounts.
HOLD
HEADER ;
CLEAN

External References

Name Field # of Occurrence
DD^%DT FRMDT+1, STAT+12
NOW^%DTC FRMDT+1
^%ZIS DATE+7
^%ZISC DATE+8, DATE+10
^%ZTLOAD DATE+8
^DIR TYPE+8, DATEDATE+3

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!
  • Line Location: TYPE+0
Function Call: WRITE
  • Prompt: !!,"SELECTED: ",$E(SELECT,1,($L(SELECT)-1))," / ",SELECTW,!
  • Line Location: TYPE+12
Function Call: WRITE
  • Prompt: " ",Y(0)
  • Line Location: DATE+1
Function Call: WRITE
  • Prompt: " ",Y(0)
  • Line Location: DATE+4
Function Call: WRITE
  • Prompt: !,$C(7),"Less than 'FROM' value.",!
  • Line Location: DATE+5
Function Call: WRITE
  • Prompt: !!!!,?10,"*** NO RECORDS TO PRINT ***"
  • Line Location: PRINT+5
Function Call: READ
  • Variable: XXZ
  • Timeout: DTIME
  • Line Location: PRINT+21
Function Call: WRITE
  • Prompt: !,?60,"----------"
  • Line Location: PRINT+26
Function Call: WRITE
  • Prompt: !,"TOTAL",?55,$J(GTOT,15,2)
  • Line Location: PRINT+27
Function Call: READ
  • Variable: XXZ
  • Timeout: DTIME
  • Line Location: HOLD+0
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: HEADER+1
Function Call: WRITE
  • Prompt: !,"DELINQUENT PURCHASE ORDERS",?42,DATE,?68,"PAGE ",P,!
  • Line Location: HEADER+2
Function Call: WRITE
  • Prompt: "** FOR SUPPLY EMPLOYEE: ",SELECTW,!
  • Line Location: HEADER+3
Function Call: WRITE
  • Prompt: !,"PO NUMBER",?15,"SUPPLY STATUS",?63,"COST",!
  • Line Location: HEADER+4
Function Call: WRITE
  • Prompt: ?3,"DELIVERY",?17,"PHONE",?60,"OUTSTANDING",!
  • Line Location: HEADER+5
Function Call: WRITE
  • Prompt: ?3,"DATE",?17,"NUMBER",?45,"(QTY*UNIT COST FOR ITEMS NOT REC'D)",!
  • Line Location: HEADER+6
Function Call: WRITE
  • Prompt: "--------"
  • Line Location: HEADER+7
Function Call: WRITE
  • Prompt: !!,?15,"PA/PPM/AUTHORIZED BUYER: ",$P(Q,">"),!
  • Line Location: HEADER+8
Routine Call
  • DIR
  • Line Location:
    • TYPE+8
    • DATE
    • DATE+3
Routine Call
  • %ZIS
  • Line Location:
    • DATE+7

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^PRC(440 - [#440] STAT+15, STAT+16
^PRC(442 - [#442] STAT+2, STAT+3, STAT+4, STAT+8, STAT+20
^PRCD(442.3 - [#442.3] STAT+22
^TMP($J STAT+28*, PRINT+5, PRINT+6, PRINT+8, PRINT+10, PRINT+12, CLEAN!
^VA(200 - [#200] STAT+18, STAT+19

Label References

Name Line Occurrences
CLEAN A1+1, PRINT+28
DATE DATE+5
FRMDT PRINT+3
FRMDT1 STAT+12
HEADER PRINT+5, PRINT+7, HOLD
HOLD PRINT+15
STAT DATE+9

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> % FRMDT+1
>> %ZIS DATE+7*
>> %ZIS("B" DATE+7*
AMT1 STAT+1*, PRINT+4*, PRINT+11*, PRINT+16*, CLEAN!
COSOUT STAT+26*, STAT+27*, STAT+28, CLEAN!
DATE FRMDT+4*, HEADER+2, CLEAN!
DELDT STAT+4*, STAT+10, STAT+11, STAT+12*, STAT+28, CLEAN!
DIR TYPE+13!, DATE!, DATE+3!
DIR("?" TYPE+1*, TYPE+2*, TYPE+3*
DIR("A" TYPE+5*, TYPE+6*, TYPE+7*, TYPE+8*, DATE*, DATE+3*
DIR("B" TYPE+8*
DIR(0 TYPE+4*, DATE*, DATE+3*
DIRUT TYPE+9, TYPE+13!
DR TYPE+13!
DTIME PRINT+21, HOLD
DTOUT TYPE+9, TYPE+13!
EDATE DATE+4*, DATE+5!, STAT+11, CLEAN!
ENTOT CLEAN+2!
EX PRINT+4*, PRINT+6, PRINT+8, PRINT+10, PRINT+15, PRINT+21*, HOLD*, CLEAN+2!
FDATE DATE+1*, DATE+5!, STAT+10, CLEAN!
GTOT STAT+1*, PRINT+19*, PRINT+27, CLEAN+2!
I TYPE+11*, STAT+2*, STAT+3, HEADER+7*, CLEAN+2!
IO PRINT+2, HOLD
>> IO("Q" DATE+8
>> IO(0 HOLD
IOF HEADER+1
IOSL PRINT+15
IOST PRINT+21, HOLD
LIQAMT STAT+25*, STAT+26, STAT+27, CLEAN+2!
MOP STAT+5*, STAT+7, CLEAN+2!
P STAT+1*, PRINT+4*, PRINT+5*, HEADER+2, HEADER+9*, CLEAN+2!
PHONE STAT+16*, STAT+28, CLEAN+2!
PONUM STAT+5*, STAT+28, CLEAN+2!
>> POP DATE+7
PRCHPA STAT+17*, STAT+18, STAT+19, CLEAN!
PRCSTAT STAT+22*, STAT+28, CLEAN!
Q PRINT+5*, PRINT+6*, PRINT+8, PRINT+10, PRINT+12, HEADER+8, CLEAN!
Q1 PRINT+5*, PRINT+8*, PRINT+9, PRINT+10, PRINT+12, CLEAN!
Q2 PRINT+10*, PRINT+12, PRINT+22, HOLD, CLEAN!
SELECT TYPE!, TYPE+10*, TYPE+11, TYPE+12, STAT+19, CLEAN+3!
SELECTW TYPE*, TYPE+10*, TYPE+11*, TYPE+12, HEADER+3, CLEAN+3!
STR3 PRINT+12*, PRINT+13, PRINT+14, PRINT+16, CLEAN+2!
SUBUSER STAT+1*, PRINT+7*, CLEAN+2!
SUBUSER( PRINT+19*, PRINT+24*
SUPORD STAT+23*, STAT+24, CLEAN+2!
SUPT STAT+21*, STAT+22, CLEAN+1!
TOT PRINT+4*, PRINT+16*, PRINT+20*, CLEAN+1!
TOTAMT STAT+25*, STAT+26, STAT+27, CLEAN+1!
USER STAT+18*, STAT+28, PRINT+16, PRINT+18, PRINT+19, PRINT+24, CLEAN+2!
VENDOR STAT+15*, STAT+28, CLEAN+1!
VENPTR STAT+13*, STAT+14, STAT+15, STAT+16, PRINT+16, PRINT+18, PRINT+19, CLEAN+1!
VENTOT STAT+1*, PRINT+7*, CLEAN+1!
VENTOT( PRINT+16*, PRINT+18, PRINT+19
X TYPE+11*, TYPE+13!, CLEAN+1!
X1 FRMDT+2*, FRMDT1+1*, STAT+12, CLEAN+1!
X2 FRMDT+2*, FRMDT+4, CLEAN+1!
X3 FRMDT+3*, FRMDT+4, CLEAN+1!
XXZ PRINT+21*, HOLD*, CLEAN+1!
Y TYPE!, TYPE+10, TYPE+13!, DATEDATE+1, DATE+3, DATE+4, FRMDT+1*, FRMDT+2, FRMDT+3
FRMDT1+1, STAT+12*, CLEAN+1!
Y(0 DATE+1, DATE+4
ZP STAT+3*, STAT+4, STAT+8, STAT+20, CLEAN+1!
ZP0 STAT+4*, STAT+5, STAT+25, CLEAN+1!
ZP1 STAT+8*, STAT+9, STAT+13, STAT+17, CLEAN+1!
ZP7 STAT+20*, STAT+21, STAT+23, CLEAN+1!
>> ZTRTN DATE+8*
>> ZTSAVE("*" DATE+8*
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables  | All