Routine: ASURD01P

Information

ASURD01P ; IHS/ITSC/LMH -TRANS COUNTS REPORT ;

Package	Total	Call Graph
Supply	5	(SETAREA,TRN)^ASULARST ^ASUUDATE CLS^ASUUHDG PAZ^ASUURHDR (C,O,U)^ASUUZIS
Kernel	1	(,HOME)^%ZIS

Package	Total	Caller Graph
Supply	2	ASU5101DRP ASURDSTD

Name	Comments	DBIA/ICR reference
HEADER	;
PSER	;EP;FOR TASKMAN QUEUE OF PRINT ; JDH
EN	;EP;PRIMARY ENTRY POINT FOR REPORT 01 ; JDH

Name	Line Occurrences
Function Call: WRITE	Prompt: !,"Report must be run from Kernel option" Line Location: EN+3
Function Call: WRITE	Prompt: !?50,"_______",?60,"_______",?70,"_______",!?33,"SUB TOT:",?50,$J($FN($P(ASUC(1),U,1),",",0),7),?60,$J($FN($P(ASUC(1),U,2),",",0),7),?70,$J($FN($P(ASUC(1),U,3),",",0),7) Line Location: PSER+11
Function Call: WRITE	Prompt: !?50,"_______",?60,"_______",?70,"_______",!?33,"SUB TOT:",?50,$J($FN($P(ASUC(1),U,1),",",0),7),?60,$J($FN($P(ASUC(1),U,2),",",0),7),?70,$J($FN($P(ASUC(1),U,3),",",0),7) Line Location: PSER+21
Function Call: WRITE	Prompt: !!?50,"_______",?60,"_______",?70,"_______",!?30,"TOTAL:",?50,$J($FN($P($G(ASUC(2)),U,1),",",0),7),?60,$J($FN($P($G(ASUC(2)),U,2),",",0),7),?70,$J($FN($P($G(ASUC(2)),U,3),",",0),7) Line Location: PSER+23
Function Call: WRITE	Prompt: @IOF Line Location: PSER+27
Function Call: WRITE	Prompt: !?2,"REPORT #1. TRANSACTION COUNTS",?50,"DATE: ",ASUK("DT","MO"),"/",ASUK("DT","DA"),"/",ASUK("DT","YR"),?65,"PAGE: ",ASUC("PG") Line Location: HEADER+3
Function Call: WRITE	Prompt: !?2,"TYPE",?13,"Db/Cr",?21,"TRANSACTION",?54,"DAILY MONTHLY YR TO DT",!?54,"COUNT COUNT COUNT" Line Location: HEADER+4
Function Call: WRITE	Prompt: !,"-------------------------------------------------------------------------------",!! Line Location: HEADER+5
Routine Call	%ZIS Line Location: EN+2
Routine Call	%ZIS Line Location: EN+7

Name	Line Occurrences (* Changed, ! Killed)
^XTMP("ASUR"	PSER+8, PSER+18

Name	Line Occurrences
HEADER	PSER+6
PSER	EN+5

Name	Field # of Occurrence
ASUC	PSER+25!
ASUC("PG"	HEADER+1*, HEADER+3
ASUC(0	PSER+18*, PSER+19, PSER+20
ASUC(1	PSER+11, PSER+12, PSER+13!, PSER+20*, PSER+21, PSER+22
ASUC(2	PSER+12, PSER+22, PSER+23
>> ASUK(	EN+8
>> ASUK("DT"	PSER+3, HEADER+3
>> ASUK("PTR"	EN+8
>> ASUK("PTRSEL"	EN+5*, PSER+27
>> ASUL(1	EN+4
>> ASUL(11	PSER+10, PSER+14, PSER+17
ASUR	PSER+25!
ASUR("TR"	PSER+7, PSER+8, PSER+9, PSER+18
ASUT	PSER+25!
ASUTR	PSER+25!
>> ASUV("TY"	PSER+7, PSER+10, PSER+14
>> ASUX("E#"	PSER+25!
>> ASUX(0	PSER+26!
DA	PSER+26!
DI	PSER+26!
DIC	PSER+26!
DIE	PSER+26!
DQ	PSER+26!
DR	PSER+26!
DUZ(2	EN+3
IO	EN+2
IOF	PSER+27
>> IOP	EN+7*
>> POP	EN+7
U	PSER+11, PSER+12, PSER+18, PSER+19, PSER+20, PSER+21, PSER+22, PSER+23
X	PSER+12, PSER+20, PSER+22*, PSER+26!
>> ZTDESC	EN+6*
>> ZTRTN	EN+6*