Routine: BSDAM

Call Graph

Call Graph Total: 29

Package	Total	Call Graph
Scheduling	9	(BLD,EN1)^SDAM SET^SDAM1 SEL^SDAMEP HDLKILL^SDAMEVT MC^SDCO5 ORD^SDM3 $$PCLINE^SDPPTEM DTS^SDUTL $$GETAPT^SDVSIT2
VA Fileman	5	EN^DDIOL ^DIC ^DIE $$GET1^DIQ ^DIR
IHS Changes To Scheduling	4	^BSDHSP CMS^BSDU1 ($$CO,$$SCIEN,PEND)^BSDU2 WLDATA^BSDWLV
Kernel	3	^%ZISC $$FMTE^XLFDT $$REPEAT^XLFSTR
Registration	3	DEM^VADPT (FULL,PAUSE)^VALM1 SEL^VALM2
IHS Changes To ADT	2	($$READ,MSG,PAUSE,ZIS)^BDGF $$LASTREG^BDGF2
Patient Care Component	2	(EOJ,GETVISIT)^APCDDISP ^APCDVD
IHS Patient	1	($$AGE,KILL)^AUPNPAT

Package	Total	Caller Graph
Scheduling	5	SDAM1 SDAM10 SDAM2 SDAMWI1 SDM
IHS Changes To Scheduling	2	BSDCHKI1 BSDV
IHS View Patient Record	1	BVPSD

Package

Total

Caller Graph

Scheduling

SDAM1 SDAM10 SDAM2 SDAMWI1 SDM

IHS Changes To Scheduling

BSDCHKI1 BSDV

IHS View Patient Record

BVPSD

Entry Points

Name	Comments	DBIA/ICR reference
DELTEST	; delete ancillary test from appt
OI(BSDC,BSDT,BSDN,DFN)	;EP; called by OI and by SDAMWI1 ; ask user to update other info
TESTS	;EP; append or delete ancillary tests
END	; end of action; return to appt mgt menu
FU	;EP; add follow up appointment
TST(NUMBER)	; -- returns name of test by number
ADTEST	; append ancillary test to appt
PAD(D,L)	;EP -- SUBRTN to pad length of data ; -- D=data L=length
HS	;EP; print or browse health summary
OIASK	;EP; add/edit other info
DISPTEST(PAT,DATE,SAVE)	; -- displays any ancillary tests already scheduled
AVAIL(N)	; returns 1 if user has access to print report N
RXPROF	;EP; print med or action profile
WLDIS(DFN)	;EP - display waiting list info on AM screen if by patient ;IHS/OIT/LJF 07/28/2005 PATCH 1004 ; Called by BLD1^SDAM1
OTHER	;EP; called by BSDAM OTHER REPORTS protocol ; if in Clinic Mode, ask for Patient
RPT	;;IHS/OIT/LJF 01/19/2006 PATCH 1005 added lines below
SP(N)	; -- SUBRTN to pad N number of spaces
PAT(DFN)	;PEP - drop into Appt Management list template with patient defined
VST	; view pcc visits
SETPT(DFN)	;sets AUPN variables when DFN is set
PTAPPT(DFN)	;EP - display pending appts, last reg update and register membership;IHS/OIT/LJF 12/30/2005 PATCH 1005 ; called when making an appt (SDAM2 and SDM)

External References

Name	Field # of Occurrence
^%ZISC	HS+1, OTHER+25
EOJ^APCDDISP	VST+4
GETVISIT^APCDDISP	VST+2
^APCDVD	VST+4
$$AGE^AUPNPAT	PTAPPT+2
KILL^AUPNPAT	OTHER+28
$$READ^BDGF	OI+11, RXPROF+6, RXPROF+9, TESTS+3, OTHER+14
MSG^BDGF	OI+14, OTHER+5, OTHER+19, OTHER+23
PAUSE^BDGF	ADTEST+10, DELTEST+9, DELTEST+15, OTHER+20, VST+3
ZIS^BDGF	RXPROF+17, RXPROF+18
$$LASTREG^BDGF2	PTAPPT+3
^BSDHSP	HS+1
CMS^BSDU1	PTAPPT+8
$$CO^BSDU2	ADTEST+8, DELTEST+7
$$SCIEN^BSDU2	OIASK+9, ADTEST+6, DELTEST+5
PEND^BSDU2	PTAPPT+9
WLDATA^BSDWLV	WLDIS+3
EN^DDIOL	DISPTEST+10
^DIC	PAT+6, RXPROF+15, SETPT+1
^DIE	OI+18, OI+20, DELTEST+21
$$GET1^DIQ	PTAPPT+6
^DIR	DELTEST+18
BLD^SDAM	END+1
EN1^SDAM	PAT+4
SET^SDAM1	WLDIS+5, WLDIS+7, WLDIS+8, WLDIS+9, WLDIS+10, WLDIS+16, WLDIS+19
SEL^SDAMEP	OIASK+5, FU+5, ADTEST+2, DELTEST+2
HDLKILL^SDAMEVT	PAT+1, PAT+4
MC^SDCO5	FU+13
ORD^SDM3	ADTEST+12
$$PCLINE^SDPPTEM	PTAPPT+2
DTS^SDUTL	ADTEST+7
$$GETAPT^SDVSIT2	FU+10
DEM^VADPT	OTHER+5
FULL^VALM1	OIASK+2, FU+2, HS+1, RXPROF+2, TESTS+1, OTHER+2
PAUSE^VALM1	OIASK+7, FU+7, FU+11, ADTEST+4, DELTEST+4
SEL^VALM2	OTHER+4
$$FMTE^XLFDT	DISPTEST+6
$$REPEAT^XLFSTR	PTAPPT+6, WLDIS+10, PAD+2

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !?4,"Age: "_$$AGE^AUPNPAT(DFN,DT,"R")_" "_$$PCLINE^SDPPTEM(DFN,DT) Line Location: PTAPPT+2
Function Call: WRITE	Prompt: !,"Last Registration Update: ",$$LASTREG^BDGF2(DFN) Line Location: PTAPPT+3
Function Call: WRITE	Prompt: !!?8,$$REPEAT^XLFSTR("",24),!?8,"* INELIGIBLE PATIENT *",!?8,$$REPEAT^XLFSTR("",24),! Line Location: PTAPPT+6
Function Call: WRITE	Prompt: !!,*7,">>> This is not a valid appointment." Line Location: OIASK+7
Function Call: WRITE	Prompt: !!,*7,">>> This is not a valid appointment." Line Location: FU+7
Function Call: WRITE	Prompt: !!,*7,">>>A followup appointment cannot be made until after the patient is checked in" Line Location: FU+11
Function Call: WRITE	Prompt: !!,*7,">>> This is not a valid appointment." Line Location: ADTEST+4
Function Call: WRITE	Prompt: !?5," Appointment already checked out; cannot add test. " Line Location: ADTEST+9
Function Call: WRITE	Prompt: !!,*7,">>> This is not a valid appointment." Line Location: DELTEST+4
Function Call: WRITE	Prompt: !?5," Appointment already checked out; cannot delete test. " Line Location: DELTEST+8
Function Call: WRITE	Prompt: !," No tests scheduled; nothing to delete. " Line Location: DELTEST+14
Function Call: WRITE	Prompt: !!,"No VISIT selected!" Line Location: VST+3
Routine Call	DIE Line Location: OI+18 OI+20 DELTEST+21
Routine Call	DIC Line Location: PAT+6 RXPROF+15 SETPT+1
Routine Call	DIR Line Location: DELTEST+18

FileNo	Call Tags
^SC - [#44]	Classic Fileman Calls
^AUPNPAT - [#9000001]	GET1^DIQ

Name	Line Occurrences (* Changed, ! Killed)
^DPT - [#2]	DISPTEST+2
^SC - [#44]	OI+3
^TMP("SDAMIDX"	WLDIS+17*, OIASK+6, FU+6, ADTEST+3, DELTEST+3, OTHER+4

Label References

Name	Line Occurrences
$$AVAIL	OTHER+18
$$OI	OIASK+11
$$PAD	SP+1
$$SP	WLDIS+5, WLDIS+8, WLDIS+19, OTHER+5
$$TST	DISPTEST+6
@(	TESTS+4, OTHER+25
DISPTEST	ADTEST+11, DELTEST+11
END	OIASK+7, OIASK+12, FU+7, FU+11, FU+15, HS+1, ADTEST+4, ADTEST+10, ADTEST+12, DELTEST+4 , DELTEST+7, DELTEST+13, DELTEST+17, DELTEST+23
OIASK	OIASK+10, OIASK+11
SETPT	OTHER+27, VST+5

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> APCDPAT	VST+2*
>> APCDVSIT	VST+3
>> AUPNPAT	VST+5*
BSDA	OTHER+8~, OTHER+14
BSDA(	OTHER+11*
BSDC	OIASK+1~, OIASK+9, OIASK+11, FU+1~, FU+10, OI~, OI+3, OI+17
BSDN	OIASK+1~, OIASK+9, OIASK+10, OIASK+11, FU+1~, FU+10, FU+11, FU+13, OI~, OI+3 , OI+17
BSDNEW	OI+2~, OI+11*, OI+13, OI+14, OI+18, OI+19, OI+20
BSDOLD	OI+2~, OI+4*, OI+18, OI+19
BSDPT	OIASK+1~, OIASK+8, OIASK+9, OIASK+11, FU+1~, FU+8, FU+10
BSDRPT	OTHER+8~, OTHER+16*, OTHER+25
BSDRR	DELTEST+1~, DELTEST+13
BSDRR(	DELTEST+20, DISPTEST+9*
BSDRR(""	DELTEST+17
BSDSAV	PAT+2~, PAT+3, PAT+5, VST+1~, VST+2, VST+5
BSDSRFU	FU+14!
BSDT	OIASK+1~, OIASK+9, OIASK+11, FU+1~, FU+10, OI~, OI+3, OI+17
BSDWLR	WLDIS+3~
BSDWLR(	WLDIS+12, WLDIS+13, WLDIS+16, WLDIS+17, WLDIS+18, WLDIS+19
BSDWLR(0	WLDIS+5, WLDIS+9
BSDX	OI+2~, OI+3, OI+4, OI+11, DELTEST+1~, DELTEST+17, DELTEST+19
BSDXXX	OTHER+8~, OTHER+16, OTHER+18, OTHER+21, OTHER+24*
CLN	RXPROF+1~, RXPROF+11, RXPROF+12, RXPROF+15, RXPROF+18
CNT	DISPTEST+1~, DISPTEST+5*, DISPTEST+6, DISPTEST+9
CODE	AVAIL+1~, AVAIL+2*, AVAIL+3
D	PAD~, PAD+2
DA	OI+2~, OI+17, DELTEST+1~, DELTEST+20
DA(1	OI+17, DELTEST+20
DA(2	OI+17*
DATA	DISPTEST+1~, DISPTEST+2*, DISPTEST+4, DISPTEST+6
DATE	WLDIS+11~, WLDIS+12*, WLDIS+13, WLDIS+16, WLDIS+17, WLDIS+18, WLDIS+19, DISPTEST~
DFN	PAT~, PAT+3, PAT+5, PAT+6, PTAPPT~, PTAPPT+2, PTAPPT+3, PTAPPT+6, PTAPPT+8, PTAPPT+9 , WLDIS~, WLDIS+3, WLDIS+17, OI~, OI+3, RXPROF+1~, RXPROF+5, RXPROF+6, RXPROF+7, RXPROF+17 , RXPROF+18, ADTEST+5, ADTEST+6, ADTEST+8, ADTEST+11, DELTEST+5, DELTEST+7, DELTEST+11, DELTEST+20, DISPTEST+2 , OTHER+3~, OTHER+4, OTHER+5, OTHER+27, VST+2, VST+5*, SETPT~, SETPT+1
DIC	PAT+6~, RXPROF+1~, RXPROF+13, RXPROF+15!, SETPT+1~*
DIC("A"	RXPROF+13*
DIC("S"	RXPROF+14*
DIC(0	PAT+6, RXPROF+13, SETPT+1*
DIE	OI+17, DELTEST+1~, DELTEST+20
DIR	OI+2~, DELTEST+1~, DELTEST+18!, DELTEST+19!
DIR("A"	DELTEST+18*
DIR(0	DELTEST+18*
DR	OI+2~, OI+18, OI+20, DELTEST+1~, DELTEST+20*
DT	PTAPPT+2, RXPROF+18
EKG	ADTEST+1~, ADTEST+7*
I	DISPTEST+1~, DISPTEST+3*, DISPTEST+4, DISPTEST+6, DISPTEST+9
L	PAD~, PAD+2
LAB	ADTEST+1~, ADTEST+7*
LEN	OI+2~
LINE	WLDIS+11~, WLDIS+13*, WLDIS+16, WLDIS+17, WLDIS+18, WLDIS+19, DISPTEST+1~, DISPTEST+10
LINE(	DISPTEST+5, DISPTEST+6, DISPTEST+9*
LINEC	WLDIS+11~, WLDIS+18*, WLDIS+19
N	AVAIL~, SP~, SP+1
NUMBER	TST~, TST+1
PAT	DISPTEST~
SAVE	DISPTEST~, DISPTEST+9
SD	ADTEST+1~, ADTEST+6, ADTEST+7, ADTEST+8, ADTEST+11, DELTEST+1~, DELTEST+5, DELTEST+7, DELTEST+11, DELTEST+20 , DISPTEST+2
>> SDACNT	WLDIS+15*, WLDIS+16, WLDIS+17
>> SDAMTYP	OTHER+3, OTHER+27, OTHER+28
SDCL	ADTEST+1~, ADTEST+6, ADTEST+8, DELTEST+1~, DELTEST+5, DELTEST+7
>> SDCLN	RXPROF+11, RXPROF+12
SDCOMKF	FU+12~, FU+13
>> SDCOQUIT	FU+13
SDDA	WLDIS+17, ADTEST+1~, ADTEST+6, ADTEST+8, DELTEST+1~, DELTEST+5, DELTEST+7
SDERR	OIASK+1~, OIASK+5, FU+1~, FU+5, ADTEST+1~, ADTEST+2, DELTEST+1~, DELTEST+2
SDFN	RXPROF+5, RXPROF+6, OTHER+3~, OTHER+4*
SDW	OIASK+1~, OIASK+5, OIASK+6, FU+1~, FU+5, FU+6, ADTEST+1~, ADTEST+2, ADTEST+3, DELTEST+1~ , DELTEST+2, DELTEST+3
SDWR	ADTEST+1~, ADTEST+7*
SDY	PAT+2~, PAT+3*
SODT	ADTEST+1~, ADTEST+7*
TYPE	RXPROF+1~, RXPROF+9*, RXPROF+12, RXPROF+17, RXPROF+18
U	WLDIS+16, WLDIS+17, WLDIS+19, OIASK+7, OIASK+8, OIASK+9, FU+7, FU+8, FU+10, OI+4 , OI+11, OI+13, TESTS+3, ADTEST+4, ADTEST+5, ADTEST+6, DELTEST+4, DELTEST+5, DISPTEST+4, DISPTEST+6 , OTHER+4
VA	OTHER+5~
VA("BID"	OTHER+5
VADM	OTHER+5~
VADM(1	OTHER+5
>> VALMBCK	END+2, VST+6
>> VALMCNT	WLDIS+17
>> VALMY(0	OTHER+4
X	PAT+6~, OIASK+1~, OIASK+6, OIASK+7, OIASK+8, OIASK+9, OIASK+11, FU+1~, FU+6, FU+7 , FU+8, FU+10, OI+2~, OI+9, OI+11, RXPROF+1~, TESTS+2~, TESTS+3, TESTS+4, ADTEST+1~ , ADTEST+3, ADTEST+4, ADTEST+5, ADTEST+6, DELTEST+1~, DELTEST+3, DELTEST+4, DELTEST+5, DELTEST+17, OTHER+8~ , OTHER+11, SETPT+1~
XRAY	ADTEST+1~, ADTEST+7*
Y	PAT+6~, RXPROF+1~, RXPROF+15, TESTS+2~, TESTS+4, ADTEST+7, DELTEST+1~, DELTEST+19, DELTEST+20, OTHER+8~ , OTHER+14*, OTHER+16, AVAIL+4, SETPT+1~

Customize PDF page

Package: IHS Changes To Scheduling

Routine: BSDAM

Information

Source Information

Call Graph

Call Graph Total: 29

Caller Graph

Caller Graph Total: 8

Entry Points

External References

Interaction Calls

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Local Variables

Legend:

Marked Items

Name	Field # of Occurrence
$T(RPT+BSDXXX	OTHER+16, OTHER+19, OTHER+23
$T(RPT+N	AVAIL+2
$T(RPT+X	OTHER+11