Routine: SDAMLD

Call Graph

Call Graph Total: 12

Package	Total	Call Graph
VA Fileman	6	(C,NOW)^%DTC ^DIC DT^DICRW (,IXALL)^DIK EN1^DIP (DT,EN)^DIQ
Scheduling	3	EN^SDAMQ (,HEAD)^SDAMXLD DATE^SDUTL
Kernel	1	^%ZTLOAD
MailMan	1	^XMD
Registration	1	($$FDATE,$$FTIME,$$UPPER)^VALM1

Package

Total

Call Graph

VA Fileman

(C,NOW)^%DTC ^DIC DT^DICRW (,IXALL)^DIK EN1^DIP (DT,EN)^DIQ

Scheduling

EN^SDAMQ (,HEAD)^SDAMXLD DATE^SDUTL

Kernel

^%ZTLOAD

MailMan

^XMD

Registration

($$FDATE,$$FTIME,$$UPPER)^VALM1

Package	Total	Caller Graph
Scheduling	3	SDAM APPT UPDATE PRINT SDAM APPT UPDATE PURGE SDAM APPT UPDATE VIEW

Package

Total

Caller Graph

Scheduling

SDAM APPT UPDATE PRINT SDAM APPT UPDATE PURGE SDAM APPT UPDATE VIEW

Entry Points

Name	Comments	DBIA/ICR reference
A	;
Q3
EN
Q4
SHOW
BULL	; Bulletin for purge
SETLN	; Setting TMP global for bulletin
1	;;Update Appointment Status
3	;;View Log Date (date range)
2	;;View Log Date (single entry)
EN4	;
4	;;Purge log entries (data will be kept for current+1 FYs)
LAST()	; ; input - no input (user selection of last) ; output - the latest date, beginning day or -100 days
QUE()	; -- que job ; return: did job que [ 1\|yes 0\|no ]
Q2
SELECT

External References

Name	Field # of Occurrence
C^%DTC	4+4, LAST+5
NOW^%DTC	BULL+6
^%ZTLOAD	QUE+6
^DIC	A+1, SELECT+6
DT^DICRW	EN
^DIK	EN4+3
IXALL^DIK	EN+2
EN1^DIP	3+6
DT^DIQ	4+4
EN^DIQ	SHOW+1
EN^SDAMQ	1+2
^SDAMXLD	SHOW
HEAD^SDAMXLD	SHOW
DATE^SDUTL	3+3, 4+5
$$FDATE^VALM1	BULL+10
$$FTIME^VALM1	3+5, BULL+8
$$UPPER^VALM1	SELECT+4
^XMD	BULL+11

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !! Line Location: A+1
Function Call: WRITE	Prompt: !!,"Select APPOINTMENT DATE: "_$S(SDEF]"":SDEF_"// ",1:"") Line Location: SELECT+0
Function Call: WRITE	Prompt: $E("LAST",$L(SDWHEN)+1,4) Line Location: SELECT+4
Function Call: WRITE	Prompt: !,*7,"o update has not completed in the last 100 days" Line Location: SELECT+4
Function Call: WRITE	Prompt: @IOF Condition for execution: $D(IOF) Line Location: SHOW+0
Function Call: WRITE	Prompt: "Appointment Status Log" Line Location: SHOW+0
Function Call: WRITE	Prompt: !,"This option will not purge dates beyond " Line Location: 4+4
Function Call: WRITE	Prompt: "." Line Location: 4+4
Routine Call	DIC Line Location: A+1 SELECT+6

FileNo	Call Tags
^SDD(409.65 - [#409.65]	Classic Fileman Calls

Name	Line Occurrences (* Changed, ! Killed)
^%ZOSF("TEST"	SHOW
^DOPT(	EN+1*
^SDD(409.65 - [#409.65]	EN4+3, LAST+5
^TMP("SDAMLBL"	BULL+2!, BULL+12!, SETLN+2*

Name	Line Occurrences
$$LAST	SELECT+4
$$QUE	4+7
@(	A+1
A	EN+1, A+1
BULL	EN4+4
Q2	SELECT+1, SELECT+2
Q3	3+3
Q4	4+5
SELECT	SELECT+4, SELECT+6, SHOW, SHOW+1
SETLN	BULL+7, BULL+8, BULL+9, BULL+10
SHOW	SELECT+4

Name	Field # of Occurrence
^(	EN4+3

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> %	BULL+8
>> %DT(0	4+5*
BEGDATE	3+2~, 3+5, 4+2~
>> BY	3+4*
D0	SELECT+4, SELECT+6, SHOW+1*, Q2!
DA	SHOW+1, Q2!, EN4+1~, EN4+3*
>> DHD	3+5*
DIC	A+1, SELECT+6!, SHOW+1, Q2!, 3+6
DIC(0	A+1, SELECT+6
DIK	EN, EN4+1~, EN4+2
DT	4+3, LAST+5
DTIME	SELECT
DUZ	BULL+5
DXS	SHOW!
ENDDATE	3+2~, 3+5, 4+2~
>> FLDS	3+4*
>> FR	3+4*
>> I	EN+1*
IO("Q"	QUE+3!
IOF	SHOW
>> L	3+4*
LAST	LAST+4~, LAST+5*, LAST+6
>> LAST1	LAST+5*
SDBD	3+2~, 3+4, 4+2~, EN4+3, BULL+10
SDCNT	4+5, EN4+1~, EN4+2, EN4+3*, BULL+10
SDED	3+2~, 3+3, 3+4, 4+2~, 4+5, 4+6, BULL+10
SDEF	2+2, SELECT, SELECT+2, SELECT+3, SHOW, Q2!
SDI	EN4+1~, EN4+3, LAST+4~, LAST+5
SDLFY	4+2~, 4+4*
SDLIM	4+2~, 4+3*, 4+4
SDLN	BULL+1~, BULL+3, SETLN+1, SETLN+2
SDMAX	4+2~, 4+4, 4+6, EN4+3
SDMSG	BULL+1~, BULL+7, BULL+8, BULL+9, BULL+10, SETLN+2
SDT00	3+2~, 3+3, 4+2~, 4+5
SDWHEN	SELECT, SELECT+1, SELECT+2, SELECT+3, SELECT+4, SELECT+6, Q2!
>> TO	3+4*
U	LAST+5
X	EN, EN+1, SELECT+6, SHOW, Q2!, 3+2~, 4+2~, 4+4, 4+5, LAST+5 , QUE+5
>> X1	4+4, LAST+5
>> X2	4+4, LAST+5
>> XMDUZ	BULL+6*
XMSUB	BULL+3*, BULL+12!
XMTEXT	BULL+4*, BULL+12!
XMY	BULL+3!, BULL+12!
XMY(	BULL+5*
Y	EN+1, A+1, SELECT+6, Q2!, 4+2~, 4+4, 4+7*
>> ZTDESC	QUE+4*
>> ZTIO	QUE+4*
>> ZTRTN	QUE+4*
>> ZTSAVE(	QUE+5*
ZTSK	QUE+3!, QUE+6, QUE+7

Customize PDF page

Package: Scheduling

Routine: SDAMLD

Information

Source Information

Call Graph

Call Graph Total: 12

Caller Graph

Caller Graph Total: 3

Entry Points

External References

Interaction Calls

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend:

Marked Items

Name	Field # of Occurrence
$T(	EN, A+1
$T(@I	EN+1