Routine: ASURD71P

Package	Total	Call Graph
Supply	8	READ^ASU0TRRD SETAREA^ASULARST ^ASUMSTRD P7^ASURD70I (IDXBK,READX)^ASURD70P ^ASUURANG PAZ^ASUURHDR (C,O,U)^ASUUZIS
Kernel	1	(,HOME)^%ZIS

Package

Total

Call Graph

Supply

READ^ASU0TRRD SETAREA^ASULARST ^ASUMSTRD P7^ASURD70I (IDXBK,READX)^ASURD70P ^ASUURANG PAZ^ASUURHDR (C,O,U)^ASUUZIS

Kernel

(,HOME)^%ZIS

Package	Total	Caller Graph
Supply	3	ASU5271DRP ASUCORPX ASURDINV

Package

Total

Caller Graph

Supply

ASU5271DRP ASUCORPX ASURDINV

Name	Comments	DBIA/ICR reference
HEADER	;EP;
PSER	;EP;FOR TASKMAN QUEUE OF PRINT
EN	;EP;PRIMARY ENTRY POINT FOR REPORT 71
CMPT	;EP ;SORT,SLC,LOC
INVOICE	;EP ;INVOICE

External References

Name	Field # of Occurrence
^%ZIS	EN+6
HOME^%ZIS	EN+1
READ^ASU0TRRD	CMPT+6
SETAREA^ASULARST	EN+3
^ASUMSTRD	CMPT+7
P7^ASURD70I	PSER+1
IDXBK^ASURD70P	INVOICE+12
READX^ASURD70P	PSER+6
^ASUURANG	CMPT+2
PAZ^ASUURHDR	PSER+8, HEADER+1
C^ASUUZIS	PSER+9
O^ASUUZIS	EN+5
U^ASUUZIS	PSER+1

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !,"Report must be run from Kernel option" Line Location: EN+2
Function Call: WRITE	Prompt: !,"NO DATA FOR REPORT 71" Line Location: PSER+4
Function Call: WRITE	Prompt: @IOF Line Location: PSER+8
Function Call: WRITE	Prompt: @IOF Line Location: HEADER+1
Function Call: WRITE	Prompt: !?1,"REPORT #71 BACK ORDER ISSUE/SHIPPING/INVOICE DOCUMENT" Line Location: HEADER+2
Function Call: WRITE	Prompt: ?60,Y,?73,"PAGE ",ASUC("PG") Line Location: HEADER+3
Function Call: WRITE	Prompt: !?3,"AREA ",ASUL(1,"AR","AP"),?15,ASUL(1,"AR","NM") Line Location: HEADER+4
Function Call: WRITE	Prompt: ?40,"STATION ",ASUL(2,"STA","CD"),?51,ASUL(2,"STA","NM") Line Location: HEADER+6
Function Call: WRITE	Prompt: !?1,"REQUISITIONER: LOC ",$G(ASUL(18,"SST"))," -",?26,$G(ASUL(18,"SST","NM")) Line Location: HEADER+7
Function Call: WRITE	Prompt: ?48,"DATE OF REQUEST: " Line Location: HEADER+8
Function Call: WRITE	Prompt: ?66,Y Line Location: HEADER+8
Function Call: WRITE	Prompt: !!?1,"CAN ",?6,$G(ASUT(ASUT,"CAN")),?15,"USER ",?19,$G(ASUL(19,"USR")),?24,"-",?26,$G(ASUL(19,"USR","NM")),?49,"REQUEST NO. ",?61,$G(ASUT(ASUT,"RQN")) Line Location: HEADER+9
Function Call: WRITE	Prompt: !!?1,"SSA ",?6,$G(ASUT(ASUT,"SSA")),?10,"CONTRACT/GRANT NO: ",?30,$G(ASUT(ASUT,"CTG")) Line Location: HEADER+10
Function Call: WRITE	Prompt: ?48,"VOUCHER NO: ",?60,ASUV("VOU") Line Location: HEADER+11
Function Call: WRITE	Prompt: !!?27,"VOUCHER NUMBER CONTROL SHEET",!!?18,"NO LI LI NO LI ISSUE ISSUE DOC" Line Location: HEADER+13
Function Call: WRITE	Prompt: !!?23,"LISTING OF ORDER QUANTITY CHANGES" Line Location: HEADER+16
Function Call: WRITE	Prompt: !!?1,"STORAGE LOCATION:",?20,$G(ASUL(10,"SLC","NM")) Line Location: HEADER+17
Routine Call	%ZIS Line Location: EN+1
Routine Call	%ZIS Line Location: EN+6

Name	Line Occurrences (* Changed, ! Killed)
^ASUH - [#9002036]	CMPT+5
^DD("DD"	HEADER+3, HEADER+8
^XTMP("ASUR"	PSER+2, CMPT+1!, CMPT+8

Name	Line Occurrences
HEADER	PSER+4
PSER	EN+4

Local Variables

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
ASUC	PSER+7!, INVOICE+6
ASUC("LN"	PSER+1, HEADER+1, HEADER+13, HEADER+14, HEADER+16, HEADER+21
ASUC("PG"	HEADER+1*, HEADER+3
ASUC(0	INVOICE+2, INVOICE+4, INVOICE+5, INVOICE+6, INVOICE+7, INVOICE+9, INVOICE+10, INVOICE+11, INVOICE+13, INVOICE+14!
ASUC(1	INVOICE+13*
ASUF	PSER+7!
ASUF("BK"	HEADER+12, HEADER+16
ASUF("END"	HEADER+12
ASUF("HDR"	HEADER+21*
ASUHD	PSER+1*, PSER+7!
>> ASUHDA	CMPT+4, CMPT+5, CMPT+6, CMPT+8
>> ASUK(	EN+7
>> ASUK("DT"	CMPT+1
>> ASUK("PTR"	EN+7
>> ASUK("PTRSEL"	EN+4*, PSER+8
>> ASUL(	PSER+7!
>> ASUL(1	EN+3, HEADER+4
>> ASUL(10	HEADER+17, CMPT+8
>> ASUL(18	HEADER+7
>> ASUL(19	HEADER+9
>> ASUL(2	HEADER+6
>> ASUL(9	CMPT+8
>> ASUMS("E#"	CMPT+7*
>> ASUN("B#"	CMPT+4
>> ASUN("BKY"	CMPT+3
>> ASUN("EKY"	CMPT+3, CMPT+5
>> ASUN("TYP"	CMPT+2
ASUP0	PSER+1*, PSER+7!
>> ASUT	PSER+1*, INVOICE+1, INVOICE+2, INVOICE+3, INVOICE+4, INVOICE+5, INVOICE+6, INVOICE+7, INVOICE+8, INVOICE+9 , INVOICE+10, HEADER+8, HEADER+9, HEADER+10, CMPT+6, CMPT+7, CMPT+8
>> ASUT(	INVOICE+1, INVOICE+2, INVOICE+3, INVOICE+4, INVOICE+5, INVOICE+6, INVOICE+7, INVOICE+8, INVOICE+9, INVOICE+10 , HEADER+8, HEADER+9, HEADER+10, CMPT+7, CMPT+8
>> ASUT("TRCD"	CMPT+6
ASUTX	PSER+7!, CMPT+1*
ASUV	PSER+7!
ASUV("VOU"	HEADER+11
ASUX	PSER+7!
ASUX("DT"	PSER+2*, PSER+3, HEADER+3
ASUX("RPT"	PSER+1*
ASUX("STA"	HEADER+5
DA	PSER+7!
DIC	PSER+7!
>> DUOUT	PSER+4, HEADER+1
DUZ(2	EN+2
IO	EN+1, HEADER+1
IOF	PSER+8, HEADER+1
>> IOP	EN+6*
IOSL	PSER+1
>> POP	EN+6
U	PSER+2, CMPT+1
X	PSER+7!, INVOICE+13~
Y	PSER+7!, HEADER+3, HEADER+8
>> ZTDESC	EN+5*
>> ZTRTN	EN+5*

Customize PDF page

Package: Supply

Routine: ASURD71P

Information

Source Information

Call Graph

Call Graph Total: 9

Caller Graph

Caller Graph Total: 3

Entry Points

External References

Interaction Calls

Global Variables Directly Accessed

Label References

Local Variables

Legend: