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

Package: Supply

Routine: ASURD73P


Information

ASURD73P ; IHS/ITSC/LMH -RPT 73 OUTAGE/LOW INV/DUE OUT ;

Source Information

Source file <ASURD73P.m>

Call Graph

Call Graph Total: 13

Package Total Call Graph
Supply 7 (SETAREA,STA)^ASULARST  ACC^ASULDIRF  ^ASUMSTRD  READ^ASUMXDIO  ^ASUUDATE  PAZ^ASUURHDR  (C,O,U)^ASUUZIS  
VA Fileman 4 (H,YX)^%DTC  ^DIC  ^DIE  ^DIR  
IHS VA Utilities 1 ^XBKVAR  
Kernel 1 (,HOME)^%ZIS  

Caller Graph

Caller Graph Total: 3

Package Total Caller Graph
Supply 3 ASU125LIRM  ASU5173DRP  ASUCORPX  

Entry Points

Name Comments DBIA/ICR reference
P2 ;Print Totals and Lines
EN ;EP;PRIMARY ENTRY POINT FOR REPORT 73
CMPT ;EP ;SORT,DUEIN,BKORDER RTN;
CHECKI ;
K ;
PRINTLIN ;EP; PRINT TRANS LINE
ASK ;
HEADER ;Report 73 Header
PSER ;EP;FOR TASKMAN QUEUE OF PRINT
DONE ;
PRINTTOT ;EP; PRINT TOTAL LINE
REMARKS ;EP ;ENTER REMARKS FOR REPORT 73
FINDIDX ;
READSTA ;

External References

Name Field # of Occurrence
H^%DTC REMARKS+4
YX^%DTC REMARKS+4
^%ZIS EN+5
HOME^%ZIS EN+1
SETAREA^ASULARST EN+2
STA^ASULARST HEADER+5
ACC^ASULDIRF HEADER+7
^ASUMSTRD CMPT+5
READ^ASUMXDIO CMPT+7
^ASUUDATE PSER+1
PAZ^ASUURHDR K+5, HEADER+2
C^ASUUZIS K+7
O^ASUUZIS EN+4
U^ASUUZIS PSER+1
^DIC FINDIDX+3
^DIE FINDIDX+7
^DIR READSTA+1, ASK+1
^XBKVAR REMARKS+2

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"Report must be run from Kernel option"
  • Line Location: EN+1
Function Call: WRITE
  • Prompt: !,"NO DATA FOR REPORT #73",?27,ASUK("DT")
  • Line Location: PSER+5
Function Call: WRITE
  • Prompt: @(IOF)
  • Line Location: K+6
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: HEADER+2
Function Call: WRITE
  • Prompt: !?5,"REPORT #73 STOCK OUTAGE -LOW INVENTORY -DUE OUT REPORT"
  • Line Location: HEADER+3
Function Call: WRITE
  • Prompt: ?70,ASUX("DT"),?85,"PAGE",?90,ASUC("PG")
  • Line Location: HEADER+4
Function Call: WRITE
  • Prompt: !?5,"STATION: ",ASUL(2,"STA","CD"),?23,ASUL(2,"STA","NM")
  • Line Location: HEADER+6
Function Call: WRITE
  • Prompt: !?5,"GL ACCOUNT 125.",ASUL(9,"ACC"),?23,ASUL(9,"ACC","NM")
  • Line Location: HEADER+8
Function Call: WRITE
  • Prompt: !!?60,"QTY DUE",?85,"DUE DUE DUE OUT EOQ"
  • Line Location: HEADER+9
Function Call: WRITE
  • Prompt: !?7,"INDEX",?61,"ON",?68,"IN PO",?85,"IN",?93,"OUT",?102,"TO TYPE"
  • Line Location: HEADER+10
Function Call: WRITE
  • Prompt: !?2,"NUMBER DESCRIPTION",?46,"UI",?50,"PAMIQ",?59,"HAND",?68,"QTY"
  • Line Location: HEADER+11
Function Call: WRITE
  • Prompt: ?77,"NO.",?85,"DATE QTY",?99,"LOC USER CODE",!
  • Line Location: HEADER+12
Function Call: WRITE
  • Prompt: ?67,$J(ASUV("QTY","D/I"),5)
  • Line Location: PRINTLIN+7
Function Call: WRITE
  • Prompt: ?75,ASUV("D/I","PO#")
  • Line Location: PRINTLIN+8
Function Call: WRITE
  • Prompt: !?40,"TOTAL",?59,$J($P(ASUX(0,"IDX"),U,8),5)
  • Line Location: PRINTTOT+2
Function Call: WRITE
  • Prompt: !!,"USER NOT DEFINED -USE KERNEL"
  • Line Location: REMARKS+1
Routine Call
  • %ZIS
  • Line Location:
    • EN+1
Routine Call
  • DIE
  • Line Location:
    • FINDIDX+7
Routine Call
  • DIC
  • Line Location:
    • FINDIDX+3
Routine Call
  • DIR
  • Line Location:
    • READSTA+1
    • ASK+1
Routine Call
  • %ZIS
  • Line Location:
    • EN+5

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^ASUMS - [#9002031] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^ASUL(19 - [#9002039.19] P2+8
^ASUL(20 - [#9002039.2] P2+7
^ASUMB - [#9002035] CMPT+15
^ASUMB("C" CMPT+14
^ASUMS - [#9002031] CMPT+3, CMPT+4, CHECKI+1
^ASUMS("B" REMARKS+5, REMARKS+6, CHECKI+1, READSTA+2
^DD("DD" PSER+2
^VA(200 - [#200] REMARKS+3
^XTMP("ASUR" PSER+2, PSER+5, PSER+12, PSER+13, PSER+14, PSER+20, PSER+21, CMPT+1!*, CMPT+21*, CMPT+31*

Label References

Name Line Occurrences
ASK FINDIDX+4
CHECKI REMARKS+5
CMPT PSER+4
DONE ASK+2
FINDIDX REMARKS+6, ASK+3
HEADER PSER+16, PRINTLIN+5, PRINTTOT+1
K PSER+5
P2 PSER+22, PSER+23
PRINTTOT PSER+28
PSER EN+3
READSTA REMARKS+7

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
ASUAB CMPT+32!, CMPT+35!
ASUAB( CMPT+17*, CMPT+30
ASUAD CMPT+32!, CMPT+35!
ASUAD( CMPT+11*, CMPT+12*, CMPT+28, CMPT+29
ASUC K+1!
ASUC("ACCTOT" PSER+6*, PSER+29*, PSER+30, K+2!
ASUC("B/O" PSER+6*, PRINTLIN+2*, PRINTTOT+4, PRINTTOT+5*
ASUC("GTOT" PSER+6*, PSER+30*, PSER+32, K+2!
ASUC("LI" PSER+20*, PSER+23, K+2!
ASUC("LN" PSER+6*, PSER+15*, PSER+16, PSER+31*, HEADER+1*, HEADER+13*, PRINTLIN+4*, PRINTLIN+5, PRINTTOT+1*
ASUC("PG" HEADER+1*, HEADER+2, HEADER+4
ASUC("QTY" PSER+6*, PRINTLIN+1*, PRINTTOT+3, PRINTTOT+5*
ASUC("TR" REMARKS+5*, DONE+1!
>> ASUF("DLIDX" CMPT+5
>> ASUK( EN+6
>> ASUK("DT" PSER+1, PSER+3, PSER+5, CMPT+1
>> ASUK("PTR" EN+6
>> ASUK("PTRSEL" EN+3*, K+6
>> ASUL( K+3!
>> ASUL(1 EN+2, PSER+11
>> ASUL(2 PSER+10, HEADER+6, CMPT+2
>> ASUL(9 HEADER+8
>> ASUMB("E#" CMPT+13*, CMPT+14*, CMPT+15, CMPT+16
>> ASUMB("LOC" CMPT+16*, CMPT+17
>> ASUMB("QTYB/O" CMPT+16*, CMPT+17
>> ASUMB("USR" CMPT+16*, CMPT+17
>> ASUMB(1 CMPT+15*, CMPT+16
ASUMS K+1!, K+4!, CMPT+36!
ASUMS("D/I" CMPT+10, CMPT+11, CMPT+12
ASUMS("E#" PSER+6*, CMPT+2*, CMPT+3*, CMPT+4, CMPT+5*, CMPT+7, REMARKS+3*, REMARKS+6*, CHECKI+1*, READSTA+2*
, DONE+1!
ASUMS("EOQ" CMPT+6, CMPT+19
ASUMS("PMIQ" CMPT+8, CMPT+19
ASUMS("QTY" CMPT+8, CMPT+9*, CMPT+19
ASUMS("R73" CMPT+20
ASUMS("STA" CMPT+18, CMPT+21, CMPT+31
ASUMX K+1!, CMPT+36!
ASUMX("ACC" CMPT+18, CMPT+21, CMPT+31
ASUMX("AR U/I " , CMPT+19
ASUMX("DESC" CMPT+18
ASUMX("E#" CMPT+7*, CMPT+14, CMPT+15
ASUMX("IDX" CMPT+18, CMPT+21, CMPT+31
>> ASUU(10 REMARKS+3*, REMARKS+6, CHECKI+3*
>> ASUU(11 REMARKS+3*, REMARKS+6, CHECKI+2*
>> ASUU(12 PSER+13*, PSER+29, K+1!, CMPT+27*, CMPT+28, CMPT+29, CMPT+30, CMPT+31, CMPT+36!
>> ASUU(13 PSER+20*, PSER+23*, K+1!, PRINTLIN+3, PRINTLIN+6, PRINTLIN+11
ASUV K+1!
ASUV("B/O" PSER+29!, P2+4*, P2+5*, P2+7*, P2+8*, PRINTLIN+2, PRINTLIN+10, CMPT+9*, CMPT+13*, CMPT+15*
, CMPT+17, CMPT+22, CMPT+25, CMPT+36!
ASUV("D/I" PSER+7*, PSER+29!, P2+2*, P2+3*, PRINTLIN+8, PRINTLIN+9, CMPT+9*, CMPT+11*, CMPT+12, CMPT+22
, CMPT+23, CMPT+36!
ASUV("DI#" CMPT+10*, CMPT+11, CMPT+12
ASUV("IDX" CMPT+5*
ASUV("QTY" PSER+7*, P2+1*, PRINTLIN+1, PRINTLIN+7
ASUV("R73DTE" REMARKS+4*, DONE+1!
ASUV("R73PER" REMARKS+3*, DONE+1!
ASUV("ST" REMARKS+3*, REMARKS+5*, CHECKI+1, CHECKI+2, CHECKI+3, DONE+1!
ASUX K+1!
ASUX("ACC" PSER+8*, PSER+12*, PSER+13, PSER+14, PSER+20, PSER+21, PSER+30, HEADER+7
ASUX("DT" PSER+3*, HEADER+4
ASUX("IDX" PSER+8*, PSER+13*, PSER+14, PSER+20, PSER+21
ASUX("STA" PSER+8*, PSER+10*, PSER+11, PSER+12, PSER+13, PSER+14, PSER+20, PSER+21, HEADER+5
ASUX("TRL" PSER+19*, PSER+20*, PSER+21, CMPT+23*, CMPT+25*, CMPT+26*, CMPT+27
ASUX(0 PSER+14*, PSER+17, PSER+18, PSER+21*, PSER+23*, PSER+24, PSER+25, PSER+26, PSER+27, P2+1
, P2+2, P2+3, P2+4, P2+5, P2+6, P2+7, PRINTLIN+6, PRINTLIN+11, PRINTTOT+2, CMPT+18*
, CMPT+19*, CMPT+20*, CMPT+21*, CMPT+28*, CMPT+29*, CMPT+30*, CMPT+31*
>> DA FINDIDX+5*
DIC FINDIDX+1*, DONE+1!
DIC("A" FINDIDX+2*
DIC(0 FINDIDX+2*
DIE FINDIDX+5*, DONE+1!
DIR ASK+1!, DONE+1!
DIR("A" READSTA+1*, ASK+1*
DIR("B" ASK+1*
DIR(0 REMARKS+3*, CHECKI+2*, ASK+1*
DR FINDIDX+6*, DONE+1!
DT REMARKS+3
>> DTOUT READSTA+1, FINDIDX+4, ASK+2
>> DUOUT PSER+12, PSER+13, PSER+16, PSER+28, HEADER+2, PRINTLIN+3, PRINTLIN+5, PRINTTOT+1, READSTA+1, FINDIDX+4
, ASK+2
DUZ REMARKS+1, REMARKS+3
DUZ(2 EN+1
IO EN+1
IOF K+6, HEADER+2
>> IOP EN+5*
IOSL PSER+6, PSER+16, PSER+31, PRINTLIN+5, PRINTTOT+1
>> POP EN+5
U PSER+2, PSER+17, PSER+18, PSER+24, PSER+25, PSER+26, PSER+27, P2+1, P2+2, P2+3
, P2+4, P2+5, P2+6, P2+7, P2+8, PRINTLIN+6, PRINTLIN+11, PRINTTOT+2, CMPT+1, CMPT+4
, CMPT+11, CMPT+12, CMPT+16, CMPT+17, CMPT+18, CMPT+19, CMPT+20, CMPT+30, REMARKS+2, REMARKS+3
, CHECKI+1
X K+3*, K+4!, REMARKS+3*, READSTA+1
Y PSER+2*, PSER+3, PSER+4, PSER+5*, K+4!, REMARKS+4, FINDIDX+4, FINDIDX+5, ASK+3
Y(0 READSTA+2
>> ZTDESC EN+4*
>> ZTRTN EN+4*
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 |  Local Variables |  All