Routine: BSDCCR0

Call Graph

Call Graph Total: 12

Package	Total	Call Graph
IHS Changes To Scheduling	3	($$MON,$$WHEN,EXIT,QDIS,SCHED)^BSDCCR4 CP^BSDCCRL (CLINIC,EXPNDPC)^BSDU
Kernel	3	(,KILL)^%ZTLOAD $$NOW^XLFDT EN^XUTMDEVQ
Scheduling	2	$$DIVA^SCRPW17 (SUBT,TITL)^SCRPW50
VA Fileman	2	^%DT ^DIR
MailMan	1	^XMD
Registration	1	$$SITE^VASITE

Package	Total	Caller Graph
IHS Changes To Scheduling	1	BSDCCR2

Package

Total

Caller Graph

IHS Changes To Scheduling

BSDCCR2

Entry Points

Name	Comments	DBIA/ICR reference
QQ
XMTX(SDX)	;Set mail message line
RQUE(SDEX)	;Schedule extract for repetitive run
NAVA(SDY)	;format next available appointment information
SORT(SDSORT)	;Gather sort values for detailed report
CL	;Select clinics for detail
REQUE	;Entry point for initiating repetitive tasking of extracts
QUEUE(SDMON)	;Queue extraction for re-run
VCP(Y)	;Validate credit pair
QUE	;I SDBDT'>DT W !!,"This report requires 132 column output!" ;IHS/ANMC/LJF 10/6/2000
TXXM	;Transmit extract data
EDT
EXXM(XMG)	;Send extract mail message
CP	;Get credit pairs for detail
RESEND	;Entry point for manually initiating extracts for the current month

External References

Name	Field # of Occurrence
^%DT	BSDCCR0+17, EDT, QUEUE+4
^%ZTLOAD	QUEUE+7
KILL^%ZTLOAD	RQUE+11
$$MON^BSDCCR4	RESEND+14, RQUE+13
$$WHEN^BSDCCR4	RQUE+13
EXIT^BSDCCR4	BSDCCR0+15, BSDCCR0+17, EDT, EDT+5, EDT+16, EDT+17, EDT+18, QUE+2
QDIS^BSDCCR4	RESEND+4, REQUE+2
SCHED^BSDCCR4	RQUE+14
CP^BSDCCRL	CP+1
CLINIC^BSDU	CL+9
EXPNDPC^BSDU	CL+13
^DIR	EDT+5, EDT+16, CP+9, RESEND+8, RESEND+15, REQUE+3, REQUE+11, RQUE+10
$$DIVA^SCRPW17	BSDCCR0+15
SUBT^SCRPW50	BSDCCR0+16, EDT+3
TITL^SCRPW50	BSDCCR0+14
$$SITE^VASITE	TXXM+2
$$NOW^XLFDT	RQUE+4
^XMD	EXXM+5
EN^XUTMDEVQ	QUE+2

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: ! Line Location: BSDCCR0+17
Function Call: WRITE	Prompt: ! Line Location: EDT+0
Function Call: WRITE	Prompt: !!,$C(7),"End date cannot be before begin date!",! Line Location: EDT+1
Function Call: WRITE	Prompt: ! Line Location: EDT+5
Function Call: WRITE	Prompt: ! Line Location: EDT+16
Function Call: WRITE	Prompt: !!,"This report requires 132 column output!" Line Location: QUE+0
Function Call: WRITE	Prompt: ! Line Location: QUE+2
Function Call: WRITE	Prompt: ! Line Location: CP+8
Function Call: WRITE	Prompt: " Invalid credit pair!" Line Location: CP+11
Function Call: WRITE	Prompt: !!,$C(7),"NOTE: Use of this utility will result in the transmission of extract data to" Line Location: RESEND+2
Function Call: WRITE	Prompt: !,"Austin. It should only be used if automatically queued extracts failed to run." Line Location: RESEND+3
Function Call: WRITE	Prompt: ! Line Location: REQUE+3
Function Call: WRITE	Prompt: ! Line Location: REQUE+11
Function Call: WRITE	Prompt: !!,"Scheduled for: ",Y,", task number: ",$G(SDXTMP("EXTRACT",SDEX,"TASK")) Line Location: RQUE+7
Function Call: WRITE	Prompt: ! Line Location: QUEUE+4
Function Call: WRITE	Prompt: !!,"Extract not queued!!!",! Line Location: QQ+0
Function Call: WRITE	Prompt: !!,"Task number: ",ZTSK,! Line Location: QQ+1
Routine Call	DIR Line Location: EDT+5 EDT+16 CP+9 RESEND+8 RESEND+15 REQUE+3 REQUE+11 RQUE+10

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^DD("DD"	BSDCCR0+18, EDT+2, RQUE+7, QUEUE+3
^DIC(40.7 - [#40.7]	VCP+4, VCP+6
^SD(404.91 - [#404.91]	TXXM+3
^TMP("SD"	TXXM+5, TXXM+6, TXXM+7, TXXM+10, TXXM+11
^TMP("SDNAVA"	TXXM+18
^TMP("SDXM"	TXXM+25, EXXM+6!, XMTX+2*
^XTMP("SD53P192"	RESEND+4, REQUE+2, RQUE+12!

Name	Line Occurrences
$$NAVA	TXXM+19
$$SORT	EDT+17
$$VCP	CP+11
@(	SORT+8
EDT	EDT+1
EXXM	TXXM+8, TXXM+25
QQ	QUEUE+4
QUEUE	RESEND+15
RQUE	RESEND+8, REQUE+3, REQUE+11, RQUE+2
XMTX	TXXM+13, TXXM+17, TXXM+20, TXXM+21

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
%DT	BSDCCR0+17, QUEUE+2~, QUEUE+4
%DT("A"	BSDCCR0+17, EDT, QUEUE+3*
%DT("B"	QUEUE+3*
DIR	BSDCCR0+11~, CP+2~, RESEND+1~, REQUE+1~, REQUE+7!, RQUE+3~
DIR("?"	EDT+13, CP+4, CP+5, CP+6, CP+7, REQUE+9
DIR("A"	EDT+4, EDT+12, CP+3, RESEND+7, RESEND+14, REQUE+4, REQUE+10, RQUE+9
DIR("B"	EDT+7, RESEND+7, RESEND+11, REQUE+5, RQUE+8*
DIR(0	EDT+4, EDT+12, CP+3, RESEND+7, RESEND+11, REQUE+4, REQUE+8, RQUE+8
DT	RESEND+5, RESEND+13, QUEUE+3
DTOUT	BSDCCR0+11~, EDT+5, EDT+16, CP+9, RESEND+5, RESEND+8, RESEND+10, RESEND+12, RESEND+15, REQUE+3 , REQUE+7, REQUE+11, RQUE+2, RQUE+5, RQUE+10
DUOUT	BSDCCR0+11~, EDT+5, EDT+16, CP+9, RESEND+5, RESEND+8, RESEND+10, RESEND+12, RESEND+15, REQUE+3 , REQUE+7, REQUE+11, RQUE+2, RQUE+5, RQUE+10
SC	TXXM+1~, TXXM+6, TXXM+7, TXXM+9, TXXM+10, TXXM+11, TXXM+18
SDA	CL+10~, CL+11*, CL+12
>> SDBDT	BSDCCR0+18*, EDT+1, TXXM+9
SDCP	TXXM+1~, TXXM+5, TXXM+6, TXXM+7, TXXM+9, TXXM+10, TXXM+11, TXXM+18
SDDIV	BSDCCR0+11~, BSDCCR0+15
>> SDEDT	EDT+2*
SDEX	BSDCCR0+11~, BSDCCR0+12, RQUE~, RQUE+2, RQUE+4, RQUE+6, RQUE+7, RQUE+9, RQUE+11, RQUE+12 , RQUE+13, RQUE+14, TXXM+1~, TXXM+3, TXXM+9, TXXM+17, EXXM+3
>> SDEXDT	TXXM+9
SDFAC	TXXM+1~, TXXM+2*, TXXM+9
SDFMT	BSDCCR0+11~, EDT+7*
SDI	RESEND+1~, RESEND+5, RESEND+6, RESEND+8, RESEND+12, RESEND+13, RESEND+14, QUEUE+2~, QUEUE+7, TXXM+1~ , TXXM+10, TXXM+11, NAVA+3~, NAVA+4*, NAVA+5, NAVA+6
SDIV	TXXM+1~, TXXM+2, TXXM+5, TXXM+6, TXXM+7, TXXM+9, TXXM+10, TXXM+11, TXXM+18
SDL	TXXM+1~, TXXM+2*
SDMAX	BSDCCR0+11~, EDT+3*
SDMG	TXXM+1~, TXXM+3, TXXM+4, TXXM+8, TXXM+25
SDMON	RESEND+1~, RESEND+14, RESEND+15, RQUE+3~, RQUE+13, RQUE+14, QUEUE~
SDMON("SDEX"	QUEUE+6
SDNOW	RQUE+3~, RQUE+4*, RQUE+5
SDOUT	BSDCCR0+11~, BSDCCR0+12, BSDCCR0+15, BSDCCR0+17, EDT, EDT+5, EDT+16, EDT+17, EDT+18, QUE+2 , CL+1, CP+2, CP+8, CP+9, RQUE+3~, RQUE+4, RQUE+5, RQUE+10*
SDP	TXXM+1~, TXXM+12*
>> SDPAST	TXXM+3
>> SDPBDT	BSDCCR0+18*
>> SDPEDT	EDT+2*
SDQUIT	CL+1~, CP+2~, CP+8, CP+10*
>> SDRPT	RQUE+13*, RQUE+14
SDSIZE	TXXM+1~, TXXM+2, TXXM+8, EXXM+6, XMTX+2*
SDSORT	BSDCCR0+11~, EDT+17, SORT~, SORT+7, SORT+8, CL+13
SDSORT(	CL+12, CP+12
SDT	RESEND+1~, RESEND+13, RESEND+14, RQUE+3~, RQUE+13, RQUE+14
SDX	TXXM+1~, TXXM+9, TXXM+13, TXXM+14, TXXM+17, TXXM+20, TXXM+21, XMTX~, XMTX+2, NAVA+3~ , NAVA+4, NAVA+5, NAVA+6*, NAVA+8
>> SDXM	TXXM+2, EXXM+6, XMTX+2*
SDXTMP	RESEND+1~, RESEND+4, REQUE+1~, REQUE+2, REQUE+3
SDXTMP("EXTRACT"	RESEND+5, RQUE+4, RQUE+7, RQUE+11
SDY	TXXM+1~, TXXM+11, TXXM+12, TXXM+18, TXXM+19*, TXXM+20, TXXM+21, NAVA~, NAVA+6
SDZ	TXXM+1~, TXXM+12*, TXXM+14
U	RESEND+14, TXXM+2, TXXM+3, TXXM+9, TXXM+12, TXXM+14, NAVA+6
>> VAUTC(	CL+11, CL+12
X	BSDCCR0+11~, QUE+1*, CP+10
XMDUN	EXXM+2~, EXXM+4*
XMDUZ	EXXM+2~, EXXM+4*
XMG	EXXM~, EXXM+5
XMSUB	EXXM+2~, EXXM+3*
XMTEXT	EXXM+2~, EXXM+4*
XMY	EXXM+2~
XMY(	EXXM+5*
XMZ	EXXM+2~
Y	BSDCCR0+11~, BSDCCR0+17, BSDCCR0+18, EDT, EDT+1, EDT+2, EDT+3, EDT+7, EDT+17, CP+11 , CP+12, VCP~, VCP+3, VCP+4, VCP+5, VCP+6, RESEND+8, RESEND+15, REQUE+3, REQUE+11 , RQUE+3~, RQUE+4, RQUE+5, RQUE+7, RQUE+10, RQUE+11, QUEUE+2~, QUEUE+3, QUEUE+4, QUEUE+5
ZTDESC	QUEUE+2~, QUEUE+6*
ZTDTH	QUEUE+2~, QUEUE+5*
ZTIO	QUEUE+2~, QUEUE+5*
ZTRTN	QUEUE+2~, QUEUE+5*
ZTSAVE	QUE+1~, QUE+2, QUEUE+2~
ZTSAVE(	QUE+1*
ZTSAVE("SDMON("	QUEUE+5*
ZTSK	RQUE+11*, QUEUE+2~, QUEUE+7, QQ, QQ+1

Customize PDF page

Package: IHS Changes To Scheduling

Routine: BSDCCR0

Information

Source Information

Call Graph

Call Graph Total: 12

Caller Graph

Caller Graph Total: 1

Entry Points

External References

Interaction Calls

Global Variables Directly Accessed

Label References

Local Variables

Legend: