Routine: BSDDPA

Package	Total	Call Graph
IHS Changes To Scheduling	4	EN^BSDAMEP $$DIV^BSDU ($$APPTYP,$$CI,$$CO,$$OI)^BSDU2 ($$ONWL,WLDATA)^BSDWLV
Registration	4	EN^VALM TERM^VALM0 (CLEAR,FULL)^VALM1 EN^VALM2
Kernel	3	$$FMTE^XLFDT $$REPEAT^XLFSTR DISP^XQORM1
IHS Changes To ADT	2	($$CONF,$$READ,PAUSE)^BDGF ($$DEAD,$$DOD,$$HRCN)^BDGF2
IHS Patient	1	KILL^AUPNPAT
Patient Care Component	1	^APCDVD
Scheduling	1	$$PCLINE^SDPPTEM
VA Fileman	1	$$GET1^DIQ

Package	Total	Caller Graph
IHS Changes To ADT	1	BDGPI

Entry Points

Name	Comments	DBIA/ICR reference
VA	;EP; called by View Appt action
RESVIEW()	; -- returns 1 if restrict viewing of who made appt turned on
EN	;EP; -- main entry point for SD IHS APPT MADE BY;IHS/ITSC/LJF PATCH 1003
PAT	; -- ask user for patient
HDR	; -- header code
FORMAT	; -- convert data to external format
PAD(DATA,LENGTH)	; -- SUBRTN to pad length of data
SP(N)	; -- SUBRTN to pad N number of spaces
STATUS(PAT,DATE,NODE)	; returns appt status
SET(LINE,DATA,NUM,BSDLN)	; -- set ^tmp with display line
GETAPPT(BSDSUB)	; -- select appt from listing ; BSDSUB=subscript of display global
INIT	; -- init variables and list array ; variables set are DFN, BSDBD, BSDED ; BSDLN keeps track of line #s to update VALMCNT which is returned ; BSDNUM used to link display line with entry
EXIT	; -- exit code
GETVST(PAT,DATE)	; returns visit ien for appt date and patient
VV	;EP; called by View Visit action
FINDUSR(PAT,CLINIC,DATE,BSDU,BSDM)	; -- gets user and date made from file 44
RETURN	; -- reset variables for return to lt
OI(PAT,CLINIC,DATE)	; -- returns other info display line
HELP	; -- help code

External References

Name	Field # of Occurrence
^APCDVD	VV+14
KILL^AUPNPAT	PAT+2, EXIT+4
$$CONF^BDGF	HDR+2
$$READ^BDGF	PAT+3, PAT+5, PAT+15
PAUSE^BDGF	VV+7, VV+12
$$DEAD^BDGF2	HDR+7
$$DOD^BDGF2	HDR+7
$$HRCN^BDGF2	HDR+4
EN^BSDAMEP	VA+8
$$DIV^BSDU	RESVIEW+1
$$APPTYP^BSDU2	STATUS+2
$$CI^BSDU2	STATUS+6
$$CO^BSDU2	STATUS+5
$$OI^BSDU2	OI+1
$$ONWL^BSDWLV	PAT+10
WLDATA^BSDWLV	INIT+22
$$GET1^DIQ	HDR+3, HDR+5, HDR+6, INIT+12, FORMAT+1, RESVIEW+1
$$PCLINE^SDPPTEM	HDR+8
EN^VALM	EN+3
TERM^VALM0	EN+2, RETURN+1
CLEAR^VALM1	EN+2, EN+4
FULL^VALM1	GETAPPT+3
EN^VALM2	GETAPPT+5
$$FMTE^XLFDT	INIT+11, FORMAT+3
$$REPEAT^XLFSTR	INIT+29, PAD+1
DISP^XQORM1	HELP+1

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !!,"NO APPOINTMENTS FOUND!",! Line Location: PAT+9
Function Call: WRITE	Prompt: !!,"NO APPOINTMENTS OR WAITING LIST ENTRIES FOUND!",! Line Location: PAT+11
Function Call: WRITE	Prompt: !! Line Location: HELP+1
Function Call: WRITE	Prompt: !,"Sorry data missing on this appointment!" Line Location: VA+7
Function Call: WRITE	Prompt: !,"Sorry data missing on this appointment!" Line Location: VV+6
Function Call: WRITE	Prompt: !,"Sorry, this appointment does not have a visit attached yet." Line Location: VV+11
Routine Call	VALM Line Location: EN+3

FileMan Files Accessed Via FileMan Db Call

FileNo	Call Tags
^DPT - [#2]	GET1^DIQ
^VA(200 - [#200]	GET1^DIQ
^SC - [#44]	GET1^DIQ
^BSDPAR - [#9009020.2]	GET1^DIQ

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^AUPNVSIT - [#9000010]	VV+10
^DPT - [#2]	PAT+10, INIT+9, INIT+10, INIT+17, INIT+18, FINDUSR+3, GETVST+3
^SC - [#44]	FINDUSR+7, FINDUSR+8, FINDUSR+9
^SCE - [#409.68]	GETVST+5
^TMP(	GETAPPT+9, GETAPPT+10, GETAPPT+11, GETAPPT+12
^TMP("BSDDPA"	INIT+5!, SET+2, SET+3
^XUSEC("SDZSUP"	FORMAT+2

Label References

Name	Line Occurrences
$$GETVST	VV+9
$$OI	INIT+16
$$PAD	HDR+4, HDR+5, HDR+6, INIT+11, INIT+12, SP+1
$$RESVIEW	FORMAT+2
$$SP	HDR+2, HDR+7, INIT+18, INIT+25, INIT+27, INIT+33, OI+1
$$STATUS	INIT+13
EN	PAT+17
EXIT	EN+4
FORMAT	FINDUSR+4
GETAPPT	VA+4, VV+3
PAT	PAT+10, PAT+17
RETURN	VA+5, VA+9, VV+5, VV+10, VV+16
SET	INIT+15, INIT+16, INIT+18, INIT+19, INIT+23, INIT+25, INIT+27, INIT+28, INIT+29, INIT+33 , INIT+34

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
APCDCAT	VV+15!
APCDCLN	VV+15!
APCDDATE	VV+15!
APCDLOC	VV+15!
APCDLOOK	VV+15!
APCDPAT	VV+9*, VV+15!
APCDTYPE	VV+15!
APCDVSIT	VV+9*, VV+10, VV+15!
APDT	INIT+4~, INIT+8, INIT+9, INIT+10, INIT+11, INIT+13, INIT+15, INIT+16, INIT+17, INIT+18
BSDA	GETAPPT+2~, GETAPPT+4, GETAPPT+9, GETAPPT+12, GETAPPT+13, GETAPPT+14
BSDBD	PAT+1~, PAT+5*, PAT+10, INIT+8, EXIT+1!
BSDED	PAT+1~, PAT+15*, INIT+8, EXIT+1!
BSDLN	INIT+4~, INIT+15, INIT+16, INIT+18, INIT+19, INIT+23, INIT+25, INIT+27, INIT+28, INIT+29 , INIT+33, INIT+34, INIT+37, SET~, SET+1*, SET+2, SET+3, EXIT+1!
BSDM	INIT+4~, FINDUSR~, FINDUSR+4, FINDUSR+11, FORMAT+3*
BSDNUM	INIT+4~, INIT+14, INIT+15, INIT+16, INIT+18, INIT+19, INIT+23, INIT+25, INIT+27, INIT+28 , INIT+29, INIT+33, INIT+34, EXIT+1!
BSDSOME	GETAPPT+6, GETAPPT+7, VA+2~, VA+6
BSDSUB	GETAPPT~, GETAPPT+9, GETAPPT+10, GETAPPT+11, GETAPPT+12
BSDU	INIT+4~, FINDUSR~, FINDUSR+4, FINDUSR+10, FORMAT+1, FORMAT+2
BSDWLR	INIT+22!
BSDWLR(	INIT+31, INIT+32, INIT+33
BSDWLR(0	INIT+25, INIT+28
CLINIC	FINDUSR~, FINDUSR+7, FINDUSR+8, FINDUSR+9, OI~, OI+1
DATA	SET~, SET+3, PAD~, PAD+1
DATE	INIT+30~, INIT+31*, INIT+32, INIT+33, FINDUSR~, FINDUSR+3, FINDUSR+7, FINDUSR+8, FINDUSR+9, STATUS~ , STATUS+2, STATUS+5, STATUS+6, OI~, OI+1, GETVST~, GETVST+2, GETVST+3
DFN	PAT+1~, PAT+3, PAT+10, HDR+3, HDR+4, HDR+5, HDR+6, HDR+7, HDR+8, INIT+9 , INIT+10, INIT+13, INIT+15, INIT+16, INIT+17, INIT+18, INIT+22, GETAPPT+14, VA+1~, VA+4* , VA+5, VV+1~, VV+3*, VV+5, VV+9, VV+10, FINDUSR+8
DT	HDR+8
DUZ	FORMAT+2
DUZ(2	HDR+4
END	INIT+4~, INIT+8*, INIT+9
>> IORVOFF	HDR+3, HDR+7
>> IORVON	HDR+3, HDR+7
LENGTH	PAD~, PAD+1
LINE	INIT+4~, INIT+11, INIT+12, INIT+13, INIT+14, INIT+15, INIT+30~, INIT+32*, INIT+33, SET~ , SET+2
N	SP~, SP+1
NODE	INIT+4~, INIT+10*, INIT+12, INIT+13, INIT+15, INIT+16, INIT+17, STATUS~, STATUS+3, STATUS+4 , STATUS+5, STATUS+6
NUM	SET~, SET+3
ORX	EXIT+2!
PAT	FINDUSR~, FINDUSR+3, STATUS~, STATUS+2, STATUS+5, STATUS+6, OI~, OI+1, GETVST~, GETVST+2 , GETVST+3, GETVST+6
SDC	EXIT+2!
SDCL	GETAPPT+14, VA+1~, VA+4, VA+5, VV+1~, VV+3*, VV+5
SDIFN	EXIT+2!
SDP	EXIT+2!
SDPP	EXIT+2!
SDS	EXIT+2!
SDSTAT	EXIT+2!
SDT	GETAPPT+14, VA+1~, VA+4, VA+5, VV+1~, VV+3*, VV+5, VV+9
SDW	GETAPPT+8*, VA+1~, VV+1~
>> SUB	VA+3, VA+4, VV+2, VV+3
TYP	STATUS+1~, STATUS+2*, STATUS+3, STATUS+4, STATUS+5, STATUS+6, STATUS+7
U	INIT+15, INIT+17, INIT+33, GETAPPT+14, VV+10, FINDUSR+3, FINDUSR+4, FINDUSR+9, FINDUSR+10, FINDUSR+11 , STATUS+3, STATUS+4, GETVST+4, GETVST+6, GETVST+7
>> VALMAR	VA+3, VV+2
VALMBCK	EXIT+3!, RETURN+1*
>> VALMCC	EN+2*
VALMCNT	EN+1~, INIT+37*, EXIT+3!
VALMHDR	EXIT+3!
VALMHDR(1	HDR+2*
VALMHDR(2	HDR+6*
VALMHDR(3	HDR+7, HDR+8
VALMY	EXIT+2!, GETAPPT+6
VALMY(0	GETAPPT+8
X	HDR+1~, HDR+3, HDR+4, HDR+5, HDR+6, INIT+4~, INIT+15, HELP+1, GETAPPT+2~, GETAPPT+8 , GETAPPT+12, FINDUSR+1~, FINDUSR+7, FINDUSR+8, FINDUSR+9, GETVST+1~, GETVST+3, GETVST+4, GETVST+5, GETVST+6 , GETVST+7
>> XQORNOD(0	GETAPPT+5
Y	GETAPPT+2~, GETAPPT+9, GETAPPT+10, GETAPPT+11, GETAPPT+12, FINDUSR+1~, FINDUSR+3, FINDUSR+4, FINDUSR+7!, FINDUSR+9* , FINDUSR+10, FINDUSR+11
Z	GETAPPT+2~, GETAPPT+10*, GETAPPT+11, GETAPPT+12

Customize PDF page

Package: IHS Changes To Scheduling

Routine: BSDDPA

Information

Source Information

Call Graph

Call Graph Total: 17

Caller Graph

Caller Graph Total: 1

Entry Points

External References

Interaction Calls

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Local Variables

Legend: