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 |  Marked Items |  All
Print Page as PDF
Routine: ASURO26A

Package: Supply

Routine: ASURO26A


Information

ASURO26A ; IHS/ITSC/LMH -CUPBOARD STOCK BIN LABLES ;

Source Information

Source file <ASURO26A.m>

Call Graph

Call Graph Total: 9

Package Total Call Graph
Supply 4 SETAREA^ASULARST  DIS^ASUMDIRM  READ^ASUMKBIO  PAZ^ASUURHDR  
Kernel 3 ^%ZIS  ^%ZISC  ^%ZTLOAD  
VA Fileman 2 ^DIC  ^DIR  

Caller Graph

Caller Graph Total: 2

Package Total Caller Graph
Supply 2 ASU826ACBL  ASURO26P  

Entry Points

Name Comments DBIA/ICR reference
USER ;Process Users in Sub Station
DIR ;Menu
1 ;;CUPBOARD STOCK BIN LABELS -ALPHA SEQ BY SUB STATION AND USER
COLUMN ;Display columns
A1 ;
A0 ;
3 ;;CUPBOARD STOCK BIN LABLES -INDEX SEQ
2 ;;CUPBOARD STOCK BIN LABLES -ALPHA SEQ BY CATEGORY
BLANK ;blank out one labels worth of print fields
KILSS ;
NEWPAGE ;Form feed code
COMPUTE ;
HED ;Header vars
BUILD ;Process Indexs in User
BYE ;
SLC ;Order on ASU1(16)...it will be in form STORAGE LOCATION H,R,or *
Q ;Queue
SST ;EP ;
LIST ;EP ;Taskman Entry Point
SU ;Select User for Sub-Station
EXIT ;
LOOP ;
USR ;EP ;

External References

Name Field # of Occurrence
^%ZIS Q+3
^%ZISC BYE+6
^%ZTLOAD Q+6
SETAREA^ASULARST ASURO26A+7
DIS^ASUMDIRM BUILD+8
READ^ASUMKBIO BUILD+5
PAZ^ASUURHDR BYE+6, NEWPAGE+2
^DIC SST+16, SU+9, SU+12
^DIR DIR+5, SST+8, USR+10

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,ASU1(10)," ",$P($T(@ASU1(10)),";",3)
  • Line Location: DIR+2
Function Call: WRITE
  • Prompt: !,"Report Queued.."
  • Line Location: Q+6
Function Call: WRITE
  • Prompt: !!,"******** NO DATA FOUND *********"
  • Line Location: EXIT+1
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: BYE+6
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: NEWPAGE+3
Function Call: WRITE
  • Prompt: !,ASUX(1),ASUC(1,1),?15,ASUX(2),ASUC(1,2),?24,ASUX(3)
  • Line Location: COLUMN+1
Function Call: WRITE
  • Prompt: ?41,ASUX(1),ASUC(2,1),?55,ASUX(2),ASUC(2,2),?64,ASUX(3)
  • Line Location: COLUMN+2
Function Call: WRITE
  • Prompt: ?81,ASUX(1),ASUC(3,1),?95,ASUX(2),ASUC(3,2),?104,ASUX(3)
  • Line Location: COLUMN+3
Function Call: WRITE
  • Prompt: !,ASUC(1,3)
  • Line Location: COLUMN+4
Function Call: WRITE
  • Prompt: ?41,ASUC(2,3)
  • Line Location: COLUMN+5
Function Call: WRITE
  • Prompt: ?81,ASUC(3,3)
  • Line Location: COLUMN+6
Function Call: WRITE
  • Prompt: !,ASUC(1,4),?37,ASUC(1,5)
  • Line Location: COLUMN+7
Function Call: WRITE
  • Prompt: ?41,ASUC(2,4),?73,ASUC(2,5)
  • Line Location: COLUMN+8
Function Call: WRITE
  • Prompt: ?81,ASUC(3,4),?115,ASUC(3,5)
  • Line Location: COLUMN+9
Function Call: WRITE
  • Prompt: !,ASUX(4),ASUC(1,6),?7,ASUX(5),ASUC(1,7),?13,ASUX(6),ASUC(1,8),?21,ASUX(7),ASUC(1,9)
  • Line Location: COLUMN+10
Function Call: WRITE
  • Prompt: ?41,ASUX(4),ASUC(2,6),?51,ASUX(5),ASUC(2,7),?57,ASUX(6),ASUC(2,8),?65,ASUX(7),ASUC(2,9)
  • Line Location: COLUMN+11
Function Call: WRITE
  • Prompt: ?81,ASUX(4),ASUC(3,6),?87,ASUX(5),ASUC(3,7),?93,ASUX(6),ASUC(3,8),?101,ASUX(7),ASUC(3,9)
  • Line Location: COLUMN+12
Function Call: WRITE
  • Prompt: !!
  • Line Location: COLUMN+13
Routine Call
  • DIC
  • Line Location:
    • SST+16
    • SU+9
    • SU+12
Routine Call
  • DIR
  • Line Location:
    • DIR+5
    • SST+8
    • USR+10
Routine Call
  • %ZIS
  • Line Location:
    • Q+3

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^ASUL(18 - [#9002039.18] Classic Fileman Calls
^ASUL(20 - [#9002039.2] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^ASUL(18 - [#9002039.18] SST+17
^ASUMK - [#9002033] A0+4, USER+5, BUILD+3, USR+21
^ASUMS - [#9002031] BUILD+14
^ASUMS("C" BUILD+9, BUILD+10, BUILD+11
^ASUMX - [#9002032] BUILD+15
^XTMP("ASUR" ASURO26A+5!, ASURO26A+6*, EXIT+1, BYE+4!, BUILD+29*, A1+1, A1+6, A1+8, A1+10, A1+12
, A1+14, SLC+2, SLC+4, LOOP+4, LOOP+8

Label References

Name Line Occurrences
A0 COMPUTE+2
A1 LIST+1
BLANK LOOP+11
BUILD USER+5, USER+8
COLUMN LOOP+2
COMPUTE Q+7, Q+8
DIR ASURO26A+9
EXIT ASURO26A+10
HED LIST+1
KILSS SST+8
LIST Q+8
LOOP SLC+8
NEWPAGE A1+15, A1+17, A1+19, A1+21, A1+23, SLC+9, SLC+11, COLUMN+14
SLC A1+14
SST DIR+8
SU USR+18, USR+22
USER A0+4, A0+7
USR DIR+9

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
%ZIS Q+3!*
ASU1 Q+5*, BYE+2!
ASU1( EXIT+3!
ASU1(10 DIR+2*
ASU1(11 BYE+1!, A1+4!, A1+5*, A1+6*, A1+8, A1+10, A1+12, A1+14, SLC+2, SLC+4
, LOOP+4, LOOP+8
ASU1(12 BYE+1!, A1+4!, A1+7*, A1+8*, A1+10, A1+12, A1+14, SLC+2, SLC+4, LOOP+4
, LOOP+8
ASU1(13 BYE+1!, A1+4!, A1+9*, A1+10*, A1+12, A1+14, SLC+2, SLC+4, LOOP+4, LOOP+8
ASU1(14 BYE+1!, A1+4!, A1+11*, A1+12*, A1+14, SLC+2, SLC+4, SLC+5, LOOP+4, LOOP+8
ASU1(15 BYE+1!, A1+4!, A1+13*, A1+14*, SLC+2, SLC+4, SLC+5, LOOP+4, LOOP+8
ASU1(16 BYE+1!, A1+4!, SLC+1*, SLC+2*, SLC+4, SLC+6, LOOP+4, LOOP+8
ASU1(17 BYE+1!, A1+4!, SLC+3*, SLC+4*, SLC+6, LOOP+4, LOOP+8
ASU1(18 BYE+1!, A1+4!, SLC+7*, SLC+8, LOOP+4*, LOOP+8
ASU1(19 BYE+1!, A1+4!, LOOP+2*, LOOP+12*
ASU1(20 BYE+1!, A1+4!, LOOP+9*, BLANK+2*
ASU1(21 LOOP+1*, LOOP+6*, LOOP+7, LOOP+9, LOOP+10, LOOP+11*, BLANK+1, BLANK+2
>> ASU2(2 A1+7*, A1+8*, A1+22*, A1+23
>> ASU2(3 A1+9*, A1+10*, A1+20*, A1+21
>> ASU2(4 A1+11*, A1+12*, A1+18*, A1+19
>> ASU2(5 A1+13*, A1+14*, A1+16*, A1+17
>> ASU2(6 A1+15, SLC+1*, SLC+2*, SLC+12*
>> ASU2(7 SLC+3*, SLC+4*, SLC+10*, SLC+11
>> ASU2(8 SLC+7*, SLC+9, LOOP+2, LOOP+6*
>> ASU2(9 LOOP+3*, LOOP+4*, LOOP+5, LOOP+10*
ASUC BYE+2!, BYE+5!, A0+8!
ASUC( LOOP+9*, BLANK+2*
ASUC("IDX" BUILD+3*, BUILD+4
ASUC("LAB" COLUMN+14*
ASUC(1 COLUMN+1, COLUMN+4, COLUMN+7, COLUMN+10
ASUC(2 COLUMN+2, COLUMN+5, COLUMN+8, COLUMN+11
ASUC(3 COLUMN+3, COLUMN+6, COLUMN+9, COLUMN+12
ASUE BYE+5!
ASUF EXIT+4!, BYE+2!
ASUF("BK" LOOP+7*, BLANK+1*, COLUMN+2, COLUMN+3, COLUMN+5, COLUMN+6, COLUMN+8, COLUMN+9, COLUMN+11, COLUMN+12
ASUF("NOQUE" Q+2*, BYE+2!, BYE+5!
ASUF("QU" ASURO26A+8!, DIR+2*, DIR+6, DIR+8!, DIR+9!, Q+7!, KILSS+1*
ASUFB BYE+2!
>> ASUK("DT" ASURO26A+6
ASUL BYE+3!
ASUL(1 A0+3, A0+4, USER+4, BUILD+6, BUILD+28
ASUL(2 A0+6, USR+22
ASUMB EXIT+4!, BYE+2!
ASUMK A0+8!
ASUMK("E#" USER+1*, USER+5, USER+8, BUILD+1*, BUILD+2*, BUILD+3*, BUILD+7, BUILD+9, BUILD+10, BUILD+11
, BUILD+13, BUILD+14, BUILD+15
ASUMK("SST" BUILD+28
ASUMK("ULQTY" BUILD+28
ASUMK("USR" BUILD+28
ASUMS EXIT+4!, BYE+2!, A0+8!
ASUMS("E#" BUILD+6*, BUILD+7*, BUILD+8, BUILD+9*, BUILD+10, BUILD+11*, BUILD+12, BUILD+14, BUILD+28
ASUMS("EOQ" BUILD+16*
ASUMS("SLC" BUILD+17*, BUILD+23
ASUMS(2 BUILD+14*, BUILD+16, BUILD+17
ASUMU BYE+2!
ASUMX EXIT+4!, BYE+2!, A0+8!
ASUMX("ACC" BUILD+18*, BUILD+22
ASUMX("AR U/I " , BUILD+27
ASUMX("CAT" BUILD+19*, BUILD+24
ASUMX("DESC" BUILD+20*, BUILD+21*, BUILD+26, BUILD+27, BUILD+28
ASUMX("IDX" BUILD+26, BUILD+27
ASUMX(0 BUILD+15*, BUILD+18, BUILD+19, BUILD+20, BUILD+21
ASUNW EXIT+1, EXIT+4!
ASUNW(0 COMPUTE+2*
ASUNW(4 COMPUTE+1*, COMPUTE+2
ASUR EXIT+4!, BYE+3!
ASUT EXIT+4!, BYE+3!, BYE+5!
ASUT(0 LOOP+8*, LOOP+9
ASUTG COMPUTE+2*, EXIT+4!, BYE+3!
ASUU A0+8!
ASUU("SELU" USR+17*, USR+18*, USR+20*, USR+21*, USR+22, SU+8, SU+9, SU+11, SU+12
ASUU("SST" DIR+7!, A0+1, A0+7, SST+6!, SST+11*, SST+17*, KILSS+1, USR+16, USR+18, SU+7
ASUU("USR" USER+2, USER+8, USR+7!, USR+13*, SU+9*, SU+12*
ASUV EXIT+4!, BYE+5!
ASUV("RP26" COMPUTE+1, BUILD+24, BUILD+26
ASUX BYE+3!, A0+8!
ASUX("ACCG" BUILD+22*, BUILD+29
ASUX("CAT" BUILD+24*, BUILD+25*, BUILD+29
ASUX("IDX" BUILD+26*, BUILD+29
ASUX("SLC" BUILD+23*, BUILD+29
ASUX("STA" A0+3*, A0+4*, A0+6*, A0+7*, USER+1, BUILD+29
ASUX("USR" USER+4*, USER+5*, USER+7*, USER+8*, BUILD+1, BUILD+29
ASUX(0 HED+1*
ASUX(1 HED+1*, COLUMN+1, COLUMN+2, COLUMN+3
ASUX(2 HED+1*, COLUMN+1, COLUMN+2, COLUMN+3
ASUX(3 HED+1*, COLUMN+1, COLUMN+2, COLUMN+3
ASUX(31 SST+10*, SST+13*
ASUX(32 SST+6*
ASUX(33 USR+12*, USR+15*
ASUX(4 HED+1*, COLUMN+10, COLUMN+11, COLUMN+12
ASUX(5 HED+1*, COLUMN+10, COLUMN+11, COLUMN+12
ASUX(6 HED+1*, COLUMN+10, COLUMN+11, COLUMN+12
ASUX(7 HED+1*, COLUMN+10, COLUMN+11, COLUMN+12
DIC SST+14*, SST+18!, KILSS+2!, SU+8*, SU+11*
DIC("A" SST+14*, SU+8*, SU+11*
DIC(0 SST+14*, SU+8*, SU+11*
DIR EXIT+4!, BYE+3!, SST+6!, KILSS+2!, USR+7!
DIR("A" DIR+3*, SST+7*, USR+9*
DIR("B" USR+8*
DIR(0 DIR+3*, SST+7*, USR+9*
>> DUOUT NEWPAGE+2, SU+9, SU+12
IO A1+3
IO("Q" Q+3!, Q+7
IO(0 EXIT+1
IOF BYE+6, NEWPAGE+3
ION Q+4
IOP Q+3!
>> POP Q+3, Q+7
U ASURO26A+6, BUILD+16, BUILD+17, BUILD+18, BUILD+19, BUILD+20, BUILD+21, BUILD+27, BUILD+28, LOOP+9
, SST+17
X DIR+2, EXIT+3*, A0+1*, A0+2, USER+2*, USER+3, BUILD+27*, BUILD+28*, BUILD+29, BUILD+30!
Y BUILD+8, SST+8, SST+9, SST+15, SST+16, SST+17, KILSS+2!, USR+11, SU+9, SU+12
ZRTN Q+1*, EXIT+4!
ZTDESC BYE+3!
ZTDTH Q+4!
ZTIO Q+4*, BYE+3!
ZTRTN BYE+3!
ZTSAVE Q+4!
ZTSAVE( Q+5*
ZTSK Q+4!

Marked Items

Name Field # of Occurrence
$T(@ASU1(1) DIR+2
$T(@ASUTG HED+1
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 |  Marked Items |  All