Routine: SDM1A

Call Graph

Call Graph Total: 21

Package	Total	Call Graph
Scheduling	12	$$INP^SDAM2 MAKE^SDAMEVT (A,EDITCS,LINK)^SDCNSLT (EN1,ORDY)^SDM3 (,ELIG)^SDM4 $$NAVA^SDMANA MSG^SDMM RT^SDUTL MESS^SDWL120 EN^SDWLE11 (ANSW,APPT,EN)^SDWLEVAL (INIT,LIST)^SDWLPL
VA Fileman	4	H^%DTC (FILE,YN)^DICN ^DIE ^DIR
IHS Changes To Scheduling	3	XREFC^BSDDAM SDM^BSDMMU APPT^BSDU2
Kernel	1	$$NOW^XLFDT
Registration	1	ELIG^VADPT

Package	Total	Caller Graph
Scheduling	28	PATIENT SCCVCST5 SCCVEAE1 SCCVEAP1 SCCVEDI1 SCMSPX1 SCMSPX2 SDAMA308 SDAMEVT SDAMEX SDAMQ3 SDAMQ4 SDAMQ5 SDAPICO SDAUT2 SDCO1 SDCO2 SDCO3 SDCO4 SDCOM SDM SDM0 SDM1 SDMM SDN SDSTAT SDVSIT0 SDVSIT2
IHS Changes To Scheduling	3	ASDMON BSDMMU BSDMON
PCE Patient Care Encounter	2	PXBAPI21 PXUTLSCC
Automated Information Collection System	1	IBDFDE0
Clinical Scheduling for Windows	1	BSDX25A
IHS VA Support Files	1	PATIENT

Package

Total

Caller Graph

Scheduling

PATIENT  SCCVCST5  SCCVEAE1  SCCVEAP1  SCCVEDI1  SCMSPX1  SCMSPX2  SDAMA308
SDAMEVT  SDAMEX  SDAMQ3  SDAMQ4  SDAMQ5  SDAPICO  SDAUT2  SDCO1
SDCO2  SDCO3  SDCO4  SDCOM  SDM  SDM0  SDM1  SDMM
SDN  SDSTAT  SDVSIT0  SDVSIT2

IHS Changes To Scheduling

ASDMON BSDMMU BSDMON

PCE Patient Care Encounter

PXBAPI21 PXUTLSCC

Automated Information Collection System

IBDFDE0

Clinical Scheduling for Windows

BSDX25A

IHS VA Support Files

PATIENT

Entry Points

Name	Comments	DBIA/ICR reference
COQ
CHK(SDCL,SDT)	; -- should appt be NT'ed ; -- non-count clinic check := don't NT appt ; -- appt update executed := need to NT appt ; -- otherwise := don't NT appt
TXRT(SDSRTY)
S1
CO(SDCL,SDT,SDDA,SDACT)	; -- ok to update DPT
XR
CIQ
REQDT()	; -- co required date
EVT	; -- separate tag if need to NEW vars
FLG
SDMM
CI(SDCL,SDT,SDDA,SDACT)	; -- ok to update DPT
COCMP(DFN,SDT)	; -- date CO completed
REQ(SDT)	; -- which is required check in(CI) or out(CO)	ICR #1583 Status: Retired Usage: Controlled Subscription
OE(SDOE,SDACT)	; -- called by x-ref on co completed field(#.07) in ^SCE
STATUS(SDCL,SDINP,SDT)	; -- determine status for NEW appts
HXR
OTHER
CS
UPD(DFN,SDT,SDCOCMP,SDCODT)	; -- update status
EWLCHK	;check if patient has any open EWL entries (SD/372)
OK
OEQ
CONF(SDSRTY,SDSRFU,DFN,SDT,SC)	;Confirm scheduling request type
OV
ORD
CANT(DFN,SDT,SDOE)	;Determine if clinic appt. has been marked "NT"

External References

Name	Field # of Occurrence
H^%DTC	FLG+3, FLG+4
XREFC^BSDDAM	S1+35, OTHER+13
SDM^BSDMMU	OK+3, S1+14
APPT^BSDU2	S1+34
FILE^DICN	FLG+13, FLG+20
YN^DICN	ORD, XR
^DIE	FLG+16, FLG+19, FLG+42, CONF+18
^DIR	CONF+9
$$INP^SDAM2	S1+3
MAKE^SDAMEVT	EVT+1
A^SDCNSLT	S1+24
EDITCS^SDCNSLT	OTHER+16
LINK^SDCNSLT	OTHER+15
EN1^SDM3	S1+38
ORDY^SDM3	ORD+1
^SDM4	OK
ELIG^SDM4	SDMM+1
$$NAVA^SDMANA	S1+14
MSG^SDMM	OTHER+1, OTHER+3
RT^SDUTL	S1+31
MESS^SDWL120	FLG+44
EN^SDWLE11	FLG+24
ANSW^SDWLEVAL	EWLCHK+10, EWLCHK+11
APPT^SDWLEVAL	EWLCHK+3
EN^SDWLEVAL	EWLCHK+5
INIT^SDWLPL	EWLCHK+7
LIST^SDWLPL	EWLCHK+9, EWLCHK+10
ELIG^VADPT	SDMM+1
$$NOW^XLFDT	OTHER+13

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !,"Error making appointment in file 2.98" Line Location: S1+16
Function Call: WRITE	Prompt: ! Line Location: S1+37
Function Call: WRITE	Prompt: !,"MUST ENTER A REASON NOT TO DISPOSITION MATCHED EWL ENTRY",! Line Location: EWLCHK+11
Function Call: WRITE	Prompt: !,"Unable to acquire a lock on the Wait List file" Line Location: FLG+22
Function Call: WRITE	Prompt: !," Enter YES to notify patient on appt. letter of LAB, X-RAY, or EKG stops" Line Location: ORD+0
Function Call: READ	Prompt: " OTHER INFO: " Formatting: ! Timeout: DTIME Variable: D Line Location: OTHER+0
Function Call: WRITE	Prompt: !,*7,"'^' not allowed - hit return if no 'OTHER INFO' is to be entered" Line Location: OTHER+0
Function Call: WRITE	Prompt: " ENTER LAB, SCAN, ETC." Line Location: OTHER+6
Function Call: WRITE	Prompt: !!,"Enter the Reason for the Appointment. May be up to 155 characters long (no semi-colons or colons).",! Line Location: OTHER+7
Function Call: WRITE	Prompt: !,"WANT PREVIOUS X-RAY RESULTS SENT TO CLINIC" Line Location: XR+0
Function Call: WRITE	Prompt: !," Enter YES to have previous XRAY results sent to the clinic" Line Location: HXR+0
Function Call: WRITE	Prompt: !!,7,"* WARNING - CLINIC HAS AN INVALID OR INACTIVE STOP CODE!!!",!! Line Location: CS+0
Function Call: WRITE	Prompt: !!,7,"* WARNING - CLINIC HAS AN INVALID OR INACTIVE CREDIT STOP CODE!!!",!! Line Location: CS+1
Function Call: WRITE	Prompt: ! Line Location: CONF+9
Function Call: WRITE	Prompt: " (changed)" Line Location: CONF+13
Routine Call	DIE Line Location: FLG+16 FLG+19 FLG+42 CONF+18
Routine Call	DIR Line Location: CONF+9

FileNo	Call Tags
^DPT - [#2]	Classic Fileman Calls
^SDWL(409.3 - [#409.3]	Classic Fileman Calls
^SDWL(409.32 - [#409.32]	Classic Fileman Calls

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^DG(43 - [#43]	REQDT+1
^DIC(40.7 - [#40.7]	CS, CS+1
^DPT - [#2]	OK+4, S1+30, S1+38, FLG+26, COCMP+1, CI+4, CI+5, CO+4, CO+5, UPD+2 , UPD+3, UPD+4, CANT+2
^DPT("ASDCN"	S1+30
^SC - [#44]	OK+2, OK+4, S1, S1+2, S1+24, OTHER+13, XR, OV, CS, CS+1 , CHK+4, CI+4, CI+5, CO+4, CO+5, CO+6, OE+5
^SC("ARAD"	S1+2, XR
^SCE - [#409.68]	COCMP+1, OE+1
^SDD(409.65 - [#409.65]	CHK+4
^SDWL(409.3 - [#409.3]	FLG+21, FLG+43
^SDWL(409.32 - [#409.32]	FLG+11
^TMP("SDWLPL"	EWLCHK+6!
^TMP($J	EWLCHK+2!, EWLCHK+4, EWLCHK+6!, EWLCHK+8, EWLCHK+10, EWLCHK+11, FLG

Label References

Name	Line Occurrences
$$CANT	OE+4
$$CHK	STATUS+1, CI+2, CO+2, OE+4
$$COCMP	CO+7
$$REQ	CI+3, CO+3, OE+3
$$REQDT	REQ+1
$$TXRT	CONF+10
CIQ	CI+2, CI+3
CONF	S1+37
COQ	CO+2, CO+3
EVT	OV+1
HXR	XR
OEQ	OE+2, OE+3, OE+4
ORD	ORD
OTHER	OTHER, OTHER+1, OTHER+3, OTHER+7
OV	SDMM
S1	S1
UPD	CO+7, OE+5
XR	HXR

Name	Field # of Occurrence
^(	S1*, S1+30!, FLG+26
^("OB"	S1+1*
^("R"	S1+30!
^("RAD"	S1+2, XR
^("SCLR"	REQDT+1
^(0	OK+4, S1, OTHER+13, CS, CS+1, CI+4, CI+5, CO+4, CO+5*, UPD+2

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> %	ORD, ORD+1, XR
>> %H	FLG+3, FLG+4
>> BSDER	OK+3, S1+14, S1+15
>> BSDSRFU	S1+7
C	CI+1~, CI+5, CO+1~, CO+5
>> CNSLTLNK	OTHER+15, OTHER+16
>> COLLAT	S1+5, SDMM
>> COV	S1+5*, S1+14
>> D	OTHER*, OTHER+1, OTHER+3, OTHER+7, OTHER+13
DA	FLG+13~, FLG+14, FLG+20~, FLG+21, FLG+24, FLG+43, CONF+6~, CONF+17*
DA(1	CONF+17*
DFN	OK+3, OK+4, S1, S1+2, S1+3, S1+14, S1+30, S1+34, S1+37, S1+38 , EWLCHK+3, EWLCHK+5, EWLCHK+7, EWLCHK+9, EWLCHK+10, XR, EVT+1, COCMP~, COCMP+1, CO+1~ , CO+6*, CO+7, UPD~, UPD+2, UPD+3, UPD+4, CONF~, CONF+17, CANT~, CANT+2
DIC	FLG+13~, FLG+20
DIC(0	FLG+13, FLG+20
DIE	FLG+15, FLG+41, CONF+6~, CONF+18*
>> DILOCKTM	S1
DIR	CONF+6~
DIR("A"	CONF+8*
DIR("B"	CONF+7*
DIR(0	CONF+7*
DR	FLG+16, FLG+17, FLG+18, FLG+27, FLG+28, FLG+29, FLG+30, FLG+31, FLG+32, FLG+33 , FLG+34, FLG+35, FLG+36, FLG+37, FLG+38, FLG+39, FLG+40, CONF+6~, CONF+14, CONF+15*
DT	S1, S1+6, S1+38, FLG+2, FLG+7, CS, CS+1
DTIME	OTHER
>> DTOUT	CONF+9
>> DUOUT	CONF+9
DUZ	S1, OTHER+13
MAW	S1+17*!
>> S	OK+2
SC	OK+2, OK+3, OK+4, S1, S1+2, S1+14, S1+24, S1+30, S1+31, S1+34 , S1+35, S1+37, EWLCHK+3, FLG+10~*, FLG+11, FLG+13, FLG+44, OTHER+13, OTHER+15, XR , OV, CS, CS+1, EVT+1, CONF~
>> SD	OK+2, OK+3, OK+4, S1, S1+2, S1+3, S1+6, S1+14, S1+30, S1+31 , S1+34, S1+35, S1+37, S1+38, EWLCHK+3, OTHER+13, OTHER+15, OTHER+16, XR, OV , EVT+1
SD120	FLG+5~*
SD120A	FLG+5~*
>> SD17	S1+14
SDACT	CI~, CI+4, CI+5, CO~, CO+4, CO+5, CO+7, OE~, OE+5
SDAPP	CANT+2~*, CANT+3, CANT+4
>> SDAPTYP	S1+14, SDMM+1
SDCL	STATUS~, STATUS+1, CHK~, CHK+4, CI~, CI+2, CI+4, CI+5, CO~, CO+2 , CO+4, CO+5, CO+6
>> SDCLNCND	S1+24*
SDCOCMP	UPD~, UPD+3
SDCODT	UPD~, UPD+3
SDCOL	SDMM, OV!
SDCS	CS, CS+1, CS+2!
SDDA	CI~, CI+4, CI+5, CO~, CO+4, CO+5, CO+6
>> SDDATE	S1+14
>> SDDECOD	SDMM+1
SDDES	FLG+2~*, FLG+4, FLG+7
SDDES1	FLG+2~, FLG+4*, FLG+5
SDEC	SDMM, OV!
>> SDEMP	SDMM, SDMM+1, OV
SDEV	EWLCHK+5~
SDEV(1	EWLCHK+5
SDINP	S1+3*, S1+14, S1+34!, STATUS~, STATUS+1
>> SDMADE	OK, OV+1*
>> SDMLT	OK
>> SDMULT	S1+24
SDOE	OE~, OE+1, OE+4, CANT~, CANT+3
SDPAR	FLG+2~, FLG+19, FLG+44
>> SDPL	S1+31*
SDPR	FLG+7~*
SDQ1	OV!
SDR	EWLCHK+10~, EWLCHK+11~
>> SDRT	S1+31*
>> SDSC	S1+31*
SDSRFU	S1+7*, S1+14, S1+37, CONF~
SDSRTY	S1+6, S1+14, S1+37, CONF~, CONF+10, TXRT~, TXRT+3, TXRT+4*
SDSRTY(0	S1+37, CONF+8
SDST	FLG~*, FLG+2, FLG+8, FLG+9, FLG+10, FLG+20
SDT	FLG+2~*, FLG+3, FLG+44, STATUS~, STATUS+1, CHK~, CHK+4, REQ~, REQ+1, COCMP~ , COCMP+1, CI~, CI+2, CI+3, CI+4, CI+5, CO~, CO+2, CO+3, CO+4 , CO+5, CO+6, CO+7, UPD~, UPD+2, UPD+3, UPD+4, CONF~, CONF+17, CANT~ , CANT+2
SDT1	FLG+2~, FLG+3*, FLG+5
>> SDTTM	S1+31*
SDWLCM	FLG+25~*
>> SDWLDA	FLG+24*
>> SDWLDFN	FLG+20*, FLG+26, FLG+44
SDWLIN	FLG+8~*
SDWLSCL	FLG+10~, FLG+11, FLG+14
SDWLSCPG	FLG+26~*
SDWLSCPR	FLG+9~*
SDX	CONF+6~, CONF+10*, CONF+14, CONF+15
SDX(0	CONF+10*
>> SDXSCAT	S1+14
SDY	S1*, S1+31, S1+35, OTHER+13, OTHER+15, OV, EVT+1, CONF+6~
>> SDYC	S1+5*, S1+14
>> SDZM	OV
>> SL	S1, S1+34
>> SM	S1+1
>> STPCOD	S1+24*
TMP	OTHER+15, OTHER+16, OTHER+17!
>> TMPD	OTHER+1, OTHER+3, OTHER+16
>> TMPYCLNC	S1+24*, OTHER+16
U	S1, S1+14, S1+24, FLG+2, FLG+8, FLG+9, FLG+10, FLG+20, FLG+26, OTHER+13 , CHK+4, REQDT+1, COCMP+1, CI+4, CI+5, CO+4, CO+5, UPD+2, UPD+3, UPD+4 , OE+2, OE+4, OE+5, TXRT+3, TXRT+4, CANT+3, CANT+4
>> VAEL(1	SDMM+1
X	OK, FLG+3, FLG+4, FLG+13, FLG+20, CO+7, OE+5, CONF+6~
Y	UPD+1~, UPD+2, UPD+3, UPD+4, OE+1~, OE+2, OE+3, OE+4, OE+5, CONF+6~ , CONF+10

Customize PDF page

Package: Scheduling

Routine: SDM1A

Information

Source Information

Call Graph

Call Graph Total: 21

Caller Graph

Caller Graph Total: 36

Entry Points

External References

Interaction Calls

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend: