Routine: ASUMSTWR

Package	Total	Call Graph
VA Fileman	1	(IX,IX1)^DIK

Package	Total	Caller Graph
Supply	8	ASU1DUPD ASU2RUPD ASU3IUPD ASU5SUPD ASU6JUPD ASUCOMOR ASURD130 ASURD72P

Entry Points

Name	Comments	DBIA/ICR reference
D	;EP; DELETE STATION MASTER
MI	;EP SET STATION MASTER DATA VARIABLES
MIC	;EP SET STATION DEMAND DATA,(SUBSCRIPTED BY MONTH)
M	;EP SET ALL FIELDS -STA MASTER
MEXP	;
MIX	;EP ;SET ONLY MAIN FIELDS THEN RE-CROSSREFERENCE
S	;EP SET FIELDS -STA MASTER
ASUN2	;
ASUN3	;
X	;
MMC	;GET ONE MONTH

External References

Name	Field # of Occurrence
IX^DIK	D+7
IX1^DIK	X+2

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^ASUMS - [#9002031]	M+6, M+7, M+8, M+9, S+5, ASUN3+5, ASUN3+6, ASUN3+7, MMC+5, MMC+6 , MEXP+2!, MEXP+3, MEXP+4, MEXP+6, D+3, D+4*

Label References

Name	Line Occurrences
ASUN2	MI+24
MEXP	M+2
MI	M+2, MIX+1
MIC	M+2
MMC	MIC+3
X	M+10, MIX+1

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
%	M+11!
>> ASUK("DT"	D+4
>> ASUL(1	D+2
>> ASUL(2	S+1, D+5, D+6
>> ASUMS("AR"	S+4
>> ASUMS("D/I"	MI+25, MI+26, MI+27, MI+28, MI+29, MI+30, MI+31, MI+32, MI+33, MI+34 , MI+35, MI+36, MI+37, MI+38, MI+39, ASUN2+9, ASUN2+10, ASUN2+11
>> ASUMS("D/O"	ASUN2+2
>> ASUMS("DMD"	MIC+4!, MMC+1, MMC+2, MMC+3, MMC+4, MMC+5
>> ASUMS("DXP"	MEXP+4, MEXP+6
>> ASUMS("E#"	M+6, M+7, M+8, M+9, X+1, S+1, S+2, S+5, MI+1, MI+2 , MI+4, ASUN3+5, ASUN3+6, ASUN3+7, MIC+1, MMC+5, MMC+6, MEXP+2, MEXP+3, MEXP+4 , MEXP+6, D+2*, D+3, D+4, D+6
>> ASUMS("EOQ"	MI+12, MI+13, MI+14, MI+15, MI+17, MI+18*, ASUN2+5
>> ASUMS("ESTB"	MI+5
>> ASUMS("LPP"	MI+21
>> ASUMS("LSTISS"	MI+19
>> ASUMS("LTM"	MI+8
>> ASUMS("ORD#"	MI+6
>> ASUMS("PMIQ"	MI+10
>> ASUMS("QTY"	MI+23
>> ASUMS("QTY-BEG"	ASUN2+8
>> ASUMS("R13"	ASUN3+4
>> ASUMS("R73"	ASUN3+1, ASUN3+2, ASUN3+3
>> ASUMS("RPQ"	MI+11
>> ASUMS("RPQ-O"	MI+9
>> ASUMS("SFSKM"	ASUN2+4
>> ASUMS("SLC"	ASUN2+1
>> ASUMS("SPQ"	ASUN2+6
>> ASUMS("SRC"	MI+7
>> ASUMS("STA"	S+3
>> ASUMS("VAL"	MI+22
>> ASUMS("VALBEG"	ASUN2+7
>> ASUMS("VENAM"	MI+20
>> ASUMS("VENUI"	ASUN2+3
>> ASUMS(0	S+3, S+4, S+5, MI+4, MI+5, MI+6, MI+7, MI+8, MI+9, MI+10* , MI+11, MI+12, MI+13, MI+14, MI+15, MI+19, MI+20, MI+21, MI+22, MI+23 , MI+25, MI+26, MI+27, MI+28, MI+29, MI+30, MI+31, MI+32, MI+33, MI+34 , MI+35, MI+36, MI+37, MI+38, MI+39*, ASUN3+5
>> ASUMS(2	ASUN2+1, ASUN2+2, ASUN2+3, ASUN2+4, ASUN2+5, ASUN2+6, ASUN2+7, ASUN2+8, ASUN2+9, ASUN2+10 , ASUN2+11*, ASUN3+6
>> ASUMS(3	ASUN3+1, ASUN3+2, ASUN3+3, ASUN3+4, ASUN3+7
>> ASUMX("E#"	MI+1
>> ASUS("ADD"	M+1, M+3, M+4, M+5, MI+3, MI+24, ASUN3+8!, MIC+2*, MMC+6
>> ASUT	D+4
>> ASUT(	D+4
>> ASUU(19	MI+16*, MI+17, MI+18
>> ASUV("MO"	MIC+3*, MIC+4!, MMC+2, MMC+3, MMC+4, MMC+5, MMC+6
DA	X+1, D+2, D+6*, D+7!
DA(1	X+1, D+6
DH	M+11!
DIG	M+11!
DIH	M+11!
DIK	X+1, X+2!, D+5, D+7!
DIKGP	M+11!
DIKND	M+11!
DIKNM	M+11!
DIKNX	M+11!
DIKST	M+11!
DIKZ1	M+11!
DIV	M+11!
DIW	M+11!
DIWF	M+11!
U	M+7, M+8, S+3, S+4, MI+4, MI+5, MI+6, MI+7, MI+8, MI+9 , MI+10, MI+11, MI+12, MI+13, MI+14, MI+15, MI+19, MI+20, MI+21, MI+22 , MI+23, MI+25, MI+26, MI+27, MI+28, MI+29, MI+30, MI+31, MI+32, MI+33 , MI+34, MI+35, MI+36, MI+37, MI+38, MI+39, ASUN2+1, ASUN2+2, ASUN2+3, ASUN2+4 , ASUN2+5, ASUN2+6, ASUN2+7, ASUN2+8, ASUN2+9, ASUN2+10, ASUN2+11, ASUN3+1, ASUN3+2, ASUN3+3 , ASUN3+4, MMC+2, MMC+3, MMC+4, MEXP+4, MEXP+6, D+3, D+4
X	MEXP+1~
>> Y	MEXP+5, MEXP+6

Customize PDF page

Package: Supply

Routine: ASUMSTWR

Information

Source Information

Call Graph

Call Graph Total: 1

Caller Graph

Caller Graph Total: 8

Entry Points

External References

Global Variables Directly Accessed

Label References

Local Variables

Legend: