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

Package: Supply

Routine: ASURD72P


Information

ASURD72P ; IHS/ITSC/LMH -RPT 72 UNDELVRD PO FOLLOW UP ;

Source Information

Source file <ASURD72P.m>

Call Graph

Call Graph Total: 9

Package Total Call Graph
Supply 7 (SETAREA,STA)^ASULARST  ^ASUMSTRD  ^ASUMSTWR  READ^ASUMXDIO  (DATE,TIME)^ASUUDATE  PAZ^ASUURHDR  (O,U)^ASUUZIS  
Kernel 1 (,HOME)^%ZIS  
VA Fileman 1 H^%DTC  

Caller Graph

Caller Graph Total: 3

Package Total Caller Graph
Supply 3 ASU5272DRP  ASUCORPX  ASURDINV  

Entry Points

Name Comments DBIA/ICR reference
P2 ;RPT 72 UNDELVRD PO FOLLOW UP
P1 ;READ EXTRACT DATA
CMPT ;EP ;SORT RPT 72 -XTR ^ASUX
HEADER ;
K ;
STANDARD ;EP; FOR STANDARD PRINT
START ;
PSER ;EP;FOR TASKMAN QUEUE OF PRINT
REPRINT ;ENTRY TO RECREATE REPORT 72 INCLUDING ITEMS ON LAST PRINT

External References

Name Field # of Occurrence
H^%DTC START+2, CMPT+2, CMPT+10, CMPT+14
^%ZIS START+8
HOME^%ZIS START+2
SETAREA^ASULARST START+5
STA^ASULARST HEADER+6
^ASUMSTRD CMPT+5
^ASUMSTWR CMPT+23
READ^ASUMXDIO CMPT+9
DATE^ASUUDATE START+1, CMPT+1
TIME^ASUUDATE START+1, CMPT+1
PAZ^ASUURHDR K+3, HEADER+2
O^ASUUZIS START+7
U^ASUUZIS PSER+1

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"Report must be run from Kernel option"
  • Line Location: START+4
Function Call: WRITE
  • Prompt: !,*7,"NO DATA FOR REPORT #72"
  • Line Location: PSER+3
Function Call: WRITE
  • Prompt: ?27,ASUX("DT")
  • Line Location: PSER+3
Function Call: WRITE
  • Prompt: !,"NO STATION MASTERS LOADED"
  • Line Location: PSER+4
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: K+4
Function Call: WRITE
  • Prompt: !!?1,$E(ASUV("IDX"),1,5),".",$E(ASUV("IDX"),6,6)
  • Line Location: P2+2
Function Call: WRITE
  • Prompt: ?10,ASUMX("DESC",1)
  • Line Location: P2+3
Function Call: WRITE
  • Prompt: ?41,ASUMX("AR U/I")
  • Line Location: P2+4
Function Call: WRITE
  • Prompt: ?44,$J($FN(ASUMS("D/I","QTY"),","),7)
  • Line Location: P2+5
Function Call: WRITE
  • Prompt: ?52,$J($FN(ASUMS("QTY","O/H"),","),8)
  • Line Location: P2+6
Function Call: WRITE
  • Prompt: ?60,$J($FN(ASUMS("PMIQ"),","),6)
  • Line Location: P2+7
Function Call: WRITE
  • Prompt: ?67,$J($FN(ASUV("PASTDU"),","),6)
  • Line Location: P2+8
Function Call: WRITE
  • Prompt: ?74,$E(ASUMS("LTM")),".",$E(ASUMS("LTM"),2,2)
  • Line Location: P2+9
Function Call: WRITE
  • Prompt: !?10,ASUMX("DESC",2)
  • Line Location: P2+10
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: HEADER+2
Function Call: WRITE
  • Prompt: !?1,"REPORT #72 UNDELIVERED PURCHASE ORDER -FOLLOW UP REPORT"
  • Line Location: HEADER+3
Function Call: WRITE
  • Prompt: ?61,ASUX("DT"),?74,"PAGE ",ASUC("PG")
  • Line Location: HEADER+3
Function Call: WRITE
  • Prompt: !?3,"AREA: ",ASUL(1,"AR","AP"),?15,ASUL(1,"AR","NM")
  • Line Location: HEADER+4
Function Call: WRITE
  • Prompt: !?3,"STAT: ",ASUL(2,"STA"),?15,ASUL(2,"STA","NM")
  • Line Location: HEADER+5
Function Call: WRITE
  • Prompt: !?3,"STAT: ",ASUL(2,"STA","E#"),?15,ASUL(2,"STA","NM")
  • Line Location: HEADER+6
Function Call: WRITE
  • Prompt: !?1,"PURCHASE ORDER NO. ",ASUV("D/IPO#")," -",?31,"DELIVERY DUE DATE: "
  • Line Location: HEADER+7
Function Call: WRITE
  • Prompt: ?50,X
  • Line Location: HEADER+7
Function Call: WRITE
  • Prompt: !!!?49,"DUE QTY NO.",!?3,"INDEX",?50,"IN",?58,"ON",?68,"DAYS",?75,"LT",!?2,"NUMBER DESCRIPTION",?41,"UI",?49,"QTY",?56,"HAND",?62,"PAMIQ",?68,"LATE",?74,"MOS"
  • Line Location: HEADER+8
Routine Call
  • %ZIS
  • Line Location:
    • START+2
Routine Call
  • %ZIS
  • Line Location:
    • START+8

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^ASUMS - [#9002031] PSER+4, CMPT+3, CMPT+4
^ASUR7(72 REPRINT+1, REPRINT+2
^DD("DD" PSER+2, HEADER+7
^XTMP("ASUR" START+3, PSER+2, PSER+3, PSER+7, PSER+8, PSER+13, P1+1, CMPT+1!*, CMPT+21*

Label References

Name Line Occurrences
CMPT START+3
HEADER PSER+3, P2+1
K PSER+3, PSER+4, PSER+7
P1 PSER+14
P2 PSER+14
PSER START+6
STANDARD REPRINT+1
START REPRINT+3

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> %H START+2, CMPT+2, CMPT+10, CMPT+14
ASUC K+1!
ASUC("LN" PSER+1*, PSER+11*, P2+1, P2+11*, HEADER+1*, HEADER+9*
ASUC("PG" HEADER+1*, HEADER+2, HEADER+3
>> ASUF("DLIDX" CMPT+6
>> ASUF("DUEIN" CMPT+7*, CMPT+9*, CMPT+23, CMPT+24!
>> ASUF("RPTD" CMPT+11*, CMPT+14*, CMPT+15*, CMPT+24!
>> ASUK( START+9
>> ASUK("DT" START+2, CMPT+1, CMPT+2, CMPT+17
>> ASUK("PTR" START+9
>> ASUK("PTRSEL" START+6*, K+4
>> ASUL( K+2!
>> ASUL(1 START+5, HEADER+4
>> ASUL(2 HEADER+6
ASUMS CMPT+24!
ASUMS("AR" PSER+3*, PSER+4*, HEADER+4
ASUMS("D/I" PSER+5*, PSER+8*, PSER+9, PSER+11, PSER+13, P1+1, P1+2*, P1+6*, P2+5, HEADER+7
, CMPT+8, CMPT+10, CMPT+12, CMPT+13, CMPT+14, CMPT+17*, CMPT+18*, CMPT+19, CMPT+20, CMPT+21
ASUMS("E#" CMPT+3*, CMPT+4*, CMPT+5, CMPT+6*, CMPT+9
ASUMS("LTM" P1+10*, P2+9, CMPT+20
ASUMS("PMIQ" P1+8*, P2+7, CMPT+20
ASUMS("QTY" P1+7*, P2+6, CMPT+20
ASUMS("STA" PSER+7*, PSER+8, PSER+13, P1+1, HEADER+6, CMPT+19, CMPT+21
ASUMX K+1!, CMPT+24!
ASUMX("AR U/I " , P1+5*, P2+4, CMPT+20
ASUMX("DESC" P1+3*, P1+4*, P2+3, P2+10, CMPT+19
ASUMX("E#" CMPT+9*
ASUMX("IDX" PSER+5*, PSER+13*, PSER+14, P1+1, P2+11, CMPT+19, CMPT+21
ASUV K+1!, CMPT+24!
ASUV("D/IPO#" PSER+1*, PSER+9*, PSER+11*, PSER+12, HEADER+7
ASUV("DUEDT" CMPT+10*
ASUV("DUEIN" CMPT+7*, CMPT+8, CMPT+10, CMPT+12, CMPT+13, CMPT+14, CMPT+17, CMPT+18, CMPT+19, CMPT+20
, CMPT+21
ASUV("E#" CMPT+5*, CMPT+6
ASUV("IDX" PSER+1*, PSER+14*, P2+2, P2+11*
ASUV("PASTDU" P1+9*, P2+8, CMPT+11*, CMPT+20
ASUV("R72 LAS T DT" , REPRINT+2*, CMPT+13
ASUV("RPTD" CMPT+15*
>> ASUX("DT" PSER+2*, PSER+3, HEADER+3
>> ASUX(0 P1+1*, P1+2, P1+3, P1+4, P1+5, P1+6, P1+7, P1+8, P1+9, P1+10
DIC K+1!
>> DIRUT PSER+3, PSER+8, PSER+13, PSER+14, P2+1, HEADER+2
DUZ(2 START+4
IO START+2
IOF K+4, HEADER+2
>> IOP START+8*
IOSL PSER+1, PSER+11, P2+1
>> POP START+8
U PSER+2, PSER+4, P1+2, P1+3, P1+4, P1+5, P1+6, P1+7, P1+8, P1+9
, P1+10, CMPT+1, CMPT+19, CMPT+20
X START+2*, PSER+3*, PSER+4, K+1!, K+2*, HEADER+7*, CMPT+2*, CMPT+10*, CMPT+14*, CMPT+19*
, CMPT+20*, CMPT+21, CMPT+22!
X2 K+1!, CMPT+10*, CMPT+11, CMPT+14*, CMPT+15
X3 START+2*, K+1!, CMPT+2*, CMPT+10, CMPT+11, CMPT+14, CMPT+15
Y PSER+2*, K+1!
>> ZTDESC START+7*
>> ZTRTN START+7*
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables |  All