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

Package: Supply

Routine: ASURM79P


Information

ASURM79P ; IHS/ITSC/LMH -PRINT S.A.M.S. REPORT 79 ;

Source Information

Source file <ASURM79P.m>

Call Graph

Call Graph Total: 8

Package Total Call Graph
Supply 6 SETAREA^ASULARST  (PGM,REQ,SST,USR)^ASULDIRR  READ^ASUMYDIO  DATE^ASUUDATE  PAZ^ASUURHDR  (O,U)^ASUUZIS  
Kernel 2 (,HOME)^%ZIS  ^%ZISC  

Caller Graph

Caller Graph Total: 3

Package Total Caller Graph
Supply 3 ASU679ISPG  ASUCOMOR  ASUCORPX  

Entry Points

Name Comments DBIA/ICR reference
NEWPAGE ;FF
CMPT ;EP ;SORT
EN ;EP;PRIMARY ENTRY POINT FOR REPORT 79
OUT(X) ;EP; -Print Data line and subtotals for user/sub-station/program
PT ;Set program totals
SETHEADR ;Set hdrs
UT ;Set user totals
SST ;Set totals for sub-stations
HEADER ;Print hdr
PSER ;EP;FOR TASKMAN QUEUE OF PRINT
INITSST ;Initialize counters for sub-station totals 1 and 2
INITUSR ;Initialize counters for program totals 1 and 2
INITPGM ;Initialize counters for program totals 1 and 2
ACC(X) ;Write account -extrinsic
SETDATA ;Set DATA line

External References

Name Field # of Occurrence
^%ZIS EN+8
HOME^%ZIS EN+2
^%ZISC PSER+31
SETAREA^ASULARST EN+4
PGM^ASULDIRR HEADER+5
REQ^ASULDIRR PSER+11
SST^ASULDIRR PSER+7
USR^ASULDIRR PSER+11
READ^ASUMYDIO CMPT+7
DATE^ASUUDATE HEADER+1
PAZ^ASUURHDR PSER+31, HEADER+2
O^ASUUZIS EN+7
U^ASUUZIS PSER+2

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"Report must be run from Kernel option"
  • Line Location: EN+3
Function Call: WRITE
  • Prompt: !?4,$$ACC(ASUX("ACC"))
  • Line Location: PSER+13
Function Call: WRITE
  • Prompt: !?4,"USER TOT:"
  • Line Location: PSER+14
Function Call: WRITE
  • Prompt: !,"SUB-STA TOT:"
  • Line Location: PSER+17
Function Call: WRITE
  • Prompt: !?4,$$ACC(ASUU(1))
  • Line Location: PSER+19
Function Call: WRITE
  • Prompt: !,"SUB ST TOT:"
  • Line Location: PSER+21
Function Call: WRITE
  • Prompt: !,"PROGRAM TOT:"
  • Line Location: PSER+24
Function Call: WRITE
  • Prompt: !?4,$$ACC(ASUU(1))
  • Line Location: PSER+26
Function Call: WRITE
  • Prompt: !,"PROGRAM TOT:"
  • Line Location: PSER+28
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: HEADER+2
Function Call: WRITE
  • Prompt: !,"REPORT # 79 SUMMARY OF ISSUES TO PROGRAM",?60,ASUK("DT"),?120,"PAGE ",ASUX("PG"),!,"AREA NAME: ",ASUL(1,"AR","NM")
  • Line Location: HEADER+3
Function Call: WRITE
  • Prompt: !,"PROGRAM ",ASUL(22,"PGM")," - ",ASUL(22,"PGM","NM"),!!!,"SUB-STA",?13,ASU1(1),?36,ASU1(2),?60,ASU1(3),?82,ASU1(4),?104,ASU1(5),?118,ASU1(6),?126,ASU1(7)
  • Line Location: HEADER+6
Function Call: WRITE
  • Prompt: !?2,"USER",?20,ASU2(1),?29,ASU2(2),?41,ASU2(3),?52,ASU2(4),?65,ASU2(5),?73,ASU2(6),?84,"REQUESTED",?104,ASU2(8),?118,ASU2(9),?126,ASU2(10)
  • Line Location: HEADER+8
Function Call: WRITE
  • Prompt: !?4,"ACCNT",?84,ASU2(7),?106,ASU3(1),?119,ASU3(2),?127,ASU3(3)
  • Line Location: HEADER+10
Function Call: WRITE
  • Prompt: !!,ASUR("LN")
  • Line Location: HEADER+11
Function Call: WRITE
  • Prompt: ?15,$J($FN(ASUX(X,1),","),7)
  • Line Location: OUT+9
Function Call: WRITE
  • Prompt: ?25,$J($FN(ASUX(X,2),","),9)
  • Line Location: OUT+10
Function Call: WRITE
  • Prompt: ?36,$J($FN(ASUX(X,3),","),7)
  • Line Location: OUT+11
Function Call: WRITE
  • Prompt: ?48,$J($FN(ASUX(X,4),","),9)
  • Line Location: OUT+12
Function Call: WRITE
  • Prompt: ?60,$J($FN(ASUX(X,5),","),7)
  • Line Location: OUT+13
Function Call: WRITE
  • Prompt: ?70,$J($FN(ASUX(X,6),","),9)
  • Line Location: OUT+14
Function Call: WRITE
  • Prompt: ?82,$J($FN(ASUX(X,7),","),4)
  • Line Location: OUT+15
Function Call: WRITE
  • Prompt: ?89,$J($FN(ASUX(X,8),","),6)
  • Line Location: OUT+16
Function Call: WRITE
  • Prompt: ?97,$J(ASUX(X,9),4,1)
  • Line Location: OUT+17
Function Call: WRITE
  • Prompt: ?103,$J($FN(ASUX(X,10),","),5)
  • Line Location: OUT+18
Function Call: WRITE
  • Prompt: ?108,$J($FN(ASUX(X,11),","),7)
  • Line Location: OUT+19
Function Call: WRITE
  • Prompt: ?118,$J($FN(ASUX(X,12),","),6)
  • Line Location: OUT+20
Function Call: WRITE
  • Prompt: ?126,$J($FN(ASUX(X,13),","),6)
  • Line Location: OUT+21
Routine Call
  • %ZIS
  • Line Location:
    • EN+2
Routine Call
  • %ZIS
  • Line Location:
    • EN+8

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^ASUMY - [#9002034] CMPT+3, CMPT+4, CMPT+5
^XTMP("ASUR" PSER+1, PSER+4, PSER+5, PSER+6, PSER+9, PSER+13, CMPT+1!, CMPT+2*, CMPT+11, CMPT+14*

Label References

Name Line Occurrences
$$ACC PSER+13, PSER+19, PSER+26
CMPT PSER+1
HEADER PSER+5, NEWPAGE+1
INITPGM PSER+5
INITSST PSER+6
INITUSR PSER+9
NEWPAGE PSER+6, PSER+9, PSER+13, PSER+14, PSER+17, PSER+19, PSER+21, PSER+24, PSER+26, PSER+28
OUT PSER+15, PSER+20, PSER+22, PSER+27, PSER+29, PT+5
PSER EN+6
SETDATA PSER+13
SETHEADR PSER+3

Naked Globals

Name Field # of Occurrence
^( PSER+13

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
ASU1 CMPT+15!
ASU1(1 SETHEADR+2*, HEADER+6
ASU1(2 SETHEADR+2*, HEADER+6
ASU1(3 SETHEADR+2*, HEADER+6
ASU1(4 SETHEADR+2*, HEADER+6
ASU1(5 SETHEADR+2*, HEADER+6
ASU1(6 SETHEADR+2*, HEADER+6
ASU1(7 SETHEADR+2*, HEADER+6
ASU2 CMPT+15!
ASU2(1 SETHEADR+4*, HEADER+8
ASU2(10 SETHEADR+4*, HEADER+8
ASU2(2 SETHEADR+4*, HEADER+8
ASU2(3 SETHEADR+4*, HEADER+8
ASU2(4 SETHEADR+4*, HEADER+8
ASU2(5 SETHEADR+4*, HEADER+8
ASU2(6 SETHEADR+4*, HEADER+8
ASU2(7 SETHEADR+4*, HEADER+10
ASU2(8 SETHEADR+4*, HEADER+8
ASU2(9 SETHEADR+4*, HEADER+8
ASU3 CMPT+15!
ASU3(1 SETHEADR+6*, HEADER+10
ASU3(2 SETHEADR+6*, HEADER+10
ASU3(3 SETHEADR+6*, HEADER+10
ASUC PSER+32!
>> ASUF("OK" CMPT+6!, CMPT+8*, CMPT+9, CMPT+15!
ASUK PSER+34!, CMPT+16!
ASUK( EN+9
ASUK("DT" HEADER+1, HEADER+3, CMPT+2
ASUK("PTR" EN+9
ASUK("PTRSEL" EN+5*, EN+6, PSER+31, PSER+34
>> ASUL( PSER+33!
>> ASUL(1 EN+4, HEADER+3, CMPT+10
>> ASUL(18 PSER+8
>> ASUL(19 PSER+12
>> ASUL(20 PSER+12
>> ASUL(22 HEADER+6
ASUMY CMPT+11*, CMPT+12*, CMPT+13*, CMPT+14, CMPT+15!
ASUMY("E#" CMPT+3*, CMPT+4*, CMPT+5*, CMPT+10, CMPT+11, CMPT+14
ASUMY(0 CMPT+8, CMPT+12, CMPT+13
>> ASUP("TYP" CMPT+16
ASUR PSER+32!
ASUR("LN" HEADER+11*
ASUU PSER+32!
ASUU(0 INITSST+2*, INITPGM+1*, INITUSR+1*, UT+1*, SST+1*, SST+2*, PT+1*, PT+2*, CMPT+8*
ASUU(1 PSER+18*, PSER+19, PSER+25*, PSER+26
ASUU(2 PSER+18*, PSER+25*
ASUW CMPT+16!
ASUX PSER+32!, CMPT+13*, CMPT+15!
ASUX( OUT+9, OUT+10, OUT+11, OUT+12, OUT+13, OUT+14, OUT+15, OUT+16, OUT+17, OUT+18
, OUT+19, OUT+20, OUT+21
ASUX("ACC" PSER+13*, SST+1, PT+1
ASUX("ARST" PSER+4*, PSER+5, PSER+6, PSER+9, PSER+13
ASUX("DTA" PSER+13*, SETDATA+1, SETDATA+2, SETDATA+3, SETDATA+4, SETDATA+5, SETDATA+6, SETDATA+7, SETDATA+8, SETDATA+9
, SETDATA+10, SETDATA+14, SETDATA+15, SETDATA+16, SETDATA+17
ASUX("FLD" SETDATA+1*, SETDATA+2*, SETDATA+3*, SETDATA+4*, SETDATA+5*, SETDATA+6*, SETDATA+7*, SETDATA+8*, SETDATA+11*, SETDATA+13*
, SETDATA+14*, SETDATA+15*, SETDATA+16*, SETDATA+17*, UT+1, SST+1, SST+2, PT+1, PT+2
ASUX("PG" HEADER+2*, HEADER+3
ASUX("PGM" PSER+5*, PSER+6, PSER+9, PSER+13, PSER+25, INITPGM+1*, HEADER+5, PT+1*
ASUX("PGU" INITPGM+2!, PT+2*
ASUX("REQ" PSER+10*, PSER+11
ASUX("SS" PSER+18*
ASUX("SST" PSER+6*, PSER+7, PSER+9, PSER+10, PSER+13, PSER+18, INITSST+2*, SST+1*, CMPT+10*, CMPT+11
, CMPT+14
ASUX("SSU" INITSST+3!, SST+2*
ASUX("US1" PSER+25*, INITUSR+2!
ASUX("USR" PSER+9*, PSER+10, PSER+11, PSER+13, INITUSR+1*, UT+1*, CMPT+10*, CMPT+11, CMPT+14
>> DUOUT PSER+4, PSER+5, PSER+6, PSER+9, PSER+13, PSER+14, PSER+17, PSER+18, PSER+19, PSER+21
, PSER+24, PSER+25, PSER+26, PSER+28, HEADER+2
DUZ(2 EN+3
IO EN+2
IOF PSER+31, HEADER+2
>> IOP EN+8*
IOSL NEWPAGE+1
POP EN+8, PSER+32!
U PSER+18, PSER+25, SETDATA+1, SETDATA+2, SETDATA+3, SETDATA+4, SETDATA+5, SETDATA+6, SETDATA+7, SETDATA+8
, SETDATA+9, SETDATA+10, SETDATA+14, SETDATA+15, SETDATA+16, SETDATA+17, SST+1, PT+1, CMPT+2, CMPT+8
, CMPT+13, CMPT+14
X PSER+33*, ACC~, ACC+1*, ACC+2, SETDATA+10*, SETDATA+11, OUT~, OUT+9, OUT+10, OUT+11
, OUT+12, OUT+13, OUT+14, OUT+15, OUT+16, OUT+17, OUT+18, OUT+19, OUT+20, OUT+21
Y PSER+32!
>> ZTDESC EN+7*
>> ZTRTN EN+7*
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All