Routine: DGPREBJ

Package	Total	Call Graph
Registration	3	SETTEXT^DGPREBJ (ADDNEW,SDAMAPI)^DGPREBJ1 (CLRLST,PRGLST)^DGPREP4
MailMan	2	XMZ^XMA2 ^XMD
VA Fileman	2	NOW^%DTC ^DIK
Kernel	1	($$DT,$$FMADD)^XLFDT

Package	Total	Caller Graph
Registration	3	DGPRE PRE-REGISTER NIGHT JOB DGPREBJ DGPREBJ1

Entry Points

Name	Comments	DBIA/ICR reference
SETTEXT(DGLINE)	; Add text line to message array
EN	; Main entry point for the Pre-Registration Background Job. ; Variables ; DGPTOD - Current date ; DGPNL - Message line count for mail message ; DGPFNC - Job function ; DGPNDAY - Number of days to keep entries in the call list ; DGPTXT - Message array ; DGPDT - Last date to keep entries in call list for, uses DGPNDAY ; DGPN1-2 - Temporary Var's for $ORDER ; DGPCLD - Count of call log entries purged
MES1	;
SEND	; Send notification of actions taken to mailgroup
MES(TAG)	; Build message for missing parameters
PURGECP	; Purge called patients from the Pre-registration call list ; Variables ; DGPDEL - Counter of records deleted
EXIT	;
KILLALL	; Clear all entries from the pre-registration call list. ; Variables ; DGPTOT - Counter if entries deleted

FileNo	Call Tags
^DGS(41.42 - [#41.42]	Classic Fileman Calls
^DGS(41.43 - [#41.43]	Classic Fileman Calls

Name	Line Occurrences (* Changed, ! Killed)
^DG(43 - [#43]	EN+17, EN+54
^DGS(41.42 - [#41.42]	EN+33, EN+34
^DGS(41.43 - [#41.43]	EN+61, EN+62
^TMP($J	EN+27!, EN+41

Name	Line Occurrences
EXIT	EN+18, EN+55
KILLALL	EN+47, EN+49
MES	EN+18
PURGECP	EN+48, EN+50
SEND	EN+27, EXIT+1
SETTEXT	EN+44, EN+45, EN+57, EN+68, EN+69, PURGECP+9, PURGECP+10, KILLALL+9, KILLALL+10, MES+3 , MES+4

Name	Field # of Occurrence
>> %	EN+31
>> DA	EN+43, EN+65
DGAPDT	EN+30~, EN+35*, EN+36, EN+39, EN+41
DGCLN	EN+30~, EN+35*, EN+41
DGDFN	EN+30~, EN+35*, EN+36, EN+41
DGIEN	EN+30~, EN+32, EN+33, EN+34, EN+43
DGKFLAG	EN+30~, EN+37, EN+39, EN+42*, EN+43
DGLINE	SETTEXT~, SETTEXT+1
DGMES	MES+1~, MES+3*
DGOLD	EN+30~, EN+32, EN+43, EN+44
DGPCLD	EN+11~, EN+60, EN+63, EN+68
DGPDEL	PURGECP+4~, PURGECP+5*, PURGECP+7, PURGECP+9
DGPDT	EN+11~, EN+49, EN+50, EN+51, EN+59*, EN+61
DGPFNC	EN+11~, EN+17*, EN+18, EN+47, EN+48, EN+49, EN+50, EN+51
DGPN1	EN+11~, EN+61*, EN+62
DGPN2	EN+11~, EN+62*, EN+65
DGPNDAY	EN+11~, EN+54*, EN+55, EN+59
DGPNL	EN+11~, EN+15, SETTEXT+1, SETTEXT+2
DGPTOD	EN+11~, EN+13*, EN+59
DGPTOT	KILLALL+4~, KILLALL+5*, KILLALL+7, KILLALL+9
DGPTXT	EN+11~
DGPTXT(	SETTEXT+1*
DGSTAT	EN+30~, EN+41*, EN+42
DGTDAY	EN+30~, EN+31*, EN+39
DGZERO	EN+30~, EN+34*, EN+35
DIC	EN+66!
DIK	EN+43!, EN+64
DUZ	SEND+2
I	MES+1~, MES+3*
TAG	MES~
U	EN+17, EN+35, EN+41, EN+54
XMDUZ	SEND+2*, SEND+7!
XMSUB	SEND+4*, SEND+7!
XMTEXT	SEND+3*, SEND+7!
XMY	SEND+7!
XMY("G.DGPRE	PRE-REG STAFF" , SEND+1*
>> XMZ	SEND+6

Name	Field # of Occurrence
$T(@TAG+I	MES+3