Routine: ASUCORUN

Package	Total	Call Graph
Supply	1	(EN2,SETCTRL)^ASUCOSTS
VA Fileman	1	^DIR

Package	Total	Caller Graph
Supply	4	ASUCODAY ASUCOMTH ASUCOYER ASUUDATE

Name	Comments	DBIA/ICR reference
ASK	;EP ;GET RUN DATE
SETRUN	;EP ; -SET RUN DATE EQUAL DATE
KILL	;EP; COMMON TRANSACTION PROCESSING ROUTINE VARIABLE KILL

Name	Field # of Occurrence
ASU	KILL+1!
>> ASUK("DT"	SETRUN+4, SETRUN+5, SETRUN+7
ASUM	KILL+1!
>> ASUP("CKI"	ASUCORUN+37
>> ASUP("CKP"	ASUCORUN+11
>> ASUP("CKS"	ASUCORUN+34
>> ASUP("HLT"	ASUCORUN+17, ASUCORUN+25, ASUCORUN+28, ASUCORUN+31, ASUCORUN+40, ASK+2*
>> ASUP("IVR"	ASUCORUN+37
>> ASUP("LSMO"	ASUCORUN+29
>> ASUP("LSTN"	ASUCORUN+15
>> ASUP("LSTY"	ASUCORUN+12
>> ASUP("MO"	ASUCORUN+29, ASK+3, SETRUN+2, SETRUN+3, SETRUN+4, SETRUN+8
>> ASUP("MOYR"	ASUCORUN+29, ASK+3, SETRUN+8*
>> ASUP("NXMO"	SETRUN+1, SETRUN+2
>> ASUP("OK"	ASUCORUN+11, ASUCORUN+17, ASUCORUN+25, ASUCORUN+26, ASUCORUN+27, ASUCORUN+36, ASUCORUN+39, ASUCORUN+40, ASUCORUN+41*
>> ASUP("RE*"	ASUCORUN+18, ASUCORUN+25, ASUCORUN+28, ASUCORUN+31, ASUCORUN+32, ASUCORUN+33, ASUCORUN+36, ASUCORUN+39*
>> ASUP("STR"	ASUCORUN+34
>> ASUP("STS"	ASUCORUN+11
>> ASUP("TYP"	ASUCORUN+12, ASUCORUN+14, ASUCORUN+29
>> ASUP("YR"	ASUCORUN+29, ASK+3, SETRUN+5, SETRUN+7, SETRUN+8
ASUS	KILL+1!
ASUSV	KILL+1!
ASUT	KILL+1!
ASUV	KILL+1!
DA	KILL+2!
DIC	KILL+2!
DIE	KILL+2!
DIR	ASUCORUN+16!, ASK+1!
DIR("?"	ASUCORUN+20*
DIR("A"	ASUCORUN+21, ASK+1
DIR("B"	ASUCORUN+22*
DIR(0	ASUCORUN+16, ASUCORUN+23, ASK+1*
DR	KILL+2!
>> DTOUT	ASUCORUN+25, ASK+2
>> DUOUT	ASUCORUN+25, ASK+2
U	ASK+3
X	SETRUN+2*, KILL+2!
Y	ASUCORUN+26, ASK+3, KILL+2!

Information