Routine: ASUUDATE

Package	Total	Call Graph
VA Fileman	3	^%DT (,NOW,YX)^%DTC ^DIR
Supply	1	ASK^ASUCORUN

Package

Total

Call Graph

VA Fileman

^%DT (,NOW,YX)^%DTC ^DIR

Supply

ASK^ASUCORUN

Package	Total	Caller Graph
Supply	36	ASU0PURG ASUCODAY ASUCOHKP ASUCOMOR ASUCOMTH ASUCOPSP ASUCORPX ASUCOYER ASUJOLIB ASUJTRAN ASUJVALF ASUMKBPS ASURD01P ASURD02P ASURD13P ASURD70I ASURD70P ASURD72P ASURD73P ASURDINV ASURDSTD ASURM77P ASURM78P ASURM79P ASURM83P ASURMBSP ASURMSTD ASURO26P ASURO76P ASURO800 ASURQ810 ASURQSTD ASUV0NT ASUVAR ASUW2SAM ASUW2STO

Package

Total

Caller Graph

Supply

ASU0PURG  ASUCODAY  ASUCOHKP  ASUCOMOR  ASUCOMTH  ASUCOPSP  ASUCORPX  ASUCOYER
ASUJOLIB  ASUJTRAN  ASUJVALF  ASUMKBPS  ASURD01P  ASURD02P  ASURD13P  ASURD70I
ASURD70P  ASURD72P  ASURD73P  ASURDINV  ASURDSTD  ASURM77P  ASURM78P  ASURM79P
ASURM83P  ASURMBSP  ASURMSTD  ASURO26P  ASURO76P  ASURO800  ASURQ810  ASURQSTD
ASUV0NT  ASUVAR  ASUW2SAM  ASUW2STO

Entry Points

Name	Comments	DBIA/ICR reference
SETRUN	;EP ; -SET RUN DATE EQUAL DATE
DAYTIM	;EP; -SET DATE AND TIME
GETRUN	;EP ; -GET RUN FISCAL YEAR AND MONTH
SETQTR	;EP ;INPUT- DT AND ASUP("MO") OUTPUT- ASUP("QTR") IN YRQT FORMAT
ASKDATE	;EP -ASK FOR A DATE AND SET ASUK("DT") ARRAY
SETDT(X)
TIME	;EP; -SET ASUK("TIME")
DATE	;EP; -SET ASUK("DT")
SETMO(X)	;EP ; -SET MONTHLY RUN PARAMETERS

Name	Field # of Occurrence
^%DT	ASKDATE+1
^%DTC	SETDT+20
NOW^%DTC	DATE+3
YX^%DTC	TIME+2
ASK^ASUCORUN	SETQTR+2
^DIR	GETRUN+2, SETRUN+33

Name	Line Occurrences (* Changed, ! Killed)
^ASUSITE(1	SETRUN+15
^DD("DD"	DATE+3, ASKDATE+2

Name	Line Occurrences
DATE	DAYTIM+1, GETRUN+1, SETRUN+1, SETQTR+1
SETDT	DATE+4, ASKDATE+3
TIME	DAYTIM+2, ASKDATE+3

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> %	DATE+3
%DT	ASKDATE+1~*
>> %H	SETDT+22, SETDT+23, TIME+2*, TIME+3
>> ASUK("DT"	DAYTIM+3, DATE+2, SETDT+1, SETDT+2, SETDT+3, SETDT+4, SETDT+5, SETDT+6, SETDT+7, SETDT+8 , SETDT+9, SETDT+10, SETDT+11, SETDT+12, SETDT+13, SETDT+14, SETDT+15, SETDT+16, SETDT+17, SETDT+18* , SETDT+19, SETDT+20, SETDT+21, SETDT+23, TIME+5, TIME+6, TIME+8, GETRUN+1, GETRUN+4, GETRUN+5* , GETRUN+6, GETRUN+7, GETRUN+8, GETRUN+9, SETMO+2, SETMO+5, SETMO+6, SETMO+7, SETMO+8, SETRUN+1 , SETRUN+2, SETRUN+5, SETRUN+6, SETRUN+7, SETRUN+8, SETRUN+9, SETRUN+10, SETRUN+12, SETRUN+13, SETRUN+14* , SETRUN+15, SETRUN+16, SETRUN+17, SETRUN+18, SETRUN+20, SETRUN+23, SETRUN+24, SETRUN+25, SETRUN+26, SETRUN+28 , SETQTR+1
>> ASUK("TIME"	DAYTIM+3, SETDT+23, SETDT+24, TIME+3, TIME+4, TIME+6
>> ASUP("ERR"	SETMO+4, SETMO+8, SETMO+9*
>> ASUP("LSMO"	SETRUN+5
>> ASUP("MO"	SETMO+1*, SETMO+3, SETMO+5, SETMO+6, SETMO+7, SETMO+8, SETQTR+2, SETQTR+5
>> ASUP("MOE"	SETRUN+5
>> ASUP("MOL"	SETMO+5, SETMO+7, SETRUN+5
>> ASUP("MOYR"	SETMO+3*
>> ASUP("QTR"	SETQTR+5*
>> ASUP("TYP"	SETRUN+20
>> ASUP("YR"	SETMO+2*, SETMO+3, SETQTR+4
>> ASUT	DAYTIM+3
>> ASUT(	DAYTIM+3*
>> ASUV("YR"	SETQTR+4*, SETQTR+5, SETQTR+6!
DIR	GETRUN+2!, SETRUN+33!
DIR("A"	SETQTR+2*
DIR(0	GETRUN+2, SETRUN+33
>> DTOUT	GETRUN+3, SETQTR+3
>> DUOUT	GETRUN+3, SETRUN+34*, SETQTR+3
DUZ	DAYTIM+3
U	SETRUN+15
X	DATE+1~, DATE+4, SETDT~, SETDT+1, SETDT+3, SETDT+4, SETDT+5, SETDT+6, SETDT+8, SETDT+21 , ASKDATE+1, ASKDATE+3, TIME+1~, SETMO~, SETMO+1, SETMO+2, SETRUN+6, SETRUN+7
>> X1	SETDT+20*
>> X2	SETDT+20*
>> Y	DATE+3*, SETDT+1, SETDT+24, ASKDATE+1, TIME+3, TIME+8, GETRUN+5

Customize PDF page

Package: Supply

Routine: ASUUDATE

Information

Source Information

Call Graph

Call Graph Total: 4

Caller Graph

Caller Graph Total: 36

Entry Points

External References

Global Variables Directly Accessed

Label References

Local Variables

Legend: