Routine: ASURD07A

Information

ASURD07A ; IHS/ITSC/LMH -RPT 7A USRLVL CHGS/DELS/ESTAB ;

Package	Total	Call Graph
Supply	6	READ^ASU0TRRD (SETAREA,STA)^ASULARST ^ASUUDATA ^ASUURANG PAZ^ASUURHDR (C,O,U)^ASUUZIS
Kernel	1	(,HOME)^%ZIS

Package	Total	Caller Graph
Supply	2	ASU5107DRP ASUCORPX

Name	Comments	DBIA/ICR reference
HEADER	;PRINT REPORT HEADING LINES
PSER	;EP;FOR TASKMAN QUEUE OF PRINT
EN	;EP;PRIMARY ENTRY POINT FOR REPORT 07A
CMPT	;EP;COMPUTE REPORT CONTENTS
K	;

Name	Line Occurrences
Function Call: WRITE	Prompt: !,"Report must be run from Kernel option" Line Location: EN+2
Function Call: WRITE	Prompt: !!?2,"NUMBER LINE ITEMS: ",ASUC("TOT") Line Location: PSER+21
Function Call: WRITE	Prompt: @IOF Line Location: K+3
Function Call: WRITE	Prompt: @(IOF) Line Location: HEADER+2
Function Call: WRITE	Prompt: !?3,"REPORT #7A. USER LEVEL CHANGES/DELETES/ESTABLISHED TRANS" Line Location: HEADER+3
Function Call: WRITE	Prompt: ?100,"DATE: ",ASUX("DT"),?120,"PAGE: ",ASUC("PG") Line Location: HEADER+4
Function Call: WRITE	Prompt: !?3,"AREA: ",ASUL(1,"AR","AP") Line Location: HEADER+5
Function Call: WRITE	Prompt: ?15,ASUL(1,"AR","NM") Line Location: HEADER+6
Function Call: WRITE	Prompt: !?3,"STATION: ",$G(ASUL(2,"STA","CD")) Line Location: HEADER+8
Function Call: WRITE	Prompt: ?15,$G(ASUL(2,"STA","NM")) Line Location: HEADER+9
Function Call: WRITE	Prompt: !!?3,"AREA",?8,"STATION",?16,"DATE",?22,"TRAN",?28,"USER LEV",?37,"INDEX",?43,"USER",?50,"SUB STA",?60,"REMARKS" Line Location: HEADER+10
Function Call: WRITE	Prompt: !?3,"CODE",?10,"CODE",?16,"FYCM",?22,"CODE",?30,"QTY",?37,"NUM",?43,"CODE",?52,"CODE" Line Location: HEADER+11
Function Call: WRITE	Prompt: !,"------------------------------------------------------------------------------------------------------------------------------------",!! Line Location: HEADER+12
Routine Call	%ZIS Line Location: EN+1
Routine Call	%ZIS Line Location: EN+6

Name	Line Occurrences (* Changed, ! Killed)
^ASUH("T"	CMPT+3
^XTMP("ASUR"	PSER+2, PSER+8, PSER+9, PSER+10, PSER+11, CMPT+1!, CMPT+5

Name	Field # of Occurrence
ASUC	K+1!
ASUC("LN"	PSER+11, PSER+13, HEADER+13*
ASUC("PG"	HEADER+1*, HEADER+2, HEADER+4
ASUC("TOT"	PSER+7, PSER+14, PSER+21
ASUHDA	PSER+11, PSER+12, K+1!, CMPT+3, CMPT+4, CMPT+5
>> ASUK(	EN+7
>> ASUK("DT"	CMPT+1
>> ASUK("PTR"	EN+7
>> ASUK("PTRSEL"	EN+4*, K+3
>> ASUL(1	EN+3, HEADER+5, HEADER+6
>> ASUL(2	HEADER+7, HEADER+8, HEADER+9
>> ASUN("EKY"	CMPT+3
>> ASUN("TYP"	CMPT+2
>> ASUQ("HDR"	PSER+4*
ASUT	PSER+1*, PSER+12, PSER+15, PSER+16, PSER+17, PSER+18, PSER+19, PSER+20, K+1!, CMPT+4 , CMPT+5
ASUT(	PSER+15, PSER+16, PSER+17, PSER+18, PSER+19, PSER+20, CMPT+5
ASUT("TRCD"	PSER+17
ASUTX	K+1!
ASUV	K+1!
ASUV("RPT"	PSER+4*
>> ASUX("AS"	PSER+6, PSER+8, PSER+9, PSER+10, PSER+11, HEADER+7
>> ASUX("DT"	HEADER+4
>> ASUX("IX"	PSER+6, PSER+9, PSER+10, PSER+11
>> ASUX("NDTA"	PSER+5
>> ASUX("SQ"	PSER+6, PSER+10, PSER+11
>> DUOUT	PSER+8, PSER+9, PSER+10, PSER+13, HEADER+2
DUZ(2	EN+2
IO	EN+1
IOF	K+3, HEADER+2
>> IOP	EN+6*
IOSL	PSER+13
>> POP	EN+6
U	CMPT+1
>> X	HEADER+5*
>> ZTDESC	EN+5*
>> ZTRTN	EN+5*