Routine: TIUAUD0

Information

TIUAUD0 ; SPFO/AJB - AUDIT SIGNED DOCUMENTS ;07/20/22 06:40

Package	Total	Call Graph
Kernel	1	^%ZTLOAD
RPC Broker	1	$$BROKER^XWBLIB

Name	Comments	DBIA/ICR reference
AUDIT(DA)	; audit signed documents
SIGNED(TIUDA,FIELD,VALUE)	; has the document ever been signed?
GAD(DA,FIELD,DIIX,DIANUM)	; get audit data for TIU ; FM saves audit data AFTER audit condition ; task will make a copy to the TIU namespace to avoid a data purge via the FM audit tools if audited, once per KILL/SET
TASK(DA,FIELD,DIIX)	; copy audit data to ^TIU(8925,"AUD") namespace, non-published location

Name	Field # of Occurrence
^%ZTLOAD	GAD+4
$$BROKER^XWBLIB	AUDIT+3

Name	Line Occurrences (* Changed, ! Killed)
^DIA(8925	AUDIT+16, TASK+3, TASK+5, TASK+7
^TIU(8925 - [#8925]	SIGNED+2, SIGNED+3, TASK+2, TASK+3, TASK+4, TASK+5, TASK+8*

Name	Line Occurrences
$$SIGNED	AUDIT+12
GAD	AUDIT+17

Name	Field # of Occurrence
AUDIT	AUDIT+4~, AUDIT+12, AUDIT+13, AUDIT+14, AUDIT+18, SIGNED+3~, SIGNED+4, SIGNED+5, SIGNED+6, SIGNED+7
DA	AUDIT~, AUDIT+12, GAD~, TASK~, TASK+2, TASK+3, TASK+5, TASK+7
DIANUM	AUDIT+13, AUDIT+14, GAD~
DIANUM(	AUDIT+15
DIIX	AUDIT+10, AUDIT+17, GAD~, TASK~, TASK+2, TASK+3
FIELD	AUDIT+4~, AUDIT+10*, AUDIT+11, AUDIT+12, AUDIT+15, AUDIT+17, SIGNED~, SIGNED+1, SIGNED+2, GAD~ , TASK~, TASK+6
>> FLD	AUDIT+10
IEN	AUDIT+15~, AUDIT+16, AUDIT+17, TASK+1~, TASK+2, TASK+3, TASK+4, TASK+5, TASK+8
NODE	SIGNED+3~
NODE(15	SIGNED+3*, SIGNED+4
NODE(16	SIGNED+3*, SIGNED+6
PIECE	SIGNED+3~, SIGNED+4, SIGNED+6
TIUDA	AUDIT+2, SIGNED~, SIGNED+2, SIGNED+3, TASK+7~*, TASK+8
>> TIUFPRIV	AUDIT+1
U	AUDIT+10, SIGNED+2, SIGNED+4, SIGNED+6, TASK+4
VALUE	SIGNED~, SIGNED+1
>> X	AUDIT+12
ZTDESC	GAD+3~*
ZTDTH	GAD+3~*
ZTIO	GAD+3~*
>> ZTREQ	TASK+1*
ZTRTN	GAD+3~, GAD+4*
ZTSAVE	GAD+3~
ZTSAVE("DA"	GAD+4*
ZTSAVE("DIIX"	GAD+4*
ZTSAVE("FIELD"	GAD+4*
ZTSK	GAD+3~