Routine: ECXANUT

Package	Total	Call Graph
DSS Extracts	4	PROCESS^ECXANUT $$NUT^ECXDVSN AUDIT^ECXKILL (AUDIT,DEVICE)^ECXUTLA
Kernel	4	HOME^%ZIS ^%ZISC $$S^%ZTLOAD $$NNT^XUAF4
VA FileMan	4	(,DD)^%DT NOW^%DTC $$OREF^DILF ^DIR

Package	Total	Caller Graph
DSS Extracts	2	ECX NUT SOURCE AUDIT ECXANUT

Name	Comments	DBIA/ICR reference
EN	;entry point for NUT extract audit report
PROCESS	;process data in file #727.832 and store in ^tmp global
PRINT	;print report
HEADER	;header and page control
SUB	;Summary report sub-header
REPORT()	;Select report type
STATUS()	;Select patient status for report

Name	Field # of Occurrence
^%DT	EN+20, PROCESS+4
DD^%DT	PROCESS+6
NOW^%DTC	PROCESS+6
HOME^%ZIS	EN+39
^%ZISC	EN+38
$$S^%ZTLOAD	PROCESS+37, PRINT+3
$$OREF^DILF	EN+28
^DIR	HEADER+4, REPORT+10, STATUS+13
PROCESS^ECXANUT	EN+37
$$NUT^ECXDVSN	EN+15
AUDIT^ECXKILL	EN+19, EN+34, EN+40, PROCESS+39
AUDIT^ECXUTLA	EN+11
DEVICE^ECXUTLA	EN+30
$$NNT^XUAF4	HEADER+6

Name	Line Occurrences
Function Call: WRITE	Prompt: !!,"Setup for ",ECXHEAD," Extract Audit Report --",!! Line Location: EN+9
Function Call: WRITE	Prompt: !! Line Location: EN+13
Function Call: WRITE	Prompt: ! Line Location: EN+21
Function Call: WRITE	Prompt: ! Line Location: EN+29
Function Call: WRITE	Prompt: ! Line Location: HEADER+3
Function Call: WRITE	Prompt: !,ECXARRAY("TYPE")_" ("_ECXHEAD_") Extract Audit Report"_$S(REPORT="S":" (Summary)",1:" (Detail)") Line Location: HEADER+8
Function Call: WRITE	Prompt: !,"DSS Extract Log #: "_ECXEXT Line Location: HEADER+9
Function Call: WRITE	Prompt: !,"Date Range of Audit: "_ECXARRAY("START")_" to "_ECXARRAY("END") Line Location: HEADER+10
Function Call: WRITE	Prompt: !,"Report Run Date/Time: "_ECXRUN Line Location: HEADER+11
Routine Call	DIR Line Location: HEADER+4 REPORT+10 STATUS+13
Routine Call	%ZIS Line Location: EN+39

Name	Line Occurrences (* Changed, ! Killed)
^ECX(727.832 - [#727.832]	PROCESS+8, PROCESS+9
^TMP($J	PROCESS+24, PROCESS+27, PROCESS+34, PROCESS+36, PRINT+5, PRINT+13, PRINT+15, PRINT+16, PRINT+18, PRINT+19 , PRINT+20, PRINT+26, PRINT+27, PRINT+28, PRINT+29, PRINT+30, PRINT+31, PRINT+33, PRINT+34, PRINT+35 , PRINT+36, PRINT+37, HEADER+14

Name	Line Occurrences
$$REPORT	EN+23
$$STATUS	EN+25
HEADER	PRINT+7, PRINT+14, PRINT+22, PRINT+32, PRINT+41
PRINT	PROCESS+38
SUB	PRINT+17, PRINT+22

Name	Field # of Occurrence
^(1	PROCESS+9

Name	Field # of Occurrence
%	PROCESS+1~, PROCESS+6
%X	EN+1~
%Y	EN+1~
ARRAY	PROCESS+1~, PROCESS+2*
CNT	PRINT+1~, PRINT+37*, PRINT+40
DA	EN+1~
DATE	PROCESS+1~, PROCESS+10, PROCESS+14, PROCESS+15
DFL	PROCESS+1~, PROCESS+10, PROCESS+36, PRINT+35, PRINT+36, PRINT+37, PRINT+40
DIC	EN+1~
DIQ	EN+1~
DIR	EN+1~, HEADER+1~, HEADER+4!, REPORT+5~, STATUS+6~
DIR("?"	REPORT+8, REPORT+9, STATUS+10, STATUS+11, STATUS+12*
DIR("A"	REPORT+7, STATUS+8, STATUS+9*
DIR(0	HEADER+4, REPORT+6, STATUS+7*
DIRUT	EN+1~, HEADER+1~, REPORT+5~, REPORT+11, STATUS+6~, STATUS+14
DIV	PROCESS+1~, PROCESS+10, PROCESS+12, PROCESS+24, PROCESS+27, PROCESS+34, PROCESS+36, PRINT+6, PRINT+13, PRINT+15 , PRINT+16, PRINT+18, PRINT+19, PRINT+20, PRINT+26, PRINT+27, PRINT+28, PRINT+29, PRINT+30, PRINT+31 , PRINT+33, PRINT+34, PRINT+35, PRINT+36, PRINT+37, HEADER+6
DLDIV	PROCESS+1~, PROCESS+10, PROCESS+36, PRINT+34, PRINT+35, PRINT+36, PRINT+37, PRINT+40
DLT	PROCESS+10, PROCESS+24, PROCESS+36, PRINT+1~, PRINT+36, PRINT+37, PRINT+38, PRINT+39
DLTYPE	PROCESS+1~
DR	EN+1~
DSSID	HEADER+1~, HEADER+6*, HEADER+12
DTOUT	EN+1~, HEADER+1~
DUOUT	EN+1~, HEADER+1~, REPORT+5~, REPORT+11, STATUS+6~, STATUS+14
ECXALL	EN+2~
ECXARRAY	EN+2~, EN+11
ECXARRAY("DEF"	PROCESS+3
ECXARRAY("END"	EN+20, PROCESS+4, HEADER+10
ECXARRAY("EXTRACT"	PROCESS+3
ECXARRAY("START"	EN+20, PROCESS+4, HEADER+10
ECXARRAY("TYPE"	HEADER+8
ECXAUD	EN+2~, EN+8*, EN+11
ECXDEF	PROCESS+1~, PROCESS+3*
ECXDESC	EN+27*, EN+30, EN+36!
ECXEND	EN+20, PROCESS+1~, PROCESS+4, PROCESS+15
ECXERR	EN+2~, EN+6, EN+11, EN+12, EN+15, EN+16
ECXEXT	PROCESS+1~, PROCESS+3*, PROCESS+8, HEADER+9
ECXHEAD	EN+2~, EN+8*, EN+9, EN+11, HEADER+8
ECXPGM	EN+27*, EN+30, EN+36!
ECXRUN	PROCESS+1~, PROCESS+6*, HEADER+11
ECXSAVE	EN+30, EN+36!
ECXSAVE(	EN+28*
ECXSAVE("ECXALL"	EN+28*
ECXSAVE("ECXARRAY("	EN+28*
ECXSAVE("ECXDIV("	EN+28*
ECXSAVE("ECXHEAD"	EN+28*
ECXSAVE("FLAG"	EN+28*
ECXSAVE("POP"	EN+31
ECXSAVE("REPORT"	EN+28*
ECXSAVE("SCRNARR"	EN+28*
ECXSAVE("STATUS"	EN+28*
ECXSAVE("ZTSK"	EN+35
ECXSTART	EN+20, PROCESS+1~, PROCESS+4, PROCESS+15
ENC	PROCESS+1~, PROCESS+10, PROCESS+36, PRINT+33, PRINT+34, PRINT+35, PRINT+36, PRINT+37, PRINT+39, PRINT+40
FKEY	PROCESS+1~
FLAG	EN+2~, EN+6, EN+23, EN+25, PROCESS+8, PRINT+1~, PRINT+4, PRINT+13, PRINT+14, PRINT+15 , PRINT+16, PRINT+17, PRINT+18, PRINT+19, PRINT+22, PRINT+26, PRINT+27, PRINT+28, PRINT+29, PRINT+30 , PRINT+33, PRINT+34, PRINT+35, PRINT+36, PRINT+41, HEADER+4, HEADER+5, REPORT+11, STATUS+14*
FPD	PROCESS+1~, PROCESS+10, PROCESS+34, PROCESS+36, PRINT+27, PRINT+28, PRINT+29, PRINT+30, PRINT+31, PRINT+33 , PRINT+34, PRINT+35, PRINT+36, PRINT+37, HEADER+17
FPF	PROCESS+1~, PROCESS+10, PROCESS+34, PROCESS+36, PRINT+28, PRINT+29, PRINT+30, PRINT+31, PRINT+33, PRINT+34 , PRINT+35, PRINT+36, PRINT+37, HEADER+17
I	PROCESS+1~, PROCESS+21, PROCESS+29, PROCESS+30*
IEN	PROCESS+1~, PROCESS+8*, PROCESS+9
IO	EN+38, PRINT+2
IO(0	EN+38
IOF	HEADER+7
IOSL	PRINT+22, PRINT+41
IOST	HEADER+2, HEADER+7
JJ	HEADER+1~, HEADER+3*
KEY	PRINT+1~, PRINT+15*, PRINT+16, PRINT+18, PRINT+19, PRINT+20
LN	PRINT+1~, PRINT+4*
NODE0	PROCESS+1~, PROCESS+9*, PROCESS+10
NODE1	PROCESS+1~, PROCESS+9*, PROCESS+10
OBS	PROCESS+1~, PROCESS+10, PROCESS+24, PROCESS+27, PROCESS+34, PROCESS+36, PRINT+1~, PRINT+19, PRINT+20, PRINT+23 , PRINT+30*, PRINT+31, PRINT+33, PRINT+34, PRINT+35, PRINT+36, PRINT+37, HEADER+17
PDLT	PRINT+1~, PRINT+38, PRINT+39, PRINT+40
PFK	PROCESS+1~, PROCESS+10, PROCESS+27, PROCESS+34, PROCESS+36, PRINT+16, PRINT+18, PRINT+19, PRINT+20, PRINT+29* , PRINT+30, PRINT+31, PRINT+33, PRINT+34, PRINT+35, PRINT+36, PRINT+37, PRINT+39, HEADER+17, SUB+2
PG	PRINT+1~, PRINT+4, HEADER+4, HEADER+7, HEADER+12, HEADER+16
REPORT	EN+1~, EN+23*, EN+25, PROCESS+20, PROCESS+28, PRINT+12, PRINT+25, HEADER+8, HEADER+12, HEADER+15 , SUB+1
SCRNARR	EN+1~, EN+2~, EN+4*, EN+5, EN+18, EN+28, EN+33, PROCESS+12, PRINT+6
SS	HEADER+1~, HEADER+3*
STAT	PROCESS+10, PROCESS+24, PROCESS+27, PROCESS+32, PRINT+1~, PRINT+18, PRINT+19, PRINT+20, PRINT+23
STATUS	EN+2~, EN+25*, PROCESS+32, HEADER+16
TCNT	PRINT+1~, PRINT+31*, HEADER+17
TMP	EN+2~, EN+28*
TOTAL	PRINT+1~, PRINT+20*, PRINT+23
U	PROCESS+10, PRINT+20, HEADER+12
X	EN+1~, EN+20, PROCESS+1~, PROCESS+4, REPORT+5~, STATUS+6~
Y	EN+1~, EN+20, PROCESS+4, PROCESS+6*, HEADER+4, REPORT+5~, REPORT+12, STATUS+6~, STATUS+15
ZTQUEUED	EN+3~, PROCESS+37, PRINT+3
ZTREQ	PROCESS+37!, PRINT+3!
ZTSTOP	EN+3~, PROCESS+37, PRINT+3

Name

Field # of Occurrence

%

PROCESS+1~, PROCESS+6

%X

EN+1~

%Y

EN+1~

ARRAY

PROCESS+1~, PROCESS+2*

CNT

PRINT+1~, PRINT+37*, PRINT+40