Routine: ASURQ82P

Package	Total	Call Graph
Supply	8	(ARE,SETAREA,STA)^ASULARST ACC^ASULDIRF (REQ,SST,USR)^ASULDIRR READ^ASUMXDIO ^ASURQ810 CLS^ASUUHDG PAZ^ASUURHDR (C,O,U)^ASUUZIS
Kernel	1	(,HOME)^%ZIS

Package	Total	Caller Graph
Supply	2	ASU782LYRI ASURQSTD

Entry Points

Name	Comments	DBIA/ICR reference
P2	;
PRLVAL	;EP ; PRINT VALUES ISSUED -CUR QTR/YTD/AVERAGE
EN	;EP;PRIMARY ENTRY POINT FOR REPORT 82
TOTNAM	;;ITEM TOTAL
HEADER	;PRINT PAGE HEADINGS
K	;
PRCOLM	;
PRDDSH	;
PSER	;EP;FOR TASKMAN QUEUE OF PRINT
P1	;
PRLQTY	;
PRSST	;
PRTOTL	;PRINT TOTAL LINES
PRDDSHV	;
P3	;
PRDASH	;
PRDASHV	;

External References

Name	Field # of Occurrence
^%ZIS	EN+7
HOME^%ZIS	EN+2
ARE^ASULARST	PSER+10
SETAREA^ASULARST	EN+4
STA^ASULARST	PSER+12
ACC^ASULDIRF	PSER+24
REQ^ASULDIRR	P1+12
SST^ASULDIRR	P1+8
USR^ASULDIRR	P1+8
READ^ASUMXDIO	P1+1
^ASURQ810	PSER+5
CLS^ASUUHDG	PSER+31
PAZ^ASUURHDR	HEADER+2
C^ASUUZIS	K+6
O^ASUUZIS	EN+6
U^ASUUZIS	PSER+6

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !,"Report must be run from Kernel option" Line Location: EN+3
Function Call: WRITE	Prompt: !!,"No Data for Yearly Item Report for this quarter" Line Location: PSER+8
Function Call: WRITE	Prompt: !?10,ASUMX("DESC",2) Line Location: P1+34
Function Call: WRITE	Prompt: ?50,ASUL(18,"SST"),?55,ASUL(19,"USR") Line Location: P2+1
Function Call: WRITE	Prompt: ?ASURZX,ASURZ Line Location: PRCOLM+1
Function Call: WRITE	Prompt: !,$P($T(TOTNAM+ASUV("LEV")),";",4) Line Location: PRTOTL+3
Function Call: WRITE	Prompt: ?X," _________" Line Location: PRDASH+1
Function Call: WRITE	Prompt: ?X," ___________",?1,"" Line Location: PRDASHV+1
Function Call: WRITE	Prompt: ! Line Location: PRDDSH+1
Function Call: WRITE	Prompt: ?X," =========" Line Location: PRDDSH+2
Function Call: WRITE	Prompt: ?X," ===========",?1,"" Line Location: PRDDSHV+1
Function Call: WRITE	Prompt: ! Line Location: PRSST+6
Function Call: WRITE	Prompt: @IOF,!,"REPORT #82 QUARTERLY LISTING OF YEARLY ITEMS",?70,"DATE : ",ASUV("DT"),?95,"PAGE :",$J(ASUC("PG"),3) Line Location: HEADER+3
Function Call: WRITE	Prompt: !,"AREA: ",ASUQA("AR"),?50,$S(ASUT("QTR")="04":"LAST",ASUT("QTR")="03":"THIRD",ASUT("QTR")="02":"SECOND",1:"1ST")," QUARTER OF FISCAL YEAR ",ASUP("YR") Line Location: HEADER+4
Function Call: WRITE	Prompt: !,"STAT: ",ASUQA("STA"),?53,"GL ACCOUNT : ",ASUQA("ACC") Line Location: HEADER+5
Function Call: WRITE	Prompt: !!?68,"QUANTITY ISSUED",?96,"ISSUE VALUE ISSUE VALUE" Line Location: HEADER+6
Function Call: WRITE	Prompt: !?3,"INDEX ITEM",?45,"U",?49,"SUB",?55,"USER",?64,"CURRENT",?83,"MONTHLY",?96,"CURRENT",?119,"MONTHLY" Line Location: HEADER+7
Function Call: WRITE	Prompt: !?2,"NUMBER DESCRIPTION",?46,"I",?49,"STA",?55,"CODE",?64,"QUARTER",?76,"Y-T-D",?83,"AVERAGE",?96,"QUARTER",?110,"Y-T-D",?119,"AVERAGE" Line Location: HEADER+8
Function Call: WRITE	Prompt: ! Line Location: HEADER+9
Function Call: WRITE	Prompt: "_" Line Location: HEADER+9
Function Call: WRITE	Prompt: !! Line Location: HEADER+10
Routine Call	%ZIS Line Location: EN+2
Routine Call	%ZIS Line Location: EN+7

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^ASUL(1 - [#9002039.01]	PSER+10
^DD("DD"	PSER+14
^XTMP("ASUR"	PSER+2, PSER+7, PSER+12, PSER+14, PSER+16, PSER+19, P1+4, P1+14

Label References

Name	Line Occurrences
HEADER	P1+22, PRTOTL+2
K	PSER+8, PSER+27
P1	PSER+26
P2	P1+32
P3	P1+21
PRCOLM	PRLQTY+4, PRLVAL+4
PRDASH	PRTOTL+7
PRDASHV	PRSST+6
PRDDSH	PRTOTL+10
PRDDSHV	PRTOTL+18
PRLQTY	PRTOTL+10
PRLVAL	PRTOTL+17, PRSST+5
PRSST	PRTOTL+13
PRTOTL	PSER+23, PSER+29, PSER+30, P1+35
PSER	EN+5

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
ASUC	PSER+19, PSER+27, K+1!, PRDASH+1, PRDASHV+1, PRDDSH+2, PRDDSHV+1, HEADER+9
ASUC("LN"	PSER+15, P1+23, P1+27, P1+34, PRLVAL+5, PRTOTL+1, PRTOTL+4, PRTOTL+9, PRTOTL+16, PRDASHV+2 , PRDDSHV+2, HEADER+11
ASUC("PG"	PSER+15, HEADER+1, HEADER+2, HEADER+3
>> ASUF("HDR"	PSER+1, P1+22, PRLVAL+5, PRTOTL+1, PRTOTL+2, PRTOTL+12, HEADER+11*
>> ASUF("IDX"	P1+3, P1+24, P1+25, P1+26, P1+31*, P1+34, P1+35
>> ASUK(	EN+8
>> ASUK("PTR"	EN+8
>> ASUK("PTRSEL"	EN+5*, K+5
>> ASUL(	K+2!, P1+5!, P1+7!, P1+11!
>> ASUL(1	EN+4, PSER+11
>> ASUL(18	P1+9, P2+1, PRTOTL+5, PRTOTL+14, PRTOTL+19*
>> ASUL(19	P1+13, P2+1
>> ASUL(2	PSER+13
>> ASUL(9	PSER+18!, PSER+22, PSER+23, PSER+25
ASUMS	K+1!
>> ASUMX("ACC"	PSER+21*, PSER+22, PSER+24
>> ASUMX("AR U/I	" , P1+30
>> ASUMX("DESC"	P1+25, P1+29, P1+34
>> ASUMX("E#"	P1+1*
>> ASUMX("IDX"	P1+28
>> ASUP("TYP"	PSER+4
>> ASUP("YR"	PSER+16*, HEADER+4
>> ASUQ	P1+14*, P1+15, P1+16, P1+17, P1+18, P1+19, P1+20
>> ASUQA(	PRLQTY+3, PRLVAL+3, PRTOTL+20!, PRSST+2, P3+6, P3+7, P3+8, P3+9
>> ASUQA("ACC"	PSER+25*, HEADER+5
>> ASUQA("AR"	PSER+11*, HEADER+4
>> ASUQA("DIV"	PSER+17*, P1+17, P1+20
>> ASUQA("SST"	P1+9*
>> ASUQA("STA"	PSER+9, PSER+13, HEADER+5
>> ASUQA("USR"	P1+13*
>> ASUQA(0	P1+15, P1+16, P1+17, P1+18, P1+19, P1+20, P3+2, P3+3
ASUQX	K+1!
ASUR	K+1!
ASURZ	K+1!, PRLQTY+3, PRLVAL+3, PRCOLM+1
ASURZX	K+1!, PRLQTY+2, PRLVAL+2, PRCOLM+1
ASUT	K+1!
ASUT("QTR"	PSER+16*, PSER+17, HEADER+4
ASUV	K+1!
ASUV("DT"	PSER+14*, HEADER+3
ASUV("LEV"	PSER+23, PSER+28, PSER+29, PSER+30, P1+10, PRLQTY+3, PRLVAL+3, PRTOTL+1, PRTOTL+6, PRTOTL+20 , PRSST+2
ASUV("LEVA"	P3+4*, P3+6, P3+7, P3+8, P3+9
ASUV("PIECE"	PRLQTY+1, PRLQTY+2, PRLQTY+3, PRLVAL+1, PRLVAL+2, PRLVAL+3, P3+1, P3+3, P3+5, P3+7 , P3+9
ASUV("SST"	P1+10, P1+35, PRTOTL+5, PRTOTL+19, PRSST+1, PRSST+2*, PRSST+3
ASUX	K+1!
ASUX("ACIX"	PSER+18, PSER+19, PSER+21, P1+1, P1+4, P1+14
ASUX("ARST"	PSER+2, PSER+3, PSER+7, PSER+8, PSER+9, PSER+10, PSER+12, PSER+19, P1+4, P1+14
ASUX("REQ"	P1+3, P1+4, P1+6, P1+12, P1+14
ASUX("SST"	P1+6*, P1+8, P1+10, P1+15, P1+16, P1+17, P1+18, P1+19, P1+20, PRLQTY+3 , PRLVAL+3, P3+3, P3+6, P3+7, P3+9
ASUX("STA"	PSER+9*
ASUX("USR"	P1+6*, P1+8
DFOUT	K+3!
DIR	K+3!
DLOUT	K+3!
DTOUT	PSER+20, PSER+27, K+3!, P1+4, P1+33
DUOUT	PSER+20, PSER+27, K+3!, P1+4, P1+22, P1+33, PRTOTL+2, HEADER+2
DUZ(2	EN+3
IO	EN+2
IOF	HEADER+3
>> IOP	EN+7*
IOSL	PRLVAL+5, PRTOTL+1
>> POP	EN+7
U	PSER+10, PSER+12, PSER+14, PSER+16, P1+15, P1+16, P1+17, P1+18, P1+19, P1+20 , PRLQTY+3, PRLVAL+3, P3+3, P3+7, P3+9
X	K+2, K+4!, P1+5, P1+7, P1+11, PRDASH+1, PRDASHV+1, PRDDSH+2, PRDDSHV+1
X1	K+4!
X2	K+4!
X3	K+4!
X4	K+4!
Y	PSER+14*, K+4!
>> ZTDESC	EN+6*
>> ZTRTN	EN+6*

Customize PDF page

Package: Supply

Routine: ASURQ82P

Information

Source Information

Call Graph

Call Graph Total: 9

Caller Graph

Caller Graph Total: 2

Entry Points

External References

Interaction Calls

Global Variables Directly Accessed

Label References

Local Variables

Legend:

Marked Items