Routine: BSDX07

Package	Total	Call Graph
VA Fileman	5	^%DT C^%DTC (UPDATE,WP)^DIE ^DIK $$GET1^DIQ
IHS Changes To Scheduling	3	$$MAKE^BSDAPI WISD^BSDROUT $$DIV^BSDU
Kernel	2	^%ZTER ($$FMADD,$$NOW)^XLFDT
Clinical Scheduling for Windows	1	APPOVB^BSDX07A
M Transfer	1	EVENT^BMXMEVN
Uncategorized	1	DEBUG^%Serenji

Package	Total	Caller Graph
Clinical Scheduling for Windows	1	BSDX08

Entry Points

Name	Comments	DBIA/ICR reference
ENDBG	;BSDX ADD NEW APPOINTMENT^12-28-2000@0900^12-28-2000@1000^370^2^PEDIATRICIAN,DEMO^EXAM^SCRATCH NOTE
ERR(BSDXI,BSDXERR)	;Error processing
BSDXDEL(BSDXAPPTID)	;Deletes appointment BSDXAPPTID from BSDXAPPOINTMETN
ERR1(BSDXERR)	;Error processing
DOW
1	;L Q:$D(SDXXX) S CCXN=0 K MXOK,COV,SDPROT Q:DFN<0 S SC=+SC
EN1
ADDEVT3(BSDXRES)	;
DAY	;;^SUN^MON^TUES^WEDNES^THURS^FRI^SATUR
ADDEVT(BSDXPATID,BSDXSTART,BSDXSC,BSDXSCDA)	;EP
AVUPDT(BSDXSCD,BSDXSTART,BSDXLEN)	;Update RPMS Clinic availability
APPRPMS(BSDXLEN,BSDXNOTE,BSDXPATID,BSDXRESD,BSDXSTART,BSDXWKIN)	;
APPOVB(BSDXY,SDCL,NSDT,BSDXRES)	; RPC - BSDX OVERBOOK - CHECK FOR OVERBOOK FOR GIVEN CLINIC, DATE, AND RESOURCE ; .BSDXY = returned pointer to OVERBOOK data ; SDCL = clinic code - pointer to Hospital Location file ^SC ; NSDT = date/time of new appointment ; BSDXRES = resource to check for overbook
STRIP(BSDXZ)	;Replace control characters with spaces
ETRAP	;EP Error trap entry
APPADD(BSDXY,BSDXSTART,BSDXEND,BSDXPATID,BSDXRES,BSDXLEN,BSDXNOTE,BSDXATID,BSDXCR)	;EP
BSDXADD(BSDXSTART,BSDXEND,BSDXPATID,BSDXRESD,BSDXATID)	;ADD BSDX APPOINTMENT ENTRY
S
ERROR	;
APPADDD(BSDXY,BSDXSTART,BSDXEND,BSDXPATID,BSDXRES,BSDXLEN,BSDXNOTE,BSDXATID,BSDXCR)	;EP
SP
BSDXWP(BSDXAPPTID,BSDXNOTE)	;
SC

External References

Name	Field # of Occurrence
^%DT	ENDBG+20, ENDBG+22
C^%DTC	1+3
DEBUG^%Serenji	APPADDD+3
^%ZTER	ETRAP+1
EVENT^BMXMEVN	ADDEVT3+7
$$MAKE^BSDAPI	ENDBG+61, APPRPMS+17
WISD^BSDROUT	ENDBG+39
$$DIV^BSDU	ENDBG+38
APPOVB^BSDX07A	APPOVB+5
UPDATE^DIE	BSDXADD+14
WP^DIE	BSDXWP+5
^DIK	BSDXDEL+3
$$GET1^DIQ	ENDBG+38
$$FMADD^XLFDT	ADDEVT+17, AVUPDT+9
$$NOW^XLFDT	BSDXADD+10

Used in RPC

RPC Name	Call Tags
BSDX ADD NEW APPOINTMENT	APPADD

FileMan Files Accessed Via FileMan Db Call

FileNo	Call Tags
^BSDXAPPT - [#9002018.4]	Classic Fileman Calls, WP^DIE
^BSDPAR - [#9009020.2]	GET1^DIQ

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^%ZOSF("TRAP"	ENDBG+6
^BSDXAPPT - [#9002018.4]	ENDBG+14, ENDBG+70
^BSDXRES - [#9002018.1]	ENDBG+43, APPRPMS+2, ADDEVT3+3
^BSDXRES("ALOC"	ADDEVT+7
^BSDXRES("ASSOC"	ADDEVT+8
^BSDXRES("B"	ENDBG+29, ENDBG+30
^BSDXTMP($J	ENDBG+5!, ENDBG+10, ENDBG+72, ENDBG+74, ERR+4, ERR+6, ERR1+3, ERR1+5*
^DPT - [#2]	ENDBG+26, ADDEVT+12
^HWDEBUG("BREAK"	APPADDD+3
^SC - [#44]	ENDBG+48, APPRPMS+5, ADDEVT+10, AVUPDT+6, AVUPDT+8, 1+2, S, SC+1, SC+2, SC+4 , SP+6, SP+10, SP+11

Label References

Name	Line Occurrences
$$BSDXADD	ENDBG+35, ADDEVT+18
$$STRIP	ENDBG+58, APPRPMS+14
ADDEVT3	ADDEVT+22
AVUPDT	ENDBG+63, APPRPMS+19
BSDXWP	ENDBG+40, ADDEVT+21
DAY	S
DOW	EN1
ENDBG	APPADDD+4
ERR	ENDBG+14, ENDBG+21, ENDBG+23, ENDBG+24, ENDBG+26, ENDBG+29, ENDBG+36, ENDBG+38, ENDBG+45, ENDBG+48 , APPRPMS+3, APPRPMS+5, ETRAP+4
ERR1	ERROR+1
SC	SC+1
SP	SP

Naked Globals

Name	Field # of Occurrence
^(	S
^(0	S*
^(1	S

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> %	DOW, DOW+1, SC+5*
>> %DT	ENDBG+20, ENDBG+22
>> %ZTERROR	ETRAP+4
>> ABORT	SP+2, SP+3, SP+6, SP+7*
BSDXAPPTI	ENDBG+2~
BSDXAPPTID	ENDBG+35, ENDBG+36, ENDBG+40, ENDBG+72, BSDXDEL~, BSDXDEL+2, BSDXADD+3~, BSDXADD+15, BSDXADD+16, BSDXWP~ , BSDXWP+5, ADDEVT+5~, ADDEVT+18*, ADDEVT+19, ADDEVT+21
BSDXATID	APPADDD~, APPADD~, ENDBG+32, ENDBG+33*, ENDBG+35, ENDBG+39, BSDXADD~, BSDXADD+11, BSDXADD+12
BSDXC	ENDBG+2~, ENDBG+61, APPRPMS+1~, APPRPMS+17
BSDXC("ADT"	ENDBG+53, APPRPMS+10
BSDXC("CLN"	ENDBG+50, APPRPMS+7
BSDXC("LEN"	ENDBG+54, APPRPMS+11
BSDXC("OI"	ENDBG+56, ENDBG+57, ENDBG+58, APPRPMS+12, APPRPMS+13, APPRPMS+14
BSDXC("PAT"	ENDBG+49, APPRPMS+6
BSDXC("RES"	ENDBG+59, APPRPMS+15
BSDXC("TYP"	ENDBG+51, ENDBG+52, APPRPMS+8, APPRPMS+9
BSDXC("USR"	ENDBG+60, APPRPMS+16
BSDXCR	APPADDD~, APPADD~, ENDBG+39
BSDXDEP	ENDBG+2~
BSDXDERR	ENDBG+3~, ENDBG+72
BSDXDEV	ENDBG+3~, ENDBG+38*, ENDBG+39
BSDXDJ	ENDBG+2~
BSDXEND	APPADDD~, APPADD~, ENDBG+19, ENDBG+22, ENDBG+23, ENDBG+24, ENDBG+25, ENDBG+35, BSDXADD~, BSDXADD+5 , ADDEVT+17, ADDEVT+18
BSDXERR	ENDBG+2~, ENDBG+7, ENDBG+28, ENDBG+48, ENDBG+61, ENDBG+62, APPRPMS+5, APPRPMS+17, APPRPMS+18, APPRPMS+22 , ERR~, ERR+2, ERR+4, ERR1~, ERR1+1, ERR1+3
>> BSDXFDA(	BSDXADD+4, BSDXADD+5, BSDXADD+6, BSDXADD+7, BSDXADD+8, BSDXADD+10, BSDXADD+11, BSDXADD+12
BSDXI	ENDBG+2~, ENDBG+8, ENDBG+10, ENDBG+11, ENDBG+14, ENDBG+21, ENDBG+23, ENDBG+24, ENDBG+26, ENDBG+29 , ENDBG+36, ENDBG+38, ENDBG+45, ENDBG+48, ENDBG+71, ENDBG+72, ENDBG+73, ENDBG+74, APPRPMS+3, APPRPMS+5 , STRIP+1~, STRIP+2, ERR~, ERR+1, ERR+4, ERR+5, ERR+6, ETRAP+2~, ETRAP+3, ETRAP+4 , ERR1+2, ERR1+3, ERR1+4*, ERR1+5
BSDXIEN	ENDBG+2~, BSDXADD+13!
BSDXIEN(1	BSDXADD+15
>> BSDXINC	S+6, S+7, S+8
BSDXJ	ENDBG+2~
BSDXLEN	APPADDD~, APPADD~, ENDBG+54, ENDBG+63, APPRPMS~, APPRPMS+11, APPRPMS+19, ADDEVT+5~, ADDEVT+15, ADDEVT+16 , ADDEVT+17, AVUPDT~, S+1, S+4, S+5, S+6, S+8*
BSDXMSG	BSDXADD+13!
BSDXNOD	ADDEVT+5~, ADDEVT+10*, ADDEVT+11, ADDEVT+15, ADDEVT+20
BSDXNODP	ADDEVT+5~, ADDEVT+12*, ADDEVT+14
BSDXNOEV	ENDBG+3~, ENDBG+4*, ADDEVT+6
BSDXNOTE	APPADDD~, APPADD~, ENDBG+40, ENDBG+56, APPRPMS~, APPRPMS+12, BSDXWP~, BSDXWP+2, ADDEVT+20, ADDEVT+21
BSDXNOTE(	BSDXWP+2, BSDXWP+3, BSDXWP+4
BSDXNOTE(0	BSDXWP+3!
BSDXPATID	APPADDD~, APPADD~, ENDBG+14, ENDBG+26, ENDBG+35, ENDBG+39, ENDBG+49, ENDBG+70, APPRPMS~, APPRPMS+6 , BSDXADD~, BSDXADD+6, ADDEVT~, ADDEVT+12, ADDEVT+18, AVUPDT+5
BSDXRES	APPADDD~, APPADD~, ENDBG+29, ENDBG+30, ADDEVT+5~, ADDEVT+7, ADDEVT+8, ADDEVT+9, ADDEVT+18, ADDEVT+22 , ADDEVT3~, ADDEVT3+3, APPOVB~
BSDXRESD	ENDBG+2~, ENDBG+28!, ENDBG+30*, ENDBG+35, ENDBG+43, ENDBG+59, APPRPMS~, APPRPMS+2, APPRPMS+15, BSDXADD~ , BSDXADD+7
BSDXRESN	ADDEVT3+2~, ADDEVT3+3, ADDEVT3+4, ADDEVT3+5, ADDEVT3+7
BSDXRNOD	ENDBG+2~, ENDBG+43, ENDBG+45, ENDBG+46, APPRPMS+1~, APPRPMS+2, APPRPMS+3, APPRPMS+4
BSDXSC	ADDEVT~, ADDEVT+7, ADDEVT+8, ADDEVT+10
BSDXSCD	ENDBG+2~, ENDBG+46, ENDBG+48, ENDBG+50, ENDBG+63, APPRPMS+1~, APPRPMS+4, APPRPMS+5, APPRPMS+7, APPRPMS+19 , AVUPDT~, AVUPDT+5
BSDXSCDA	ADDEVT~, ADDEVT+10
BSDXSTART	APPADDD~, APPADD~, ENDBG+18, ENDBG+20, ENDBG+21, ENDBG+25*, ENDBG+35, ENDBG+39, ENDBG+53, ENDBG+63 , APPRPMS~, APPRPMS+10, APPRPMS+19, BSDXADD~, BSDXADD+4, ADDEVT~, ADDEVT+10, ADDEVT+12, ADDEVT+17, ADDEVT+18 , AVUPDT~, AVUPDT+10, 1+4
>> BSDXTMP	ENDBG+25*
BSDXWKIN	ENDBG+2~, ENDBG+31, ENDBG+32, ENDBG+52, APPRPMS~, APPRPMS+9, ADDEVT+5~, ADDEVT+13, ADDEVT+14, ADDEVT+18
BSDXY	APPADDD~, APPADD~, ENDBG+9*, APPOVB~
BSDXZ	STRIP~, STRIP+2*, STRIP+3
CCXN	AVUPDT+3~, 1+1*
COV	AVUPDT+3~, 1+1!
DA	BSDXDEL+1~, BSDXDEL+2*
DFN	AVUPDT+2~, AVUPDT+5*, 1+1
>> DGQUIET	ENDBG+39*
DIK	BSDXDEL+1~, BSDXDEL+2*
DT	AVUPDT+9, 1+2
DUZ	APPADDD+3, ENDBG+60, APPRPMS+16, BSDXADD+8
>> ERRNO	ERR1+1
HSI	AVUPDT+3~, AVUPDT+6*, SC+3
I	AVUPDT+4~, SC+3, SC+4, SP+3, SP+4, SP+8
MXOK	AVUPDT+3~, 1+1!
NSDT	APPOVB~
>> RPMSL	S+3*, S+4, S+5, S+6, S+8
S	AVUPDT+4~, S+1, S+9, SC+2, SC+4, SC+5, SP, SP+4, SP+6, SP+8 , SP+10
SB	AVUPDT+3~, AVUPDT+6*, SC+3
SC	AVUPDT+3~, AVUPDT+6, AVUPDT+8, 1+1, 1+2, S, SC+1, SC+2, SC+4, SP+6 , SP+10, SP+11
SD	AVUPDT+4~, EN1*, S, SC+1, SC+2, SC+3, SC+4, SP+6, SP+10, SP+11
SDCL	APPOVB~
SDDATE	AVUPDT+3~, AVUPDT+10, AVUPDT+11
SDDIF	AVUPDT+3~, AVUPDT+6*, SC+3, SC+5, SP+3
SDDMAX	AVUPDT+3~, AVUPDT+9*
SDEDT	AVUPDT+4~, 1+2, 1+3
SDLOCK	AVUPDT+4~, SC, SC+2
SDMAX	AVUPDT+3~, AVUPDT+9*
SDMAX(1	AVUPDT+8*, AVUPDT+9
>> SDNOT	SP+1*
SDPROG	AVUPDT+3~
SDPROT	1+1!
SDSDATE	AVUPDT+3~, AVUPDT+11*
>> SDXXX	1+1
SI	AVUPDT+3~, AVUPDT+6*, S, SC+3
SL	AVUPDT+3~, AVUPDT+6, S+3, S+9, SC+3, SC+5
SM	AVUPDT+4~, EN1, SC+5, SP+8*
SS	AVUPDT+4~, S, SC+3, SC+5, SP+3
ST	AVUPDT+4~, SC+3, SC+5, SP, SP+3, SP+4, SP+5, SP+6, SP+8*
STARTDAY	AVUPDT+3~, AVUPDT+6*
STR	AVUPDT+3~, AVUPDT+6*, SP+5
U	APPADDD+3, ENDBG+46, APPRPMS+4, ADDEVT+14, ADDEVT+15, ADDEVT+20, AVUPDT+6, AVUPDT+8, S, S+3 , S+9
X	ENDBG+6, ENDBG+20, ENDBG+22, DOW, DOW+2, AVUPDT+3~, AVUPDT+6, 1+3, EN1*
X1	AVUPDT+4~, 1+2*
X2	AVUPDT+4~, 1+3*
Y	ENDBG+20, ENDBG+22, DOW, DOW+1, DOW+2, AVUPDT+2~, AVUPDT+5, AVUPDT+6!, 1+4, EN1 , S, SP+5, SP+7, SP+8

Marked Items

Customize PDF page

Package: Clinical Scheduling for Windows

Routine: BSDX07

Information

Source Information

Call Graph

Call Graph Total: 13

Caller Graph

Caller Graph Total: 1

Entry Points

External References

Used in RPC

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend:

Marked Items