Routine: DGAUDIT

Package	Total	Call Graph
Kernel	7	APPERROR^%ZTER $$S^%ZTLOAD ($$DT,$$FMADD,$$FMTE,$$NOW)^XLFDT DECODE^XLFJSON $$STA^XUAF4 $$KSP^XUPARAM $$PROD^XUPROD
Registration	3	CHKSIZE^DGAUDIT ($$ERRSPMSG,$$PENDING,DBEMAIL,GENERR,NEWAUDEX)^DGAUDIT1 BADJSON^DGAUDIT2
VA FileMan	3	$$FIND1^DIC ^DIK $$GET1^DIQ
List Manager	1	$$UPPER^VALM1
MailMan	1	^XMD
Toolkit	1	$$GET^XPAR
Web Services Client	1	($$GETREST,$$POST)^XOBWLIB

Package	Total	Caller Graph
Registration	3	DG VAS EXPORT DGAUDIT DGAUDIT1

Entry Points

Name	Comments	DBIA/ICR reference
EXPORT	; Called from TaskMan job ; Quit if this subroutine is already running
EXPORT2	; Main processing loop
EXPORT3(DGABORT)	;JPN ADDED FOR BREAKING UP DIA GLOBAL
RESTPOST(BATCHID,BATSIZE,DGERRARR,DGAUDWRCNT,DGOUT)	; Build batch containing BATSIZE JSON records from ^DGAUDIT
PROCRESP(DGRESP,BATCHID,DGERRARR,DGAUDWRCNT,DGAUDWRMAX,DGCONSERR,DGOUT)	; process response ; If the entire batch failed, leave entries in ^DGAUDIT and delete failed batch from ^TMP
SNDMSG(DGAUDMSG,DGAUDGRP,DGALTSUB)	; Send mail message to mail group
CHKSIZE	; Check the size of the ^DGAUDIT global (based on the number of entries). ; If the number of entries is greater than the parameter value for the maximum number of entries, ; then repeatedly delete the first entry until the number of entries is back to the maximum.
FROZEN(PCT)	; If there are there greater than PCT% records stuck in queue, send message ; Don't add any new records from ^DIA until queue is cleared out.
PCTFULL()	; VAS QUEUE % full

External References

Name	Field # of Occurrence
APPERROR^%ZTER	PROCRESP+16
$$S^%ZTLOAD	EXPORT+24, EXPORT3+2, EXPORT3+23
CHKSIZE^DGAUDIT	PROCRESP+20, PROCRESP+47
$$ERRSPMSG^DGAUDIT1	RESTPOST+38
$$PENDING^DGAUDIT1	EXPORT3+10, EXPORT3+12, CHKSIZE+9, CHKSIZE+14, PCTFULL+4
DBEMAIL^DGAUDIT1	EXPORT+29
GENERR^DGAUDIT1	PROCRESP+20, PROCRESP+47, FROZEN+7
NEWAUDEX^DGAUDIT1	EXPORT2+11
BADJSON^DGAUDIT2	RESTPOST+23
$$FIND1^DIC	EXPORT+11
^DIK	PROCRESP+13, PROCRESP+49, PROCRESP+53, CHKSIZE+12
$$GET1^DIQ	EXPORT+13, EXPORT+24, EXPORT3+2, EXPORT3+23, SNDMSG+8
$$UPPER^VALM1	PROCRESP+7
$$DT^XLFDT	EXPORT+7, PROCRESP+10, PROCRESP+40
$$FMADD^XLFDT	EXPORT+7, PROCRESP+10, PROCRESP+40
$$FMTE^XLFDT	SNDMSG+6
$$NOW^XLFDT	EXPORT3+10, SNDMSG+6
DECODE^XLFJSON	RESTPOST+45
^XMD	SNDMSG+14
$$GETREST^XOBWLIB	RESTPOST+11
$$POST^XOBWLIB	RESTPOST+35
$$GET^XPAR	EXPORT+3, EXPORT+17, EXPORT+19, EXPORT+25, EXPORT2+3, EXPORT3+3, SNDMSG+7, CHKSIZE+4, PCTFULL+2
$$STA^XUAF4	SNDMSG+5
$$KSP^XUPARAM	SNDMSG+5
$$PROD^XUPROD	SNDMSG+13

FileMan Files Accessed Via FileMan Db Call

FileNo	Call Tags
^XOB(18.02 - [#18.02]	FIND1^DIC
^XOB(18.12 - [#18.12]	FIND1^DIC
^XMB(3.8 - [#3.8]	GET1^DIQ
^DGAUDIT - [#46.3]	Classic Fileman Calls
^DGAUDIT2 - [#46.5]	GET1^DIQ

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^DGAUDIT - [#46.3]	RESTPOST+17, RESTPOST+20, RESTPOST+22, PROCRESP+12, PROCRESP+41
^DGAUDIT(0	CHKSIZE+11
^DGAUDIT(99999999999	9, RESTPOST+18
^DGAUDIT2(0	EXPORT+4, EXPORT+30
^TMP(	RESTPOST+12!
^TMP($J	RESTPOST+4!, RESTPOST+6!, RESTPOST+24*, PROCRESP+11, PROCRESP+12, PROCRESP+21!, PROCRESP+41, PROCRESP+52, PROCRESP+54!
^XTMP("DGAUDIT_EXCEPTION;"	PROCRESP+10, PROCRESP+12, PROCRESP+40, PROCRESP+41
^XTMP("DGLOCKFAIL"	EXPORT+6, EXPORT+7

Label References

Name	Line Occurrences
$$FROZEN	EXPORT2+9
$$PCTFULL	FROZEN+3
$$RESTPOST	EXPORT3+16
EXPORT2	EXPORT+27
EXPORT3	EXPORT2+6, EXPORT2+13
PROCRESP	EXPORT3+21

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
%	PROCRESP+4~
%H	PROCRESP+4~
BATCHID	EXPORT3+10*, EXPORT3+16, EXPORT3+21, RESTPOST~, RESTPOST+24, PROCRESP~, PROCRESP+10, PROCRESP+11, PROCRESP+12, PROCRESP+21 , PROCRESP+40, PROCRESP+41, PROCRESP+44, PROCRESP+45, PROCRESP+52, PROCRESP+54
BATSIZE	EXPORT3+11~, EXPORT3+14, EXPORT3+15, EXPORT3+16, RESTPOST~, RESTPOST+16*, RESTPOST+20
DA	PROCRESP+13~, PROCRESP+49~, PROCRESP+53~, CHKSIZE+3~, CHKSIZE+11
DGABORT	EXPORT2+1~, EXPORT2+6, EXPORT3~, EXPORT3+10, EXPORT3+22*
DGALTSUB	SNDMSG~, SNDMSG+12
DGAUDBEG	EXPORT+9~, EXPORT+14, RESTPOST+17, RESTPOST+19
DGAUDC	PROCRESP+8~, PROCRESP+11*, PROCRESP+12, PROCRESP+13
DGAUDCNT	RESTPOST+1~, RESTPOST+19, RESTPOST+20, RESTPOST+22, RESTPOST+23, RESTPOST+24, PROCRESP+26~, PROCRESP+35, PROCRESP+41, PROCRESP+49 , PROCRESP+52, PROCRESP+53, CHKSIZE+3~, CHKSIZE+4, CHKSIZE+13, CHKSIZE+15
DGAUDDATA	RESTPOST+1~, CHKSIZE+3~
DGAUDECNT	EXPORT2+1~, EXPORT3+7*
DGAUDERR	EXPORT+8~, PROCRESP+2~, PROCRESP+5, PROCRESP+17, PROCRESP+18, PROCRESP+19, PROCRESP+20!, PROCRESP+36, PROCRESP+44, PROCRESP+45* , PROCRESP+46, PROCRESP+47!, CHKSIZE+15, FROZEN+4~, FROZEN+7
DGAUDERR(	PROCRESP+17, PROCRESP+18, PROCRESP+19, PROCRESP+44, PROCRESP+45, PROCRESP+46, CHKSIZE+15*
DGAUDERR(1	FROZEN+5*
DGAUDERR(2	FROZEN+6*
DGAUDEXPHT	EXPORT+8~
DGAUDFAIL	EXPORT+9~, EXPORT+14, EXPORT3+17, EXPORT3+19*, EXPORT3+22, RESTPOST+17
DGAUDGRP	SNDMSG~
DGAUDKPX	EXPORT+2~, EXPORT+25*, RESTPOST+23, PROCRESP+39, PROCRESP+40
DGAUDLAST	RESTPOST+2~, RESTPOST+18*, RESTPOST+20
DGAUDMAX	EXPORT+9~, EXPORT+17, EXPORT+18, EXPORT+22, CHKSIZE+3~, CHKSIZE+4, CHKSIZE+5, CHKSIZE+7, CHKSIZE+10, PCTFULL+1~ , PCTFULL+2, PCTFULL+3*, PCTFULL+4
DGAUDMSG	RESTPOST+1~, SNDMSG~, CHKSIZE+3~
DGAUDNUM	CHKSIZE+3~, CHKSIZE+9, CHKSIZE+10, CHKSIZE+14
DGAUDOPCNT	EXPORT+8~
DGAUDOPEN	EXPORT2+1~, EXPORT3+7*
DGAUDOPFRQ	EXPORT+8~
DGAUDOPMAX	EXPORT+8~
DGAUDOPTO	EXPORT+8~
DGAUDPORT	EXPORT+9~
DGAUDRD	EXPORT2+1~
DGAUDSC	EXPORT2+1~
DGAUDSHUT	EXPORT+8~, EXPORT+13, EXPORT+16, EXPORT+24, EXPORT+26, EXPORT3+2, EXPORT3+6, EXPORT3+10, EXPORT3+23
DGAUDSRV	EXPORT+9~
DGAUDSTOP	EXPORT+8~, EXPORT+14, EXPORT+16, EXPORT+24, EXPORT+26, EXPORT3+2, EXPORT3+6, EXPORT3+23
DGAUDTBR	EXPORT2+1~, EXPORT3+7*
DGAUDTN	EXPORT+9~
DGAUDWRCNT	EXPORT+8~, EXPORT3+7, EXPORT3+16, EXPORT3+20, EXPORT3+21, RESTPOST~, PROCRESP~, PROCRESP+47*
DGAUDWRMAX	EXPORT+8~, EXPORT3+3, EXPORT3+4, EXPORT3+21, EXPORT3+22, PROCRESP~
DGBATSIZE	EXPORT+2~, EXPORT+19, EXPORT+22, EXPORT3+14, CHKSIZE+6*, CHKSIZE+7
DGCONSERR	EXPORT+9~, EXPORT+14, EXPORT3+17!, EXPORT3+19*, EXPORT3+21, PROCRESP~, PROCRESP+6, PROCRESP+14
DGCONSERR(	PROCRESP+6, PROCRESP+14*
DGDATA	RESTPOST+1~, RESTPOST+21~
DGDATA1	RESTPOST+21~
DGDEBUGON	EXPORT+2~, EXPORT+3, EXPORT+5, EXPORT+28, EXPORT2+1~, EXPORT2+3
DGDONE	EXPORT3+1~, EXPORT3+5, EXPORT3+10, EXPORT3+15
DGEMAIL	SNDMSG+4~, SNDMSG+7, SNDMSG+8, SNDMSG+9*, SNDMSG+10
DGEND	SNDMSG+4~, SNDMSG+6*
DGERR	RESTPOST+1~, RESTPOST+21~
DGERR1	RESTPOST+21~
DGERRARR	EXPORT3+1~, EXPORT3+11~, EXPORT3+13*, EXPORT3+16, EXPORT3+21, RESTPOST~, RESTPOST+38, PROCRESP~
DGERRARR("message"	PROCRESP+46
DGERRARR("statusLine"	PROCRESP+15, PROCRESP+18
DGERRARR("text"	PROCRESP+7, PROCRESP+15, PROCRESP+19
DGERRCD	RESTPOST+2~, RESTPOST+38*, RESTPOST+39
DGERRLIN	PROCRESP+2~, PROCRESP+19, PROCRESP+46
DGERRTXT	PROCRESP+15~, PROCRESP+16
DGEXCEPT	PROCRESP+26~, PROCRESP+27*, PROCRESP+35
DGHEADER	RESTPOST+1~, RESTPOST+29*
DGHTTPCHK	RESTPOST+1~
DGHTTPRSP	RESTPOST+1~, RESTPOST+41*
DGINST	SNDMSG+4~, SNDMSG+5*, SNDMSG+12
DGJSON	RESTPOST+21~, RESTPOST+22, RESTPOST+23, RESTPOST+24, RESTPOST+25, RESTPOST+26
DGLOGN	EXPORT+2~
DGOUT	EXPORT3+1~, EXPORT3+11~, EXPORT3+13, EXPORT3+16, EXPORT3+21, RESTPOST~, RESTPOST+12, RESTPOST+36, RESTPOST+37, RESTPOST+39* , RESTPOST+46*, PROCRESP~
DGOUT("failedIds"	PROCRESP+27, PROCRESP+35
DGOUT(0	RESTPOST+12*
DGOUTJSON	RESTPOST+1~, RESTPOST+42*
DGPOST	EXPORT3+1~
DGRESP	EXPORT3+1~, EXPORT3+16*, EXPORT3+17, EXPORT3+19, EXPORT3+20, EXPORT3+21, RESTPOST+39, PROCRESP~, PROCRESP+3, PROCRESP+15 , PROCRESP+24
DGRESPERR	EXPORT2+2~, RESTPOST+35, RESTPOST+38
DGRESPONSE	EXPORT3+1~, RESTPOST+35*, RESTPOST+36, RESTPOST+37, RESTPOST+47
DGRESTOBJ	RESTPOST+2~, RESTPOST+11*, RESTPOST+35
DGSERVER	RESTPOST+2~, RESTPOST+7*, RESTPOST+11
DGSERVICE	RESTPOST+1~, RESTPOST+2~, RESTPOST+8*, RESTPOST+11
DGSRVRID	PROCRESP+2~
DGSSLPORT	PROCRESP+2~
DIFROM	SNDMSG+14~
DIK	PROCRESP+13~, PROCRESP+49~, PROCRESP+53~, CHKSIZE+3~, CHKSIZE+8
DTSTAT	RESTPOST+1~
DUZ	EXPORT+6
FDA	RESTPOST+21~
JSONCNT	RESTPOST+2~, RESTPOST+16, RESTPOST+20, RESTPOST+25, RESTPOST+27, RESTPOST+31
PCT	FROZEN~, FROZEN+2*, FROZEN+3, FROZEN+5
PENDING	EXPORT3+11~, EXPORT3+12*, EXPORT3+14, EXPORT3+15
X	PROCRESP+4~
XMDUZ	SNDMSG+4~, SNDMSG+11*
XMSUB	SNDMSG+4~, SNDMSG+12, SNDMSG+13
XMTEXT	SNDMSG+4~, SNDMSG+14*
XMX	SNDMSG+4~
XMY	SNDMSG+4~
XMY(	SNDMSG+10*
Y	PROCRESP+4~, SNDMSG+4~
>> ZTQUEUED	EXPORT+31
>> ZTREQ	EXPORT+31*

Customize PDF page

Package: Registration

Routine: DGAUDIT

Information

Source Information

Call Graph

Call Graph Total: 17

Caller Graph

Legends:

Package Component Superscript legend

Caller Graph Total: 3

Entry Points

External References

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Local Variables

Legend: